(* Content-type: application/mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 7.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 7261583, 143713] NotebookOptionsPosition[ 7203666, 142704] NotebookOutlinePosition[ 7204331, 142726] CellTagsIndexPosition[ 7204288, 142723] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["MEC-E1050 Finite Element Method in Solids 2021", "Title", InitializationCell->True, CellChangeTimes->{ 3.4430806364968*^9, {3.4453166713873997`*^9, 3.4453166747414*^9}, { 3.447462264275*^9, 3.4474622644154*^9}, {3.4695731321116*^9, 3.4695731359491997`*^9}, 3.473055186341*^9, {3.4730552472860003`*^9, 3.47305524884*^9}, {3.473055399782*^9, 3.473055419801*^9}, { 3.4734696760778*^9, 3.4734697047349997`*^9}, {3.4770537891542*^9, 3.4770537950354*^9}, {3.4932799754514*^9, 3.4932799779161997`*^9}, { 3.4945558951644*^9, 3.4945558957416*^9}, {3.4957646303032*^9, 3.4957646329084*^9}, {3.497581602118*^9, 3.4975816042552*^9}, { 3.500960505817*^9, 3.5009605094206*^9}, {3.556623836083009*^9, 3.5566238462386265`*^9}, 3.5568725629008207`*^9, {3.5568726649396567`*^9, 3.5568726677478175`*^9}, 3.618709835758954*^9, 3.629777498181036*^9, 3.661174828401641*^9, {3.685234578060045*^9, 3.6852345824842978`*^9}, { 3.68523485439185*^9, 3.6852348785262303`*^9}, {3.6852638608992662`*^9, 3.685263861779268*^9}, {3.6853203463091555`*^9, 3.6853203574191704`*^9}, { 3.688455489182722*^9, 3.688455490812724*^9}, {3.7162065219450207`*^9, 3.716206522795353*^9}, 3.743648703897718*^9, 3.7739888865504923`*^9, { 3.81147447309474*^9, 3.8114744732320685`*^9}, 3.8431824599791775`*^9},ExpressionUUID->"88382003-a489-4214-981a-\ b19c8fc5cd6f"], Cell[CellGroupData[{ Cell["FEM DEFINITIONS", "Section", CellChangeTimes->{ 3.4430806364968*^9, {3.4453166713873997`*^9, 3.4453166747414*^9}, { 3.447462264275*^9, 3.4474622644154*^9}, {3.4695731321116*^9, 3.4695731359491997`*^9}, 3.473055186341*^9, {3.4730552472860003`*^9, 3.47305524884*^9}, {3.473055399782*^9, 3.473055419801*^9}, { 3.4734696760778*^9, 3.4734697047349997`*^9}, {3.4770537891542*^9, 3.4770537950354*^9}, {3.4932799754514*^9, 3.4932799779161997`*^9}, { 3.4945558951644*^9, 3.4945558957416*^9}, {3.4957646303032*^9, 3.4957646329084*^9}, {3.497581602118*^9, 3.4975816042552*^9}, { 3.500960505817*^9, 3.5009605094206*^9}, {3.556623836083009*^9, 3.5566238462386265`*^9}, {3.5568725055395393`*^9, 3.5568725163821597`*^9}, {3.556872678728445*^9, 3.5568726810485783`*^9}, { 3.7323376045620503`*^9, 3.7323376086812124`*^9}},ExpressionUUID->"859fc4d6-3e37-4527-8708-\ d6f26cb14938"], Cell[CellGroupData[{ Cell["DEFS defs ", "Subsection", CellChangeTimes->{{3.4770537307790003`*^9, 3.4770537313562*^9}},ExpressionUUID->"0171a1b3-fb2d-42a2-bd92-b19f365f5e59"], Cell[BoxData[{ RowBox[{ RowBox[{"Off", "[", RowBox[{"General", "::", "spell"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Off", "[", RowBox[{"General", "::", "spell1"}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Clear", "[", "\[Delta]", "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", "exp_", "]"}], ":=", RowBox[{"exp", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"a", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"\[Delta]a", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"b", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"\[Delta]b", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"c", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"\[Delta]c", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]ux", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"uy", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]uy", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"uz", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]uz", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]x", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]\[Theta]x", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Theta]y", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]\[Theta]y", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Theta]z", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]\[Theta]z", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"uX", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]uX", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"uY", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]uY", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"uZ", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]uZ", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]X", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]\[Theta]X", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Theta]Y", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]\[Theta]Y", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Theta]Z", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]\[Theta]Z", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Fx", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]Fx", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"Fy", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]Fy", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"Fz", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]Fz", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Mx", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]Mx", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"My", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]My", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"Mz", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]Mz", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"FX", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]FX", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"FY", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]FY", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"FZ", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]FZ", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"MX", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]MX", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"MY", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]MY", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"MZ", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]MZ", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"FN", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]FN", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"FT", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]FT", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"FB", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]FB", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"MN", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]MN", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"MT", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]MT", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"MB", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]MB", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[CurlyTheta]", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Delta]\[CurlyTheta]", "[", "any", "]"}]}]}], "}"}]}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]UN", "[", "exp_", "]"}], ":=", RowBox[{"exp", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"\[Delta]a", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"a", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Delta]b", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"b", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]c", "[", "any__", "]"}], " ", "\[Rule]", RowBox[{"c", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", " ", RowBox[{ RowBox[{"\[Delta]ux", "[", "any__", "]"}], "\[Rule]", RowBox[{"ux", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]uy", "[", "any__", "]"}], "\[Rule]", RowBox[{"uy", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]uz", "[", "any__", "]"}], "\[Rule]", RowBox[{"uz", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", " ", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Theta]x", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Theta]y", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Theta]z", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", " ", RowBox[{ RowBox[{"\[Delta]uX", "[", "any__", "]"}], "\[Rule]", RowBox[{"uX", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]uY", "[", "any__", "]"}], "\[Rule]", RowBox[{"uY", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]uZ", "[", "any__", "]"}], "\[Rule]", RowBox[{"uZ", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", " ", RowBox[{ RowBox[{"\[Delta]\[Theta]X", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Theta]X", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]\[Theta]Y", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Theta]Y", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]\[Theta]Z", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[Theta]Z", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", " ", RowBox[{ RowBox[{"\[Delta]Fx", "[", "any__", "]"}], "\[Rule]", RowBox[{"Fx", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]Fy", "[", "any__", "]"}], "\[Rule]", RowBox[{"Fy", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]Fz", "[", "any__", "]"}], "\[Rule]", RowBox[{"Fz", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", " ", RowBox[{ RowBox[{"\[Delta]Mx", "[", "any__", "]"}], "\[Rule]", RowBox[{"Mx", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]My", "[", "any__", "]"}], "\[Rule]", RowBox[{"My", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]Mz", "[", "any__", "]"}], "\[Rule]", RowBox[{"Mz", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", " ", RowBox[{ RowBox[{"\[Delta]FX", "[", "any__", "]"}], "\[Rule]", RowBox[{"FX", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]FY", "[", "any__", "]"}], "\[Rule]", RowBox[{"FY", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]FZ", "[", "any__", "]"}], "\[Rule]", RowBox[{"FZ", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", " ", RowBox[{ RowBox[{"\[Delta]MX", "[", "any__", "]"}], "\[Rule]", RowBox[{"MX", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]MY", "[", "any__", "]"}], "\[Rule]", RowBox[{"MY", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]MZ", "[", "any__", "]"}], "\[Rule]", RowBox[{"MZ", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", " ", RowBox[{ RowBox[{"\[Delta]FN", "[", "any__", "]"}], "\[Rule]", RowBox[{"FN", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]FT", "[", "any__", "]"}], "\[Rule]", RowBox[{"FT", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]FB", "[", "any__", "]"}], "\[Rule]", RowBox[{"FB", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", " ", RowBox[{ RowBox[{"\[Delta]MN", "[", "any__", "]"}], "\[Rule]", RowBox[{"MN", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]MT", "[", "any__", "]"}], "\[Rule]", RowBox[{"MT", "[", "any", "]"}]}], ",", " ", RowBox[{ RowBox[{"\[Delta]MB", "[", "any__", "]"}], "\[Rule]", RowBox[{"MB", "[", "any", "]"}]}], ",", "\[IndentingNewLine]", " ", RowBox[{ RowBox[{"\[Delta]\[CurlyTheta]", "[", "any__", "]"}], "\[Rule]", RowBox[{"\[CurlyTheta]", "[", "any", "]"}]}]}], "}"}]}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"DOFS", "[", "exp_", "]"}], " ", ":=", RowBox[{"Union", "[", RowBox[{"Cases", "[", RowBox[{ RowBox[{"{", "exp", "}"}], ",", RowBox[{ RowBox[{"a", "[", "__", "]"}], "|", RowBox[{"b", "[", "__", "]"}], "|", RowBox[{"c", "[", "__", "]"}], " ", "|", RowBox[{"uX", "[", "__", "]"}], "|", RowBox[{"uY", "[", "__", "]"}], "|", RowBox[{"uZ", "[", "__", "]"}], "|", " ", RowBox[{"\[Theta]X", "[", "__", "]"}], "|", " ", RowBox[{"\[Theta]Y", "[", "__", "]"}], "|", RowBox[{"\[Theta]Z", "[", "__", "]"}], "|", RowBox[{"ux", "[", "__", "]"}], "|", RowBox[{"uy", "[", "__", "]"}], "|", RowBox[{"uz", "[", "__", "]"}], "|", " ", RowBox[{"\[Theta]x", "[", "__", "]"}], "|", " ", RowBox[{"\[Theta]y", "[", "__", "]"}], "|", RowBox[{"\[Theta]z", "[", "__", "]"}], "|", RowBox[{"FX", "[", "__", "]"}], "|", RowBox[{"FY", "[", "__", "]"}], "|", RowBox[{"FZ", "[", "__", "]"}], "|", " ", RowBox[{"MX", "[", "__", "]"}], "|", " ", RowBox[{"MY", "[", "__", "]"}], "|", RowBox[{"MZ", "[", "__", "]"}], "|", RowBox[{"FN", "[", "__", "]"}], "|", RowBox[{"FT", "[", "__", "]"}], "|", RowBox[{"FB", "[", "__", "]"}], "|", " ", RowBox[{"MN", "[", "__", "]"}], "|", " ", RowBox[{"MT", "[", "__", "]"}], "|", RowBox[{"MB", "[", "__", "]"}], "|", RowBox[{"Fx", "[", "__", "]"}], "|", RowBox[{"Fy", "[", "__", "]"}], "|", RowBox[{"Fz", "[", "__", "]"}], "|", " ", RowBox[{"Mx", "[", "__", "]"}], "|", " ", RowBox[{"My", "[", "__", "]"}], "|", RowBox[{"Mz", "[", "__", "]"}], "|", " ", RowBox[{"\[CurlyTheta]", "[", "__", "]"}]}], ",", "Infinity"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"DFFS", "[", "exp_", "]"}], " ", ":=", RowBox[{"Union", "[", RowBox[{"Cases", "[", RowBox[{ RowBox[{"{", "exp", "}"}], ",", RowBox[{ RowBox[{"FX", "[", "__", "]"}], "|", RowBox[{"FY", "[", "__", "]"}], "|", RowBox[{"FZ", "[", "__", "]"}], "|", " ", RowBox[{"MX", "[", "__", "]"}], "|", " ", RowBox[{"MY", "[", "__", "]"}], "|", RowBox[{"MZ", "[", "__", "]"}], "|", RowBox[{"FN", "[", "__", "]"}], "|", RowBox[{"FT", "[", "__", "]"}], "|", RowBox[{"FB", "[", "__", "]"}], "|", " ", RowBox[{"MN", "[", "__", "]"}], "|", " ", RowBox[{"MT", "[", "__", "]"}], "|", RowBox[{"MB", "[", "__", "]"}], "|", RowBox[{"Fx", "[", "__", "]"}], "|", RowBox[{"Fy", "[", "__", "]"}], "|", RowBox[{"Fz", "[", "__", "]"}], "|", " ", RowBox[{"Mx", "[", "__", "]"}], "|", " ", RowBox[{"My", "[", "__", "]"}], "|", RowBox[{"Mz", "[", "__", "]"}]}], ",", "Infinity"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]DFFS", "[", "exp_", "]"}], " ", ":=", RowBox[{"Union", "[", RowBox[{"Cases", "[", RowBox[{ RowBox[{"{", "exp", "}"}], ",", RowBox[{ RowBox[{"\[Delta]FX", "[", "__", "]"}], "|", RowBox[{"\[Delta]FY", "[", "__", "]"}], "|", RowBox[{"\[Delta]FZ", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]MX", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]MY", "[", "__", "]"}], "|", RowBox[{"\[Delta]MZ", "[", "__", "]"}], "|", RowBox[{"\[Delta]FN", "[", "__", "]"}], "|", RowBox[{"\[Delta]FT", "[", "__", "]"}], "|", RowBox[{"\[Delta]FB", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]MN", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]MT", "[", "__", "]"}], "|", RowBox[{"\[Delta]MB", "[", "__", "]"}], "|", RowBox[{"\[Delta]Fx", "[", "__", "]"}], "|", RowBox[{"\[Delta]Fy", "[", "__", "]"}], "|", RowBox[{"\[Delta]Fz", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]Mx", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]My", "[", "__", "]"}], "|", RowBox[{"\[Delta]Mz", "[", "__", "]"}]}], ",", "Infinity"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]DOFS", "[", "exp_", "]"}], " ", ":=", RowBox[{"Union", "[", RowBox[{"Cases", "[", RowBox[{ RowBox[{"{", "exp", "}"}], ",", RowBox[{ RowBox[{"\[Delta]a", "[", "__", "]"}], "|", RowBox[{"\[Delta]b", "[", "__", "]"}], "|", RowBox[{"\[Delta]c", "[", "__", "]"}], " ", "|", RowBox[{"\[Delta]uX", "[", "__", "]"}], "|", RowBox[{"\[Delta]uY", "[", "__", "]"}], "|", RowBox[{"\[Delta]uZ", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]\[Theta]X", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]\[Theta]Y", "[", "__", "]"}], "|", RowBox[{"\[Delta]\[Theta]Z", "[", "__", "]"}], "|", RowBox[{"\[Delta]ux", "[", "__", "]"}], "|", RowBox[{"\[Delta]uy", "[", "__", "]"}], "|", RowBox[{"\[Delta]uz", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]\[Theta]x", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]\[Theta]y", "[", "__", "]"}], "|", RowBox[{"\[Delta]\[Theta]z", "[", "__", "]"}], "|", RowBox[{"\[Delta]FX", "[", "__", "]"}], "|", RowBox[{"\[Delta]FY", "[", "__", "]"}], "|", RowBox[{"\[Delta]FZ", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]MX", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]MY", "[", "__", "]"}], "|", RowBox[{"\[Delta]MZ", "[", "__", "]"}], "|", RowBox[{"\[Delta]FN", "[", "__", "]"}], "|", RowBox[{"\[Delta]FT", "[", "__", "]"}], "|", RowBox[{"\[Delta]FB", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]MN", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]MT", "[", "__", "]"}], "|", RowBox[{"\[Delta]MB", "[", "__", "]"}], "|", RowBox[{"\[Delta]Fx", "[", "__", "]"}], "|", RowBox[{"\[Delta]Fy", "[", "__", "]"}], "|", RowBox[{"\[Delta]Fz", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]Mx", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]My", "[", "__", "]"}], "|", RowBox[{"\[Delta]Mz", "[", "__", "]"}], "|", " ", RowBox[{"\[Delta]\[CurlyTheta]", "[", "__", "]"}]}], ",", "Infinity"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"DOFS", "[", RowBox[{"exp_", ",", "n_"}], "]"}], " ", ":=", RowBox[{"Union", "[", RowBox[{"Cases", "[", RowBox[{ RowBox[{"{", "exp", "}"}], ",", RowBox[{ RowBox[{"a", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"b", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"c", "[", RowBox[{"__", ",", "n"}], "]"}], " ", "|", RowBox[{"uX", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"uY", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"uZ", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Theta]X", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Theta]Y", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Theta]Z", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"ux", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"uy", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"uz", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Theta]x", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Theta]y", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Theta]z", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"FX", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"FY", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"FZ", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"MX", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"MY", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"MZ", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"FN", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"FT", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"FB", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"MN", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"MT", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"MB", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"Fx", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"Fy", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"Fz", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"Mx", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"My", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"Mz", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[CurlyTheta]", "[", RowBox[{"__", ",", "n"}], "]"}]}], ",", "Infinity"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]DOFS", "[", RowBox[{"exp_", ",", "n_"}], "]"}], " ", ":=", RowBox[{"Union", "[", RowBox[{"Cases", "[", RowBox[{ RowBox[{"{", "exp", "}"}], ",", RowBox[{ RowBox[{"\[Delta]a", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]b", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]c", "[", RowBox[{"__", ",", "n"}], "]"}], " ", "|", RowBox[{"\[Delta]uX", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]uY", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]uZ", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Delta]\[Theta]X", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Delta]\[Theta]Y", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]\[Theta]Z", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]ux", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]uy", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]uz", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]FX", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]FY", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]FZ", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Delta]MX", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Delta]MY", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]MZ", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]FN", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]FT", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]FB", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Delta]MN", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Delta]MT", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]MB", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]Fx", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]Fy", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]Fz", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Delta]Mx", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Delta]My", "[", RowBox[{"__", ",", "n"}], "]"}], "|", RowBox[{"\[Delta]Mz", "[", RowBox[{"__", ",", "n"}], "]"}], "|", " ", RowBox[{"\[Delta]\[CurlyTheta]", "[", RowBox[{"__", ",", "n"}], "]"}]}], ",", "Infinity"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"DRULE", "[", "n_", "]"}], ":=", " ", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"a", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"a", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"b", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"b", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"c", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"c", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"uX", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"uX", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"uY", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"uY", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"uZ", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"uZ", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]X", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"\[Theta]X", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"\[Theta]Y", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"\[Theta]Y", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"\[Theta]Z", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"\[Theta]Z", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"ux", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"uy", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"uy", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"uz", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"uz", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]x", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"\[Theta]x", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"\[Theta]y", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"\[Theta]y", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"\[Theta]z", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"\[Theta]z", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"FX", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"FX", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"FY", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"FY", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"FZ", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"FZ", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"MX", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"MX", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"MY", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"MY", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"MZ", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"MZ", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"FN", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"FN", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"FT", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"FT", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"FB", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"FB", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"MN", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"MN", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"MT", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"MT", "[", RowBox[{"any", ",", "n"}], "]"}]}], ",", RowBox[{ RowBox[{"MB", "[", "any__", "]"}], "\[Rule]", " ", RowBox[{"MB", "[", RowBox[{"any", ",", "n"}], "]"}]}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "u_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "dof", "}"}], ",", RowBox[{ RowBox[{"dof", "=", RowBox[{"DOFS", "[", "u", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"dof", "==", RowBox[{"{", "}"}]}], " ", ",", RowBox[{"u", "*", "0"}], ",", RowBox[{ RowBox[{"D", "[", RowBox[{"u", ",", RowBox[{"{", "dof", "}"}]}], "]"}], ".", RowBox[{"\[Delta]", "[", "dof", "]"}]}]}], "]"}]}]}], "]"}]}], ";"}], " "}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.4426462585778456`*^9, 3.4426462590770454`*^9}, 3.4770537732734003`*^9, {3.4770538084514*^9, 3.4770539107874002`*^9}, { 3.4770539837018003`*^9, 3.4770539840762*^9}, {3.6310184366218147`*^9, 3.631018437292616*^9}, {3.685233451807683*^9, 3.685233452477684*^9}, { 3.685234382901882*^9, 3.6852343866400967`*^9}, {3.6853442041034565`*^9, 3.6853443400412316`*^9}, {3.6853443751512394`*^9, 3.685344377332364*^9}, 3.6853454114825144`*^9, {3.6868316461612635`*^9, 3.6868318084514904`*^9}, { 3.686832766952832*^9, 3.6868328092028913`*^9}, {3.686832846372944*^9, 3.686832931023062*^9}, {3.6872635529744654`*^9, 3.6872635616644773`*^9}, { 3.6875150430418844`*^9, 3.6875151112847824`*^9}, {3.687743582879592*^9, 3.6877436675097103`*^9}, {3.687743698119753*^9, 3.6877437374098077`*^9}, { 3.6877437674998503`*^9, 3.687743819059922*^9}, {3.687744657251096*^9, 3.687744669171112*^9}, {3.692421446310708*^9, 3.69242161182094*^9}, { 3.6926015199824505`*^9, 3.692601820564872*^9}, {3.6926909355497313`*^9, 3.6926909367897334`*^9}, {3.6927677148447485`*^9, 3.692767777644837*^9}, { 3.692767831454912*^9, 3.6927678718849688`*^9}, {3.6942322376116867`*^9, 3.6942324085019264`*^9}, {3.694415508707368*^9, 3.694415535947406*^9}, { 3.6944156219175262`*^9, 3.6944156308775387`*^9}, {3.694415674217599*^9, 3.694415743297696*^9}, 3.6944162623784227`*^9, 3.694416759679119*^9, { 3.6946871199157624`*^9, 3.694687178045844*^9}, 3.6946872406459312`*^9, { 3.6948454377388935`*^9, 3.6948454739389443`*^9}, {3.694845622699153*^9, 3.694845623739154*^9}, {3.6948457209192905`*^9, 3.6948457976193976`*^9}, { 3.724304012886026*^9, 3.724304060229605*^9}, {3.73313814515314*^9, 3.7331381540290995`*^9}, {3.733138190908001*^9, 3.7331382926372166`*^9}, { 3.7458091168859*^9, 3.745809330453831*^9}, {3.7530811243190904`*^9, 3.7530811449186587`*^9}, {3.7561686396442633`*^9, 3.756168670119571*^9}, { 3.7600603151211576`*^9, 3.7600603156835256`*^9}, {3.7894796484099903`*^9, 3.789479649089468*^9}, {3.789479692503845*^9, 3.7894797188708086`*^9}, { 3.7894797500361404`*^9, 3.789479784847563*^9}, 3.7894799681885223`*^9, { 3.789480438163148*^9, 3.7894804422051945`*^9}, {3.7894806002852697`*^9, 3.789480655832934*^9}, {3.8166040129889574`*^9, 3.8166041495837865`*^9}, { 3.816604189186468*^9, 3.816604214802972*^9}, {3.8166042734773865`*^9, 3.8166043972850933`*^9}, {3.816604428267262*^9, 3.816604499850178*^9}, { 3.8166081703698654`*^9, 3.8166082203890176`*^9}, {3.8210655469757404`*^9, 3.821065597044009*^9}, {3.821065646217851*^9, 3.821065659621196*^9}, { 3.821065714586218*^9, 3.8210658123471637`*^9}, {3.8210658715411763`*^9, 3.821065940333043*^9}, 3.8210659934232154`*^9, {3.821151689134054*^9, 3.8211516901175613`*^9}}, CellLabel->"In[1]:=",ExpressionUUID->"715d2836-a01e-46f9-a8ca-16a5c3559784"], Cell[BoxData[""], "Input", CellChangeTimes->{{3.686831884411597*^9, 3.6868318902216053`*^9}},ExpressionUUID->"c1619a3b-9e0a-4122-a84a-\ afa9f4c247e7"] }, Closed]], Cell[CellGroupData[{ Cell["SHAPE defs ", "Subsection",ExpressionUUID->"14bff46d-d9b4-4c59-a85c-39c5e3833072"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHAPES1", "[", "h_", "]"}], ":=", " ", RowBox[{"{", RowBox[{ RowBox[{"1", "-", RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}]}], ",", RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHAPES11", "[", "h_", "]"}], ":=", " ", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}]}], ",", RowBox[{"h", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"]}], ",", RowBox[{"h", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"x", "/", "h"}]}], ")"}]}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"LAGRANGE", "[", RowBox[{"n_", ",", "h_"}], "]"}], ":=", " ", RowBox[{"Simplify", "[", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"#1", "/", RowBox[{"(", RowBox[{"#1", "/.", RowBox[{"x", "->", RowBox[{"h", "*", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}]}], ")"}]}], ")"}], "&"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"Apply", "[", RowBox[{"Times", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"x", "-", RowBox[{"h", "*", RowBox[{ RowBox[{"(", RowBox[{"ii", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "/", RowBox[{"(", RowBox[{"x", "-", RowBox[{"h", "*", RowBox[{ RowBox[{"(", RowBox[{"jj", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"LAGRANGE", "[", RowBox[{"n_", ",", RowBox[{"{", RowBox[{"x0_", ",", "x1_"}], "}"}]}], "]"}], ":=", " ", RowBox[{"Simplify", "[", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"#1", "/", RowBox[{"(", RowBox[{"#1", "/.", RowBox[{"x", "\[Rule]", RowBox[{"x0", "+", RowBox[{ RowBox[{"(", RowBox[{"x1", "-", "x0"}], ")"}], "*", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}]}]}], ")"}]}], ")"}], "&"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"Apply", "[", RowBox[{"Times", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"x", "-", RowBox[{"(", RowBox[{"x0", "+", RowBox[{ RowBox[{"(", RowBox[{"x1", "-", "x0"}], ")"}], "*", RowBox[{ RowBox[{"(", RowBox[{"ii", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "/", RowBox[{"(", RowBox[{"x", "-", RowBox[{"(", RowBox[{"x0", "+", RowBox[{ RowBox[{"(", RowBox[{"x1", "-", "x0"}], ")"}], "*", RowBox[{ RowBox[{"(", RowBox[{"jj", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}], ")"}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"LAGRANGE", "[", RowBox[{"n_", ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"{", RowBox[{"x0_", ",", "x1_"}], "}"}]}], "}"}]}], "]"}], ":=", " ", RowBox[{"Simplify", "[", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"#1", "/", RowBox[{"(", RowBox[{"#1", "/.", RowBox[{"x", "\[Rule]", RowBox[{"x0", "+", RowBox[{ RowBox[{"(", RowBox[{"x1", "-", "x0"}], ")"}], "*", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}]}]}], ")"}]}], ")"}], "&"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"Apply", "[", RowBox[{"Times", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"x", "-", RowBox[{"(", RowBox[{"x0", "+", RowBox[{ RowBox[{"(", RowBox[{"x1", "-", "x0"}], ")"}], "*", RowBox[{ RowBox[{"(", RowBox[{"ii", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "/", RowBox[{"(", RowBox[{"x", "-", RowBox[{"(", RowBox[{"x0", "+", RowBox[{ RowBox[{"(", RowBox[{"x1", "-", "x0"}], ")"}], "*", RowBox[{ RowBox[{"(", RowBox[{"jj", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}], ")"}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHAPES1", "[", RowBox[{"bas_", ",", "ver_"}], "]"}], ":=", " ", RowBox[{"Simplify", "[", RowBox[{"bas", " ", ".", " ", RowBox[{"Inverse", "[", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", "bas", "}"}], "/.", " ", RowBox[{"{", RowBox[{"x", "->", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}]}], "}"}]}], "&"}], ",", " ", "ver"}], "]"}], ",", "1"}], "]"}], "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHAPES11", "[", RowBox[{"bas_", ",", "ver_"}], "]"}], ":=", " ", RowBox[{"bas", " ", ".", " ", RowBox[{"Inverse", "[", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"bas", ",", RowBox[{ SubscriptBox["\[PartialD]", "x"], "bas"}]}], "}"}], "/.", " ", RowBox[{"{", RowBox[{"x", "->", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}]}], "}"}]}], "&"}], ",", " ", "ver"}], "]"}], ",", "1"}], "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHAPES2", "[", RowBox[{"bas_", ",", "ver_"}], "]"}], ":=", " ", RowBox[{"bas", " ", ".", " ", RowBox[{"Inverse", "[", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", "bas", "}"}], "/.", " ", RowBox[{"{", RowBox[{ RowBox[{"x", "->", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{"y", "->", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}]}]}], "}"}]}], "&"}], ",", " ", "ver"}], "]"}], ",", "1"}], "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHAPES21", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"x1_", ",", "y1_"}], "}"}], ",", RowBox[{"{", RowBox[{"x2_", ",", "y2_"}], "}"}]}], "}"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"Nx", ",", "Ny"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Nx", "=", " ", RowBox[{"SHAPES11", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "x", ",", RowBox[{"x", "^", "2"}], ",", RowBox[{"x", "^", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", "x1", "}"}], ",", RowBox[{"{", "x2", "}"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Ny", "=", " ", RowBox[{ RowBox[{"SHAPES11", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "x", ",", RowBox[{"x", "^", "2"}], ",", RowBox[{"x", "^", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", "y1", "}"}], ",", RowBox[{"{", "y2", "}"}]}], "}"}]}], "]"}], " ", "/.", " ", RowBox[{"x", "\[Rule]", "y"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "4", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "4", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "4", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "4", "]"}], "]"}]}]}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHAPES3", "[", RowBox[{"bas_", ",", "ver_"}], "]"}], ":=", " ", RowBox[{"bas", " ", ".", " ", RowBox[{"Inverse", "[", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", "bas", "}"}], "/.", " ", RowBox[{"{", RowBox[{ RowBox[{"x", "->", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{"y", "->", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{"z", "->", RowBox[{"#", "[", RowBox[{"[", "3", "]"}], "]"}]}]}], "}"}]}], "&"}], ",", " ", "ver"}], "]"}], ",", "1"}], "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHAPES1", "[", "h_", "]"}], ":=", " ", RowBox[{"{", RowBox[{ RowBox[{"1", "-", RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}]}], ",", RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHAPES11", "[", "h_", "]"}], ":=", " ", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}]}], ",", RowBox[{"h", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"]}], ",", RowBox[{"h", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"x", "/", "h"}]}], ")"}]}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"LAGRANGE", "[", RowBox[{"n_", ",", "h_"}], "]"}], ":=", " ", RowBox[{"Simplify", "[", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"#1", "/", RowBox[{"(", RowBox[{"#1", "/.", RowBox[{"x", "->", RowBox[{"h", "*", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}]}], ")"}]}], ")"}], "&"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"Apply", "[", RowBox[{"Times", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"x", "-", RowBox[{"h", "*", RowBox[{ RowBox[{"(", RowBox[{"ii", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "/", RowBox[{"(", RowBox[{"x", "-", RowBox[{"h", "*", RowBox[{ RowBox[{"(", RowBox[{"jj", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{"{", RowBox[{"n_", ",", "r_"}], "}"}], "}"}], "]"}], ":=", " ", RowBox[{"Simplify", "[", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"#1", "/", RowBox[{"(", RowBox[{"#1", "/.", RowBox[{"r", "->", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}], ")"}]}], ")"}], "&"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"Apply", "[", RowBox[{"Times", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"r", "-", RowBox[{ RowBox[{"(", RowBox[{"ii", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "/", RowBox[{"(", RowBox[{"r", "-", RowBox[{ RowBox[{"(", RowBox[{"jj", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n_", ",", "r_"}], "}"}], ",", RowBox[{"{", RowBox[{"m_", ",", "s_"}], "}"}]}], "}"}], "]"}], ":=", " ", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{"{", RowBox[{"m", ",", "s"}], "}"}], "}"}], "]"}], ",", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{"{", RowBox[{"n", ",", "r"}], "}"}], "}"}], "]"}]}], "]"}], ",", "1"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n_", ",", "r_"}], "}"}], ",", RowBox[{"{", RowBox[{"m_", ",", "s_"}], "}"}], ",", RowBox[{"{", RowBox[{"k_", ",", "t_"}], "}"}]}], "}"}], "]"}], ":=", " ", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{"{", RowBox[{"k", ",", "t"}], "}"}], "}"}], "]"}], ",", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{"{", RowBox[{"m", ",", "s"}], "}"}], "}"}], "]"}], ",", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{"{", RowBox[{"n", ",", "r"}], "}"}], "}"}], "]"}]}], "]"}], ",", "2"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"LAGRANGE", "[", RowBox[{"n_", ",", RowBox[{"{", RowBox[{"x0_", ",", "x1_"}], "}"}]}], "]"}], ":=", " ", RowBox[{"Simplify", "[", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"#1", "/", RowBox[{"(", RowBox[{"#1", "/.", RowBox[{"x", "\[Rule]", RowBox[{"x0", "+", RowBox[{ RowBox[{"(", RowBox[{"x1", "-", "x0"}], ")"}], "*", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}]}]}], ")"}]}], ")"}], "&"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"Apply", "[", RowBox[{"Times", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"x", "-", RowBox[{"(", RowBox[{"x0", "+", RowBox[{ RowBox[{"(", RowBox[{"x1", "-", "x0"}], ")"}], "*", RowBox[{ RowBox[{"(", RowBox[{"ii", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "/", RowBox[{"(", RowBox[{"x", "-", RowBox[{"(", RowBox[{"x0", "+", RowBox[{ RowBox[{"(", RowBox[{"x1", "-", "x0"}], ")"}], "*", RowBox[{ RowBox[{"(", RowBox[{"jj", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}], ")"}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"LAGRANGE", "[", RowBox[{"n_", ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"{", RowBox[{"x0_", ",", "x1_"}], "}"}]}], "}"}]}], "]"}], ":=", " ", RowBox[{"Simplify", "[", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"#1", "/", RowBox[{"(", RowBox[{"#1", "/.", RowBox[{"x", "\[Rule]", RowBox[{"x0", "+", RowBox[{ RowBox[{"(", RowBox[{"x1", "-", "x0"}], ")"}], "*", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}]}]}], ")"}]}], ")"}], "&"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"Apply", "[", RowBox[{"Times", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"x", "-", RowBox[{"(", RowBox[{"x0", "+", RowBox[{ RowBox[{"(", RowBox[{"x1", "-", "x0"}], ")"}], "*", RowBox[{ RowBox[{"(", RowBox[{"ii", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "/", RowBox[{"(", RowBox[{"x", "-", RowBox[{"(", RowBox[{"x0", "+", RowBox[{ RowBox[{"(", RowBox[{"x1", "-", "x0"}], ")"}], "*", RowBox[{ RowBox[{"(", RowBox[{"jj", "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}]}]}]}], ")"}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHAPES1", "[", RowBox[{"bas_", ",", "ver_"}], "]"}], ":=", " ", RowBox[{"Simplify", "[", RowBox[{"bas", " ", ".", " ", RowBox[{"Inverse", "[", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", "bas", "}"}], "/.", " ", RowBox[{"{", RowBox[{"x", "->", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}]}], "}"}]}], "&"}], ",", " ", "ver"}], "]"}], ",", "1"}], "]"}], "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHAPES11", "[", RowBox[{"bas_", ",", "ver_"}], "]"}], ":=", " ", RowBox[{"bas", " ", ".", " ", RowBox[{"Inverse", "[", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"bas", ",", RowBox[{ SubscriptBox["\[PartialD]", "x"], "bas"}]}], "}"}], "/.", " ", RowBox[{"{", RowBox[{"x", "->", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}]}], "}"}]}], "&"}], ",", " ", "ver"}], "]"}], ",", "1"}], "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHAPES2", "[", RowBox[{"bas_", ",", "ver_"}], "]"}], ":=", " ", RowBox[{"bas", " ", ".", " ", RowBox[{"Inverse", "[", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", "bas", "}"}], "/.", " ", RowBox[{"{", RowBox[{ RowBox[{"x", "->", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{"y", "->", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}]}]}], "}"}]}], "&"}], ",", " ", "ver"}], "]"}], ",", "1"}], "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHAPES21", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"x1_", ",", "y1_"}], "}"}], ",", RowBox[{"{", RowBox[{"x2_", ",", "y2_"}], "}"}]}], "}"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"Nx", ",", "Ny"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Nx", "=", " ", RowBox[{"SHAPES11", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "x", ",", RowBox[{"x", "^", "2"}], ",", RowBox[{"x", "^", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", "x1", "}"}], ",", RowBox[{"{", "x2", "}"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Ny", "=", " ", RowBox[{ RowBox[{"SHAPES11", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "x", ",", RowBox[{"x", "^", "2"}], ",", RowBox[{"x", "^", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", "y1", "}"}], ",", RowBox[{"{", "y2", "}"}]}], "}"}]}], "]"}], " ", "/.", " ", RowBox[{"x", "\[Rule]", "y"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "4", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "4", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "4", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Nx", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"Ny", "[", RowBox[{"[", "4", "]"}], "]"}]}]}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SHAPES3", "[", RowBox[{"bas_", ",", "ver_"}], "]"}], ":=", " ", RowBox[{"bas", " ", ".", " ", RowBox[{"Inverse", "[", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", "bas", "}"}], "/.", " ", RowBox[{"{", RowBox[{ RowBox[{"x", "->", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{"y", "->", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{"z", "->", RowBox[{"#", "[", RowBox[{"[", "3", "]"}], "]"}]}]}], "}"}]}], "&"}], ",", " ", "ver"}], "]"}], ",", "1"}], "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]"}], "Input", InitializationCell->True, CellChangeTimes->{{3.4670783931368*^9, 3.4670784098444*^9}, { 3.468067594204*^9, 3.4680678179392*^9}, 3.4680680234556*^9, { 3.468068073126*^9, 3.4680681447455997`*^9}, {3.4680681751188*^9, 3.46806831009*^9}, {3.4684605671832*^9, 3.4684605726744003`*^9}, { 3.471399186098*^9, 3.4713991974236*^9}, {3.471404873455*^9, 3.4714048739854*^9}, {3.4820580083386*^9, 3.4820580095086*^9}, { 3.4820588874835997`*^9, 3.4820588977016*^9}, {3.6187193088566475`*^9, 3.6187193100797176`*^9}}, CellLabel->"In[14]:=",ExpressionUUID->"871c79ec-c023-4224-9a21-8ff510ab39ba"] }, Closed]], Cell[CellGroupData[{ Cell["QUAD defs ", "Subsection",ExpressionUUID->"59204ca0-aed9-4646-8944-b2dccdb43133"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"LIN1", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{ RowBox[{"{", RowBox[{"{", "1", "}"}], "}"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"{", "1", "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"LIN2", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{"{", RowBox[{ RowBox[{"{", "0", "}"}], ",", RowBox[{"{", "1", "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"LIN2G", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{"{", RowBox[{ RowBox[{"{", "0.21132486540518713", "}"}], ",", RowBox[{"{", "0.7886751345948129", "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"LIN3", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", "0", "}"}], ",", RowBox[{"{", "1", "}"}], ",", RowBox[{"{", "2", "}"}]}], "}"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "4", ",", "1"}], "}"}], "/", "6"}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"LIN3G", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{"{", RowBox[{ RowBox[{"{", "0.1127016653792583", "}"}], ",", RowBox[{"{", "0.5", "}"}], ",", RowBox[{"{", "0.8872983346207417", "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"{", RowBox[{ "0.2777777777777777", ",", "0.44444444444444453", ",", "0.2777777777777777"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"LIN5", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", "0", "}"}], ",", RowBox[{"{", "1", "}"}], ",", RowBox[{"{", "2", "}"}], ",", RowBox[{"{", "3", "}"}], ",", RowBox[{"{", "4", "}"}]}], "}"}], "/", "4"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"{", RowBox[{"7", ",", "32", ",", "12", ",", "32", ",", "7"}], "}"}], "/", "90"}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", "0", "}"}], ",", RowBox[{"{", "1", "}"}], ",", RowBox[{"{", "2", "}"}], ",", RowBox[{"{", "3", "}"}], ",", RowBox[{"{", "4", "}"}], ",", RowBox[{"{", "5", "}"}], ",", RowBox[{"{", "6", "}"}]}], "}"}], "/", "6"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"{", RowBox[{ "41", ",", "216", ",", "27", ",", "272", ",", "27", ",", "216", ",", "41"}], "}"}], "/", "840"}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"LIN14", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{ RowBox[{"Table", "[", RowBox[{"ii", ",", RowBox[{"{", RowBox[{"ii", ",", "0", ",", "13"}], "}"}]}], "]"}], "/", "13"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"{", RowBox[{ FractionBox["8181904909", "402361344000"], ",", FractionBox["56280729661", "402361344000"], ",", RowBox[{"-", FractionBox["1737125143", "22353408000"]}], ",", FractionBox["11148172711", "28740096000"], ",", RowBox[{"-", FractionBox["6066382933", "16094453760"]}], ",", FractionBox["22964826443", "44706816000"], ",", RowBox[{"-", FractionBox["3592666051", "33530112000"]}], ",", RowBox[{"-", FractionBox["3592666051", "33530112000"]}], ",", FractionBox["22964826443", "44706816000"], ",", RowBox[{"-", FractionBox["6066382933", "16094453760"]}], ",", FractionBox["11148172711", "28740096000"], ",", RowBox[{"-", FractionBox["1737125143", "22353408000"]}], ",", FractionBox["56280729661", "402361344000"], ",", FractionBox["8181904909", "402361344000"]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI1", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{ RowBox[{"{", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "}"}], "/", "3"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"{", "1", "}"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI3", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}]}], "}"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}], "/", "6"}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI4", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "/", "3"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"1", "/", "24"}], "*", RowBox[{"{", RowBox[{"1", ",", "1", ",", "1", ",", "9"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI41", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], "/", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "/", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], "/", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "/", "3"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"1", "/", "120"}], "*", RowBox[{"{", RowBox[{"11", ",", "11", ",", "11", ",", "27"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"1", "/", "2"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"1", "/", "2"}], ",", RowBox[{"1", "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"1", "/", "3"}], ",", RowBox[{"1", "/", "3"}]}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "/", "40"}], ",", RowBox[{"1", "/", "15"}], ",", RowBox[{"1", "/", "40"}], ",", RowBox[{"1", "/", "15"}], ",", RowBox[{"1", "/", "40"}], ",", RowBox[{"1", "/", "15"}], ",", RowBox[{"9", "/", "40"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI12", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}]}], "}"}], "/", "4"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"{", RowBox[{"4", ",", RowBox[{"-", "1"}], ",", "4", ",", "4", ",", "8", ",", "8", ",", "4", ",", RowBox[{"-", "1"}], ",", "8", ",", RowBox[{"-", "1"}], ",", "4", ",", "4"}], "}"}], "/", "90"}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI28", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "6"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"6", ",", "0"}], "}"}]}], "}"}], "/", "6"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "36", ",", RowBox[{"-", "27"}], ",", "64", ",", RowBox[{"-", "27"}], ",", "36", ",", "0", ",", "36", ",", "72", ",", "72", ",", "72", ",", "72", ",", "36", ",", RowBox[{"-", "27"}], ",", "72", ",", RowBox[{"-", "54"}], ",", "72", ",", RowBox[{"-", "27"}], ",", "64", ",", "72", ",", "72", ",", "64", ",", RowBox[{"-", "27"}], ",", "72", ",", RowBox[{"-", "27"}], ",", "36", ",", "36", ",", "0"}], "}"}], "/", RowBox[{"(", RowBox[{"3.", "*", "560"}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"REC9", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}]}], "}"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"{", RowBox[{ "1", ",", "4", ",", "1", ",", "4", ",", "16", ",", "4", ",", "1", ",", "4", ",", "1"}], "}"}], "/", "36"}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"HEX27", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"w", ",", "p"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "0", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "2", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"{", RowBox[{ "1", ",", "4", ",", "1", ",", "4", ",", "16", ",", "4", ",", "1", ",", "4", ",", "1", ",", "4", ",", "16", ",", "4", ",", "16", ",", "64", ",", "16", ",", "4", ",", "16", ",", "4", ",", "1", ",", "4", ",", "1", ",", "4", ",", "16", ",", "4", ",", "1", ",", "4", ",", "1"}], "}"}], "/", RowBox[{"6", "^", "3"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TET5", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "16"}], ",", "9", ",", "9", ",", "9", ",", "9"}], "}"}], "/", "120"}]}], ",", RowBox[{"p", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "4"}], ",", RowBox[{"1", "/", "2"}], ",", RowBox[{"1", "/", "6"}], ",", RowBox[{"1", "/", "6"}], ",", RowBox[{"1", "/", "6"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"1", "/", "4"}], ",", RowBox[{"1", "/", "6"}], ",", RowBox[{"1", "/", "6"}], ",", RowBox[{"1", "/", "6"}], ",", RowBox[{"1", "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"1", "/", "4"}], ",", RowBox[{"1", "/", "6"}], ",", RowBox[{"1", "/", "6"}], ",", RowBox[{"1", "/", "2"}], ",", RowBox[{"1", "/", "6"}]}], "}"}]}], "}"}], "]"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TET10", ",", "exp_", ",", "var_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", "4", ",", "4", ",", "4", ",", "4", ",", "4", ",", "4"}], "}"}], "/", "120"}]}], ",", RowBox[{"p", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "0"}], "}"}], "/", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "1"}], "}"}], "/", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], "/", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1", ",", "1"}], "}"}], "/", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], "/", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}], "/", "2"}]}], "}"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"w", "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "*", "exp"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "\[Rule]", "#1"}], "]"}]}], "&"}], ",", "p"}], "]"}]}], "]"}]}], "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.4426462761434455`*^9, {3.4426463580278454`*^9, 3.4426463672786455`*^9}, 3.4461855349388*^9, {3.4468649264091997`*^9, 3.4468649477656*^9}, 3.4770653198157997`*^9, {3.4771016648258*^9, 3.4771016703638*^9}, 3.4773012612406*^9, 3.4773013118782*^9, {3.4773017793166*^9, 3.4773018115618*^9}, {3.4818081970202*^9, 3.4818082252406*^9}, { 3.4822977608296003`*^9, 3.48229777267*^9}, {3.482298444565*^9, 3.4822984493698*^9}, {3.4822986565578003`*^9, 3.4822987152293997`*^9}, { 3.4822987471470003`*^9, 3.4822988202018003`*^9}, {3.4823218768966*^9, 3.4823219047738*^9}, {3.6320400759127555`*^9, 3.6320400774188414`*^9}, { 3.6339410644178886`*^9, 3.633941069742193*^9}, {3.633942002306533*^9, 3.6339420034775996`*^9}, 3.6565732333204584`*^9, {3.685329942084824*^9, 3.6853299995431104`*^9}, {3.6881195224183316`*^9, 3.6881195236983337`*^9}, {3.6881195571483803`*^9, 3.6881195915584283`*^9}, {3.688120564569791*^9, 3.6881205683897963`*^9}, { 3.6881206185098658`*^9, 3.688120642069899*^9}, {3.688284719785588*^9, 3.688284729985602*^9}, {3.6882848245567346`*^9, 3.688284827776739*^9}, { 3.688284875506806*^9, 3.6882848867468214`*^9}, {3.688350375413198*^9, 3.688350378173202*^9}, 3.6883504111932483`*^9, {3.7455544449212356`*^9, 3.745554465572897*^9}, {3.7455544990494084`*^9, 3.7455545172795343`*^9}, { 3.74644306965172*^9, 3.746443076505107*^9}, {3.7468733511314077`*^9, 3.7468733665022874`*^9}, {3.763815192640204*^9, 3.7638152262175827`*^9}, { 3.76381555999401*^9, 3.763815576658593*^9}, {3.763815629456071*^9, 3.7638156433643184`*^9}, {3.7638156760642715`*^9, 3.763815680110509*^9}, { 3.763816314054133*^9, 3.763816315160985*^9}, {3.7641283974818926`*^9, 3.7641284022168202`*^9}, {3.764128466623234*^9, 3.764128512308055*^9}, { 3.7641285516285644`*^9, 3.764128597474304*^9}, {3.7641286389761047`*^9, 3.764128668115802*^9}, {3.7661439599999857`*^9, 3.766144017439571*^9}, { 3.8413897282608337`*^9, 3.8413897551839*^9}, {3.8413907066897593`*^9, 3.841390726628026*^9}, 3.8413907607649965`*^9, {3.8435604066446185`*^9, 3.843560438358281*^9}, {3.8435605553679347`*^9, 3.843560556538128*^9}, { 3.8435617747579966`*^9, 3.8435617981268296`*^9}, {3.8435621954269557`*^9, 3.8435621959062867`*^9}, {3.8445744705479603`*^9, 3.84457448460798*^9}, { 3.844574539146332*^9, 3.844574603163684*^9}, 3.8445746860003757`*^9}, CellLabel->"In[37]:=",ExpressionUUID->"f4d5668b-213e-4e58-b3e4-76d4d357bf0e"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"tet", "=", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"p", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "0"}], "}"}], "/", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "1"}], "}"}], "/", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], "/", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1", ",", "1"}], "}"}], "/", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], "/", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}], "/", "2"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", "=", RowBox[{"{", RowBox[{"1", ",", "x", ",", "y", ",", "z", ",", RowBox[{"x", " ", "y"}], ",", RowBox[{"x", " ", "z"}], ",", " ", RowBox[{"y", " ", "z"}], ",", " ", RowBox[{"x", "^", "2"}], ",", " ", RowBox[{"y", "^", "2"}], ",", RowBox[{"z", "^", "2"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"eq", "[", "i_", "]"}], ":=", " ", RowBox[{ RowBox[{ RowBox[{"Array", "[", RowBox[{"w", ",", "10"}], "]"}], ".", RowBox[{"(", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", "i", "]"}], "]"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], "->", "#"}], "]"}]}], "&"}], ",", "p"}], "]"}], ")"}]}], "-", RowBox[{"Integrate", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["tet", "OperatorCharacter"]}]}], StyleBox["]", "OperatorCharacter"]}]}]}], StyleBox[";", "OperatorCharacter"]}], StyleBox["\[IndentingNewLine]", "OperatorCharacter"], "\[IndentingNewLine]", RowBox[{ RowBox[{"sol", "=", RowBox[{ RowBox[{ StyleBox["Solve", "OperatorCharacter"], StyleBox["[", "OperatorCharacter"], RowBox[{ RowBox[{"Thread", "[", RowBox[{ RowBox[{ StyleBox["Table", "OperatorCharacter"], StyleBox["[", "OperatorCharacter"], RowBox[{ RowBox[{"eq", "[", "i", "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "10"}], "}"}]}], "]"}], "==", "0"}], "]"}], ",", RowBox[{"Array", "[", RowBox[{"w", ",", "10"}], "]"}]}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"120", "*", RowBox[{"Array", "[", RowBox[{"w", ",", "10"}], "]"}]}], " ", "/.", "sol"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{ RowBox[{"Array", "[", RowBox[{"w", ",", "10"}], "]"}], " ", "/.", "sol"}]}], "]"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.8413897580019073`*^9, 3.8413905824006023`*^9}, { 3.841390641631239*^9, 3.841390651680857*^9}, {3.841390686922451*^9, 3.841390692801841*^9}}, CellLabel-> "In[116]:=",ExpressionUUID->"69d07010-b5e6-4363-b202-b8b71cea0156"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", "4", ",", "4", ",", "4", ",", "4", ",", "4", ",", "4"}], "}"}]], "Output", CellChangeTimes->{ 3.8413900780711346`*^9, 3.8413901203216476`*^9, 3.841390186370854*^9, 3.841390445057602*^9, 3.841390476814777*^9, {3.841390518910721*^9, 3.841390583991149*^9}, 3.841390653783507*^9, 3.8413906934544754`*^9}, CellLabel-> "Out[121]=",ExpressionUUID->"0dbd8707-c780-4240-8511-785694daf797"], Cell[BoxData[ FractionBox["1", "6"]], "Output", CellChangeTimes->{ 3.8413900780711346`*^9, 3.8413901203216476`*^9, 3.841390186370854*^9, 3.841390445057602*^9, 3.841390476814777*^9, {3.841390518910721*^9, 3.841390583991149*^9}, 3.841390653783507*^9, 3.8413906934584646`*^9}, CellLabel-> "Out[122]=",ExpressionUUID->"b1b051b3-0f28-4c81-a4f0-c7435c3507cc"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["INTEGRATE defs ", "Subsection",ExpressionUUID->"269b94a2-3c36-4801-aa85-b9e440f89437"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"INTEGRATE", "[", RowBox[{ RowBox[{"{", RowBox[{"LINE", ",", "exp_"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{ RowBox[{"{", RowBox[{"LINLINE", ",", "exp"}], "}"}], ",", "#"}], "]"}], "&"}], ",", "ele"}], "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"RULE", "[", RowBox[{"{", RowBox[{"LINE", ",", RowBox[{"{", "iy_", "}"}], ",", "list_"}], "}"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"ix", ",", "iz", ",", "hx", ",", "nn"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"ix", ",", "hx"}], "}"}], " ", "=", " ", RowBox[{"UNIT", "[", RowBox[{ RowBox[{"XYZ", "[", RowBox[{"Last", "[", "list", "]"}], "]"}], "-", RowBox[{"XYZ", "[", RowBox[{"First", "[", "list", "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", " ", "=", " ", RowBox[{"CROSS", "[", RowBox[{"ix", ",", "iy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nn", " ", "=", " ", RowBox[{"Length", "[", "list", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"xrule", " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"x", "[", "ii", "]"}], "\[Rule]", " ", RowBox[{"ix", ".", RowBox[{"XYZ", "[", RowBox[{"list", "[", RowBox[{"[", "ii", "]"}], "]"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "nn"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"yrule", " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"y", "[", "ii", "]"}], "\[Rule]", " ", RowBox[{"iy", ".", RowBox[{"XYZ", "[", RowBox[{"list", "[", RowBox[{"[", "ii", "]"}], "]"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "nn"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"zrule", " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"z", "[", "ii", "]"}], "\[Rule]", " ", RowBox[{"iz", ".", RowBox[{"XYZ", "[", RowBox[{"list", "[", RowBox[{"[", "ii", "]"}], "]"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "nn"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Flatten", "[", RowBox[{"Join", "[", RowBox[{"xrule", ",", "yrule", ",", "zrule"}], "]"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"QUAD", "[", RowBox[{ RowBox[{"{", RowBox[{"LINLINE", ",", "exp_"}], "}"}], ",", "element_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "NN", ",", "rule", ",", "xx", ",", "yy", ",", "zz", ",", "J", ",", "int"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", " ", "=", " ", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Xi]"}], ",", "\[Xi]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"rule", " ", "=", " ", RowBox[{"RULE", "[", "element", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"xx", " ", "=", " ", RowBox[{ RowBox[{"NN", ".", RowBox[{"{", RowBox[{ RowBox[{"x", "[", "1", "]"}], ",", RowBox[{"x", "[", "2", "]"}]}], "}"}]}], " ", "/.", " ", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{"yy", " ", "=", " ", RowBox[{ RowBox[{"NN", ".", RowBox[{"{", RowBox[{ RowBox[{"y", "[", "1", "]"}], ",", RowBox[{"y", "[", "2", "]"}]}], "}"}]}], " ", "/.", " ", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{"zz", " ", "=", " ", RowBox[{ RowBox[{"NN", ".", RowBox[{"{", RowBox[{ RowBox[{"z", "[", "1", "]"}], ",", RowBox[{"z", "[", "2", "]"}]}], "}"}]}], " ", "/.", " ", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{"J", " ", "=", " ", RowBox[{"Sqrt", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "xx"}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "yy"}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "zz"}], ")"}], "^", "2"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"int", " ", "=", " ", RowBox[{ RowBox[{"J", "*", "exp"}], " ", "/.", " ", RowBox[{"{", RowBox[{ RowBox[{"x", "\[Rule]", "xx"}], ",", " ", RowBox[{"y", "\[Rule]", "yy"}], ",", " ", RowBox[{"z", "\[Rule]", "zz"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUADE", "[", RowBox[{"QTYPE", ",", RowBox[{ RowBox[{"(", RowBox[{"int", " ", "/.", " ", RowBox[{"\[Xi]", "\[Rule]", " ", "#1"}]}], ")"}], "&"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUADE", "[", RowBox[{"LINE1", ",", "exp_"}], "]"}], ":=", " ", RowBox[{ RowBox[{"exp", "[", RowBox[{"{", RowBox[{"1", "/", "2"}], "}"}], "]"}], ".", RowBox[{"{", "1", "}"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUADE", "[", RowBox[{"LINE2", ",", "exp_"}], "]"}], ":=", " ", RowBox[{ RowBox[{ RowBox[{"exp", "[", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}]}], "/", "2"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"QUADE", "[", RowBox[{"LINE3", ",", "exp_"}], "]"}], ":=", " ", RowBox[{ RowBox[{ RowBox[{"exp", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1", ",", "2"}], "}"}], "/", "2"}], "]"}], ".", RowBox[{"{", RowBox[{"1", ",", "4", ",", "1"}], "}"}]}], "/", "6"}]}], ";"}]}], "Input", InitializationCell->True, CellLabel->"In[56]:=",ExpressionUUID->"e22b2738-9656-4c24-88eb-8c6e25c4cd2a"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["FORCE MODEL", "Section", CellChangeTimes->{ 3.4430806364968*^9, {3.4453166713873997`*^9, 3.4453166747414*^9}, { 3.447462264275*^9, 3.4474622644154*^9}, {3.4695731321116*^9, 3.4695731359491997`*^9}, 3.473055186341*^9, {3.4730552472860003`*^9, 3.47305524884*^9}, {3.473055399782*^9, 3.473055419801*^9}, { 3.4734696760778*^9, 3.4734697047349997`*^9}, {3.4770537891542*^9, 3.4770537950354*^9}, {3.4932799754514*^9, 3.4932799779161997`*^9}, { 3.4945558951644*^9, 3.4945558957416*^9}, {3.4957646303032*^9, 3.4957646329084*^9}, {3.497581602118*^9, 3.4975816042552*^9}, { 3.500960505817*^9, 3.5009605094206*^9}, {3.556623836083009*^9, 3.5566238462386265`*^9}, {3.5568725055395393`*^9, 3.5568725163821597`*^9}, {3.556872678728445*^9, 3.5568726810485783`*^9}, { 3.7323376045620503`*^9, 3.7323376086812124`*^9}, {3.7335630623483887`*^9, 3.733563072583865*^9}, {3.733563130246215*^9, 3.733563131355714*^9}, { 3.817531303014368*^9, 3.8175313048303127`*^9}, {3.8175314979069576`*^9, 3.8175315153006535`*^9}, 3.817531608989934*^9},ExpressionUUID->"0fefe5cf-08d5-4448-baaa-\ 762ae96d5490"], Cell[CellGroupData[{ Cell["NULL ELEMENT defs ", "Subsection", CellChangeTimes->{{3.6926098999374723`*^9, 3.6926099165674953`*^9}, { 3.7606078822118464`*^9, 3.7606078873319845`*^9}, {3.7606079926026382`*^9, 3.7606079992085595`*^9}},ExpressionUUID->"5f39b92f-6ed6-4f54-8a18-\ b163a9fbf46e"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MEC", "-", "E1050"}], "|", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"should", " ", "anything", " ", "go", " ", "wrong"}], ",", " ", RowBox[{"do", " ", "this"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"analysistype_", ",", "ele_", ",", "fun_"}], "]"}], ":=", "0"}], ";"}]}]], "Input", CellChangeTimes->{{3.7606079691729827`*^9, 3.7606079699771805`*^9}, { 3.760608006624578*^9, 3.760608064931302*^9}, {3.7880761427660694`*^9, 3.788076155873885*^9}, {3.788424805091097*^9, 3.7884248740992002`*^9}, { 3.817531967792331*^9, 3.817531969861539*^9}},ExpressionUUID->"835439a7-defd-4b59-91fb-\ e8a8e6c62d56"] }, Closed]], Cell[CellGroupData[{ Cell["FORCE ELEMENT (disp) defs ", "Subsection", CellChangeTimes->{{3.6926098999374723`*^9, 3.6926099165674953`*^9}, { 3.7606078822118464`*^9, 3.7606078873319845`*^9}, {3.766555151642228*^9, 3.7665551755834265`*^9}, {3.774244544239236*^9, 3.7742445459997997`*^9}, { 3.787895139092532*^9, 3.787895139619763*^9}},ExpressionUUID->"5f35c5d8-75b9-4c3e-afd2-\ 8ed229241084"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MEC", "-", "E1050"}], "|", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"FX_", ",", "FY_", ",", "FZ_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"FX", ",", "FY", ",", "FZ", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1", "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ "FX_", ",", "FY_", ",", "FZ_", ",", "MX_", ",", "MY_", ",", "MZ_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"FX", ",", "FY", ",", "FZ"}], "}"}], ".", RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"{", RowBox[{"MX", ",", "MY", ",", "MZ"}], "}"}], ".", RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}]}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fX"}], "}"}], ",", RowBox[{"{", RowBox[{"fY", ",", "fY"}], "}"}], ",", RowBox[{"{", RowBox[{"fZ", ",", "fZ"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fX1_", ",", "fX2_"}], "}"}], ",", RowBox[{"{", RowBox[{"fY1_", ",", "fY2_"}], "}"}], ",", RowBox[{"{", RowBox[{"fZ1_", ",", "fZ2_"}], "}"}]}], "}"}], " ", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"nl", ",", "r0", ",", "h0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"h0", "/", "6"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "}"}], ".", RowBox[{"{", RowBox[{"fX1", ",", "fX2"}], "}"}]}], " ", "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "}"}], ".", RowBox[{"{", RowBox[{"fY1", ",", "fY2"}], "}"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "}"}], ".", RowBox[{"{", RowBox[{"fZ1", ",", "fZ2"}], "}"}]}]}], ")"}]}]}]}], " ", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"area", " ", "force"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}], " ", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fX", ",", "fX"}], "}"}], ",", RowBox[{"{", RowBox[{"fY", ",", "fY", ",", "fY"}], "}"}], ",", RowBox[{"{", RowBox[{"fZ", ",", "fZ", ",", "fZ"}], "}"}]}], "}"}], " ", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fX1_", ",", "fX2_", ",", "fX3_"}], "}"}], ",", RowBox[{"{", RowBox[{"fY1_", ",", "fY2_", ",", "fY3_"}], "}"}], ",", RowBox[{"{", RowBox[{"fZ1_", ",", "fZ2_", ",", "fZ3_"}], "}"}]}], "}"}], " ", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Area", "[", RowBox[{"Polygon", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1"}], "]"}], "]"}], "]"}], "]"}], "/", "12"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "2"}], "}"}]}], "}"}], ".", RowBox[{"{", RowBox[{"fX1", ",", "fX2", ",", "fX3"}], "}"}]}], " ", "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "2"}], "}"}]}], "}"}], ".", RowBox[{"{", RowBox[{"fY1", ",", "fY2", ",", "fY3"}], "}"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "2"}], "}"}]}], "}"}], ".", RowBox[{"{", RowBox[{"fZ1", ",", "fZ2", ",", "fZ3"}], "}"}]}]}], ")"}]}]}], " ", ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.5002027395954*^9, {3.5007051491098003`*^9, 3.5007051504826*^9}, { 3.5007158972342*^9, 3.500715901961*^9}, {3.557660909440528*^9, 3.5576609113281307`*^9}, {3.557660948393796*^9, 3.5576609720746374`*^9}, { 3.557661012619109*^9, 3.5576610278447356`*^9}, {3.557661136342926*^9, 3.557661147387746*^9}, {3.6297908563470783`*^9, 3.629791071268656*^9}, 3.6297911922156687`*^9, 3.629791337951124*^9, 3.630659123489007*^9, { 3.6306802085628467`*^9, 3.630680256501731*^9}, {3.6306810828067827`*^9, 3.630681095411605*^9}, {3.6336810185255365`*^9, 3.6336810782549524`*^9}, { 3.685253847224399*^9, 3.68525389391807*^9}, 3.6853217521711235`*^9, { 3.6853402653249354`*^9, 3.6853402673449383`*^9}, {3.6881771903780155`*^9, 3.688177478668419*^9}, {3.688177519198476*^9, 3.688177565838541*^9}, { 3.6881807547137823`*^9, 3.6881807650437965`*^9}, {3.6881808240138793`*^9, 3.688180876463952*^9}, {3.6881809499540553`*^9, 3.688181051294197*^9}, { 3.688181093904257*^9, 3.6881812886945295`*^9}, {3.688181328234585*^9, 3.6881813304845877`*^9}, {3.688181453674761*^9, 3.6881815439948874`*^9}, { 3.6881825493903384`*^9, 3.6881825553503466`*^9}, {3.6888686424940867`*^9, 3.688868654634104*^9}, {3.6889603910835114`*^9, 3.688960395673517*^9}, { 3.6892196168325553`*^9, 3.6892196711326313`*^9}, {3.6892225677866864`*^9, 3.689222572486693*^9}, {3.692609973477575*^9, 3.6926099745275764`*^9}, { 3.6926155402795706`*^9, 3.692615635319703*^9}, {3.692615764369884*^9, 3.6926157969499297`*^9}, {3.6926158381999874`*^9, 3.6926159127500916`*^9}, {3.69261598286019*^9, 3.6926159923902035`*^9}, { 3.692616041680272*^9, 3.692616050660285*^9}, {3.692616114410374*^9, 3.692616301970637*^9}, 3.6926169967516093`*^9, {3.692617055031691*^9, 3.6926170726717157`*^9}, {3.6926171281517935`*^9, 3.6926171424118137`*^9}, {3.693017729825803*^9, 3.693017759355844*^9}, { 3.693017854095977*^9, 3.6930178839960184`*^9}, {3.693017945736105*^9, 3.6930179921261697`*^9}, {3.693716924097577*^9, 3.693716939187598*^9}, { 3.694845162608508*^9, 3.6948452135185795`*^9}, {3.6948452490186296`*^9, 3.6948452827886767`*^9}, {3.724757160342552*^9, 3.7247571958524694`*^9}, 3.724757226606532*^9, {3.724757277132578*^9, 3.7247573049427323`*^9}, { 3.7247573425972123`*^9, 3.724757343668002*^9}, {3.724757406051021*^9, 3.7247574182226624`*^9}, {3.72475750713536*^9, 3.724757523005001*^9}, { 3.7247575654114623`*^9, 3.724757565695835*^9}, {3.725367981062604*^9, 3.7253680379435987`*^9}, {3.753080180213684*^9, 3.75308023490277*^9}, { 3.7531760736894627`*^9, 3.7531760867433243`*^9}, {3.753176152767415*^9, 3.753176188588335*^9}, {3.7531763657274866`*^9, 3.7531763780597005`*^9}, { 3.7557233277936163`*^9, 3.7557233738564167`*^9}, {3.760607910807132*^9, 3.760607911704075*^9}, {3.766555201350331*^9, 3.7665553560217686`*^9}, { 3.7665553926814957`*^9, 3.766555405620928*^9}, {3.76663078538684*^9, 3.766630788445305*^9}, {3.7666308695077744`*^9, 3.7666309155844073`*^9}, { 3.766630963805001*^9, 3.766630964328018*^9}, {3.7666310063775616`*^9, 3.766631007597319*^9}, {3.766631053754822*^9, 3.7666310557693295`*^9}, { 3.766631102143116*^9, 3.766631182053177*^9}, {3.774244592505701*^9, 3.774244606024996*^9}, {3.774244666999945*^9, 3.774244780885934*^9}, { 3.7742448195924053`*^9, 3.7742448333656425`*^9}, {3.7742448971593103`*^9, 3.7742449615049114`*^9}, {3.774245098242358*^9, 3.7742451238780427`*^9}, { 3.77424518753212*^9, 3.7742451943686037`*^9}, {3.7742452586200476`*^9, 3.7742453104279203`*^9}, {3.7742469442792187`*^9, 3.7742472465608587`*^9}, {3.774247297716411*^9, 3.774247331264948*^9}, { 3.78807546567931*^9, 3.7880755830304527`*^9}, 3.78807562415361*^9, { 3.788075666988602*^9, 3.7880756768677874`*^9}, 3.788075710101962*^9, { 3.788075747380065*^9, 3.7880757482704797`*^9}, {3.7880760000927234`*^9, 3.788076030825418*^9}, 3.817437852364077*^9, {3.8408458462334127`*^9, 3.8408458682568913`*^9}, {3.840847529962968*^9, 3.840847547834058*^9}}, CellLabel->"In[62]:=",ExpressionUUID->"8e09dea8-84c1-47df-be19-131f7e0085b1"] }, Closed]], Cell[CellGroupData[{ Cell["FORCE ELEMENT (evnt) defs ", "Subsection", CellChangeTimes->{{3.6926098999374723`*^9, 3.6926099165674953`*^9}, { 3.7606078822118464`*^9, 3.7606078873319845`*^9}, {3.766555151642228*^9, 3.7665551755834265`*^9}, {3.774244544239236*^9, 3.7742445459997997`*^9}, { 3.787895139092532*^9, 3.787895139619763*^9}, {3.817437626458826*^9, 3.8174376276248903`*^9}, 3.8223693711432643`*^9},ExpressionUUID->"0c696525-6a47-44b6-9318-\ c7d51eaa387b"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MEC", "-", "E1050"}], "|", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVENT", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"FORCE", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.5002027395954*^9, {3.5007051491098003`*^9, 3.5007051504826*^9}, { 3.5007158972342*^9, 3.500715901961*^9}, {3.557660909440528*^9, 3.5576609113281307`*^9}, {3.557660948393796*^9, 3.5576609720746374`*^9}, { 3.557661012619109*^9, 3.5576610278447356`*^9}, {3.557661136342926*^9, 3.557661147387746*^9}, {3.6297908563470783`*^9, 3.629791071268656*^9}, 3.6297911922156687`*^9, 3.629791337951124*^9, 3.630659123489007*^9, { 3.6306802085628467`*^9, 3.630680256501731*^9}, {3.6306810828067827`*^9, 3.630681095411605*^9}, {3.6336810185255365`*^9, 3.6336810782549524`*^9}, { 3.685253847224399*^9, 3.68525389391807*^9}, 3.6853217521711235`*^9, { 3.6853402653249354`*^9, 3.6853402673449383`*^9}, {3.6881771903780155`*^9, 3.688177478668419*^9}, {3.688177519198476*^9, 3.688177565838541*^9}, { 3.6881807547137823`*^9, 3.6881807650437965`*^9}, {3.6881808240138793`*^9, 3.688180876463952*^9}, {3.6881809499540553`*^9, 3.688181051294197*^9}, { 3.688181093904257*^9, 3.6881812886945295`*^9}, {3.688181328234585*^9, 3.6881813304845877`*^9}, {3.688181453674761*^9, 3.6881815439948874`*^9}, { 3.6881825493903384`*^9, 3.6881825553503466`*^9}, {3.6888686424940867`*^9, 3.688868654634104*^9}, {3.6889603910835114`*^9, 3.688960395673517*^9}, { 3.6892196168325553`*^9, 3.6892196711326313`*^9}, {3.6892225677866864`*^9, 3.689222572486693*^9}, {3.692609973477575*^9, 3.6926099745275764`*^9}, { 3.6926155402795706`*^9, 3.692615635319703*^9}, {3.692615764369884*^9, 3.6926157969499297`*^9}, {3.6926158381999874`*^9, 3.6926159127500916`*^9}, {3.69261598286019*^9, 3.6926159923902035`*^9}, { 3.692616041680272*^9, 3.692616050660285*^9}, {3.692616114410374*^9, 3.692616301970637*^9}, 3.6926169967516093`*^9, {3.692617055031691*^9, 3.6926170726717157`*^9}, {3.6926171281517935`*^9, 3.6926171424118137`*^9}, {3.693017729825803*^9, 3.693017759355844*^9}, { 3.693017854095977*^9, 3.6930178839960184`*^9}, {3.693017945736105*^9, 3.6930179921261697`*^9}, {3.693716924097577*^9, 3.693716939187598*^9}, { 3.694845162608508*^9, 3.6948452135185795`*^9}, {3.6948452490186296`*^9, 3.6948452827886767`*^9}, {3.724757160342552*^9, 3.7247571958524694`*^9}, 3.724757226606532*^9, {3.724757277132578*^9, 3.7247573049427323`*^9}, { 3.7247573425972123`*^9, 3.724757343668002*^9}, {3.724757406051021*^9, 3.7247574182226624`*^9}, {3.72475750713536*^9, 3.724757523005001*^9}, { 3.7247575654114623`*^9, 3.724757565695835*^9}, {3.725367981062604*^9, 3.7253680379435987`*^9}, {3.753080180213684*^9, 3.75308023490277*^9}, { 3.7531760736894627`*^9, 3.7531760867433243`*^9}, {3.753176152767415*^9, 3.753176188588335*^9}, {3.7531763657274866`*^9, 3.7531763780597005`*^9}, { 3.7557233277936163`*^9, 3.7557233738564167`*^9}, {3.760607910807132*^9, 3.760607911704075*^9}, {3.766555201350331*^9, 3.7665553560217686`*^9}, { 3.7665553926814957`*^9, 3.766555405620928*^9}, {3.76663078538684*^9, 3.766630788445305*^9}, {3.7666308695077744`*^9, 3.7666309155844073`*^9}, { 3.766630963805001*^9, 3.766630964328018*^9}, {3.7666310063775616`*^9, 3.766631007597319*^9}, {3.766631053754822*^9, 3.7666310557693295`*^9}, { 3.766631102143116*^9, 3.766631182053177*^9}, {3.774244592505701*^9, 3.774244606024996*^9}, {3.774244666999945*^9, 3.774244780885934*^9}, { 3.7742448195924053`*^9, 3.7742448333656425`*^9}, {3.7742448971593103`*^9, 3.7742449615049114`*^9}, {3.774245098242358*^9, 3.7742451238780427`*^9}, { 3.77424518753212*^9, 3.7742451943686037`*^9}, {3.7742452586200476`*^9, 3.7742453104279203`*^9}, {3.7742469442792187`*^9, 3.7742472465608587`*^9}, {3.774247297716411*^9, 3.774247331264948*^9}, { 3.78807546567931*^9, 3.7880755830304527`*^9}, 3.78807562415361*^9, { 3.788075666988602*^9, 3.7880756768677874`*^9}, 3.788075710101962*^9, { 3.788075747380065*^9, 3.7880757482704797`*^9}, {3.7880760000927234`*^9, 3.788076030825418*^9}, {3.817437636844257*^9, 3.817437649087758*^9}, { 3.8174378054427986`*^9, 3.8174378405468597`*^9}, {3.8174388645560064`*^9, 3.817438902212788*^9}, 3.8175212166525545`*^9}, CellLabel->"In[68]:=",ExpressionUUID->"b9c705a8-445f-4657-84c2-c1d3f2236053"] }, Closed]], Cell[CellGroupData[{ Cell["FORCE ELEMENT (vibr) defs ", "Subsection", CellChangeTimes->{{3.6926098999374723`*^9, 3.6926099165674953`*^9}, { 3.760607890234026*^9, 3.760607893763776*^9}, {3.787895219181797*^9, 3.787895220119398*^9}},ExpressionUUID->"617fee82-5339-4433-b2ea-\ 7c017ec32180"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"FX_", ",", "FY_", ",", "FZ_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"FX", ",", "FY", ",", "FZ", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1", "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ "FX_", ",", "FY_", ",", "FZ_", ",", "MX_", ",", "MY_", ",", "MZ_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"FX", ",", "FY", ",", "FZ"}], "}"}], ".", RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}], "+", RowBox[{ RowBox[{"{", RowBox[{"MX", ",", "MY", ",", "MZ"}], "}"}], ".", RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}]}], ")"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fX"}], "}"}], ",", RowBox[{"{", RowBox[{"fY", ",", "fY"}], "}"}], ",", RowBox[{"{", RowBox[{"fZ", ",", "fZ"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fX1_", ",", "fX2_"}], "}"}], ",", RowBox[{"{", RowBox[{"fY1_", ",", "fY2_"}], "}"}], ",", RowBox[{"{", RowBox[{"fZ1_", ",", "fZ2_"}], "}"}]}], "}"}], " ", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"nl", ",", "r0", ",", "h0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(", RowBox[{ RowBox[{"h0", "/", "6"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "}"}], ".", RowBox[{"{", RowBox[{"fX1", ",", "fX2"}], "}"}]}], " ", "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "}"}], ".", RowBox[{"{", RowBox[{"fY1", ",", "fY2"}], "}"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "}"}], ".", RowBox[{"{", RowBox[{"fZ1", ",", "fZ2"}], "}"}]}]}], ")"}]}], ")"}]}]}], " ", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}], " ", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fX", ",", "fX"}], "}"}], ",", RowBox[{"{", RowBox[{"fY", ",", "fY", ",", "fY"}], "}"}], ",", RowBox[{"{", RowBox[{"fZ", ",", "fZ", ",", "fZ"}], "}"}]}], "}"}], " ", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fX1_", ",", "fX2_", ",", "fX3_"}], "}"}], ",", RowBox[{"{", RowBox[{"fY1_", ",", "fY2_", ",", "fY3_"}], "}"}], ",", RowBox[{"{", RowBox[{"fZ1_", ",", "fZ2_", ",", "fZ3_"}], "}"}]}], "}"}], " ", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{ RowBox[{ RowBox[{"Area", "[", RowBox[{"Polygon", "[", RowBox[{"fun", "[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1"}], "]"}], "]"}], "]"}], "/", "12"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "2"}], "}"}]}], "}"}], ".", RowBox[{"{", RowBox[{"fX1", ",", "fX2", ",", "fX3"}], "}"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "2"}], "}"}]}], "}"}], ".", RowBox[{"{", RowBox[{"fY1", ",", "fY2", ",", "fY3"}], "}"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "2"}], "}"}]}], "}"}], ".", RowBox[{"{", RowBox[{"fZ1", ",", "fZ2", ",", "fZ3"}], "}"}]}]}], ")"}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"{", "m_", "}"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "m"}], " ", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}], ")"}], ".", " ", RowBox[{"(", RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], " ", "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], ")"}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"{", RowBox[{"m_", ",", "J_"}], "}"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"m", ",", "J"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1", "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"m_", ",", "J_"}], "}"}], ",", RowBox[{"{", RowBox[{"ix_", ",", "iy_"}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"iz", "=", RowBox[{"ix", StyleBox["\[Cross]", "OperatorCharacter"], StyleBox["iy", "OperatorCharacter"]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"m", " ", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}], ")"}], ".", RowBox[{"(", " ", RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], ")"}]}]}], "-", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"J", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}], ")"}], ".", RowBox[{"(", RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], ")"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"for", " ", "detailed", " ", "graphics"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"m_", ",", "J_"}], "}"}], ",", RowBox[{"{", RowBox[{"ix_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{"xyz_", ",", "obj_"}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"m", ",", "J"}], "}"}], ",", RowBox[{"{", RowBox[{"ix", ",", "iy"}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1", "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.5002027395954*^9, {3.5007051491098003`*^9, 3.5007051504826*^9}, { 3.5007158972342*^9, 3.500715901961*^9}, {3.557660909440528*^9, 3.5576609113281307`*^9}, {3.557660948393796*^9, 3.5576609720746374`*^9}, { 3.557661012619109*^9, 3.5576610278447356`*^9}, {3.557661136342926*^9, 3.557661147387746*^9}, {3.6297908563470783`*^9, 3.629791071268656*^9}, 3.6297911922156687`*^9, 3.629791337951124*^9, 3.630659123489007*^9, { 3.6306802085628467`*^9, 3.630680256501731*^9}, {3.6306810828067827`*^9, 3.630681095411605*^9}, {3.6336810185255365`*^9, 3.6336810782549524`*^9}, { 3.685253847224399*^9, 3.68525389391807*^9}, 3.6853217521711235`*^9, { 3.6853402653249354`*^9, 3.6853402673449383`*^9}, {3.6881771903780155`*^9, 3.688177478668419*^9}, {3.688177519198476*^9, 3.688177565838541*^9}, { 3.6881807547137823`*^9, 3.6881807650437965`*^9}, {3.6881808240138793`*^9, 3.688180876463952*^9}, {3.6881809499540553`*^9, 3.688181051294197*^9}, { 3.688181093904257*^9, 3.6881812886945295`*^9}, {3.688181328234585*^9, 3.6881813304845877`*^9}, {3.688181453674761*^9, 3.6881815439948874`*^9}, { 3.6881825493903384`*^9, 3.6881825553503466`*^9}, {3.6888686424940867`*^9, 3.688868654634104*^9}, {3.6889603910835114`*^9, 3.688960395673517*^9}, { 3.6892196168325553`*^9, 3.6892196711326313`*^9}, {3.6892225677866864`*^9, 3.689222572486693*^9}, {3.692609973477575*^9, 3.6926099745275764`*^9}, { 3.6926155402795706`*^9, 3.692615635319703*^9}, {3.692615764369884*^9, 3.6926157969499297`*^9}, {3.6926158381999874`*^9, 3.6926159127500916`*^9}, {3.69261598286019*^9, 3.6926159923902035`*^9}, { 3.692616041680272*^9, 3.692616050660285*^9}, {3.692616114410374*^9, 3.692616301970637*^9}, 3.6926169967516093`*^9, {3.692617055031691*^9, 3.6926170726717157`*^9}, {3.6926171281517935`*^9, 3.6926171424118137`*^9}, {3.693017729825803*^9, 3.693017759355844*^9}, { 3.693017854095977*^9, 3.6930178839960184`*^9}, {3.693017945736105*^9, 3.6930179921261697`*^9}, {3.693716924097577*^9, 3.693716939187598*^9}, { 3.694845162608508*^9, 3.6948452135185795`*^9}, {3.6948452490186296`*^9, 3.6948452827886767`*^9}, {3.724757160342552*^9, 3.7247571958524694`*^9}, 3.724757226606532*^9, {3.724757277132578*^9, 3.7247573049427323`*^9}, { 3.7247573425972123`*^9, 3.724757343668002*^9}, {3.724757406051021*^9, 3.7247574182226624`*^9}, {3.72475750713536*^9, 3.724757523005001*^9}, { 3.7247575654114623`*^9, 3.724757565695835*^9}, {3.725367981062604*^9, 3.7253680379435987`*^9}, {3.753080180213684*^9, 3.75308023490277*^9}, { 3.7531760736894627`*^9, 3.7531760867433243`*^9}, {3.753176152767415*^9, 3.753176188588335*^9}, {3.7531763657274866`*^9, 3.7531763780597005`*^9}, { 3.7557233277936163`*^9, 3.7557233738564167`*^9}, {3.760607934362851*^9, 3.7606079386004443`*^9}, {3.760608196677984*^9, 3.7606082206131644`*^9}, { 3.7650816994300117`*^9, 3.76508188551581*^9}, {3.765081961656807*^9, 3.765082049591256*^9}, {3.7650820808183804`*^9, 3.765082093155528*^9}, { 3.765082452422645*^9, 3.7650825105342064`*^9}, {3.76508255601999*^9, 3.765082685611348*^9}, {3.765082742570591*^9, 3.7650827441033616`*^9}, { 3.7650827973670535`*^9, 3.7650828162989264`*^9}, {3.7650828756452084`*^9, 3.76508291725654*^9}, {3.787989785884842*^9, 3.7879897861538515`*^9}, { 3.787989950939253*^9, 3.7879899714860353`*^9}, {3.787990031945051*^9, 3.7879900904605694`*^9}, {3.7880748631855245`*^9, 3.788074907396145*^9}, { 3.788074983681623*^9, 3.7880749851875305`*^9}, {3.7880752108539596`*^9, 3.7880753460848837`*^9}, {3.7880753955492105`*^9, 3.7880754495543413`*^9}, 3.7880757985887327`*^9, {3.7880758550342417`*^9, 3.7880758814237986`*^9}, { 3.7880759143167744`*^9, 3.7880759877586217`*^9}, {3.788076059772026*^9, 3.788076102767933*^9}, 3.7881670103681445`*^9, {3.788424742599498*^9, 3.7884247886832037`*^9}, {3.820469573319458*^9, 3.8204696119241095`*^9}, { 3.820469713680828*^9, 3.820469726202425*^9}, {3.820469774985937*^9, 3.8204697820405493`*^9}, {3.8204709818632145`*^9, 3.8204709829070034`*^9}, {3.8211506205514607`*^9, 3.8211506410480547`*^9}, {3.821150731307102*^9, 3.821150735471115*^9}, { 3.821151423923393*^9, 3.82115148698011*^9}, {3.821151531470887*^9, 3.8211516059392166`*^9}, {3.8298844266880245`*^9, 3.8298844622541885`*^9}, {3.829890944882238*^9, 3.8298909629438314`*^9}, { 3.829891002598065*^9, 3.8298910041502285`*^9}, {3.8298910779119153`*^9, 3.8298911107781134`*^9}, {3.8298912682866173`*^9, 3.829891271409994*^9}}, CellLabel->"In[69]:=",ExpressionUUID->"5c9e340e-54a3-430e-82cb-281cacd25c16"] }, Closed]], Cell[CellGroupData[{ Cell["FORCE ELEMENT (stab) defs ", "Subsection", CellChangeTimes->{{3.6926098999374723`*^9, 3.6926099165674953`*^9}, { 3.760607890234026*^9, 3.760607893763776*^9}, {3.787895219181797*^9, 3.787895220119398*^9}, {3.788574649818136*^9, 3.7885746509362783`*^9}},ExpressionUUID->"f56b2ac8-cab7-470a-be8d-\ 9c9e7cd3fcc3"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"FX_", ",", "FY_", ",", "FZ_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"FX", ",", "FY", ",", "FZ"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1", "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ "FX_", ",", "FY_", ",", "FZ_", ",", "MX_", ",", "MY_", ",", "MZ_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ "FX", ",", "FY", ",", "FZ", ",", "MX", ",", "MY", ",", "MZ"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1", "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fX1_", ",", "fX2_"}], "}"}], ",", RowBox[{"{", RowBox[{"fY1_", ",", "fY2_"}], "}"}], ",", RowBox[{"{", RowBox[{"fZ1_", ",", "fZ2_"}], "}"}]}], "}"}], " ", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fX1", ",", "fX2"}], "}"}], ",", RowBox[{"{", RowBox[{"fY1", ",", "fY2"}], "}"}], ",", RowBox[{"{", RowBox[{"fZ1", ",", "fZ2"}], "}"}]}], "}"}], " ", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}], " ", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], " ", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fX1_", ",", "fX2_", ",", "fX3_"}], "}"}], ",", RowBox[{"{", RowBox[{"fY1_", ",", "fY2_", ",", "fY3_"}], "}"}], ",", RowBox[{"{", RowBox[{"fZ1_", ",", "fZ2_", ",", "fZ3_"}], "}"}]}], "}"}], " ", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fX1", ",", "fX2", ",", "fX3"}], "}"}], ",", RowBox[{"{", RowBox[{"fY1", ",", "fY2", ",", "fY3"}], "}"}], ",", RowBox[{"{", RowBox[{"fZ1", ",", "fZ2", ",", "fZ3"}], "}"}]}], "}"}], " ", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.5002027395954*^9, {3.5007051491098003`*^9, 3.5007051504826*^9}, { 3.5007158972342*^9, 3.500715901961*^9}, {3.557660909440528*^9, 3.5576609113281307`*^9}, {3.557660948393796*^9, 3.5576609720746374`*^9}, { 3.557661012619109*^9, 3.5576610278447356`*^9}, {3.557661136342926*^9, 3.557661147387746*^9}, {3.6297908563470783`*^9, 3.629791071268656*^9}, 3.6297911922156687`*^9, 3.629791337951124*^9, 3.630659123489007*^9, { 3.6306802085628467`*^9, 3.630680256501731*^9}, {3.6306810828067827`*^9, 3.630681095411605*^9}, {3.6336810185255365`*^9, 3.6336810782549524`*^9}, { 3.685253847224399*^9, 3.68525389391807*^9}, 3.6853217521711235`*^9, { 3.6853402653249354`*^9, 3.6853402673449383`*^9}, {3.6881771903780155`*^9, 3.688177478668419*^9}, {3.688177519198476*^9, 3.688177565838541*^9}, { 3.6881807547137823`*^9, 3.6881807650437965`*^9}, {3.6881808240138793`*^9, 3.688180876463952*^9}, {3.6881809499540553`*^9, 3.688181051294197*^9}, { 3.688181093904257*^9, 3.6881812886945295`*^9}, {3.688181328234585*^9, 3.6881813304845877`*^9}, {3.688181453674761*^9, 3.6881815439948874`*^9}, { 3.6881825493903384`*^9, 3.6881825553503466`*^9}, {3.6888686424940867`*^9, 3.688868654634104*^9}, {3.6889603910835114`*^9, 3.688960395673517*^9}, { 3.6892196168325553`*^9, 3.6892196711326313`*^9}, {3.6892225677866864`*^9, 3.689222572486693*^9}, {3.692609973477575*^9, 3.6926099745275764`*^9}, { 3.6926155402795706`*^9, 3.692615635319703*^9}, {3.692615764369884*^9, 3.6926157969499297`*^9}, {3.6926158381999874`*^9, 3.6926159127500916`*^9}, {3.69261598286019*^9, 3.6926159923902035`*^9}, { 3.692616041680272*^9, 3.692616050660285*^9}, {3.692616114410374*^9, 3.692616301970637*^9}, 3.6926169967516093`*^9, {3.692617055031691*^9, 3.6926170726717157`*^9}, {3.6926171281517935`*^9, 3.6926171424118137`*^9}, {3.693017729825803*^9, 3.693017759355844*^9}, { 3.693017854095977*^9, 3.6930178839960184`*^9}, {3.693017945736105*^9, 3.6930179921261697`*^9}, {3.693716924097577*^9, 3.693716939187598*^9}, { 3.694845162608508*^9, 3.6948452135185795`*^9}, {3.6948452490186296`*^9, 3.6948452827886767`*^9}, {3.724757160342552*^9, 3.7247571958524694`*^9}, 3.724757226606532*^9, {3.724757277132578*^9, 3.7247573049427323`*^9}, { 3.7247573425972123`*^9, 3.724757343668002*^9}, {3.724757406051021*^9, 3.7247574182226624`*^9}, {3.72475750713536*^9, 3.724757523005001*^9}, { 3.7247575654114623`*^9, 3.724757565695835*^9}, {3.725367981062604*^9, 3.7253680379435987`*^9}, {3.753080180213684*^9, 3.75308023490277*^9}, { 3.7531760736894627`*^9, 3.7531760867433243`*^9}, {3.753176152767415*^9, 3.753176188588335*^9}, {3.7531763657274866`*^9, 3.7531763780597005`*^9}, { 3.7557233277936163`*^9, 3.7557233738564167`*^9}, {3.760607934362851*^9, 3.7606079386004443`*^9}, {3.760608196677984*^9, 3.7606082206131644`*^9}, { 3.7650816994300117`*^9, 3.76508188551581*^9}, {3.765081961656807*^9, 3.765082049591256*^9}, {3.7650820808183804`*^9, 3.765082093155528*^9}, { 3.765082452422645*^9, 3.7650825105342064`*^9}, {3.76508255601999*^9, 3.765082685611348*^9}, {3.765082742570591*^9, 3.7650827441033616`*^9}, { 3.7650827973670535`*^9, 3.7650828162989264`*^9}, {3.7650828756452084`*^9, 3.76508291725654*^9}, {3.787989785884842*^9, 3.7879897861538515`*^9}, { 3.787989950939253*^9, 3.7879899714860353`*^9}, {3.787990031945051*^9, 3.7879900904605694`*^9}, {3.7880748631855245`*^9, 3.788074907396145*^9}, { 3.788074983681623*^9, 3.7880749851875305`*^9}, {3.7880752108539596`*^9, 3.7880753460848837`*^9}, {3.7880753955492105`*^9, 3.7880754495543413`*^9}, 3.7880757985887327`*^9, {3.7880758550342417`*^9, 3.7880758814237986`*^9}, { 3.7880759143167744`*^9, 3.7880759877586217`*^9}, {3.788076059772026*^9, 3.788076102767933*^9}, 3.7881670103681445`*^9, {3.788424742599498*^9, 3.7884247886832037`*^9}, {3.788574662089695*^9, 3.7885746993059206`*^9}, { 3.7885747319173193`*^9, 3.7885747927154846`*^9}, {3.788833131233985*^9, 3.788833188690298*^9}, {3.821150888214839*^9, 3.8211509294646425`*^9}, { 3.8211509603238955`*^9, 3.8211510555185704`*^9}, {3.8211511473842373`*^9, 3.821151233654641*^9}}, CellLabel->"In[79]:=",ExpressionUUID->"5f9b25ca-8981-4567-bf86-568617bd7edd"] }, Closed]], Cell[CellGroupData[{ Cell["FORCE ELEMENT (nonl) defs ", "Subsection", CellChangeTimes->{{3.6926098999374723`*^9, 3.6926099165674953`*^9}, { 3.760607890234026*^9, 3.760607893763776*^9}, {3.787895219181797*^9, 3.787895220119398*^9}, {3.788574649818136*^9, 3.7885746509362783`*^9}, { 3.789441075232401*^9, 3.7894410761072865`*^9}},ExpressionUUID->"3819b5bb-d58e-4ad7-8e44-\ 7b48483e846e"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"FORCE", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.5002027395954*^9, {3.5007051491098003`*^9, 3.5007051504826*^9}, { 3.5007158972342*^9, 3.500715901961*^9}, {3.557660909440528*^9, 3.5576609113281307`*^9}, {3.557660948393796*^9, 3.5576609720746374`*^9}, { 3.557661012619109*^9, 3.5576610278447356`*^9}, {3.557661136342926*^9, 3.557661147387746*^9}, {3.6297908563470783`*^9, 3.629791071268656*^9}, 3.6297911922156687`*^9, 3.629791337951124*^9, 3.630659123489007*^9, { 3.6306802085628467`*^9, 3.630680256501731*^9}, {3.6306810828067827`*^9, 3.630681095411605*^9}, {3.6336810185255365`*^9, 3.6336810782549524`*^9}, { 3.685253847224399*^9, 3.68525389391807*^9}, 3.6853217521711235`*^9, { 3.6853402653249354`*^9, 3.6853402673449383`*^9}, {3.6881771903780155`*^9, 3.688177478668419*^9}, {3.688177519198476*^9, 3.688177565838541*^9}, { 3.6881807547137823`*^9, 3.6881807650437965`*^9}, {3.6881808240138793`*^9, 3.688180876463952*^9}, {3.6881809499540553`*^9, 3.688181051294197*^9}, { 3.688181093904257*^9, 3.6881812886945295`*^9}, {3.688181328234585*^9, 3.6881813304845877`*^9}, {3.688181453674761*^9, 3.6881815439948874`*^9}, { 3.6881825493903384`*^9, 3.6881825553503466`*^9}, {3.6888686424940867`*^9, 3.688868654634104*^9}, {3.6889603910835114`*^9, 3.688960395673517*^9}, { 3.6892196168325553`*^9, 3.6892196711326313`*^9}, {3.6892225677866864`*^9, 3.689222572486693*^9}, {3.692609973477575*^9, 3.6926099745275764`*^9}, { 3.6926155402795706`*^9, 3.692615635319703*^9}, {3.692615764369884*^9, 3.6926157969499297`*^9}, {3.6926158381999874`*^9, 3.6926159127500916`*^9}, {3.69261598286019*^9, 3.6926159923902035`*^9}, { 3.692616041680272*^9, 3.692616050660285*^9}, {3.692616114410374*^9, 3.692616301970637*^9}, 3.6926169967516093`*^9, {3.692617055031691*^9, 3.6926170726717157`*^9}, {3.6926171281517935`*^9, 3.6926171424118137`*^9}, {3.693017729825803*^9, 3.693017759355844*^9}, { 3.693017854095977*^9, 3.6930178839960184`*^9}, {3.693017945736105*^9, 3.6930179921261697`*^9}, {3.693716924097577*^9, 3.693716939187598*^9}, { 3.694845162608508*^9, 3.6948452135185795`*^9}, {3.6948452490186296`*^9, 3.6948452827886767`*^9}, {3.724757160342552*^9, 3.7247571958524694`*^9}, 3.724757226606532*^9, {3.724757277132578*^9, 3.7247573049427323`*^9}, { 3.7247573425972123`*^9, 3.724757343668002*^9}, {3.724757406051021*^9, 3.7247574182226624`*^9}, {3.72475750713536*^9, 3.724757523005001*^9}, { 3.7247575654114623`*^9, 3.724757565695835*^9}, {3.725367981062604*^9, 3.7253680379435987`*^9}, {3.753080180213684*^9, 3.75308023490277*^9}, { 3.7531760736894627`*^9, 3.7531760867433243`*^9}, {3.753176152767415*^9, 3.753176188588335*^9}, {3.7531763657274866`*^9, 3.7531763780597005`*^9}, { 3.7557233277936163`*^9, 3.7557233738564167`*^9}, {3.760607934362851*^9, 3.7606079386004443`*^9}, {3.760608196677984*^9, 3.7606082206131644`*^9}, { 3.7650816994300117`*^9, 3.76508188551581*^9}, {3.765081961656807*^9, 3.765082049591256*^9}, {3.7650820808183804`*^9, 3.765082093155528*^9}, { 3.765082452422645*^9, 3.7650825105342064`*^9}, {3.76508255601999*^9, 3.765082685611348*^9}, {3.765082742570591*^9, 3.7650827441033616`*^9}, { 3.7650827973670535`*^9, 3.7650828162989264`*^9}, {3.7650828756452084`*^9, 3.76508291725654*^9}, {3.787989785884842*^9, 3.7879897861538515`*^9}, { 3.787989950939253*^9, 3.7879899714860353`*^9}, {3.787990031945051*^9, 3.7879900904605694`*^9}, {3.7880748631855245`*^9, 3.788074907396145*^9}, { 3.788074983681623*^9, 3.7880749851875305`*^9}, {3.7880752108539596`*^9, 3.7880753460848837`*^9}, {3.7880753955492105`*^9, 3.7880754495543413`*^9}, 3.7880757985887327`*^9, {3.7880758550342417`*^9, 3.7880758814237986`*^9}, { 3.7880759143167744`*^9, 3.7880759877586217`*^9}, {3.788076059772026*^9, 3.788076102767933*^9}, 3.7881670103681445`*^9, {3.788424742599498*^9, 3.7884247886832037`*^9}, {3.788574662089695*^9, 3.7885746993059206`*^9}, { 3.7885747319173193`*^9, 3.7885747927154846`*^9}, {3.788833131233985*^9, 3.788833188690298*^9}, {3.789441083494993*^9, 3.7894410929575987`*^9}, { 3.7894411329012265`*^9, 3.789441135103803*^9}, {3.8216139632647324`*^9, 3.821614000501048*^9}, {3.821778980163827*^9, 3.821779023170026*^9}}, CellLabel->"In[85]:=",ExpressionUUID->"2e83dfa3-81b9-4e4f-a211-b0fb5976d36f"] }, Closed]], Cell[CellGroupData[{ Cell["FORCE ELEMENT (tmec) defs ", "Subsection", CellChangeTimes->{{3.6926098999374723`*^9, 3.6926099165674953`*^9}, { 3.760607890234026*^9, 3.760607893763776*^9}, {3.787895219181797*^9, 3.787895220119398*^9}, {3.788574649818136*^9, 3.7885746509362783`*^9}, { 3.789441075232401*^9, 3.7894410761072865`*^9}, {3.8223693498062468`*^9, 3.8223693569381757`*^9}},ExpressionUUID->"5d932a2f-c019-4b60-9ed9-\ fe899f00e190"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"TMEC", ",", RowBox[{"{", RowBox[{"FORCE", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"FORCE", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.5002027395954*^9, {3.5007051491098003`*^9, 3.5007051504826*^9}, { 3.5007158972342*^9, 3.500715901961*^9}, {3.557660909440528*^9, 3.5576609113281307`*^9}, {3.557660948393796*^9, 3.5576609720746374`*^9}, { 3.557661012619109*^9, 3.5576610278447356`*^9}, {3.557661136342926*^9, 3.557661147387746*^9}, {3.6297908563470783`*^9, 3.629791071268656*^9}, 3.6297911922156687`*^9, 3.629791337951124*^9, 3.630659123489007*^9, { 3.6306802085628467`*^9, 3.630680256501731*^9}, {3.6306810828067827`*^9, 3.630681095411605*^9}, {3.6336810185255365`*^9, 3.6336810782549524`*^9}, { 3.685253847224399*^9, 3.68525389391807*^9}, 3.6853217521711235`*^9, { 3.6853402653249354`*^9, 3.6853402673449383`*^9}, {3.6881771903780155`*^9, 3.688177478668419*^9}, {3.688177519198476*^9, 3.688177565838541*^9}, { 3.6881807547137823`*^9, 3.6881807650437965`*^9}, {3.6881808240138793`*^9, 3.688180876463952*^9}, {3.6881809499540553`*^9, 3.688181051294197*^9}, { 3.688181093904257*^9, 3.6881812886945295`*^9}, {3.688181328234585*^9, 3.6881813304845877`*^9}, {3.688181453674761*^9, 3.6881815439948874`*^9}, { 3.6881825493903384`*^9, 3.6881825553503466`*^9}, {3.6888686424940867`*^9, 3.688868654634104*^9}, {3.6889603910835114`*^9, 3.688960395673517*^9}, { 3.6892196168325553`*^9, 3.6892196711326313`*^9}, {3.6892225677866864`*^9, 3.689222572486693*^9}, {3.692609973477575*^9, 3.6926099745275764`*^9}, { 3.6926155402795706`*^9, 3.692615635319703*^9}, {3.692615764369884*^9, 3.6926157969499297`*^9}, {3.6926158381999874`*^9, 3.6926159127500916`*^9}, {3.69261598286019*^9, 3.6926159923902035`*^9}, { 3.692616041680272*^9, 3.692616050660285*^9}, {3.692616114410374*^9, 3.692616301970637*^9}, 3.6926169967516093`*^9, {3.692617055031691*^9, 3.6926170726717157`*^9}, {3.6926171281517935`*^9, 3.6926171424118137`*^9}, {3.693017729825803*^9, 3.693017759355844*^9}, { 3.693017854095977*^9, 3.6930178839960184`*^9}, {3.693017945736105*^9, 3.6930179921261697`*^9}, {3.693716924097577*^9, 3.693716939187598*^9}, { 3.694845162608508*^9, 3.6948452135185795`*^9}, {3.6948452490186296`*^9, 3.6948452827886767`*^9}, {3.724757160342552*^9, 3.7247571958524694`*^9}, 3.724757226606532*^9, {3.724757277132578*^9, 3.7247573049427323`*^9}, { 3.7247573425972123`*^9, 3.724757343668002*^9}, {3.724757406051021*^9, 3.7247574182226624`*^9}, {3.72475750713536*^9, 3.724757523005001*^9}, { 3.7247575654114623`*^9, 3.724757565695835*^9}, {3.725367981062604*^9, 3.7253680379435987`*^9}, {3.753080180213684*^9, 3.75308023490277*^9}, { 3.7531760736894627`*^9, 3.7531760867433243`*^9}, {3.753176152767415*^9, 3.753176188588335*^9}, {3.7531763657274866`*^9, 3.7531763780597005`*^9}, { 3.7557233277936163`*^9, 3.7557233738564167`*^9}, {3.760607934362851*^9, 3.7606079386004443`*^9}, {3.760608196677984*^9, 3.7606082206131644`*^9}, { 3.7650816994300117`*^9, 3.76508188551581*^9}, {3.765081961656807*^9, 3.765082049591256*^9}, {3.7650820808183804`*^9, 3.765082093155528*^9}, { 3.765082452422645*^9, 3.7650825105342064`*^9}, {3.76508255601999*^9, 3.765082685611348*^9}, {3.765082742570591*^9, 3.7650827441033616`*^9}, { 3.7650827973670535`*^9, 3.7650828162989264`*^9}, {3.7650828756452084`*^9, 3.76508291725654*^9}, {3.787989785884842*^9, 3.7879897861538515`*^9}, { 3.787989950939253*^9, 3.7879899714860353`*^9}, {3.787990031945051*^9, 3.7879900904605694`*^9}, {3.7880748631855245`*^9, 3.788074907396145*^9}, { 3.788074983681623*^9, 3.7880749851875305`*^9}, {3.7880752108539596`*^9, 3.7880753460848837`*^9}, {3.7880753955492105`*^9, 3.7880754495543413`*^9}, 3.7880757985887327`*^9, {3.7880758550342417`*^9, 3.7880758814237986`*^9}, { 3.7880759143167744`*^9, 3.7880759877586217`*^9}, {3.788076059772026*^9, 3.788076102767933*^9}, 3.7881670103681445`*^9, {3.788424742599498*^9, 3.7884247886832037`*^9}, {3.788574662089695*^9, 3.7885746993059206`*^9}, { 3.7885747319173193`*^9, 3.7885747927154846`*^9}, {3.788833131233985*^9, 3.788833188690298*^9}, {3.789441083494993*^9, 3.7894410929575987`*^9}, { 3.7894411329012265`*^9, 3.789441135103803*^9}, {3.8216139632647324`*^9, 3.821614000501048*^9}, {3.821778980163827*^9, 3.821779023170026*^9}, { 3.822369386549012*^9, 3.822369387709909*^9}}, CellLabel->"In[86]:=",ExpressionUUID->"6f8837b5-2fdc-43e1-9c61-7880a239736c"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["CONSTRAINT MODEL", "Section", CellChangeTimes->{ 3.4430806364968*^9, {3.4453166713873997`*^9, 3.4453166747414*^9}, { 3.447462264275*^9, 3.4474622644154*^9}, {3.4695731321116*^9, 3.4695731359491997`*^9}, 3.473055186341*^9, {3.4730552472860003`*^9, 3.47305524884*^9}, {3.473055399782*^9, 3.473055419801*^9}, { 3.4734696760778*^9, 3.4734697047349997`*^9}, {3.4770537891542*^9, 3.4770537950354*^9}, {3.4932799754514*^9, 3.4932799779161997`*^9}, { 3.4945558951644*^9, 3.4945558957416*^9}, {3.4957646303032*^9, 3.4957646329084*^9}, {3.497581602118*^9, 3.4975816042552*^9}, { 3.500960505817*^9, 3.5009605094206*^9}, {3.556623836083009*^9, 3.5566238462386265`*^9}, {3.5568725055395393`*^9, 3.5568725163821597`*^9}, {3.556872678728445*^9, 3.5568726810485783`*^9}, { 3.7323376045620503`*^9, 3.7323376086812124`*^9}, {3.7335630623483887`*^9, 3.733563072583865*^9}, {3.733563130246215*^9, 3.733563131355714*^9}, { 3.8175313791665382`*^9, 3.8175313820813637`*^9}, {3.817531489041069*^9, 3.81753151263837*^9}, 3.817531603785071*^9},ExpressionUUID->"4c6109cb-e593-46e3-a139-\ 4669208fc351"], Cell[CellGroupData[{ Cell["CONSTRAINT ELEMENT (disp) defs ", "Subsection", CellChangeTimes->{{3.632187277028809*^9, 3.63218727949695*^9}, 3.632188602208605*^9, {3.632189487917265*^9, 3.6321894914104643`*^9}, { 3.68532054956944*^9, 3.6853205513594418`*^9}, {3.687743079248886*^9, 3.6877430854888954`*^9}, {3.76507863996914*^9, 3.7650786436977797`*^9}, { 3.7880762440580482`*^9, 3.7880762616852336`*^9}, {3.788076337785893*^9, 3.7880763394484987`*^9}, {3.817437563190297*^9, 3.817437574730232*^9}},ExpressionUUID->"8a70552f-e2dc-4412-b5c7-\ 3bd18722cfbc"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MEC", "-", "E1050"}], "|", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1", "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"uX1_", ",", "uY1_", ",", "uZ1_"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Theta]X1_", ",", "\[Theta]Y1_", ",", "\[Theta]Z1_"}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "-", RowBox[{"{", RowBox[{"uX1", ",", "uY1", ",", "uZ1"}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"FX", "[", "n1", "]"}], ",", RowBox[{"FY", "[", "n1", "]"}], ",", RowBox[{"FZ", "[", "n1", "]"}]}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "-", RowBox[{"{", RowBox[{"\[Theta]X1", ",", "\[Theta]Y1", ",", "\[Theta]Z1"}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"MX", "[", "n1", "]"}], ",", RowBox[{"MY", "[", "n1", "]"}], ",", RowBox[{"MZ", "[", "n1", "]"}]}], "}"}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "-", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], RowBox[{ StyleBox["(", "OperatorCharacter"], RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"FX", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}], ",", RowBox[{"FY", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}], ",", RowBox[{"FZ", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}]}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"MX", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}], ",", RowBox[{"MY", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}], ",", RowBox[{"MZ", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}]}], "}"}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FX", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}], ",", RowBox[{"FY", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}], ",", RowBox[{"FZ", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}]}], "}"}], StyleBox["\[Cross]", "OperatorCharacter"], RowBox[{ StyleBox["(", "OperatorCharacter"], RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ")"}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"JOINT", ",", RowBox[{"{", "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"FX", "[", "n1", "]"}], ",", RowBox[{"FY", "[", "n1", "]"}], ",", RowBox[{"FZ", "[", "n1", "]"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"JOINT", ",", RowBox[{"{", RowBox[{"uX1_", ",", "uY1_", ",", "uZ1_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "-", RowBox[{"{", RowBox[{"uX1", ",", "uY1", ",", "uZ1"}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"FX", "[", "n1", "]"}], ",", RowBox[{"FY", "[", "n1", "]"}], ",", RowBox[{"FZ", "[", "n1", "]"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"JOINT", ",", RowBox[{"{", "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"FX", "[", "n1", "]"}], ",", RowBox[{"FY", "[", "n1", "]"}], ",", RowBox[{"FZ", "[", "n1", "]"}]}], "}"}]}], "]"}]}], " ", ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SLIDER", ",", RowBox[{"{", RowBox[{"nX_", ",", "nY_", ",", "nZ_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{"nX", ",", "nY", ",", "nZ"}], "}"}]}], ")"}], "*", RowBox[{"FN", "[", "n1", "]"}]}], "]"}]}], " ", ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.496939383309*^9, 3.4969394213417997`*^9}, { 3.559961640310264*^9, 3.559961656783893*^9}, {3.5599617303692226`*^9, 3.5599617392300377`*^9}, {3.5601312763250604`*^9, 3.5601312794606657`*^9}, {3.5601313134219255`*^9, 3.560131324388745*^9}, { 3.560132497854006*^9, 3.5601324981348066`*^9}, {3.63023183959678*^9, 3.630231884758859*^9}, {3.630649684386073*^9, 3.630649712146661*^9}, { 3.630649747889705*^9, 3.6306497780604305`*^9}, {3.630649843969201*^9, 3.6306501496326838`*^9}, {3.6306501928641567`*^9, 3.630650252234552*^9}, { 3.630650308727783*^9, 3.6306503113519335`*^9}, {3.630650349614122*^9, 3.630650420974203*^9}, {3.630650474367257*^9, 3.630650601725542*^9}, { 3.630651184910898*^9, 3.630651194788463*^9}, {3.6306517131931143`*^9, 3.6306517167213163`*^9}, {3.6306573863011556`*^9, 3.6306574164092083`*^9}, {3.6306574511192694`*^9, 3.630657474862511*^9}, { 3.6306575678542747`*^9, 3.6306576670080485`*^9}, {3.6306577117645273`*^9, 3.6306579038944645`*^9}, {3.630658012221055*^9, 3.630658091874795*^9}, { 3.6306581291432605`*^9, 3.630658226440631*^9}, {3.63065827139991*^9, 3.6306582739115143`*^9}, 3.630658635254949*^9, {3.6306586682178073`*^9, 3.6306586813998303`*^9}, {3.6306590619156985`*^9, 3.630659069606512*^9}, { 3.6321872976489887`*^9, 3.6321873151349883`*^9}, 3.6321874056671667`*^9, { 3.632187463194457*^9, 3.6321878547998557`*^9}, {3.632187889913864*^9, 3.6321878942471123`*^9}, {3.632187976697828*^9, 3.632187979874009*^9}, { 3.6321886111201143`*^9, 3.63218861505834*^9}, {3.632188654528598*^9, 3.6321886640741434`*^9}, {3.632189320010661*^9, 3.632189331931343*^9}, { 3.6853206095995235`*^9, 3.685320631309554*^9}, {3.6853206843496284`*^9, 3.685320754049726*^9}, {3.685320792059779*^9, 3.685320823639823*^9}, { 3.685321020360099*^9, 3.6853211351402597`*^9}, {3.6853211801403227`*^9, 3.685321665981003*^9}, {3.6853216989010487`*^9, 3.6853217094910636`*^9}, { 3.6853217810511637`*^9, 3.6853220138814898`*^9}, {3.6853225388622246`*^9, 3.6853226020023127`*^9}, {3.687743095218909*^9, 3.6877431192189426`*^9}, { 3.687743169079012*^9, 3.687743170319014*^9}, {3.6877432521091285`*^9, 3.68774331760922*^9}, {3.6877433494492645`*^9, 3.6877434507694063`*^9}, { 3.6877434824794507`*^9, 3.687743525179511*^9}, {3.6877442207004843`*^9, 3.68774423869051*^9}, {3.687744273840559*^9, 3.6877443377106485`*^9}, { 3.687744434080783*^9, 3.6877445463509407`*^9}, {3.687744848891364*^9, 3.6877448558313737`*^9}, {3.6877638336712008`*^9, 3.68776389741129*^9}, { 3.687763938681348*^9, 3.6877639455213575`*^9}, {3.6877641776516824`*^9, 3.6877642483817816`*^9}, {3.687764508142145*^9, 3.6877645655122256`*^9}, { 3.687778690246417*^9, 3.687778699786431*^9}, {3.6892208471842775`*^9, 3.6892208613442974`*^9}, {3.6892209340143995`*^9, 3.689220966944445*^9}, { 3.6892211581147127`*^9, 3.689221214324792*^9}, {3.689221265414863*^9, 3.689221335944962*^9}, 3.6892213742150154`*^9, {3.6892214353151007`*^9, 3.689221472385153*^9}, {3.689221514295212*^9, 3.689221800835613*^9}, { 3.6892221753761373`*^9, 3.689222181266145*^9}, 3.689222955217229*^9, { 3.6892232691076684`*^9, 3.689223331877756*^9}, {3.693460221154632*^9, 3.6934602635146914`*^9}, {3.6948453326087465`*^9, 3.6948453439687624`*^9}, {3.7348680727026668`*^9, 3.73486817909155*^9}, { 3.746150241146084*^9, 3.746150271873185*^9}, {3.7530805273958597`*^9, 3.7530805538372126`*^9}, {3.7530806121866155`*^9, 3.753080612619146*^9}, { 3.7530807812083597`*^9, 3.753080855476215*^9}, {3.7530808933957005`*^9, 3.753080928261367*^9}, {3.7530812010856276`*^9, 3.753081304984929*^9}, { 3.753081363847283*^9, 3.753081510980585*^9}, {3.7530830896227846`*^9, 3.7530831670560236`*^9}, {3.753083282189464*^9, 3.753083319143241*^9}, { 3.753083522782399*^9, 3.7530836451470532`*^9}, {3.753083680478052*^9, 3.7530837044483657`*^9}, {3.7530839780537753`*^9, 3.7530840044915133`*^9}, {3.7530841230935698`*^9, 3.7530841439684134`*^9}, {3.753084174787207*^9, 3.753084175438378*^9}, { 3.7531753489377103`*^9, 3.7531753521812167`*^9}, {3.7531753986744366`*^9, 3.753175401639263*^9}, {3.7531757699701395`*^9, 3.7531757819468718`*^9}, { 3.7531758502951393`*^9, 3.753176036147319*^9}, {3.7650793717088127`*^9, 3.765079384414342*^9}, {3.7650794145018706`*^9, 3.7650794160024643`*^9}, { 3.765080191205142*^9, 3.7650801957605696`*^9}, {3.765080316588634*^9, 3.765080334411024*^9}, {3.7650804146979465`*^9, 3.765080452046597*^9}, { 3.7650805125970893`*^9, 3.765080538042729*^9}, {3.7650806025099554`*^9, 3.765080640706174*^9}, {3.765081132572468*^9, 3.765081149288616*^9}, { 3.7843471628441577`*^9, 3.784347230545391*^9}, 3.788076396075549*^9, { 3.7880764597653866`*^9, 3.78807658689421*^9}, {3.7880766192477016`*^9, 3.78807666464567*^9}, 3.790134342393529*^9, {3.81147586433552*^9, 3.8114758660676584`*^9}, {3.8114759011903524`*^9, 3.8114759016633973`*^9}, 3.8114759988439693`*^9, 3.8114761633171883`*^9, {3.816603834074288*^9, 3.8166039336563835`*^9}, {3.8170006770430465`*^9, 3.817000724749156*^9}, { 3.8170007595398445`*^9, 3.817000786405624*^9}, 3.8170037199219055`*^9, { 3.8170045080782423`*^9, 3.8170045294203014`*^9}, {3.81700457884058*^9, 3.81700458306651*^9}, {3.8170046136020584`*^9, 3.8170046363287716`*^9}, { 3.8170054362323685`*^9, 3.817005516642319*^9}, {3.817005553771696*^9, 3.8170057022018414`*^9}, {3.817438004752759*^9, 3.817438079208784*^9}, { 3.8174381095342855`*^9, 3.817438111564824*^9}, {3.817438162423845*^9, 3.81743817388716*^9}, 3.8174382117090836`*^9, 3.8174382843486643`*^9, 3.817438365153536*^9, {3.8174384271840076`*^9, 3.817438431575055*^9}, { 3.817438579668557*^9, 3.8174385809774275`*^9}, {3.817438614371037*^9, 3.817438652378895*^9}, {3.8456995036286135`*^9, 3.845699532708929*^9}}, CellLabel->"In[87]:=",ExpressionUUID->"cf45f3c2-2687-4d02-9504-4a90af5aa24f"] }, Closed]], Cell[CellGroupData[{ Cell["CONSTRAINT ELEMENT (evnt) defs ", "Subsection", CellChangeTimes->{{3.632187277028809*^9, 3.63218727949695*^9}, 3.632188602208605*^9, {3.632189487917265*^9, 3.6321894914104643`*^9}, { 3.68532054956944*^9, 3.6853205513594418`*^9}, {3.687743079248886*^9, 3.6877430854888954`*^9}, {3.76507863996914*^9, 3.7650786436977797`*^9}, { 3.7880762440580482`*^9, 3.7880762616852336`*^9}, {3.788076337785893*^9, 3.7880763394484987`*^9}, {3.817437563190297*^9, 3.817437574730232*^9}, { 3.8174387848423214`*^9, 3.817438785964677*^9}, 3.8431826672012787`*^9},ExpressionUUID->"debcad87-da3a-4e2e-a103-\ 34624f90af84"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNT", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"RIGID", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"RIGID", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNT", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"JOINT", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"JOINT", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNT", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"SLIDER", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SLIDER", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNT", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"CONTACT", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"nX_", ",", "nY_", ",", "nZ_"}], "}"}], ",", "d_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"U", ",", "F", ",", "U0", ",", "dU0", ",", "F0", ",", "dF0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", "events", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"U", "=", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"nX", ",", "nY", ",", "nZ"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], "-", "d"}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{"FN", "[", "n1", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"U0", "=", RowBox[{"U", "/.", "sol0"}]}], ";", RowBox[{"dU0", "=", RowBox[{"D", "[", RowBox[{"U0", ",", "s"}], "]"}]}], ";", RowBox[{"U0", "=", RowBox[{"U0", "/.", RowBox[{"s", "\[Rule]", "s0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"F0", "=", RowBox[{"F", "/.", "sol0"}]}], ";", RowBox[{"dF0", "=", RowBox[{"D", "[", RowBox[{"F0", ",", "s"}], "]"}]}], ";", RowBox[{"F0", "=", RowBox[{"F0", "/.", RowBox[{"s", "\[Rule]", "s0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"{", RowBox[{"U0", ",", "dU0", ",", "F0", ",", "dF0"}], "}"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"pick", " ", "the", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"Which", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"U0", "\[Equal]", "0"}], ")"}], "&&", " ", RowBox[{"(", RowBox[{"F0", ">", "0"}], ")"}]}], ",", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"F", "*", "U"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{"U0", "\[Equal]", "0"}], ")"}], "&&", " ", RowBox[{"(", RowBox[{"F0", "<", "0"}], ")"}]}], ",", RowBox[{ RowBox[{"Print", "[", "\"\\"", "]"}], ";", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"F", "*", "F"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{"F0", "\[Equal]", "0"}], ")"}], "&&", " ", RowBox[{"(", RowBox[{"U0", ">", "0"}], ")"}]}], ",", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"F", "*", "F"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{"F0", "\[Equal]", "0"}], ")"}], "&&", " ", RowBox[{"(", RowBox[{"U0", "<", "0"}], ")"}]}], ",", RowBox[{ RowBox[{"Print", "[", "\"\\"", "]"}], ";", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"F", "*", "U"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{"F0", "\[Equal]", "0"}], ")"}], "&&", " ", RowBox[{"(", RowBox[{"U0", "==", "0"}], ")"}], "&&", " ", RowBox[{"(", RowBox[{"dU0", ">", "0"}], ")"}]}], ",", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"F", "*", "F"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{"F0", "\[Equal]", "0"}], ")"}], "&&", " ", RowBox[{"(", RowBox[{"U0", "==", "0"}], ")"}], "&&", " ", RowBox[{"(", RowBox[{"dU0", "<", "0"}], ")"}]}], ",", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"U", "*", "F"}], "]"}], ",", "True", ",", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"U", "*", "F"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNTPOST", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"CONTACT", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"nX_", ",", "nY_", ",", "nZ_"}], "}"}], ",", "d_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"UF", ",", "k", ",", "UF0", ",", "\[CapitalDelta]s"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", "events", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"UF", "=", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"nX", ",", "nY", ",", "nZ"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], "-", "d"}], ")"}], "+", RowBox[{"FN", "[", "n1", "]"}]}], ")"}], " ", "/.", "sol0"}], " ", "/.", RowBox[{"s", "->", RowBox[{"s0", "+", "\[CapitalDelta]s"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"UF0", "=", RowBox[{"UF", " ", "/.", RowBox[{"\[CapitalDelta]s", "\[Rule]", "0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"k", "=", RowBox[{"D", "[", RowBox[{"UF", ",", "\[CapitalDelta]s"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalDelta]s", "=", RowBox[{"Max", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"k", StyleBox["\[NotEqual]", "OperatorCharacter"], StyleBox["0", "OperatorCharacter"]}], ",", RowBox[{ RowBox[{"-", "UF0"}], "/", "k"}], ",", "0"}], "]"}], ",", "0"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"\[CapitalDelta]s", "\[Equal]", "0"}], ",", RowBox[{"1", "-", "s0"}], ",", "\[CapitalDelta]s"}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.496939383309*^9, 3.4969394213417997`*^9}, { 3.559961640310264*^9, 3.559961656783893*^9}, {3.5599617303692226`*^9, 3.5599617392300377`*^9}, {3.5601312763250604`*^9, 3.5601312794606657`*^9}, {3.5601313134219255`*^9, 3.560131324388745*^9}, { 3.560132497854006*^9, 3.5601324981348066`*^9}, {3.63023183959678*^9, 3.630231884758859*^9}, {3.630649684386073*^9, 3.630649712146661*^9}, { 3.630649747889705*^9, 3.6306497780604305`*^9}, {3.630649843969201*^9, 3.6306501496326838`*^9}, {3.6306501928641567`*^9, 3.630650252234552*^9}, { 3.630650308727783*^9, 3.6306503113519335`*^9}, {3.630650349614122*^9, 3.630650420974203*^9}, {3.630650474367257*^9, 3.630650601725542*^9}, { 3.630651184910898*^9, 3.630651194788463*^9}, {3.6306517131931143`*^9, 3.6306517167213163`*^9}, {3.6306573863011556`*^9, 3.6306574164092083`*^9}, {3.6306574511192694`*^9, 3.630657474862511*^9}, { 3.6306575678542747`*^9, 3.6306576670080485`*^9}, {3.6306577117645273`*^9, 3.6306579038944645`*^9}, {3.630658012221055*^9, 3.630658091874795*^9}, { 3.6306581291432605`*^9, 3.630658226440631*^9}, {3.63065827139991*^9, 3.6306582739115143`*^9}, 3.630658635254949*^9, {3.6306586682178073`*^9, 3.6306586813998303`*^9}, {3.6306590619156985`*^9, 3.630659069606512*^9}, { 3.6321872976489887`*^9, 3.6321873151349883`*^9}, 3.6321874056671667`*^9, { 3.632187463194457*^9, 3.6321878547998557`*^9}, {3.632187889913864*^9, 3.6321878942471123`*^9}, {3.632187976697828*^9, 3.632187979874009*^9}, { 3.6321886111201143`*^9, 3.63218861505834*^9}, {3.632188654528598*^9, 3.6321886640741434`*^9}, {3.632189320010661*^9, 3.632189331931343*^9}, { 3.6853206095995235`*^9, 3.685320631309554*^9}, {3.6853206843496284`*^9, 3.685320754049726*^9}, {3.685320792059779*^9, 3.685320823639823*^9}, { 3.685321020360099*^9, 3.6853211351402597`*^9}, {3.6853211801403227`*^9, 3.685321665981003*^9}, {3.6853216989010487`*^9, 3.6853217094910636`*^9}, { 3.6853217810511637`*^9, 3.6853220138814898`*^9}, {3.6853225388622246`*^9, 3.6853226020023127`*^9}, {3.687743095218909*^9, 3.6877431192189426`*^9}, { 3.687743169079012*^9, 3.687743170319014*^9}, {3.6877432521091285`*^9, 3.68774331760922*^9}, {3.6877433494492645`*^9, 3.6877434507694063`*^9}, { 3.6877434824794507`*^9, 3.687743525179511*^9}, {3.6877442207004843`*^9, 3.68774423869051*^9}, {3.687744273840559*^9, 3.6877443377106485`*^9}, { 3.687744434080783*^9, 3.6877445463509407`*^9}, {3.687744848891364*^9, 3.6877448558313737`*^9}, {3.6877638336712008`*^9, 3.68776389741129*^9}, { 3.687763938681348*^9, 3.6877639455213575`*^9}, {3.6877641776516824`*^9, 3.6877642483817816`*^9}, {3.687764508142145*^9, 3.6877645655122256`*^9}, { 3.687778690246417*^9, 3.687778699786431*^9}, {3.6892208471842775`*^9, 3.6892208613442974`*^9}, {3.6892209340143995`*^9, 3.689220966944445*^9}, { 3.6892211581147127`*^9, 3.689221214324792*^9}, {3.689221265414863*^9, 3.689221335944962*^9}, 3.6892213742150154`*^9, {3.6892214353151007`*^9, 3.689221472385153*^9}, {3.689221514295212*^9, 3.689221800835613*^9}, { 3.6892221753761373`*^9, 3.689222181266145*^9}, 3.689222955217229*^9, { 3.6892232691076684`*^9, 3.689223331877756*^9}, {3.693460221154632*^9, 3.6934602635146914`*^9}, {3.6948453326087465`*^9, 3.6948453439687624`*^9}, {3.7348680727026668`*^9, 3.73486817909155*^9}, { 3.746150241146084*^9, 3.746150271873185*^9}, {3.7530805273958597`*^9, 3.7530805538372126`*^9}, {3.7530806121866155`*^9, 3.753080612619146*^9}, { 3.7530807812083597`*^9, 3.753080855476215*^9}, {3.7530808933957005`*^9, 3.753080928261367*^9}, {3.7530812010856276`*^9, 3.753081304984929*^9}, { 3.753081363847283*^9, 3.753081510980585*^9}, {3.7530830896227846`*^9, 3.7530831670560236`*^9}, {3.753083282189464*^9, 3.753083319143241*^9}, { 3.753083522782399*^9, 3.7530836451470532`*^9}, {3.753083680478052*^9, 3.7530837044483657`*^9}, {3.7530839780537753`*^9, 3.7530840044915133`*^9}, {3.7530841230935698`*^9, 3.7530841439684134`*^9}, {3.753084174787207*^9, 3.753084175438378*^9}, { 3.7531753489377103`*^9, 3.7531753521812167`*^9}, {3.7531753986744366`*^9, 3.753175401639263*^9}, {3.7531757699701395`*^9, 3.7531757819468718`*^9}, { 3.7531758502951393`*^9, 3.753176036147319*^9}, {3.7650793717088127`*^9, 3.765079384414342*^9}, {3.7650794145018706`*^9, 3.7650794160024643`*^9}, { 3.765080191205142*^9, 3.7650801957605696`*^9}, {3.765080316588634*^9, 3.765080334411024*^9}, {3.7650804146979465`*^9, 3.765080452046597*^9}, { 3.7650805125970893`*^9, 3.765080538042729*^9}, {3.7650806025099554`*^9, 3.765080640706174*^9}, {3.765081132572468*^9, 3.765081149288616*^9}, { 3.7843471628441577`*^9, 3.784347230545391*^9}, 3.788076396075549*^9, { 3.7880764597653866`*^9, 3.78807658689421*^9}, {3.7880766192477016`*^9, 3.78807666464567*^9}, 3.790134342393529*^9, {3.81147586433552*^9, 3.8114758660676584`*^9}, {3.8114759011903524`*^9, 3.8114759016633973`*^9}, 3.8114759988439693`*^9, 3.8114761633171883`*^9, {3.816603834074288*^9, 3.8166039336563835`*^9}, {3.8170006770430465`*^9, 3.817000724749156*^9}, { 3.8170007595398445`*^9, 3.817000786405624*^9}, 3.8170037199219055`*^9, { 3.8170045080782423`*^9, 3.8170045294203014`*^9}, {3.81700457884058*^9, 3.81700458306651*^9}, {3.8170046136020584`*^9, 3.8170046363287716`*^9}, { 3.8170054362323685`*^9, 3.817005516642319*^9}, {3.817005553771696*^9, 3.8170057022018414`*^9}, {3.817438004752759*^9, 3.817438079208784*^9}, { 3.8174381095342855`*^9, 3.817438111564824*^9}, {3.817438162423845*^9, 3.81743817388716*^9}, 3.8174382117090836`*^9, 3.8174382843486643`*^9, 3.817438365153536*^9, {3.8174384271840076`*^9, 3.817438431575055*^9}, { 3.817438579668557*^9, 3.8174385809774275`*^9}, {3.817438614371037*^9, 3.817438652378895*^9}, {3.817438930825718*^9, 3.8174390943730135`*^9}, { 3.8174391259139147`*^9, 3.817439141253656*^9}, {3.817521077883604*^9, 3.817521080728553*^9}, {3.8175211772242155`*^9, 3.8175212036088133`*^9}, { 3.8175674512925177`*^9, 3.817567623935768*^9}, {3.8175676609349613`*^9, 3.817567723697788*^9}, {3.817568085932104*^9, 3.8175680987457275`*^9}, { 3.817569108580055*^9, 3.817569117864359*^9}, {3.817569150118846*^9, 3.8175691557258625`*^9}, {3.8176216772973127`*^9, 3.817621692611002*^9}, { 3.8176217285430126`*^9, 3.817621790585905*^9}, {3.817786782380433*^9, 3.8177868741990595`*^9}, {3.8177916370767837`*^9, 3.817791664037953*^9}, 3.8177919725788736`*^9, {3.817797728334919*^9, 3.8177979470877533`*^9}, { 3.817798048009226*^9, 3.8177980720019073`*^9}, {3.8177981782154303`*^9, 3.8177982245972304`*^9}, {3.817874042594287*^9, 3.8178740483145275`*^9}, 3.817874104353353*^9, {3.817874161520626*^9, 3.817874247753765*^9}, { 3.817875812854987*^9, 3.8178758350526857`*^9}, 3.8178759752202544`*^9, { 3.843182718463587*^9, 3.84318273860385*^9}}, CellLabel->"In[94]:=",ExpressionUUID->"78684957-754e-4e50-84ad-586bff8b35b4"] }, Closed]], Cell[CellGroupData[{ Cell["CONSTRAINT ELEMENT (vibr) defs", "Subsection", CellChangeTimes->{{3.632187277028809*^9, 3.63218727949695*^9}, 3.632188602208605*^9, {3.632189487917265*^9, 3.6321894914104643`*^9}, { 3.68532054956944*^9, 3.6853205513594418`*^9}, {3.687743079248886*^9, 3.6877430854888954`*^9}, {3.765078647709998*^9, 3.7650786536233745`*^9}, { 3.787894934272877*^9, 3.787894940030588*^9}, 3.8174375910297575`*^9},ExpressionUUID->"84152048-f45f-40cc-a3f6-\ dc52ab3117f8"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], " ", ".", RowBox[{"{", RowBox[{ RowBox[{"FX", "[", "n1", "]"}], ",", RowBox[{"FY", "[", "n1", "]"}], ",", RowBox[{"FZ", "[", "n1", "]"}]}], "}"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"MX", "[", "n1", "]"}], ",", RowBox[{"MY", "[", "n1", "]"}], ",", RowBox[{"MZ", "[", "n1", "]"}]}], "}"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"uX1_", ",", "uY1_", ",", "uZ1_"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Theta]X1_", ",", "\[Theta]Y1_", ",", "\[Theta]Z1_"}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "-", RowBox[{"{", RowBox[{"uX1", ",", "uY1", ",", "uZ1"}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"FX", "[", "n1", "]"}], ",", RowBox[{"FY", "[", "n1", "]"}], ",", RowBox[{"FZ", "[", "n1", "]"}]}], "}"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "-", RowBox[{"{", RowBox[{"\[Theta]X1", ",", "\[Theta]Y1", ",", "\[Theta]Z1"}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"MX", "[", "n1", "]"}], ",", RowBox[{"MY", "[", "n1", "]"}], ",", RowBox[{"MZ", "[", "n1", "]"}]}], "}"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "-", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], RowBox[{ StyleBox["(", "OperatorCharacter"], RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"FX", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}], ",", RowBox[{"FY", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}], ",", RowBox[{"FZ", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}]}], "}"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"MX", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}], ",", RowBox[{"MY", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}], ",", RowBox[{"MZ", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}]}], "}"}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FX", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}], ",", RowBox[{"FY", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}], ",", RowBox[{"FZ", "[", RowBox[{"{", RowBox[{"n2", ",", "n1"}], "}"}], "]"}]}], "}"}], StyleBox["\[Cross]", "OperatorCharacter"], RowBox[{ StyleBox["(", "OperatorCharacter"], RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ")"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"JOINT", ",", RowBox[{"{", "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"FX", "[", "n1", "]"}], ",", RowBox[{"FY", "[", "n1", "]"}], ",", RowBox[{"FZ", "[", "n1", "]"}]}], "}"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"JOINT", ",", RowBox[{"{", RowBox[{"uX1_", ",", "uY1_", ",", "uZ1_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "-", RowBox[{"{", RowBox[{"uX1", ",", "uY1", ",", "uZ1"}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"FX", "[", "n1", "]"}], ",", RowBox[{"FY", "[", "n1", "]"}], ",", RowBox[{"FZ", "[", "n1", "]"}]}], "}"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"JOINT", ",", RowBox[{"{", "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"FX", "[", "n1", "]"}], ",", RowBox[{"FY", "[", "n1", "]"}], ",", RowBox[{"FZ", "[", "n1", "]"}]}], "}"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}], " ", ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"SLIDER", ",", RowBox[{"{", RowBox[{"nX_", ",", "nY_", ",", "nZ_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{"nX", ",", "nY", ",", "nZ"}], "}"}]}], ")"}], "*", RowBox[{"FN", "[", "n1", "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}], " ", ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.496939383309*^9, 3.4969394213417997`*^9}, { 3.559961640310264*^9, 3.559961656783893*^9}, {3.5599617303692226`*^9, 3.5599617392300377`*^9}, {3.5601312763250604`*^9, 3.5601312794606657`*^9}, {3.5601313134219255`*^9, 3.560131324388745*^9}, { 3.560132497854006*^9, 3.5601324981348066`*^9}, {3.63023183959678*^9, 3.630231884758859*^9}, {3.630649684386073*^9, 3.630649712146661*^9}, { 3.630649747889705*^9, 3.6306497780604305`*^9}, {3.630649843969201*^9, 3.6306501496326838`*^9}, {3.6306501928641567`*^9, 3.630650252234552*^9}, { 3.630650308727783*^9, 3.6306503113519335`*^9}, {3.630650349614122*^9, 3.630650420974203*^9}, {3.630650474367257*^9, 3.630650601725542*^9}, { 3.630651184910898*^9, 3.630651194788463*^9}, {3.6306517131931143`*^9, 3.6306517167213163`*^9}, {3.6306573863011556`*^9, 3.6306574164092083`*^9}, {3.6306574511192694`*^9, 3.630657474862511*^9}, { 3.6306575678542747`*^9, 3.6306576670080485`*^9}, {3.6306577117645273`*^9, 3.6306579038944645`*^9}, {3.630658012221055*^9, 3.630658091874795*^9}, { 3.6306581291432605`*^9, 3.630658226440631*^9}, {3.63065827139991*^9, 3.6306582739115143`*^9}, 3.630658635254949*^9, {3.6306586682178073`*^9, 3.6306586813998303`*^9}, {3.6306590619156985`*^9, 3.630659069606512*^9}, { 3.6321872976489887`*^9, 3.6321873151349883`*^9}, 3.6321874056671667`*^9, { 3.632187463194457*^9, 3.6321878547998557`*^9}, {3.632187889913864*^9, 3.6321878942471123`*^9}, {3.632187976697828*^9, 3.632187979874009*^9}, { 3.6321886111201143`*^9, 3.63218861505834*^9}, {3.632188654528598*^9, 3.6321886640741434`*^9}, {3.632189320010661*^9, 3.632189331931343*^9}, { 3.6853206095995235`*^9, 3.685320631309554*^9}, {3.6853206843496284`*^9, 3.685320754049726*^9}, {3.685320792059779*^9, 3.685320823639823*^9}, { 3.685321020360099*^9, 3.6853211351402597`*^9}, {3.6853211801403227`*^9, 3.685321665981003*^9}, {3.6853216989010487`*^9, 3.6853217094910636`*^9}, { 3.6853217810511637`*^9, 3.6853220138814898`*^9}, {3.6853225388622246`*^9, 3.6853226020023127`*^9}, {3.687743095218909*^9, 3.6877431192189426`*^9}, { 3.687743169079012*^9, 3.687743170319014*^9}, {3.6877432521091285`*^9, 3.68774331760922*^9}, {3.6877433494492645`*^9, 3.6877434507694063`*^9}, { 3.6877434824794507`*^9, 3.687743525179511*^9}, {3.6877442207004843`*^9, 3.68774423869051*^9}, {3.687744273840559*^9, 3.6877443377106485`*^9}, { 3.687744434080783*^9, 3.6877445463509407`*^9}, {3.687744848891364*^9, 3.6877448558313737`*^9}, {3.6877638336712008`*^9, 3.68776389741129*^9}, { 3.687763938681348*^9, 3.6877639455213575`*^9}, {3.6877641776516824`*^9, 3.6877642483817816`*^9}, {3.687764508142145*^9, 3.6877645655122256`*^9}, { 3.687778690246417*^9, 3.687778699786431*^9}, {3.6892208471842775`*^9, 3.6892208613442974`*^9}, {3.6892209340143995`*^9, 3.689220966944445*^9}, { 3.6892211581147127`*^9, 3.689221214324792*^9}, {3.689221265414863*^9, 3.689221335944962*^9}, 3.6892213742150154`*^9, {3.6892214353151007`*^9, 3.689221472385153*^9}, {3.689221514295212*^9, 3.689221800835613*^9}, { 3.6892221753761373`*^9, 3.689222181266145*^9}, 3.689222955217229*^9, { 3.6892232691076684`*^9, 3.689223331877756*^9}, {3.693460221154632*^9, 3.6934602635146914`*^9}, {3.6948453326087465`*^9, 3.6948453439687624`*^9}, {3.7348680727026668`*^9, 3.73486817909155*^9}, { 3.746150241146084*^9, 3.746150271873185*^9}, {3.7530805273958597`*^9, 3.7530805538372126`*^9}, {3.7530806121866155`*^9, 3.753080612619146*^9}, { 3.7530807812083597`*^9, 3.753080855476215*^9}, {3.7530808933957005`*^9, 3.753080928261367*^9}, {3.7530812010856276`*^9, 3.753081304984929*^9}, { 3.753081363847283*^9, 3.753081510980585*^9}, {3.7530830896227846`*^9, 3.7530831670560236`*^9}, {3.753083282189464*^9, 3.753083319143241*^9}, { 3.753083522782399*^9, 3.7530836451470532`*^9}, {3.753083680478052*^9, 3.7530837044483657`*^9}, {3.7530839780537753`*^9, 3.7530840044915133`*^9}, {3.7530841230935698`*^9, 3.7530841439684134`*^9}, {3.753084174787207*^9, 3.753084175438378*^9}, { 3.7531753489377103`*^9, 3.7531753521812167`*^9}, {3.7531753986744366`*^9, 3.753175401639263*^9}, {3.7531757699701395`*^9, 3.7531757819468718`*^9}, { 3.7531758502951393`*^9, 3.753176036147319*^9}, {3.7650786786571007`*^9, 3.765078730242957*^9}, {3.765079011319233*^9, 3.7650790213991427`*^9}, { 3.765079090426065*^9, 3.7650790915198584`*^9}, {3.7880750541013985`*^9, 3.7880751871791787`*^9}, 3.7880763476153545`*^9, {3.7880764088125978`*^9, 3.788076439490058*^9}, {3.788076727654149*^9, 3.788076736195205*^9}, { 3.7880769509878035`*^9, 3.788076996669318*^9}, {3.788157806923176*^9, 3.7881578103397293`*^9}, {3.788157887685897*^9, 3.7881579246081514`*^9}, 3.788166841222316*^9, {3.788245673127977*^9, 3.7882457332638197`*^9}, { 3.7884249270350504`*^9, 3.788424928787249*^9}, {3.796348073487073*^9, 3.796348235983635*^9}, 3.8204695675454354`*^9, 3.8210644461664095`*^9, { 3.8211518525046625`*^9, 3.8211518941528387`*^9}, {3.821151937357603*^9, 3.821152092267825*^9}, {3.8211521441264668`*^9, 3.821152293547024*^9}}, CellLabel->"In[99]:=",ExpressionUUID->"e74b906d-da35-489d-a1fc-1d2f3d3d9be0"] }, Closed]], Cell[CellGroupData[{ Cell["CONSTRAINT ELEMENT (stab) defs ", "Subsection", CellChangeTimes->{{3.632187277028809*^9, 3.63218727949695*^9}, 3.632188602208605*^9, {3.632189487917265*^9, 3.6321894914104643`*^9}, { 3.68532054956944*^9, 3.6853205513594418`*^9}, {3.687743079248886*^9, 3.6877430854888954`*^9}, {3.76507863996914*^9, 3.7650786436977797`*^9}, { 3.7880762440580482`*^9, 3.7880762616852336`*^9}, {3.788076337785893*^9, 3.7880763394484987`*^9}, {3.7890210020583797`*^9, 3.7890210028862896`*^9}, 3.8174375960916395`*^9},ExpressionUUID->"1ebd92d6-229f-45b2-b877-\ 802f0299f5f5"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"RIGID", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"RIGID", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"JOINT", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"JOINT", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"SLIDER", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SLIDER", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.496939383309*^9, 3.4969394213417997`*^9}, { 3.559961640310264*^9, 3.559961656783893*^9}, {3.5599617303692226`*^9, 3.5599617392300377`*^9}, {3.5601312763250604`*^9, 3.5601312794606657`*^9}, {3.5601313134219255`*^9, 3.560131324388745*^9}, { 3.560132497854006*^9, 3.5601324981348066`*^9}, {3.63023183959678*^9, 3.630231884758859*^9}, {3.630649684386073*^9, 3.630649712146661*^9}, { 3.630649747889705*^9, 3.6306497780604305`*^9}, {3.630649843969201*^9, 3.6306501496326838`*^9}, {3.6306501928641567`*^9, 3.630650252234552*^9}, { 3.630650308727783*^9, 3.6306503113519335`*^9}, {3.630650349614122*^9, 3.630650420974203*^9}, {3.630650474367257*^9, 3.630650601725542*^9}, { 3.630651184910898*^9, 3.630651194788463*^9}, {3.6306517131931143`*^9, 3.6306517167213163`*^9}, {3.6306573863011556`*^9, 3.6306574164092083`*^9}, {3.6306574511192694`*^9, 3.630657474862511*^9}, { 3.6306575678542747`*^9, 3.6306576670080485`*^9}, {3.6306577117645273`*^9, 3.6306579038944645`*^9}, {3.630658012221055*^9, 3.630658091874795*^9}, { 3.6306581291432605`*^9, 3.630658226440631*^9}, {3.63065827139991*^9, 3.6306582739115143`*^9}, 3.630658635254949*^9, {3.6306586682178073`*^9, 3.6306586813998303`*^9}, {3.6306590619156985`*^9, 3.630659069606512*^9}, { 3.6321872976489887`*^9, 3.6321873151349883`*^9}, 3.6321874056671667`*^9, { 3.632187463194457*^9, 3.6321878547998557`*^9}, {3.632187889913864*^9, 3.6321878942471123`*^9}, {3.632187976697828*^9, 3.632187979874009*^9}, { 3.6321886111201143`*^9, 3.63218861505834*^9}, {3.632188654528598*^9, 3.6321886640741434`*^9}, {3.632189320010661*^9, 3.632189331931343*^9}, { 3.6853206095995235`*^9, 3.685320631309554*^9}, {3.6853206843496284`*^9, 3.685320754049726*^9}, {3.685320792059779*^9, 3.685320823639823*^9}, { 3.685321020360099*^9, 3.6853211351402597`*^9}, {3.6853211801403227`*^9, 3.685321665981003*^9}, {3.6853216989010487`*^9, 3.6853217094910636`*^9}, { 3.6853217810511637`*^9, 3.6853220138814898`*^9}, {3.6853225388622246`*^9, 3.6853226020023127`*^9}, {3.687743095218909*^9, 3.6877431192189426`*^9}, { 3.687743169079012*^9, 3.687743170319014*^9}, {3.6877432521091285`*^9, 3.68774331760922*^9}, {3.6877433494492645`*^9, 3.6877434507694063`*^9}, { 3.6877434824794507`*^9, 3.687743525179511*^9}, {3.6877442207004843`*^9, 3.68774423869051*^9}, {3.687744273840559*^9, 3.6877443377106485`*^9}, { 3.687744434080783*^9, 3.6877445463509407`*^9}, {3.687744848891364*^9, 3.6877448558313737`*^9}, {3.6877638336712008`*^9, 3.68776389741129*^9}, { 3.687763938681348*^9, 3.6877639455213575`*^9}, {3.6877641776516824`*^9, 3.6877642483817816`*^9}, {3.687764508142145*^9, 3.6877645655122256`*^9}, { 3.687778690246417*^9, 3.687778699786431*^9}, {3.6892208471842775`*^9, 3.6892208613442974`*^9}, {3.6892209340143995`*^9, 3.689220966944445*^9}, { 3.6892211581147127`*^9, 3.689221214324792*^9}, {3.689221265414863*^9, 3.689221335944962*^9}, 3.6892213742150154`*^9, {3.6892214353151007`*^9, 3.689221472385153*^9}, {3.689221514295212*^9, 3.689221800835613*^9}, { 3.6892221753761373`*^9, 3.689222181266145*^9}, 3.689222955217229*^9, { 3.6892232691076684`*^9, 3.689223331877756*^9}, {3.693460221154632*^9, 3.6934602635146914`*^9}, {3.6948453326087465`*^9, 3.6948453439687624`*^9}, {3.7348680727026668`*^9, 3.73486817909155*^9}, { 3.746150241146084*^9, 3.746150271873185*^9}, {3.7530805273958597`*^9, 3.7530805538372126`*^9}, {3.7530806121866155`*^9, 3.753080612619146*^9}, { 3.7530807812083597`*^9, 3.753080855476215*^9}, {3.7530808933957005`*^9, 3.753080928261367*^9}, {3.7530812010856276`*^9, 3.753081304984929*^9}, { 3.753081363847283*^9, 3.753081510980585*^9}, {3.7530830896227846`*^9, 3.7530831670560236`*^9}, {3.753083282189464*^9, 3.753083319143241*^9}, { 3.753083522782399*^9, 3.7530836451470532`*^9}, {3.753083680478052*^9, 3.7530837044483657`*^9}, {3.7530839780537753`*^9, 3.7530840044915133`*^9}, {3.7530841230935698`*^9, 3.7530841439684134`*^9}, {3.753084174787207*^9, 3.753084175438378*^9}, { 3.7531753489377103`*^9, 3.7531753521812167`*^9}, {3.7531753986744366`*^9, 3.753175401639263*^9}, {3.7531757699701395`*^9, 3.7531757819468718`*^9}, { 3.7531758502951393`*^9, 3.753176036147319*^9}, {3.7650793717088127`*^9, 3.765079384414342*^9}, {3.7650794145018706`*^9, 3.7650794160024643`*^9}, { 3.765080191205142*^9, 3.7650801957605696`*^9}, {3.765080316588634*^9, 3.765080334411024*^9}, {3.7650804146979465`*^9, 3.765080452046597*^9}, { 3.7650805125970893`*^9, 3.765080538042729*^9}, {3.7650806025099554`*^9, 3.765080640706174*^9}, {3.765081132572468*^9, 3.765081149288616*^9}, { 3.7843471628441577`*^9, 3.784347230545391*^9}, 3.788076396075549*^9, { 3.7880764597653866`*^9, 3.78807658689421*^9}, {3.7880766192477016`*^9, 3.78807666464567*^9}, {3.7890210098488555`*^9, 3.7890210223821774`*^9}, { 3.7890210765394955`*^9, 3.789021101390154*^9}, {3.821064422910862*^9, 3.821064437263141*^9}, {3.821064504769821*^9, 3.82106453846552*^9}, { 3.82106460185704*^9, 3.821064667240161*^9}, {3.821064704521668*^9, 3.821064854939661*^9}, {3.821064886734498*^9, 3.8210649097711177`*^9}}, CellLabel-> "In[106]:=",ExpressionUUID->"c2d06905-f0f7-4f81-9b5a-214d32163cd5"] }, Closed]], Cell[CellGroupData[{ Cell["CONSTRAINT ELEMENT (nonl) defs ", "Subsection", CellChangeTimes->{{3.632187277028809*^9, 3.63218727949695*^9}, 3.632188602208605*^9, {3.632189487917265*^9, 3.6321894914104643`*^9}, { 3.68532054956944*^9, 3.6853205513594418`*^9}, {3.687743079248886*^9, 3.6877430854888954`*^9}, {3.76507863996914*^9, 3.7650786436977797`*^9}, { 3.7880762440580482`*^9, 3.7880762616852336`*^9}, {3.788076337785893*^9, 3.7880763394484987`*^9}, {3.7890210020583797`*^9, 3.7890210028862896`*^9}, 3.8174375960916395`*^9, {3.8216140745704536`*^9, 3.8216140795088263`*^9}},ExpressionUUID->"52e90378-2725-4be9-8979-\ 7b06a5fd2e8d"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"RIGID", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"RIGID", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"JOINT", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"JOINT", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"SLIDER", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SLIDER", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.496939383309*^9, 3.4969394213417997`*^9}, { 3.559961640310264*^9, 3.559961656783893*^9}, {3.5599617303692226`*^9, 3.5599617392300377`*^9}, {3.5601312763250604`*^9, 3.5601312794606657`*^9}, {3.5601313134219255`*^9, 3.560131324388745*^9}, { 3.560132497854006*^9, 3.5601324981348066`*^9}, {3.63023183959678*^9, 3.630231884758859*^9}, {3.630649684386073*^9, 3.630649712146661*^9}, { 3.630649747889705*^9, 3.6306497780604305`*^9}, {3.630649843969201*^9, 3.6306501496326838`*^9}, {3.6306501928641567`*^9, 3.630650252234552*^9}, { 3.630650308727783*^9, 3.6306503113519335`*^9}, {3.630650349614122*^9, 3.630650420974203*^9}, {3.630650474367257*^9, 3.630650601725542*^9}, { 3.630651184910898*^9, 3.630651194788463*^9}, {3.6306517131931143`*^9, 3.6306517167213163`*^9}, {3.6306573863011556`*^9, 3.6306574164092083`*^9}, {3.6306574511192694`*^9, 3.630657474862511*^9}, { 3.6306575678542747`*^9, 3.6306576670080485`*^9}, {3.6306577117645273`*^9, 3.6306579038944645`*^9}, {3.630658012221055*^9, 3.630658091874795*^9}, { 3.6306581291432605`*^9, 3.630658226440631*^9}, {3.63065827139991*^9, 3.6306582739115143`*^9}, 3.630658635254949*^9, {3.6306586682178073`*^9, 3.6306586813998303`*^9}, {3.6306590619156985`*^9, 3.630659069606512*^9}, { 3.6321872976489887`*^9, 3.6321873151349883`*^9}, 3.6321874056671667`*^9, { 3.632187463194457*^9, 3.6321878547998557`*^9}, {3.632187889913864*^9, 3.6321878942471123`*^9}, {3.632187976697828*^9, 3.632187979874009*^9}, { 3.6321886111201143`*^9, 3.63218861505834*^9}, {3.632188654528598*^9, 3.6321886640741434`*^9}, {3.632189320010661*^9, 3.632189331931343*^9}, { 3.6853206095995235`*^9, 3.685320631309554*^9}, {3.6853206843496284`*^9, 3.685320754049726*^9}, {3.685320792059779*^9, 3.685320823639823*^9}, { 3.685321020360099*^9, 3.6853211351402597`*^9}, {3.6853211801403227`*^9, 3.685321665981003*^9}, {3.6853216989010487`*^9, 3.6853217094910636`*^9}, { 3.6853217810511637`*^9, 3.6853220138814898`*^9}, {3.6853225388622246`*^9, 3.6853226020023127`*^9}, {3.687743095218909*^9, 3.6877431192189426`*^9}, { 3.687743169079012*^9, 3.687743170319014*^9}, {3.6877432521091285`*^9, 3.68774331760922*^9}, {3.6877433494492645`*^9, 3.6877434507694063`*^9}, { 3.6877434824794507`*^9, 3.687743525179511*^9}, {3.6877442207004843`*^9, 3.68774423869051*^9}, {3.687744273840559*^9, 3.6877443377106485`*^9}, { 3.687744434080783*^9, 3.6877445463509407`*^9}, {3.687744848891364*^9, 3.6877448558313737`*^9}, {3.6877638336712008`*^9, 3.68776389741129*^9}, { 3.687763938681348*^9, 3.6877639455213575`*^9}, {3.6877641776516824`*^9, 3.6877642483817816`*^9}, {3.687764508142145*^9, 3.6877645655122256`*^9}, { 3.687778690246417*^9, 3.687778699786431*^9}, {3.6892208471842775`*^9, 3.6892208613442974`*^9}, {3.6892209340143995`*^9, 3.689220966944445*^9}, { 3.6892211581147127`*^9, 3.689221214324792*^9}, {3.689221265414863*^9, 3.689221335944962*^9}, 3.6892213742150154`*^9, {3.6892214353151007`*^9, 3.689221472385153*^9}, {3.689221514295212*^9, 3.689221800835613*^9}, { 3.6892221753761373`*^9, 3.689222181266145*^9}, 3.689222955217229*^9, { 3.6892232691076684`*^9, 3.689223331877756*^9}, {3.693460221154632*^9, 3.6934602635146914`*^9}, {3.6948453326087465`*^9, 3.6948453439687624`*^9}, {3.7348680727026668`*^9, 3.73486817909155*^9}, { 3.746150241146084*^9, 3.746150271873185*^9}, {3.7530805273958597`*^9, 3.7530805538372126`*^9}, {3.7530806121866155`*^9, 3.753080612619146*^9}, { 3.7530807812083597`*^9, 3.753080855476215*^9}, {3.7530808933957005`*^9, 3.753080928261367*^9}, {3.7530812010856276`*^9, 3.753081304984929*^9}, { 3.753081363847283*^9, 3.753081510980585*^9}, {3.7530830896227846`*^9, 3.7530831670560236`*^9}, {3.753083282189464*^9, 3.753083319143241*^9}, { 3.753083522782399*^9, 3.7530836451470532`*^9}, {3.753083680478052*^9, 3.7530837044483657`*^9}, {3.7530839780537753`*^9, 3.7530840044915133`*^9}, {3.7530841230935698`*^9, 3.7530841439684134`*^9}, {3.753084174787207*^9, 3.753084175438378*^9}, { 3.7531753489377103`*^9, 3.7531753521812167`*^9}, {3.7531753986744366`*^9, 3.753175401639263*^9}, {3.7531757699701395`*^9, 3.7531757819468718`*^9}, { 3.7531758502951393`*^9, 3.753176036147319*^9}, {3.7650793717088127`*^9, 3.765079384414342*^9}, {3.7650794145018706`*^9, 3.7650794160024643`*^9}, { 3.765080191205142*^9, 3.7650801957605696`*^9}, {3.765080316588634*^9, 3.765080334411024*^9}, {3.7650804146979465`*^9, 3.765080452046597*^9}, { 3.7650805125970893`*^9, 3.765080538042729*^9}, {3.7650806025099554`*^9, 3.765080640706174*^9}, {3.765081132572468*^9, 3.765081149288616*^9}, { 3.7843471628441577`*^9, 3.784347230545391*^9}, 3.788076396075549*^9, { 3.7880764597653866`*^9, 3.78807658689421*^9}, {3.7880766192477016`*^9, 3.78807666464567*^9}, {3.7890210098488555`*^9, 3.7890210223821774`*^9}, { 3.7890210765394955`*^9, 3.789021101390154*^9}, {3.821064422910862*^9, 3.821064437263141*^9}, {3.821064504769821*^9, 3.82106453846552*^9}, { 3.82106460185704*^9, 3.821064667240161*^9}, {3.821064704521668*^9, 3.821064854939661*^9}, {3.821064886734498*^9, 3.8210649097711177`*^9}, { 3.8216140898940353`*^9, 3.821614102548308*^9}}, CellLabel-> "In[109]:=",ExpressionUUID->"0390560e-402e-48e0-8f5c-8df6e7f0b902"] }, Closed]], Cell[CellGroupData[{ Cell["CONSTRAINT ELEMENT (tmec) defs ", "Subsection", CellChangeTimes->{{3.632187277028809*^9, 3.63218727949695*^9}, 3.632188602208605*^9, {3.632189487917265*^9, 3.6321894914104643`*^9}, { 3.68532054956944*^9, 3.6853205513594418`*^9}, {3.687743079248886*^9, 3.6877430854888954`*^9}, {3.76507863996914*^9, 3.7650786436977797`*^9}, { 3.7880762440580482`*^9, 3.7880762616852336`*^9}, {3.788076337785893*^9, 3.7880763394484987`*^9}, {3.7890210020583797`*^9, 3.7890210028862896`*^9}, 3.8174375960916395`*^9, {3.8216140745704536`*^9, 3.8216140795088263`*^9}, { 3.8223694156960897`*^9, 3.8223694175391617`*^9}},ExpressionUUID->"6c376952-fac1-4159-879c-\ 013113f73a28"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"TMEC", ",", RowBox[{"{", RowBox[{"RIGID", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"RIGID", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"TMEC", ",", RowBox[{"{", RowBox[{"JOINT", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"JOINT", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"TMEC", ",", RowBox[{"{", RowBox[{"SLIDER", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SLIDER", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.496939383309*^9, 3.4969394213417997`*^9}, { 3.559961640310264*^9, 3.559961656783893*^9}, {3.5599617303692226`*^9, 3.5599617392300377`*^9}, {3.5601312763250604`*^9, 3.5601312794606657`*^9}, {3.5601313134219255`*^9, 3.560131324388745*^9}, { 3.560132497854006*^9, 3.5601324981348066`*^9}, {3.63023183959678*^9, 3.630231884758859*^9}, {3.630649684386073*^9, 3.630649712146661*^9}, { 3.630649747889705*^9, 3.6306497780604305`*^9}, {3.630649843969201*^9, 3.6306501496326838`*^9}, {3.6306501928641567`*^9, 3.630650252234552*^9}, { 3.630650308727783*^9, 3.6306503113519335`*^9}, {3.630650349614122*^9, 3.630650420974203*^9}, {3.630650474367257*^9, 3.630650601725542*^9}, { 3.630651184910898*^9, 3.630651194788463*^9}, {3.6306517131931143`*^9, 3.6306517167213163`*^9}, {3.6306573863011556`*^9, 3.6306574164092083`*^9}, {3.6306574511192694`*^9, 3.630657474862511*^9}, { 3.6306575678542747`*^9, 3.6306576670080485`*^9}, {3.6306577117645273`*^9, 3.6306579038944645`*^9}, {3.630658012221055*^9, 3.630658091874795*^9}, { 3.6306581291432605`*^9, 3.630658226440631*^9}, {3.63065827139991*^9, 3.6306582739115143`*^9}, 3.630658635254949*^9, {3.6306586682178073`*^9, 3.6306586813998303`*^9}, {3.6306590619156985`*^9, 3.630659069606512*^9}, { 3.6321872976489887`*^9, 3.6321873151349883`*^9}, 3.6321874056671667`*^9, { 3.632187463194457*^9, 3.6321878547998557`*^9}, {3.632187889913864*^9, 3.6321878942471123`*^9}, {3.632187976697828*^9, 3.632187979874009*^9}, { 3.6321886111201143`*^9, 3.63218861505834*^9}, {3.632188654528598*^9, 3.6321886640741434`*^9}, {3.632189320010661*^9, 3.632189331931343*^9}, { 3.6853206095995235`*^9, 3.685320631309554*^9}, {3.6853206843496284`*^9, 3.685320754049726*^9}, {3.685320792059779*^9, 3.685320823639823*^9}, { 3.685321020360099*^9, 3.6853211351402597`*^9}, {3.6853211801403227`*^9, 3.685321665981003*^9}, {3.6853216989010487`*^9, 3.6853217094910636`*^9}, { 3.6853217810511637`*^9, 3.6853220138814898`*^9}, {3.6853225388622246`*^9, 3.6853226020023127`*^9}, {3.687743095218909*^9, 3.6877431192189426`*^9}, { 3.687743169079012*^9, 3.687743170319014*^9}, {3.6877432521091285`*^9, 3.68774331760922*^9}, {3.6877433494492645`*^9, 3.6877434507694063`*^9}, { 3.6877434824794507`*^9, 3.687743525179511*^9}, {3.6877442207004843`*^9, 3.68774423869051*^9}, {3.687744273840559*^9, 3.6877443377106485`*^9}, { 3.687744434080783*^9, 3.6877445463509407`*^9}, {3.687744848891364*^9, 3.6877448558313737`*^9}, {3.6877638336712008`*^9, 3.68776389741129*^9}, { 3.687763938681348*^9, 3.6877639455213575`*^9}, {3.6877641776516824`*^9, 3.6877642483817816`*^9}, {3.687764508142145*^9, 3.6877645655122256`*^9}, { 3.687778690246417*^9, 3.687778699786431*^9}, {3.6892208471842775`*^9, 3.6892208613442974`*^9}, {3.6892209340143995`*^9, 3.689220966944445*^9}, { 3.6892211581147127`*^9, 3.689221214324792*^9}, {3.689221265414863*^9, 3.689221335944962*^9}, 3.6892213742150154`*^9, {3.6892214353151007`*^9, 3.689221472385153*^9}, {3.689221514295212*^9, 3.689221800835613*^9}, { 3.6892221753761373`*^9, 3.689222181266145*^9}, 3.689222955217229*^9, { 3.6892232691076684`*^9, 3.689223331877756*^9}, {3.693460221154632*^9, 3.6934602635146914`*^9}, {3.6948453326087465`*^9, 3.6948453439687624`*^9}, {3.7348680727026668`*^9, 3.73486817909155*^9}, { 3.746150241146084*^9, 3.746150271873185*^9}, {3.7530805273958597`*^9, 3.7530805538372126`*^9}, {3.7530806121866155`*^9, 3.753080612619146*^9}, { 3.7530807812083597`*^9, 3.753080855476215*^9}, {3.7530808933957005`*^9, 3.753080928261367*^9}, {3.7530812010856276`*^9, 3.753081304984929*^9}, { 3.753081363847283*^9, 3.753081510980585*^9}, {3.7530830896227846`*^9, 3.7530831670560236`*^9}, {3.753083282189464*^9, 3.753083319143241*^9}, { 3.753083522782399*^9, 3.7530836451470532`*^9}, {3.753083680478052*^9, 3.7530837044483657`*^9}, {3.7530839780537753`*^9, 3.7530840044915133`*^9}, {3.7530841230935698`*^9, 3.7530841439684134`*^9}, {3.753084174787207*^9, 3.753084175438378*^9}, { 3.7531753489377103`*^9, 3.7531753521812167`*^9}, {3.7531753986744366`*^9, 3.753175401639263*^9}, {3.7531757699701395`*^9, 3.7531757819468718`*^9}, { 3.7531758502951393`*^9, 3.753176036147319*^9}, {3.7650793717088127`*^9, 3.765079384414342*^9}, {3.7650794145018706`*^9, 3.7650794160024643`*^9}, { 3.765080191205142*^9, 3.7650801957605696`*^9}, {3.765080316588634*^9, 3.765080334411024*^9}, {3.7650804146979465`*^9, 3.765080452046597*^9}, { 3.7650805125970893`*^9, 3.765080538042729*^9}, {3.7650806025099554`*^9, 3.765080640706174*^9}, {3.765081132572468*^9, 3.765081149288616*^9}, { 3.7843471628441577`*^9, 3.784347230545391*^9}, 3.788076396075549*^9, { 3.7880764597653866`*^9, 3.78807658689421*^9}, {3.7880766192477016`*^9, 3.78807666464567*^9}, {3.7890210098488555`*^9, 3.7890210223821774`*^9}, { 3.7890210765394955`*^9, 3.789021101390154*^9}, {3.821064422910862*^9, 3.821064437263141*^9}, {3.821064504769821*^9, 3.82106453846552*^9}, { 3.82106460185704*^9, 3.821064667240161*^9}, {3.821064704521668*^9, 3.821064854939661*^9}, {3.821064886734498*^9, 3.8210649097711177`*^9}, { 3.8216140898940353`*^9, 3.821614102548308*^9}, {3.8223694278575764`*^9, 3.8223694427926483`*^9}}, CellLabel-> "In[112]:=",ExpressionUUID->"19da0d15-9e3f-4b43-a6a1-61ae362f6205"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["BEAM MODEL", "Section", CellChangeTimes->{ 3.4430806364968*^9, {3.4453166713873997`*^9, 3.4453166747414*^9}, { 3.447462264275*^9, 3.4474622644154*^9}, {3.4695731321116*^9, 3.4695731359491997`*^9}, 3.473055186341*^9, {3.4730552472860003`*^9, 3.47305524884*^9}, {3.473055399782*^9, 3.473055419801*^9}, { 3.4734696760778*^9, 3.4734697047349997`*^9}, {3.4770537891542*^9, 3.4770537950354*^9}, {3.4932799754514*^9, 3.4932799779161997`*^9}, { 3.4945558951644*^9, 3.4945558957416*^9}, {3.4957646303032*^9, 3.4957646329084*^9}, {3.497581602118*^9, 3.4975816042552*^9}, { 3.500960505817*^9, 3.5009605094206*^9}, {3.556623836083009*^9, 3.5566238462386265`*^9}, {3.5568725055395393`*^9, 3.5568725163821597`*^9}, {3.556872678728445*^9, 3.5568726810485783`*^9}, { 3.7323376045620503`*^9, 3.7323376086812124`*^9}, {3.7335630623483887`*^9, 3.733563072583865*^9}, {3.733563130246215*^9, 3.733563131355714*^9}, { 3.8175314748809648`*^9, 3.817531482757032*^9}, {3.8175315215912895`*^9, 3.817531523916857*^9}, 3.8175315939049935`*^9},ExpressionUUID->"54f083a4-e547-4438-9570-\ 056f2caae5e6"], Cell[CellGroupData[{ Cell["BAR ELEMENT (disp) defs", "Subsection", InitializationCell->True, CellChangeTimes->{{3.753018875511382*^9, 3.7530188786265306`*^9}, { 3.7878946919412775`*^9, 3.7878946924724035`*^9}, 3.7878949434473147`*^9},ExpressionUUID->"0c0f521b-0eb3-40c7-95da-\ df289d6a1d5f"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MEC", "-", "E1050"}], "|", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", "AA_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE", "}"}], ",", RowBox[{"{", "AA", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", "AA_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "ix0", ",", "ux", ",", "\[Delta]ux", ",", "EE1", ",", "EE2", ",", "EE3", ",", "AA1", ",", "AA2", ",", "AA3", ",", "fx1", ",", "fx2", ",", "fx3", ",", "nl", ",", "rule"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "i_", "]"}], ":=", RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"nl", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]ux", "[", "i_", "]"}], ":=", RowBox[{"\[Delta]", "[", RowBox[{"ux", "[", "i", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"rule", " ", ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_", ",", "a3_"}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3"}], "}"}]}], ",", RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", RowBox[{ RowBox[{"(", RowBox[{"a1", "+", "a2"}], ")"}], "/", "2"}], ",", "a2"}], "}"}]}], ",", RowBox[{"a1_", "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", "a1", ",", "a1"}], "}"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"EE1", ",", "EE2", ",", "EE3"}], "}"}], "=", RowBox[{"EE", " ", "/.", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"AA1", ",", "AA2", ",", "AA3"}], "}"}], "=", RowBox[{"AA", " ", "/.", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"fx1", ",", "fx2", ",", "fx3"}], "}"}], "=", RowBox[{"ix0", ".", RowBox[{"{", RowBox[{ RowBox[{"fX", " ", "/.", "rule"}], ",", RowBox[{"fY", " ", "/.", "rule"}], ",", RowBox[{"fZ", " ", "/.", "rule"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ FractionBox["1", RowBox[{"30", " ", SuperscriptBox["h0", "2"]}]], RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"AA1", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "EE1"}], "+", RowBox[{"2", " ", "EE2"}], "-", "EE3"}], ")"}]}], "+", RowBox[{"2", " ", "AA2", " ", RowBox[{"(", RowBox[{"EE1", "+", RowBox[{"8", " ", "EE2"}], "+", "EE3"}], ")"}]}], "+", RowBox[{"AA3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "EE1"}], "+", RowBox[{"2", " ", "EE2"}], "+", RowBox[{"4", " ", "EE3"}]}], ")"}]}]}], ")"}]}], " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"ux", "[", "1", "]"}]}], "+", RowBox[{"ux", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"5", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"fx1", " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"fx3", " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"2", " ", "fx2", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", "AA_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE", "}"}], ",", RowBox[{"{", "AA", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", "AA_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "ix0", ",", "ux", ",", "\[Delta]ux", ",", "EE1", ",", "EE2", ",", "EE3", ",", "AA1", ",", "AA2", ",", "AA3", ",", "fx1", ",", "fx2", ",", "fx3", ",", "nl", ",", "rule"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", " ", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n3", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "i_", "]"}], ":=", RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"nl", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]ux", "[", "i_", "]"}], ":=", RowBox[{"\[Delta]", "[", RowBox[{"ux", "[", "i", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"rule", " ", ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_", ",", "a3_"}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3"}], "}"}]}], ",", RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", RowBox[{ RowBox[{"(", RowBox[{"a1", "+", "a2"}], ")"}], "/", "2"}], ",", "a2"}], "}"}]}], ",", RowBox[{"a1_", "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", "a1", ",", "a1"}], "}"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"EE1", ",", "EE2", ",", "EE3"}], "}"}], "=", RowBox[{"EE", " ", "/.", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"AA1", ",", "AA2", ",", "AA3"}], "}"}], "=", RowBox[{"AA", " ", "/.", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"fx1", ",", "fx2", ",", "fx3"}], "}"}], "=", RowBox[{"ix0", ".", RowBox[{"{", RowBox[{ RowBox[{"fX", " ", "/.", "rule"}], ",", RowBox[{"fY", " ", "/.", "rule"}], ",", RowBox[{"fZ", " ", "/.", "rule"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"-", FractionBox["1", RowBox[{"210", " ", "h0"}]]}], RowBox[{"(", RowBox[{ RowBox[{"7", " ", "fx3", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"184", " ", "AA1", " ", "EE1", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"94", " ", "AA2", " ", "EE1", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"19", " ", "AA3", " ", "EE1", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"94", " ", "AA1", " ", "EE2", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"176", " ", "AA2", " ", "EE2", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"18", " ", "AA3", " ", "EE2", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"19", " ", "AA1", " ", "EE3", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"18", " ", "AA2", " ", "EE3", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"16", " ", "AA3", " ", "EE3", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"228", " ", "AA1", " ", "EE1", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"104", " ", "AA2", " ", "EE1", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"24", " ", "AA3", " ", "EE1", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"104", " ", "AA1", " ", "EE2", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"128", " ", "AA2", " ", "EE2", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"8", " ", "AA3", " ", "EE2", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"24", " ", "AA1", " ", "EE3", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"8", " ", "AA2", " ", "EE3", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"60", " ", "AA3", " ", "EE3", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"44", " ", "AA1", " ", "EE1", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"10", " ", "AA2", " ", "EE1", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"5", " ", "AA3", " ", "EE1", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"10", " ", "AA1", " ", "EE2", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"48", " ", "AA2", " ", "EE2", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"10", " ", "AA3", " ", "EE2", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"5", " ", "AA1", " ", "EE3", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"10", " ", "AA2", " ", "EE3", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"44", " ", "AA3", " ", "EE3", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"14", " ", "fx3", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "-", RowBox[{"228", " ", "AA1", " ", "EE1", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "-", RowBox[{"104", " ", "AA2", " ", "EE1", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"24", " ", "AA3", " ", "EE1", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "-", RowBox[{"104", " ", "AA1", " ", "EE2", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "-", RowBox[{"128", " ", "AA2", " ", "EE2", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"8", " ", "AA3", " ", "EE2", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"24", " ", "AA1", " ", "EE3", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"8", " ", "AA2", " ", "EE3", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "-", RowBox[{"60", " ", "AA3", " ", "EE3", " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"288", " ", "AA1", " ", "EE1", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"96", " ", "AA2", " ", "EE1", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "-", RowBox[{"48", " ", "AA3", " ", "EE1", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"96", " ", "AA1", " ", "EE2", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"256", " ", "AA2", " ", "EE2", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"96", " ", "AA3", " ", "EE2", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "-", RowBox[{"48", " ", "AA1", " ", "EE3", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"96", " ", "AA2", " ", "EE3", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"288", " ", "AA3", " ", "EE3", " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "-", RowBox[{"60", " ", "AA1", " ", "EE1", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"8", " ", "AA2", " ", "EE1", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"24", " ", "AA3", " ", "EE1", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"8", " ", "AA1", " ", "EE2", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "-", RowBox[{"128", " ", "AA2", " ", "EE2", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "-", RowBox[{"104", " ", "AA3", " ", "EE2", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"24", " ", "AA1", " ", "EE3", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "-", RowBox[{"104", " ", "AA2", " ", "EE3", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "-", RowBox[{"228", " ", "AA3", " ", "EE3", " ", RowBox[{"ux", "[", "3", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "28"}], " ", "fx3", " ", SuperscriptBox["h0", "2"]}], "+", RowBox[{"AA1", " ", RowBox[{"(", RowBox[{ RowBox[{"44", " ", "EE1", " ", RowBox[{"ux", "[", "1", "]"}]}], "+", RowBox[{"10", " ", "EE2", " ", RowBox[{"ux", "[", "1", "]"}]}], "-", RowBox[{"5", " ", "EE3", " ", RowBox[{"ux", "[", "1", "]"}]}], "-", RowBox[{"60", " ", "EE1", " ", RowBox[{"ux", "[", "2", "]"}]}], "+", RowBox[{"8", " ", "EE2", " ", RowBox[{"ux", "[", "2", "]"}]}], "+", RowBox[{"24", " ", "EE3", " ", RowBox[{"ux", "[", "2", "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"16", " ", "EE1"}], "-", RowBox[{"18", " ", "EE2"}], "-", RowBox[{"19", " ", "EE3"}]}], ")"}], " ", RowBox[{"ux", "[", "3", "]"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "AA2", " ", RowBox[{"(", RowBox[{ RowBox[{"5", " ", "EE1", " ", RowBox[{"ux", "[", "1", "]"}]}], "-", RowBox[{"24", " ", "EE2", " ", RowBox[{"ux", "[", "1", "]"}]}], "+", RowBox[{"5", " ", "EE3", " ", RowBox[{"ux", "[", "1", "]"}]}], "+", RowBox[{"4", " ", "EE1", " ", RowBox[{"ux", "[", "2", "]"}]}], "-", RowBox[{"64", " ", "EE2", " ", RowBox[{"ux", "[", "2", "]"}]}], "-", RowBox[{"52", " ", "EE3", " ", RowBox[{"ux", "[", "2", "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "9"}], " ", "EE1"}], "+", RowBox[{"88", " ", "EE2"}], "+", RowBox[{"47", " ", "EE3"}]}], ")"}], " ", RowBox[{"ux", "[", "3", "]"}]}]}], ")"}]}], "+", RowBox[{"AA3", " ", RowBox[{"(", RowBox[{ RowBox[{"EE1", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "5"}], " ", RowBox[{"ux", "[", "1", "]"}]}], "+", RowBox[{"24", " ", RowBox[{"ux", "[", "2", "]"}]}], "-", RowBox[{"19", " ", RowBox[{"ux", "[", "3", "]"}]}]}], ")"}]}], "+", RowBox[{"2", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE3", " ", RowBox[{"(", RowBox[{ RowBox[{"11", " ", RowBox[{"ux", "[", "1", "]"}]}], "-", RowBox[{"57", " ", RowBox[{"ux", "[", "2", "]"}]}], "+", RowBox[{"46", " ", RowBox[{"ux", "[", "3", "]"}]}]}], ")"}]}], "+", RowBox[{"EE2", " ", RowBox[{"(", RowBox[{ RowBox[{"5", " ", RowBox[{"ux", "[", "1", "]"}]}], "-", RowBox[{"52", " ", RowBox[{"ux", "[", "2", "]"}]}], "+", RowBox[{"47", " ", RowBox[{"ux", "[", "3", "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"\[Delta]ux", "[", "3", "]"}]}], "+", RowBox[{"7", " ", "fx1", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "-", RowBox[{"2", " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"\[Delta]ux", "[", "3", "]"}]}], ")"}]}], "-", RowBox[{"14", " ", "fx2", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "+", RowBox[{"8", " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"\[Delta]ux", "[", "3", "]"}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781671264558541*^9, 3.7816712751556396`*^9}, { 3.7816715257512035`*^9, 3.781671526206021*^9}, 3.781671612475748*^9, { 3.781672177985033*^9, 3.7816722548545895`*^9}, {3.7816755757937236`*^9, 3.7816756936745577`*^9}, 3.781675873086305*^9, {3.7816761808096905`*^9, 3.7816762075777946`*^9}, {3.788077170199604*^9, 3.7880772443461285`*^9}, 3.8175324221718016`*^9, {3.817532645653172*^9, 3.817532680712221*^9}, { 3.8200248875082335`*^9, 3.8200249266511517`*^9}, 3.8200249735130763`*^9, { 3.8217742761087155`*^9, 3.821774333135168*^9}, {3.821774750423011*^9, 3.8217747610558224`*^9}, {3.8217747912447248`*^9, 3.8217749904455633`*^9}, {3.8217750368892345`*^9, 3.8217752594972935`*^9}, {3.8217752941944513`*^9, 3.8217753660612097`*^9}, {3.843624690905726*^9, 3.843624714964343*^9}, { 3.843625137403534*^9, 3.8436253106688747`*^9}, {3.8436254114664454`*^9, 3.843625482254491*^9}, {3.8436258314013753`*^9, 3.843625832963335*^9}, { 3.84362587330585*^9, 3.8436258882972155`*^9}, {3.843625938953411*^9, 3.8436259929118633`*^9}}, CellLabel-> "In[115]:=",ExpressionUUID->"0cb3af68-a57d-4559-920b-e008c5bf0a0d"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "iy_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE", "}"}], ",", RowBox[{"{", "AA", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE", "}"}], ",", RowBox[{"{", "AA", "}"}], ",", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", "AA_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "ix0", ",", "iz0", ",", "ux", ",", "\[Delta]ux", ",", "EE1", ",", "EE2", ",", "EE3", ",", "AA1", ",", "AA2", ",", "AA3", ",", "fx", ",", "fx1", ",", "fx2", ",", "fx3", ",", "nl", ",", "rule"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "i_", "]"}], ":=", RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"nl", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]ux", "[", "i_", "]"}], ":=", RowBox[{"\[Delta]", "[", RowBox[{"ux", "[", "i", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"rule", " ", ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_", ",", "a3_"}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3"}], "}"}]}], ",", RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", RowBox[{ RowBox[{"(", RowBox[{"a1", "+", "a2"}], ")"}], "/", "2"}], ",", "a2"}], "}"}]}], ",", RowBox[{"a1_", "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", "a1", ",", "a1"}], "}"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"fx", " ", "=", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"EE1", ",", "EE2", ",", "EE3"}], "}"}], "=", RowBox[{"EE", " ", "/.", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"AA1", ",", "AA2", ",", "AA3"}], "}"}], "=", RowBox[{"AA", " ", "/.", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"fx1", ",", "fx2", ",", "fx3"}], "}"}], "=", RowBox[{"fx", " ", "/.", "rule"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ FractionBox["1", RowBox[{"30", " ", SuperscriptBox["h0", "2"]}]], RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"AA1", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "EE1"}], "+", RowBox[{"2", " ", "EE2"}], "-", "EE3"}], ")"}]}], "+", RowBox[{"2", " ", "AA2", " ", RowBox[{"(", RowBox[{"EE1", "+", RowBox[{"8", " ", "EE2"}], "+", "EE3"}], ")"}]}], "+", RowBox[{"AA3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "EE1"}], "+", RowBox[{"2", " ", "EE2"}], "+", RowBox[{"4", " ", "EE3"}]}], ")"}]}]}], ")"}]}], " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"ux", "[", "1", "]"}]}], "+", RowBox[{"ux", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"5", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"fx1", " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"fx3", " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"2", " ", "fx2", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", "AA_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "ix0", ",", "ux", ",", "\[Delta]ux", ",", "\[Delta]Wint", ",", "\[Delta]Wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "1", "]"}], "=", RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "2", "]"}], "=", RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"ux", "[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]ux", "[", "2", "]"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"ux", "[", "2", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]Wint", "=", RowBox[{ RowBox[{"-", "AA"}], " ", RowBox[{"EE", "/", "h0"}], " ", "*", RowBox[{"(", RowBox[{ RowBox[{"ux", "[", "1", "]"}], "-", RowBox[{"ux", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "-", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]Wext", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "*", RowBox[{"h0", "/", "2"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]Wint", "+", "\[Delta]Wext"}]}]}], "]"}]}], ";"}]}]}]], "Input", CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781671264558541*^9, 3.7816712751556396`*^9}, { 3.7816715257512035`*^9, 3.781671526206021*^9}, 3.781671612475748*^9, { 3.781672177985033*^9, 3.7816722548545895`*^9}, {3.7816755757937236`*^9, 3.7816756936745577`*^9}, 3.781675873086305*^9, {3.7816761808096905`*^9, 3.7816762075777946`*^9}, {3.788077170199604*^9, 3.7880772443461285`*^9}, 3.8175324221718016`*^9, {3.817532645653172*^9, 3.817532680712221*^9}, { 3.8200248875082335`*^9, 3.8200249266511517`*^9}, 3.8200249735130763`*^9, { 3.8217742761087155`*^9, 3.821774333135168*^9}, {3.821774750423011*^9, 3.8217747610558224`*^9}, {3.8217747912447248`*^9, 3.8217749904455633`*^9}, {3.8217750368892345`*^9, 3.8217752594972935`*^9}, {3.8217752941944513`*^9, 3.8217753660612097`*^9}, {3.843624690905726*^9, 3.843624714964343*^9}, { 3.843625137403534*^9, 3.8436253106688747`*^9}, {3.8436254114664454`*^9, 3.843625482254491*^9}, {3.8436258314013753`*^9, 3.843625832963335*^9}, { 3.84362587330585*^9, 3.8436258882972155`*^9}, {3.843625938953411*^9, 3.843626019323427*^9}},ExpressionUUID->"0ffd5e57-8dc5-4855-813b-\ c367bea097ca"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"GENERICBAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", "A_", "}"}], ",", RowBox[{"{", "fx_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "NN", ",", "\[Xi]", ",", "r", ",", "r\[Xi]", ",", "h0", ",", "i\[Xi]", ",", "s", ",", "x", ",", "uu", ",", "\[Delta]uu", ",", "F", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", " ", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"Length", "[", "node", "]"}], ",", "\[Xi]"}], "}"}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"mapping", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"\[Xi]", "*", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"Last", "[", "node", "]"}], ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"First", "[", "node", "]"}], ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Xi]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "r"}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r\[Xi]", ".", "r\[Xi]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"i\[Xi]", " ", "=", RowBox[{"r\[Xi]", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"s", "=", RowBox[{"i\[Xi]", " ", ".", "r"}]}], ";", "\[IndentingNewLine]", RowBox[{"x", "=", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"First", "[", "node", "]"}], ",", "1"}], "]"}], "]"}], ".", "i\[Xi]"}], "+", "s"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"(*", "approximation", "*)"}], "\[IndentingNewLine]", RowBox[{"uu", "=", " ", RowBox[{"i\[Xi]", ".", RowBox[{"(", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "resultant"}], "*)"}], "\[IndentingNewLine]", RowBox[{"F", " ", "=", RowBox[{ RowBox[{"EE", "[", "x", "]"}], "*", RowBox[{"A", "[", "x", "]"}], " ", "*", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "uu"}], "/", "h0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "uu"}], "/", "h0"}], "]"}]}], "*", "F"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uu", "]"}], "*", RowBox[{"fx", "[", "x", "]"}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Integrate", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "h0"}], ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "0", ",", "1"}], "}"}]}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781671264558541*^9, 3.7816712751556396`*^9}, { 3.7816715257512035`*^9, 3.781671526206021*^9}, 3.781671612475748*^9, { 3.781672177985033*^9, 3.7816722548545895`*^9}, {3.7816755757937236`*^9, 3.7816756936745577`*^9}, 3.781675873086305*^9, {3.7816761808096905`*^9, 3.7816762075777946`*^9}, {3.788077170199604*^9, 3.7880772443461285`*^9}, 3.8175324221718016`*^9, {3.817532645653172*^9, 3.817532680712221*^9}, { 3.8200248875082335`*^9, 3.8200249266511517`*^9}, 3.8200249735130763`*^9, 3.820025011696958*^9},ExpressionUUID->"e175473f-ea66-4d0e-ac6e-\ cad27683bdb0"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"NEW", " ", "DEFS"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"RECTANGLE", "[", RowBox[{"ly_", ",", "lz_"}], "]"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"RECTANGLE", "[", RowBox[{"ly", ",", "lz", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"RECTANGLE", "[", RowBox[{"ly_", ",", "lz_"}], "]"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"RECTANGLE", "[", RowBox[{"ly", ",", "lz", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"RECTANGLE", "[", RowBox[{"ly_", ",", "lz_"}], "]"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{"ly", ",", "lz", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"RECTANGLE", "[", RowBox[{"ly_", ",", "lz_", ",", "iy_"}], "]"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "ix0", ",", "ux", ",", "\[Delta]ux", ",", "EE1", ",", "EE2", ",", "EE3", ",", "AA1", ",", "AA2", ",", "AA3", ",", "fx1", ",", "fx2", ",", "fx3", ",", "nl", ",", "rule"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "i_", "]"}], ":=", RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"nl", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]ux", "[", "i_", "]"}], ":=", RowBox[{"\[Delta]", "[", RowBox[{"ux", "[", "i", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"rule", " ", ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_", ",", "a3_"}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3"}], "}"}]}], ",", RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", RowBox[{ RowBox[{"(", RowBox[{"a1", "+", "a2"}], ")"}], "/", "2"}], ",", "a2"}], "}"}]}], ",", RowBox[{"a1_", "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", "a1", ",", "a1"}], "}"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"EE1", ",", "EE2", ",", "EE3"}], "}"}], "=", RowBox[{"EE", " ", "/.", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"AA1", ",", "AA2", ",", "AA3"}], "}"}], "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}]}], "&"}], ",", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"ly", "/.", "rule"}], ",", RowBox[{"lz", "/.", "rule"}]}], "}"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"fx1", ",", "fx2", ",", "fx3"}], "}"}], "=", " ", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"#", ".", "ix0"}], "&"}], ",", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"fX", "/.", "rule"}], ",", RowBox[{"fY", "/.", "rule"}], ",", RowBox[{"fZ", "/.", "rule"}]}], "}"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ FractionBox["1", RowBox[{"30", " ", SuperscriptBox["h0", "2"]}]], RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"AA1", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "EE1"}], "+", RowBox[{"2", " ", "EE2"}], "-", "EE3"}], ")"}]}], "+", RowBox[{"2", " ", "AA2", " ", RowBox[{"(", RowBox[{"EE1", "+", RowBox[{"8", " ", "EE2"}], "+", "EE3"}], ")"}]}], "+", RowBox[{"AA3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "EE1"}], "+", RowBox[{"2", " ", "EE2"}], "+", RowBox[{"4", " ", "EE3"}]}], ")"}]}]}], ")"}]}], " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"ux", "[", "1", "]"}]}], "+", RowBox[{"ux", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"5", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"fx1", " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"fx3", " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"2", " ", "fx2", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"circle", " ", "cross"}], "-", "section"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"CIRCLE", "[", "d_", "]"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"CIRCLE", "[", RowBox[{"d", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"CIRCLE", "[", "d_", "]"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"CIRCLE", "[", RowBox[{"d", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"CIRCLE", "[", "d_", "]"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"CIRCLE", "[", RowBox[{"d", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"CIRCLE", "[", RowBox[{"d_", ",", "iy_"}], "]"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "ix0", ",", "ux", ",", "\[Delta]ux", ",", "EE1", ",", "EE2", ",", "EE3", ",", "AA1", ",", "AA2", ",", "AA3", ",", "fx1", ",", "fx2", ",", "fx3", ",", "nl", ",", "rule"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "i_", "]"}], ":=", RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"nl", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]ux", "[", "i_", "]"}], ":=", RowBox[{"\[Delta]", "[", RowBox[{"ux", "[", "i", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"rule", " ", ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_", ",", "a3_"}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3"}], "}"}]}], ",", RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", RowBox[{ RowBox[{"(", RowBox[{"a1", "+", "a2"}], ")"}], "/", "2"}], ",", "a2"}], "}"}]}], ",", RowBox[{"a1_", "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", "a1", ",", "a1"}], "}"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"EE1", ",", "EE2", ",", "EE3"}], "}"}], "=", RowBox[{"EE", " ", "/.", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"AA1", ",", "AA2", ",", "AA3"}], "}"}], "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Pi", "/", "4"}], "*", RowBox[{"#", "^", "2"}]}], "&"}], ",", RowBox[{"d", "/.", "rule"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"fx1", ",", "fx2", ",", "fx3"}], "}"}], "=", " ", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"#", ".", "ix0"}], "&"}], ",", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"fX", "/.", "rule"}], ",", RowBox[{"fY", "/.", "rule"}], ",", RowBox[{"fZ", "/.", "rule"}]}], "}"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ FractionBox["1", RowBox[{"30", " ", SuperscriptBox["h0", "2"]}]], RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"AA1", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "EE1"}], "+", RowBox[{"2", " ", "EE2"}], "-", "EE3"}], ")"}]}], "+", RowBox[{"2", " ", "AA2", " ", RowBox[{"(", RowBox[{"EE1", "+", RowBox[{"8", " ", "EE2"}], "+", "EE3"}], ")"}]}], "+", RowBox[{"AA3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "EE1"}], "+", RowBox[{"2", " ", "EE2"}], "+", RowBox[{"4", " ", "EE3"}]}], ")"}]}]}], ")"}]}], " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"ux", "[", "1", "]"}]}], "+", RowBox[{"ux", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"5", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"fx1", " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"fx3", " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"2", " ", "fx2", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}]}]}]], "Input", CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781671264558541*^9, 3.7816712751556396`*^9}, { 3.7816715257512035`*^9, 3.781671526206021*^9}, 3.781671612475748*^9, { 3.781672177985033*^9, 3.7816722548545895`*^9}, {3.7816755757937236`*^9, 3.7816756936745577`*^9}, 3.781675873086305*^9, {3.7816761808096905`*^9, 3.7816762075777946`*^9}, {3.788077170199604*^9, 3.7880772443461285`*^9}, 3.8175324221718016`*^9, {3.817532645653172*^9, 3.817532680712221*^9}, { 3.8200248875082335`*^9, 3.8200249266511517`*^9}, 3.8200249735130763`*^9, 3.820025011696958*^9},ExpressionUUID->"4b8af7ff-6d80-42d3-88c9-\ 80eeb1ea0d36"] }, Closed]], Cell[CellGroupData[{ Cell["BAR ELEMENT (evnt) defs", "Subsection", InitializationCell->True, CellChangeTimes->{{3.753018875511382*^9, 3.7530188786265306`*^9}, { 3.7878946919412775`*^9, 3.7878946924724035`*^9}, 3.7878949434473147`*^9, { 3.817439189246712*^9, 3.8174391911071873`*^9}, 3.8431828238589272`*^9},ExpressionUUID->"0f83a6ca-7317-47e0-bd58-\ 1d0cefab53c2"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNT", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"BAR", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781671264558541*^9, 3.7816712751556396`*^9}, { 3.7816715257512035`*^9, 3.781671526206021*^9}, 3.781671612475748*^9, { 3.781672177985033*^9, 3.7816722548545895`*^9}, {3.7816755757937236`*^9, 3.7816756936745577`*^9}, 3.781675873086305*^9, {3.7816761808096905`*^9, 3.7816762075777946`*^9}, {3.788077170199604*^9, 3.7880772443461285`*^9}, { 3.817439204000356*^9, 3.8174392066998005`*^9}, {3.817439295580332*^9, 3.817439307456877*^9}, 3.817521235605838*^9, 3.843182831518036*^9}, CellLabel-> "In[119]:=",ExpressionUUID->"6542c2af-84f4-49b1-a896-7e7109492be5"] }, Closed]], Cell[CellGroupData[{ Cell["BAR ELEMENT (vibr) defs", "Subsection", InitializationCell->True, CellChangeTimes->{{3.7530188810407906`*^9, 3.753018884630788*^9}, { 3.7878946971705894`*^9, 3.7878946984332533`*^9}, 3.787894946958498*^9},ExpressionUUID->"25fa91a7-f41b-4c5f-80db-\ 51a36e371564"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "AA_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", "AA", "}"}], ",", RowBox[{"{", "0", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "AA_", "}"}], ",", RowBox[{"{", "fx_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "ix0", ",", "ux", ",", "\[Delta]ux", ",", "EE1", ",", "EE2", ",", "EE3", ",", "AA1", ",", "AA2", ",", "AA3", ",", "fx1", ",", "fx2", ",", "fx3", ",", "nl", ",", "rule"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], "=", RowBox[{ RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], "=", RowBox[{ RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], "=", RowBox[{ RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], "=", RowBox[{ RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ FractionBox["1", RowBox[{"6", " ", "h0"}]], RowBox[{"(", RowBox[{ RowBox[{"3", " ", "fx", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{"AA", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["h0", "2"], " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.753019452689951*^9, 3.753019484970434*^9}, {3.7530196011509657`*^9, 3.753019673352596*^9}, {3.753019831211974*^9, 3.75301989711664*^9}, 3.7530200045416303`*^9, {3.7885030525030107`*^9, 3.7885030592759047`*^9}, { 3.818904755546356*^9, 3.8189048128461294`*^9}, 3.820024775397682*^9}, CellLabel-> "In[120]:=",ExpressionUUID->"0325f1b0-6271-4d26-ae61-69e920e4fb38"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"GENERICBAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "AA_", "}"}], ",", RowBox[{"{", "ff_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "NN", ",", "\[Xi]", ",", "r", ",", "r\[Xi]", ",", "h0", ",", "i\[Xi]", ",", "s", ",", "x", ",", "uu", ",", "u0", ",", "u2", ",", "\[Delta]uu", ",", "F", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wine", ",", "AAA", ",", "EEE", ",", "\[Rho]\[Rho]\[Rho]", ",", "fff"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", " ", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"Length", "[", "node", "]"}], ",", "\[Xi]"}], "}"}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"mapping", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"\[Xi]", "*", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"Last", "[", "node", "]"}], ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"First", "[", "node", "]"}], ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Xi]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "r"}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r\[Xi]", ".", "r\[Xi]"}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"i\[Xi]", " ", "=", RowBox[{"r\[Xi]", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"s", "=", RowBox[{"i\[Xi]", " ", ".", "r"}]}], ";", "\[IndentingNewLine]", RowBox[{"x", "=", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"First", "[", "node", "]"}], ",", "1"}], "]"}], "]"}], ".", "i\[Xi]"}], "+", "s"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"(*", "approximation", "*)"}], "\[IndentingNewLine]", RowBox[{"uu", "=", " ", RowBox[{"i\[Xi]", ".", RowBox[{"(", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"u0", "=", " ", RowBox[{"uu", "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"u2", "=", " ", RowBox[{"uu", " ", "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "resultant"}], "*)"}], "\[IndentingNewLine]", RowBox[{"F", " ", "=", RowBox[{ RowBox[{"EE", "[", "x", "]"}], " ", RowBox[{"AA", "[", "x", "]"}], " ", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "u0"}], "/", "h0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "u0"}], "/", "h0"}], "]"}]}], " ", "F"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "u0", "]"}], " ", RowBox[{"ff", "[", "x", "]"}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wine", "=", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]", "[", "u0", "]"}]}], " ", RowBox[{"\[Rho]\[Rho]", "[", "x", "]"}], " ", RowBox[{"AA", "[", "x", "]"}], " ", "u2"}]}], ";", "\[IndentingNewLine]", RowBox[{"Integrate", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wine"}], ")"}], "*", "h0"}], ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "0", ",", "1"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.753019452689951*^9, 3.753019484970434*^9}, {3.7530196011509657`*^9, 3.753019673352596*^9}, {3.753019831211974*^9, 3.75301989711664*^9}, 3.7530200045416303`*^9, {3.7885030525030107`*^9, 3.7885030592759047`*^9}, { 3.818904755546356*^9, 3.8189048128461294`*^9}, 3.820024775397682*^9},ExpressionUUID->"5ceb03b1-241f-4252-809c-\ 3d9733aaf892"] }, Closed]], Cell[CellGroupData[{ Cell["BAR ELEMENT (stab) defs ", "Subsection", InitializationCell->True, CellChangeTimes->{{3.753018875511382*^9, 3.7530188786265306`*^9}, { 3.756267607734783*^9, 3.756267609945469*^9}, 3.7878947030333853`*^9},ExpressionUUID->"25330b3c-1c67-4ecf-a350-\ 259919d8b277"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", "AA_", "}"}], ",", RowBox[{"{", "fx_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE", "}"}], ",", RowBox[{"{", "AA", "}"}], ",", RowBox[{"{", "fx", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.7562676525896635`*^9, 3.756267707097726*^9}, {3.7606671297197995`*^9, 3.7606671693669567`*^9}, {3.7885030281334577`*^9, 3.78850303141934*^9}, { 3.7885030692138157`*^9, 3.7885030730711346`*^9}, {3.7888331112134047`*^9, 3.788833121736215*^9}, 3.7890211201729145`*^9}, CellLabel-> "In[122]:=",ExpressionUUID->"12db8b42-d2e3-4c2e-81a4-6bd17081bd31"] }, Closed]], Cell[CellGroupData[{ Cell["BAR ELEMENT (nonl) defs ", "Subsection", InitializationCell->True, CellChangeTimes->{{3.7530188810407906`*^9, 3.753018884630788*^9}, { 3.753019375620509*^9, 3.753019378557259*^9}, {3.787894723689047*^9, 3.7878947246772313`*^9}},ExpressionUUID->"1ae58f4d-7917-4290-b99f-\ 0ab85e83fa50"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "CC_", "}"}], ",", RowBox[{"{", "AA_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "CC", "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "CC_", "}"}], ",", RowBox[{"{", "AA_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "CC", "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "CC_", "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "iy_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "CC", "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "iy"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "CC_", "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[CapitalDelta]h", ",", "h0", ",", "ix", ",", "iz", ",", "NN", ",", "fx", ",", "fy", ",", "fz", ",", "x", ",", "uu", ",", "vv", ",", "ww", ",", "EE", ",", "\[Delta]EE", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[CapitalDelta]h", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"\[CapitalDelta]h", ".", "\[CapitalDelta]h"}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix", "=", RowBox[{"\[CapitalDelta]h", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", "=", RowBox[{"ix", StyleBox["\[Cross]", "OperatorCharacter"], StyleBox["iy", "OperatorCharacter"]}]}], StyleBox[";", "OperatorCharacter"], "\[IndentingNewLine]", RowBox[{"NN", "=", " ", RowBox[{"{", RowBox[{ RowBox[{"1", "-", RowBox[{"x", "/", "h0"}]}], ",", RowBox[{"x", "/", "h0"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"fx", " ", "=", RowBox[{"ix", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"fy", " ", "=", RowBox[{"iy", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"fz", " ", "=", RowBox[{"iz", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"uu", "=", " ", RowBox[{"NN", ".", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix"}], ",", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], "}"}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"vv", "=", " ", RowBox[{"NN", ".", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy"}], ",", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"ww", "=", " ", RowBox[{"NN", ".", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz"}], ",", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"EE", "=", " ", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "uu"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "x"], "uu"}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "x"], "vv"}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "x"], "ww"}], ")"}], "^", "2"}]}], ")"}], "/", "2"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]EE", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "x"], "uu"}], "]"}], "+", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "uu"}], " ", RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "x"], "uu"}], "]"}]}], "+", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "vv"}], " ", RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "x"], "vv"}], "]"}]}], "+", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "ww"}], " ", RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "x"], "ww"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", "\[Delta]EE"}], " ", "CC", " ", "AA", " ", "EE"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", "uu", "]"}], " ", "fx"}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "vv", "]"}], " ", "fy"}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "ww", "]"}], " ", "fz"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"Integrate", "[", RowBox[{ RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "h0"}], "}"}]}], "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, 3.753020083991325*^9, {3.7530201458865404`*^9, 3.753020147585074*^9}, { 3.7894406851054068`*^9, 3.7894406982798967`*^9}, {3.789456736272064*^9, 3.789456831643631*^9}, {3.8216141464350357`*^9, 3.821614249465634*^9}, { 3.8217727479052997`*^9, 3.8217727798972683`*^9}, {3.8217728196181326`*^9, 3.821772858846867*^9}, {3.8217733416981835`*^9, 3.8217733490574265`*^9}}, CellLabel-> "In[123]:=",ExpressionUUID->"308bd0fb-ea03-4640-b505-509a7e3ec1df"] }, Closed]], Cell[CellGroupData[{ Cell["BAR ELEMENT (tmec) defs ", "Subsection", InitializationCell->True, CellChangeTimes->{{3.7530188810407906`*^9, 3.753018884630788*^9}, { 3.753019375620509*^9, 3.753019378557259*^9}, {3.7530200248509674`*^9, 3.7530200339415607`*^9}, 3.7575039589097877`*^9, {3.7878947510437098`*^9, 3.7878947515126114`*^9}, 3.7901298129642305`*^9},ExpressionUUID->"ac6b7c15-d796-423a-8eaf-\ cb24e82eeabc"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"TMEC", ",", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Alpha]\[Alpha]_", ",", "kk_"}], "}"}], ",", RowBox[{"{", "AA_", "}"}], ",", RowBox[{"{", RowBox[{"ff_", ",", "ss_", ",", "\[CurlyTheta]0_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "NN", ",", "\[Xi]", ",", "r", ",", "r\[Xi]", ",", "h0", ",", "i\[Xi]", ",", "s", ",", "x", ",", "uu", ",", "\[CurlyTheta]\[CurlyTheta]", ",", "F", ",", "Q", ",", "\[Delta]w", ",", "\[Delta]p", ",", "AAA", ",", "EEE", ",", "fff", ",", "kkk", ",", "sss", ",", "\[Alpha]\[Alpha]\[Alpha]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", " ", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"Length", "[", "node", "]"}], ",", "\[Xi]"}], "}"}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"mapping", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"\[Xi]", "*", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"Last", "[", "node", "]"}], ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"First", "[", "node", "]"}], ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Xi]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "r"}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r\[Xi]", ".", "r\[Xi]"}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"i\[Xi]", " ", "=", RowBox[{"r\[Xi]", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"s", "=", RowBox[{"i\[Xi]", " ", ".", "r"}]}], ";", "\[IndentingNewLine]", RowBox[{"x", "=", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"First", "[", "node", "]"}], ",", "1"}], "]"}], "]"}], ".", "i\[Xi]"}], "+", "s"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", "approximation", "*)"}], "\[IndentingNewLine]", RowBox[{"uu", "=", " ", RowBox[{"i\[Xi]", ".", RowBox[{"(", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CurlyTheta]\[CurlyTheta]", "=", " ", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "4"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "resultant"}], "*)"}], "\[IndentingNewLine]", RowBox[{"AAA", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "AA", "]"}], "===", "Function"}], ",", RowBox[{"AA", "[", "x", "]"}], ",", "AA"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEE", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "EE", "]"}], "===", "Function"}], ",", RowBox[{"EE", "[", "x", "]"}], ",", "EE"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Alpha]\[Alpha]\[Alpha]", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "\[Alpha]\[Alpha]", "]"}], "===", "Function"}], ",", RowBox[{"\[Alpha]\[Alpha]", "[", "x", "]"}], ",", "\[Alpha]\[Alpha]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"kkk", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "kk", "]"}], "===", "Function"}], ",", RowBox[{"kk", "[", "x", "]"}], ",", "kk"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"fff", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "ff", "]"}], "===", "Function"}], ",", RowBox[{"ff", "[", "x", "]"}], ",", "ff"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sss", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "ss", "]"}], "===", "Function"}], ",", RowBox[{"ss", "[", "x", "]"}], ",", "ss"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"F", " ", "=", RowBox[{"EEE", " ", "AAA", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "uu"}], "/", "h0"}], "-", RowBox[{"\[Alpha]\[Alpha]\[Alpha]", " ", RowBox[{"(", RowBox[{"\[CurlyTheta]\[CurlyTheta]", "-", "\[CurlyTheta]0"}], ")"}]}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Q", "=", RowBox[{ RowBox[{"-", "kkk"}], " ", "AAA", " ", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "\[CurlyTheta]\[CurlyTheta]"}], "/", "h0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]w", "=", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "uu"}], "/", "h0"}], "]"}]}], " ", "F"}], "+", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "uu", "]"}], " ", "fff"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]p", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "\[CurlyTheta]\[CurlyTheta]"}], "/", "h0"}], "]"}], " ", "Q"}], " ", "+", RowBox[{ RowBox[{ "\[Delta]\[Delta]", "[", "\[CurlyTheta]\[CurlyTheta]", "]"}], " ", "sss"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Integrate", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"\[Delta]w", "+", "\[Delta]p"}], ")"}], " ", "h0"}], ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "0", ",", "1"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, 3.7530202209165316`*^9, {3.7898060059373465`*^9, 3.7898060199153595`*^9}, { 3.8223694609291615`*^9, 3.8223694626206393`*^9}}, CellLabel-> "In[127]:=",ExpressionUUID->"b401ad7f-c7ae-4ce1-a7d0-5b714e4a4746"] }, Closed]], Cell[CellGroupData[{ Cell["TORSION ELEMENT (disp) defs", "Subsection", InitializationCell->True, CellChangeTimes->{{3.753018875511382*^9, 3.7530188786265306`*^9}, { 3.781589886623744*^9, 3.7815898932426767`*^9}, {3.7878947601549573`*^9, 3.787894760728943*^9}, 3.7878948945295725`*^9},ExpressionUUID->"6705bf0f-ad49-4a74-b56c-\ 0d42d9cfb8fb"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", "E1050"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "GG_", "}"}], ",", RowBox[{"{", "JJ_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "GG", "}"}], ",", RowBox[{"{", "JJ", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "GG_", "}"}], ",", RowBox[{"{", "JJ_", "}"}], ",", RowBox[{"{", RowBox[{"mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "ix0", ",", "\[Theta]x", ",", "\[Delta]\[Theta]x", ",", "GG1", ",", "GG2", ",", "GG3", ",", "JJ1", ",", "JJ2", ",", "JJ3", ",", "mx1", ",", "mx2", ",", "mx3", ",", "nl", ",", "rule"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]x", "[", "i_", "]"}], ":=", RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"nl", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "i_", "]"}], ":=", RowBox[{"\[Delta]", "[", RowBox[{"\[Theta]x", "[", "i", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"rule", " ", ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_", ",", "a3_"}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3"}], "}"}]}], ",", RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", RowBox[{ RowBox[{"(", RowBox[{"a1", "+", "a2"}], ")"}], "/", "2"}], ",", "a2"}], "}"}]}], ",", RowBox[{"a1_", "\[Rule]", RowBox[{"{", RowBox[{"a1", ",", "a1", ",", "a1"}], "}"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"GG1", ",", "GG2", ",", "GG3"}], "}"}], "=", RowBox[{"GG", "/.", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"JJ1", ",", "JJ2", ",", "JJ3"}], "}"}], "=", RowBox[{"JJ", " ", "/.", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"mx1", ",", "mx2", ",", "mx3"}], "}"}], "=", RowBox[{"ix0", ".", RowBox[{"{", RowBox[{ RowBox[{"mX", " ", "/.", "rule"}], ",", RowBox[{"mY", " ", "/.", "rule"}], ",", RowBox[{"mZ", " ", "/.", "rule"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ FractionBox["1", RowBox[{"30", " ", SuperscriptBox["h0", "2"]}]], RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"JJ1", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "GG1"}], "+", RowBox[{"2", " ", "GG2"}], "-", "GG3"}], ")"}]}], "+", RowBox[{"2", " ", "JJ2", " ", RowBox[{"(", RowBox[{"GG1", "+", RowBox[{"8", " ", "GG2"}], "+", "GG3"}], ")"}]}], "+", RowBox[{"JJ3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "GG1"}], "+", RowBox[{"2", " ", "GG2"}], "+", RowBox[{"4", " ", "GG3"}]}], ")"}]}]}], ")"}]}], " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"\[Theta]x", "[", "1", "]"}]}], "+", RowBox[{"\[Theta]x", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}]}], "+", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"5", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"mx1", " ", RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}]}], "+", RowBox[{"mx3", " ", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}]}], "+", RowBox[{"2", " ", "mx2", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], "+", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781589928213842*^9, 3.781590052438653*^9}, { 3.7815900898176003`*^9, 3.781590109307678*^9}, {3.781590201383393*^9, 3.7815902433873234`*^9}, {3.7815905445265956`*^9, 3.781590569573782*^9}, { 3.7815906952864275`*^9, 3.781590715680611*^9}, {3.7815908323678637`*^9, 3.781590881239719*^9}, {3.7815911048122363`*^9, 3.781591119274813*^9}, { 3.8175324830973916`*^9, 3.817532552103792*^9}, {3.843704806259609*^9, 3.843704863557214*^9}, {3.8437049017363043`*^9, 3.8437049180939226`*^9}}, CellLabel-> "In[128]:=",ExpressionUUID->"58c0cf67-d568-43df-a47a-d6a484b58379"] }, Closed]], Cell[CellGroupData[{ Cell["TORSION ELEMENT (evnt) defs", "Subsection", InitializationCell->True, CellChangeTimes->{{3.753018875511382*^9, 3.7530188786265306`*^9}, { 3.781589886623744*^9, 3.7815898932426767`*^9}, {3.7878947601549573`*^9, 3.787894760728943*^9}, 3.7878948945295725`*^9, {3.817439343565061*^9, 3.8174393448082724`*^9}, 3.8431828477515774`*^9},ExpressionUUID->"3376c320-e494-46bf-b16d-\ fd120eb52a1c"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNT", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"TORSION", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"TORSION", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781589928213842*^9, 3.781590052438653*^9}, { 3.7815900898176003`*^9, 3.781590109307678*^9}, {3.781590201383393*^9, 3.7815902433873234`*^9}, {3.7815905445265956`*^9, 3.781590569573782*^9}, { 3.7815906952864275`*^9, 3.781590715680611*^9}, {3.7815908323678637`*^9, 3.781590881239719*^9}, {3.7815911048122363`*^9, 3.781591119274813*^9}, { 3.817439386305109*^9, 3.8174394287787733`*^9}, 3.81752126940705*^9, 3.8431828427789755`*^9}, CellLabel-> "In[130]:=",ExpressionUUID->"9f0cc23e-c7e3-4816-981c-62eacc75215f"] }, Closed]], Cell[CellGroupData[{ Cell["TORSION ELEMENT (vibr) defs", "Subsection", InitializationCell->True, CellChangeTimes->{{3.753018875511382*^9, 3.7530188786265306`*^9}, { 3.781589886623744*^9, 3.7815898932426767`*^9}, {3.7878947601549573`*^9, 3.787894760728943*^9}, 3.7878948945295725`*^9, {3.78815413936168*^9, 3.788154140564639*^9}},ExpressionUUID->"e505a055-6236-49ba-88bc-\ 9b4075b4f240"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MEC", "-", "E1050"}], "|", RowBox[{"8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "JJ_", "}"}], ",", RowBox[{"{", "mx_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "ix0", ",", "\[Theta]x", ",", "\[Delta]\[Theta]x", ",", "rule"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "=", RowBox[{ RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}], "=", RowBox[{ RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], "=", RowBox[{ RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}], "=", RowBox[{ RowBox[{"ix0", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ FractionBox["1", RowBox[{"6", " ", "h0"}]], RowBox[{"(", RowBox[{ RowBox[{"3", " ", "mx", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{"JJ", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["h0", "2"], " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781589928213842*^9, 3.781590052438653*^9}, { 3.7815900898176003`*^9, 3.781590109307678*^9}, {3.781590201383393*^9, 3.7815902433873234`*^9}, {3.7815905445265956`*^9, 3.781590569573782*^9}, { 3.7815906952864275`*^9, 3.781590715680611*^9}, {3.7815908323678637`*^9, 3.781590881239719*^9}, {3.7815911048122363`*^9, 3.781591119274813*^9}, { 3.788154182393029*^9, 3.7881542008707867`*^9}, {3.788154262468212*^9, 3.788154413095205*^9}, {3.788154445865172*^9, 3.7881544989994373`*^9}, { 3.788154543552347*^9, 3.788154583606308*^9}}, CellLabel-> "In[131]:=",ExpressionUUID->"39cecadb-96f8-4479-b5c7-019becb2b201"] }, Closed]], Cell[CellGroupData[{ Cell["TORSION ELEMENT (stab) defs", "Subsection", InitializationCell->True, CellChangeTimes->{{3.753018875511382*^9, 3.7530188786265306`*^9}, { 3.781589886623744*^9, 3.7815898932426767`*^9}, {3.7878947601549573`*^9, 3.787894760728943*^9}, 3.7878948945295725`*^9, {3.7890211428141956`*^9, 3.7890211435642633`*^9}},ExpressionUUID->"f96e1dd6-07a7-4ad7-acd3-\ cc1da94b096e"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "GG_", "}"}], ",", RowBox[{"{", "JJ_", "}"}], ",", RowBox[{"{", "mx_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "GG", "}"}], ",", RowBox[{"{", "JJ", "}"}], ",", RowBox[{"{", "mx", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781589928213842*^9, 3.781590052438653*^9}, { 3.7815900898176003`*^9, 3.781590109307678*^9}, {3.781590201383393*^9, 3.7815902433873234`*^9}, {3.7815905445265956`*^9, 3.781590569573782*^9}, { 3.7815906952864275`*^9, 3.781590715680611*^9}, {3.7815908323678637`*^9, 3.781590881239719*^9}, {3.7815911048122363`*^9, 3.781591119274813*^9}, { 3.789021170161874*^9, 3.7890212153743477`*^9}}, CellLabel-> "In[132]:=",ExpressionUUID->"02e84c34-68cc-4422-9a0f-4fcb555fe128"] }, Closed]], Cell[CellGroupData[{ Cell["TORSION ELEMENT (nonl) defs", "Subsection", InitializationCell->True, CellChangeTimes->{{3.753018875511382*^9, 3.7530188786265306`*^9}, { 3.781589886623744*^9, 3.7815898932426767`*^9}, {3.7878947601549573`*^9, 3.787894760728943*^9}, 3.7878948945295725`*^9, {3.7890211428141956`*^9, 3.7890211435642633`*^9}, {3.8216143327381015`*^9, 3.8216143387229114`*^9}},ExpressionUUID->"6fa600ec-bd9f-4db3-8ba7-\ a6ead366e9e4"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"TORSION", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"TORSION", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781589928213842*^9, 3.781590052438653*^9}, { 3.7815900898176003`*^9, 3.781590109307678*^9}, {3.781590201383393*^9, 3.7815902433873234`*^9}, {3.7815905445265956`*^9, 3.781590569573782*^9}, { 3.7815906952864275`*^9, 3.781590715680611*^9}, {3.7815908323678637`*^9, 3.781590881239719*^9}, {3.7815911048122363`*^9, 3.781591119274813*^9}, { 3.789021170161874*^9, 3.7890212153743477`*^9}, {3.8216143478699703`*^9, 3.821614443850371*^9}}, CellLabel-> "In[133]:=",ExpressionUUID->"1129d375-9937-4b0c-a8b4-b496026881e0"] }, Closed]], Cell[CellGroupData[{ Cell["BEAM ELEMENT (disp 0) defs ", "Subsection", CellChangeTimes->{{3.7530187996679964`*^9, 3.753018803413909*^9}, { 3.7633629633672647`*^9, 3.763362967100765*^9}, {3.787894773214689*^9, 3.7878947881941814`*^9}, {3.78789485671918*^9, 3.78789488217928*^9}, 3.7885197052606735`*^9, {3.788530025907043*^9, 3.7885300287809105`*^9}, 3.7885306781716957`*^9, {3.8200271989371843`*^9, 3.8200272016625395`*^9}, { 3.8200274346181693`*^9, 3.8200274405428553`*^9}},ExpressionUUID->"01b5306e-a024-43d3-a64b-\ 7daaf3bdba65"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MEC", "-", "E1050"}], "|", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", "iy0"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "mX", ",", "mY", ",", "mZ"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "ux", ",", "uy", " ", ",", "uz", " ", ",", "\[Theta]x", " ", ",", "\[Theta]y", " ", ",", "\[Theta]z", " ", ",", "\[Delta]ux", " ", ",", "\[Delta]uy", ",", "\[Delta]uz", ",", "\[Delta]\[Theta]x", ",", "\[Delta]\[Theta]y", ",", "\[Delta]\[Theta]z", ",", "fx1", ",", "fx2", ",", "fy1", ",", "fy2", ",", "fz1", ",", "fz2", ",", "mx1", ",", "mx2", ",", "my1", ",", "my2", ",", "mz1", ",", "mz2", ",", "EEm", ",", "GGm", ",", "AAm", ",", "Iyym", ",", "Izzm"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "mapping", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", RowBox[{"uy", "[", "1", "]"}], ",", RowBox[{"uz", "[", "1", "]"}]}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "2", "]"}], ",", RowBox[{"uy", "[", "2", "]"}], ",", RowBox[{"uz", "[", "2", "]"}]}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "1", "]"}], ",", RowBox[{"\[Theta]y", "[", "1", "]"}], ",", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "2", "]"}], ",", RowBox[{"\[Theta]y", "[", "2", "]"}], ",", RowBox[{"\[Theta]z", "[", "2", "]"}]}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], ",", RowBox[{"\[Delta]uy", "[", "1", "]"}], ",", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", RowBox[{"uy", "[", "1", "]"}], ",", RowBox[{"uz", "[", "1", "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]ux", "[", "2", "]"}], ",", RowBox[{"\[Delta]uy", "[", "2", "]"}], ",", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "2", "]"}], ",", RowBox[{"uy", "[", "2", "]"}], ",", RowBox[{"uz", "[", "2", "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], ",", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], ",", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "1", "]"}], ",", RowBox[{"\[Theta]y", "[", "1", "]"}], ",", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}], ",", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}], ",", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "2", "]"}], ",", RowBox[{"\[Theta]y", "[", "2", "]"}], ",", RowBox[{"\[Theta]z", "[", "2", "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"EEm", "=", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], ".", RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "EE"}], ")"}]}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"GGm", "=", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], ".", RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "GG"}], ")"}]}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"AAm", "=", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], ".", RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "AA"}], ")"}]}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"Iyym", "=", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], ".", RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "Iyy"}], ")"}]}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"Izzm", "=", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], ".", RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "Izz"}], ")"}]}], "/", "2"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"fx1", ",", "fx2"}], "}"}], "=", RowBox[{"ix0", ".", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "fX"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "fY"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "fZ"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"fy1", ",", "fy2"}], "}"}], "=", RowBox[{"iy0", ".", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "fX"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "fY"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "fZ"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"fz1", ",", "fz2"}], "}"}], "=", RowBox[{"iz0", ".", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "fX"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "fY"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "fZ"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"mx1", ",", "mx2"}], "}"}], "=", RowBox[{"ix0", ".", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "mX"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "mY"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "mZ"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"my1", ",", "my2"}], "}"}], "=", RowBox[{"iy0", ".", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "mX"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "mY"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "mZ"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"mz1", ",", "mz2"}], "}"}], "=", RowBox[{"iz0", ".", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "mX"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "mY"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "*", "mZ"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ FractionBox["1", RowBox[{"60", " ", SuperscriptBox["h0", "3"]}]], RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "60"}], " ", "AAm", " ", "EEm", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"60", " ", "AAm", " ", "EEm", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"60", " ", "AAm", " ", "EEm", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"ux", "[", "1", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "-", RowBox[{"60", " ", "AAm", " ", "EEm", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"ux", "[", "2", "]"}], " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], "+", RowBox[{"10", " ", "fx1", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"10", " ", "fx2", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]ux", "[", "2", "]"}]}]}], ")"}]}], "+", RowBox[{"21", " ", "fy1", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "+", RowBox[{"9", " ", "fy2", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "-", RowBox[{"30", " ", SuperscriptBox["h0", "3"], " ", "mz1", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "-", RowBox[{"30", " ", SuperscriptBox["h0", "3"], " ", "mz2", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "-", RowBox[{"720", " ", "EEm", " ", "Izzm", " ", RowBox[{"uy", "[", "1", "]"}], " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "+", RowBox[{"720", " ", "EEm", " ", "Izzm", " ", RowBox[{"uy", "[", "2", "]"}], " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "+", RowBox[{"9", " ", "fy1", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "+", RowBox[{"21", " ", "fy2", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "+", RowBox[{"30", " ", SuperscriptBox["h0", "3"], " ", "mz1", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "+", RowBox[{"30", " ", SuperscriptBox["h0", "3"], " ", "mz2", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "+", RowBox[{"720", " ", "EEm", " ", "Izzm", " ", RowBox[{"uy", "[", "1", "]"}], " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "-", RowBox[{"720", " ", "EEm", " ", "Izzm", " ", RowBox[{"uy", "[", "2", "]"}], " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "+", RowBox[{"21", " ", "fz1", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "+", RowBox[{"9", " ", "fz2", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "+", RowBox[{"30", " ", SuperscriptBox["h0", "3"], " ", "my1", " ", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "+", RowBox[{"30", " ", SuperscriptBox["h0", "3"], " ", "my2", " ", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "-", RowBox[{"720", " ", "EEm", " ", "Iyym", " ", RowBox[{"uz", "[", "1", "]"}], " ", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "+", RowBox[{"720", " ", "EEm", " ", "Iyym", " ", RowBox[{"uz", "[", "2", "]"}], " ", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "+", RowBox[{"9", " ", "fz1", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "+", RowBox[{"21", " ", "fz2", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "-", RowBox[{"30", " ", SuperscriptBox["h0", "3"], " ", "my1", " ", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "-", RowBox[{"30", " ", SuperscriptBox["h0", "3"], " ", "my2", " ", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "+", RowBox[{"720", " ", "EEm", " ", "Iyym", " ", RowBox[{"uz", "[", "1", "]"}], " ", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "-", RowBox[{"720", " ", "EEm", " ", "Iyym", " ", RowBox[{"uz", "[", "2", "]"}], " ", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "+", RowBox[{"20", " ", SuperscriptBox["h0", "4"], " ", "mx1", " ", RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}]}], "+", RowBox[{"10", " ", SuperscriptBox["h0", "4"], " ", "mx2", " ", RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}]}], "+", RowBox[{"10", " ", SuperscriptBox["h0", "4"], " ", "mx1", " ", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}]}], "+", RowBox[{"20", " ", SuperscriptBox["h0", "4"], " ", "mx2", " ", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}]}], "-", RowBox[{"3", " ", "fz1", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}]}], "-", RowBox[{"2", " ", "fz2", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"5", " ", SuperscriptBox["h0", "4"], " ", "my1", " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}]}], "-", RowBox[{"5", " ", SuperscriptBox["h0", "4"], " ", "my2", " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Iyym", " ", RowBox[{"uz", "[", "1", "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}]}], "-", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Iyym", " ", RowBox[{"uz", "[", "2", "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"2", " ", "fz1", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], "+", RowBox[{"3", " ", "fz2", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], "-", RowBox[{"5", " ", SuperscriptBox["h0", "4"], " ", "my1", " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], "+", RowBox[{"5", " ", SuperscriptBox["h0", "4"], " ", "my2", " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], "+", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Iyym", " ", RowBox[{"uz", "[", "1", "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], "-", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Iyym", " ", RowBox[{"uz", "[", "2", "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], "+", RowBox[{"3", " ", "fy1", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}]}], "+", RowBox[{"2", " ", "fy2", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}]}], "+", RowBox[{"5", " ", SuperscriptBox["h0", "4"], " ", "mz1", " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}]}], "-", RowBox[{"5", " ", SuperscriptBox["h0", "4"], " ", "mz2", " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}]}], "-", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Izzm", " ", RowBox[{"uy", "[", "1", "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}]}], "+", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Izzm", " ", RowBox[{"uy", "[", "2", "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}]}], "-", RowBox[{"2", " ", "fy1", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], "-", RowBox[{"3", " ", "fy2", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], "-", RowBox[{"5", " ", SuperscriptBox["h0", "4"], " ", "mz1", " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], "+", RowBox[{"5", " ", SuperscriptBox["h0", "4"], " ", "mz2", " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], "-", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Izzm", " ", RowBox[{"uy", "[", "1", "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], "+", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Izzm", " ", RowBox[{"uy", "[", "2", "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], "-", RowBox[{"60", " ", "GGm", " ", SuperscriptBox["h0", "2"], " ", "Iyym", " ", RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], " ", RowBox[{"\[Theta]x", "[", "1", "]"}]}], "-", RowBox[{"60", " ", "GGm", " ", SuperscriptBox["h0", "2"], " ", "Izzm", " ", RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], " ", RowBox[{"\[Theta]x", "[", "1", "]"}]}], "+", RowBox[{"60", " ", "GGm", " ", SuperscriptBox["h0", "2"], " ", "Iyym", " ", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}], " ", RowBox[{"\[Theta]x", "[", "1", "]"}]}], "+", RowBox[{"60", " ", "GGm", " ", SuperscriptBox["h0", "2"], " ", "Izzm", " ", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}], " ", RowBox[{"\[Theta]x", "[", "1", "]"}]}], "+", RowBox[{"60", " ", "GGm", " ", SuperscriptBox["h0", "2"], " ", "Iyym", " ", RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], " ", RowBox[{"\[Theta]x", "[", "2", "]"}]}], "+", RowBox[{"60", " ", "GGm", " ", SuperscriptBox["h0", "2"], " ", "Izzm", " ", RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], " ", RowBox[{"\[Theta]x", "[", "2", "]"}]}], "-", RowBox[{"60", " ", "GGm", " ", SuperscriptBox["h0", "2"], " ", "Iyym", " ", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}], " ", RowBox[{"\[Theta]x", "[", "2", "]"}]}], "-", RowBox[{"60", " ", "GGm", " ", SuperscriptBox["h0", "2"], " ", "Izzm", " ", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}], " ", RowBox[{"\[Theta]x", "[", "2", "]"}]}], "+", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Iyym", " ", RowBox[{"\[Delta]uz", "[", "1", "]"}], " ", RowBox[{"\[Theta]y", "[", "1", "]"}]}], "-", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Iyym", " ", RowBox[{"\[Delta]uz", "[", "2", "]"}], " ", RowBox[{"\[Theta]y", "[", "1", "]"}]}], "-", RowBox[{"240", " ", "EEm", " ", SuperscriptBox["h0", "2"], " ", "Iyym", " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], " ", RowBox[{"\[Theta]y", "[", "1", "]"}]}], "-", RowBox[{"120", " ", "EEm", " ", SuperscriptBox["h0", "2"], " ", "Iyym", " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}], " ", RowBox[{"\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Iyym", " ", RowBox[{"\[Delta]uz", "[", "1", "]"}], " ", RowBox[{"\[Theta]y", "[", "2", "]"}]}], "-", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Iyym", " ", RowBox[{"\[Delta]uz", "[", "2", "]"}], " ", RowBox[{"\[Theta]y", "[", "2", "]"}]}], "-", RowBox[{"120", " ", "EEm", " ", SuperscriptBox["h0", "2"], " ", "Iyym", " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], " ", RowBox[{"\[Theta]y", "[", "2", "]"}]}], "-", RowBox[{"240", " ", "EEm", " ", SuperscriptBox["h0", "2"], " ", "Iyym", " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}], " ", RowBox[{"\[Theta]y", "[", "2", "]"}]}], "-", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Izzm", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}], " ", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "+", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Izzm", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}], " ", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "-", RowBox[{"240", " ", "EEm", " ", SuperscriptBox["h0", "2"], " ", "Izzm", " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], " ", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "-", RowBox[{"120", " ", "EEm", " ", SuperscriptBox["h0", "2"], " ", "Izzm", " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}], " ", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "-", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Izzm", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}], " ", RowBox[{"\[Theta]z", "[", "2", "]"}]}], "+", RowBox[{"360", " ", "EEm", " ", "h0", " ", "Izzm", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}], " ", RowBox[{"\[Theta]z", "[", "2", "]"}]}], "-", RowBox[{"120", " ", "EEm", " ", SuperscriptBox["h0", "2"], " ", "Izzm", " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], " ", RowBox[{"\[Theta]z", "[", "2", "]"}]}], "-", RowBox[{"240", " ", "EEm", " ", SuperscriptBox["h0", "2"], " ", "Izzm", " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}], " ", RowBox[{"\[Theta]z", "[", "2", "]"}]}]}], ")"}]}]}]}], "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4430689313272*^9, 3.4430690080792*^9}, { 3.4430690869528*^9, 3.4430691077320004`*^9}, {3.4430691700116*^9, 3.4430691708072*^9}, {3.4430692071717997`*^9, 3.443069246359*^9}, { 3.4430772782732*^9, 3.4430773623416*^9}, {3.4430773978316*^9, 3.4430774104676*^9}, {3.4430775053780003`*^9, 3.4430776180598*^9}, { 3.4434109099524*^9, 3.4434109159584*^9}, {3.4438800815346003`*^9, 3.4438802689304*^9}, {3.443880362624*^9, 3.4438803824516*^9}, { 3.443929565615374*^9, 3.443929570232974*^9}, {3.443935321321974*^9, 3.443935335705174*^9}, {3.443935419945174*^9, 3.443935421489574*^9}, { 3.443935494013974*^9, 3.443935494715974*^9}, {3.443935617565974*^9, 3.4439357217895737`*^9}, {3.443935755360774*^9, 3.443935816107174*^9}, { 3.443942155230774*^9, 3.443942209939974*^9}, {3.443942305710374*^9, 3.4439423142123737`*^9}, {3.4439442908131742`*^9, 3.443944441181574*^9}, { 3.4439447830065737`*^9, 3.4439447917425737`*^9}, {3.443944908541774*^9, 3.443944916060974*^9}, {3.4442731097938004`*^9, 3.4442731115254*^9}, { 3.444273189229*^9, 3.4442732700526*^9}, {3.4442748430004*^9, 3.4442748605036*^9}, {3.4442748977438*^9, 3.4442748989762*^9}, { 3.4442749340762*^9, 3.4442749351057997`*^9}, 3.4442752313382*^9, { 3.4442919702026*^9, 3.4442919911846*^9}, {3.4442921151577997`*^9, 3.4442921271074*^9}, {3.4443811023684*^9, 3.4443811036632*^9}, { 3.4443814073171997`*^9, 3.4443814402956*^9}, {3.4443815036316*^9, 3.4443815147855997`*^9}, {3.4443815537232*^9, 3.4443815747676*^9}, { 3.4443816138143997`*^9, 3.444381633174*^9}, {3.4443816850439997`*^9, 3.4443817801728*^9}, 3.4443853618688*^9, {3.4443855607376003`*^9, 3.4443856337924*^9}, {3.4443861200444*^9, 3.4443861523676*^9}, { 3.4443862280495996`*^9, 3.444386291448*^9}, {3.4443864047352*^9, 3.4443864135336*^9}, {3.4443870026832*^9, 3.4443870095316*^9}, { 3.4444082055056*^9, 3.4444082437412*^9}, {3.4444082797148*^9, 3.4444084583816*^9}, {3.4444084889108*^9, 3.4444085087539997`*^9}, { 3.444408942517*^9, 3.4444089563386*^9}, {3.4444091419564*^9, 3.4444091647167997`*^9}, {3.4444092206428003`*^9, 3.4444092944463997`*^9}, {3.4444093856284*^9, 3.4444094281071997`*^9}, { 3.4444094976988*^9, 3.4444095275104*^9}, {3.444409611064*^9, 3.4444096125772*^9}, 3.4444098504616003`*^9, {3.444409913392*^9, 3.4444099166056004`*^9}, 3.4444100178496*^9, {3.4444103063248*^9, 3.4444103358712*^9}, {3.4444103868208*^9, 3.4444104432460003`*^9}, { 3.4444921219564*^9, 3.4444921256224003`*^9}, {3.444492194824*^9, 3.4444921973668003`*^9}, {3.4444922814351997`*^9, 3.4444922853508*^9}, { 3.4444923330868*^9, 3.4444923345844*^9}, {3.444492366424*^9, 3.4444923855808*^9}, {3.4453153475226*^9, 3.445315360689*^9}, { 3.4465518166373653`*^9, 3.446551863016165*^9}, {3.446551894231765*^9, 3.446552159384965*^9}, {3.446552232377365*^9, 3.4465522555589647`*^9}, { 3.446553347388365*^9, 3.4465533616155653`*^9}, {3.4466058525769997`*^9, 3.4466058529046*^9}, {3.4466064371219997`*^9, 3.4466065097244*^9}, { 3.4466127725788*^9, 3.4466127766036*^9}, {3.4466128124835997`*^9, 3.4466130037864*^9}, {3.4466131532696*^9, 3.4466131761703997`*^9}, { 3.4466133992192*^9, 3.4466134478756*^9}, {3.446613483584*^9, 3.4466134932092*^9}, {3.4466135740952*^9, 3.4466135794927998`*^9}, { 3.4466137283948*^9, 3.4466137341356*^9}, {3.4466138994342003`*^9, 3.4466139023826*^9}, {3.4466139549858*^9, 3.4466139579653997`*^9}, { 3.4466142109818*^9, 3.4466142245226*^9}, {3.4466142793878*^9, 3.4466143652033997`*^9}, {3.4466144712834*^9, 3.4466145978929996`*^9}, { 3.4466146992618*^9, 3.4466147509914*^9}, {3.4466151283086*^9, 3.4466152768986*^9}, {3.4466153107506*^9, 3.4466153406558*^9}, { 3.4466194331976*^9, 3.4466194377528*^9}, {3.4466194847712*^9, 3.446619488718*^9}, {3.4466389495861998`*^9, 3.4466389768238*^9}, { 3.4466391218414*^9, 3.446639306561*^9}, {3.4466393990222*^9, 3.4466394004886*^9}, {3.4466394475694*^9, 3.4466394487706003`*^9}, { 3.4466395034174*^9, 3.4466395049462*^9}, 3.4466395515755997`*^9, { 3.4466396000176*^9, 3.4466396190808*^9}, {3.4466397459088*^9, 3.446639748826*^9}, {3.4466397974356003`*^9, 3.446639798668*^9}, 3.4466398447816*^9, {3.446639894218*^9, 3.4466399201556*^9}, { 3.4466399570964003`*^9, 3.4466399583288*^9}, {3.446639994006*^9, 3.4466400056904*^9}, {3.4466400383568*^9, 3.4466400395892*^9}, { 3.4466400745643997`*^9, 3.4466401025976*^9}, {3.4466401660834*^9, 3.4466401806070004`*^9}, {3.4466402251294003`*^9, 3.446640227407*^9}, { 3.446640260479*^9, 3.4466402657674*^9}, {3.4466404133122*^9, 3.4466405185654*^9}, 3.4466405830462*^9, {3.4467273294214*^9, 3.4467273777813997`*^9}, {3.4467274366558*^9, 3.4467275620954*^9}, { 3.446727593311*^9, 3.4467277412614*^9}, {3.4467283334639997`*^9, 3.4467283356012*^9}, {3.4467283707636003`*^9, 3.4467283727604*^9}, { 3.4467289882664003`*^9, 3.4467291276836*^9}, {3.446778464322*^9, 3.4467786797424*^9}, {3.4467801953803997`*^9, 3.4467802409792*^9}, { 3.4467802998691998`*^9, 3.4467804023456*^9}, 3.4467804345596*^9, { 3.4467808656344*^9, 3.4467808670852003`*^9}, 3.4467818107525997`*^9, { 3.446781855509*^9, 3.446781874385*^9}, {3.4467826737914*^9, 3.4467827381726*^9}, {3.4467828623018*^9, 3.4467831045386*^9}, { 3.4470344113984003`*^9, 3.4470344123344*^9}, {3.4470344628316*^9, 3.4470345343108*^9}, {3.447043591118539*^9, 3.447043642192939*^9}, { 3.447045649625739*^9, 3.447045718437339*^9}, {3.447054774023939*^9, 3.447054834198939*^9}, {3.4470549103449388`*^9, 3.4470549116169386`*^9}, { 3.447054943902939*^9, 3.4470553027109385`*^9}, {3.447055334559939*^9, 3.447055353684939*^9}, {3.447057311918539*^9, 3.447057369747739*^9}, { 3.4470575058577385`*^9, 3.4470575951365385`*^9}, {3.4470581848789387`*^9, 3.4470582040825386`*^9}, {3.451276121243*^9, 3.4512761425838003`*^9}, { 3.4512762022382*^9, 3.4512762064346*^9}, {3.4512762476966*^9, 3.4512762827654*^9}, {3.451276489091*^9, 3.451276541975*^9}, { 3.4512765853118*^9, 3.4512766132046003`*^9}, {3.4512773470306*^9, 3.4512773766082*^9}, {3.4512776069110003`*^9, 3.4512777499318*^9}, 3.4512777831286*^9, {3.4512778785538*^9, 3.451277881627*^9}, { 3.4512780242734003`*^9, 3.4512780302794*^9}, 3.4512780737878*^9, { 3.4512781866226*^9, 3.4512781930810003`*^9}, {3.4512863325078*^9, 3.4512863539266*^9}, {3.4568019250434*^9, 3.4568022712698*^9}, { 3.4568023177422*^9, 3.4568024125278*^9}, {3.4568024694365997`*^9, 3.4568024750369997`*^9}, {3.4568026914402*^9, 3.4568028101094*^9}, { 3.4568028406698*^9, 3.4568028564726*^9}, 3.4568028886085997`*^9, { 3.4568030489454*^9, 3.4568030800986*^9}, 3.4568032004128*^9, { 3.4568035073698*^9, 3.4568035176034*^9}, {3.4568040146596003`*^9, 3.4568040844852*^9}, {3.4568043016684*^9, 3.4568043154744*^9}, { 3.4568045482264*^9, 3.4568045486632*^9}, {3.4568048944996*^9, 3.4568049806116*^9}, {3.4660560628582*^9, 3.4660560753538*^9}, { 3.4660676729379997`*^9, 3.4660676735931997`*^9}, {3.4660677244024*^9, 3.4660677277251997`*^9}, {3.4742646771287394`*^9, 3.47426469439174*^9}, { 3.47426489921974*^9, 3.4742649800437393`*^9}, {3.4801246373348*^9, 3.4801246860536003`*^9}, {3.4801247748176003`*^9, 3.4801247821028*^9}, { 3.4801248161264*^9, 3.4801248295736*^9}, {3.4801248810692*^9, 3.4801248964508*^9}, {3.4801249330484*^9, 3.480124947884*^9}, 3.4801249886468*^9, {3.4801251139147997`*^9, 3.48012512588*^9}, { 3.4838339444988003`*^9, 3.4838339567448*^9}, 3.4838341692012*^9, { 3.4838344350408*^9, 3.4838344353684*^9}, {3.4938987575920324`*^9, 3.4938987586840324`*^9}, {3.4941630624049997`*^9, 3.4941631381274*^9}, { 3.4941632311345997`*^9, 3.4941632492306004`*^9}, 3.4941633249217997`*^9, { 3.4941633940922003`*^9, 3.4941634063538*^9}, {3.4941634538402*^9, 3.4941635051642*^9}, {3.494163565115*^9, 3.4941636341762*^9}, { 3.4941636853442*^9, 3.4941639323234*^9}, {3.4941640277798*^9, 3.4941641455754004`*^9}, {3.4941641790374002`*^9, 3.4941641803789997`*^9}, {3.4941642676142*^9, 3.4941643277678003`*^9}, 3.4941644677018003`*^9, {3.4941646208938*^9, 3.4941646322349997`*^9}, { 3.4941652592693996`*^9, 3.4941652807194*^9}, {3.4941653119038*^9, 3.494165416299*^9}, {3.494165453895*^9, 3.4941654544722*^9}, { 3.4950990979779997`*^9, 3.495099142701*^9}, {3.495099172958*^9, 3.4950991806289997`*^9}, {3.495099227097*^9, 3.495099238113*^9}, 3.495099290797*^9, {3.495099346084*^9, 3.495099359507*^9}, { 3.495099456308*^9, 3.495099464091*^9}, 3.495099683108*^9, { 3.495100428112*^9, 3.495100434958*^9}, {3.4951006496219997`*^9, 3.495100649992*^9}, {3.4987235265018*^9, 3.4987235939094*^9}, { 3.4987236420666*^9, 3.4987236530646*^9}, {3.4987237305341997`*^9, 3.4987237396914*^9}, {3.498733136159*^9, 3.4987332972446003`*^9}, { 3.4987364783094*^9, 3.4987364860626*^9}, {3.4987366201134*^9, 3.4987366236078*^9}, {3.4987367272386*^9, 3.4987367464890003`*^9}, { 3.4987369428462*^9, 3.4987369670886*^9}, {3.4987370134518003`*^9, 3.4987370259941998`*^9}, {3.4987370944002*^9, 3.4987371027618*^9}, { 3.4987371921029997`*^9, 3.498737193663*^9}, {3.4987372660938*^9, 3.4987372935498*^9}, {3.4987373290554*^9, 3.4987377176202*^9}, { 3.4987377520182*^9, 3.4987379139462*^9}, {3.4987382030216*^9, 3.4987382667078*^9}, {3.4987888391818*^9, 3.4987888608346*^9}, { 3.4988785131146*^9, 3.4988785160162*^9}, {3.5007170967096*^9, 3.5007170999076*^9}, 3.5007182237316*^9, {3.5007182772864*^9, 3.5007182987832003`*^9}, {3.5009573226744003`*^9, 3.5009573940444*^9}, 3.5009574358710003`*^9, 3.5009604278482*^9, {3.5009897246173353`*^9, 3.5009898480289354`*^9}, {3.5009901464413357`*^9, 3.5009901475333357`*^9}, {3.5009901801997356`*^9, 3.500990274096135*^9}, { 3.5010475253292*^9, 3.5010475852332*^9}, {3.5010605722018003`*^9, 3.5010606739762*^9}, {3.5010607202146*^9, 3.5010607323358*^9}, { 3.5010607920526*^9, 3.501061118467*^9}, {3.5010612022078*^9, 3.5010612277138*^9}, {3.5010616467766*^9, 3.5010617938534*^9}, { 3.5010618406222*^9, 3.5010619950778*^9}, {3.5010621500638*^9, 3.5010622514014*^9}, {3.5010625292218*^9, 3.5010625409374*^9}, { 3.5010626043046*^9, 3.5010626313862*^9}, {3.5010626787166*^9, 3.5010626790754004`*^9}, {3.501074457561*^9, 3.5010744671082*^9}, 3.5010763029458*^9, {3.5032210899309998`*^9, 3.5032212413900003`*^9}, { 3.557658203404973*^9, 3.557658219644601*^9}, {3.5576584433801947`*^9, 3.557658496030287*^9}, {3.5576585501779823`*^9, 3.5576586046064777`*^9}, { 3.557658648910555*^9, 3.557658754600741*^9}, {3.557658963945511*^9, 3.5576589782507353`*^9}, {3.557659009949991*^9, 3.5576591437514267`*^9}, { 3.557659182221094*^9, 3.5576592187719584`*^9}, 3.557659413865901*^9, { 3.557659921100792*^9, 3.5576599556392527`*^9}, {3.557660706920972*^9, 3.5576607248454037`*^9}, {3.557661209085854*^9, 3.557661209413454*^9}, { 3.5577526651911488`*^9, 3.5577526932087984`*^9}, {3.5577527272480583`*^9, 3.557752747122493*^9}, {3.5577528374934516`*^9, 3.557752838523053*^9}, { 3.557752881204728*^9, 3.557752891313546*^9}, {3.557752938612829*^9, 3.5577529469120436`*^9}, {3.557753060714244*^9, 3.557753062633047*^9}, { 3.5577536609544907`*^9, 3.5577536637936954`*^9}, {3.5577537824631042`*^9, 3.557753810184353*^9}, {3.557753841025607*^9, 3.5577540648392*^9}, 3.5577541920574236`*^9, {3.5577547033327217`*^9, 3.557754716967146*^9}, { 3.5577547716296415`*^9, 3.557754802112095*^9}, {3.5577549509363565`*^9, 3.5577549771444025`*^9}, 3.5577551382302856`*^9, {3.55775527184452*^9, 3.557755272858522*^9}, {3.557755881555991*^9, 3.557755886548*^9}, { 3.557756158316077*^9, 3.557756231885806*^9}, {3.5577572408487787`*^9, 3.557757248835993*^9}, {3.5577572834368534`*^9, 3.5577575888229895`*^9}, { 3.5577578129641833`*^9, 3.557757862837471*^9}, {3.557758025514557*^9, 3.557758079272251*^9}, 3.557810586960072*^9, {3.5578240262005973`*^9, 3.5578240345360737`*^9}, {3.557824091429328*^9, 3.5578241008156557`*^9}, { 3.557831525255726*^9, 3.5578315319793377`*^9}, 3.5578315716190076`*^9, { 3.557831606079468*^9, 3.557831629432709*^9}, {3.5578316663267736`*^9, 3.5578317569473333`*^9}, {3.5578322144181366`*^9, 3.557832218084143*^9}, { 3.557836356693412*^9, 3.557836473771618*^9}, {3.5578365201660995`*^9, 3.5578365974018345`*^9}, {3.5578366426731143`*^9, 3.557836658865943*^9}, { 3.557836691017599*^9, 3.5578367924957776`*^9}, {3.5578368305442443`*^9, 3.557836888279946*^9}, {3.5578369382156334`*^9, 3.5578370776642785`*^9}, { 3.5578383536061196`*^9, 3.5578383735117545`*^9}, {3.5578385892445335`*^9, 3.5578385978869486`*^9}, {3.5578386713006773`*^9, 3.557838700113928*^9}, { 3.5578387451200075`*^9, 3.5578387467892103`*^9}, {3.5578388951454706`*^9, 3.5578389248635225`*^9}, {3.5578389679351983`*^9, 3.557838983535226*^9}, { 3.5578390227692947`*^9, 3.557839023143696*^9}, {3.557839097696226*^9, 3.5578391125162525`*^9}, {3.5578391553539276`*^9, 3.557839199892006*^9}, { 3.55783924184048*^9, 3.557839294490572*^9}, {3.5578393285922318`*^9, 3.557839398683155*^9}, {3.557839430522811*^9, 3.557839470162481*^9}, { 3.5578395370865984`*^9, 3.5578395446994114`*^9}, {3.5578396068499207`*^9, 3.5578396118575296`*^9}, 3.5578943518105097`*^9, {3.557894388361374*^9, 3.5578944029629993`*^9}, {3.5578944607611012`*^9, 3.5578944989499683`*^9}, {3.5578945393696394`*^9, 3.557894561537278*^9}, { 3.5578946028617506`*^9, 3.5578946188985786`*^9}, {3.557894650894235*^9, 3.5578947812636642`*^9}, {3.55789481884413*^9, 3.5578948191249304`*^9}, { 3.5578949768100076`*^9, 3.5578949836272197`*^9}, {3.5578967386805477`*^9, 3.55789678549623*^9}, {3.5578968804691963`*^9, 3.557896888643611*^9}, { 3.557897022491846*^9, 3.5578970341450663`*^9}, {3.557897620940097*^9, 3.55789765120415*^9}, {3.5579218072271147`*^9, 3.5579218263059483`*^9}, { 3.557922095312821*^9, 3.557922116965659*^9}, {3.557922178086566*^9, 3.557922188616585*^9}, {3.5579223258812256`*^9, 3.557922327066828*^9}, { 3.5579224596046605`*^9, 3.557922461804264*^9}, 3.5579805928465395`*^9, { 3.5579815200581703`*^9, 3.557981541711009*^9}, 3.557985544779242*^9, { 3.5579863164793987`*^9, 3.5579863339514294`*^9}, {3.557986523210962*^9, 3.557986568841042*^9}, 3.5579866122559185`*^9, 3.557986993536188*^9, { 3.5579871244716187`*^9, 3.5579871290580263`*^9}, 3.557987173486905*^9, 3.5579872166989803`*^9, {3.5599618621582537`*^9, 3.5599618642486577`*^9}, { 3.559961969720443*^9, 3.5599619894700775`*^9}, 3.559963611089726*^9, { 3.5601298891258235`*^9, 3.560129889422224*^9}, {3.560132445157113*^9, 3.5601324458591146`*^9}, {3.561978472080926*^9, 3.561978472392926*^9}, { 3.6297802564412937`*^9, 3.6297802957377625`*^9}, {3.62978033369263*^9, 3.629780429741998*^9}, {3.6297805790030603`*^9, 3.6297809429048996`*^9}, { 3.629780987957779*^9, 3.629781197575347*^9}, {3.629781240397422*^9, 3.629781337663593*^9}, {3.6297813946972933`*^9, 3.6297814529165955`*^9}, { 3.6297814952550697`*^9, 3.629781527578326*^9}, {3.62978162025529*^9, 3.629781647633338*^9}, {3.629781678833393*^9, 3.629781763120341*^9}, 3.6297818028224106`*^9, {3.6297818432108817`*^9, 3.629781872570133*^9}, { 3.629782355765382*^9, 3.629782427603508*^9}, {3.6297824692243814`*^9, 3.629782674863942*^9}, {3.629782707218399*^9, 3.6297829295343895`*^9}, { 3.629783005631323*^9, 3.6297830574702144`*^9}, {3.6297831098551064`*^9, 3.629783142786764*^9}, {3.629783433711675*^9, 3.629783442619291*^9}, { 3.6297834942397814`*^9, 3.6297835175930223`*^9}, 3.6297835794939313`*^9, { 3.6297836160291953`*^9, 3.6297837668970604`*^9}, {3.6297842042438283`*^9, 3.6297842697483435`*^9}, {3.6297843514456873`*^9, 3.629784370742921*^9}, { 3.629784443829049*^9, 3.6297844678842916`*^9}, {3.6297845252611923`*^9, 3.629784525588793*^9}, {3.6297846136821475`*^9, 3.629784629235375*^9}, { 3.629784814797701*^9, 3.629784927648299*^9}, {3.629785259960083*^9, 3.6297852602096834`*^9}, {3.6297858780175686`*^9, 3.629785917282837*^9}, { 3.629786048057867*^9, 3.629786048681868*^9}, 3.6297863278755584`*^9, { 3.6297867047133856`*^9, 3.629786748533863*^9}, {3.6297867791567163`*^9, 3.6297868491540394`*^9}, {3.6297875320748396`*^9, 3.629787569795706*^9}, { 3.6297876247234025`*^9, 3.6297877281983843`*^9}, {3.6297877681812544`*^9, 3.629787774015665*^9}, {3.629787831408166*^9, 3.6297878355265727`*^9}, { 3.6297878775686464`*^9, 3.6297878861174617`*^9}, {3.6297879185343184`*^9, 3.629787919064719*^9}, {3.6297880043032694`*^9, 3.62978800470887*^9}, 3.6297880488257475`*^9, {3.6297882100052304`*^9, 3.6297882174776435`*^9}, { 3.6297882697533355`*^9, 3.6297882948381796`*^9}, {3.6297883467550707`*^9, 3.6297883991087627`*^9}, {3.6297887361785545`*^9, 3.629788783961438*^9}, 3.629788825395111*^9, {3.629789006152629*^9, 3.6297890321266747`*^9}, { 3.6297891133248167`*^9, 3.629789145336073*^9}, {3.6297891926821566`*^9, 3.629789194257759*^9}, {3.629789255316266*^9, 3.6297892556282673`*^9}, { 3.629869102295367*^9, 3.629869160124668*^9}, {3.6298691942887287`*^9, 3.6298696149902673`*^9}, {3.6298696993864155`*^9, 3.62986975897852*^9}, { 3.6298698387726603`*^9, 3.629869912030389*^9}, {3.6298700722270703`*^9, 3.629870234560955*^9}, {3.629870580429163*^9, 3.629870630458451*^9}, { 3.630556081081209*^9, 3.630556104902451*^9}, {3.6305562643503313`*^9, 3.6305562763935523`*^9}, {3.6305563415080667`*^9, 3.630556480956712*^9}, { 3.630556692851884*^9, 3.630556695347888*^9}, {3.630556730042349*^9, 3.630556914528273*^9}, {3.6305653725974936`*^9, 3.6305656807121167`*^9}, { 3.630565758760581*^9, 3.6305657739024467`*^9}, {3.630565858170267*^9, 3.63056596644846*^9}, {3.6305661502619734`*^9, 3.6305661523230915`*^9}, { 3.6305662653385553`*^9, 3.630566370352562*^9}, {3.6305667786019125`*^9, 3.630566790535595*^9}, {3.6305668214773645`*^9, 3.630567044691132*^9}, { 3.6305670772499943`*^9, 3.6305670783710585`*^9}, 3.630567272031135*^9, { 3.630567303902958*^9, 3.630567409875019*^9}, {3.630568671196477*^9, 3.6305687195002403`*^9}, {3.6305687542132254`*^9, 3.630568758623478*^9}, { 3.630568855671028*^9, 3.630568859250233*^9}, {3.630569706514694*^9, 3.630569775526641*^9}, 3.630569982346471*^9, {3.6305701679130845`*^9, 3.630570205199217*^9}, {3.6305703751399374`*^9, 3.630570526177576*^9}, { 3.630587657039589*^9, 3.630587688367381*^9}, {3.6305880733027773`*^9, 3.6305883365376396`*^9}, {3.6305886689118233`*^9, 3.6305886717978287`*^9}, 3.6305889776831656`*^9, {3.6305890389444733`*^9, 3.6305890437180815`*^9}, { 3.630589093248169*^9, 3.6305891296430326`*^9}, 3.630589181700324*^9, { 3.6305892509956455`*^9, 3.6305892594820604`*^9}, {3.630589318949365*^9, 3.6305893334729905`*^9}, {3.630589630294712*^9, 3.6305896376267247`*^9}, { 3.630589683288005*^9, 3.630589684988408*^9}, {3.630597310538067*^9, 3.630597340080757*^9}, {3.630597391446695*^9, 3.630597400596218*^9}, { 3.6305974350611897`*^9, 3.6305974605306463`*^9}, {3.630633997622449*^9, 3.630634003125764*^9}, {3.630659322217756*^9, 3.63065932438616*^9}, { 3.6306611578252783`*^9, 3.6306611625988865`*^9}, {3.6306612541554475`*^9, 3.630661257587454*^9}, {3.6306613001287284`*^9, 3.6306613026715326`*^9}, { 3.6306613920752897`*^9, 3.6306613949768953`*^9}, {3.6306706377509866`*^9, 3.630670654957817*^9}, {3.6306749981919994`*^9, 3.630675005793434*^9}, { 3.6306751229631357`*^9, 3.630675150017683*^9}, {3.6306752035287437`*^9, 3.6306752096180925`*^9}, {3.630675315921172*^9, 3.6306753201514144`*^9}, { 3.6306757793287754`*^9, 3.6306757796257925`*^9}, {3.630675814406262*^9, 3.6306758147026625`*^9}, {3.6306760107574763`*^9, 3.6306760154417443`*^9}, {3.6306789722320743`*^9, 3.6306789870309205`*^9}, {3.6306790257051325`*^9, 3.630679028076268*^9}, { 3.6306800259177256`*^9, 3.6306800406129513`*^9}, {3.6306801239326982`*^9, 3.6306801300167084`*^9}, {3.630680769261832*^9, 3.6306807806186523`*^9}, { 3.630681157468514*^9, 3.6306811577649145`*^9}, {3.6306812744219193`*^9, 3.63068127471832*^9}, {3.6306817187418995`*^9, 3.6306817919060287`*^9}, { 3.630681879188182*^9, 3.6306819111526375`*^9}, {3.6306821191790032`*^9, 3.6306821283050194`*^9}, {3.630720543651497*^9, 3.6307205534300566`*^9}, { 3.630721035525631*^9, 3.630721092774905*^9}, {3.6307212510439577`*^9, 3.6307213064777765`*^9}, {3.6307477437169704`*^9, 3.6307478284095197`*^9}, {3.6307478614971776`*^9, 3.6307478785948076`*^9}, {3.6307479884814005`*^9, 3.630748002880226*^9}, { 3.630748045624301*^9, 3.630748063876333*^9}, {3.630748111596817*^9, 3.6307481498324842`*^9}, {3.6307489182430334`*^9, 3.6307489447786803`*^9}, {3.630749037427243*^9, 3.6307490443848553`*^9}, { 3.6307491041485605`*^9, 3.6307491384218206`*^9}, {3.6307491914151134`*^9, 3.630749196890723*^9}, {3.6307492445800066`*^9, 3.6307493439989815`*^9}, { 3.630749396212273*^9, 3.6307494766304145`*^9}, {3.6307495333989143`*^9, 3.6307495547241516`*^9}, {3.6307496525831237`*^9, 3.630749669571553*^9}, { 3.630750220602922*^9, 3.6307502881822405`*^9}, {3.6307510631916018`*^9, 3.630751068292811*^9}, {3.6307511226589065`*^9, 3.630751137962533*^9}, { 3.6307512555243397`*^9, 3.630751282777588*^9}, {3.630752266971757*^9, 3.630752414599744*^9}, {3.630752446407563*^9, 3.630752457388191*^9}, { 3.6307589380050273`*^9, 3.6307590266300964`*^9}, {3.6307591666721067`*^9, 3.63075923229886*^9}, 3.630760288282259*^9, {3.6307603547370596`*^9, 3.630760557414652*^9}, {3.630760654134184*^9, 3.63076065510824*^9}, { 3.6307606911683025`*^9, 3.6307606919283457`*^9}, {3.6307607642334814`*^9, 3.6307607648645177`*^9}, {3.630761455000991*^9, 3.6307614616743727`*^9}, { 3.630761507825012*^9, 3.630761605776615*^9}, {3.630761652999316*^9, 3.630761695865768*^9}, {3.630761771278081*^9, 3.6307617792215357`*^9}, 3.6307629478424797`*^9, {3.632205207880766*^9, 3.6322052561155243`*^9}, { 3.6322052892474194`*^9, 3.6322052915745525`*^9}, 3.6322053746993074`*^9, { 3.6322062705415463`*^9, 3.6322062726016645`*^9}, {3.6322063396935015`*^9, 3.63220636484194*^9}, {3.6322064410612993`*^9, 3.6322064491667633`*^9}, { 3.632206580308264*^9, 3.6322066373275256`*^9}, {3.6322066736436024`*^9, 3.6322067467737856`*^9}, {3.632206782260815*^9, 3.6322071351279984`*^9}, 3.6322071989226465`*^9, {3.632207270393735*^9, 3.6322073359894867`*^9}, { 3.6322073997741346`*^9, 3.6322074126708727`*^9}, {3.632207491777397*^9, 3.632207682289294*^9}, {3.632207809621577*^9, 3.632207827973626*^9}, { 3.6322079043859973`*^9, 3.6322079279443445`*^9}, {3.6322080916397076`*^9, 3.6322081666649985`*^9}, 3.634905258940913*^9, {3.634905370524296*^9, 3.6349054089004903`*^9}, {3.6349054472556844`*^9, 3.63490544787272*^9}, { 3.634905483492757*^9, 3.6349055164646425`*^9}, {3.634905574352954*^9, 3.634905628121029*^9}, {3.6349057012822137`*^9, 3.6349057207913294`*^9}, { 3.6349061371061416`*^9, 3.634906354438572*^9}, {3.6349063890455513`*^9, 3.6349064369332905`*^9}, {3.634906537696054*^9, 3.634906601859724*^9}, 3.634906706128688*^9, {3.6349069249442034`*^9, 3.6349069328326545`*^9}, { 3.6349070151973653`*^9, 3.6349070242298822`*^9}, {3.6349070817921743`*^9, 3.6349070822111983`*^9}, {3.634907723288866*^9, 3.634907739005765*^9}, { 3.6349079580732946`*^9, 3.6349079868219395`*^9}, {3.634908200284148*^9, 3.634908315195721*^9}, {3.6349083774582825`*^9, 3.6349084027997313`*^9}, { 3.63490844507615*^9, 3.634908448843365*^9}, {3.634914956333157*^9, 3.634915020054802*^9}, {3.634915050572547*^9, 3.6349150956171236`*^9}, { 3.6349539785771523`*^9, 3.634953978975175*^9}, {3.6349540728785458`*^9, 3.6349541681829967`*^9}, {3.634954211263461*^9, 3.6349542495746527`*^9}, { 3.6349543251259737`*^9, 3.634954355882733*^9}, {3.6349543892536416`*^9, 3.6349544742835045`*^9}, {3.634954547519694*^9, 3.6349545640246377`*^9}, { 3.6349547051657104`*^9, 3.6349547107930326`*^9}, {3.634954745355009*^9, 3.634954752101395*^9}, {3.6349547948858423`*^9, 3.6349548053894434`*^9}, { 3.634954904907135*^9, 3.6349549451084347`*^9}, {3.634955219605135*^9, 3.6349552640926795`*^9}, {3.634955320189888*^9, 3.634955348763522*^9}, { 3.634955386393675*^9, 3.6349555039273973`*^9}, {3.6349557669644423`*^9, 3.6349557672004557`*^9}, {3.634955894841756*^9, 3.634955902578199*^9}, { 3.6349559513739896`*^9, 3.6349560216320086`*^9}, {3.634956120144643*^9, 3.634956128996149*^9}, {3.6349561700724983`*^9, 3.6349561978900895`*^9}, { 3.6349562480719595`*^9, 3.634956254326318*^9}, {3.634956331684742*^9, 3.6349563460575643`*^9}, {3.634956379242462*^9, 3.63495642676418*^9}, 3.6349564696636343`*^9, {3.6351524116477795`*^9, 3.6351524153379908`*^9}, { 3.6352134400282927`*^9, 3.635213442148414*^9}, {3.6352134745862694`*^9, 3.635213495869487*^9}, {3.6352135383409157`*^9, 3.6352137157160616`*^9}, { 3.6352137493569856`*^9, 3.635213764522853*^9}, {3.635214215036621*^9, 3.635214227593339*^9}, {3.635214407257615*^9, 3.63521441713218*^9}, { 3.635215297101512*^9, 3.635215303964904*^9}, {3.6352154111120324`*^9, 3.635215431504199*^9}, {3.635216346055508*^9, 3.635216494371991*^9}, { 3.635216631050809*^9, 3.6352166603244834`*^9}, {3.635216763034358*^9, 3.635216764164423*^9}, {3.6352168771938877`*^9, 3.635216888828553*^9}, 3.6352169832479534`*^9, 3.635217037668066*^9, {3.6352172024924936`*^9, 3.6352172054526625`*^9}, {3.635217344025589*^9, 3.635217346898753*^9}, 3.6352173863770113`*^9, {3.635217519639633*^9, 3.6352175507014103`*^9}, 3.635217615445113*^9, {3.6352178715087595`*^9, 3.635217880460271*^9}, { 3.6352185912849283`*^9, 3.635218598444338*^9}, {3.6352186995721216`*^9, 3.635218714955002*^9}, {3.6352189761749425`*^9, 3.6352189789341*^9}, { 3.6352195060322485`*^9, 3.635219509972474*^9}, 3.6352195673477554`*^9, 3.6352195994635925`*^9, {3.6352197336482677`*^9, 3.635219737452485*^9}, { 3.6352197706093817`*^9, 3.6352197723214793`*^9}, {3.635219941784172*^9, 3.6352199485115566`*^9}, {3.6352200714185867`*^9, 3.6352200854323883`*^9}, {3.6352202085694313`*^9, 3.635220235849992*^9}, { 3.6352202816336107`*^9, 3.6352203110962954`*^9}, {3.6352204980449886`*^9, 3.6352205276526823`*^9}, {3.6352253191447396`*^9, 3.6352253299913597`*^9}, {3.6352253611111403`*^9, 3.6352253637572913`*^9}, {3.635225409322898*^9, 3.6352255965196047`*^9}, { 3.6352260914249115`*^9, 3.6352261698393965`*^9}, {3.63522638233055*^9, 3.6352264188036366`*^9}, {3.635227493469104*^9, 3.635227556935734*^9}, { 3.6352276745764627`*^9, 3.635227730116639*^9}, {3.6352287979917183`*^9, 3.6352288587651944`*^9}, {3.635228894237223*^9, 3.635228948324317*^9}, { 3.635229365252164*^9, 3.6352293902275925`*^9}, {3.63522947690555*^9, 3.6352294807837715`*^9}, {3.6352492831123204`*^9, 3.6352492983621926`*^9}, 3.6356569054520617`*^9, {3.6363778004499054`*^9, 3.636377802787039*^9}, { 3.6363778414932528`*^9, 3.6363778525308843`*^9}, {3.636384436335312*^9, 3.6363846409950175`*^9}, {3.636384971250907*^9, 3.6363849738080535`*^9}, { 3.6363850170465264`*^9, 3.636385030729309*^9}, {3.6363851286779118`*^9, 3.636385138359465*^9}, {3.6363851699712734`*^9, 3.636385223111313*^9}, { 3.656076172452749*^9, 3.656076182171566*^9}, {3.6560765578514256`*^9, 3.656076619019133*^9}, 3.6560772545486493`*^9, {3.6630719749029694`*^9, 3.6630719878027077`*^9}, {3.6630720702554235`*^9, 3.6630720807290225`*^9}, {3.6630721155740156`*^9, 3.6630721713712068`*^9}, {3.663072270834896*^9, 3.6630722882218904`*^9}, 3.6630724099968557`*^9, {3.685234767958906*^9, 3.685234768480936*^9}, { 3.685252204033695*^9, 3.6852522340537376`*^9}, {3.6852522757137957`*^9, 3.6852523115138454`*^9}, {3.68525376314359*^9, 3.6852537725041256`*^9}, { 3.6852539763277836`*^9, 3.6852539861693463`*^9}, 3.6852540682470407`*^9, 3.6852541660656357`*^9, {3.6852604801645336`*^9, 3.6852605060345697`*^9}, { 3.6852605373446136`*^9, 3.6852605977846985`*^9}, 3.685260655254779*^9, { 3.6853280002218475`*^9, 3.685328019561875*^9}, 3.685328064721938*^9, { 3.6853280953119807`*^9, 3.6853282636022167`*^9}, {3.685328356242346*^9, 3.685328598671985*^9}, {3.6853286682069626`*^9, 3.6853287982524004`*^9}, { 3.6853288753368096`*^9, 3.6853289367033195`*^9}, {3.685328968274125*^9, 3.685328978713722*^9}, {3.685329033941881*^9, 3.685329044950511*^9}, { 3.685329173522865*^9, 3.6853294420842257`*^9}, {3.6853296024223967`*^9, 3.6853296124319687`*^9}, {3.6853297221712456`*^9, 3.685329733349885*^9}, { 3.6853298076291337`*^9, 3.6853298739599276`*^9}, {3.685330038474337*^9, 3.685330051652091*^9}, {3.6853311309428225`*^9, 3.685331168378964*^9}, { 3.685340142134763*^9, 3.685340180544817*^9}, {3.6853583292043543`*^9, 3.685358334834362*^9}, {3.685358366084406*^9, 3.685358366954407*^9}, { 3.685358408404465*^9, 3.685358518294619*^9}, 3.685358620174762*^9, 3.6853586578748145`*^9, {3.6853588750151186`*^9, 3.6853588857151337`*^9}, { 3.6853589302051954`*^9, 3.685358938995208*^9}, {3.685359014715314*^9, 3.6853590296653347`*^9}, 3.685359148315501*^9, 3.6853598281764526`*^9, { 3.6853683109000263`*^9, 3.685368382250126*^9}, {3.685368420160179*^9, 3.6853684704302497`*^9}, {3.6853685194503183`*^9, 3.685368742860631*^9}, { 3.685369008901004*^9, 3.68536902061102*^9}, {3.6853690791611023`*^9, 3.685369132301176*^9}, {3.6853693219914417`*^9, 3.6853693304114532`*^9}, 3.6853696089118433`*^9, {3.6858758911429157`*^9, 3.685875951793*^9}, { 3.6859484099082212`*^9, 3.6859484970032024`*^9}, {3.686052829875022*^9, 3.686052906242383*^9}, {3.6860535326822133`*^9, 3.686053598029951*^9}, { 3.68605365168902*^9, 3.6860541446091995`*^9}, {3.6860541846064873`*^9, 3.68605440393201*^9}, {3.686054713802734*^9, 3.6860547858298535`*^9}, { 3.6860548280202665`*^9, 3.686054837219793*^9}, {3.686054874127904*^9, 3.686054892139934*^9}, {3.686055136014883*^9, 3.6860551460584574`*^9}, { 3.686055211281188*^9, 3.6860552301962633`*^9}, {3.6860553465409174`*^9, 3.6860553998749685`*^9}, {3.6860556017188663`*^9, 3.6860556050188704`*^9}, {3.6862923512707715`*^9, 3.686292363600789*^9}, { 3.686292409650853*^9, 3.6862924109708548`*^9}, {3.6862924536109147`*^9, 3.6862924596309233`*^9}, {3.686292542221039*^9, 3.6862925430110397`*^9}, { 3.686292988803664*^9, 3.686293001033681*^9}, {3.6866504529025555`*^9, 3.686650526682659*^9}, {3.686650671852862*^9, 3.6866507242929354`*^9}, { 3.6866507657529936`*^9, 3.6866507887630253`*^9}, {3.6866508208230705`*^9, 3.6866509100531955`*^9}, {3.6866509593932643`*^9, 3.686650971113281*^9}, { 3.686651007793332*^9, 3.6866511595335445`*^9}, {3.686651223513634*^9, 3.686651234033649*^9}, {3.686651304763748*^9, 3.6866513363837924`*^9}, { 3.6866514102038956`*^9, 3.686651429943923*^9}, {3.686652993837468*^9, 3.6866530046274834`*^9}, {3.686804398511652*^9, 3.6868044081516657`*^9}, { 3.6868046315619783`*^9, 3.686804631801979*^9}, {3.686804685872054*^9, 3.686804707092084*^9}, {3.6868047382021275`*^9, 3.686804767812169*^9}, { 3.686804824012248*^9, 3.6868048404922705`*^9}, {3.686804942142413*^9, 3.6868049633424425`*^9}, {3.6868050765526013`*^9, 3.686805101092636*^9}, { 3.6868051463526993`*^9, 3.6868052234228067`*^9}, {3.686805307602925*^9, 3.686805311682931*^9}, {3.68680577547358*^9, 3.686805788923599*^9}, { 3.686821702197342*^9, 3.6868217282873783`*^9}, {3.6868225192884855`*^9, 3.686822538368512*^9}, {3.6868226306886415`*^9, 3.6868226683086944`*^9}, { 3.6868227318887835`*^9, 3.6868227627088265`*^9}, {3.686822801638881*^9, 3.6868230490692277`*^9}, {3.686823122979331*^9, 3.6868231833294153`*^9}, { 3.6868232450595016`*^9, 3.6868233753996844`*^9}, {3.6868234153897405`*^9, 3.686823451379791*^9}, {3.6868236736101017`*^9, 3.6868236786601086`*^9}, { 3.6868237164601617`*^9, 3.68682375072021*^9}, {3.68682389396041*^9, 3.68682390087042*^9}, {3.686823940790476*^9, 3.6868239416904774`*^9}, { 3.6868239808805323`*^9, 3.6868239872905407`*^9}, {3.686824051540631*^9, 3.6868240519006314`*^9}, {3.686824360861064*^9, 3.6868243761510854`*^9}, { 3.6868245440213203`*^9, 3.686824577221367*^9}, {3.686824685841519*^9, 3.6868246979115357`*^9}, 3.6868248012716804`*^9, 3.6868253582724605`*^9, { 3.6868255183026843`*^9, 3.686825518932685*^9}, {3.6868264466639843`*^9, 3.6868264497139883`*^9}, {3.6868267792744493`*^9, 3.6868268152945004`*^9}, {3.686827100164899*^9, 3.6868271210549283`*^9}, 3.686827162004986*^9, {3.6868272414950967`*^9, 3.686827327475217*^9}, { 3.686827953126093*^9, 3.686827976506126*^9}, {3.686829128577739*^9, 3.686829138957753*^9}, 3.6868292410978966`*^9, {3.6868292768379464`*^9, 3.686829282727955*^9}, {3.6868293820380936`*^9, 3.686829418138144*^9}, { 3.686829846748744*^9, 3.686829848298746*^9}, {3.6868313063207874`*^9, 3.686831307180789*^9}, {3.6868331276633377`*^9, 3.68683328653356*^9}, { 3.6868394697195063`*^9, 3.6868394933895392`*^9}, 3.686839530999592*^9, { 3.686839582829664*^9, 3.68683963686974*^9}, {3.6868397551199055`*^9, 3.68683979365996*^9}, {3.6868398344600167`*^9, 3.686839866200061*^9}, { 3.687092084401948*^9, 3.687092117031994*^9}, {3.6870922598621936`*^9, 3.6870922645422*^9}, {3.6870962086478376`*^9, 3.6870962658779182`*^9}, 3.687096444838168*^9, {3.687096500978247*^9, 3.687096501638248*^9}, { 3.6870965809883595`*^9, 3.687096592708376*^9}, 3.687096837948719*^9, { 3.68709688890879*^9, 3.687096985798926*^9}, {3.6870971015990877`*^9, 3.6870972179192505`*^9}, {3.6870972618993125`*^9, 3.687097305639374*^9}, { 3.6870973356794157`*^9, 3.6870975186496716`*^9}, {3.6870975796097574`*^9, 3.6870975953197794`*^9}, {3.6870976531898603`*^9, 3.6870976848899045`*^9}, 3.6870977782500353`*^9, {3.687413757687042*^9, 3.6874137834070783`*^9}, { 3.6874140542074575`*^9, 3.687414094417514*^9}, {3.6874143478878684`*^9, 3.687414485538061*^9}, {3.6874146116082373`*^9, 3.68741464894829*^9}, { 3.6874147451084247`*^9, 3.687414766118454*^9}, 3.6874149094486547`*^9, { 3.6874150416688395`*^9, 3.6874150634888706`*^9}, {3.6874152437091227`*^9, 3.687415268869158*^9}, 3.6874153442892637`*^9, {3.687415449879411*^9, 3.687415469659439*^9}, 3.687415529739523*^9, 3.687415564789572*^9, 3.687415645529685*^9, {3.6874168016913037`*^9, 3.687416803441306*^9}, { 3.687421022677213*^9, 3.6874212686075573`*^9}, {3.68742948209425*^9, 3.6874294906842623`*^9}, {3.687844340668378*^9, 3.6878443698084188`*^9}, { 3.6886534778571014`*^9, 3.6886534911571198`*^9}, {3.688906380162199*^9, 3.6889064680223217`*^9}, {3.688906514222396*^9, 3.6889065193925257`*^9}, { 3.688908192623024*^9, 3.6889082006430354`*^9}, {3.688908261823121*^9, 3.688908271653135*^9}, {3.6889083776232834`*^9, 3.6889083922733035`*^9}, { 3.688908466073407*^9, 3.6889084993734536`*^9}, 3.688908533623502*^9, { 3.688908616683618*^9, 3.6889086271336327`*^9}, {3.6889086885637183`*^9, 3.6889087063437433`*^9}, {3.6889091647443852`*^9, 3.6889092012544365`*^9}, {3.6889093019045773`*^9, 3.6889093406746316`*^9}, 3.6889101071957045`*^9, {3.689905940063133*^9, 3.689905972983179*^9}, { 3.692530981927737*^9, 3.6925310416778207`*^9}, {3.692531099797902*^9, 3.6925311384779563`*^9}, {3.692531192258032*^9, 3.692531244668105*^9}, { 3.6925312919881716`*^9, 3.692531425418358*^9}, {3.6925315270885005`*^9, 3.692531643928664*^9}, {3.692535489534048*^9, 3.6925356485142703`*^9}, { 3.692535753564418*^9, 3.6925357992544813`*^9}, {3.6925358831745987`*^9, 3.692535899604622*^9}, {3.692536042584822*^9, 3.692536159384986*^9}, { 3.6925366121156197`*^9, 3.6925366207256317`*^9}, {3.6925367265057793`*^9, 3.69253672683578*^9}, {3.6925368590559654`*^9, 3.6925368636559715`*^9}, { 3.6925370880062857`*^9, 3.692537177856412*^9}, {3.692537322456614*^9, 3.6925373869767046`*^9}, {3.6925390913352747`*^9, 3.6925390925252767`*^9}, {3.692539644430175*^9, 3.6925396711502123`*^9}, { 3.692539727510291*^9, 3.692539730440295*^9}, {3.69253993367058*^9, 3.692539963780622*^9}, {3.6925400018406754`*^9, 3.692540003630678*^9}, { 3.6925401743409166`*^9, 3.6925401747509174`*^9}, {3.692540399111232*^9, 3.692540407981244*^9}, {3.69254047647134*^9, 3.6925404886113567`*^9}, { 3.6925406039715185`*^9, 3.69254060531152*^9}, {3.6925414948727655`*^9, 3.6925414953427663`*^9}, {3.6925415478528395`*^9, 3.692541613062931*^9}, 3.692541649332982*^9, {3.692541727633092*^9, 3.6925418840133104`*^9}, { 3.692541924473367*^9, 3.692542041693531*^9}, {3.6925421488836813`*^9, 3.6925422549438295`*^9}, {3.6925422976938896`*^9, 3.692542521444203*^9}, { 3.6925426221843443`*^9, 3.6925426357343626`*^9}, 3.692542739374508*^9, 3.692599799510878*^9, {3.692599834884901*^9, 3.6925998954663663`*^9}, { 3.692599925635092*^9, 3.6926000095928946`*^9}, {3.692600108929576*^9, 3.6926001456386757`*^9}, {3.6926001874800687`*^9, 3.692600454421337*^9}, { 3.692600503149027*^9, 3.6926006000391626`*^9}, {3.692600680251275*^9, 3.6926006814012766`*^9}, {3.6926009000215826`*^9, 3.6926009410816402`*^9}, 3.692601280532116*^9, {3.6926044914726114`*^9, 3.69260449774262*^9}, 3.6926045660127153`*^9, 3.6926046690228596`*^9, {3.69296647863291*^9, 3.6929664798829117`*^9}, {3.6929665643330297`*^9, 3.6929666141830997`*^9}, {3.6929670390036945`*^9, 3.6929670405536966`*^9}, {3.6929670861037607`*^9, 3.6929670952937737`*^9}, {3.6929671302538223`*^9, 3.6929671549438567`*^9}, {3.6929671904739065`*^9, 3.69296722137395*^9}, { 3.6929672596240034`*^9, 3.6929673352541094`*^9}, 3.6929678909232683`*^9, { 3.6930146982034283`*^9, 3.693014722713463*^9}, {3.6930148540136466`*^9, 3.693014857023651*^9}, {3.6930148913836985`*^9, 3.693014894823704*^9}, { 3.693014930903754*^9, 3.6930151942541227`*^9}, {3.693015247824198*^9, 3.693015430554454*^9}, {3.693015673794794*^9, 3.69301579223496*^9}, { 3.6930163123576884`*^9, 3.693016326897709*^9}, {3.6930164225678425`*^9, 3.693016429727853*^9}, {3.693016686718212*^9, 3.693016698128228*^9}, { 3.693016737038283*^9, 3.693016755068308*^9}, {3.6930168429225607`*^9, 3.6930168719926014`*^9}, {3.6930172049430676`*^9, 3.693017284063178*^9}, { 3.693017336433252*^9, 3.6930173662532935`*^9}, {3.6930180949163136`*^9, 3.6930180975563173`*^9}, {3.6930181870764427`*^9, 3.693018199956461*^9}, { 3.6930182954065943`*^9, 3.693018305996609*^9}, {3.693139886141657*^9, 3.6931399045016823`*^9}, {3.6931402916003532`*^9, 3.693140295770359*^9}, { 3.693140426020541*^9, 3.693140426530542*^9}, {3.6931410492237864`*^9, 3.6931410888738413`*^9}, {3.6931411194438844`*^9, 3.693141126553894*^9}, { 3.693141412004294*^9, 3.693141454164353*^9}, {3.6931415979955544`*^9, 3.6931417931758275`*^9}, {3.6932199559445915`*^9, 3.6932199772046213`*^9}, {3.6932201435748544`*^9, 3.693220170284892*^9}, { 3.693220713855653*^9, 3.693220721825664*^9}, {3.693625124589745*^9, 3.693625153729786*^9}, {3.6940907995669713`*^9, 3.6940909688872085`*^9}, { 3.6940913675677667`*^9, 3.6940914223978434`*^9}, {3.694091508037963*^9, 3.694091572118053*^9}, 3.694092009628666*^9, {3.6940920553287296`*^9, 3.694092229168973*^9}, {3.6940923053990793`*^9, 3.694092374419176*^9}, { 3.6940924537392874`*^9, 3.694092457789293*^9}, 3.694092642849552*^9, { 3.6940928573598523`*^9, 3.694092862379859*^9}, {3.6940945886222763`*^9, 3.694094601932295*^9}, 3.694094849542641*^9, {3.694095764293922*^9, 3.6940957644739223`*^9}, {3.6940960602743363`*^9, 3.6940960732243547`*^9}, {3.6940961211044216`*^9, 3.694096124194426*^9}, { 3.694665030960044*^9, 3.6946650634500895`*^9}, {3.6946652071402903`*^9, 3.6946653490404887`*^9}, {3.6946658702212186`*^9, 3.6946658881212435`*^9}, {3.694665923041292*^9, 3.694665953561335*^9}, { 3.694665995981395*^9, 3.6946660149414215`*^9}, {3.694666050571471*^9, 3.6946660547214766`*^9}, {3.694666169991638*^9, 3.694666292151809*^9}, { 3.6946663456618843`*^9, 3.6946663943919525`*^9}, 3.6946667526224537`*^9, 3.69466680700253*^9, 3.694687076625702*^9, {3.6946874316161985`*^9, 3.6946874621962414`*^9}, 3.694687499496294*^9, {3.694687567516389*^9, 3.694687642816495*^9}, {3.694687679006545*^9, 3.6946877198966026`*^9}, { 3.6946877714966745`*^9, 3.694687931746899*^9}, {3.723798739728607*^9, 3.723798744014243*^9}, {3.7237990126446104`*^9, 3.723799023974499*^9}, { 3.7244116671877546`*^9, 3.7244116733393917`*^9}, {3.724411761793063*^9, 3.7244117718753977`*^9}, {3.724411928386671*^9, 3.7244119682966137`*^9}, { 3.724412131847311*^9, 3.724412188341254*^9}, {3.729414981357122*^9, 3.7294149861075096`*^9}, {3.749817651293678*^9, 3.749817653108206*^9}, { 3.7498176831919456`*^9, 3.7498176846222315`*^9}, 3.7498177601545563`*^9, { 3.749817859674735*^9, 3.749817861044999*^9}, {3.7498179561547127`*^9, 3.749817964489929*^9}, {3.749818149334386*^9, 3.749818237397959*^9}, 3.749818617867873*^9, {3.7505621848002787`*^9, 3.7505622174085107`*^9}, { 3.75056238761455*^9, 3.750562431347901*^9}, {3.7505626332829456`*^9, 3.7505627331565337`*^9}, {3.7505627632642183`*^9, 3.7505627635859113`*^9}, {3.7515359581577415`*^9, 3.7515359614850826`*^9}, {3.751536071974715*^9, 3.7515360961721487`*^9}, 3.7515362040373974`*^9, {3.751536256080162*^9, 3.7515365099108534`*^9}, { 3.751549231137398*^9, 3.7515493334258356`*^9}, {3.7515496891619573`*^9, 3.751549689458767*^9}, 3.753020403650548*^9, {3.7530205114189386`*^9, 3.753020525224822*^9}, {3.753021995594639*^9, 3.753022011512741*^9}, { 3.760634689749445*^9, 3.7606348247488756`*^9}, {3.7606349119783344`*^9, 3.7606349350197754`*^9}, {3.76063496856853*^9, 3.7606349922504683`*^9}, { 3.760667269592998*^9, 3.760667271545692*^9}, 3.7606679283912125`*^9, 3.760668039709257*^9, {3.763302716900259*^9, 3.763302749083943*^9}, { 3.763304867499642*^9, 3.7633048681948185`*^9}, {3.763337978730939*^9, 3.763338014197137*^9}, {3.763338054806819*^9, 3.7633381289118147`*^9}, { 3.763338224472745*^9, 3.7633382447254143`*^9}, 3.763338501519575*^9, { 3.7633387342733064`*^9, 3.763338775483101*^9}, {3.7633388525735607`*^9, 3.7633390131554184`*^9}, {3.763360596353942*^9, 3.7633606328922167`*^9}, { 3.7633606638773637`*^9, 3.763360724941125*^9}, {3.763360812068123*^9, 3.763360863571327*^9}, {3.763361217769263*^9, 3.763361243271195*^9}, { 3.763361578316657*^9, 3.7633615820345063`*^9}, {3.763362291476118*^9, 3.763362301380039*^9}, {3.763362505004878*^9, 3.763362606421646*^9}, { 3.763362742167684*^9, 3.7633627524126663`*^9}, {3.7633628090243473`*^9, 3.763362931819517*^9}, 3.7633630680313087`*^9, {3.76336360941794*^9, 3.7633636782369685`*^9}, {3.763363813698273*^9, 3.763363822992702*^9}, { 3.7633837714269123`*^9, 3.763383775708086*^9}, {3.7633839861442327`*^9, 3.7633839966350546`*^9}, {3.7633846907375526`*^9, 3.76338471098131*^9}, 3.763426089635152*^9, {3.7634262143520336`*^9, 3.7634262475470448`*^9}, { 3.7634276458524485`*^9, 3.7634276705117846`*^9}, {3.7634292721860075`*^9, 3.7634292840439587`*^9}, {3.76352820463631*^9, 3.7635282147939873`*^9}, { 3.763528430960533*^9, 3.7635284413250494`*^9}, {3.7635285114344244`*^9, 3.763528537124817*^9}, {3.763528653934307*^9, 3.7635286747218256`*^9}, { 3.7635486952594075`*^9, 3.763548696007099*^9}, {3.7639579130072594`*^9, 3.7639579464687676`*^9}, {3.763957980699315*^9, 3.7639580928074217`*^9}, { 3.763959813173403*^9, 3.7639598134702053`*^9}, {3.7639608015345135`*^9, 3.7639608287155933`*^9}, {3.7645603385872726`*^9, 3.764560365934222*^9}, { 3.76456061596602*^9, 3.76456062636983*^9}, {3.7647257988231063`*^9, 3.7647258025896564`*^9}, {3.765077713031946*^9, 3.7650777913378534`*^9}, { 3.7740698865922914`*^9, 3.774069989744633*^9}, {3.7740700982535834`*^9, 3.774070098487667*^9}, {3.7740701415628414`*^9, 3.7740702370647106`*^9}, { 3.77407029325229*^9, 3.7740703348543596`*^9}, {3.774070397587008*^9, 3.774070454974152*^9}, {3.7740709929610343`*^9, 3.7740710067172923`*^9}, { 3.775190474681038*^9, 3.7751904884151363`*^9}, {3.7751905901325903`*^9, 3.775190642609686*^9}, 3.775190717712206*^9, {3.7751956728394384`*^9, 3.7751957010601625`*^9}, 3.7751957418100777`*^9, {3.7751958741450567`*^9, 3.775195882844048*^9}, {3.7751959530858574`*^9, 3.775196055684782*^9}, { 3.7836566506037264`*^9, 3.783656699859296*^9}, {3.783834162184903*^9, 3.7838342075157394`*^9}, {3.7838342453955064`*^9, 3.7838342564437876`*^9}, {3.783834288539219*^9, 3.783834289188504*^9}, { 3.783834319888338*^9, 3.783834404011998*^9}, {3.783835274452033*^9, 3.783835643262226*^9}, 3.783835673435833*^9, {3.783837186915415*^9, 3.783837252940491*^9}, 3.783838076793089*^9, {3.7838387026691084`*^9, 3.7838387106794033`*^9}, {3.7838387751330376`*^9, 3.78383877586726*^9}, 3.7885184612710266`*^9, {3.7885197610115976`*^9, 3.788519761667694*^9}, { 3.788519815581788*^9, 3.788519877459923*^9}, {3.788519910619506*^9, 3.7885199214314795`*^9}, {3.78852990807364*^9, 3.78852991935472*^9}, { 3.788529949778452*^9, 3.7885299511123505`*^9}, 3.7885729856546545`*^9, { 3.795769635061987*^9, 3.7957696738473544`*^9}, {3.7957698528454103`*^9, 3.795769867081932*^9}, {3.7963499268904905`*^9, 3.796349974573367*^9}, { 3.8116565658363085`*^9, 3.811656579625844*^9}, {3.8116566792733173`*^9, 3.811656696847624*^9}, {3.819778974172573*^9, 3.819778996370713*^9}, { 3.819779237456471*^9, 3.819779375493654*^9}, {3.819779556474127*^9, 3.8197797185600586`*^9}, 3.8200272939729*^9, 3.8200273875005593`*^9, 3.820027421880412*^9, {3.8200275035350485`*^9, 3.8200275049354267`*^9}, { 3.8459709950905457`*^9, 3.8459710017500772`*^9}, {3.8459711689546986`*^9, 3.8459711702691975`*^9}, {3.845971286165346*^9, 3.845971289846427*^9}, { 3.8459713248880577`*^9, 3.8459714501425343`*^9}, {3.845971579506527*^9, 3.8459716159320116`*^9}}, CellLabel-> "In[134]:=",ExpressionUUID->"e0c51d33-0184-40a1-9827-18a89d3fcc9b"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"first", " ", "order", " ", "theory", " ", "defs"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{"xy_", ",", "np_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", "iy"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", "iy0_", ",", RowBox[{"{", RowBox[{"yz_", ",", "obj_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", "iy0"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "ey_", ",", "ez_"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA_", ",", "Sy_", ",", "Sz_", ",", "Iy_", ",", "Iz_", ",", "Iyz_", ",", "Jx_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "ey", ",", "ez"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA", ",", "Sy", ",", "Sz", ",", "Iy", ",", "Iz", ",", "Iyz", ",", "Jx", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "mX", ",", "mY", ",", "mZ"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "ey_", ",", "ez_"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA_", ",", "Sy_", ",", "Sz_", ",", "Iy_", ",", "Iz_", ",", "Iyz_", ",", "Jx_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "ix0", ",", "iz0", ",", "ux1", ",", "uy1", " ", ",", "uz1", " ", ",", "ux2", ",", "uy2", " ", ",", "uz2", " ", ",", "\[Theta]x1", " ", ",", "\[Theta]y1", " ", ",", "\[Theta]z1", " ", ",", "\[Theta]x2", " ", ",", "\[Theta]y2", " ", ",", "\[Theta]z2", " ", ",", "\[Delta]ux1", ",", "\[Delta]uy1", " ", ",", "\[Delta]uz1", " ", ",", "\[Delta]ux2", ",", "\[Delta]uy2", " ", ",", "\[Delta]uz2", " ", ",", "\[Delta]\[Theta]x1", " ", ",", "\[Delta]\[Theta]y1", " ", ",", "\[Delta]\[Theta]z1", " ", ",", "\[Delta]\[Theta]x2", " ", ",", "\[Delta]\[Theta]y2", " ", ",", "\[Delta]\[Theta]z2", " ", ",", "bx", ",", "by", ",", "bz", ",", "cx", ",", "cy", ",", "cz"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"ux1", ",", "uy1", ",", "uz1"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"ux2", ",", "uy2", ",", "uz2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Theta]x1", ",", "\[Theta]y1", ",", "\[Theta]z1"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Theta]x2", ",", "\[Theta]y2", ",", "\[Theta]z2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Delta]ux1", ",", "\[Delta]uy1", ",", "\[Delta]uz1"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Delta]ux2", ",", "\[Delta]uy2", ",", "\[Delta]uz2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Delta]\[Theta]x1", ",", "\[Delta]\[Theta]y1", ",", "\[Delta]\[Theta]z1"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Delta]\[Theta]x2", ",", "\[Delta]\[Theta]y2", ",", "\[Delta]\[Theta]z2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"bx", "=", RowBox[{"ix0", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"by", "=", RowBox[{"iy0", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"bz", "=", RowBox[{"iz0", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"cx", "=", RowBox[{"ix0", ".", RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"cy", "=", RowBox[{"iy0", ".", RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"cz", "=", RowBox[{"iz0", ".", RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ FractionBox["1", RowBox[{"12", " ", "AA", " ", SuperscriptBox["h0", "3"]}]], RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "12"}], " ", SuperscriptBox["AA", "2"], " ", "EE", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}], " ", RowBox[{"(", RowBox[{"\[Delta]ux1", "-", "\[Delta]ux2"}], ")"}]}], "+", RowBox[{"AA", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "bx", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{"\[Delta]ux1", "+", "\[Delta]ux2"}], ")"}]}], "+", RowBox[{"6", " ", "by", " ", SuperscriptBox["h0", "4"], " ", "\[Delta]uy1"}], "-", RowBox[{ "144", " ", "EE", " ", "Iz", " ", "uy1", " ", "\[Delta]uy1"}], "+", RowBox[{ "144", " ", "EE", " ", "Iz", " ", "uy2", " ", "\[Delta]uy1"}], "-", RowBox[{ "144", " ", "EE", " ", "Iyz", " ", "uz1", " ", "\[Delta]uy1"}], "+", RowBox[{ "144", " ", "EE", " ", "Iyz", " ", "uz2", " ", "\[Delta]uy1"}], "+", RowBox[{"6", " ", "by", " ", SuperscriptBox["h0", "4"], " ", "\[Delta]uy2"}], "+", RowBox[{ "144", " ", "EE", " ", "Iz", " ", "uy1", " ", "\[Delta]uy2"}], "-", RowBox[{ "144", " ", "EE", " ", "Iz", " ", "uy2", " ", "\[Delta]uy2"}], "+", RowBox[{ "144", " ", "EE", " ", "Iyz", " ", "uz1", " ", "\[Delta]uy2"}], "-", RowBox[{ "144", " ", "EE", " ", "Iyz", " ", "uz2", " ", "\[Delta]uy2"}], "+", RowBox[{"12", " ", "cy", " ", SuperscriptBox["h0", "3"], " ", "\[Delta]uz1"}], "+", RowBox[{"6", " ", "bz", " ", SuperscriptBox["h0", "4"], " ", "\[Delta]uz1"}], "-", RowBox[{ "144", " ", "EE", " ", "Iyz", " ", "uy1", " ", "\[Delta]uz1"}], "+", RowBox[{ "144", " ", "EE", " ", "Iyz", " ", "uy2", " ", "\[Delta]uz1"}], "-", RowBox[{ "144", " ", "EE", " ", "Iy", " ", "uz1", " ", "\[Delta]uz1"}], "+", RowBox[{ "144", " ", "EE", " ", "Iy", " ", "uz2", " ", "\[Delta]uz1"}], "-", RowBox[{"12", " ", "cy", " ", SuperscriptBox["h0", "3"], " ", "\[Delta]uz2"}], "+", RowBox[{"6", " ", "bz", " ", SuperscriptBox["h0", "4"], " ", "\[Delta]uz2"}], "+", RowBox[{ "144", " ", "EE", " ", "Iyz", " ", "uy1", " ", "\[Delta]uz2"}], "-", RowBox[{ "144", " ", "EE", " ", "Iyz", " ", "uy2", " ", "\[Delta]uz2"}], "+", RowBox[{ "144", " ", "EE", " ", "Iy", " ", "uz1", " ", "\[Delta]uz2"}], "-", RowBox[{ "144", " ", "EE", " ", "Iy", " ", "uz2", " ", "\[Delta]uz2"}], "+", RowBox[{"12", " ", "cy", " ", "ey", " ", SuperscriptBox["h0", "3"], " ", "\[Delta]\[Theta]x1"}], "+", RowBox[{"6", " ", "cx", " ", SuperscriptBox["h0", "4"], " ", "\[Delta]\[Theta]x1"}], "-", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iyz", " ", "uy1", " ", "\[Delta]\[Theta]x1"}], "+", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iz", " ", "uy1", " ", "\[Delta]\[Theta]x1"}], "+", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iyz", " ", "uy2", " ", "\[Delta]\[Theta]x1"}], "-", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iz", " ", "uy2", " ", "\[Delta]\[Theta]x1"}], "-", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iy", " ", "uz1", " ", "\[Delta]\[Theta]x1"}], "+", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iyz", " ", "uz1", " ", "\[Delta]\[Theta]x1"}], "+", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iy", " ", "uz2", " ", "\[Delta]\[Theta]x1"}], "-", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iyz", " ", "uz2", " ", "\[Delta]\[Theta]x1"}], "-", RowBox[{"12", " ", "cy", " ", "ey", " ", SuperscriptBox["h0", "3"], " ", "\[Delta]\[Theta]x2"}], "+", RowBox[{"6", " ", "cx", " ", SuperscriptBox["h0", "4"], " ", "\[Delta]\[Theta]x2"}], "+", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iyz", " ", "uy1", " ", "\[Delta]\[Theta]x2"}], "-", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iz", " ", "uy1", " ", "\[Delta]\[Theta]x2"}], "-", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iyz", " ", "uy2", " ", "\[Delta]\[Theta]x2"}], "+", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iz", " ", "uy2", " ", "\[Delta]\[Theta]x2"}], "+", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iy", " ", "uz1", " ", "\[Delta]\[Theta]x2"}], "-", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iyz", " ", "uz1", " ", "\[Delta]\[Theta]x2"}], "-", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iy", " ", "uz2", " ", "\[Delta]\[Theta]x2"}], "+", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iyz", " ", "uz2", " ", "\[Delta]\[Theta]x2"}], "-", RowBox[{"12", " ", "cz", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{"\[Delta]uy1", "-", "\[Delta]uy2", "-", RowBox[{"ez", " ", "\[Delta]\[Theta]x1"}], "+", RowBox[{"ez", " ", "\[Delta]\[Theta]x2"}]}], ")"}]}], "-", RowBox[{"bz", " ", SuperscriptBox["h0", "5"], " ", "\[Delta]\[Theta]y1"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sy", " ", "ux1", " ", "\[Delta]\[Theta]y1"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sy", " ", "ux2", " ", "\[Delta]\[Theta]y1"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "uy1", " ", "\[Delta]\[Theta]y1"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "uy2", " ", "\[Delta]\[Theta]y1"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iy", " ", "uz1", " ", "\[Delta]\[Theta]y1"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iy", " ", "uz2", " ", "\[Delta]\[Theta]y1"}], "+", RowBox[{"bz", " ", SuperscriptBox["h0", "5"], " ", "\[Delta]\[Theta]y2"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sy", " ", "ux1", " ", "\[Delta]\[Theta]y2"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sy", " ", "ux2", " ", "\[Delta]\[Theta]y2"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "uy1", " ", "\[Delta]\[Theta]y2"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "uy2", " ", "\[Delta]\[Theta]y2"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iy", " ", "uz1", " ", "\[Delta]\[Theta]y2"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iy", " ", "uz2", " ", "\[Delta]\[Theta]y2"}], "+", RowBox[{"by", " ", SuperscriptBox["h0", "5"], " ", "\[Delta]\[Theta]z1"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sz", " ", "ux1", " ", "\[Delta]\[Theta]z1"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sz", " ", "ux2", " ", "\[Delta]\[Theta]z1"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iz", " ", "uy1", " ", "\[Delta]\[Theta]z1"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iz", " ", "uy2", " ", "\[Delta]\[Theta]z1"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "uz1", " ", "\[Delta]\[Theta]z1"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "uz2", " ", "\[Delta]\[Theta]z1"}], "-", RowBox[{"by", " ", SuperscriptBox["h0", "5"], " ", "\[Delta]\[Theta]z2"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sz", " ", "ux1", " ", "\[Delta]\[Theta]z2"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sz", " ", "ux2", " ", "\[Delta]\[Theta]z2"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iz", " ", "uy1", " ", "\[Delta]\[Theta]z2"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iz", " ", "uy2", " ", "\[Delta]\[Theta]z2"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "uz1", " ", "\[Delta]\[Theta]z2"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "uz2", " ", "\[Delta]\[Theta]z2"}], "-", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iyz", " ", "\[Delta]uy1", " ", "\[Theta]x1"}], "+", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iz", " ", "\[Delta]uy1", " ", "\[Theta]x1"}], "+", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iyz", " ", "\[Delta]uy2", " ", "\[Theta]x1"}], "-", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iz", " ", "\[Delta]uy2", " ", "\[Theta]x1"}], "-", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iy", " ", "\[Delta]uz1", " ", "\[Theta]x1"}], "+", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iyz", " ", "\[Delta]uz1", " ", "\[Theta]x1"}], "+", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iy", " ", "\[Delta]uz2", " ", "\[Theta]x1"}], "-", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iyz", " ", "\[Delta]uz2", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]x1"}], "+", RowBox[{ "288", " ", "EE", " ", "ey", " ", "ez", " ", "Iyz", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iz", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]x1"}], "-", RowBox[{ "288", " ", "EE", " ", "ey", " ", "ez", " ", "Iyz", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iz", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]x1"}], "+", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "\[Delta]\[Theta]y1", " ", "\[Theta]x1"}], "-", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]y1", " ", "\[Theta]x1"}], "+", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "\[Delta]\[Theta]y2", " ", "\[Theta]x1"}], "-", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]y2", " ", "\[Theta]x1"}], "-", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]z1", " ", "\[Theta]x1"}], "+", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "\[Delta]\[Theta]z1", " ", "\[Theta]x1"}], "-", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]z2", " ", "\[Theta]x1"}], "+", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "\[Delta]\[Theta]z2", " ", "\[Theta]x1"}], "+", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iyz", " ", "\[Delta]uy1", " ", "\[Theta]x2"}], "-", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iz", " ", "\[Delta]uy1", " ", "\[Theta]x2"}], "-", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iyz", " ", "\[Delta]uy2", " ", "\[Theta]x2"}], "+", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iz", " ", "\[Delta]uy2", " ", "\[Theta]x2"}], "+", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iy", " ", "\[Delta]uz1", " ", "\[Theta]x2"}], "-", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iyz", " ", "\[Delta]uz1", " ", "\[Theta]x2"}], "-", RowBox[{ "144", " ", "EE", " ", "ey", " ", "Iy", " ", "\[Delta]uz2", " ", "\[Theta]x2"}], "+", RowBox[{ "144", " ", "EE", " ", "ez", " ", "Iyz", " ", "\[Delta]uz2", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]x2"}], "-", RowBox[{ "288", " ", "EE", " ", "ey", " ", "ez", " ", "Iyz", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iz", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]x2"}], "+", RowBox[{ "288", " ", "EE", " ", "ey", " ", "ez", " ", "Iyz", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iz", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]x2"}], "-", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "\[Delta]\[Theta]y1", " ", "\[Theta]x2"}], "+", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]y1", " ", "\[Theta]x2"}], "-", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "\[Delta]\[Theta]y2", " ", "\[Theta]x2"}], "+", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]y2", " ", "\[Theta]x2"}], "+", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]z1", " ", "\[Theta]x2"}], "-", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "\[Delta]\[Theta]z1", " ", "\[Theta]x2"}], "+", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]z2", " ", "\[Theta]x2"}], "-", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "\[Delta]\[Theta]z2", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sy", " ", "\[Delta]ux1", " ", "\[Theta]y1"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sy", " ", "\[Delta]ux2", " ", "\[Theta]y1"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "\[Delta]uy1", " ", "\[Theta]y1"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "\[Delta]uy2", " ", "\[Theta]y1"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iy", " ", "\[Delta]uz1", " ", "\[Theta]y1"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iy", " ", "\[Delta]uz2", " ", "\[Theta]y1"}], "+", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]y1"}], "-", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]y1"}], "-", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]y1"}], "+", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]y1"}], "-", RowBox[{"48", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iy", " ", "\[Delta]\[Theta]y1", " ", "\[Theta]y1"}], "-", RowBox[{"24", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iy", " ", "\[Delta]\[Theta]y2", " ", "\[Theta]y1"}], "+", RowBox[{"48", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iyz", " ", "\[Delta]\[Theta]z1", " ", "\[Theta]y1"}], "+", RowBox[{"24", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iyz", " ", "\[Delta]\[Theta]z2", " ", "\[Theta]y1"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sy", " ", "\[Delta]ux1", " ", "\[Theta]y2"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sy", " ", "\[Delta]ux2", " ", "\[Theta]y2"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "\[Delta]uy1", " ", "\[Theta]y2"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "\[Delta]uy2", " ", "\[Theta]y2"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iy", " ", "\[Delta]uz1", " ", "\[Theta]y2"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iy", " ", "\[Delta]uz2", " ", "\[Theta]y2"}], "+", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]y2"}], "-", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]y2"}], "-", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]y2"}], "+", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]y2"}], "-", RowBox[{"24", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iy", " ", "\[Delta]\[Theta]y1", " ", "\[Theta]y2"}], "-", RowBox[{"48", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iy", " ", "\[Delta]\[Theta]y2", " ", "\[Theta]y2"}], "+", RowBox[{"24", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iyz", " ", "\[Delta]\[Theta]z1", " ", "\[Theta]y2"}], "+", RowBox[{"48", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iyz", " ", "\[Delta]\[Theta]z2", " ", "\[Theta]y2"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sz", " ", "\[Delta]ux1", " ", "\[Theta]z1"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sz", " ", "\[Delta]ux2", " ", "\[Theta]z1"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iz", " ", "\[Delta]uy1", " ", "\[Theta]z1"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iz", " ", "\[Delta]uy2", " ", "\[Theta]z1"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "\[Delta]uz1", " ", "\[Theta]z1"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "\[Delta]uz2", " ", "\[Theta]z1"}], "-", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]z1"}], "+", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]z1"}], "+", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]z1"}], "-", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]z1"}], "+", RowBox[{"48", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iyz", " ", "\[Delta]\[Theta]y1", " ", "\[Theta]z1"}], "+", RowBox[{"24", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iyz", " ", "\[Delta]\[Theta]y2", " ", "\[Theta]z1"}], "-", RowBox[{"48", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iz", " ", "\[Delta]\[Theta]z1", " ", "\[Theta]z1"}], "-", RowBox[{"24", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iz", " ", "\[Delta]\[Theta]z2", " ", "\[Theta]z1"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sz", " ", "\[Delta]ux1", " ", "\[Theta]z2"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Sz", " ", "\[Delta]ux2", " ", "\[Theta]z2"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iz", " ", "\[Delta]uy1", " ", "\[Theta]z2"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iz", " ", "\[Delta]uy2", " ", "\[Theta]z2"}], "-", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "\[Delta]uz1", " ", "\[Theta]z2"}], "+", RowBox[{ "72", " ", "EE", " ", "h0", " ", "Iyz", " ", "\[Delta]uz2", " ", "\[Theta]z2"}], "-", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]z2"}], "+", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "\[Delta]\[Theta]x1", " ", "\[Theta]z2"}], "+", RowBox[{ "72", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]z2"}], "-", RowBox[{ "72", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "\[Delta]\[Theta]x2", " ", "\[Theta]z2"}], "+", RowBox[{"24", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iyz", " ", "\[Delta]\[Theta]y1", " ", "\[Theta]z2"}], "+", RowBox[{"48", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iyz", " ", "\[Delta]\[Theta]y2", " ", "\[Theta]z2"}], "-", RowBox[{"24", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iz", " ", "\[Delta]\[Theta]z1", " ", "\[Theta]z2"}], "-", RowBox[{"48", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iz", " ", "\[Delta]\[Theta]z2", " ", "\[Theta]z2"}]}], ")"}]}], "-", RowBox[{"6", " ", RowBox[{"(", RowBox[{ RowBox[{"Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "\[Delta]uz1"}], "-", RowBox[{"2", " ", "\[Delta]uz2"}], "+", RowBox[{"2", " ", "ey", " ", "\[Delta]\[Theta]x1"}], "-", RowBox[{"2", " ", "ey", " ", "\[Delta]\[Theta]x2"}], "-", RowBox[{"h0", " ", "\[Delta]\[Theta]y1"}], "-", RowBox[{"h0", " ", "\[Delta]\[Theta]y2"}]}], ")"}]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "\[Delta]uy1"}], "-", RowBox[{"2", " ", "\[Delta]uy2"}], "-", RowBox[{"2", " ", "ez", " ", "\[Delta]\[Theta]x1"}], "+", RowBox[{"2", " ", "ez", " ", "\[Delta]\[Theta]x2"}], "+", RowBox[{"h0", " ", "\[Delta]\[Theta]z1"}], "+", RowBox[{"h0", " ", "\[Delta]\[Theta]z2"}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"bx", " ", SuperscriptBox["h0", "3"]}], "-", RowBox[{"6", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uz1"}], "-", RowBox[{"2", " ", "uz2"}], "+", RowBox[{"2", " ", "ey", " ", "\[Theta]x1"}], "-", RowBox[{"2", " ", "ey", " ", "\[Theta]x2"}], "-", RowBox[{"h0", " ", "\[Theta]y1"}], "-", RowBox[{"h0", " ", "\[Theta]y2"}]}], ")"}]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uy1"}], "-", RowBox[{"2", " ", "uy2"}], "-", RowBox[{"2", " ", "ez", " ", "\[Theta]x1"}], "+", RowBox[{"2", " ", "ez", " ", "\[Theta]x2"}], "+", RowBox[{"h0", " ", "\[Theta]z1"}], "+", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}]}]}]], "Input", CellChangeTimes->{{3.4430689313272*^9, 3.4430690080792*^9}, { 3.4430690869528*^9, 3.4430691077320004`*^9}, {3.4430691700116*^9, 3.4430691708072*^9}, {3.4430692071717997`*^9, 3.443069246359*^9}, { 3.4430772782732*^9, 3.4430773623416*^9}, {3.4430773978316*^9, 3.4430774104676*^9}, {3.4430775053780003`*^9, 3.4430776180598*^9}, { 3.4434109099524*^9, 3.4434109159584*^9}, {3.4438800815346003`*^9, 3.4438802689304*^9}, {3.443880362624*^9, 3.4438803824516*^9}, { 3.443929565615374*^9, 3.443929570232974*^9}, {3.443935321321974*^9, 3.443935335705174*^9}, {3.443935419945174*^9, 3.443935421489574*^9}, { 3.443935494013974*^9, 3.443935494715974*^9}, {3.443935617565974*^9, 3.4439357217895737`*^9}, {3.443935755360774*^9, 3.443935816107174*^9}, { 3.443942155230774*^9, 3.443942209939974*^9}, {3.443942305710374*^9, 3.4439423142123737`*^9}, {3.4439442908131742`*^9, 3.443944441181574*^9}, { 3.4439447830065737`*^9, 3.4439447917425737`*^9}, {3.443944908541774*^9, 3.443944916060974*^9}, {3.4442731097938004`*^9, 3.4442731115254*^9}, { 3.444273189229*^9, 3.4442732700526*^9}, {3.4442748430004*^9, 3.4442748605036*^9}, {3.4442748977438*^9, 3.4442748989762*^9}, { 3.4442749340762*^9, 3.4442749351057997`*^9}, 3.4442752313382*^9, { 3.4442919702026*^9, 3.4442919911846*^9}, {3.4442921151577997`*^9, 3.4442921271074*^9}, {3.4443811023684*^9, 3.4443811036632*^9}, { 3.4443814073171997`*^9, 3.4443814402956*^9}, {3.4443815036316*^9, 3.4443815147855997`*^9}, {3.4443815537232*^9, 3.4443815747676*^9}, { 3.4443816138143997`*^9, 3.444381633174*^9}, {3.4443816850439997`*^9, 3.4443817801728*^9}, 3.4443853618688*^9, {3.4443855607376003`*^9, 3.4443856337924*^9}, {3.4443861200444*^9, 3.4443861523676*^9}, { 3.4443862280495996`*^9, 3.444386291448*^9}, {3.4443864047352*^9, 3.4443864135336*^9}, {3.4443870026832*^9, 3.4443870095316*^9}, { 3.4444082055056*^9, 3.4444082437412*^9}, {3.4444082797148*^9, 3.4444084583816*^9}, {3.4444084889108*^9, 3.4444085087539997`*^9}, { 3.444408942517*^9, 3.4444089563386*^9}, {3.4444091419564*^9, 3.4444091647167997`*^9}, {3.4444092206428003`*^9, 3.4444092944463997`*^9}, {3.4444093856284*^9, 3.4444094281071997`*^9}, { 3.4444094976988*^9, 3.4444095275104*^9}, {3.444409611064*^9, 3.4444096125772*^9}, 3.4444098504616003`*^9, {3.444409913392*^9, 3.4444099166056004`*^9}, 3.4444100178496*^9, {3.4444103063248*^9, 3.4444103358712*^9}, {3.4444103868208*^9, 3.4444104432460003`*^9}, { 3.4444921219564*^9, 3.4444921256224003`*^9}, {3.444492194824*^9, 3.4444921973668003`*^9}, {3.4444922814351997`*^9, 3.4444922853508*^9}, { 3.4444923330868*^9, 3.4444923345844*^9}, {3.444492366424*^9, 3.4444923855808*^9}, {3.4453153475226*^9, 3.445315360689*^9}, { 3.4465518166373653`*^9, 3.446551863016165*^9}, {3.446551894231765*^9, 3.446552159384965*^9}, {3.446552232377365*^9, 3.4465522555589647`*^9}, { 3.446553347388365*^9, 3.4465533616155653`*^9}, {3.4466058525769997`*^9, 3.4466058529046*^9}, {3.4466064371219997`*^9, 3.4466065097244*^9}, { 3.4466127725788*^9, 3.4466127766036*^9}, {3.4466128124835997`*^9, 3.4466130037864*^9}, {3.4466131532696*^9, 3.4466131761703997`*^9}, { 3.4466133992192*^9, 3.4466134478756*^9}, {3.446613483584*^9, 3.4466134932092*^9}, {3.4466135740952*^9, 3.4466135794927998`*^9}, { 3.4466137283948*^9, 3.4466137341356*^9}, {3.4466138994342003`*^9, 3.4466139023826*^9}, {3.4466139549858*^9, 3.4466139579653997`*^9}, { 3.4466142109818*^9, 3.4466142245226*^9}, {3.4466142793878*^9, 3.4466143652033997`*^9}, {3.4466144712834*^9, 3.4466145978929996`*^9}, { 3.4466146992618*^9, 3.4466147509914*^9}, {3.4466151283086*^9, 3.4466152768986*^9}, {3.4466153107506*^9, 3.4466153406558*^9}, { 3.4466194331976*^9, 3.4466194377528*^9}, {3.4466194847712*^9, 3.446619488718*^9}, {3.4466389495861998`*^9, 3.4466389768238*^9}, { 3.4466391218414*^9, 3.446639306561*^9}, {3.4466393990222*^9, 3.4466394004886*^9}, {3.4466394475694*^9, 3.4466394487706003`*^9}, { 3.4466395034174*^9, 3.4466395049462*^9}, 3.4466395515755997`*^9, { 3.4466396000176*^9, 3.4466396190808*^9}, {3.4466397459088*^9, 3.446639748826*^9}, {3.4466397974356003`*^9, 3.446639798668*^9}, 3.4466398447816*^9, {3.446639894218*^9, 3.4466399201556*^9}, { 3.4466399570964003`*^9, 3.4466399583288*^9}, {3.446639994006*^9, 3.4466400056904*^9}, {3.4466400383568*^9, 3.4466400395892*^9}, { 3.4466400745643997`*^9, 3.4466401025976*^9}, {3.4466401660834*^9, 3.4466401806070004`*^9}, {3.4466402251294003`*^9, 3.446640227407*^9}, { 3.446640260479*^9, 3.4466402657674*^9}, {3.4466404133122*^9, 3.4466405185654*^9}, 3.4466405830462*^9, {3.4467273294214*^9, 3.4467273777813997`*^9}, {3.4467274366558*^9, 3.4467275620954*^9}, { 3.446727593311*^9, 3.4467277412614*^9}, {3.4467283334639997`*^9, 3.4467283356012*^9}, {3.4467283707636003`*^9, 3.4467283727604*^9}, { 3.4467289882664003`*^9, 3.4467291276836*^9}, {3.446778464322*^9, 3.4467786797424*^9}, {3.4467801953803997`*^9, 3.4467802409792*^9}, { 3.4467802998691998`*^9, 3.4467804023456*^9}, 3.4467804345596*^9, { 3.4467808656344*^9, 3.4467808670852003`*^9}, 3.4467818107525997`*^9, { 3.446781855509*^9, 3.446781874385*^9}, {3.4467826737914*^9, 3.4467827381726*^9}, {3.4467828623018*^9, 3.4467831045386*^9}, { 3.4470344113984003`*^9, 3.4470344123344*^9}, {3.4470344628316*^9, 3.4470345343108*^9}, {3.447043591118539*^9, 3.447043642192939*^9}, { 3.447045649625739*^9, 3.447045718437339*^9}, {3.447054774023939*^9, 3.447054834198939*^9}, {3.4470549103449388`*^9, 3.4470549116169386`*^9}, { 3.447054943902939*^9, 3.4470553027109385`*^9}, {3.447055334559939*^9, 3.447055353684939*^9}, {3.447057311918539*^9, 3.447057369747739*^9}, { 3.4470575058577385`*^9, 3.4470575951365385`*^9}, {3.4470581848789387`*^9, 3.4470582040825386`*^9}, {3.451276121243*^9, 3.4512761425838003`*^9}, { 3.4512762022382*^9, 3.4512762064346*^9}, {3.4512762476966*^9, 3.4512762827654*^9}, {3.451276489091*^9, 3.451276541975*^9}, { 3.4512765853118*^9, 3.4512766132046003`*^9}, {3.4512773470306*^9, 3.4512773766082*^9}, {3.4512776069110003`*^9, 3.4512777499318*^9}, 3.4512777831286*^9, {3.4512778785538*^9, 3.451277881627*^9}, { 3.4512780242734003`*^9, 3.4512780302794*^9}, 3.4512780737878*^9, { 3.4512781866226*^9, 3.4512781930810003`*^9}, {3.4512863325078*^9, 3.4512863539266*^9}, {3.4568019250434*^9, 3.4568022712698*^9}, { 3.4568023177422*^9, 3.4568024125278*^9}, {3.4568024694365997`*^9, 3.4568024750369997`*^9}, {3.4568026914402*^9, 3.4568028101094*^9}, { 3.4568028406698*^9, 3.4568028564726*^9}, 3.4568028886085997`*^9, { 3.4568030489454*^9, 3.4568030800986*^9}, 3.4568032004128*^9, { 3.4568035073698*^9, 3.4568035176034*^9}, {3.4568040146596003`*^9, 3.4568040844852*^9}, {3.4568043016684*^9, 3.4568043154744*^9}, { 3.4568045482264*^9, 3.4568045486632*^9}, {3.4568048944996*^9, 3.4568049806116*^9}, {3.4660560628582*^9, 3.4660560753538*^9}, { 3.4660676729379997`*^9, 3.4660676735931997`*^9}, {3.4660677244024*^9, 3.4660677277251997`*^9}, {3.4742646771287394`*^9, 3.47426469439174*^9}, { 3.47426489921974*^9, 3.4742649800437393`*^9}, {3.4801246373348*^9, 3.4801246860536003`*^9}, {3.4801247748176003`*^9, 3.4801247821028*^9}, { 3.4801248161264*^9, 3.4801248295736*^9}, {3.4801248810692*^9, 3.4801248964508*^9}, {3.4801249330484*^9, 3.480124947884*^9}, 3.4801249886468*^9, {3.4801251139147997`*^9, 3.48012512588*^9}, { 3.4838339444988003`*^9, 3.4838339567448*^9}, 3.4838341692012*^9, { 3.4838344350408*^9, 3.4838344353684*^9}, {3.4938987575920324`*^9, 3.4938987586840324`*^9}, {3.4941630624049997`*^9, 3.4941631381274*^9}, { 3.4941632311345997`*^9, 3.4941632492306004`*^9}, 3.4941633249217997`*^9, { 3.4941633940922003`*^9, 3.4941634063538*^9}, {3.4941634538402*^9, 3.4941635051642*^9}, {3.494163565115*^9, 3.4941636341762*^9}, { 3.4941636853442*^9, 3.4941639323234*^9}, {3.4941640277798*^9, 3.4941641455754004`*^9}, {3.4941641790374002`*^9, 3.4941641803789997`*^9}, {3.4941642676142*^9, 3.4941643277678003`*^9}, 3.4941644677018003`*^9, {3.4941646208938*^9, 3.4941646322349997`*^9}, { 3.4941652592693996`*^9, 3.4941652807194*^9}, {3.4941653119038*^9, 3.494165416299*^9}, {3.494165453895*^9, 3.4941654544722*^9}, { 3.4950990979779997`*^9, 3.495099142701*^9}, {3.495099172958*^9, 3.4950991806289997`*^9}, {3.495099227097*^9, 3.495099238113*^9}, 3.495099290797*^9, {3.495099346084*^9, 3.495099359507*^9}, { 3.495099456308*^9, 3.495099464091*^9}, 3.495099683108*^9, { 3.495100428112*^9, 3.495100434958*^9}, {3.4951006496219997`*^9, 3.495100649992*^9}, {3.4987235265018*^9, 3.4987235939094*^9}, { 3.4987236420666*^9, 3.4987236530646*^9}, {3.4987237305341997`*^9, 3.4987237396914*^9}, {3.498733136159*^9, 3.4987332972446003`*^9}, { 3.4987364783094*^9, 3.4987364860626*^9}, {3.4987366201134*^9, 3.4987366236078*^9}, {3.4987367272386*^9, 3.4987367464890003`*^9}, { 3.4987369428462*^9, 3.4987369670886*^9}, {3.4987370134518003`*^9, 3.4987370259941998`*^9}, {3.4987370944002*^9, 3.4987371027618*^9}, { 3.4987371921029997`*^9, 3.498737193663*^9}, {3.4987372660938*^9, 3.4987372935498*^9}, {3.4987373290554*^9, 3.4987377176202*^9}, { 3.4987377520182*^9, 3.4987379139462*^9}, {3.4987382030216*^9, 3.4987382667078*^9}, {3.4987888391818*^9, 3.4987888608346*^9}, { 3.4988785131146*^9, 3.4988785160162*^9}, {3.5007170967096*^9, 3.5007170999076*^9}, 3.5007182237316*^9, {3.5007182772864*^9, 3.5007182987832003`*^9}, {3.5009573226744003`*^9, 3.5009573940444*^9}, 3.5009574358710003`*^9, 3.5009604278482*^9, {3.5009897246173353`*^9, 3.5009898480289354`*^9}, {3.5009901464413357`*^9, 3.5009901475333357`*^9}, {3.5009901801997356`*^9, 3.500990274096135*^9}, { 3.5010475253292*^9, 3.5010475852332*^9}, {3.5010605722018003`*^9, 3.5010606739762*^9}, {3.5010607202146*^9, 3.5010607323358*^9}, { 3.5010607920526*^9, 3.501061118467*^9}, {3.5010612022078*^9, 3.5010612277138*^9}, {3.5010616467766*^9, 3.5010617938534*^9}, { 3.5010618406222*^9, 3.5010619950778*^9}, {3.5010621500638*^9, 3.5010622514014*^9}, {3.5010625292218*^9, 3.5010625409374*^9}, { 3.5010626043046*^9, 3.5010626313862*^9}, {3.5010626787166*^9, 3.5010626790754004`*^9}, {3.501074457561*^9, 3.5010744671082*^9}, 3.5010763029458*^9, {3.5032210899309998`*^9, 3.5032212413900003`*^9}, { 3.557658203404973*^9, 3.557658219644601*^9}, {3.5576584433801947`*^9, 3.557658496030287*^9}, {3.5576585501779823`*^9, 3.5576586046064777`*^9}, { 3.557658648910555*^9, 3.557658754600741*^9}, {3.557658963945511*^9, 3.5576589782507353`*^9}, {3.557659009949991*^9, 3.5576591437514267`*^9}, { 3.557659182221094*^9, 3.5576592187719584`*^9}, 3.557659413865901*^9, { 3.557659921100792*^9, 3.5576599556392527`*^9}, {3.557660706920972*^9, 3.5576607248454037`*^9}, {3.557661209085854*^9, 3.557661209413454*^9}, { 3.5577526651911488`*^9, 3.5577526932087984`*^9}, {3.5577527272480583`*^9, 3.557752747122493*^9}, {3.5577528374934516`*^9, 3.557752838523053*^9}, { 3.557752881204728*^9, 3.557752891313546*^9}, {3.557752938612829*^9, 3.5577529469120436`*^9}, {3.557753060714244*^9, 3.557753062633047*^9}, { 3.5577536609544907`*^9, 3.5577536637936954`*^9}, {3.5577537824631042`*^9, 3.557753810184353*^9}, {3.557753841025607*^9, 3.5577540648392*^9}, 3.5577541920574236`*^9, {3.5577547033327217`*^9, 3.557754716967146*^9}, { 3.5577547716296415`*^9, 3.557754802112095*^9}, {3.5577549509363565`*^9, 3.5577549771444025`*^9}, 3.5577551382302856`*^9, {3.55775527184452*^9, 3.557755272858522*^9}, {3.557755881555991*^9, 3.557755886548*^9}, { 3.557756158316077*^9, 3.557756231885806*^9}, {3.5577572408487787`*^9, 3.557757248835993*^9}, {3.5577572834368534`*^9, 3.5577575888229895`*^9}, { 3.5577578129641833`*^9, 3.557757862837471*^9}, {3.557758025514557*^9, 3.557758079272251*^9}, 3.557810586960072*^9, {3.5578240262005973`*^9, 3.5578240345360737`*^9}, {3.557824091429328*^9, 3.5578241008156557`*^9}, { 3.557831525255726*^9, 3.5578315319793377`*^9}, 3.5578315716190076`*^9, { 3.557831606079468*^9, 3.557831629432709*^9}, {3.5578316663267736`*^9, 3.5578317569473333`*^9}, {3.5578322144181366`*^9, 3.557832218084143*^9}, { 3.557836356693412*^9, 3.557836473771618*^9}, {3.5578365201660995`*^9, 3.5578365974018345`*^9}, {3.5578366426731143`*^9, 3.557836658865943*^9}, { 3.557836691017599*^9, 3.5578367924957776`*^9}, {3.5578368305442443`*^9, 3.557836888279946*^9}, {3.5578369382156334`*^9, 3.5578370776642785`*^9}, { 3.5578383536061196`*^9, 3.5578383735117545`*^9}, {3.5578385892445335`*^9, 3.5578385978869486`*^9}, {3.5578386713006773`*^9, 3.557838700113928*^9}, { 3.5578387451200075`*^9, 3.5578387467892103`*^9}, {3.5578388951454706`*^9, 3.5578389248635225`*^9}, {3.5578389679351983`*^9, 3.557838983535226*^9}, { 3.5578390227692947`*^9, 3.557839023143696*^9}, {3.557839097696226*^9, 3.5578391125162525`*^9}, {3.5578391553539276`*^9, 3.557839199892006*^9}, { 3.55783924184048*^9, 3.557839294490572*^9}, {3.5578393285922318`*^9, 3.557839398683155*^9}, {3.557839430522811*^9, 3.557839470162481*^9}, { 3.5578395370865984`*^9, 3.5578395446994114`*^9}, {3.5578396068499207`*^9, 3.5578396118575296`*^9}, 3.5578943518105097`*^9, {3.557894388361374*^9, 3.5578944029629993`*^9}, {3.5578944607611012`*^9, 3.5578944989499683`*^9}, {3.5578945393696394`*^9, 3.557894561537278*^9}, { 3.5578946028617506`*^9, 3.5578946188985786`*^9}, {3.557894650894235*^9, 3.5578947812636642`*^9}, {3.55789481884413*^9, 3.5578948191249304`*^9}, { 3.5578949768100076`*^9, 3.5578949836272197`*^9}, {3.5578967386805477`*^9, 3.55789678549623*^9}, {3.5578968804691963`*^9, 3.557896888643611*^9}, { 3.557897022491846*^9, 3.5578970341450663`*^9}, {3.557897620940097*^9, 3.55789765120415*^9}, {3.5579218072271147`*^9, 3.5579218263059483`*^9}, { 3.557922095312821*^9, 3.557922116965659*^9}, {3.557922178086566*^9, 3.557922188616585*^9}, {3.5579223258812256`*^9, 3.557922327066828*^9}, { 3.5579224596046605`*^9, 3.557922461804264*^9}, 3.5579805928465395`*^9, { 3.5579815200581703`*^9, 3.557981541711009*^9}, 3.557985544779242*^9, { 3.5579863164793987`*^9, 3.5579863339514294`*^9}, {3.557986523210962*^9, 3.557986568841042*^9}, 3.5579866122559185`*^9, 3.557986993536188*^9, { 3.5579871244716187`*^9, 3.5579871290580263`*^9}, 3.557987173486905*^9, 3.5579872166989803`*^9, {3.5599618621582537`*^9, 3.5599618642486577`*^9}, { 3.559961969720443*^9, 3.5599619894700775`*^9}, 3.559963611089726*^9, { 3.5601298891258235`*^9, 3.560129889422224*^9}, {3.560132445157113*^9, 3.5601324458591146`*^9}, {3.561978472080926*^9, 3.561978472392926*^9}, { 3.6297802564412937`*^9, 3.6297802957377625`*^9}, {3.62978033369263*^9, 3.629780429741998*^9}, {3.6297805790030603`*^9, 3.6297809429048996`*^9}, { 3.629780987957779*^9, 3.629781197575347*^9}, {3.629781240397422*^9, 3.629781337663593*^9}, {3.6297813946972933`*^9, 3.6297814529165955`*^9}, { 3.6297814952550697`*^9, 3.629781527578326*^9}, {3.62978162025529*^9, 3.629781647633338*^9}, {3.629781678833393*^9, 3.629781763120341*^9}, 3.6297818028224106`*^9, {3.6297818432108817`*^9, 3.629781872570133*^9}, { 3.629782355765382*^9, 3.629782427603508*^9}, {3.6297824692243814`*^9, 3.629782674863942*^9}, {3.629782707218399*^9, 3.6297829295343895`*^9}, { 3.629783005631323*^9, 3.6297830574702144`*^9}, {3.6297831098551064`*^9, 3.629783142786764*^9}, {3.629783433711675*^9, 3.629783442619291*^9}, { 3.6297834942397814`*^9, 3.6297835175930223`*^9}, 3.6297835794939313`*^9, { 3.6297836160291953`*^9, 3.6297837668970604`*^9}, {3.6297842042438283`*^9, 3.6297842697483435`*^9}, {3.6297843514456873`*^9, 3.629784370742921*^9}, { 3.629784443829049*^9, 3.6297844678842916`*^9}, {3.6297845252611923`*^9, 3.629784525588793*^9}, {3.6297846136821475`*^9, 3.629784629235375*^9}, { 3.629784814797701*^9, 3.629784927648299*^9}, {3.629785259960083*^9, 3.6297852602096834`*^9}, {3.6297858780175686`*^9, 3.629785917282837*^9}, { 3.629786048057867*^9, 3.629786048681868*^9}, 3.6297863278755584`*^9, { 3.6297867047133856`*^9, 3.629786748533863*^9}, {3.6297867791567163`*^9, 3.6297868491540394`*^9}, {3.6297875320748396`*^9, 3.629787569795706*^9}, { 3.6297876247234025`*^9, 3.6297877281983843`*^9}, {3.6297877681812544`*^9, 3.629787774015665*^9}, {3.629787831408166*^9, 3.6297878355265727`*^9}, { 3.6297878775686464`*^9, 3.6297878861174617`*^9}, {3.6297879185343184`*^9, 3.629787919064719*^9}, {3.6297880043032694`*^9, 3.62978800470887*^9}, 3.6297880488257475`*^9, {3.6297882100052304`*^9, 3.6297882174776435`*^9}, { 3.6297882697533355`*^9, 3.6297882948381796`*^9}, {3.6297883467550707`*^9, 3.6297883991087627`*^9}, {3.6297887361785545`*^9, 3.629788783961438*^9}, 3.629788825395111*^9, {3.629789006152629*^9, 3.6297890321266747`*^9}, { 3.6297891133248167`*^9, 3.629789145336073*^9}, {3.6297891926821566`*^9, 3.629789194257759*^9}, {3.629789255316266*^9, 3.6297892556282673`*^9}, { 3.629869102295367*^9, 3.629869160124668*^9}, {3.6298691942887287`*^9, 3.6298696149902673`*^9}, {3.6298696993864155`*^9, 3.62986975897852*^9}, { 3.6298698387726603`*^9, 3.629869912030389*^9}, {3.6298700722270703`*^9, 3.629870234560955*^9}, {3.629870580429163*^9, 3.629870630458451*^9}, { 3.630556081081209*^9, 3.630556104902451*^9}, {3.6305562643503313`*^9, 3.6305562763935523`*^9}, {3.6305563415080667`*^9, 3.630556480956712*^9}, { 3.630556692851884*^9, 3.630556695347888*^9}, {3.630556730042349*^9, 3.630556914528273*^9}, {3.6305653725974936`*^9, 3.6305656807121167`*^9}, { 3.630565758760581*^9, 3.6305657739024467`*^9}, {3.630565858170267*^9, 3.63056596644846*^9}, {3.6305661502619734`*^9, 3.6305661523230915`*^9}, { 3.6305662653385553`*^9, 3.630566370352562*^9}, {3.6305667786019125`*^9, 3.630566790535595*^9}, {3.6305668214773645`*^9, 3.630567044691132*^9}, { 3.6305670772499943`*^9, 3.6305670783710585`*^9}, 3.630567272031135*^9, { 3.630567303902958*^9, 3.630567409875019*^9}, {3.630568671196477*^9, 3.6305687195002403`*^9}, {3.6305687542132254`*^9, 3.630568758623478*^9}, { 3.630568855671028*^9, 3.630568859250233*^9}, {3.630569706514694*^9, 3.630569775526641*^9}, 3.630569982346471*^9, {3.6305701679130845`*^9, 3.630570205199217*^9}, {3.6305703751399374`*^9, 3.630570526177576*^9}, { 3.630587657039589*^9, 3.630587688367381*^9}, {3.6305880733027773`*^9, 3.6305883365376396`*^9}, {3.6305886689118233`*^9, 3.6305886717978287`*^9}, 3.6305889776831656`*^9, {3.6305890389444733`*^9, 3.6305890437180815`*^9}, { 3.630589093248169*^9, 3.6305891296430326`*^9}, 3.630589181700324*^9, { 3.6305892509956455`*^9, 3.6305892594820604`*^9}, {3.630589318949365*^9, 3.6305893334729905`*^9}, {3.630589630294712*^9, 3.6305896376267247`*^9}, { 3.630589683288005*^9, 3.630589684988408*^9}, {3.630597310538067*^9, 3.630597340080757*^9}, {3.630597391446695*^9, 3.630597400596218*^9}, { 3.6305974350611897`*^9, 3.6305974605306463`*^9}, {3.630633997622449*^9, 3.630634003125764*^9}, {3.630659322217756*^9, 3.63065932438616*^9}, { 3.6306611578252783`*^9, 3.6306611625988865`*^9}, {3.6306612541554475`*^9, 3.630661257587454*^9}, {3.6306613001287284`*^9, 3.6306613026715326`*^9}, { 3.6306613920752897`*^9, 3.6306613949768953`*^9}, {3.6306706377509866`*^9, 3.630670654957817*^9}, {3.6306749981919994`*^9, 3.630675005793434*^9}, { 3.6306751229631357`*^9, 3.630675150017683*^9}, {3.6306752035287437`*^9, 3.6306752096180925`*^9}, {3.630675315921172*^9, 3.6306753201514144`*^9}, { 3.6306757793287754`*^9, 3.6306757796257925`*^9}, {3.630675814406262*^9, 3.6306758147026625`*^9}, {3.6306760107574763`*^9, 3.6306760154417443`*^9}, {3.6306789722320743`*^9, 3.6306789870309205`*^9}, {3.6306790257051325`*^9, 3.630679028076268*^9}, { 3.6306800259177256`*^9, 3.6306800406129513`*^9}, {3.6306801239326982`*^9, 3.6306801300167084`*^9}, {3.630680769261832*^9, 3.6306807806186523`*^9}, { 3.630681157468514*^9, 3.6306811577649145`*^9}, {3.6306812744219193`*^9, 3.63068127471832*^9}, {3.6306817187418995`*^9, 3.6306817919060287`*^9}, { 3.630681879188182*^9, 3.6306819111526375`*^9}, {3.6306821191790032`*^9, 3.6306821283050194`*^9}, {3.630720543651497*^9, 3.6307205534300566`*^9}, { 3.630721035525631*^9, 3.630721092774905*^9}, {3.6307212510439577`*^9, 3.6307213064777765`*^9}, {3.6307477437169704`*^9, 3.6307478284095197`*^9}, {3.6307478614971776`*^9, 3.6307478785948076`*^9}, {3.6307479884814005`*^9, 3.630748002880226*^9}, { 3.630748045624301*^9, 3.630748063876333*^9}, {3.630748111596817*^9, 3.6307481498324842`*^9}, {3.6307489182430334`*^9, 3.6307489447786803`*^9}, {3.630749037427243*^9, 3.6307490443848553`*^9}, { 3.6307491041485605`*^9, 3.6307491384218206`*^9}, {3.6307491914151134`*^9, 3.630749196890723*^9}, {3.6307492445800066`*^9, 3.6307493439989815`*^9}, { 3.630749396212273*^9, 3.6307494766304145`*^9}, {3.6307495333989143`*^9, 3.6307495547241516`*^9}, {3.6307496525831237`*^9, 3.630749669571553*^9}, { 3.630750220602922*^9, 3.6307502881822405`*^9}, {3.6307510631916018`*^9, 3.630751068292811*^9}, {3.6307511226589065`*^9, 3.630751137962533*^9}, { 3.6307512555243397`*^9, 3.630751282777588*^9}, {3.630752266971757*^9, 3.630752414599744*^9}, {3.630752446407563*^9, 3.630752457388191*^9}, { 3.6307589380050273`*^9, 3.6307590266300964`*^9}, {3.6307591666721067`*^9, 3.63075923229886*^9}, 3.630760288282259*^9, {3.6307603547370596`*^9, 3.630760557414652*^9}, {3.630760654134184*^9, 3.63076065510824*^9}, { 3.6307606911683025`*^9, 3.6307606919283457`*^9}, {3.6307607642334814`*^9, 3.6307607648645177`*^9}, {3.630761455000991*^9, 3.6307614616743727`*^9}, { 3.630761507825012*^9, 3.630761605776615*^9}, {3.630761652999316*^9, 3.630761695865768*^9}, {3.630761771278081*^9, 3.6307617792215357`*^9}, 3.6307629478424797`*^9, {3.632205207880766*^9, 3.6322052561155243`*^9}, { 3.6322052892474194`*^9, 3.6322052915745525`*^9}, 3.6322053746993074`*^9, { 3.6322062705415463`*^9, 3.6322062726016645`*^9}, {3.6322063396935015`*^9, 3.63220636484194*^9}, {3.6322064410612993`*^9, 3.6322064491667633`*^9}, { 3.632206580308264*^9, 3.6322066373275256`*^9}, {3.6322066736436024`*^9, 3.6322067467737856`*^9}, {3.632206782260815*^9, 3.6322071351279984`*^9}, 3.6322071989226465`*^9, {3.632207270393735*^9, 3.6322073359894867`*^9}, { 3.6322073997741346`*^9, 3.6322074126708727`*^9}, {3.632207491777397*^9, 3.632207682289294*^9}, {3.632207809621577*^9, 3.632207827973626*^9}, { 3.6322079043859973`*^9, 3.6322079279443445`*^9}, {3.6322080916397076`*^9, 3.6322081666649985`*^9}, 3.634905258940913*^9, {3.634905370524296*^9, 3.6349054089004903`*^9}, {3.6349054472556844`*^9, 3.63490544787272*^9}, { 3.634905483492757*^9, 3.6349055164646425`*^9}, {3.634905574352954*^9, 3.634905628121029*^9}, {3.6349057012822137`*^9, 3.6349057207913294`*^9}, { 3.6349061371061416`*^9, 3.634906354438572*^9}, {3.6349063890455513`*^9, 3.6349064369332905`*^9}, {3.634906537696054*^9, 3.634906601859724*^9}, 3.634906706128688*^9, {3.6349069249442034`*^9, 3.6349069328326545`*^9}, { 3.6349070151973653`*^9, 3.6349070242298822`*^9}, {3.6349070817921743`*^9, 3.6349070822111983`*^9}, {3.634907723288866*^9, 3.634907739005765*^9}, { 3.6349079580732946`*^9, 3.6349079868219395`*^9}, {3.634908200284148*^9, 3.634908315195721*^9}, {3.6349083774582825`*^9, 3.6349084027997313`*^9}, { 3.63490844507615*^9, 3.634908448843365*^9}, {3.634914956333157*^9, 3.634915020054802*^9}, {3.634915050572547*^9, 3.6349150956171236`*^9}, { 3.6349539785771523`*^9, 3.634953978975175*^9}, {3.6349540728785458`*^9, 3.6349541681829967`*^9}, {3.634954211263461*^9, 3.6349542495746527`*^9}, { 3.6349543251259737`*^9, 3.634954355882733*^9}, {3.6349543892536416`*^9, 3.6349544742835045`*^9}, {3.634954547519694*^9, 3.6349545640246377`*^9}, { 3.6349547051657104`*^9, 3.6349547107930326`*^9}, {3.634954745355009*^9, 3.634954752101395*^9}, {3.6349547948858423`*^9, 3.6349548053894434`*^9}, { 3.634954904907135*^9, 3.6349549451084347`*^9}, {3.634955219605135*^9, 3.6349552640926795`*^9}, {3.634955320189888*^9, 3.634955348763522*^9}, { 3.634955386393675*^9, 3.6349555039273973`*^9}, {3.6349557669644423`*^9, 3.6349557672004557`*^9}, {3.634955894841756*^9, 3.634955902578199*^9}, { 3.6349559513739896`*^9, 3.6349560216320086`*^9}, {3.634956120144643*^9, 3.634956128996149*^9}, {3.6349561700724983`*^9, 3.6349561978900895`*^9}, { 3.6349562480719595`*^9, 3.634956254326318*^9}, {3.634956331684742*^9, 3.6349563460575643`*^9}, {3.634956379242462*^9, 3.63495642676418*^9}, 3.6349564696636343`*^9, {3.6351524116477795`*^9, 3.6351524153379908`*^9}, { 3.6352134400282927`*^9, 3.635213442148414*^9}, {3.6352134745862694`*^9, 3.635213495869487*^9}, {3.6352135383409157`*^9, 3.6352137157160616`*^9}, { 3.6352137493569856`*^9, 3.635213764522853*^9}, {3.635214215036621*^9, 3.635214227593339*^9}, {3.635214407257615*^9, 3.63521441713218*^9}, { 3.635215297101512*^9, 3.635215303964904*^9}, {3.6352154111120324`*^9, 3.635215431504199*^9}, {3.635216346055508*^9, 3.635216494371991*^9}, { 3.635216631050809*^9, 3.6352166603244834`*^9}, {3.635216763034358*^9, 3.635216764164423*^9}, {3.6352168771938877`*^9, 3.635216888828553*^9}, 3.6352169832479534`*^9, 3.635217037668066*^9, {3.6352172024924936`*^9, 3.6352172054526625`*^9}, {3.635217344025589*^9, 3.635217346898753*^9}, 3.6352173863770113`*^9, {3.635217519639633*^9, 3.6352175507014103`*^9}, 3.635217615445113*^9, {3.6352178715087595`*^9, 3.635217880460271*^9}, { 3.6352185912849283`*^9, 3.635218598444338*^9}, {3.6352186995721216`*^9, 3.635218714955002*^9}, {3.6352189761749425`*^9, 3.6352189789341*^9}, { 3.6352195060322485`*^9, 3.635219509972474*^9}, 3.6352195673477554`*^9, 3.6352195994635925`*^9, {3.6352197336482677`*^9, 3.635219737452485*^9}, { 3.6352197706093817`*^9, 3.6352197723214793`*^9}, {3.635219941784172*^9, 3.6352199485115566`*^9}, {3.6352200714185867`*^9, 3.6352200854323883`*^9}, {3.6352202085694313`*^9, 3.635220235849992*^9}, { 3.6352202816336107`*^9, 3.6352203110962954`*^9}, {3.6352204980449886`*^9, 3.6352205276526823`*^9}, {3.6352253191447396`*^9, 3.6352253299913597`*^9}, {3.6352253611111403`*^9, 3.6352253637572913`*^9}, {3.635225409322898*^9, 3.6352255965196047`*^9}, { 3.6352260914249115`*^9, 3.6352261698393965`*^9}, {3.63522638233055*^9, 3.6352264188036366`*^9}, {3.635227493469104*^9, 3.635227556935734*^9}, { 3.6352276745764627`*^9, 3.635227730116639*^9}, {3.6352287979917183`*^9, 3.6352288587651944`*^9}, {3.635228894237223*^9, 3.635228948324317*^9}, { 3.635229365252164*^9, 3.6352293902275925`*^9}, {3.63522947690555*^9, 3.6352294807837715`*^9}, {3.6352492831123204`*^9, 3.6352492983621926`*^9}, 3.6356569054520617`*^9, {3.6363778004499054`*^9, 3.636377802787039*^9}, { 3.6363778414932528`*^9, 3.6363778525308843`*^9}, {3.636384436335312*^9, 3.6363846409950175`*^9}, {3.636384971250907*^9, 3.6363849738080535`*^9}, { 3.6363850170465264`*^9, 3.636385030729309*^9}, {3.6363851286779118`*^9, 3.636385138359465*^9}, {3.6363851699712734`*^9, 3.636385223111313*^9}, { 3.656076172452749*^9, 3.656076182171566*^9}, {3.6560765578514256`*^9, 3.656076619019133*^9}, 3.6560772545486493`*^9, {3.6630719749029694`*^9, 3.6630719878027077`*^9}, {3.6630720702554235`*^9, 3.6630720807290225`*^9}, {3.6630721155740156`*^9, 3.6630721713712068`*^9}, {3.663072270834896*^9, 3.6630722882218904`*^9}, 3.6630724099968557`*^9, {3.685234767958906*^9, 3.685234768480936*^9}, { 3.685252204033695*^9, 3.6852522340537376`*^9}, {3.6852522757137957`*^9, 3.6852523115138454`*^9}, {3.68525376314359*^9, 3.6852537725041256`*^9}, { 3.6852539763277836`*^9, 3.6852539861693463`*^9}, 3.6852540682470407`*^9, 3.6852541660656357`*^9, {3.6852604801645336`*^9, 3.6852605060345697`*^9}, { 3.6852605373446136`*^9, 3.6852605977846985`*^9}, 3.685260655254779*^9, { 3.6853280002218475`*^9, 3.685328019561875*^9}, 3.685328064721938*^9, { 3.6853280953119807`*^9, 3.6853282636022167`*^9}, {3.685328356242346*^9, 3.685328598671985*^9}, {3.6853286682069626`*^9, 3.6853287982524004`*^9}, { 3.6853288753368096`*^9, 3.6853289367033195`*^9}, {3.685328968274125*^9, 3.685328978713722*^9}, {3.685329033941881*^9, 3.685329044950511*^9}, { 3.685329173522865*^9, 3.6853294420842257`*^9}, {3.6853296024223967`*^9, 3.6853296124319687`*^9}, {3.6853297221712456`*^9, 3.685329733349885*^9}, { 3.6853298076291337`*^9, 3.6853298739599276`*^9}, {3.685330038474337*^9, 3.685330051652091*^9}, {3.6853311309428225`*^9, 3.685331168378964*^9}, { 3.685340142134763*^9, 3.685340180544817*^9}, {3.6853583292043543`*^9, 3.685358334834362*^9}, {3.685358366084406*^9, 3.685358366954407*^9}, { 3.685358408404465*^9, 3.685358518294619*^9}, 3.685358620174762*^9, 3.6853586578748145`*^9, {3.6853588750151186`*^9, 3.6853588857151337`*^9}, { 3.6853589302051954`*^9, 3.685358938995208*^9}, {3.685359014715314*^9, 3.6853590296653347`*^9}, 3.685359148315501*^9, 3.6853598281764526`*^9, { 3.6853683109000263`*^9, 3.685368382250126*^9}, {3.685368420160179*^9, 3.6853684704302497`*^9}, {3.6853685194503183`*^9, 3.685368742860631*^9}, { 3.685369008901004*^9, 3.68536902061102*^9}, {3.6853690791611023`*^9, 3.685369132301176*^9}, {3.6853693219914417`*^9, 3.6853693304114532`*^9}, 3.6853696089118433`*^9, {3.6858758911429157`*^9, 3.685875951793*^9}, { 3.6859484099082212`*^9, 3.6859484970032024`*^9}, {3.686052829875022*^9, 3.686052906242383*^9}, {3.6860535326822133`*^9, 3.686053598029951*^9}, { 3.68605365168902*^9, 3.6860541446091995`*^9}, {3.6860541846064873`*^9, 3.68605440393201*^9}, {3.686054713802734*^9, 3.6860547858298535`*^9}, { 3.6860548280202665`*^9, 3.686054837219793*^9}, {3.686054874127904*^9, 3.686054892139934*^9}, {3.686055136014883*^9, 3.6860551460584574`*^9}, { 3.686055211281188*^9, 3.6860552301962633`*^9}, {3.6860553465409174`*^9, 3.6860553998749685`*^9}, {3.6860556017188663`*^9, 3.6860556050188704`*^9}, {3.6862923512707715`*^9, 3.686292363600789*^9}, { 3.686292409650853*^9, 3.6862924109708548`*^9}, {3.6862924536109147`*^9, 3.6862924596309233`*^9}, {3.686292542221039*^9, 3.6862925430110397`*^9}, { 3.686292988803664*^9, 3.686293001033681*^9}, {3.6866504529025555`*^9, 3.686650526682659*^9}, {3.686650671852862*^9, 3.6866507242929354`*^9}, { 3.6866507657529936`*^9, 3.6866507887630253`*^9}, {3.6866508208230705`*^9, 3.6866509100531955`*^9}, {3.6866509593932643`*^9, 3.686650971113281*^9}, { 3.686651007793332*^9, 3.6866511595335445`*^9}, {3.686651223513634*^9, 3.686651234033649*^9}, {3.686651304763748*^9, 3.6866513363837924`*^9}, { 3.6866514102038956`*^9, 3.686651429943923*^9}, {3.686652993837468*^9, 3.6866530046274834`*^9}, {3.686804398511652*^9, 3.6868044081516657`*^9}, { 3.6868046315619783`*^9, 3.686804631801979*^9}, {3.686804685872054*^9, 3.686804707092084*^9}, {3.6868047382021275`*^9, 3.686804767812169*^9}, { 3.686804824012248*^9, 3.6868048404922705`*^9}, {3.686804942142413*^9, 3.6868049633424425`*^9}, {3.6868050765526013`*^9, 3.686805101092636*^9}, { 3.6868051463526993`*^9, 3.6868052234228067`*^9}, {3.686805307602925*^9, 3.686805311682931*^9}, {3.68680577547358*^9, 3.686805788923599*^9}, { 3.686821702197342*^9, 3.6868217282873783`*^9}, {3.6868225192884855`*^9, 3.686822538368512*^9}, {3.6868226306886415`*^9, 3.6868226683086944`*^9}, { 3.6868227318887835`*^9, 3.6868227627088265`*^9}, {3.686822801638881*^9, 3.6868230490692277`*^9}, {3.686823122979331*^9, 3.6868231833294153`*^9}, { 3.6868232450595016`*^9, 3.6868233753996844`*^9}, {3.6868234153897405`*^9, 3.686823451379791*^9}, {3.6868236736101017`*^9, 3.6868236786601086`*^9}, { 3.6868237164601617`*^9, 3.68682375072021*^9}, {3.68682389396041*^9, 3.68682390087042*^9}, {3.686823940790476*^9, 3.6868239416904774`*^9}, { 3.6868239808805323`*^9, 3.6868239872905407`*^9}, {3.686824051540631*^9, 3.6868240519006314`*^9}, {3.686824360861064*^9, 3.6868243761510854`*^9}, { 3.6868245440213203`*^9, 3.686824577221367*^9}, {3.686824685841519*^9, 3.6868246979115357`*^9}, 3.6868248012716804`*^9, 3.6868253582724605`*^9, { 3.6868255183026843`*^9, 3.686825518932685*^9}, {3.6868264466639843`*^9, 3.6868264497139883`*^9}, {3.6868267792744493`*^9, 3.6868268152945004`*^9}, {3.686827100164899*^9, 3.6868271210549283`*^9}, 3.686827162004986*^9, {3.6868272414950967`*^9, 3.686827327475217*^9}, { 3.686827953126093*^9, 3.686827976506126*^9}, {3.686829128577739*^9, 3.686829138957753*^9}, 3.6868292410978966`*^9, {3.6868292768379464`*^9, 3.686829282727955*^9}, {3.6868293820380936`*^9, 3.686829418138144*^9}, { 3.686829846748744*^9, 3.686829848298746*^9}, {3.6868313063207874`*^9, 3.686831307180789*^9}, {3.6868331276633377`*^9, 3.68683328653356*^9}, { 3.6868394697195063`*^9, 3.6868394933895392`*^9}, 3.686839530999592*^9, { 3.686839582829664*^9, 3.68683963686974*^9}, {3.6868397551199055`*^9, 3.68683979365996*^9}, {3.6868398344600167`*^9, 3.686839866200061*^9}, { 3.687092084401948*^9, 3.687092117031994*^9}, {3.6870922598621936`*^9, 3.6870922645422*^9}, {3.6870962086478376`*^9, 3.6870962658779182`*^9}, 3.687096444838168*^9, {3.687096500978247*^9, 3.687096501638248*^9}, { 3.6870965809883595`*^9, 3.687096592708376*^9}, 3.687096837948719*^9, { 3.68709688890879*^9, 3.687096985798926*^9}, {3.6870971015990877`*^9, 3.6870972179192505`*^9}, {3.6870972618993125`*^9, 3.687097305639374*^9}, { 3.6870973356794157`*^9, 3.6870975186496716`*^9}, {3.6870975796097574`*^9, 3.6870975953197794`*^9}, {3.6870976531898603`*^9, 3.6870976848899045`*^9}, 3.6870977782500353`*^9, {3.687413757687042*^9, 3.6874137834070783`*^9}, { 3.6874140542074575`*^9, 3.687414094417514*^9}, {3.6874143478878684`*^9, 3.687414485538061*^9}, {3.6874146116082373`*^9, 3.68741464894829*^9}, { 3.6874147451084247`*^9, 3.687414766118454*^9}, 3.6874149094486547`*^9, { 3.6874150416688395`*^9, 3.6874150634888706`*^9}, {3.6874152437091227`*^9, 3.687415268869158*^9}, 3.6874153442892637`*^9, {3.687415449879411*^9, 3.687415469659439*^9}, 3.687415529739523*^9, 3.687415564789572*^9, 3.687415645529685*^9, {3.6874168016913037`*^9, 3.687416803441306*^9}, { 3.687421022677213*^9, 3.6874212686075573`*^9}, {3.68742948209425*^9, 3.6874294906842623`*^9}, {3.687844340668378*^9, 3.6878443698084188`*^9}, { 3.6886534778571014`*^9, 3.6886534911571198`*^9}, {3.688906380162199*^9, 3.6889064680223217`*^9}, {3.688906514222396*^9, 3.6889065193925257`*^9}, { 3.688908192623024*^9, 3.6889082006430354`*^9}, {3.688908261823121*^9, 3.688908271653135*^9}, {3.6889083776232834`*^9, 3.6889083922733035`*^9}, { 3.688908466073407*^9, 3.6889084993734536`*^9}, 3.688908533623502*^9, { 3.688908616683618*^9, 3.6889086271336327`*^9}, {3.6889086885637183`*^9, 3.6889087063437433`*^9}, {3.6889091647443852`*^9, 3.6889092012544365`*^9}, {3.6889093019045773`*^9, 3.6889093406746316`*^9}, 3.6889101071957045`*^9, {3.689905940063133*^9, 3.689905972983179*^9}, { 3.692530981927737*^9, 3.6925310416778207`*^9}, {3.692531099797902*^9, 3.6925311384779563`*^9}, {3.692531192258032*^9, 3.692531244668105*^9}, { 3.6925312919881716`*^9, 3.692531425418358*^9}, {3.6925315270885005`*^9, 3.692531643928664*^9}, {3.692535489534048*^9, 3.6925356485142703`*^9}, { 3.692535753564418*^9, 3.6925357992544813`*^9}, {3.6925358831745987`*^9, 3.692535899604622*^9}, {3.692536042584822*^9, 3.692536159384986*^9}, { 3.6925366121156197`*^9, 3.6925366207256317`*^9}, {3.6925367265057793`*^9, 3.69253672683578*^9}, {3.6925368590559654`*^9, 3.6925368636559715`*^9}, { 3.6925370880062857`*^9, 3.692537177856412*^9}, {3.692537322456614*^9, 3.6925373869767046`*^9}, {3.6925390913352747`*^9, 3.6925390925252767`*^9}, {3.692539644430175*^9, 3.6925396711502123`*^9}, { 3.692539727510291*^9, 3.692539730440295*^9}, {3.69253993367058*^9, 3.692539963780622*^9}, {3.6925400018406754`*^9, 3.692540003630678*^9}, { 3.6925401743409166`*^9, 3.6925401747509174`*^9}, {3.692540399111232*^9, 3.692540407981244*^9}, {3.69254047647134*^9, 3.6925404886113567`*^9}, { 3.6925406039715185`*^9, 3.69254060531152*^9}, {3.6925414948727655`*^9, 3.6925414953427663`*^9}, {3.6925415478528395`*^9, 3.692541613062931*^9}, 3.692541649332982*^9, {3.692541727633092*^9, 3.6925418840133104`*^9}, { 3.692541924473367*^9, 3.692542041693531*^9}, {3.6925421488836813`*^9, 3.6925422549438295`*^9}, {3.6925422976938896`*^9, 3.692542521444203*^9}, { 3.6925426221843443`*^9, 3.6925426357343626`*^9}, 3.692542739374508*^9, 3.692599799510878*^9, {3.692599834884901*^9, 3.6925998954663663`*^9}, { 3.692599925635092*^9, 3.6926000095928946`*^9}, {3.692600108929576*^9, 3.6926001456386757`*^9}, {3.6926001874800687`*^9, 3.692600454421337*^9}, { 3.692600503149027*^9, 3.6926006000391626`*^9}, {3.692600680251275*^9, 3.6926006814012766`*^9}, {3.6926009000215826`*^9, 3.6926009410816402`*^9}, 3.692601280532116*^9, {3.6926044914726114`*^9, 3.69260449774262*^9}, 3.6926045660127153`*^9, 3.6926046690228596`*^9, {3.69296647863291*^9, 3.6929664798829117`*^9}, {3.6929665643330297`*^9, 3.6929666141830997`*^9}, {3.6929670390036945`*^9, 3.6929670405536966`*^9}, {3.6929670861037607`*^9, 3.6929670952937737`*^9}, {3.6929671302538223`*^9, 3.6929671549438567`*^9}, {3.6929671904739065`*^9, 3.69296722137395*^9}, { 3.6929672596240034`*^9, 3.6929673352541094`*^9}, 3.6929678909232683`*^9, { 3.6930146982034283`*^9, 3.693014722713463*^9}, {3.6930148540136466`*^9, 3.693014857023651*^9}, {3.6930148913836985`*^9, 3.693014894823704*^9}, { 3.693014930903754*^9, 3.6930151942541227`*^9}, {3.693015247824198*^9, 3.693015430554454*^9}, {3.693015673794794*^9, 3.69301579223496*^9}, { 3.6930163123576884`*^9, 3.693016326897709*^9}, {3.6930164225678425`*^9, 3.693016429727853*^9}, {3.693016686718212*^9, 3.693016698128228*^9}, { 3.693016737038283*^9, 3.693016755068308*^9}, {3.6930168429225607`*^9, 3.6930168719926014`*^9}, {3.6930172049430676`*^9, 3.693017284063178*^9}, { 3.693017336433252*^9, 3.6930173662532935`*^9}, {3.6930180949163136`*^9, 3.6930180975563173`*^9}, {3.6930181870764427`*^9, 3.693018199956461*^9}, { 3.6930182954065943`*^9, 3.693018305996609*^9}, {3.693139886141657*^9, 3.6931399045016823`*^9}, {3.6931402916003532`*^9, 3.693140295770359*^9}, { 3.693140426020541*^9, 3.693140426530542*^9}, {3.6931410492237864`*^9, 3.6931410888738413`*^9}, {3.6931411194438844`*^9, 3.693141126553894*^9}, { 3.693141412004294*^9, 3.693141454164353*^9}, {3.6931415979955544`*^9, 3.6931417931758275`*^9}, {3.6932199559445915`*^9, 3.6932199772046213`*^9}, {3.6932201435748544`*^9, 3.693220170284892*^9}, { 3.693220713855653*^9, 3.693220721825664*^9}, {3.693625124589745*^9, 3.693625153729786*^9}, {3.6940907995669713`*^9, 3.6940909688872085`*^9}, { 3.6940913675677667`*^9, 3.6940914223978434`*^9}, {3.694091508037963*^9, 3.694091572118053*^9}, 3.694092009628666*^9, {3.6940920553287296`*^9, 3.694092229168973*^9}, {3.6940923053990793`*^9, 3.694092374419176*^9}, { 3.6940924537392874`*^9, 3.694092457789293*^9}, 3.694092642849552*^9, { 3.6940928573598523`*^9, 3.694092862379859*^9}, {3.6940945886222763`*^9, 3.694094601932295*^9}, 3.694094849542641*^9, {3.694095764293922*^9, 3.6940957644739223`*^9}, {3.6940960602743363`*^9, 3.6940960732243547`*^9}, {3.6940961211044216`*^9, 3.694096124194426*^9}, { 3.694665030960044*^9, 3.6946650634500895`*^9}, {3.6946652071402903`*^9, 3.6946653490404887`*^9}, {3.6946658702212186`*^9, 3.6946658881212435`*^9}, {3.694665923041292*^9, 3.694665953561335*^9}, { 3.694665995981395*^9, 3.6946660149414215`*^9}, {3.694666050571471*^9, 3.6946660547214766`*^9}, {3.694666169991638*^9, 3.694666292151809*^9}, { 3.6946663456618843`*^9, 3.6946663943919525`*^9}, 3.6946667526224537`*^9, 3.69466680700253*^9, 3.694687076625702*^9, {3.6946874316161985`*^9, 3.6946874621962414`*^9}, 3.694687499496294*^9, {3.694687567516389*^9, 3.694687642816495*^9}, {3.694687679006545*^9, 3.6946877198966026`*^9}, { 3.6946877714966745`*^9, 3.694687931746899*^9}, {3.723798739728607*^9, 3.723798744014243*^9}, {3.7237990126446104`*^9, 3.723799023974499*^9}, { 3.7244116671877546`*^9, 3.7244116733393917`*^9}, {3.724411761793063*^9, 3.7244117718753977`*^9}, {3.724411928386671*^9, 3.7244119682966137`*^9}, { 3.724412131847311*^9, 3.724412188341254*^9}, {3.729414981357122*^9, 3.7294149861075096`*^9}, {3.749817651293678*^9, 3.749817653108206*^9}, { 3.7498176831919456`*^9, 3.7498176846222315`*^9}, 3.7498177601545563`*^9, { 3.749817859674735*^9, 3.749817861044999*^9}, {3.7498179561547127`*^9, 3.749817964489929*^9}, {3.749818149334386*^9, 3.749818237397959*^9}, 3.749818617867873*^9, {3.7505621848002787`*^9, 3.7505622174085107`*^9}, { 3.75056238761455*^9, 3.750562431347901*^9}, {3.7505626332829456`*^9, 3.7505627331565337`*^9}, {3.7505627632642183`*^9, 3.7505627635859113`*^9}, {3.7515359581577415`*^9, 3.7515359614850826`*^9}, {3.751536071974715*^9, 3.7515360961721487`*^9}, 3.7515362040373974`*^9, {3.751536256080162*^9, 3.7515365099108534`*^9}, { 3.751549231137398*^9, 3.7515493334258356`*^9}, {3.7515496891619573`*^9, 3.751549689458767*^9}, 3.753020403650548*^9, {3.7530205114189386`*^9, 3.753020525224822*^9}, {3.753021995594639*^9, 3.753022011512741*^9}, { 3.760634689749445*^9, 3.7606348247488756`*^9}, {3.7606349119783344`*^9, 3.7606349350197754`*^9}, {3.76063496856853*^9, 3.7606349922504683`*^9}, { 3.760667269592998*^9, 3.760667271545692*^9}, 3.7606679283912125`*^9, 3.760668039709257*^9, {3.763302716900259*^9, 3.763302749083943*^9}, { 3.763304867499642*^9, 3.7633048681948185`*^9}, {3.763337978730939*^9, 3.763338014197137*^9}, {3.763338054806819*^9, 3.7633381289118147`*^9}, { 3.763338224472745*^9, 3.7633382447254143`*^9}, 3.763338501519575*^9, { 3.7633387342733064`*^9, 3.763338775483101*^9}, {3.7633388525735607`*^9, 3.7633390131554184`*^9}, {3.763360596353942*^9, 3.7633606328922167`*^9}, { 3.7633606638773637`*^9, 3.763360724941125*^9}, {3.763360812068123*^9, 3.763360863571327*^9}, {3.763361217769263*^9, 3.763361243271195*^9}, { 3.763361578316657*^9, 3.7633615820345063`*^9}, {3.763362291476118*^9, 3.763362301380039*^9}, {3.763362505004878*^9, 3.763362606421646*^9}, { 3.763362742167684*^9, 3.7633627524126663`*^9}, {3.7633628090243473`*^9, 3.763362931819517*^9}, 3.7633630680313087`*^9, {3.76336360941794*^9, 3.7633636782369685`*^9}, {3.763363813698273*^9, 3.763363822992702*^9}, { 3.7633837714269123`*^9, 3.763383775708086*^9}, {3.7633839861442327`*^9, 3.7633839966350546`*^9}, {3.7633846907375526`*^9, 3.76338471098131*^9}, 3.763426089635152*^9, {3.7634262143520336`*^9, 3.7634262475470448`*^9}, { 3.7634276458524485`*^9, 3.7634276705117846`*^9}, {3.7634292721860075`*^9, 3.7634292840439587`*^9}, {3.76352820463631*^9, 3.7635282147939873`*^9}, { 3.763528430960533*^9, 3.7635284413250494`*^9}, {3.7635285114344244`*^9, 3.763528537124817*^9}, {3.763528653934307*^9, 3.7635286747218256`*^9}, { 3.7635486952594075`*^9, 3.763548696007099*^9}, {3.7639579130072594`*^9, 3.7639579464687676`*^9}, {3.763957980699315*^9, 3.7639580928074217`*^9}, { 3.763959813173403*^9, 3.7639598134702053`*^9}, {3.7639608015345135`*^9, 3.7639608287155933`*^9}, {3.7645603385872726`*^9, 3.764560365934222*^9}, { 3.76456061596602*^9, 3.76456062636983*^9}, {3.7647257988231063`*^9, 3.7647258025896564`*^9}, {3.765077713031946*^9, 3.7650777913378534`*^9}, { 3.7740698865922914`*^9, 3.774069989744633*^9}, {3.7740700982535834`*^9, 3.774070098487667*^9}, {3.7740701415628414`*^9, 3.7740702370647106`*^9}, { 3.77407029325229*^9, 3.7740703348543596`*^9}, {3.774070397587008*^9, 3.774070454974152*^9}, {3.7740709929610343`*^9, 3.7740710067172923`*^9}, { 3.775190474681038*^9, 3.7751904884151363`*^9}, {3.7751905901325903`*^9, 3.775190642609686*^9}, 3.775190717712206*^9, {3.7751956728394384`*^9, 3.7751957010601625`*^9}, 3.7751957418100777`*^9, {3.7751958741450567`*^9, 3.775195882844048*^9}, {3.7751959530858574`*^9, 3.775196055684782*^9}, { 3.7836566506037264`*^9, 3.783656699859296*^9}, {3.783834162184903*^9, 3.7838342075157394`*^9}, {3.7838342453955064`*^9, 3.7838342564437876`*^9}, {3.783834288539219*^9, 3.783834289188504*^9}, { 3.783834319888338*^9, 3.783834404011998*^9}, {3.783835274452033*^9, 3.783835643262226*^9}, 3.783835673435833*^9, {3.783837186915415*^9, 3.783837252940491*^9}, 3.783838076793089*^9, {3.7838387026691084`*^9, 3.7838387106794033`*^9}, {3.7838387751330376`*^9, 3.78383877586726*^9}, 3.7885184612710266`*^9, {3.7885197610115976`*^9, 3.788519761667694*^9}, { 3.788519815581788*^9, 3.788519877459923*^9}, {3.788519910619506*^9, 3.7885199214314795`*^9}, {3.78852990807364*^9, 3.78852991935472*^9}, { 3.788529949778452*^9, 3.7885299511123505`*^9}, 3.7885729856546545`*^9, { 3.795769635061987*^9, 3.7957696738473544`*^9}, {3.7957698528454103`*^9, 3.795769867081932*^9}, {3.7963499268904905`*^9, 3.796349974573367*^9}, { 3.8116565658363085`*^9, 3.811656579625844*^9}, {3.8116566792733173`*^9, 3.811656696847624*^9}, {3.819778974172573*^9, 3.819778996370713*^9}, { 3.819779237456471*^9, 3.819779375493654*^9}, {3.819779556474127*^9, 3.8197797185600586`*^9}, 3.8200272939729*^9, {3.820027400146493*^9, 3.820027409212733*^9}, {3.820027524082451*^9, 3.820027527717089*^9}},ExpressionUUID->"1c57eba7-984b-454e-b945-\ 0098caff056c"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"element", " ", "build", " ", "defs"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"GENERICBEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"GENERICBEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA", ",", "0", ",", "0", ",", "Iyy", ",", "Izz", ",", "0", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "fx", ",", "fy", ",", "fz", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"GENERICBEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx_", ",", "fy_", ",", "fz_", ",", "mx_", ",", "my_", ",", "mz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"GENERICBEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA", ",", "0", ",", "0", ",", "Iyy", ",", "Izz", ",", "0", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "fx", ",", "fy", ",", "fz", ",", "mx", ",", "my", ",", "mz"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Sy_", ",", "Sz_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"GENERICBEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA", ",", "Sy", ",", "Sz", ",", "Iyy", ",", "Izz", ",", "0", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "fx", ",", "fy", ",", "fz", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"GENERICBEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Kappa]x_"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA_", ",", "Sy_", ",", "Sz_", ",", "Iyy_", ",", "Izz_", ",", "Iyz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx_", ",", "fy_", ",", "fz_", ",", "mx_", ",", "my_", ",", "mz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "NN", ",", "r0", ",", "r\[Alpha]0", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "s", ",", "x", ",", "jac", ",", "FF", ",", "FFINV", ",", "PP", ",", "ns", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]", ",", "EEEE", ",", "AE", ",", "CE", ",", "BE", ",", "\[Epsilon]", ",", "\[Kappa]", ",", "Irr", ",", "F", ",", "M", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wbrn", ",", "\[Delta]WW", ",", "equ", ",", "sol", ",", "bl", ",", "EEE", ",", "GGG", ",", "\[Kappa]\[Kappa]\[Kappa]", ",", "AAA", ",", "SSz", ",", "SSy", ",", "IIyy", ",", "IIzz", ",", "IIyz", ",", "ffx", ",", "ffy", ",", "ffz", ",", "mmx", ",", "mmy", ",", "mmz", ",", "\[Alpha]"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", "\"\\"", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"mapping", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{"\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]0", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r\[Alpha]0", ".", "r\[Alpha]0"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"i\[Alpha]0", " ", "=", RowBox[{"r\[Alpha]0", "/", "h\[Alpha]0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"s", "=", RowBox[{"i\[Alpha]0", ".", "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"x", "=", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], ".", "ix0"}], "+", "s"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", "h\[Alpha]0"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"simple", " ", "metrics"}], "*)"}], "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"PP", "=", RowBox[{"LeviCivitaTensor", "[", "3", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"use", " ", "two", " ", "internal", " ", "nodes"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", " ", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{"{", RowBox[{"4", ",", "\[Alpha]"}], "}"}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"b", "[", "1", "]"}], ",", RowBox[{"b", "[", "2", "]"}], ",", RowBox[{"b", "[", "3", "]"}]}], "}"}], " ", ",", RowBox[{"{", RowBox[{ RowBox[{"b", "[", "4", "]"}], ",", RowBox[{"b", "[", "5", "]"}], ",", RowBox[{"b", "[", "6", "]"}]}], "}"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"b", "[", "7", "]"}], ",", RowBox[{"b", "[", "8", "]"}], ",", RowBox[{"b", "[", "9", "]"}]}], "}"}], " ", ",", RowBox[{"{", RowBox[{ RowBox[{"b", "[", "10", "]"}], ",", RowBox[{"b", "[", "11", "]"}], ",", RowBox[{"b", "[", "12", "]"}]}], "}"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"transform", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"elasticity", " ", "dyad", " ", "and", " ", "cross"}], "-", RowBox[{ "section", " ", "properties", " ", "are", " ", "known", " ", "in", " ", "the", " ", "material", " ", "system"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"EEE", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "EE", "]"}], "===", "Function"}], ",", RowBox[{"EE", "[", "x", "]"}], ",", "EE"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GGG", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "GG", "]"}], "===", "Function"}], ",", RowBox[{"GG", "[", "x", "]"}], ",", "GG"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"AAA", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "AA", "]"}], "===", "Function"}], ",", RowBox[{"AA", "[", "x", "]"}], ",", "AA"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SSz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Sz", "]"}], "===", "Function"}], ",", RowBox[{"Sz", "[", "x", "]"}], ",", "Sz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SSy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Sy", "]"}], "===", "Function"}], ",", RowBox[{"Sy", "[", "x", "]"}], ",", "Sy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIyy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Iyy", "]"}], "===", "Function"}], ",", RowBox[{"Iyy", "[", "x", "]"}], ",", "Iyy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIzz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Izz", "]"}], "===", "Function"}], ",", RowBox[{"Izz", "[", "x", "]"}], ",", "Izz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIyz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Iyz", "]"}], "===", "Function"}], ",", RowBox[{"Iyz", "[", "x", "]"}], ",", "Iyz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ffx", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "fx", "]"}], "===", "Function"}], ",", RowBox[{"fx", "[", "x", "]"}], ",", "fx"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ffy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "fy", "]"}], "===", "Function"}], ",", RowBox[{"fy", "[", "x", "]"}], ",", "fy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ffz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "fz", "]"}], "===", "Function"}], ",", RowBox[{"fz", "[", "x", "]"}], ",", "fz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mmx", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "mx", "]"}], "===", "Function"}], ",", RowBox[{"mx", "[", "x", "]"}], ",", "mx"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mmy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "my", "]"}], "===", "Function"}], ",", RowBox[{"my", "[", "x", "]"}], ",", "my"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mmz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "mz", "]"}], "===", "Function"}], ",", RowBox[{"mz", "[", "x", "]"}], ",", "mz"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"elasticity", " ", "dyad", " ", "and", " ", "cross"}], "-", RowBox[{ "section", " ", "properties", " ", "are", " ", "known", " ", "in", " ", "the", " ", "material", " ", "system"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"AE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EEE", " ", "AAA"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"GGG", " ", "AAA"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"GGG", " ", "AAA"}]}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"CE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{"EEE", " ", "SSy"}], ",", RowBox[{ RowBox[{"-", "EEE"}], " ", "SSz"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "GGG"}], " ", "SSy"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"GGG", " ", "SSz"}], ",", "0", ",", "0"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"BE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Kappa]x", "*", RowBox[{"(", RowBox[{ RowBox[{"GGG", " ", "IIyy"}], "+", RowBox[{"GGG", " ", "IIzz"}]}], ")"}]}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"EEE", " ", "IIyy"}], ",", RowBox[{ RowBox[{"-", "EEE"}], " ", "IIyz"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "EEE"}], " ", "IIyz"}], ",", RowBox[{"EEE", " ", "IIzz"}]}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"strain", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}]}], "/", "h\[Alpha]0"}], "+", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], "\[Cross]", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}]}], "/", "h\[Alpha]0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "resultants"}], "*)"}], "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{ RowBox[{"AE", ".", "\[Epsilon]"}], "+", RowBox[{"CE", ".", "\[Kappa]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{ RowBox[{ RowBox[{"Transpose", "[", "CE", "]"}], ".", "\[Epsilon]"}], "+", RowBox[{"BE", ".", "\[Kappa]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expressions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], ".", "F"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]", "]"}], ".", "M"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"ffx", ",", "ffy", ",", "ffz"}], "}"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"mmx", ",", "mmy", ",", "mmz"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wbrn", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"2", ";;", "3"}], "]"}], "]"}], "]"}], ".", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"2", ";;", "3"}], "]"}], "]"}]}], "*", "bl"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wbrn"}], ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}]}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"Integrate", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wbrn"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "0", ",", "1"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"eliminate", " ", "internals"}], "*)"}], "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", RowBox[{"Table", "[", RowBox[{ RowBox[{"\[Delta]b", "[", "ii", "]"}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "12"}], "}"}]}], "]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{ RowBox[{"Solve", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"b", "[", "ii", "]"}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "12"}], "}"}]}], "]"}]}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "go", " ", "to", " ", "the", " ", "Bernoulli", " ", "limit"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"Limit", "[", RowBox[{ RowBox[{"\[Delta]WW", " ", "/.", "sol"}], ",", RowBox[{"bl", "\[Rule]", "Infinity"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"GENERICBEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA_", ",", "Sy_", ",", "Sz_", ",", "Iyy_", ",", "Izz_", ",", "Iyz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx_", ",", "fy_", ",", "fz_", ",", "mx_", ",", "my_", ",", "mz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "NN", ",", "r0", ",", "r\[Alpha]0", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "s", ",", "x", ",", "jac", ",", "FF", ",", "FFINV", ",", "PP", ",", "ns", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]", ",", "EEEE", ",", "AE", ",", "CE", ",", "BE", ",", "\[Epsilon]", ",", "\[Kappa]", ",", "Irr", ",", "F", ",", "M", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wbrn", ",", "\[Delta]WW", ",", "equ", ",", "sol", ",", "bl", ",", "EEE", ",", "GGG", ",", "\[Kappa]\[Kappa]\[Kappa]", ",", "AAA", ",", "SSz", ",", "SSy", ",", "IIyy", ",", "IIzz", ",", "IIyz", ",", "ffx", ",", "ffy", ",", "ffz", ",", "mmx", ",", "mmy", ",", "mmz", ",", "\[Alpha]"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"mapping", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{"\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]0", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r\[Alpha]0", ".", "r\[Alpha]0"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"i\[Alpha]0", " ", "=", RowBox[{"r\[Alpha]0", "/", "h\[Alpha]0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"s", "=", RowBox[{"i\[Alpha]0", ".", "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"x", "=", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], ".", "ix0"}], "+", "s"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", "h\[Alpha]0"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"simple", " ", "metrics"}], "*)"}], "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"PP", "=", RowBox[{"LeviCivitaTensor", "[", "3", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"use", " ", "two", " ", "internal", " ", "nodes"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", " ", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{"{", RowBox[{"4", ",", "\[Alpha]"}], "}"}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"b", "[", "1", "]"}], ",", RowBox[{"b", "[", "2", "]"}], ",", RowBox[{"b", "[", "3", "]"}]}], "}"}], " ", ",", RowBox[{"{", RowBox[{ RowBox[{"b", "[", "4", "]"}], ",", RowBox[{"b", "[", "5", "]"}], ",", RowBox[{"b", "[", "6", "]"}]}], "}"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"b", "[", "7", "]"}], ",", RowBox[{"b", "[", "8", "]"}], ",", RowBox[{"b", "[", "9", "]"}]}], "}"}], " ", ",", RowBox[{"{", RowBox[{ RowBox[{"b", "[", "10", "]"}], ",", RowBox[{"b", "[", "11", "]"}], ",", RowBox[{"b", "[", "12", "]"}]}], "}"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"transform", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"elasticity", " ", "dyad", " ", "and", " ", "cross"}], "-", RowBox[{ "section", " ", "properties", " ", "are", " ", "known", " ", "in", " ", "the", " ", "material", " ", "system"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"EEE", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "EE", "]"}], "===", "Function"}], ",", RowBox[{"EE", "[", "x", "]"}], ",", "EE"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GGG", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "GG", "]"}], "===", "Function"}], ",", RowBox[{"GG", "[", "x", "]"}], ",", "GG"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"AAA", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "AA", "]"}], "===", "Function"}], ",", RowBox[{"AA", "[", "x", "]"}], ",", "AA"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SSz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Sz", "]"}], "===", "Function"}], ",", RowBox[{"Sz", "[", "x", "]"}], ",", "Sz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SSy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Sy", "]"}], "===", "Function"}], ",", RowBox[{"Sy", "[", "x", "]"}], ",", "Sy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIyy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Iyy", "]"}], "===", "Function"}], ",", RowBox[{"Iyy", "[", "x", "]"}], ",", "Iyy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIzz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Izz", "]"}], "===", "Function"}], ",", RowBox[{"Izz", "[", "x", "]"}], ",", "Izz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIyz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Iyz", "]"}], "===", "Function"}], ",", RowBox[{"Iyz", "[", "x", "]"}], ",", "Iyz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ffx", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "fx", "]"}], "===", "Function"}], ",", RowBox[{"fx", "[", "x", "]"}], ",", "fx"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ffy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "fy", "]"}], "===", "Function"}], ",", RowBox[{"fy", "[", "x", "]"}], ",", "fy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ffz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "fz", "]"}], "===", "Function"}], ",", RowBox[{"fz", "[", "x", "]"}], ",", "fz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mmx", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "mx", "]"}], "===", "Function"}], ",", RowBox[{"mx", "[", "x", "]"}], ",", "mx"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mmy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "my", "]"}], "===", "Function"}], ",", RowBox[{"my", "[", "x", "]"}], ",", "my"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mmz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "mz", "]"}], "===", "Function"}], ",", RowBox[{"mz", "[", "x", "]"}], ",", "mz"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"elasticity", " ", "dyad", " ", "and", " ", "cross"}], "-", RowBox[{ "section", " ", "properties", " ", "are", " ", "known", " ", "in", " ", "the", " ", "material", " ", "system"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"AE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EEE", " ", "AAA"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"GGG", " ", "AAA"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"GGG", " ", "AAA"}]}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"CE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{"EEE", " ", "SSy"}], ",", RowBox[{ RowBox[{"-", "EEE"}], " ", "SSz"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "GGG"}], " ", "SSy"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"GGG", " ", "SSz"}], ",", "0", ",", "0"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"BE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"GGG", " ", "IIyy"}], "+", RowBox[{"GGG", " ", "IIzz"}]}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"EEE", " ", "IIyy"}], ",", RowBox[{ RowBox[{"-", "EEE"}], " ", "IIyz"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "EEE"}], " ", "IIyz"}], ",", RowBox[{"EEE", " ", "IIzz"}]}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"strain", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}]}], "/", "h\[Alpha]0"}], "+", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], "\[Cross]", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}]}], "/", "h\[Alpha]0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "resultants"}], "*)"}], "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{ RowBox[{"AE", ".", "\[Epsilon]"}], "+", RowBox[{"CE", ".", "\[Kappa]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{ RowBox[{ RowBox[{"Transpose", "[", "CE", "]"}], ".", "\[Epsilon]"}], "+", RowBox[{"BE", ".", "\[Kappa]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expressions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], ".", "F"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]", "]"}], ".", "M"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"ffx", ",", "ffy", ",", "ffz"}], "}"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"mmx", ",", "mmy", ",", "mmz"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wbrn", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"2", ";;", "3"}], "]"}], "]"}], "]"}], ".", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"2", ";;", "3"}], "]"}], "]"}]}], "*", "bl"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wbrn"}], ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}]}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"Integrate", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wbrn"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "0", ",", "1"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"eliminate", " ", "internals"}], "*)"}], "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", RowBox[{"Table", "[", RowBox[{ RowBox[{"\[Delta]b", "[", "ii", "]"}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "12"}], "}"}]}], "]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{ RowBox[{"Solve", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"b", "[", "ii", "]"}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "12"}], "}"}]}], "]"}]}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "go", " ", "to", " ", "the", " ", "Bernoulli", " ", "limit"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"Limit", "[", RowBox[{ RowBox[{"\[Delta]WW", " ", "/.", "sol"}], ",", RowBox[{"bl", "\[Rule]", "Infinity"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4430689313272*^9, 3.4430690080792*^9}, { 3.4430690869528*^9, 3.4430691077320004`*^9}, {3.4430691700116*^9, 3.4430691708072*^9}, {3.4430692071717997`*^9, 3.443069246359*^9}, { 3.4430772782732*^9, 3.4430773623416*^9}, {3.4430773978316*^9, 3.4430774104676*^9}, {3.4430775053780003`*^9, 3.4430776180598*^9}, { 3.4434109099524*^9, 3.4434109159584*^9}, {3.4438800815346003`*^9, 3.4438802689304*^9}, {3.443880362624*^9, 3.4438803824516*^9}, { 3.443929565615374*^9, 3.443929570232974*^9}, {3.443935321321974*^9, 3.443935335705174*^9}, {3.443935419945174*^9, 3.443935421489574*^9}, { 3.443935494013974*^9, 3.443935494715974*^9}, {3.443935617565974*^9, 3.4439357217895737`*^9}, {3.443935755360774*^9, 3.443935816107174*^9}, { 3.443942155230774*^9, 3.443942209939974*^9}, {3.443942305710374*^9, 3.4439423142123737`*^9}, {3.4439442908131742`*^9, 3.443944441181574*^9}, { 3.4439447830065737`*^9, 3.4439447917425737`*^9}, {3.443944908541774*^9, 3.443944916060974*^9}, {3.4442731097938004`*^9, 3.4442731115254*^9}, { 3.444273189229*^9, 3.4442732700526*^9}, {3.4442748430004*^9, 3.4442748605036*^9}, {3.4442748977438*^9, 3.4442748989762*^9}, { 3.4442749340762*^9, 3.4442749351057997`*^9}, 3.4442752313382*^9, { 3.4442919702026*^9, 3.4442919911846*^9}, {3.4442921151577997`*^9, 3.4442921271074*^9}, {3.4443811023684*^9, 3.4443811036632*^9}, { 3.4443814073171997`*^9, 3.4443814402956*^9}, {3.4443815036316*^9, 3.4443815147855997`*^9}, {3.4443815537232*^9, 3.4443815747676*^9}, { 3.4443816138143997`*^9, 3.444381633174*^9}, {3.4443816850439997`*^9, 3.4443817801728*^9}, 3.4443853618688*^9, {3.4443855607376003`*^9, 3.4443856337924*^9}, {3.4443861200444*^9, 3.4443861523676*^9}, { 3.4443862280495996`*^9, 3.444386291448*^9}, {3.4443864047352*^9, 3.4443864135336*^9}, {3.4443870026832*^9, 3.4443870095316*^9}, { 3.4444082055056*^9, 3.4444082437412*^9}, {3.4444082797148*^9, 3.4444084583816*^9}, {3.4444084889108*^9, 3.4444085087539997`*^9}, { 3.444408942517*^9, 3.4444089563386*^9}, {3.4444091419564*^9, 3.4444091647167997`*^9}, {3.4444092206428003`*^9, 3.4444092944463997`*^9}, {3.4444093856284*^9, 3.4444094281071997`*^9}, { 3.4444094976988*^9, 3.4444095275104*^9}, {3.444409611064*^9, 3.4444096125772*^9}, 3.4444098504616003`*^9, {3.444409913392*^9, 3.4444099166056004`*^9}, 3.4444100178496*^9, {3.4444103063248*^9, 3.4444103358712*^9}, {3.4444103868208*^9, 3.4444104432460003`*^9}, { 3.4444921219564*^9, 3.4444921256224003`*^9}, {3.444492194824*^9, 3.4444921973668003`*^9}, {3.4444922814351997`*^9, 3.4444922853508*^9}, { 3.4444923330868*^9, 3.4444923345844*^9}, {3.444492366424*^9, 3.4444923855808*^9}, {3.4453153475226*^9, 3.445315360689*^9}, { 3.4465518166373653`*^9, 3.446551863016165*^9}, {3.446551894231765*^9, 3.446552159384965*^9}, {3.446552232377365*^9, 3.4465522555589647`*^9}, { 3.446553347388365*^9, 3.4465533616155653`*^9}, {3.4466058525769997`*^9, 3.4466058529046*^9}, {3.4466064371219997`*^9, 3.4466065097244*^9}, { 3.4466127725788*^9, 3.4466127766036*^9}, {3.4466128124835997`*^9, 3.4466130037864*^9}, {3.4466131532696*^9, 3.4466131761703997`*^9}, { 3.4466133992192*^9, 3.4466134478756*^9}, {3.446613483584*^9, 3.4466134932092*^9}, {3.4466135740952*^9, 3.4466135794927998`*^9}, { 3.4466137283948*^9, 3.4466137341356*^9}, {3.4466138994342003`*^9, 3.4466139023826*^9}, {3.4466139549858*^9, 3.4466139579653997`*^9}, { 3.4466142109818*^9, 3.4466142245226*^9}, {3.4466142793878*^9, 3.4466143652033997`*^9}, {3.4466144712834*^9, 3.4466145978929996`*^9}, { 3.4466146992618*^9, 3.4466147509914*^9}, {3.4466151283086*^9, 3.4466152768986*^9}, {3.4466153107506*^9, 3.4466153406558*^9}, { 3.4466194331976*^9, 3.4466194377528*^9}, {3.4466194847712*^9, 3.446619488718*^9}, {3.4466389495861998`*^9, 3.4466389768238*^9}, { 3.4466391218414*^9, 3.446639306561*^9}, {3.4466393990222*^9, 3.4466394004886*^9}, {3.4466394475694*^9, 3.4466394487706003`*^9}, { 3.4466395034174*^9, 3.4466395049462*^9}, 3.4466395515755997`*^9, { 3.4466396000176*^9, 3.4466396190808*^9}, {3.4466397459088*^9, 3.446639748826*^9}, {3.4466397974356003`*^9, 3.446639798668*^9}, 3.4466398447816*^9, {3.446639894218*^9, 3.4466399201556*^9}, { 3.4466399570964003`*^9, 3.4466399583288*^9}, {3.446639994006*^9, 3.4466400056904*^9}, {3.4466400383568*^9, 3.4466400395892*^9}, { 3.4466400745643997`*^9, 3.4466401025976*^9}, {3.4466401660834*^9, 3.4466401806070004`*^9}, {3.4466402251294003`*^9, 3.446640227407*^9}, { 3.446640260479*^9, 3.4466402657674*^9}, {3.4466404133122*^9, 3.4466405185654*^9}, 3.4466405830462*^9, {3.4467273294214*^9, 3.4467273777813997`*^9}, {3.4467274366558*^9, 3.4467275620954*^9}, { 3.446727593311*^9, 3.4467277412614*^9}, {3.4467283334639997`*^9, 3.4467283356012*^9}, {3.4467283707636003`*^9, 3.4467283727604*^9}, { 3.4467289882664003`*^9, 3.4467291276836*^9}, {3.446778464322*^9, 3.4467786797424*^9}, {3.4467801953803997`*^9, 3.4467802409792*^9}, { 3.4467802998691998`*^9, 3.4467804023456*^9}, 3.4467804345596*^9, { 3.4467808656344*^9, 3.4467808670852003`*^9}, 3.4467818107525997`*^9, { 3.446781855509*^9, 3.446781874385*^9}, {3.4467826737914*^9, 3.4467827381726*^9}, {3.4467828623018*^9, 3.4467831045386*^9}, { 3.4470344113984003`*^9, 3.4470344123344*^9}, {3.4470344628316*^9, 3.4470345343108*^9}, {3.447043591118539*^9, 3.447043642192939*^9}, { 3.447045649625739*^9, 3.447045718437339*^9}, {3.447054774023939*^9, 3.447054834198939*^9}, {3.4470549103449388`*^9, 3.4470549116169386`*^9}, { 3.447054943902939*^9, 3.4470553027109385`*^9}, {3.447055334559939*^9, 3.447055353684939*^9}, {3.447057311918539*^9, 3.447057369747739*^9}, { 3.4470575058577385`*^9, 3.4470575951365385`*^9}, {3.4470581848789387`*^9, 3.4470582040825386`*^9}, {3.451276121243*^9, 3.4512761425838003`*^9}, { 3.4512762022382*^9, 3.4512762064346*^9}, {3.4512762476966*^9, 3.4512762827654*^9}, {3.451276489091*^9, 3.451276541975*^9}, { 3.4512765853118*^9, 3.4512766132046003`*^9}, {3.4512773470306*^9, 3.4512773766082*^9}, {3.4512776069110003`*^9, 3.4512777499318*^9}, 3.4512777831286*^9, {3.4512778785538*^9, 3.451277881627*^9}, { 3.4512780242734003`*^9, 3.4512780302794*^9}, 3.4512780737878*^9, { 3.4512781866226*^9, 3.4512781930810003`*^9}, {3.4512863325078*^9, 3.4512863539266*^9}, {3.4568019250434*^9, 3.4568022712698*^9}, { 3.4568023177422*^9, 3.4568024125278*^9}, {3.4568024694365997`*^9, 3.4568024750369997`*^9}, {3.4568026914402*^9, 3.4568028101094*^9}, { 3.4568028406698*^9, 3.4568028564726*^9}, 3.4568028886085997`*^9, { 3.4568030489454*^9, 3.4568030800986*^9}, 3.4568032004128*^9, { 3.4568035073698*^9, 3.4568035176034*^9}, {3.4568040146596003`*^9, 3.4568040844852*^9}, {3.4568043016684*^9, 3.4568043154744*^9}, { 3.4568045482264*^9, 3.4568045486632*^9}, {3.4568048944996*^9, 3.4568049806116*^9}, {3.4660560628582*^9, 3.4660560753538*^9}, { 3.4660676729379997`*^9, 3.4660676735931997`*^9}, {3.4660677244024*^9, 3.4660677277251997`*^9}, {3.4742646771287394`*^9, 3.47426469439174*^9}, { 3.47426489921974*^9, 3.4742649800437393`*^9}, {3.4801246373348*^9, 3.4801246860536003`*^9}, {3.4801247748176003`*^9, 3.4801247821028*^9}, { 3.4801248161264*^9, 3.4801248295736*^9}, {3.4801248810692*^9, 3.4801248964508*^9}, {3.4801249330484*^9, 3.480124947884*^9}, 3.4801249886468*^9, {3.4801251139147997`*^9, 3.48012512588*^9}, { 3.4838339444988003`*^9, 3.4838339567448*^9}, 3.4838341692012*^9, { 3.4838344350408*^9, 3.4838344353684*^9}, {3.4938987575920324`*^9, 3.4938987586840324`*^9}, {3.4941630624049997`*^9, 3.4941631381274*^9}, { 3.4941632311345997`*^9, 3.4941632492306004`*^9}, 3.4941633249217997`*^9, { 3.4941633940922003`*^9, 3.4941634063538*^9}, {3.4941634538402*^9, 3.4941635051642*^9}, {3.494163565115*^9, 3.4941636341762*^9}, { 3.4941636853442*^9, 3.4941639323234*^9}, {3.4941640277798*^9, 3.4941641455754004`*^9}, {3.4941641790374002`*^9, 3.4941641803789997`*^9}, {3.4941642676142*^9, 3.4941643277678003`*^9}, 3.4941644677018003`*^9, {3.4941646208938*^9, 3.4941646322349997`*^9}, { 3.4941652592693996`*^9, 3.4941652807194*^9}, {3.4941653119038*^9, 3.494165416299*^9}, {3.494165453895*^9, 3.4941654544722*^9}, { 3.4950990979779997`*^9, 3.495099142701*^9}, {3.495099172958*^9, 3.4950991806289997`*^9}, {3.495099227097*^9, 3.495099238113*^9}, 3.495099290797*^9, {3.495099346084*^9, 3.495099359507*^9}, { 3.495099456308*^9, 3.495099464091*^9}, 3.495099683108*^9, { 3.495100428112*^9, 3.495100434958*^9}, {3.4951006496219997`*^9, 3.495100649992*^9}, {3.4987235265018*^9, 3.4987235939094*^9}, { 3.4987236420666*^9, 3.4987236530646*^9}, {3.4987237305341997`*^9, 3.4987237396914*^9}, {3.498733136159*^9, 3.4987332972446003`*^9}, { 3.4987364783094*^9, 3.4987364860626*^9}, {3.4987366201134*^9, 3.4987366236078*^9}, {3.4987367272386*^9, 3.4987367464890003`*^9}, { 3.4987369428462*^9, 3.4987369670886*^9}, {3.4987370134518003`*^9, 3.4987370259941998`*^9}, {3.4987370944002*^9, 3.4987371027618*^9}, { 3.4987371921029997`*^9, 3.498737193663*^9}, {3.4987372660938*^9, 3.4987372935498*^9}, {3.4987373290554*^9, 3.4987377176202*^9}, { 3.4987377520182*^9, 3.4987379139462*^9}, {3.4987382030216*^9, 3.4987382667078*^9}, {3.4987888391818*^9, 3.4987888608346*^9}, { 3.4988785131146*^9, 3.4988785160162*^9}, {3.5007170967096*^9, 3.5007170999076*^9}, 3.5007182237316*^9, {3.5007182772864*^9, 3.5007182987832003`*^9}, {3.5009573226744003`*^9, 3.5009573940444*^9}, 3.5009574358710003`*^9, 3.5009604278482*^9, {3.5009897246173353`*^9, 3.5009898480289354`*^9}, {3.5009901464413357`*^9, 3.5009901475333357`*^9}, {3.5009901801997356`*^9, 3.500990274096135*^9}, { 3.5010475253292*^9, 3.5010475852332*^9}, {3.5010605722018003`*^9, 3.5010606739762*^9}, {3.5010607202146*^9, 3.5010607323358*^9}, { 3.5010607920526*^9, 3.501061118467*^9}, {3.5010612022078*^9, 3.5010612277138*^9}, {3.5010616467766*^9, 3.5010617938534*^9}, { 3.5010618406222*^9, 3.5010619950778*^9}, {3.5010621500638*^9, 3.5010622514014*^9}, {3.5010625292218*^9, 3.5010625409374*^9}, { 3.5010626043046*^9, 3.5010626313862*^9}, {3.5010626787166*^9, 3.5010626790754004`*^9}, {3.501074457561*^9, 3.5010744671082*^9}, 3.5010763029458*^9, {3.5032210899309998`*^9, 3.5032212413900003`*^9}, { 3.557658203404973*^9, 3.557658219644601*^9}, {3.5576584433801947`*^9, 3.557658496030287*^9}, {3.5576585501779823`*^9, 3.5576586046064777`*^9}, { 3.557658648910555*^9, 3.557658754600741*^9}, {3.557658963945511*^9, 3.5576589782507353`*^9}, {3.557659009949991*^9, 3.5576591437514267`*^9}, { 3.557659182221094*^9, 3.5576592187719584`*^9}, 3.557659413865901*^9, { 3.557659921100792*^9, 3.5576599556392527`*^9}, {3.557660706920972*^9, 3.5576607248454037`*^9}, {3.557661209085854*^9, 3.557661209413454*^9}, { 3.5577526651911488`*^9, 3.5577526932087984`*^9}, {3.5577527272480583`*^9, 3.557752747122493*^9}, {3.5577528374934516`*^9, 3.557752838523053*^9}, { 3.557752881204728*^9, 3.557752891313546*^9}, {3.557752938612829*^9, 3.5577529469120436`*^9}, {3.557753060714244*^9, 3.557753062633047*^9}, { 3.5577536609544907`*^9, 3.5577536637936954`*^9}, {3.5577537824631042`*^9, 3.557753810184353*^9}, {3.557753841025607*^9, 3.5577540648392*^9}, 3.5577541920574236`*^9, {3.5577547033327217`*^9, 3.557754716967146*^9}, { 3.5577547716296415`*^9, 3.557754802112095*^9}, {3.5577549509363565`*^9, 3.5577549771444025`*^9}, 3.5577551382302856`*^9, {3.55775527184452*^9, 3.557755272858522*^9}, {3.557755881555991*^9, 3.557755886548*^9}, { 3.557756158316077*^9, 3.557756231885806*^9}, {3.5577572408487787`*^9, 3.557757248835993*^9}, {3.5577572834368534`*^9, 3.5577575888229895`*^9}, { 3.5577578129641833`*^9, 3.557757862837471*^9}, {3.557758025514557*^9, 3.557758079272251*^9}, 3.557810586960072*^9, {3.5578240262005973`*^9, 3.5578240345360737`*^9}, {3.557824091429328*^9, 3.5578241008156557`*^9}, { 3.557831525255726*^9, 3.5578315319793377`*^9}, 3.5578315716190076`*^9, { 3.557831606079468*^9, 3.557831629432709*^9}, {3.5578316663267736`*^9, 3.5578317569473333`*^9}, {3.5578322144181366`*^9, 3.557832218084143*^9}, { 3.557836356693412*^9, 3.557836473771618*^9}, {3.5578365201660995`*^9, 3.5578365974018345`*^9}, {3.5578366426731143`*^9, 3.557836658865943*^9}, { 3.557836691017599*^9, 3.5578367924957776`*^9}, {3.5578368305442443`*^9, 3.557836888279946*^9}, {3.5578369382156334`*^9, 3.5578370776642785`*^9}, { 3.5578383536061196`*^9, 3.5578383735117545`*^9}, {3.5578385892445335`*^9, 3.5578385978869486`*^9}, {3.5578386713006773`*^9, 3.557838700113928*^9}, { 3.5578387451200075`*^9, 3.5578387467892103`*^9}, {3.5578388951454706`*^9, 3.5578389248635225`*^9}, {3.5578389679351983`*^9, 3.557838983535226*^9}, { 3.5578390227692947`*^9, 3.557839023143696*^9}, {3.557839097696226*^9, 3.5578391125162525`*^9}, {3.5578391553539276`*^9, 3.557839199892006*^9}, { 3.55783924184048*^9, 3.557839294490572*^9}, {3.5578393285922318`*^9, 3.557839398683155*^9}, {3.557839430522811*^9, 3.557839470162481*^9}, { 3.5578395370865984`*^9, 3.5578395446994114`*^9}, {3.5578396068499207`*^9, 3.5578396118575296`*^9}, 3.5578943518105097`*^9, {3.557894388361374*^9, 3.5578944029629993`*^9}, {3.5578944607611012`*^9, 3.5578944989499683`*^9}, {3.5578945393696394`*^9, 3.557894561537278*^9}, { 3.5578946028617506`*^9, 3.5578946188985786`*^9}, {3.557894650894235*^9, 3.5578947812636642`*^9}, {3.55789481884413*^9, 3.5578948191249304`*^9}, { 3.5578949768100076`*^9, 3.5578949836272197`*^9}, {3.5578967386805477`*^9, 3.55789678549623*^9}, {3.5578968804691963`*^9, 3.557896888643611*^9}, { 3.557897022491846*^9, 3.5578970341450663`*^9}, {3.557897620940097*^9, 3.55789765120415*^9}, {3.5579218072271147`*^9, 3.5579218263059483`*^9}, { 3.557922095312821*^9, 3.557922116965659*^9}, {3.557922178086566*^9, 3.557922188616585*^9}, {3.5579223258812256`*^9, 3.557922327066828*^9}, { 3.5579224596046605`*^9, 3.557922461804264*^9}, 3.5579805928465395`*^9, { 3.5579815200581703`*^9, 3.557981541711009*^9}, 3.557985544779242*^9, { 3.5579863164793987`*^9, 3.5579863339514294`*^9}, {3.557986523210962*^9, 3.557986568841042*^9}, 3.5579866122559185`*^9, 3.557986993536188*^9, { 3.5579871244716187`*^9, 3.5579871290580263`*^9}, 3.557987173486905*^9, 3.5579872166989803`*^9, {3.5599618621582537`*^9, 3.5599618642486577`*^9}, { 3.559961969720443*^9, 3.5599619894700775`*^9}, 3.559963611089726*^9, { 3.5601298891258235`*^9, 3.560129889422224*^9}, {3.560132445157113*^9, 3.5601324458591146`*^9}, {3.561978472080926*^9, 3.561978472392926*^9}, { 3.6297802564412937`*^9, 3.6297802957377625`*^9}, {3.62978033369263*^9, 3.629780429741998*^9}, {3.6297805790030603`*^9, 3.6297809429048996`*^9}, { 3.629780987957779*^9, 3.629781197575347*^9}, {3.629781240397422*^9, 3.629781337663593*^9}, {3.6297813946972933`*^9, 3.6297814529165955`*^9}, { 3.6297814952550697`*^9, 3.629781527578326*^9}, {3.62978162025529*^9, 3.629781647633338*^9}, {3.629781678833393*^9, 3.629781763120341*^9}, 3.6297818028224106`*^9, {3.6297818432108817`*^9, 3.629781872570133*^9}, { 3.629782355765382*^9, 3.629782427603508*^9}, {3.6297824692243814`*^9, 3.629782674863942*^9}, {3.629782707218399*^9, 3.6297829295343895`*^9}, { 3.629783005631323*^9, 3.6297830574702144`*^9}, {3.6297831098551064`*^9, 3.629783142786764*^9}, {3.629783433711675*^9, 3.629783442619291*^9}, { 3.6297834942397814`*^9, 3.6297835175930223`*^9}, 3.6297835794939313`*^9, { 3.6297836160291953`*^9, 3.6297837668970604`*^9}, {3.6297842042438283`*^9, 3.6297842697483435`*^9}, {3.6297843514456873`*^9, 3.629784370742921*^9}, { 3.629784443829049*^9, 3.6297844678842916`*^9}, {3.6297845252611923`*^9, 3.629784525588793*^9}, {3.6297846136821475`*^9, 3.629784629235375*^9}, { 3.629784814797701*^9, 3.629784927648299*^9}, {3.629785259960083*^9, 3.6297852602096834`*^9}, {3.6297858780175686`*^9, 3.629785917282837*^9}, { 3.629786048057867*^9, 3.629786048681868*^9}, 3.6297863278755584`*^9, { 3.6297867047133856`*^9, 3.629786748533863*^9}, {3.6297867791567163`*^9, 3.6297868491540394`*^9}, {3.6297875320748396`*^9, 3.629787569795706*^9}, { 3.6297876247234025`*^9, 3.6297877281983843`*^9}, {3.6297877681812544`*^9, 3.629787774015665*^9}, {3.629787831408166*^9, 3.6297878355265727`*^9}, { 3.6297878775686464`*^9, 3.6297878861174617`*^9}, {3.6297879185343184`*^9, 3.629787919064719*^9}, {3.6297880043032694`*^9, 3.62978800470887*^9}, 3.6297880488257475`*^9, {3.6297882100052304`*^9, 3.6297882174776435`*^9}, { 3.6297882697533355`*^9, 3.6297882948381796`*^9}, {3.6297883467550707`*^9, 3.6297883991087627`*^9}, {3.6297887361785545`*^9, 3.629788783961438*^9}, 3.629788825395111*^9, {3.629789006152629*^9, 3.6297890321266747`*^9}, { 3.6297891133248167`*^9, 3.629789145336073*^9}, {3.6297891926821566`*^9, 3.629789194257759*^9}, {3.629789255316266*^9, 3.6297892556282673`*^9}, { 3.629869102295367*^9, 3.629869160124668*^9}, {3.6298691942887287`*^9, 3.6298696149902673`*^9}, {3.6298696993864155`*^9, 3.62986975897852*^9}, { 3.6298698387726603`*^9, 3.629869912030389*^9}, {3.6298700722270703`*^9, 3.629870234560955*^9}, {3.629870580429163*^9, 3.629870630458451*^9}, { 3.630556081081209*^9, 3.630556104902451*^9}, {3.6305562643503313`*^9, 3.6305562763935523`*^9}, {3.6305563415080667`*^9, 3.630556480956712*^9}, { 3.630556692851884*^9, 3.630556695347888*^9}, {3.630556730042349*^9, 3.630556914528273*^9}, {3.6305653725974936`*^9, 3.6305656807121167`*^9}, { 3.630565758760581*^9, 3.6305657739024467`*^9}, {3.630565858170267*^9, 3.63056596644846*^9}, {3.6305661502619734`*^9, 3.6305661523230915`*^9}, { 3.6305662653385553`*^9, 3.630566370352562*^9}, {3.6305667786019125`*^9, 3.630566790535595*^9}, {3.6305668214773645`*^9, 3.630567044691132*^9}, { 3.6305670772499943`*^9, 3.6305670783710585`*^9}, 3.630567272031135*^9, { 3.630567303902958*^9, 3.630567409875019*^9}, {3.630568671196477*^9, 3.6305687195002403`*^9}, {3.6305687542132254`*^9, 3.630568758623478*^9}, { 3.630568855671028*^9, 3.630568859250233*^9}, {3.630569706514694*^9, 3.630569775526641*^9}, 3.630569982346471*^9, {3.6305701679130845`*^9, 3.630570205199217*^9}, {3.6305703751399374`*^9, 3.630570526177576*^9}, { 3.630587657039589*^9, 3.630587688367381*^9}, {3.6305880733027773`*^9, 3.6305883365376396`*^9}, {3.6305886689118233`*^9, 3.6305886717978287`*^9}, 3.6305889776831656`*^9, {3.6305890389444733`*^9, 3.6305890437180815`*^9}, { 3.630589093248169*^9, 3.6305891296430326`*^9}, 3.630589181700324*^9, { 3.6305892509956455`*^9, 3.6305892594820604`*^9}, {3.630589318949365*^9, 3.6305893334729905`*^9}, {3.630589630294712*^9, 3.6305896376267247`*^9}, { 3.630589683288005*^9, 3.630589684988408*^9}, {3.630597310538067*^9, 3.630597340080757*^9}, {3.630597391446695*^9, 3.630597400596218*^9}, { 3.6305974350611897`*^9, 3.6305974605306463`*^9}, {3.630633997622449*^9, 3.630634003125764*^9}, {3.630659322217756*^9, 3.63065932438616*^9}, { 3.6306611578252783`*^9, 3.6306611625988865`*^9}, {3.6306612541554475`*^9, 3.630661257587454*^9}, {3.6306613001287284`*^9, 3.6306613026715326`*^9}, { 3.6306613920752897`*^9, 3.6306613949768953`*^9}, {3.6306706377509866`*^9, 3.630670654957817*^9}, {3.6306749981919994`*^9, 3.630675005793434*^9}, { 3.6306751229631357`*^9, 3.630675150017683*^9}, {3.6306752035287437`*^9, 3.6306752096180925`*^9}, {3.630675315921172*^9, 3.6306753201514144`*^9}, { 3.6306757793287754`*^9, 3.6306757796257925`*^9}, {3.630675814406262*^9, 3.6306758147026625`*^9}, {3.6306760107574763`*^9, 3.6306760154417443`*^9}, {3.6306789722320743`*^9, 3.6306789870309205`*^9}, {3.6306790257051325`*^9, 3.630679028076268*^9}, { 3.6306800259177256`*^9, 3.6306800406129513`*^9}, {3.6306801239326982`*^9, 3.6306801300167084`*^9}, {3.630680769261832*^9, 3.6306807806186523`*^9}, { 3.630681157468514*^9, 3.6306811577649145`*^9}, {3.6306812744219193`*^9, 3.63068127471832*^9}, {3.6306817187418995`*^9, 3.6306817919060287`*^9}, { 3.630681879188182*^9, 3.6306819111526375`*^9}, {3.6306821191790032`*^9, 3.6306821283050194`*^9}, {3.630720543651497*^9, 3.6307205534300566`*^9}, { 3.630721035525631*^9, 3.630721092774905*^9}, {3.6307212510439577`*^9, 3.6307213064777765`*^9}, {3.6307477437169704`*^9, 3.6307478284095197`*^9}, {3.6307478614971776`*^9, 3.6307478785948076`*^9}, {3.6307479884814005`*^9, 3.630748002880226*^9}, { 3.630748045624301*^9, 3.630748063876333*^9}, {3.630748111596817*^9, 3.6307481498324842`*^9}, {3.6307489182430334`*^9, 3.6307489447786803`*^9}, {3.630749037427243*^9, 3.6307490443848553`*^9}, { 3.6307491041485605`*^9, 3.6307491384218206`*^9}, {3.6307491914151134`*^9, 3.630749196890723*^9}, {3.6307492445800066`*^9, 3.6307493439989815`*^9}, { 3.630749396212273*^9, 3.6307494766304145`*^9}, {3.6307495333989143`*^9, 3.6307495547241516`*^9}, {3.6307496525831237`*^9, 3.630749669571553*^9}, { 3.630750220602922*^9, 3.6307502881822405`*^9}, {3.6307510631916018`*^9, 3.630751068292811*^9}, {3.6307511226589065`*^9, 3.630751137962533*^9}, { 3.6307512555243397`*^9, 3.630751282777588*^9}, {3.630752266971757*^9, 3.630752414599744*^9}, {3.630752446407563*^9, 3.630752457388191*^9}, { 3.6307589380050273`*^9, 3.6307590266300964`*^9}, {3.6307591666721067`*^9, 3.63075923229886*^9}, 3.630760288282259*^9, {3.6307603547370596`*^9, 3.630760557414652*^9}, {3.630760654134184*^9, 3.63076065510824*^9}, { 3.6307606911683025`*^9, 3.6307606919283457`*^9}, {3.6307607642334814`*^9, 3.6307607648645177`*^9}, {3.630761455000991*^9, 3.6307614616743727`*^9}, { 3.630761507825012*^9, 3.630761605776615*^9}, {3.630761652999316*^9, 3.630761695865768*^9}, {3.630761771278081*^9, 3.6307617792215357`*^9}, 3.6307629478424797`*^9, {3.632205207880766*^9, 3.6322052561155243`*^9}, { 3.6322052892474194`*^9, 3.6322052915745525`*^9}, 3.6322053746993074`*^9, { 3.6322062705415463`*^9, 3.6322062726016645`*^9}, {3.6322063396935015`*^9, 3.63220636484194*^9}, {3.6322064410612993`*^9, 3.6322064491667633`*^9}, { 3.632206580308264*^9, 3.6322066373275256`*^9}, {3.6322066736436024`*^9, 3.6322067467737856`*^9}, {3.632206782260815*^9, 3.6322071351279984`*^9}, 3.6322071989226465`*^9, {3.632207270393735*^9, 3.6322073359894867`*^9}, { 3.6322073997741346`*^9, 3.6322074126708727`*^9}, {3.632207491777397*^9, 3.632207682289294*^9}, {3.632207809621577*^9, 3.632207827973626*^9}, { 3.6322079043859973`*^9, 3.6322079279443445`*^9}, {3.6322080916397076`*^9, 3.6322081666649985`*^9}, 3.634905258940913*^9, {3.634905370524296*^9, 3.6349054089004903`*^9}, {3.6349054472556844`*^9, 3.63490544787272*^9}, { 3.634905483492757*^9, 3.6349055164646425`*^9}, {3.634905574352954*^9, 3.634905628121029*^9}, {3.6349057012822137`*^9, 3.6349057207913294`*^9}, { 3.6349061371061416`*^9, 3.634906354438572*^9}, {3.6349063890455513`*^9, 3.6349064369332905`*^9}, {3.634906537696054*^9, 3.634906601859724*^9}, 3.634906706128688*^9, {3.6349069249442034`*^9, 3.6349069328326545`*^9}, { 3.6349070151973653`*^9, 3.6349070242298822`*^9}, {3.6349070817921743`*^9, 3.6349070822111983`*^9}, {3.634907723288866*^9, 3.634907739005765*^9}, { 3.6349079580732946`*^9, 3.6349079868219395`*^9}, {3.634908200284148*^9, 3.634908315195721*^9}, {3.6349083774582825`*^9, 3.6349084027997313`*^9}, { 3.63490844507615*^9, 3.634908448843365*^9}, {3.634914956333157*^9, 3.634915020054802*^9}, {3.634915050572547*^9, 3.6349150956171236`*^9}, { 3.6349539785771523`*^9, 3.634953978975175*^9}, {3.6349540728785458`*^9, 3.6349541681829967`*^9}, {3.634954211263461*^9, 3.6349542495746527`*^9}, { 3.6349543251259737`*^9, 3.634954355882733*^9}, {3.6349543892536416`*^9, 3.6349544742835045`*^9}, {3.634954547519694*^9, 3.6349545640246377`*^9}, { 3.6349547051657104`*^9, 3.6349547107930326`*^9}, {3.634954745355009*^9, 3.634954752101395*^9}, {3.6349547948858423`*^9, 3.6349548053894434`*^9}, { 3.634954904907135*^9, 3.6349549451084347`*^9}, {3.634955219605135*^9, 3.6349552640926795`*^9}, {3.634955320189888*^9, 3.634955348763522*^9}, { 3.634955386393675*^9, 3.6349555039273973`*^9}, {3.6349557669644423`*^9, 3.6349557672004557`*^9}, {3.634955894841756*^9, 3.634955902578199*^9}, { 3.6349559513739896`*^9, 3.6349560216320086`*^9}, {3.634956120144643*^9, 3.634956128996149*^9}, {3.6349561700724983`*^9, 3.6349561978900895`*^9}, { 3.6349562480719595`*^9, 3.634956254326318*^9}, {3.634956331684742*^9, 3.6349563460575643`*^9}, {3.634956379242462*^9, 3.63495642676418*^9}, 3.6349564696636343`*^9, {3.6351524116477795`*^9, 3.6351524153379908`*^9}, { 3.6352134400282927`*^9, 3.635213442148414*^9}, {3.6352134745862694`*^9, 3.635213495869487*^9}, {3.6352135383409157`*^9, 3.6352137157160616`*^9}, { 3.6352137493569856`*^9, 3.635213764522853*^9}, {3.635214215036621*^9, 3.635214227593339*^9}, {3.635214407257615*^9, 3.63521441713218*^9}, { 3.635215297101512*^9, 3.635215303964904*^9}, {3.6352154111120324`*^9, 3.635215431504199*^9}, {3.635216346055508*^9, 3.635216494371991*^9}, { 3.635216631050809*^9, 3.6352166603244834`*^9}, {3.635216763034358*^9, 3.635216764164423*^9}, {3.6352168771938877`*^9, 3.635216888828553*^9}, 3.6352169832479534`*^9, 3.635217037668066*^9, {3.6352172024924936`*^9, 3.6352172054526625`*^9}, {3.635217344025589*^9, 3.635217346898753*^9}, 3.6352173863770113`*^9, {3.635217519639633*^9, 3.6352175507014103`*^9}, 3.635217615445113*^9, {3.6352178715087595`*^9, 3.635217880460271*^9}, { 3.6352185912849283`*^9, 3.635218598444338*^9}, {3.6352186995721216`*^9, 3.635218714955002*^9}, {3.6352189761749425`*^9, 3.6352189789341*^9}, { 3.6352195060322485`*^9, 3.635219509972474*^9}, 3.6352195673477554`*^9, 3.6352195994635925`*^9, {3.6352197336482677`*^9, 3.635219737452485*^9}, { 3.6352197706093817`*^9, 3.6352197723214793`*^9}, {3.635219941784172*^9, 3.6352199485115566`*^9}, {3.6352200714185867`*^9, 3.6352200854323883`*^9}, {3.6352202085694313`*^9, 3.635220235849992*^9}, { 3.6352202816336107`*^9, 3.6352203110962954`*^9}, {3.6352204980449886`*^9, 3.6352205276526823`*^9}, {3.6352253191447396`*^9, 3.6352253299913597`*^9}, {3.6352253611111403`*^9, 3.6352253637572913`*^9}, {3.635225409322898*^9, 3.6352255965196047`*^9}, { 3.6352260914249115`*^9, 3.6352261698393965`*^9}, {3.63522638233055*^9, 3.6352264188036366`*^9}, {3.635227493469104*^9, 3.635227556935734*^9}, { 3.6352276745764627`*^9, 3.635227730116639*^9}, {3.6352287979917183`*^9, 3.6352288587651944`*^9}, {3.635228894237223*^9, 3.635228948324317*^9}, { 3.635229365252164*^9, 3.6352293902275925`*^9}, {3.63522947690555*^9, 3.6352294807837715`*^9}, {3.6352492831123204`*^9, 3.6352492983621926`*^9}, 3.6356569054520617`*^9, {3.6363778004499054`*^9, 3.636377802787039*^9}, { 3.6363778414932528`*^9, 3.6363778525308843`*^9}, {3.636384436335312*^9, 3.6363846409950175`*^9}, {3.636384971250907*^9, 3.6363849738080535`*^9}, { 3.6363850170465264`*^9, 3.636385030729309*^9}, {3.6363851286779118`*^9, 3.636385138359465*^9}, {3.6363851699712734`*^9, 3.636385223111313*^9}, { 3.656076172452749*^9, 3.656076182171566*^9}, {3.6560765578514256`*^9, 3.656076619019133*^9}, 3.6560772545486493`*^9, {3.6630719749029694`*^9, 3.6630719878027077`*^9}, {3.6630720702554235`*^9, 3.6630720807290225`*^9}, {3.6630721155740156`*^9, 3.6630721713712068`*^9}, {3.663072270834896*^9, 3.6630722882218904`*^9}, 3.6630724099968557`*^9, {3.685234767958906*^9, 3.685234768480936*^9}, { 3.685252204033695*^9, 3.6852522340537376`*^9}, {3.6852522757137957`*^9, 3.6852523115138454`*^9}, {3.68525376314359*^9, 3.6852537725041256`*^9}, { 3.6852539763277836`*^9, 3.6852539861693463`*^9}, 3.6852540682470407`*^9, 3.6852541660656357`*^9, {3.6852604801645336`*^9, 3.6852605060345697`*^9}, { 3.6852605373446136`*^9, 3.6852605977846985`*^9}, 3.685260655254779*^9, { 3.6853280002218475`*^9, 3.685328019561875*^9}, 3.685328064721938*^9, { 3.6853280953119807`*^9, 3.6853282636022167`*^9}, {3.685328356242346*^9, 3.685328598671985*^9}, {3.6853286682069626`*^9, 3.6853287982524004`*^9}, { 3.6853288753368096`*^9, 3.6853289367033195`*^9}, {3.685328968274125*^9, 3.685328978713722*^9}, {3.685329033941881*^9, 3.685329044950511*^9}, { 3.685329173522865*^9, 3.6853294420842257`*^9}, {3.6853296024223967`*^9, 3.6853296124319687`*^9}, {3.6853297221712456`*^9, 3.685329733349885*^9}, { 3.6853298076291337`*^9, 3.6853298739599276`*^9}, {3.685330038474337*^9, 3.685330051652091*^9}, {3.6853311309428225`*^9, 3.685331168378964*^9}, { 3.685340142134763*^9, 3.685340180544817*^9}, {3.6853583292043543`*^9, 3.685358334834362*^9}, {3.685358366084406*^9, 3.685358366954407*^9}, { 3.685358408404465*^9, 3.685358518294619*^9}, 3.685358620174762*^9, 3.6853586578748145`*^9, {3.6853588750151186`*^9, 3.6853588857151337`*^9}, { 3.6853589302051954`*^9, 3.685358938995208*^9}, {3.685359014715314*^9, 3.6853590296653347`*^9}, 3.685359148315501*^9, 3.6853598281764526`*^9, { 3.6853683109000263`*^9, 3.685368382250126*^9}, {3.685368420160179*^9, 3.6853684704302497`*^9}, {3.6853685194503183`*^9, 3.685368742860631*^9}, { 3.685369008901004*^9, 3.68536902061102*^9}, {3.6853690791611023`*^9, 3.685369132301176*^9}, {3.6853693219914417`*^9, 3.6853693304114532`*^9}, 3.6853696089118433`*^9, {3.6858758911429157`*^9, 3.685875951793*^9}, { 3.6859484099082212`*^9, 3.6859484970032024`*^9}, {3.686052829875022*^9, 3.686052906242383*^9}, {3.6860535326822133`*^9, 3.686053598029951*^9}, { 3.68605365168902*^9, 3.6860541446091995`*^9}, {3.6860541846064873`*^9, 3.68605440393201*^9}, {3.686054713802734*^9, 3.6860547858298535`*^9}, { 3.6860548280202665`*^9, 3.686054837219793*^9}, {3.686054874127904*^9, 3.686054892139934*^9}, {3.686055136014883*^9, 3.6860551460584574`*^9}, { 3.686055211281188*^9, 3.6860552301962633`*^9}, {3.6860553465409174`*^9, 3.6860553998749685`*^9}, {3.6860556017188663`*^9, 3.6860556050188704`*^9}, {3.6862923512707715`*^9, 3.686292363600789*^9}, { 3.686292409650853*^9, 3.6862924109708548`*^9}, {3.6862924536109147`*^9, 3.6862924596309233`*^9}, {3.686292542221039*^9, 3.6862925430110397`*^9}, { 3.686292988803664*^9, 3.686293001033681*^9}, {3.6866504529025555`*^9, 3.686650526682659*^9}, {3.686650671852862*^9, 3.6866507242929354`*^9}, { 3.6866507657529936`*^9, 3.6866507887630253`*^9}, {3.6866508208230705`*^9, 3.6866509100531955`*^9}, {3.6866509593932643`*^9, 3.686650971113281*^9}, { 3.686651007793332*^9, 3.6866511595335445`*^9}, {3.686651223513634*^9, 3.686651234033649*^9}, {3.686651304763748*^9, 3.6866513363837924`*^9}, { 3.6866514102038956`*^9, 3.686651429943923*^9}, {3.686652993837468*^9, 3.6866530046274834`*^9}, {3.686804398511652*^9, 3.6868044081516657`*^9}, { 3.6868046315619783`*^9, 3.686804631801979*^9}, {3.686804685872054*^9, 3.686804707092084*^9}, {3.6868047382021275`*^9, 3.686804767812169*^9}, { 3.686804824012248*^9, 3.6868048404922705`*^9}, {3.686804942142413*^9, 3.6868049633424425`*^9}, {3.6868050765526013`*^9, 3.686805101092636*^9}, { 3.6868051463526993`*^9, 3.6868052234228067`*^9}, {3.686805307602925*^9, 3.686805311682931*^9}, {3.68680577547358*^9, 3.686805788923599*^9}, { 3.686821702197342*^9, 3.6868217282873783`*^9}, {3.6868225192884855`*^9, 3.686822538368512*^9}, {3.6868226306886415`*^9, 3.6868226683086944`*^9}, { 3.6868227318887835`*^9, 3.6868227627088265`*^9}, {3.686822801638881*^9, 3.6868230490692277`*^9}, {3.686823122979331*^9, 3.6868231833294153`*^9}, { 3.6868232450595016`*^9, 3.6868233753996844`*^9}, {3.6868234153897405`*^9, 3.686823451379791*^9}, {3.6868236736101017`*^9, 3.6868236786601086`*^9}, { 3.6868237164601617`*^9, 3.68682375072021*^9}, {3.68682389396041*^9, 3.68682390087042*^9}, {3.686823940790476*^9, 3.6868239416904774`*^9}, { 3.6868239808805323`*^9, 3.6868239872905407`*^9}, {3.686824051540631*^9, 3.6868240519006314`*^9}, {3.686824360861064*^9, 3.6868243761510854`*^9}, { 3.6868245440213203`*^9, 3.686824577221367*^9}, {3.686824685841519*^9, 3.6868246979115357`*^9}, 3.6868248012716804`*^9, 3.6868253582724605`*^9, { 3.6868255183026843`*^9, 3.686825518932685*^9}, {3.6868264466639843`*^9, 3.6868264497139883`*^9}, {3.6868267792744493`*^9, 3.6868268152945004`*^9}, {3.686827100164899*^9, 3.6868271210549283`*^9}, 3.686827162004986*^9, {3.6868272414950967`*^9, 3.686827327475217*^9}, { 3.686827953126093*^9, 3.686827976506126*^9}, {3.686829128577739*^9, 3.686829138957753*^9}, 3.6868292410978966`*^9, {3.6868292768379464`*^9, 3.686829282727955*^9}, {3.6868293820380936`*^9, 3.686829418138144*^9}, { 3.686829846748744*^9, 3.686829848298746*^9}, {3.6868313063207874`*^9, 3.686831307180789*^9}, {3.6868331276633377`*^9, 3.68683328653356*^9}, { 3.6868394697195063`*^9, 3.6868394933895392`*^9}, 3.686839530999592*^9, { 3.686839582829664*^9, 3.68683963686974*^9}, {3.6868397551199055`*^9, 3.68683979365996*^9}, {3.6868398344600167`*^9, 3.686839866200061*^9}, { 3.687092084401948*^9, 3.687092117031994*^9}, {3.6870922598621936`*^9, 3.6870922645422*^9}, {3.6870962086478376`*^9, 3.6870962658779182`*^9}, 3.687096444838168*^9, {3.687096500978247*^9, 3.687096501638248*^9}, { 3.6870965809883595`*^9, 3.687096592708376*^9}, 3.687096837948719*^9, { 3.68709688890879*^9, 3.687096985798926*^9}, {3.6870971015990877`*^9, 3.6870972179192505`*^9}, {3.6870972618993125`*^9, 3.687097305639374*^9}, { 3.6870973356794157`*^9, 3.6870975186496716`*^9}, {3.6870975796097574`*^9, 3.6870975953197794`*^9}, {3.6870976531898603`*^9, 3.6870976848899045`*^9}, 3.6870977782500353`*^9, {3.687413757687042*^9, 3.6874137834070783`*^9}, { 3.6874140542074575`*^9, 3.687414094417514*^9}, {3.6874143478878684`*^9, 3.687414485538061*^9}, {3.6874146116082373`*^9, 3.68741464894829*^9}, { 3.6874147451084247`*^9, 3.687414766118454*^9}, 3.6874149094486547`*^9, { 3.6874150416688395`*^9, 3.6874150634888706`*^9}, {3.6874152437091227`*^9, 3.687415268869158*^9}, 3.6874153442892637`*^9, {3.687415449879411*^9, 3.687415469659439*^9}, 3.687415529739523*^9, 3.687415564789572*^9, 3.687415645529685*^9, {3.6874168016913037`*^9, 3.687416803441306*^9}, { 3.687421022677213*^9, 3.6874212686075573`*^9}, {3.68742948209425*^9, 3.6874294906842623`*^9}, {3.687844340668378*^9, 3.6878443698084188`*^9}, { 3.6886534778571014`*^9, 3.6886534911571198`*^9}, {3.688906380162199*^9, 3.6889064680223217`*^9}, {3.688906514222396*^9, 3.6889065193925257`*^9}, { 3.688908192623024*^9, 3.6889082006430354`*^9}, {3.688908261823121*^9, 3.688908271653135*^9}, {3.6889083776232834`*^9, 3.6889083922733035`*^9}, { 3.688908466073407*^9, 3.6889084993734536`*^9}, 3.688908533623502*^9, { 3.688908616683618*^9, 3.6889086271336327`*^9}, {3.6889086885637183`*^9, 3.6889087063437433`*^9}, {3.6889091647443852`*^9, 3.6889092012544365`*^9}, {3.6889093019045773`*^9, 3.6889093406746316`*^9}, 3.6889101071957045`*^9, {3.689905940063133*^9, 3.689905972983179*^9}, { 3.692530981927737*^9, 3.6925310416778207`*^9}, {3.692531099797902*^9, 3.6925311384779563`*^9}, {3.692531192258032*^9, 3.692531244668105*^9}, { 3.6925312919881716`*^9, 3.692531425418358*^9}, {3.6925315270885005`*^9, 3.692531643928664*^9}, {3.692535489534048*^9, 3.6925356485142703`*^9}, { 3.692535753564418*^9, 3.6925357992544813`*^9}, {3.6925358831745987`*^9, 3.692535899604622*^9}, {3.692536042584822*^9, 3.692536159384986*^9}, { 3.6925366121156197`*^9, 3.6925366207256317`*^9}, {3.6925367265057793`*^9, 3.69253672683578*^9}, {3.6925368590559654`*^9, 3.6925368636559715`*^9}, { 3.6925370880062857`*^9, 3.692537177856412*^9}, {3.692537322456614*^9, 3.6925373869767046`*^9}, {3.6925390913352747`*^9, 3.6925390925252767`*^9}, {3.692539644430175*^9, 3.6925396711502123`*^9}, { 3.692539727510291*^9, 3.692539730440295*^9}, {3.69253993367058*^9, 3.692539963780622*^9}, {3.6925400018406754`*^9, 3.692540003630678*^9}, { 3.6925401743409166`*^9, 3.6925401747509174`*^9}, {3.692540399111232*^9, 3.692540407981244*^9}, {3.69254047647134*^9, 3.6925404886113567`*^9}, { 3.6925406039715185`*^9, 3.69254060531152*^9}, {3.6925414948727655`*^9, 3.6925414953427663`*^9}, {3.6925415478528395`*^9, 3.692541613062931*^9}, 3.692541649332982*^9, {3.692541727633092*^9, 3.6925418840133104`*^9}, { 3.692541924473367*^9, 3.692542041693531*^9}, {3.6925421488836813`*^9, 3.6925422549438295`*^9}, {3.6925422976938896`*^9, 3.692542521444203*^9}, { 3.6925426221843443`*^9, 3.6925426357343626`*^9}, 3.692542739374508*^9, 3.692599799510878*^9, {3.692599834884901*^9, 3.6925998954663663`*^9}, { 3.692599925635092*^9, 3.6926000095928946`*^9}, {3.692600108929576*^9, 3.6926001456386757`*^9}, {3.6926001874800687`*^9, 3.692600454421337*^9}, { 3.692600503149027*^9, 3.6926006000391626`*^9}, {3.692600680251275*^9, 3.6926006814012766`*^9}, {3.6926009000215826`*^9, 3.6926009410816402`*^9}, 3.692601280532116*^9, {3.6926044914726114`*^9, 3.69260449774262*^9}, 3.6926045660127153`*^9, 3.6926046690228596`*^9, {3.69296647863291*^9, 3.6929664798829117`*^9}, {3.6929665643330297`*^9, 3.6929666141830997`*^9}, {3.6929670390036945`*^9, 3.6929670405536966`*^9}, {3.6929670861037607`*^9, 3.6929670952937737`*^9}, {3.6929671302538223`*^9, 3.6929671549438567`*^9}, {3.6929671904739065`*^9, 3.69296722137395*^9}, { 3.6929672596240034`*^9, 3.6929673352541094`*^9}, 3.6929678909232683`*^9, { 3.6930146982034283`*^9, 3.693014722713463*^9}, {3.6930148540136466`*^9, 3.693014857023651*^9}, {3.6930148913836985`*^9, 3.693014894823704*^9}, { 3.693014930903754*^9, 3.6930151942541227`*^9}, {3.693015247824198*^9, 3.693015430554454*^9}, {3.693015673794794*^9, 3.69301579223496*^9}, { 3.6930163123576884`*^9, 3.693016326897709*^9}, {3.6930164225678425`*^9, 3.693016429727853*^9}, {3.693016686718212*^9, 3.693016698128228*^9}, { 3.693016737038283*^9, 3.693016755068308*^9}, {3.6930168429225607`*^9, 3.6930168719926014`*^9}, {3.6930172049430676`*^9, 3.693017284063178*^9}, { 3.693017336433252*^9, 3.6930173662532935`*^9}, {3.6930180949163136`*^9, 3.6930180975563173`*^9}, {3.6930181870764427`*^9, 3.693018199956461*^9}, { 3.6930182954065943`*^9, 3.693018305996609*^9}, {3.693139886141657*^9, 3.6931399045016823`*^9}, {3.6931402916003532`*^9, 3.693140295770359*^9}, { 3.693140426020541*^9, 3.693140426530542*^9}, {3.6931410492237864`*^9, 3.6931410888738413`*^9}, {3.6931411194438844`*^9, 3.693141126553894*^9}, { 3.693141412004294*^9, 3.693141454164353*^9}, {3.6931415979955544`*^9, 3.6931417931758275`*^9}, {3.6932199559445915`*^9, 3.6932199772046213`*^9}, {3.6932201435748544`*^9, 3.693220170284892*^9}, { 3.693220713855653*^9, 3.693220721825664*^9}, {3.693625124589745*^9, 3.693625153729786*^9}, {3.6940907995669713`*^9, 3.6940909688872085`*^9}, { 3.6940913675677667`*^9, 3.6940914223978434`*^9}, {3.694091508037963*^9, 3.694091572118053*^9}, 3.694092009628666*^9, {3.6940920553287296`*^9, 3.694092229168973*^9}, {3.6940923053990793`*^9, 3.694092374419176*^9}, { 3.6940924537392874`*^9, 3.694092457789293*^9}, 3.694092642849552*^9, { 3.6940928573598523`*^9, 3.694092862379859*^9}, {3.6940945886222763`*^9, 3.694094601932295*^9}, 3.694094849542641*^9, {3.694095764293922*^9, 3.6940957644739223`*^9}, {3.6940960602743363`*^9, 3.6940960732243547`*^9}, {3.6940961211044216`*^9, 3.694096124194426*^9}, { 3.694665030960044*^9, 3.6946650634500895`*^9}, {3.6946652071402903`*^9, 3.6946653490404887`*^9}, {3.6946658702212186`*^9, 3.6946658881212435`*^9}, {3.694665923041292*^9, 3.694665953561335*^9}, { 3.694665995981395*^9, 3.6946660149414215`*^9}, {3.694666050571471*^9, 3.6946660547214766`*^9}, {3.694666169991638*^9, 3.694666292151809*^9}, { 3.6946663456618843`*^9, 3.6946663943919525`*^9}, 3.6946667526224537`*^9, 3.69466680700253*^9, 3.694687076625702*^9, {3.6946874316161985`*^9, 3.6946874621962414`*^9}, 3.694687499496294*^9, {3.694687567516389*^9, 3.694687642816495*^9}, {3.694687679006545*^9, 3.6946877198966026`*^9}, { 3.6946877714966745`*^9, 3.694687931746899*^9}, {3.723798739728607*^9, 3.723798744014243*^9}, {3.7237990126446104`*^9, 3.723799023974499*^9}, { 3.7244116671877546`*^9, 3.7244116733393917`*^9}, {3.724411761793063*^9, 3.7244117718753977`*^9}, {3.724411928386671*^9, 3.7244119682966137`*^9}, { 3.724412131847311*^9, 3.724412188341254*^9}, {3.729414981357122*^9, 3.7294149861075096`*^9}, {3.749817651293678*^9, 3.749817653108206*^9}, { 3.7498176831919456`*^9, 3.7498176846222315`*^9}, 3.7498177601545563`*^9, { 3.749817859674735*^9, 3.749817861044999*^9}, {3.7498179561547127`*^9, 3.749817964489929*^9}, {3.749818149334386*^9, 3.749818237397959*^9}, 3.749818617867873*^9, {3.7505621848002787`*^9, 3.7505622174085107`*^9}, { 3.75056238761455*^9, 3.750562431347901*^9}, {3.7505626332829456`*^9, 3.7505627331565337`*^9}, {3.7505627632642183`*^9, 3.7505627635859113`*^9}, {3.7515359581577415`*^9, 3.7515359614850826`*^9}, {3.751536071974715*^9, 3.7515360961721487`*^9}, 3.7515362040373974`*^9, {3.751536256080162*^9, 3.7515365099108534`*^9}, { 3.751549231137398*^9, 3.7515493334258356`*^9}, {3.7515496891619573`*^9, 3.751549689458767*^9}, 3.753020403650548*^9, {3.7530205114189386`*^9, 3.753020525224822*^9}, {3.753021995594639*^9, 3.753022011512741*^9}, { 3.760634689749445*^9, 3.7606348247488756`*^9}, {3.7606349119783344`*^9, 3.7606349350197754`*^9}, {3.76063496856853*^9, 3.7606349922504683`*^9}, { 3.760667269592998*^9, 3.760667271545692*^9}, 3.7606679283912125`*^9, 3.760668039709257*^9, {3.763302716900259*^9, 3.763302749083943*^9}, { 3.763304867499642*^9, 3.7633048681948185`*^9}, {3.763337978730939*^9, 3.763338014197137*^9}, {3.763338054806819*^9, 3.7633381289118147`*^9}, { 3.763338224472745*^9, 3.7633382447254143`*^9}, 3.763338501519575*^9, { 3.7633387342733064`*^9, 3.763338775483101*^9}, {3.7633388525735607`*^9, 3.7633390131554184`*^9}, {3.763360596353942*^9, 3.7633606328922167`*^9}, { 3.7633606638773637`*^9, 3.763360724941125*^9}, {3.763360812068123*^9, 3.763360863571327*^9}, {3.763361217769263*^9, 3.763361243271195*^9}, { 3.763361578316657*^9, 3.7633615820345063`*^9}, {3.763362291476118*^9, 3.763362301380039*^9}, {3.763362505004878*^9, 3.763362606421646*^9}, { 3.763362742167684*^9, 3.7633627524126663`*^9}, {3.7633628090243473`*^9, 3.763362931819517*^9}, 3.7633630680313087`*^9, {3.76336360941794*^9, 3.7633636782369685`*^9}, {3.763363813698273*^9, 3.763363822992702*^9}, { 3.7633837714269123`*^9, 3.763383775708086*^9}, {3.7633839861442327`*^9, 3.7633839966350546`*^9}, {3.7633846907375526`*^9, 3.76338471098131*^9}, 3.763426089635152*^9, {3.7634262143520336`*^9, 3.7634262475470448`*^9}, { 3.7634276458524485`*^9, 3.7634276705117846`*^9}, {3.7634292721860075`*^9, 3.7634292840439587`*^9}, {3.76352820463631*^9, 3.7635282147939873`*^9}, { 3.763528430960533*^9, 3.7635284413250494`*^9}, {3.7635285114344244`*^9, 3.763528537124817*^9}, {3.763528653934307*^9, 3.7635286747218256`*^9}, { 3.7635486952594075`*^9, 3.763548696007099*^9}, {3.7639579130072594`*^9, 3.7639579464687676`*^9}, {3.763957980699315*^9, 3.7639580928074217`*^9}, { 3.763959813173403*^9, 3.7639598134702053`*^9}, {3.7639608015345135`*^9, 3.7639608287155933`*^9}, {3.7645603385872726`*^9, 3.764560365934222*^9}, { 3.76456061596602*^9, 3.76456062636983*^9}, {3.7647257988231063`*^9, 3.7647258025896564`*^9}, {3.765077713031946*^9, 3.7650777913378534`*^9}, { 3.7740698865922914`*^9, 3.774069989744633*^9}, {3.7740700982535834`*^9, 3.774070098487667*^9}, {3.7740701415628414`*^9, 3.7740702370647106`*^9}, { 3.77407029325229*^9, 3.7740703348543596`*^9}, {3.774070397587008*^9, 3.774070454974152*^9}, {3.7740709929610343`*^9, 3.7740710067172923`*^9}, { 3.775190474681038*^9, 3.7751904884151363`*^9}, {3.7751905901325903`*^9, 3.775190642609686*^9}, 3.775190717712206*^9, {3.7751956728394384`*^9, 3.7751957010601625`*^9}, 3.7751957418100777`*^9, {3.7751958741450567`*^9, 3.775195882844048*^9}, {3.7751959530858574`*^9, 3.775196055684782*^9}, { 3.7836566506037264`*^9, 3.783656699859296*^9}, {3.783834162184903*^9, 3.7838342075157394`*^9}, {3.7838342453955064`*^9, 3.7838342564437876`*^9}, {3.783834288539219*^9, 3.783834289188504*^9}, { 3.783834319888338*^9, 3.783834404011998*^9}, {3.783835274452033*^9, 3.783835643262226*^9}, 3.783835673435833*^9, {3.783837186915415*^9, 3.783837252940491*^9}, 3.783838076793089*^9, {3.7838387026691084`*^9, 3.7838387106794033`*^9}, {3.7838387751330376`*^9, 3.78383877586726*^9}, 3.7885184612710266`*^9, {3.7885197610115976`*^9, 3.788519761667694*^9}, { 3.788519815581788*^9, 3.788519877459923*^9}, {3.788519910619506*^9, 3.7885199214314795`*^9}, {3.78852990807364*^9, 3.78852991935472*^9}, { 3.788529949778452*^9, 3.7885299511123505`*^9}, 3.7885729856546545`*^9},ExpressionUUID->"97bdb39f-7c6b-4373-b312-\ 324f0332ee17"] }, Closed]], Cell[CellGroupData[{ Cell["BEAM ELEMENT (disp 1) defs ", "Subsection", CellChangeTimes->{{3.7530187996679964`*^9, 3.753018803413909*^9}, { 3.7633629633672647`*^9, 3.763362982159668*^9}, {3.787894778048681*^9, 3.7878948056524777`*^9}, {3.787894853900061*^9, 3.7878948799797325`*^9}, 3.788518934866293*^9, {3.7885300329539347`*^9, 3.7885300364009333`*^9}, 3.788530671733654*^9, {3.8200271779079833`*^9, 3.8200271816696315`*^9}, { 3.820027559976658*^9, 3.820027565268735*^9}},ExpressionUUID->"5372c928-9605-4d37-8dc0-\ 2d0c8517e463"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MEC", "-", "E1050"}], "|", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Kappa]y_", ",", "kz_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iy_", ",", "Iz_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Kappa]y", ",", "kz", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iy", ",", "Iz", ",", RowBox[{"Iy", "+", "Iz"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Kappa]y_", ",", "kz_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iy_", ",", "Iz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Kappa]y", ",", "kz", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iy", ",", "Iz", ",", RowBox[{"Iy", "+", "Iz"}], ",", "iy0"}], "}"}], ",", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"first", " ", "order", " ", "theory", " ", "defs"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "ky_", ",", "kz_", ",", "ez_"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA_", ",", "Iy_", ",", "Iz_", ",", "Jx_", ",", "iy0_", ",", "cpol_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "ky", ",", "kz", ",", "ez"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iy", ",", "Iz", ",", "Jx", ",", "iy0"}], "}"}], ",", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "ky_", ",", "kz_", ",", "ez_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iy_", ",", "Iz_", ",", "Jx_", ",", RowBox[{"{", RowBox[{"iyr_", ",", "\[Alpha]_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "ixr", ",", "izr", ",", "ix0", ",", "iy0", ",", "iz0", ",", "ux1", ",", "uy1", " ", ",", "uz1", " ", ",", "\[Theta]x1", " ", ",", "\[Theta]y1", ",", "\[Theta]z1", " ", ",", "\[Delta]ux1", " ", ",", "\[Delta]uy1", ",", "\[Delta]uz1", ",", "\[Delta]\[Theta]x1", ",", "\[Delta]\[Theta]y1", ",", "\[Delta]\[Theta]z1", ",", "ux2", ",", "uy2", " ", ",", "uz2", " ", ",", "\[Theta]x2", " ", ",", "\[Theta]y2", ",", "\[Theta]z2", " ", ",", "\[Delta]ux2", " ", ",", "\[Delta]uy2", ",", "\[Delta]uz2", ",", "\[Delta]\[Theta]x2", ",", "\[Delta]\[Theta]y2", ",", "\[Delta]\[Theta]z2", ",", "bx", ",", "by", ",", "bz"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "mapping", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"\[Alpha]", " ", "rotation", " ", "along", " ", "x"}], "-", RowBox[{"axis", " ", "for", " ", "symmetry"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"with", " ", "respect", " ", "to", " ", "z"}], "-", "axis"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ixr", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"izr", "=", RowBox[{"ixr", "\[Cross]", "iyr"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", " ", "=", "ixr"}], ";", "\[IndentingNewLine]", RowBox[{"iy0", " ", "=", RowBox[{ RowBox[{ RowBox[{"Cos", "[", "\[Alpha]", "]"}], " ", "iyr"}], "+", RowBox[{ RowBox[{"Sin", "[", "\[Alpha]", "]"}], "izr"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", " ", "=", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"Sin", "[", "\[Alpha]", "]"}]}], " ", "iyr"}], "+", RowBox[{ RowBox[{"Cos", "[", "\[Alpha]", "]"}], "izr"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"ux1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{"ux2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{"uy2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{"uz2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]x1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{"\[Theta]x2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]y1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{"\[Theta]y2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]z1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{"\[Theta]z2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]ux1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{"\[Delta]ux2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]uy1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{"\[Delta]uy2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]uz1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{"\[Delta]uz2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Theta]x1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{"\[Delta]\[Theta]x2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Theta]y1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{"\[Delta]\[Theta]y2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Theta]z1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{"\[Delta]\[Theta]z2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{"bx", " ", "=", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"by", " ", "=", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"bz", " ", "=", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ FractionBox[ RowBox[{"bx", " ", "h0", " ", "\[Delta]ux1"}], "2"], "+", FractionBox[ RowBox[{"AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "ux1"}], "+", "ux2"}], ")"}], " ", "\[Delta]ux1"}], "h0"], "+", FractionBox[ RowBox[{"bx", " ", "h0", " ", "\[Delta]ux2"}], "2"], "+", FractionBox[ RowBox[{"AA", " ", "EE", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}], " ", "\[Delta]ux2"}], "h0"], "+", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]uz2", " ", RowBox[{"(", RowBox[{ RowBox[{"bz", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iy"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "kz"}]}], ")"}]}], "-", RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "Iy", " ", "kz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "uz1"}], "+", RowBox[{"2", " ", "uz2"}], "+", RowBox[{"h0", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", "\[Theta]y2"}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"24", " ", "EE", " ", "h0", " ", "Iy"}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "kz"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]uz1", " ", RowBox[{"(", RowBox[{ RowBox[{"bz", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iy"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "kz"}]}], ")"}]}], "+", RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "Iy", " ", "kz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "uz1"}], "+", RowBox[{"2", " ", "uz2"}], "+", RowBox[{"h0", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", "\[Theta]y2"}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"24", " ", "EE", " ", "h0", " ", "Iy"}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "kz"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]\[Theta]y1", " ", RowBox[{"(", RowBox[{ RowBox[{"bz", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iy"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "kz"}]}], ")"}]}], "+", RowBox[{"24", " ", "EE", " ", "Iy", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "EE", " ", "Iy", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "-", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"AA", " ", "GG", " ", "h0", " ", "kz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "3"}], " ", "uz1"}], "+", RowBox[{"3", " ", "uz2"}], "+", RowBox[{"2", " ", "h0", " ", "\[Theta]y1"}], "+", RowBox[{"h0", " ", "\[Theta]y2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "h0", " ", "Iy"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "kz"}]}], ")"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]\[Theta]y2", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "bz"}], " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iy"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "kz"}]}], ")"}]}], "+", RowBox[{"24", " ", "EE", " ", "Iy", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "EE", " ", "Iy", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]y1"}], "+", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"AA", " ", "GG", " ", "h0", " ", "kz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "3"}], " ", "uz1"}], "+", RowBox[{"3", " ", "uz2"}], "+", RowBox[{"h0", " ", "\[Theta]y1"}], "+", RowBox[{"2", " ", "h0", " ", "\[Theta]y2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "h0", " ", "Iy"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "kz"}]}], ")"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]uy1", " ", RowBox[{"(", RowBox[{ RowBox[{"by", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "ky"}]}], ")"}]}], "-", RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "Iz", " ", "ky", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uy1"}], "-", RowBox[{"2", " ", "uy2"}], "-", RowBox[{"2", " ", "ez", " ", "\[Theta]x1"}], "+", RowBox[{"2", " ", "ez", " ", "\[Theta]x2"}], "+", RowBox[{"h0", " ", "\[Theta]z1"}], "+", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"24", " ", "EE", " ", "h0", " ", "Iz"}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]uy2", " ", RowBox[{"(", RowBox[{ RowBox[{"by", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "ky"}]}], ")"}]}], "+", RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "Iz", " ", "ky", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uy1"}], "-", RowBox[{"2", " ", "uy2"}], "-", RowBox[{"2", " ", "ez", " ", "\[Theta]x1"}], "+", RowBox[{"2", " ", "ez", " ", "\[Theta]x2"}], "+", RowBox[{"h0", " ", "\[Theta]z1"}], "+", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"24", " ", "EE", " ", "h0", " ", "Iz"}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky"}]}], ")"}]}], "-", RowBox[{ FractionBox["1", RowBox[{ RowBox[{"12", " ", "EE", " ", "h0", " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky"}]}]], "GG", " ", "\[Delta]\[Theta]x1", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "Iz", " ", "Jx", " ", RowBox[{"(", RowBox[{"\[Theta]x1", "-", "\[Theta]x2"}], ")"}]}], "+", RowBox[{"AA", " ", "ky", " ", RowBox[{"(", RowBox[{ RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", RowBox[{"(", RowBox[{"\[Theta]x1", "-", "\[Theta]x2"}], ")"}]}], "+", RowBox[{"6", " ", "EE", " ", "ez", " ", "Iz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "uy1"}], "+", RowBox[{"2", " ", "uy2"}], "+", RowBox[{"2", " ", "ez", " ", "\[Theta]x1"}], "-", RowBox[{"2", " ", "ez", " ", "\[Theta]x2"}], "-", RowBox[{"h0", " ", "\[Theta]z1"}], "-", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ FractionBox["1", RowBox[{ RowBox[{"12", " ", "EE", " ", "h0", " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky"}]}]], "GG", " ", "\[Delta]\[Theta]x2", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "Iz", " ", "Jx", " ", RowBox[{"(", RowBox[{"\[Theta]x1", "-", "\[Theta]x2"}], ")"}]}], "+", RowBox[{"AA", " ", "ky", " ", RowBox[{"(", RowBox[{ RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", RowBox[{"(", RowBox[{"\[Theta]x1", "-", "\[Theta]x2"}], ")"}]}], "+", RowBox[{"6", " ", "EE", " ", "ez", " ", "Iz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "uy1"}], "+", RowBox[{"2", " ", "uy2"}], "+", RowBox[{"2", " ", "ez", " ", "\[Theta]x1"}], "-", RowBox[{"2", " ", "ez", " ", "\[Theta]x2"}], "-", RowBox[{"h0", " ", "\[Theta]z1"}], "-", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]\[Theta]z1", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "by"}], " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky"}]}], ")"}]}], "+", RowBox[{"24", " ", "EE", " ", "Iz", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "EE", " ", "Iz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "-", "\[Theta]z2"}], ")"}]}], "+", RowBox[{"AA", " ", "GG", " ", "h0", " ", "ky", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "uy1"}], "-", RowBox[{"3", " ", "uy2"}], "-", RowBox[{"3", " ", "ez", " ", "\[Theta]x1"}], "+", RowBox[{"3", " ", "ez", " ", "\[Theta]x2"}], "+", RowBox[{"2", " ", "h0", " ", "\[Theta]z1"}], "+", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "h0", " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky"}]}], ")"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]\[Theta]z2", " ", RowBox[{"(", RowBox[{ RowBox[{"by", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky"}]}], ")"}]}], "-", RowBox[{"24", " ", "EE", " ", "Iz", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "EE", " ", "Iz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "-", "\[Theta]z2"}], ")"}]}], "-", RowBox[{"AA", " ", "GG", " ", "h0", " ", "ky", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "uy1"}], "-", RowBox[{"3", " ", "uy2"}], "-", RowBox[{"3", " ", "ez", " ", "\[Theta]x1"}], "+", RowBox[{"3", " ", "ez", " ", "\[Theta]x2"}], "+", RowBox[{"h0", " ", "\[Theta]z1"}], "+", RowBox[{"2", " ", "h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "h0", " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky"}]}], ")"}]}], ")"}]}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "ky_", ",", "kz_", ",", "ez_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iy_", ",", "Iz_", ",", "Jx_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "ux1", ",", "uy1", " ", ",", "uz1", " ", ",", "\[Theta]x1", " ", ",", "\[Theta]y1", ",", "\[Theta]z1", " ", ",", "\[Delta]ux1", " ", ",", "\[Delta]uy1", ",", "\[Delta]uz1", ",", "\[Delta]\[Theta]x1", ",", "\[Delta]\[Theta]y1", ",", "\[Delta]\[Theta]z1", ",", "ux2", ",", "uy2", " ", ",", "uz2", " ", ",", "\[Theta]x2", " ", ",", "\[Theta]y2", ",", "\[Theta]z2", " ", ",", "\[Delta]ux2", " ", ",", "\[Delta]uy2", ",", "\[Delta]uz2", ",", "\[Delta]\[Theta]x2", ",", "\[Delta]\[Theta]y2", ",", "\[Delta]\[Theta]z2", ",", "bx", ",", "by", ",", "bz"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "mapping", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{"ux2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{"uy2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{"uz2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]x1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{"\[Theta]x2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]y1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{"\[Theta]y2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]z1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{"\[Theta]z2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]ux1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{"\[Delta]ux2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]uy1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{"\[Delta]uy2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]uz1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{"\[Delta]uz2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Theta]x1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{"\[Delta]\[Theta]x2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Theta]y1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{"\[Delta]\[Theta]y2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Theta]z1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{"\[Delta]\[Theta]z2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{"bx", " ", "=", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"by", " ", "=", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"bz", " ", "=", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ FractionBox[ RowBox[{"bx", " ", "h0", " ", "\[Delta]ux1"}], "2"], "+", FractionBox[ RowBox[{"AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "ux1"}], "+", "ux2"}], ")"}], " ", "\[Delta]ux1"}], "h0"], "+", FractionBox[ RowBox[{"bx", " ", "h0", " ", "\[Delta]ux2"}], "2"], "+", FractionBox[ RowBox[{"AA", " ", "EE", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}], " ", "\[Delta]ux2"}], "h0"], "+", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]uz2", " ", RowBox[{"(", RowBox[{ RowBox[{"bz", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iy"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "kz"}]}], ")"}]}], "-", RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "Iy", " ", "kz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "uz1"}], "+", RowBox[{"2", " ", "uz2"}], "+", RowBox[{"h0", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", "\[Theta]y2"}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"24", " ", "EE", " ", "h0", " ", "Iy"}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "kz"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]uz1", " ", RowBox[{"(", RowBox[{ RowBox[{"bz", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iy"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "kz"}]}], ")"}]}], "+", RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "Iy", " ", "kz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "uz1"}], "+", RowBox[{"2", " ", "uz2"}], "+", RowBox[{"h0", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", "\[Theta]y2"}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"24", " ", "EE", " ", "h0", " ", "Iy"}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "kz"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]\[Theta]y1", " ", RowBox[{"(", RowBox[{ RowBox[{"bz", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iy"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "kz"}]}], ")"}]}], "+", RowBox[{"24", " ", "EE", " ", "Iy", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "EE", " ", "Iy", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "-", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"AA", " ", "GG", " ", "h0", " ", "kz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "3"}], " ", "uz1"}], "+", RowBox[{"3", " ", "uz2"}], "+", RowBox[{"2", " ", "h0", " ", "\[Theta]y1"}], "+", RowBox[{"h0", " ", "\[Theta]y2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "h0", " ", "Iy"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "kz"}]}], ")"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]\[Theta]y2", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "bz"}], " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iy"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "kz"}]}], ")"}]}], "+", RowBox[{"24", " ", "EE", " ", "Iy", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "EE", " ", "Iy", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]y1"}], "+", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"AA", " ", "GG", " ", "h0", " ", "kz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "3"}], " ", "uz1"}], "+", RowBox[{"3", " ", "uz2"}], "+", RowBox[{"h0", " ", "\[Theta]y1"}], "+", RowBox[{"2", " ", "h0", " ", "\[Theta]y2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "h0", " ", "Iy"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "kz"}]}], ")"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]uy1", " ", RowBox[{"(", RowBox[{ RowBox[{"by", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "ky"}]}], ")"}]}], "-", RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "Iz", " ", "ky", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uy1"}], "-", RowBox[{"2", " ", "uy2"}], "-", RowBox[{"2", " ", "ez", " ", "\[Theta]x1"}], "+", RowBox[{"2", " ", "ez", " ", "\[Theta]x2"}], "+", RowBox[{"h0", " ", "\[Theta]z1"}], "+", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"24", " ", "EE", " ", "h0", " ", "Iz"}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]uy2", " ", RowBox[{"(", RowBox[{ RowBox[{"by", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "ky"}]}], ")"}]}], "+", RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "Iz", " ", "ky", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uy1"}], "-", RowBox[{"2", " ", "uy2"}], "-", RowBox[{"2", " ", "ez", " ", "\[Theta]x1"}], "+", RowBox[{"2", " ", "ez", " ", "\[Theta]x2"}], "+", RowBox[{"h0", " ", "\[Theta]z1"}], "+", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"24", " ", "EE", " ", "h0", " ", "Iz"}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky"}]}], ")"}]}], "-", RowBox[{ FractionBox["1", RowBox[{ RowBox[{"12", " ", "EE", " ", "h0", " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky"}]}]], "GG", " ", "\[Delta]\[Theta]x1", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "Iz", " ", "Jx", " ", RowBox[{"(", RowBox[{"\[Theta]x1", "-", "\[Theta]x2"}], ")"}]}], "+", RowBox[{"AA", " ", "ky", " ", RowBox[{"(", RowBox[{ RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", RowBox[{"(", RowBox[{"\[Theta]x1", "-", "\[Theta]x2"}], ")"}]}], "+", RowBox[{"6", " ", "EE", " ", "ez", " ", "Iz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "uy1"}], "+", RowBox[{"2", " ", "uy2"}], "+", RowBox[{"2", " ", "ez", " ", "\[Theta]x1"}], "-", RowBox[{"2", " ", "ez", " ", "\[Theta]x2"}], "-", RowBox[{"h0", " ", "\[Theta]z1"}], "-", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ FractionBox["1", RowBox[{ RowBox[{"12", " ", "EE", " ", "h0", " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky"}]}]], "GG", " ", "\[Delta]\[Theta]x2", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "Iz", " ", "Jx", " ", RowBox[{"(", RowBox[{"\[Theta]x1", "-", "\[Theta]x2"}], ")"}]}], "+", RowBox[{"AA", " ", "ky", " ", RowBox[{"(", RowBox[{ RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", RowBox[{"(", RowBox[{"\[Theta]x1", "-", "\[Theta]x2"}], ")"}]}], "+", RowBox[{"6", " ", "EE", " ", "ez", " ", "Iz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "uy1"}], "+", RowBox[{"2", " ", "uy2"}], "+", RowBox[{"2", " ", "ez", " ", "\[Theta]x1"}], "-", RowBox[{"2", " ", "ez", " ", "\[Theta]x2"}], "-", RowBox[{"h0", " ", "\[Theta]z1"}], "-", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]\[Theta]z1", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "by"}], " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky"}]}], ")"}]}], "+", RowBox[{"24", " ", "EE", " ", "Iz", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "EE", " ", "Iz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "-", "\[Theta]z2"}], ")"}]}], "+", RowBox[{"AA", " ", "GG", " ", "h0", " ", "ky", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "uy1"}], "-", RowBox[{"3", " ", "uy2"}], "-", RowBox[{"3", " ", "ez", " ", "\[Theta]x1"}], "+", RowBox[{"3", " ", "ez", " ", "\[Theta]x2"}], "+", RowBox[{"2", " ", "h0", " ", "\[Theta]z1"}], "+", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "h0", " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky"}]}], ")"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]\[Theta]z2", " ", RowBox[{"(", RowBox[{ RowBox[{"by", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky"}]}], ")"}]}], "-", RowBox[{"24", " ", "EE", " ", "Iz", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "EE", " ", "Iz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "-", "\[Theta]z2"}], ")"}]}], "-", RowBox[{"AA", " ", "GG", " ", "h0", " ", "ky", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "uy1"}], "-", RowBox[{"3", " ", "uy2"}], "-", RowBox[{"3", " ", "ez", " ", "\[Theta]x1"}], "+", RowBox[{"3", " ", "ez", " ", "\[Theta]x2"}], "+", RowBox[{"h0", " ", "\[Theta]z1"}], "+", RowBox[{"2", " ", "h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "h0", " ", "Iz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky"}]}], ")"}]}], ")"}]}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "first", " ", "order", " ", "offset", " ", "beam", " ", "theory", " ", "defs"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Sy_", ",", "Sz_", ",", "Iy_", ",", "Iz_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "EE", ",", "GG", ",", "1", ",", "1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA", ",", "Sy", ",", "Sz", ",", "Iy", ",", "Iz", ",", "0", ",", RowBox[{"Iy", "+", "Iz"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "EE_", ",", "GG_", ",", "ky_", ",", "kz_", ",", "kyz_", ",", "ey_", ",", "ez_"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA_", ",", "Sy_", ",", "Sz_", ",", "Iy_", ",", "Iz_", ",", "Iyz_", ",", "Jx_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "ux1", ",", "uy1", " ", ",", "uz1", " ", ",", "\[Theta]x1", " ", ",", "\[Theta]y1", ",", "\[Theta]z1", " ", ",", "\[Delta]ux1", " ", ",", "\[Delta]uy1", ",", "\[Delta]uz1", ",", "\[Delta]\[Theta]x1", ",", "\[Delta]\[Theta]y1", ",", "\[Delta]\[Theta]z1", ",", "ux2", ",", "uy2", " ", ",", "uz2", " ", ",", "\[Theta]x2", " ", ",", "\[Theta]y2", ",", "\[Theta]z2", " ", ",", "\[Delta]ux2", " ", ",", "\[Delta]uy2", ",", "\[Delta]uz2", ",", "\[Delta]\[Theta]x2", ",", "\[Delta]\[Theta]y2", ",", "\[Delta]\[Theta]z2", ",", "bx", ",", "by", ",", "bz", ",", "cx", ",", "cy", ",", "cz"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "mapping", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{"ux2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{"uy2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{"uz2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]x1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{"\[Theta]x2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]y1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{"\[Theta]y2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]z1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{"\[Theta]z2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]ux1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{"\[Delta]ux2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]uy1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{"\[Delta]uy2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]uz1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{"\[Delta]uz2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Theta]x1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{"\[Delta]\[Theta]x2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Theta]y1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{"\[Delta]\[Theta]y2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]\[Theta]z1", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{"\[Delta]\[Theta]z2", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{"bx", " ", "=", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"by", " ", "=", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"bz", " ", "=", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{"cx", " ", "=", RowBox[{ RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{"cy", " ", "=", RowBox[{ RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"cz", " ", "=", RowBox[{ RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "6"}], " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", SuperscriptBox["AA", "2"], " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"2", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"Iz", " ", "kz"}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["AA", "3"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox["kyz", "2"]}], "+", RowBox[{"ky", " ", "kz"}]}], ")"}]}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"12", " ", "AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"]}], "-", RowBox[{"2", " ", "kyz", " ", "Sy", " ", "Sz"}], "+", RowBox[{"kz", " ", SuperscriptBox["Sz", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", "\[Delta]ux1", " ", RowBox[{"(", RowBox[{ RowBox[{"bx", " ", SuperscriptBox["h0", "2"]}], "+", RowBox[{"2", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "ux1"}], "+", "ux2"}], ")"}]}], "-", RowBox[{"Sy", " ", "\[Theta]y1"}], "+", RowBox[{"Sy", " ", "\[Theta]y2"}], "+", RowBox[{"Sz", " ", "\[Theta]z1"}], "-", RowBox[{"Sz", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"6", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", SuperscriptBox["AA", "2"], " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"2", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"Iz", " ", "kz"}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["AA", "3"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox["kyz", "2"]}], "+", RowBox[{"ky", " ", "kz"}]}], ")"}]}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"12", " ", "AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"]}], "-", RowBox[{"2", " ", "kyz", " ", "Sy", " ", "Sz"}], "+", RowBox[{"kz", " ", SuperscriptBox["Sz", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", "\[Delta]ux2", " ", RowBox[{"(", RowBox[{ RowBox[{"bx", " ", SuperscriptBox["h0", "2"]}], "+", RowBox[{"2", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "+", RowBox[{"Sy", " ", "\[Theta]y1"}], "-", RowBox[{"Sy", " ", "\[Theta]y2"}], "-", RowBox[{"Sz", " ", "\[Theta]z1"}], "+", RowBox[{"Sz", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"6", " ", "\[Delta]\[Theta]x1", " ", RowBox[{"(", RowBox[{ RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"cx", " ", SuperscriptBox["h0", "2"]}], "+", RowBox[{"2", " ", "GG", " ", "Jx", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]x1"}], "+", "\[Theta]x2"}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["AA", "3"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["kyz", "2"], "-", RowBox[{"ky", " ", "kz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "cy", " ", "ey", " ", SuperscriptBox["h0", "3"]}], "+", RowBox[{"2", " ", "cz", " ", "ez", " ", SuperscriptBox["h0", "3"]}], "+", RowBox[{"cx", " ", SuperscriptBox["h0", "4"]}], "-", RowBox[{"24", " ", "EE", " ", "ey", " ", "Iyz", " ", "uy1"}], "+", RowBox[{"24", " ", "EE", " ", "ez", " ", "Iz", " ", "uy1"}], "+", RowBox[{"24", " ", "EE", " ", "ey", " ", "Iyz", " ", "uy2"}], "-", RowBox[{"24", " ", "EE", " ", "ez", " ", "Iz", " ", "uy2"}], "-", RowBox[{"24", " ", "EE", " ", "ey", " ", "Iy", " ", "uz1"}], "+", RowBox[{"24", " ", "EE", " ", "ez", " ", "Iyz", " ", "uz1"}], "+", RowBox[{"24", " ", "EE", " ", "ey", " ", "Iy", " ", "uz2"}], "-", RowBox[{"24", " ", "EE", " ", "ez", " ", "Iyz", " ", "uz2"}], "-", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "\[Theta]x1"}], "+", RowBox[{ "48", " ", "EE", " ", "ey", " ", "ez", " ", "Iyz", " ", "\[Theta]x1"}], "-", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iz", " ", "\[Theta]x1"}], "-", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "\[Theta]x1"}], "+", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "\[Theta]x2"}], "-", RowBox[{ "48", " ", "EE", " ", "ey", " ", "ez", " ", "Iyz", " ", "\[Theta]x2"}], "+", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iz", " ", "\[Theta]x2"}], "+", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "\[Theta]x2"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "\[Theta]y1"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "\[Theta]y1"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "\[Theta]y2"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "\[Theta]y2"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "\[Theta]z1"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "\[Theta]z1"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "\[Theta]z2"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "\[Theta]z2"}]}], ")"}]}], "-", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "cy", " ", "EE", " ", "ez", " ", SuperscriptBox["h0", "3"], " ", "Iyz", " ", "ky"}], "-", RowBox[{"12", " ", "cy", " ", "EE", " ", "ey", " ", SuperscriptBox["h0", "3"], " ", "Iyz", " ", "kyz"}], "-", RowBox[{"12", " ", "cy", " ", "EE", " ", "ez", " ", SuperscriptBox["h0", "3"], " ", "Iz", " ", "kyz"}], "+", RowBox[{"12", " ", "cy", " ", "EE", " ", "ey", " ", SuperscriptBox["h0", "3"], " ", "Iz", " ", "kz"}], "+", RowBox[{"12", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"ez", " ", "Iy", " ", "ky"}], "-", RowBox[{"ey", " ", "Iy", " ", "kyz"}], "-", RowBox[{"ez", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"ey", " ", "Iyz", " ", "kz"}]}], ")"}]}], "+", RowBox[{"6", " ", "cx", " ", "EE", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"2", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"Iz", " ", "kz"}]}], ")"}]}], "+", RowBox[{"bx", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", SuperscriptBox["kyz", "2"], " ", "Sy"}], "-", RowBox[{"bx", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky", " ", "kz", " ", "Sy"}], "-", RowBox[{"bx", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", SuperscriptBox["kyz", "2"], " ", "Sz"}], "+", RowBox[{"bx", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky", " ", "kz", " ", "Sz"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "ky", " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uy1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kyz", " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "ky", " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uy2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kyz", " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "uz1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kz", " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uz2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "uz2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "uz2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kz", " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ez", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ez", "2"], " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Iy", " ", "Jx", " ", "ky", " ", "\[Theta]x1"}], "-", RowBox[{"288", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"288", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"24", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Iyz", " ", "Jx", " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ey", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Iz", " ", "Jx", " ", "kz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ez", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ez", "2"], " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Iy", " ", "Jx", " ", "ky", " ", "\[Theta]x2"}], "+", RowBox[{"288", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"288", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"24", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Iyz", " ", "Jx", " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ey", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Iz", " ", "Jx", " ", "kz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]y1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]y1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]y1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]y1"}], "+", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "-", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "-", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "+", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]y2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]y2"}], "+", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "-", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "-", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "+", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]z1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]z1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]z1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]z1"}], "-", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "+", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "+", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]z2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]z2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]z2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]z2"}], "-", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "+", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "+", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}], "-", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}]}], ")"}]}], "+", RowBox[{"12", " ", "AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"cx", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "kyz", " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{"cy", " ", "ez", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "Sy", " ", "Sz"}], "-", RowBox[{"cy", " ", "ey", " ", SuperscriptBox["h0", "3"], " ", "kyz", " ", "Sy", " ", "Sz"}], "-", RowBox[{"cy", " ", "ez", " ", SuperscriptBox["h0", "3"], " ", "kyz", " ", SuperscriptBox["Sz", "2"]}], "+", RowBox[{"cy", " ", "ey", " ", SuperscriptBox["h0", "3"], " ", "kz", " ", SuperscriptBox["Sz", "2"]}], "+", RowBox[{"cz", " ", SuperscriptBox["h0", "3"], " ", "Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"ez", " ", "ky", " ", "Sy"}], "-", RowBox[{"ey", " ", "kyz", " ", "Sy"}], "-", RowBox[{"ez", " ", "kyz", " ", "Sz"}], "+", RowBox[{"ey", " ", "kz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"bx", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"ez", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyz", " ", "ky", " ", "Sy"}], "-", RowBox[{"Iz", " ", "kyz", " ", "Sy"}], "-", RowBox[{"Iy", " ", "ky", " ", "Sz"}], "+", RowBox[{"Iyz", " ", "kyz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"ey", " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", "kz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "kyz", " ", "Sz"}], "-", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{ RowBox[{"kyz", " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "uy1"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uy1"}], "-", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "uy1"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uy1"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "uy2"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uy2"}], "+", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "uy2"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uy2"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "-", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uz1"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz1"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uz1"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uz1"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "+", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uz2"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz2"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uz2"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["Iyz", "2"], " ", "Jx", " ", "\[Theta]x1"}], "+", RowBox[{ "12", " ", "EE", " ", "Iy", " ", "Iz", " ", "Jx", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{ "48", " ", "EE", " ", "ey", " ", "ez", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["Iyz", "2"], " ", "Jx", " ", "\[Theta]x2"}], "-", RowBox[{ "12", " ", "EE", " ", "Iy", " ", "Iz", " ", "Jx", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{ "48", " ", "EE", " ", "ey", " ", "ez", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "-", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "+", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "-", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y1"}], "+", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y1"}], "-", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "+", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "-", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y2"}], "+", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y2"}], "+", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z1"}], "-", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z1"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "+", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "+", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z2"}], "-", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z2"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "+", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}], "-", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"6", " ", "\[Delta]\[Theta]x2", " ", RowBox[{"(", RowBox[{ RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"cx", " ", SuperscriptBox["h0", "2"]}], "+", RowBox[{"2", " ", "GG", " ", "Jx", " ", RowBox[{"(", RowBox[{"\[Theta]x1", "-", "\[Theta]x2"}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["AA", "3"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["kyz", "2"], "-", RowBox[{"ky", " ", "kz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "cy", " ", "ey", " ", SuperscriptBox["h0", "3"]}], "-", RowBox[{"2", " ", "cz", " ", "ez", " ", SuperscriptBox["h0", "3"]}], "+", RowBox[{"cx", " ", SuperscriptBox["h0", "4"]}], "+", RowBox[{"24", " ", "EE", " ", "ey", " ", "Iyz", " ", "uy1"}], "-", RowBox[{"24", " ", "EE", " ", "ez", " ", "Iz", " ", "uy1"}], "-", RowBox[{"24", " ", "EE", " ", "ey", " ", "Iyz", " ", "uy2"}], "+", RowBox[{"24", " ", "EE", " ", "ez", " ", "Iz", " ", "uy2"}], "+", RowBox[{"24", " ", "EE", " ", "ey", " ", "Iy", " ", "uz1"}], "-", RowBox[{"24", " ", "EE", " ", "ez", " ", "Iyz", " ", "uz1"}], "-", RowBox[{"24", " ", "EE", " ", "ey", " ", "Iy", " ", "uz2"}], "+", RowBox[{"24", " ", "EE", " ", "ez", " ", "Iyz", " ", "uz2"}], "+", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "\[Theta]x1"}], "-", RowBox[{ "48", " ", "EE", " ", "ey", " ", "ez", " ", "Iyz", " ", "\[Theta]x1"}], "+", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iz", " ", "\[Theta]x1"}], "+", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "\[Theta]x1"}], "-", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "\[Theta]x2"}], "+", RowBox[{ "48", " ", "EE", " ", "ey", " ", "ez", " ", "Iyz", " ", "\[Theta]x2"}], "-", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iz", " ", "\[Theta]x2"}], "-", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "\[Theta]x2"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "\[Theta]y1"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "\[Theta]y1"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "\[Theta]y2"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "\[Theta]y2"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "\[Theta]z1"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "\[Theta]z1"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "\[Theta]z2"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "\[Theta]z2"}]}], ")"}]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "cy", " ", "EE", " ", "ez", " ", SuperscriptBox["h0", "3"], " ", "Iyz", " ", "ky"}], "-", RowBox[{"12", " ", "cy", " ", "EE", " ", "ey", " ", SuperscriptBox["h0", "3"], " ", "Iyz", " ", "kyz"}], "-", RowBox[{"12", " ", "cy", " ", "EE", " ", "ez", " ", SuperscriptBox["h0", "3"], " ", "Iz", " ", "kyz"}], "+", RowBox[{"12", " ", "cy", " ", "EE", " ", "ey", " ", SuperscriptBox["h0", "3"], " ", "Iz", " ", "kz"}], "+", RowBox[{"12", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"ez", " ", "Iy", " ", "ky"}], "-", RowBox[{"ey", " ", "Iy", " ", "kyz"}], "-", RowBox[{"ez", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"ey", " ", "Iyz", " ", "kz"}]}], ")"}]}], "-", RowBox[{"6", " ", "cx", " ", "EE", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"2", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"Iz", " ", "kz"}]}], ")"}]}], "+", RowBox[{"bx", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", SuperscriptBox["kyz", "2"], " ", "Sy"}], "-", RowBox[{"bx", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky", " ", "kz", " ", "Sy"}], "-", RowBox[{"bx", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", SuperscriptBox["kyz", "2"], " ", "Sz"}], "+", RowBox[{"bx", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky", " ", "kz", " ", "Sz"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "ky", " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uy1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kyz", " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "ky", " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uy2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kyz", " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "uz1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kz", " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uz2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "uz2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "uz2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kz", " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ez", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ez", "2"], " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Iy", " ", "Jx", " ", "ky", " ", "\[Theta]x1"}], "-", RowBox[{"288", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"288", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"24", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Iyz", " ", "Jx", " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ey", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Iz", " ", "Jx", " ", "kz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ez", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ez", "2"], " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Iy", " ", "Jx", " ", "ky", " ", "\[Theta]x2"}], "+", RowBox[{"288", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"288", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"24", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Iyz", " ", "Jx", " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ey", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Iz", " ", "Jx", " ", "kz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]y1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]y1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]y1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]y1"}], "+", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "-", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "-", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "+", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]y2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]y2"}], "+", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "-", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "-", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "+", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]z1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]z1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]z1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]z1"}], "-", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "+", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "+", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]z2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "h0", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]z2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]z2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]z2"}], "-", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "+", RowBox[{"6", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "+", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}], "-", RowBox[{"6", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}]}], ")"}]}], "+", RowBox[{"12", " ", "AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"cx", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "kyz", " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "cy"}], " ", "ez", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "Sy", " ", "Sz"}], "+", RowBox[{"cy", " ", "ey", " ", SuperscriptBox["h0", "3"], " ", "kyz", " ", "Sy", " ", "Sz"}], "+", RowBox[{"cy", " ", "ez", " ", SuperscriptBox["h0", "3"], " ", "kyz", " ", SuperscriptBox["Sz", "2"]}], "-", RowBox[{"cy", " ", "ey", " ", SuperscriptBox["h0", "3"], " ", "kz", " ", SuperscriptBox["Sz", "2"]}], "+", RowBox[{"cz", " ", SuperscriptBox["h0", "3"], " ", "Sy", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "ez"}], " ", "ky", " ", "Sy"}], "+", RowBox[{"ey", " ", "kyz", " ", "Sy"}], "+", RowBox[{"ez", " ", "kyz", " ", "Sz"}], "-", RowBox[{"ey", " ", "kz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"bx", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"ey", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyz", " ", "kyz", " ", "Sy"}], "-", RowBox[{"Iz", " ", "kz", " ", "Sy"}], "-", RowBox[{"Iy", " ", "kyz", " ", "Sz"}], "+", RowBox[{"Iyz", " ", "kz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"ez", " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", "kyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "ky", " ", "Sz"}], "-", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", "Sy"}], "+", RowBox[{"kyz", " ", "Sz"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "uy1"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uy1"}], "+", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "uy1"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uy1"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "uy2"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uy2"}], "-", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "uy2"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uy2"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "+", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uz1"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz1"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uz1"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uz1"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "-", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uz2"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["Iyz", "2"], " ", "Jx", " ", "\[Theta]x1"}], "-", RowBox[{ "12", " ", "EE", " ", "Iy", " ", "Iz", " ", "Jx", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{ "48", " ", "EE", " ", "ey", " ", "ez", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["Iyz", "2"], " ", "Jx", " ", "\[Theta]x2"}], "+", RowBox[{ "12", " ", "EE", " ", "Iy", " ", "Iz", " ", "Jx", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{ "48", " ", "EE", " ", "ey", " ", "ez", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"24", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ez", "2"], " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "ez", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", SuperscriptBox["ey", "2"], " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", "Jx", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "-", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "+", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y1"}], "-", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y1"}], "+", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "-", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "+", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y2"}], "-", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y2"}], "-", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z1"}], "+", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z1"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "-", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "+", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z2"}], "+", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z2"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "h0", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "-", RowBox[{ "6", " ", "EE", " ", "ez", " ", "h0", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}], "+", RowBox[{ "6", " ", "EE", " ", "ey", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"6", " ", "\[Delta]uz1", " ", RowBox[{"(", RowBox[{ RowBox[{"144", " ", "bz", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "12"}], " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iyz", " ", "kyz"}], "+", RowBox[{"12", " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iz", " ", "kz"}], "-", RowBox[{"12", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "kyz"}], "-", RowBox[{"Iyz", " ", "kz"}]}], ")"}]}], "+", RowBox[{"6", " ", "bz", " ", "EE", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"2", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"Iz", " ", "kz"}]}], ")"}]}], "+", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", SuperscriptBox["kyz", "2"], " ", "Sy"}], "-", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky", " ", "kz", " ", "Sy"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uy1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uy1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uy2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uy2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "uz1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kz", " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "uz2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kz", " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]y1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]y1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]y2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]y2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]z1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]z1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]z2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]z2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}]}], ")"}]}], "+", RowBox[{"12", " ", "AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"bz", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "kyz", " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "cy"}], " ", SuperscriptBox["h0", "3"], " ", "kyz", " ", "Sy", " ", "Sz"}], "+", RowBox[{"cy", " ", SuperscriptBox["h0", "3"], " ", "kz", " ", SuperscriptBox["Sz", "2"]}], "+", RowBox[{"cz", " ", SuperscriptBox["h0", "3"], " ", "Sy", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "kyz"}], " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"bx", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", "kz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "kyz", " ", "Sz"}], "-", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{ RowBox[{"kyz", " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"12", " ", "EE", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uy1"}], "+", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uy2"}], "-", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "+", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "-", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uz2"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "-", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y1"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "-", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y2"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z1"}], "+", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z2"}], "+", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["AA", "3"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["kyz", "2"], "-", RowBox[{"ky", " ", "kz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "cy", " ", SuperscriptBox["h0", "3"]}], "+", RowBox[{"bz", " ", SuperscriptBox["h0", "4"]}], "-", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uz1"}], "-", RowBox[{"2", " ", "uz2"}], "+", RowBox[{"2", " ", "ey", " ", "\[Theta]x1"}], "-", RowBox[{"2", " ", "ey", " ", "\[Theta]x2"}], "-", RowBox[{"h0", " ", "\[Theta]y1"}], "-", RowBox[{"h0", " ", "\[Theta]y2"}]}], ")"}]}], "+", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uy1"}], "-", RowBox[{"2", " ", "uy2"}], "-", RowBox[{"2", " ", "ez", " ", "\[Theta]x1"}], "+", RowBox[{"2", " ", "ez", " ", "\[Theta]x2"}], "+", RowBox[{"h0", " ", "\[Theta]z1"}], "+", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"6", " ", "\[Delta]uz2", " ", RowBox[{"(", RowBox[{ RowBox[{"144", " ", "bz", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iyz", " ", "kyz"}], "-", RowBox[{"12", " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iz", " ", "kz"}], "+", RowBox[{"12", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "kyz"}], "-", RowBox[{"Iyz", " ", "kz"}]}], ")"}]}], "+", RowBox[{"6", " ", "bz", " ", "EE", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"2", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"Iz", " ", "kz"}]}], ")"}]}], "-", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", SuperscriptBox["kyz", "2"], " ", "Sy"}], "+", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky", " ", "kz", " ", "Sy"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kz", " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "uz2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kz", " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]y1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]y1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]y2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]z1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]z1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]z2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]z2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}]}], ")"}]}], "+", RowBox[{"12", " ", "AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"bz", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "kyz", " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{"cy", " ", SuperscriptBox["h0", "3"], " ", "kyz", " ", "Sy", " ", "Sz"}], "-", RowBox[{"cy", " ", SuperscriptBox["h0", "3"], " ", "kz", " ", SuperscriptBox["Sz", "2"]}], "+", RowBox[{"cz", " ", SuperscriptBox["h0", "3"], " ", "Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"kyz", " ", "Sy"}], "-", RowBox[{"kz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"bx", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iyz", " ", "kyz", " ", "Sy"}], "-", RowBox[{"Iz", " ", "kz", " ", "Sy"}], "-", RowBox[{"Iy", " ", "kyz", " ", "Sz"}], "+", RowBox[{"Iyz", " ", "kz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"12", " ", "EE", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uy1"}], "-", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uy2"}], "+", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "-", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "+", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uz2"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "+", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y1"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "+", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y2"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z1"}], "-", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z2"}], "-", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["AA", "3"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["kyz", "2"], "-", RowBox[{"ky", " ", "kz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "cy", " ", SuperscriptBox["h0", "3"]}], "+", RowBox[{"bz", " ", SuperscriptBox["h0", "4"]}], "+", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uz1"}], "-", RowBox[{"2", " ", "uz2"}], "+", RowBox[{"2", " ", "ey", " ", "\[Theta]x1"}], "-", RowBox[{"2", " ", "ey", " ", "\[Theta]x2"}], "-", RowBox[{"h0", " ", "\[Theta]y1"}], "-", RowBox[{"h0", " ", "\[Theta]y2"}]}], ")"}]}], "+", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uy1"}], "-", RowBox[{"2", " ", "uy2"}], "-", RowBox[{"2", " ", "ez", " ", "\[Theta]x1"}], "+", RowBox[{"2", " ", "ez", " ", "\[Theta]x2"}], "+", RowBox[{"h0", " ", "\[Theta]z1"}], "+", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"6", " ", "\[Delta]uy1", " ", RowBox[{"(", RowBox[{ RowBox[{"144", " ", "by", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iyz", " ", "ky"}], "-", RowBox[{"12", " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iz", " ", "kyz"}], "+", RowBox[{"12", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"Iyz", " ", "kyz"}]}], ")"}]}], "-", RowBox[{"6", " ", "by", " ", "EE", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"2", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"Iz", " ", "kz"}]}], ")"}]}], "-", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", SuperscriptBox["kyz", "2"], " ", "Sz"}], "+", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky", " ", "kz", " ", "Sz"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "ky", " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "ky", " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uz2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]y1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]y1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]y2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]z1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]z1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]z2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]z2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}]}], ")"}]}], "+", RowBox[{"12", " ", "AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"by", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "kyz", " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "cy"}], " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "Sy", " ", "Sz"}], "+", RowBox[{"cy", " ", SuperscriptBox["h0", "3"], " ", "kyz", " ", SuperscriptBox["Sz", "2"]}], "+", RowBox[{"cz", " ", SuperscriptBox["h0", "3"], " ", "Sy", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "ky"}], " ", "Sy"}], "+", RowBox[{"kyz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"bx", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", "kyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "ky", " ", "Sz"}], "-", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", "Sy"}], "+", RowBox[{"kyz", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"12", " ", "EE", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "uy1"}], "+", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "uy2"}], "-", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "+", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "-", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uz2"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "-", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y1"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "-", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y2"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z1"}], "+", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z2"}], "+", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["AA", "3"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["kyz", "2"], "-", RowBox[{"ky", " ", "kz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "cz", " ", SuperscriptBox["h0", "3"]}], "+", RowBox[{"by", " ", SuperscriptBox["h0", "4"]}], "-", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uz1"}], "-", RowBox[{"2", " ", "uz2"}], "+", RowBox[{"2", " ", "ey", " ", "\[Theta]x1"}], "-", RowBox[{"2", " ", "ey", " ", "\[Theta]x2"}], "-", RowBox[{"h0", " ", "\[Theta]y1"}], "-", RowBox[{"h0", " ", "\[Theta]y2"}]}], ")"}]}], "+", RowBox[{"Iz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uy1"}], "-", RowBox[{"2", " ", "uy2"}], "-", RowBox[{"2", " ", "ez", " ", "\[Theta]x1"}], "+", RowBox[{"2", " ", "ez", " ", "\[Theta]x2"}], "+", RowBox[{"h0", " ", "\[Theta]z1"}], "+", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"6", " ", "\[Delta]uy2", " ", RowBox[{"(", RowBox[{ RowBox[{"144", " ", "by", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iyz", " ", "ky"}], "-", RowBox[{"12", " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iz", " ", "kyz"}], "+", RowBox[{"12", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"Iyz", " ", "kyz"}]}], ")"}]}], "+", RowBox[{"6", " ", "by", " ", "EE", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"2", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"Iz", " ", "kz"}]}], ")"}]}], "-", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", SuperscriptBox["kyz", "2"], " ", "Sz"}], "+", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky", " ", "kz", " ", "Sz"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "ky", " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "ky", " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uz2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]y1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]y1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]y2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]z1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]z1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]z2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]z2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}]}], ")"}]}], "+", RowBox[{"12", " ", "AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"by", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "kyz", " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{"cy", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "Sy", " ", "Sz"}], "-", RowBox[{"cy", " ", SuperscriptBox["h0", "3"], " ", "kyz", " ", SuperscriptBox["Sz", "2"]}], "+", RowBox[{"cz", " ", SuperscriptBox["h0", "3"], " ", "Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", "Sy"}], "-", RowBox[{"kyz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"bx", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iyz", " ", "ky", " ", "Sy"}], "-", RowBox[{"Iz", " ", "kyz", " ", "Sy"}], "-", RowBox[{"Iy", " ", "ky", " ", "Sz"}], "+", RowBox[{"Iyz", " ", "kyz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"12", " ", "EE", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "uy1"}], "-", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "uy2"}], "+", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "-", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "+", RowBox[{ "24", " ", "EE", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "uz2"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "+", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "-", RowBox[{ "24", " ", "EE", " ", "ez", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{ "24", " ", "EE", " ", "ey", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{ "12", " ", "EE", " ", "ez", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "-", RowBox[{ "12", " ", "EE", " ", "ey", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "+", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y1"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "kyz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "+", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "-", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "kyz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]y2"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z1"}], "-", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iz", " ", "ky", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]z2"}], "-", RowBox[{ "12", " ", "EE", " ", "h0", " ", "Iyz", " ", "ky", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "+", RowBox[{ "6", " ", "EE", " ", "h0", " ", "Iy", " ", "ky", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["AA", "3"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["kyz", "2"], "-", RowBox[{"ky", " ", "kz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "cz", " ", SuperscriptBox["h0", "3"]}], "+", RowBox[{"by", " ", SuperscriptBox["h0", "4"]}], "+", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uz1"}], "-", RowBox[{"2", " ", "uz2"}], "+", RowBox[{"2", " ", "ey", " ", "\[Theta]x1"}], "-", RowBox[{"2", " ", "ey", " ", "\[Theta]x2"}], "-", RowBox[{"h0", " ", "\[Theta]y1"}], "-", RowBox[{"h0", " ", "\[Theta]y2"}]}], ")"}]}], "+", RowBox[{"Iz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "uy1"}], "-", RowBox[{"2", " ", "uy2"}], "-", RowBox[{"2", " ", "ez", " ", "\[Theta]x1"}], "+", RowBox[{"2", " ", "ez", " ", "\[Theta]x2"}], "+", RowBox[{"h0", " ", "\[Theta]z1"}], "+", RowBox[{"h0", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"\[Delta]\[Theta]z2", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", SuperscriptBox["AA", "2"], " ", "GG", " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iyz", " ", "kyz"}], "+", RowBox[{"12", " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iyz", " ", "ky"}], "-", RowBox[{"Iz", " ", "kyz"}]}], ")"}]}], "-", RowBox[{"12", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iz", " ", "kz"}], "+", RowBox[{"2", " ", "by", " ", "EE", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"2", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"Iz", " ", "kz"}]}], ")"}]}], "-", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", SuperscriptBox["kyz", "2"], " ", "Sz"}], "+", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky", " ", "kz", " ", "Sz"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "ky", " ", "Sz", " ", "ux1"}], "-", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sz", " ", "ux1"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iz", " ", "kz", " ", "Sz", " ", "ux1"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "ky", " ", "Sz", " ", "ux2"}], "+", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sz", " ", "ux2"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iz", " ", "kz", " ", "Sz", " ", "ux2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "ky", " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "ky", " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uz2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iyz", " ", "ky", " ", "\[Theta]y1"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]y1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]y1"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "Iz", " ", "kz", " ", "\[Theta]y1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iyz", " ", "ky", " ", "\[Theta]y2"}], "+", RowBox[{"120", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]y2"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "Iz", " ", "kz", " ", "\[Theta]y2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]z1"}], "+", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]z1"}], "+", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "Iz", " ", "kyz", " ", "\[Theta]z1"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iz", "2"], " ", "kz", " ", "\[Theta]z1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "-", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]z2"}], "+", RowBox[{"96", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]z2"}], "-", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "Iz", " ", "kyz", " ", "\[Theta]z2"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iz", "2"], " ", "kz", " ", "\[Theta]z2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}]}], ")"}]}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "cz", " ", SuperscriptBox["h0", "2"]}], "-", RowBox[{"by", " ", SuperscriptBox["h0", "3"]}], "-", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Sz", " ", "ux1"}], "-", RowBox[{"Sz", " ", "ux2"}], "+", RowBox[{"Iyz", " ", "\[Theta]y1"}], "-", RowBox[{"Iyz", " ", "\[Theta]y2"}], "-", RowBox[{"Iz", " ", "\[Theta]z1"}], "+", RowBox[{"Iz", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{ SuperscriptBox["AA", "3"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["kyz", "2"], "-", RowBox[{"ky", " ", "kz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"by", " ", SuperscriptBox["h0", "4"]}], "+", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"h0", " ", "Sz", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "+", RowBox[{"6", " ", "Iyz", " ", RowBox[{"(", RowBox[{"uz1", "-", "uz2", "+", RowBox[{"ey", " ", RowBox[{"(", RowBox[{"\[Theta]x1", "-", "\[Theta]x2"}], ")"}]}]}], ")"}]}], "+", RowBox[{"6", " ", "Iz", " ", RowBox[{"(", RowBox[{"uy1", "-", "uy2", "+", RowBox[{"ez", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]x1"}], "+", "\[Theta]x2"}], ")"}]}]}], ")"}]}], "-", RowBox[{"2", " ", "h0", " ", "Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", RowBox[{"2", " ", "\[Theta]y2"}]}], ")"}]}], "+", RowBox[{"2", " ", "h0", " ", "Iz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "+", RowBox[{"2", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"12", " ", "AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "72"}], " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"12", " ", "by", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"6", " ", "cy", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "Sz", " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", "Sy"}], "-", RowBox[{"kyz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"6", " ", "bx", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iyz", " ", "ky", " ", "Sy"}], "-", RowBox[{"Iz", " ", "kyz", " ", "Sy"}], "-", RowBox[{"Iy", " ", "ky", " ", "Sz"}], "+", RowBox[{"Iyz", " ", "kyz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"6", " ", "cz", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "Sz", " ", RowBox[{"(", RowBox[{ RowBox[{"kyz", " ", "Sy"}], "-", RowBox[{"kz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"by", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "kyz", " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Sz", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "+", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "-", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"Iz", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]z1"}], "+", "\[Theta]z2"}], ")"}]}]}], ")"}]}], "+", RowBox[{"GG", " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"kyz", " ", RowBox[{"(", RowBox[{"uz1", "-", "uz2", "+", RowBox[{"ey", " ", "\[Theta]x1"}], "-", RowBox[{"ey", " ", "\[Theta]x2"}]}], ")"}]}], "+", RowBox[{"ky", " ", RowBox[{"(", RowBox[{"uy1", "-", "uy2", "-", RowBox[{"ez", " ", "\[Theta]x1"}], "+", RowBox[{"ez", " ", "\[Theta]x2"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"h0", " ", RowBox[{"(", RowBox[{ RowBox[{"kz", " ", SuperscriptBox["Sz", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Sz", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "+", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "-", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"Iz", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]z1"}], "+", "\[Theta]z2"}], ")"}]}]}], ")"}]}], "+", RowBox[{"ky", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "6"}], " ", "Iyz", " ", "Sy", " ", "Sz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "+", "\[Theta]z2"}], ")"}]}], "+", RowBox[{"3", " ", "Iy", " ", SuperscriptBox["Sz", "2"], " ", RowBox[{"(", RowBox[{"\[Theta]z1", "+", "\[Theta]z2"}], ")"}]}], "+", RowBox[{ SuperscriptBox["Sy", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Sz", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "+", RowBox[{"Iyz", " ", "\[Theta]y1"}], "-", RowBox[{"Iyz", " ", "\[Theta]y2"}], "+", RowBox[{"2", " ", "Iz", " ", "\[Theta]z1"}], "+", RowBox[{"4", " ", "Iz", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"kyz", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "Iz", " ", SuperscriptBox["Sy", "2"], " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"3", " ", "Iy", " ", SuperscriptBox["Sz", "2"], " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"2", " ", "Sy", " ", "Sz", " ", RowBox[{"(", RowBox[{ RowBox[{"Sz", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "-", RowBox[{"2", " ", "Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", RowBox[{"2", " ", "\[Theta]y2"}]}], ")"}]}], "+", RowBox[{"Iz", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]z1"}], "+", "\[Theta]z2"}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"\[Delta]\[Theta]y1", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", SuperscriptBox["AA", "2"], " ", "GG", " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iy", " ", "kyz"}], "+", RowBox[{"12", " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"Iyz", " ", "kyz"}]}], ")"}]}], "-", RowBox[{"12", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iyz", " ", "kz"}], "-", RowBox[{"2", " ", "bz", " ", "EE", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"2", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"Iz", " ", "kz"}]}], ")"}]}], "-", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", SuperscriptBox["kyz", "2"], " ", "Sy"}], "+", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky", " ", "kz", " ", "Sy"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "ky", " ", "Sy", " ", "ux1"}], "+", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "ux1"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iz", " ", "kz", " ", "Sy", " ", "ux1"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "ky", " ", "Sy", " ", "ux2"}], "-", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "ux2"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iz", " ", "kz", " ", "Sy", " ", "ux2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kz", " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "uz2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kz", " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iy", "2"], " ", "ky", " ", "\[Theta]y1"}], "+", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iyz", " ", "kyz", " ", "\[Theta]y1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]y1"}], "-", RowBox[{"96", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]y1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iy", "2"], " ", "ky", " ", "\[Theta]y2"}], "-", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iyz", " ", "kyz", " ", "\[Theta]y2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]y2"}], "-", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]y2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iyz", " ", "ky", " ", "\[Theta]z1"}], "-", RowBox[{"120", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]z1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]z1"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "Iz", " ", "kz", " ", "\[Theta]z1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iyz", " ", "ky", " ", "\[Theta]z2"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]z2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]z2"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "Iz", " ", "kz", " ", "\[Theta]z2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}]}], ")"}]}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "6"}], " ", "cy", " ", SuperscriptBox["h0", "2"]}], "+", RowBox[{"bz", " ", SuperscriptBox["h0", "3"]}], "+", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Sy", " ", "ux1"}], "-", RowBox[{"Sy", " ", "ux2"}], "+", RowBox[{"Iy", " ", "\[Theta]y1"}], "-", RowBox[{"Iy", " ", "\[Theta]y2"}], "-", RowBox[{"Iyz", " ", "\[Theta]z1"}], "+", RowBox[{"Iyz", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["AA", "3"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["kyz", "2"], "-", RowBox[{"ky", " ", "kz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"bz", " ", SuperscriptBox["h0", "4"]}], "-", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"h0", " ", "Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "ux1"}], "+", "ux2"}], ")"}]}], "+", RowBox[{"6", " ", "Iy", " ", RowBox[{"(", RowBox[{"uz1", "-", "uz2", "+", RowBox[{"ey", " ", RowBox[{"(", RowBox[{"\[Theta]x1", "-", "\[Theta]x2"}], ")"}]}]}], ")"}]}], "+", RowBox[{"6", " ", "Iyz", " ", RowBox[{"(", RowBox[{"uy1", "-", "uy2", "+", RowBox[{"ez", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]x1"}], "+", "\[Theta]x2"}], ")"}]}]}], ")"}]}], "-", RowBox[{"2", " ", "h0", " ", "Iy", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "\[Theta]y1"}], "+", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"2", " ", "h0", " ", "Iyz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "\[Theta]z1"}], "+", "\[Theta]z2"}], ")"}]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"12", " ", "AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"72", " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "-", RowBox[{"12", " ", "bz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"6", " ", "cy", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", "Sy"}], "-", RowBox[{"kyz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"6", " ", "cz", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"kyz", " ", "Sy"}], "-", RowBox[{"kz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"6", " ", "bx", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iyz", " ", "kyz", " ", "Sy"}], "-", RowBox[{"Iz", " ", "kz", " ", "Sy"}], "-", RowBox[{"Iy", " ", "kyz", " ", "Sz"}], "+", RowBox[{"Iyz", " ", "kz", " ", "Sz"}]}], ")"}]}], "-", RowBox[{"bz", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "kyz", " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "ux1"}], "+", "ux2"}], ")"}]}], "+", RowBox[{"Iy", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]y1"}], "+", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "-", "\[Theta]z2"}], ")"}]}]}], ")"}]}], "+", RowBox[{"GG", " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"kz", " ", RowBox[{"(", RowBox[{"uz1", "-", "uz2", "+", RowBox[{"ey", " ", "\[Theta]x1"}], "-", RowBox[{"ey", " ", "\[Theta]x2"}]}], ")"}]}], "+", RowBox[{"kyz", " ", RowBox[{"(", RowBox[{"uy1", "-", "uy2", "-", RowBox[{"ez", " ", "\[Theta]x1"}], "+", RowBox[{"ez", " ", "\[Theta]x2"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"h0", " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "ux1"}], "+", "ux2"}], ")"}]}], "-", RowBox[{"Iy", " ", "\[Theta]y1"}], "+", RowBox[{"Iy", " ", "\[Theta]y2"}], "+", RowBox[{"Iyz", " ", "\[Theta]z1"}], "-", RowBox[{"Iyz", " ", "\[Theta]z2"}]}], ")"}]}], "-", RowBox[{"kz", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "Iz", " ", SuperscriptBox["Sy", "2"], " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"Sy", " ", "Sz", " ", RowBox[{"(", RowBox[{ RowBox[{"Sz", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "-", RowBox[{"6", " ", "Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", "\[Theta]y2"}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["Sz", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "Iy", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "\[Theta]y1"}], "+", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]z1"}], "+", "\[Theta]z2"}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"kyz", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "Iy", " ", SuperscriptBox["Sz", "2"], " ", RowBox[{"(", RowBox[{"\[Theta]z1", "+", "\[Theta]z2"}], ")"}]}], "+", RowBox[{ SuperscriptBox["Sy", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "Sz", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "+", RowBox[{"3", " ", "Iz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "+", "\[Theta]z2"}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "Sy", " ", "Sz", " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "-", "\[Theta]y2"}], ")"}]}], "-", RowBox[{"2", " ", "Iyz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "\[Theta]z1"}], "+", "\[Theta]z2"}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"\[Delta]\[Theta]z1", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "6"}], " ", SuperscriptBox["AA", "2"], " ", "GG", " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "12"}], " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iyz", " ", "kyz"}], "-", RowBox[{"12", " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iyz", " ", "ky"}], "-", RowBox[{"Iz", " ", "kyz"}]}], ")"}]}], "+", RowBox[{"12", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iz", " ", "kz"}], "+", RowBox[{"2", " ", "by", " ", "EE", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"2", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"Iz", " ", "kz"}]}], ")"}]}], "+", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", SuperscriptBox["kyz", "2"], " ", "Sz"}], "-", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky", " ", "kz", " ", "Sz"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "ky", " ", "Sz", " ", "ux1"}], "-", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sz", " ", "ux1"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iz", " ", "kz", " ", "Sz", " ", "ux1"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "ky", " ", "Sz", " ", "ux2"}], "+", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sz", " ", "ux2"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iz", " ", "kz", " ", "Sz", " ", "ux2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "uy1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "ky", " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uy1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "uy2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "ky", " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "uy2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uz1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uz2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uz2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iyz", " ", "ky", " ", "\[Theta]y1"}], "-", RowBox[{"120", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]y1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]y1"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "Iz", " ", "kz", " ", "\[Theta]y1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y1"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iyz", " ", "ky", " ", "\[Theta]y2"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]y2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]y2"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "Iz", " ", "kz", " ", "\[Theta]y2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]y2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]z1"}], "-", RowBox[{"96", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]z1"}], "+", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "Iz", " ", "kyz", " ", "\[Theta]z1"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iz", "2"], " ", "kz", " ", "\[Theta]z1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "ky", " ", "\[Theta]z2"}], "-", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "ky", " ", "\[Theta]z2"}], "-", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "Iz", " ", "kyz", " ", "\[Theta]z2"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iz", "2"], " ", "kz", " ", "\[Theta]z2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sz", "2"], " ", "\[Theta]z2"}]}], ")"}]}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "cz", " ", SuperscriptBox["h0", "2"]}], "+", RowBox[{"by", " ", SuperscriptBox["h0", "3"]}], "+", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Sz", " ", "ux1"}], "-", RowBox[{"Sz", " ", "ux2"}], "+", RowBox[{"Iyz", " ", "\[Theta]y1"}], "-", RowBox[{"Iyz", " ", "\[Theta]y2"}], "-", RowBox[{"Iz", " ", "\[Theta]z1"}], "+", RowBox[{"Iz", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["AA", "3"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["kyz", "2"], "-", RowBox[{"ky", " ", "kz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"by", " ", SuperscriptBox["h0", "4"]}], "-", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"h0", " ", "Sz", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "ux1"}], "+", "ux2"}], ")"}]}], "+", RowBox[{"6", " ", "Iyz", " ", RowBox[{"(", RowBox[{"uz1", "-", "uz2", "+", RowBox[{"ey", " ", RowBox[{"(", RowBox[{"\[Theta]x1", "-", "\[Theta]x2"}], ")"}]}]}], ")"}]}], "+", RowBox[{"6", " ", "Iz", " ", RowBox[{"(", RowBox[{"uy1", "-", "uy2", "+", RowBox[{"ez", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]x1"}], "+", "\[Theta]x2"}], ")"}]}]}], ")"}]}], "-", RowBox[{"2", " ", "h0", " ", "Iyz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "\[Theta]y1"}], "+", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"2", " ", "h0", " ", "Iz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "\[Theta]z1"}], "+", "\[Theta]z2"}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"12", " ", "AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"72", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"12", " ", "by", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"6", " ", "cy", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "ky"}], " ", "Sy"}], "+", RowBox[{"kyz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"6", " ", "cz", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "kyz"}], " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"6", " ", "bx", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", "kyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "ky", " ", "Sz"}], "-", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", "Sy"}], "+", RowBox[{"kyz", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"by", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "kyz", " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Sz", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "+", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "-", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"Iz", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]z1"}], "+", "\[Theta]z2"}], ")"}]}]}], ")"}]}], "+", RowBox[{"GG", " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "6"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"kyz", " ", RowBox[{"(", RowBox[{"uz1", "-", "uz2", "+", RowBox[{"ey", " ", "\[Theta]x1"}], "-", RowBox[{"ey", " ", "\[Theta]x2"}]}], ")"}]}], "+", RowBox[{"ky", " ", RowBox[{"(", RowBox[{"uy1", "-", "uy2", "-", RowBox[{"ez", " ", "\[Theta]x1"}], "+", RowBox[{"ez", " ", "\[Theta]x2"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"h0", " ", RowBox[{"(", RowBox[{ RowBox[{"kz", " ", SuperscriptBox["Sz", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Sz", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "+", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "-", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"Iz", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]z1"}], "+", "\[Theta]z2"}], ")"}]}]}], ")"}]}], "+", RowBox[{"kyz", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "Iz", " ", SuperscriptBox["Sy", "2"], " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"3", " ", "Iy", " ", SuperscriptBox["Sz", "2"], " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", "\[Theta]y2"}], ")"}]}], "-", RowBox[{"2", " ", "Sy", " ", "Sz", " ", RowBox[{"(", RowBox[{ RowBox[{"Sz", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "+", RowBox[{"4", " ", "Iyz", " ", "\[Theta]y1"}], "+", RowBox[{"2", " ", "Iyz", " ", "\[Theta]y2"}], "-", RowBox[{"Iz", " ", "\[Theta]z1"}], "+", RowBox[{"Iz", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"ky", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "Iyz", " ", "Sy", " ", "Sz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "+", "\[Theta]z2"}], ")"}]}], "-", RowBox[{"3", " ", "Iy", " ", SuperscriptBox["Sz", "2"], " ", RowBox[{"(", RowBox[{"\[Theta]z1", "+", "\[Theta]z2"}], ")"}]}], "+", RowBox[{ SuperscriptBox["Sy", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Sz", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "+", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "-", "\[Theta]y2"}], ")"}]}], "-", RowBox[{"2", " ", "Iz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "\[Theta]z1"}], "+", "\[Theta]z2"}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"\[Delta]\[Theta]y2", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "6"}], " ", SuperscriptBox["AA", "2"], " ", "GG", " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iy", " ", "kyz"}], "+", RowBox[{"12", " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"Iyz", " ", "kyz"}]}], ")"}]}], "-", RowBox[{"12", " ", "cz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", "Iyz", " ", "kz"}], "+", RowBox[{"2", " ", "bz", " ", "EE", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"2", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"Iz", " ", "kz"}]}], ")"}]}], "-", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", SuperscriptBox["kyz", "2"], " ", "Sy"}], "+", RowBox[{"bx", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", "ky", " ", "kz", " ", "Sy"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "ky", " ", "Sy", " ", "ux1"}], "-", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "ux1"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iz", " ", "kz", " ", "Sy", " ", "ux1"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "ky", " ", "Sy", " ", "ux2"}], "+", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "kyz", " ", "Sy", " ", "ux2"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iz", " ", "kz", " ", "Sy", " ", "ux2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uy1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uy1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uy1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kyz", " ", "uy2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "uy2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "uy2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kz", " ", "uz1"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "uz2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "Iy", " ", "Iz", " ", "kz", " ", "uz2"}], "-", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "+", RowBox[{"12", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "uz2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]x1"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x1"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x1"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ez", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]x2"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]x2"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", "ey", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ey", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]x2"}], "+", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "-", RowBox[{"12", " ", "EE", " ", "ez", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]x2"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iy", "2"], " ", "ky", " ", "\[Theta]y1"}], "-", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iyz", " ", "kyz", " ", "\[Theta]y1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]y1"}], "-", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]y1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y1"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iy", "2"], " ", "ky", " ", "\[Theta]y2"}], "+", RowBox[{"48", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iyz", " ", "kyz", " ", "\[Theta]y2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kz", " ", "\[Theta]y2"}], "-", RowBox[{"96", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kz", " ", "\[Theta]y2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", SuperscriptBox["Sy", "2"], " ", "\[Theta]y2"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iyz", " ", "ky", " ", "\[Theta]z1"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]z1"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]z1"}], "-", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "Iz", " ", "kz", " ", "\[Theta]z1"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]z1"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iyz", " ", "ky", " ", "\[Theta]z2"}], "-", RowBox[{"120", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", SuperscriptBox["Iyz", "2"], " ", "kyz", " ", "\[Theta]z2"}], "+", RowBox[{"72", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iy", " ", "Iz", " ", "kyz", " ", "\[Theta]z2"}], "+", RowBox[{"24", " ", SuperscriptBox["EE", "2"], " ", "h0", " ", "Iyz", " ", "Iz", " ", "kz", " ", "\[Theta]z2"}], "+", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", SuperscriptBox["kyz", "2"], " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}], "-", RowBox[{"6", " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "3"], " ", "ky", " ", "kz", " ", "Sy", " ", "Sz", " ", "\[Theta]z2"}]}], ")"}]}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "cy", " ", SuperscriptBox["h0", "2"]}], "+", RowBox[{"bz", " ", SuperscriptBox["h0", "3"]}], "+", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Sy", " ", "ux1"}], "-", RowBox[{"Sy", " ", "ux2"}], "+", RowBox[{"Iy", " ", "\[Theta]y1"}], "-", RowBox[{"Iy", " ", "\[Theta]y2"}], "-", RowBox[{"Iyz", " ", "\[Theta]z1"}], "+", RowBox[{"Iyz", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["AA", "3"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["kyz", "2"], "-", RowBox[{"ky", " ", "kz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"bz", " ", SuperscriptBox["h0", "4"]}], "+", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"h0", " ", "Sy", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "+", RowBox[{"6", " ", "Iy", " ", RowBox[{"(", RowBox[{"uz1", "-", "uz2", "+", RowBox[{"ey", " ", RowBox[{"(", RowBox[{"\[Theta]x1", "-", "\[Theta]x2"}], ")"}]}]}], ")"}]}], "+", RowBox[{"6", " ", "Iyz", " ", RowBox[{"(", RowBox[{"uy1", "-", "uy2", "+", RowBox[{"ez", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]x1"}], "+", "\[Theta]x2"}], ")"}]}]}], ")"}]}], "-", RowBox[{"2", " ", "h0", " ", "Iy", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", RowBox[{"2", " ", "\[Theta]y2"}]}], ")"}]}], "+", RowBox[{"2", " ", "h0", " ", "Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "+", RowBox[{"2", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"12", " ", "AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"72", " ", "cy", " ", "EE", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"12", " ", "bz", " ", "EE", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"6", " ", "cy", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", "Sy"}], "-", RowBox[{"kyz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"6", " ", "cz", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", "Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"kyz", " ", "Sy"}], "-", RowBox[{"kz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"6", " ", "bx", " ", "GG", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iyz", " ", "kyz", " ", "Sy"}], "-", RowBox[{"Iz", " ", "kz", " ", "Sy"}], "-", RowBox[{"Iy", " ", "kyz", " ", "Sz"}], "+", RowBox[{"Iyz", " ", "kz", " ", "Sz"}]}], ")"}]}], "+", RowBox[{"bz", " ", "GG", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "kyz", " ", "Sy"}], "+", RowBox[{"kz", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "ux1"}], "+", "ux2"}], ")"}]}], "+", RowBox[{"Iy", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "\[Theta]y1"}], "+", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "-", "\[Theta]z2"}], ")"}]}]}], ")"}]}], "+", RowBox[{"GG", " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "6"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"kz", " ", RowBox[{"(", RowBox[{"uz1", "-", "uz2", "+", RowBox[{"ey", " ", "\[Theta]x1"}], "-", RowBox[{"ey", " ", "\[Theta]x2"}]}], ")"}]}], "+", RowBox[{"kyz", " ", RowBox[{"(", RowBox[{"uy1", "-", "uy2", "-", RowBox[{"ez", " ", "\[Theta]x1"}], "+", RowBox[{"ez", " ", "\[Theta]x2"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"h0", " ", RowBox[{"(", RowBox[{ RowBox[{"kz", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "Iz", " ", SuperscriptBox["Sy", "2"], " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", "\[Theta]y2"}], ")"}]}], "-", RowBox[{"Sy", " ", "Sz", " ", RowBox[{"(", RowBox[{ RowBox[{"Sz", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "+", RowBox[{"6", " ", "Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", "\[Theta]y2"}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["Sz", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "Iy", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "+", RowBox[{"2", " ", "\[Theta]y2"}]}], ")"}]}], "+", RowBox[{"Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "-", "\[Theta]z2"}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"ky", " ", SuperscriptBox["Sy", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Sy", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "ux1"}], "+", "ux2"}], ")"}]}], "-", RowBox[{"Iy", " ", "\[Theta]y1"}], "+", RowBox[{"Iy", " ", "\[Theta]y2"}], "+", RowBox[{"Iyz", " ", "\[Theta]z1"}], "-", RowBox[{"Iyz", " ", "\[Theta]z2"}]}], ")"}]}], "+", RowBox[{"kyz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "3"}], " ", "Iy", " ", SuperscriptBox["Sz", "2"], " ", RowBox[{"(", RowBox[{"\[Theta]z1", "+", "\[Theta]z2"}], ")"}]}], "+", RowBox[{ SuperscriptBox["Sy", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "Sz", " ", RowBox[{"(", RowBox[{"ux1", "-", "ux2"}], ")"}]}], "-", RowBox[{"3", " ", "Iz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "+", "\[Theta]z2"}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "Sy", " ", "Sz", " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", RowBox[{"(", RowBox[{"\[Theta]y1", "-", "\[Theta]y2"}], ")"}]}], "+", RowBox[{"2", " ", "Iyz", " ", RowBox[{"(", RowBox[{"\[Theta]z1", "+", RowBox[{"2", " ", "\[Theta]z2"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{"12", " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", SuperscriptBox["AA", "2"], " ", "EE", " ", "GG", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iy", " ", "ky"}], "-", RowBox[{"2", " ", "Iyz", " ", "kyz"}], "+", RowBox[{"Iz", " ", "kz"}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["AA", "3"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox["kyz", "2"]}], "+", RowBox[{"ky", " ", "kz"}]}], ")"}]}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iz", " ", SuperscriptBox["Sy", "2"]}], "+", RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "Iyz", " ", "Sy"}], "+", RowBox[{"Iy", " ", "Sz"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"12", " ", "AA", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", RowBox[{"(", RowBox[{ SuperscriptBox["Iyz", "2"], "-", RowBox[{"Iy", " ", "Iz"}]}], ")"}]}], "+", RowBox[{"GG", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"ky", " ", SuperscriptBox["Sy", "2"]}], "-", RowBox[{"2", " ", "kyz", " ", "Sy", " ", "Sz"}], "+", RowBox[{"kz", " ", SuperscriptBox["Sz", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4430689313272*^9, 3.4430690080792*^9}, { 3.4430690869528*^9, 3.4430691077320004`*^9}, {3.4430691700116*^9, 3.4430691708072*^9}, {3.4430692071717997`*^9, 3.443069246359*^9}, { 3.4430772782732*^9, 3.4430773623416*^9}, {3.4430773978316*^9, 3.4430774104676*^9}, {3.4430775053780003`*^9, 3.4430776180598*^9}, { 3.4434109099524*^9, 3.4434109159584*^9}, {3.4438800815346003`*^9, 3.4438802689304*^9}, {3.443880362624*^9, 3.4438803824516*^9}, { 3.443929565615374*^9, 3.443929570232974*^9}, {3.443935321321974*^9, 3.443935335705174*^9}, {3.443935419945174*^9, 3.443935421489574*^9}, { 3.443935494013974*^9, 3.443935494715974*^9}, {3.443935617565974*^9, 3.4439357217895737`*^9}, {3.443935755360774*^9, 3.443935816107174*^9}, { 3.443942155230774*^9, 3.443942209939974*^9}, {3.443942305710374*^9, 3.4439423142123737`*^9}, {3.4439442908131742`*^9, 3.443944441181574*^9}, { 3.4439447830065737`*^9, 3.4439447917425737`*^9}, {3.443944908541774*^9, 3.443944916060974*^9}, {3.4442731097938004`*^9, 3.4442731115254*^9}, { 3.444273189229*^9, 3.4442732700526*^9}, {3.4442748430004*^9, 3.4442748605036*^9}, {3.4442748977438*^9, 3.4442748989762*^9}, { 3.4442749340762*^9, 3.4442749351057997`*^9}, 3.4442752313382*^9, { 3.4442919702026*^9, 3.4442919911846*^9}, {3.4442921151577997`*^9, 3.4442921271074*^9}, {3.4443811023684*^9, 3.4443811036632*^9}, { 3.4443814073171997`*^9, 3.4443814402956*^9}, {3.4443815036316*^9, 3.4443815147855997`*^9}, {3.4443815537232*^9, 3.4443815747676*^9}, { 3.4443816138143997`*^9, 3.444381633174*^9}, {3.4443816850439997`*^9, 3.4443817801728*^9}, 3.4443853618688*^9, {3.4443855607376003`*^9, 3.4443856337924*^9}, {3.4443861200444*^9, 3.4443861523676*^9}, { 3.4443862280495996`*^9, 3.444386291448*^9}, {3.4443864047352*^9, 3.4443864135336*^9}, {3.4443870026832*^9, 3.4443870095316*^9}, { 3.4444082055056*^9, 3.4444082437412*^9}, {3.4444082797148*^9, 3.4444084583816*^9}, {3.4444084889108*^9, 3.4444085087539997`*^9}, { 3.444408942517*^9, 3.4444089563386*^9}, {3.4444091419564*^9, 3.4444091647167997`*^9}, {3.4444092206428003`*^9, 3.4444092944463997`*^9}, {3.4444093856284*^9, 3.4444094281071997`*^9}, { 3.4444094976988*^9, 3.4444095275104*^9}, {3.444409611064*^9, 3.4444096125772*^9}, 3.4444098504616003`*^9, {3.444409913392*^9, 3.4444099166056004`*^9}, 3.4444100178496*^9, {3.4444103063248*^9, 3.4444103358712*^9}, {3.4444103868208*^9, 3.4444104432460003`*^9}, { 3.4444921219564*^9, 3.4444921256224003`*^9}, {3.444492194824*^9, 3.4444921973668003`*^9}, {3.4444922814351997`*^9, 3.4444922853508*^9}, { 3.4444923330868*^9, 3.4444923345844*^9}, {3.444492366424*^9, 3.4444923855808*^9}, {3.4453153475226*^9, 3.445315360689*^9}, { 3.4465518166373653`*^9, 3.446551863016165*^9}, {3.446551894231765*^9, 3.446552159384965*^9}, {3.446552232377365*^9, 3.4465522555589647`*^9}, { 3.446553347388365*^9, 3.4465533616155653`*^9}, {3.4466058525769997`*^9, 3.4466058529046*^9}, {3.4466064371219997`*^9, 3.4466065097244*^9}, { 3.4466127725788*^9, 3.4466127766036*^9}, {3.4466128124835997`*^9, 3.4466130037864*^9}, {3.4466131532696*^9, 3.4466131761703997`*^9}, { 3.4466133992192*^9, 3.4466134478756*^9}, {3.446613483584*^9, 3.4466134932092*^9}, {3.4466135740952*^9, 3.4466135794927998`*^9}, { 3.4466137283948*^9, 3.4466137341356*^9}, {3.4466138994342003`*^9, 3.4466139023826*^9}, {3.4466139549858*^9, 3.4466139579653997`*^9}, { 3.4466142109818*^9, 3.4466142245226*^9}, {3.4466142793878*^9, 3.4466143652033997`*^9}, {3.4466144712834*^9, 3.4466145978929996`*^9}, { 3.4466146992618*^9, 3.4466147509914*^9}, {3.4466151283086*^9, 3.4466152768986*^9}, {3.4466153107506*^9, 3.4466153406558*^9}, { 3.4466194331976*^9, 3.4466194377528*^9}, {3.4466194847712*^9, 3.446619488718*^9}, {3.4466389495861998`*^9, 3.4466389768238*^9}, { 3.4466391218414*^9, 3.446639306561*^9}, {3.4466393990222*^9, 3.4466394004886*^9}, {3.4466394475694*^9, 3.4466394487706003`*^9}, { 3.4466395034174*^9, 3.4466395049462*^9}, 3.4466395515755997`*^9, { 3.4466396000176*^9, 3.4466396190808*^9}, {3.4466397459088*^9, 3.446639748826*^9}, {3.4466397974356003`*^9, 3.446639798668*^9}, 3.4466398447816*^9, {3.446639894218*^9, 3.4466399201556*^9}, { 3.4466399570964003`*^9, 3.4466399583288*^9}, {3.446639994006*^9, 3.4466400056904*^9}, {3.4466400383568*^9, 3.4466400395892*^9}, { 3.4466400745643997`*^9, 3.4466401025976*^9}, {3.4466401660834*^9, 3.4466401806070004`*^9}, {3.4466402251294003`*^9, 3.446640227407*^9}, { 3.446640260479*^9, 3.4466402657674*^9}, {3.4466404133122*^9, 3.4466405185654*^9}, 3.4466405830462*^9, {3.4467273294214*^9, 3.4467273777813997`*^9}, {3.4467274366558*^9, 3.4467275620954*^9}, { 3.446727593311*^9, 3.4467277412614*^9}, {3.4467283334639997`*^9, 3.4467283356012*^9}, {3.4467283707636003`*^9, 3.4467283727604*^9}, { 3.4467289882664003`*^9, 3.4467291276836*^9}, {3.446778464322*^9, 3.4467786797424*^9}, {3.4467801953803997`*^9, 3.4467802409792*^9}, { 3.4467802998691998`*^9, 3.4467804023456*^9}, 3.4467804345596*^9, { 3.4467808656344*^9, 3.4467808670852003`*^9}, 3.4467818107525997`*^9, { 3.446781855509*^9, 3.446781874385*^9}, {3.4467826737914*^9, 3.4467827381726*^9}, {3.4467828623018*^9, 3.4467831045386*^9}, { 3.4470344113984003`*^9, 3.4470344123344*^9}, {3.4470344628316*^9, 3.4470345343108*^9}, {3.447043591118539*^9, 3.447043642192939*^9}, { 3.447045649625739*^9, 3.447045718437339*^9}, {3.447054774023939*^9, 3.447054834198939*^9}, {3.4470549103449388`*^9, 3.4470549116169386`*^9}, { 3.447054943902939*^9, 3.4470553027109385`*^9}, {3.447055334559939*^9, 3.447055353684939*^9}, {3.447057311918539*^9, 3.447057369747739*^9}, { 3.4470575058577385`*^9, 3.4470575951365385`*^9}, {3.4470581848789387`*^9, 3.4470582040825386`*^9}, {3.451276121243*^9, 3.4512761425838003`*^9}, { 3.4512762022382*^9, 3.4512762064346*^9}, {3.4512762476966*^9, 3.4512762827654*^9}, {3.451276489091*^9, 3.451276541975*^9}, { 3.4512765853118*^9, 3.4512766132046003`*^9}, {3.4512773470306*^9, 3.4512773766082*^9}, {3.4512776069110003`*^9, 3.4512777499318*^9}, 3.4512777831286*^9, {3.4512778785538*^9, 3.451277881627*^9}, { 3.4512780242734003`*^9, 3.4512780302794*^9}, 3.4512780737878*^9, { 3.4512781866226*^9, 3.4512781930810003`*^9}, {3.4512863325078*^9, 3.4512863539266*^9}, {3.4568019250434*^9, 3.4568022712698*^9}, { 3.4568023177422*^9, 3.4568024125278*^9}, {3.4568024694365997`*^9, 3.4568024750369997`*^9}, {3.4568026914402*^9, 3.4568028101094*^9}, { 3.4568028406698*^9, 3.4568028564726*^9}, 3.4568028886085997`*^9, { 3.4568030489454*^9, 3.4568030800986*^9}, 3.4568032004128*^9, { 3.4568035073698*^9, 3.4568035176034*^9}, {3.4568040146596003`*^9, 3.4568040844852*^9}, {3.4568043016684*^9, 3.4568043154744*^9}, { 3.4568045482264*^9, 3.4568045486632*^9}, {3.4568048944996*^9, 3.4568049806116*^9}, {3.4660560628582*^9, 3.4660560753538*^9}, { 3.4660676729379997`*^9, 3.4660676735931997`*^9}, {3.4660677244024*^9, 3.4660677277251997`*^9}, {3.4742646771287394`*^9, 3.47426469439174*^9}, { 3.47426489921974*^9, 3.4742649800437393`*^9}, {3.4801246373348*^9, 3.4801246860536003`*^9}, {3.4801247748176003`*^9, 3.4801247821028*^9}, { 3.4801248161264*^9, 3.4801248295736*^9}, {3.4801248810692*^9, 3.4801248964508*^9}, {3.4801249330484*^9, 3.480124947884*^9}, 3.4801249886468*^9, {3.4801251139147997`*^9, 3.48012512588*^9}, { 3.4838339444988003`*^9, 3.4838339567448*^9}, 3.4838341692012*^9, { 3.4838344350408*^9, 3.4838344353684*^9}, {3.4938987575920324`*^9, 3.4938987586840324`*^9}, {3.4941630624049997`*^9, 3.4941631381274*^9}, { 3.4941632311345997`*^9, 3.4941632492306004`*^9}, 3.4941633249217997`*^9, { 3.4941633940922003`*^9, 3.4941634063538*^9}, {3.4941634538402*^9, 3.4941635051642*^9}, {3.494163565115*^9, 3.4941636341762*^9}, { 3.4941636853442*^9, 3.4941639323234*^9}, {3.4941640277798*^9, 3.4941641455754004`*^9}, {3.4941641790374002`*^9, 3.4941641803789997`*^9}, {3.4941642676142*^9, 3.4941643277678003`*^9}, 3.4941644677018003`*^9, {3.4941646208938*^9, 3.4941646322349997`*^9}, { 3.4941652592693996`*^9, 3.4941652807194*^9}, {3.4941653119038*^9, 3.494165416299*^9}, {3.494165453895*^9, 3.4941654544722*^9}, { 3.4950990979779997`*^9, 3.495099142701*^9}, {3.495099172958*^9, 3.4950991806289997`*^9}, {3.495099227097*^9, 3.495099238113*^9}, 3.495099290797*^9, {3.495099346084*^9, 3.495099359507*^9}, { 3.495099456308*^9, 3.495099464091*^9}, 3.495099683108*^9, { 3.495100428112*^9, 3.495100434958*^9}, {3.4951006496219997`*^9, 3.495100649992*^9}, {3.4987235265018*^9, 3.4987235939094*^9}, { 3.4987236420666*^9, 3.4987236530646*^9}, {3.4987237305341997`*^9, 3.4987237396914*^9}, {3.498733136159*^9, 3.4987332972446003`*^9}, { 3.4987364783094*^9, 3.4987364860626*^9}, {3.4987366201134*^9, 3.4987366236078*^9}, {3.4987367272386*^9, 3.4987367464890003`*^9}, { 3.4987369428462*^9, 3.4987369670886*^9}, {3.4987370134518003`*^9, 3.4987370259941998`*^9}, {3.4987370944002*^9, 3.4987371027618*^9}, { 3.4987371921029997`*^9, 3.498737193663*^9}, {3.4987372660938*^9, 3.4987372935498*^9}, {3.4987373290554*^9, 3.4987377176202*^9}, { 3.4987377520182*^9, 3.4987379139462*^9}, {3.4987382030216*^9, 3.4987382667078*^9}, {3.4987888391818*^9, 3.4987888608346*^9}, { 3.4988785131146*^9, 3.4988785160162*^9}, {3.5007170967096*^9, 3.5007170999076*^9}, 3.5007182237316*^9, {3.5007182772864*^9, 3.5007182987832003`*^9}, {3.5009573226744003`*^9, 3.5009573940444*^9}, 3.5009574358710003`*^9, 3.5009604278482*^9, {3.5009897246173353`*^9, 3.5009898480289354`*^9}, {3.5009901464413357`*^9, 3.5009901475333357`*^9}, {3.5009901801997356`*^9, 3.500990274096135*^9}, { 3.5010475253292*^9, 3.5010475852332*^9}, {3.5010605722018003`*^9, 3.5010606739762*^9}, {3.5010607202146*^9, 3.5010607323358*^9}, { 3.5010607920526*^9, 3.501061118467*^9}, {3.5010612022078*^9, 3.5010612277138*^9}, {3.5010616467766*^9, 3.5010617938534*^9}, { 3.5010618406222*^9, 3.5010619950778*^9}, {3.5010621500638*^9, 3.5010622514014*^9}, {3.5010625292218*^9, 3.5010625409374*^9}, { 3.5010626043046*^9, 3.5010626313862*^9}, {3.5010626787166*^9, 3.5010626790754004`*^9}, {3.501074457561*^9, 3.5010744671082*^9}, 3.5010763029458*^9, {3.5032210899309998`*^9, 3.5032212413900003`*^9}, { 3.557658203404973*^9, 3.557658219644601*^9}, {3.5576584433801947`*^9, 3.557658496030287*^9}, {3.5576585501779823`*^9, 3.5576586046064777`*^9}, { 3.557658648910555*^9, 3.557658754600741*^9}, {3.557658963945511*^9, 3.5576589782507353`*^9}, {3.557659009949991*^9, 3.5576591437514267`*^9}, { 3.557659182221094*^9, 3.5576592187719584`*^9}, 3.557659413865901*^9, { 3.557659921100792*^9, 3.5576599556392527`*^9}, {3.557660706920972*^9, 3.5576607248454037`*^9}, {3.557661209085854*^9, 3.557661209413454*^9}, { 3.5577526651911488`*^9, 3.5577526932087984`*^9}, {3.5577527272480583`*^9, 3.557752747122493*^9}, {3.5577528374934516`*^9, 3.557752838523053*^9}, { 3.557752881204728*^9, 3.557752891313546*^9}, {3.557752938612829*^9, 3.5577529469120436`*^9}, {3.557753060714244*^9, 3.557753062633047*^9}, { 3.5577536609544907`*^9, 3.5577536637936954`*^9}, {3.5577537824631042`*^9, 3.557753810184353*^9}, {3.557753841025607*^9, 3.5577540648392*^9}, 3.5577541920574236`*^9, {3.5577547033327217`*^9, 3.557754716967146*^9}, { 3.5577547716296415`*^9, 3.557754802112095*^9}, {3.5577549509363565`*^9, 3.5577549771444025`*^9}, 3.5577551382302856`*^9, {3.55775527184452*^9, 3.557755272858522*^9}, {3.557755881555991*^9, 3.557755886548*^9}, { 3.557756158316077*^9, 3.557756231885806*^9}, {3.5577572408487787`*^9, 3.557757248835993*^9}, {3.5577572834368534`*^9, 3.5577575888229895`*^9}, { 3.5577578129641833`*^9, 3.557757862837471*^9}, {3.557758025514557*^9, 3.557758079272251*^9}, 3.557810586960072*^9, {3.5578240262005973`*^9, 3.5578240345360737`*^9}, {3.557824091429328*^9, 3.5578241008156557`*^9}, { 3.557831525255726*^9, 3.5578315319793377`*^9}, 3.5578315716190076`*^9, { 3.557831606079468*^9, 3.557831629432709*^9}, {3.5578316663267736`*^9, 3.5578317569473333`*^9}, {3.5578322144181366`*^9, 3.557832218084143*^9}, { 3.557836356693412*^9, 3.557836473771618*^9}, {3.5578365201660995`*^9, 3.5578365974018345`*^9}, {3.5578366426731143`*^9, 3.557836658865943*^9}, { 3.557836691017599*^9, 3.5578367924957776`*^9}, {3.5578368305442443`*^9, 3.557836888279946*^9}, {3.5578369382156334`*^9, 3.5578370776642785`*^9}, { 3.5578383536061196`*^9, 3.5578383735117545`*^9}, {3.5578385892445335`*^9, 3.5578385978869486`*^9}, {3.5578386713006773`*^9, 3.557838700113928*^9}, { 3.5578387451200075`*^9, 3.5578387467892103`*^9}, {3.5578388951454706`*^9, 3.5578389248635225`*^9}, {3.5578389679351983`*^9, 3.557838983535226*^9}, { 3.5578390227692947`*^9, 3.557839023143696*^9}, {3.557839097696226*^9, 3.5578391125162525`*^9}, {3.5578391553539276`*^9, 3.557839199892006*^9}, { 3.55783924184048*^9, 3.557839294490572*^9}, {3.5578393285922318`*^9, 3.557839398683155*^9}, {3.557839430522811*^9, 3.557839470162481*^9}, { 3.5578395370865984`*^9, 3.5578395446994114`*^9}, {3.5578396068499207`*^9, 3.5578396118575296`*^9}, 3.5578943518105097`*^9, {3.557894388361374*^9, 3.5578944029629993`*^9}, {3.5578944607611012`*^9, 3.5578944989499683`*^9}, {3.5578945393696394`*^9, 3.557894561537278*^9}, { 3.5578946028617506`*^9, 3.5578946188985786`*^9}, {3.557894650894235*^9, 3.5578947812636642`*^9}, {3.55789481884413*^9, 3.5578948191249304`*^9}, { 3.5578949768100076`*^9, 3.5578949836272197`*^9}, {3.5578967386805477`*^9, 3.55789678549623*^9}, {3.5578968804691963`*^9, 3.557896888643611*^9}, { 3.557897022491846*^9, 3.5578970341450663`*^9}, {3.557897620940097*^9, 3.55789765120415*^9}, {3.5579218072271147`*^9, 3.5579218263059483`*^9}, { 3.557922095312821*^9, 3.557922116965659*^9}, {3.557922178086566*^9, 3.557922188616585*^9}, {3.5579223258812256`*^9, 3.557922327066828*^9}, { 3.5579224596046605`*^9, 3.557922461804264*^9}, 3.5579805928465395`*^9, { 3.5579815200581703`*^9, 3.557981541711009*^9}, 3.557985544779242*^9, { 3.5579863164793987`*^9, 3.5579863339514294`*^9}, {3.557986523210962*^9, 3.557986568841042*^9}, 3.5579866122559185`*^9, 3.557986993536188*^9, { 3.5579871244716187`*^9, 3.5579871290580263`*^9}, 3.557987173486905*^9, 3.5579872166989803`*^9, {3.5599618621582537`*^9, 3.5599618642486577`*^9}, { 3.559961969720443*^9, 3.5599619894700775`*^9}, 3.559963611089726*^9, { 3.5601298891258235`*^9, 3.560129889422224*^9}, {3.560132445157113*^9, 3.5601324458591146`*^9}, {3.561978472080926*^9, 3.561978472392926*^9}, { 3.6297802564412937`*^9, 3.6297802957377625`*^9}, {3.62978033369263*^9, 3.629780429741998*^9}, {3.6297805790030603`*^9, 3.6297809429048996`*^9}, { 3.629780987957779*^9, 3.629781197575347*^9}, {3.629781240397422*^9, 3.629781337663593*^9}, {3.6297813946972933`*^9, 3.6297814529165955`*^9}, { 3.6297814952550697`*^9, 3.629781527578326*^9}, {3.62978162025529*^9, 3.629781647633338*^9}, {3.629781678833393*^9, 3.629781763120341*^9}, 3.6297818028224106`*^9, {3.6297818432108817`*^9, 3.629781872570133*^9}, { 3.629782355765382*^9, 3.629782427603508*^9}, {3.6297824692243814`*^9, 3.629782674863942*^9}, {3.629782707218399*^9, 3.6297829295343895`*^9}, { 3.629783005631323*^9, 3.6297830574702144`*^9}, {3.6297831098551064`*^9, 3.629783142786764*^9}, {3.629783433711675*^9, 3.629783442619291*^9}, { 3.6297834942397814`*^9, 3.6297835175930223`*^9}, 3.6297835794939313`*^9, { 3.6297836160291953`*^9, 3.6297837668970604`*^9}, {3.6297842042438283`*^9, 3.6297842697483435`*^9}, {3.6297843514456873`*^9, 3.629784370742921*^9}, { 3.629784443829049*^9, 3.6297844678842916`*^9}, {3.6297845252611923`*^9, 3.629784525588793*^9}, {3.6297846136821475`*^9, 3.629784629235375*^9}, { 3.629784814797701*^9, 3.629784927648299*^9}, {3.629785259960083*^9, 3.6297852602096834`*^9}, {3.6297858780175686`*^9, 3.629785917282837*^9}, { 3.629786048057867*^9, 3.629786048681868*^9}, 3.6297863278755584`*^9, { 3.6297867047133856`*^9, 3.629786748533863*^9}, {3.6297867791567163`*^9, 3.6297868491540394`*^9}, {3.6297875320748396`*^9, 3.629787569795706*^9}, { 3.6297876247234025`*^9, 3.6297877281983843`*^9}, {3.6297877681812544`*^9, 3.629787774015665*^9}, {3.629787831408166*^9, 3.6297878355265727`*^9}, { 3.6297878775686464`*^9, 3.6297878861174617`*^9}, {3.6297879185343184`*^9, 3.629787919064719*^9}, {3.6297880043032694`*^9, 3.62978800470887*^9}, 3.6297880488257475`*^9, {3.6297882100052304`*^9, 3.6297882174776435`*^9}, { 3.6297882697533355`*^9, 3.6297882948381796`*^9}, {3.6297883467550707`*^9, 3.6297883991087627`*^9}, {3.6297887361785545`*^9, 3.629788783961438*^9}, 3.629788825395111*^9, {3.629789006152629*^9, 3.6297890321266747`*^9}, { 3.6297891133248167`*^9, 3.629789145336073*^9}, {3.6297891926821566`*^9, 3.629789194257759*^9}, {3.629789255316266*^9, 3.6297892556282673`*^9}, { 3.629869102295367*^9, 3.629869160124668*^9}, {3.6298691942887287`*^9, 3.6298696149902673`*^9}, {3.6298696993864155`*^9, 3.62986975897852*^9}, { 3.6298698387726603`*^9, 3.629869912030389*^9}, {3.6298700722270703`*^9, 3.629870234560955*^9}, {3.629870580429163*^9, 3.629870630458451*^9}, { 3.630556081081209*^9, 3.630556104902451*^9}, {3.6305562643503313`*^9, 3.6305562763935523`*^9}, {3.6305563415080667`*^9, 3.630556480956712*^9}, { 3.630556692851884*^9, 3.630556695347888*^9}, {3.630556730042349*^9, 3.630556914528273*^9}, {3.6305653725974936`*^9, 3.6305656807121167`*^9}, { 3.630565758760581*^9, 3.6305657739024467`*^9}, {3.630565858170267*^9, 3.63056596644846*^9}, {3.6305661502619734`*^9, 3.6305661523230915`*^9}, { 3.6305662653385553`*^9, 3.630566370352562*^9}, {3.6305667786019125`*^9, 3.630566790535595*^9}, {3.6305668214773645`*^9, 3.630567044691132*^9}, { 3.6305670772499943`*^9, 3.6305670783710585`*^9}, 3.630567272031135*^9, { 3.630567303902958*^9, 3.630567409875019*^9}, {3.630568671196477*^9, 3.6305687195002403`*^9}, {3.6305687542132254`*^9, 3.630568758623478*^9}, { 3.630568855671028*^9, 3.630568859250233*^9}, {3.630569706514694*^9, 3.630569775526641*^9}, 3.630569982346471*^9, {3.6305701679130845`*^9, 3.630570205199217*^9}, {3.6305703751399374`*^9, 3.630570526177576*^9}, { 3.630587657039589*^9, 3.630587688367381*^9}, {3.6305880733027773`*^9, 3.6305883365376396`*^9}, {3.6305886689118233`*^9, 3.6305886717978287`*^9}, 3.6305889776831656`*^9, {3.6305890389444733`*^9, 3.6305890437180815`*^9}, { 3.630589093248169*^9, 3.6305891296430326`*^9}, 3.630589181700324*^9, { 3.6305892509956455`*^9, 3.6305892594820604`*^9}, {3.630589318949365*^9, 3.6305893334729905`*^9}, {3.630589630294712*^9, 3.6305896376267247`*^9}, { 3.630589683288005*^9, 3.630589684988408*^9}, {3.630597310538067*^9, 3.630597340080757*^9}, {3.630597391446695*^9, 3.630597400596218*^9}, { 3.6305974350611897`*^9, 3.6305974605306463`*^9}, {3.630633997622449*^9, 3.630634003125764*^9}, {3.630659322217756*^9, 3.63065932438616*^9}, { 3.6306611578252783`*^9, 3.6306611625988865`*^9}, {3.6306612541554475`*^9, 3.630661257587454*^9}, {3.6306613001287284`*^9, 3.6306613026715326`*^9}, { 3.6306613920752897`*^9, 3.6306613949768953`*^9}, {3.6306706377509866`*^9, 3.630670654957817*^9}, {3.6306749981919994`*^9, 3.630675005793434*^9}, { 3.6306751229631357`*^9, 3.630675150017683*^9}, {3.6306752035287437`*^9, 3.6306752096180925`*^9}, {3.630675315921172*^9, 3.6306753201514144`*^9}, { 3.6306757793287754`*^9, 3.6306757796257925`*^9}, {3.630675814406262*^9, 3.6306758147026625`*^9}, {3.6306760107574763`*^9, 3.6306760154417443`*^9}, {3.6306789722320743`*^9, 3.6306789870309205`*^9}, {3.6306790257051325`*^9, 3.630679028076268*^9}, { 3.6306800259177256`*^9, 3.6306800406129513`*^9}, {3.6306801239326982`*^9, 3.6306801300167084`*^9}, {3.630680769261832*^9, 3.6306807806186523`*^9}, { 3.630681157468514*^9, 3.6306811577649145`*^9}, {3.6306812744219193`*^9, 3.63068127471832*^9}, {3.6306817187418995`*^9, 3.6306817919060287`*^9}, { 3.630681879188182*^9, 3.6306819111526375`*^9}, {3.6306821191790032`*^9, 3.6306821283050194`*^9}, {3.630720543651497*^9, 3.6307205534300566`*^9}, { 3.630721035525631*^9, 3.630721092774905*^9}, {3.6307212510439577`*^9, 3.6307213064777765`*^9}, {3.6307477437169704`*^9, 3.6307478284095197`*^9}, {3.6307478614971776`*^9, 3.6307478785948076`*^9}, {3.6307479884814005`*^9, 3.630748002880226*^9}, { 3.630748045624301*^9, 3.630748063876333*^9}, {3.630748111596817*^9, 3.6307481498324842`*^9}, {3.6307489182430334`*^9, 3.6307489447786803`*^9}, {3.630749037427243*^9, 3.6307490443848553`*^9}, { 3.6307491041485605`*^9, 3.6307491384218206`*^9}, {3.6307491914151134`*^9, 3.630749196890723*^9}, {3.6307492445800066`*^9, 3.6307493439989815`*^9}, { 3.630749396212273*^9, 3.6307494766304145`*^9}, {3.6307495333989143`*^9, 3.6307495547241516`*^9}, {3.6307496525831237`*^9, 3.630749669571553*^9}, { 3.630750220602922*^9, 3.6307502881822405`*^9}, {3.6307510631916018`*^9, 3.630751068292811*^9}, {3.6307511226589065`*^9, 3.630751137962533*^9}, { 3.6307512555243397`*^9, 3.630751282777588*^9}, {3.630752266971757*^9, 3.630752414599744*^9}, {3.630752446407563*^9, 3.630752457388191*^9}, { 3.6307589380050273`*^9, 3.6307590266300964`*^9}, {3.6307591666721067`*^9, 3.63075923229886*^9}, 3.630760288282259*^9, {3.6307603547370596`*^9, 3.630760557414652*^9}, {3.630760654134184*^9, 3.63076065510824*^9}, { 3.6307606911683025`*^9, 3.6307606919283457`*^9}, {3.6307607642334814`*^9, 3.6307607648645177`*^9}, {3.630761455000991*^9, 3.6307614616743727`*^9}, { 3.630761507825012*^9, 3.630761605776615*^9}, {3.630761652999316*^9, 3.630761695865768*^9}, {3.630761771278081*^9, 3.6307617792215357`*^9}, 3.6307629478424797`*^9, {3.632205207880766*^9, 3.6322052561155243`*^9}, { 3.6322052892474194`*^9, 3.6322052915745525`*^9}, 3.6322053746993074`*^9, { 3.6322062705415463`*^9, 3.6322062726016645`*^9}, {3.6322063396935015`*^9, 3.63220636484194*^9}, {3.6322064410612993`*^9, 3.6322064491667633`*^9}, { 3.632206580308264*^9, 3.6322066373275256`*^9}, {3.6322066736436024`*^9, 3.6322067467737856`*^9}, {3.632206782260815*^9, 3.6322071351279984`*^9}, 3.6322071989226465`*^9, {3.632207270393735*^9, 3.6322073359894867`*^9}, { 3.6322073997741346`*^9, 3.6322074126708727`*^9}, {3.632207491777397*^9, 3.632207682289294*^9}, {3.632207809621577*^9, 3.632207827973626*^9}, { 3.6322079043859973`*^9, 3.6322079279443445`*^9}, {3.6322080916397076`*^9, 3.6322081666649985`*^9}, 3.634905258940913*^9, {3.634905370524296*^9, 3.6349054089004903`*^9}, {3.6349054472556844`*^9, 3.63490544787272*^9}, { 3.634905483492757*^9, 3.6349055164646425`*^9}, {3.634905574352954*^9, 3.634905628121029*^9}, {3.6349057012822137`*^9, 3.6349057207913294`*^9}, { 3.6349061371061416`*^9, 3.634906354438572*^9}, {3.6349063890455513`*^9, 3.6349064369332905`*^9}, {3.634906537696054*^9, 3.634906601859724*^9}, 3.634906706128688*^9, {3.6349069249442034`*^9, 3.6349069328326545`*^9}, { 3.6349070151973653`*^9, 3.6349070242298822`*^9}, {3.6349070817921743`*^9, 3.6349070822111983`*^9}, {3.634907723288866*^9, 3.634907739005765*^9}, { 3.6349079580732946`*^9, 3.6349079868219395`*^9}, {3.634908200284148*^9, 3.634908315195721*^9}, {3.6349083774582825`*^9, 3.6349084027997313`*^9}, { 3.63490844507615*^9, 3.634908448843365*^9}, {3.634914956333157*^9, 3.634915020054802*^9}, {3.634915050572547*^9, 3.6349150956171236`*^9}, { 3.6349539785771523`*^9, 3.634953978975175*^9}, {3.6349540728785458`*^9, 3.6349541681829967`*^9}, {3.634954211263461*^9, 3.6349542495746527`*^9}, { 3.6349543251259737`*^9, 3.634954355882733*^9}, {3.6349543892536416`*^9, 3.6349544742835045`*^9}, {3.634954547519694*^9, 3.6349545640246377`*^9}, { 3.6349547051657104`*^9, 3.6349547107930326`*^9}, {3.634954745355009*^9, 3.634954752101395*^9}, {3.6349547948858423`*^9, 3.6349548053894434`*^9}, { 3.634954904907135*^9, 3.6349549451084347`*^9}, {3.634955219605135*^9, 3.6349552640926795`*^9}, {3.634955320189888*^9, 3.634955348763522*^9}, { 3.634955386393675*^9, 3.6349555039273973`*^9}, {3.6349557669644423`*^9, 3.6349557672004557`*^9}, {3.634955894841756*^9, 3.634955902578199*^9}, { 3.6349559513739896`*^9, 3.6349560216320086`*^9}, {3.634956120144643*^9, 3.634956128996149*^9}, {3.6349561700724983`*^9, 3.6349561978900895`*^9}, { 3.6349562480719595`*^9, 3.634956254326318*^9}, {3.634956331684742*^9, 3.6349563460575643`*^9}, {3.634956379242462*^9, 3.63495642676418*^9}, 3.6349564696636343`*^9, {3.6351524116477795`*^9, 3.6351524153379908`*^9}, { 3.6352134400282927`*^9, 3.635213442148414*^9}, {3.6352134745862694`*^9, 3.635213495869487*^9}, {3.6352135383409157`*^9, 3.6352137157160616`*^9}, { 3.6352137493569856`*^9, 3.635213764522853*^9}, {3.635214215036621*^9, 3.635214227593339*^9}, {3.635214407257615*^9, 3.63521441713218*^9}, { 3.635215297101512*^9, 3.635215303964904*^9}, {3.6352154111120324`*^9, 3.635215431504199*^9}, {3.635216346055508*^9, 3.635216494371991*^9}, { 3.635216631050809*^9, 3.6352166603244834`*^9}, {3.635216763034358*^9, 3.635216764164423*^9}, {3.6352168771938877`*^9, 3.635216888828553*^9}, 3.6352169832479534`*^9, 3.635217037668066*^9, {3.6352172024924936`*^9, 3.6352172054526625`*^9}, {3.635217344025589*^9, 3.635217346898753*^9}, 3.6352173863770113`*^9, {3.635217519639633*^9, 3.6352175507014103`*^9}, 3.635217615445113*^9, {3.6352178715087595`*^9, 3.635217880460271*^9}, { 3.6352185912849283`*^9, 3.635218598444338*^9}, {3.6352186995721216`*^9, 3.635218714955002*^9}, {3.6352189761749425`*^9, 3.6352189789341*^9}, { 3.6352195060322485`*^9, 3.635219509972474*^9}, 3.6352195673477554`*^9, 3.6352195994635925`*^9, {3.6352197336482677`*^9, 3.635219737452485*^9}, { 3.6352197706093817`*^9, 3.6352197723214793`*^9}, {3.635219941784172*^9, 3.6352199485115566`*^9}, {3.6352200714185867`*^9, 3.6352200854323883`*^9}, {3.6352202085694313`*^9, 3.635220235849992*^9}, { 3.6352202816336107`*^9, 3.6352203110962954`*^9}, {3.6352204980449886`*^9, 3.6352205276526823`*^9}, {3.6352253191447396`*^9, 3.6352253299913597`*^9}, {3.6352253611111403`*^9, 3.6352253637572913`*^9}, {3.635225409322898*^9, 3.6352255965196047`*^9}, { 3.6352260914249115`*^9, 3.6352261698393965`*^9}, {3.63522638233055*^9, 3.6352264188036366`*^9}, {3.635227493469104*^9, 3.635227556935734*^9}, { 3.6352276745764627`*^9, 3.635227730116639*^9}, {3.6352287979917183`*^9, 3.6352288587651944`*^9}, {3.635228894237223*^9, 3.635228948324317*^9}, { 3.635229365252164*^9, 3.6352293902275925`*^9}, {3.63522947690555*^9, 3.6352294807837715`*^9}, {3.6352492831123204`*^9, 3.6352492983621926`*^9}, 3.6356569054520617`*^9, {3.6363778004499054`*^9, 3.636377802787039*^9}, { 3.6363778414932528`*^9, 3.6363778525308843`*^9}, {3.636384436335312*^9, 3.6363846409950175`*^9}, {3.636384971250907*^9, 3.6363849738080535`*^9}, { 3.6363850170465264`*^9, 3.636385030729309*^9}, {3.6363851286779118`*^9, 3.636385138359465*^9}, {3.6363851699712734`*^9, 3.636385223111313*^9}, { 3.656076172452749*^9, 3.656076182171566*^9}, {3.6560765578514256`*^9, 3.656076619019133*^9}, 3.6560772545486493`*^9, {3.6630719749029694`*^9, 3.6630719878027077`*^9}, {3.6630720702554235`*^9, 3.6630720807290225`*^9}, {3.6630721155740156`*^9, 3.6630721713712068`*^9}, {3.663072270834896*^9, 3.6630722882218904`*^9}, 3.6630724099968557`*^9, {3.685234767958906*^9, 3.685234768480936*^9}, { 3.685252204033695*^9, 3.6852522340537376`*^9}, {3.6852522757137957`*^9, 3.6852523115138454`*^9}, {3.68525376314359*^9, 3.6852537725041256`*^9}, { 3.6852539763277836`*^9, 3.6852539861693463`*^9}, 3.6852540682470407`*^9, 3.6852541660656357`*^9, {3.6852604801645336`*^9, 3.6852605060345697`*^9}, { 3.6852605373446136`*^9, 3.6852605977846985`*^9}, 3.685260655254779*^9, { 3.6853280002218475`*^9, 3.685328019561875*^9}, 3.685328064721938*^9, { 3.6853280953119807`*^9, 3.6853282636022167`*^9}, {3.685328356242346*^9, 3.685328598671985*^9}, {3.6853286682069626`*^9, 3.6853287982524004`*^9}, { 3.6853288753368096`*^9, 3.6853289367033195`*^9}, {3.685328968274125*^9, 3.685328978713722*^9}, {3.685329033941881*^9, 3.685329044950511*^9}, { 3.685329173522865*^9, 3.6853294420842257`*^9}, {3.6853296024223967`*^9, 3.6853296124319687`*^9}, {3.6853297221712456`*^9, 3.685329733349885*^9}, { 3.6853298076291337`*^9, 3.6853298739599276`*^9}, {3.685330038474337*^9, 3.685330051652091*^9}, {3.6853311309428225`*^9, 3.685331168378964*^9}, { 3.685340142134763*^9, 3.685340180544817*^9}, {3.6853583292043543`*^9, 3.685358334834362*^9}, {3.685358366084406*^9, 3.685358366954407*^9}, { 3.685358408404465*^9, 3.685358518294619*^9}, 3.685358620174762*^9, 3.6853586578748145`*^9, {3.6853588750151186`*^9, 3.6853588857151337`*^9}, { 3.6853589302051954`*^9, 3.685358938995208*^9}, {3.685359014715314*^9, 3.6853590296653347`*^9}, 3.685359148315501*^9, 3.6853598281764526`*^9, { 3.6853683109000263`*^9, 3.685368382250126*^9}, {3.685368420160179*^9, 3.6853684704302497`*^9}, {3.6853685194503183`*^9, 3.685368742860631*^9}, { 3.685369008901004*^9, 3.68536902061102*^9}, {3.6853690791611023`*^9, 3.685369132301176*^9}, {3.6853693219914417`*^9, 3.6853693304114532`*^9}, 3.6853696089118433`*^9, {3.6858758911429157`*^9, 3.685875951793*^9}, { 3.6859484099082212`*^9, 3.6859484970032024`*^9}, {3.686052829875022*^9, 3.686052906242383*^9}, {3.6860535326822133`*^9, 3.686053598029951*^9}, { 3.68605365168902*^9, 3.6860541446091995`*^9}, {3.6860541846064873`*^9, 3.68605440393201*^9}, {3.686054713802734*^9, 3.6860547858298535`*^9}, { 3.6860548280202665`*^9, 3.686054837219793*^9}, {3.686054874127904*^9, 3.686054892139934*^9}, {3.686055136014883*^9, 3.6860551460584574`*^9}, { 3.686055211281188*^9, 3.6860552301962633`*^9}, {3.6860553465409174`*^9, 3.6860553998749685`*^9}, {3.6860556017188663`*^9, 3.6860556050188704`*^9}, {3.6862923512707715`*^9, 3.686292363600789*^9}, { 3.686292409650853*^9, 3.6862924109708548`*^9}, {3.6862924536109147`*^9, 3.6862924596309233`*^9}, {3.686292542221039*^9, 3.6862925430110397`*^9}, { 3.686292988803664*^9, 3.686293001033681*^9}, {3.6866504529025555`*^9, 3.686650526682659*^9}, {3.686650671852862*^9, 3.6866507242929354`*^9}, { 3.6866507657529936`*^9, 3.6866507887630253`*^9}, {3.6866508208230705`*^9, 3.6866509100531955`*^9}, {3.6866509593932643`*^9, 3.686650971113281*^9}, { 3.686651007793332*^9, 3.6866511595335445`*^9}, {3.686651223513634*^9, 3.686651234033649*^9}, {3.686651304763748*^9, 3.6866513363837924`*^9}, { 3.6866514102038956`*^9, 3.686651429943923*^9}, {3.686652993837468*^9, 3.6866530046274834`*^9}, {3.686804398511652*^9, 3.6868044081516657`*^9}, { 3.6868046315619783`*^9, 3.686804631801979*^9}, {3.686804685872054*^9, 3.686804707092084*^9}, {3.6868047382021275`*^9, 3.686804767812169*^9}, { 3.686804824012248*^9, 3.6868048404922705`*^9}, {3.686804942142413*^9, 3.6868049633424425`*^9}, {3.6868050765526013`*^9, 3.686805101092636*^9}, { 3.6868051463526993`*^9, 3.6868052234228067`*^9}, {3.686805307602925*^9, 3.686805311682931*^9}, {3.68680577547358*^9, 3.686805788923599*^9}, { 3.686821702197342*^9, 3.6868217282873783`*^9}, {3.6868225192884855`*^9, 3.686822538368512*^9}, {3.6868226306886415`*^9, 3.6868226683086944`*^9}, { 3.6868227318887835`*^9, 3.6868227627088265`*^9}, {3.686822801638881*^9, 3.6868230490692277`*^9}, {3.686823122979331*^9, 3.6868231833294153`*^9}, { 3.6868232450595016`*^9, 3.6868233753996844`*^9}, {3.6868234153897405`*^9, 3.686823451379791*^9}, {3.6868236736101017`*^9, 3.6868236786601086`*^9}, { 3.6868237164601617`*^9, 3.68682375072021*^9}, {3.68682389396041*^9, 3.68682390087042*^9}, {3.686823940790476*^9, 3.6868239416904774`*^9}, { 3.6868239808805323`*^9, 3.6868239872905407`*^9}, {3.686824051540631*^9, 3.6868240519006314`*^9}, {3.686824360861064*^9, 3.6868243761510854`*^9}, { 3.6868245440213203`*^9, 3.686824577221367*^9}, {3.686824685841519*^9, 3.6868246979115357`*^9}, 3.6868248012716804`*^9, 3.6868253582724605`*^9, { 3.6868255183026843`*^9, 3.686825518932685*^9}, {3.6868264466639843`*^9, 3.6868264497139883`*^9}, {3.6868267792744493`*^9, 3.6868268152945004`*^9}, {3.686827100164899*^9, 3.6868271210549283`*^9}, 3.686827162004986*^9, {3.6868272414950967`*^9, 3.686827327475217*^9}, { 3.686827953126093*^9, 3.686827976506126*^9}, {3.686829128577739*^9, 3.686829138957753*^9}, 3.6868292410978966`*^9, {3.6868292768379464`*^9, 3.686829282727955*^9}, {3.6868293820380936`*^9, 3.686829418138144*^9}, { 3.686829846748744*^9, 3.686829848298746*^9}, {3.6868313063207874`*^9, 3.686831307180789*^9}, {3.6868331276633377`*^9, 3.68683328653356*^9}, { 3.6868394697195063`*^9, 3.6868394933895392`*^9}, 3.686839530999592*^9, { 3.686839582829664*^9, 3.68683963686974*^9}, {3.6868397551199055`*^9, 3.68683979365996*^9}, {3.6868398344600167`*^9, 3.686839866200061*^9}, { 3.687092084401948*^9, 3.687092117031994*^9}, {3.6870922598621936`*^9, 3.6870922645422*^9}, {3.6870962086478376`*^9, 3.6870962658779182`*^9}, 3.687096444838168*^9, {3.687096500978247*^9, 3.687096501638248*^9}, { 3.6870965809883595`*^9, 3.687096592708376*^9}, 3.687096837948719*^9, { 3.68709688890879*^9, 3.687096985798926*^9}, {3.6870971015990877`*^9, 3.6870972179192505`*^9}, {3.6870972618993125`*^9, 3.687097305639374*^9}, { 3.6870973356794157`*^9, 3.6870975186496716`*^9}, {3.6870975796097574`*^9, 3.6870975953197794`*^9}, {3.6870976531898603`*^9, 3.6870976848899045`*^9}, 3.6870977782500353`*^9, {3.687413757687042*^9, 3.6874137834070783`*^9}, { 3.6874140542074575`*^9, 3.687414094417514*^9}, {3.6874143478878684`*^9, 3.687414485538061*^9}, {3.6874146116082373`*^9, 3.68741464894829*^9}, { 3.6874147451084247`*^9, 3.687414766118454*^9}, 3.6874149094486547`*^9, { 3.6874150416688395`*^9, 3.6874150634888706`*^9}, {3.6874152437091227`*^9, 3.687415268869158*^9}, 3.6874153442892637`*^9, {3.687415449879411*^9, 3.687415469659439*^9}, 3.687415529739523*^9, 3.687415564789572*^9, 3.687415645529685*^9, {3.6874168016913037`*^9, 3.687416803441306*^9}, { 3.687421022677213*^9, 3.6874212686075573`*^9}, {3.68742948209425*^9, 3.6874294906842623`*^9}, {3.687844340668378*^9, 3.6878443698084188`*^9}, { 3.6886534778571014`*^9, 3.6886534911571198`*^9}, {3.688906380162199*^9, 3.6889064680223217`*^9}, {3.688906514222396*^9, 3.6889065193925257`*^9}, { 3.688908192623024*^9, 3.6889082006430354`*^9}, {3.688908261823121*^9, 3.688908271653135*^9}, {3.6889083776232834`*^9, 3.6889083922733035`*^9}, { 3.688908466073407*^9, 3.6889084993734536`*^9}, 3.688908533623502*^9, { 3.688908616683618*^9, 3.6889086271336327`*^9}, {3.6889086885637183`*^9, 3.6889087063437433`*^9}, {3.6889091647443852`*^9, 3.6889092012544365`*^9}, {3.6889093019045773`*^9, 3.6889093406746316`*^9}, 3.6889101071957045`*^9, {3.689905940063133*^9, 3.689905972983179*^9}, { 3.692530981927737*^9, 3.6925310416778207`*^9}, {3.692531099797902*^9, 3.6925311384779563`*^9}, {3.692531192258032*^9, 3.692531244668105*^9}, { 3.6925312919881716`*^9, 3.692531425418358*^9}, {3.6925315270885005`*^9, 3.692531643928664*^9}, {3.692535489534048*^9, 3.6925356485142703`*^9}, { 3.692535753564418*^9, 3.6925357992544813`*^9}, {3.6925358831745987`*^9, 3.692535899604622*^9}, {3.692536042584822*^9, 3.692536159384986*^9}, { 3.6925366121156197`*^9, 3.6925366207256317`*^9}, {3.6925367265057793`*^9, 3.69253672683578*^9}, {3.6925368590559654`*^9, 3.6925368636559715`*^9}, { 3.6925370880062857`*^9, 3.692537177856412*^9}, {3.692537322456614*^9, 3.6925373869767046`*^9}, {3.6925390913352747`*^9, 3.6925390925252767`*^9}, {3.692539644430175*^9, 3.6925396711502123`*^9}, { 3.692539727510291*^9, 3.692539730440295*^9}, {3.69253993367058*^9, 3.692539963780622*^9}, {3.6925400018406754`*^9, 3.692540003630678*^9}, { 3.6925401743409166`*^9, 3.6925401747509174`*^9}, {3.692540399111232*^9, 3.692540407981244*^9}, {3.69254047647134*^9, 3.6925404886113567`*^9}, { 3.6925406039715185`*^9, 3.69254060531152*^9}, {3.6925414948727655`*^9, 3.6925414953427663`*^9}, {3.6925415478528395`*^9, 3.692541613062931*^9}, 3.692541649332982*^9, {3.692541727633092*^9, 3.6925418840133104`*^9}, { 3.692541924473367*^9, 3.692542041693531*^9}, {3.6925421488836813`*^9, 3.6925422549438295`*^9}, {3.6925422976938896`*^9, 3.692542521444203*^9}, { 3.6925426221843443`*^9, 3.6925426357343626`*^9}, 3.692542739374508*^9, 3.692599799510878*^9, {3.692599834884901*^9, 3.6925998954663663`*^9}, { 3.692599925635092*^9, 3.6926000095928946`*^9}, {3.692600108929576*^9, 3.6926001456386757`*^9}, {3.6926001874800687`*^9, 3.692600454421337*^9}, { 3.692600503149027*^9, 3.6926006000391626`*^9}, {3.692600680251275*^9, 3.6926006814012766`*^9}, {3.6926009000215826`*^9, 3.6926009410816402`*^9}, 3.692601280532116*^9, {3.6926044914726114`*^9, 3.69260449774262*^9}, 3.6926045660127153`*^9, 3.6926046690228596`*^9, {3.69296647863291*^9, 3.6929664798829117`*^9}, {3.6929665643330297`*^9, 3.6929666141830997`*^9}, {3.6929670390036945`*^9, 3.6929670405536966`*^9}, {3.6929670861037607`*^9, 3.6929670952937737`*^9}, {3.6929671302538223`*^9, 3.6929671549438567`*^9}, {3.6929671904739065`*^9, 3.69296722137395*^9}, { 3.6929672596240034`*^9, 3.6929673352541094`*^9}, 3.6929678909232683`*^9, { 3.6930146982034283`*^9, 3.693014722713463*^9}, {3.6930148540136466`*^9, 3.693014857023651*^9}, {3.6930148913836985`*^9, 3.693014894823704*^9}, { 3.693014930903754*^9, 3.6930151942541227`*^9}, {3.693015247824198*^9, 3.693015430554454*^9}, {3.693015673794794*^9, 3.69301579223496*^9}, { 3.6930163123576884`*^9, 3.693016326897709*^9}, {3.6930164225678425`*^9, 3.693016429727853*^9}, {3.693016686718212*^9, 3.693016698128228*^9}, { 3.693016737038283*^9, 3.693016755068308*^9}, {3.6930168429225607`*^9, 3.6930168719926014`*^9}, {3.6930172049430676`*^9, 3.693017284063178*^9}, { 3.693017336433252*^9, 3.6930173662532935`*^9}, {3.6930180949163136`*^9, 3.6930180975563173`*^9}, {3.6930181870764427`*^9, 3.693018199956461*^9}, { 3.6930182954065943`*^9, 3.693018305996609*^9}, {3.693139886141657*^9, 3.6931399045016823`*^9}, {3.6931402916003532`*^9, 3.693140295770359*^9}, { 3.693140426020541*^9, 3.693140426530542*^9}, {3.6931410492237864`*^9, 3.6931410888738413`*^9}, {3.6931411194438844`*^9, 3.693141126553894*^9}, { 3.693141412004294*^9, 3.693141454164353*^9}, {3.6931415979955544`*^9, 3.6931417931758275`*^9}, {3.6932199559445915`*^9, 3.6932199772046213`*^9}, {3.6932201435748544`*^9, 3.693220170284892*^9}, { 3.693220713855653*^9, 3.693220721825664*^9}, {3.693625124589745*^9, 3.693625153729786*^9}, {3.6940907995669713`*^9, 3.6940909688872085`*^9}, { 3.6940913675677667`*^9, 3.6940914223978434`*^9}, {3.694091508037963*^9, 3.694091572118053*^9}, 3.694092009628666*^9, {3.6940920553287296`*^9, 3.694092229168973*^9}, {3.6940923053990793`*^9, 3.694092374419176*^9}, { 3.6940924537392874`*^9, 3.694092457789293*^9}, 3.694092642849552*^9, { 3.6940928573598523`*^9, 3.694092862379859*^9}, {3.6940945886222763`*^9, 3.694094601932295*^9}, 3.694094849542641*^9, {3.694095764293922*^9, 3.6940957644739223`*^9}, {3.6940960602743363`*^9, 3.6940960732243547`*^9}, {3.6940961211044216`*^9, 3.694096124194426*^9}, { 3.694665030960044*^9, 3.6946650634500895`*^9}, {3.6946652071402903`*^9, 3.6946653490404887`*^9}, {3.6946658702212186`*^9, 3.6946658881212435`*^9}, {3.694665923041292*^9, 3.694665953561335*^9}, { 3.694665995981395*^9, 3.6946660149414215`*^9}, {3.694666050571471*^9, 3.6946660547214766`*^9}, {3.694666169991638*^9, 3.694666292151809*^9}, { 3.6946663456618843`*^9, 3.6946663943919525`*^9}, 3.6946667526224537`*^9, 3.69466680700253*^9, 3.694687076625702*^9, {3.6946874316161985`*^9, 3.6946874621962414`*^9}, 3.694687499496294*^9, {3.694687567516389*^9, 3.694687642816495*^9}, {3.694687679006545*^9, 3.6946877198966026`*^9}, { 3.6946877714966745`*^9, 3.694687931746899*^9}, {3.723798739728607*^9, 3.723798744014243*^9}, {3.7237990126446104`*^9, 3.723799023974499*^9}, { 3.7244116671877546`*^9, 3.7244116733393917`*^9}, {3.724411761793063*^9, 3.7244117718753977`*^9}, {3.724411928386671*^9, 3.7244119682966137`*^9}, { 3.724412131847311*^9, 3.724412188341254*^9}, {3.729414981357122*^9, 3.7294149861075096`*^9}, {3.749817651293678*^9, 3.749817653108206*^9}, { 3.7498176831919456`*^9, 3.7498176846222315`*^9}, 3.7498177601545563`*^9, { 3.749817859674735*^9, 3.749817861044999*^9}, {3.7498179561547127`*^9, 3.749817964489929*^9}, {3.749818149334386*^9, 3.749818237397959*^9}, 3.749818617867873*^9, {3.7505621848002787`*^9, 3.7505622174085107`*^9}, { 3.75056238761455*^9, 3.750562431347901*^9}, {3.7505626332829456`*^9, 3.7505627331565337`*^9}, {3.7505627632642183`*^9, 3.7505627635859113`*^9}, {3.7515359581577415`*^9, 3.7515359614850826`*^9}, {3.751536071974715*^9, 3.7515360961721487`*^9}, 3.7515362040373974`*^9, {3.751536256080162*^9, 3.7515365099108534`*^9}, { 3.751549231137398*^9, 3.7515493334258356`*^9}, {3.7515496891619573`*^9, 3.751549689458767*^9}, 3.753020403650548*^9, {3.7530205114189386`*^9, 3.753020525224822*^9}, {3.753021995594639*^9, 3.753022011512741*^9}, { 3.760634689749445*^9, 3.7606348247488756`*^9}, {3.7606349119783344`*^9, 3.7606349350197754`*^9}, {3.76063496856853*^9, 3.7606349922504683`*^9}, { 3.760667269592998*^9, 3.760667271545692*^9}, 3.7606679283912125`*^9, 3.760668039709257*^9, {3.763302716900259*^9, 3.763302749083943*^9}, { 3.763304867499642*^9, 3.7633048681948185`*^9}, {3.763337978730939*^9, 3.763338014197137*^9}, {3.763338054806819*^9, 3.7633381289118147`*^9}, { 3.763338224472745*^9, 3.7633382447254143`*^9}, 3.763338501519575*^9, { 3.7633387342733064`*^9, 3.763338775483101*^9}, {3.7633388525735607`*^9, 3.7633390131554184`*^9}, {3.763360596353942*^9, 3.7633606328922167`*^9}, { 3.7633606638773637`*^9, 3.763360724941125*^9}, {3.763360812068123*^9, 3.763360863571327*^9}, {3.763361217769263*^9, 3.763361243271195*^9}, { 3.763361578316657*^9, 3.7633615820345063`*^9}, {3.763362291476118*^9, 3.763362301380039*^9}, {3.763362505004878*^9, 3.763362606421646*^9}, { 3.763362742167684*^9, 3.7633627524126663`*^9}, {3.7633628090243473`*^9, 3.763362931819517*^9}, {3.763363167452371*^9, 3.7633631784968414`*^9}, { 3.7633632517661986`*^9, 3.7633633364892464`*^9}, 3.763363375651574*^9, { 3.7633634067692766`*^9, 3.7633634260616302`*^9}, 3.7740707523990946`*^9, { 3.7740707829932833`*^9, 3.7740707878092556`*^9}, {3.7740708390374384`*^9, 3.7740708397395124`*^9}, {3.783227748950984*^9, 3.7832277492008963`*^9}, { 3.783227785707693*^9, 3.7832278143641577`*^9}, {3.7832278856705203`*^9, 3.7832279652392664`*^9}, {3.7832285261117268`*^9, 3.7832285921982536`*^9}, {3.783228737502862*^9, 3.78322877106949*^9}, { 3.783228913503404*^9, 3.783228974160059*^9}, {3.7832316543548126`*^9, 3.783231867293047*^9}, {3.78324783313018*^9, 3.7832478882254915`*^9}, { 3.783247918659526*^9, 3.783247936428216*^9}, {3.783247974038493*^9, 3.783247982976531*^9}, {3.783313226071577*^9, 3.7833132588540363`*^9}, 3.783313524738693*^9, 3.783314136984562*^9, 3.7834872060638447`*^9, 3.7837554878717237`*^9, {3.7837555335024405`*^9, 3.783755772186054*^9}, { 3.7838247043960843`*^9, 3.7838247173728824`*^9}, {3.7838316560507956`*^9, 3.7838316617616296`*^9}, 3.783831747278124*^9, {3.7838318003068686`*^9, 3.783831865083964*^9}, {3.783832157749748*^9, 3.7838321754150395`*^9}, 3.7838360879476986`*^9, {3.7838361186647277`*^9, 3.7838361777821407`*^9}, 3.7838382113157587`*^9, {3.78790294596488*^9, 3.7879029543299*^9}, { 3.7879030013387113`*^9, 3.7879030724054327`*^9}, {3.788518535581091*^9, 3.7885185816698837`*^9}, 3.7885186656840887`*^9, {3.788518750049559*^9, 3.7885188089248676`*^9}, {3.7922858050278015`*^9, 3.792285809644437*^9}, { 3.7922858997988377`*^9, 3.7922859032607307`*^9}, {3.792285934988084*^9, 3.7922859387881565`*^9}, {3.792286145687361*^9, 3.792286169387656*^9}, { 3.792286200995656*^9, 3.792286297490285*^9}, {3.792286331275391*^9, 3.792286495725276*^9}, {3.7922865286612988`*^9, 3.7922866344845324`*^9}, 3.792286868323101*^9, {3.792287008797488*^9, 3.792287076398588*^9}, { 3.847260050156146*^9, 3.8472600520411935`*^9}, {3.8472600827470026`*^9, 3.847260083816955*^9}, {3.847260159371749*^9, 3.8472603245136585`*^9}, { 3.8472610396461535`*^9, 3.847261042450612*^9}}, CellLabel-> "In[139]:=",ExpressionUUID->"ce13df80-681c-4976-9bbc-0695ad8c1e09"] }, Open ]], Cell[CellGroupData[{ Cell["BEAM ELEMENT (evnt) defs", "Subsection", InitializationCell->True, CellChangeTimes->{{3.753018875511382*^9, 3.7530188786265306`*^9}, { 3.781589886623744*^9, 3.7815898932426767`*^9}, {3.7878947601549573`*^9, 3.787894760728943*^9}, 3.7878948945295725`*^9, {3.817439343565061*^9, 3.8174393448082724`*^9}, {3.817439544553817*^9, 3.8174395452236648`*^9}, 3.8431828716661205`*^9},ExpressionUUID->"ca6c0971-8260-4bb1-aed4-\ 43cf882f4a24"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNT", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781589928213842*^9, 3.781590052438653*^9}, { 3.7815900898176003`*^9, 3.781590109307678*^9}, {3.781590201383393*^9, 3.7815902433873234`*^9}, {3.7815905445265956`*^9, 3.781590569573782*^9}, { 3.7815906952864275`*^9, 3.781590715680611*^9}, {3.7815908323678637`*^9, 3.781590881239719*^9}, {3.7815911048122363`*^9, 3.781591119274813*^9}, { 3.817439386305109*^9, 3.8174394287787733`*^9}, {3.8174395552770724`*^9, 3.8174395603447847`*^9}, 3.817521302738725*^9, 3.8431828676201057`*^9}, CellLabel-> "In[146]:=",ExpressionUUID->"cf106cfb-02c3-458f-a432-09bbaa6702d5"] }, Closed]], Cell[CellGroupData[{ Cell["BEAM ELEMENT (vibr 0) defs ", "Subsection", CellChangeTimes->{{3.7530187996679964`*^9, 3.753018818586525*^9}, { 3.7650665335992107`*^9, 3.765066539129182*^9}, {3.7878948161443896`*^9, 3.787894878450323*^9}, 3.7885192008078794`*^9, {3.8200277665922365`*^9, 3.8200277671230316`*^9}},ExpressionUUID->"05313855-32eb-45b1-825b-\ 7f813b0b51be"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "fx", ",", "fy", ",", "fz", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx_", ",", "fy_", ",", "fz_", ",", "mx_", ",", "my_", ",", "mz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "fx", ",", "fy", ",", "fz", ",", "mx", ",", "my", ",", "mz"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx_", ",", "fy_", ",", "fz_", ",", "mx_", ",", "my_", ",", "mz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "h", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "ux", ",", "uy", " ", ",", "uz", " ", ",", "\[Theta]x", " ", ",", "\[Theta]y", " ", ",", "\[Theta]z", " ", ",", "\[Delta]ux", " ", ",", "\[Delta]uy", ",", "\[Delta]uz", ",", "\[Delta]\[Theta]x", ",", "\[Delta]\[Theta]y", ",", "\[Delta]\[Theta]z"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "mapping", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"h", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"-", FractionBox["1", RowBox[{"420", " ", SuperscriptBox["h", "3"]}]]}], RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "210"}], " ", "fx", " ", SuperscriptBox["h", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"AA", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"420", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"70", " ", RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"70", " ", RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}], "+", RowBox[{"156", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"156", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"156", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"156", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"22", " ", "h", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"13", " ", "h", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"13", " ", "h", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"22", " ", "h", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"22", " ", "h", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"13", " ", "h", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"13", " ", "h", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"22", " ", "h", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"22", " ", "h", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"13", " ", "h", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"13", " ", "h", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"22", " ", "h", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"22", " ", "h", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"13", " ", "h", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"13", " ", "h", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"22", " ", "h", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"7", " ", RowBox[{"(", RowBox[{ RowBox[{"720", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"5", " ", "fz", " ", SuperscriptBox["h", "5"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{"5", " ", "fy", " ", SuperscriptBox["h", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"360", " ", "EE", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"12", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], "-", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"5", " ", RowBox[{"(", RowBox[{ RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"2", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], "-", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"5", " ", RowBox[{"(", RowBox[{ RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"2", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"2", " ", SuperscriptBox["h", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"15", " ", "fz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"15", " ", "mx", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{"\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"5", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}]}], "+", RowBox[{"5", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"4", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"5", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}]}], "+", RowBox[{"5", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"4", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"6", " ", SuperscriptBox["h", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"10", " ", "mz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{"10", " ", "my", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}]}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}], "+", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}], "+", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"for", " ", "detailed", " ", "graphics"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", "iy0_", ",", RowBox[{"{", RowBox[{"yz_", ",", "obj_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", "iy0"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx", ",", "fy", ",", "fz", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4430689313272*^9, 3.4430690080792*^9}, { 3.4430690869528*^9, 3.4430691077320004`*^9}, {3.4430691700116*^9, 3.4430691708072*^9}, {3.4430692071717997`*^9, 3.443069246359*^9}, { 3.4430772782732*^9, 3.4430773623416*^9}, {3.4430773978316*^9, 3.4430774104676*^9}, {3.4430775053780003`*^9, 3.4430776180598*^9}, { 3.4434109099524*^9, 3.4434109159584*^9}, {3.4438800815346003`*^9, 3.4438802689304*^9}, {3.443880362624*^9, 3.4438803824516*^9}, { 3.443929565615374*^9, 3.443929570232974*^9}, {3.443935321321974*^9, 3.443935335705174*^9}, {3.443935419945174*^9, 3.443935421489574*^9}, { 3.443935494013974*^9, 3.443935494715974*^9}, {3.443935617565974*^9, 3.4439357217895737`*^9}, {3.443935755360774*^9, 3.443935816107174*^9}, { 3.443942155230774*^9, 3.443942209939974*^9}, {3.443942305710374*^9, 3.4439423142123737`*^9}, {3.4439442908131742`*^9, 3.443944441181574*^9}, { 3.4439447830065737`*^9, 3.4439447917425737`*^9}, {3.443944908541774*^9, 3.443944916060974*^9}, {3.4442731097938004`*^9, 3.4442731115254*^9}, { 3.444273189229*^9, 3.4442732700526*^9}, {3.4442748430004*^9, 3.4442748605036*^9}, {3.4442748977438*^9, 3.4442748989762*^9}, { 3.4442749340762*^9, 3.4442749351057997`*^9}, 3.4442752313382*^9, { 3.4442919702026*^9, 3.4442919911846*^9}, {3.4442921151577997`*^9, 3.4442921271074*^9}, {3.4443811023684*^9, 3.4443811036632*^9}, { 3.4443814073171997`*^9, 3.4443814402956*^9}, {3.4443815036316*^9, 3.4443815147855997`*^9}, {3.4443815537232*^9, 3.4443815747676*^9}, { 3.4443816138143997`*^9, 3.444381633174*^9}, {3.4443816850439997`*^9, 3.4443817801728*^9}, 3.4443853618688*^9, {3.4443855607376003`*^9, 3.4443856337924*^9}, {3.4443861200444*^9, 3.4443861523676*^9}, { 3.4443862280495996`*^9, 3.444386291448*^9}, {3.4443864047352*^9, 3.4443864135336*^9}, {3.4443870026832*^9, 3.4443870095316*^9}, { 3.4444082055056*^9, 3.4444082437412*^9}, {3.4444082797148*^9, 3.4444084583816*^9}, {3.4444084889108*^9, 3.4444085087539997`*^9}, { 3.444408942517*^9, 3.4444089563386*^9}, {3.4444091419564*^9, 3.4444091647167997`*^9}, {3.4444092206428003`*^9, 3.4444092944463997`*^9}, {3.4444093856284*^9, 3.4444094281071997`*^9}, { 3.4444094976988*^9, 3.4444095275104*^9}, {3.444409611064*^9, 3.4444096125772*^9}, 3.4444098504616003`*^9, {3.444409913392*^9, 3.4444099166056004`*^9}, 3.4444100178496*^9, {3.4444103063248*^9, 3.4444103358712*^9}, {3.4444103868208*^9, 3.4444104432460003`*^9}, { 3.4444921219564*^9, 3.4444921256224003`*^9}, {3.444492194824*^9, 3.4444921973668003`*^9}, {3.4444922814351997`*^9, 3.4444922853508*^9}, { 3.4444923330868*^9, 3.4444923345844*^9}, {3.444492366424*^9, 3.4444923855808*^9}, {3.4453153475226*^9, 3.445315360689*^9}, { 3.4465518166373653`*^9, 3.446551863016165*^9}, {3.446551894231765*^9, 3.446552159384965*^9}, {3.446552232377365*^9, 3.4465522555589647`*^9}, { 3.446553347388365*^9, 3.4465533616155653`*^9}, {3.4466058525769997`*^9, 3.4466058529046*^9}, {3.4466064371219997`*^9, 3.4466065097244*^9}, { 3.4466127725788*^9, 3.4466127766036*^9}, {3.4466128124835997`*^9, 3.4466130037864*^9}, {3.4466131532696*^9, 3.4466131761703997`*^9}, { 3.4466133992192*^9, 3.4466134478756*^9}, {3.446613483584*^9, 3.4466134932092*^9}, {3.4466135740952*^9, 3.4466135794927998`*^9}, { 3.4466137283948*^9, 3.4466137341356*^9}, {3.4466138994342003`*^9, 3.4466139023826*^9}, {3.4466139549858*^9, 3.4466139579653997`*^9}, { 3.4466142109818*^9, 3.4466142245226*^9}, {3.4466142793878*^9, 3.4466143652033997`*^9}, {3.4466144712834*^9, 3.4466145978929996`*^9}, { 3.4466146992618*^9, 3.4466147509914*^9}, {3.4466151283086*^9, 3.4466152768986*^9}, {3.4466153107506*^9, 3.4466153406558*^9}, { 3.4466194331976*^9, 3.4466194377528*^9}, {3.4466194847712*^9, 3.446619488718*^9}, {3.4466389495861998`*^9, 3.4466389768238*^9}, { 3.4466391218414*^9, 3.446639306561*^9}, {3.4466393990222*^9, 3.4466394004886*^9}, {3.4466394475694*^9, 3.4466394487706003`*^9}, { 3.4466395034174*^9, 3.4466395049462*^9}, 3.4466395515755997`*^9, { 3.4466396000176*^9, 3.4466396190808*^9}, {3.4466397459088*^9, 3.446639748826*^9}, {3.4466397974356003`*^9, 3.446639798668*^9}, 3.4466398447816*^9, {3.446639894218*^9, 3.4466399201556*^9}, { 3.4466399570964003`*^9, 3.4466399583288*^9}, {3.446639994006*^9, 3.4466400056904*^9}, {3.4466400383568*^9, 3.4466400395892*^9}, { 3.4466400745643997`*^9, 3.4466401025976*^9}, {3.4466401660834*^9, 3.4466401806070004`*^9}, {3.4466402251294003`*^9, 3.446640227407*^9}, { 3.446640260479*^9, 3.4466402657674*^9}, {3.4466404133122*^9, 3.4466405185654*^9}, 3.4466405830462*^9, {3.4467273294214*^9, 3.4467273777813997`*^9}, {3.4467274366558*^9, 3.4467275620954*^9}, { 3.446727593311*^9, 3.4467277412614*^9}, {3.4467283334639997`*^9, 3.4467283356012*^9}, {3.4467283707636003`*^9, 3.4467283727604*^9}, { 3.4467289882664003`*^9, 3.4467291276836*^9}, {3.446778464322*^9, 3.4467786797424*^9}, {3.4467801953803997`*^9, 3.4467802409792*^9}, { 3.4467802998691998`*^9, 3.4467804023456*^9}, 3.4467804345596*^9, { 3.4467808656344*^9, 3.4467808670852003`*^9}, 3.4467818107525997`*^9, { 3.446781855509*^9, 3.446781874385*^9}, {3.4467826737914*^9, 3.4467827381726*^9}, {3.4467828623018*^9, 3.4467831045386*^9}, { 3.4470344113984003`*^9, 3.4470344123344*^9}, {3.4470344628316*^9, 3.4470345343108*^9}, {3.447043591118539*^9, 3.447043642192939*^9}, { 3.447045649625739*^9, 3.447045718437339*^9}, {3.447054774023939*^9, 3.447054834198939*^9}, {3.4470549103449388`*^9, 3.4470549116169386`*^9}, { 3.447054943902939*^9, 3.4470553027109385`*^9}, {3.447055334559939*^9, 3.447055353684939*^9}, {3.447057311918539*^9, 3.447057369747739*^9}, { 3.4470575058577385`*^9, 3.4470575951365385`*^9}, {3.4470581848789387`*^9, 3.4470582040825386`*^9}, {3.451276121243*^9, 3.4512761425838003`*^9}, { 3.4512762022382*^9, 3.4512762064346*^9}, {3.4512762476966*^9, 3.4512762827654*^9}, {3.451276489091*^9, 3.451276541975*^9}, { 3.4512765853118*^9, 3.4512766132046003`*^9}, {3.4512773470306*^9, 3.4512773766082*^9}, {3.4512776069110003`*^9, 3.4512777499318*^9}, 3.4512777831286*^9, {3.4512778785538*^9, 3.451277881627*^9}, { 3.4512780242734003`*^9, 3.4512780302794*^9}, 3.4512780737878*^9, { 3.4512781866226*^9, 3.4512781930810003`*^9}, {3.4512863325078*^9, 3.4512863539266*^9}, {3.4568019250434*^9, 3.4568022712698*^9}, { 3.4568023177422*^9, 3.4568024125278*^9}, {3.4568024694365997`*^9, 3.4568024750369997`*^9}, {3.4568026914402*^9, 3.4568028101094*^9}, { 3.4568028406698*^9, 3.4568028564726*^9}, 3.4568028886085997`*^9, { 3.4568030489454*^9, 3.4568030800986*^9}, 3.4568032004128*^9, { 3.4568035073698*^9, 3.4568035176034*^9}, {3.4568040146596003`*^9, 3.4568040844852*^9}, {3.4568043016684*^9, 3.4568043154744*^9}, { 3.4568045482264*^9, 3.4568045486632*^9}, {3.4568048944996*^9, 3.4568049806116*^9}, {3.4660560628582*^9, 3.4660560753538*^9}, { 3.4660676729379997`*^9, 3.4660676735931997`*^9}, {3.4660677244024*^9, 3.4660677277251997`*^9}, {3.4742646771287394`*^9, 3.47426469439174*^9}, { 3.47426489921974*^9, 3.4742649800437393`*^9}, {3.4801246373348*^9, 3.4801246860536003`*^9}, {3.4801247748176003`*^9, 3.4801247821028*^9}, { 3.4801248161264*^9, 3.4801248295736*^9}, {3.4801248810692*^9, 3.4801248964508*^9}, {3.4801249330484*^9, 3.480124947884*^9}, 3.4801249886468*^9, {3.4801251139147997`*^9, 3.48012512588*^9}, { 3.4838339444988003`*^9, 3.4838339567448*^9}, 3.4838341692012*^9, { 3.4838344350408*^9, 3.4838344353684*^9}, {3.4938987575920324`*^9, 3.4938987586840324`*^9}, {3.4941630624049997`*^9, 3.4941631381274*^9}, { 3.4941632311345997`*^9, 3.4941632492306004`*^9}, 3.4941633249217997`*^9, { 3.4941633940922003`*^9, 3.4941634063538*^9}, {3.4941634538402*^9, 3.4941635051642*^9}, {3.494163565115*^9, 3.4941636341762*^9}, { 3.4941636853442*^9, 3.4941639323234*^9}, {3.4941640277798*^9, 3.4941641455754004`*^9}, {3.4941641790374002`*^9, 3.4941641803789997`*^9}, {3.4941642676142*^9, 3.4941643277678003`*^9}, 3.4941644677018003`*^9, {3.4941646208938*^9, 3.4941646322349997`*^9}, { 3.4941652592693996`*^9, 3.4941652807194*^9}, {3.4941653119038*^9, 3.494165416299*^9}, {3.494165453895*^9, 3.4941654544722*^9}, { 3.4950990979779997`*^9, 3.495099142701*^9}, {3.495099172958*^9, 3.4950991806289997`*^9}, {3.495099227097*^9, 3.495099238113*^9}, 3.495099290797*^9, {3.495099346084*^9, 3.495099359507*^9}, { 3.495099456308*^9, 3.495099464091*^9}, 3.495099683108*^9, { 3.495100428112*^9, 3.495100434958*^9}, {3.4951006496219997`*^9, 3.495100649992*^9}, {3.4987235265018*^9, 3.4987235939094*^9}, { 3.4987236420666*^9, 3.4987236530646*^9}, {3.4987237305341997`*^9, 3.4987237396914*^9}, {3.498733136159*^9, 3.4987332972446003`*^9}, { 3.4987364783094*^9, 3.4987364860626*^9}, {3.4987366201134*^9, 3.4987366236078*^9}, {3.4987367272386*^9, 3.4987367464890003`*^9}, { 3.4987369428462*^9, 3.4987369670886*^9}, {3.4987370134518003`*^9, 3.4987370259941998`*^9}, {3.4987370944002*^9, 3.4987371027618*^9}, { 3.4987371921029997`*^9, 3.498737193663*^9}, {3.4987372660938*^9, 3.4987372935498*^9}, {3.4987373290554*^9, 3.4987377176202*^9}, { 3.4987377520182*^9, 3.4987379139462*^9}, {3.4987382030216*^9, 3.4987382667078*^9}, {3.4987888391818*^9, 3.4987888608346*^9}, { 3.4988785131146*^9, 3.4988785160162*^9}, {3.5007170967096*^9, 3.5007170999076*^9}, 3.5007182237316*^9, {3.5007182772864*^9, 3.5007182987832003`*^9}, {3.5009573226744003`*^9, 3.5009573940444*^9}, 3.5009574358710003`*^9, 3.5009604278482*^9, {3.5009897246173353`*^9, 3.5009898480289354`*^9}, {3.5009901464413357`*^9, 3.5009901475333357`*^9}, {3.5009901801997356`*^9, 3.500990274096135*^9}, { 3.5010475253292*^9, 3.5010475852332*^9}, {3.5010605722018003`*^9, 3.5010606739762*^9}, {3.5010607202146*^9, 3.5010607323358*^9}, { 3.5010607920526*^9, 3.501061118467*^9}, {3.5010612022078*^9, 3.5010612277138*^9}, {3.5010616467766*^9, 3.5010617938534*^9}, { 3.5010618406222*^9, 3.5010619950778*^9}, {3.5010621500638*^9, 3.5010622514014*^9}, {3.5010625292218*^9, 3.5010625409374*^9}, { 3.5010626043046*^9, 3.5010626313862*^9}, {3.5010626787166*^9, 3.5010626790754004`*^9}, {3.501074457561*^9, 3.5010744671082*^9}, 3.5010763029458*^9, {3.5032210899309998`*^9, 3.5032212413900003`*^9}, { 3.557658203404973*^9, 3.557658219644601*^9}, {3.5576584433801947`*^9, 3.557658496030287*^9}, {3.5576585501779823`*^9, 3.5576586046064777`*^9}, { 3.557658648910555*^9, 3.557658754600741*^9}, {3.557658963945511*^9, 3.5576589782507353`*^9}, {3.557659009949991*^9, 3.5576591437514267`*^9}, { 3.557659182221094*^9, 3.5576592187719584`*^9}, 3.557659413865901*^9, { 3.557659921100792*^9, 3.5576599556392527`*^9}, {3.557660706920972*^9, 3.5576607248454037`*^9}, {3.557661209085854*^9, 3.557661209413454*^9}, { 3.5577526651911488`*^9, 3.5577526932087984`*^9}, {3.5577527272480583`*^9, 3.557752747122493*^9}, {3.5577528374934516`*^9, 3.557752838523053*^9}, { 3.557752881204728*^9, 3.557752891313546*^9}, {3.557752938612829*^9, 3.5577529469120436`*^9}, {3.557753060714244*^9, 3.557753062633047*^9}, { 3.5577536609544907`*^9, 3.5577536637936954`*^9}, {3.5577537824631042`*^9, 3.557753810184353*^9}, {3.557753841025607*^9, 3.5577540648392*^9}, 3.5577541920574236`*^9, {3.5577547033327217`*^9, 3.557754716967146*^9}, { 3.5577547716296415`*^9, 3.557754802112095*^9}, {3.5577549509363565`*^9, 3.5577549771444025`*^9}, 3.5577551382302856`*^9, {3.55775527184452*^9, 3.557755272858522*^9}, {3.557755881555991*^9, 3.557755886548*^9}, { 3.557756158316077*^9, 3.557756231885806*^9}, {3.5577572408487787`*^9, 3.557757248835993*^9}, {3.5577572834368534`*^9, 3.5577575888229895`*^9}, { 3.5577578129641833`*^9, 3.557757862837471*^9}, {3.557758025514557*^9, 3.557758079272251*^9}, 3.557810586960072*^9, {3.5578240262005973`*^9, 3.5578240345360737`*^9}, {3.557824091429328*^9, 3.5578241008156557`*^9}, { 3.557831525255726*^9, 3.5578315319793377`*^9}, 3.5578315716190076`*^9, { 3.557831606079468*^9, 3.557831629432709*^9}, {3.5578316663267736`*^9, 3.5578317569473333`*^9}, {3.5578322144181366`*^9, 3.557832218084143*^9}, { 3.557836356693412*^9, 3.557836473771618*^9}, {3.5578365201660995`*^9, 3.5578365974018345`*^9}, {3.5578366426731143`*^9, 3.557836658865943*^9}, { 3.557836691017599*^9, 3.5578367924957776`*^9}, {3.5578368305442443`*^9, 3.557836888279946*^9}, {3.5578369382156334`*^9, 3.5578370776642785`*^9}, { 3.5578383536061196`*^9, 3.5578383735117545`*^9}, {3.5578385892445335`*^9, 3.5578385978869486`*^9}, {3.5578386713006773`*^9, 3.557838700113928*^9}, { 3.5578387451200075`*^9, 3.5578387467892103`*^9}, {3.5578388951454706`*^9, 3.5578389248635225`*^9}, {3.5578389679351983`*^9, 3.557838983535226*^9}, { 3.5578390227692947`*^9, 3.557839023143696*^9}, {3.557839097696226*^9, 3.5578391125162525`*^9}, {3.5578391553539276`*^9, 3.557839199892006*^9}, { 3.55783924184048*^9, 3.557839294490572*^9}, {3.5578393285922318`*^9, 3.557839398683155*^9}, {3.557839430522811*^9, 3.557839470162481*^9}, { 3.5578395370865984`*^9, 3.5578395446994114`*^9}, {3.5578396068499207`*^9, 3.5578396118575296`*^9}, 3.5578943518105097`*^9, {3.557894388361374*^9, 3.5578944029629993`*^9}, {3.5578944607611012`*^9, 3.5578944989499683`*^9}, {3.5578945393696394`*^9, 3.557894561537278*^9}, { 3.5578946028617506`*^9, 3.5578946188985786`*^9}, {3.557894650894235*^9, 3.5578947812636642`*^9}, {3.55789481884413*^9, 3.5578948191249304`*^9}, { 3.5578949768100076`*^9, 3.5578949836272197`*^9}, {3.5578967386805477`*^9, 3.55789678549623*^9}, {3.5578968804691963`*^9, 3.557896888643611*^9}, { 3.557897022491846*^9, 3.5578970341450663`*^9}, {3.557897620940097*^9, 3.55789765120415*^9}, {3.5579218072271147`*^9, 3.5579218263059483`*^9}, { 3.557922095312821*^9, 3.557922116965659*^9}, {3.557922178086566*^9, 3.557922188616585*^9}, {3.5579223258812256`*^9, 3.557922327066828*^9}, { 3.5579224596046605`*^9, 3.557922461804264*^9}, 3.5579805928465395`*^9, { 3.5579815200581703`*^9, 3.557981541711009*^9}, 3.557985544779242*^9, { 3.5579863164793987`*^9, 3.5579863339514294`*^9}, {3.557986523210962*^9, 3.557986568841042*^9}, 3.5579866122559185`*^9, 3.557986993536188*^9, { 3.5579871244716187`*^9, 3.5579871290580263`*^9}, 3.557987173486905*^9, 3.5579872166989803`*^9, {3.5599618621582537`*^9, 3.5599618642486577`*^9}, { 3.559961969720443*^9, 3.5599619894700775`*^9}, 3.559963611089726*^9, { 3.5601298891258235`*^9, 3.560129889422224*^9}, {3.560132445157113*^9, 3.5601324458591146`*^9}, {3.561978472080926*^9, 3.561978472392926*^9}, { 3.6297802564412937`*^9, 3.6297802957377625`*^9}, {3.62978033369263*^9, 3.629780429741998*^9}, {3.6297805790030603`*^9, 3.6297809429048996`*^9}, { 3.629780987957779*^9, 3.629781197575347*^9}, {3.629781240397422*^9, 3.629781337663593*^9}, {3.6297813946972933`*^9, 3.6297814529165955`*^9}, { 3.6297814952550697`*^9, 3.629781527578326*^9}, {3.62978162025529*^9, 3.629781647633338*^9}, {3.629781678833393*^9, 3.629781763120341*^9}, 3.6297818028224106`*^9, {3.6297818432108817`*^9, 3.629781872570133*^9}, { 3.629782355765382*^9, 3.629782427603508*^9}, {3.6297824692243814`*^9, 3.629782674863942*^9}, {3.629782707218399*^9, 3.6297829295343895`*^9}, { 3.629783005631323*^9, 3.6297830574702144`*^9}, {3.6297831098551064`*^9, 3.629783142786764*^9}, {3.629783433711675*^9, 3.629783442619291*^9}, { 3.6297834942397814`*^9, 3.6297835175930223`*^9}, 3.6297835794939313`*^9, { 3.6297836160291953`*^9, 3.6297837668970604`*^9}, {3.6297842042438283`*^9, 3.6297842697483435`*^9}, {3.6297843514456873`*^9, 3.629784370742921*^9}, { 3.629784443829049*^9, 3.6297844678842916`*^9}, {3.6297845252611923`*^9, 3.629784525588793*^9}, {3.6297846136821475`*^9, 3.629784629235375*^9}, { 3.629784814797701*^9, 3.629784927648299*^9}, {3.629785259960083*^9, 3.6297852602096834`*^9}, {3.6297858780175686`*^9, 3.629785917282837*^9}, { 3.629786048057867*^9, 3.629786048681868*^9}, 3.6297863278755584`*^9, { 3.6297867047133856`*^9, 3.629786748533863*^9}, {3.6297867791567163`*^9, 3.6297868491540394`*^9}, {3.6297875320748396`*^9, 3.629787569795706*^9}, { 3.6297876247234025`*^9, 3.6297877281983843`*^9}, {3.6297877681812544`*^9, 3.629787774015665*^9}, {3.629787831408166*^9, 3.6297878355265727`*^9}, { 3.6297878775686464`*^9, 3.6297878861174617`*^9}, {3.6297879185343184`*^9, 3.629787919064719*^9}, {3.6297880043032694`*^9, 3.62978800470887*^9}, 3.6297880488257475`*^9, {3.6297882100052304`*^9, 3.6297882174776435`*^9}, { 3.6297882697533355`*^9, 3.6297882948381796`*^9}, {3.6297883467550707`*^9, 3.6297883991087627`*^9}, {3.6297887361785545`*^9, 3.629788783961438*^9}, 3.629788825395111*^9, {3.629789006152629*^9, 3.6297890321266747`*^9}, { 3.6297891133248167`*^9, 3.629789145336073*^9}, {3.6297891926821566`*^9, 3.629789194257759*^9}, {3.629789255316266*^9, 3.6297892556282673`*^9}, { 3.629869102295367*^9, 3.629869160124668*^9}, {3.6298691942887287`*^9, 3.6298696149902673`*^9}, {3.6298696993864155`*^9, 3.62986975897852*^9}, { 3.6298698387726603`*^9, 3.629869912030389*^9}, {3.6298700722270703`*^9, 3.629870234560955*^9}, {3.629870580429163*^9, 3.629870630458451*^9}, { 3.630556081081209*^9, 3.630556104902451*^9}, {3.6305562643503313`*^9, 3.6305562763935523`*^9}, {3.6305563415080667`*^9, 3.630556480956712*^9}, { 3.630556692851884*^9, 3.630556695347888*^9}, {3.630556730042349*^9, 3.630556914528273*^9}, {3.6305653725974936`*^9, 3.6305656807121167`*^9}, { 3.630565758760581*^9, 3.6305657739024467`*^9}, {3.630565858170267*^9, 3.63056596644846*^9}, {3.6305661502619734`*^9, 3.6305661523230915`*^9}, { 3.6305662653385553`*^9, 3.630566370352562*^9}, {3.6305667786019125`*^9, 3.630566790535595*^9}, {3.6305668214773645`*^9, 3.630567044691132*^9}, { 3.6305670772499943`*^9, 3.6305670783710585`*^9}, 3.630567272031135*^9, { 3.630567303902958*^9, 3.630567409875019*^9}, {3.630568671196477*^9, 3.6305687195002403`*^9}, {3.6305687542132254`*^9, 3.630568758623478*^9}, { 3.630568855671028*^9, 3.630568859250233*^9}, {3.630569706514694*^9, 3.630569775526641*^9}, 3.630569982346471*^9, {3.6305701679130845`*^9, 3.630570205199217*^9}, {3.6305703751399374`*^9, 3.630570526177576*^9}, { 3.630587657039589*^9, 3.630587688367381*^9}, {3.6305880733027773`*^9, 3.6305883365376396`*^9}, {3.6305886689118233`*^9, 3.6305886717978287`*^9}, 3.6305889776831656`*^9, {3.6305890389444733`*^9, 3.6305890437180815`*^9}, { 3.630589093248169*^9, 3.6305891296430326`*^9}, 3.630589181700324*^9, { 3.6305892509956455`*^9, 3.6305892594820604`*^9}, {3.630589318949365*^9, 3.6305893334729905`*^9}, {3.630589630294712*^9, 3.6305896376267247`*^9}, { 3.630589683288005*^9, 3.630589684988408*^9}, {3.630597310538067*^9, 3.630597340080757*^9}, {3.630597391446695*^9, 3.630597400596218*^9}, { 3.6305974350611897`*^9, 3.6305974605306463`*^9}, {3.630633997622449*^9, 3.630634003125764*^9}, {3.630659322217756*^9, 3.63065932438616*^9}, { 3.6306611578252783`*^9, 3.6306611625988865`*^9}, {3.6306612541554475`*^9, 3.630661257587454*^9}, {3.6306613001287284`*^9, 3.6306613026715326`*^9}, { 3.6306613920752897`*^9, 3.6306613949768953`*^9}, {3.6306706377509866`*^9, 3.630670654957817*^9}, {3.6306749981919994`*^9, 3.630675005793434*^9}, { 3.6306751229631357`*^9, 3.630675150017683*^9}, {3.6306752035287437`*^9, 3.6306752096180925`*^9}, {3.630675315921172*^9, 3.6306753201514144`*^9}, { 3.6306757793287754`*^9, 3.6306757796257925`*^9}, {3.630675814406262*^9, 3.6306758147026625`*^9}, {3.6306760107574763`*^9, 3.6306760154417443`*^9}, {3.6306789722320743`*^9, 3.6306789870309205`*^9}, {3.6306790257051325`*^9, 3.630679028076268*^9}, { 3.6306800259177256`*^9, 3.6306800406129513`*^9}, {3.6306801239326982`*^9, 3.6306801300167084`*^9}, {3.630680769261832*^9, 3.6306807806186523`*^9}, { 3.630681157468514*^9, 3.6306811577649145`*^9}, {3.6306812744219193`*^9, 3.63068127471832*^9}, {3.6306817187418995`*^9, 3.6306817919060287`*^9}, { 3.630681879188182*^9, 3.6306819111526375`*^9}, {3.6306821191790032`*^9, 3.6306821283050194`*^9}, {3.630720543651497*^9, 3.6307205534300566`*^9}, { 3.630721035525631*^9, 3.630721092774905*^9}, {3.6307212510439577`*^9, 3.6307213064777765`*^9}, {3.6307477437169704`*^9, 3.6307478284095197`*^9}, {3.6307478614971776`*^9, 3.6307478785948076`*^9}, {3.6307479884814005`*^9, 3.630748002880226*^9}, { 3.630748045624301*^9, 3.630748063876333*^9}, {3.630748111596817*^9, 3.6307481498324842`*^9}, {3.6307489182430334`*^9, 3.6307489447786803`*^9}, {3.630749037427243*^9, 3.6307490443848553`*^9}, { 3.6307491041485605`*^9, 3.6307491384218206`*^9}, {3.6307491914151134`*^9, 3.630749196890723*^9}, {3.6307492445800066`*^9, 3.6307493439989815`*^9}, { 3.630749396212273*^9, 3.6307494766304145`*^9}, {3.6307495333989143`*^9, 3.6307495547241516`*^9}, {3.6307496525831237`*^9, 3.630749669571553*^9}, { 3.630750220602922*^9, 3.6307502881822405`*^9}, {3.6307510631916018`*^9, 3.630751068292811*^9}, {3.6307511226589065`*^9, 3.630751137962533*^9}, { 3.6307512555243397`*^9, 3.630751282777588*^9}, {3.630752266971757*^9, 3.630752414599744*^9}, {3.630752446407563*^9, 3.630752457388191*^9}, { 3.6307589380050273`*^9, 3.6307590266300964`*^9}, {3.6307591666721067`*^9, 3.63075923229886*^9}, 3.630760288282259*^9, {3.6307603547370596`*^9, 3.630760557414652*^9}, {3.630760654134184*^9, 3.63076065510824*^9}, { 3.6307606911683025`*^9, 3.6307606919283457`*^9}, {3.6307607642334814`*^9, 3.6307607648645177`*^9}, {3.630761455000991*^9, 3.6307614616743727`*^9}, { 3.630761507825012*^9, 3.630761605776615*^9}, {3.630761652999316*^9, 3.630761695865768*^9}, {3.630761771278081*^9, 3.6307617792215357`*^9}, 3.6307629478424797`*^9, {3.632205207880766*^9, 3.6322052561155243`*^9}, { 3.6322052892474194`*^9, 3.6322052915745525`*^9}, 3.6322053746993074`*^9, { 3.6322062705415463`*^9, 3.6322062726016645`*^9}, {3.6322063396935015`*^9, 3.63220636484194*^9}, {3.6322064410612993`*^9, 3.6322064491667633`*^9}, { 3.632206580308264*^9, 3.6322066373275256`*^9}, {3.6322066736436024`*^9, 3.6322067467737856`*^9}, {3.632206782260815*^9, 3.6322071351279984`*^9}, 3.6322071989226465`*^9, {3.632207270393735*^9, 3.6322073359894867`*^9}, { 3.6322073997741346`*^9, 3.6322074126708727`*^9}, {3.632207491777397*^9, 3.632207682289294*^9}, {3.632207809621577*^9, 3.632207827973626*^9}, { 3.6322079043859973`*^9, 3.6322079279443445`*^9}, {3.6322080916397076`*^9, 3.6322081666649985`*^9}, 3.634905258940913*^9, {3.634905370524296*^9, 3.6349054089004903`*^9}, {3.6349054472556844`*^9, 3.63490544787272*^9}, { 3.634905483492757*^9, 3.6349055164646425`*^9}, {3.634905574352954*^9, 3.634905628121029*^9}, {3.6349057012822137`*^9, 3.6349057207913294`*^9}, { 3.6349061371061416`*^9, 3.634906354438572*^9}, {3.6349063890455513`*^9, 3.6349064369332905`*^9}, {3.634906537696054*^9, 3.634906601859724*^9}, 3.634906706128688*^9, {3.6349069249442034`*^9, 3.6349069328326545`*^9}, { 3.6349070151973653`*^9, 3.6349070242298822`*^9}, {3.6349070817921743`*^9, 3.6349070822111983`*^9}, {3.634907723288866*^9, 3.634907739005765*^9}, { 3.6349079580732946`*^9, 3.6349079868219395`*^9}, {3.634908200284148*^9, 3.634908315195721*^9}, {3.6349083774582825`*^9, 3.6349084027997313`*^9}, { 3.63490844507615*^9, 3.634908448843365*^9}, {3.634914956333157*^9, 3.634915020054802*^9}, {3.634915050572547*^9, 3.6349150956171236`*^9}, { 3.6349539785771523`*^9, 3.634953978975175*^9}, {3.6349540728785458`*^9, 3.6349541681829967`*^9}, {3.634954211263461*^9, 3.6349542495746527`*^9}, { 3.6349543251259737`*^9, 3.634954355882733*^9}, {3.6349543892536416`*^9, 3.6349544742835045`*^9}, {3.634954547519694*^9, 3.6349545640246377`*^9}, { 3.6349547051657104`*^9, 3.6349547107930326`*^9}, {3.634954745355009*^9, 3.634954752101395*^9}, {3.6349547948858423`*^9, 3.6349548053894434`*^9}, { 3.634954904907135*^9, 3.6349549451084347`*^9}, {3.634955219605135*^9, 3.6349552640926795`*^9}, {3.634955320189888*^9, 3.634955348763522*^9}, { 3.634955386393675*^9, 3.6349555039273973`*^9}, {3.6349557669644423`*^9, 3.6349557672004557`*^9}, {3.634955894841756*^9, 3.634955902578199*^9}, { 3.6349559513739896`*^9, 3.6349560216320086`*^9}, {3.634956120144643*^9, 3.634956128996149*^9}, {3.6349561700724983`*^9, 3.6349561978900895`*^9}, { 3.6349562480719595`*^9, 3.634956254326318*^9}, {3.634956331684742*^9, 3.6349563460575643`*^9}, {3.634956379242462*^9, 3.63495642676418*^9}, 3.6349564696636343`*^9, {3.6351524116477795`*^9, 3.6351524153379908`*^9}, { 3.6352134400282927`*^9, 3.635213442148414*^9}, {3.6352134745862694`*^9, 3.635213495869487*^9}, {3.6352135383409157`*^9, 3.6352137157160616`*^9}, { 3.6352137493569856`*^9, 3.635213764522853*^9}, {3.635214215036621*^9, 3.635214227593339*^9}, {3.635214407257615*^9, 3.63521441713218*^9}, { 3.635215297101512*^9, 3.635215303964904*^9}, {3.6352154111120324`*^9, 3.635215431504199*^9}, {3.635216346055508*^9, 3.635216494371991*^9}, { 3.635216631050809*^9, 3.6352166603244834`*^9}, {3.635216763034358*^9, 3.635216764164423*^9}, {3.6352168771938877`*^9, 3.635216888828553*^9}, 3.6352169832479534`*^9, 3.635217037668066*^9, {3.6352172024924936`*^9, 3.6352172054526625`*^9}, {3.635217344025589*^9, 3.635217346898753*^9}, 3.6352173863770113`*^9, {3.635217519639633*^9, 3.6352175507014103`*^9}, 3.635217615445113*^9, {3.6352178715087595`*^9, 3.635217880460271*^9}, { 3.6352185912849283`*^9, 3.635218598444338*^9}, {3.6352186995721216`*^9, 3.635218714955002*^9}, {3.6352189761749425`*^9, 3.6352189789341*^9}, { 3.6352195060322485`*^9, 3.635219509972474*^9}, 3.6352195673477554`*^9, 3.6352195994635925`*^9, {3.6352197336482677`*^9, 3.635219737452485*^9}, { 3.6352197706093817`*^9, 3.6352197723214793`*^9}, {3.635219941784172*^9, 3.6352199485115566`*^9}, {3.6352200714185867`*^9, 3.6352200854323883`*^9}, {3.6352202085694313`*^9, 3.635220235849992*^9}, { 3.6352202816336107`*^9, 3.6352203110962954`*^9}, {3.6352204980449886`*^9, 3.6352205276526823`*^9}, {3.6352253191447396`*^9, 3.6352253299913597`*^9}, {3.6352253611111403`*^9, 3.6352253637572913`*^9}, {3.635225409322898*^9, 3.6352255965196047`*^9}, { 3.6352260914249115`*^9, 3.6352261698393965`*^9}, {3.63522638233055*^9, 3.6352264188036366`*^9}, {3.635227493469104*^9, 3.635227556935734*^9}, { 3.6352276745764627`*^9, 3.635227730116639*^9}, {3.6352287979917183`*^9, 3.6352288587651944`*^9}, {3.635228894237223*^9, 3.635228948324317*^9}, { 3.635229365252164*^9, 3.6352293902275925`*^9}, {3.63522947690555*^9, 3.6352294807837715`*^9}, {3.6352492831123204`*^9, 3.6352492983621926`*^9}, 3.6356569054520617`*^9, {3.6363778004499054`*^9, 3.636377802787039*^9}, { 3.6363778414932528`*^9, 3.6363778525308843`*^9}, {3.636384436335312*^9, 3.6363846409950175`*^9}, {3.636384971250907*^9, 3.6363849738080535`*^9}, { 3.6363850170465264`*^9, 3.636385030729309*^9}, {3.6363851286779118`*^9, 3.636385138359465*^9}, {3.6363851699712734`*^9, 3.636385223111313*^9}, { 3.656076172452749*^9, 3.656076182171566*^9}, {3.6560765578514256`*^9, 3.656076619019133*^9}, 3.6560772545486493`*^9, {3.6630719749029694`*^9, 3.6630719878027077`*^9}, {3.6630720702554235`*^9, 3.6630720807290225`*^9}, {3.6630721155740156`*^9, 3.6630721713712068`*^9}, {3.663072270834896*^9, 3.6630722882218904`*^9}, 3.6630724099968557`*^9, {3.685234767958906*^9, 3.685234768480936*^9}, { 3.685252204033695*^9, 3.6852522340537376`*^9}, {3.6852522757137957`*^9, 3.6852523115138454`*^9}, {3.68525376314359*^9, 3.6852537725041256`*^9}, { 3.6852539763277836`*^9, 3.6852539861693463`*^9}, 3.6852540682470407`*^9, 3.6852541660656357`*^9, {3.6852604801645336`*^9, 3.6852605060345697`*^9}, { 3.6852605373446136`*^9, 3.6852605977846985`*^9}, 3.685260655254779*^9, { 3.6853280002218475`*^9, 3.685328019561875*^9}, 3.685328064721938*^9, { 3.6853280953119807`*^9, 3.6853282636022167`*^9}, {3.685328356242346*^9, 3.685328598671985*^9}, {3.6853286682069626`*^9, 3.6853287982524004`*^9}, { 3.6853288753368096`*^9, 3.6853289367033195`*^9}, {3.685328968274125*^9, 3.685328978713722*^9}, {3.685329033941881*^9, 3.685329044950511*^9}, { 3.685329173522865*^9, 3.6853294420842257`*^9}, {3.6853296024223967`*^9, 3.6853296124319687`*^9}, {3.6853297221712456`*^9, 3.685329733349885*^9}, { 3.6853298076291337`*^9, 3.6853298739599276`*^9}, {3.685330038474337*^9, 3.685330051652091*^9}, {3.6853311309428225`*^9, 3.685331168378964*^9}, { 3.685340142134763*^9, 3.685340180544817*^9}, {3.6853583292043543`*^9, 3.685358334834362*^9}, {3.685358366084406*^9, 3.685358366954407*^9}, { 3.685358408404465*^9, 3.685358518294619*^9}, 3.685358620174762*^9, 3.6853586578748145`*^9, {3.6853588750151186`*^9, 3.6853588857151337`*^9}, { 3.6853589302051954`*^9, 3.685358938995208*^9}, {3.685359014715314*^9, 3.6853590296653347`*^9}, 3.685359148315501*^9, 3.6853598281764526`*^9, { 3.6853683109000263`*^9, 3.685368382250126*^9}, {3.685368420160179*^9, 3.6853684704302497`*^9}, {3.6853685194503183`*^9, 3.685368742860631*^9}, { 3.685369008901004*^9, 3.68536902061102*^9}, {3.6853690791611023`*^9, 3.685369132301176*^9}, {3.6853693219914417`*^9, 3.6853693304114532`*^9}, 3.6853696089118433`*^9, {3.6858758911429157`*^9, 3.685875951793*^9}, { 3.6859484099082212`*^9, 3.6859484970032024`*^9}, {3.686052829875022*^9, 3.686052906242383*^9}, {3.6860535326822133`*^9, 3.686053598029951*^9}, { 3.68605365168902*^9, 3.6860541446091995`*^9}, {3.6860541846064873`*^9, 3.68605440393201*^9}, {3.686054713802734*^9, 3.6860547858298535`*^9}, { 3.6860548280202665`*^9, 3.686054837219793*^9}, {3.686054874127904*^9, 3.686054892139934*^9}, {3.686055136014883*^9, 3.6860551460584574`*^9}, { 3.686055211281188*^9, 3.6860552301962633`*^9}, {3.6860553465409174`*^9, 3.6860553998749685`*^9}, {3.6860556017188663`*^9, 3.6860556050188704`*^9}, {3.6862923512707715`*^9, 3.686292363600789*^9}, { 3.686292409650853*^9, 3.6862924109708548`*^9}, {3.6862924536109147`*^9, 3.6862924596309233`*^9}, {3.686292542221039*^9, 3.6862925430110397`*^9}, { 3.686292988803664*^9, 3.686293001033681*^9}, {3.6866504529025555`*^9, 3.686650526682659*^9}, {3.686650671852862*^9, 3.6866507242929354`*^9}, { 3.6866507657529936`*^9, 3.6866507887630253`*^9}, {3.6866508208230705`*^9, 3.6866509100531955`*^9}, {3.6866509593932643`*^9, 3.686650971113281*^9}, { 3.686651007793332*^9, 3.6866511595335445`*^9}, {3.686651223513634*^9, 3.686651234033649*^9}, {3.686651304763748*^9, 3.6866513363837924`*^9}, { 3.6866514102038956`*^9, 3.686651429943923*^9}, {3.686652993837468*^9, 3.6866530046274834`*^9}, {3.686804398511652*^9, 3.6868044081516657`*^9}, { 3.6868046315619783`*^9, 3.686804631801979*^9}, {3.686804685872054*^9, 3.686804707092084*^9}, {3.6868047382021275`*^9, 3.686804767812169*^9}, { 3.686804824012248*^9, 3.6868048404922705`*^9}, {3.686804942142413*^9, 3.6868049633424425`*^9}, {3.6868050765526013`*^9, 3.686805101092636*^9}, { 3.6868051463526993`*^9, 3.6868052234228067`*^9}, {3.686805307602925*^9, 3.686805311682931*^9}, {3.68680577547358*^9, 3.686805788923599*^9}, { 3.686821702197342*^9, 3.6868217282873783`*^9}, {3.6868225192884855`*^9, 3.686822538368512*^9}, {3.6868226306886415`*^9, 3.6868226683086944`*^9}, { 3.6868227318887835`*^9, 3.6868227627088265`*^9}, {3.686822801638881*^9, 3.6868230490692277`*^9}, {3.686823122979331*^9, 3.6868231833294153`*^9}, { 3.6868232450595016`*^9, 3.6868233753996844`*^9}, {3.6868234153897405`*^9, 3.686823451379791*^9}, {3.6868236736101017`*^9, 3.6868236786601086`*^9}, { 3.6868237164601617`*^9, 3.68682375072021*^9}, {3.68682389396041*^9, 3.68682390087042*^9}, {3.686823940790476*^9, 3.6868239416904774`*^9}, { 3.6868239808805323`*^9, 3.6868239872905407`*^9}, {3.686824051540631*^9, 3.6868240519006314`*^9}, {3.686824360861064*^9, 3.6868243761510854`*^9}, { 3.6868245440213203`*^9, 3.686824577221367*^9}, {3.686824685841519*^9, 3.6868246979115357`*^9}, 3.6868248012716804`*^9, 3.6868253582724605`*^9, { 3.6868255183026843`*^9, 3.686825518932685*^9}, {3.6868264466639843`*^9, 3.6868264497139883`*^9}, {3.6868267792744493`*^9, 3.6868268152945004`*^9}, {3.686827100164899*^9, 3.6868271210549283`*^9}, 3.686827162004986*^9, {3.6868272414950967`*^9, 3.686827327475217*^9}, { 3.686827953126093*^9, 3.686827976506126*^9}, {3.686829128577739*^9, 3.686829138957753*^9}, 3.6868292410978966`*^9, {3.6868292768379464`*^9, 3.686829282727955*^9}, {3.6868293820380936`*^9, 3.686829418138144*^9}, { 3.686829846748744*^9, 3.686829848298746*^9}, {3.6868313063207874`*^9, 3.686831307180789*^9}, {3.6868331276633377`*^9, 3.68683328653356*^9}, { 3.6868394697195063`*^9, 3.6868394933895392`*^9}, 3.686839530999592*^9, { 3.686839582829664*^9, 3.68683963686974*^9}, {3.6868397551199055`*^9, 3.68683979365996*^9}, {3.6868398344600167`*^9, 3.686839866200061*^9}, { 3.687092084401948*^9, 3.687092117031994*^9}, {3.6870922598621936`*^9, 3.6870922645422*^9}, {3.6870962086478376`*^9, 3.6870962658779182`*^9}, 3.687096444838168*^9, {3.687096500978247*^9, 3.687096501638248*^9}, { 3.6870965809883595`*^9, 3.687096592708376*^9}, 3.687096837948719*^9, { 3.68709688890879*^9, 3.687096985798926*^9}, {3.6870971015990877`*^9, 3.6870972179192505`*^9}, {3.6870972618993125`*^9, 3.687097305639374*^9}, { 3.6870973356794157`*^9, 3.6870975186496716`*^9}, {3.6870975796097574`*^9, 3.6870975953197794`*^9}, {3.6870976531898603`*^9, 3.6870976848899045`*^9}, 3.6870977782500353`*^9, {3.687413757687042*^9, 3.6874137834070783`*^9}, { 3.6874140542074575`*^9, 3.687414094417514*^9}, {3.6874143478878684`*^9, 3.687414485538061*^9}, {3.6874146116082373`*^9, 3.68741464894829*^9}, { 3.6874147451084247`*^9, 3.687414766118454*^9}, 3.6874149094486547`*^9, { 3.6874150416688395`*^9, 3.6874150634888706`*^9}, {3.6874152437091227`*^9, 3.687415268869158*^9}, 3.6874153442892637`*^9, {3.687415449879411*^9, 3.687415469659439*^9}, 3.687415529739523*^9, 3.687415564789572*^9, 3.687415645529685*^9, {3.6874168016913037`*^9, 3.687416803441306*^9}, { 3.687421022677213*^9, 3.6874212686075573`*^9}, {3.68742948209425*^9, 3.6874294906842623`*^9}, {3.687844340668378*^9, 3.6878443698084188`*^9}, { 3.6886534778571014`*^9, 3.6886534911571198`*^9}, {3.688906380162199*^9, 3.6889064680223217`*^9}, {3.688906514222396*^9, 3.6889065193925257`*^9}, { 3.688908192623024*^9, 3.6889082006430354`*^9}, {3.688908261823121*^9, 3.688908271653135*^9}, {3.6889083776232834`*^9, 3.6889083922733035`*^9}, { 3.688908466073407*^9, 3.6889084993734536`*^9}, 3.688908533623502*^9, { 3.688908616683618*^9, 3.6889086271336327`*^9}, {3.6889086885637183`*^9, 3.6889087063437433`*^9}, {3.6889091647443852`*^9, 3.6889092012544365`*^9}, {3.6889093019045773`*^9, 3.6889093406746316`*^9}, 3.6889101071957045`*^9, {3.689905940063133*^9, 3.689905972983179*^9}, { 3.692530981927737*^9, 3.6925310416778207`*^9}, {3.692531099797902*^9, 3.6925311384779563`*^9}, {3.692531192258032*^9, 3.692531244668105*^9}, { 3.6925312919881716`*^9, 3.692531425418358*^9}, {3.6925315270885005`*^9, 3.692531643928664*^9}, {3.692535489534048*^9, 3.6925356485142703`*^9}, { 3.692535753564418*^9, 3.6925357992544813`*^9}, {3.6925358831745987`*^9, 3.692535899604622*^9}, {3.692536042584822*^9, 3.692536159384986*^9}, { 3.6925366121156197`*^9, 3.6925366207256317`*^9}, {3.6925367265057793`*^9, 3.69253672683578*^9}, {3.6925368590559654`*^9, 3.6925368636559715`*^9}, { 3.6925370880062857`*^9, 3.692537177856412*^9}, {3.692537322456614*^9, 3.6925373869767046`*^9}, {3.6925390913352747`*^9, 3.6925390925252767`*^9}, {3.692539644430175*^9, 3.6925396711502123`*^9}, { 3.692539727510291*^9, 3.692539730440295*^9}, {3.69253993367058*^9, 3.692539963780622*^9}, {3.6925400018406754`*^9, 3.692540003630678*^9}, { 3.6925401743409166`*^9, 3.6925401747509174`*^9}, {3.692540399111232*^9, 3.692540407981244*^9}, {3.69254047647134*^9, 3.6925404886113567`*^9}, { 3.6925406039715185`*^9, 3.69254060531152*^9}, {3.6925414948727655`*^9, 3.6925414953427663`*^9}, {3.6925415478528395`*^9, 3.692541613062931*^9}, 3.692541649332982*^9, {3.692541727633092*^9, 3.6925418840133104`*^9}, { 3.692541924473367*^9, 3.692542041693531*^9}, {3.6925421488836813`*^9, 3.6925422549438295`*^9}, {3.6925422976938896`*^9, 3.692542521444203*^9}, { 3.6925426221843443`*^9, 3.6925426357343626`*^9}, 3.692542739374508*^9, 3.692599799510878*^9, {3.692599834884901*^9, 3.6925998954663663`*^9}, { 3.692599925635092*^9, 3.6926000095928946`*^9}, {3.692600108929576*^9, 3.6926001456386757`*^9}, {3.6926001874800687`*^9, 3.692600454421337*^9}, { 3.692600503149027*^9, 3.6926006000391626`*^9}, {3.692600680251275*^9, 3.6926006814012766`*^9}, {3.6926009000215826`*^9, 3.6926009410816402`*^9}, 3.692601280532116*^9, {3.6926044914726114`*^9, 3.69260449774262*^9}, 3.6926045660127153`*^9, 3.6926046690228596`*^9, {3.69296647863291*^9, 3.6929664798829117`*^9}, {3.6929665643330297`*^9, 3.6929666141830997`*^9}, {3.6929670390036945`*^9, 3.6929670405536966`*^9}, {3.6929670861037607`*^9, 3.6929670952937737`*^9}, {3.6929671302538223`*^9, 3.6929671549438567`*^9}, {3.6929671904739065`*^9, 3.69296722137395*^9}, { 3.6929672596240034`*^9, 3.6929673352541094`*^9}, 3.6929678909232683`*^9, { 3.6930146982034283`*^9, 3.693014722713463*^9}, {3.6930148540136466`*^9, 3.693014857023651*^9}, {3.6930148913836985`*^9, 3.693014894823704*^9}, { 3.693014930903754*^9, 3.6930151942541227`*^9}, {3.693015247824198*^9, 3.693015430554454*^9}, {3.693015673794794*^9, 3.69301579223496*^9}, { 3.6930163123576884`*^9, 3.693016326897709*^9}, {3.6930164225678425`*^9, 3.693016429727853*^9}, {3.693016686718212*^9, 3.693016698128228*^9}, { 3.693016737038283*^9, 3.693016755068308*^9}, {3.6930168429225607`*^9, 3.6930168719926014`*^9}, {3.6930172049430676`*^9, 3.693017284063178*^9}, { 3.693017336433252*^9, 3.6930173662532935`*^9}, {3.6930180949163136`*^9, 3.6930180975563173`*^9}, {3.6930181870764427`*^9, 3.693018199956461*^9}, { 3.6930182954065943`*^9, 3.693018305996609*^9}, {3.693139886141657*^9, 3.6931399045016823`*^9}, {3.6931402916003532`*^9, 3.693140295770359*^9}, { 3.693140426020541*^9, 3.693140426530542*^9}, {3.6931410492237864`*^9, 3.6931410888738413`*^9}, {3.6931411194438844`*^9, 3.693141126553894*^9}, { 3.693141412004294*^9, 3.693141454164353*^9}, {3.6931415979955544`*^9, 3.6931417931758275`*^9}, {3.6932199559445915`*^9, 3.6932199772046213`*^9}, {3.6932201435748544`*^9, 3.693220170284892*^9}, { 3.693220713855653*^9, 3.693220721825664*^9}, {3.693625124589745*^9, 3.693625153729786*^9}, {3.6940907995669713`*^9, 3.6940909688872085`*^9}, { 3.6940913675677667`*^9, 3.6940914223978434`*^9}, {3.694091508037963*^9, 3.694091572118053*^9}, 3.694092009628666*^9, {3.6940920553287296`*^9, 3.694092229168973*^9}, {3.6940923053990793`*^9, 3.694092374419176*^9}, { 3.6940924537392874`*^9, 3.694092457789293*^9}, 3.694092642849552*^9, { 3.6940928573598523`*^9, 3.694092862379859*^9}, {3.6940945886222763`*^9, 3.694094601932295*^9}, 3.694094849542641*^9, {3.694095764293922*^9, 3.6940957644739223`*^9}, {3.6940960602743363`*^9, 3.6940960732243547`*^9}, {3.6940961211044216`*^9, 3.694096124194426*^9}, { 3.694665030960044*^9, 3.6946650634500895`*^9}, {3.6946652071402903`*^9, 3.6946653490404887`*^9}, {3.6946658702212186`*^9, 3.6946658881212435`*^9}, {3.694665923041292*^9, 3.694665953561335*^9}, { 3.694665995981395*^9, 3.6946660149414215`*^9}, {3.694666050571471*^9, 3.6946660547214766`*^9}, {3.694666169991638*^9, 3.694666292151809*^9}, { 3.6946663456618843`*^9, 3.6946663943919525`*^9}, 3.6946667526224537`*^9, 3.69466680700253*^9, 3.694687076625702*^9, {3.6946874316161985`*^9, 3.6946874621962414`*^9}, 3.694687499496294*^9, {3.694687567516389*^9, 3.694687642816495*^9}, {3.694687679006545*^9, 3.6946877198966026`*^9}, { 3.6946877714966745`*^9, 3.694687931746899*^9}, {3.723798739728607*^9, 3.723798744014243*^9}, {3.7237990126446104`*^9, 3.723799023974499*^9}, { 3.7244116671877546`*^9, 3.7244116733393917`*^9}, {3.724411761793063*^9, 3.7244117718753977`*^9}, {3.724411928386671*^9, 3.7244119682966137`*^9}, { 3.724412131847311*^9, 3.724412188341254*^9}, {3.729414981357122*^9, 3.7294149861075096`*^9}, {3.749817651293678*^9, 3.749817653108206*^9}, { 3.7498176831919456`*^9, 3.7498176846222315`*^9}, 3.7498177601545563`*^9, { 3.749817859674735*^9, 3.749817861044999*^9}, {3.7498179561547127`*^9, 3.749817964489929*^9}, {3.749818149334386*^9, 3.749818237397959*^9}, 3.749818617867873*^9, {3.7505621848002787`*^9, 3.7505622174085107`*^9}, { 3.75056238761455*^9, 3.750562431347901*^9}, {3.7505626332829456`*^9, 3.7505627331565337`*^9}, {3.7505627632642183`*^9, 3.7505627635859113`*^9}, {3.7515359581577415`*^9, 3.7515359614850826`*^9}, {3.751536071974715*^9, 3.7515360961721487`*^9}, 3.7515362040373974`*^9, {3.751536256080162*^9, 3.7515365099108534`*^9}, { 3.751549231137398*^9, 3.7515493334258356`*^9}, {3.7515496891619573`*^9, 3.751549689458767*^9}, {3.763384318028655*^9, 3.763384321230183*^9}, 3.7633844800900145`*^9, {3.7650666220235834`*^9, 3.765066676848461*^9}, { 3.7650667705927696`*^9, 3.765066781277461*^9}, {3.7650668220493402`*^9, 3.7650670769609847`*^9}, {3.765075343296377*^9, 3.765075345014902*^9}, { 3.765075479631569*^9, 3.7650755114191623`*^9}, {3.765075617307859*^9, 3.7650756180851874`*^9}, {3.76507585422694*^9, 3.765075872425325*^9}, { 3.7650760811750383`*^9, 3.7650762635610576`*^9}, {3.7650763100785646`*^9, 3.765076323109063*^9}, {3.7650763765120716`*^9, 3.765076385469493*^9}, { 3.7650764317497897`*^9, 3.7650764864127855`*^9}, 3.765076672990033*^9, { 3.7650767604139767`*^9, 3.7650767965644426`*^9}, {3.765076849411788*^9, 3.76507688334435*^9}, {3.765076928656023*^9, 3.7650769388747053`*^9}, 3.76507697239373*^9, {3.7650770147173185`*^9, 3.7650770820420313`*^9}, { 3.765077138264634*^9, 3.765077175747029*^9}, {3.765077340035742*^9, 3.765077493212038*^9}, {3.7650775254837503`*^9, 3.765077573524544*^9}, { 3.765077619369755*^9, 3.7650776808294816`*^9}, {3.765088266857733*^9, 3.765088281236836*^9}, {3.76508836959641*^9, 3.765088394392946*^9}, { 3.7650900504082956`*^9, 3.765090052695187*^9}, {3.7650900911122713`*^9, 3.765090094160341*^9}, {3.765090519594511*^9, 3.7650905411898503`*^9}, { 3.7885193337832556`*^9, 3.788519339935099*^9}, {3.788519391172593*^9, 3.7885194472501445`*^9}, {3.7885195529105897`*^9, 3.788519558251149*^9}, { 3.7885305232444134`*^9, 3.788530576893549*^9}, 3.788530695024667*^9, { 3.7885307280202837`*^9, 3.788530769626217*^9}, {3.7963483332994423`*^9, 3.796348466639106*^9}, {3.820027614612806*^9, 3.8200276304022093`*^9}, 3.8200276853924747`*^9, {3.829884589354769*^9, 3.8298846124571314`*^9}}, CellLabel-> "In[147]:=",ExpressionUUID->"c601cabf-ce99-413e-9d60-665ffda487a5"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "EE", ",", "GG", ",", "\[Rho]\[Rho]", ",", "\[Kappa]\[Kappa]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "EE_", ",", "GG_", ",", "\[Rho]\[Rho]_", ",", "\[Kappa]\[Kappa]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "ux", ",", "uy", " ", ",", "uz", " ", ",", "\[Theta]x", " ", ",", "\[Theta]y", " ", ",", "\[Theta]z", " ", ",", "\[Delta]ux", " ", ",", "\[Delta]uy", ",", "\[Delta]uz", ",", "\[Delta]\[Theta]x", ",", "\[Delta]\[Theta]y", ",", "\[Delta]\[Theta]z", ",", "fx", ",", "fy", ",", "fz", ",", "mx", ",", "my", ",", "mz"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "mapping", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", " ", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"fx", "=", RowBox[{"ix0", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"fy", "=", RowBox[{"iy0", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"fz", "=", RowBox[{"iz0", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"mx", "=", RowBox[{"ix0", ".", RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"my", "=", RowBox[{"iy0", ".", RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"mz", "=", RowBox[{"iz0", ".", RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"-", FractionBox["1", RowBox[{"420", " ", SuperscriptBox["h0", "3"]}]]}], RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "210"}], " ", "fx", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"7", " ", RowBox[{"(", RowBox[{ RowBox[{"720", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"5", " ", "fz", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{"5", " ", "fy", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"h0", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"h0", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}], "-", RowBox[{"360", " ", "EE", " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"12", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], "-", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"5", " ", "GG", " ", "\[Kappa]\[Kappa]", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"10", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], "-", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"5", " ", "GG", " ", "\[Kappa]\[Kappa]", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"10", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"2", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"15", " ", "fz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"15", " ", "mx", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{"\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"5", " ", "Izz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"5", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"5", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"4", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"4", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"4", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"6", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "Iyy"}], " ", RowBox[{"(", RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], "-", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], "-", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"10", " ", "my"}], "+", RowBox[{"Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}], "+", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"10", " ", "mz"}], "+", RowBox[{"Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}], "+", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"AA", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"420", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["h0", "2"], " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"70", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"156", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"22", " ", "h0", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"13", " ", "h0", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"54", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"156", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"13", " ", "h0", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"22", " ", "h0", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"54", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"156", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"13", " ", "h0", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"22", " ", "h0", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"156", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"22", " ", "h0", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"13", " ", "h0", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}], "+", RowBox[{"h0", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "22"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"13", " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "13"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"22", " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"13", " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"22", " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"22", " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"13", " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"h0", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "3"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "3"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}]}]], "Input", CellChangeTimes->{{3.4430689313272*^9, 3.4430690080792*^9}, { 3.4430690869528*^9, 3.4430691077320004`*^9}, {3.4430691700116*^9, 3.4430691708072*^9}, {3.4430692071717997`*^9, 3.443069246359*^9}, { 3.4430772782732*^9, 3.4430773623416*^9}, {3.4430773978316*^9, 3.4430774104676*^9}, {3.4430775053780003`*^9, 3.4430776180598*^9}, { 3.4434109099524*^9, 3.4434109159584*^9}, {3.4438800815346003`*^9, 3.4438802689304*^9}, {3.443880362624*^9, 3.4438803824516*^9}, { 3.443929565615374*^9, 3.443929570232974*^9}, {3.443935321321974*^9, 3.443935335705174*^9}, {3.443935419945174*^9, 3.443935421489574*^9}, { 3.443935494013974*^9, 3.443935494715974*^9}, {3.443935617565974*^9, 3.4439357217895737`*^9}, {3.443935755360774*^9, 3.443935816107174*^9}, { 3.443942155230774*^9, 3.443942209939974*^9}, {3.443942305710374*^9, 3.4439423142123737`*^9}, {3.4439442908131742`*^9, 3.443944441181574*^9}, { 3.4439447830065737`*^9, 3.4439447917425737`*^9}, {3.443944908541774*^9, 3.443944916060974*^9}, {3.4442731097938004`*^9, 3.4442731115254*^9}, { 3.444273189229*^9, 3.4442732700526*^9}, {3.4442748430004*^9, 3.4442748605036*^9}, {3.4442748977438*^9, 3.4442748989762*^9}, { 3.4442749340762*^9, 3.4442749351057997`*^9}, 3.4442752313382*^9, { 3.4442919702026*^9, 3.4442919911846*^9}, {3.4442921151577997`*^9, 3.4442921271074*^9}, {3.4443811023684*^9, 3.4443811036632*^9}, { 3.4443814073171997`*^9, 3.4443814402956*^9}, {3.4443815036316*^9, 3.4443815147855997`*^9}, {3.4443815537232*^9, 3.4443815747676*^9}, { 3.4443816138143997`*^9, 3.444381633174*^9}, {3.4443816850439997`*^9, 3.4443817801728*^9}, 3.4443853618688*^9, {3.4443855607376003`*^9, 3.4443856337924*^9}, {3.4443861200444*^9, 3.4443861523676*^9}, { 3.4443862280495996`*^9, 3.444386291448*^9}, {3.4443864047352*^9, 3.4443864135336*^9}, {3.4443870026832*^9, 3.4443870095316*^9}, { 3.4444082055056*^9, 3.4444082437412*^9}, {3.4444082797148*^9, 3.4444084583816*^9}, {3.4444084889108*^9, 3.4444085087539997`*^9}, { 3.444408942517*^9, 3.4444089563386*^9}, {3.4444091419564*^9, 3.4444091647167997`*^9}, {3.4444092206428003`*^9, 3.4444092944463997`*^9}, {3.4444093856284*^9, 3.4444094281071997`*^9}, { 3.4444094976988*^9, 3.4444095275104*^9}, {3.444409611064*^9, 3.4444096125772*^9}, 3.4444098504616003`*^9, {3.444409913392*^9, 3.4444099166056004`*^9}, 3.4444100178496*^9, {3.4444103063248*^9, 3.4444103358712*^9}, {3.4444103868208*^9, 3.4444104432460003`*^9}, { 3.4444921219564*^9, 3.4444921256224003`*^9}, {3.444492194824*^9, 3.4444921973668003`*^9}, {3.4444922814351997`*^9, 3.4444922853508*^9}, { 3.4444923330868*^9, 3.4444923345844*^9}, {3.444492366424*^9, 3.4444923855808*^9}, {3.4453153475226*^9, 3.445315360689*^9}, { 3.4465518166373653`*^9, 3.446551863016165*^9}, {3.446551894231765*^9, 3.446552159384965*^9}, {3.446552232377365*^9, 3.4465522555589647`*^9}, { 3.446553347388365*^9, 3.4465533616155653`*^9}, {3.4466058525769997`*^9, 3.4466058529046*^9}, {3.4466064371219997`*^9, 3.4466065097244*^9}, { 3.4466127725788*^9, 3.4466127766036*^9}, {3.4466128124835997`*^9, 3.4466130037864*^9}, {3.4466131532696*^9, 3.4466131761703997`*^9}, { 3.4466133992192*^9, 3.4466134478756*^9}, {3.446613483584*^9, 3.4466134932092*^9}, {3.4466135740952*^9, 3.4466135794927998`*^9}, { 3.4466137283948*^9, 3.4466137341356*^9}, {3.4466138994342003`*^9, 3.4466139023826*^9}, {3.4466139549858*^9, 3.4466139579653997`*^9}, { 3.4466142109818*^9, 3.4466142245226*^9}, {3.4466142793878*^9, 3.4466143652033997`*^9}, {3.4466144712834*^9, 3.4466145978929996`*^9}, { 3.4466146992618*^9, 3.4466147509914*^9}, {3.4466151283086*^9, 3.4466152768986*^9}, {3.4466153107506*^9, 3.4466153406558*^9}, { 3.4466194331976*^9, 3.4466194377528*^9}, {3.4466194847712*^9, 3.446619488718*^9}, {3.4466389495861998`*^9, 3.4466389768238*^9}, { 3.4466391218414*^9, 3.446639306561*^9}, {3.4466393990222*^9, 3.4466394004886*^9}, {3.4466394475694*^9, 3.4466394487706003`*^9}, { 3.4466395034174*^9, 3.4466395049462*^9}, 3.4466395515755997`*^9, { 3.4466396000176*^9, 3.4466396190808*^9}, {3.4466397459088*^9, 3.446639748826*^9}, {3.4466397974356003`*^9, 3.446639798668*^9}, 3.4466398447816*^9, {3.446639894218*^9, 3.4466399201556*^9}, { 3.4466399570964003`*^9, 3.4466399583288*^9}, {3.446639994006*^9, 3.4466400056904*^9}, {3.4466400383568*^9, 3.4466400395892*^9}, { 3.4466400745643997`*^9, 3.4466401025976*^9}, {3.4466401660834*^9, 3.4466401806070004`*^9}, {3.4466402251294003`*^9, 3.446640227407*^9}, { 3.446640260479*^9, 3.4466402657674*^9}, {3.4466404133122*^9, 3.4466405185654*^9}, 3.4466405830462*^9, {3.4467273294214*^9, 3.4467273777813997`*^9}, {3.4467274366558*^9, 3.4467275620954*^9}, { 3.446727593311*^9, 3.4467277412614*^9}, {3.4467283334639997`*^9, 3.4467283356012*^9}, {3.4467283707636003`*^9, 3.4467283727604*^9}, { 3.4467289882664003`*^9, 3.4467291276836*^9}, {3.446778464322*^9, 3.4467786797424*^9}, {3.4467801953803997`*^9, 3.4467802409792*^9}, { 3.4467802998691998`*^9, 3.4467804023456*^9}, 3.4467804345596*^9, { 3.4467808656344*^9, 3.4467808670852003`*^9}, 3.4467818107525997`*^9, { 3.446781855509*^9, 3.446781874385*^9}, {3.4467826737914*^9, 3.4467827381726*^9}, {3.4467828623018*^9, 3.4467831045386*^9}, { 3.4470344113984003`*^9, 3.4470344123344*^9}, {3.4470344628316*^9, 3.4470345343108*^9}, {3.447043591118539*^9, 3.447043642192939*^9}, { 3.447045649625739*^9, 3.447045718437339*^9}, {3.447054774023939*^9, 3.447054834198939*^9}, {3.4470549103449388`*^9, 3.4470549116169386`*^9}, { 3.447054943902939*^9, 3.4470553027109385`*^9}, {3.447055334559939*^9, 3.447055353684939*^9}, {3.447057311918539*^9, 3.447057369747739*^9}, { 3.4470575058577385`*^9, 3.4470575951365385`*^9}, {3.4470581848789387`*^9, 3.4470582040825386`*^9}, {3.451276121243*^9, 3.4512761425838003`*^9}, { 3.4512762022382*^9, 3.4512762064346*^9}, {3.4512762476966*^9, 3.4512762827654*^9}, {3.451276489091*^9, 3.451276541975*^9}, { 3.4512765853118*^9, 3.4512766132046003`*^9}, {3.4512773470306*^9, 3.4512773766082*^9}, {3.4512776069110003`*^9, 3.4512777499318*^9}, 3.4512777831286*^9, {3.4512778785538*^9, 3.451277881627*^9}, { 3.4512780242734003`*^9, 3.4512780302794*^9}, 3.4512780737878*^9, { 3.4512781866226*^9, 3.4512781930810003`*^9}, {3.4512863325078*^9, 3.4512863539266*^9}, {3.4568019250434*^9, 3.4568022712698*^9}, { 3.4568023177422*^9, 3.4568024125278*^9}, {3.4568024694365997`*^9, 3.4568024750369997`*^9}, {3.4568026914402*^9, 3.4568028101094*^9}, { 3.4568028406698*^9, 3.4568028564726*^9}, 3.4568028886085997`*^9, { 3.4568030489454*^9, 3.4568030800986*^9}, 3.4568032004128*^9, { 3.4568035073698*^9, 3.4568035176034*^9}, {3.4568040146596003`*^9, 3.4568040844852*^9}, {3.4568043016684*^9, 3.4568043154744*^9}, { 3.4568045482264*^9, 3.4568045486632*^9}, {3.4568048944996*^9, 3.4568049806116*^9}, {3.4660560628582*^9, 3.4660560753538*^9}, { 3.4660676729379997`*^9, 3.4660676735931997`*^9}, {3.4660677244024*^9, 3.4660677277251997`*^9}, {3.4742646771287394`*^9, 3.47426469439174*^9}, { 3.47426489921974*^9, 3.4742649800437393`*^9}, {3.4801246373348*^9, 3.4801246860536003`*^9}, {3.4801247748176003`*^9, 3.4801247821028*^9}, { 3.4801248161264*^9, 3.4801248295736*^9}, {3.4801248810692*^9, 3.4801248964508*^9}, {3.4801249330484*^9, 3.480124947884*^9}, 3.4801249886468*^9, {3.4801251139147997`*^9, 3.48012512588*^9}, { 3.4838339444988003`*^9, 3.4838339567448*^9}, 3.4838341692012*^9, { 3.4838344350408*^9, 3.4838344353684*^9}, {3.4938987575920324`*^9, 3.4938987586840324`*^9}, {3.4941630624049997`*^9, 3.4941631381274*^9}, { 3.4941632311345997`*^9, 3.4941632492306004`*^9}, 3.4941633249217997`*^9, { 3.4941633940922003`*^9, 3.4941634063538*^9}, {3.4941634538402*^9, 3.4941635051642*^9}, {3.494163565115*^9, 3.4941636341762*^9}, { 3.4941636853442*^9, 3.4941639323234*^9}, {3.4941640277798*^9, 3.4941641455754004`*^9}, {3.4941641790374002`*^9, 3.4941641803789997`*^9}, {3.4941642676142*^9, 3.4941643277678003`*^9}, 3.4941644677018003`*^9, {3.4941646208938*^9, 3.4941646322349997`*^9}, { 3.4941652592693996`*^9, 3.4941652807194*^9}, {3.4941653119038*^9, 3.494165416299*^9}, {3.494165453895*^9, 3.4941654544722*^9}, { 3.4950990979779997`*^9, 3.495099142701*^9}, {3.495099172958*^9, 3.4950991806289997`*^9}, {3.495099227097*^9, 3.495099238113*^9}, 3.495099290797*^9, {3.495099346084*^9, 3.495099359507*^9}, { 3.495099456308*^9, 3.495099464091*^9}, 3.495099683108*^9, { 3.495100428112*^9, 3.495100434958*^9}, {3.4951006496219997`*^9, 3.495100649992*^9}, {3.4987235265018*^9, 3.4987235939094*^9}, { 3.4987236420666*^9, 3.4987236530646*^9}, {3.4987237305341997`*^9, 3.4987237396914*^9}, {3.498733136159*^9, 3.4987332972446003`*^9}, { 3.4987364783094*^9, 3.4987364860626*^9}, {3.4987366201134*^9, 3.4987366236078*^9}, {3.4987367272386*^9, 3.4987367464890003`*^9}, { 3.4987369428462*^9, 3.4987369670886*^9}, {3.4987370134518003`*^9, 3.4987370259941998`*^9}, {3.4987370944002*^9, 3.4987371027618*^9}, { 3.4987371921029997`*^9, 3.498737193663*^9}, {3.4987372660938*^9, 3.4987372935498*^9}, {3.4987373290554*^9, 3.4987377176202*^9}, { 3.4987377520182*^9, 3.4987379139462*^9}, {3.4987382030216*^9, 3.4987382667078*^9}, {3.4987888391818*^9, 3.4987888608346*^9}, { 3.4988785131146*^9, 3.4988785160162*^9}, {3.5007170967096*^9, 3.5007170999076*^9}, 3.5007182237316*^9, {3.5007182772864*^9, 3.5007182987832003`*^9}, {3.5009573226744003`*^9, 3.5009573940444*^9}, 3.5009574358710003`*^9, 3.5009604278482*^9, {3.5009897246173353`*^9, 3.5009898480289354`*^9}, {3.5009901464413357`*^9, 3.5009901475333357`*^9}, {3.5009901801997356`*^9, 3.500990274096135*^9}, { 3.5010475253292*^9, 3.5010475852332*^9}, {3.5010605722018003`*^9, 3.5010606739762*^9}, {3.5010607202146*^9, 3.5010607323358*^9}, { 3.5010607920526*^9, 3.501061118467*^9}, {3.5010612022078*^9, 3.5010612277138*^9}, {3.5010616467766*^9, 3.5010617938534*^9}, { 3.5010618406222*^9, 3.5010619950778*^9}, {3.5010621500638*^9, 3.5010622514014*^9}, {3.5010625292218*^9, 3.5010625409374*^9}, { 3.5010626043046*^9, 3.5010626313862*^9}, {3.5010626787166*^9, 3.5010626790754004`*^9}, {3.501074457561*^9, 3.5010744671082*^9}, 3.5010763029458*^9, {3.5032210899309998`*^9, 3.5032212413900003`*^9}, { 3.557658203404973*^9, 3.557658219644601*^9}, {3.5576584433801947`*^9, 3.557658496030287*^9}, {3.5576585501779823`*^9, 3.5576586046064777`*^9}, { 3.557658648910555*^9, 3.557658754600741*^9}, {3.557658963945511*^9, 3.5576589782507353`*^9}, {3.557659009949991*^9, 3.5576591437514267`*^9}, { 3.557659182221094*^9, 3.5576592187719584`*^9}, 3.557659413865901*^9, { 3.557659921100792*^9, 3.5576599556392527`*^9}, {3.557660706920972*^9, 3.5576607248454037`*^9}, {3.557661209085854*^9, 3.557661209413454*^9}, { 3.5577526651911488`*^9, 3.5577526932087984`*^9}, {3.5577527272480583`*^9, 3.557752747122493*^9}, {3.5577528374934516`*^9, 3.557752838523053*^9}, { 3.557752881204728*^9, 3.557752891313546*^9}, {3.557752938612829*^9, 3.5577529469120436`*^9}, {3.557753060714244*^9, 3.557753062633047*^9}, { 3.5577536609544907`*^9, 3.5577536637936954`*^9}, {3.5577537824631042`*^9, 3.557753810184353*^9}, {3.557753841025607*^9, 3.5577540648392*^9}, 3.5577541920574236`*^9, {3.5577547033327217`*^9, 3.557754716967146*^9}, { 3.5577547716296415`*^9, 3.557754802112095*^9}, {3.5577549509363565`*^9, 3.5577549771444025`*^9}, 3.5577551382302856`*^9, {3.55775527184452*^9, 3.557755272858522*^9}, {3.557755881555991*^9, 3.557755886548*^9}, { 3.557756158316077*^9, 3.557756231885806*^9}, {3.5577572408487787`*^9, 3.557757248835993*^9}, {3.5577572834368534`*^9, 3.5577575888229895`*^9}, { 3.5577578129641833`*^9, 3.557757862837471*^9}, {3.557758025514557*^9, 3.557758079272251*^9}, 3.557810586960072*^9, {3.5578240262005973`*^9, 3.5578240345360737`*^9}, {3.557824091429328*^9, 3.5578241008156557`*^9}, { 3.557831525255726*^9, 3.5578315319793377`*^9}, 3.5578315716190076`*^9, { 3.557831606079468*^9, 3.557831629432709*^9}, {3.5578316663267736`*^9, 3.5578317569473333`*^9}, {3.5578322144181366`*^9, 3.557832218084143*^9}, { 3.557836356693412*^9, 3.557836473771618*^9}, {3.5578365201660995`*^9, 3.5578365974018345`*^9}, {3.5578366426731143`*^9, 3.557836658865943*^9}, { 3.557836691017599*^9, 3.5578367924957776`*^9}, {3.5578368305442443`*^9, 3.557836888279946*^9}, {3.5578369382156334`*^9, 3.5578370776642785`*^9}, { 3.5578383536061196`*^9, 3.5578383735117545`*^9}, {3.5578385892445335`*^9, 3.5578385978869486`*^9}, {3.5578386713006773`*^9, 3.557838700113928*^9}, { 3.5578387451200075`*^9, 3.5578387467892103`*^9}, {3.5578388951454706`*^9, 3.5578389248635225`*^9}, {3.5578389679351983`*^9, 3.557838983535226*^9}, { 3.5578390227692947`*^9, 3.557839023143696*^9}, {3.557839097696226*^9, 3.5578391125162525`*^9}, {3.5578391553539276`*^9, 3.557839199892006*^9}, { 3.55783924184048*^9, 3.557839294490572*^9}, {3.5578393285922318`*^9, 3.557839398683155*^9}, {3.557839430522811*^9, 3.557839470162481*^9}, { 3.5578395370865984`*^9, 3.5578395446994114`*^9}, {3.5578396068499207`*^9, 3.5578396118575296`*^9}, 3.5578943518105097`*^9, {3.557894388361374*^9, 3.5578944029629993`*^9}, {3.5578944607611012`*^9, 3.5578944989499683`*^9}, {3.5578945393696394`*^9, 3.557894561537278*^9}, { 3.5578946028617506`*^9, 3.5578946188985786`*^9}, {3.557894650894235*^9, 3.5578947812636642`*^9}, {3.55789481884413*^9, 3.5578948191249304`*^9}, { 3.5578949768100076`*^9, 3.5578949836272197`*^9}, {3.5578967386805477`*^9, 3.55789678549623*^9}, {3.5578968804691963`*^9, 3.557896888643611*^9}, { 3.557897022491846*^9, 3.5578970341450663`*^9}, {3.557897620940097*^9, 3.55789765120415*^9}, {3.5579218072271147`*^9, 3.5579218263059483`*^9}, { 3.557922095312821*^9, 3.557922116965659*^9}, {3.557922178086566*^9, 3.557922188616585*^9}, {3.5579223258812256`*^9, 3.557922327066828*^9}, { 3.5579224596046605`*^9, 3.557922461804264*^9}, 3.5579805928465395`*^9, { 3.5579815200581703`*^9, 3.557981541711009*^9}, 3.557985544779242*^9, { 3.5579863164793987`*^9, 3.5579863339514294`*^9}, {3.557986523210962*^9, 3.557986568841042*^9}, 3.5579866122559185`*^9, 3.557986993536188*^9, { 3.5579871244716187`*^9, 3.5579871290580263`*^9}, 3.557987173486905*^9, 3.5579872166989803`*^9, {3.5599618621582537`*^9, 3.5599618642486577`*^9}, { 3.559961969720443*^9, 3.5599619894700775`*^9}, 3.559963611089726*^9, { 3.5601298891258235`*^9, 3.560129889422224*^9}, {3.560132445157113*^9, 3.5601324458591146`*^9}, {3.561978472080926*^9, 3.561978472392926*^9}, { 3.6297802564412937`*^9, 3.6297802957377625`*^9}, {3.62978033369263*^9, 3.629780429741998*^9}, {3.6297805790030603`*^9, 3.6297809429048996`*^9}, { 3.629780987957779*^9, 3.629781197575347*^9}, {3.629781240397422*^9, 3.629781337663593*^9}, {3.6297813946972933`*^9, 3.6297814529165955`*^9}, { 3.6297814952550697`*^9, 3.629781527578326*^9}, {3.62978162025529*^9, 3.629781647633338*^9}, {3.629781678833393*^9, 3.629781763120341*^9}, 3.6297818028224106`*^9, {3.6297818432108817`*^9, 3.629781872570133*^9}, { 3.629782355765382*^9, 3.629782427603508*^9}, {3.6297824692243814`*^9, 3.629782674863942*^9}, {3.629782707218399*^9, 3.6297829295343895`*^9}, { 3.629783005631323*^9, 3.6297830574702144`*^9}, {3.6297831098551064`*^9, 3.629783142786764*^9}, {3.629783433711675*^9, 3.629783442619291*^9}, { 3.6297834942397814`*^9, 3.6297835175930223`*^9}, 3.6297835794939313`*^9, { 3.6297836160291953`*^9, 3.6297837668970604`*^9}, {3.6297842042438283`*^9, 3.6297842697483435`*^9}, {3.6297843514456873`*^9, 3.629784370742921*^9}, { 3.629784443829049*^9, 3.6297844678842916`*^9}, {3.6297845252611923`*^9, 3.629784525588793*^9}, {3.6297846136821475`*^9, 3.629784629235375*^9}, { 3.629784814797701*^9, 3.629784927648299*^9}, {3.629785259960083*^9, 3.6297852602096834`*^9}, {3.6297858780175686`*^9, 3.629785917282837*^9}, { 3.629786048057867*^9, 3.629786048681868*^9}, 3.6297863278755584`*^9, { 3.6297867047133856`*^9, 3.629786748533863*^9}, {3.6297867791567163`*^9, 3.6297868491540394`*^9}, {3.6297875320748396`*^9, 3.629787569795706*^9}, { 3.6297876247234025`*^9, 3.6297877281983843`*^9}, {3.6297877681812544`*^9, 3.629787774015665*^9}, {3.629787831408166*^9, 3.6297878355265727`*^9}, { 3.6297878775686464`*^9, 3.6297878861174617`*^9}, {3.6297879185343184`*^9, 3.629787919064719*^9}, {3.6297880043032694`*^9, 3.62978800470887*^9}, 3.6297880488257475`*^9, {3.6297882100052304`*^9, 3.6297882174776435`*^9}, { 3.6297882697533355`*^9, 3.6297882948381796`*^9}, {3.6297883467550707`*^9, 3.6297883991087627`*^9}, {3.6297887361785545`*^9, 3.629788783961438*^9}, 3.629788825395111*^9, {3.629789006152629*^9, 3.6297890321266747`*^9}, { 3.6297891133248167`*^9, 3.629789145336073*^9}, {3.6297891926821566`*^9, 3.629789194257759*^9}, {3.629789255316266*^9, 3.6297892556282673`*^9}, { 3.629869102295367*^9, 3.629869160124668*^9}, {3.6298691942887287`*^9, 3.6298696149902673`*^9}, {3.6298696993864155`*^9, 3.62986975897852*^9}, { 3.6298698387726603`*^9, 3.629869912030389*^9}, {3.6298700722270703`*^9, 3.629870234560955*^9}, {3.629870580429163*^9, 3.629870630458451*^9}, { 3.630556081081209*^9, 3.630556104902451*^9}, {3.6305562643503313`*^9, 3.6305562763935523`*^9}, {3.6305563415080667`*^9, 3.630556480956712*^9}, { 3.630556692851884*^9, 3.630556695347888*^9}, {3.630556730042349*^9, 3.630556914528273*^9}, {3.6305653725974936`*^9, 3.6305656807121167`*^9}, { 3.630565758760581*^9, 3.6305657739024467`*^9}, {3.630565858170267*^9, 3.63056596644846*^9}, {3.6305661502619734`*^9, 3.6305661523230915`*^9}, { 3.6305662653385553`*^9, 3.630566370352562*^9}, {3.6305667786019125`*^9, 3.630566790535595*^9}, {3.6305668214773645`*^9, 3.630567044691132*^9}, { 3.6305670772499943`*^9, 3.6305670783710585`*^9}, 3.630567272031135*^9, { 3.630567303902958*^9, 3.630567409875019*^9}, {3.630568671196477*^9, 3.6305687195002403`*^9}, {3.6305687542132254`*^9, 3.630568758623478*^9}, { 3.630568855671028*^9, 3.630568859250233*^9}, {3.630569706514694*^9, 3.630569775526641*^9}, 3.630569982346471*^9, {3.6305701679130845`*^9, 3.630570205199217*^9}, {3.6305703751399374`*^9, 3.630570526177576*^9}, { 3.630587657039589*^9, 3.630587688367381*^9}, {3.6305880733027773`*^9, 3.6305883365376396`*^9}, {3.6305886689118233`*^9, 3.6305886717978287`*^9}, 3.6305889776831656`*^9, {3.6305890389444733`*^9, 3.6305890437180815`*^9}, { 3.630589093248169*^9, 3.6305891296430326`*^9}, 3.630589181700324*^9, { 3.6305892509956455`*^9, 3.6305892594820604`*^9}, {3.630589318949365*^9, 3.6305893334729905`*^9}, {3.630589630294712*^9, 3.6305896376267247`*^9}, { 3.630589683288005*^9, 3.630589684988408*^9}, {3.630597310538067*^9, 3.630597340080757*^9}, {3.630597391446695*^9, 3.630597400596218*^9}, { 3.6305974350611897`*^9, 3.6305974605306463`*^9}, {3.630633997622449*^9, 3.630634003125764*^9}, {3.630659322217756*^9, 3.63065932438616*^9}, { 3.6306611578252783`*^9, 3.6306611625988865`*^9}, {3.6306612541554475`*^9, 3.630661257587454*^9}, {3.6306613001287284`*^9, 3.6306613026715326`*^9}, { 3.6306613920752897`*^9, 3.6306613949768953`*^9}, {3.6306706377509866`*^9, 3.630670654957817*^9}, {3.6306749981919994`*^9, 3.630675005793434*^9}, { 3.6306751229631357`*^9, 3.630675150017683*^9}, {3.6306752035287437`*^9, 3.6306752096180925`*^9}, {3.630675315921172*^9, 3.6306753201514144`*^9}, { 3.6306757793287754`*^9, 3.6306757796257925`*^9}, {3.630675814406262*^9, 3.6306758147026625`*^9}, {3.6306760107574763`*^9, 3.6306760154417443`*^9}, {3.6306789722320743`*^9, 3.6306789870309205`*^9}, {3.6306790257051325`*^9, 3.630679028076268*^9}, { 3.6306800259177256`*^9, 3.6306800406129513`*^9}, {3.6306801239326982`*^9, 3.6306801300167084`*^9}, {3.630680769261832*^9, 3.6306807806186523`*^9}, { 3.630681157468514*^9, 3.6306811577649145`*^9}, {3.6306812744219193`*^9, 3.63068127471832*^9}, {3.6306817187418995`*^9, 3.6306817919060287`*^9}, { 3.630681879188182*^9, 3.6306819111526375`*^9}, {3.6306821191790032`*^9, 3.6306821283050194`*^9}, {3.630720543651497*^9, 3.6307205534300566`*^9}, { 3.630721035525631*^9, 3.630721092774905*^9}, {3.6307212510439577`*^9, 3.6307213064777765`*^9}, {3.6307477437169704`*^9, 3.6307478284095197`*^9}, {3.6307478614971776`*^9, 3.6307478785948076`*^9}, {3.6307479884814005`*^9, 3.630748002880226*^9}, { 3.630748045624301*^9, 3.630748063876333*^9}, {3.630748111596817*^9, 3.6307481498324842`*^9}, {3.6307489182430334`*^9, 3.6307489447786803`*^9}, {3.630749037427243*^9, 3.6307490443848553`*^9}, { 3.6307491041485605`*^9, 3.6307491384218206`*^9}, {3.6307491914151134`*^9, 3.630749196890723*^9}, {3.6307492445800066`*^9, 3.6307493439989815`*^9}, { 3.630749396212273*^9, 3.6307494766304145`*^9}, {3.6307495333989143`*^9, 3.6307495547241516`*^9}, {3.6307496525831237`*^9, 3.630749669571553*^9}, { 3.630750220602922*^9, 3.6307502881822405`*^9}, {3.6307510631916018`*^9, 3.630751068292811*^9}, {3.6307511226589065`*^9, 3.630751137962533*^9}, { 3.6307512555243397`*^9, 3.630751282777588*^9}, {3.630752266971757*^9, 3.630752414599744*^9}, {3.630752446407563*^9, 3.630752457388191*^9}, { 3.6307589380050273`*^9, 3.6307590266300964`*^9}, {3.6307591666721067`*^9, 3.63075923229886*^9}, 3.630760288282259*^9, {3.6307603547370596`*^9, 3.630760557414652*^9}, {3.630760654134184*^9, 3.63076065510824*^9}, { 3.6307606911683025`*^9, 3.6307606919283457`*^9}, {3.6307607642334814`*^9, 3.6307607648645177`*^9}, {3.630761455000991*^9, 3.6307614616743727`*^9}, { 3.630761507825012*^9, 3.630761605776615*^9}, {3.630761652999316*^9, 3.630761695865768*^9}, {3.630761771278081*^9, 3.6307617792215357`*^9}, 3.6307629478424797`*^9, {3.632205207880766*^9, 3.6322052561155243`*^9}, { 3.6322052892474194`*^9, 3.6322052915745525`*^9}, 3.6322053746993074`*^9, { 3.6322062705415463`*^9, 3.6322062726016645`*^9}, {3.6322063396935015`*^9, 3.63220636484194*^9}, {3.6322064410612993`*^9, 3.6322064491667633`*^9}, { 3.632206580308264*^9, 3.6322066373275256`*^9}, {3.6322066736436024`*^9, 3.6322067467737856`*^9}, {3.632206782260815*^9, 3.6322071351279984`*^9}, 3.6322071989226465`*^9, {3.632207270393735*^9, 3.6322073359894867`*^9}, { 3.6322073997741346`*^9, 3.6322074126708727`*^9}, {3.632207491777397*^9, 3.632207682289294*^9}, {3.632207809621577*^9, 3.632207827973626*^9}, { 3.6322079043859973`*^9, 3.6322079279443445`*^9}, {3.6322080916397076`*^9, 3.6322081666649985`*^9}, 3.634905258940913*^9, {3.634905370524296*^9, 3.6349054089004903`*^9}, {3.6349054472556844`*^9, 3.63490544787272*^9}, { 3.634905483492757*^9, 3.6349055164646425`*^9}, {3.634905574352954*^9, 3.634905628121029*^9}, {3.6349057012822137`*^9, 3.6349057207913294`*^9}, { 3.6349061371061416`*^9, 3.634906354438572*^9}, {3.6349063890455513`*^9, 3.6349064369332905`*^9}, {3.634906537696054*^9, 3.634906601859724*^9}, 3.634906706128688*^9, {3.6349069249442034`*^9, 3.6349069328326545`*^9}, { 3.6349070151973653`*^9, 3.6349070242298822`*^9}, {3.6349070817921743`*^9, 3.6349070822111983`*^9}, {3.634907723288866*^9, 3.634907739005765*^9}, { 3.6349079580732946`*^9, 3.6349079868219395`*^9}, {3.634908200284148*^9, 3.634908315195721*^9}, {3.6349083774582825`*^9, 3.6349084027997313`*^9}, { 3.63490844507615*^9, 3.634908448843365*^9}, {3.634914956333157*^9, 3.634915020054802*^9}, {3.634915050572547*^9, 3.6349150956171236`*^9}, { 3.6349539785771523`*^9, 3.634953978975175*^9}, {3.6349540728785458`*^9, 3.6349541681829967`*^9}, {3.634954211263461*^9, 3.6349542495746527`*^9}, { 3.6349543251259737`*^9, 3.634954355882733*^9}, {3.6349543892536416`*^9, 3.6349544742835045`*^9}, {3.634954547519694*^9, 3.6349545640246377`*^9}, { 3.6349547051657104`*^9, 3.6349547107930326`*^9}, {3.634954745355009*^9, 3.634954752101395*^9}, {3.6349547948858423`*^9, 3.6349548053894434`*^9}, { 3.634954904907135*^9, 3.6349549451084347`*^9}, {3.634955219605135*^9, 3.6349552640926795`*^9}, {3.634955320189888*^9, 3.634955348763522*^9}, { 3.634955386393675*^9, 3.6349555039273973`*^9}, {3.6349557669644423`*^9, 3.6349557672004557`*^9}, {3.634955894841756*^9, 3.634955902578199*^9}, { 3.6349559513739896`*^9, 3.6349560216320086`*^9}, {3.634956120144643*^9, 3.634956128996149*^9}, {3.6349561700724983`*^9, 3.6349561978900895`*^9}, { 3.6349562480719595`*^9, 3.634956254326318*^9}, {3.634956331684742*^9, 3.6349563460575643`*^9}, {3.634956379242462*^9, 3.63495642676418*^9}, 3.6349564696636343`*^9, {3.6351524116477795`*^9, 3.6351524153379908`*^9}, { 3.6352134400282927`*^9, 3.635213442148414*^9}, {3.6352134745862694`*^9, 3.635213495869487*^9}, {3.6352135383409157`*^9, 3.6352137157160616`*^9}, { 3.6352137493569856`*^9, 3.635213764522853*^9}, {3.635214215036621*^9, 3.635214227593339*^9}, {3.635214407257615*^9, 3.63521441713218*^9}, { 3.635215297101512*^9, 3.635215303964904*^9}, {3.6352154111120324`*^9, 3.635215431504199*^9}, {3.635216346055508*^9, 3.635216494371991*^9}, { 3.635216631050809*^9, 3.6352166603244834`*^9}, {3.635216763034358*^9, 3.635216764164423*^9}, {3.6352168771938877`*^9, 3.635216888828553*^9}, 3.6352169832479534`*^9, 3.635217037668066*^9, {3.6352172024924936`*^9, 3.6352172054526625`*^9}, {3.635217344025589*^9, 3.635217346898753*^9}, 3.6352173863770113`*^9, {3.635217519639633*^9, 3.6352175507014103`*^9}, 3.635217615445113*^9, {3.6352178715087595`*^9, 3.635217880460271*^9}, { 3.6352185912849283`*^9, 3.635218598444338*^9}, {3.6352186995721216`*^9, 3.635218714955002*^9}, {3.6352189761749425`*^9, 3.6352189789341*^9}, { 3.6352195060322485`*^9, 3.635219509972474*^9}, 3.6352195673477554`*^9, 3.6352195994635925`*^9, {3.6352197336482677`*^9, 3.635219737452485*^9}, { 3.6352197706093817`*^9, 3.6352197723214793`*^9}, {3.635219941784172*^9, 3.6352199485115566`*^9}, {3.6352200714185867`*^9, 3.6352200854323883`*^9}, {3.6352202085694313`*^9, 3.635220235849992*^9}, { 3.6352202816336107`*^9, 3.6352203110962954`*^9}, {3.6352204980449886`*^9, 3.6352205276526823`*^9}, {3.6352253191447396`*^9, 3.6352253299913597`*^9}, {3.6352253611111403`*^9, 3.6352253637572913`*^9}, {3.635225409322898*^9, 3.6352255965196047`*^9}, { 3.6352260914249115`*^9, 3.6352261698393965`*^9}, {3.63522638233055*^9, 3.6352264188036366`*^9}, {3.635227493469104*^9, 3.635227556935734*^9}, { 3.6352276745764627`*^9, 3.635227730116639*^9}, {3.6352287979917183`*^9, 3.6352288587651944`*^9}, {3.635228894237223*^9, 3.635228948324317*^9}, { 3.635229365252164*^9, 3.6352293902275925`*^9}, {3.63522947690555*^9, 3.6352294807837715`*^9}, {3.6352492831123204`*^9, 3.6352492983621926`*^9}, 3.6356569054520617`*^9, {3.6363778004499054`*^9, 3.636377802787039*^9}, { 3.6363778414932528`*^9, 3.6363778525308843`*^9}, {3.636384436335312*^9, 3.6363846409950175`*^9}, {3.636384971250907*^9, 3.6363849738080535`*^9}, { 3.6363850170465264`*^9, 3.636385030729309*^9}, {3.6363851286779118`*^9, 3.636385138359465*^9}, {3.6363851699712734`*^9, 3.636385223111313*^9}, { 3.656076172452749*^9, 3.656076182171566*^9}, {3.6560765578514256`*^9, 3.656076619019133*^9}, 3.6560772545486493`*^9, {3.6630719749029694`*^9, 3.6630719878027077`*^9}, {3.6630720702554235`*^9, 3.6630720807290225`*^9}, {3.6630721155740156`*^9, 3.6630721713712068`*^9}, {3.663072270834896*^9, 3.6630722882218904`*^9}, 3.6630724099968557`*^9, {3.685234767958906*^9, 3.685234768480936*^9}, { 3.685252204033695*^9, 3.6852522340537376`*^9}, {3.6852522757137957`*^9, 3.6852523115138454`*^9}, {3.68525376314359*^9, 3.6852537725041256`*^9}, { 3.6852539763277836`*^9, 3.6852539861693463`*^9}, 3.6852540682470407`*^9, 3.6852541660656357`*^9, {3.6852604801645336`*^9, 3.6852605060345697`*^9}, { 3.6852605373446136`*^9, 3.6852605977846985`*^9}, 3.685260655254779*^9, { 3.6853280002218475`*^9, 3.685328019561875*^9}, 3.685328064721938*^9, { 3.6853280953119807`*^9, 3.6853282636022167`*^9}, {3.685328356242346*^9, 3.685328598671985*^9}, {3.6853286682069626`*^9, 3.6853287982524004`*^9}, { 3.6853288753368096`*^9, 3.6853289367033195`*^9}, {3.685328968274125*^9, 3.685328978713722*^9}, {3.685329033941881*^9, 3.685329044950511*^9}, { 3.685329173522865*^9, 3.6853294420842257`*^9}, {3.6853296024223967`*^9, 3.6853296124319687`*^9}, {3.6853297221712456`*^9, 3.685329733349885*^9}, { 3.6853298076291337`*^9, 3.6853298739599276`*^9}, {3.685330038474337*^9, 3.685330051652091*^9}, {3.6853311309428225`*^9, 3.685331168378964*^9}, { 3.685340142134763*^9, 3.685340180544817*^9}, {3.6853583292043543`*^9, 3.685358334834362*^9}, {3.685358366084406*^9, 3.685358366954407*^9}, { 3.685358408404465*^9, 3.685358518294619*^9}, 3.685358620174762*^9, 3.6853586578748145`*^9, {3.6853588750151186`*^9, 3.6853588857151337`*^9}, { 3.6853589302051954`*^9, 3.685358938995208*^9}, {3.685359014715314*^9, 3.6853590296653347`*^9}, 3.685359148315501*^9, 3.6853598281764526`*^9, { 3.6853683109000263`*^9, 3.685368382250126*^9}, {3.685368420160179*^9, 3.6853684704302497`*^9}, {3.6853685194503183`*^9, 3.685368742860631*^9}, { 3.685369008901004*^9, 3.68536902061102*^9}, {3.6853690791611023`*^9, 3.685369132301176*^9}, {3.6853693219914417`*^9, 3.6853693304114532`*^9}, 3.6853696089118433`*^9, {3.6858758911429157`*^9, 3.685875951793*^9}, { 3.6859484099082212`*^9, 3.6859484970032024`*^9}, {3.686052829875022*^9, 3.686052906242383*^9}, {3.6860535326822133`*^9, 3.686053598029951*^9}, { 3.68605365168902*^9, 3.6860541446091995`*^9}, {3.6860541846064873`*^9, 3.68605440393201*^9}, {3.686054713802734*^9, 3.6860547858298535`*^9}, { 3.6860548280202665`*^9, 3.686054837219793*^9}, {3.686054874127904*^9, 3.686054892139934*^9}, {3.686055136014883*^9, 3.6860551460584574`*^9}, { 3.686055211281188*^9, 3.6860552301962633`*^9}, {3.6860553465409174`*^9, 3.6860553998749685`*^9}, {3.6860556017188663`*^9, 3.6860556050188704`*^9}, {3.6862923512707715`*^9, 3.686292363600789*^9}, { 3.686292409650853*^9, 3.6862924109708548`*^9}, {3.6862924536109147`*^9, 3.6862924596309233`*^9}, {3.686292542221039*^9, 3.6862925430110397`*^9}, { 3.686292988803664*^9, 3.686293001033681*^9}, {3.6866504529025555`*^9, 3.686650526682659*^9}, {3.686650671852862*^9, 3.6866507242929354`*^9}, { 3.6866507657529936`*^9, 3.6866507887630253`*^9}, {3.6866508208230705`*^9, 3.6866509100531955`*^9}, {3.6866509593932643`*^9, 3.686650971113281*^9}, { 3.686651007793332*^9, 3.6866511595335445`*^9}, {3.686651223513634*^9, 3.686651234033649*^9}, {3.686651304763748*^9, 3.6866513363837924`*^9}, { 3.6866514102038956`*^9, 3.686651429943923*^9}, {3.686652993837468*^9, 3.6866530046274834`*^9}, {3.686804398511652*^9, 3.6868044081516657`*^9}, { 3.6868046315619783`*^9, 3.686804631801979*^9}, {3.686804685872054*^9, 3.686804707092084*^9}, {3.6868047382021275`*^9, 3.686804767812169*^9}, { 3.686804824012248*^9, 3.6868048404922705`*^9}, {3.686804942142413*^9, 3.6868049633424425`*^9}, {3.6868050765526013`*^9, 3.686805101092636*^9}, { 3.6868051463526993`*^9, 3.6868052234228067`*^9}, {3.686805307602925*^9, 3.686805311682931*^9}, {3.68680577547358*^9, 3.686805788923599*^9}, { 3.686821702197342*^9, 3.6868217282873783`*^9}, {3.6868225192884855`*^9, 3.686822538368512*^9}, {3.6868226306886415`*^9, 3.6868226683086944`*^9}, { 3.6868227318887835`*^9, 3.6868227627088265`*^9}, {3.686822801638881*^9, 3.6868230490692277`*^9}, {3.686823122979331*^9, 3.6868231833294153`*^9}, { 3.6868232450595016`*^9, 3.6868233753996844`*^9}, {3.6868234153897405`*^9, 3.686823451379791*^9}, {3.6868236736101017`*^9, 3.6868236786601086`*^9}, { 3.6868237164601617`*^9, 3.68682375072021*^9}, {3.68682389396041*^9, 3.68682390087042*^9}, {3.686823940790476*^9, 3.6868239416904774`*^9}, { 3.6868239808805323`*^9, 3.6868239872905407`*^9}, {3.686824051540631*^9, 3.6868240519006314`*^9}, {3.686824360861064*^9, 3.6868243761510854`*^9}, { 3.6868245440213203`*^9, 3.686824577221367*^9}, {3.686824685841519*^9, 3.6868246979115357`*^9}, 3.6868248012716804`*^9, 3.6868253582724605`*^9, { 3.6868255183026843`*^9, 3.686825518932685*^9}, {3.6868264466639843`*^9, 3.6868264497139883`*^9}, {3.6868267792744493`*^9, 3.6868268152945004`*^9}, {3.686827100164899*^9, 3.6868271210549283`*^9}, 3.686827162004986*^9, {3.6868272414950967`*^9, 3.686827327475217*^9}, { 3.686827953126093*^9, 3.686827976506126*^9}, {3.686829128577739*^9, 3.686829138957753*^9}, 3.6868292410978966`*^9, {3.6868292768379464`*^9, 3.686829282727955*^9}, {3.6868293820380936`*^9, 3.686829418138144*^9}, { 3.686829846748744*^9, 3.686829848298746*^9}, {3.6868313063207874`*^9, 3.686831307180789*^9}, {3.6868331276633377`*^9, 3.68683328653356*^9}, { 3.6868394697195063`*^9, 3.6868394933895392`*^9}, 3.686839530999592*^9, { 3.686839582829664*^9, 3.68683963686974*^9}, {3.6868397551199055`*^9, 3.68683979365996*^9}, {3.6868398344600167`*^9, 3.686839866200061*^9}, { 3.687092084401948*^9, 3.687092117031994*^9}, {3.6870922598621936`*^9, 3.6870922645422*^9}, {3.6870962086478376`*^9, 3.6870962658779182`*^9}, 3.687096444838168*^9, {3.687096500978247*^9, 3.687096501638248*^9}, { 3.6870965809883595`*^9, 3.687096592708376*^9}, 3.687096837948719*^9, { 3.68709688890879*^9, 3.687096985798926*^9}, {3.6870971015990877`*^9, 3.6870972179192505`*^9}, {3.6870972618993125`*^9, 3.687097305639374*^9}, { 3.6870973356794157`*^9, 3.6870975186496716`*^9}, {3.6870975796097574`*^9, 3.6870975953197794`*^9}, {3.6870976531898603`*^9, 3.6870976848899045`*^9}, 3.6870977782500353`*^9, {3.687413757687042*^9, 3.6874137834070783`*^9}, { 3.6874140542074575`*^9, 3.687414094417514*^9}, {3.6874143478878684`*^9, 3.687414485538061*^9}, {3.6874146116082373`*^9, 3.68741464894829*^9}, { 3.6874147451084247`*^9, 3.687414766118454*^9}, 3.6874149094486547`*^9, { 3.6874150416688395`*^9, 3.6874150634888706`*^9}, {3.6874152437091227`*^9, 3.687415268869158*^9}, 3.6874153442892637`*^9, {3.687415449879411*^9, 3.687415469659439*^9}, 3.687415529739523*^9, 3.687415564789572*^9, 3.687415645529685*^9, {3.6874168016913037`*^9, 3.687416803441306*^9}, { 3.687421022677213*^9, 3.6874212686075573`*^9}, {3.68742948209425*^9, 3.6874294906842623`*^9}, {3.687844340668378*^9, 3.6878443698084188`*^9}, { 3.6886534778571014`*^9, 3.6886534911571198`*^9}, {3.688906380162199*^9, 3.6889064680223217`*^9}, {3.688906514222396*^9, 3.6889065193925257`*^9}, { 3.688908192623024*^9, 3.6889082006430354`*^9}, {3.688908261823121*^9, 3.688908271653135*^9}, {3.6889083776232834`*^9, 3.6889083922733035`*^9}, { 3.688908466073407*^9, 3.6889084993734536`*^9}, 3.688908533623502*^9, { 3.688908616683618*^9, 3.6889086271336327`*^9}, {3.6889086885637183`*^9, 3.6889087063437433`*^9}, {3.6889091647443852`*^9, 3.6889092012544365`*^9}, {3.6889093019045773`*^9, 3.6889093406746316`*^9}, 3.6889101071957045`*^9, {3.689905940063133*^9, 3.689905972983179*^9}, { 3.692530981927737*^9, 3.6925310416778207`*^9}, {3.692531099797902*^9, 3.6925311384779563`*^9}, {3.692531192258032*^9, 3.692531244668105*^9}, { 3.6925312919881716`*^9, 3.692531425418358*^9}, {3.6925315270885005`*^9, 3.692531643928664*^9}, {3.692535489534048*^9, 3.6925356485142703`*^9}, { 3.692535753564418*^9, 3.6925357992544813`*^9}, {3.6925358831745987`*^9, 3.692535899604622*^9}, {3.692536042584822*^9, 3.692536159384986*^9}, { 3.6925366121156197`*^9, 3.6925366207256317`*^9}, {3.6925367265057793`*^9, 3.69253672683578*^9}, {3.6925368590559654`*^9, 3.6925368636559715`*^9}, { 3.6925370880062857`*^9, 3.692537177856412*^9}, {3.692537322456614*^9, 3.6925373869767046`*^9}, {3.6925390913352747`*^9, 3.6925390925252767`*^9}, {3.692539644430175*^9, 3.6925396711502123`*^9}, { 3.692539727510291*^9, 3.692539730440295*^9}, {3.69253993367058*^9, 3.692539963780622*^9}, {3.6925400018406754`*^9, 3.692540003630678*^9}, { 3.6925401743409166`*^9, 3.6925401747509174`*^9}, {3.692540399111232*^9, 3.692540407981244*^9}, {3.69254047647134*^9, 3.6925404886113567`*^9}, { 3.6925406039715185`*^9, 3.69254060531152*^9}, {3.6925414948727655`*^9, 3.6925414953427663`*^9}, {3.6925415478528395`*^9, 3.692541613062931*^9}, 3.692541649332982*^9, {3.692541727633092*^9, 3.6925418840133104`*^9}, { 3.692541924473367*^9, 3.692542041693531*^9}, {3.6925421488836813`*^9, 3.6925422549438295`*^9}, {3.6925422976938896`*^9, 3.692542521444203*^9}, { 3.6925426221843443`*^9, 3.6925426357343626`*^9}, 3.692542739374508*^9, 3.692599799510878*^9, {3.692599834884901*^9, 3.6925998954663663`*^9}, { 3.692599925635092*^9, 3.6926000095928946`*^9}, {3.692600108929576*^9, 3.6926001456386757`*^9}, {3.6926001874800687`*^9, 3.692600454421337*^9}, { 3.692600503149027*^9, 3.6926006000391626`*^9}, {3.692600680251275*^9, 3.6926006814012766`*^9}, {3.6926009000215826`*^9, 3.6926009410816402`*^9}, 3.692601280532116*^9, {3.6926044914726114`*^9, 3.69260449774262*^9}, 3.6926045660127153`*^9, 3.6926046690228596`*^9, {3.69296647863291*^9, 3.6929664798829117`*^9}, {3.6929665643330297`*^9, 3.6929666141830997`*^9}, {3.6929670390036945`*^9, 3.6929670405536966`*^9}, {3.6929670861037607`*^9, 3.6929670952937737`*^9}, {3.6929671302538223`*^9, 3.6929671549438567`*^9}, {3.6929671904739065`*^9, 3.69296722137395*^9}, { 3.6929672596240034`*^9, 3.6929673352541094`*^9}, 3.6929678909232683`*^9, { 3.6930146982034283`*^9, 3.693014722713463*^9}, {3.6930148540136466`*^9, 3.693014857023651*^9}, {3.6930148913836985`*^9, 3.693014894823704*^9}, { 3.693014930903754*^9, 3.6930151942541227`*^9}, {3.693015247824198*^9, 3.693015430554454*^9}, {3.693015673794794*^9, 3.69301579223496*^9}, { 3.6930163123576884`*^9, 3.693016326897709*^9}, {3.6930164225678425`*^9, 3.693016429727853*^9}, {3.693016686718212*^9, 3.693016698128228*^9}, { 3.693016737038283*^9, 3.693016755068308*^9}, {3.6930168429225607`*^9, 3.6930168719926014`*^9}, {3.6930172049430676`*^9, 3.693017284063178*^9}, { 3.693017336433252*^9, 3.6930173662532935`*^9}, {3.6930180949163136`*^9, 3.6930180975563173`*^9}, {3.6930181870764427`*^9, 3.693018199956461*^9}, { 3.6930182954065943`*^9, 3.693018305996609*^9}, {3.693139886141657*^9, 3.6931399045016823`*^9}, {3.6931402916003532`*^9, 3.693140295770359*^9}, { 3.693140426020541*^9, 3.693140426530542*^9}, {3.6931410492237864`*^9, 3.6931410888738413`*^9}, {3.6931411194438844`*^9, 3.693141126553894*^9}, { 3.693141412004294*^9, 3.693141454164353*^9}, {3.6931415979955544`*^9, 3.6931417931758275`*^9}, {3.6932199559445915`*^9, 3.6932199772046213`*^9}, {3.6932201435748544`*^9, 3.693220170284892*^9}, { 3.693220713855653*^9, 3.693220721825664*^9}, {3.693625124589745*^9, 3.693625153729786*^9}, {3.6940907995669713`*^9, 3.6940909688872085`*^9}, { 3.6940913675677667`*^9, 3.6940914223978434`*^9}, {3.694091508037963*^9, 3.694091572118053*^9}, 3.694092009628666*^9, {3.6940920553287296`*^9, 3.694092229168973*^9}, {3.6940923053990793`*^9, 3.694092374419176*^9}, { 3.6940924537392874`*^9, 3.694092457789293*^9}, 3.694092642849552*^9, { 3.6940928573598523`*^9, 3.694092862379859*^9}, {3.6940945886222763`*^9, 3.694094601932295*^9}, 3.694094849542641*^9, {3.694095764293922*^9, 3.6940957644739223`*^9}, {3.6940960602743363`*^9, 3.6940960732243547`*^9}, {3.6940961211044216`*^9, 3.694096124194426*^9}, { 3.694665030960044*^9, 3.6946650634500895`*^9}, {3.6946652071402903`*^9, 3.6946653490404887`*^9}, {3.6946658702212186`*^9, 3.6946658881212435`*^9}, {3.694665923041292*^9, 3.694665953561335*^9}, { 3.694665995981395*^9, 3.6946660149414215`*^9}, {3.694666050571471*^9, 3.6946660547214766`*^9}, {3.694666169991638*^9, 3.694666292151809*^9}, { 3.6946663456618843`*^9, 3.6946663943919525`*^9}, 3.6946667526224537`*^9, 3.69466680700253*^9, 3.694687076625702*^9, {3.6946874316161985`*^9, 3.6946874621962414`*^9}, 3.694687499496294*^9, {3.694687567516389*^9, 3.694687642816495*^9}, {3.694687679006545*^9, 3.6946877198966026`*^9}, { 3.6946877714966745`*^9, 3.694687931746899*^9}, {3.723798739728607*^9, 3.723798744014243*^9}, {3.7237990126446104`*^9, 3.723799023974499*^9}, { 3.7244116671877546`*^9, 3.7244116733393917`*^9}, {3.724411761793063*^9, 3.7244117718753977`*^9}, {3.724411928386671*^9, 3.7244119682966137`*^9}, { 3.724412131847311*^9, 3.724412188341254*^9}, {3.729414981357122*^9, 3.7294149861075096`*^9}, {3.749817651293678*^9, 3.749817653108206*^9}, { 3.7498176831919456`*^9, 3.7498176846222315`*^9}, 3.7498177601545563`*^9, { 3.749817859674735*^9, 3.749817861044999*^9}, {3.7498179561547127`*^9, 3.749817964489929*^9}, {3.749818149334386*^9, 3.749818237397959*^9}, 3.749818617867873*^9, {3.7505621848002787`*^9, 3.7505622174085107`*^9}, { 3.75056238761455*^9, 3.750562431347901*^9}, {3.7505626332829456`*^9, 3.7505627331565337`*^9}, {3.7505627632642183`*^9, 3.7505627635859113`*^9}, {3.7515359581577415`*^9, 3.7515359614850826`*^9}, {3.751536071974715*^9, 3.7515360961721487`*^9}, 3.7515362040373974`*^9, {3.751536256080162*^9, 3.7515365099108534`*^9}, { 3.751549231137398*^9, 3.7515493334258356`*^9}, {3.7515496891619573`*^9, 3.751549689458767*^9}, {3.763384318028655*^9, 3.763384321230183*^9}, 3.7633844800900145`*^9, {3.7650666220235834`*^9, 3.765066676848461*^9}, { 3.7650667705927696`*^9, 3.765066781277461*^9}, {3.7650668220493402`*^9, 3.7650670769609847`*^9}, {3.765075343296377*^9, 3.765075345014902*^9}, { 3.765075479631569*^9, 3.7650755114191623`*^9}, {3.765075617307859*^9, 3.7650756180851874`*^9}, {3.76507585422694*^9, 3.765075872425325*^9}, { 3.7650760811750383`*^9, 3.7650762635610576`*^9}, {3.7650763100785646`*^9, 3.765076323109063*^9}, {3.7650763765120716`*^9, 3.765076385469493*^9}, { 3.7650764317497897`*^9, 3.7650764864127855`*^9}, 3.765076672990033*^9, { 3.7650767604139767`*^9, 3.7650767965644426`*^9}, {3.765076849411788*^9, 3.76507688334435*^9}, {3.765076928656023*^9, 3.7650769388747053`*^9}, 3.76507697239373*^9, {3.7650770147173185`*^9, 3.7650770820420313`*^9}, { 3.765077138264634*^9, 3.765077175747029*^9}, {3.765077340035742*^9, 3.765077493212038*^9}, {3.7650775254837503`*^9, 3.765077573524544*^9}, { 3.765077619369755*^9, 3.7650776808294816`*^9}, {3.765088266857733*^9, 3.765088281236836*^9}, {3.76508836959641*^9, 3.765088394392946*^9}, { 3.7650900504082956`*^9, 3.765090052695187*^9}, {3.7650900911122713`*^9, 3.765090094160341*^9}, {3.765090519594511*^9, 3.7650905411898503`*^9}, { 3.7885193337832556`*^9, 3.788519339935099*^9}, {3.788519391172593*^9, 3.7885194472501445`*^9}, {3.7885195529105897`*^9, 3.788519558251149*^9}, { 3.7885305232444134`*^9, 3.7885305903888035`*^9}, {3.7885308807721663`*^9, 3.78853088502055*^9}, {3.8200276995553846`*^9, 3.82002773164934*^9}, 3.829884585166191*^9, {3.8298846167331247`*^9, 3.82988461691162*^9}},ExpressionUUID->"941f9c1e-0467-48c8-a088-\ ebccd20fd09e"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"GENERICBEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "EE_", ",", "GG_", ",", "\[Rho]\[Rho]_", ",", "\[Kappa]\[Kappa]_"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA_", ",", "Sy_", ",", "Sz_", ",", "Iyy_", ",", "Izz_", ",", "Iyz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx_", ",", "fy_", ",", "fz_", ",", "mx_", ",", "my_", ",", "mz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Xi]", ",", "r0", ",", "r\[Alpha]0", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "s", ",", "x", ",", "jac", ",", "NL", ",", "NQ", ",", "FF", ",", "FFINV", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "u0", ",", "v0", ",", "w0", ",", "\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0", ",", "u2", ",", "v2", ",", "w2", ",", "\[Phi]2", ",", "\[Theta]2", ",", "\[Psi]2", ",", "EEEE", ",", "AE", ",", "CE", ",", "BE", ",", "\[Epsilon]", ",", "\[Kappa]", ",", "Irr", ",", "F", ",", "M", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wine", ",", "\[Delta]wbrn", ",", "\[Delta]WW", ",", "equ", ",", "sol", ",", "bl", ",", "EEE", ",", "GGG", ",", "\[Rho]\[Rho]\[Rho]", ",", "\[Kappa]\[Kappa]\[Kappa]", ",", "AAA", ",", "SSz", ",", "SSy", ",", "IIyy", ",", "IIzz", ",", "IIyz", ",", "JJp", ",", "ffx", ",", "ffy", ",", "ffz", ",", "mmx", ",", "mmy", ",", "mmz", ",", "A\[Rho]", ",", "B\[Rho]", ",", "C\[Rho]", ",", "\[Epsilon]0", ",", "\[Kappa]0"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"mapping", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{"\[Xi]", "*", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]0", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r\[Alpha]0", ".", "r\[Alpha]0"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"L", ">", "0"}], ",", RowBox[{"h", ">", "0"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"i\[Alpha]0", " ", "=", RowBox[{"r\[Alpha]0", "/", "h\[Alpha]0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"s", "=", RowBox[{"i\[Alpha]0", ".", "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"x", "=", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], ".", "ix0"}], "+", "s"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", "h\[Alpha]0"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"simple", " ", "metrics"}], "*)"}], "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"use", " ", "simple"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NL", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Xi]"}], ",", "\[Xi]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NQ", "=", " ", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", "\[Xi]"}]}], ")"}]}], ",", RowBox[{"h\[Alpha]0", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], "2"], " ", "\[Xi]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", "\[Xi]"}]}], ")"}], " ", SuperscriptBox["\[Xi]", "2"]}], ",", RowBox[{"h\[Alpha]0", " ", SuperscriptBox["\[Xi]", "2"], " ", RowBox[{"(", " ", RowBox[{"\[Xi]", "-", "1"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2", ",", "1"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2", ",", "1"}], "]"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3", ",", "1"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3", ",", "1"}], "]"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2", ",", "2"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3", ",", "3"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2", ",", "2"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3", ",", "3"}], "]"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2", ",", "3"}], "]"}], "]"}], ",", RowBox[{"-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2", ",", "3"}], "]"}], "]"}], ",", RowBox[{"-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3", ",", "2"}], "]"}], "]"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "v"}], "/", "h\[Alpha]0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "w"}]}], "/", "h\[Alpha]0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"transform", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u0", ",", "v0", ",", "w0"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], " ", "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], " ", "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u2", ",", "v2", ",", "w2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]2", ",", "\[Theta]2", ",", "\[Psi]2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], " ", "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"elasticity", " ", "dyad", " ", "and", " ", "cross"}], "-", RowBox[{ "section", " ", "properties", " ", "are", " ", "known", " ", "in", " ", "the", " ", "material", " ", "system"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"EEE", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "EE", "]"}], "===", "Function"}], ",", RowBox[{"EE", "[", "x", "]"}], ",", "EE"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GGG", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "GG", "]"}], "===", "Function"}], ",", RowBox[{"GG", "[", "x", "]"}], ",", "GG"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Rho]\[Rho]\[Rho]", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "\[Rho]\[Rho]", "]"}], "===", "Function"}], ",", RowBox[{"\[Rho]\[Rho]", "[", "x", "]"}], ",", "\[Rho]\[Rho]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]\[Kappa]\[Kappa]", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "\[Kappa]\[Kappa]", "]"}], "===", "Function"}], ",", RowBox[{"\[Kappa]\[Kappa]", "[", "x", "]"}], ",", "\[Kappa]\[Kappa]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"AAA", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "AA", "]"}], "===", "Function"}], ",", RowBox[{"AA", "[", "x", "]"}], ",", "AA"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SSz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Sz", "]"}], "===", "Function"}], ",", RowBox[{"Sz", "[", "x", "]"}], ",", "Sz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SSy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Sy", "]"}], "===", "Function"}], ",", RowBox[{"Sy", "[", "x", "]"}], ",", "Sy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIyy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Iyy", "]"}], "===", "Function"}], ",", RowBox[{"Iyy", "[", "x", "]"}], ",", "Iyy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIzz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Izz", "]"}], "===", "Function"}], ",", RowBox[{"Izz", "[", "x", "]"}], ",", "Izz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIyz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Iyz", "]"}], "===", "Function"}], ",", RowBox[{"Iyz", "[", "x", "]"}], ",", "Iyz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ffx", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "fx", "]"}], "===", "Function"}], ",", RowBox[{"fx", "[", "x", "]"}], ",", "fx"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ffy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "fy", "]"}], "===", "Function"}], ",", RowBox[{"fy", "[", "x", "]"}], ",", "fy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ffz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "fz", "]"}], "===", "Function"}], ",", RowBox[{"fz", "[", "x", "]"}], ",", "fz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mmx", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "mx", "]"}], "===", "Function"}], ",", RowBox[{"mx", "[", "x", "]"}], ",", "mx"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mmy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "my", "]"}], "===", "Function"}], ",", RowBox[{"my", "[", "x", "]"}], ",", "my"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mmz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "mz", "]"}], "===", "Function"}], ",", RowBox[{"mz", "[", "x", "]"}], ",", "mz"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"elasticity", " ", "dyad", " ", "and", " ", "cross"}], "-", RowBox[{ "section", " ", "properties", " ", "are", " ", "known", " ", "in", " ", "the", " ", "material", " ", "system"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"AE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EEE", " ", "AAA"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"GGG", " ", "AAA"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"GGG", " ", "AAA"}]}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"CE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{"EEE", " ", "SSy"}], ",", RowBox[{ RowBox[{"-", "EEE"}], " ", "SSz"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "GGG"}], " ", "SSy"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"GGG", " ", "SSz"}], ",", "0", ",", "0"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"BE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"GGG", " ", "\[Kappa]\[Kappa]\[Kappa]", " ", RowBox[{"(", RowBox[{"IIyy", "+", "IIzz"}], ")"}]}], " ", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"EEE", " ", "IIyy"}], ",", RowBox[{ RowBox[{"-", "EEE"}], " ", "IIyz"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "EEE"}], " ", "IIyz"}], ",", RowBox[{"EEE", " ", "IIzz"}]}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"inertia", " ", "properties"}], "*)"}], "\[IndentingNewLine]", RowBox[{"A\[Rho]", "=", RowBox[{"\[Rho]\[Rho]\[Rho]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"AAA", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "AAA", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "AAA"}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"C\[Rho]", "=", RowBox[{"\[Rho]\[Rho]\[Rho]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "SSy", ",", RowBox[{"-", "SSz"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "SSy"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"SSz", ",", "0", ",", "0"}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"B\[Rho]", "=", RowBox[{"\[Rho]\[Rho]\[Rho]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"IIyy", "+", "IIzz"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "IIyy", ",", RowBox[{"-", "IIyz"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "IIyz"}], ",", "IIzz"}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"strain", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]0", "=", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], RowBox[{"{", RowBox[{"u0", ",", "v0", ",", "w0"}], "}"}]}], "/", "h\[Alpha]0"}], "+", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], "\[Cross]", RowBox[{"{", RowBox[{"\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]0", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], RowBox[{"{", RowBox[{"\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0"}], "}"}]}], "/", "h\[Alpha]0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "resultants"}], "*)"}], "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{ RowBox[{"AE", ".", "\[Epsilon]0"}], "+", RowBox[{"CE", ".", "\[Kappa]0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{ RowBox[{ RowBox[{"Transpose", "[", "CE", "]"}], ".", "\[Epsilon]0"}], "+", RowBox[{"BE", ".", "\[Kappa]0"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expressions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "\[Epsilon]0", "]"}], ".", "F"}]}], "-", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "\[Kappa]0", "]"}], ".", "M"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"{", RowBox[{"u0", ",", "v0", ",", "w0"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"ffx", ",", "ffy", ",", "ffz"}], "}"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"{", RowBox[{"\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"mmx", ",", "mmy", ",", "mmz"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wine", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"{", RowBox[{"u0", ",", "v0", ",", "w0"}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ RowBox[{"A\[Rho]", ".", RowBox[{"{", RowBox[{"u2", ",", "v2", ",", "w2"}], "}"}]}], "+", RowBox[{"C\[Rho]", ".", RowBox[{"{", RowBox[{"\[Phi]2", ",", "\[Theta]2", ",", "\[Psi]2"}], "}"}]}]}], ")"}]}]}], "-", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"{", RowBox[{"\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0"}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"C\[Rho]", ".", RowBox[{"{", RowBox[{"u2", ",", "v2", ",", "w2"}], "}"}]}]}], "+", RowBox[{"B\[Rho]", ".", RowBox[{"{", RowBox[{"\[Phi]2", ",", "\[Theta]2", ",", "\[Psi]2"}], "}"}]}]}], ")"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wine"}], ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Xi]", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"Integrate", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wine"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "0", ",", "1"}], "}"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAMB", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA", ",", "0", ",", "0", ",", "Iyy", ",", "Izz", ",", "0", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAMV", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA_", ",", "Sy_", ",", "Sz_", ",", "Iyy_", ",", "Izz_", ",", "Iyz_", ",", "Jp_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx_", ",", "fy_", ",", "fz_", ",", "mx_", ",", "my_", ",", "mz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "r\[Alpha]0", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "s", ",", "x", ",", "jac", ",", "NL", ",", "NQ", ",", "FF", ",", "FFINV", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "u0", ",", "v0", ",", "w0", ",", "\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0", ",", "u2", ",", "v2", ",", "w2", ",", "\[Phi]2", ",", "\[Theta]2", ",", "\[Psi]2", ",", "EEEE", ",", "AE", ",", "CE", ",", "BE", ",", "\[Epsilon]", ",", "\[Kappa]", ",", "Irr", ",", "F", ",", "M", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wine", ",", "\[Delta]wbrn", ",", "\[Delta]WW", ",", "equ", ",", "sol", ",", "bl", ",", "EEE", ",", "GGG", ",", "\[Rho]\[Rho]\[Rho]", ",", "\[Kappa]\[Kappa]\[Kappa]", ",", "AAA", ",", "SSz", ",", "SSy", ",", "IIyy", ",", "IIzz", ",", "IIyz", ",", "JJp", ",", "ffx", ",", "ffy", ",", "ffz", ",", "mmx", ",", "mmy", ",", "mmz", ",", "A\[Rho]", ",", "B\[Rho]", ",", "C\[Rho]", ",", "\[Epsilon]0", ",", "\[Kappa]0"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"mapping", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{"\[Xi]", "*", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]0", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r\[Alpha]0", ".", "r\[Alpha]0"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"L", ">", "0"}], ",", RowBox[{"h", ">", "0"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"i\[Alpha]0", " ", "=", RowBox[{"r\[Alpha]0", "/", "h\[Alpha]0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"s", "=", RowBox[{"i\[Alpha]0", ".", "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"x", "=", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], ".", "ix0"}], "+", "s"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", "h\[Alpha]0"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"simple", " ", "metrics"}], "*)"}], "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"use", " ", "simple"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NL", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Xi]"}], ",", "\[Xi]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NQ", "=", " ", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", "\[Xi]"}]}], ")"}]}], ",", RowBox[{"h\[Alpha]0", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], "2"], " ", "\[Xi]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", "\[Xi]"}]}], ")"}], " ", SuperscriptBox["\[Xi]", "2"]}], ",", RowBox[{"h\[Alpha]0", " ", SuperscriptBox["\[Xi]", "2"], " ", RowBox[{"(", " ", RowBox[{"\[Xi]", "-", "1"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2", ",", "1"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2", ",", "1"}], "]"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3", ",", "1"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3", ",", "1"}], "]"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2", ",", "2"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3", ",", "3"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2", ",", "2"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3", ",", "3"}], "]"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2", ",", "3"}], "]"}], "]"}], ",", RowBox[{"-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2", ",", "3"}], "]"}], "]"}], ",", RowBox[{"-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3", ",", "2"}], "]"}], "]"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "v"}], "/", "h\[Alpha]0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "w"}]}], "/", "h\[Alpha]0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"transform", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u0", ",", "v0", ",", "w0"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], " ", "/.", RowBox[{"rule", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], " ", "/.", RowBox[{"rule", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u2", ",", "v2", ",", "w2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "/.", RowBox[{"rule", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]2", ",", "\[Theta]2", ",", "\[Psi]2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], " ", "/.", RowBox[{"rule", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"elasticity", " ", "dyad", " ", "and", " ", "cross"}], "-", RowBox[{ "section", " ", "properties", " ", "are", " ", "known", " ", "in", " ", "the", " ", "material", " ", "system"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"EEE", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "EE", "]"}], "===", "Function"}], ",", RowBox[{"EE", "[", "x", "]"}], ",", "EE"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GGG", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "GG", "]"}], "===", "Function"}], ",", RowBox[{"GG", "[", "x", "]"}], ",", "GG"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Rho]\[Rho]\[Rho]", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "\[Rho]\[Rho]", "]"}], "===", "Function"}], ",", RowBox[{"\[Rho]\[Rho]", "[", "x", "]"}], ",", "\[Rho]\[Rho]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"AAA", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "AA", "]"}], "===", "Function"}], ",", RowBox[{"AA", "[", "x", "]"}], ",", "AA"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SSz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Sz", "]"}], "===", "Function"}], ",", RowBox[{"Sz", "[", "x", "]"}], ",", "Sz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SSy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Sy", "]"}], "===", "Function"}], ",", RowBox[{"Sy", "[", "x", "]"}], ",", "Sy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIyy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Iyy", "]"}], "===", "Function"}], ",", RowBox[{"Iyy", "[", "x", "]"}], ",", "Iyy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIzz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Izz", "]"}], "===", "Function"}], ",", RowBox[{"Izz", "[", "x", "]"}], ",", "Izz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIyz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Iyz", "]"}], "===", "Function"}], ",", RowBox[{"Iyz", "[", "x", "]"}], ",", "Iyz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"JJp", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "Jp", "]"}], "===", "Function"}], ",", RowBox[{"Jp", "[", "x", "]"}], ",", "Jp"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ffx", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "fx", "]"}], "===", "Function"}], ",", RowBox[{"fx", "[", "x", "]"}], ",", "fx"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ffy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "fy", "]"}], "===", "Function"}], ",", RowBox[{"fy", "[", "x", "]"}], ",", "fy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ffz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "fz", "]"}], "===", "Function"}], ",", RowBox[{"fz", "[", "x", "]"}], ",", "fz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mmx", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "mx", "]"}], "===", "Function"}], ",", RowBox[{"mx", "[", "x", "]"}], ",", "mx"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mmy", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "my", "]"}], "===", "Function"}], ",", RowBox[{"my", "[", "x", "]"}], ",", "my"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mmz", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "mz", "]"}], "===", "Function"}], ",", RowBox[{"mz", "[", "x", "]"}], ",", "mz"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"elasticity", " ", "dyad", " ", "and", " ", "cross"}], "-", RowBox[{ "section", " ", "properties", " ", "are", " ", "known", " ", "in", " ", "the", " ", "material", " ", "system"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"AE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EEE", " ", "AAA"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"GGG", " ", "AAA"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"GGG", " ", "AAA"}]}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"CE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{"EEE", " ", "SSy"}], ",", RowBox[{ RowBox[{"-", "EEE"}], " ", "SSz"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "GGG"}], " ", "SSy"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"GGG", " ", "SSz"}], ",", "0", ",", "0"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"BE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"GGG", " ", "JJp"}], " ", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"EEE", " ", "IIyy"}], ",", RowBox[{ RowBox[{"-", "EEE"}], " ", "IIyz"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "EEE"}], " ", "IIyz"}], ",", RowBox[{"EEE", " ", "IIzz"}]}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"inertia", " ", "properties"}], "*)"}], "\[IndentingNewLine]", RowBox[{"A\[Rho]", "=", RowBox[{"\[Rho]\[Rho]\[Rho]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"AAA", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "AAA", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "AAA"}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"C\[Rho]", "=", RowBox[{"\[Rho]\[Rho]\[Rho]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "SSy", ",", RowBox[{"-", "SSz"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "SSy"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"SSz", ",", "0", ",", "0"}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"B\[Rho]", "=", RowBox[{"\[Rho]\[Rho]\[Rho]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"IIyy", "+", "IIzz"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "IIyy", ",", RowBox[{"-", "IIyz"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "IIyz"}], ",", "IIzz"}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"strain", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]0", "=", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], RowBox[{"{", RowBox[{"u0", ",", "v0", ",", "w0"}], "}"}]}], "/", "h\[Alpha]0"}], "+", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], "\[Cross]", RowBox[{"{", RowBox[{"\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]0", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], RowBox[{"{", RowBox[{"\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0"}], "}"}]}], "/", "h\[Alpha]0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "resultants"}], "*)"}], "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{ RowBox[{"AE", ".", "\[Epsilon]0"}], "+", RowBox[{"CE", ".", "\[Kappa]0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{ RowBox[{ RowBox[{"Transpose", "[", "CE", "]"}], ".", "\[Epsilon]0"}], "+", RowBox[{"BE", ".", "\[Kappa]0"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expressions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "\[Epsilon]0", "]"}], ".", "F"}]}], "-", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "\[Kappa]0", "]"}], ".", "M"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"{", RowBox[{"u0", ",", "v0", ",", "w0"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"ffx", ",", "ffy", ",", "ffz"}], "}"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"{", RowBox[{"\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"mmx", ",", "mmy", ",", "mmz"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wine", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"{", RowBox[{"u0", ",", "v0", ",", "w0"}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ RowBox[{"A\[Rho]", ".", RowBox[{"{", RowBox[{"u2", ",", "v2", ",", "w2"}], "}"}]}], "+", RowBox[{"C\[Rho]", ".", RowBox[{"{", RowBox[{"\[Phi]2", ",", "\[Theta]2", ",", "\[Psi]2"}], "}"}]}]}], ")"}]}]}], "-", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", RowBox[{"{", RowBox[{"\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0"}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"C\[Rho]", ".", RowBox[{"{", RowBox[{"u2", ",", "v2", ",", "w2"}], "}"}]}]}], "+", RowBox[{"B\[Rho]", ".", RowBox[{"{", RowBox[{"\[Phi]2", ",", "\[Theta]2", ",", "\[Psi]2"}], "}"}]}]}], ")"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wine"}], ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Xi]", "}"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "Jp_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA", ",", "0", ",", "0", ",", "Iyy", ",", "Izz", ",", "0", ",", "Jp", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{ "AA_", ",", "Sy_", ",", "Sz_", ",", "Iyy_", ",", "Izz_", ",", "Ixy_", ",", "Jp_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx_", ",", "fy_", ",", "fz_", ",", "mx_", ",", "my_", ",", "mz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "h", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "ux", ",", "uy", " ", ",", "uz", " ", ",", "\[Theta]x", " ", ",", "\[Theta]y", " ", ",", "\[Theta]z", " ", ",", "\[Delta]ux", " ", ",", "\[Delta]uy", ",", "\[Delta]uz", ",", "\[Delta]\[Theta]x", ",", "\[Delta]\[Theta]y", ",", "\[Delta]\[Theta]z"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "mapping", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"h", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ FractionBox["1", RowBox[{"420", " ", SuperscriptBox["h", "3"]}]], RowBox[{"(", RowBox[{ RowBox[{"210", " ", "fx", " ", SuperscriptBox["h", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{"AA", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"420", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"70", " ", RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"70", " ", RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}], "+", RowBox[{"156", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"156", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"156", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"156", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"22", " ", "h", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"13", " ", "h", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"13", " ", "h", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"22", " ", "h", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"22", " ", "h", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"13", " ", "h", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"13", " ", "h", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"22", " ", "h", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"22", " ", "h", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"13", " ", "h", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"13", " ", "h", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"22", " ", "h", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"22", " ", "h", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"13", " ", "h", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"13", " ", "h", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"22", " ", "h", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"7", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "720"}], " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"Ixy", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"360", " ", "EE", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"Ixy", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{ RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{ RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"12", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"6", " ", "Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"6", " ", "Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"6", " ", "Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "EE", " ", "Sy", " ", RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "EE", " ", "Sy", " ", RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "EE", " ", "Sy", " ", RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "EE", " ", "Sy", " ", RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "EE", " ", "Sz", " ", RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "EE", " ", "Sz", " ", RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "EE", " ", "Sz", " ", RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "EE", " ", "Sz", " ", RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "GG", " ", "Jp", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "GG", " ", "Jp", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "GG", " ", "Jp", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "GG", " ", "Jp", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "EE", " ", "Sy", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "EE", " ", "Sy", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"20", " ", "EE", " ", "Iyy", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"10", " ", "EE", " ", "Iyy", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "EE", " ", "Sy", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "EE", " ", "Sy", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"10", " ", "EE", " ", "Iyy", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"20", " ", "EE", " ", "Iyy", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "EE", " ", "Sz", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "EE", " ", "Sz", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "EE", " ", "Sz", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "EE", " ", "Sz", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"2", " ", "Ixy", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], "-", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"5", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], "-", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"5", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"6", " ", SuperscriptBox["h", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"10", " ", "mz", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], "+", RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"10", " ", "mz", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"10", " ", "my", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"10", " ", "my", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["h", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"30", " ", "fy", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"30", " ", "fz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"30", " ", "mx", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"21", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"9", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"21", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"9", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"30", " ", "mx", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"9", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"21", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"9", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"21", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"5", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"5", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"21", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"9", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"21", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"9", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"20", " ", "Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"20", " ", "Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"10", " ", "Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"10", " ", "Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"9", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"21", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"9", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"21", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"10", " ", "Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"10", " ", "Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"20", " ", "Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"20", " ", "Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"8", " ", "Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"2", " ", "Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"8", " ", "Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"2", " ", "Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"5", " ", "Sy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"2", " ", "Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"8", " ", "Iyy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"2", " ", "Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"8", " ", "Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"5", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"5", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"8", " ", "Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"2", " ", "Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"8", " ", "Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"2", " ", "Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"5", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"5", " ", "Sz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"2", " ", "Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"8", " ", "Ixy", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"2", " ", "Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"8", " ", "Izz", " ", "\[Rho]\[Rho]", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["h", "5"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "5"}], " ", "fz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"5", " ", "fy", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"Sz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "-", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"3", " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"3", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"Sy", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "-", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"3", " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"3", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4430689313272*^9, 3.4430690080792*^9}, { 3.4430690869528*^9, 3.4430691077320004`*^9}, {3.4430691700116*^9, 3.4430691708072*^9}, {3.4430692071717997`*^9, 3.443069246359*^9}, { 3.4430772782732*^9, 3.4430773623416*^9}, {3.4430773978316*^9, 3.4430774104676*^9}, {3.4430775053780003`*^9, 3.4430776180598*^9}, { 3.4434109099524*^9, 3.4434109159584*^9}, {3.4438800815346003`*^9, 3.4438802689304*^9}, {3.443880362624*^9, 3.4438803824516*^9}, { 3.443929565615374*^9, 3.443929570232974*^9}, {3.443935321321974*^9, 3.443935335705174*^9}, {3.443935419945174*^9, 3.443935421489574*^9}, { 3.443935494013974*^9, 3.443935494715974*^9}, {3.443935617565974*^9, 3.4439357217895737`*^9}, {3.443935755360774*^9, 3.443935816107174*^9}, { 3.443942155230774*^9, 3.443942209939974*^9}, {3.443942305710374*^9, 3.4439423142123737`*^9}, {3.4439442908131742`*^9, 3.443944441181574*^9}, { 3.4439447830065737`*^9, 3.4439447917425737`*^9}, {3.443944908541774*^9, 3.443944916060974*^9}, {3.4442731097938004`*^9, 3.4442731115254*^9}, { 3.444273189229*^9, 3.4442732700526*^9}, {3.4442748430004*^9, 3.4442748605036*^9}, {3.4442748977438*^9, 3.4442748989762*^9}, { 3.4442749340762*^9, 3.4442749351057997`*^9}, 3.4442752313382*^9, { 3.4442919702026*^9, 3.4442919911846*^9}, {3.4442921151577997`*^9, 3.4442921271074*^9}, {3.4443811023684*^9, 3.4443811036632*^9}, { 3.4443814073171997`*^9, 3.4443814402956*^9}, {3.4443815036316*^9, 3.4443815147855997`*^9}, {3.4443815537232*^9, 3.4443815747676*^9}, { 3.4443816138143997`*^9, 3.444381633174*^9}, {3.4443816850439997`*^9, 3.4443817801728*^9}, 3.4443853618688*^9, {3.4443855607376003`*^9, 3.4443856337924*^9}, {3.4443861200444*^9, 3.4443861523676*^9}, { 3.4443862280495996`*^9, 3.444386291448*^9}, {3.4443864047352*^9, 3.4443864135336*^9}, {3.4443870026832*^9, 3.4443870095316*^9}, { 3.4444082055056*^9, 3.4444082437412*^9}, {3.4444082797148*^9, 3.4444084583816*^9}, {3.4444084889108*^9, 3.4444085087539997`*^9}, { 3.444408942517*^9, 3.4444089563386*^9}, {3.4444091419564*^9, 3.4444091647167997`*^9}, {3.4444092206428003`*^9, 3.4444092944463997`*^9}, {3.4444093856284*^9, 3.4444094281071997`*^9}, { 3.4444094976988*^9, 3.4444095275104*^9}, {3.444409611064*^9, 3.4444096125772*^9}, 3.4444098504616003`*^9, {3.444409913392*^9, 3.4444099166056004`*^9}, 3.4444100178496*^9, {3.4444103063248*^9, 3.4444103358712*^9}, {3.4444103868208*^9, 3.4444104432460003`*^9}, { 3.4444921219564*^9, 3.4444921256224003`*^9}, {3.444492194824*^9, 3.4444921973668003`*^9}, {3.4444922814351997`*^9, 3.4444922853508*^9}, { 3.4444923330868*^9, 3.4444923345844*^9}, {3.444492366424*^9, 3.4444923855808*^9}, {3.4453153475226*^9, 3.445315360689*^9}, { 3.4465518166373653`*^9, 3.446551863016165*^9}, {3.446551894231765*^9, 3.446552159384965*^9}, {3.446552232377365*^9, 3.4465522555589647`*^9}, { 3.446553347388365*^9, 3.4465533616155653`*^9}, {3.4466058525769997`*^9, 3.4466058529046*^9}, {3.4466064371219997`*^9, 3.4466065097244*^9}, { 3.4466127725788*^9, 3.4466127766036*^9}, {3.4466128124835997`*^9, 3.4466130037864*^9}, {3.4466131532696*^9, 3.4466131761703997`*^9}, { 3.4466133992192*^9, 3.4466134478756*^9}, {3.446613483584*^9, 3.4466134932092*^9}, {3.4466135740952*^9, 3.4466135794927998`*^9}, { 3.4466137283948*^9, 3.4466137341356*^9}, {3.4466138994342003`*^9, 3.4466139023826*^9}, {3.4466139549858*^9, 3.4466139579653997`*^9}, { 3.4466142109818*^9, 3.4466142245226*^9}, {3.4466142793878*^9, 3.4466143652033997`*^9}, {3.4466144712834*^9, 3.4466145978929996`*^9}, { 3.4466146992618*^9, 3.4466147509914*^9}, {3.4466151283086*^9, 3.4466152768986*^9}, {3.4466153107506*^9, 3.4466153406558*^9}, { 3.4466194331976*^9, 3.4466194377528*^9}, {3.4466194847712*^9, 3.446619488718*^9}, {3.4466389495861998`*^9, 3.4466389768238*^9}, { 3.4466391218414*^9, 3.446639306561*^9}, {3.4466393990222*^9, 3.4466394004886*^9}, {3.4466394475694*^9, 3.4466394487706003`*^9}, { 3.4466395034174*^9, 3.4466395049462*^9}, 3.4466395515755997`*^9, { 3.4466396000176*^9, 3.4466396190808*^9}, {3.4466397459088*^9, 3.446639748826*^9}, {3.4466397974356003`*^9, 3.446639798668*^9}, 3.4466398447816*^9, {3.446639894218*^9, 3.4466399201556*^9}, { 3.4466399570964003`*^9, 3.4466399583288*^9}, {3.446639994006*^9, 3.4466400056904*^9}, {3.4466400383568*^9, 3.4466400395892*^9}, { 3.4466400745643997`*^9, 3.4466401025976*^9}, {3.4466401660834*^9, 3.4466401806070004`*^9}, {3.4466402251294003`*^9, 3.446640227407*^9}, { 3.446640260479*^9, 3.4466402657674*^9}, {3.4466404133122*^9, 3.4466405185654*^9}, 3.4466405830462*^9, {3.4467273294214*^9, 3.4467273777813997`*^9}, {3.4467274366558*^9, 3.4467275620954*^9}, { 3.446727593311*^9, 3.4467277412614*^9}, {3.4467283334639997`*^9, 3.4467283356012*^9}, {3.4467283707636003`*^9, 3.4467283727604*^9}, { 3.4467289882664003`*^9, 3.4467291276836*^9}, {3.446778464322*^9, 3.4467786797424*^9}, {3.4467801953803997`*^9, 3.4467802409792*^9}, { 3.4467802998691998`*^9, 3.4467804023456*^9}, 3.4467804345596*^9, { 3.4467808656344*^9, 3.4467808670852003`*^9}, 3.4467818107525997`*^9, { 3.446781855509*^9, 3.446781874385*^9}, {3.4467826737914*^9, 3.4467827381726*^9}, {3.4467828623018*^9, 3.4467831045386*^9}, { 3.4470344113984003`*^9, 3.4470344123344*^9}, {3.4470344628316*^9, 3.4470345343108*^9}, {3.447043591118539*^9, 3.447043642192939*^9}, { 3.447045649625739*^9, 3.447045718437339*^9}, {3.447054774023939*^9, 3.447054834198939*^9}, {3.4470549103449388`*^9, 3.4470549116169386`*^9}, { 3.447054943902939*^9, 3.4470553027109385`*^9}, {3.447055334559939*^9, 3.447055353684939*^9}, {3.447057311918539*^9, 3.447057369747739*^9}, { 3.4470575058577385`*^9, 3.4470575951365385`*^9}, {3.4470581848789387`*^9, 3.4470582040825386`*^9}, {3.451276121243*^9, 3.4512761425838003`*^9}, { 3.4512762022382*^9, 3.4512762064346*^9}, {3.4512762476966*^9, 3.4512762827654*^9}, {3.451276489091*^9, 3.451276541975*^9}, { 3.4512765853118*^9, 3.4512766132046003`*^9}, {3.4512773470306*^9, 3.4512773766082*^9}, {3.4512776069110003`*^9, 3.4512777499318*^9}, 3.4512777831286*^9, {3.4512778785538*^9, 3.451277881627*^9}, { 3.4512780242734003`*^9, 3.4512780302794*^9}, 3.4512780737878*^9, { 3.4512781866226*^9, 3.4512781930810003`*^9}, {3.4512863325078*^9, 3.4512863539266*^9}, {3.4568019250434*^9, 3.4568022712698*^9}, { 3.4568023177422*^9, 3.4568024125278*^9}, {3.4568024694365997`*^9, 3.4568024750369997`*^9}, {3.4568026914402*^9, 3.4568028101094*^9}, { 3.4568028406698*^9, 3.4568028564726*^9}, 3.4568028886085997`*^9, { 3.4568030489454*^9, 3.4568030800986*^9}, 3.4568032004128*^9, { 3.4568035073698*^9, 3.4568035176034*^9}, {3.4568040146596003`*^9, 3.4568040844852*^9}, {3.4568043016684*^9, 3.4568043154744*^9}, { 3.4568045482264*^9, 3.4568045486632*^9}, {3.4568048944996*^9, 3.4568049806116*^9}, {3.4660560628582*^9, 3.4660560753538*^9}, { 3.4660676729379997`*^9, 3.4660676735931997`*^9}, {3.4660677244024*^9, 3.4660677277251997`*^9}, {3.4742646771287394`*^9, 3.47426469439174*^9}, { 3.47426489921974*^9, 3.4742649800437393`*^9}, {3.4801246373348*^9, 3.4801246860536003`*^9}, {3.4801247748176003`*^9, 3.4801247821028*^9}, { 3.4801248161264*^9, 3.4801248295736*^9}, {3.4801248810692*^9, 3.4801248964508*^9}, {3.4801249330484*^9, 3.480124947884*^9}, 3.4801249886468*^9, {3.4801251139147997`*^9, 3.48012512588*^9}, { 3.4838339444988003`*^9, 3.4838339567448*^9}, 3.4838341692012*^9, { 3.4838344350408*^9, 3.4838344353684*^9}, {3.4938987575920324`*^9, 3.4938987586840324`*^9}, {3.4941630624049997`*^9, 3.4941631381274*^9}, { 3.4941632311345997`*^9, 3.4941632492306004`*^9}, 3.4941633249217997`*^9, { 3.4941633940922003`*^9, 3.4941634063538*^9}, {3.4941634538402*^9, 3.4941635051642*^9}, {3.494163565115*^9, 3.4941636341762*^9}, { 3.4941636853442*^9, 3.4941639323234*^9}, {3.4941640277798*^9, 3.4941641455754004`*^9}, {3.4941641790374002`*^9, 3.4941641803789997`*^9}, {3.4941642676142*^9, 3.4941643277678003`*^9}, 3.4941644677018003`*^9, {3.4941646208938*^9, 3.4941646322349997`*^9}, { 3.4941652592693996`*^9, 3.4941652807194*^9}, {3.4941653119038*^9, 3.494165416299*^9}, {3.494165453895*^9, 3.4941654544722*^9}, { 3.4950990979779997`*^9, 3.495099142701*^9}, {3.495099172958*^9, 3.4950991806289997`*^9}, {3.495099227097*^9, 3.495099238113*^9}, 3.495099290797*^9, {3.495099346084*^9, 3.495099359507*^9}, { 3.495099456308*^9, 3.495099464091*^9}, 3.495099683108*^9, { 3.495100428112*^9, 3.495100434958*^9}, {3.4951006496219997`*^9, 3.495100649992*^9}, {3.4987235265018*^9, 3.4987235939094*^9}, { 3.4987236420666*^9, 3.4987236530646*^9}, {3.4987237305341997`*^9, 3.4987237396914*^9}, {3.498733136159*^9, 3.4987332972446003`*^9}, { 3.4987364783094*^9, 3.4987364860626*^9}, {3.4987366201134*^9, 3.4987366236078*^9}, {3.4987367272386*^9, 3.4987367464890003`*^9}, { 3.4987369428462*^9, 3.4987369670886*^9}, {3.4987370134518003`*^9, 3.4987370259941998`*^9}, {3.4987370944002*^9, 3.4987371027618*^9}, { 3.4987371921029997`*^9, 3.498737193663*^9}, {3.4987372660938*^9, 3.4987372935498*^9}, {3.4987373290554*^9, 3.4987377176202*^9}, { 3.4987377520182*^9, 3.4987379139462*^9}, {3.4987382030216*^9, 3.4987382667078*^9}, {3.4987888391818*^9, 3.4987888608346*^9}, { 3.4988785131146*^9, 3.4988785160162*^9}, {3.5007170967096*^9, 3.5007170999076*^9}, 3.5007182237316*^9, {3.5007182772864*^9, 3.5007182987832003`*^9}, {3.5009573226744003`*^9, 3.5009573940444*^9}, 3.5009574358710003`*^9, 3.5009604278482*^9, {3.5009897246173353`*^9, 3.5009898480289354`*^9}, {3.5009901464413357`*^9, 3.5009901475333357`*^9}, {3.5009901801997356`*^9, 3.500990274096135*^9}, { 3.5010475253292*^9, 3.5010475852332*^9}, {3.5010605722018003`*^9, 3.5010606739762*^9}, {3.5010607202146*^9, 3.5010607323358*^9}, { 3.5010607920526*^9, 3.501061118467*^9}, {3.5010612022078*^9, 3.5010612277138*^9}, {3.5010616467766*^9, 3.5010617938534*^9}, { 3.5010618406222*^9, 3.5010619950778*^9}, {3.5010621500638*^9, 3.5010622514014*^9}, {3.5010625292218*^9, 3.5010625409374*^9}, { 3.5010626043046*^9, 3.5010626313862*^9}, {3.5010626787166*^9, 3.5010626790754004`*^9}, {3.501074457561*^9, 3.5010744671082*^9}, 3.5010763029458*^9, {3.5032210899309998`*^9, 3.5032212413900003`*^9}, { 3.557658203404973*^9, 3.557658219644601*^9}, {3.5576584433801947`*^9, 3.557658496030287*^9}, {3.5576585501779823`*^9, 3.5576586046064777`*^9}, { 3.557658648910555*^9, 3.557658754600741*^9}, {3.557658963945511*^9, 3.5576589782507353`*^9}, {3.557659009949991*^9, 3.5576591437514267`*^9}, { 3.557659182221094*^9, 3.5576592187719584`*^9}, 3.557659413865901*^9, { 3.557659921100792*^9, 3.5576599556392527`*^9}, {3.557660706920972*^9, 3.5576607248454037`*^9}, {3.557661209085854*^9, 3.557661209413454*^9}, { 3.5577526651911488`*^9, 3.5577526932087984`*^9}, {3.5577527272480583`*^9, 3.557752747122493*^9}, {3.5577528374934516`*^9, 3.557752838523053*^9}, { 3.557752881204728*^9, 3.557752891313546*^9}, {3.557752938612829*^9, 3.5577529469120436`*^9}, {3.557753060714244*^9, 3.557753062633047*^9}, { 3.5577536609544907`*^9, 3.5577536637936954`*^9}, {3.5577537824631042`*^9, 3.557753810184353*^9}, {3.557753841025607*^9, 3.5577540648392*^9}, 3.5577541920574236`*^9, {3.5577547033327217`*^9, 3.557754716967146*^9}, { 3.5577547716296415`*^9, 3.557754802112095*^9}, {3.5577549509363565`*^9, 3.5577549771444025`*^9}, 3.5577551382302856`*^9, {3.55775527184452*^9, 3.557755272858522*^9}, {3.557755881555991*^9, 3.557755886548*^9}, { 3.557756158316077*^9, 3.557756231885806*^9}, {3.5577572408487787`*^9, 3.557757248835993*^9}, {3.5577572834368534`*^9, 3.5577575888229895`*^9}, { 3.5577578129641833`*^9, 3.557757862837471*^9}, {3.557758025514557*^9, 3.557758079272251*^9}, 3.557810586960072*^9, {3.5578240262005973`*^9, 3.5578240345360737`*^9}, {3.557824091429328*^9, 3.5578241008156557`*^9}, { 3.557831525255726*^9, 3.5578315319793377`*^9}, 3.5578315716190076`*^9, { 3.557831606079468*^9, 3.557831629432709*^9}, {3.5578316663267736`*^9, 3.5578317569473333`*^9}, {3.5578322144181366`*^9, 3.557832218084143*^9}, { 3.557836356693412*^9, 3.557836473771618*^9}, {3.5578365201660995`*^9, 3.5578365974018345`*^9}, {3.5578366426731143`*^9, 3.557836658865943*^9}, { 3.557836691017599*^9, 3.5578367924957776`*^9}, {3.5578368305442443`*^9, 3.557836888279946*^9}, {3.5578369382156334`*^9, 3.5578370776642785`*^9}, { 3.5578383536061196`*^9, 3.5578383735117545`*^9}, {3.5578385892445335`*^9, 3.5578385978869486`*^9}, {3.5578386713006773`*^9, 3.557838700113928*^9}, { 3.5578387451200075`*^9, 3.5578387467892103`*^9}, {3.5578388951454706`*^9, 3.5578389248635225`*^9}, {3.5578389679351983`*^9, 3.557838983535226*^9}, { 3.5578390227692947`*^9, 3.557839023143696*^9}, {3.557839097696226*^9, 3.5578391125162525`*^9}, {3.5578391553539276`*^9, 3.557839199892006*^9}, { 3.55783924184048*^9, 3.557839294490572*^9}, {3.5578393285922318`*^9, 3.557839398683155*^9}, {3.557839430522811*^9, 3.557839470162481*^9}, { 3.5578395370865984`*^9, 3.5578395446994114`*^9}, {3.5578396068499207`*^9, 3.5578396118575296`*^9}, 3.5578943518105097`*^9, {3.557894388361374*^9, 3.5578944029629993`*^9}, {3.5578944607611012`*^9, 3.5578944989499683`*^9}, {3.5578945393696394`*^9, 3.557894561537278*^9}, { 3.5578946028617506`*^9, 3.5578946188985786`*^9}, {3.557894650894235*^9, 3.5578947812636642`*^9}, {3.55789481884413*^9, 3.5578948191249304`*^9}, { 3.5578949768100076`*^9, 3.5578949836272197`*^9}, {3.5578967386805477`*^9, 3.55789678549623*^9}, {3.5578968804691963`*^9, 3.557896888643611*^9}, { 3.557897022491846*^9, 3.5578970341450663`*^9}, {3.557897620940097*^9, 3.55789765120415*^9}, {3.5579218072271147`*^9, 3.5579218263059483`*^9}, { 3.557922095312821*^9, 3.557922116965659*^9}, {3.557922178086566*^9, 3.557922188616585*^9}, {3.5579223258812256`*^9, 3.557922327066828*^9}, { 3.5579224596046605`*^9, 3.557922461804264*^9}, 3.5579805928465395`*^9, { 3.5579815200581703`*^9, 3.557981541711009*^9}, 3.557985544779242*^9, { 3.5579863164793987`*^9, 3.5579863339514294`*^9}, {3.557986523210962*^9, 3.557986568841042*^9}, 3.5579866122559185`*^9, 3.557986993536188*^9, { 3.5579871244716187`*^9, 3.5579871290580263`*^9}, 3.557987173486905*^9, 3.5579872166989803`*^9, {3.5599618621582537`*^9, 3.5599618642486577`*^9}, { 3.559961969720443*^9, 3.5599619894700775`*^9}, 3.559963611089726*^9, { 3.5601298891258235`*^9, 3.560129889422224*^9}, {3.560132445157113*^9, 3.5601324458591146`*^9}, {3.561978472080926*^9, 3.561978472392926*^9}, { 3.6297802564412937`*^9, 3.6297802957377625`*^9}, {3.62978033369263*^9, 3.629780429741998*^9}, {3.6297805790030603`*^9, 3.6297809429048996`*^9}, { 3.629780987957779*^9, 3.629781197575347*^9}, {3.629781240397422*^9, 3.629781337663593*^9}, {3.6297813946972933`*^9, 3.6297814529165955`*^9}, { 3.6297814952550697`*^9, 3.629781527578326*^9}, {3.62978162025529*^9, 3.629781647633338*^9}, {3.629781678833393*^9, 3.629781763120341*^9}, 3.6297818028224106`*^9, {3.6297818432108817`*^9, 3.629781872570133*^9}, { 3.629782355765382*^9, 3.629782427603508*^9}, {3.6297824692243814`*^9, 3.629782674863942*^9}, {3.629782707218399*^9, 3.6297829295343895`*^9}, { 3.629783005631323*^9, 3.6297830574702144`*^9}, {3.6297831098551064`*^9, 3.629783142786764*^9}, {3.629783433711675*^9, 3.629783442619291*^9}, { 3.6297834942397814`*^9, 3.6297835175930223`*^9}, 3.6297835794939313`*^9, { 3.6297836160291953`*^9, 3.6297837668970604`*^9}, {3.6297842042438283`*^9, 3.6297842697483435`*^9}, {3.6297843514456873`*^9, 3.629784370742921*^9}, { 3.629784443829049*^9, 3.6297844678842916`*^9}, {3.6297845252611923`*^9, 3.629784525588793*^9}, {3.6297846136821475`*^9, 3.629784629235375*^9}, { 3.629784814797701*^9, 3.629784927648299*^9}, {3.629785259960083*^9, 3.6297852602096834`*^9}, {3.6297858780175686`*^9, 3.629785917282837*^9}, { 3.629786048057867*^9, 3.629786048681868*^9}, 3.6297863278755584`*^9, { 3.6297867047133856`*^9, 3.629786748533863*^9}, {3.6297867791567163`*^9, 3.6297868491540394`*^9}, {3.6297875320748396`*^9, 3.629787569795706*^9}, { 3.6297876247234025`*^9, 3.6297877281983843`*^9}, {3.6297877681812544`*^9, 3.629787774015665*^9}, {3.629787831408166*^9, 3.6297878355265727`*^9}, { 3.6297878775686464`*^9, 3.6297878861174617`*^9}, {3.6297879185343184`*^9, 3.629787919064719*^9}, {3.6297880043032694`*^9, 3.62978800470887*^9}, 3.6297880488257475`*^9, {3.6297882100052304`*^9, 3.6297882174776435`*^9}, { 3.6297882697533355`*^9, 3.6297882948381796`*^9}, {3.6297883467550707`*^9, 3.6297883991087627`*^9}, {3.6297887361785545`*^9, 3.629788783961438*^9}, 3.629788825395111*^9, {3.629789006152629*^9, 3.6297890321266747`*^9}, { 3.6297891133248167`*^9, 3.629789145336073*^9}, {3.6297891926821566`*^9, 3.629789194257759*^9}, {3.629789255316266*^9, 3.6297892556282673`*^9}, { 3.629869102295367*^9, 3.629869160124668*^9}, {3.6298691942887287`*^9, 3.6298696149902673`*^9}, {3.6298696993864155`*^9, 3.62986975897852*^9}, { 3.6298698387726603`*^9, 3.629869912030389*^9}, {3.6298700722270703`*^9, 3.629870234560955*^9}, {3.629870580429163*^9, 3.629870630458451*^9}, { 3.630556081081209*^9, 3.630556104902451*^9}, {3.6305562643503313`*^9, 3.6305562763935523`*^9}, {3.6305563415080667`*^9, 3.630556480956712*^9}, { 3.630556692851884*^9, 3.630556695347888*^9}, {3.630556730042349*^9, 3.630556914528273*^9}, {3.6305653725974936`*^9, 3.6305656807121167`*^9}, { 3.630565758760581*^9, 3.6305657739024467`*^9}, {3.630565858170267*^9, 3.63056596644846*^9}, {3.6305661502619734`*^9, 3.6305661523230915`*^9}, { 3.6305662653385553`*^9, 3.630566370352562*^9}, {3.6305667786019125`*^9, 3.630566790535595*^9}, {3.6305668214773645`*^9, 3.630567044691132*^9}, { 3.6305670772499943`*^9, 3.6305670783710585`*^9}, 3.630567272031135*^9, { 3.630567303902958*^9, 3.630567409875019*^9}, {3.630568671196477*^9, 3.6305687195002403`*^9}, {3.6305687542132254`*^9, 3.630568758623478*^9}, { 3.630568855671028*^9, 3.630568859250233*^9}, {3.630569706514694*^9, 3.630569775526641*^9}, 3.630569982346471*^9, {3.6305701679130845`*^9, 3.630570205199217*^9}, {3.6305703751399374`*^9, 3.630570526177576*^9}, { 3.630587657039589*^9, 3.630587688367381*^9}, {3.6305880733027773`*^9, 3.6305883365376396`*^9}, {3.6305886689118233`*^9, 3.6305886717978287`*^9}, 3.6305889776831656`*^9, {3.6305890389444733`*^9, 3.6305890437180815`*^9}, { 3.630589093248169*^9, 3.6305891296430326`*^9}, 3.630589181700324*^9, { 3.6305892509956455`*^9, 3.6305892594820604`*^9}, {3.630589318949365*^9, 3.6305893334729905`*^9}, {3.630589630294712*^9, 3.6305896376267247`*^9}, { 3.630589683288005*^9, 3.630589684988408*^9}, {3.630597310538067*^9, 3.630597340080757*^9}, {3.630597391446695*^9, 3.630597400596218*^9}, { 3.6305974350611897`*^9, 3.6305974605306463`*^9}, {3.630633997622449*^9, 3.630634003125764*^9}, {3.630659322217756*^9, 3.63065932438616*^9}, { 3.6306611578252783`*^9, 3.6306611625988865`*^9}, {3.6306612541554475`*^9, 3.630661257587454*^9}, {3.6306613001287284`*^9, 3.6306613026715326`*^9}, { 3.6306613920752897`*^9, 3.6306613949768953`*^9}, {3.6306706377509866`*^9, 3.630670654957817*^9}, {3.6306749981919994`*^9, 3.630675005793434*^9}, { 3.6306751229631357`*^9, 3.630675150017683*^9}, {3.6306752035287437`*^9, 3.6306752096180925`*^9}, {3.630675315921172*^9, 3.6306753201514144`*^9}, { 3.6306757793287754`*^9, 3.6306757796257925`*^9}, {3.630675814406262*^9, 3.6306758147026625`*^9}, {3.6306760107574763`*^9, 3.6306760154417443`*^9}, {3.6306789722320743`*^9, 3.6306789870309205`*^9}, {3.6306790257051325`*^9, 3.630679028076268*^9}, { 3.6306800259177256`*^9, 3.6306800406129513`*^9}, {3.6306801239326982`*^9, 3.6306801300167084`*^9}, {3.630680769261832*^9, 3.6306807806186523`*^9}, { 3.630681157468514*^9, 3.6306811577649145`*^9}, {3.6306812744219193`*^9, 3.63068127471832*^9}, {3.6306817187418995`*^9, 3.6306817919060287`*^9}, { 3.630681879188182*^9, 3.6306819111526375`*^9}, {3.6306821191790032`*^9, 3.6306821283050194`*^9}, {3.630720543651497*^9, 3.6307205534300566`*^9}, { 3.630721035525631*^9, 3.630721092774905*^9}, {3.6307212510439577`*^9, 3.6307213064777765`*^9}, {3.6307477437169704`*^9, 3.6307478284095197`*^9}, {3.6307478614971776`*^9, 3.6307478785948076`*^9}, {3.6307479884814005`*^9, 3.630748002880226*^9}, { 3.630748045624301*^9, 3.630748063876333*^9}, {3.630748111596817*^9, 3.6307481498324842`*^9}, {3.6307489182430334`*^9, 3.6307489447786803`*^9}, {3.630749037427243*^9, 3.6307490443848553`*^9}, { 3.6307491041485605`*^9, 3.6307491384218206`*^9}, {3.6307491914151134`*^9, 3.630749196890723*^9}, {3.6307492445800066`*^9, 3.6307493439989815`*^9}, { 3.630749396212273*^9, 3.6307494766304145`*^9}, {3.6307495333989143`*^9, 3.6307495547241516`*^9}, {3.6307496525831237`*^9, 3.630749669571553*^9}, { 3.630750220602922*^9, 3.6307502881822405`*^9}, {3.6307510631916018`*^9, 3.630751068292811*^9}, {3.6307511226589065`*^9, 3.630751137962533*^9}, { 3.6307512555243397`*^9, 3.630751282777588*^9}, {3.630752266971757*^9, 3.630752414599744*^9}, {3.630752446407563*^9, 3.630752457388191*^9}, { 3.6307589380050273`*^9, 3.6307590266300964`*^9}, {3.6307591666721067`*^9, 3.63075923229886*^9}, 3.630760288282259*^9, {3.6307603547370596`*^9, 3.630760557414652*^9}, {3.630760654134184*^9, 3.63076065510824*^9}, { 3.6307606911683025`*^9, 3.6307606919283457`*^9}, {3.6307607642334814`*^9, 3.6307607648645177`*^9}, {3.630761455000991*^9, 3.6307614616743727`*^9}, { 3.630761507825012*^9, 3.630761605776615*^9}, {3.630761652999316*^9, 3.630761695865768*^9}, {3.630761771278081*^9, 3.6307617792215357`*^9}, 3.6307629478424797`*^9, {3.632205207880766*^9, 3.6322052561155243`*^9}, { 3.6322052892474194`*^9, 3.6322052915745525`*^9}, 3.6322053746993074`*^9, { 3.6322062705415463`*^9, 3.6322062726016645`*^9}, {3.6322063396935015`*^9, 3.63220636484194*^9}, {3.6322064410612993`*^9, 3.6322064491667633`*^9}, { 3.632206580308264*^9, 3.6322066373275256`*^9}, {3.6322066736436024`*^9, 3.6322067467737856`*^9}, {3.632206782260815*^9, 3.6322071351279984`*^9}, 3.6322071989226465`*^9, {3.632207270393735*^9, 3.6322073359894867`*^9}, { 3.6322073997741346`*^9, 3.6322074126708727`*^9}, {3.632207491777397*^9, 3.632207682289294*^9}, {3.632207809621577*^9, 3.632207827973626*^9}, { 3.6322079043859973`*^9, 3.6322079279443445`*^9}, {3.6322080916397076`*^9, 3.6322081666649985`*^9}, 3.634905258940913*^9, {3.634905370524296*^9, 3.6349054089004903`*^9}, {3.6349054472556844`*^9, 3.63490544787272*^9}, { 3.634905483492757*^9, 3.6349055164646425`*^9}, {3.634905574352954*^9, 3.634905628121029*^9}, {3.6349057012822137`*^9, 3.6349057207913294`*^9}, { 3.6349061371061416`*^9, 3.634906354438572*^9}, {3.6349063890455513`*^9, 3.6349064369332905`*^9}, {3.634906537696054*^9, 3.634906601859724*^9}, 3.634906706128688*^9, {3.6349069249442034`*^9, 3.6349069328326545`*^9}, { 3.6349070151973653`*^9, 3.6349070242298822`*^9}, {3.6349070817921743`*^9, 3.6349070822111983`*^9}, {3.634907723288866*^9, 3.634907739005765*^9}, { 3.6349079580732946`*^9, 3.6349079868219395`*^9}, {3.634908200284148*^9, 3.634908315195721*^9}, {3.6349083774582825`*^9, 3.6349084027997313`*^9}, { 3.63490844507615*^9, 3.634908448843365*^9}, {3.634914956333157*^9, 3.634915020054802*^9}, {3.634915050572547*^9, 3.6349150956171236`*^9}, { 3.6349539785771523`*^9, 3.634953978975175*^9}, {3.6349540728785458`*^9, 3.6349541681829967`*^9}, {3.634954211263461*^9, 3.6349542495746527`*^9}, { 3.6349543251259737`*^9, 3.634954355882733*^9}, {3.6349543892536416`*^9, 3.6349544742835045`*^9}, {3.634954547519694*^9, 3.6349545640246377`*^9}, { 3.6349547051657104`*^9, 3.6349547107930326`*^9}, {3.634954745355009*^9, 3.634954752101395*^9}, {3.6349547948858423`*^9, 3.6349548053894434`*^9}, { 3.634954904907135*^9, 3.6349549451084347`*^9}, {3.634955219605135*^9, 3.6349552640926795`*^9}, {3.634955320189888*^9, 3.634955348763522*^9}, { 3.634955386393675*^9, 3.6349555039273973`*^9}, {3.6349557669644423`*^9, 3.6349557672004557`*^9}, {3.634955894841756*^9, 3.634955902578199*^9}, { 3.6349559513739896`*^9, 3.6349560216320086`*^9}, {3.634956120144643*^9, 3.634956128996149*^9}, {3.6349561700724983`*^9, 3.6349561978900895`*^9}, { 3.6349562480719595`*^9, 3.634956254326318*^9}, {3.634956331684742*^9, 3.6349563460575643`*^9}, {3.634956379242462*^9, 3.63495642676418*^9}, 3.6349564696636343`*^9, {3.6351524116477795`*^9, 3.6351524153379908`*^9}, { 3.6352134400282927`*^9, 3.635213442148414*^9}, {3.6352134745862694`*^9, 3.635213495869487*^9}, {3.6352135383409157`*^9, 3.6352137157160616`*^9}, { 3.6352137493569856`*^9, 3.635213764522853*^9}, {3.635214215036621*^9, 3.635214227593339*^9}, {3.635214407257615*^9, 3.63521441713218*^9}, { 3.635215297101512*^9, 3.635215303964904*^9}, {3.6352154111120324`*^9, 3.635215431504199*^9}, {3.635216346055508*^9, 3.635216494371991*^9}, { 3.635216631050809*^9, 3.6352166603244834`*^9}, {3.635216763034358*^9, 3.635216764164423*^9}, {3.6352168771938877`*^9, 3.635216888828553*^9}, 3.6352169832479534`*^9, 3.635217037668066*^9, {3.6352172024924936`*^9, 3.6352172054526625`*^9}, {3.635217344025589*^9, 3.635217346898753*^9}, 3.6352173863770113`*^9, {3.635217519639633*^9, 3.6352175507014103`*^9}, 3.635217615445113*^9, {3.6352178715087595`*^9, 3.635217880460271*^9}, { 3.6352185912849283`*^9, 3.635218598444338*^9}, {3.6352186995721216`*^9, 3.635218714955002*^9}, {3.6352189761749425`*^9, 3.6352189789341*^9}, { 3.6352195060322485`*^9, 3.635219509972474*^9}, 3.6352195673477554`*^9, 3.6352195994635925`*^9, {3.6352197336482677`*^9, 3.635219737452485*^9}, { 3.6352197706093817`*^9, 3.6352197723214793`*^9}, {3.635219941784172*^9, 3.6352199485115566`*^9}, {3.6352200714185867`*^9, 3.6352200854323883`*^9}, {3.6352202085694313`*^9, 3.635220235849992*^9}, { 3.6352202816336107`*^9, 3.6352203110962954`*^9}, {3.6352204980449886`*^9, 3.6352205276526823`*^9}, {3.6352253191447396`*^9, 3.6352253299913597`*^9}, {3.6352253611111403`*^9, 3.6352253637572913`*^9}, {3.635225409322898*^9, 3.6352255965196047`*^9}, { 3.6352260914249115`*^9, 3.6352261698393965`*^9}, {3.63522638233055*^9, 3.6352264188036366`*^9}, {3.635227493469104*^9, 3.635227556935734*^9}, { 3.6352276745764627`*^9, 3.635227730116639*^9}, {3.6352287979917183`*^9, 3.6352288587651944`*^9}, {3.635228894237223*^9, 3.635228948324317*^9}, { 3.635229365252164*^9, 3.6352293902275925`*^9}, {3.63522947690555*^9, 3.6352294807837715`*^9}, {3.6352492831123204`*^9, 3.6352492983621926`*^9}, 3.6356569054520617`*^9, {3.6363778004499054`*^9, 3.636377802787039*^9}, { 3.6363778414932528`*^9, 3.6363778525308843`*^9}, {3.636384436335312*^9, 3.6363846409950175`*^9}, {3.636384971250907*^9, 3.6363849738080535`*^9}, { 3.6363850170465264`*^9, 3.636385030729309*^9}, {3.6363851286779118`*^9, 3.636385138359465*^9}, {3.6363851699712734`*^9, 3.636385223111313*^9}, { 3.656076172452749*^9, 3.656076182171566*^9}, {3.6560765578514256`*^9, 3.656076619019133*^9}, 3.6560772545486493`*^9, {3.6630719749029694`*^9, 3.6630719878027077`*^9}, {3.6630720702554235`*^9, 3.6630720807290225`*^9}, {3.6630721155740156`*^9, 3.6630721713712068`*^9}, {3.663072270834896*^9, 3.6630722882218904`*^9}, 3.6630724099968557`*^9, {3.685234767958906*^9, 3.685234768480936*^9}, { 3.685252204033695*^9, 3.6852522340537376`*^9}, {3.6852522757137957`*^9, 3.6852523115138454`*^9}, {3.68525376314359*^9, 3.6852537725041256`*^9}, { 3.6852539763277836`*^9, 3.6852539861693463`*^9}, 3.6852540682470407`*^9, 3.6852541660656357`*^9, {3.6852604801645336`*^9, 3.6852605060345697`*^9}, { 3.6852605373446136`*^9, 3.6852605977846985`*^9}, 3.685260655254779*^9, { 3.6853280002218475`*^9, 3.685328019561875*^9}, 3.685328064721938*^9, { 3.6853280953119807`*^9, 3.6853282636022167`*^9}, {3.685328356242346*^9, 3.685328598671985*^9}, {3.6853286682069626`*^9, 3.6853287982524004`*^9}, { 3.6853288753368096`*^9, 3.6853289367033195`*^9}, {3.685328968274125*^9, 3.685328978713722*^9}, {3.685329033941881*^9, 3.685329044950511*^9}, { 3.685329173522865*^9, 3.6853294420842257`*^9}, {3.6853296024223967`*^9, 3.6853296124319687`*^9}, {3.6853297221712456`*^9, 3.685329733349885*^9}, { 3.6853298076291337`*^9, 3.6853298739599276`*^9}, {3.685330038474337*^9, 3.685330051652091*^9}, {3.6853311309428225`*^9, 3.685331168378964*^9}, { 3.685340142134763*^9, 3.685340180544817*^9}, {3.6853583292043543`*^9, 3.685358334834362*^9}, {3.685358366084406*^9, 3.685358366954407*^9}, { 3.685358408404465*^9, 3.685358518294619*^9}, 3.685358620174762*^9, 3.6853586578748145`*^9, {3.6853588750151186`*^9, 3.6853588857151337`*^9}, { 3.6853589302051954`*^9, 3.685358938995208*^9}, {3.685359014715314*^9, 3.6853590296653347`*^9}, 3.685359148315501*^9, 3.6853598281764526`*^9, { 3.6853683109000263`*^9, 3.685368382250126*^9}, {3.685368420160179*^9, 3.6853684704302497`*^9}, {3.6853685194503183`*^9, 3.685368742860631*^9}, { 3.685369008901004*^9, 3.68536902061102*^9}, {3.6853690791611023`*^9, 3.685369132301176*^9}, {3.6853693219914417`*^9, 3.6853693304114532`*^9}, 3.6853696089118433`*^9, {3.6858758911429157`*^9, 3.685875951793*^9}, { 3.6859484099082212`*^9, 3.6859484970032024`*^9}, {3.686052829875022*^9, 3.686052906242383*^9}, {3.6860535326822133`*^9, 3.686053598029951*^9}, { 3.68605365168902*^9, 3.6860541446091995`*^9}, {3.6860541846064873`*^9, 3.68605440393201*^9}, {3.686054713802734*^9, 3.6860547858298535`*^9}, { 3.6860548280202665`*^9, 3.686054837219793*^9}, {3.686054874127904*^9, 3.686054892139934*^9}, {3.686055136014883*^9, 3.6860551460584574`*^9}, { 3.686055211281188*^9, 3.6860552301962633`*^9}, {3.6860553465409174`*^9, 3.6860553998749685`*^9}, {3.6860556017188663`*^9, 3.6860556050188704`*^9}, {3.6862923512707715`*^9, 3.686292363600789*^9}, { 3.686292409650853*^9, 3.6862924109708548`*^9}, {3.6862924536109147`*^9, 3.6862924596309233`*^9}, {3.686292542221039*^9, 3.6862925430110397`*^9}, { 3.686292988803664*^9, 3.686293001033681*^9}, {3.6866504529025555`*^9, 3.686650526682659*^9}, {3.686650671852862*^9, 3.6866507242929354`*^9}, { 3.6866507657529936`*^9, 3.6866507887630253`*^9}, {3.6866508208230705`*^9, 3.6866509100531955`*^9}, {3.6866509593932643`*^9, 3.686650971113281*^9}, { 3.686651007793332*^9, 3.6866511595335445`*^9}, {3.686651223513634*^9, 3.686651234033649*^9}, {3.686651304763748*^9, 3.6866513363837924`*^9}, { 3.6866514102038956`*^9, 3.686651429943923*^9}, {3.686652993837468*^9, 3.6866530046274834`*^9}, {3.686804398511652*^9, 3.6868044081516657`*^9}, { 3.6868046315619783`*^9, 3.686804631801979*^9}, {3.686804685872054*^9, 3.686804707092084*^9}, {3.6868047382021275`*^9, 3.686804767812169*^9}, { 3.686804824012248*^9, 3.6868048404922705`*^9}, {3.686804942142413*^9, 3.6868049633424425`*^9}, {3.6868050765526013`*^9, 3.686805101092636*^9}, { 3.6868051463526993`*^9, 3.6868052234228067`*^9}, {3.686805307602925*^9, 3.686805311682931*^9}, {3.68680577547358*^9, 3.686805788923599*^9}, { 3.686821702197342*^9, 3.6868217282873783`*^9}, {3.6868225192884855`*^9, 3.686822538368512*^9}, {3.6868226306886415`*^9, 3.6868226683086944`*^9}, { 3.6868227318887835`*^9, 3.6868227627088265`*^9}, {3.686822801638881*^9, 3.6868230490692277`*^9}, {3.686823122979331*^9, 3.6868231833294153`*^9}, { 3.6868232450595016`*^9, 3.6868233753996844`*^9}, {3.6868234153897405`*^9, 3.686823451379791*^9}, {3.6868236736101017`*^9, 3.6868236786601086`*^9}, { 3.6868237164601617`*^9, 3.68682375072021*^9}, {3.68682389396041*^9, 3.68682390087042*^9}, {3.686823940790476*^9, 3.6868239416904774`*^9}, { 3.6868239808805323`*^9, 3.6868239872905407`*^9}, {3.686824051540631*^9, 3.6868240519006314`*^9}, {3.686824360861064*^9, 3.6868243761510854`*^9}, { 3.6868245440213203`*^9, 3.686824577221367*^9}, {3.686824685841519*^9, 3.6868246979115357`*^9}, 3.6868248012716804`*^9, 3.6868253582724605`*^9, { 3.6868255183026843`*^9, 3.686825518932685*^9}, {3.6868264466639843`*^9, 3.6868264497139883`*^9}, {3.6868267792744493`*^9, 3.6868268152945004`*^9}, {3.686827100164899*^9, 3.6868271210549283`*^9}, 3.686827162004986*^9, {3.6868272414950967`*^9, 3.686827327475217*^9}, { 3.686827953126093*^9, 3.686827976506126*^9}, {3.686829128577739*^9, 3.686829138957753*^9}, 3.6868292410978966`*^9, {3.6868292768379464`*^9, 3.686829282727955*^9}, {3.6868293820380936`*^9, 3.686829418138144*^9}, { 3.686829846748744*^9, 3.686829848298746*^9}, {3.6868313063207874`*^9, 3.686831307180789*^9}, {3.6868331276633377`*^9, 3.68683328653356*^9}, { 3.6868394697195063`*^9, 3.6868394933895392`*^9}, 3.686839530999592*^9, { 3.686839582829664*^9, 3.68683963686974*^9}, {3.6868397551199055`*^9, 3.68683979365996*^9}, {3.6868398344600167`*^9, 3.686839866200061*^9}, { 3.687092084401948*^9, 3.687092117031994*^9}, {3.6870922598621936`*^9, 3.6870922645422*^9}, {3.6870962086478376`*^9, 3.6870962658779182`*^9}, 3.687096444838168*^9, {3.687096500978247*^9, 3.687096501638248*^9}, { 3.6870965809883595`*^9, 3.687096592708376*^9}, 3.687096837948719*^9, { 3.68709688890879*^9, 3.687096985798926*^9}, {3.6870971015990877`*^9, 3.6870972179192505`*^9}, {3.6870972618993125`*^9, 3.687097305639374*^9}, { 3.6870973356794157`*^9, 3.6870975186496716`*^9}, {3.6870975796097574`*^9, 3.6870975953197794`*^9}, {3.6870976531898603`*^9, 3.6870976848899045`*^9}, 3.6870977782500353`*^9, {3.687413757687042*^9, 3.6874137834070783`*^9}, { 3.6874140542074575`*^9, 3.687414094417514*^9}, {3.6874143478878684`*^9, 3.687414485538061*^9}, {3.6874146116082373`*^9, 3.68741464894829*^9}, { 3.6874147451084247`*^9, 3.687414766118454*^9}, 3.6874149094486547`*^9, { 3.6874150416688395`*^9, 3.6874150634888706`*^9}, {3.6874152437091227`*^9, 3.687415268869158*^9}, 3.6874153442892637`*^9, {3.687415449879411*^9, 3.687415469659439*^9}, 3.687415529739523*^9, 3.687415564789572*^9, 3.687415645529685*^9, {3.6874168016913037`*^9, 3.687416803441306*^9}, { 3.687421022677213*^9, 3.6874212686075573`*^9}, {3.68742948209425*^9, 3.6874294906842623`*^9}, {3.687844340668378*^9, 3.6878443698084188`*^9}, { 3.6886534778571014`*^9, 3.6886534911571198`*^9}, {3.688906380162199*^9, 3.6889064680223217`*^9}, {3.688906514222396*^9, 3.6889065193925257`*^9}, { 3.688908192623024*^9, 3.6889082006430354`*^9}, {3.688908261823121*^9, 3.688908271653135*^9}, {3.6889083776232834`*^9, 3.6889083922733035`*^9}, { 3.688908466073407*^9, 3.6889084993734536`*^9}, 3.688908533623502*^9, { 3.688908616683618*^9, 3.6889086271336327`*^9}, {3.6889086885637183`*^9, 3.6889087063437433`*^9}, {3.6889091647443852`*^9, 3.6889092012544365`*^9}, {3.6889093019045773`*^9, 3.6889093406746316`*^9}, 3.6889101071957045`*^9, {3.689905940063133*^9, 3.689905972983179*^9}, { 3.692530981927737*^9, 3.6925310416778207`*^9}, {3.692531099797902*^9, 3.6925311384779563`*^9}, {3.692531192258032*^9, 3.692531244668105*^9}, { 3.6925312919881716`*^9, 3.692531425418358*^9}, {3.6925315270885005`*^9, 3.692531643928664*^9}, {3.692535489534048*^9, 3.6925356485142703`*^9}, { 3.692535753564418*^9, 3.6925357992544813`*^9}, {3.6925358831745987`*^9, 3.692535899604622*^9}, {3.692536042584822*^9, 3.692536159384986*^9}, { 3.6925366121156197`*^9, 3.6925366207256317`*^9}, {3.6925367265057793`*^9, 3.69253672683578*^9}, {3.6925368590559654`*^9, 3.6925368636559715`*^9}, { 3.6925370880062857`*^9, 3.692537177856412*^9}, {3.692537322456614*^9, 3.6925373869767046`*^9}, {3.6925390913352747`*^9, 3.6925390925252767`*^9}, {3.692539644430175*^9, 3.6925396711502123`*^9}, { 3.692539727510291*^9, 3.692539730440295*^9}, {3.69253993367058*^9, 3.692539963780622*^9}, {3.6925400018406754`*^9, 3.692540003630678*^9}, { 3.6925401743409166`*^9, 3.6925401747509174`*^9}, {3.692540399111232*^9, 3.692540407981244*^9}, {3.69254047647134*^9, 3.6925404886113567`*^9}, { 3.6925406039715185`*^9, 3.69254060531152*^9}, {3.6925414948727655`*^9, 3.6925414953427663`*^9}, {3.6925415478528395`*^9, 3.692541613062931*^9}, 3.692541649332982*^9, {3.692541727633092*^9, 3.6925418840133104`*^9}, { 3.692541924473367*^9, 3.692542041693531*^9}, {3.6925421488836813`*^9, 3.6925422549438295`*^9}, {3.6925422976938896`*^9, 3.692542521444203*^9}, { 3.6925426221843443`*^9, 3.6925426357343626`*^9}, 3.692542739374508*^9, 3.692599799510878*^9, {3.692599834884901*^9, 3.6925998954663663`*^9}, { 3.692599925635092*^9, 3.6926000095928946`*^9}, {3.692600108929576*^9, 3.6926001456386757`*^9}, {3.6926001874800687`*^9, 3.692600454421337*^9}, { 3.692600503149027*^9, 3.6926006000391626`*^9}, {3.692600680251275*^9, 3.6926006814012766`*^9}, {3.6926009000215826`*^9, 3.6926009410816402`*^9}, 3.692601280532116*^9, {3.6926044914726114`*^9, 3.69260449774262*^9}, 3.6926045660127153`*^9, 3.6926046690228596`*^9, {3.69296647863291*^9, 3.6929664798829117`*^9}, {3.6929665643330297`*^9, 3.6929666141830997`*^9}, {3.6929670390036945`*^9, 3.6929670405536966`*^9}, {3.6929670861037607`*^9, 3.6929670952937737`*^9}, {3.6929671302538223`*^9, 3.6929671549438567`*^9}, {3.6929671904739065`*^9, 3.69296722137395*^9}, { 3.6929672596240034`*^9, 3.6929673352541094`*^9}, 3.6929678909232683`*^9, { 3.6930146982034283`*^9, 3.693014722713463*^9}, {3.6930148540136466`*^9, 3.693014857023651*^9}, {3.6930148913836985`*^9, 3.693014894823704*^9}, { 3.693014930903754*^9, 3.6930151942541227`*^9}, {3.693015247824198*^9, 3.693015430554454*^9}, {3.693015673794794*^9, 3.69301579223496*^9}, { 3.6930163123576884`*^9, 3.693016326897709*^9}, {3.6930164225678425`*^9, 3.693016429727853*^9}, {3.693016686718212*^9, 3.693016698128228*^9}, { 3.693016737038283*^9, 3.693016755068308*^9}, {3.6930168429225607`*^9, 3.6930168719926014`*^9}, {3.6930172049430676`*^9, 3.693017284063178*^9}, { 3.693017336433252*^9, 3.6930173662532935`*^9}, {3.6930180949163136`*^9, 3.6930180975563173`*^9}, {3.6930181870764427`*^9, 3.693018199956461*^9}, { 3.6930182954065943`*^9, 3.693018305996609*^9}, {3.693139886141657*^9, 3.6931399045016823`*^9}, {3.6931402916003532`*^9, 3.693140295770359*^9}, { 3.693140426020541*^9, 3.693140426530542*^9}, {3.6931410492237864`*^9, 3.6931410888738413`*^9}, {3.6931411194438844`*^9, 3.693141126553894*^9}, { 3.693141412004294*^9, 3.693141454164353*^9}, {3.6931415979955544`*^9, 3.6931417931758275`*^9}, {3.6932199559445915`*^9, 3.6932199772046213`*^9}, {3.6932201435748544`*^9, 3.693220170284892*^9}, { 3.693220713855653*^9, 3.693220721825664*^9}, {3.693625124589745*^9, 3.693625153729786*^9}, {3.6940907995669713`*^9, 3.6940909688872085`*^9}, { 3.6940913675677667`*^9, 3.6940914223978434`*^9}, {3.694091508037963*^9, 3.694091572118053*^9}, 3.694092009628666*^9, {3.6940920553287296`*^9, 3.694092229168973*^9}, {3.6940923053990793`*^9, 3.694092374419176*^9}, { 3.6940924537392874`*^9, 3.694092457789293*^9}, 3.694092642849552*^9, { 3.6940928573598523`*^9, 3.694092862379859*^9}, {3.6940945886222763`*^9, 3.694094601932295*^9}, 3.694094849542641*^9, {3.694095764293922*^9, 3.6940957644739223`*^9}, {3.6940960602743363`*^9, 3.6940960732243547`*^9}, {3.6940961211044216`*^9, 3.694096124194426*^9}, { 3.694665030960044*^9, 3.6946650634500895`*^9}, {3.6946652071402903`*^9, 3.6946653490404887`*^9}, {3.6946658702212186`*^9, 3.6946658881212435`*^9}, {3.694665923041292*^9, 3.694665953561335*^9}, { 3.694665995981395*^9, 3.6946660149414215`*^9}, {3.694666050571471*^9, 3.6946660547214766`*^9}, {3.694666169991638*^9, 3.694666292151809*^9}, { 3.6946663456618843`*^9, 3.6946663943919525`*^9}, 3.6946667526224537`*^9, 3.69466680700253*^9, 3.694687076625702*^9, {3.6946874316161985`*^9, 3.6946874621962414`*^9}, 3.694687499496294*^9, {3.694687567516389*^9, 3.694687642816495*^9}, {3.694687679006545*^9, 3.6946877198966026`*^9}, { 3.6946877714966745`*^9, 3.694687931746899*^9}, {3.723798739728607*^9, 3.723798744014243*^9}, {3.7237990126446104`*^9, 3.723799023974499*^9}, { 3.7244116671877546`*^9, 3.7244116733393917`*^9}, {3.724411761793063*^9, 3.7244117718753977`*^9}, {3.724411928386671*^9, 3.7244119682966137`*^9}, { 3.724412131847311*^9, 3.724412188341254*^9}, {3.729414981357122*^9, 3.7294149861075096`*^9}, {3.749817651293678*^9, 3.749817653108206*^9}, { 3.7498176831919456`*^9, 3.7498176846222315`*^9}, 3.7498177601545563`*^9, { 3.749817859674735*^9, 3.749817861044999*^9}, {3.7498179561547127`*^9, 3.749817964489929*^9}, {3.749818149334386*^9, 3.749818237397959*^9}, 3.749818617867873*^9, {3.7505621848002787`*^9, 3.7505622174085107`*^9}, { 3.75056238761455*^9, 3.750562431347901*^9}, {3.7505626332829456`*^9, 3.7505627331565337`*^9}, {3.7505627632642183`*^9, 3.7505627635859113`*^9}, {3.7515359581577415`*^9, 3.7515359614850826`*^9}, {3.751536071974715*^9, 3.7515360961721487`*^9}, 3.7515362040373974`*^9, {3.751536256080162*^9, 3.7515365099108534`*^9}, { 3.751549231137398*^9, 3.7515493334258356`*^9}, {3.7515496891619573`*^9, 3.751549689458767*^9}, {3.763384318028655*^9, 3.763384321230183*^9}, 3.7633844800900145`*^9, {3.7650666220235834`*^9, 3.765066676848461*^9}, { 3.7650667705927696`*^9, 3.765066781277461*^9}, {3.7650668220493402`*^9, 3.7650670769609847`*^9}, {3.765075343296377*^9, 3.765075345014902*^9}, { 3.765075479631569*^9, 3.7650755114191623`*^9}, {3.765075617307859*^9, 3.7650756180851874`*^9}, {3.76507585422694*^9, 3.765075872425325*^9}, { 3.7650760811750383`*^9, 3.7650762635610576`*^9}, {3.7650763100785646`*^9, 3.765076323109063*^9}, {3.7650763765120716`*^9, 3.765076385469493*^9}, { 3.7650764317497897`*^9, 3.7650764864127855`*^9}, 3.765076672990033*^9, { 3.7650767604139767`*^9, 3.7650767965644426`*^9}, {3.765076849411788*^9, 3.76507688334435*^9}, {3.765076928656023*^9, 3.7650769388747053`*^9}, 3.76507697239373*^9, {3.7650770147173185`*^9, 3.7650770820420313`*^9}, { 3.765077138264634*^9, 3.765077175747029*^9}, {3.765077340035742*^9, 3.765077493212038*^9}, {3.7650775254837503`*^9, 3.765077573524544*^9}, { 3.765077619369755*^9, 3.7650776808294816`*^9}, {3.765088266857733*^9, 3.765088281236836*^9}, {3.76508836959641*^9, 3.765088394392946*^9}, { 3.7650900504082956`*^9, 3.765090052695187*^9}, {3.7650900911122713`*^9, 3.765090094160341*^9}, {3.765090519594511*^9, 3.7650905411898503`*^9}, { 3.7885193337832556`*^9, 3.788519339935099*^9}, {3.788519391172593*^9, 3.7885194472501445`*^9}, {3.7885195529105897`*^9, 3.788519558251149*^9}, { 3.7885305232444134`*^9, 3.7885305903888035`*^9}, {3.7885308807721663`*^9, 3.78853088502055*^9}, {3.8200276995553846`*^9, 3.82002773164934*^9}},ExpressionUUID->"3eb15a26-d9b4-475e-816a-\ 3761c48eca68"] }, Closed]], Cell[CellGroupData[{ Cell["BEAM ELEMENT (stab) defs ", "Subsection", CellChangeTimes->{{3.7530187996679964`*^9, 3.753018818586525*^9}, { 3.7633844046177063`*^9, 3.7633844068273706`*^9}, {3.787894828329872*^9, 3.787894876950384*^9}, 3.788519172464745*^9},ExpressionUUID->"79ff8809-dd23-4702-9a6a-\ 3bf6de8d911d"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", "iy0"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx", ",", "fy", ",", "fz", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "fx", ",", "fy", ",", "fz", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx_", ",", "fy_", ",", "fz_", ",", "mx_", ",", "my_", ",", "mz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", ",", "Iyy", ",", "Izz", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "fx", ",", "fy", ",", "fz", ",", "mx", ",", "my", ",", "mz"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx_", ",", "fy_", ",", "fz_", ",", "mx_", ",", "my_", ",", "mz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "ux", ",", "upx", ",", "uy", " ", ",", "uz", " ", ",", "\[Theta]x", " ", ",", "\[Theta]y", " ", ",", "\[Theta]z", " ", ",", "\[Delta]ux", " ", ",", "\[Delta]uy", ",", "\[Delta]uz", ",", "\[Delta]\[Theta]x", ",", "\[Delta]\[Theta]y", ",", "\[Delta]\[Theta]z"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "mapping", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", RowBox[{"uy", "[", "1", "]"}], ",", RowBox[{"uz", "[", "1", "]"}]}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "2", "]"}], ",", RowBox[{"uy", "[", "2", "]"}], ",", RowBox[{"uz", "[", "2", "]"}]}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "1", "]"}], ",", RowBox[{"\[Theta]y", "[", "1", "]"}], ",", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "2", "]"}], ",", RowBox[{"\[Theta]y", "[", "2", "]"}], ",", RowBox[{"\[Theta]z", "[", "2", "]"}]}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], ",", RowBox[{"\[Delta]uy", "[", "1", "]"}], ",", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", RowBox[{"uy", "[", "1", "]"}], ",", RowBox[{"uz", "[", "1", "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]ux", "[", "2", "]"}], ",", RowBox[{"\[Delta]uy", "[", "2", "]"}], ",", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "2", "]"}], ",", RowBox[{"uy", "[", "2", "]"}], ",", RowBox[{"uz", "[", "2", "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], ",", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], ",", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "1", "]"}], ",", RowBox[{"\[Theta]y", "[", "1", "]"}], ",", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}], ",", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}], ",", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "2", "]"}], ",", RowBox[{"\[Theta]y", "[", "2", "]"}], ",", RowBox[{"\[Theta]z", "[", "2", "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"upx", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"upx", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], " ", ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ FractionBox["1", RowBox[{"60", " ", SuperscriptBox["h0", "3"]}]], RowBox[{"(", RowBox[{ RowBox[{"30", " ", "fx", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}], "-", RowBox[{"5", " ", RowBox[{"(", RowBox[{ RowBox[{"144", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"uy", "[", "1", "]"}], "-", RowBox[{"uy", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", "1", "]"}], "-", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"uz", "[", "1", "]"}], "-", RowBox[{"uz", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", "1", "]"}], "-", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"12", " ", SuperscriptBox["h0", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"mz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", "1", "]"}], "-", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"my", " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "+", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"6", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"fz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", "1", "]"}], "+", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"mx", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], "+", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"fz", " ", SuperscriptBox["h0", "5"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], "-", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], ")"}]}], "-", RowBox[{"fy", " ", SuperscriptBox["h0", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "+", RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "+", RowBox[{"h0", " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}]}], "-", RowBox[{"h0", " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}]}], ")"}]}], "-", RowBox[{"72", " ", "EE", " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"uz", "[", "1", "]"}], "-", RowBox[{"uz", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], ")"}]}], "-", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"uy", "[", "1", "]"}], "-", RowBox[{"uy", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", "1", "]"}], "-", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", "1", "]"}], "+", RowBox[{"\[Theta]y", "[", "2", "]"}]}], ")"}]}], "-", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", "1", "]"}], "-", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", "1", "]"}], "+", RowBox[{"\[Theta]z", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"12", " ", SuperscriptBox["h0", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"GG", " ", RowBox[{"(", RowBox[{"Iyy", "+", "Izz"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], "-", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", "1", "]"}], "-", RowBox[{"\[Theta]x", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"2", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], ")"}], " ", RowBox[{"\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}]}], ")"}], " ", RowBox[{"\[Theta]y", "[", "2", "]"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}]}], "+", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], ")"}], " ", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}]}], ")"}], " ", RowBox[{"\[Theta]z", "[", "2", "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "AA", " ", "EE", " ", "h0", " ", RowBox[{"(", RowBox[{ RowBox[{"36", " ", RowBox[{"(", RowBox[{ RowBox[{"upx", "[", "1", "]"}], "-", RowBox[{"upx", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"uy", "[", "1", "]"}], "-", RowBox[{"uy", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", "1", "]"}], "-", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"uz", "[", "1", "]"}], "-", RowBox[{"uz", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", "1", "]"}], "-", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"h0", " ", RowBox[{"(", RowBox[{ RowBox[{"30", " ", RowBox[{"(", RowBox[{ RowBox[{"ux", "[", "1", "]"}], "-", RowBox[{"ux", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]ux", "[", "1", "]"}]}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"upx", "[", "1", "]"}], "-", RowBox[{"upx", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", RowBox[{"uz", "[", "1", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], ")"}]}], "-", RowBox[{"3", " ", RowBox[{"uz", "[", "2", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"h0", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", "1", "]"}], "-", RowBox[{"4", " ", RowBox[{"\[Theta]y", "[", "2", "]"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"\[Theta]y", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", "1", "]"}], "-", RowBox[{"4", " ", RowBox[{"\[Theta]z", "[", "2", "]"}]}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "+", RowBox[{"\[Theta]z", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"uy", "[", "1", "]"}], "-", RowBox[{"uy", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", "1", "]"}], "-", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", "1", "]"}], "+", RowBox[{"\[Theta]y", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", "1", "]"}], "-", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", "1", "]"}], "+", RowBox[{"\[Theta]z", "[", "2", "]"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4430689313272*^9, 3.4430690080792*^9}, { 3.4430690869528*^9, 3.4430691077320004`*^9}, {3.4430691700116*^9, 3.4430691708072*^9}, {3.4430692071717997`*^9, 3.443069246359*^9}, { 3.4430772782732*^9, 3.4430773623416*^9}, {3.4430773978316*^9, 3.4430774104676*^9}, {3.4430775053780003`*^9, 3.4430776180598*^9}, { 3.4434109099524*^9, 3.4434109159584*^9}, {3.4438800815346003`*^9, 3.4438802689304*^9}, {3.443880362624*^9, 3.4438803824516*^9}, { 3.443929565615374*^9, 3.443929570232974*^9}, {3.443935321321974*^9, 3.443935335705174*^9}, {3.443935419945174*^9, 3.443935421489574*^9}, { 3.443935494013974*^9, 3.443935494715974*^9}, {3.443935617565974*^9, 3.4439357217895737`*^9}, {3.443935755360774*^9, 3.443935816107174*^9}, { 3.443942155230774*^9, 3.443942209939974*^9}, {3.443942305710374*^9, 3.4439423142123737`*^9}, {3.4439442908131742`*^9, 3.443944441181574*^9}, { 3.4439447830065737`*^9, 3.4439447917425737`*^9}, {3.443944908541774*^9, 3.443944916060974*^9}, {3.4442731097938004`*^9, 3.4442731115254*^9}, { 3.444273189229*^9, 3.4442732700526*^9}, {3.4442748430004*^9, 3.4442748605036*^9}, {3.4442748977438*^9, 3.4442748989762*^9}, { 3.4442749340762*^9, 3.4442749351057997`*^9}, 3.4442752313382*^9, { 3.4442919702026*^9, 3.4442919911846*^9}, {3.4442921151577997`*^9, 3.4442921271074*^9}, {3.4443811023684*^9, 3.4443811036632*^9}, { 3.4443814073171997`*^9, 3.4443814402956*^9}, {3.4443815036316*^9, 3.4443815147855997`*^9}, {3.4443815537232*^9, 3.4443815747676*^9}, { 3.4443816138143997`*^9, 3.444381633174*^9}, {3.4443816850439997`*^9, 3.4443817801728*^9}, 3.4443853618688*^9, {3.4443855607376003`*^9, 3.4443856337924*^9}, {3.4443861200444*^9, 3.4443861523676*^9}, { 3.4443862280495996`*^9, 3.444386291448*^9}, {3.4443864047352*^9, 3.4443864135336*^9}, {3.4443870026832*^9, 3.4443870095316*^9}, { 3.4444082055056*^9, 3.4444082437412*^9}, {3.4444082797148*^9, 3.4444084583816*^9}, {3.4444084889108*^9, 3.4444085087539997`*^9}, { 3.444408942517*^9, 3.4444089563386*^9}, {3.4444091419564*^9, 3.4444091647167997`*^9}, {3.4444092206428003`*^9, 3.4444092944463997`*^9}, {3.4444093856284*^9, 3.4444094281071997`*^9}, { 3.4444094976988*^9, 3.4444095275104*^9}, {3.444409611064*^9, 3.4444096125772*^9}, 3.4444098504616003`*^9, {3.444409913392*^9, 3.4444099166056004`*^9}, 3.4444100178496*^9, {3.4444103063248*^9, 3.4444103358712*^9}, {3.4444103868208*^9, 3.4444104432460003`*^9}, { 3.4444921219564*^9, 3.4444921256224003`*^9}, {3.444492194824*^9, 3.4444921973668003`*^9}, {3.4444922814351997`*^9, 3.4444922853508*^9}, { 3.4444923330868*^9, 3.4444923345844*^9}, {3.444492366424*^9, 3.4444923855808*^9}, {3.4453153475226*^9, 3.445315360689*^9}, { 3.4465518166373653`*^9, 3.446551863016165*^9}, {3.446551894231765*^9, 3.446552159384965*^9}, {3.446552232377365*^9, 3.4465522555589647`*^9}, { 3.446553347388365*^9, 3.4465533616155653`*^9}, {3.4466058525769997`*^9, 3.4466058529046*^9}, {3.4466064371219997`*^9, 3.4466065097244*^9}, { 3.4466127725788*^9, 3.4466127766036*^9}, {3.4466128124835997`*^9, 3.4466130037864*^9}, {3.4466131532696*^9, 3.4466131761703997`*^9}, { 3.4466133992192*^9, 3.4466134478756*^9}, {3.446613483584*^9, 3.4466134932092*^9}, {3.4466135740952*^9, 3.4466135794927998`*^9}, { 3.4466137283948*^9, 3.4466137341356*^9}, {3.4466138994342003`*^9, 3.4466139023826*^9}, {3.4466139549858*^9, 3.4466139579653997`*^9}, { 3.4466142109818*^9, 3.4466142245226*^9}, {3.4466142793878*^9, 3.4466143652033997`*^9}, {3.4466144712834*^9, 3.4466145978929996`*^9}, { 3.4466146992618*^9, 3.4466147509914*^9}, {3.4466151283086*^9, 3.4466152768986*^9}, {3.4466153107506*^9, 3.4466153406558*^9}, { 3.4466194331976*^9, 3.4466194377528*^9}, {3.4466194847712*^9, 3.446619488718*^9}, {3.4466389495861998`*^9, 3.4466389768238*^9}, { 3.4466391218414*^9, 3.446639306561*^9}, {3.4466393990222*^9, 3.4466394004886*^9}, {3.4466394475694*^9, 3.4466394487706003`*^9}, { 3.4466395034174*^9, 3.4466395049462*^9}, 3.4466395515755997`*^9, { 3.4466396000176*^9, 3.4466396190808*^9}, {3.4466397459088*^9, 3.446639748826*^9}, {3.4466397974356003`*^9, 3.446639798668*^9}, 3.4466398447816*^9, {3.446639894218*^9, 3.4466399201556*^9}, { 3.4466399570964003`*^9, 3.4466399583288*^9}, {3.446639994006*^9, 3.4466400056904*^9}, {3.4466400383568*^9, 3.4466400395892*^9}, { 3.4466400745643997`*^9, 3.4466401025976*^9}, {3.4466401660834*^9, 3.4466401806070004`*^9}, {3.4466402251294003`*^9, 3.446640227407*^9}, { 3.446640260479*^9, 3.4466402657674*^9}, {3.4466404133122*^9, 3.4466405185654*^9}, 3.4466405830462*^9, {3.4467273294214*^9, 3.4467273777813997`*^9}, {3.4467274366558*^9, 3.4467275620954*^9}, { 3.446727593311*^9, 3.4467277412614*^9}, {3.4467283334639997`*^9, 3.4467283356012*^9}, {3.4467283707636003`*^9, 3.4467283727604*^9}, { 3.4467289882664003`*^9, 3.4467291276836*^9}, {3.446778464322*^9, 3.4467786797424*^9}, {3.4467801953803997`*^9, 3.4467802409792*^9}, { 3.4467802998691998`*^9, 3.4467804023456*^9}, 3.4467804345596*^9, { 3.4467808656344*^9, 3.4467808670852003`*^9}, 3.4467818107525997`*^9, { 3.446781855509*^9, 3.446781874385*^9}, {3.4467826737914*^9, 3.4467827381726*^9}, {3.4467828623018*^9, 3.4467831045386*^9}, { 3.4470344113984003`*^9, 3.4470344123344*^9}, {3.4470344628316*^9, 3.4470345343108*^9}, {3.447043591118539*^9, 3.447043642192939*^9}, { 3.447045649625739*^9, 3.447045718437339*^9}, {3.447054774023939*^9, 3.447054834198939*^9}, {3.4470549103449388`*^9, 3.4470549116169386`*^9}, { 3.447054943902939*^9, 3.4470553027109385`*^9}, {3.447055334559939*^9, 3.447055353684939*^9}, {3.447057311918539*^9, 3.447057369747739*^9}, { 3.4470575058577385`*^9, 3.4470575951365385`*^9}, {3.4470581848789387`*^9, 3.4470582040825386`*^9}, {3.451276121243*^9, 3.4512761425838003`*^9}, { 3.4512762022382*^9, 3.4512762064346*^9}, {3.4512762476966*^9, 3.4512762827654*^9}, {3.451276489091*^9, 3.451276541975*^9}, { 3.4512765853118*^9, 3.4512766132046003`*^9}, {3.4512773470306*^9, 3.4512773766082*^9}, {3.4512776069110003`*^9, 3.4512777499318*^9}, 3.4512777831286*^9, {3.4512778785538*^9, 3.451277881627*^9}, { 3.4512780242734003`*^9, 3.4512780302794*^9}, 3.4512780737878*^9, { 3.4512781866226*^9, 3.4512781930810003`*^9}, {3.4512863325078*^9, 3.4512863539266*^9}, {3.4568019250434*^9, 3.4568022712698*^9}, { 3.4568023177422*^9, 3.4568024125278*^9}, {3.4568024694365997`*^9, 3.4568024750369997`*^9}, {3.4568026914402*^9, 3.4568028101094*^9}, { 3.4568028406698*^9, 3.4568028564726*^9}, 3.4568028886085997`*^9, { 3.4568030489454*^9, 3.4568030800986*^9}, 3.4568032004128*^9, { 3.4568035073698*^9, 3.4568035176034*^9}, {3.4568040146596003`*^9, 3.4568040844852*^9}, {3.4568043016684*^9, 3.4568043154744*^9}, { 3.4568045482264*^9, 3.4568045486632*^9}, {3.4568048944996*^9, 3.4568049806116*^9}, {3.4660560628582*^9, 3.4660560753538*^9}, { 3.4660676729379997`*^9, 3.4660676735931997`*^9}, {3.4660677244024*^9, 3.4660677277251997`*^9}, {3.4742646771287394`*^9, 3.47426469439174*^9}, { 3.47426489921974*^9, 3.4742649800437393`*^9}, {3.4801246373348*^9, 3.4801246860536003`*^9}, {3.4801247748176003`*^9, 3.4801247821028*^9}, { 3.4801248161264*^9, 3.4801248295736*^9}, {3.4801248810692*^9, 3.4801248964508*^9}, {3.4801249330484*^9, 3.480124947884*^9}, 3.4801249886468*^9, {3.4801251139147997`*^9, 3.48012512588*^9}, { 3.4838339444988003`*^9, 3.4838339567448*^9}, 3.4838341692012*^9, { 3.4838344350408*^9, 3.4838344353684*^9}, {3.4938987575920324`*^9, 3.4938987586840324`*^9}, {3.4941630624049997`*^9, 3.4941631381274*^9}, { 3.4941632311345997`*^9, 3.4941632492306004`*^9}, 3.4941633249217997`*^9, { 3.4941633940922003`*^9, 3.4941634063538*^9}, {3.4941634538402*^9, 3.4941635051642*^9}, {3.494163565115*^9, 3.4941636341762*^9}, { 3.4941636853442*^9, 3.4941639323234*^9}, {3.4941640277798*^9, 3.4941641455754004`*^9}, {3.4941641790374002`*^9, 3.4941641803789997`*^9}, {3.4941642676142*^9, 3.4941643277678003`*^9}, 3.4941644677018003`*^9, {3.4941646208938*^9, 3.4941646322349997`*^9}, { 3.4941652592693996`*^9, 3.4941652807194*^9}, {3.4941653119038*^9, 3.494165416299*^9}, {3.494165453895*^9, 3.4941654544722*^9}, { 3.4950990979779997`*^9, 3.495099142701*^9}, {3.495099172958*^9, 3.4950991806289997`*^9}, {3.495099227097*^9, 3.495099238113*^9}, 3.495099290797*^9, {3.495099346084*^9, 3.495099359507*^9}, { 3.495099456308*^9, 3.495099464091*^9}, 3.495099683108*^9, { 3.495100428112*^9, 3.495100434958*^9}, {3.4951006496219997`*^9, 3.495100649992*^9}, {3.4987235265018*^9, 3.4987235939094*^9}, { 3.4987236420666*^9, 3.4987236530646*^9}, {3.4987237305341997`*^9, 3.4987237396914*^9}, {3.498733136159*^9, 3.4987332972446003`*^9}, { 3.4987364783094*^9, 3.4987364860626*^9}, {3.4987366201134*^9, 3.4987366236078*^9}, {3.4987367272386*^9, 3.4987367464890003`*^9}, { 3.4987369428462*^9, 3.4987369670886*^9}, {3.4987370134518003`*^9, 3.4987370259941998`*^9}, {3.4987370944002*^9, 3.4987371027618*^9}, { 3.4987371921029997`*^9, 3.498737193663*^9}, {3.4987372660938*^9, 3.4987372935498*^9}, {3.4987373290554*^9, 3.4987377176202*^9}, { 3.4987377520182*^9, 3.4987379139462*^9}, {3.4987382030216*^9, 3.4987382667078*^9}, {3.4987888391818*^9, 3.4987888608346*^9}, { 3.4988785131146*^9, 3.4988785160162*^9}, {3.5007170967096*^9, 3.5007170999076*^9}, 3.5007182237316*^9, {3.5007182772864*^9, 3.5007182987832003`*^9}, {3.5009573226744003`*^9, 3.5009573940444*^9}, 3.5009574358710003`*^9, 3.5009604278482*^9, {3.5009897246173353`*^9, 3.5009898480289354`*^9}, {3.5009901464413357`*^9, 3.5009901475333357`*^9}, {3.5009901801997356`*^9, 3.500990274096135*^9}, { 3.5010475253292*^9, 3.5010475852332*^9}, {3.5010605722018003`*^9, 3.5010606739762*^9}, {3.5010607202146*^9, 3.5010607323358*^9}, { 3.5010607920526*^9, 3.501061118467*^9}, {3.5010612022078*^9, 3.5010612277138*^9}, {3.5010616467766*^9, 3.5010617938534*^9}, { 3.5010618406222*^9, 3.5010619950778*^9}, {3.5010621500638*^9, 3.5010622514014*^9}, {3.5010625292218*^9, 3.5010625409374*^9}, { 3.5010626043046*^9, 3.5010626313862*^9}, {3.5010626787166*^9, 3.5010626790754004`*^9}, {3.501074457561*^9, 3.5010744671082*^9}, 3.5010763029458*^9, {3.5032210899309998`*^9, 3.5032212413900003`*^9}, { 3.557658203404973*^9, 3.557658219644601*^9}, {3.5576584433801947`*^9, 3.557658496030287*^9}, {3.5576585501779823`*^9, 3.5576586046064777`*^9}, { 3.557658648910555*^9, 3.557658754600741*^9}, {3.557658963945511*^9, 3.5576589782507353`*^9}, {3.557659009949991*^9, 3.5576591437514267`*^9}, { 3.557659182221094*^9, 3.5576592187719584`*^9}, 3.557659413865901*^9, { 3.557659921100792*^9, 3.5576599556392527`*^9}, {3.557660706920972*^9, 3.5576607248454037`*^9}, {3.557661209085854*^9, 3.557661209413454*^9}, { 3.5577526651911488`*^9, 3.5577526932087984`*^9}, {3.5577527272480583`*^9, 3.557752747122493*^9}, {3.5577528374934516`*^9, 3.557752838523053*^9}, { 3.557752881204728*^9, 3.557752891313546*^9}, {3.557752938612829*^9, 3.5577529469120436`*^9}, {3.557753060714244*^9, 3.557753062633047*^9}, { 3.5577536609544907`*^9, 3.5577536637936954`*^9}, {3.5577537824631042`*^9, 3.557753810184353*^9}, {3.557753841025607*^9, 3.5577540648392*^9}, 3.5577541920574236`*^9, {3.5577547033327217`*^9, 3.557754716967146*^9}, { 3.5577547716296415`*^9, 3.557754802112095*^9}, {3.5577549509363565`*^9, 3.5577549771444025`*^9}, 3.5577551382302856`*^9, {3.55775527184452*^9, 3.557755272858522*^9}, {3.557755881555991*^9, 3.557755886548*^9}, { 3.557756158316077*^9, 3.557756231885806*^9}, {3.5577572408487787`*^9, 3.557757248835993*^9}, {3.5577572834368534`*^9, 3.5577575888229895`*^9}, { 3.5577578129641833`*^9, 3.557757862837471*^9}, {3.557758025514557*^9, 3.557758079272251*^9}, 3.557810586960072*^9, {3.5578240262005973`*^9, 3.5578240345360737`*^9}, {3.557824091429328*^9, 3.5578241008156557`*^9}, { 3.557831525255726*^9, 3.5578315319793377`*^9}, 3.5578315716190076`*^9, { 3.557831606079468*^9, 3.557831629432709*^9}, {3.5578316663267736`*^9, 3.5578317569473333`*^9}, {3.5578322144181366`*^9, 3.557832218084143*^9}, { 3.557836356693412*^9, 3.557836473771618*^9}, {3.5578365201660995`*^9, 3.5578365974018345`*^9}, {3.5578366426731143`*^9, 3.557836658865943*^9}, { 3.557836691017599*^9, 3.5578367924957776`*^9}, {3.5578368305442443`*^9, 3.557836888279946*^9}, {3.5578369382156334`*^9, 3.5578370776642785`*^9}, { 3.5578383536061196`*^9, 3.5578383735117545`*^9}, {3.5578385892445335`*^9, 3.5578385978869486`*^9}, {3.5578386713006773`*^9, 3.557838700113928*^9}, { 3.5578387451200075`*^9, 3.5578387467892103`*^9}, {3.5578388951454706`*^9, 3.5578389248635225`*^9}, {3.5578389679351983`*^9, 3.557838983535226*^9}, { 3.5578390227692947`*^9, 3.557839023143696*^9}, {3.557839097696226*^9, 3.5578391125162525`*^9}, {3.5578391553539276`*^9, 3.557839199892006*^9}, { 3.55783924184048*^9, 3.557839294490572*^9}, {3.5578393285922318`*^9, 3.557839398683155*^9}, {3.557839430522811*^9, 3.557839470162481*^9}, { 3.5578395370865984`*^9, 3.5578395446994114`*^9}, {3.5578396068499207`*^9, 3.5578396118575296`*^9}, 3.5578943518105097`*^9, {3.557894388361374*^9, 3.5578944029629993`*^9}, {3.5578944607611012`*^9, 3.5578944989499683`*^9}, {3.5578945393696394`*^9, 3.557894561537278*^9}, { 3.5578946028617506`*^9, 3.5578946188985786`*^9}, {3.557894650894235*^9, 3.5578947812636642`*^9}, {3.55789481884413*^9, 3.5578948191249304`*^9}, { 3.5578949768100076`*^9, 3.5578949836272197`*^9}, {3.5578967386805477`*^9, 3.55789678549623*^9}, {3.5578968804691963`*^9, 3.557896888643611*^9}, { 3.557897022491846*^9, 3.5578970341450663`*^9}, {3.557897620940097*^9, 3.55789765120415*^9}, {3.5579218072271147`*^9, 3.5579218263059483`*^9}, { 3.557922095312821*^9, 3.557922116965659*^9}, {3.557922178086566*^9, 3.557922188616585*^9}, {3.5579223258812256`*^9, 3.557922327066828*^9}, { 3.5579224596046605`*^9, 3.557922461804264*^9}, 3.5579805928465395`*^9, { 3.5579815200581703`*^9, 3.557981541711009*^9}, 3.557985544779242*^9, { 3.5579863164793987`*^9, 3.5579863339514294`*^9}, {3.557986523210962*^9, 3.557986568841042*^9}, 3.5579866122559185`*^9, 3.557986993536188*^9, { 3.5579871244716187`*^9, 3.5579871290580263`*^9}, 3.557987173486905*^9, 3.5579872166989803`*^9, {3.5599618621582537`*^9, 3.5599618642486577`*^9}, { 3.559961969720443*^9, 3.5599619894700775`*^9}, 3.559963611089726*^9, { 3.5601298891258235`*^9, 3.560129889422224*^9}, {3.560132445157113*^9, 3.5601324458591146`*^9}, {3.561978472080926*^9, 3.561978472392926*^9}, { 3.6297802564412937`*^9, 3.6297802957377625`*^9}, {3.62978033369263*^9, 3.629780429741998*^9}, {3.6297805790030603`*^9, 3.6297809429048996`*^9}, { 3.629780987957779*^9, 3.629781197575347*^9}, {3.629781240397422*^9, 3.629781337663593*^9}, {3.6297813946972933`*^9, 3.6297814529165955`*^9}, { 3.6297814952550697`*^9, 3.629781527578326*^9}, {3.62978162025529*^9, 3.629781647633338*^9}, {3.629781678833393*^9, 3.629781763120341*^9}, 3.6297818028224106`*^9, {3.6297818432108817`*^9, 3.629781872570133*^9}, { 3.629782355765382*^9, 3.629782427603508*^9}, {3.6297824692243814`*^9, 3.629782674863942*^9}, {3.629782707218399*^9, 3.6297829295343895`*^9}, { 3.629783005631323*^9, 3.6297830574702144`*^9}, {3.6297831098551064`*^9, 3.629783142786764*^9}, {3.629783433711675*^9, 3.629783442619291*^9}, { 3.6297834942397814`*^9, 3.6297835175930223`*^9}, 3.6297835794939313`*^9, { 3.6297836160291953`*^9, 3.6297837668970604`*^9}, {3.6297842042438283`*^9, 3.6297842697483435`*^9}, {3.6297843514456873`*^9, 3.629784370742921*^9}, { 3.629784443829049*^9, 3.6297844678842916`*^9}, {3.6297845252611923`*^9, 3.629784525588793*^9}, {3.6297846136821475`*^9, 3.629784629235375*^9}, { 3.629784814797701*^9, 3.629784927648299*^9}, {3.629785259960083*^9, 3.6297852602096834`*^9}, {3.6297858780175686`*^9, 3.629785917282837*^9}, { 3.629786048057867*^9, 3.629786048681868*^9}, 3.6297863278755584`*^9, { 3.6297867047133856`*^9, 3.629786748533863*^9}, {3.6297867791567163`*^9, 3.6297868491540394`*^9}, {3.6297875320748396`*^9, 3.629787569795706*^9}, { 3.6297876247234025`*^9, 3.6297877281983843`*^9}, {3.6297877681812544`*^9, 3.629787774015665*^9}, {3.629787831408166*^9, 3.6297878355265727`*^9}, { 3.6297878775686464`*^9, 3.6297878861174617`*^9}, {3.6297879185343184`*^9, 3.629787919064719*^9}, {3.6297880043032694`*^9, 3.62978800470887*^9}, 3.6297880488257475`*^9, {3.6297882100052304`*^9, 3.6297882174776435`*^9}, { 3.6297882697533355`*^9, 3.6297882948381796`*^9}, {3.6297883467550707`*^9, 3.6297883991087627`*^9}, {3.6297887361785545`*^9, 3.629788783961438*^9}, 3.629788825395111*^9, {3.629789006152629*^9, 3.6297890321266747`*^9}, { 3.6297891133248167`*^9, 3.629789145336073*^9}, {3.6297891926821566`*^9, 3.629789194257759*^9}, {3.629789255316266*^9, 3.6297892556282673`*^9}, { 3.629869102295367*^9, 3.629869160124668*^9}, {3.6298691942887287`*^9, 3.6298696149902673`*^9}, {3.6298696993864155`*^9, 3.62986975897852*^9}, { 3.6298698387726603`*^9, 3.629869912030389*^9}, {3.6298700722270703`*^9, 3.629870234560955*^9}, {3.629870580429163*^9, 3.629870630458451*^9}, { 3.630556081081209*^9, 3.630556104902451*^9}, {3.6305562643503313`*^9, 3.6305562763935523`*^9}, {3.6305563415080667`*^9, 3.630556480956712*^9}, { 3.630556692851884*^9, 3.630556695347888*^9}, {3.630556730042349*^9, 3.630556914528273*^9}, {3.6305653725974936`*^9, 3.6305656807121167`*^9}, { 3.630565758760581*^9, 3.6305657739024467`*^9}, {3.630565858170267*^9, 3.63056596644846*^9}, {3.6305661502619734`*^9, 3.6305661523230915`*^9}, { 3.6305662653385553`*^9, 3.630566370352562*^9}, {3.6305667786019125`*^9, 3.630566790535595*^9}, {3.6305668214773645`*^9, 3.630567044691132*^9}, { 3.6305670772499943`*^9, 3.6305670783710585`*^9}, 3.630567272031135*^9, { 3.630567303902958*^9, 3.630567409875019*^9}, {3.630568671196477*^9, 3.6305687195002403`*^9}, {3.6305687542132254`*^9, 3.630568758623478*^9}, { 3.630568855671028*^9, 3.630568859250233*^9}, {3.630569706514694*^9, 3.630569775526641*^9}, 3.630569982346471*^9, {3.6305701679130845`*^9, 3.630570205199217*^9}, {3.6305703751399374`*^9, 3.630570526177576*^9}, { 3.630587657039589*^9, 3.630587688367381*^9}, {3.6305880733027773`*^9, 3.6305883365376396`*^9}, {3.6305886689118233`*^9, 3.6305886717978287`*^9}, 3.6305889776831656`*^9, {3.6305890389444733`*^9, 3.6305890437180815`*^9}, { 3.630589093248169*^9, 3.6305891296430326`*^9}, 3.630589181700324*^9, { 3.6305892509956455`*^9, 3.6305892594820604`*^9}, {3.630589318949365*^9, 3.6305893334729905`*^9}, {3.630589630294712*^9, 3.6305896376267247`*^9}, { 3.630589683288005*^9, 3.630589684988408*^9}, {3.630597310538067*^9, 3.630597340080757*^9}, {3.630597391446695*^9, 3.630597400596218*^9}, { 3.6305974350611897`*^9, 3.6305974605306463`*^9}, {3.630633997622449*^9, 3.630634003125764*^9}, {3.630659322217756*^9, 3.63065932438616*^9}, { 3.6306611578252783`*^9, 3.6306611625988865`*^9}, {3.6306612541554475`*^9, 3.630661257587454*^9}, {3.6306613001287284`*^9, 3.6306613026715326`*^9}, { 3.6306613920752897`*^9, 3.6306613949768953`*^9}, {3.6306706377509866`*^9, 3.630670654957817*^9}, {3.6306749981919994`*^9, 3.630675005793434*^9}, { 3.6306751229631357`*^9, 3.630675150017683*^9}, {3.6306752035287437`*^9, 3.6306752096180925`*^9}, {3.630675315921172*^9, 3.6306753201514144`*^9}, { 3.6306757793287754`*^9, 3.6306757796257925`*^9}, {3.630675814406262*^9, 3.6306758147026625`*^9}, {3.6306760107574763`*^9, 3.6306760154417443`*^9}, {3.6306789722320743`*^9, 3.6306789870309205`*^9}, {3.6306790257051325`*^9, 3.630679028076268*^9}, { 3.6306800259177256`*^9, 3.6306800406129513`*^9}, {3.6306801239326982`*^9, 3.6306801300167084`*^9}, {3.630680769261832*^9, 3.6306807806186523`*^9}, { 3.630681157468514*^9, 3.6306811577649145`*^9}, {3.6306812744219193`*^9, 3.63068127471832*^9}, {3.6306817187418995`*^9, 3.6306817919060287`*^9}, { 3.630681879188182*^9, 3.6306819111526375`*^9}, {3.6306821191790032`*^9, 3.6306821283050194`*^9}, {3.630720543651497*^9, 3.6307205534300566`*^9}, { 3.630721035525631*^9, 3.630721092774905*^9}, {3.6307212510439577`*^9, 3.6307213064777765`*^9}, {3.6307477437169704`*^9, 3.6307478284095197`*^9}, {3.6307478614971776`*^9, 3.6307478785948076`*^9}, {3.6307479884814005`*^9, 3.630748002880226*^9}, { 3.630748045624301*^9, 3.630748063876333*^9}, {3.630748111596817*^9, 3.6307481498324842`*^9}, {3.6307489182430334`*^9, 3.6307489447786803`*^9}, {3.630749037427243*^9, 3.6307490443848553`*^9}, { 3.6307491041485605`*^9, 3.6307491384218206`*^9}, {3.6307491914151134`*^9, 3.630749196890723*^9}, {3.6307492445800066`*^9, 3.6307493439989815`*^9}, { 3.630749396212273*^9, 3.6307494766304145`*^9}, {3.6307495333989143`*^9, 3.6307495547241516`*^9}, {3.6307496525831237`*^9, 3.630749669571553*^9}, { 3.630750220602922*^9, 3.6307502881822405`*^9}, {3.6307510631916018`*^9, 3.630751068292811*^9}, {3.6307511226589065`*^9, 3.630751137962533*^9}, { 3.6307512555243397`*^9, 3.630751282777588*^9}, {3.630752266971757*^9, 3.630752414599744*^9}, {3.630752446407563*^9, 3.630752457388191*^9}, { 3.6307589380050273`*^9, 3.6307590266300964`*^9}, {3.6307591666721067`*^9, 3.63075923229886*^9}, 3.630760288282259*^9, {3.6307603547370596`*^9, 3.630760557414652*^9}, {3.630760654134184*^9, 3.63076065510824*^9}, { 3.6307606911683025`*^9, 3.6307606919283457`*^9}, {3.6307607642334814`*^9, 3.6307607648645177`*^9}, {3.630761455000991*^9, 3.6307614616743727`*^9}, { 3.630761507825012*^9, 3.630761605776615*^9}, {3.630761652999316*^9, 3.630761695865768*^9}, {3.630761771278081*^9, 3.6307617792215357`*^9}, 3.6307629478424797`*^9, {3.632205207880766*^9, 3.6322052561155243`*^9}, { 3.6322052892474194`*^9, 3.6322052915745525`*^9}, 3.6322053746993074`*^9, { 3.6322062705415463`*^9, 3.6322062726016645`*^9}, {3.6322063396935015`*^9, 3.63220636484194*^9}, {3.6322064410612993`*^9, 3.6322064491667633`*^9}, { 3.632206580308264*^9, 3.6322066373275256`*^9}, {3.6322066736436024`*^9, 3.6322067467737856`*^9}, {3.632206782260815*^9, 3.6322071351279984`*^9}, 3.6322071989226465`*^9, {3.632207270393735*^9, 3.6322073359894867`*^9}, { 3.6322073997741346`*^9, 3.6322074126708727`*^9}, {3.632207491777397*^9, 3.632207682289294*^9}, {3.632207809621577*^9, 3.632207827973626*^9}, { 3.6322079043859973`*^9, 3.6322079279443445`*^9}, {3.6322080916397076`*^9, 3.6322081666649985`*^9}, 3.634905258940913*^9, {3.634905370524296*^9, 3.6349054089004903`*^9}, {3.6349054472556844`*^9, 3.63490544787272*^9}, { 3.634905483492757*^9, 3.6349055164646425`*^9}, {3.634905574352954*^9, 3.634905628121029*^9}, {3.6349057012822137`*^9, 3.6349057207913294`*^9}, { 3.6349061371061416`*^9, 3.634906354438572*^9}, {3.6349063890455513`*^9, 3.6349064369332905`*^9}, {3.634906537696054*^9, 3.634906601859724*^9}, 3.634906706128688*^9, {3.6349069249442034`*^9, 3.6349069328326545`*^9}, { 3.6349070151973653`*^9, 3.6349070242298822`*^9}, {3.6349070817921743`*^9, 3.6349070822111983`*^9}, {3.634907723288866*^9, 3.634907739005765*^9}, { 3.6349079580732946`*^9, 3.6349079868219395`*^9}, {3.634908200284148*^9, 3.634908315195721*^9}, {3.6349083774582825`*^9, 3.6349084027997313`*^9}, { 3.63490844507615*^9, 3.634908448843365*^9}, {3.634914956333157*^9, 3.634915020054802*^9}, {3.634915050572547*^9, 3.6349150956171236`*^9}, { 3.6349539785771523`*^9, 3.634953978975175*^9}, {3.6349540728785458`*^9, 3.6349541681829967`*^9}, {3.634954211263461*^9, 3.6349542495746527`*^9}, { 3.6349543251259737`*^9, 3.634954355882733*^9}, {3.6349543892536416`*^9, 3.6349544742835045`*^9}, {3.634954547519694*^9, 3.6349545640246377`*^9}, { 3.6349547051657104`*^9, 3.6349547107930326`*^9}, {3.634954745355009*^9, 3.634954752101395*^9}, {3.6349547948858423`*^9, 3.6349548053894434`*^9}, { 3.634954904907135*^9, 3.6349549451084347`*^9}, {3.634955219605135*^9, 3.6349552640926795`*^9}, {3.634955320189888*^9, 3.634955348763522*^9}, { 3.634955386393675*^9, 3.6349555039273973`*^9}, {3.6349557669644423`*^9, 3.6349557672004557`*^9}, {3.634955894841756*^9, 3.634955902578199*^9}, { 3.6349559513739896`*^9, 3.6349560216320086`*^9}, {3.634956120144643*^9, 3.634956128996149*^9}, {3.6349561700724983`*^9, 3.6349561978900895`*^9}, { 3.6349562480719595`*^9, 3.634956254326318*^9}, {3.634956331684742*^9, 3.6349563460575643`*^9}, {3.634956379242462*^9, 3.63495642676418*^9}, 3.6349564696636343`*^9, {3.6351524116477795`*^9, 3.6351524153379908`*^9}, { 3.6352134400282927`*^9, 3.635213442148414*^9}, {3.6352134745862694`*^9, 3.635213495869487*^9}, {3.6352135383409157`*^9, 3.6352137157160616`*^9}, { 3.6352137493569856`*^9, 3.635213764522853*^9}, {3.635214215036621*^9, 3.635214227593339*^9}, {3.635214407257615*^9, 3.63521441713218*^9}, { 3.635215297101512*^9, 3.635215303964904*^9}, {3.6352154111120324`*^9, 3.635215431504199*^9}, {3.635216346055508*^9, 3.635216494371991*^9}, { 3.635216631050809*^9, 3.6352166603244834`*^9}, {3.635216763034358*^9, 3.635216764164423*^9}, {3.6352168771938877`*^9, 3.635216888828553*^9}, 3.6352169832479534`*^9, 3.635217037668066*^9, {3.6352172024924936`*^9, 3.6352172054526625`*^9}, {3.635217344025589*^9, 3.635217346898753*^9}, 3.6352173863770113`*^9, {3.635217519639633*^9, 3.6352175507014103`*^9}, 3.635217615445113*^9, {3.6352178715087595`*^9, 3.635217880460271*^9}, { 3.6352185912849283`*^9, 3.635218598444338*^9}, {3.6352186995721216`*^9, 3.635218714955002*^9}, {3.6352189761749425`*^9, 3.6352189789341*^9}, { 3.6352195060322485`*^9, 3.635219509972474*^9}, 3.6352195673477554`*^9, 3.6352195994635925`*^9, {3.6352197336482677`*^9, 3.635219737452485*^9}, { 3.6352197706093817`*^9, 3.6352197723214793`*^9}, {3.635219941784172*^9, 3.6352199485115566`*^9}, {3.6352200714185867`*^9, 3.6352200854323883`*^9}, {3.6352202085694313`*^9, 3.635220235849992*^9}, { 3.6352202816336107`*^9, 3.6352203110962954`*^9}, {3.6352204980449886`*^9, 3.6352205276526823`*^9}, {3.6352253191447396`*^9, 3.6352253299913597`*^9}, {3.6352253611111403`*^9, 3.6352253637572913`*^9}, {3.635225409322898*^9, 3.6352255965196047`*^9}, { 3.6352260914249115`*^9, 3.6352261698393965`*^9}, {3.63522638233055*^9, 3.6352264188036366`*^9}, {3.635227493469104*^9, 3.635227556935734*^9}, { 3.6352276745764627`*^9, 3.635227730116639*^9}, {3.6352287979917183`*^9, 3.6352288587651944`*^9}, {3.635228894237223*^9, 3.635228948324317*^9}, { 3.635229365252164*^9, 3.6352293902275925`*^9}, {3.63522947690555*^9, 3.6352294807837715`*^9}, {3.6352492831123204`*^9, 3.6352492983621926`*^9}, 3.6356569054520617`*^9, {3.6363778004499054`*^9, 3.636377802787039*^9}, { 3.6363778414932528`*^9, 3.6363778525308843`*^9}, {3.636384436335312*^9, 3.6363846409950175`*^9}, {3.636384971250907*^9, 3.6363849738080535`*^9}, { 3.6363850170465264`*^9, 3.636385030729309*^9}, {3.6363851286779118`*^9, 3.636385138359465*^9}, {3.6363851699712734`*^9, 3.636385223111313*^9}, { 3.656076172452749*^9, 3.656076182171566*^9}, {3.6560765578514256`*^9, 3.656076619019133*^9}, 3.6560772545486493`*^9, {3.6630719749029694`*^9, 3.6630719878027077`*^9}, {3.6630720702554235`*^9, 3.6630720807290225`*^9}, {3.6630721155740156`*^9, 3.6630721713712068`*^9}, {3.663072270834896*^9, 3.6630722882218904`*^9}, 3.6630724099968557`*^9, {3.685234767958906*^9, 3.685234768480936*^9}, { 3.685252204033695*^9, 3.6852522340537376`*^9}, {3.6852522757137957`*^9, 3.6852523115138454`*^9}, {3.68525376314359*^9, 3.6852537725041256`*^9}, { 3.6852539763277836`*^9, 3.6852539861693463`*^9}, 3.6852540682470407`*^9, 3.6852541660656357`*^9, {3.6852604801645336`*^9, 3.6852605060345697`*^9}, { 3.6852605373446136`*^9, 3.6852605977846985`*^9}, 3.685260655254779*^9, { 3.6853280002218475`*^9, 3.685328019561875*^9}, 3.685328064721938*^9, { 3.6853280953119807`*^9, 3.6853282636022167`*^9}, {3.685328356242346*^9, 3.685328598671985*^9}, {3.6853286682069626`*^9, 3.6853287982524004`*^9}, { 3.6853288753368096`*^9, 3.6853289367033195`*^9}, {3.685328968274125*^9, 3.685328978713722*^9}, {3.685329033941881*^9, 3.685329044950511*^9}, { 3.685329173522865*^9, 3.6853294420842257`*^9}, {3.6853296024223967`*^9, 3.6853296124319687`*^9}, {3.6853297221712456`*^9, 3.685329733349885*^9}, { 3.6853298076291337`*^9, 3.6853298739599276`*^9}, {3.685330038474337*^9, 3.685330051652091*^9}, {3.6853311309428225`*^9, 3.685331168378964*^9}, { 3.685340142134763*^9, 3.685340180544817*^9}, {3.6853583292043543`*^9, 3.685358334834362*^9}, {3.685358366084406*^9, 3.685358366954407*^9}, { 3.685358408404465*^9, 3.685358518294619*^9}, 3.685358620174762*^9, 3.6853586578748145`*^9, {3.6853588750151186`*^9, 3.6853588857151337`*^9}, { 3.6853589302051954`*^9, 3.685358938995208*^9}, {3.685359014715314*^9, 3.6853590296653347`*^9}, 3.685359148315501*^9, 3.6853598281764526`*^9, { 3.6853683109000263`*^9, 3.685368382250126*^9}, {3.685368420160179*^9, 3.6853684704302497`*^9}, {3.6853685194503183`*^9, 3.685368742860631*^9}, { 3.685369008901004*^9, 3.68536902061102*^9}, {3.6853690791611023`*^9, 3.685369132301176*^9}, {3.6853693219914417`*^9, 3.6853693304114532`*^9}, 3.6853696089118433`*^9, {3.6858758911429157`*^9, 3.685875951793*^9}, { 3.6859484099082212`*^9, 3.6859484970032024`*^9}, {3.686052829875022*^9, 3.686052906242383*^9}, {3.6860535326822133`*^9, 3.686053598029951*^9}, { 3.68605365168902*^9, 3.6860541446091995`*^9}, {3.6860541846064873`*^9, 3.68605440393201*^9}, {3.686054713802734*^9, 3.6860547858298535`*^9}, { 3.6860548280202665`*^9, 3.686054837219793*^9}, {3.686054874127904*^9, 3.686054892139934*^9}, {3.686055136014883*^9, 3.6860551460584574`*^9}, { 3.686055211281188*^9, 3.6860552301962633`*^9}, {3.6860553465409174`*^9, 3.6860553998749685`*^9}, {3.6860556017188663`*^9, 3.6860556050188704`*^9}, {3.6862923512707715`*^9, 3.686292363600789*^9}, { 3.686292409650853*^9, 3.6862924109708548`*^9}, {3.6862924536109147`*^9, 3.6862924596309233`*^9}, {3.686292542221039*^9, 3.6862925430110397`*^9}, { 3.686292988803664*^9, 3.686293001033681*^9}, {3.6866504529025555`*^9, 3.686650526682659*^9}, {3.686650671852862*^9, 3.6866507242929354`*^9}, { 3.6866507657529936`*^9, 3.6866507887630253`*^9}, {3.6866508208230705`*^9, 3.6866509100531955`*^9}, {3.6866509593932643`*^9, 3.686650971113281*^9}, { 3.686651007793332*^9, 3.6866511595335445`*^9}, {3.686651223513634*^9, 3.686651234033649*^9}, {3.686651304763748*^9, 3.6866513363837924`*^9}, { 3.6866514102038956`*^9, 3.686651429943923*^9}, {3.686652993837468*^9, 3.6866530046274834`*^9}, {3.686804398511652*^9, 3.6868044081516657`*^9}, { 3.6868046315619783`*^9, 3.686804631801979*^9}, {3.686804685872054*^9, 3.686804707092084*^9}, {3.6868047382021275`*^9, 3.686804767812169*^9}, { 3.686804824012248*^9, 3.6868048404922705`*^9}, {3.686804942142413*^9, 3.6868049633424425`*^9}, {3.6868050765526013`*^9, 3.686805101092636*^9}, { 3.6868051463526993`*^9, 3.6868052234228067`*^9}, {3.686805307602925*^9, 3.686805311682931*^9}, {3.68680577547358*^9, 3.686805788923599*^9}, { 3.686821702197342*^9, 3.6868217282873783`*^9}, {3.6868225192884855`*^9, 3.686822538368512*^9}, {3.6868226306886415`*^9, 3.6868226683086944`*^9}, { 3.6868227318887835`*^9, 3.6868227627088265`*^9}, {3.686822801638881*^9, 3.6868230490692277`*^9}, {3.686823122979331*^9, 3.6868231833294153`*^9}, { 3.6868232450595016`*^9, 3.6868233753996844`*^9}, {3.6868234153897405`*^9, 3.686823451379791*^9}, {3.6868236736101017`*^9, 3.6868236786601086`*^9}, { 3.6868237164601617`*^9, 3.68682375072021*^9}, {3.68682389396041*^9, 3.68682390087042*^9}, {3.686823940790476*^9, 3.6868239416904774`*^9}, { 3.6868239808805323`*^9, 3.6868239872905407`*^9}, {3.686824051540631*^9, 3.6868240519006314`*^9}, {3.686824360861064*^9, 3.6868243761510854`*^9}, { 3.6868245440213203`*^9, 3.686824577221367*^9}, {3.686824685841519*^9, 3.6868246979115357`*^9}, 3.6868248012716804`*^9, 3.6868253582724605`*^9, { 3.6868255183026843`*^9, 3.686825518932685*^9}, {3.6868264466639843`*^9, 3.6868264497139883`*^9}, {3.6868267792744493`*^9, 3.6868268152945004`*^9}, {3.686827100164899*^9, 3.6868271210549283`*^9}, 3.686827162004986*^9, {3.6868272414950967`*^9, 3.686827327475217*^9}, { 3.686827953126093*^9, 3.686827976506126*^9}, {3.686829128577739*^9, 3.686829138957753*^9}, 3.6868292410978966`*^9, {3.6868292768379464`*^9, 3.686829282727955*^9}, {3.6868293820380936`*^9, 3.686829418138144*^9}, { 3.686829846748744*^9, 3.686829848298746*^9}, {3.6868313063207874`*^9, 3.686831307180789*^9}, {3.6868331276633377`*^9, 3.68683328653356*^9}, { 3.6868394697195063`*^9, 3.6868394933895392`*^9}, 3.686839530999592*^9, { 3.686839582829664*^9, 3.68683963686974*^9}, {3.6868397551199055`*^9, 3.68683979365996*^9}, {3.6868398344600167`*^9, 3.686839866200061*^9}, { 3.687092084401948*^9, 3.687092117031994*^9}, {3.6870922598621936`*^9, 3.6870922645422*^9}, {3.6870962086478376`*^9, 3.6870962658779182`*^9}, 3.687096444838168*^9, {3.687096500978247*^9, 3.687096501638248*^9}, { 3.6870965809883595`*^9, 3.687096592708376*^9}, 3.687096837948719*^9, { 3.68709688890879*^9, 3.687096985798926*^9}, {3.6870971015990877`*^9, 3.6870972179192505`*^9}, {3.6870972618993125`*^9, 3.687097305639374*^9}, { 3.6870973356794157`*^9, 3.6870975186496716`*^9}, {3.6870975796097574`*^9, 3.6870975953197794`*^9}, {3.6870976531898603`*^9, 3.6870976848899045`*^9}, 3.6870977782500353`*^9, {3.687413757687042*^9, 3.6874137834070783`*^9}, { 3.6874140542074575`*^9, 3.687414094417514*^9}, {3.6874143478878684`*^9, 3.687414485538061*^9}, {3.6874146116082373`*^9, 3.68741464894829*^9}, { 3.6874147451084247`*^9, 3.687414766118454*^9}, 3.6874149094486547`*^9, { 3.6874150416688395`*^9, 3.6874150634888706`*^9}, {3.6874152437091227`*^9, 3.687415268869158*^9}, 3.6874153442892637`*^9, {3.687415449879411*^9, 3.687415469659439*^9}, 3.687415529739523*^9, 3.687415564789572*^9, 3.687415645529685*^9, {3.6874168016913037`*^9, 3.687416803441306*^9}, { 3.687421022677213*^9, 3.6874212686075573`*^9}, {3.68742948209425*^9, 3.6874294906842623`*^9}, {3.687844340668378*^9, 3.6878443698084188`*^9}, { 3.6886534778571014`*^9, 3.6886534911571198`*^9}, {3.688906380162199*^9, 3.6889064680223217`*^9}, {3.688906514222396*^9, 3.6889065193925257`*^9}, { 3.688908192623024*^9, 3.6889082006430354`*^9}, {3.688908261823121*^9, 3.688908271653135*^9}, {3.6889083776232834`*^9, 3.6889083922733035`*^9}, { 3.688908466073407*^9, 3.6889084993734536`*^9}, 3.688908533623502*^9, { 3.688908616683618*^9, 3.6889086271336327`*^9}, {3.6889086885637183`*^9, 3.6889087063437433`*^9}, {3.6889091647443852`*^9, 3.6889092012544365`*^9}, {3.6889093019045773`*^9, 3.6889093406746316`*^9}, 3.6889101071957045`*^9, {3.689905940063133*^9, 3.689905972983179*^9}, { 3.692530981927737*^9, 3.6925310416778207`*^9}, {3.692531099797902*^9, 3.6925311384779563`*^9}, {3.692531192258032*^9, 3.692531244668105*^9}, { 3.6925312919881716`*^9, 3.692531425418358*^9}, {3.6925315270885005`*^9, 3.692531643928664*^9}, {3.692535489534048*^9, 3.6925356485142703`*^9}, { 3.692535753564418*^9, 3.6925357992544813`*^9}, {3.6925358831745987`*^9, 3.692535899604622*^9}, {3.692536042584822*^9, 3.692536159384986*^9}, { 3.6925366121156197`*^9, 3.6925366207256317`*^9}, {3.6925367265057793`*^9, 3.69253672683578*^9}, {3.6925368590559654`*^9, 3.6925368636559715`*^9}, { 3.6925370880062857`*^9, 3.692537177856412*^9}, {3.692537322456614*^9, 3.6925373869767046`*^9}, {3.6925390913352747`*^9, 3.6925390925252767`*^9}, {3.692539644430175*^9, 3.6925396711502123`*^9}, { 3.692539727510291*^9, 3.692539730440295*^9}, {3.69253993367058*^9, 3.692539963780622*^9}, {3.6925400018406754`*^9, 3.692540003630678*^9}, { 3.6925401743409166`*^9, 3.6925401747509174`*^9}, {3.692540399111232*^9, 3.692540407981244*^9}, {3.69254047647134*^9, 3.6925404886113567`*^9}, { 3.6925406039715185`*^9, 3.69254060531152*^9}, {3.6925414948727655`*^9, 3.6925414953427663`*^9}, {3.6925415478528395`*^9, 3.692541613062931*^9}, 3.692541649332982*^9, {3.692541727633092*^9, 3.6925418840133104`*^9}, { 3.692541924473367*^9, 3.692542041693531*^9}, {3.6925421488836813`*^9, 3.6925422549438295`*^9}, {3.6925422976938896`*^9, 3.692542521444203*^9}, { 3.6925426221843443`*^9, 3.6925426357343626`*^9}, 3.692542739374508*^9, 3.692599799510878*^9, {3.692599834884901*^9, 3.6925998954663663`*^9}, { 3.692599925635092*^9, 3.6926000095928946`*^9}, {3.692600108929576*^9, 3.6926001456386757`*^9}, {3.6926001874800687`*^9, 3.692600454421337*^9}, { 3.692600503149027*^9, 3.6926006000391626`*^9}, {3.692600680251275*^9, 3.6926006814012766`*^9}, {3.6926009000215826`*^9, 3.6926009410816402`*^9}, 3.692601280532116*^9, {3.6926044914726114`*^9, 3.69260449774262*^9}, 3.6926045660127153`*^9, 3.6926046690228596`*^9, {3.69296647863291*^9, 3.6929664798829117`*^9}, {3.6929665643330297`*^9, 3.6929666141830997`*^9}, {3.6929670390036945`*^9, 3.6929670405536966`*^9}, {3.6929670861037607`*^9, 3.6929670952937737`*^9}, {3.6929671302538223`*^9, 3.6929671549438567`*^9}, {3.6929671904739065`*^9, 3.69296722137395*^9}, { 3.6929672596240034`*^9, 3.6929673352541094`*^9}, 3.6929678909232683`*^9, { 3.6930146982034283`*^9, 3.693014722713463*^9}, {3.6930148540136466`*^9, 3.693014857023651*^9}, {3.6930148913836985`*^9, 3.693014894823704*^9}, { 3.693014930903754*^9, 3.6930151942541227`*^9}, {3.693015247824198*^9, 3.693015430554454*^9}, {3.693015673794794*^9, 3.69301579223496*^9}, { 3.6930163123576884`*^9, 3.693016326897709*^9}, {3.6930164225678425`*^9, 3.693016429727853*^9}, {3.693016686718212*^9, 3.693016698128228*^9}, { 3.693016737038283*^9, 3.693016755068308*^9}, {3.6930168429225607`*^9, 3.6930168719926014`*^9}, {3.6930172049430676`*^9, 3.693017284063178*^9}, { 3.693017336433252*^9, 3.6930173662532935`*^9}, {3.6930180949163136`*^9, 3.6930180975563173`*^9}, {3.6930181870764427`*^9, 3.693018199956461*^9}, { 3.6930182954065943`*^9, 3.693018305996609*^9}, {3.693139886141657*^9, 3.6931399045016823`*^9}, {3.6931402916003532`*^9, 3.693140295770359*^9}, { 3.693140426020541*^9, 3.693140426530542*^9}, {3.6931410492237864`*^9, 3.6931410888738413`*^9}, {3.6931411194438844`*^9, 3.693141126553894*^9}, { 3.693141412004294*^9, 3.693141454164353*^9}, {3.6931415979955544`*^9, 3.6931417931758275`*^9}, {3.6932199559445915`*^9, 3.6932199772046213`*^9}, {3.6932201435748544`*^9, 3.693220170284892*^9}, { 3.693220713855653*^9, 3.693220721825664*^9}, {3.693625124589745*^9, 3.693625153729786*^9}, {3.6940907995669713`*^9, 3.6940909688872085`*^9}, { 3.6940913675677667`*^9, 3.6940914223978434`*^9}, {3.694091508037963*^9, 3.694091572118053*^9}, 3.694092009628666*^9, {3.6940920553287296`*^9, 3.694092229168973*^9}, {3.6940923053990793`*^9, 3.694092374419176*^9}, { 3.6940924537392874`*^9, 3.694092457789293*^9}, 3.694092642849552*^9, { 3.6940928573598523`*^9, 3.694092862379859*^9}, {3.6940945886222763`*^9, 3.694094601932295*^9}, 3.694094849542641*^9, {3.694095764293922*^9, 3.6940957644739223`*^9}, {3.6940960602743363`*^9, 3.6940960732243547`*^9}, {3.6940961211044216`*^9, 3.694096124194426*^9}, { 3.694665030960044*^9, 3.6946650634500895`*^9}, {3.6946652071402903`*^9, 3.6946653490404887`*^9}, {3.6946658702212186`*^9, 3.6946658881212435`*^9}, {3.694665923041292*^9, 3.694665953561335*^9}, { 3.694665995981395*^9, 3.6946660149414215`*^9}, {3.694666050571471*^9, 3.6946660547214766`*^9}, {3.694666169991638*^9, 3.694666292151809*^9}, { 3.6946663456618843`*^9, 3.6946663943919525`*^9}, 3.6946667526224537`*^9, 3.69466680700253*^9, 3.694687076625702*^9, {3.6946874316161985`*^9, 3.6946874621962414`*^9}, 3.694687499496294*^9, {3.694687567516389*^9, 3.694687642816495*^9}, {3.694687679006545*^9, 3.6946877198966026`*^9}, { 3.6946877714966745`*^9, 3.694687931746899*^9}, {3.723798739728607*^9, 3.723798744014243*^9}, {3.7237990126446104`*^9, 3.723799023974499*^9}, { 3.7244116671877546`*^9, 3.7244116733393917`*^9}, {3.724411761793063*^9, 3.7244117718753977`*^9}, {3.724411928386671*^9, 3.7244119682966137`*^9}, { 3.724412131847311*^9, 3.724412188341254*^9}, {3.729414981357122*^9, 3.7294149861075096`*^9}, {3.749817651293678*^9, 3.749817653108206*^9}, { 3.7498176831919456`*^9, 3.7498176846222315`*^9}, 3.7498177601545563`*^9, { 3.749817859674735*^9, 3.749817861044999*^9}, {3.7498179561547127`*^9, 3.749817964489929*^9}, {3.749818149334386*^9, 3.749818237397959*^9}, 3.749818617867873*^9, {3.7505621848002787`*^9, 3.7505622174085107`*^9}, { 3.75056238761455*^9, 3.750562431347901*^9}, {3.7505626332829456`*^9, 3.7505627331565337`*^9}, {3.7505627632642183`*^9, 3.7505627635859113`*^9}, {3.7515359581577415`*^9, 3.7515359614850826`*^9}, {3.751536071974715*^9, 3.7515360961721487`*^9}, 3.7515362040373974`*^9, {3.751536256080162*^9, 3.7515365099108534`*^9}, { 3.751549231137398*^9, 3.7515493334258356`*^9}, {3.7515496891619573`*^9, 3.751549689458767*^9}, {3.763384318028655*^9, 3.763384321230183*^9}, { 3.788530117667017*^9, 3.788530117980694*^9}, 3.7885303696209583`*^9, 3.788530509305438*^9, {3.78853083351016*^9, 3.788530862892729*^9}, { 3.788530925928982*^9, 3.7885309671960435`*^9}, {3.788533054135647*^9, 3.78853306391253*^9}, {3.788533559801361*^9, 3.7885336574548807`*^9}, { 3.788533916375413*^9, 3.7885339589240637`*^9}, {3.788535764582915*^9, 3.788535775009864*^9}, {3.788571051580041*^9, 3.788571053084015*^9}, 3.7885714852753925`*^9, {3.7885715554496107`*^9, 3.7885715772004504`*^9}, { 3.788571696555899*^9, 3.7885717388241262`*^9}, {3.788571794677034*^9, 3.7885718099292316`*^9}, 3.7885718526796875`*^9, {3.7885719048201413`*^9, 3.788571938458513*^9}, {3.7885720197107735`*^9, 3.7885720203433733`*^9}, { 3.7885721579483404`*^9, 3.788572246745886*^9}, {3.788572406392971*^9, 3.7885724747998886`*^9}, {3.7885725451809406`*^9, 3.7885725476052*^9}, { 3.788572796561078*^9, 3.7885727975057955`*^9}, 3.788572839094982*^9, { 3.788572904602244*^9, 3.788572917919137*^9}, {3.788573100895812*^9, 3.7885731714659753`*^9}, {3.7885733915788927`*^9, 3.788573436414242*^9}, 3.788573551866688*^9, 3.788573615961852*^9, {3.7885736607323666`*^9, 3.7885736628162546`*^9}, {3.788573695779252*^9, 3.788573697977635*^9}, { 3.788573733478549*^9, 3.7885737372812753`*^9}, 3.788573918957203*^9, { 3.7885742166825914`*^9, 3.788574217920394*^9}, {3.7888329679101725`*^9, 3.788833009852073*^9}, {3.788833043135027*^9, 3.7888330914074025`*^9}, { 3.7888332335219045`*^9, 3.7888332629628363`*^9}, 3.7890212989633403`*^9, { 3.818906513404701*^9, 3.818906542445839*^9}}, CellLabel-> "In[152]:=",ExpressionUUID->"1bfa20c4-e333-4b90-a6c2-b60816a7d438"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"GENERICBEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx_", ",", "fy_", ",", "fz_", ",", "mx_", ",", "my_", ",", "mz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "NL", ",", "NQ", ",", "r0", ",", "r\[Alpha]0", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "s", ",", "x", ",", "jac", ",", "FF", ",", "FFINV", ",", "ns", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "EEEE", ",", "AE", ",", "CE", ",", "BE", ",", "\[Epsilon]", ",", "\[Kappa]", ",", "up", ",", "F", ",", "M", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wstb", ",", "\[Delta]W", ",", "ux", ",", "upx", ",", "uy", ",", "uz", ",", "\[Theta]x", ",", "\[Theta]y", ",", "\[Theta]z"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"mapping", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{"\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]0", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r\[Alpha]0", ".", "r\[Alpha]0"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"L", ">", "0"}], ",", RowBox[{"h", ">", "0"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"i\[Alpha]0", " ", "=", RowBox[{"r\[Alpha]0", "/", "h\[Alpha]0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{"s", "=", RowBox[{"i\[Alpha]0", ".", "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"x", "=", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], ".", "ix0"}], "+", "s"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", "h\[Alpha]0"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"simple", " ", "metrics"}], "*)"}], "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NL", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]"}], ",", "\[Alpha]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NQ", "=", " ", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}]}], ",", RowBox[{"h\[Alpha]0", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "2"], " ", "\[Alpha]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", SuperscriptBox["\[Alpha]", "2"]}], ",", RowBox[{"h\[Alpha]0", " ", SuperscriptBox["\[Alpha]", "2"], " ", RowBox[{"(", " ", RowBox[{"\[Alpha]", "-", "1"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"transform", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{ RowBox[{"ux", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"uy", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{ RowBox[{"uy", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"uz", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{ RowBox[{"uz", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]x", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{ RowBox[{"\[Theta]x", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]y", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{ RowBox[{"\[Theta]y", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]z", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{ RowBox[{"\[Theta]z", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"upx", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"upx", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], " ", ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", RowBox[{"ux", "[", "2", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"up", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"upx", "[", "1", "]"}], ",", RowBox[{"upx", "[", "2", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "1", "]"}], ",", RowBox[{"\[Theta]x", "[", "2", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"uy", "[", "1", "]"}], ",", RowBox[{"\[Theta]z", "[", "1", "]"}], ",", RowBox[{"uy", "[", "2", "]"}], ",", RowBox[{"\[Theta]z", "[", "2", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"uz", "[", "1", "]"}], ",", RowBox[{"-", RowBox[{"\[Theta]y", "[", "1", "]"}]}], ",", RowBox[{"uz", "[", "2", "]"}], ",", RowBox[{"-", RowBox[{"\[Theta]y", "[", "2", "]"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], "/", "h\[Alpha]0"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}]}], "/", "h\[Alpha]0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"elasticity", " ", "dyad", " ", "and", " ", "cross"}], "-", RowBox[{ "section", " ", "properties", " ", "are", " ", "known", " ", "in", " ", "the", " ", "material", " ", "system"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"AE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EE", " ", "AA"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"GG", " ", "AA"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"GG", " ", "AA"}]}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"BE", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"GG", " ", "Iyy"}], "+", RowBox[{"GG", " ", "Izz"}]}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"EE", " ", "Iyy"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"EE", " ", "Izz"}]}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"strain", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}]}], "/", "h\[Alpha]0"}], "+", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], "\[Cross]", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}]}], "/", "h\[Alpha]0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "resultants"}], "*)"}], "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{"AE", ".", "\[Epsilon]"}]}], ";", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{"BE", ".", "\[Kappa]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expressions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], ".", "F"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]", "]"}], ".", "M"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"mx", ",", "my", ",", "mz"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wstb", "=", RowBox[{ RowBox[{"-", "AA"}], " ", "EE", " ", RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "up"}], ")"}], " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], RowBox[{"\[Delta]", "[", "v", "]"}]}], " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}]}], "+", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], RowBox[{"\[Delta]", "[", "w", "]"}]}], " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}]}]}], ")"}], "/", RowBox[{ RowBox[{"(", "h\[Alpha]0", ")"}], "^", "3"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]W", " ", "=", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wstb"}], ")"}], " ", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]], "Input", CellChangeTimes->{{3.4430689313272*^9, 3.4430690080792*^9}, { 3.4430690869528*^9, 3.4430691077320004`*^9}, {3.4430691700116*^9, 3.4430691708072*^9}, {3.4430692071717997`*^9, 3.443069246359*^9}, { 3.4430772782732*^9, 3.4430773623416*^9}, {3.4430773978316*^9, 3.4430774104676*^9}, {3.4430775053780003`*^9, 3.4430776180598*^9}, { 3.4434109099524*^9, 3.4434109159584*^9}, {3.4438800815346003`*^9, 3.4438802689304*^9}, {3.443880362624*^9, 3.4438803824516*^9}, { 3.443929565615374*^9, 3.443929570232974*^9}, {3.443935321321974*^9, 3.443935335705174*^9}, {3.443935419945174*^9, 3.443935421489574*^9}, { 3.443935494013974*^9, 3.443935494715974*^9}, {3.443935617565974*^9, 3.4439357217895737`*^9}, {3.443935755360774*^9, 3.443935816107174*^9}, { 3.443942155230774*^9, 3.443942209939974*^9}, {3.443942305710374*^9, 3.4439423142123737`*^9}, {3.4439442908131742`*^9, 3.443944441181574*^9}, { 3.4439447830065737`*^9, 3.4439447917425737`*^9}, {3.443944908541774*^9, 3.443944916060974*^9}, {3.4442731097938004`*^9, 3.4442731115254*^9}, { 3.444273189229*^9, 3.4442732700526*^9}, {3.4442748430004*^9, 3.4442748605036*^9}, {3.4442748977438*^9, 3.4442748989762*^9}, { 3.4442749340762*^9, 3.4442749351057997`*^9}, 3.4442752313382*^9, { 3.4442919702026*^9, 3.4442919911846*^9}, {3.4442921151577997`*^9, 3.4442921271074*^9}, {3.4443811023684*^9, 3.4443811036632*^9}, { 3.4443814073171997`*^9, 3.4443814402956*^9}, {3.4443815036316*^9, 3.4443815147855997`*^9}, {3.4443815537232*^9, 3.4443815747676*^9}, { 3.4443816138143997`*^9, 3.444381633174*^9}, {3.4443816850439997`*^9, 3.4443817801728*^9}, 3.4443853618688*^9, {3.4443855607376003`*^9, 3.4443856337924*^9}, {3.4443861200444*^9, 3.4443861523676*^9}, { 3.4443862280495996`*^9, 3.444386291448*^9}, {3.4443864047352*^9, 3.4443864135336*^9}, {3.4443870026832*^9, 3.4443870095316*^9}, { 3.4444082055056*^9, 3.4444082437412*^9}, {3.4444082797148*^9, 3.4444084583816*^9}, {3.4444084889108*^9, 3.4444085087539997`*^9}, { 3.444408942517*^9, 3.4444089563386*^9}, {3.4444091419564*^9, 3.4444091647167997`*^9}, {3.4444092206428003`*^9, 3.4444092944463997`*^9}, {3.4444093856284*^9, 3.4444094281071997`*^9}, { 3.4444094976988*^9, 3.4444095275104*^9}, {3.444409611064*^9, 3.4444096125772*^9}, 3.4444098504616003`*^9, {3.444409913392*^9, 3.4444099166056004`*^9}, 3.4444100178496*^9, {3.4444103063248*^9, 3.4444103358712*^9}, {3.4444103868208*^9, 3.4444104432460003`*^9}, { 3.4444921219564*^9, 3.4444921256224003`*^9}, {3.444492194824*^9, 3.4444921973668003`*^9}, {3.4444922814351997`*^9, 3.4444922853508*^9}, { 3.4444923330868*^9, 3.4444923345844*^9}, {3.444492366424*^9, 3.4444923855808*^9}, {3.4453153475226*^9, 3.445315360689*^9}, { 3.4465518166373653`*^9, 3.446551863016165*^9}, {3.446551894231765*^9, 3.446552159384965*^9}, {3.446552232377365*^9, 3.4465522555589647`*^9}, { 3.446553347388365*^9, 3.4465533616155653`*^9}, {3.4466058525769997`*^9, 3.4466058529046*^9}, {3.4466064371219997`*^9, 3.4466065097244*^9}, { 3.4466127725788*^9, 3.4466127766036*^9}, {3.4466128124835997`*^9, 3.4466130037864*^9}, {3.4466131532696*^9, 3.4466131761703997`*^9}, { 3.4466133992192*^9, 3.4466134478756*^9}, {3.446613483584*^9, 3.4466134932092*^9}, {3.4466135740952*^9, 3.4466135794927998`*^9}, { 3.4466137283948*^9, 3.4466137341356*^9}, {3.4466138994342003`*^9, 3.4466139023826*^9}, {3.4466139549858*^9, 3.4466139579653997`*^9}, { 3.4466142109818*^9, 3.4466142245226*^9}, {3.4466142793878*^9, 3.4466143652033997`*^9}, {3.4466144712834*^9, 3.4466145978929996`*^9}, { 3.4466146992618*^9, 3.4466147509914*^9}, {3.4466151283086*^9, 3.4466152768986*^9}, {3.4466153107506*^9, 3.4466153406558*^9}, { 3.4466194331976*^9, 3.4466194377528*^9}, {3.4466194847712*^9, 3.446619488718*^9}, {3.4466389495861998`*^9, 3.4466389768238*^9}, { 3.4466391218414*^9, 3.446639306561*^9}, {3.4466393990222*^9, 3.4466394004886*^9}, {3.4466394475694*^9, 3.4466394487706003`*^9}, { 3.4466395034174*^9, 3.4466395049462*^9}, 3.4466395515755997`*^9, { 3.4466396000176*^9, 3.4466396190808*^9}, {3.4466397459088*^9, 3.446639748826*^9}, {3.4466397974356003`*^9, 3.446639798668*^9}, 3.4466398447816*^9, {3.446639894218*^9, 3.4466399201556*^9}, { 3.4466399570964003`*^9, 3.4466399583288*^9}, {3.446639994006*^9, 3.4466400056904*^9}, {3.4466400383568*^9, 3.4466400395892*^9}, { 3.4466400745643997`*^9, 3.4466401025976*^9}, {3.4466401660834*^9, 3.4466401806070004`*^9}, {3.4466402251294003`*^9, 3.446640227407*^9}, { 3.446640260479*^9, 3.4466402657674*^9}, {3.4466404133122*^9, 3.4466405185654*^9}, 3.4466405830462*^9, {3.4467273294214*^9, 3.4467273777813997`*^9}, {3.4467274366558*^9, 3.4467275620954*^9}, { 3.446727593311*^9, 3.4467277412614*^9}, {3.4467283334639997`*^9, 3.4467283356012*^9}, {3.4467283707636003`*^9, 3.4467283727604*^9}, { 3.4467289882664003`*^9, 3.4467291276836*^9}, {3.446778464322*^9, 3.4467786797424*^9}, {3.4467801953803997`*^9, 3.4467802409792*^9}, { 3.4467802998691998`*^9, 3.4467804023456*^9}, 3.4467804345596*^9, { 3.4467808656344*^9, 3.4467808670852003`*^9}, 3.4467818107525997`*^9, { 3.446781855509*^9, 3.446781874385*^9}, {3.4467826737914*^9, 3.4467827381726*^9}, {3.4467828623018*^9, 3.4467831045386*^9}, { 3.4470344113984003`*^9, 3.4470344123344*^9}, {3.4470344628316*^9, 3.4470345343108*^9}, {3.447043591118539*^9, 3.447043642192939*^9}, { 3.447045649625739*^9, 3.447045718437339*^9}, {3.447054774023939*^9, 3.447054834198939*^9}, {3.4470549103449388`*^9, 3.4470549116169386`*^9}, { 3.447054943902939*^9, 3.4470553027109385`*^9}, {3.447055334559939*^9, 3.447055353684939*^9}, {3.447057311918539*^9, 3.447057369747739*^9}, { 3.4470575058577385`*^9, 3.4470575951365385`*^9}, {3.4470581848789387`*^9, 3.4470582040825386`*^9}, {3.451276121243*^9, 3.4512761425838003`*^9}, { 3.4512762022382*^9, 3.4512762064346*^9}, {3.4512762476966*^9, 3.4512762827654*^9}, {3.451276489091*^9, 3.451276541975*^9}, { 3.4512765853118*^9, 3.4512766132046003`*^9}, {3.4512773470306*^9, 3.4512773766082*^9}, {3.4512776069110003`*^9, 3.4512777499318*^9}, 3.4512777831286*^9, {3.4512778785538*^9, 3.451277881627*^9}, { 3.4512780242734003`*^9, 3.4512780302794*^9}, 3.4512780737878*^9, { 3.4512781866226*^9, 3.4512781930810003`*^9}, {3.4512863325078*^9, 3.4512863539266*^9}, {3.4568019250434*^9, 3.4568022712698*^9}, { 3.4568023177422*^9, 3.4568024125278*^9}, {3.4568024694365997`*^9, 3.4568024750369997`*^9}, {3.4568026914402*^9, 3.4568028101094*^9}, { 3.4568028406698*^9, 3.4568028564726*^9}, 3.4568028886085997`*^9, { 3.4568030489454*^9, 3.4568030800986*^9}, 3.4568032004128*^9, { 3.4568035073698*^9, 3.4568035176034*^9}, {3.4568040146596003`*^9, 3.4568040844852*^9}, {3.4568043016684*^9, 3.4568043154744*^9}, { 3.4568045482264*^9, 3.4568045486632*^9}, {3.4568048944996*^9, 3.4568049806116*^9}, {3.4660560628582*^9, 3.4660560753538*^9}, { 3.4660676729379997`*^9, 3.4660676735931997`*^9}, {3.4660677244024*^9, 3.4660677277251997`*^9}, {3.4742646771287394`*^9, 3.47426469439174*^9}, { 3.47426489921974*^9, 3.4742649800437393`*^9}, {3.4801246373348*^9, 3.4801246860536003`*^9}, {3.4801247748176003`*^9, 3.4801247821028*^9}, { 3.4801248161264*^9, 3.4801248295736*^9}, {3.4801248810692*^9, 3.4801248964508*^9}, {3.4801249330484*^9, 3.480124947884*^9}, 3.4801249886468*^9, {3.4801251139147997`*^9, 3.48012512588*^9}, { 3.4838339444988003`*^9, 3.4838339567448*^9}, 3.4838341692012*^9, { 3.4838344350408*^9, 3.4838344353684*^9}, {3.4938987575920324`*^9, 3.4938987586840324`*^9}, {3.4941630624049997`*^9, 3.4941631381274*^9}, { 3.4941632311345997`*^9, 3.4941632492306004`*^9}, 3.4941633249217997`*^9, { 3.4941633940922003`*^9, 3.4941634063538*^9}, {3.4941634538402*^9, 3.4941635051642*^9}, {3.494163565115*^9, 3.4941636341762*^9}, { 3.4941636853442*^9, 3.4941639323234*^9}, {3.4941640277798*^9, 3.4941641455754004`*^9}, {3.4941641790374002`*^9, 3.4941641803789997`*^9}, {3.4941642676142*^9, 3.4941643277678003`*^9}, 3.4941644677018003`*^9, {3.4941646208938*^9, 3.4941646322349997`*^9}, { 3.4941652592693996`*^9, 3.4941652807194*^9}, {3.4941653119038*^9, 3.494165416299*^9}, {3.494165453895*^9, 3.4941654544722*^9}, { 3.4950990979779997`*^9, 3.495099142701*^9}, {3.495099172958*^9, 3.4950991806289997`*^9}, {3.495099227097*^9, 3.495099238113*^9}, 3.495099290797*^9, {3.495099346084*^9, 3.495099359507*^9}, { 3.495099456308*^9, 3.495099464091*^9}, 3.495099683108*^9, { 3.495100428112*^9, 3.495100434958*^9}, {3.4951006496219997`*^9, 3.495100649992*^9}, {3.4987235265018*^9, 3.4987235939094*^9}, { 3.4987236420666*^9, 3.4987236530646*^9}, {3.4987237305341997`*^9, 3.4987237396914*^9}, {3.498733136159*^9, 3.4987332972446003`*^9}, { 3.4987364783094*^9, 3.4987364860626*^9}, {3.4987366201134*^9, 3.4987366236078*^9}, {3.4987367272386*^9, 3.4987367464890003`*^9}, { 3.4987369428462*^9, 3.4987369670886*^9}, {3.4987370134518003`*^9, 3.4987370259941998`*^9}, {3.4987370944002*^9, 3.4987371027618*^9}, { 3.4987371921029997`*^9, 3.498737193663*^9}, {3.4987372660938*^9, 3.4987372935498*^9}, {3.4987373290554*^9, 3.4987377176202*^9}, { 3.4987377520182*^9, 3.4987379139462*^9}, {3.4987382030216*^9, 3.4987382667078*^9}, {3.4987888391818*^9, 3.4987888608346*^9}, { 3.4988785131146*^9, 3.4988785160162*^9}, {3.5007170967096*^9, 3.5007170999076*^9}, 3.5007182237316*^9, {3.5007182772864*^9, 3.5007182987832003`*^9}, {3.5009573226744003`*^9, 3.5009573940444*^9}, 3.5009574358710003`*^9, 3.5009604278482*^9, {3.5009897246173353`*^9, 3.5009898480289354`*^9}, {3.5009901464413357`*^9, 3.5009901475333357`*^9}, {3.5009901801997356`*^9, 3.500990274096135*^9}, { 3.5010475253292*^9, 3.5010475852332*^9}, {3.5010605722018003`*^9, 3.5010606739762*^9}, {3.5010607202146*^9, 3.5010607323358*^9}, { 3.5010607920526*^9, 3.501061118467*^9}, {3.5010612022078*^9, 3.5010612277138*^9}, {3.5010616467766*^9, 3.5010617938534*^9}, { 3.5010618406222*^9, 3.5010619950778*^9}, {3.5010621500638*^9, 3.5010622514014*^9}, {3.5010625292218*^9, 3.5010625409374*^9}, { 3.5010626043046*^9, 3.5010626313862*^9}, {3.5010626787166*^9, 3.5010626790754004`*^9}, {3.501074457561*^9, 3.5010744671082*^9}, 3.5010763029458*^9, {3.5032210899309998`*^9, 3.5032212413900003`*^9}, { 3.557658203404973*^9, 3.557658219644601*^9}, {3.5576584433801947`*^9, 3.557658496030287*^9}, {3.5576585501779823`*^9, 3.5576586046064777`*^9}, { 3.557658648910555*^9, 3.557658754600741*^9}, {3.557658963945511*^9, 3.5576589782507353`*^9}, {3.557659009949991*^9, 3.5576591437514267`*^9}, { 3.557659182221094*^9, 3.5576592187719584`*^9}, 3.557659413865901*^9, { 3.557659921100792*^9, 3.5576599556392527`*^9}, {3.557660706920972*^9, 3.5576607248454037`*^9}, {3.557661209085854*^9, 3.557661209413454*^9}, { 3.5577526651911488`*^9, 3.5577526932087984`*^9}, {3.5577527272480583`*^9, 3.557752747122493*^9}, {3.5577528374934516`*^9, 3.557752838523053*^9}, { 3.557752881204728*^9, 3.557752891313546*^9}, {3.557752938612829*^9, 3.5577529469120436`*^9}, {3.557753060714244*^9, 3.557753062633047*^9}, { 3.5577536609544907`*^9, 3.5577536637936954`*^9}, {3.5577537824631042`*^9, 3.557753810184353*^9}, {3.557753841025607*^9, 3.5577540648392*^9}, 3.5577541920574236`*^9, {3.5577547033327217`*^9, 3.557754716967146*^9}, { 3.5577547716296415`*^9, 3.557754802112095*^9}, {3.5577549509363565`*^9, 3.5577549771444025`*^9}, 3.5577551382302856`*^9, {3.55775527184452*^9, 3.557755272858522*^9}, {3.557755881555991*^9, 3.557755886548*^9}, { 3.557756158316077*^9, 3.557756231885806*^9}, {3.5577572408487787`*^9, 3.557757248835993*^9}, {3.5577572834368534`*^9, 3.5577575888229895`*^9}, { 3.5577578129641833`*^9, 3.557757862837471*^9}, {3.557758025514557*^9, 3.557758079272251*^9}, 3.557810586960072*^9, {3.5578240262005973`*^9, 3.5578240345360737`*^9}, {3.557824091429328*^9, 3.5578241008156557`*^9}, { 3.557831525255726*^9, 3.5578315319793377`*^9}, 3.5578315716190076`*^9, { 3.557831606079468*^9, 3.557831629432709*^9}, {3.5578316663267736`*^9, 3.5578317569473333`*^9}, {3.5578322144181366`*^9, 3.557832218084143*^9}, { 3.557836356693412*^9, 3.557836473771618*^9}, {3.5578365201660995`*^9, 3.5578365974018345`*^9}, {3.5578366426731143`*^9, 3.557836658865943*^9}, { 3.557836691017599*^9, 3.5578367924957776`*^9}, {3.5578368305442443`*^9, 3.557836888279946*^9}, {3.5578369382156334`*^9, 3.5578370776642785`*^9}, { 3.5578383536061196`*^9, 3.5578383735117545`*^9}, {3.5578385892445335`*^9, 3.5578385978869486`*^9}, {3.5578386713006773`*^9, 3.557838700113928*^9}, { 3.5578387451200075`*^9, 3.5578387467892103`*^9}, {3.5578388951454706`*^9, 3.5578389248635225`*^9}, {3.5578389679351983`*^9, 3.557838983535226*^9}, { 3.5578390227692947`*^9, 3.557839023143696*^9}, {3.557839097696226*^9, 3.5578391125162525`*^9}, {3.5578391553539276`*^9, 3.557839199892006*^9}, { 3.55783924184048*^9, 3.557839294490572*^9}, {3.5578393285922318`*^9, 3.557839398683155*^9}, {3.557839430522811*^9, 3.557839470162481*^9}, { 3.5578395370865984`*^9, 3.5578395446994114`*^9}, {3.5578396068499207`*^9, 3.5578396118575296`*^9}, 3.5578943518105097`*^9, {3.557894388361374*^9, 3.5578944029629993`*^9}, {3.5578944607611012`*^9, 3.5578944989499683`*^9}, {3.5578945393696394`*^9, 3.557894561537278*^9}, { 3.5578946028617506`*^9, 3.5578946188985786`*^9}, {3.557894650894235*^9, 3.5578947812636642`*^9}, {3.55789481884413*^9, 3.5578948191249304`*^9}, { 3.5578949768100076`*^9, 3.5578949836272197`*^9}, {3.5578967386805477`*^9, 3.55789678549623*^9}, {3.5578968804691963`*^9, 3.557896888643611*^9}, { 3.557897022491846*^9, 3.5578970341450663`*^9}, {3.557897620940097*^9, 3.55789765120415*^9}, {3.5579218072271147`*^9, 3.5579218263059483`*^9}, { 3.557922095312821*^9, 3.557922116965659*^9}, {3.557922178086566*^9, 3.557922188616585*^9}, {3.5579223258812256`*^9, 3.557922327066828*^9}, { 3.5579224596046605`*^9, 3.557922461804264*^9}, 3.5579805928465395`*^9, { 3.5579815200581703`*^9, 3.557981541711009*^9}, 3.557985544779242*^9, { 3.5579863164793987`*^9, 3.5579863339514294`*^9}, {3.557986523210962*^9, 3.557986568841042*^9}, 3.5579866122559185`*^9, 3.557986993536188*^9, { 3.5579871244716187`*^9, 3.5579871290580263`*^9}, 3.557987173486905*^9, 3.5579872166989803`*^9, {3.5599618621582537`*^9, 3.5599618642486577`*^9}, { 3.559961969720443*^9, 3.5599619894700775`*^9}, 3.559963611089726*^9, { 3.5601298891258235`*^9, 3.560129889422224*^9}, {3.560132445157113*^9, 3.5601324458591146`*^9}, {3.561978472080926*^9, 3.561978472392926*^9}, { 3.6297802564412937`*^9, 3.6297802957377625`*^9}, {3.62978033369263*^9, 3.629780429741998*^9}, {3.6297805790030603`*^9, 3.6297809429048996`*^9}, { 3.629780987957779*^9, 3.629781197575347*^9}, {3.629781240397422*^9, 3.629781337663593*^9}, {3.6297813946972933`*^9, 3.6297814529165955`*^9}, { 3.6297814952550697`*^9, 3.629781527578326*^9}, {3.62978162025529*^9, 3.629781647633338*^9}, {3.629781678833393*^9, 3.629781763120341*^9}, 3.6297818028224106`*^9, {3.6297818432108817`*^9, 3.629781872570133*^9}, { 3.629782355765382*^9, 3.629782427603508*^9}, {3.6297824692243814`*^9, 3.629782674863942*^9}, {3.629782707218399*^9, 3.6297829295343895`*^9}, { 3.629783005631323*^9, 3.6297830574702144`*^9}, {3.6297831098551064`*^9, 3.629783142786764*^9}, {3.629783433711675*^9, 3.629783442619291*^9}, { 3.6297834942397814`*^9, 3.6297835175930223`*^9}, 3.6297835794939313`*^9, { 3.6297836160291953`*^9, 3.6297837668970604`*^9}, {3.6297842042438283`*^9, 3.6297842697483435`*^9}, {3.6297843514456873`*^9, 3.629784370742921*^9}, { 3.629784443829049*^9, 3.6297844678842916`*^9}, {3.6297845252611923`*^9, 3.629784525588793*^9}, {3.6297846136821475`*^9, 3.629784629235375*^9}, { 3.629784814797701*^9, 3.629784927648299*^9}, {3.629785259960083*^9, 3.6297852602096834`*^9}, {3.6297858780175686`*^9, 3.629785917282837*^9}, { 3.629786048057867*^9, 3.629786048681868*^9}, 3.6297863278755584`*^9, { 3.6297867047133856`*^9, 3.629786748533863*^9}, {3.6297867791567163`*^9, 3.6297868491540394`*^9}, {3.6297875320748396`*^9, 3.629787569795706*^9}, { 3.6297876247234025`*^9, 3.6297877281983843`*^9}, {3.6297877681812544`*^9, 3.629787774015665*^9}, {3.629787831408166*^9, 3.6297878355265727`*^9}, { 3.6297878775686464`*^9, 3.6297878861174617`*^9}, {3.6297879185343184`*^9, 3.629787919064719*^9}, {3.6297880043032694`*^9, 3.62978800470887*^9}, 3.6297880488257475`*^9, {3.6297882100052304`*^9, 3.6297882174776435`*^9}, { 3.6297882697533355`*^9, 3.6297882948381796`*^9}, {3.6297883467550707`*^9, 3.6297883991087627`*^9}, {3.6297887361785545`*^9, 3.629788783961438*^9}, 3.629788825395111*^9, {3.629789006152629*^9, 3.6297890321266747`*^9}, { 3.6297891133248167`*^9, 3.629789145336073*^9}, {3.6297891926821566`*^9, 3.629789194257759*^9}, {3.629789255316266*^9, 3.6297892556282673`*^9}, { 3.629869102295367*^9, 3.629869160124668*^9}, {3.6298691942887287`*^9, 3.6298696149902673`*^9}, {3.6298696993864155`*^9, 3.62986975897852*^9}, { 3.6298698387726603`*^9, 3.629869912030389*^9}, {3.6298700722270703`*^9, 3.629870234560955*^9}, {3.629870580429163*^9, 3.629870630458451*^9}, { 3.630556081081209*^9, 3.630556104902451*^9}, {3.6305562643503313`*^9, 3.6305562763935523`*^9}, {3.6305563415080667`*^9, 3.630556480956712*^9}, { 3.630556692851884*^9, 3.630556695347888*^9}, {3.630556730042349*^9, 3.630556914528273*^9}, {3.6305653725974936`*^9, 3.6305656807121167`*^9}, { 3.630565758760581*^9, 3.6305657739024467`*^9}, {3.630565858170267*^9, 3.63056596644846*^9}, {3.6305661502619734`*^9, 3.6305661523230915`*^9}, { 3.6305662653385553`*^9, 3.630566370352562*^9}, {3.6305667786019125`*^9, 3.630566790535595*^9}, {3.6305668214773645`*^9, 3.630567044691132*^9}, { 3.6305670772499943`*^9, 3.6305670783710585`*^9}, 3.630567272031135*^9, { 3.630567303902958*^9, 3.630567409875019*^9}, {3.630568671196477*^9, 3.6305687195002403`*^9}, {3.6305687542132254`*^9, 3.630568758623478*^9}, { 3.630568855671028*^9, 3.630568859250233*^9}, {3.630569706514694*^9, 3.630569775526641*^9}, 3.630569982346471*^9, {3.6305701679130845`*^9, 3.630570205199217*^9}, {3.6305703751399374`*^9, 3.630570526177576*^9}, { 3.630587657039589*^9, 3.630587688367381*^9}, {3.6305880733027773`*^9, 3.6305883365376396`*^9}, {3.6305886689118233`*^9, 3.6305886717978287`*^9}, 3.6305889776831656`*^9, {3.6305890389444733`*^9, 3.6305890437180815`*^9}, { 3.630589093248169*^9, 3.6305891296430326`*^9}, 3.630589181700324*^9, { 3.6305892509956455`*^9, 3.6305892594820604`*^9}, {3.630589318949365*^9, 3.6305893334729905`*^9}, {3.630589630294712*^9, 3.6305896376267247`*^9}, { 3.630589683288005*^9, 3.630589684988408*^9}, {3.630597310538067*^9, 3.630597340080757*^9}, {3.630597391446695*^9, 3.630597400596218*^9}, { 3.6305974350611897`*^9, 3.6305974605306463`*^9}, {3.630633997622449*^9, 3.630634003125764*^9}, {3.630659322217756*^9, 3.63065932438616*^9}, { 3.6306611578252783`*^9, 3.6306611625988865`*^9}, {3.6306612541554475`*^9, 3.630661257587454*^9}, {3.6306613001287284`*^9, 3.6306613026715326`*^9}, { 3.6306613920752897`*^9, 3.6306613949768953`*^9}, {3.6306706377509866`*^9, 3.630670654957817*^9}, {3.6306749981919994`*^9, 3.630675005793434*^9}, { 3.6306751229631357`*^9, 3.630675150017683*^9}, {3.6306752035287437`*^9, 3.6306752096180925`*^9}, {3.630675315921172*^9, 3.6306753201514144`*^9}, { 3.6306757793287754`*^9, 3.6306757796257925`*^9}, {3.630675814406262*^9, 3.6306758147026625`*^9}, {3.6306760107574763`*^9, 3.6306760154417443`*^9}, {3.6306789722320743`*^9, 3.6306789870309205`*^9}, {3.6306790257051325`*^9, 3.630679028076268*^9}, { 3.6306800259177256`*^9, 3.6306800406129513`*^9}, {3.6306801239326982`*^9, 3.6306801300167084`*^9}, {3.630680769261832*^9, 3.6306807806186523`*^9}, { 3.630681157468514*^9, 3.6306811577649145`*^9}, {3.6306812744219193`*^9, 3.63068127471832*^9}, {3.6306817187418995`*^9, 3.6306817919060287`*^9}, { 3.630681879188182*^9, 3.6306819111526375`*^9}, {3.6306821191790032`*^9, 3.6306821283050194`*^9}, {3.630720543651497*^9, 3.6307205534300566`*^9}, { 3.630721035525631*^9, 3.630721092774905*^9}, {3.6307212510439577`*^9, 3.6307213064777765`*^9}, {3.6307477437169704`*^9, 3.6307478284095197`*^9}, {3.6307478614971776`*^9, 3.6307478785948076`*^9}, {3.6307479884814005`*^9, 3.630748002880226*^9}, { 3.630748045624301*^9, 3.630748063876333*^9}, {3.630748111596817*^9, 3.6307481498324842`*^9}, {3.6307489182430334`*^9, 3.6307489447786803`*^9}, {3.630749037427243*^9, 3.6307490443848553`*^9}, { 3.6307491041485605`*^9, 3.6307491384218206`*^9}, {3.6307491914151134`*^9, 3.630749196890723*^9}, {3.6307492445800066`*^9, 3.6307493439989815`*^9}, { 3.630749396212273*^9, 3.6307494766304145`*^9}, {3.6307495333989143`*^9, 3.6307495547241516`*^9}, {3.6307496525831237`*^9, 3.630749669571553*^9}, { 3.630750220602922*^9, 3.6307502881822405`*^9}, {3.6307510631916018`*^9, 3.630751068292811*^9}, {3.6307511226589065`*^9, 3.630751137962533*^9}, { 3.6307512555243397`*^9, 3.630751282777588*^9}, {3.630752266971757*^9, 3.630752414599744*^9}, {3.630752446407563*^9, 3.630752457388191*^9}, { 3.6307589380050273`*^9, 3.6307590266300964`*^9}, {3.6307591666721067`*^9, 3.63075923229886*^9}, 3.630760288282259*^9, {3.6307603547370596`*^9, 3.630760557414652*^9}, {3.630760654134184*^9, 3.63076065510824*^9}, { 3.6307606911683025`*^9, 3.6307606919283457`*^9}, {3.6307607642334814`*^9, 3.6307607648645177`*^9}, {3.630761455000991*^9, 3.6307614616743727`*^9}, { 3.630761507825012*^9, 3.630761605776615*^9}, {3.630761652999316*^9, 3.630761695865768*^9}, {3.630761771278081*^9, 3.6307617792215357`*^9}, 3.6307629478424797`*^9, {3.632205207880766*^9, 3.6322052561155243`*^9}, { 3.6322052892474194`*^9, 3.6322052915745525`*^9}, 3.6322053746993074`*^9, { 3.6322062705415463`*^9, 3.6322062726016645`*^9}, {3.6322063396935015`*^9, 3.63220636484194*^9}, {3.6322064410612993`*^9, 3.6322064491667633`*^9}, { 3.632206580308264*^9, 3.6322066373275256`*^9}, {3.6322066736436024`*^9, 3.6322067467737856`*^9}, {3.632206782260815*^9, 3.6322071351279984`*^9}, 3.6322071989226465`*^9, {3.632207270393735*^9, 3.6322073359894867`*^9}, { 3.6322073997741346`*^9, 3.6322074126708727`*^9}, {3.632207491777397*^9, 3.632207682289294*^9}, {3.632207809621577*^9, 3.632207827973626*^9}, { 3.6322079043859973`*^9, 3.6322079279443445`*^9}, {3.6322080916397076`*^9, 3.6322081666649985`*^9}, 3.634905258940913*^9, {3.634905370524296*^9, 3.6349054089004903`*^9}, {3.6349054472556844`*^9, 3.63490544787272*^9}, { 3.634905483492757*^9, 3.6349055164646425`*^9}, {3.634905574352954*^9, 3.634905628121029*^9}, {3.6349057012822137`*^9, 3.6349057207913294`*^9}, { 3.6349061371061416`*^9, 3.634906354438572*^9}, {3.6349063890455513`*^9, 3.6349064369332905`*^9}, {3.634906537696054*^9, 3.634906601859724*^9}, 3.634906706128688*^9, {3.6349069249442034`*^9, 3.6349069328326545`*^9}, { 3.6349070151973653`*^9, 3.6349070242298822`*^9}, {3.6349070817921743`*^9, 3.6349070822111983`*^9}, {3.634907723288866*^9, 3.634907739005765*^9}, { 3.6349079580732946`*^9, 3.6349079868219395`*^9}, {3.634908200284148*^9, 3.634908315195721*^9}, {3.6349083774582825`*^9, 3.6349084027997313`*^9}, { 3.63490844507615*^9, 3.634908448843365*^9}, {3.634914956333157*^9, 3.634915020054802*^9}, {3.634915050572547*^9, 3.6349150956171236`*^9}, { 3.6349539785771523`*^9, 3.634953978975175*^9}, {3.6349540728785458`*^9, 3.6349541681829967`*^9}, {3.634954211263461*^9, 3.6349542495746527`*^9}, { 3.6349543251259737`*^9, 3.634954355882733*^9}, {3.6349543892536416`*^9, 3.6349544742835045`*^9}, {3.634954547519694*^9, 3.6349545640246377`*^9}, { 3.6349547051657104`*^9, 3.6349547107930326`*^9}, {3.634954745355009*^9, 3.634954752101395*^9}, {3.6349547948858423`*^9, 3.6349548053894434`*^9}, { 3.634954904907135*^9, 3.6349549451084347`*^9}, {3.634955219605135*^9, 3.6349552640926795`*^9}, {3.634955320189888*^9, 3.634955348763522*^9}, { 3.634955386393675*^9, 3.6349555039273973`*^9}, {3.6349557669644423`*^9, 3.6349557672004557`*^9}, {3.634955894841756*^9, 3.634955902578199*^9}, { 3.6349559513739896`*^9, 3.6349560216320086`*^9}, {3.634956120144643*^9, 3.634956128996149*^9}, {3.6349561700724983`*^9, 3.6349561978900895`*^9}, { 3.6349562480719595`*^9, 3.634956254326318*^9}, {3.634956331684742*^9, 3.6349563460575643`*^9}, {3.634956379242462*^9, 3.63495642676418*^9}, 3.6349564696636343`*^9, {3.6351524116477795`*^9, 3.6351524153379908`*^9}, { 3.6352134400282927`*^9, 3.635213442148414*^9}, {3.6352134745862694`*^9, 3.635213495869487*^9}, {3.6352135383409157`*^9, 3.6352137157160616`*^9}, { 3.6352137493569856`*^9, 3.635213764522853*^9}, {3.635214215036621*^9, 3.635214227593339*^9}, {3.635214407257615*^9, 3.63521441713218*^9}, { 3.635215297101512*^9, 3.635215303964904*^9}, {3.6352154111120324`*^9, 3.635215431504199*^9}, {3.635216346055508*^9, 3.635216494371991*^9}, { 3.635216631050809*^9, 3.6352166603244834`*^9}, {3.635216763034358*^9, 3.635216764164423*^9}, {3.6352168771938877`*^9, 3.635216888828553*^9}, 3.6352169832479534`*^9, 3.635217037668066*^9, {3.6352172024924936`*^9, 3.6352172054526625`*^9}, {3.635217344025589*^9, 3.635217346898753*^9}, 3.6352173863770113`*^9, {3.635217519639633*^9, 3.6352175507014103`*^9}, 3.635217615445113*^9, {3.6352178715087595`*^9, 3.635217880460271*^9}, { 3.6352185912849283`*^9, 3.635218598444338*^9}, {3.6352186995721216`*^9, 3.635218714955002*^9}, {3.6352189761749425`*^9, 3.6352189789341*^9}, { 3.6352195060322485`*^9, 3.635219509972474*^9}, 3.6352195673477554`*^9, 3.6352195994635925`*^9, {3.6352197336482677`*^9, 3.635219737452485*^9}, { 3.6352197706093817`*^9, 3.6352197723214793`*^9}, {3.635219941784172*^9, 3.6352199485115566`*^9}, {3.6352200714185867`*^9, 3.6352200854323883`*^9}, {3.6352202085694313`*^9, 3.635220235849992*^9}, { 3.6352202816336107`*^9, 3.6352203110962954`*^9}, {3.6352204980449886`*^9, 3.6352205276526823`*^9}, {3.6352253191447396`*^9, 3.6352253299913597`*^9}, {3.6352253611111403`*^9, 3.6352253637572913`*^9}, {3.635225409322898*^9, 3.6352255965196047`*^9}, { 3.6352260914249115`*^9, 3.6352261698393965`*^9}, {3.63522638233055*^9, 3.6352264188036366`*^9}, {3.635227493469104*^9, 3.635227556935734*^9}, { 3.6352276745764627`*^9, 3.635227730116639*^9}, {3.6352287979917183`*^9, 3.6352288587651944`*^9}, {3.635228894237223*^9, 3.635228948324317*^9}, { 3.635229365252164*^9, 3.6352293902275925`*^9}, {3.63522947690555*^9, 3.6352294807837715`*^9}, {3.6352492831123204`*^9, 3.6352492983621926`*^9}, 3.6356569054520617`*^9, {3.6363778004499054`*^9, 3.636377802787039*^9}, { 3.6363778414932528`*^9, 3.6363778525308843`*^9}, {3.636384436335312*^9, 3.6363846409950175`*^9}, {3.636384971250907*^9, 3.6363849738080535`*^9}, { 3.6363850170465264`*^9, 3.636385030729309*^9}, {3.6363851286779118`*^9, 3.636385138359465*^9}, {3.6363851699712734`*^9, 3.636385223111313*^9}, { 3.656076172452749*^9, 3.656076182171566*^9}, {3.6560765578514256`*^9, 3.656076619019133*^9}, 3.6560772545486493`*^9, {3.6630719749029694`*^9, 3.6630719878027077`*^9}, {3.6630720702554235`*^9, 3.6630720807290225`*^9}, {3.6630721155740156`*^9, 3.6630721713712068`*^9}, {3.663072270834896*^9, 3.6630722882218904`*^9}, 3.6630724099968557`*^9, {3.685234767958906*^9, 3.685234768480936*^9}, { 3.685252204033695*^9, 3.6852522340537376`*^9}, {3.6852522757137957`*^9, 3.6852523115138454`*^9}, {3.68525376314359*^9, 3.6852537725041256`*^9}, { 3.6852539763277836`*^9, 3.6852539861693463`*^9}, 3.6852540682470407`*^9, 3.6852541660656357`*^9, {3.6852604801645336`*^9, 3.6852605060345697`*^9}, { 3.6852605373446136`*^9, 3.6852605977846985`*^9}, 3.685260655254779*^9, { 3.6853280002218475`*^9, 3.685328019561875*^9}, 3.685328064721938*^9, { 3.6853280953119807`*^9, 3.6853282636022167`*^9}, {3.685328356242346*^9, 3.685328598671985*^9}, {3.6853286682069626`*^9, 3.6853287982524004`*^9}, { 3.6853288753368096`*^9, 3.6853289367033195`*^9}, {3.685328968274125*^9, 3.685328978713722*^9}, {3.685329033941881*^9, 3.685329044950511*^9}, { 3.685329173522865*^9, 3.6853294420842257`*^9}, {3.6853296024223967`*^9, 3.6853296124319687`*^9}, {3.6853297221712456`*^9, 3.685329733349885*^9}, { 3.6853298076291337`*^9, 3.6853298739599276`*^9}, {3.685330038474337*^9, 3.685330051652091*^9}, {3.6853311309428225`*^9, 3.685331168378964*^9}, { 3.685340142134763*^9, 3.685340180544817*^9}, {3.6853583292043543`*^9, 3.685358334834362*^9}, {3.685358366084406*^9, 3.685358366954407*^9}, { 3.685358408404465*^9, 3.685358518294619*^9}, 3.685358620174762*^9, 3.6853586578748145`*^9, {3.6853588750151186`*^9, 3.6853588857151337`*^9}, { 3.6853589302051954`*^9, 3.685358938995208*^9}, {3.685359014715314*^9, 3.6853590296653347`*^9}, 3.685359148315501*^9, 3.6853598281764526`*^9, { 3.6853683109000263`*^9, 3.685368382250126*^9}, {3.685368420160179*^9, 3.6853684704302497`*^9}, {3.6853685194503183`*^9, 3.685368742860631*^9}, { 3.685369008901004*^9, 3.68536902061102*^9}, {3.6853690791611023`*^9, 3.685369132301176*^9}, {3.6853693219914417`*^9, 3.6853693304114532`*^9}, 3.6853696089118433`*^9, {3.6858758911429157`*^9, 3.685875951793*^9}, { 3.6859484099082212`*^9, 3.6859484970032024`*^9}, {3.686052829875022*^9, 3.686052906242383*^9}, {3.6860535326822133`*^9, 3.686053598029951*^9}, { 3.68605365168902*^9, 3.6860541446091995`*^9}, {3.6860541846064873`*^9, 3.68605440393201*^9}, {3.686054713802734*^9, 3.6860547858298535`*^9}, { 3.6860548280202665`*^9, 3.686054837219793*^9}, {3.686054874127904*^9, 3.686054892139934*^9}, {3.686055136014883*^9, 3.6860551460584574`*^9}, { 3.686055211281188*^9, 3.6860552301962633`*^9}, {3.6860553465409174`*^9, 3.6860553998749685`*^9}, {3.6860556017188663`*^9, 3.6860556050188704`*^9}, {3.6862923512707715`*^9, 3.686292363600789*^9}, { 3.686292409650853*^9, 3.6862924109708548`*^9}, {3.6862924536109147`*^9, 3.6862924596309233`*^9}, {3.686292542221039*^9, 3.6862925430110397`*^9}, { 3.686292988803664*^9, 3.686293001033681*^9}, {3.6866504529025555`*^9, 3.686650526682659*^9}, {3.686650671852862*^9, 3.6866507242929354`*^9}, { 3.6866507657529936`*^9, 3.6866507887630253`*^9}, {3.6866508208230705`*^9, 3.6866509100531955`*^9}, {3.6866509593932643`*^9, 3.686650971113281*^9}, { 3.686651007793332*^9, 3.6866511595335445`*^9}, {3.686651223513634*^9, 3.686651234033649*^9}, {3.686651304763748*^9, 3.6866513363837924`*^9}, { 3.6866514102038956`*^9, 3.686651429943923*^9}, {3.686652993837468*^9, 3.6866530046274834`*^9}, {3.686804398511652*^9, 3.6868044081516657`*^9}, { 3.6868046315619783`*^9, 3.686804631801979*^9}, {3.686804685872054*^9, 3.686804707092084*^9}, {3.6868047382021275`*^9, 3.686804767812169*^9}, { 3.686804824012248*^9, 3.6868048404922705`*^9}, {3.686804942142413*^9, 3.6868049633424425`*^9}, {3.6868050765526013`*^9, 3.686805101092636*^9}, { 3.6868051463526993`*^9, 3.6868052234228067`*^9}, {3.686805307602925*^9, 3.686805311682931*^9}, {3.68680577547358*^9, 3.686805788923599*^9}, { 3.686821702197342*^9, 3.6868217282873783`*^9}, {3.6868225192884855`*^9, 3.686822538368512*^9}, {3.6868226306886415`*^9, 3.6868226683086944`*^9}, { 3.6868227318887835`*^9, 3.6868227627088265`*^9}, {3.686822801638881*^9, 3.6868230490692277`*^9}, {3.686823122979331*^9, 3.6868231833294153`*^9}, { 3.6868232450595016`*^9, 3.6868233753996844`*^9}, {3.6868234153897405`*^9, 3.686823451379791*^9}, {3.6868236736101017`*^9, 3.6868236786601086`*^9}, { 3.6868237164601617`*^9, 3.68682375072021*^9}, {3.68682389396041*^9, 3.68682390087042*^9}, {3.686823940790476*^9, 3.6868239416904774`*^9}, { 3.6868239808805323`*^9, 3.6868239872905407`*^9}, {3.686824051540631*^9, 3.6868240519006314`*^9}, {3.686824360861064*^9, 3.6868243761510854`*^9}, { 3.6868245440213203`*^9, 3.686824577221367*^9}, {3.686824685841519*^9, 3.6868246979115357`*^9}, 3.6868248012716804`*^9, 3.6868253582724605`*^9, { 3.6868255183026843`*^9, 3.686825518932685*^9}, {3.6868264466639843`*^9, 3.6868264497139883`*^9}, {3.6868267792744493`*^9, 3.6868268152945004`*^9}, {3.686827100164899*^9, 3.6868271210549283`*^9}, 3.686827162004986*^9, {3.6868272414950967`*^9, 3.686827327475217*^9}, { 3.686827953126093*^9, 3.686827976506126*^9}, {3.686829128577739*^9, 3.686829138957753*^9}, 3.6868292410978966`*^9, {3.6868292768379464`*^9, 3.686829282727955*^9}, {3.6868293820380936`*^9, 3.686829418138144*^9}, { 3.686829846748744*^9, 3.686829848298746*^9}, {3.6868313063207874`*^9, 3.686831307180789*^9}, {3.6868331276633377`*^9, 3.68683328653356*^9}, { 3.6868394697195063`*^9, 3.6868394933895392`*^9}, 3.686839530999592*^9, { 3.686839582829664*^9, 3.68683963686974*^9}, {3.6868397551199055`*^9, 3.68683979365996*^9}, {3.6868398344600167`*^9, 3.686839866200061*^9}, { 3.687092084401948*^9, 3.687092117031994*^9}, {3.6870922598621936`*^9, 3.6870922645422*^9}, {3.6870962086478376`*^9, 3.6870962658779182`*^9}, 3.687096444838168*^9, {3.687096500978247*^9, 3.687096501638248*^9}, { 3.6870965809883595`*^9, 3.687096592708376*^9}, 3.687096837948719*^9, { 3.68709688890879*^9, 3.687096985798926*^9}, {3.6870971015990877`*^9, 3.6870972179192505`*^9}, {3.6870972618993125`*^9, 3.687097305639374*^9}, { 3.6870973356794157`*^9, 3.6870975186496716`*^9}, {3.6870975796097574`*^9, 3.6870975953197794`*^9}, {3.6870976531898603`*^9, 3.6870976848899045`*^9}, 3.6870977782500353`*^9, {3.687413757687042*^9, 3.6874137834070783`*^9}, { 3.6874140542074575`*^9, 3.687414094417514*^9}, {3.6874143478878684`*^9, 3.687414485538061*^9}, {3.6874146116082373`*^9, 3.68741464894829*^9}, { 3.6874147451084247`*^9, 3.687414766118454*^9}, 3.6874149094486547`*^9, { 3.6874150416688395`*^9, 3.6874150634888706`*^9}, {3.6874152437091227`*^9, 3.687415268869158*^9}, 3.6874153442892637`*^9, {3.687415449879411*^9, 3.687415469659439*^9}, 3.687415529739523*^9, 3.687415564789572*^9, 3.687415645529685*^9, {3.6874168016913037`*^9, 3.687416803441306*^9}, { 3.687421022677213*^9, 3.6874212686075573`*^9}, {3.68742948209425*^9, 3.6874294906842623`*^9}, {3.687844340668378*^9, 3.6878443698084188`*^9}, { 3.6886534778571014`*^9, 3.6886534911571198`*^9}, {3.688906380162199*^9, 3.6889064680223217`*^9}, {3.688906514222396*^9, 3.6889065193925257`*^9}, { 3.688908192623024*^9, 3.6889082006430354`*^9}, {3.688908261823121*^9, 3.688908271653135*^9}, {3.6889083776232834`*^9, 3.6889083922733035`*^9}, { 3.688908466073407*^9, 3.6889084993734536`*^9}, 3.688908533623502*^9, { 3.688908616683618*^9, 3.6889086271336327`*^9}, {3.6889086885637183`*^9, 3.6889087063437433`*^9}, {3.6889091647443852`*^9, 3.6889092012544365`*^9}, {3.6889093019045773`*^9, 3.6889093406746316`*^9}, 3.6889101071957045`*^9, {3.689905940063133*^9, 3.689905972983179*^9}, { 3.692530981927737*^9, 3.6925310416778207`*^9}, {3.692531099797902*^9, 3.6925311384779563`*^9}, {3.692531192258032*^9, 3.692531244668105*^9}, { 3.6925312919881716`*^9, 3.692531425418358*^9}, {3.6925315270885005`*^9, 3.692531643928664*^9}, {3.692535489534048*^9, 3.6925356485142703`*^9}, { 3.692535753564418*^9, 3.6925357992544813`*^9}, {3.6925358831745987`*^9, 3.692535899604622*^9}, {3.692536042584822*^9, 3.692536159384986*^9}, { 3.6925366121156197`*^9, 3.6925366207256317`*^9}, {3.6925367265057793`*^9, 3.69253672683578*^9}, {3.6925368590559654`*^9, 3.6925368636559715`*^9}, { 3.6925370880062857`*^9, 3.692537177856412*^9}, {3.692537322456614*^9, 3.6925373869767046`*^9}, {3.6925390913352747`*^9, 3.6925390925252767`*^9}, {3.692539644430175*^9, 3.6925396711502123`*^9}, { 3.692539727510291*^9, 3.692539730440295*^9}, {3.69253993367058*^9, 3.692539963780622*^9}, {3.6925400018406754`*^9, 3.692540003630678*^9}, { 3.6925401743409166`*^9, 3.6925401747509174`*^9}, {3.692540399111232*^9, 3.692540407981244*^9}, {3.69254047647134*^9, 3.6925404886113567`*^9}, { 3.6925406039715185`*^9, 3.69254060531152*^9}, {3.6925414948727655`*^9, 3.6925414953427663`*^9}, {3.6925415478528395`*^9, 3.692541613062931*^9}, 3.692541649332982*^9, {3.692541727633092*^9, 3.6925418840133104`*^9}, { 3.692541924473367*^9, 3.692542041693531*^9}, {3.6925421488836813`*^9, 3.6925422549438295`*^9}, {3.6925422976938896`*^9, 3.692542521444203*^9}, { 3.6925426221843443`*^9, 3.6925426357343626`*^9}, 3.692542739374508*^9, 3.692599799510878*^9, {3.692599834884901*^9, 3.6925998954663663`*^9}, { 3.692599925635092*^9, 3.6926000095928946`*^9}, {3.692600108929576*^9, 3.6926001456386757`*^9}, {3.6926001874800687`*^9, 3.692600454421337*^9}, { 3.692600503149027*^9, 3.6926006000391626`*^9}, {3.692600680251275*^9, 3.6926006814012766`*^9}, {3.6926009000215826`*^9, 3.6926009410816402`*^9}, 3.692601280532116*^9, {3.6926044914726114`*^9, 3.69260449774262*^9}, 3.6926045660127153`*^9, 3.6926046690228596`*^9, {3.69296647863291*^9, 3.6929664798829117`*^9}, {3.6929665643330297`*^9, 3.6929666141830997`*^9}, {3.6929670390036945`*^9, 3.6929670405536966`*^9}, {3.6929670861037607`*^9, 3.6929670952937737`*^9}, {3.6929671302538223`*^9, 3.6929671549438567`*^9}, {3.6929671904739065`*^9, 3.69296722137395*^9}, { 3.6929672596240034`*^9, 3.6929673352541094`*^9}, 3.6929678909232683`*^9, { 3.6930146982034283`*^9, 3.693014722713463*^9}, {3.6930148540136466`*^9, 3.693014857023651*^9}, {3.6930148913836985`*^9, 3.693014894823704*^9}, { 3.693014930903754*^9, 3.6930151942541227`*^9}, {3.693015247824198*^9, 3.693015430554454*^9}, {3.693015673794794*^9, 3.69301579223496*^9}, { 3.6930163123576884`*^9, 3.693016326897709*^9}, {3.6930164225678425`*^9, 3.693016429727853*^9}, {3.693016686718212*^9, 3.693016698128228*^9}, { 3.693016737038283*^9, 3.693016755068308*^9}, {3.6930168429225607`*^9, 3.6930168719926014`*^9}, {3.6930172049430676`*^9, 3.693017284063178*^9}, { 3.693017336433252*^9, 3.6930173662532935`*^9}, {3.6930180949163136`*^9, 3.6930180975563173`*^9}, {3.6930181870764427`*^9, 3.693018199956461*^9}, { 3.6930182954065943`*^9, 3.693018305996609*^9}, {3.693139886141657*^9, 3.6931399045016823`*^9}, {3.6931402916003532`*^9, 3.693140295770359*^9}, { 3.693140426020541*^9, 3.693140426530542*^9}, {3.6931410492237864`*^9, 3.6931410888738413`*^9}, {3.6931411194438844`*^9, 3.693141126553894*^9}, { 3.693141412004294*^9, 3.693141454164353*^9}, {3.6931415979955544`*^9, 3.6931417931758275`*^9}, {3.6932199559445915`*^9, 3.6932199772046213`*^9}, {3.6932201435748544`*^9, 3.693220170284892*^9}, { 3.693220713855653*^9, 3.693220721825664*^9}, {3.693625124589745*^9, 3.693625153729786*^9}, {3.6940907995669713`*^9, 3.6940909688872085`*^9}, { 3.6940913675677667`*^9, 3.6940914223978434`*^9}, {3.694091508037963*^9, 3.694091572118053*^9}, 3.694092009628666*^9, {3.6940920553287296`*^9, 3.694092229168973*^9}, {3.6940923053990793`*^9, 3.694092374419176*^9}, { 3.6940924537392874`*^9, 3.694092457789293*^9}, 3.694092642849552*^9, { 3.6940928573598523`*^9, 3.694092862379859*^9}, {3.6940945886222763`*^9, 3.694094601932295*^9}, 3.694094849542641*^9, {3.694095764293922*^9, 3.6940957644739223`*^9}, {3.6940960602743363`*^9, 3.6940960732243547`*^9}, {3.6940961211044216`*^9, 3.694096124194426*^9}, { 3.694665030960044*^9, 3.6946650634500895`*^9}, {3.6946652071402903`*^9, 3.6946653490404887`*^9}, {3.6946658702212186`*^9, 3.6946658881212435`*^9}, {3.694665923041292*^9, 3.694665953561335*^9}, { 3.694665995981395*^9, 3.6946660149414215`*^9}, {3.694666050571471*^9, 3.6946660547214766`*^9}, {3.694666169991638*^9, 3.694666292151809*^9}, { 3.6946663456618843`*^9, 3.6946663943919525`*^9}, 3.6946667526224537`*^9, 3.69466680700253*^9, 3.694687076625702*^9, {3.6946874316161985`*^9, 3.6946874621962414`*^9}, 3.694687499496294*^9, {3.694687567516389*^9, 3.694687642816495*^9}, {3.694687679006545*^9, 3.6946877198966026`*^9}, { 3.6946877714966745`*^9, 3.694687931746899*^9}, {3.723798739728607*^9, 3.723798744014243*^9}, {3.7237990126446104`*^9, 3.723799023974499*^9}, { 3.7244116671877546`*^9, 3.7244116733393917`*^9}, {3.724411761793063*^9, 3.7244117718753977`*^9}, {3.724411928386671*^9, 3.7244119682966137`*^9}, { 3.724412131847311*^9, 3.724412188341254*^9}, {3.729414981357122*^9, 3.7294149861075096`*^9}, {3.749817651293678*^9, 3.749817653108206*^9}, { 3.7498176831919456`*^9, 3.7498176846222315`*^9}, 3.7498177601545563`*^9, { 3.749817859674735*^9, 3.749817861044999*^9}, {3.7498179561547127`*^9, 3.749817964489929*^9}, {3.749818149334386*^9, 3.749818237397959*^9}, 3.749818617867873*^9, {3.7505621848002787`*^9, 3.7505622174085107`*^9}, { 3.75056238761455*^9, 3.750562431347901*^9}, {3.7505626332829456`*^9, 3.7505627331565337`*^9}, {3.7505627632642183`*^9, 3.7505627635859113`*^9}, {3.7515359581577415`*^9, 3.7515359614850826`*^9}, {3.751536071974715*^9, 3.7515360961721487`*^9}, 3.7515362040373974`*^9, {3.751536256080162*^9, 3.7515365099108534`*^9}, { 3.751549231137398*^9, 3.7515493334258356`*^9}, {3.7515496891619573`*^9, 3.751549689458767*^9}, {3.763384318028655*^9, 3.763384321230183*^9}, { 3.788530117667017*^9, 3.788530117980694*^9}, 3.7885303696209583`*^9, 3.788530509305438*^9, {3.78853083351016*^9, 3.788530862892729*^9}, { 3.788530925928982*^9, 3.7885309671960435`*^9}, {3.788533054135647*^9, 3.78853306391253*^9}, {3.788533559801361*^9, 3.7885336574548807`*^9}, { 3.788533916375413*^9, 3.7885339589240637`*^9}, {3.788535764582915*^9, 3.788535775009864*^9}, {3.788571051580041*^9, 3.788571053084015*^9}, 3.7885714852753925`*^9, {3.7885715554496107`*^9, 3.7885715772004504`*^9}, { 3.788571696555899*^9, 3.7885717388241262`*^9}, {3.788571794677034*^9, 3.7885718099292316`*^9}, 3.7885718526796875`*^9, {3.7885719048201413`*^9, 3.788571938458513*^9}, {3.7885720197107735`*^9, 3.7885720203433733`*^9}, { 3.7885721579483404`*^9, 3.788572246745886*^9}, {3.788572406392971*^9, 3.7885724747998886`*^9}, {3.7885725451809406`*^9, 3.7885725476052*^9}, { 3.788572796561078*^9, 3.7885727975057955`*^9}, 3.788572839094982*^9, { 3.788572904602244*^9, 3.788572917919137*^9}, {3.788573100895812*^9, 3.7885731714659753`*^9}, {3.7885733915788927`*^9, 3.788573436414242*^9}, 3.788573551866688*^9, 3.788573615961852*^9, {3.7885736607323666`*^9, 3.7885736628162546`*^9}, {3.788573695779252*^9, 3.788573697977635*^9}, { 3.788573733478549*^9, 3.7885738111703186`*^9}, {3.7888332726117997`*^9, 3.788833305367669*^9}},ExpressionUUID->"5cd6d089-820c-43b2-af82-\ 711b1fa800d9"] }, Open ]], Cell[CellGroupData[{ Cell["BEAM ELEMENT (nonl 0) defs ", "Subsection", CellChangeTimes->{{3.7530187996679964`*^9, 3.753018803413909*^9}, { 3.7633629633672647`*^9, 3.763362967100765*^9}, {3.787894773214689*^9, 3.7878947881941814`*^9}, {3.78789485671918*^9, 3.78789488217928*^9}, 3.7885197052606735`*^9, {3.788530025907043*^9, 3.7885300287809105`*^9}, 3.7885306781716957`*^9, {3.8200271989371843`*^9, 3.8200272016625395`*^9}, { 3.8200274346181693`*^9, 3.8200274405428553`*^9}, {3.8216146694524984`*^9, 3.8216146730659995`*^9}},ExpressionUUID->"b67e0cca-173f-4918-86e0-\ d212f0f8e753"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"BEAM", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4430689313272*^9, 3.4430690080792*^9}, { 3.4430690869528*^9, 3.4430691077320004`*^9}, {3.4430691700116*^9, 3.4430691708072*^9}, {3.4430692071717997`*^9, 3.443069246359*^9}, { 3.4430772782732*^9, 3.4430773623416*^9}, {3.4430773978316*^9, 3.4430774104676*^9}, {3.4430775053780003`*^9, 3.4430776180598*^9}, { 3.4434109099524*^9, 3.4434109159584*^9}, {3.4438800815346003`*^9, 3.4438802689304*^9}, {3.443880362624*^9, 3.4438803824516*^9}, { 3.443929565615374*^9, 3.443929570232974*^9}, {3.443935321321974*^9, 3.443935335705174*^9}, {3.443935419945174*^9, 3.443935421489574*^9}, { 3.443935494013974*^9, 3.443935494715974*^9}, {3.443935617565974*^9, 3.4439357217895737`*^9}, {3.443935755360774*^9, 3.443935816107174*^9}, { 3.443942155230774*^9, 3.443942209939974*^9}, {3.443942305710374*^9, 3.4439423142123737`*^9}, {3.4439442908131742`*^9, 3.443944441181574*^9}, { 3.4439447830065737`*^9, 3.4439447917425737`*^9}, {3.443944908541774*^9, 3.443944916060974*^9}, {3.4442731097938004`*^9, 3.4442731115254*^9}, { 3.444273189229*^9, 3.4442732700526*^9}, {3.4442748430004*^9, 3.4442748605036*^9}, {3.4442748977438*^9, 3.4442748989762*^9}, { 3.4442749340762*^9, 3.4442749351057997`*^9}, 3.4442752313382*^9, { 3.4442919702026*^9, 3.4442919911846*^9}, {3.4442921151577997`*^9, 3.4442921271074*^9}, {3.4443811023684*^9, 3.4443811036632*^9}, { 3.4443814073171997`*^9, 3.4443814402956*^9}, {3.4443815036316*^9, 3.4443815147855997`*^9}, {3.4443815537232*^9, 3.4443815747676*^9}, { 3.4443816138143997`*^9, 3.444381633174*^9}, {3.4443816850439997`*^9, 3.4443817801728*^9}, 3.4443853618688*^9, {3.4443855607376003`*^9, 3.4443856337924*^9}, {3.4443861200444*^9, 3.4443861523676*^9}, { 3.4443862280495996`*^9, 3.444386291448*^9}, {3.4443864047352*^9, 3.4443864135336*^9}, {3.4443870026832*^9, 3.4443870095316*^9}, { 3.4444082055056*^9, 3.4444082437412*^9}, {3.4444082797148*^9, 3.4444084583816*^9}, {3.4444084889108*^9, 3.4444085087539997`*^9}, { 3.444408942517*^9, 3.4444089563386*^9}, {3.4444091419564*^9, 3.4444091647167997`*^9}, {3.4444092206428003`*^9, 3.4444092944463997`*^9}, {3.4444093856284*^9, 3.4444094281071997`*^9}, { 3.4444094976988*^9, 3.4444095275104*^9}, {3.444409611064*^9, 3.4444096125772*^9}, 3.4444098504616003`*^9, {3.444409913392*^9, 3.4444099166056004`*^9}, 3.4444100178496*^9, {3.4444103063248*^9, 3.4444103358712*^9}, {3.4444103868208*^9, 3.4444104432460003`*^9}, { 3.4444921219564*^9, 3.4444921256224003`*^9}, {3.444492194824*^9, 3.4444921973668003`*^9}, {3.4444922814351997`*^9, 3.4444922853508*^9}, { 3.4444923330868*^9, 3.4444923345844*^9}, {3.444492366424*^9, 3.4444923855808*^9}, {3.4453153475226*^9, 3.445315360689*^9}, { 3.4465518166373653`*^9, 3.446551863016165*^9}, {3.446551894231765*^9, 3.446552159384965*^9}, {3.446552232377365*^9, 3.4465522555589647`*^9}, { 3.446553347388365*^9, 3.4465533616155653`*^9}, {3.4466058525769997`*^9, 3.4466058529046*^9}, {3.4466064371219997`*^9, 3.4466065097244*^9}, { 3.4466127725788*^9, 3.4466127766036*^9}, {3.4466128124835997`*^9, 3.4466130037864*^9}, {3.4466131532696*^9, 3.4466131761703997`*^9}, { 3.4466133992192*^9, 3.4466134478756*^9}, {3.446613483584*^9, 3.4466134932092*^9}, {3.4466135740952*^9, 3.4466135794927998`*^9}, { 3.4466137283948*^9, 3.4466137341356*^9}, {3.4466138994342003`*^9, 3.4466139023826*^9}, {3.4466139549858*^9, 3.4466139579653997`*^9}, { 3.4466142109818*^9, 3.4466142245226*^9}, {3.4466142793878*^9, 3.4466143652033997`*^9}, {3.4466144712834*^9, 3.4466145978929996`*^9}, { 3.4466146992618*^9, 3.4466147509914*^9}, {3.4466151283086*^9, 3.4466152768986*^9}, {3.4466153107506*^9, 3.4466153406558*^9}, { 3.4466194331976*^9, 3.4466194377528*^9}, {3.4466194847712*^9, 3.446619488718*^9}, {3.4466389495861998`*^9, 3.4466389768238*^9}, { 3.4466391218414*^9, 3.446639306561*^9}, {3.4466393990222*^9, 3.4466394004886*^9}, {3.4466394475694*^9, 3.4466394487706003`*^9}, { 3.4466395034174*^9, 3.4466395049462*^9}, 3.4466395515755997`*^9, { 3.4466396000176*^9, 3.4466396190808*^9}, {3.4466397459088*^9, 3.446639748826*^9}, {3.4466397974356003`*^9, 3.446639798668*^9}, 3.4466398447816*^9, {3.446639894218*^9, 3.4466399201556*^9}, { 3.4466399570964003`*^9, 3.4466399583288*^9}, {3.446639994006*^9, 3.4466400056904*^9}, {3.4466400383568*^9, 3.4466400395892*^9}, { 3.4466400745643997`*^9, 3.4466401025976*^9}, {3.4466401660834*^9, 3.4466401806070004`*^9}, {3.4466402251294003`*^9, 3.446640227407*^9}, { 3.446640260479*^9, 3.4466402657674*^9}, {3.4466404133122*^9, 3.4466405185654*^9}, 3.4466405830462*^9, {3.4467273294214*^9, 3.4467273777813997`*^9}, {3.4467274366558*^9, 3.4467275620954*^9}, { 3.446727593311*^9, 3.4467277412614*^9}, {3.4467283334639997`*^9, 3.4467283356012*^9}, {3.4467283707636003`*^9, 3.4467283727604*^9}, { 3.4467289882664003`*^9, 3.4467291276836*^9}, {3.446778464322*^9, 3.4467786797424*^9}, {3.4467801953803997`*^9, 3.4467802409792*^9}, { 3.4467802998691998`*^9, 3.4467804023456*^9}, 3.4467804345596*^9, { 3.4467808656344*^9, 3.4467808670852003`*^9}, 3.4467818107525997`*^9, { 3.446781855509*^9, 3.446781874385*^9}, {3.4467826737914*^9, 3.4467827381726*^9}, {3.4467828623018*^9, 3.4467831045386*^9}, { 3.4470344113984003`*^9, 3.4470344123344*^9}, {3.4470344628316*^9, 3.4470345343108*^9}, {3.447043591118539*^9, 3.447043642192939*^9}, { 3.447045649625739*^9, 3.447045718437339*^9}, {3.447054774023939*^9, 3.447054834198939*^9}, {3.4470549103449388`*^9, 3.4470549116169386`*^9}, { 3.447054943902939*^9, 3.4470553027109385`*^9}, {3.447055334559939*^9, 3.447055353684939*^9}, {3.447057311918539*^9, 3.447057369747739*^9}, { 3.4470575058577385`*^9, 3.4470575951365385`*^9}, {3.4470581848789387`*^9, 3.4470582040825386`*^9}, {3.451276121243*^9, 3.4512761425838003`*^9}, { 3.4512762022382*^9, 3.4512762064346*^9}, {3.4512762476966*^9, 3.4512762827654*^9}, {3.451276489091*^9, 3.451276541975*^9}, { 3.4512765853118*^9, 3.4512766132046003`*^9}, {3.4512773470306*^9, 3.4512773766082*^9}, {3.4512776069110003`*^9, 3.4512777499318*^9}, 3.4512777831286*^9, {3.4512778785538*^9, 3.451277881627*^9}, { 3.4512780242734003`*^9, 3.4512780302794*^9}, 3.4512780737878*^9, { 3.4512781866226*^9, 3.4512781930810003`*^9}, {3.4512863325078*^9, 3.4512863539266*^9}, {3.4568019250434*^9, 3.4568022712698*^9}, { 3.4568023177422*^9, 3.4568024125278*^9}, {3.4568024694365997`*^9, 3.4568024750369997`*^9}, {3.4568026914402*^9, 3.4568028101094*^9}, { 3.4568028406698*^9, 3.4568028564726*^9}, 3.4568028886085997`*^9, { 3.4568030489454*^9, 3.4568030800986*^9}, 3.4568032004128*^9, { 3.4568035073698*^9, 3.4568035176034*^9}, {3.4568040146596003`*^9, 3.4568040844852*^9}, {3.4568043016684*^9, 3.4568043154744*^9}, { 3.4568045482264*^9, 3.4568045486632*^9}, {3.4568048944996*^9, 3.4568049806116*^9}, {3.4660560628582*^9, 3.4660560753538*^9}, { 3.4660676729379997`*^9, 3.4660676735931997`*^9}, {3.4660677244024*^9, 3.4660677277251997`*^9}, {3.4742646771287394`*^9, 3.47426469439174*^9}, { 3.47426489921974*^9, 3.4742649800437393`*^9}, {3.4801246373348*^9, 3.4801246860536003`*^9}, {3.4801247748176003`*^9, 3.4801247821028*^9}, { 3.4801248161264*^9, 3.4801248295736*^9}, {3.4801248810692*^9, 3.4801248964508*^9}, {3.4801249330484*^9, 3.480124947884*^9}, 3.4801249886468*^9, {3.4801251139147997`*^9, 3.48012512588*^9}, { 3.4838339444988003`*^9, 3.4838339567448*^9}, 3.4838341692012*^9, { 3.4838344350408*^9, 3.4838344353684*^9}, {3.4938987575920324`*^9, 3.4938987586840324`*^9}, {3.4941630624049997`*^9, 3.4941631381274*^9}, { 3.4941632311345997`*^9, 3.4941632492306004`*^9}, 3.4941633249217997`*^9, { 3.4941633940922003`*^9, 3.4941634063538*^9}, {3.4941634538402*^9, 3.4941635051642*^9}, {3.494163565115*^9, 3.4941636341762*^9}, { 3.4941636853442*^9, 3.4941639323234*^9}, {3.4941640277798*^9, 3.4941641455754004`*^9}, {3.4941641790374002`*^9, 3.4941641803789997`*^9}, {3.4941642676142*^9, 3.4941643277678003`*^9}, 3.4941644677018003`*^9, {3.4941646208938*^9, 3.4941646322349997`*^9}, { 3.4941652592693996`*^9, 3.4941652807194*^9}, {3.4941653119038*^9, 3.494165416299*^9}, {3.494165453895*^9, 3.4941654544722*^9}, { 3.4950990979779997`*^9, 3.495099142701*^9}, {3.495099172958*^9, 3.4950991806289997`*^9}, {3.495099227097*^9, 3.495099238113*^9}, 3.495099290797*^9, {3.495099346084*^9, 3.495099359507*^9}, { 3.495099456308*^9, 3.495099464091*^9}, 3.495099683108*^9, { 3.495100428112*^9, 3.495100434958*^9}, {3.4951006496219997`*^9, 3.495100649992*^9}, {3.4987235265018*^9, 3.4987235939094*^9}, { 3.4987236420666*^9, 3.4987236530646*^9}, {3.4987237305341997`*^9, 3.4987237396914*^9}, {3.498733136159*^9, 3.4987332972446003`*^9}, { 3.4987364783094*^9, 3.4987364860626*^9}, {3.4987366201134*^9, 3.4987366236078*^9}, {3.4987367272386*^9, 3.4987367464890003`*^9}, { 3.4987369428462*^9, 3.4987369670886*^9}, {3.4987370134518003`*^9, 3.4987370259941998`*^9}, {3.4987370944002*^9, 3.4987371027618*^9}, { 3.4987371921029997`*^9, 3.498737193663*^9}, {3.4987372660938*^9, 3.4987372935498*^9}, {3.4987373290554*^9, 3.4987377176202*^9}, { 3.4987377520182*^9, 3.4987379139462*^9}, {3.4987382030216*^9, 3.4987382667078*^9}, {3.4987888391818*^9, 3.4987888608346*^9}, { 3.4988785131146*^9, 3.4988785160162*^9}, {3.5007170967096*^9, 3.5007170999076*^9}, 3.5007182237316*^9, {3.5007182772864*^9, 3.5007182987832003`*^9}, {3.5009573226744003`*^9, 3.5009573940444*^9}, 3.5009574358710003`*^9, 3.5009604278482*^9, {3.5009897246173353`*^9, 3.5009898480289354`*^9}, {3.5009901464413357`*^9, 3.5009901475333357`*^9}, {3.5009901801997356`*^9, 3.500990274096135*^9}, { 3.5010475253292*^9, 3.5010475852332*^9}, {3.5010605722018003`*^9, 3.5010606739762*^9}, {3.5010607202146*^9, 3.5010607323358*^9}, { 3.5010607920526*^9, 3.501061118467*^9}, {3.5010612022078*^9, 3.5010612277138*^9}, {3.5010616467766*^9, 3.5010617938534*^9}, { 3.5010618406222*^9, 3.5010619950778*^9}, {3.5010621500638*^9, 3.5010622514014*^9}, {3.5010625292218*^9, 3.5010625409374*^9}, { 3.5010626043046*^9, 3.5010626313862*^9}, {3.5010626787166*^9, 3.5010626790754004`*^9}, {3.501074457561*^9, 3.5010744671082*^9}, 3.5010763029458*^9, {3.5032210899309998`*^9, 3.5032212413900003`*^9}, { 3.557658203404973*^9, 3.557658219644601*^9}, {3.5576584433801947`*^9, 3.557658496030287*^9}, {3.5576585501779823`*^9, 3.5576586046064777`*^9}, { 3.557658648910555*^9, 3.557658754600741*^9}, {3.557658963945511*^9, 3.5576589782507353`*^9}, {3.557659009949991*^9, 3.5576591437514267`*^9}, { 3.557659182221094*^9, 3.5576592187719584`*^9}, 3.557659413865901*^9, { 3.557659921100792*^9, 3.5576599556392527`*^9}, {3.557660706920972*^9, 3.5576607248454037`*^9}, {3.557661209085854*^9, 3.557661209413454*^9}, { 3.5577526651911488`*^9, 3.5577526932087984`*^9}, {3.5577527272480583`*^9, 3.557752747122493*^9}, {3.5577528374934516`*^9, 3.557752838523053*^9}, { 3.557752881204728*^9, 3.557752891313546*^9}, {3.557752938612829*^9, 3.5577529469120436`*^9}, {3.557753060714244*^9, 3.557753062633047*^9}, { 3.5577536609544907`*^9, 3.5577536637936954`*^9}, {3.5577537824631042`*^9, 3.557753810184353*^9}, {3.557753841025607*^9, 3.5577540648392*^9}, 3.5577541920574236`*^9, {3.5577547033327217`*^9, 3.557754716967146*^9}, { 3.5577547716296415`*^9, 3.557754802112095*^9}, {3.5577549509363565`*^9, 3.5577549771444025`*^9}, 3.5577551382302856`*^9, {3.55775527184452*^9, 3.557755272858522*^9}, {3.557755881555991*^9, 3.557755886548*^9}, { 3.557756158316077*^9, 3.557756231885806*^9}, {3.5577572408487787`*^9, 3.557757248835993*^9}, {3.5577572834368534`*^9, 3.5577575888229895`*^9}, { 3.5577578129641833`*^9, 3.557757862837471*^9}, {3.557758025514557*^9, 3.557758079272251*^9}, 3.557810586960072*^9, {3.5578240262005973`*^9, 3.5578240345360737`*^9}, {3.557824091429328*^9, 3.5578241008156557`*^9}, { 3.557831525255726*^9, 3.5578315319793377`*^9}, 3.5578315716190076`*^9, { 3.557831606079468*^9, 3.557831629432709*^9}, {3.5578316663267736`*^9, 3.5578317569473333`*^9}, {3.5578322144181366`*^9, 3.557832218084143*^9}, { 3.557836356693412*^9, 3.557836473771618*^9}, {3.5578365201660995`*^9, 3.5578365974018345`*^9}, {3.5578366426731143`*^9, 3.557836658865943*^9}, { 3.557836691017599*^9, 3.5578367924957776`*^9}, {3.5578368305442443`*^9, 3.557836888279946*^9}, {3.5578369382156334`*^9, 3.5578370776642785`*^9}, { 3.5578383536061196`*^9, 3.5578383735117545`*^9}, {3.5578385892445335`*^9, 3.5578385978869486`*^9}, {3.5578386713006773`*^9, 3.557838700113928*^9}, { 3.5578387451200075`*^9, 3.5578387467892103`*^9}, {3.5578388951454706`*^9, 3.5578389248635225`*^9}, {3.5578389679351983`*^9, 3.557838983535226*^9}, { 3.5578390227692947`*^9, 3.557839023143696*^9}, {3.557839097696226*^9, 3.5578391125162525`*^9}, {3.5578391553539276`*^9, 3.557839199892006*^9}, { 3.55783924184048*^9, 3.557839294490572*^9}, {3.5578393285922318`*^9, 3.557839398683155*^9}, {3.557839430522811*^9, 3.557839470162481*^9}, { 3.5578395370865984`*^9, 3.5578395446994114`*^9}, {3.5578396068499207`*^9, 3.5578396118575296`*^9}, 3.5578943518105097`*^9, {3.557894388361374*^9, 3.5578944029629993`*^9}, {3.5578944607611012`*^9, 3.5578944989499683`*^9}, {3.5578945393696394`*^9, 3.557894561537278*^9}, { 3.5578946028617506`*^9, 3.5578946188985786`*^9}, {3.557894650894235*^9, 3.5578947812636642`*^9}, {3.55789481884413*^9, 3.5578948191249304`*^9}, { 3.5578949768100076`*^9, 3.5578949836272197`*^9}, {3.5578967386805477`*^9, 3.55789678549623*^9}, {3.5578968804691963`*^9, 3.557896888643611*^9}, { 3.557897022491846*^9, 3.5578970341450663`*^9}, {3.557897620940097*^9, 3.55789765120415*^9}, {3.5579218072271147`*^9, 3.5579218263059483`*^9}, { 3.557922095312821*^9, 3.557922116965659*^9}, {3.557922178086566*^9, 3.557922188616585*^9}, {3.5579223258812256`*^9, 3.557922327066828*^9}, { 3.5579224596046605`*^9, 3.557922461804264*^9}, 3.5579805928465395`*^9, { 3.5579815200581703`*^9, 3.557981541711009*^9}, 3.557985544779242*^9, { 3.5579863164793987`*^9, 3.5579863339514294`*^9}, {3.557986523210962*^9, 3.557986568841042*^9}, 3.5579866122559185`*^9, 3.557986993536188*^9, { 3.5579871244716187`*^9, 3.5579871290580263`*^9}, 3.557987173486905*^9, 3.5579872166989803`*^9, {3.5599618621582537`*^9, 3.5599618642486577`*^9}, { 3.559961969720443*^9, 3.5599619894700775`*^9}, 3.559963611089726*^9, { 3.5601298891258235`*^9, 3.560129889422224*^9}, {3.560132445157113*^9, 3.5601324458591146`*^9}, {3.561978472080926*^9, 3.561978472392926*^9}, { 3.6297802564412937`*^9, 3.6297802957377625`*^9}, {3.62978033369263*^9, 3.629780429741998*^9}, {3.6297805790030603`*^9, 3.6297809429048996`*^9}, { 3.629780987957779*^9, 3.629781197575347*^9}, {3.629781240397422*^9, 3.629781337663593*^9}, {3.6297813946972933`*^9, 3.6297814529165955`*^9}, { 3.6297814952550697`*^9, 3.629781527578326*^9}, {3.62978162025529*^9, 3.629781647633338*^9}, {3.629781678833393*^9, 3.629781763120341*^9}, 3.6297818028224106`*^9, {3.6297818432108817`*^9, 3.629781872570133*^9}, { 3.629782355765382*^9, 3.629782427603508*^9}, {3.6297824692243814`*^9, 3.629782674863942*^9}, {3.629782707218399*^9, 3.6297829295343895`*^9}, { 3.629783005631323*^9, 3.6297830574702144`*^9}, {3.6297831098551064`*^9, 3.629783142786764*^9}, {3.629783433711675*^9, 3.629783442619291*^9}, { 3.6297834942397814`*^9, 3.6297835175930223`*^9}, 3.6297835794939313`*^9, { 3.6297836160291953`*^9, 3.6297837668970604`*^9}, {3.6297842042438283`*^9, 3.6297842697483435`*^9}, {3.6297843514456873`*^9, 3.629784370742921*^9}, { 3.629784443829049*^9, 3.6297844678842916`*^9}, {3.6297845252611923`*^9, 3.629784525588793*^9}, {3.6297846136821475`*^9, 3.629784629235375*^9}, { 3.629784814797701*^9, 3.629784927648299*^9}, {3.629785259960083*^9, 3.6297852602096834`*^9}, {3.6297858780175686`*^9, 3.629785917282837*^9}, { 3.629786048057867*^9, 3.629786048681868*^9}, 3.6297863278755584`*^9, { 3.6297867047133856`*^9, 3.629786748533863*^9}, {3.6297867791567163`*^9, 3.6297868491540394`*^9}, {3.6297875320748396`*^9, 3.629787569795706*^9}, { 3.6297876247234025`*^9, 3.6297877281983843`*^9}, {3.6297877681812544`*^9, 3.629787774015665*^9}, {3.629787831408166*^9, 3.6297878355265727`*^9}, { 3.6297878775686464`*^9, 3.6297878861174617`*^9}, {3.6297879185343184`*^9, 3.629787919064719*^9}, {3.6297880043032694`*^9, 3.62978800470887*^9}, 3.6297880488257475`*^9, {3.6297882100052304`*^9, 3.6297882174776435`*^9}, { 3.6297882697533355`*^9, 3.6297882948381796`*^9}, {3.6297883467550707`*^9, 3.6297883991087627`*^9}, {3.6297887361785545`*^9, 3.629788783961438*^9}, 3.629788825395111*^9, {3.629789006152629*^9, 3.6297890321266747`*^9}, { 3.6297891133248167`*^9, 3.629789145336073*^9}, {3.6297891926821566`*^9, 3.629789194257759*^9}, {3.629789255316266*^9, 3.6297892556282673`*^9}, { 3.629869102295367*^9, 3.629869160124668*^9}, {3.6298691942887287`*^9, 3.6298696149902673`*^9}, {3.6298696993864155`*^9, 3.62986975897852*^9}, { 3.6298698387726603`*^9, 3.629869912030389*^9}, {3.6298700722270703`*^9, 3.629870234560955*^9}, {3.629870580429163*^9, 3.629870630458451*^9}, { 3.630556081081209*^9, 3.630556104902451*^9}, {3.6305562643503313`*^9, 3.6305562763935523`*^9}, {3.6305563415080667`*^9, 3.630556480956712*^9}, { 3.630556692851884*^9, 3.630556695347888*^9}, {3.630556730042349*^9, 3.630556914528273*^9}, {3.6305653725974936`*^9, 3.6305656807121167`*^9}, { 3.630565758760581*^9, 3.6305657739024467`*^9}, {3.630565858170267*^9, 3.63056596644846*^9}, {3.6305661502619734`*^9, 3.6305661523230915`*^9}, { 3.6305662653385553`*^9, 3.630566370352562*^9}, {3.6305667786019125`*^9, 3.630566790535595*^9}, {3.6305668214773645`*^9, 3.630567044691132*^9}, { 3.6305670772499943`*^9, 3.6305670783710585`*^9}, 3.630567272031135*^9, { 3.630567303902958*^9, 3.630567409875019*^9}, {3.630568671196477*^9, 3.6305687195002403`*^9}, {3.6305687542132254`*^9, 3.630568758623478*^9}, { 3.630568855671028*^9, 3.630568859250233*^9}, {3.630569706514694*^9, 3.630569775526641*^9}, 3.630569982346471*^9, {3.6305701679130845`*^9, 3.630570205199217*^9}, {3.6305703751399374`*^9, 3.630570526177576*^9}, { 3.630587657039589*^9, 3.630587688367381*^9}, {3.6305880733027773`*^9, 3.6305883365376396`*^9}, {3.6305886689118233`*^9, 3.6305886717978287`*^9}, 3.6305889776831656`*^9, {3.6305890389444733`*^9, 3.6305890437180815`*^9}, { 3.630589093248169*^9, 3.6305891296430326`*^9}, 3.630589181700324*^9, { 3.6305892509956455`*^9, 3.6305892594820604`*^9}, {3.630589318949365*^9, 3.6305893334729905`*^9}, {3.630589630294712*^9, 3.6305896376267247`*^9}, { 3.630589683288005*^9, 3.630589684988408*^9}, {3.630597310538067*^9, 3.630597340080757*^9}, {3.630597391446695*^9, 3.630597400596218*^9}, { 3.6305974350611897`*^9, 3.6305974605306463`*^9}, {3.630633997622449*^9, 3.630634003125764*^9}, {3.630659322217756*^9, 3.63065932438616*^9}, { 3.6306611578252783`*^9, 3.6306611625988865`*^9}, {3.6306612541554475`*^9, 3.630661257587454*^9}, {3.6306613001287284`*^9, 3.6306613026715326`*^9}, { 3.6306613920752897`*^9, 3.6306613949768953`*^9}, {3.6306706377509866`*^9, 3.630670654957817*^9}, {3.6306749981919994`*^9, 3.630675005793434*^9}, { 3.6306751229631357`*^9, 3.630675150017683*^9}, {3.6306752035287437`*^9, 3.6306752096180925`*^9}, {3.630675315921172*^9, 3.6306753201514144`*^9}, { 3.6306757793287754`*^9, 3.6306757796257925`*^9}, {3.630675814406262*^9, 3.6306758147026625`*^9}, {3.6306760107574763`*^9, 3.6306760154417443`*^9}, {3.6306789722320743`*^9, 3.6306789870309205`*^9}, {3.6306790257051325`*^9, 3.630679028076268*^9}, { 3.6306800259177256`*^9, 3.6306800406129513`*^9}, {3.6306801239326982`*^9, 3.6306801300167084`*^9}, {3.630680769261832*^9, 3.6306807806186523`*^9}, { 3.630681157468514*^9, 3.6306811577649145`*^9}, {3.6306812744219193`*^9, 3.63068127471832*^9}, {3.6306817187418995`*^9, 3.6306817919060287`*^9}, { 3.630681879188182*^9, 3.6306819111526375`*^9}, {3.6306821191790032`*^9, 3.6306821283050194`*^9}, {3.630720543651497*^9, 3.6307205534300566`*^9}, { 3.630721035525631*^9, 3.630721092774905*^9}, {3.6307212510439577`*^9, 3.6307213064777765`*^9}, {3.6307477437169704`*^9, 3.6307478284095197`*^9}, {3.6307478614971776`*^9, 3.6307478785948076`*^9}, {3.6307479884814005`*^9, 3.630748002880226*^9}, { 3.630748045624301*^9, 3.630748063876333*^9}, {3.630748111596817*^9, 3.6307481498324842`*^9}, {3.6307489182430334`*^9, 3.6307489447786803`*^9}, {3.630749037427243*^9, 3.6307490443848553`*^9}, { 3.6307491041485605`*^9, 3.6307491384218206`*^9}, {3.6307491914151134`*^9, 3.630749196890723*^9}, {3.6307492445800066`*^9, 3.6307493439989815`*^9}, { 3.630749396212273*^9, 3.6307494766304145`*^9}, {3.6307495333989143`*^9, 3.6307495547241516`*^9}, {3.6307496525831237`*^9, 3.630749669571553*^9}, { 3.630750220602922*^9, 3.6307502881822405`*^9}, {3.6307510631916018`*^9, 3.630751068292811*^9}, {3.6307511226589065`*^9, 3.630751137962533*^9}, { 3.6307512555243397`*^9, 3.630751282777588*^9}, {3.630752266971757*^9, 3.630752414599744*^9}, {3.630752446407563*^9, 3.630752457388191*^9}, { 3.6307589380050273`*^9, 3.6307590266300964`*^9}, {3.6307591666721067`*^9, 3.63075923229886*^9}, 3.630760288282259*^9, {3.6307603547370596`*^9, 3.630760557414652*^9}, {3.630760654134184*^9, 3.63076065510824*^9}, { 3.6307606911683025`*^9, 3.6307606919283457`*^9}, {3.6307607642334814`*^9, 3.6307607648645177`*^9}, {3.630761455000991*^9, 3.6307614616743727`*^9}, { 3.630761507825012*^9, 3.630761605776615*^9}, {3.630761652999316*^9, 3.630761695865768*^9}, {3.630761771278081*^9, 3.6307617792215357`*^9}, 3.6307629478424797`*^9, {3.632205207880766*^9, 3.6322052561155243`*^9}, { 3.6322052892474194`*^9, 3.6322052915745525`*^9}, 3.6322053746993074`*^9, { 3.6322062705415463`*^9, 3.6322062726016645`*^9}, {3.6322063396935015`*^9, 3.63220636484194*^9}, {3.6322064410612993`*^9, 3.6322064491667633`*^9}, { 3.632206580308264*^9, 3.6322066373275256`*^9}, {3.6322066736436024`*^9, 3.6322067467737856`*^9}, {3.632206782260815*^9, 3.6322071351279984`*^9}, 3.6322071989226465`*^9, {3.632207270393735*^9, 3.6322073359894867`*^9}, { 3.6322073997741346`*^9, 3.6322074126708727`*^9}, {3.632207491777397*^9, 3.632207682289294*^9}, {3.632207809621577*^9, 3.632207827973626*^9}, { 3.6322079043859973`*^9, 3.6322079279443445`*^9}, {3.6322080916397076`*^9, 3.6322081666649985`*^9}, 3.634905258940913*^9, {3.634905370524296*^9, 3.6349054089004903`*^9}, {3.6349054472556844`*^9, 3.63490544787272*^9}, { 3.634905483492757*^9, 3.6349055164646425`*^9}, {3.634905574352954*^9, 3.634905628121029*^9}, {3.6349057012822137`*^9, 3.6349057207913294`*^9}, { 3.6349061371061416`*^9, 3.634906354438572*^9}, {3.6349063890455513`*^9, 3.6349064369332905`*^9}, {3.634906537696054*^9, 3.634906601859724*^9}, 3.634906706128688*^9, {3.6349069249442034`*^9, 3.6349069328326545`*^9}, { 3.6349070151973653`*^9, 3.6349070242298822`*^9}, {3.6349070817921743`*^9, 3.6349070822111983`*^9}, {3.634907723288866*^9, 3.634907739005765*^9}, { 3.6349079580732946`*^9, 3.6349079868219395`*^9}, {3.634908200284148*^9, 3.634908315195721*^9}, {3.6349083774582825`*^9, 3.6349084027997313`*^9}, { 3.63490844507615*^9, 3.634908448843365*^9}, {3.634914956333157*^9, 3.634915020054802*^9}, {3.634915050572547*^9, 3.6349150956171236`*^9}, { 3.6349539785771523`*^9, 3.634953978975175*^9}, {3.6349540728785458`*^9, 3.6349541681829967`*^9}, {3.634954211263461*^9, 3.6349542495746527`*^9}, { 3.6349543251259737`*^9, 3.634954355882733*^9}, {3.6349543892536416`*^9, 3.6349544742835045`*^9}, {3.634954547519694*^9, 3.6349545640246377`*^9}, { 3.6349547051657104`*^9, 3.6349547107930326`*^9}, {3.634954745355009*^9, 3.634954752101395*^9}, {3.6349547948858423`*^9, 3.6349548053894434`*^9}, { 3.634954904907135*^9, 3.6349549451084347`*^9}, {3.634955219605135*^9, 3.6349552640926795`*^9}, {3.634955320189888*^9, 3.634955348763522*^9}, { 3.634955386393675*^9, 3.6349555039273973`*^9}, {3.6349557669644423`*^9, 3.6349557672004557`*^9}, {3.634955894841756*^9, 3.634955902578199*^9}, { 3.6349559513739896`*^9, 3.6349560216320086`*^9}, {3.634956120144643*^9, 3.634956128996149*^9}, {3.6349561700724983`*^9, 3.6349561978900895`*^9}, { 3.6349562480719595`*^9, 3.634956254326318*^9}, {3.634956331684742*^9, 3.6349563460575643`*^9}, {3.634956379242462*^9, 3.63495642676418*^9}, 3.6349564696636343`*^9, {3.6351524116477795`*^9, 3.6351524153379908`*^9}, { 3.6352134400282927`*^9, 3.635213442148414*^9}, {3.6352134745862694`*^9, 3.635213495869487*^9}, {3.6352135383409157`*^9, 3.6352137157160616`*^9}, { 3.6352137493569856`*^9, 3.635213764522853*^9}, {3.635214215036621*^9, 3.635214227593339*^9}, {3.635214407257615*^9, 3.63521441713218*^9}, { 3.635215297101512*^9, 3.635215303964904*^9}, {3.6352154111120324`*^9, 3.635215431504199*^9}, {3.635216346055508*^9, 3.635216494371991*^9}, { 3.635216631050809*^9, 3.6352166603244834`*^9}, {3.635216763034358*^9, 3.635216764164423*^9}, {3.6352168771938877`*^9, 3.635216888828553*^9}, 3.6352169832479534`*^9, 3.635217037668066*^9, {3.6352172024924936`*^9, 3.6352172054526625`*^9}, {3.635217344025589*^9, 3.635217346898753*^9}, 3.6352173863770113`*^9, {3.635217519639633*^9, 3.6352175507014103`*^9}, 3.635217615445113*^9, {3.6352178715087595`*^9, 3.635217880460271*^9}, { 3.6352185912849283`*^9, 3.635218598444338*^9}, {3.6352186995721216`*^9, 3.635218714955002*^9}, {3.6352189761749425`*^9, 3.6352189789341*^9}, { 3.6352195060322485`*^9, 3.635219509972474*^9}, 3.6352195673477554`*^9, 3.6352195994635925`*^9, {3.6352197336482677`*^9, 3.635219737452485*^9}, { 3.6352197706093817`*^9, 3.6352197723214793`*^9}, {3.635219941784172*^9, 3.6352199485115566`*^9}, {3.6352200714185867`*^9, 3.6352200854323883`*^9}, {3.6352202085694313`*^9, 3.635220235849992*^9}, { 3.6352202816336107`*^9, 3.6352203110962954`*^9}, {3.6352204980449886`*^9, 3.6352205276526823`*^9}, {3.6352253191447396`*^9, 3.6352253299913597`*^9}, {3.6352253611111403`*^9, 3.6352253637572913`*^9}, {3.635225409322898*^9, 3.6352255965196047`*^9}, { 3.6352260914249115`*^9, 3.6352261698393965`*^9}, {3.63522638233055*^9, 3.6352264188036366`*^9}, {3.635227493469104*^9, 3.635227556935734*^9}, { 3.6352276745764627`*^9, 3.635227730116639*^9}, {3.6352287979917183`*^9, 3.6352288587651944`*^9}, {3.635228894237223*^9, 3.635228948324317*^9}, { 3.635229365252164*^9, 3.6352293902275925`*^9}, {3.63522947690555*^9, 3.6352294807837715`*^9}, {3.6352492831123204`*^9, 3.6352492983621926`*^9}, 3.6356569054520617`*^9, {3.6363778004499054`*^9, 3.636377802787039*^9}, { 3.6363778414932528`*^9, 3.6363778525308843`*^9}, {3.636384436335312*^9, 3.6363846409950175`*^9}, {3.636384971250907*^9, 3.6363849738080535`*^9}, { 3.6363850170465264`*^9, 3.636385030729309*^9}, {3.6363851286779118`*^9, 3.636385138359465*^9}, {3.6363851699712734`*^9, 3.636385223111313*^9}, { 3.656076172452749*^9, 3.656076182171566*^9}, {3.6560765578514256`*^9, 3.656076619019133*^9}, 3.6560772545486493`*^9, {3.6630719749029694`*^9, 3.6630719878027077`*^9}, {3.6630720702554235`*^9, 3.6630720807290225`*^9}, {3.6630721155740156`*^9, 3.6630721713712068`*^9}, {3.663072270834896*^9, 3.6630722882218904`*^9}, 3.6630724099968557`*^9, {3.685234767958906*^9, 3.685234768480936*^9}, { 3.685252204033695*^9, 3.6852522340537376`*^9}, {3.6852522757137957`*^9, 3.6852523115138454`*^9}, {3.68525376314359*^9, 3.6852537725041256`*^9}, { 3.6852539763277836`*^9, 3.6852539861693463`*^9}, 3.6852540682470407`*^9, 3.6852541660656357`*^9, {3.6852604801645336`*^9, 3.6852605060345697`*^9}, { 3.6852605373446136`*^9, 3.6852605977846985`*^9}, 3.685260655254779*^9, { 3.6853280002218475`*^9, 3.685328019561875*^9}, 3.685328064721938*^9, { 3.6853280953119807`*^9, 3.6853282636022167`*^9}, {3.685328356242346*^9, 3.685328598671985*^9}, {3.6853286682069626`*^9, 3.6853287982524004`*^9}, { 3.6853288753368096`*^9, 3.6853289367033195`*^9}, {3.685328968274125*^9, 3.685328978713722*^9}, {3.685329033941881*^9, 3.685329044950511*^9}, { 3.685329173522865*^9, 3.6853294420842257`*^9}, {3.6853296024223967`*^9, 3.6853296124319687`*^9}, {3.6853297221712456`*^9, 3.685329733349885*^9}, { 3.6853298076291337`*^9, 3.6853298739599276`*^9}, {3.685330038474337*^9, 3.685330051652091*^9}, {3.6853311309428225`*^9, 3.685331168378964*^9}, { 3.685340142134763*^9, 3.685340180544817*^9}, {3.6853583292043543`*^9, 3.685358334834362*^9}, {3.685358366084406*^9, 3.685358366954407*^9}, { 3.685358408404465*^9, 3.685358518294619*^9}, 3.685358620174762*^9, 3.6853586578748145`*^9, {3.6853588750151186`*^9, 3.6853588857151337`*^9}, { 3.6853589302051954`*^9, 3.685358938995208*^9}, {3.685359014715314*^9, 3.6853590296653347`*^9}, 3.685359148315501*^9, 3.6853598281764526`*^9, { 3.6853683109000263`*^9, 3.685368382250126*^9}, {3.685368420160179*^9, 3.6853684704302497`*^9}, {3.6853685194503183`*^9, 3.685368742860631*^9}, { 3.685369008901004*^9, 3.68536902061102*^9}, {3.6853690791611023`*^9, 3.685369132301176*^9}, {3.6853693219914417`*^9, 3.6853693304114532`*^9}, 3.6853696089118433`*^9, {3.6858758911429157`*^9, 3.685875951793*^9}, { 3.6859484099082212`*^9, 3.6859484970032024`*^9}, {3.686052829875022*^9, 3.686052906242383*^9}, {3.6860535326822133`*^9, 3.686053598029951*^9}, { 3.68605365168902*^9, 3.6860541446091995`*^9}, {3.6860541846064873`*^9, 3.68605440393201*^9}, {3.686054713802734*^9, 3.6860547858298535`*^9}, { 3.6860548280202665`*^9, 3.686054837219793*^9}, {3.686054874127904*^9, 3.686054892139934*^9}, {3.686055136014883*^9, 3.6860551460584574`*^9}, { 3.686055211281188*^9, 3.6860552301962633`*^9}, {3.6860553465409174`*^9, 3.6860553998749685`*^9}, {3.6860556017188663`*^9, 3.6860556050188704`*^9}, {3.6862923512707715`*^9, 3.686292363600789*^9}, { 3.686292409650853*^9, 3.6862924109708548`*^9}, {3.6862924536109147`*^9, 3.6862924596309233`*^9}, {3.686292542221039*^9, 3.6862925430110397`*^9}, { 3.686292988803664*^9, 3.686293001033681*^9}, {3.6866504529025555`*^9, 3.686650526682659*^9}, {3.686650671852862*^9, 3.6866507242929354`*^9}, { 3.6866507657529936`*^9, 3.6866507887630253`*^9}, {3.6866508208230705`*^9, 3.6866509100531955`*^9}, {3.6866509593932643`*^9, 3.686650971113281*^9}, { 3.686651007793332*^9, 3.6866511595335445`*^9}, {3.686651223513634*^9, 3.686651234033649*^9}, {3.686651304763748*^9, 3.6866513363837924`*^9}, { 3.6866514102038956`*^9, 3.686651429943923*^9}, {3.686652993837468*^9, 3.6866530046274834`*^9}, {3.686804398511652*^9, 3.6868044081516657`*^9}, { 3.6868046315619783`*^9, 3.686804631801979*^9}, {3.686804685872054*^9, 3.686804707092084*^9}, {3.6868047382021275`*^9, 3.686804767812169*^9}, { 3.686804824012248*^9, 3.6868048404922705`*^9}, {3.686804942142413*^9, 3.6868049633424425`*^9}, {3.6868050765526013`*^9, 3.686805101092636*^9}, { 3.6868051463526993`*^9, 3.6868052234228067`*^9}, {3.686805307602925*^9, 3.686805311682931*^9}, {3.68680577547358*^9, 3.686805788923599*^9}, { 3.686821702197342*^9, 3.6868217282873783`*^9}, {3.6868225192884855`*^9, 3.686822538368512*^9}, {3.6868226306886415`*^9, 3.6868226683086944`*^9}, { 3.6868227318887835`*^9, 3.6868227627088265`*^9}, {3.686822801638881*^9, 3.6868230490692277`*^9}, {3.686823122979331*^9, 3.6868231833294153`*^9}, { 3.6868232450595016`*^9, 3.6868233753996844`*^9}, {3.6868234153897405`*^9, 3.686823451379791*^9}, {3.6868236736101017`*^9, 3.6868236786601086`*^9}, { 3.6868237164601617`*^9, 3.68682375072021*^9}, {3.68682389396041*^9, 3.68682390087042*^9}, {3.686823940790476*^9, 3.6868239416904774`*^9}, { 3.6868239808805323`*^9, 3.6868239872905407`*^9}, {3.686824051540631*^9, 3.6868240519006314`*^9}, {3.686824360861064*^9, 3.6868243761510854`*^9}, { 3.6868245440213203`*^9, 3.686824577221367*^9}, {3.686824685841519*^9, 3.6868246979115357`*^9}, 3.6868248012716804`*^9, 3.6868253582724605`*^9, { 3.6868255183026843`*^9, 3.686825518932685*^9}, {3.6868264466639843`*^9, 3.6868264497139883`*^9}, {3.6868267792744493`*^9, 3.6868268152945004`*^9}, {3.686827100164899*^9, 3.6868271210549283`*^9}, 3.686827162004986*^9, {3.6868272414950967`*^9, 3.686827327475217*^9}, { 3.686827953126093*^9, 3.686827976506126*^9}, {3.686829128577739*^9, 3.686829138957753*^9}, 3.6868292410978966`*^9, {3.6868292768379464`*^9, 3.686829282727955*^9}, {3.6868293820380936`*^9, 3.686829418138144*^9}, { 3.686829846748744*^9, 3.686829848298746*^9}, {3.6868313063207874`*^9, 3.686831307180789*^9}, {3.6868331276633377`*^9, 3.68683328653356*^9}, { 3.6868394697195063`*^9, 3.6868394933895392`*^9}, 3.686839530999592*^9, { 3.686839582829664*^9, 3.68683963686974*^9}, {3.6868397551199055`*^9, 3.68683979365996*^9}, {3.6868398344600167`*^9, 3.686839866200061*^9}, { 3.687092084401948*^9, 3.687092117031994*^9}, {3.6870922598621936`*^9, 3.6870922645422*^9}, {3.6870962086478376`*^9, 3.6870962658779182`*^9}, 3.687096444838168*^9, {3.687096500978247*^9, 3.687096501638248*^9}, { 3.6870965809883595`*^9, 3.687096592708376*^9}, 3.687096837948719*^9, { 3.68709688890879*^9, 3.687096985798926*^9}, {3.6870971015990877`*^9, 3.6870972179192505`*^9}, {3.6870972618993125`*^9, 3.687097305639374*^9}, { 3.6870973356794157`*^9, 3.6870975186496716`*^9}, {3.6870975796097574`*^9, 3.6870975953197794`*^9}, {3.6870976531898603`*^9, 3.6870976848899045`*^9}, 3.6870977782500353`*^9, {3.687413757687042*^9, 3.6874137834070783`*^9}, { 3.6874140542074575`*^9, 3.687414094417514*^9}, {3.6874143478878684`*^9, 3.687414485538061*^9}, {3.6874146116082373`*^9, 3.68741464894829*^9}, { 3.6874147451084247`*^9, 3.687414766118454*^9}, 3.6874149094486547`*^9, { 3.6874150416688395`*^9, 3.6874150634888706`*^9}, {3.6874152437091227`*^9, 3.687415268869158*^9}, 3.6874153442892637`*^9, {3.687415449879411*^9, 3.687415469659439*^9}, 3.687415529739523*^9, 3.687415564789572*^9, 3.687415645529685*^9, {3.6874168016913037`*^9, 3.687416803441306*^9}, { 3.687421022677213*^9, 3.6874212686075573`*^9}, {3.68742948209425*^9, 3.6874294906842623`*^9}, {3.687844340668378*^9, 3.6878443698084188`*^9}, { 3.6886534778571014`*^9, 3.6886534911571198`*^9}, {3.688906380162199*^9, 3.6889064680223217`*^9}, {3.688906514222396*^9, 3.6889065193925257`*^9}, { 3.688908192623024*^9, 3.6889082006430354`*^9}, {3.688908261823121*^9, 3.688908271653135*^9}, {3.6889083776232834`*^9, 3.6889083922733035`*^9}, { 3.688908466073407*^9, 3.6889084993734536`*^9}, 3.688908533623502*^9, { 3.688908616683618*^9, 3.6889086271336327`*^9}, {3.6889086885637183`*^9, 3.6889087063437433`*^9}, {3.6889091647443852`*^9, 3.6889092012544365`*^9}, {3.6889093019045773`*^9, 3.6889093406746316`*^9}, 3.6889101071957045`*^9, {3.689905940063133*^9, 3.689905972983179*^9}, { 3.692530981927737*^9, 3.6925310416778207`*^9}, {3.692531099797902*^9, 3.6925311384779563`*^9}, {3.692531192258032*^9, 3.692531244668105*^9}, { 3.6925312919881716`*^9, 3.692531425418358*^9}, {3.6925315270885005`*^9, 3.692531643928664*^9}, {3.692535489534048*^9, 3.6925356485142703`*^9}, { 3.692535753564418*^9, 3.6925357992544813`*^9}, {3.6925358831745987`*^9, 3.692535899604622*^9}, {3.692536042584822*^9, 3.692536159384986*^9}, { 3.6925366121156197`*^9, 3.6925366207256317`*^9}, {3.6925367265057793`*^9, 3.69253672683578*^9}, {3.6925368590559654`*^9, 3.6925368636559715`*^9}, { 3.6925370880062857`*^9, 3.692537177856412*^9}, {3.692537322456614*^9, 3.6925373869767046`*^9}, {3.6925390913352747`*^9, 3.6925390925252767`*^9}, {3.692539644430175*^9, 3.6925396711502123`*^9}, { 3.692539727510291*^9, 3.692539730440295*^9}, {3.69253993367058*^9, 3.692539963780622*^9}, {3.6925400018406754`*^9, 3.692540003630678*^9}, { 3.6925401743409166`*^9, 3.6925401747509174`*^9}, {3.692540399111232*^9, 3.692540407981244*^9}, {3.69254047647134*^9, 3.6925404886113567`*^9}, { 3.6925406039715185`*^9, 3.69254060531152*^9}, {3.6925414948727655`*^9, 3.6925414953427663`*^9}, {3.6925415478528395`*^9, 3.692541613062931*^9}, 3.692541649332982*^9, {3.692541727633092*^9, 3.6925418840133104`*^9}, { 3.692541924473367*^9, 3.692542041693531*^9}, {3.6925421488836813`*^9, 3.6925422549438295`*^9}, {3.6925422976938896`*^9, 3.692542521444203*^9}, { 3.6925426221843443`*^9, 3.6925426357343626`*^9}, 3.692542739374508*^9, 3.692599799510878*^9, {3.692599834884901*^9, 3.6925998954663663`*^9}, { 3.692599925635092*^9, 3.6926000095928946`*^9}, {3.692600108929576*^9, 3.6926001456386757`*^9}, {3.6926001874800687`*^9, 3.692600454421337*^9}, { 3.692600503149027*^9, 3.6926006000391626`*^9}, {3.692600680251275*^9, 3.6926006814012766`*^9}, {3.6926009000215826`*^9, 3.6926009410816402`*^9}, 3.692601280532116*^9, {3.6926044914726114`*^9, 3.69260449774262*^9}, 3.6926045660127153`*^9, 3.6926046690228596`*^9, {3.69296647863291*^9, 3.6929664798829117`*^9}, {3.6929665643330297`*^9, 3.6929666141830997`*^9}, {3.6929670390036945`*^9, 3.6929670405536966`*^9}, {3.6929670861037607`*^9, 3.6929670952937737`*^9}, {3.6929671302538223`*^9, 3.6929671549438567`*^9}, {3.6929671904739065`*^9, 3.69296722137395*^9}, { 3.6929672596240034`*^9, 3.6929673352541094`*^9}, 3.6929678909232683`*^9, { 3.6930146982034283`*^9, 3.693014722713463*^9}, {3.6930148540136466`*^9, 3.693014857023651*^9}, {3.6930148913836985`*^9, 3.693014894823704*^9}, { 3.693014930903754*^9, 3.6930151942541227`*^9}, {3.693015247824198*^9, 3.693015430554454*^9}, {3.693015673794794*^9, 3.69301579223496*^9}, { 3.6930163123576884`*^9, 3.693016326897709*^9}, {3.6930164225678425`*^9, 3.693016429727853*^9}, {3.693016686718212*^9, 3.693016698128228*^9}, { 3.693016737038283*^9, 3.693016755068308*^9}, {3.6930168429225607`*^9, 3.6930168719926014`*^9}, {3.6930172049430676`*^9, 3.693017284063178*^9}, { 3.693017336433252*^9, 3.6930173662532935`*^9}, {3.6930180949163136`*^9, 3.6930180975563173`*^9}, {3.6930181870764427`*^9, 3.693018199956461*^9}, { 3.6930182954065943`*^9, 3.693018305996609*^9}, {3.693139886141657*^9, 3.6931399045016823`*^9}, {3.6931402916003532`*^9, 3.693140295770359*^9}, { 3.693140426020541*^9, 3.693140426530542*^9}, {3.6931410492237864`*^9, 3.6931410888738413`*^9}, {3.6931411194438844`*^9, 3.693141126553894*^9}, { 3.693141412004294*^9, 3.693141454164353*^9}, {3.6931415979955544`*^9, 3.6931417931758275`*^9}, {3.6932199559445915`*^9, 3.6932199772046213`*^9}, {3.6932201435748544`*^9, 3.693220170284892*^9}, { 3.693220713855653*^9, 3.693220721825664*^9}, {3.693625124589745*^9, 3.693625153729786*^9}, {3.6940907995669713`*^9, 3.6940909688872085`*^9}, { 3.6940913675677667`*^9, 3.6940914223978434`*^9}, {3.694091508037963*^9, 3.694091572118053*^9}, 3.694092009628666*^9, {3.6940920553287296`*^9, 3.694092229168973*^9}, {3.6940923053990793`*^9, 3.694092374419176*^9}, { 3.6940924537392874`*^9, 3.694092457789293*^9}, 3.694092642849552*^9, { 3.6940928573598523`*^9, 3.694092862379859*^9}, {3.6940945886222763`*^9, 3.694094601932295*^9}, 3.694094849542641*^9, {3.694095764293922*^9, 3.6940957644739223`*^9}, {3.6940960602743363`*^9, 3.6940960732243547`*^9}, {3.6940961211044216`*^9, 3.694096124194426*^9}, { 3.694665030960044*^9, 3.6946650634500895`*^9}, {3.6946652071402903`*^9, 3.6946653490404887`*^9}, {3.6946658702212186`*^9, 3.6946658881212435`*^9}, {3.694665923041292*^9, 3.694665953561335*^9}, { 3.694665995981395*^9, 3.6946660149414215`*^9}, {3.694666050571471*^9, 3.6946660547214766`*^9}, {3.694666169991638*^9, 3.694666292151809*^9}, { 3.6946663456618843`*^9, 3.6946663943919525`*^9}, 3.6946667526224537`*^9, 3.69466680700253*^9, 3.694687076625702*^9, {3.6946874316161985`*^9, 3.6946874621962414`*^9}, 3.694687499496294*^9, {3.694687567516389*^9, 3.694687642816495*^9}, {3.694687679006545*^9, 3.6946877198966026`*^9}, { 3.6946877714966745`*^9, 3.694687931746899*^9}, {3.723798739728607*^9, 3.723798744014243*^9}, {3.7237990126446104`*^9, 3.723799023974499*^9}, { 3.7244116671877546`*^9, 3.7244116733393917`*^9}, {3.724411761793063*^9, 3.7244117718753977`*^9}, {3.724411928386671*^9, 3.7244119682966137`*^9}, { 3.724412131847311*^9, 3.724412188341254*^9}, {3.729414981357122*^9, 3.7294149861075096`*^9}, {3.749817651293678*^9, 3.749817653108206*^9}, { 3.7498176831919456`*^9, 3.7498176846222315`*^9}, 3.7498177601545563`*^9, { 3.749817859674735*^9, 3.749817861044999*^9}, {3.7498179561547127`*^9, 3.749817964489929*^9}, {3.749818149334386*^9, 3.749818237397959*^9}, 3.749818617867873*^9, {3.7505621848002787`*^9, 3.7505622174085107`*^9}, { 3.75056238761455*^9, 3.750562431347901*^9}, {3.7505626332829456`*^9, 3.7505627331565337`*^9}, {3.7505627632642183`*^9, 3.7505627635859113`*^9}, {3.7515359581577415`*^9, 3.7515359614850826`*^9}, {3.751536071974715*^9, 3.7515360961721487`*^9}, 3.7515362040373974`*^9, {3.751536256080162*^9, 3.7515365099108534`*^9}, { 3.751549231137398*^9, 3.7515493334258356`*^9}, {3.7515496891619573`*^9, 3.751549689458767*^9}, 3.753020403650548*^9, {3.7530205114189386`*^9, 3.753020525224822*^9}, {3.753021995594639*^9, 3.753022011512741*^9}, { 3.760634689749445*^9, 3.7606348247488756`*^9}, {3.7606349119783344`*^9, 3.7606349350197754`*^9}, {3.76063496856853*^9, 3.7606349922504683`*^9}, { 3.760667269592998*^9, 3.760667271545692*^9}, 3.7606679283912125`*^9, 3.760668039709257*^9, {3.763302716900259*^9, 3.763302749083943*^9}, { 3.763304867499642*^9, 3.7633048681948185`*^9}, {3.763337978730939*^9, 3.763338014197137*^9}, {3.763338054806819*^9, 3.7633381289118147`*^9}, { 3.763338224472745*^9, 3.7633382447254143`*^9}, 3.763338501519575*^9, { 3.7633387342733064`*^9, 3.763338775483101*^9}, {3.7633388525735607`*^9, 3.7633390131554184`*^9}, {3.763360596353942*^9, 3.7633606328922167`*^9}, { 3.7633606638773637`*^9, 3.763360724941125*^9}, {3.763360812068123*^9, 3.763360863571327*^9}, {3.763361217769263*^9, 3.763361243271195*^9}, { 3.763361578316657*^9, 3.7633615820345063`*^9}, {3.763362291476118*^9, 3.763362301380039*^9}, {3.763362505004878*^9, 3.763362606421646*^9}, { 3.763362742167684*^9, 3.7633627524126663`*^9}, {3.7633628090243473`*^9, 3.763362931819517*^9}, 3.7633630680313087`*^9, {3.76336360941794*^9, 3.7633636782369685`*^9}, {3.763363813698273*^9, 3.763363822992702*^9}, { 3.7633837714269123`*^9, 3.763383775708086*^9}, {3.7633839861442327`*^9, 3.7633839966350546`*^9}, {3.7633846907375526`*^9, 3.76338471098131*^9}, 3.763426089635152*^9, {3.7634262143520336`*^9, 3.7634262475470448`*^9}, { 3.7634276458524485`*^9, 3.7634276705117846`*^9}, {3.7634292721860075`*^9, 3.7634292840439587`*^9}, {3.76352820463631*^9, 3.7635282147939873`*^9}, { 3.763528430960533*^9, 3.7635284413250494`*^9}, {3.7635285114344244`*^9, 3.763528537124817*^9}, {3.763528653934307*^9, 3.7635286747218256`*^9}, { 3.7635486952594075`*^9, 3.763548696007099*^9}, {3.7639579130072594`*^9, 3.7639579464687676`*^9}, {3.763957980699315*^9, 3.7639580928074217`*^9}, { 3.763959813173403*^9, 3.7639598134702053`*^9}, {3.7639608015345135`*^9, 3.7639608287155933`*^9}, {3.7645603385872726`*^9, 3.764560365934222*^9}, { 3.76456061596602*^9, 3.76456062636983*^9}, {3.7647257988231063`*^9, 3.7647258025896564`*^9}, {3.765077713031946*^9, 3.7650777913378534`*^9}, { 3.7740698865922914`*^9, 3.774069989744633*^9}, {3.7740700982535834`*^9, 3.774070098487667*^9}, {3.7740701415628414`*^9, 3.7740702370647106`*^9}, { 3.77407029325229*^9, 3.7740703348543596`*^9}, {3.774070397587008*^9, 3.774070454974152*^9}, {3.7740709929610343`*^9, 3.7740710067172923`*^9}, { 3.775190474681038*^9, 3.7751904884151363`*^9}, {3.7751905901325903`*^9, 3.775190642609686*^9}, 3.775190717712206*^9, {3.7751956728394384`*^9, 3.7751957010601625`*^9}, 3.7751957418100777`*^9, {3.7751958741450567`*^9, 3.775195882844048*^9}, {3.7751959530858574`*^9, 3.775196055684782*^9}, { 3.7836566506037264`*^9, 3.783656699859296*^9}, {3.783834162184903*^9, 3.7838342075157394`*^9}, {3.7838342453955064`*^9, 3.7838342564437876`*^9}, {3.783834288539219*^9, 3.783834289188504*^9}, { 3.783834319888338*^9, 3.783834404011998*^9}, {3.783835274452033*^9, 3.783835643262226*^9}, 3.783835673435833*^9, {3.783837186915415*^9, 3.783837252940491*^9}, 3.783838076793089*^9, {3.7838387026691084`*^9, 3.7838387106794033`*^9}, {3.7838387751330376`*^9, 3.78383877586726*^9}, 3.7885184612710266`*^9, {3.7885197610115976`*^9, 3.788519761667694*^9}, { 3.788519815581788*^9, 3.788519877459923*^9}, {3.788519910619506*^9, 3.7885199214314795`*^9}, {3.78852990807364*^9, 3.78852991935472*^9}, { 3.788529949778452*^9, 3.7885299511123505`*^9}, 3.7885729856546545`*^9, { 3.795769635061987*^9, 3.7957696738473544`*^9}, {3.7957698528454103`*^9, 3.795769867081932*^9}, {3.7963499268904905`*^9, 3.796349974573367*^9}, { 3.8116565658363085`*^9, 3.811656579625844*^9}, {3.8116566792733173`*^9, 3.811656696847624*^9}, {3.819778974172573*^9, 3.819778996370713*^9}, { 3.819779237456471*^9, 3.819779375493654*^9}, {3.819779556474127*^9, 3.8197797185600586`*^9}, 3.8200272939729*^9, 3.8200273875005593`*^9, 3.820027421880412*^9, {3.8200275035350485`*^9, 3.8200275049354267`*^9}, { 3.8216146854806337`*^9, 3.8216146951363287`*^9}, {3.8216147521969256`*^9, 3.8216148295973682`*^9}}, CellLabel-> "In[157]:=",ExpressionUUID->"a61aa1e5-6c40-42e7-970e-48534fc1b8b4"] }, Closed]], Cell[CellGroupData[{ Cell["BEAM ELEMENT (disp ++) defs ", "Subsection", CellChangeTimes->{{3.5579867801590133`*^9, 3.557986782249417*^9}, { 3.7530188279461737`*^9, 3.75301883733206*^9}, {3.7878948627741256`*^9, 3.787894875357033*^9}, {3.8216145697031803`*^9, 3.821614594102014*^9}},ExpressionUUID->"3f6bc05e-9d59-4b45-adb6-\ 280037b626c8"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"CURVEDBEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "II_"}], "}"}], ",", RowBox[{"{", RowBox[{"fs_", ",", "fn_", ",", "fb_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_"}], "}"}]}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r", ",", "dr", ",", "h", ",", "es", ",", "en", ",", "eb", ",", "\[Delta]W", ",", "rule", ",", "KK", ",", "FF", ",", "R"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "needs", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Zeta]"}], ")"}], "*", RowBox[{"(", RowBox[{"1", "-", RowBox[{"2", "\[Zeta]"}]}], ")"}]}], ",", RowBox[{"4", RowBox[{"(", RowBox[{"1", "-", "\[Zeta]"}], ")"}], "*", "\[Zeta]"}], ",", RowBox[{"\[Zeta]", "*", RowBox[{"(", RowBox[{ RowBox[{"2", "\[Zeta]"}], "-", "1"}], ")"}]}]}], "}"}], ".", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "1"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I2", ",", "1"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I3", ",", "1"}], "]"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dr", "=", RowBox[{"D", "[", RowBox[{"r", ",", "\[Zeta]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"hh", "=", RowBox[{"Sqrt", "[", RowBox[{"dr", ".", "dr"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"h", "=", RowBox[{"Abs", "[", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{"hh", " ", "/.", RowBox[{"\[Zeta]", "\[Rule]", "0"}]}], ")"}], "+", RowBox[{"4", RowBox[{"(", RowBox[{"hh", " ", "/.", RowBox[{"\[Zeta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], ")"}]}], "+", RowBox[{"(", RowBox[{"hh", " ", "/.", RowBox[{"\[Zeta]", "\[Rule]", "1."}]}], ")"}]}], ")"}], "/", "6"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"es", " ", "=", RowBox[{"dr", "/", "hh"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", " ", "=", RowBox[{ RowBox[{"D", "[", RowBox[{"es", ",", "\[Zeta]"}], "]"}], "/", "hh"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]b", "=", RowBox[{"Sqrt", "[", RowBox[{"en", ".", "en"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"en", "/", "\[Kappa]b"}]}], ";", "\[IndentingNewLine]", RowBox[{"eb", " ", "=", " ", RowBox[{"es", "\[Cross]", "en"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"basis", "=", RowBox[{ RowBox[{"{", RowBox[{"es", ",", "en", ",", "eb"}], "}"}], " ", "/.", RowBox[{"\[Zeta]", "\[Rule]", RowBox[{"1", "/", "2."}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"basis1", "=", RowBox[{ RowBox[{"{", RowBox[{"es", ",", "en", ",", "eb"}], "}"}], " ", "/.", RowBox[{"\[Zeta]", "\[Rule]", "0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"basis2", "=", RowBox[{ RowBox[{"{", RowBox[{"es", ",", "en", ",", "eb"}], "}"}], " ", "/.", RowBox[{"\[Zeta]", "\[Rule]", "1"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"R", "=", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{"1", "/", "\[Kappa]b"}], ")"}], "/.", " ", RowBox[{"\[Zeta]", "\[Rule]", RowBox[{"1", "/", "2."}]}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "needs", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]rule", " ", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"a", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"\[Delta]a", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"b", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"\[Delta]b", "[", "any", "]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"us", "[", "1", "]"}], ",", RowBox[{"un", "[", "1", "]"}], ",", RowBox[{"ub", "[", "1", "]"}]}], "}"}], "=", RowBox[{"basis1", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"us", "[", "2", "]"}], ",", RowBox[{"un", "[", "2", "]"}], ",", RowBox[{"ub", "[", "2", "]"}]}], "}"}], "=", RowBox[{"basis2", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I3", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[CapitalTheta]s", "[", "1", "]"}], ",", RowBox[{"\[CapitalTheta]n", "[", "1", "]"}], ",", RowBox[{"\[CapitalTheta]b", "[", "1", "]"}]}], "}"}], "=", RowBox[{"basis1", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[CapitalTheta]s", "[", "2", "]"}], ",", RowBox[{"\[CapitalTheta]n", "[", "2", "]"}], ",", RowBox[{"\[CapitalTheta]b", "[", "2", "]"}]}], "}"}], "=", RowBox[{"basis2", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I3", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"aa", "=", RowBox[{"{", RowBox[{ RowBox[{"us", "[", "1", "]"}], ",", RowBox[{"un", "[", "1", "]"}], ",", RowBox[{"ub", "[", "1", "]"}], ",", RowBox[{"\[CapitalTheta]s", "[", "1", "]"}], ",", RowBox[{"\[CapitalTheta]n", "[", "1", "]"}], ",", RowBox[{"\[CapitalTheta]b", "[", "1", "]"}], ",", RowBox[{"us", "[", "2", "]"}], ",", RowBox[{"un", "[", "2", "]"}], ",", RowBox[{"ub", "[", "2", "]"}], ",", RowBox[{"\[CapitalTheta]s", "[", "2", "]"}], ",", RowBox[{"\[CapitalTheta]n", "[", "2", "]"}], ",", RowBox[{"\[CapitalTheta]b", "[", "2", "]"}]}], "}"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]aa", "=", RowBox[{"aa", " ", "/.", "\[Delta]rule"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"ELEMENT", " ", "CONTRIBUTION"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], " ", "\[IndentingNewLine]", RowBox[{"KK", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"2", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"6", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"EE", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"GG", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{ "16", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{ "2", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "-", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "-", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"EE", " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"GG", " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"5", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"3", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"2", " ", "EE", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"2", " ", "GG", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"EE", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"GG", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "AA", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"2", " ", "AA", " ", SuperscriptBox["R", "4"]}]}], ")"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "AA", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II", " ", "R"}], "+", RowBox[{"GG", " ", "II", " ", "R"}], "+", RowBox[{"7", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "GG", " ", "h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ "32", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "h", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "\[ImaginaryI]", " ", "AA", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{"h", "-", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"h", "+", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"]}], "-", SuperscriptBox["R", "2"]}], ")"}]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "-", RowBox[{"3", " ", "AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["GG", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "-", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"9", " ", "AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{"h", "+", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"h", "-", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"3", " ", "h"}], "R"], "]"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "h", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "\[ImaginaryI]", " ", "AA", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"4", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"4", " ", "h"}], "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "AA"}], " ", SuperscriptBox["R", "4"]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "h", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "\[ImaginaryI]", " ", "AA", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{"h", "-", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"h", "+", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"]}], "-", SuperscriptBox["R", "2"]}], ")"}]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "-", RowBox[{"3", " ", "AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["GG", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "-", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"9", " ", "AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{"h", "+", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"h", "-", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"3", " ", "h"}], "R"], "]"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "h", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "\[ImaginaryI]", " ", "AA", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"4", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"4", " ", "h"}], "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "GG", " ", "h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II", " ", "R"}], "+", RowBox[{"GG", " ", "II", " ", "R"}], "+", RowBox[{"3", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"2", " ", "AA", " ", SuperscriptBox["R", "4"]}]}], ")"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "-", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{ "2", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"]}], "-", SuperscriptBox["R", "2"]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "-", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], RowBox[{"2", " ", "R"}]], "]"}]}], "-", RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", " ", "AA", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"2", " ", "AA", " ", "GG", " ", RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "h"}], "+", RowBox[{"R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"2", " ", "AA", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"2", " ", "AA", " ", "GG", " ", RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "h"}], "+", RowBox[{"R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"2", " ", "AA", " ", "GG", " ", RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "h"}], "+", RowBox[{"R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"8", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"16", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"6", " ", "AA", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"16", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"9", " ", "AA", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"16", " ", "AA", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"AA", " ", RowBox[{"(", RowBox[{ RowBox[{"7", " ", SuperscriptBox["EE", "2"]}], "-", RowBox[{"4", " ", "EE", " ", "GG"}], "-", RowBox[{"4", " ", SuperscriptBox["GG", "2"]}]}], ")"}], " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{ "16", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["EE", "2"], " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{ "8", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"2", " ", "AA", " ", SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"8", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"2", " ", "GG", " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"AA", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "EE"}], "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", " ", "AA", " ", "GG", " ", RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "h"}], "+", RowBox[{"R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "GG", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"EE", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "AA", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{"8", " ", SuperscriptBox["h", "2"]}], "-", RowBox[{"4", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"4", " ", SuperscriptBox["GG", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"]}], "-", SuperscriptBox["R", "2"]}], ")"}]}], "+", RowBox[{ SuperscriptBox["EE", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"]}], "+", RowBox[{"15", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"AA", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], "2"], " ", SuperscriptBox["R", "3"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "EE", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", "II"}], "-", RowBox[{"4", " ", "GG", " ", "II"}], "+", RowBox[{"3", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"4", " ", "EE", " ", "GG", " ", RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "II", " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "AA"}], " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"R", " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], RowBox[{"2", " ", "R"}]], "]"}]}], "-", RowBox[{"2", " ", "h", " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"8", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"2", " ", "GG", " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"AA", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "EE"}], "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"2", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"8", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"2", " ", "AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"2", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"2", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"4", " ", "EE", " ", "GG", " ", RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "II", " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "AA"}], " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"R", " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], RowBox[{"2", " ", "R"}]], "]"}]}], "-", RowBox[{"2", " ", "h", " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"4", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "-", RowBox[{"2", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ "2", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "-", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "-", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"EE", " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"GG", " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"5", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"3", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"2", " ", "EE", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"2", " ", "GG", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"EE", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"GG", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "GG", " ", "h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II", " ", "R"}], "+", RowBox[{"GG", " ", "II", " ", "R"}], "+", RowBox[{"3", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"6", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "2", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"2", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"16", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "6"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"]}], "-", RowBox[{"2", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{"II", "-", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["GG", "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["II", "2"], "-", RowBox[{"2", " ", "AA", " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["R", "4"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{ "8", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ "2", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"2", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{ "2", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "AA", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II", " ", "R"}], "+", RowBox[{"GG", " ", "II", " ", "R"}], "+", RowBox[{"7", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "GG", " ", "h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ "8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"]}], "-", SuperscriptBox["R", "2"]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "-", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], RowBox[{"2", " ", "R"}]], "]"}]}], "-", RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "h", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "\[ImaginaryI]", " ", "AA", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{"h", "-", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"h", "+", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"]}], "-", SuperscriptBox["R", "2"]}], ")"}]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "-", RowBox[{"3", " ", "AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["GG", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "-", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"9", " ", "AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{"h", "+", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"h", "-", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"3", " ", "h"}], "R"], "]"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "h", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "\[ImaginaryI]", " ", "AA", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"4", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"4", " ", "h"}], "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "2", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"2", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"15", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "AA", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{ "4", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"12", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"12", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{"2", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "AA", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"2", " ", "AA", " ", SuperscriptBox["R", "4"]}]}], ")"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{ "2", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "AA", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II", " ", "R"}], "+", RowBox[{"GG", " ", "II", " ", "R"}], "+", RowBox[{"7", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "GG", " ", "h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"2", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"2", " ", "\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"6", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"EE", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"GG", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "h", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "\[ImaginaryI]", " ", "AA", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{"h", "-", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"h", "+", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"]}], "-", SuperscriptBox["R", "2"]}], ")"}]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "-", RowBox[{"3", " ", "AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["GG", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "-", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"9", " ", "AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{"h", "+", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"h", "-", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"3", " ", "h"}], "R"], "]"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "h", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "\[ImaginaryI]", " ", "AA", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"4", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"4", " ", "h"}], "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ "16", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "-", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "-", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"EE", " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"GG", " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"5", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"3", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"2", " ", "EE", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"2", " ", "GG", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"EE", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"GG", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"2", " ", "AA", " ", SuperscriptBox["R", "4"]}]}], ")"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "-", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{ "4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SuperscriptBox["h", "2"]}], "+", SuperscriptBox["R", "2"]}], ")"}]}], "-", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "-", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "R"}], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], RowBox[{"2", " ", "R"}]], "]"}]}], "+", RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ "32", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "h", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "\[ImaginaryI]", " ", "AA", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{"h", "-", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"h", "+", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"]}], "-", SuperscriptBox["R", "2"]}], ")"}]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "-", RowBox[{"3", " ", "AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["GG", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "-", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"9", " ", "AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{"h", "+", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"h", "-", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"3", " ", "h"}], "R"], "]"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "h", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "\[ImaginaryI]", " ", "AA", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"4", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"4", " ", "h"}], "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "AA"}], " ", SuperscriptBox["R", "4"]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "h", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "\[ImaginaryI]", " ", "AA", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{"h", "-", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"h", "+", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"]}], "-", SuperscriptBox["R", "2"]}], ")"}]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "-", RowBox[{"3", " ", "AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["GG", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "-", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"9", " ", "AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{"h", "+", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"h", "-", RowBox[{"\[ImaginaryI]", " ", "R"}]}], ")"}], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"3", " ", "h"}], "R"], "]"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "h", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "\[ImaginaryI]", " ", "AA", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"4", " ", "h"}], "R"], "]"}], "+", RowBox[{"\[ImaginaryI]", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"4", " ", "h"}], "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "GG", " ", "h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II", " ", "R"}], "+", RowBox[{"GG", " ", "II", " ", "R"}], "+", RowBox[{"3", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"2", " ", "AA", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"2", " ", "AA", " ", "GG", " ", RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "h"}], "+", RowBox[{"R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", " ", "AA", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"2", " ", "AA", " ", "GG", " ", RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "h"}], "+", RowBox[{"R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", " ", "AA", " ", "GG", " ", RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "h"}], "+", RowBox[{"R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "GG", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"EE", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "AA", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "GG", " ", RowBox[{"(", RowBox[{ RowBox[{"8", " ", SuperscriptBox["h", "2"]}], "-", RowBox[{"4", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"4", " ", SuperscriptBox["GG", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"]}], "-", SuperscriptBox["R", "2"]}], ")"}]}], "+", RowBox[{ SuperscriptBox["EE", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"]}], "+", RowBox[{"15", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"AA", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], "2"], " ", SuperscriptBox["R", "3"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "EE", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", "II"}], "-", RowBox[{"4", " ", "GG", " ", "II"}], "+", RowBox[{"3", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"4", " ", "EE", " ", "GG", " ", RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "II", " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "AA"}], " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"R", " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], RowBox[{"2", " ", "R"}]], "]"}]}], "-", RowBox[{"2", " ", "h", " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", " ", "AA", " ", "GG", " ", RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{"h", "-", RowBox[{"R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"8", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"16", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"6", " ", "AA", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"16", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"9", " ", "AA", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"16", " ", "AA", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"AA", " ", RowBox[{"(", RowBox[{ RowBox[{"7", " ", SuperscriptBox["EE", "2"]}], "-", RowBox[{"4", " ", "EE", " ", "GG"}], "-", RowBox[{"4", " ", SuperscriptBox["GG", "2"]}]}], ")"}], " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{ "16", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["EE", "2"], " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{ "8", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"2", " ", "AA", " ", SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"8", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"2", " ", "GG", " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"AA", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "EE"}], "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"4", " ", "EE", " ", "GG", " ", RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "II", " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "AA"}], " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"R", " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], RowBox[{"2", " ", "R"}]], "]"}]}], "-", RowBox[{"2", " ", "h", " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"4", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "-", RowBox[{"2", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"8", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"2", " ", "GG", " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"AA", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", "EE"}], "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"2", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"8", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"2", " ", "AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"2", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"2", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"EE", "+", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h"}], "-", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"4", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "EE", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EE", "-", RowBox[{"2", " ", "GG"}]}], ")"}], " ", "h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "II"}], "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ "2", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "AA", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II", " ", "R"}], "+", RowBox[{"GG", " ", "II", " ", "R"}], "+", RowBox[{"7", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "GG", " ", "h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{ "4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["h", "2"]}], "-", SuperscriptBox["R", "2"]}], ")"}]}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{"II", "-", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}], "+", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"3", " ", "h"}], RowBox[{"2", " ", "R"}]], "]"}]}], "-", RowBox[{"2", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "2", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"2", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"15", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", "AA", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{ "4", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"12", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"12", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{ "2", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "-", RowBox[{"2", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "-", RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"EE", " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"GG", " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"5", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"8", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"3", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"2", " ", "EE", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"2", " ", "GG", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"EE", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"GG", " ", "h", " ", "II", " ", "R", " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "+", RowBox[{"AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["h", RowBox[{"2", " ", "R"}]], "]"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "GG", " ", "h", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "-", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II", " ", "R"}], "+", RowBox[{"GG", " ", "II", " ", "R"}], "+", RowBox[{"3", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "3"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "3"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"10", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"8", " ", "AA", " ", "GG", " ", "h", " ", SuperscriptBox["R", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", SuperscriptBox["R", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], "2"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"4", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"4", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "7"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"EE", " ", "II", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"4", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"2", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["II", "2"]}], "+", RowBox[{"8", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II", " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"2", " ", "EE", " ", "GG", " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{ SuperscriptBox["GG", "2"], " ", SuperscriptBox["II", "2"], " ", SuperscriptBox["R", "2"]}], "+", RowBox[{"6", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "4"]}], "-", RowBox[{ "2", " ", "AA", " ", "EE", " ", "GG", " ", "II", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"2", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "II", " ", SuperscriptBox["R", "4"]}], "-", RowBox[{"9", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "6"]}], "+", RowBox[{"16", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["R", "6"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ SuperscriptBox["R", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"]}], "-", RowBox[{"2", " ", "EE", " ", "GG", " ", "II", " ", RowBox[{"(", RowBox[{"II", "-", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["GG", "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox["II", "2"], "-", RowBox[{"2", " ", "AA", " ", "II", " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["R", "4"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{ "8", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"8", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "-", RowBox[{"8", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{ "2", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"2", " ", "AA", " ", SuperscriptBox["GG", "2"], " ", "h", " ", "II", " ", SuperscriptBox["R", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}], "-", RowBox[{"2", " ", SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", "h", " ", SuperscriptBox["R", "5"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"2", " ", "h"}], "R"], "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{"2", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", SuperscriptBox["R", "2"]}], "-", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"]}], "+", RowBox[{"4", " ", "AA", " ", "GG", " ", SuperscriptBox["R", "4"], " ", RowBox[{"Cos", "[", FractionBox["h", "R"], "]"}]}], "+", RowBox[{"h", " ", "R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", "II"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["R", "2"]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"EE", " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"R", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "EE"}], " ", "II"}], "+", RowBox[{"GG", " ", RowBox[{"(", RowBox[{"II", "+", RowBox[{"AA", " ", SuperscriptBox["R", "2"]}]}], ")"}]}]}], ")"}], " ", RowBox[{"Sin", "[", FractionBox["h", "R"], "]"}]}]}], ")"}]}], ")"}]}]}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{ RowBox[{ FractionBox[ RowBox[{"fs", " ", "h"}], "2"], "-", FractionBox[ RowBox[{"fn", " ", RowBox[{"(", RowBox[{"EE", "+", "GG"}], ")"}], " ", SuperscriptBox["h", "2"]}], RowBox[{"12", " ", "GG", " ", "R"}]]}], ",", RowBox[{ FractionBox[ RowBox[{"fn", " ", "h"}], "2"], "+", FractionBox[ RowBox[{"fs", " ", RowBox[{"(", RowBox[{"EE", "+", "GG"}], ")"}], " ", SuperscriptBox["h", "2"]}], RowBox[{"12", " ", "EE", " ", "R"}]]}], ",", FractionBox[ RowBox[{"fb", " ", "h"}], "2"], ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{"fb", " ", SuperscriptBox["h", "2"]}], "12"]}], ",", FractionBox[ RowBox[{"fn", " ", SuperscriptBox["h", "2"]}], "12"], ",", RowBox[{ RowBox[{"-", FractionBox[ RowBox[{"fs", " ", "h"}], "2"]}], "-", FractionBox[ RowBox[{"fn", " ", RowBox[{"(", RowBox[{"EE", "+", "GG"}], ")"}], " ", SuperscriptBox["h", "2"]}], RowBox[{"12", " ", "GG", " ", "R"}]]}], ",", RowBox[{ RowBox[{"-", FractionBox[ RowBox[{"fn", " ", "h"}], "2"]}], "+", FractionBox[ RowBox[{"fs", " ", RowBox[{"(", RowBox[{"EE", "+", "GG"}], ")"}], " ", SuperscriptBox["h", "2"]}], RowBox[{"12", " ", "EE", " ", "R"}]]}], ",", RowBox[{"-", FractionBox[ RowBox[{"fb", " ", "h"}], "2"]}], ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{"fb", " ", SuperscriptBox["h", "2"]}], "12"]}], ",", FractionBox[ RowBox[{"fn", " ", SuperscriptBox["h", "2"]}], "12"]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"-", RowBox[{"\[Delta]aa", ".", RowBox[{"(", RowBox[{ RowBox[{"KK", ".", "aa"}], "-", "FF"}], ")"}]}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"CURVEDBEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "II_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"I1_", ",", "I2_"}], "}"}]}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "\[Delta]W", ",", "rule", ",", "KK", ",", "FF"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "needs", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]rule", " ", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"a", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"\[Delta]a", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"b", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"\[Delta]b", "[", "any", "]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"rule", " ", "=", RowBox[{"RULE", "[", RowBox[{ RowBox[{"{", "iy", "}"}], ",", RowBox[{"{", RowBox[{"I1", ",", "I2"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"h", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"x", "[", "2", "]"}], "-", RowBox[{"x", "[", "1", "]"}]}], ")"}], " ", "/.", " ", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{"aa", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", RowBox[{"uy", "[", "1", "]"}], ",", RowBox[{"uz", "[", "1", "]"}], ",", RowBox[{"\[CapitalTheta]x", "[", "1", "]"}], ",", RowBox[{"\[CapitalTheta]y", "[", "1", "]"}], ",", RowBox[{"\[CapitalTheta]z", "[", "1", "]"}], ",", RowBox[{"ux", "[", "2", "]"}], ",", RowBox[{"uy", "[", "2", "]"}], ",", RowBox[{"uz", "[", "2", "]"}], ",", RowBox[{"\[CapitalTheta]x", "[", "2", "]"}], ",", RowBox[{"\[CapitalTheta]y", "[", "2", "]"}], ",", RowBox[{"\[CapitalTheta]z", "[", "2", "]"}]}], "}"}], " ", "/.", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]aa", "=", RowBox[{"aa", " ", "/.", "\[Delta]rule"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"ELEMENT", " ", "CONTRIBUTION"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], " ", "\[IndentingNewLine]", RowBox[{"KK", "=", RowBox[{"-", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", FractionBox[ RowBox[{"AA", " ", "EE"}], "h"]}], ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{"AA", " ", "EE"}], "h"]}], ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", FractionBox[ RowBox[{"24", " ", "AA", " ", "EE", " ", "GG", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}]]}], ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{"24", " ", "AA", " ", "EE", " ", "GG", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]]}], ",", "0", ",", "0", ",", "0", ",", FractionBox[ RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}]]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{"24", " ", "AA", " ", "EE", " ", "GG", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]]}], ",", "0", ",", FractionBox[ RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}]], ",", "0", ",", "0", ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{"24", " ", "AA", " ", "EE", " ", "GG", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]]}], ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}]]}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{"2", " ", "GG", " ", "II"}], "h"]}], ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{"2", " ", "GG", " ", "II"}], "h"]}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", FractionBox[ RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]], ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{ RowBox[{"48", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"]}]}], RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}], ")"}]}]]}], ",", "0", ",", "0", ",", "0", ",", FractionBox[ RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]], ",", "0", ",", FractionBox[ RowBox[{ RowBox[{"24", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"]}]}], RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}], ")"}]}]], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", FractionBox[ RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]]}], ",", "0", ",", "0", ",", "0", ",", FractionBox[ RowBox[{ RowBox[{ RowBox[{"-", "48"}], " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"]}]}], RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}], ")"}]}]], ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]]}], ",", "0", ",", "0", ",", "0", ",", FractionBox[ RowBox[{ RowBox[{"24", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"]}]}], RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}], ")"}]}]]}], "}"}], ",", RowBox[{"{", RowBox[{ FractionBox[ RowBox[{"AA", " ", "EE"}], "h"], ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", FractionBox[ RowBox[{"AA", " ", "EE"}], "h"], ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", FractionBox[ RowBox[{"24", " ", "AA", " ", "EE", " ", "GG", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]], ",", "0", ",", "0", ",", "0", ",", FractionBox[ RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}]], ",", "0", ",", FractionBox[ RowBox[{"24", " ", "AA", " ", "EE", " ", "GG", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]], ",", "0", ",", "0", ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}]]}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", FractionBox[ RowBox[{"24", " ", "AA", " ", "EE", " ", "GG", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]], ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}]]}], ",", "0", ",", "0", ",", "0", ",", FractionBox[ RowBox[{"24", " ", "AA", " ", "EE", " ", "GG", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]], ",", "0", ",", FractionBox[ RowBox[{ "6", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}]], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", FractionBox[ RowBox[{"2", " ", "GG", " ", "II"}], "h"], ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", FractionBox[ RowBox[{"2", " ", "GG", " ", "II"}], "h"], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", FractionBox[ RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]], ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{ RowBox[{"24", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "-", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"]}]}], RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}], ")"}]}]]}], ",", "0", ",", "0", ",", "0", ",", FractionBox[ RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]], ",", "0", ",", FractionBox[ RowBox[{ RowBox[{"48", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"]}]}], RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}], ")"}]}]], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", FractionBox[ RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]]}], ",", "0", ",", "0", ",", "0", ",", FractionBox[ RowBox[{ RowBox[{ RowBox[{"-", "24"}], " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"]}]}], RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}], ")"}]}]], ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{ "12", " ", "AA", " ", "EE", " ", "GG", " ", "h", " ", "II"}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]]}], ",", "0", ",", "0", ",", "0", ",", FractionBox[ RowBox[{ RowBox[{"48", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "II"}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", SuperscriptBox["II", "2"]}]}], RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}], ")"}]}]]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"KK", " ", "=", " ", RowBox[{"Re", "[", "KK", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{ FractionBox[ RowBox[{"fx", " ", "h"}], "2"], ",", FractionBox[ RowBox[{ RowBox[{"AA", " ", "fy", " ", "GG", " ", SuperscriptBox["h", "4"]}], "+", RowBox[{"12", " ", "EE", " ", "fy", " ", SuperscriptBox["h", "2"], " ", "II"}]}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]], ",", FractionBox[ RowBox[{ RowBox[{"AA", " ", "fz", " ", "GG", " ", SuperscriptBox["h", "4"]}], "+", RowBox[{"12", " ", "EE", " ", "fz", " ", SuperscriptBox["h", "2"], " ", "II"}]}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]], ",", "0", ",", RowBox[{"-", FractionBox[ RowBox[{ RowBox[{"AA", " ", "fz", " ", "GG", " ", SuperscriptBox["h", "5"]}], "+", RowBox[{"12", " ", "EE", " ", "fz", " ", SuperscriptBox["h", "3"], " ", "II"}]}], RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}], ")"}]}]]}], ",", FractionBox[ RowBox[{ RowBox[{"AA", " ", "fy", " ", "GG", " ", SuperscriptBox["h", "5"]}], "+", RowBox[{"12", " ", "EE", " ", "fy", " ", SuperscriptBox["h", "3"], " ", "II"}]}], RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}], ")"}]}]], ",", RowBox[{"-", FractionBox[ RowBox[{"fx", " ", "h"}], "2"]}], ",", RowBox[{"-", FractionBox[ RowBox[{ RowBox[{"AA", " ", "fy", " ", "GG", " ", SuperscriptBox["h", "4"]}], "+", RowBox[{"12", " ", "EE", " ", "fy", " ", SuperscriptBox["h", "2"], " ", "II"}]}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]]}], ",", FractionBox[ RowBox[{ RowBox[{ RowBox[{"-", "AA"}], " ", "fz", " ", "GG", " ", SuperscriptBox["h", "4"]}], "-", RowBox[{"12", " ", "EE", " ", "fz", " ", SuperscriptBox["h", "2"], " ", "II"}]}], RowBox[{ RowBox[{"2", " ", "AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"24", " ", "EE", " ", "h", " ", "II"}]}]], ",", "0", ",", FractionBox[ RowBox[{ RowBox[{ RowBox[{"-", "AA"}], " ", "fz", " ", "GG", " ", SuperscriptBox["h", "5"]}], "-", RowBox[{"12", " ", "EE", " ", "fz", " ", SuperscriptBox["h", "3"], " ", "II"}]}], RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}], ")"}]}]], ",", FractionBox[ RowBox[{ RowBox[{"AA", " ", "fy", " ", "GG", " ", SuperscriptBox["h", "5"]}], "+", RowBox[{"12", " ", "EE", " ", "fy", " ", SuperscriptBox["h", "3"], " ", "II"}]}], RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "3"]}], "+", RowBox[{"12", " ", "EE", " ", "h", " ", "II"}]}], ")"}]}]]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"-", RowBox[{"\[Delta]aa", ".", RowBox[{"(", RowBox[{ RowBox[{"KK", ".", "aa"}], "-", "FF"}], ")"}]}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4430689313272*^9, 3.4430690080792*^9}, { 3.4430690869528*^9, 3.4430691077320004`*^9}, {3.4430691700116*^9, 3.4430691708072*^9}, {3.4430692071717997`*^9, 3.443069246359*^9}, { 3.4430772782732*^9, 3.4430773623416*^9}, {3.4430773978316*^9, 3.4430774104676*^9}, {3.4430775053780003`*^9, 3.4430776180598*^9}, { 3.4434109099524*^9, 3.4434109159584*^9}, {3.4438800815346003`*^9, 3.4438802689304*^9}, {3.443880362624*^9, 3.4438803824516*^9}, { 3.443929565615374*^9, 3.443929570232974*^9}, {3.443935321321974*^9, 3.443935335705174*^9}, {3.443935419945174*^9, 3.443935421489574*^9}, { 3.443935494013974*^9, 3.443935494715974*^9}, {3.443935617565974*^9, 3.4439357217895737`*^9}, {3.443935755360774*^9, 3.443935816107174*^9}, { 3.443942155230774*^9, 3.443942209939974*^9}, {3.443942305710374*^9, 3.4439423142123737`*^9}, {3.4439442908131742`*^9, 3.443944441181574*^9}, { 3.4439447830065737`*^9, 3.4439447917425737`*^9}, {3.443944908541774*^9, 3.443944916060974*^9}, {3.4442731097938004`*^9, 3.4442731115254*^9}, { 3.444273189229*^9, 3.4442732700526*^9}, {3.4442748430004*^9, 3.4442748605036*^9}, {3.4442748977438*^9, 3.4442748989762*^9}, { 3.4442749340762*^9, 3.4442749351057997`*^9}, 3.4442752313382*^9, { 3.4442919702026*^9, 3.4442919911846*^9}, {3.4442921151577997`*^9, 3.4442921271074*^9}, {3.4443811023684*^9, 3.4443811036632*^9}, { 3.4443814073171997`*^9, 3.4443814402956*^9}, {3.4443815036316*^9, 3.4443815147855997`*^9}, {3.4443815537232*^9, 3.4443815747676*^9}, { 3.4443816138143997`*^9, 3.444381633174*^9}, {3.4443816850439997`*^9, 3.4443817801728*^9}, 3.4443853618688*^9, {3.4443855607376003`*^9, 3.4443856337924*^9}, {3.4443861200444*^9, 3.4443861523676*^9}, { 3.4443862280495996`*^9, 3.444386291448*^9}, {3.4443864047352*^9, 3.4443864135336*^9}, {3.4443870026832*^9, 3.4443870095316*^9}, { 3.4444082055056*^9, 3.4444082437412*^9}, {3.4444082797148*^9, 3.4444084583816*^9}, {3.4444084889108*^9, 3.4444085087539997`*^9}, { 3.444408942517*^9, 3.4444089563386*^9}, {3.4444091419564*^9, 3.4444091647167997`*^9}, {3.4444092206428003`*^9, 3.4444092944463997`*^9}, {3.4444093856284*^9, 3.4444094281071997`*^9}, { 3.4444094976988*^9, 3.4444095275104*^9}, {3.444409611064*^9, 3.4444096125772*^9}, 3.4444098504616003`*^9, {3.444409913392*^9, 3.4444099166056004`*^9}, 3.4444100178496*^9, {3.4444103063248*^9, 3.4444103358712*^9}, {3.4444103868208*^9, 3.4444104432460003`*^9}, { 3.4444921219564*^9, 3.4444921256224003`*^9}, {3.444492194824*^9, 3.4444921973668003`*^9}, {3.4444922814351997`*^9, 3.4444922853508*^9}, { 3.4444923330868*^9, 3.4444923345844*^9}, {3.444492366424*^9, 3.4444923855808*^9}, {3.4453153475226*^9, 3.445315360689*^9}, { 3.4465518166373653`*^9, 3.446551863016165*^9}, {3.446551894231765*^9, 3.446552159384965*^9}, {3.446552232377365*^9, 3.4465522555589647`*^9}, { 3.446553347388365*^9, 3.4465533616155653`*^9}, {3.4466058525769997`*^9, 3.4466058529046*^9}, {3.4466064371219997`*^9, 3.4466065097244*^9}, { 3.4466127725788*^9, 3.4466127766036*^9}, {3.4466128124835997`*^9, 3.4466130037864*^9}, {3.4466131532696*^9, 3.4466131761703997`*^9}, { 3.4466133992192*^9, 3.4466134478756*^9}, {3.446613483584*^9, 3.4466134932092*^9}, {3.4466135740952*^9, 3.4466135794927998`*^9}, { 3.4466137283948*^9, 3.4466137341356*^9}, {3.4466138994342003`*^9, 3.4466139023826*^9}, {3.4466139549858*^9, 3.4466139579653997`*^9}, { 3.4466142109818*^9, 3.4466142245226*^9}, {3.4466142793878*^9, 3.4466143652033997`*^9}, {3.4466144712834*^9, 3.4466145978929996`*^9}, { 3.4466146992618*^9, 3.4466147509914*^9}, {3.4466151283086*^9, 3.4466152768986*^9}, {3.4466153107506*^9, 3.4466153406558*^9}, { 3.4466194331976*^9, 3.4466194377528*^9}, {3.4466194847712*^9, 3.446619488718*^9}, {3.4466389495861998`*^9, 3.4466389768238*^9}, { 3.4466391218414*^9, 3.446639306561*^9}, {3.4466393990222*^9, 3.4466394004886*^9}, {3.4466394475694*^9, 3.4466394487706003`*^9}, { 3.4466395034174*^9, 3.4466395049462*^9}, 3.4466395515755997`*^9, { 3.4466396000176*^9, 3.4466396190808*^9}, {3.4466397459088*^9, 3.446639748826*^9}, {3.4466397974356003`*^9, 3.446639798668*^9}, 3.4466398447816*^9, {3.446639894218*^9, 3.4466399201556*^9}, { 3.4466399570964003`*^9, 3.4466399583288*^9}, {3.446639994006*^9, 3.4466400056904*^9}, {3.4466400383568*^9, 3.4466400395892*^9}, { 3.4466400745643997`*^9, 3.4466401025976*^9}, {3.4466401660834*^9, 3.4466401806070004`*^9}, {3.4466402251294003`*^9, 3.446640227407*^9}, { 3.446640260479*^9, 3.4466402657674*^9}, {3.4466404133122*^9, 3.4466405185654*^9}, 3.4466405830462*^9, {3.4467273294214*^9, 3.4467273777813997`*^9}, {3.4467274366558*^9, 3.4467275620954*^9}, { 3.446727593311*^9, 3.4467277412614*^9}, {3.4467283334639997`*^9, 3.4467283356012*^9}, {3.4467283707636003`*^9, 3.4467283727604*^9}, { 3.4467289882664003`*^9, 3.4467291276836*^9}, {3.446778464322*^9, 3.4467786797424*^9}, {3.4467801953803997`*^9, 3.4467802409792*^9}, { 3.4467802998691998`*^9, 3.4467804023456*^9}, 3.4467804345596*^9, { 3.4467808656344*^9, 3.4467808670852003`*^9}, 3.4467818107525997`*^9, { 3.446781855509*^9, 3.446781874385*^9}, {3.4467826737914*^9, 3.4467827381726*^9}, {3.4467828623018*^9, 3.4467831045386*^9}, { 3.4470344113984003`*^9, 3.4470344123344*^9}, {3.4470344628316*^9, 3.4470345343108*^9}, {3.447043591118539*^9, 3.447043642192939*^9}, { 3.447045649625739*^9, 3.447045718437339*^9}, {3.447054774023939*^9, 3.447054834198939*^9}, {3.4470549103449388`*^9, 3.4470549116169386`*^9}, { 3.447054943902939*^9, 3.4470553027109385`*^9}, {3.447055334559939*^9, 3.447055353684939*^9}, {3.447057311918539*^9, 3.447057369747739*^9}, { 3.4470575058577385`*^9, 3.4470575951365385`*^9}, {3.4470581848789387`*^9, 3.4470582040825386`*^9}, {3.451276121243*^9, 3.4512761425838003`*^9}, { 3.4512762022382*^9, 3.4512762064346*^9}, {3.4512762476966*^9, 3.4512762827654*^9}, {3.451276489091*^9, 3.451276541975*^9}, { 3.4512765853118*^9, 3.4512766132046003`*^9}, {3.4512773470306*^9, 3.4512773766082*^9}, {3.4512776069110003`*^9, 3.4512777499318*^9}, 3.4512777831286*^9, {3.4512778785538*^9, 3.451277881627*^9}, { 3.4512780242734003`*^9, 3.4512780302794*^9}, 3.4512780737878*^9, { 3.4512781866226*^9, 3.4512781930810003`*^9}, {3.4512863325078*^9, 3.4512863539266*^9}, {3.4568019250434*^9, 3.4568022712698*^9}, { 3.4568023177422*^9, 3.4568024125278*^9}, {3.4568024694365997`*^9, 3.4568024750369997`*^9}, {3.4568026914402*^9, 3.4568028101094*^9}, { 3.4568028406698*^9, 3.4568028564726*^9}, 3.4568028886085997`*^9, { 3.4568030489454*^9, 3.4568030800986*^9}, 3.4568032004128*^9, { 3.4568035073698*^9, 3.4568035176034*^9}, {3.4568040146596003`*^9, 3.4568040844852*^9}, {3.4568043016684*^9, 3.4568043154744*^9}, { 3.4568045482264*^9, 3.4568045486632*^9}, {3.4568048944996*^9, 3.4568049806116*^9}, {3.4660560628582*^9, 3.4660560753538*^9}, { 3.4660676729379997`*^9, 3.4660676735931997`*^9}, {3.4660677244024*^9, 3.4660677277251997`*^9}, {3.4742646771287394`*^9, 3.47426469439174*^9}, { 3.47426489921974*^9, 3.4742649800437393`*^9}, {3.4801246373348*^9, 3.4801246860536003`*^9}, {3.4801247748176003`*^9, 3.4801247821028*^9}, { 3.4801248161264*^9, 3.4801248295736*^9}, {3.4801248810692*^9, 3.4801248964508*^9}, {3.4801249330484*^9, 3.480124947884*^9}, 3.4801249886468*^9, {3.4801251139147997`*^9, 3.48012512588*^9}, { 3.4838339444988003`*^9, 3.4838339567448*^9}, 3.4838341692012*^9, { 3.4838344350408*^9, 3.4838344353684*^9}, {3.4938987575920324`*^9, 3.4938987586840324`*^9}, {3.4941630624049997`*^9, 3.4941631381274*^9}, { 3.4941632311345997`*^9, 3.4941632492306004`*^9}, 3.4941633249217997`*^9, { 3.4941633940922003`*^9, 3.4941634063538*^9}, {3.4941634538402*^9, 3.4941635051642*^9}, {3.494163565115*^9, 3.4941636341762*^9}, { 3.4941636853442*^9, 3.4941639323234*^9}, {3.4941640277798*^9, 3.4941641455754004`*^9}, {3.4941641790374002`*^9, 3.4941641803789997`*^9}, {3.4941642676142*^9, 3.4941643277678003`*^9}, 3.4941644677018003`*^9, {3.4941646208938*^9, 3.4941646322349997`*^9}, { 3.4941652592693996`*^9, 3.4941652807194*^9}, {3.4941653119038*^9, 3.494165416299*^9}, {3.494165453895*^9, 3.4941654544722*^9}, { 3.4950990979779997`*^9, 3.495099142701*^9}, {3.495099172958*^9, 3.4950991806289997`*^9}, {3.495099227097*^9, 3.495099238113*^9}, 3.495099290797*^9, {3.495099346084*^9, 3.495099359507*^9}, { 3.495099456308*^9, 3.495099464091*^9}, 3.495099683108*^9, { 3.495100428112*^9, 3.495100434958*^9}, {3.4951006496219997`*^9, 3.495100649992*^9}, {3.4987235265018*^9, 3.4987235939094*^9}, { 3.4987236420666*^9, 3.4987236530646*^9}, {3.4987237305341997`*^9, 3.4987237396914*^9}, {3.498733136159*^9, 3.4987332972446003`*^9}, { 3.4987364783094*^9, 3.4987364860626*^9}, {3.4987366201134*^9, 3.4987366236078*^9}, {3.4987367272386*^9, 3.4987367464890003`*^9}, { 3.4987369428462*^9, 3.4987369670886*^9}, {3.4987370134518003`*^9, 3.4987370259941998`*^9}, {3.4987370944002*^9, 3.4987371027618*^9}, { 3.4987371921029997`*^9, 3.498737193663*^9}, {3.4987372660938*^9, 3.4987372935498*^9}, {3.4987373290554*^9, 3.4987377176202*^9}, { 3.4987377520182*^9, 3.4987379139462*^9}, {3.4987382030216*^9, 3.4987382667078*^9}, {3.4987888391818*^9, 3.4987888608346*^9}, { 3.4988785131146*^9, 3.4988785160162*^9}, {3.5007170967096*^9, 3.5007170999076*^9}, 3.5007182237316*^9, {3.5007182772864*^9, 3.5007182987832003`*^9}, {3.5009573226744003`*^9, 3.5009573940444*^9}, 3.5009574358710003`*^9, 3.5009604278482*^9, {3.5009897246173353`*^9, 3.5009898480289354`*^9}, {3.5009901464413357`*^9, 3.5009901475333357`*^9}, {3.5009901801997356`*^9, 3.500990274096135*^9}, { 3.5010475253292*^9, 3.5010475852332*^9}, {3.5010605722018003`*^9, 3.5010606739762*^9}, {3.5010607202146*^9, 3.5010607323358*^9}, { 3.5010607920526*^9, 3.501061118467*^9}, {3.5010612022078*^9, 3.5010612277138*^9}, {3.5010616467766*^9, 3.5010617938534*^9}, { 3.5010618406222*^9, 3.5010619950778*^9}, {3.5010621500638*^9, 3.5010622514014*^9}, {3.5010625292218*^9, 3.5010625409374*^9}, { 3.5010626043046*^9, 3.5010626313862*^9}, {3.5010626787166*^9, 3.5010626790754004`*^9}, {3.501074457561*^9, 3.5010744671082*^9}, 3.5010763029458*^9, {3.5032210899309998`*^9, 3.5032212413900003`*^9}, { 3.557658203404973*^9, 3.557658219644601*^9}, {3.5576584433801947`*^9, 3.557658496030287*^9}, {3.5576585501779823`*^9, 3.5576586046064777`*^9}, { 3.557658648910555*^9, 3.557658754600741*^9}, {3.557658963945511*^9, 3.5576589782507353`*^9}, {3.557659009949991*^9, 3.5576591437514267`*^9}, { 3.557659182221094*^9, 3.5576592187719584`*^9}, 3.557659413865901*^9, { 3.557659921100792*^9, 3.5576599556392527`*^9}, {3.557660706920972*^9, 3.5576607248454037`*^9}, {3.557661209085854*^9, 3.557661209413454*^9}, { 3.5577526651911488`*^9, 3.5577526932087984`*^9}, {3.5577527272480583`*^9, 3.557752747122493*^9}, {3.5577528374934516`*^9, 3.557752838523053*^9}, { 3.557752881204728*^9, 3.557752891313546*^9}, {3.557752938612829*^9, 3.5577529469120436`*^9}, {3.557753060714244*^9, 3.557753062633047*^9}, { 3.5577536609544907`*^9, 3.5577536637936954`*^9}, {3.5577537824631042`*^9, 3.557753810184353*^9}, {3.557753841025607*^9, 3.5577540648392*^9}, 3.5577541920574236`*^9, {3.5577547033327217`*^9, 3.557754716967146*^9}, { 3.5577547716296415`*^9, 3.557754802112095*^9}, {3.5577549509363565`*^9, 3.5577549771444025`*^9}, 3.5577551382302856`*^9, {3.55775527184452*^9, 3.557755272858522*^9}, {3.557755881555991*^9, 3.557755886548*^9}, { 3.557756158316077*^9, 3.557756231885806*^9}, {3.5577572408487787`*^9, 3.557757248835993*^9}, {3.5577572834368534`*^9, 3.5577575888229895`*^9}, { 3.5577578129641833`*^9, 3.557757862837471*^9}, {3.557758025514557*^9, 3.557758079272251*^9}, 3.557810586960072*^9, {3.5578240262005973`*^9, 3.5578240345360737`*^9}, {3.557824091429328*^9, 3.5578241008156557`*^9}, { 3.557831525255726*^9, 3.5578315319793377`*^9}, 3.5578315716190076`*^9, { 3.557831606079468*^9, 3.557831629432709*^9}, {3.5578316663267736`*^9, 3.5578317569473333`*^9}, {3.5578322144181366`*^9, 3.557832218084143*^9}, { 3.557836356693412*^9, 3.557836473771618*^9}, {3.5578365201660995`*^9, 3.5578365974018345`*^9}, {3.5578366426731143`*^9, 3.557836658865943*^9}, { 3.557836691017599*^9, 3.5578367924957776`*^9}, {3.5578368305442443`*^9, 3.557836888279946*^9}, {3.5578369382156334`*^9, 3.5578370776642785`*^9}, { 3.5578383536061196`*^9, 3.5578383735117545`*^9}, {3.5578385892445335`*^9, 3.5578385978869486`*^9}, {3.5578386713006773`*^9, 3.557838700113928*^9}, { 3.5578387451200075`*^9, 3.5578387467892103`*^9}, {3.5578388951454706`*^9, 3.5578389248635225`*^9}, {3.5578389679351983`*^9, 3.557838983535226*^9}, { 3.5578390227692947`*^9, 3.557839023143696*^9}, {3.557839097696226*^9, 3.5578391125162525`*^9}, {3.5578391553539276`*^9, 3.557839199892006*^9}, { 3.55783924184048*^9, 3.557839294490572*^9}, {3.5578393285922318`*^9, 3.557839398683155*^9}, {3.557839430522811*^9, 3.557839470162481*^9}, { 3.5578395370865984`*^9, 3.5578395446994114`*^9}, {3.5578396068499207`*^9, 3.5578396118575296`*^9}, 3.5578943518105097`*^9, {3.557894388361374*^9, 3.5578944029629993`*^9}, {3.5578944607611012`*^9, 3.5578944989499683`*^9}, {3.5578945393696394`*^9, 3.557894561537278*^9}, { 3.5578946028617506`*^9, 3.5578946188985786`*^9}, {3.557894650894235*^9, 3.5578947812636642`*^9}, {3.55789481884413*^9, 3.5578948191249304`*^9}, { 3.5578949768100076`*^9, 3.5578949836272197`*^9}, {3.5578967386805477`*^9, 3.55789678549623*^9}, {3.5578968804691963`*^9, 3.557896888643611*^9}, { 3.557897022491846*^9, 3.5578970341450663`*^9}, {3.557897620940097*^9, 3.55789765120415*^9}, {3.5579218072271147`*^9, 3.5579218263059483`*^9}, { 3.557922095312821*^9, 3.557922116965659*^9}, {3.557922178086566*^9, 3.557922188616585*^9}, {3.5579223258812256`*^9, 3.557922327066828*^9}, { 3.5579224596046605`*^9, 3.557922461804264*^9}, 3.5579805928465395`*^9, { 3.5579815200581703`*^9, 3.557981541711009*^9}, 3.557985544779242*^9, { 3.5579863164793987`*^9, 3.5579863339514294`*^9}, {3.557986523210962*^9, 3.557986568841042*^9}, 3.5579866122559185`*^9, 3.557986797646644*^9, 3.55798683514911*^9, {3.557987389828085*^9, 3.5579873922616887`*^9}, { 3.5579875133023014`*^9, 3.5579875144099035`*^9}, {3.557997154019827*^9, 3.5579971543474274`*^9}, {3.5579990909992294`*^9, 3.5579990915764303`*^9}, {3.7515496219127665`*^9, 3.7515496234124207`*^9}, {3.7515496694634647`*^9, 3.751549670619442*^9}}, CellLabel-> "In[138]:=",ExpressionUUID->"edd5553b-5fa9-4254-bbf0-238a178b7cff"] }, Closed]], Cell[CellGroupData[{ Cell["BEAM ELEMENT (nonl ++) defs ", "Subsection", CellChangeTimes->{{3.5579867801590133`*^9, 3.557986782249417*^9}, { 3.7530188279461737`*^9, 3.75301883733206*^9}, {3.76069812578327*^9, 3.7606981284798784`*^9}, 3.7885303042710075`*^9, {3.7889642208299475`*^9, 3.7889642400189085`*^9}, {3.7892194857674274`*^9, 3.789219502611349*^9}, { 3.8216145623909397`*^9, 3.82161456460985*^9}, 3.821614596578349*^9},ExpressionUUID->"3fec6ff7-868f-42b4-8b18-\ e46b6a7b1cab"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iy_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[CapitalDelta]h", ",", "h0", ",", "ix", ",", "iz", ",", "NN", ",", "\[Xi]", ",", "u", ",", "w", ",", "\[Epsilon]", ",", "\[Kappa]", ",", "fx", ",", "fz", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[CapitalDelta]h", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"\[CapitalDelta]h", ".", "\[CapitalDelta]h"}], "]"}], ",", " ", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix", "=", RowBox[{"\[CapitalDelta]h", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", "=", RowBox[{"ix", StyleBox["\[Cross]", "OperatorCharacter"], StyleBox["iy", "OperatorCharacter"]}]}], StyleBox[";", "OperatorCharacter"], StyleBox["\[IndentingNewLine]", "OperatorCharacter"], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", "\[Xi]"}]}], ")"}]}], ",", RowBox[{"h0", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], "2"], " ", "\[Xi]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", "\[Xi]"}]}], ")"}], " ", SuperscriptBox["\[Xi]", "2"]}], ",", RowBox[{"h0", " ", SuperscriptBox["\[Xi]", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Xi]"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NN", ".", RowBox[{"Flatten", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", RowBox[{"2", ";;", "3"}], ",", "1"}], "]"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"NN", ".", RowBox[{"Flatten", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", RowBox[{"2", ";;", "3"}], ",", "3"}], "]"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "strain", " ", "measures", " ", "for", " ", "a", " ", "planar", " ", "problem"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "u"}], "/", "h0"}], "+", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "u"}], "/", "h0"}], ")"}], "2"], "/", "2"}], "+", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "w"}], "/", "h0"}], ")"}], "2"], "/", "2"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]", "=", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "w"}], "/", "h0"}], "*", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"\[Xi]", ",", "\[Xi]"}]], "u"}], "/", RowBox[{"h0", "^", "2"}]}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"1", "+", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "u"}], "/", "h0"}]}], ")"}], RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"\[Xi]", ",", "\[Xi]"}]], "w"}], "/", RowBox[{"h0", "^", "2"}]}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]", "=", RowBox[{"\[Kappa]", "/", RowBox[{ RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", "\[Epsilon]"}]}], ")"}], "^", RowBox[{"(", RowBox[{"3", "/", "2"}], ")"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"fx", " ", "=", RowBox[{"ix", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"fz", " ", "=", RowBox[{"iz", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "density"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"\[Delta]\[Delta]", "[", "\[Kappa]", "]"}]}], "*", "EE", "*", "Iy", "*", "\[Kappa]"}], "-", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "\[Epsilon]", "]"}], "*", "EE", "*", "AA", "*", "\[Epsilon]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "u", "]"}], "*", "fx"}], "+", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "w", "]"}], "*", "fz"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ",", "\[Xi]"}], "]"}], "*", "h0"}]}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.4430689313272*^9, 3.4430690080792*^9}, { 3.4430690869528*^9, 3.4430691077320004`*^9}, {3.4430691700116*^9, 3.4430691708072*^9}, {3.4430692071717997`*^9, 3.443069246359*^9}, { 3.4430772782732*^9, 3.4430773623416*^9}, {3.4430773978316*^9, 3.4430774104676*^9}, {3.4430775053780003`*^9, 3.4430776180598*^9}, { 3.4434109099524*^9, 3.4434109159584*^9}, {3.4438800815346003`*^9, 3.4438802689304*^9}, {3.443880362624*^9, 3.4438803824516*^9}, { 3.443929565615374*^9, 3.443929570232974*^9}, {3.443935321321974*^9, 3.443935335705174*^9}, {3.443935419945174*^9, 3.443935421489574*^9}, { 3.443935494013974*^9, 3.443935494715974*^9}, {3.443935617565974*^9, 3.4439357217895737`*^9}, {3.443935755360774*^9, 3.443935816107174*^9}, { 3.443942155230774*^9, 3.443942209939974*^9}, {3.443942305710374*^9, 3.4439423142123737`*^9}, {3.4439442908131742`*^9, 3.443944441181574*^9}, { 3.4439447830065737`*^9, 3.4439447917425737`*^9}, {3.443944908541774*^9, 3.443944916060974*^9}, {3.4442731097938004`*^9, 3.4442731115254*^9}, { 3.444273189229*^9, 3.4442732700526*^9}, {3.4442748430004*^9, 3.4442748605036*^9}, {3.4442748977438*^9, 3.4442748989762*^9}, { 3.4442749340762*^9, 3.4442749351057997`*^9}, 3.4442752313382*^9, { 3.4442919702026*^9, 3.4442919911846*^9}, {3.4442921151577997`*^9, 3.4442921271074*^9}, {3.4443811023684*^9, 3.4443811036632*^9}, { 3.4443814073171997`*^9, 3.4443814402956*^9}, {3.4443815036316*^9, 3.4443815147855997`*^9}, {3.4443815537232*^9, 3.4443815747676*^9}, { 3.4443816138143997`*^9, 3.444381633174*^9}, {3.4443816850439997`*^9, 3.4443817801728*^9}, 3.4443853618688*^9, {3.4443855607376003`*^9, 3.4443856337924*^9}, {3.4443861200444*^9, 3.4443861523676*^9}, { 3.4443862280495996`*^9, 3.444386291448*^9}, {3.4443864047352*^9, 3.4443864135336*^9}, {3.4443870026832*^9, 3.4443870095316*^9}, { 3.4444082055056*^9, 3.4444082437412*^9}, {3.4444082797148*^9, 3.4444084583816*^9}, {3.4444084889108*^9, 3.4444085087539997`*^9}, { 3.444408942517*^9, 3.4444089563386*^9}, {3.4444091419564*^9, 3.4444091647167997`*^9}, {3.4444092206428003`*^9, 3.4444092944463997`*^9}, {3.4444093856284*^9, 3.4444094281071997`*^9}, { 3.4444094976988*^9, 3.4444095275104*^9}, {3.444409611064*^9, 3.4444096125772*^9}, 3.4444098504616003`*^9, {3.444409913392*^9, 3.4444099166056004`*^9}, 3.4444100178496*^9, {3.4444103063248*^9, 3.4444103358712*^9}, {3.4444103868208*^9, 3.4444104432460003`*^9}, { 3.4444921219564*^9, 3.4444921256224003`*^9}, {3.444492194824*^9, 3.4444921973668003`*^9}, {3.4444922814351997`*^9, 3.4444922853508*^9}, { 3.4444923330868*^9, 3.4444923345844*^9}, {3.444492366424*^9, 3.4444923855808*^9}, {3.4453153475226*^9, 3.445315360689*^9}, { 3.4465518166373653`*^9, 3.446551863016165*^9}, {3.446551894231765*^9, 3.446552159384965*^9}, {3.446552232377365*^9, 3.4465522555589647`*^9}, { 3.446553347388365*^9, 3.4465533616155653`*^9}, {3.4466058525769997`*^9, 3.4466058529046*^9}, {3.4466064371219997`*^9, 3.4466065097244*^9}, { 3.4466127725788*^9, 3.4466127766036*^9}, {3.4466128124835997`*^9, 3.4466130037864*^9}, {3.4466131532696*^9, 3.4466131761703997`*^9}, { 3.4466133992192*^9, 3.4466134478756*^9}, {3.446613483584*^9, 3.4466134932092*^9}, {3.4466135740952*^9, 3.4466135794927998`*^9}, { 3.4466137283948*^9, 3.4466137341356*^9}, {3.4466138994342003`*^9, 3.4466139023826*^9}, {3.4466139549858*^9, 3.4466139579653997`*^9}, { 3.4466142109818*^9, 3.4466142245226*^9}, {3.4466142793878*^9, 3.4466143652033997`*^9}, {3.4466144712834*^9, 3.4466145978929996`*^9}, { 3.4466146992618*^9, 3.4466147509914*^9}, {3.4466151283086*^9, 3.4466152768986*^9}, {3.4466153107506*^9, 3.4466153406558*^9}, { 3.4466194331976*^9, 3.4466194377528*^9}, {3.4466194847712*^9, 3.446619488718*^9}, {3.4466389495861998`*^9, 3.4466389768238*^9}, { 3.4466391218414*^9, 3.446639306561*^9}, {3.4466393990222*^9, 3.4466394004886*^9}, {3.4466394475694*^9, 3.4466394487706003`*^9}, { 3.4466395034174*^9, 3.4466395049462*^9}, 3.4466395515755997`*^9, { 3.4466396000176*^9, 3.4466396190808*^9}, {3.4466397459088*^9, 3.446639748826*^9}, {3.4466397974356003`*^9, 3.446639798668*^9}, 3.4466398447816*^9, {3.446639894218*^9, 3.4466399201556*^9}, { 3.4466399570964003`*^9, 3.4466399583288*^9}, {3.446639994006*^9, 3.4466400056904*^9}, {3.4466400383568*^9, 3.4466400395892*^9}, { 3.4466400745643997`*^9, 3.4466401025976*^9}, {3.4466401660834*^9, 3.4466401806070004`*^9}, {3.4466402251294003`*^9, 3.446640227407*^9}, { 3.446640260479*^9, 3.4466402657674*^9}, {3.4466404133122*^9, 3.4466405185654*^9}, 3.4466405830462*^9, {3.4467273294214*^9, 3.4467273777813997`*^9}, {3.4467274366558*^9, 3.4467275620954*^9}, { 3.446727593311*^9, 3.4467277412614*^9}, {3.4467283334639997`*^9, 3.4467283356012*^9}, {3.4467283707636003`*^9, 3.4467283727604*^9}, { 3.4467289882664003`*^9, 3.4467291276836*^9}, {3.446778464322*^9, 3.4467786797424*^9}, {3.4467801953803997`*^9, 3.4467802409792*^9}, { 3.4467802998691998`*^9, 3.4467804023456*^9}, 3.4467804345596*^9, { 3.4467808656344*^9, 3.4467808670852003`*^9}, 3.4467818107525997`*^9, { 3.446781855509*^9, 3.446781874385*^9}, {3.4467826737914*^9, 3.4467827381726*^9}, {3.4467828623018*^9, 3.4467831045386*^9}, { 3.4470344113984003`*^9, 3.4470344123344*^9}, {3.4470344628316*^9, 3.4470345343108*^9}, {3.447043591118539*^9, 3.447043642192939*^9}, { 3.447045649625739*^9, 3.447045718437339*^9}, {3.447054774023939*^9, 3.447054834198939*^9}, {3.4470549103449388`*^9, 3.4470549116169386`*^9}, { 3.447054943902939*^9, 3.4470553027109385`*^9}, {3.447055334559939*^9, 3.447055353684939*^9}, {3.447057311918539*^9, 3.447057369747739*^9}, { 3.4470575058577385`*^9, 3.4470575951365385`*^9}, {3.4470581848789387`*^9, 3.4470582040825386`*^9}, {3.451276121243*^9, 3.4512761425838003`*^9}, { 3.4512762022382*^9, 3.4512762064346*^9}, {3.4512762476966*^9, 3.4512762827654*^9}, {3.451276489091*^9, 3.451276541975*^9}, { 3.4512765853118*^9, 3.4512766132046003`*^9}, {3.4512773470306*^9, 3.4512773766082*^9}, {3.4512776069110003`*^9, 3.4512777499318*^9}, 3.4512777831286*^9, {3.4512778785538*^9, 3.451277881627*^9}, { 3.4512780242734003`*^9, 3.4512780302794*^9}, 3.4512780737878*^9, { 3.4512781866226*^9, 3.4512781930810003`*^9}, {3.4512863325078*^9, 3.4512863539266*^9}, {3.4568019250434*^9, 3.4568022712698*^9}, { 3.4568023177422*^9, 3.4568024125278*^9}, {3.4568024694365997`*^9, 3.4568024750369997`*^9}, {3.4568026914402*^9, 3.4568028101094*^9}, { 3.4568028406698*^9, 3.4568028564726*^9}, 3.4568028886085997`*^9, { 3.4568030489454*^9, 3.4568030800986*^9}, 3.4568032004128*^9, { 3.4568035073698*^9, 3.4568035176034*^9}, {3.4568040146596003`*^9, 3.4568040844852*^9}, {3.4568043016684*^9, 3.4568043154744*^9}, { 3.4568045482264*^9, 3.4568045486632*^9}, {3.4568048944996*^9, 3.4568049806116*^9}, {3.4660560628582*^9, 3.4660560753538*^9}, { 3.4660676729379997`*^9, 3.4660676735931997`*^9}, {3.4660677244024*^9, 3.4660677277251997`*^9}, {3.4742646771287394`*^9, 3.47426469439174*^9}, { 3.47426489921974*^9, 3.4742649800437393`*^9}, {3.4801246373348*^9, 3.4801246860536003`*^9}, {3.4801247748176003`*^9, 3.4801247821028*^9}, { 3.4801248161264*^9, 3.4801248295736*^9}, {3.4801248810692*^9, 3.4801248964508*^9}, {3.4801249330484*^9, 3.480124947884*^9}, 3.4801249886468*^9, {3.4801251139147997`*^9, 3.48012512588*^9}, { 3.4838339444988003`*^9, 3.4838339567448*^9}, 3.4838341692012*^9, { 3.4838344350408*^9, 3.4838344353684*^9}, {3.4938987575920324`*^9, 3.4938987586840324`*^9}, {3.4941630624049997`*^9, 3.4941631381274*^9}, { 3.4941632311345997`*^9, 3.4941632492306004`*^9}, 3.4941633249217997`*^9, { 3.4941633940922003`*^9, 3.4941634063538*^9}, {3.4941634538402*^9, 3.4941635051642*^9}, {3.494163565115*^9, 3.4941636341762*^9}, { 3.4941636853442*^9, 3.4941639323234*^9}, {3.4941640277798*^9, 3.4941641455754004`*^9}, {3.4941641790374002`*^9, 3.4941641803789997`*^9}, {3.4941642676142*^9, 3.4941643277678003`*^9}, 3.4941644677018003`*^9, {3.4941646208938*^9, 3.4941646322349997`*^9}, { 3.4941652592693996`*^9, 3.4941652807194*^9}, {3.4941653119038*^9, 3.494165416299*^9}, {3.494165453895*^9, 3.4941654544722*^9}, { 3.4950990979779997`*^9, 3.495099142701*^9}, {3.495099172958*^9, 3.4950991806289997`*^9}, {3.495099227097*^9, 3.495099238113*^9}, 3.495099290797*^9, {3.495099346084*^9, 3.495099359507*^9}, { 3.495099456308*^9, 3.495099464091*^9}, 3.495099683108*^9, { 3.495100428112*^9, 3.495100434958*^9}, {3.4951006496219997`*^9, 3.495100649992*^9}, {3.4987235265018*^9, 3.4987235939094*^9}, { 3.4987236420666*^9, 3.4987236530646*^9}, {3.4987237305341997`*^9, 3.4987237396914*^9}, {3.498733136159*^9, 3.4987332972446003`*^9}, { 3.4987364783094*^9, 3.4987364860626*^9}, {3.4987366201134*^9, 3.4987366236078*^9}, {3.4987367272386*^9, 3.4987367464890003`*^9}, { 3.4987369428462*^9, 3.4987369670886*^9}, {3.4987370134518003`*^9, 3.4987370259941998`*^9}, {3.4987370944002*^9, 3.4987371027618*^9}, { 3.4987371921029997`*^9, 3.498737193663*^9}, {3.4987372660938*^9, 3.4987372935498*^9}, {3.4987373290554*^9, 3.4987377176202*^9}, { 3.4987377520182*^9, 3.4987379139462*^9}, {3.4987382030216*^9, 3.4987382667078*^9}, {3.4987888391818*^9, 3.4987888608346*^9}, { 3.4988785131146*^9, 3.4988785160162*^9}, {3.5007170967096*^9, 3.5007170999076*^9}, 3.5007182237316*^9, {3.5007182772864*^9, 3.5007182987832003`*^9}, {3.5009573226744003`*^9, 3.5009573940444*^9}, 3.5009574358710003`*^9, 3.5009604278482*^9, {3.5009897246173353`*^9, 3.5009898480289354`*^9}, {3.5009901464413357`*^9, 3.5009901475333357`*^9}, {3.5009901801997356`*^9, 3.500990274096135*^9}, { 3.5010475253292*^9, 3.5010475852332*^9}, {3.5010605722018003`*^9, 3.5010606739762*^9}, {3.5010607202146*^9, 3.5010607323358*^9}, { 3.5010607920526*^9, 3.501061118467*^9}, {3.5010612022078*^9, 3.5010612277138*^9}, {3.5010616467766*^9, 3.5010617938534*^9}, { 3.5010618406222*^9, 3.5010619950778*^9}, {3.5010621500638*^9, 3.5010622514014*^9}, {3.5010625292218*^9, 3.5010625409374*^9}, { 3.5010626043046*^9, 3.5010626313862*^9}, {3.5010626787166*^9, 3.5010626790754004`*^9}, {3.501074457561*^9, 3.5010744671082*^9}, 3.5010763029458*^9, {3.5032210899309998`*^9, 3.5032212413900003`*^9}, { 3.557658203404973*^9, 3.557658219644601*^9}, {3.5576584433801947`*^9, 3.557658496030287*^9}, {3.5576585501779823`*^9, 3.5576586046064777`*^9}, { 3.557658648910555*^9, 3.557658754600741*^9}, {3.557658963945511*^9, 3.5576589782507353`*^9}, {3.557659009949991*^9, 3.5576591437514267`*^9}, { 3.557659182221094*^9, 3.5576592187719584`*^9}, 3.557659413865901*^9, { 3.557659921100792*^9, 3.5576599556392527`*^9}, {3.557660706920972*^9, 3.5576607248454037`*^9}, {3.557661209085854*^9, 3.557661209413454*^9}, { 3.5577526651911488`*^9, 3.5577526932087984`*^9}, {3.5577527272480583`*^9, 3.557752747122493*^9}, {3.5577528374934516`*^9, 3.557752838523053*^9}, { 3.557752881204728*^9, 3.557752891313546*^9}, {3.557752938612829*^9, 3.5577529469120436`*^9}, {3.557753060714244*^9, 3.557753062633047*^9}, { 3.5577536609544907`*^9, 3.5577536637936954`*^9}, {3.5577537824631042`*^9, 3.557753810184353*^9}, {3.557753841025607*^9, 3.5577540648392*^9}, 3.5577541920574236`*^9, {3.5577547033327217`*^9, 3.557754716967146*^9}, { 3.5577547716296415`*^9, 3.557754802112095*^9}, {3.5577549509363565`*^9, 3.5577549771444025`*^9}, 3.5577551382302856`*^9, {3.55775527184452*^9, 3.557755272858522*^9}, {3.557755881555991*^9, 3.557755886548*^9}, { 3.557756158316077*^9, 3.557756231885806*^9}, {3.5577572408487787`*^9, 3.557757248835993*^9}, {3.5577572834368534`*^9, 3.5577575888229895`*^9}, { 3.5577578129641833`*^9, 3.557757862837471*^9}, {3.557758025514557*^9, 3.557758079272251*^9}, 3.557810586960072*^9, {3.5578240262005973`*^9, 3.5578240345360737`*^9}, {3.557824091429328*^9, 3.5578241008156557`*^9}, { 3.557831525255726*^9, 3.5578315319793377`*^9}, 3.5578315716190076`*^9, { 3.557831606079468*^9, 3.557831629432709*^9}, {3.5578316663267736`*^9, 3.5578317569473333`*^9}, {3.5578322144181366`*^9, 3.557832218084143*^9}, { 3.557836356693412*^9, 3.557836473771618*^9}, {3.5578365201660995`*^9, 3.5578365974018345`*^9}, {3.5578366426731143`*^9, 3.557836658865943*^9}, { 3.557836691017599*^9, 3.5578367924957776`*^9}, {3.5578368305442443`*^9, 3.557836888279946*^9}, {3.5578369382156334`*^9, 3.5578370776642785`*^9}, { 3.5578383536061196`*^9, 3.5578383735117545`*^9}, {3.5578385892445335`*^9, 3.5578385978869486`*^9}, {3.5578386713006773`*^9, 3.557838700113928*^9}, { 3.5578387451200075`*^9, 3.5578387467892103`*^9}, {3.5578388951454706`*^9, 3.5578389248635225`*^9}, {3.5578389679351983`*^9, 3.557838983535226*^9}, { 3.5578390227692947`*^9, 3.557839023143696*^9}, {3.557839097696226*^9, 3.5578391125162525`*^9}, {3.5578391553539276`*^9, 3.557839199892006*^9}, { 3.55783924184048*^9, 3.557839294490572*^9}, {3.5578393285922318`*^9, 3.557839398683155*^9}, {3.557839430522811*^9, 3.557839470162481*^9}, { 3.5578395370865984`*^9, 3.5578395446994114`*^9}, {3.5578396068499207`*^9, 3.5578396118575296`*^9}, 3.5578943518105097`*^9, {3.557894388361374*^9, 3.5578944029629993`*^9}, {3.5578944607611012`*^9, 3.5578944989499683`*^9}, {3.5578945393696394`*^9, 3.557894561537278*^9}, { 3.5578946028617506`*^9, 3.5578946188985786`*^9}, {3.557894650894235*^9, 3.5578947812636642`*^9}, {3.55789481884413*^9, 3.5578948191249304`*^9}, { 3.5578949768100076`*^9, 3.5578949836272197`*^9}, {3.5578967386805477`*^9, 3.55789678549623*^9}, {3.5578968804691963`*^9, 3.557896888643611*^9}, { 3.557897022491846*^9, 3.5578970341450663`*^9}, {3.557897620940097*^9, 3.55789765120415*^9}, {3.5579218072271147`*^9, 3.5579218263059483`*^9}, { 3.557922095312821*^9, 3.557922116965659*^9}, {3.557922178086566*^9, 3.557922188616585*^9}, {3.5579223258812256`*^9, 3.557922327066828*^9}, { 3.5579224596046605`*^9, 3.557922461804264*^9}, 3.5579805928465395`*^9, { 3.5579815200581703`*^9, 3.557981541711009*^9}, 3.557985544779242*^9, { 3.5579863164793987`*^9, 3.5579863339514294`*^9}, {3.557986523210962*^9, 3.557986568841042*^9}, 3.5579866122559185`*^9, 3.557986797646644*^9, 3.55798683514911*^9, {3.557987389828085*^9, 3.5579873922616887`*^9}, { 3.5579875133023014`*^9, 3.5579875144099035`*^9}, {3.557997154019827*^9, 3.5579971543474274`*^9}, {3.5579990909992294`*^9, 3.5579990915764303`*^9}, {3.7515496219127665`*^9, 3.7515496234124207`*^9}, {3.7515496694634647`*^9, 3.751549670619442*^9}, 3.760698214068443*^9, 3.7606982581162596`*^9, {3.760698336599908*^9, 3.760698395538883*^9}, {3.760698457253128*^9, 3.7606984725032578`*^9}, { 3.760706969039646*^9, 3.7607069868197355`*^9}, {3.7607070177595754`*^9, 3.760707109798204*^9}, {3.7607149898959637`*^9, 3.76071511421874*^9}, { 3.760715297453657*^9, 3.7607153430692797`*^9}, {3.7607154180853043`*^9, 3.7607154535686812`*^9}, {3.7633845367006025`*^9, 3.7633845438238597`*^9}, {3.7889638271820073`*^9, 3.7889638854740047`*^9}, {3.7889639434697323`*^9, 3.788964026937682*^9}, { 3.78896408462621*^9, 3.7889641645544815`*^9}, 3.788964201449705*^9, { 3.788964250623935*^9, 3.7889642555046062`*^9}, {3.7889642900656075`*^9, 3.7889643038629646`*^9}, {3.7889643707176127`*^9, 3.788964398364483*^9}, { 3.789011112919543*^9, 3.7890111134446883`*^9}, 3.7890114109878097`*^9, { 3.7890114423914843`*^9, 3.7890114998089466`*^9}, {3.7890169253715525`*^9, 3.789016948110425*^9}, 3.789016997492075*^9, {3.78921952735982*^9, 3.789219530250654*^9}, {3.789348147564969*^9, 3.789348176027255*^9}, { 3.7893483022287426`*^9, 3.789348344430807*^9}, {3.789483160825452*^9, 3.7894832543158126`*^9}, {3.789483295398184*^9, 3.789483500869034*^9}, { 3.7894835417883554`*^9, 3.7894836730956497`*^9}, {3.7894837638585553`*^9, 3.7894838422207155`*^9}, {3.7894839041268635`*^9, 3.7894839172327876`*^9}, {3.789483964553606*^9, 3.789483983210167*^9}, { 3.7894840220541534`*^9, 3.789484044973419*^9}, {3.789537736627514*^9, 3.7895377430013547`*^9}, {3.78953788467525*^9, 3.789537885423259*^9}, { 3.7895379996583815`*^9, 3.7895380417070355`*^9}, {3.789538072609002*^9, 3.789538176620446*^9}, {3.789538615747033*^9, 3.7895386678872213`*^9}, { 3.789538713347087*^9, 3.7895388181521006`*^9}, {3.789538864393808*^9, 3.7895390841909227`*^9}, {3.789563996199933*^9, 3.789564092275489*^9}, { 3.7895645615094523`*^9, 3.789564582229233*^9}, {3.789564666596979*^9, 3.789564683990158*^9}, {3.7895647868513017`*^9, 3.7895647894911814`*^9}, { 3.789567093897643*^9, 3.7895670954439406`*^9}, {3.7897922445030994`*^9, 3.789792245358638*^9}, 3.7897930336508145`*^9}, CellLabel-> "In[140]:=",ExpressionUUID->"d11ac109-89e5-4d86-9842-7be03bb4725f"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["PLATE MODEL", "Section", CellChangeTimes->{ 3.4430806364968*^9, {3.4453166713873997`*^9, 3.4453166747414*^9}, { 3.447462264275*^9, 3.4474622644154*^9}, {3.4695731321116*^9, 3.4695731359491997`*^9}, 3.473055186341*^9, {3.4730552472860003`*^9, 3.47305524884*^9}, {3.473055399782*^9, 3.473055419801*^9}, { 3.4734696760778*^9, 3.4734697047349997`*^9}, {3.4770537891542*^9, 3.4770537950354*^9}, {3.4932799754514*^9, 3.4932799779161997`*^9}, { 3.4945558951644*^9, 3.4945558957416*^9}, {3.4957646303032*^9, 3.4957646329084*^9}, {3.497581602118*^9, 3.4975816042552*^9}, { 3.500960505817*^9, 3.5009605094206*^9}, {3.556623836083009*^9, 3.5566238462386265`*^9}, {3.5568725055395393`*^9, 3.5568725163821597`*^9}, {3.556872678728445*^9, 3.5568726810485783`*^9}, { 3.7323376045620503`*^9, 3.7323376086812124`*^9}, {3.7335630623483887`*^9, 3.733563072583865*^9}, {3.733563130246215*^9, 3.733563131355714*^9}, { 3.817531574263208*^9, 3.8175315898614454`*^9}},ExpressionUUID->"9827d023-eddb-4909-b805-\ 26e15433ab72"], Cell[CellGroupData[{ Cell["PLANE ELEMENT (disp) defs ", "Subsection", CellChangeTimes->{{3.766140428784856*^9, 3.7661404367673664`*^9}, { 3.78824987025541*^9, 3.788249871040884*^9}},ExpressionUUID->"29461c8d-0ff5-4fc7-8c1d-\ e70d2a164dd7"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MEC", "-", "E1050"}], "|", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"MODE", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", "tt", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r", ",", "e\[Alpha]", ",", "e\[Beta]", ",", "en", ",", "FF", ",", "FFINV", ",", "jac", ",", "uvw", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "EEEE", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", " ", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"e\[Alpha]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}]}], ";", " ", RowBox[{"e\[Beta]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], ";", " ", RowBox[{"en", "=", RowBox[{"e\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"en", "/", RowBox[{"Sqrt", "[", RowBox[{"en", ".", "en"}], "]"}]}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"Lx", ">", "0"}], "&&", RowBox[{"Ly", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", " ", "e\[Beta]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"Lx", ">", "0"}], "&&", RowBox[{"Ly", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"Lx", ">", "0"}], "&&", RowBox[{"Ly", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "gradient", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"Transpose", "[", RowBox[{"D", "[", RowBox[{"uvw", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}], "}"}]}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Plane", " ", "stress", " ", "elasticity", " ", "tensor"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"IdentityMatrix", "[", "3", "]"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{"EEEE", "-", RowBox[{ RowBox[{"(", RowBox[{"EEEE", ".", "en"}], ")"}], ".", RowBox[{"Inverse", "[", RowBox[{"en", ".", "EEEE", ".", "en"}], "]"}], ".", RowBox[{"(", RowBox[{"en", ".", "EEEE"}], ")"}]}]}], "]"}]}], ";", " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}], "*", "tt"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"MODE", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", "tt", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "node", ",", "NN", ",", "r", ",", "e\[Alpha]", ",", "e\[Beta]", ",", "en", ",", "FF", ",", "FFINV", ",", "jac", ",", "uvw", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "EEEE", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions", " ", "etc"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"node", " ", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"e\[Alpha]", ",", "e\[Beta]"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], "}"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"e\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"en", "/", RowBox[{"Sqrt", "[", " ", RowBox[{"en", ".", " ", "en"}], "]"}]}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", "e\[Beta]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "gradient", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Plane", " ", "stress", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{"EEEE", "-", RowBox[{ RowBox[{"(", RowBox[{"EEEE", ".", "en"}], ")"}], ".", RowBox[{"Inverse", "[", RowBox[{"en", ".", "EEEE", ".", "en"}], "]"}], ".", RowBox[{"(", RowBox[{"en", ".", "EEEE"}], ")"}]}]}], "]"}]}], ";", " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}], "*", "tt"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"REC9", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"TWODIM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"MODE", ",", RowBox[{"{", RowBox[{"TWODIM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", "tt", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"TWODIM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r", ",", "e1", ",", "e2", ",", "nn", ",", "FF", ",", "FFINV", ",", "jac", ",", "uvw", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "EEEE", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", " ", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"e1", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}]}], ";", " ", RowBox[{"e2", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], ";", " ", RowBox[{"e3", "=", RowBox[{"e1", StyleBox["\[Cross]", "OperatorCharacter"], "e2"}]}], ";", "\[IndentingNewLine]", RowBox[{"nn", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"e3", "/", RowBox[{"Sqrt", "[", RowBox[{"e3", ".", "e3"}], "]"}]}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e1", ",", " ", "e2", ",", "nn"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "gradient", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Plane", " ", "stress", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MODE", "===", "DISP"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}], "*", "tt"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"Simplify", "[", RowBox[{"\[Sigma]", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}], "]"}], "]"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426473093646455`*^9, 3.4426474078630457`*^9}, { 3.4426597184894*^9, 3.4426597783310003`*^9}, {3.442659859139*^9, 3.4426599679021997`*^9}, {3.4426601154852*^9, 3.442660125282*^9}, 3.4426603153866*^9, {3.4426606694491997`*^9, 3.442660676984*^9}, { 3.4426607660341997`*^9, 3.442660767017*^9}, {3.4426607970782003`*^9, 3.4426609236566*^9}, {3.4426609993859997`*^9, 3.442661000946*^9}, { 3.4426611720156*^9, 3.4426611866796*^9}, {3.4426612192836*^9, 3.4426612396104*^9}, {3.4426613536776*^9, 3.4426613563764*^9}, { 3.4426613962188*^9, 3.4426613966556*^9}, {3.443184440921*^9, 3.4431845165186*^9}, {3.4431848052298*^9, 3.4431848237002*^9}, { 3.4431849834618*^9, 3.4431849851934*^9}, {3.4431850342574*^9, 3.4431850385318003`*^9}, {3.4444402127514*^9, 3.4444402360889997`*^9}, { 3.44509636787*^9, 3.445096458974*^9}, {3.4450965569264*^9, 3.4450965855056*^9}, {3.4450966736612*^9, 3.4450967018348*^9}, 3.4450967876972*^9, {3.4451000792358*^9, 3.4451001019962*^9}, { 3.445132280975*^9, 3.4451322867782*^9}, 3.4451325631488*^9, 3.4451346101028*^9, {3.4455261966926003`*^9, 3.4455262691078*^9}, { 3.4455263543462*^9, 3.445526490113*^9}, {3.4455265305794*^9, 3.4455265347602*^9}, {3.4455267552349997`*^9, 3.4455267826754*^9}, 3.445526922233*^9, {3.445527218711*^9, 3.4455272895818*^9}, { 3.4455273640094*^9, 3.445527481259*^9}, 3.4455276192202*^9, { 3.4455278074376*^9, 3.4455278187164*^9}, {3.4455279660896*^9, 3.4455279742016*^9}, 3.4455280249016*^9, 3.4455285464407997`*^9, { 3.4461837560238*^9, 3.4461837697986*^9}, {3.446183892165*^9, 3.4461839004486*^9}, {3.4461839570142*^9, 3.4461841265550003`*^9}, 3.4461841729182*^9, {3.4461842101398*^9, 3.4461842206074*^9}, { 3.4461845241088*^9, 3.4461845410972*^9}, {3.4461845879440002`*^9, 3.4461847021516*^9}, {3.4461848428032*^9, 3.4461848544096003`*^9}, { 3.4461849111956*^9, 3.4461849123344*^9}, {3.4461850134868*^9, 3.446185058608*^9}, {3.4461852067616*^9, 3.446185223282*^9}, { 3.4461852548876*^9, 3.4461852626408*^9}, {3.4461853186604*^9, 3.446185320392*^9}, {3.4512642010481997`*^9, 3.451264207413*^9}, { 3.4512642788766003`*^9, 3.4512643136334*^9}, {3.4512643770006*^9, 3.4512644269362*^9}, {3.4512646983138*^9, 3.4512647384994*^9}, { 3.4512647823354*^9, 3.4512647868126*^9}, {3.4939932066616*^9, 3.4939932082060003`*^9}, {3.4939932399988003`*^9, 3.4939932614955997`*^9}, {3.493993300014*^9, 3.4939933073304*^9}, { 3.4939933992174*^9, 3.4939934078129997`*^9}, {3.4939934932314*^9, 3.493993515009*^9}, {3.4939935468556004`*^9, 3.493993568543*^9}, { 3.4939936486404*^9, 3.4939936621812*^9}, {3.4940328887262*^9, 3.4940328895218*^9}, {3.499487154582*^9, 3.49948716324*^9}, { 3.4994872083708*^9, 3.499487247324*^9}, {3.4994872822368*^9, 3.4994873816244*^9}, 3.499487417676*^9, {3.4994878504918003`*^9, 3.4994879045458*^9}, {3.4994879529370003`*^9, 3.4994879707794*^9}, { 3.4994880482042*^9, 3.4994880616826*^9}, {3.4994881084202003`*^9, 3.4994881177334003`*^9}, {3.4994884740218*^9, 3.4994884920554*^9}, { 3.4994885948282003`*^9, 3.4994886477434*^9}, {3.4994886790369997`*^9, 3.4994886860257998`*^9}, {3.4994887712953997`*^9, 3.4994887717478*^9}, { 3.6305517490219865`*^9, 3.6305518383945436`*^9}, 3.6305519329151096`*^9, { 3.6305521477354264`*^9, 3.6305521796235647`*^9}, {3.630552211063363*^9, 3.630552234159684*^9}, {3.6305523097380066`*^9, 3.6305523261429453`*^9}, { 3.630552400293186*^9, 3.630552443246643*^9}, {3.6305524899713154`*^9, 3.630552532581753*^9}, {3.630552564078554*^9, 3.630552660703081*^9}, { 3.6308069732471952`*^9, 3.6308070226836824`*^9}, {3.630831568112257*^9, 3.630831577359786*^9}, {3.632037136188613*^9, 3.6320372275628395`*^9}, { 3.632037282822*^9, 3.6320372864142056`*^9}, {3.632037326777514*^9, 3.6320373338819203`*^9}, {3.6320374068820953`*^9, 3.632037461262206*^9}, { 3.632037495368157*^9, 3.6320375996761227`*^9}, {3.632037657282418*^9, 3.6320377668306837`*^9}, {3.6320377993975463`*^9, 3.6320378258790607`*^9}, {3.6320379375314474`*^9, 3.632037944011818*^9}, { 3.632037974774577*^9, 3.63203804108137*^9}, {3.632038115937651*^9, 3.6320381168477035`*^9}, {3.632038171547832*^9, 3.6320381721648674`*^9}, { 3.6320382092969913`*^9, 3.6320382642141323`*^9}, 3.632038311238822*^9, { 3.6320383438376865`*^9, 3.6320384084533825`*^9}, {3.632038502612768*^9, 3.632038536966733*^9}, {3.6320386355663724`*^9, 3.632038663028943*^9}, { 3.6320387578143644`*^9, 3.632038876049127*^9}, {3.632038925681966*^9, 3.6320390116098804`*^9}, {3.6320390559574175`*^9, 3.632039057440502*^9}, { 3.6320390909984217`*^9, 3.6320392794842024`*^9}, {3.6320393098219376`*^9, 3.6320393228646836`*^9}, {3.6320393691423306`*^9, 3.632039469157051*^9}, { 3.6320395408921537`*^9, 3.6320395753041224`*^9}, {3.632039607865985*^9, 3.6320396287681804`*^9}, {3.632039834419943*^9, 3.6320399635053263`*^9}, { 3.632040008307889*^9, 3.632040011081047*^9}, {3.632040111200774*^9, 3.6320401709411907`*^9}, {3.6320402797014112`*^9, 3.6320403974661474`*^9}, {3.6320411172793183`*^9, 3.6320411297080293`*^9}, 3.632041280201637*^9, {3.632041357828077*^9, 3.632041361657296*^9}, { 3.632041402765647*^9, 3.632041437279621*^9}, 3.632041474164731*^9, { 3.6320415074596353`*^9, 3.632041548877004*^9}, {3.6320415931405363`*^9, 3.632041610919553*^9}, {3.632041656484159*^9, 3.6320416691688843`*^9}, { 3.6320420632294235`*^9, 3.6320420791513343`*^9}, {3.6320424482774467`*^9, 3.632042550289282*^9}, {3.632042803353756*^9, 3.632042928840934*^9}, { 3.632042961566806*^9, 3.63204301077662*^9}, {3.632043063037609*^9, 3.6320430712580795`*^9}, {3.632043120691907*^9, 3.632043161148221*^9}, { 3.6320432062678013`*^9, 3.6320432094549837`*^9}, 3.632043258394783*^9, { 3.632043351071084*^9, 3.632043352668175*^9}, {3.6345677461009674`*^9, 3.634568027044036*^9}, 3.634568059784909*^9, {3.6345686692177663`*^9, 3.6345687304812703`*^9}, {3.634568765543276*^9, 3.634568827443816*^9}, { 3.6346120324026976`*^9, 3.6346120417672334`*^9}, {3.6346121382917542`*^9, 3.6346122118989644`*^9}, {3.6346122814849443`*^9, 3.634612333070895*^9}, { 3.634612471677823*^9, 3.634612552263432*^9}, {3.6346125863993845`*^9, 3.6346126554953365`*^9}, {3.634612698763811*^9, 3.634612702163006*^9}, { 3.6348726356017313`*^9, 3.634872755937614*^9}, {3.634877631123617*^9, 3.6348776427762833`*^9}, {3.6348782474488688`*^9, 3.6348782744724145`*^9}, {3.63487832072106*^9, 3.634878440448908*^9}, { 3.6852817264030714`*^9, 3.6852817834531507`*^9}, {3.68794462572165*^9, 3.687944776911862*^9}, {3.6879451060223227`*^9, 3.6879451445423765`*^9}, { 3.6879452810225677`*^9, 3.6879452918025827`*^9}, {3.6879455589529567`*^9, 3.687945567592969*^9}, {3.6879456213830442`*^9, 3.6879456613631*^9}, { 3.6879457292931952`*^9, 3.6879457736132574`*^9}, {3.688022923252344*^9, 3.688023002982456*^9}, {3.6880230753425574`*^9, 3.688023230782775*^9}, 3.688023348002939*^9, {3.688023553833227*^9, 3.6880235620032387`*^9}, { 3.6880236295333333`*^9, 3.6880236382433453`*^9}, 3.6880237756035376`*^9, { 3.688031422416407*^9, 3.688031557816597*^9}, {3.6881117497443466`*^9, 3.688111797854414*^9}, {3.6881166477118034`*^9, 3.688116649471806*^9}, { 3.688118444084318*^9, 3.6881185798545084`*^9}, {3.688118642824597*^9, 3.688118799384816*^9}, {3.688118855204894*^9, 3.688118917084981*^9}, { 3.6881194959182944`*^9, 3.688119497718297*^9}, {3.6881196404384966`*^9, 3.688119655048517*^9}, {3.688119702888584*^9, 3.688119727678619*^9}, { 3.6881200919291286`*^9, 3.6881201295191813`*^9}, {3.6881202044892864`*^9, 3.688120237039332*^9}, {3.688120497669697*^9, 3.688120502989704*^9}, { 3.688120738340034*^9, 3.6881207493700495`*^9}, {3.6882745101002936`*^9, 3.6882745118602962`*^9}, {3.6883042728760366`*^9, 3.688304806616784*^9}, { 3.6883051027271986`*^9, 3.6883051086172066`*^9}, {3.6883054642977047`*^9, 3.6883054716377153`*^9}, {3.688306465909107*^9, 3.6883064729091167`*^9}, { 3.6883066024792986`*^9, 3.6883066550893717`*^9}, {3.6883071311300383`*^9, 3.688307145950059*^9}, 3.6883073798003864`*^9, {3.6887815904603148`*^9, 3.6887816040203333`*^9}, 3.6887816433103886`*^9, {3.6887816741004314`*^9, 3.688781699230467*^9}, {3.6887817847405863`*^9, 3.688781813880627*^9}, { 3.688781885830728*^9, 3.6887819020407505`*^9}, {3.6889574605581684`*^9, 3.688957501788226*^9}, {3.688960184803222*^9, 3.6889601992032423`*^9}, { 3.692771817740493*^9, 3.692771905640616*^9}, {3.6927726676816826`*^9, 3.6927727032617326`*^9}, {3.6927727333717747`*^9, 3.692772736561779*^9}, { 3.692772826191905*^9, 3.692772844901931*^9}, {3.692772893741999*^9, 3.6927728997420073`*^9}, {3.6927729636420975`*^9, 3.692773125862324*^9}, { 3.6927731981924257`*^9, 3.692773236352479*^9}, {3.6927732729025297`*^9, 3.692773282242543*^9}, {3.6927733353526173`*^9, 3.6927734137827272`*^9}, 3.6927736473730545`*^9, {3.6934868115444183`*^9, 3.693486813494421*^9}, { 3.6934868553944798`*^9, 3.693486917754567*^9}, {3.6934869973946786`*^9, 3.693487001174684*^9}, {3.6934870442947445`*^9, 3.6934870479747496`*^9}, { 3.693487349135171*^9, 3.6934873994352417`*^9}, {3.693487456975322*^9, 3.6934874585553246`*^9}, {3.6939897066669016`*^9, 3.6939897907970195`*^9}, {3.6939898244170666`*^9, 3.693989829937074*^9}, { 3.6939901042074585`*^9, 3.693990124237486*^9}, {3.69399018398757*^9, 3.6939902403476486`*^9}, {3.6939902781277018`*^9, 3.69399032732777*^9}, { 3.6939903908278594`*^9, 3.693990609328165*^9}, {3.693990640658209*^9, 3.693990673878256*^9}, {3.693990761178378*^9, 3.6939907769384003`*^9}, { 3.6939908128884506`*^9, 3.6939908380384855`*^9}, {3.6939908895785575`*^9, 3.6939908941885643`*^9}, {3.6939909859386926`*^9, 3.693991001898715*^9}, { 3.6939910395887675`*^9, 3.6939910643988028`*^9}, {3.693991107098862*^9, 3.6939911407889094`*^9}, {3.6939911957989864`*^9, 3.6939913838692493`*^9}, {3.6939918465598974`*^9, 3.693991856479911*^9}, { 3.6939919173699965`*^9, 3.6939919296100135`*^9}, {3.693991979330083*^9, 3.693992022780144*^9}, {3.6939921266502895`*^9, 3.6939921416103106`*^9}, { 3.6939921886903763`*^9, 3.693992235260442*^9}, {3.6939924451107354`*^9, 3.6939924757207785`*^9}, {3.6939925308708553`*^9, 3.693992535490862*^9}, { 3.69408137357989*^9, 3.6940813990399256`*^9}, {3.694081492270056*^9, 3.694081500430067*^9}, 3.694085807686309*^9, 3.694336369074993*^9, { 3.694336447585103*^9, 3.694336534165224*^9}, {3.6943365695452733`*^9, 3.694336572935278*^9}, {3.6943366355853662`*^9, 3.694336663395405*^9}, { 3.694336707865467*^9, 3.694336813505615*^9}, {3.6943368708856955`*^9, 3.694336972645838*^9}, {3.694337005795884*^9, 3.69433752400661*^9}, { 3.694337943297197*^9, 3.6943379730472383`*^9}, {3.694338096757412*^9, 3.694338100087416*^9}, {3.6943381564174953`*^9, 3.694338172057517*^9}, { 3.6943382111375713`*^9, 3.6943382179975815`*^9}, {3.694338370357795*^9, 3.694338415207857*^9}, {3.694338519908004*^9, 3.694338533448023*^9}, { 3.694338742738316*^9, 3.6943387845683746`*^9}, {3.6943388672484903`*^9, 3.694338909398549*^9}, {3.6943394389592905`*^9, 3.694339477079344*^9}, { 3.6943395685694723`*^9, 3.6943395881794996`*^9}, 3.6943396627096043`*^9, { 3.694339797119792*^9, 3.6943398030098004`*^9}, {3.6943398885999203`*^9, 3.6943400438301373`*^9}, {3.6943517756956816`*^9, 3.694351778765686*^9}, { 3.694351814965737*^9, 3.694351920335884*^9}, {3.6943520375260487`*^9, 3.694352038046049*^9}, {3.6943546301696777`*^9, 3.694354641489694*^9}, { 3.6943547065797853`*^9, 3.694354780889889*^9}, {3.694415922397947*^9, 3.694415933787963*^9}, {3.6944160021080585`*^9, 3.6944160163480783`*^9}, { 3.6944161612482815`*^9, 3.694416186218316*^9}, {3.6944162181183605`*^9, 3.694416241358393*^9}, {3.694416776009142*^9, 3.694416778289145*^9}, { 3.694417304849882*^9, 3.694417340579932*^9}, {3.6944179310727587`*^9, 3.6944179657728076`*^9}, {3.6944182927132654`*^9, 3.694418302313279*^9}, { 3.6944316170705633`*^9, 3.6944316923568697`*^9}, {3.6944318163219357`*^9, 3.694431820105152*^9}, {3.6965609549111967`*^9, 3.696560966061212*^9}, { 3.696560998851258*^9, 3.6965610020812626`*^9}, {3.6965611422314587`*^9, 3.696561159171482*^9}, 3.696563445644683*^9, {3.6965635186347857`*^9, 3.6965635322048044`*^9}, {3.696563569074856*^9, 3.6965635745148635`*^9}, { 3.696563720555068*^9, 3.69656372185507*^9}, {3.6965637807551527`*^9, 3.696563824135213*^9}, {3.6965639935254507`*^9, 3.696564031985504*^9}, { 3.696596096992402*^9, 3.696596186502527*^9}, {3.696596234252594*^9, 3.696596260452631*^9}, {3.6965963110027018`*^9, 3.69659632407272*^9}, 3.6965963803627987`*^9, {3.7244123642779827`*^9, 3.7244123648119507`*^9}, { 3.7255912428848085`*^9, 3.7255912492295227`*^9}, {3.725591466627203*^9, 3.725591704636403*^9}, {3.7255917405776634`*^9, 3.7255917613142586`*^9}, { 3.7255980783777914`*^9, 3.7255980873943977`*^9}, {3.725598135321295*^9, 3.7255981566673255`*^9}, {3.7255985463958807`*^9, 3.7255985750395555`*^9}, {3.725598660297285*^9, 3.725598669548276*^9}, { 3.7255989613446465`*^9, 3.7255989963014574`*^9}, {3.7255990922803245`*^9, 3.725599092624111*^9}, {3.7255991287997694`*^9, 3.7255991802271013`*^9}, 3.7255992673973975`*^9, {3.725599302619891*^9, 3.725599630275236*^9}, { 3.7255996917974653`*^9, 3.725600173598138*^9}, {3.72560026574846*^9, 3.7256002767652473`*^9}, 3.7256003308803263`*^9, {3.7256003995281887`*^9, 3.72560041238892*^9}, {3.725600503405278*^9, 3.725600537768276*^9}, { 3.72560062249599*^9, 3.725600660390954*^9}, {3.7256015423497496`*^9, 3.725601551460086*^9}, {3.725602674641403*^9, 3.725602676188448*^9}, { 3.725606737765007*^9, 3.7256067379681726`*^9}, {3.7259411263577843`*^9, 3.725941161974596*^9}, {3.7259413328141994`*^9, 3.7259413530325947`*^9}, { 3.725948620999795*^9, 3.7259486419857845`*^9}, 3.7259487502361426`*^9, { 3.725948801316684*^9, 3.7259488049789305`*^9}, {3.7259488747343755`*^9, 3.7259488880408845`*^9}, {3.7262144247900543`*^9, 3.7262144477456355`*^9}, {3.7574170493225684`*^9, 3.757417053184463*^9}, { 3.7831421588326306`*^9, 3.783142170925208*^9}, {3.783142395749114*^9, 3.7831425154306135`*^9}, {3.7831425557309313`*^9, 3.783142564092332*^9}, { 3.7831427526814885`*^9, 3.783142754255293*^9}, {3.7831428098757677`*^9, 3.7831428571042147`*^9}, {3.7834087348068304`*^9, 3.783408793037257*^9}, { 3.7834095081721888`*^9, 3.783409552999109*^9}, {3.783409588525758*^9, 3.7834095907684803`*^9}, {3.783409662061564*^9, 3.7834096810274954`*^9}, { 3.7834097163188562`*^9, 3.7834098893742294`*^9}, {3.7834100221449327`*^9, 3.783410060241215*^9}, {3.7834101051335173`*^9, 3.7834101131745987`*^9}, { 3.783410606354042*^9, 3.783410612361685*^9}, {3.783410755716464*^9, 3.7834107918890605`*^9}, {3.7834108581708117`*^9, 3.7834108764020586`*^9}, {3.783656780899205*^9, 3.783656816754212*^9}, { 3.783656906347945*^9, 3.783656914312093*^9}, {3.783657051037856*^9, 3.7836572912656827`*^9}, {3.783657346545521*^9, 3.7836573583072553`*^9}, { 3.783657399653203*^9, 3.783657405924858*^9}, {3.78365743635863*^9, 3.783657444445655*^9}, {3.783657544607131*^9, 3.7836575974442415`*^9}, { 3.784785690868435*^9, 3.7847857118559847`*^9}, {3.7847931085113173`*^9, 3.7847931143650365`*^9}, {3.784793162925936*^9, 3.784793168863771*^9}, { 3.788250819548458*^9, 3.7882508340994453`*^9}, {3.788250923421962*^9, 3.788250985225994*^9}, {3.789021541724124*^9, 3.789021542741435*^9}, { 3.814675243788579*^9, 3.81467524657043*^9}, {3.814675296484918*^9, 3.8146753026102443`*^9}, 3.8146767508872194`*^9, {3.8146767833631124`*^9, 3.8146768340288363`*^9}, {3.8146768678429646`*^9, 3.814676881416951*^9}, { 3.819778869762148*^9, 3.8197788819676495`*^9}, {3.8200281551494493`*^9, 3.8200282443038893`*^9}, 3.820028306018581*^9, {3.820028830464693*^9, 3.820028898308877*^9}, {3.8436188654069076`*^9, 3.843618871317108*^9}, { 3.8469114507424884`*^9, 3.8469114924591775`*^9}, {3.846911710003416*^9, 3.846911730341361*^9}, {3.846912038982461*^9, 3.846912051966134*^9}, { 3.8469120857716913`*^9, 3.8469120984335556`*^9}, 3.846912467488207*^9, { 3.846912605028914*^9, 3.8469126582335243`*^9}, {3.846912823206394*^9, 3.8469128572750063`*^9}, {3.8469129263437014`*^9, 3.8469129533099966`*^9}, 3.846913299667283*^9, {3.8469133963598742`*^9, 3.8469134147191906`*^9}, { 3.8469134714459963`*^9, 3.8469134727490387`*^9}, {3.846913563275012*^9, 3.8469135761291294`*^9}, {3.847105214587804*^9, 3.847105223753584*^9}, { 3.8471055237950907`*^9, 3.8471055304047117`*^9}, {3.847105638827262*^9, 3.8471056537154665`*^9}, {3.847106253534446*^9, 3.8471062610359097`*^9}, { 3.8471075005414257`*^9, 3.8471075008503447`*^9}}, CellLabel-> "In[158]:=",ExpressionUUID->"1f23d366-38cf-4fdd-8e27-a7ba9a73dc22"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Alpha]", ",", "\[Beta]", ",", "xg", ",", "yg", ",", "jac", ",", "x3", ",", "y3", ",", "x6", ",", "y6", ",", "x", ",", "y", ",", "K3", ",", "N3", ",", "N6", ",", "u", ",", "v", ",", "\[Psi]", ",", "E\[Sigma]", ",", "\[Delta]w", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wmap", ",", "NN", ",", "FF", ",", "\[Epsilon]\[Epsilon]", ",", "tri"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"mapping", " ", "for", " ", "the", " ", "geometry"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"x3", "=", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1", ",", "1"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"y3", "=", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1", ",", "2"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"K3", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"xg", "=", RowBox[{"K3", ".", "x3"}]}], ";", "\[IndentingNewLine]", RowBox[{"yg", "=", RowBox[{"K3", ".", "y3"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "xg"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "xg"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "yg"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "yg"}]}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"x6", "=", RowBox[{"Join", "[", RowBox[{"x3", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Mean", "[", "#", "]"}], "&"}], ",", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"x3", ",", RowBox[{"RotateLeft", "[", "x3", "]"}]}], "}"}], "]"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"y6", " ", "=", RowBox[{"Join", "[", RowBox[{"y3", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Mean", "[", "#", "]"}], "&"}], ",", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"y3", ",", RowBox[{"RotateLeft", "[", "y3", "]"}]}], "}"}], "]"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"N3", "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",", "x3", ",", "y3"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"1", ",", "x", ",", "y"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N6", "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1"}], "}"}], ",", "x6", ",", "y6", ",", RowBox[{"x6", "*", "y6"}], ",", RowBox[{"x6", "^", "2"}], ",", RowBox[{"y6", "^", "2"}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"1", ",", "x", ",", "y", ",", RowBox[{"x", "*", "y"}], ",", RowBox[{"x", "^", "2"}], ",", RowBox[{"y", "^", "2"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"N6", ".", RowBox[{"Join", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}], "]"}]}], "}"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"N6", ".", RowBox[{"Join", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}], "]"}]}], "}"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{"N3", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Epsilon]\[Epsilon]", "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "y"], "v"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}], "-", "\[Psi]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "u"}], "+", "\[Psi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]\[Nu]", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]\[Nu]", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"tt", "*", RowBox[{"E\[Sigma]", ".", "\[Epsilon]\[Epsilon]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"(", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Epsilon]\[Epsilon]", "]"}], ".", "NN"}]}], ")"}], " ", "/.", " ", RowBox[{"{", RowBox[{ RowBox[{"x", "\[Rule]", "xg"}], ",", RowBox[{"y", "\[Rule]", "yg"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", "u", "]"}], "*", "fX"}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "v", "]"}], "*", "fY"}]}], ")"}], "/.", " ", RowBox[{"{", RowBox[{ RowBox[{"x", "\[Rule]", "xg"}], ",", RowBox[{"y", "\[Rule]", "yg"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"{", RowBox[{"TWODIM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Triangle", "[", "node_", "]"}]}], "}"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"TWODIM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", "tt", "}"}], ",", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "}"}], ",", RowBox[{"Triangle", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"TWODIM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Triangle", "[", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r", ",", "e1", ",", "e2", ",", "nn", ",", "FF", ",", "FFINV", ",", "jac", ",", "uvw", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "EEEE", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", " ", "=", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I3"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"e1", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}]}], ";", " ", RowBox[{"e2", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], ";", " ", RowBox[{"e3", "=", RowBox[{"e1", StyleBox["\[Cross]", "OperatorCharacter"], "e2"}]}], ";", "\[IndentingNewLine]", RowBox[{"nn", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"e3", "/", RowBox[{"Sqrt", "[", RowBox[{"e3", ".", "e3"}], "]"}]}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e1", ",", " ", "e2", ",", "nn"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "gradient", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Plane", " ", "stress", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MODE", "===", "DISP"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}], "*", "tt"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"Simplify", "[", RowBox[{"\[Sigma]", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}], "]"}], "]"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Triangle", "[", "node_", "]"}]}], "}"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", "tt", "}"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "mX", ",", "mY", ",", "mZ"}], "}"}]}], "}"}], ",", RowBox[{"Triangle", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Triangle", "[", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r", ",", "e1", ",", "e2", ",", "e3", ",", "nn", ",", "PP", ",", "FF", ",", "FFINV", ",", "jac", ",", "uvw", ",", "\[Phi]\[Theta]\[Psi]", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "EEEE", ",", "EECC", ",", "CCEE", ",", "CCCC", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", " ", "=", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I3"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"e1", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}]}], ";", " ", RowBox[{"e2", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], ";", " ", RowBox[{"e3", "=", RowBox[{"e1", StyleBox["\[Cross]", "OperatorCharacter"], "e2"}]}], ";", "\[IndentingNewLine]", RowBox[{"nn", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"e3", "/", RowBox[{"Sqrt", "[", RowBox[{"e3", ".", "e3"}], "]"}]}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e1", ",", " ", "e2", ",", "nn"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"PP", "=", RowBox[{"LeviCivitaTensor", "[", "3", "]"}]}], ";", " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]\[Theta]\[Psi]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "gradient", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{ RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw"}]}], "}"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"PP", ".", "nn"}], ")"}], "*", RowBox[{"(", RowBox[{"nn", ".", "\[Phi]\[Theta]\[Psi]"}], ")"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Plane", " ", "stress", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], "]"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EECC", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{"i", ",", "j", ",", "l", ",", "k"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"CCEE", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{"j", ",", "i", ",", "k", ",", "l"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"CCCC", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{"j", ",", "i", ",", "l", ",", "k"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"tt", "*", RowBox[{"Simplify", "[", RowBox[{"EEEE", "-", RowBox[{ RowBox[{"(", RowBox[{"EEEE", ".", "nn"}], ")"}], ".", RowBox[{"Inverse", "[", RowBox[{"nn", ".", "EEEE", ".", "nn"}], "]"}], ".", RowBox[{"(", RowBox[{"nn", ".", "EEEE"}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"EECC", ".", "nn"}], ")"}], ".", RowBox[{"Inverse", "[", RowBox[{"nn", ".", "CCCC", ".", "nn"}], "]"}], ".", RowBox[{"(", RowBox[{"nn", ".", "CCEE"}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EEEE", ".", "nn"}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "nn", ",", "nn"}], "]"}], "*", RowBox[{"1", "/", RowBox[{"(", RowBox[{"nn", ".", RowBox[{"(", RowBox[{"nn", ".", "EEEE", ".", "nn"}], ")"}], ".", "nn"}], ")"}]}]}], ")"}], ".", RowBox[{"(", RowBox[{"nn", ".", "EEEE"}], ")"}]}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "\[Phi]\[Theta]\[Psi]", "]"}], ".", RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"EMS", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "Mz_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "nodes_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r", ",", "e1", ",", "e2", ",", "e3", ",", "nn", ",", "PP", ",", "FF", ",", "FFINV", ",", "jac", ",", "uvw", ",", "\[Phi]\[Theta]\[Psi]", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "EEEE", ",", "EECC", ",", "CCEE", ",", "CCCC", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"Length", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", "3", "]"}], "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}]}], "}"}]}], ";", RowBox[{ RowBox[{"NN", "[", "4", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"INT", "[", "3", "]"}], "=", "TRI7"}], ";", RowBox[{ RowBox[{"INT", "[", "4", "]"}], "=", "REC9"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"MID", "[", "3", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"MID", "[", "4", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{ RowBox[{"NN", "[", "nl", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"e1", ",", "e2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], "}"}], " ", "/.", RowBox[{"MID", "[", "nl", "]"}]}]}], ";", "\[IndentingNewLine]", " ", RowBox[{"e3", "=", RowBox[{"e1", StyleBox["\[Cross]", "OperatorCharacter"], "e2"}]}], ";", "\[IndentingNewLine]", RowBox[{"nn", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"e3", "/", RowBox[{"Sqrt", "[", RowBox[{"e3", ".", "e3"}], "]"}]}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e1", ",", " ", "e2", ",", "nn"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"PP", "=", RowBox[{"LeviCivitaTensor", "[", "3", "]"}]}], ";", " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]\[Theta]\[Psi]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "gradient", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{ RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw"}]}], "}"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"PP", ".", "nn"}], ")"}], "*", RowBox[{"(", RowBox[{"nn", ".", "\[Phi]\[Theta]\[Psi]"}], ")"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Plane", " ", "stress", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], "]"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EECC", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{"i", ",", "j", ",", "l", ",", "k"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"CCEE", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{"j", ",", "i", ",", "k", ",", "l"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"CCCC", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{"j", ",", "i", ",", "l", ",", "k"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"tt", "*", RowBox[{"Simplify", "[", RowBox[{"EEEE", "-", RowBox[{ RowBox[{"(", RowBox[{"EEEE", ".", "nn"}], ")"}], ".", RowBox[{"Inverse", "[", RowBox[{"nn", ".", "EEEE", ".", "nn"}], "]"}], ".", RowBox[{"(", RowBox[{"nn", ".", "EEEE"}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"EECC", ".", "nn"}], ")"}], ".", RowBox[{"Inverse", "[", RowBox[{"nn", ".", "CCCC", ".", "nn"}], "]"}], ".", RowBox[{"(", RowBox[{"nn", ".", "CCEE"}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"EEEE", ".", "nn"}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "nn", ",", "nn"}], "]"}], "*", RowBox[{"1", "/", RowBox[{"(", RowBox[{"nn", ".", RowBox[{"(", RowBox[{"nn", ".", "EEEE", ".", "nn"}], ")"}], ".", "nn"}], ")"}]}]}], ")"}], ".", RowBox[{"(", RowBox[{"nn", ".", "EEEE"}], ")"}]}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"non", "-", RowBox[{"symmetric", " ", "stress"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "\[Phi]\[Theta]\[Psi]", "]"}], ".", RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", "model_"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"\[Epsilon]0_", ",", "\[Lambda]\[Lambda]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "node_", "]"}]}], "}"}]}], "]"}], ":=", RowBox[{ RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "ns", ",", "enode", " ", ",", "NN", ",", "\[Alpha]", ",", "\[Beta]", ",", "X", ",", "Y", ",", "r", ",", "FF", ",", "FFINV", ",", "PP", ",", "jac", ",", "uv", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Rho]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "EEEE", ",", "IIII", ",", "II", ",", "IIII1", ",", "IIII2", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wlag"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ns", " ", "=", RowBox[{"Dimensions", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"enode", " ", "=", RowBox[{"Flatten", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "*", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", "*", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "*", "\[Beta]"}], ",", RowBox[{"\[Alpha]", "*", "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"X", ",", "Y"}], "}"}], "=", RowBox[{"r", "=", RowBox[{ RowBox[{"NN", "[", "ns", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "1", ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "]"}], "]"}]}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], "}"}], "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uv", "=", RowBox[{ RowBox[{"NN", "[", "ns", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "2", ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "gradient", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uv"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uv"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"plane", "-", RowBox[{ "stress", " ", "or", " ", "strain", " ", "symmetric", " ", "elasticity", " ", "dyad"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"II", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII1", "=", RowBox[{"Outer", "[", RowBox[{"Times", ",", "II", ",", "II"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "i", ",", "j", ",", "j", ",", "i"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "II"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "II"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII2", "=", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}], "+", RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"j", ",", "i", ",", "k", ",", "l"}], "]"}], "]"}], "+", RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"i", ",", "j", ",", "l", ",", "k"}], "]"}], "]"}], "+", RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"j", ",", "i", ",", "l", ",", "k"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "2"}], "}"}]}], "]"}], "/", "4"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{ RowBox[{"tt", "[", RowBox[{"X", ",", "Y"}], "]"}], "*", RowBox[{ RowBox[{"EE", "[", RowBox[{"X", ",", "Y"}], "]"}], "/", RowBox[{"(", RowBox[{"1", "+", RowBox[{"\[Nu]\[Nu]", "[", RowBox[{"X", ",", "Y"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Nu]\[Nu]", "[", RowBox[{"X", ",", "Y"}], "]"}], "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "[", RowBox[{"X", ",", "Y"}], "]"}]}], ")"}]}], "*", "IIII1"}], "+", "IIII2"}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"model", "===", "strain"}], ",", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{ RowBox[{"tt", "[", RowBox[{"X", ",", "Y"}], "]"}], "*", RowBox[{ RowBox[{"EE", "[", RowBox[{"X", ",", "Y"}], "]"}], "/", RowBox[{"(", RowBox[{"1", "+", RowBox[{"\[Nu]\[Nu]", "[", RowBox[{"X", ",", "Y"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Nu]\[Nu]", "[", RowBox[{"X", ",", "Y"}], "]"}], "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"2", "*", RowBox[{"\[Nu]\[Nu]", "[", RowBox[{"X", ",", "Y"}], "]"}]}]}], ")"}]}], "*", "IIII1"}], "+", "IIII2"}], ")"}]}]}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]0", "[", RowBox[{"X", ",", "Y"}], "]"}], "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}], "+", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "2"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MODE", "\[Equal]", "DISP"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]wext", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uv", "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"fX", "[", RowBox[{"X", ",", "Y"}], "]"}], ",", RowBox[{"fY", "[", RowBox[{"X", ",", "Y"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wlag", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Lambda]\[Lambda]", "[", RowBox[{"X", ",", "Y"}], "]"}], "]"}], ".", "uv"}], "+", RowBox[{ RowBox[{"\[Lambda]\[Lambda]", "[", RowBox[{"X", ",", "Y"}], "]"}], ".", RowBox[{"\[Delta]", "[", "uv", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"QUAD", "[", RowBox[{"LIN3", ",", RowBox[{"QUAD", "[", RowBox[{"LIN3", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wext", "+", "\[Delta]wint", "+", "\[Delta]wlag"}], ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}], ",", RowBox[{"{", "\[Beta]", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", "\[Delta]WW", "]"}]}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MODE", "\[Equal]", "POSTP"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"QUAD", "[", RowBox[{"LIN3", ",", RowBox[{"QUAD", "[", RowBox[{"LIN3", ",", RowBox[{"\[Sigma]", "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}], ",", RowBox[{"{", "\[Beta]", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", "\[Delta]WW", "]"}]}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "at", " ", "the", " ", "centerpoint"}], "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MODE", "\[Equal]", "STRESS"}], ",", RowBox[{"Return", "[", RowBox[{"\[Sigma]", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}], "]"}]}], "]"}]}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", "]"}], "/;", " ", RowBox[{ RowBox[{"Dimensions", "[", "node", "]"}], "\[Equal]", RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}]}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"computational", " ", "homogenization", " ", "element"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{"tt_", ",", "\[Epsilon]0_", ",", "\[Lambda]\[Lambda]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "node_", "]"}]}], "}"}]}], "]"}], ":=", RowBox[{ RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "ns", ",", "NN", ",", "\[Alpha]", ",", "\[Beta]", ",", "X", ",", "Y", ",", "r", ",", "FF", ",", "FFINV", ",", "PP", ",", "jac", ",", "uv", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "s", ",", "\[Rho]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "EEEE", ",", "IIII", ",", "II", ",", "IIII1", ",", "IIII2", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wlag"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ns", " ", "=", RowBox[{"Length", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", "3", "]"}], "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", "6", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"1", "+", RowBox[{"2", " ", SuperscriptBox["\[Beta]", "2"]}], "-", RowBox[{"3", " ", "\[Alpha]"}], "+", RowBox[{"2", " ", SuperscriptBox["\[Alpha]", "2"]}], "+", RowBox[{"\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "3"}], "+", RowBox[{"4", " ", "\[Alpha]"}]}], ")"}]}]}], ",", RowBox[{"\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}]}], ",", RowBox[{"\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "4"}], " ", "\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]", "+", "\[Alpha]"}], ")"}]}], ",", RowBox[{"4", " ", "\[Beta]", " ", "\[Alpha]"}], ",", RowBox[{ RowBox[{"-", "4"}], " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]", "+", "\[Alpha]"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"X", ",", "Y"}], "}"}], "=", RowBox[{"r", "=", RowBox[{ RowBox[{"NN", "[", "ns", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "1", ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "]"}], "]"}]}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], "}"}], "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uv", "=", RowBox[{ RowBox[{"NN", "[", "ns", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2", ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "gradient", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uv"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uv"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"plane", "-", RowBox[{ "stress", " ", "or", " ", "strain", " ", "symmetric", " ", "elasticity", " ", "dyad"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"II", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII1", "=", RowBox[{"Outer", "[", RowBox[{"Times", ",", "II", ",", "II"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "i", ",", "j", ",", "j", ",", "i"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "II"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "II"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII2", "=", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}], "+", RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"j", ",", "i", ",", "k", ",", "l"}], "]"}], "]"}], "+", RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"i", ",", "j", ",", "l", ",", "k"}], "]"}], "]"}], "+", RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"j", ",", "i", ",", "l", ",", "k"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "2"}], "}"}]}], "]"}], "/", "4"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{ RowBox[{"tt", "[", RowBox[{"X", ",", "Y"}], "]"}], "*", RowBox[{ RowBox[{"EE", "[", RowBox[{"X", ",", "Y"}], "]"}], "/", RowBox[{"(", RowBox[{"1", "+", RowBox[{"\[Nu]\[Nu]", "[", RowBox[{"X", ",", "Y"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Nu]\[Nu]", "[", RowBox[{"X", ",", "Y"}], "]"}], "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "[", RowBox[{"X", ",", "Y"}], "]"}]}], ")"}]}], "*", "IIII1"}], "+", "IIII2"}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"model", "===", "strain"}], ",", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{ RowBox[{"tt", "[", RowBox[{"X", ",", "Y"}], "]"}], "*", RowBox[{ RowBox[{"EE", "[", RowBox[{"X", ",", "Y"}], "]"}], "/", RowBox[{"(", RowBox[{"1", "+", RowBox[{"\[Nu]\[Nu]", "[", RowBox[{"X", ",", "Y"}], "]"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Nu]\[Nu]", "[", RowBox[{"X", ",", "Y"}], "]"}], "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"2", "*", RowBox[{"\[Nu]\[Nu]", "[", RowBox[{"X", ",", "Y"}], "]"}]}]}], ")"}]}], "*", "IIII1"}], "+", "IIII2"}], ")"}]}]}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]0", "[", RowBox[{"X", ",", "Y"}], "]"}], "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}], "+", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "2"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MODE", "\[Equal]", "DISP"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]wext", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uv", "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"fX", "[", RowBox[{"X", ",", "Y"}], "]"}], ",", RowBox[{"fY", "[", RowBox[{"X", ",", "Y"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wlag", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Lambda]\[Lambda]", "[", RowBox[{"X", ",", "Y"}], "]"}], "]"}], ".", "uv"}], "+", RowBox[{ RowBox[{"\[Lambda]\[Lambda]", "[", RowBox[{"X", ",", "Y"}], "]"}], ".", RowBox[{"\[Delta]", "[", "uv", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wext", "+", "\[Delta]wint", "+", "\[Delta]wlag"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", "\[Delta]WW", "]"}]}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MODE", "\[Equal]", "POSTP"}], ",", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{"\[Sigma]", "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}], ";", RowBox[{"Return", "[", "\[Delta]WW", "]"}]}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "at", " ", "the", " ", "centerpoint"}], "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MODE", "\[Equal]", "STRESS"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"s", "=", RowBox[{"\[Sigma]", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{ RowBox[{"s", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", RowBox[{"s", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"s", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"s", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "2"}]}], "}"}], "]"}]}]}], "]"}]}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", "]"}], "/;", " ", RowBox[{ RowBox[{ RowBox[{"Dimensions", "[", "node", "]"}], "\[Equal]", RowBox[{"{", "3", "}"}]}], " ", "||", RowBox[{ RowBox[{"Dimensions", "[", "node", "]"}], "\[Equal]", RowBox[{"{", "6", "}"}]}]}]}]}], " ", ";"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4426473093646455`*^9, 3.4426474078630457`*^9}, { 3.4426597184894*^9, 3.4426597783310003`*^9}, {3.442659859139*^9, 3.4426599679021997`*^9}, {3.4426601154852*^9, 3.442660125282*^9}, 3.4426603153866*^9, {3.4426606694491997`*^9, 3.442660676984*^9}, { 3.4426607660341997`*^9, 3.442660767017*^9}, {3.4426607970782003`*^9, 3.4426609236566*^9}, {3.4426609993859997`*^9, 3.442661000946*^9}, { 3.4426611720156*^9, 3.4426611866796*^9}, {3.4426612192836*^9, 3.4426612396104*^9}, {3.4426613536776*^9, 3.4426613563764*^9}, { 3.4426613962188*^9, 3.4426613966556*^9}, {3.443184440921*^9, 3.4431845165186*^9}, {3.4431848052298*^9, 3.4431848237002*^9}, { 3.4431849834618*^9, 3.4431849851934*^9}, {3.4431850342574*^9, 3.4431850385318003`*^9}, {3.4444402127514*^9, 3.4444402360889997`*^9}, { 3.44509636787*^9, 3.445096458974*^9}, {3.4450965569264*^9, 3.4450965855056*^9}, {3.4450966736612*^9, 3.4450967018348*^9}, 3.4450967876972*^9, {3.4451000792358*^9, 3.4451001019962*^9}, { 3.445132280975*^9, 3.4451322867782*^9}, 3.4451325631488*^9, 3.4451346101028*^9, {3.4455261966926003`*^9, 3.4455262691078*^9}, { 3.4455263543462*^9, 3.445526490113*^9}, {3.4455265305794*^9, 3.4455265347602*^9}, {3.4455267552349997`*^9, 3.4455267826754*^9}, 3.445526922233*^9, {3.445527218711*^9, 3.4455272895818*^9}, { 3.4455273640094*^9, 3.445527481259*^9}, 3.4455276192202*^9, { 3.4455278074376*^9, 3.4455278187164*^9}, {3.4455279660896*^9, 3.4455279742016*^9}, 3.4455280249016*^9, 3.4455285464407997`*^9, { 3.4461837560238*^9, 3.4461837697986*^9}, {3.446183892165*^9, 3.4461839004486*^9}, {3.4461839570142*^9, 3.4461841265550003`*^9}, 3.4461841729182*^9, {3.4461842101398*^9, 3.4461842206074*^9}, { 3.4461845241088*^9, 3.4461845410972*^9}, {3.4461845879440002`*^9, 3.4461847021516*^9}, {3.4461848428032*^9, 3.4461848544096003`*^9}, { 3.4461849111956*^9, 3.4461849123344*^9}, {3.4461850134868*^9, 3.446185058608*^9}, {3.4461852067616*^9, 3.446185223282*^9}, { 3.4461852548876*^9, 3.4461852626408*^9}, {3.4461853186604*^9, 3.446185320392*^9}, {3.4512642010481997`*^9, 3.451264207413*^9}, { 3.4512642788766003`*^9, 3.4512643136334*^9}, {3.4512643770006*^9, 3.4512644269362*^9}, {3.4512646983138*^9, 3.4512647384994*^9}, { 3.4512647823354*^9, 3.4512647868126*^9}, {3.4939932066616*^9, 3.4939932082060003`*^9}, {3.4939932399988003`*^9, 3.4939932614955997`*^9}, {3.493993300014*^9, 3.4939933073304*^9}, { 3.4939933992174*^9, 3.4939934078129997`*^9}, {3.4939934932314*^9, 3.493993515009*^9}, {3.4939935468556004`*^9, 3.493993568543*^9}, { 3.4939936486404*^9, 3.4939936621812*^9}, {3.4940328887262*^9, 3.4940328895218*^9}, {3.499487154582*^9, 3.49948716324*^9}, { 3.4994872083708*^9, 3.499487247324*^9}, {3.4994872822368*^9, 3.4994873816244*^9}, 3.499487417676*^9, {3.4994878504918003`*^9, 3.4994879045458*^9}, {3.4994879529370003`*^9, 3.4994879707794*^9}, { 3.4994880482042*^9, 3.4994880616826*^9}, {3.4994881084202003`*^9, 3.4994881177334003`*^9}, {3.4994884740218*^9, 3.4994884920554*^9}, { 3.4994885948282003`*^9, 3.4994886477434*^9}, {3.4994886790369997`*^9, 3.4994886860257998`*^9}, {3.4994887712953997`*^9, 3.4994887717478*^9}, { 3.6305517490219865`*^9, 3.6305518383945436`*^9}, 3.6305519329151096`*^9, { 3.6305521477354264`*^9, 3.6305521796235647`*^9}, {3.630552211063363*^9, 3.630552234159684*^9}, {3.6305523097380066`*^9, 3.6305523261429453`*^9}, { 3.630552400293186*^9, 3.630552443246643*^9}, {3.6305524899713154`*^9, 3.630552532581753*^9}, {3.630552564078554*^9, 3.630552660703081*^9}, { 3.6308069732471952`*^9, 3.6308070226836824`*^9}, {3.630831568112257*^9, 3.630831577359786*^9}, {3.632037136188613*^9, 3.6320372275628395`*^9}, { 3.632037282822*^9, 3.6320372864142056`*^9}, {3.632037326777514*^9, 3.6320373338819203`*^9}, {3.6320374068820953`*^9, 3.632037461262206*^9}, { 3.632037495368157*^9, 3.6320375996761227`*^9}, {3.632037657282418*^9, 3.6320377668306837`*^9}, {3.6320377993975463`*^9, 3.6320378258790607`*^9}, {3.6320379375314474`*^9, 3.632037944011818*^9}, { 3.632037974774577*^9, 3.63203804108137*^9}, {3.632038115937651*^9, 3.6320381168477035`*^9}, {3.632038171547832*^9, 3.6320381721648674`*^9}, { 3.6320382092969913`*^9, 3.6320382642141323`*^9}, 3.632038311238822*^9, { 3.6320383438376865`*^9, 3.6320384084533825`*^9}, {3.632038502612768*^9, 3.632038536966733*^9}, {3.6320386355663724`*^9, 3.632038663028943*^9}, { 3.6320387578143644`*^9, 3.632038876049127*^9}, {3.632038925681966*^9, 3.6320390116098804`*^9}, {3.6320390559574175`*^9, 3.632039057440502*^9}, { 3.6320390909984217`*^9, 3.6320392794842024`*^9}, {3.6320393098219376`*^9, 3.6320393228646836`*^9}, {3.6320393691423306`*^9, 3.632039469157051*^9}, { 3.6320395408921537`*^9, 3.6320395753041224`*^9}, {3.632039607865985*^9, 3.6320396287681804`*^9}, {3.632039834419943*^9, 3.6320399635053263`*^9}, { 3.632040008307889*^9, 3.632040011081047*^9}, {3.632040111200774*^9, 3.6320401709411907`*^9}, {3.6320402797014112`*^9, 3.6320403974661474`*^9}, {3.6320411172793183`*^9, 3.6320411297080293`*^9}, 3.632041280201637*^9, {3.632041357828077*^9, 3.632041361657296*^9}, { 3.632041402765647*^9, 3.632041437279621*^9}, 3.632041474164731*^9, { 3.6320415074596353`*^9, 3.632041548877004*^9}, {3.6320415931405363`*^9, 3.632041610919553*^9}, {3.632041656484159*^9, 3.6320416691688843`*^9}, { 3.6320420632294235`*^9, 3.6320420791513343`*^9}, {3.6320424482774467`*^9, 3.632042550289282*^9}, {3.632042803353756*^9, 3.632042928840934*^9}, { 3.632042961566806*^9, 3.63204301077662*^9}, {3.632043063037609*^9, 3.6320430712580795`*^9}, {3.632043120691907*^9, 3.632043161148221*^9}, { 3.6320432062678013`*^9, 3.6320432094549837`*^9}, 3.632043258394783*^9, { 3.632043351071084*^9, 3.632043352668175*^9}, {3.6345677461009674`*^9, 3.634568027044036*^9}, 3.634568059784909*^9, {3.6345686692177663`*^9, 3.6345687304812703`*^9}, {3.634568765543276*^9, 3.634568827443816*^9}, { 3.6346120324026976`*^9, 3.6346120417672334`*^9}, {3.6346121382917542`*^9, 3.6346122118989644`*^9}, {3.6346122814849443`*^9, 3.634612333070895*^9}, { 3.634612471677823*^9, 3.634612552263432*^9}, {3.6346125863993845`*^9, 3.6346126554953365`*^9}, {3.634612698763811*^9, 3.634612702163006*^9}, { 3.6348726356017313`*^9, 3.634872755937614*^9}, {3.634877631123617*^9, 3.6348776427762833`*^9}, {3.6348782474488688`*^9, 3.6348782744724145`*^9}, {3.63487832072106*^9, 3.634878440448908*^9}, { 3.6852817264030714`*^9, 3.6852817834531507`*^9}, {3.68794462572165*^9, 3.687944776911862*^9}, {3.6879451060223227`*^9, 3.6879451445423765`*^9}, { 3.6879452810225677`*^9, 3.6879452918025827`*^9}, {3.6879455589529567`*^9, 3.687945567592969*^9}, {3.6879456213830442`*^9, 3.6879456613631*^9}, { 3.6879457292931952`*^9, 3.6879457736132574`*^9}, {3.688022923252344*^9, 3.688023002982456*^9}, {3.6880230753425574`*^9, 3.688023230782775*^9}, 3.688023348002939*^9, {3.688023553833227*^9, 3.6880235620032387`*^9}, { 3.6880236295333333`*^9, 3.6880236382433453`*^9}, 3.6880237756035376`*^9, { 3.688031422416407*^9, 3.688031557816597*^9}, {3.6881117497443466`*^9, 3.688111797854414*^9}, {3.6881166477118034`*^9, 3.688116649471806*^9}, { 3.688118444084318*^9, 3.6881185798545084`*^9}, {3.688118642824597*^9, 3.688118799384816*^9}, {3.688118855204894*^9, 3.688118917084981*^9}, { 3.6881194959182944`*^9, 3.688119497718297*^9}, {3.6881196404384966`*^9, 3.688119655048517*^9}, {3.688119702888584*^9, 3.688119727678619*^9}, { 3.6881200919291286`*^9, 3.6881201295191813`*^9}, {3.6881202044892864`*^9, 3.688120237039332*^9}, {3.688120497669697*^9, 3.688120502989704*^9}, { 3.688120738340034*^9, 3.6881207493700495`*^9}, {3.6882745101002936`*^9, 3.6882745118602962`*^9}, {3.6883042728760366`*^9, 3.688304806616784*^9}, { 3.6883051027271986`*^9, 3.6883051086172066`*^9}, {3.6883054642977047`*^9, 3.6883054716377153`*^9}, {3.688306465909107*^9, 3.6883064729091167`*^9}, { 3.6883066024792986`*^9, 3.6883066550893717`*^9}, {3.6883071311300383`*^9, 3.688307145950059*^9}, 3.6883073798003864`*^9, {3.6887815904603148`*^9, 3.6887816040203333`*^9}, 3.6887816433103886`*^9, {3.6887816741004314`*^9, 3.688781699230467*^9}, {3.6887817847405863`*^9, 3.688781813880627*^9}, { 3.688781885830728*^9, 3.6887819020407505`*^9}, {3.6889574605581684`*^9, 3.688957501788226*^9}, {3.688960184803222*^9, 3.6889601992032423`*^9}, { 3.692771817740493*^9, 3.692771905640616*^9}, {3.6927726676816826`*^9, 3.6927727032617326`*^9}, {3.6927727333717747`*^9, 3.692772736561779*^9}, { 3.692772826191905*^9, 3.692772844901931*^9}, {3.692772893741999*^9, 3.6927728997420073`*^9}, {3.6927729636420975`*^9, 3.692773125862324*^9}, { 3.6927731981924257`*^9, 3.692773236352479*^9}, {3.6927732729025297`*^9, 3.692773282242543*^9}, {3.6927733353526173`*^9, 3.6927734137827272`*^9}, 3.6927736473730545`*^9, {3.6934868115444183`*^9, 3.693486813494421*^9}, { 3.6934868553944798`*^9, 3.693486917754567*^9}, {3.6934869973946786`*^9, 3.693487001174684*^9}, {3.6934870442947445`*^9, 3.6934870479747496`*^9}, { 3.693487349135171*^9, 3.6934873994352417`*^9}, {3.693487456975322*^9, 3.6934874585553246`*^9}, {3.6939897066669016`*^9, 3.6939897907970195`*^9}, {3.6939898244170666`*^9, 3.693989829937074*^9}, { 3.6939901042074585`*^9, 3.693990124237486*^9}, {3.69399018398757*^9, 3.6939902403476486`*^9}, {3.6939902781277018`*^9, 3.69399032732777*^9}, { 3.6939903908278594`*^9, 3.693990609328165*^9}, {3.693990640658209*^9, 3.693990673878256*^9}, {3.693990761178378*^9, 3.6939907769384003`*^9}, { 3.6939908128884506`*^9, 3.6939908380384855`*^9}, {3.6939908895785575`*^9, 3.6939908941885643`*^9}, {3.6939909859386926`*^9, 3.693991001898715*^9}, { 3.6939910395887675`*^9, 3.6939910643988028`*^9}, {3.693991107098862*^9, 3.6939911407889094`*^9}, {3.6939911957989864`*^9, 3.6939913838692493`*^9}, {3.6939918465598974`*^9, 3.693991856479911*^9}, { 3.6939919173699965`*^9, 3.6939919296100135`*^9}, {3.693991979330083*^9, 3.693992022780144*^9}, {3.6939921266502895`*^9, 3.6939921416103106`*^9}, { 3.6939921886903763`*^9, 3.693992235260442*^9}, {3.6939924451107354`*^9, 3.6939924757207785`*^9}, {3.6939925308708553`*^9, 3.693992535490862*^9}, { 3.69408137357989*^9, 3.6940813990399256`*^9}, {3.694081492270056*^9, 3.694081500430067*^9}, 3.694085807686309*^9, 3.694336369074993*^9, { 3.694336447585103*^9, 3.694336534165224*^9}, {3.6943365695452733`*^9, 3.694336572935278*^9}, {3.6943366355853662`*^9, 3.694336663395405*^9}, { 3.694336707865467*^9, 3.694336813505615*^9}, {3.6943368708856955`*^9, 3.694336972645838*^9}, {3.694337005795884*^9, 3.69433752400661*^9}, { 3.694337943297197*^9, 3.6943379730472383`*^9}, {3.694338096757412*^9, 3.694338100087416*^9}, {3.6943381564174953`*^9, 3.694338172057517*^9}, { 3.6943382111375713`*^9, 3.6943382179975815`*^9}, {3.694338370357795*^9, 3.694338415207857*^9}, {3.694338519908004*^9, 3.694338533448023*^9}, { 3.694338742738316*^9, 3.6943387845683746`*^9}, {3.6943388672484903`*^9, 3.694338909398549*^9}, {3.6943394389592905`*^9, 3.694339477079344*^9}, { 3.6943395685694723`*^9, 3.6943395881794996`*^9}, 3.6943396627096043`*^9, { 3.694339797119792*^9, 3.6943398030098004`*^9}, {3.6943398885999203`*^9, 3.6943400438301373`*^9}, {3.6943517756956816`*^9, 3.694351778765686*^9}, { 3.694351814965737*^9, 3.694351920335884*^9}, {3.6943520375260487`*^9, 3.694352038046049*^9}, {3.6943546301696777`*^9, 3.694354641489694*^9}, { 3.6943547065797853`*^9, 3.694354780889889*^9}, {3.694415922397947*^9, 3.694415933787963*^9}, {3.6944160021080585`*^9, 3.6944160163480783`*^9}, { 3.6944161612482815`*^9, 3.694416186218316*^9}, {3.6944162181183605`*^9, 3.694416241358393*^9}, {3.694416776009142*^9, 3.694416778289145*^9}, { 3.694417304849882*^9, 3.694417340579932*^9}, {3.6944179310727587`*^9, 3.6944179657728076`*^9}, {3.6944182927132654`*^9, 3.694418302313279*^9}, { 3.6944316170705633`*^9, 3.6944316923568697`*^9}, {3.6944318163219357`*^9, 3.694431820105152*^9}, {3.6965609549111967`*^9, 3.696560966061212*^9}, { 3.696560998851258*^9, 3.6965610020812626`*^9}, {3.6965611422314587`*^9, 3.696561159171482*^9}, 3.696563445644683*^9, {3.6965635186347857`*^9, 3.6965635322048044`*^9}, {3.696563569074856*^9, 3.6965635745148635`*^9}, { 3.696563720555068*^9, 3.69656372185507*^9}, {3.6965637807551527`*^9, 3.696563824135213*^9}, {3.6965639935254507`*^9, 3.696564031985504*^9}, { 3.696596096992402*^9, 3.696596186502527*^9}, {3.696596234252594*^9, 3.696596260452631*^9}, {3.6965963110027018`*^9, 3.69659632407272*^9}, 3.6965963803627987`*^9, {3.7244123642779827`*^9, 3.7244123648119507`*^9}, { 3.7255912428848085`*^9, 3.7255912492295227`*^9}, {3.725591466627203*^9, 3.725591704636403*^9}, {3.7255917405776634`*^9, 3.7255917613142586`*^9}, { 3.7255980783777914`*^9, 3.7255980873943977`*^9}, {3.725598135321295*^9, 3.7255981566673255`*^9}, {3.7255985463958807`*^9, 3.7255985750395555`*^9}, {3.725598660297285*^9, 3.725598669548276*^9}, { 3.7255989613446465`*^9, 3.7255989963014574`*^9}, {3.7255990922803245`*^9, 3.725599092624111*^9}, {3.7255991287997694`*^9, 3.7255991802271013`*^9}, 3.7255992673973975`*^9, {3.725599302619891*^9, 3.725599630275236*^9}, { 3.7255996917974653`*^9, 3.725600173598138*^9}, {3.72560026574846*^9, 3.7256002767652473`*^9}, 3.7256003308803263`*^9, {3.7256003995281887`*^9, 3.72560041238892*^9}, {3.725600503405278*^9, 3.725600537768276*^9}, { 3.72560062249599*^9, 3.725600660390954*^9}, {3.7256015423497496`*^9, 3.725601551460086*^9}, {3.725602674641403*^9, 3.725602676188448*^9}, { 3.725606737765007*^9, 3.7256067379681726`*^9}, {3.7259411263577843`*^9, 3.725941161974596*^9}, {3.7259413328141994`*^9, 3.7259413530325947`*^9}, { 3.725948620999795*^9, 3.7259486419857845`*^9}, 3.7259487502361426`*^9, { 3.725948801316684*^9, 3.7259488049789305`*^9}, {3.7259488747343755`*^9, 3.7259488880408845`*^9}, {3.7262144247900543`*^9, 3.7262144477456355`*^9}, {3.7574170493225684`*^9, 3.757417053184463*^9}, { 3.7831421588326306`*^9, 3.783142170925208*^9}, {3.783142395749114*^9, 3.7831425154306135`*^9}, {3.7831425557309313`*^9, 3.783142564092332*^9}, { 3.7831427526814885`*^9, 3.783142754255293*^9}, {3.7831428098757677`*^9, 3.7831428571042147`*^9}, {3.7834087348068304`*^9, 3.783408793037257*^9}, { 3.7834095081721888`*^9, 3.783409552999109*^9}, {3.783409588525758*^9, 3.7834095907684803`*^9}, {3.783409662061564*^9, 3.7834096810274954`*^9}, { 3.7834097163188562`*^9, 3.7834098893742294`*^9}, {3.7834100221449327`*^9, 3.783410060241215*^9}, {3.7834101051335173`*^9, 3.7834101131745987`*^9}, { 3.783410606354042*^9, 3.783410612361685*^9}, {3.783410755716464*^9, 3.7834107918890605`*^9}, {3.7834108581708117`*^9, 3.7834108764020586`*^9}, {3.783656780899205*^9, 3.783656816754212*^9}, { 3.783656906347945*^9, 3.783656914312093*^9}, {3.783657051037856*^9, 3.7836572912656827`*^9}, {3.783657346545521*^9, 3.7836573583072553`*^9}, { 3.783657399653203*^9, 3.783657405924858*^9}, {3.78365743635863*^9, 3.783657444445655*^9}, {3.783657544607131*^9, 3.7836575974442415`*^9}, { 3.784785690868435*^9, 3.7847857118559847`*^9}, {3.7847931085113173`*^9, 3.7847931143650365`*^9}, {3.784793162925936*^9, 3.784793168863771*^9}, { 3.788250819548458*^9, 3.7882508340994453`*^9}, {3.788250923421962*^9, 3.788250985225994*^9}, {3.789021541724124*^9, 3.789021542741435*^9}, { 3.814675243788579*^9, 3.81467524657043*^9}, {3.814675296484918*^9, 3.8146753026102443`*^9}, 3.8146767508872194`*^9, {3.8146767833631124`*^9, 3.8146768340288363`*^9}, {3.8146768678429646`*^9, 3.814676881416951*^9}, { 3.819778869762148*^9, 3.8197788819676495`*^9}, {3.8200281551494493`*^9, 3.8200282443038893`*^9}, 3.820028306018581*^9},ExpressionUUID->"35612e81-b0f0-4445-800a-\ eeda8ead9d4a"] }, Closed]], Cell[CellGroupData[{ Cell["PLANE ELEMENT (evnt) defs", "Subsection", InitializationCell->True, CellChangeTimes->{{3.753018875511382*^9, 3.7530188786265306`*^9}, { 3.781589886623744*^9, 3.7815898932426767`*^9}, {3.7878947601549573`*^9, 3.787894760728943*^9}, 3.7878948945295725`*^9, {3.817439343565061*^9, 3.8174393448082724`*^9}, {3.817439544553817*^9, 3.8174395452236648`*^9}, { 3.817439659219601*^9, 3.8174396600345135`*^9}, 3.843182883058161*^9},ExpressionUUID->"84a1810e-3f34-4e4b-9ab1-\ 7e94b4cdf330"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNT", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"PLANE", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLANE", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781589928213842*^9, 3.781590052438653*^9}, { 3.7815900898176003`*^9, 3.781590109307678*^9}, {3.781590201383393*^9, 3.7815902433873234`*^9}, {3.7815905445265956`*^9, 3.781590569573782*^9}, { 3.7815906952864275`*^9, 3.781590715680611*^9}, {3.7815908323678637`*^9, 3.781590881239719*^9}, {3.7815911048122363`*^9, 3.781591119274813*^9}, { 3.817439386305109*^9, 3.8174394287787733`*^9}, {3.8174395552770724`*^9, 3.8174395603447847`*^9}, {3.8174396709099665`*^9, 3.817439676294123*^9}, 3.8175213211484346`*^9, 3.8431828885395837`*^9}, CellLabel-> "In[164]:=",ExpressionUUID->"84fc137a-1814-43a0-a99f-cdc83ec44e91"] }, Closed]], Cell[CellGroupData[{ Cell["PLANE ELEMENT (stre) defs ", "Subsection", CellChangeTimes->{{3.766140428784856*^9, 3.7661404367673664`*^9}, { 3.7834159393565364`*^9, 3.783415939864867*^9}, {3.790129829798637*^9, 3.7901298377928085`*^9}},ExpressionUUID->"20f297b3-bf2f-4515-b6ee-\ 092700415b39"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STRES", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", "anya_", ",", "anyb_"}], "}"}], ",", RowBox[{"Polygon", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r", ",", "e\[Alpha]", ",", "e\[Beta]", ",", "en", ",", "FF", ",", "FFINV", ",", "jac", ",", "uvw", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "EEEE", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"Length", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", "3", "]"}], "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", "4", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{ RowBox[{"NN", "[", "nl", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"e\[Alpha]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}]}], ";", " ", RowBox[{"e\[Beta]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], ";", " ", RowBox[{"en", "=", RowBox[{"e\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"en", "/", RowBox[{"Sqrt", "[", RowBox[{"en", ".", "en"}], "]"}]}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"Lx", ">", "0"}], "&&", RowBox[{"Ly", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", " ", "e\[Beta]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"Lx", ">", "0"}], "&&", RowBox[{"Ly", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"Lx", ">", "0"}], "&&", RowBox[{"Ly", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{ RowBox[{"NN", "[", "nl", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "gradient", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"Transpose", "[", RowBox[{"D", "[", RowBox[{"uvw", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}], "}"}]}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Plane", " ", "stress", " ", "elasticity", " ", "tensor"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"IdentityMatrix", "[", "3", "]"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{"EEEE", "-", RowBox[{ RowBox[{"(", RowBox[{"EEEE", ".", "en"}], ")"}], ".", RowBox[{"Inverse", "[", RowBox[{"en", ".", "EEEE", ".", "en"}], "]"}], ".", RowBox[{"(", RowBox[{"en", ".", "EEEE"}], ")"}]}]}], "]"}]}], ";", " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"Thread", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[Sigma]XX", ",", "\[Sigma]XY", ",", "\[Sigma]XZ"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Sigma]YX", ",", "\[Sigma]YY", ",", "\[Sigma]YZ"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Sigma]ZX", ",", "\[Sigma]ZY", ",", "\[Sigma]ZZ"}], "}"}]}], "}"}], "]"}], "\[Rule]", " ", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}], "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STRES", ",", RowBox[{"{", RowBox[{"TWODIM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", "anya_", ",", "anyb_"}], "}"}], ",", RowBox[{"Polygon", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r", ",", "e\[Alpha]", ",", "e\[Beta]", ",", "en", ",", "FF", ",", "FFINV", ",", "jac", ",", "uvw", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "EEEE", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"Length", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", "3", "]"}], "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", "4", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{ RowBox[{"NN", "[", "nl", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"e\[Alpha]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}]}], ";", " ", RowBox[{"e\[Beta]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], ";", " ", RowBox[{"en", "=", RowBox[{"e\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"en", "/", RowBox[{"Sqrt", "[", RowBox[{"en", ".", "en"}], "]"}]}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"Lx", ">", "0"}], "&&", RowBox[{"Ly", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", " ", "e\[Beta]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"Lx", ">", "0"}], "&&", RowBox[{"Ly", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"Lx", ">", "0"}], "&&", RowBox[{"Ly", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{ RowBox[{"NN", "[", "nl", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "gradient", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"Transpose", "[", RowBox[{"D", "[", RowBox[{"uvw", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}], "}"}]}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Plane", " ", "stress", " ", "elasticity", " ", "tensor"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"IdentityMatrix", "[", "3", "]"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"Thread", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[Sigma]XX", ",", "\[Sigma]XY", ",", "\[Sigma]XZ"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Sigma]YX", ",", "\[Sigma]YY", ",", "\[Sigma]YZ"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Sigma]ZX", ",", "\[Sigma]ZY", ",", "\[Sigma]ZZ"}], "}"}]}], "}"}], "]"}], "\[Rule]", " ", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}], "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426473093646455`*^9, 3.4426474078630457`*^9}, { 3.4426597184894*^9, 3.4426597783310003`*^9}, {3.442659859139*^9, 3.4426599679021997`*^9}, {3.4426601154852*^9, 3.442660125282*^9}, 3.4426603153866*^9, {3.4426606694491997`*^9, 3.442660676984*^9}, { 3.4426607660341997`*^9, 3.442660767017*^9}, {3.4426607970782003`*^9, 3.4426609236566*^9}, {3.4426609993859997`*^9, 3.442661000946*^9}, { 3.4426611720156*^9, 3.4426611866796*^9}, {3.4426612192836*^9, 3.4426612396104*^9}, {3.4426613536776*^9, 3.4426613563764*^9}, { 3.4426613962188*^9, 3.4426613966556*^9}, {3.443184440921*^9, 3.4431845165186*^9}, {3.4431848052298*^9, 3.4431848237002*^9}, { 3.4431849834618*^9, 3.4431849851934*^9}, {3.4431850342574*^9, 3.4431850385318003`*^9}, {3.4444402127514*^9, 3.4444402360889997`*^9}, { 3.44509636787*^9, 3.445096458974*^9}, {3.4450965569264*^9, 3.4450965855056*^9}, {3.4450966736612*^9, 3.4450967018348*^9}, 3.4450967876972*^9, {3.4451000792358*^9, 3.4451001019962*^9}, { 3.445132280975*^9, 3.4451322867782*^9}, 3.4451325631488*^9, 3.4451346101028*^9, {3.4455261966926003`*^9, 3.4455262691078*^9}, { 3.4455263543462*^9, 3.445526490113*^9}, {3.4455265305794*^9, 3.4455265347602*^9}, {3.4455267552349997`*^9, 3.4455267826754*^9}, 3.445526922233*^9, {3.445527218711*^9, 3.4455272895818*^9}, { 3.4455273640094*^9, 3.445527481259*^9}, 3.4455276192202*^9, { 3.4455278074376*^9, 3.4455278187164*^9}, {3.4455279660896*^9, 3.4455279742016*^9}, 3.4455280249016*^9, 3.4455285464407997`*^9, { 3.4461837560238*^9, 3.4461837697986*^9}, {3.446183892165*^9, 3.4461839004486*^9}, {3.4461839570142*^9, 3.4461841265550003`*^9}, 3.4461841729182*^9, {3.4461842101398*^9, 3.4461842206074*^9}, { 3.4461845241088*^9, 3.4461845410972*^9}, {3.4461845879440002`*^9, 3.4461847021516*^9}, {3.4461848428032*^9, 3.4461848544096003`*^9}, { 3.4461849111956*^9, 3.4461849123344*^9}, {3.4461850134868*^9, 3.446185058608*^9}, {3.4461852067616*^9, 3.446185223282*^9}, { 3.4461852548876*^9, 3.4461852626408*^9}, {3.4461853186604*^9, 3.446185320392*^9}, {3.4512642010481997`*^9, 3.451264207413*^9}, { 3.4512642788766003`*^9, 3.4512643136334*^9}, {3.4512643770006*^9, 3.4512644269362*^9}, {3.4512646983138*^9, 3.4512647384994*^9}, { 3.4512647823354*^9, 3.4512647868126*^9}, {3.4939932066616*^9, 3.4939932082060003`*^9}, {3.4939932399988003`*^9, 3.4939932614955997`*^9}, {3.493993300014*^9, 3.4939933073304*^9}, { 3.4939933992174*^9, 3.4939934078129997`*^9}, {3.4939934932314*^9, 3.493993515009*^9}, {3.4939935468556004`*^9, 3.493993568543*^9}, { 3.4939936486404*^9, 3.4939936621812*^9}, {3.4940328887262*^9, 3.4940328895218*^9}, {3.499487154582*^9, 3.49948716324*^9}, { 3.4994872083708*^9, 3.499487247324*^9}, {3.4994872822368*^9, 3.4994873816244*^9}, 3.499487417676*^9, {3.4994878504918003`*^9, 3.4994879045458*^9}, {3.4994879529370003`*^9, 3.4994879707794*^9}, { 3.4994880482042*^9, 3.4994880616826*^9}, {3.4994881084202003`*^9, 3.4994881177334003`*^9}, {3.4994884740218*^9, 3.4994884920554*^9}, { 3.4994885948282003`*^9, 3.4994886477434*^9}, {3.4994886790369997`*^9, 3.4994886860257998`*^9}, {3.4994887712953997`*^9, 3.4994887717478*^9}, { 3.6305517490219865`*^9, 3.6305518383945436`*^9}, 3.6305519329151096`*^9, { 3.6305521477354264`*^9, 3.6305521796235647`*^9}, {3.630552211063363*^9, 3.630552234159684*^9}, {3.6305523097380066`*^9, 3.6305523261429453`*^9}, { 3.630552400293186*^9, 3.630552443246643*^9}, {3.6305524899713154`*^9, 3.630552532581753*^9}, {3.630552564078554*^9, 3.630552660703081*^9}, { 3.6308069732471952`*^9, 3.6308070226836824`*^9}, {3.630831568112257*^9, 3.630831577359786*^9}, {3.632037136188613*^9, 3.6320372275628395`*^9}, { 3.632037282822*^9, 3.6320372864142056`*^9}, {3.632037326777514*^9, 3.6320373338819203`*^9}, {3.6320374068820953`*^9, 3.632037461262206*^9}, { 3.632037495368157*^9, 3.6320375996761227`*^9}, {3.632037657282418*^9, 3.6320377668306837`*^9}, {3.6320377993975463`*^9, 3.6320378258790607`*^9}, {3.6320379375314474`*^9, 3.632037944011818*^9}, { 3.632037974774577*^9, 3.63203804108137*^9}, {3.632038115937651*^9, 3.6320381168477035`*^9}, {3.632038171547832*^9, 3.6320381721648674`*^9}, { 3.6320382092969913`*^9, 3.6320382642141323`*^9}, 3.632038311238822*^9, { 3.6320383438376865`*^9, 3.6320384084533825`*^9}, {3.632038502612768*^9, 3.632038536966733*^9}, {3.6320386355663724`*^9, 3.632038663028943*^9}, { 3.6320387578143644`*^9, 3.632038876049127*^9}, {3.632038925681966*^9, 3.6320390116098804`*^9}, {3.6320390559574175`*^9, 3.632039057440502*^9}, { 3.6320390909984217`*^9, 3.6320392794842024`*^9}, {3.6320393098219376`*^9, 3.6320393228646836`*^9}, {3.6320393691423306`*^9, 3.632039469157051*^9}, { 3.6320395408921537`*^9, 3.6320395753041224`*^9}, {3.632039607865985*^9, 3.6320396287681804`*^9}, {3.632039834419943*^9, 3.6320399635053263`*^9}, { 3.632040008307889*^9, 3.632040011081047*^9}, {3.632040111200774*^9, 3.6320401709411907`*^9}, {3.6320402797014112`*^9, 3.6320403974661474`*^9}, {3.6320411172793183`*^9, 3.6320411297080293`*^9}, 3.632041280201637*^9, {3.632041357828077*^9, 3.632041361657296*^9}, { 3.632041402765647*^9, 3.632041437279621*^9}, 3.632041474164731*^9, { 3.6320415074596353`*^9, 3.632041548877004*^9}, {3.6320415931405363`*^9, 3.632041610919553*^9}, {3.632041656484159*^9, 3.6320416691688843`*^9}, { 3.6320420632294235`*^9, 3.6320420791513343`*^9}, {3.6320424482774467`*^9, 3.632042550289282*^9}, {3.632042803353756*^9, 3.632042928840934*^9}, { 3.632042961566806*^9, 3.63204301077662*^9}, {3.632043063037609*^9, 3.6320430712580795`*^9}, {3.632043120691907*^9, 3.632043161148221*^9}, { 3.6320432062678013`*^9, 3.6320432094549837`*^9}, 3.632043258394783*^9, { 3.632043351071084*^9, 3.632043352668175*^9}, {3.6345677461009674`*^9, 3.634568027044036*^9}, 3.634568059784909*^9, {3.6345686692177663`*^9, 3.6345687304812703`*^9}, {3.634568765543276*^9, 3.634568827443816*^9}, { 3.6346120324026976`*^9, 3.6346120417672334`*^9}, {3.6346121382917542`*^9, 3.6346122118989644`*^9}, {3.6346122814849443`*^9, 3.634612333070895*^9}, { 3.634612471677823*^9, 3.634612552263432*^9}, {3.6346125863993845`*^9, 3.6346126554953365`*^9}, {3.634612698763811*^9, 3.634612702163006*^9}, { 3.6348726356017313`*^9, 3.634872755937614*^9}, {3.634877631123617*^9, 3.6348776427762833`*^9}, {3.6348782474488688`*^9, 3.6348782744724145`*^9}, {3.63487832072106*^9, 3.634878440448908*^9}, { 3.6852817264030714`*^9, 3.6852817834531507`*^9}, {3.68794462572165*^9, 3.687944776911862*^9}, {3.6879451060223227`*^9, 3.6879451445423765`*^9}, { 3.6879452810225677`*^9, 3.6879452918025827`*^9}, {3.6879455589529567`*^9, 3.687945567592969*^9}, {3.6879456213830442`*^9, 3.6879456613631*^9}, { 3.6879457292931952`*^9, 3.6879457736132574`*^9}, {3.688022923252344*^9, 3.688023002982456*^9}, {3.6880230753425574`*^9, 3.688023230782775*^9}, 3.688023348002939*^9, {3.688023553833227*^9, 3.6880235620032387`*^9}, { 3.6880236295333333`*^9, 3.6880236382433453`*^9}, 3.6880237756035376`*^9, { 3.688031422416407*^9, 3.688031557816597*^9}, {3.6881117497443466`*^9, 3.688111797854414*^9}, {3.6881166477118034`*^9, 3.688116649471806*^9}, { 3.688118444084318*^9, 3.6881185798545084`*^9}, {3.688118642824597*^9, 3.688118799384816*^9}, {3.688118855204894*^9, 3.688118917084981*^9}, { 3.6881194959182944`*^9, 3.688119497718297*^9}, {3.6881196404384966`*^9, 3.688119655048517*^9}, {3.688119702888584*^9, 3.688119727678619*^9}, { 3.6881200919291286`*^9, 3.6881201295191813`*^9}, {3.6881202044892864`*^9, 3.688120237039332*^9}, {3.688120497669697*^9, 3.688120502989704*^9}, { 3.688120738340034*^9, 3.6881207493700495`*^9}, {3.6882745101002936`*^9, 3.6882745118602962`*^9}, {3.6883042728760366`*^9, 3.688304806616784*^9}, { 3.6883051027271986`*^9, 3.6883051086172066`*^9}, {3.6883054642977047`*^9, 3.6883054716377153`*^9}, {3.688306465909107*^9, 3.6883064729091167`*^9}, { 3.6883066024792986`*^9, 3.6883066550893717`*^9}, {3.6883071311300383`*^9, 3.688307145950059*^9}, 3.6883073798003864`*^9, {3.6887815904603148`*^9, 3.6887816040203333`*^9}, 3.6887816433103886`*^9, {3.6887816741004314`*^9, 3.688781699230467*^9}, {3.6887817847405863`*^9, 3.688781813880627*^9}, { 3.688781885830728*^9, 3.6887819020407505`*^9}, {3.6889574605581684`*^9, 3.688957501788226*^9}, {3.688960184803222*^9, 3.6889601992032423`*^9}, { 3.692771817740493*^9, 3.692771905640616*^9}, {3.6927726676816826`*^9, 3.6927727032617326`*^9}, {3.6927727333717747`*^9, 3.692772736561779*^9}, { 3.692772826191905*^9, 3.692772844901931*^9}, {3.692772893741999*^9, 3.6927728997420073`*^9}, {3.6927729636420975`*^9, 3.692773125862324*^9}, { 3.6927731981924257`*^9, 3.692773236352479*^9}, {3.6927732729025297`*^9, 3.692773282242543*^9}, {3.6927733353526173`*^9, 3.6927734137827272`*^9}, 3.6927736473730545`*^9, {3.6934868115444183`*^9, 3.693486813494421*^9}, { 3.6934868553944798`*^9, 3.693486917754567*^9}, {3.6934869973946786`*^9, 3.693487001174684*^9}, {3.6934870442947445`*^9, 3.6934870479747496`*^9}, { 3.693487349135171*^9, 3.6934873994352417`*^9}, {3.693487456975322*^9, 3.6934874585553246`*^9}, {3.6939897066669016`*^9, 3.6939897907970195`*^9}, {3.6939898244170666`*^9, 3.693989829937074*^9}, { 3.6939901042074585`*^9, 3.693990124237486*^9}, {3.69399018398757*^9, 3.6939902403476486`*^9}, {3.6939902781277018`*^9, 3.69399032732777*^9}, { 3.6939903908278594`*^9, 3.693990609328165*^9}, {3.693990640658209*^9, 3.693990673878256*^9}, {3.693990761178378*^9, 3.6939907769384003`*^9}, { 3.6939908128884506`*^9, 3.6939908380384855`*^9}, {3.6939908895785575`*^9, 3.6939908941885643`*^9}, {3.6939909859386926`*^9, 3.693991001898715*^9}, { 3.6939910395887675`*^9, 3.6939910643988028`*^9}, {3.693991107098862*^9, 3.6939911407889094`*^9}, {3.6939911957989864`*^9, 3.6939913838692493`*^9}, {3.6939918465598974`*^9, 3.693991856479911*^9}, { 3.6939919173699965`*^9, 3.6939919296100135`*^9}, {3.693991979330083*^9, 3.693992022780144*^9}, {3.6939921266502895`*^9, 3.6939921416103106`*^9}, { 3.6939921886903763`*^9, 3.693992235260442*^9}, {3.6939924451107354`*^9, 3.6939924757207785`*^9}, {3.6939925308708553`*^9, 3.693992535490862*^9}, { 3.69408137357989*^9, 3.6940813990399256`*^9}, {3.694081492270056*^9, 3.694081500430067*^9}, 3.694085807686309*^9, 3.694336369074993*^9, { 3.694336447585103*^9, 3.694336534165224*^9}, {3.6943365695452733`*^9, 3.694336572935278*^9}, {3.6943366355853662`*^9, 3.694336663395405*^9}, { 3.694336707865467*^9, 3.694336813505615*^9}, {3.6943368708856955`*^9, 3.694336972645838*^9}, {3.694337005795884*^9, 3.69433752400661*^9}, { 3.694337943297197*^9, 3.6943379730472383`*^9}, {3.694338096757412*^9, 3.694338100087416*^9}, {3.6943381564174953`*^9, 3.694338172057517*^9}, { 3.6943382111375713`*^9, 3.6943382179975815`*^9}, {3.694338370357795*^9, 3.694338415207857*^9}, {3.694338519908004*^9, 3.694338533448023*^9}, { 3.694338742738316*^9, 3.6943387845683746`*^9}, {3.6943388672484903`*^9, 3.694338909398549*^9}, {3.6943394389592905`*^9, 3.694339477079344*^9}, { 3.6943395685694723`*^9, 3.6943395881794996`*^9}, 3.6943396627096043`*^9, { 3.694339797119792*^9, 3.6943398030098004`*^9}, {3.6943398885999203`*^9, 3.6943400438301373`*^9}, {3.6943517756956816`*^9, 3.694351778765686*^9}, { 3.694351814965737*^9, 3.694351920335884*^9}, {3.6943520375260487`*^9, 3.694352038046049*^9}, {3.6943546301696777`*^9, 3.694354641489694*^9}, { 3.6943547065797853`*^9, 3.694354780889889*^9}, {3.694415922397947*^9, 3.694415933787963*^9}, {3.6944160021080585`*^9, 3.6944160163480783`*^9}, { 3.6944161612482815`*^9, 3.694416186218316*^9}, {3.6944162181183605`*^9, 3.694416241358393*^9}, {3.694416776009142*^9, 3.694416778289145*^9}, { 3.694417304849882*^9, 3.694417340579932*^9}, {3.6944179310727587`*^9, 3.6944179657728076`*^9}, {3.6944182927132654`*^9, 3.694418302313279*^9}, { 3.6944316170705633`*^9, 3.6944316923568697`*^9}, {3.6944318163219357`*^9, 3.694431820105152*^9}, {3.6965609549111967`*^9, 3.696560966061212*^9}, { 3.696560998851258*^9, 3.6965610020812626`*^9}, {3.6965611422314587`*^9, 3.696561159171482*^9}, 3.696563445644683*^9, {3.6965635186347857`*^9, 3.6965635322048044`*^9}, {3.696563569074856*^9, 3.6965635745148635`*^9}, { 3.696563720555068*^9, 3.69656372185507*^9}, {3.6965637807551527`*^9, 3.696563824135213*^9}, {3.6965639935254507`*^9, 3.696564031985504*^9}, { 3.696596096992402*^9, 3.696596186502527*^9}, {3.696596234252594*^9, 3.696596260452631*^9}, {3.6965963110027018`*^9, 3.69659632407272*^9}, 3.6965963803627987`*^9, {3.7244123642779827`*^9, 3.7244123648119507`*^9}, { 3.7255912428848085`*^9, 3.7255912492295227`*^9}, {3.725591466627203*^9, 3.725591704636403*^9}, {3.7255917405776634`*^9, 3.7255917613142586`*^9}, { 3.7255980783777914`*^9, 3.7255980873943977`*^9}, {3.725598135321295*^9, 3.7255981566673255`*^9}, {3.7255985463958807`*^9, 3.7255985750395555`*^9}, {3.725598660297285*^9, 3.725598669548276*^9}, { 3.7255989613446465`*^9, 3.7255989963014574`*^9}, {3.7255990922803245`*^9, 3.725599092624111*^9}, {3.7255991287997694`*^9, 3.7255991802271013`*^9}, 3.7255992673973975`*^9, {3.725599302619891*^9, 3.725599630275236*^9}, { 3.7255996917974653`*^9, 3.725600173598138*^9}, {3.72560026574846*^9, 3.7256002767652473`*^9}, 3.7256003308803263`*^9, {3.7256003995281887`*^9, 3.72560041238892*^9}, {3.725600503405278*^9, 3.725600537768276*^9}, { 3.72560062249599*^9, 3.725600660390954*^9}, {3.7256015423497496`*^9, 3.725601551460086*^9}, {3.725602674641403*^9, 3.725602676188448*^9}, { 3.725606737765007*^9, 3.7256067379681726`*^9}, {3.7259411263577843`*^9, 3.725941161974596*^9}, {3.7259413328141994`*^9, 3.7259413530325947`*^9}, { 3.725948620999795*^9, 3.7259486419857845`*^9}, 3.7259487502361426`*^9, { 3.725948801316684*^9, 3.7259488049789305`*^9}, {3.7259488747343755`*^9, 3.7259488880408845`*^9}, {3.7262144247900543`*^9, 3.7262144477456355`*^9}, {3.7574170493225684`*^9, 3.757417053184463*^9}, { 3.7831421588326306`*^9, 3.783142170925208*^9}, {3.783142395749114*^9, 3.7831425154306135`*^9}, {3.7831425557309313`*^9, 3.783142564092332*^9}, { 3.7831427526814885`*^9, 3.783142754255293*^9}, {3.7831428098757677`*^9, 3.7831428571042147`*^9}, {3.7834087348068304`*^9, 3.783408793037257*^9}, { 3.7834095081721888`*^9, 3.783409552999109*^9}, {3.783409588525758*^9, 3.7834095907684803`*^9}, {3.783409662061564*^9, 3.7834096810274954`*^9}, { 3.7834097163188562`*^9, 3.7834098893742294`*^9}, {3.7834100221449327`*^9, 3.783410060241215*^9}, {3.7834101051335173`*^9, 3.7834101131745987`*^9}, { 3.783410606354042*^9, 3.783410612361685*^9}, {3.783410755716464*^9, 3.7834107918890605`*^9}, {3.7834108581708117`*^9, 3.7834108764020586`*^9}, {3.7834159554758463`*^9, 3.7834161146811748`*^9}, {3.7834161647621775`*^9, 3.783416208755393*^9}, { 3.7834163179588566`*^9, 3.7834163817031116`*^9}, {3.7834164360783715`*^9, 3.7834164850567703`*^9}, {3.7834166132894554`*^9, 3.7834166233562546`*^9}, 3.783416674821188*^9, {3.783417354030015*^9, 3.7834173639170065`*^9}, 3.783417417707629*^9, {3.8146751632720823`*^9, 3.814675196666747*^9}, { 3.847249940282611*^9, 3.8472499529957237`*^9}}, CellLabel-> "In[165]:=",ExpressionUUID->"4d4c97f9-892f-4657-adc0-8db844da1157"] }, Closed]], Cell[CellGroupData[{ Cell["PLANE ELEMENT (vibr) defs ", "Subsection", CellChangeTimes->{{3.7574178626155615`*^9, 3.757417866610338*^9}, { 3.7882369565320654`*^9, 3.788236957825534*^9}},ExpressionUUID->"ed41aa29-22c7-4d0d-84b2-\ 1f8337f98b20"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]", ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", "tt", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "INT", ",", "MID", ",", "r", ",", "e1", ",", "e2", ",", "e3", ",", "nn", ",", "FF", ",", "FFINV", ",", "jac", ",", "uvw", ",", "uvw0", ",", "uvw2", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "EEEE", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wine"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"Length", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", "3", "]"}], "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"NN", "[", "4", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"INT", "[", "3", "]"}], "=", "TRI7"}], ";", RowBox[{ RowBox[{"INT", "[", "4", "]"}], "=", "REC9"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"MID", "[", "3", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"MID", "[", "4", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"element", " ", "plane"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{ RowBox[{"NN", "[", "nl", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"e1", ",", "e2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], "}"}], " ", "/.", RowBox[{"MID", "[", "nl", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"e3", "=", RowBox[{"e1", StyleBox["\[Cross]", "OperatorCharacter"], "e2"}]}], ";", "\[IndentingNewLine]", RowBox[{"nn", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"e3", "/", RowBox[{"Sqrt", "[", RowBox[{"e3", ".", "e3"}], "]"}]}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e1", ",", " ", "e2", ",", "nn"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{ RowBox[{"NN", "[", "nl", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"uvw", " ", "=", RowBox[{"uvw", "-", RowBox[{"e3", RowBox[{"(", RowBox[{"e3", ".", "uvw"}], ")"}]}]}]}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{"uvw0", "=", RowBox[{"uvw", "/.", " ", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"uvw2", "=", RowBox[{"uvw", "/.", " ", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "gradient", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw0"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw0"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw0"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Plane", " ", "stress", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{"EEEE", "-", RowBox[{ RowBox[{"(", RowBox[{"EEEE", ".", "nn"}], ")"}], ".", RowBox[{"Inverse", "[", RowBox[{"nn", ".", "EEEE", ".", "nn"}], "]"}], ".", RowBox[{"(", RowBox[{"nn", ".", "EEEE"}], ")"}]}]}], "]"}]}], ";", " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}], "*", "tt"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw0", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wine", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "uvw0", "]"}], ".", "uvw2"}]}], "*", "\[Rho]\[Rho]", "*", "tt"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"QUAD", "[", RowBox[{ RowBox[{"INT", "[", "nl", "]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wext", "+", "\[Delta]wint", "+", "\[Delta]wine"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426473093646455`*^9, 3.4426474078630457`*^9}, { 3.4426597184894*^9, 3.4426597783310003`*^9}, {3.442659859139*^9, 3.4426599679021997`*^9}, {3.4426601154852*^9, 3.442660125282*^9}, 3.4426603153866*^9, {3.4426606694491997`*^9, 3.442660676984*^9}, { 3.4426607660341997`*^9, 3.442660767017*^9}, {3.4426607970782003`*^9, 3.4426609236566*^9}, {3.4426609993859997`*^9, 3.442661000946*^9}, { 3.4426611720156*^9, 3.4426611866796*^9}, {3.4426612192836*^9, 3.4426612396104*^9}, {3.4426613536776*^9, 3.4426613563764*^9}, { 3.4426613962188*^9, 3.4426613966556*^9}, {3.443184440921*^9, 3.4431845165186*^9}, {3.4431848052298*^9, 3.4431848237002*^9}, { 3.4431849834618*^9, 3.4431849851934*^9}, {3.4431850342574*^9, 3.4431850385318003`*^9}, {3.4444402127514*^9, 3.4444402360889997`*^9}, { 3.44509636787*^9, 3.445096458974*^9}, {3.4450965569264*^9, 3.4450965855056*^9}, {3.4450966736612*^9, 3.4450967018348*^9}, 3.4450967876972*^9, {3.4451000792358*^9, 3.4451001019962*^9}, { 3.445132280975*^9, 3.4451322867782*^9}, 3.4451325631488*^9, 3.4451346101028*^9, {3.4455261966926003`*^9, 3.4455262691078*^9}, { 3.4455263543462*^9, 3.445526490113*^9}, {3.4455265305794*^9, 3.4455265347602*^9}, {3.4455267552349997`*^9, 3.4455267826754*^9}, 3.445526922233*^9, {3.445527218711*^9, 3.4455272895818*^9}, { 3.4455273640094*^9, 3.445527481259*^9}, 3.4455276192202*^9, { 3.4455278074376*^9, 3.4455278187164*^9}, {3.4455279660896*^9, 3.4455279742016*^9}, 3.4455280249016*^9, 3.4455285464407997`*^9, { 3.4461837560238*^9, 3.4461837697986*^9}, {3.446183892165*^9, 3.4461839004486*^9}, {3.4461839570142*^9, 3.4461841265550003`*^9}, 3.4461841729182*^9, {3.4461842101398*^9, 3.4461842206074*^9}, { 3.4461845241088*^9, 3.4461845410972*^9}, {3.4461845879440002`*^9, 3.4461847021516*^9}, {3.4461848428032*^9, 3.4461848544096003`*^9}, { 3.4461849111956*^9, 3.4461849123344*^9}, {3.4461850134868*^9, 3.446185058608*^9}, {3.4461852067616*^9, 3.446185223282*^9}, { 3.4461852548876*^9, 3.4461852626408*^9}, {3.4461853186604*^9, 3.446185320392*^9}, {3.4512642010481997`*^9, 3.451264207413*^9}, { 3.4512642788766003`*^9, 3.4512643136334*^9}, {3.4512643770006*^9, 3.4512644269362*^9}, {3.4512646983138*^9, 3.4512647384994*^9}, { 3.4512647823354*^9, 3.4512647868126*^9}, {3.4939932066616*^9, 3.4939932082060003`*^9}, {3.4939932399988003`*^9, 3.4939932614955997`*^9}, {3.493993300014*^9, 3.4939933073304*^9}, { 3.4939933992174*^9, 3.4939934078129997`*^9}, {3.4939934932314*^9, 3.493993515009*^9}, {3.4939935468556004`*^9, 3.493993568543*^9}, { 3.4939936486404*^9, 3.4939936621812*^9}, {3.4940328887262*^9, 3.4940328895218*^9}, {3.499487154582*^9, 3.49948716324*^9}, { 3.4994872083708*^9, 3.499487247324*^9}, {3.4994872822368*^9, 3.4994873816244*^9}, 3.499487417676*^9, {3.4994878504918003`*^9, 3.4994879045458*^9}, {3.4994879529370003`*^9, 3.4994879707794*^9}, { 3.4994880482042*^9, 3.4994880616826*^9}, {3.4994881084202003`*^9, 3.4994881177334003`*^9}, {3.4994884740218*^9, 3.4994884920554*^9}, { 3.4994885948282003`*^9, 3.4994886477434*^9}, {3.4994886790369997`*^9, 3.4994886860257998`*^9}, {3.4994887712953997`*^9, 3.4994887717478*^9}, { 3.6305517490219865`*^9, 3.6305518383945436`*^9}, 3.6305519329151096`*^9, { 3.6305521477354264`*^9, 3.6305521796235647`*^9}, {3.630552211063363*^9, 3.630552234159684*^9}, {3.6305523097380066`*^9, 3.6305523261429453`*^9}, { 3.630552400293186*^9, 3.630552443246643*^9}, {3.6305524899713154`*^9, 3.630552532581753*^9}, {3.630552564078554*^9, 3.630552660703081*^9}, { 3.6308069732471952`*^9, 3.6308070226836824`*^9}, {3.630831568112257*^9, 3.630831577359786*^9}, {3.632037136188613*^9, 3.6320372275628395`*^9}, { 3.632037282822*^9, 3.6320372864142056`*^9}, {3.632037326777514*^9, 3.6320373338819203`*^9}, {3.6320374068820953`*^9, 3.632037461262206*^9}, { 3.632037495368157*^9, 3.6320375996761227`*^9}, {3.632037657282418*^9, 3.6320377668306837`*^9}, {3.6320377993975463`*^9, 3.6320378258790607`*^9}, {3.6320379375314474`*^9, 3.632037944011818*^9}, { 3.632037974774577*^9, 3.63203804108137*^9}, {3.632038115937651*^9, 3.6320381168477035`*^9}, {3.632038171547832*^9, 3.6320381721648674`*^9}, { 3.6320382092969913`*^9, 3.6320382642141323`*^9}, 3.632038311238822*^9, { 3.6320383438376865`*^9, 3.6320384084533825`*^9}, {3.632038502612768*^9, 3.632038536966733*^9}, {3.6320386355663724`*^9, 3.632038663028943*^9}, { 3.6320387578143644`*^9, 3.632038876049127*^9}, {3.632038925681966*^9, 3.6320390116098804`*^9}, {3.6320390559574175`*^9, 3.632039057440502*^9}, { 3.6320390909984217`*^9, 3.6320392794842024`*^9}, {3.6320393098219376`*^9, 3.6320393228646836`*^9}, {3.6320393691423306`*^9, 3.632039469157051*^9}, { 3.6320395408921537`*^9, 3.6320395753041224`*^9}, {3.632039607865985*^9, 3.6320396287681804`*^9}, {3.632039834419943*^9, 3.6320399635053263`*^9}, { 3.632040008307889*^9, 3.632040011081047*^9}, {3.632040111200774*^9, 3.6320401709411907`*^9}, {3.6320402797014112`*^9, 3.6320403974661474`*^9}, {3.6320411172793183`*^9, 3.6320411297080293`*^9}, 3.632041280201637*^9, {3.632041357828077*^9, 3.632041361657296*^9}, { 3.632041402765647*^9, 3.632041437279621*^9}, 3.632041474164731*^9, { 3.6320415074596353`*^9, 3.632041548877004*^9}, {3.6320415931405363`*^9, 3.632041610919553*^9}, {3.632041656484159*^9, 3.6320416691688843`*^9}, { 3.6320420632294235`*^9, 3.6320420791513343`*^9}, {3.6320424482774467`*^9, 3.632042550289282*^9}, {3.632042803353756*^9, 3.632042928840934*^9}, { 3.632042961566806*^9, 3.63204301077662*^9}, {3.632043063037609*^9, 3.6320430712580795`*^9}, {3.632043120691907*^9, 3.632043161148221*^9}, { 3.6320432062678013`*^9, 3.6320432094549837`*^9}, 3.632043258394783*^9, { 3.632043351071084*^9, 3.632043352668175*^9}, {3.6345677461009674`*^9, 3.634568027044036*^9}, 3.634568059784909*^9, {3.6345686692177663`*^9, 3.6345687304812703`*^9}, {3.634568765543276*^9, 3.634568827443816*^9}, { 3.6346120324026976`*^9, 3.6346120417672334`*^9}, {3.6346121382917542`*^9, 3.6346122118989644`*^9}, {3.6346122814849443`*^9, 3.634612333070895*^9}, { 3.634612471677823*^9, 3.634612552263432*^9}, {3.6346125863993845`*^9, 3.6346126554953365`*^9}, {3.634612698763811*^9, 3.634612702163006*^9}, { 3.6348726356017313`*^9, 3.634872755937614*^9}, {3.634877631123617*^9, 3.6348776427762833`*^9}, {3.6348782474488688`*^9, 3.6348782744724145`*^9}, {3.63487832072106*^9, 3.634878440448908*^9}, { 3.6852817264030714`*^9, 3.6852817834531507`*^9}, {3.68794462572165*^9, 3.687944776911862*^9}, {3.6879451060223227`*^9, 3.6879451445423765`*^9}, { 3.6879452810225677`*^9, 3.6879452918025827`*^9}, {3.6879455589529567`*^9, 3.687945567592969*^9}, {3.6879456213830442`*^9, 3.6879456613631*^9}, { 3.6879457292931952`*^9, 3.6879457736132574`*^9}, {3.688022923252344*^9, 3.688023002982456*^9}, {3.6880230753425574`*^9, 3.688023230782775*^9}, 3.688023348002939*^9, {3.688023553833227*^9, 3.6880235620032387`*^9}, { 3.6880236295333333`*^9, 3.6880236382433453`*^9}, 3.6880237756035376`*^9, { 3.688031422416407*^9, 3.688031557816597*^9}, {3.6881117497443466`*^9, 3.688111797854414*^9}, {3.6881166477118034`*^9, 3.688116649471806*^9}, { 3.688118444084318*^9, 3.6881185798545084`*^9}, {3.688118642824597*^9, 3.688118799384816*^9}, {3.688118855204894*^9, 3.688118917084981*^9}, { 3.6881194959182944`*^9, 3.688119497718297*^9}, {3.6881196404384966`*^9, 3.688119655048517*^9}, {3.688119702888584*^9, 3.688119727678619*^9}, { 3.6881200919291286`*^9, 3.6881201295191813`*^9}, {3.6881202044892864`*^9, 3.688120237039332*^9}, {3.688120497669697*^9, 3.688120502989704*^9}, { 3.688120738340034*^9, 3.6881207493700495`*^9}, {3.6882745101002936`*^9, 3.6882745118602962`*^9}, {3.6883042728760366`*^9, 3.688304806616784*^9}, { 3.6883051027271986`*^9, 3.6883051086172066`*^9}, {3.6883054642977047`*^9, 3.6883054716377153`*^9}, {3.688306465909107*^9, 3.6883064729091167`*^9}, { 3.6883066024792986`*^9, 3.6883066550893717`*^9}, {3.6883071311300383`*^9, 3.688307145950059*^9}, 3.6883073798003864`*^9, {3.6887815904603148`*^9, 3.6887816040203333`*^9}, 3.6887816433103886`*^9, {3.6887816741004314`*^9, 3.688781699230467*^9}, {3.6887817847405863`*^9, 3.688781813880627*^9}, { 3.688781885830728*^9, 3.6887819020407505`*^9}, {3.6889574605581684`*^9, 3.688957501788226*^9}, {3.688960184803222*^9, 3.6889601992032423`*^9}, { 3.692771817740493*^9, 3.692771905640616*^9}, {3.6927726676816826`*^9, 3.6927727032617326`*^9}, {3.6927727333717747`*^9, 3.692772736561779*^9}, { 3.692772826191905*^9, 3.692772844901931*^9}, {3.692772893741999*^9, 3.6927728997420073`*^9}, {3.6927729636420975`*^9, 3.692773125862324*^9}, { 3.6927731981924257`*^9, 3.692773236352479*^9}, {3.6927732729025297`*^9, 3.692773282242543*^9}, {3.6927733353526173`*^9, 3.6927734137827272`*^9}, 3.6927736473730545`*^9, {3.6934868115444183`*^9, 3.693486813494421*^9}, { 3.6934868553944798`*^9, 3.693486917754567*^9}, {3.6934869973946786`*^9, 3.693487001174684*^9}, {3.6934870442947445`*^9, 3.6934870479747496`*^9}, { 3.693487349135171*^9, 3.6934873994352417`*^9}, {3.693487456975322*^9, 3.6934874585553246`*^9}, {3.6939897066669016`*^9, 3.6939897907970195`*^9}, {3.6939898244170666`*^9, 3.693989829937074*^9}, { 3.6939901042074585`*^9, 3.693990124237486*^9}, {3.69399018398757*^9, 3.6939902403476486`*^9}, {3.6939902781277018`*^9, 3.69399032732777*^9}, { 3.6939903908278594`*^9, 3.693990609328165*^9}, {3.693990640658209*^9, 3.693990673878256*^9}, {3.693990761178378*^9, 3.6939907769384003`*^9}, { 3.6939908128884506`*^9, 3.6939908380384855`*^9}, {3.6939908895785575`*^9, 3.6939908941885643`*^9}, {3.6939909859386926`*^9, 3.693991001898715*^9}, { 3.6939910395887675`*^9, 3.6939910643988028`*^9}, {3.693991107098862*^9, 3.6939911407889094`*^9}, {3.6939911957989864`*^9, 3.6939913838692493`*^9}, {3.6939918465598974`*^9, 3.693991856479911*^9}, { 3.6939919173699965`*^9, 3.6939919296100135`*^9}, {3.693991979330083*^9, 3.693992022780144*^9}, {3.6939921266502895`*^9, 3.6939921416103106`*^9}, { 3.6939921886903763`*^9, 3.693992235260442*^9}, {3.6939924451107354`*^9, 3.6939924757207785`*^9}, {3.6939925308708553`*^9, 3.693992535490862*^9}, { 3.69408137357989*^9, 3.6940813990399256`*^9}, {3.694081492270056*^9, 3.694081500430067*^9}, 3.694085807686309*^9, 3.694336369074993*^9, { 3.694336447585103*^9, 3.694336534165224*^9}, {3.6943365695452733`*^9, 3.694336572935278*^9}, {3.6943366355853662`*^9, 3.694336663395405*^9}, { 3.694336707865467*^9, 3.694336813505615*^9}, {3.6943368708856955`*^9, 3.694336972645838*^9}, {3.694337005795884*^9, 3.69433752400661*^9}, { 3.694337943297197*^9, 3.6943379730472383`*^9}, {3.694338096757412*^9, 3.694338100087416*^9}, {3.6943381564174953`*^9, 3.694338172057517*^9}, { 3.6943382111375713`*^9, 3.6943382179975815`*^9}, {3.694338370357795*^9, 3.694338415207857*^9}, {3.694338519908004*^9, 3.694338533448023*^9}, { 3.694338742738316*^9, 3.6943387845683746`*^9}, {3.6943388672484903`*^9, 3.694338909398549*^9}, {3.6943394389592905`*^9, 3.694339477079344*^9}, { 3.6943395685694723`*^9, 3.6943395881794996`*^9}, 3.6943396627096043`*^9, { 3.694339797119792*^9, 3.6943398030098004`*^9}, {3.6943398885999203`*^9, 3.6943400438301373`*^9}, {3.6943517756956816`*^9, 3.694351778765686*^9}, { 3.694351814965737*^9, 3.694351920335884*^9}, {3.6943520375260487`*^9, 3.694352038046049*^9}, {3.6943546301696777`*^9, 3.694354641489694*^9}, { 3.6943547065797853`*^9, 3.694354780889889*^9}, {3.694415922397947*^9, 3.694415933787963*^9}, {3.6944160021080585`*^9, 3.6944160163480783`*^9}, { 3.6944161612482815`*^9, 3.694416186218316*^9}, {3.6944162181183605`*^9, 3.694416241358393*^9}, {3.694416776009142*^9, 3.694416778289145*^9}, { 3.694417304849882*^9, 3.694417340579932*^9}, {3.6944179310727587`*^9, 3.6944179657728076`*^9}, {3.6944182927132654`*^9, 3.694418302313279*^9}, { 3.6944316170705633`*^9, 3.6944316923568697`*^9}, {3.6944318163219357`*^9, 3.694431820105152*^9}, {3.6965609549111967`*^9, 3.696560966061212*^9}, { 3.696560998851258*^9, 3.6965610020812626`*^9}, {3.6965611422314587`*^9, 3.696561159171482*^9}, 3.696563445644683*^9, {3.6965635186347857`*^9, 3.6965635322048044`*^9}, {3.696563569074856*^9, 3.6965635745148635`*^9}, { 3.696563720555068*^9, 3.69656372185507*^9}, {3.6965637807551527`*^9, 3.696563824135213*^9}, {3.6965639935254507`*^9, 3.696564031985504*^9}, { 3.696596096992402*^9, 3.696596186502527*^9}, {3.696596234252594*^9, 3.696596260452631*^9}, {3.6965963110027018`*^9, 3.69659632407272*^9}, 3.6965963803627987`*^9, {3.7244123642779827`*^9, 3.7244123648119507`*^9}, { 3.7255912428848085`*^9, 3.7255912492295227`*^9}, {3.725591466627203*^9, 3.725591704636403*^9}, {3.7255917405776634`*^9, 3.7255917613142586`*^9}, { 3.7255980783777914`*^9, 3.7255980873943977`*^9}, {3.725598135321295*^9, 3.7255981566673255`*^9}, {3.7255985463958807`*^9, 3.7255985750395555`*^9}, {3.725598660297285*^9, 3.725598669548276*^9}, { 3.7255989613446465`*^9, 3.7255989963014574`*^9}, {3.7255990922803245`*^9, 3.725599092624111*^9}, {3.7255991287997694`*^9, 3.7255991802271013`*^9}, 3.7255992673973975`*^9, {3.725599302619891*^9, 3.725599630275236*^9}, { 3.7255996917974653`*^9, 3.725600173598138*^9}, {3.72560026574846*^9, 3.7256002767652473`*^9}, 3.7256003308803263`*^9, {3.7256003995281887`*^9, 3.72560041238892*^9}, {3.725600503405278*^9, 3.725600537768276*^9}, { 3.72560062249599*^9, 3.725600660390954*^9}, {3.7256015423497496`*^9, 3.725601551460086*^9}, {3.725602674641403*^9, 3.725602676188448*^9}, { 3.725606737765007*^9, 3.7256067379681726`*^9}, {3.7259411263577843`*^9, 3.725941161974596*^9}, {3.7259413328141994`*^9, 3.7259413530325947`*^9}, { 3.725948620999795*^9, 3.7259486419857845`*^9}, 3.7259487502361426`*^9, { 3.725948801316684*^9, 3.7259488049789305`*^9}, {3.7259488747343755`*^9, 3.7259488880408845`*^9}, {3.7262144247900543`*^9, 3.7262144477456355`*^9}, {3.7574170493225684`*^9, 3.757417053184463*^9}, 3.7574180050911236`*^9, {3.7882499486380305`*^9, 3.788249965805548*^9}, 3.788250180826583*^9, {3.7882504752171006`*^9, 3.788250476401018*^9}, { 3.788250589938117*^9, 3.788250591161209*^9}, {3.7882506821511555`*^9, 3.7882506894349337`*^9}, {3.8146753539411077`*^9, 3.814675358135168*^9}, { 3.8200284878289385`*^9, 3.8200284930218515`*^9}, {3.820028529332723*^9, 3.8200285764790335`*^9}}, CellLabel-> "In[167]:=",ExpressionUUID->"423f3769-3340-4f19-82a7-b53b039cf05d"] }, Closed]], Cell[CellGroupData[{ Cell["PLANE ELEMENT (stab) defs ", "Subsection", CellChangeTimes->{{3.766140428784856*^9, 3.7661404367673664`*^9}, { 3.78824987025541*^9, 3.788249871040884*^9}, {3.7890213529026747`*^9, 3.7890213537383194`*^9}},ExpressionUUID->"0a8784d4-503a-4d3c-b7df-\ 91232860acda"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Triangle", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", "tt", "}"}], ",", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", "tt", "}"}], ",", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", "tt", "}"}], ",", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426473093646455`*^9, 3.4426474078630457`*^9}, { 3.4426597184894*^9, 3.4426597783310003`*^9}, {3.442659859139*^9, 3.4426599679021997`*^9}, {3.4426601154852*^9, 3.442660125282*^9}, 3.4426603153866*^9, {3.4426606694491997`*^9, 3.442660676984*^9}, { 3.4426607660341997`*^9, 3.442660767017*^9}, {3.4426607970782003`*^9, 3.4426609236566*^9}, {3.4426609993859997`*^9, 3.442661000946*^9}, { 3.4426611720156*^9, 3.4426611866796*^9}, {3.4426612192836*^9, 3.4426612396104*^9}, {3.4426613536776*^9, 3.4426613563764*^9}, { 3.4426613962188*^9, 3.4426613966556*^9}, {3.443184440921*^9, 3.4431845165186*^9}, {3.4431848052298*^9, 3.4431848237002*^9}, { 3.4431849834618*^9, 3.4431849851934*^9}, {3.4431850342574*^9, 3.4431850385318003`*^9}, {3.4444402127514*^9, 3.4444402360889997`*^9}, { 3.44509636787*^9, 3.445096458974*^9}, {3.4450965569264*^9, 3.4450965855056*^9}, {3.4450966736612*^9, 3.4450967018348*^9}, 3.4450967876972*^9, {3.4451000792358*^9, 3.4451001019962*^9}, { 3.445132280975*^9, 3.4451322867782*^9}, 3.4451325631488*^9, 3.4451346101028*^9, {3.4455261966926003`*^9, 3.4455262691078*^9}, { 3.4455263543462*^9, 3.445526490113*^9}, {3.4455265305794*^9, 3.4455265347602*^9}, {3.4455267552349997`*^9, 3.4455267826754*^9}, 3.445526922233*^9, {3.445527218711*^9, 3.4455272895818*^9}, { 3.4455273640094*^9, 3.445527481259*^9}, 3.4455276192202*^9, { 3.4455278074376*^9, 3.4455278187164*^9}, {3.4455279660896*^9, 3.4455279742016*^9}, 3.4455280249016*^9, 3.4455285464407997`*^9, { 3.4461837560238*^9, 3.4461837697986*^9}, {3.446183892165*^9, 3.4461839004486*^9}, {3.4461839570142*^9, 3.4461841265550003`*^9}, 3.4461841729182*^9, {3.4461842101398*^9, 3.4461842206074*^9}, { 3.4461845241088*^9, 3.4461845410972*^9}, {3.4461845879440002`*^9, 3.4461847021516*^9}, {3.4461848428032*^9, 3.4461848544096003`*^9}, { 3.4461849111956*^9, 3.4461849123344*^9}, {3.4461850134868*^9, 3.446185058608*^9}, {3.4461852067616*^9, 3.446185223282*^9}, { 3.4461852548876*^9, 3.4461852626408*^9}, {3.4461853186604*^9, 3.446185320392*^9}, {3.4512642010481997`*^9, 3.451264207413*^9}, { 3.4512642788766003`*^9, 3.4512643136334*^9}, {3.4512643770006*^9, 3.4512644269362*^9}, {3.4512646983138*^9, 3.4512647384994*^9}, { 3.4512647823354*^9, 3.4512647868126*^9}, {3.4939932066616*^9, 3.4939932082060003`*^9}, {3.4939932399988003`*^9, 3.4939932614955997`*^9}, {3.493993300014*^9, 3.4939933073304*^9}, { 3.4939933992174*^9, 3.4939934078129997`*^9}, {3.4939934932314*^9, 3.493993515009*^9}, {3.4939935468556004`*^9, 3.493993568543*^9}, { 3.4939936486404*^9, 3.4939936621812*^9}, {3.4940328887262*^9, 3.4940328895218*^9}, {3.499487154582*^9, 3.49948716324*^9}, { 3.4994872083708*^9, 3.499487247324*^9}, {3.4994872822368*^9, 3.4994873816244*^9}, 3.499487417676*^9, {3.4994878504918003`*^9, 3.4994879045458*^9}, {3.4994879529370003`*^9, 3.4994879707794*^9}, { 3.4994880482042*^9, 3.4994880616826*^9}, {3.4994881084202003`*^9, 3.4994881177334003`*^9}, {3.4994884740218*^9, 3.4994884920554*^9}, { 3.4994885948282003`*^9, 3.4994886477434*^9}, {3.4994886790369997`*^9, 3.4994886860257998`*^9}, {3.4994887712953997`*^9, 3.4994887717478*^9}, { 3.6305517490219865`*^9, 3.6305518383945436`*^9}, 3.6305519329151096`*^9, { 3.6305521477354264`*^9, 3.6305521796235647`*^9}, {3.630552211063363*^9, 3.630552234159684*^9}, {3.6305523097380066`*^9, 3.6305523261429453`*^9}, { 3.630552400293186*^9, 3.630552443246643*^9}, {3.6305524899713154`*^9, 3.630552532581753*^9}, {3.630552564078554*^9, 3.630552660703081*^9}, { 3.6308069732471952`*^9, 3.6308070226836824`*^9}, {3.630831568112257*^9, 3.630831577359786*^9}, {3.632037136188613*^9, 3.6320372275628395`*^9}, { 3.632037282822*^9, 3.6320372864142056`*^9}, {3.632037326777514*^9, 3.6320373338819203`*^9}, {3.6320374068820953`*^9, 3.632037461262206*^9}, { 3.632037495368157*^9, 3.6320375996761227`*^9}, {3.632037657282418*^9, 3.6320377668306837`*^9}, {3.6320377993975463`*^9, 3.6320378258790607`*^9}, {3.6320379375314474`*^9, 3.632037944011818*^9}, { 3.632037974774577*^9, 3.63203804108137*^9}, {3.632038115937651*^9, 3.6320381168477035`*^9}, {3.632038171547832*^9, 3.6320381721648674`*^9}, { 3.6320382092969913`*^9, 3.6320382642141323`*^9}, 3.632038311238822*^9, { 3.6320383438376865`*^9, 3.6320384084533825`*^9}, {3.632038502612768*^9, 3.632038536966733*^9}, {3.6320386355663724`*^9, 3.632038663028943*^9}, { 3.6320387578143644`*^9, 3.632038876049127*^9}, {3.632038925681966*^9, 3.6320390116098804`*^9}, {3.6320390559574175`*^9, 3.632039057440502*^9}, { 3.6320390909984217`*^9, 3.6320392794842024`*^9}, {3.6320393098219376`*^9, 3.6320393228646836`*^9}, {3.6320393691423306`*^9, 3.632039469157051*^9}, { 3.6320395408921537`*^9, 3.6320395753041224`*^9}, {3.632039607865985*^9, 3.6320396287681804`*^9}, {3.632039834419943*^9, 3.6320399635053263`*^9}, { 3.632040008307889*^9, 3.632040011081047*^9}, {3.632040111200774*^9, 3.6320401709411907`*^9}, {3.6320402797014112`*^9, 3.6320403974661474`*^9}, {3.6320411172793183`*^9, 3.6320411297080293`*^9}, 3.632041280201637*^9, {3.632041357828077*^9, 3.632041361657296*^9}, { 3.632041402765647*^9, 3.632041437279621*^9}, 3.632041474164731*^9, { 3.6320415074596353`*^9, 3.632041548877004*^9}, {3.6320415931405363`*^9, 3.632041610919553*^9}, {3.632041656484159*^9, 3.6320416691688843`*^9}, { 3.6320420632294235`*^9, 3.6320420791513343`*^9}, {3.6320424482774467`*^9, 3.632042550289282*^9}, {3.632042803353756*^9, 3.632042928840934*^9}, { 3.632042961566806*^9, 3.63204301077662*^9}, {3.632043063037609*^9, 3.6320430712580795`*^9}, {3.632043120691907*^9, 3.632043161148221*^9}, { 3.6320432062678013`*^9, 3.6320432094549837`*^9}, 3.632043258394783*^9, { 3.632043351071084*^9, 3.632043352668175*^9}, {3.6345677461009674`*^9, 3.634568027044036*^9}, 3.634568059784909*^9, {3.6345686692177663`*^9, 3.6345687304812703`*^9}, {3.634568765543276*^9, 3.634568827443816*^9}, { 3.6346120324026976`*^9, 3.6346120417672334`*^9}, {3.6346121382917542`*^9, 3.6346122118989644`*^9}, {3.6346122814849443`*^9, 3.634612333070895*^9}, { 3.634612471677823*^9, 3.634612552263432*^9}, {3.6346125863993845`*^9, 3.6346126554953365`*^9}, {3.634612698763811*^9, 3.634612702163006*^9}, { 3.6348726356017313`*^9, 3.634872755937614*^9}, {3.634877631123617*^9, 3.6348776427762833`*^9}, {3.6348782474488688`*^9, 3.6348782744724145`*^9}, {3.63487832072106*^9, 3.634878440448908*^9}, { 3.6852817264030714`*^9, 3.6852817834531507`*^9}, {3.68794462572165*^9, 3.687944776911862*^9}, {3.6879451060223227`*^9, 3.6879451445423765`*^9}, { 3.6879452810225677`*^9, 3.6879452918025827`*^9}, {3.6879455589529567`*^9, 3.687945567592969*^9}, {3.6879456213830442`*^9, 3.6879456613631*^9}, { 3.6879457292931952`*^9, 3.6879457736132574`*^9}, {3.688022923252344*^9, 3.688023002982456*^9}, {3.6880230753425574`*^9, 3.688023230782775*^9}, 3.688023348002939*^9, {3.688023553833227*^9, 3.6880235620032387`*^9}, { 3.6880236295333333`*^9, 3.6880236382433453`*^9}, 3.6880237756035376`*^9, { 3.688031422416407*^9, 3.688031557816597*^9}, {3.6881117497443466`*^9, 3.688111797854414*^9}, {3.6881166477118034`*^9, 3.688116649471806*^9}, { 3.688118444084318*^9, 3.6881185798545084`*^9}, {3.688118642824597*^9, 3.688118799384816*^9}, {3.688118855204894*^9, 3.688118917084981*^9}, { 3.6881194959182944`*^9, 3.688119497718297*^9}, {3.6881196404384966`*^9, 3.688119655048517*^9}, {3.688119702888584*^9, 3.688119727678619*^9}, { 3.6881200919291286`*^9, 3.6881201295191813`*^9}, {3.6881202044892864`*^9, 3.688120237039332*^9}, {3.688120497669697*^9, 3.688120502989704*^9}, { 3.688120738340034*^9, 3.6881207493700495`*^9}, {3.6882745101002936`*^9, 3.6882745118602962`*^9}, {3.6883042728760366`*^9, 3.688304806616784*^9}, { 3.6883051027271986`*^9, 3.6883051086172066`*^9}, {3.6883054642977047`*^9, 3.6883054716377153`*^9}, {3.688306465909107*^9, 3.6883064729091167`*^9}, { 3.6883066024792986`*^9, 3.6883066550893717`*^9}, {3.6883071311300383`*^9, 3.688307145950059*^9}, 3.6883073798003864`*^9, {3.6887815904603148`*^9, 3.6887816040203333`*^9}, 3.6887816433103886`*^9, {3.6887816741004314`*^9, 3.688781699230467*^9}, {3.6887817847405863`*^9, 3.688781813880627*^9}, { 3.688781885830728*^9, 3.6887819020407505`*^9}, {3.6889574605581684`*^9, 3.688957501788226*^9}, {3.688960184803222*^9, 3.6889601992032423`*^9}, { 3.692771817740493*^9, 3.692771905640616*^9}, {3.6927726676816826`*^9, 3.6927727032617326`*^9}, {3.6927727333717747`*^9, 3.692772736561779*^9}, { 3.692772826191905*^9, 3.692772844901931*^9}, {3.692772893741999*^9, 3.6927728997420073`*^9}, {3.6927729636420975`*^9, 3.692773125862324*^9}, { 3.6927731981924257`*^9, 3.692773236352479*^9}, {3.6927732729025297`*^9, 3.692773282242543*^9}, {3.6927733353526173`*^9, 3.6927734137827272`*^9}, 3.6927736473730545`*^9, {3.6934868115444183`*^9, 3.693486813494421*^9}, { 3.6934868553944798`*^9, 3.693486917754567*^9}, {3.6934869973946786`*^9, 3.693487001174684*^9}, {3.6934870442947445`*^9, 3.6934870479747496`*^9}, { 3.693487349135171*^9, 3.6934873994352417`*^9}, {3.693487456975322*^9, 3.6934874585553246`*^9}, {3.6939897066669016`*^9, 3.6939897907970195`*^9}, {3.6939898244170666`*^9, 3.693989829937074*^9}, { 3.6939901042074585`*^9, 3.693990124237486*^9}, {3.69399018398757*^9, 3.6939902403476486`*^9}, {3.6939902781277018`*^9, 3.69399032732777*^9}, { 3.6939903908278594`*^9, 3.693990609328165*^9}, {3.693990640658209*^9, 3.693990673878256*^9}, {3.693990761178378*^9, 3.6939907769384003`*^9}, { 3.6939908128884506`*^9, 3.6939908380384855`*^9}, {3.6939908895785575`*^9, 3.6939908941885643`*^9}, {3.6939909859386926`*^9, 3.693991001898715*^9}, { 3.6939910395887675`*^9, 3.6939910643988028`*^9}, {3.693991107098862*^9, 3.6939911407889094`*^9}, {3.6939911957989864`*^9, 3.6939913838692493`*^9}, {3.6939918465598974`*^9, 3.693991856479911*^9}, { 3.6939919173699965`*^9, 3.6939919296100135`*^9}, {3.693991979330083*^9, 3.693992022780144*^9}, {3.6939921266502895`*^9, 3.6939921416103106`*^9}, { 3.6939921886903763`*^9, 3.693992235260442*^9}, {3.6939924451107354`*^9, 3.6939924757207785`*^9}, {3.6939925308708553`*^9, 3.693992535490862*^9}, { 3.69408137357989*^9, 3.6940813990399256`*^9}, {3.694081492270056*^9, 3.694081500430067*^9}, 3.694085807686309*^9, 3.694336369074993*^9, { 3.694336447585103*^9, 3.694336534165224*^9}, {3.6943365695452733`*^9, 3.694336572935278*^9}, {3.6943366355853662`*^9, 3.694336663395405*^9}, { 3.694336707865467*^9, 3.694336813505615*^9}, {3.6943368708856955`*^9, 3.694336972645838*^9}, {3.694337005795884*^9, 3.69433752400661*^9}, { 3.694337943297197*^9, 3.6943379730472383`*^9}, {3.694338096757412*^9, 3.694338100087416*^9}, {3.6943381564174953`*^9, 3.694338172057517*^9}, { 3.6943382111375713`*^9, 3.6943382179975815`*^9}, {3.694338370357795*^9, 3.694338415207857*^9}, {3.694338519908004*^9, 3.694338533448023*^9}, { 3.694338742738316*^9, 3.6943387845683746`*^9}, {3.6943388672484903`*^9, 3.694338909398549*^9}, {3.6943394389592905`*^9, 3.694339477079344*^9}, { 3.6943395685694723`*^9, 3.6943395881794996`*^9}, 3.6943396627096043`*^9, { 3.694339797119792*^9, 3.6943398030098004`*^9}, {3.6943398885999203`*^9, 3.6943400438301373`*^9}, {3.6943517756956816`*^9, 3.694351778765686*^9}, { 3.694351814965737*^9, 3.694351920335884*^9}, {3.6943520375260487`*^9, 3.694352038046049*^9}, {3.6943546301696777`*^9, 3.694354641489694*^9}, { 3.6943547065797853`*^9, 3.694354780889889*^9}, {3.694415922397947*^9, 3.694415933787963*^9}, {3.6944160021080585`*^9, 3.6944160163480783`*^9}, { 3.6944161612482815`*^9, 3.694416186218316*^9}, {3.6944162181183605`*^9, 3.694416241358393*^9}, {3.694416776009142*^9, 3.694416778289145*^9}, { 3.694417304849882*^9, 3.694417340579932*^9}, {3.6944179310727587`*^9, 3.6944179657728076`*^9}, {3.6944182927132654`*^9, 3.694418302313279*^9}, { 3.6944316170705633`*^9, 3.6944316923568697`*^9}, {3.6944318163219357`*^9, 3.694431820105152*^9}, {3.6965609549111967`*^9, 3.696560966061212*^9}, { 3.696560998851258*^9, 3.6965610020812626`*^9}, {3.6965611422314587`*^9, 3.696561159171482*^9}, 3.696563445644683*^9, {3.6965635186347857`*^9, 3.6965635322048044`*^9}, {3.696563569074856*^9, 3.6965635745148635`*^9}, { 3.696563720555068*^9, 3.69656372185507*^9}, {3.6965637807551527`*^9, 3.696563824135213*^9}, {3.6965639935254507`*^9, 3.696564031985504*^9}, { 3.696596096992402*^9, 3.696596186502527*^9}, {3.696596234252594*^9, 3.696596260452631*^9}, {3.6965963110027018`*^9, 3.69659632407272*^9}, 3.6965963803627987`*^9, {3.7244123642779827`*^9, 3.7244123648119507`*^9}, { 3.7255912428848085`*^9, 3.7255912492295227`*^9}, {3.725591466627203*^9, 3.725591704636403*^9}, {3.7255917405776634`*^9, 3.7255917613142586`*^9}, { 3.7255980783777914`*^9, 3.7255980873943977`*^9}, {3.725598135321295*^9, 3.7255981566673255`*^9}, {3.7255985463958807`*^9, 3.7255985750395555`*^9}, {3.725598660297285*^9, 3.725598669548276*^9}, { 3.7255989613446465`*^9, 3.7255989963014574`*^9}, {3.7255990922803245`*^9, 3.725599092624111*^9}, {3.7255991287997694`*^9, 3.7255991802271013`*^9}, 3.7255992673973975`*^9, {3.725599302619891*^9, 3.725599630275236*^9}, { 3.7255996917974653`*^9, 3.725600173598138*^9}, {3.72560026574846*^9, 3.7256002767652473`*^9}, 3.7256003308803263`*^9, {3.7256003995281887`*^9, 3.72560041238892*^9}, {3.725600503405278*^9, 3.725600537768276*^9}, { 3.72560062249599*^9, 3.725600660390954*^9}, {3.7256015423497496`*^9, 3.725601551460086*^9}, {3.725602674641403*^9, 3.725602676188448*^9}, { 3.725606737765007*^9, 3.7256067379681726`*^9}, {3.7259411263577843`*^9, 3.725941161974596*^9}, {3.7259413328141994`*^9, 3.7259413530325947`*^9}, { 3.725948620999795*^9, 3.7259486419857845`*^9}, 3.7259487502361426`*^9, { 3.725948801316684*^9, 3.7259488049789305`*^9}, {3.7259488747343755`*^9, 3.7259488880408845`*^9}, {3.7262144247900543`*^9, 3.7262144477456355`*^9}, {3.7574170493225684`*^9, 3.757417053184463*^9}, { 3.7831421588326306`*^9, 3.783142170925208*^9}, {3.783142395749114*^9, 3.7831425154306135`*^9}, {3.7831425557309313`*^9, 3.783142564092332*^9}, { 3.7831427526814885`*^9, 3.783142754255293*^9}, {3.7831428098757677`*^9, 3.7831428571042147`*^9}, {3.7834087348068304`*^9, 3.783408793037257*^9}, { 3.7834095081721888`*^9, 3.783409552999109*^9}, {3.783409588525758*^9, 3.7834095907684803`*^9}, {3.783409662061564*^9, 3.7834096810274954`*^9}, { 3.7834097163188562`*^9, 3.7834098893742294`*^9}, {3.7834100221449327`*^9, 3.783410060241215*^9}, {3.7834101051335173`*^9, 3.7834101131745987`*^9}, { 3.783410606354042*^9, 3.783410612361685*^9}, {3.783410755716464*^9, 3.7834107918890605`*^9}, {3.7834108581708117`*^9, 3.7834108764020586`*^9}, {3.783656780899205*^9, 3.783656816754212*^9}, { 3.783656906347945*^9, 3.783656914312093*^9}, {3.783657051037856*^9, 3.7836572912656827`*^9}, {3.783657346545521*^9, 3.7836573583072553`*^9}, { 3.783657399653203*^9, 3.783657405924858*^9}, {3.78365743635863*^9, 3.783657444445655*^9}, {3.783657544607131*^9, 3.7836575974442415`*^9}, { 3.784785690868435*^9, 3.7847857118559847`*^9}, {3.7847931085113173`*^9, 3.7847931143650365`*^9}, {3.784793162925936*^9, 3.784793168863771*^9}, { 3.788250819548458*^9, 3.7882508340994453`*^9}, {3.788250923421962*^9, 3.788250985225994*^9}, 3.7890213628913355`*^9, {3.789021393201993*^9, 3.789021408295926*^9}, {3.7890214429674954`*^9, 3.7890214979516497`*^9}, { 3.7890215681110067`*^9, 3.7890215803212132`*^9}, {3.7890216445484834`*^9, 3.789021733239565*^9}, {3.7890218407693024`*^9, 3.789021950403524*^9}}, CellLabel-> "In[169]:=",ExpressionUUID->"b35a9185-8750-4656-a44e-028f90a52a2d"] }, Closed]], Cell[CellGroupData[{ Cell["PLANE ELEMENT (nonl) defs ", "Subsection", CellChangeTimes->{{3.7574169773814163`*^9, 3.7574169848245335`*^9}, { 3.7574180750707226`*^9, 3.757418078890803*^9}, {3.7577456071227565`*^9, 3.7577456152773933`*^9}, 3.790129668121153*^9},ExpressionUUID->"4a83d903-fff4-4744-aa7e-\ a18a3e82ec90"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], " ", "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", "tt", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "INT", ",", "MID", ",", "DOM", ",", "r", ",", "e1", ",", "e2", ",", "e3", ",", "nn", ",", "FF", ",", "FFINV", ",", "jac", ",", "uvw", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "EEEE", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "FG", ",", "\[Delta]EG", ",", "EG", ",", "SS"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"Length", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", "3", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", RowBox[{ RowBox[{"NN", "[", "4", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"INT", "[", "3", "]"}], "=", "TRI7"}], ";", RowBox[{ RowBox[{"INT", "[", "4", "]"}], "=", "REC9"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"MID", "[", "3", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"MID", "[", "4", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"DOM", "[", "4", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"DOM", "[", "3", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "orthonomal", " ", "basis", " ", "defined", " ", "by", " ", "the", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{ RowBox[{"NN", "[", "nl", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"e1", ",", "e2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], "}"}], " ", "/.", RowBox[{"MID", "[", "nl", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"e3", "=", RowBox[{"e1", StyleBox["\[Cross]", "OperatorCharacter"], "e2"}]}], ";", "\[IndentingNewLine]", RowBox[{"nn", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"e3", "/", RowBox[{"Sqrt", "[", RowBox[{"e3", ".", "e3"}], "]"}]}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e1", ",", " ", "e2", ",", " ", "nn"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{ RowBox[{"NN", "[", "nl", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "gradient", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"FG", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"EG", "=", RowBox[{ RowBox[{"(", RowBox[{"FG", "+", RowBox[{"Transpose", "[", "FG", "]"}], "+", RowBox[{"FG", ".", RowBox[{"Transpose", "[", "FG", "]"}]}]}], ")"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]EG", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]", "[", "FG", "]"}], "+", RowBox[{"Transpose", "[", RowBox[{"\[Delta]", "[", "FG", "]"}], "]"}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "FG", "]"}], ".", RowBox[{"Transpose", "[", "FG", "]"}]}], "+", RowBox[{"FG", ".", RowBox[{"Transpose", "[", RowBox[{"\[Delta]", "[", "FG", "]"}], "]"}]}]}], ")"}], "/", "2"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Plane", " ", "stress", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{"EEEE", "-", RowBox[{ RowBox[{"(", RowBox[{"EEEE", ".", "nn"}], ")"}], ".", RowBox[{"Inverse", "[", RowBox[{"nn", ".", "EEEE", ".", "nn"}], "]"}], ".", RowBox[{"(", RowBox[{"nn", ".", "EEEE"}], ")"}]}]}], "]"}]}], ";", " ", "\[IndentingNewLine]", " ", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"SS", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"EG", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", "\[Delta]EG", "]"}], ".", RowBox[{"Flatten", "[", "SS", "]"}]}]}], " ", "tt"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"nl", "\[Equal]", "3"}], ",", RowBox[{"Return", "[", RowBox[{"QUAD", "[", RowBox[{ RowBox[{"INT", "[", "nl", "]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"nl", "\[Equal]", "4"}], ",", RowBox[{"Return", "[", RowBox[{"Integrate", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}]}], "}"}], "]"}]}]}], "]"}], "]"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426473093646455`*^9, 3.4426474078630457`*^9}, { 3.4426597184894*^9, 3.4426597783310003`*^9}, {3.442659859139*^9, 3.4426599679021997`*^9}, {3.4426601154852*^9, 3.442660125282*^9}, 3.4426603153866*^9, {3.4426606694491997`*^9, 3.442660676984*^9}, { 3.4426607660341997`*^9, 3.442660767017*^9}, {3.4426607970782003`*^9, 3.4426609236566*^9}, {3.4426609993859997`*^9, 3.442661000946*^9}, { 3.4426611720156*^9, 3.4426611866796*^9}, {3.4426612192836*^9, 3.4426612396104*^9}, {3.4426613536776*^9, 3.4426613563764*^9}, { 3.4426613962188*^9, 3.4426613966556*^9}, {3.443184440921*^9, 3.4431845165186*^9}, {3.4431848052298*^9, 3.4431848237002*^9}, { 3.4431849834618*^9, 3.4431849851934*^9}, {3.4431850342574*^9, 3.4431850385318003`*^9}, {3.4444402127514*^9, 3.4444402360889997`*^9}, { 3.44509636787*^9, 3.445096458974*^9}, {3.4450965569264*^9, 3.4450965855056*^9}, {3.4450966736612*^9, 3.4450967018348*^9}, 3.4450967876972*^9, {3.4451000792358*^9, 3.4451001019962*^9}, { 3.445132280975*^9, 3.4451322867782*^9}, 3.4451325631488*^9, 3.4451346101028*^9, {3.4455261966926003`*^9, 3.4455262691078*^9}, { 3.4455263543462*^9, 3.445526490113*^9}, {3.4455265305794*^9, 3.4455265347602*^9}, {3.4455267552349997`*^9, 3.4455267826754*^9}, 3.445526922233*^9, {3.445527218711*^9, 3.4455272895818*^9}, { 3.4455273640094*^9, 3.445527481259*^9}, 3.4455276192202*^9, { 3.4455278074376*^9, 3.4455278187164*^9}, {3.4455279660896*^9, 3.4455279742016*^9}, 3.4455280249016*^9, 3.4455285464407997`*^9, { 3.4461837560238*^9, 3.4461837697986*^9}, {3.446183892165*^9, 3.4461839004486*^9}, {3.4461839570142*^9, 3.4461841265550003`*^9}, 3.4461841729182*^9, {3.4461842101398*^9, 3.4461842206074*^9}, { 3.4461845241088*^9, 3.4461845410972*^9}, {3.4461845879440002`*^9, 3.4461847021516*^9}, {3.4461848428032*^9, 3.4461848544096003`*^9}, { 3.4461849111956*^9, 3.4461849123344*^9}, {3.4461850134868*^9, 3.446185058608*^9}, {3.4461852067616*^9, 3.446185223282*^9}, { 3.4461852548876*^9, 3.4461852626408*^9}, {3.4461853186604*^9, 3.446185320392*^9}, {3.4512642010481997`*^9, 3.451264207413*^9}, { 3.4512642788766003`*^9, 3.4512643136334*^9}, {3.4512643770006*^9, 3.4512644269362*^9}, {3.4512646983138*^9, 3.4512647384994*^9}, { 3.4512647823354*^9, 3.4512647868126*^9}, {3.4939932066616*^9, 3.4939932082060003`*^9}, {3.4939932399988003`*^9, 3.4939932614955997`*^9}, {3.493993300014*^9, 3.4939933073304*^9}, { 3.4939933992174*^9, 3.4939934078129997`*^9}, {3.4939934932314*^9, 3.493993515009*^9}, {3.4939935468556004`*^9, 3.493993568543*^9}, { 3.4939936486404*^9, 3.4939936621812*^9}, {3.4940328887262*^9, 3.4940328895218*^9}, {3.499487154582*^9, 3.49948716324*^9}, { 3.4994872083708*^9, 3.499487247324*^9}, {3.4994872822368*^9, 3.4994873816244*^9}, 3.499487417676*^9, {3.4994878504918003`*^9, 3.4994879045458*^9}, {3.4994879529370003`*^9, 3.4994879707794*^9}, { 3.4994880482042*^9, 3.4994880616826*^9}, {3.4994881084202003`*^9, 3.4994881177334003`*^9}, {3.4994884740218*^9, 3.4994884920554*^9}, { 3.4994885948282003`*^9, 3.4994886477434*^9}, {3.4994886790369997`*^9, 3.4994886860257998`*^9}, {3.4994887712953997`*^9, 3.4994887717478*^9}, { 3.6305517490219865`*^9, 3.6305518383945436`*^9}, 3.6305519329151096`*^9, { 3.6305521477354264`*^9, 3.6305521796235647`*^9}, {3.630552211063363*^9, 3.630552234159684*^9}, {3.6305523097380066`*^9, 3.6305523261429453`*^9}, { 3.630552400293186*^9, 3.630552443246643*^9}, {3.6305524899713154`*^9, 3.630552532581753*^9}, {3.630552564078554*^9, 3.630552660703081*^9}, { 3.6308069732471952`*^9, 3.6308070226836824`*^9}, {3.630831568112257*^9, 3.630831577359786*^9}, {3.632037136188613*^9, 3.6320372275628395`*^9}, { 3.632037282822*^9, 3.6320372864142056`*^9}, {3.632037326777514*^9, 3.6320373338819203`*^9}, {3.6320374068820953`*^9, 3.632037461262206*^9}, { 3.632037495368157*^9, 3.6320375996761227`*^9}, {3.632037657282418*^9, 3.6320377668306837`*^9}, {3.6320377993975463`*^9, 3.6320378258790607`*^9}, {3.6320379375314474`*^9, 3.632037944011818*^9}, { 3.632037974774577*^9, 3.63203804108137*^9}, {3.632038115937651*^9, 3.6320381168477035`*^9}, {3.632038171547832*^9, 3.6320381721648674`*^9}, { 3.6320382092969913`*^9, 3.6320382642141323`*^9}, 3.632038311238822*^9, { 3.6320383438376865`*^9, 3.6320384084533825`*^9}, {3.632038502612768*^9, 3.632038536966733*^9}, {3.6320386355663724`*^9, 3.632038663028943*^9}, { 3.6320387578143644`*^9, 3.632038876049127*^9}, {3.632038925681966*^9, 3.6320390116098804`*^9}, {3.6320390559574175`*^9, 3.632039057440502*^9}, { 3.6320390909984217`*^9, 3.6320392794842024`*^9}, {3.6320393098219376`*^9, 3.6320393228646836`*^9}, {3.6320393691423306`*^9, 3.632039469157051*^9}, { 3.6320395408921537`*^9, 3.6320395753041224`*^9}, {3.632039607865985*^9, 3.6320396287681804`*^9}, {3.632039834419943*^9, 3.6320399635053263`*^9}, { 3.632040008307889*^9, 3.632040011081047*^9}, {3.632040111200774*^9, 3.6320401709411907`*^9}, {3.6320402797014112`*^9, 3.6320403974661474`*^9}, {3.6320411172793183`*^9, 3.6320411297080293`*^9}, 3.632041280201637*^9, {3.632041357828077*^9, 3.632041361657296*^9}, { 3.632041402765647*^9, 3.632041437279621*^9}, 3.632041474164731*^9, { 3.6320415074596353`*^9, 3.632041548877004*^9}, {3.6320415931405363`*^9, 3.632041610919553*^9}, {3.632041656484159*^9, 3.6320416691688843`*^9}, { 3.6320420632294235`*^9, 3.6320420791513343`*^9}, {3.6320424482774467`*^9, 3.632042550289282*^9}, {3.632042803353756*^9, 3.632042928840934*^9}, { 3.632042961566806*^9, 3.63204301077662*^9}, {3.632043063037609*^9, 3.6320430712580795`*^9}, {3.632043120691907*^9, 3.632043161148221*^9}, { 3.6320432062678013`*^9, 3.6320432094549837`*^9}, 3.632043258394783*^9, { 3.632043351071084*^9, 3.632043352668175*^9}, {3.6345677461009674`*^9, 3.634568027044036*^9}, 3.634568059784909*^9, {3.6345686692177663`*^9, 3.6345687304812703`*^9}, {3.634568765543276*^9, 3.634568827443816*^9}, { 3.6346120324026976`*^9, 3.6346120417672334`*^9}, {3.6346121382917542`*^9, 3.6346122118989644`*^9}, {3.6346122814849443`*^9, 3.634612333070895*^9}, { 3.634612471677823*^9, 3.634612552263432*^9}, {3.6346125863993845`*^9, 3.6346126554953365`*^9}, {3.634612698763811*^9, 3.634612702163006*^9}, { 3.6348726356017313`*^9, 3.634872755937614*^9}, {3.634877631123617*^9, 3.6348776427762833`*^9}, {3.6348782474488688`*^9, 3.6348782744724145`*^9}, {3.63487832072106*^9, 3.634878440448908*^9}, { 3.6852817264030714`*^9, 3.6852817834531507`*^9}, {3.68794462572165*^9, 3.687944776911862*^9}, {3.6879451060223227`*^9, 3.6879451445423765`*^9}, { 3.6879452810225677`*^9, 3.6879452918025827`*^9}, {3.6879455589529567`*^9, 3.687945567592969*^9}, {3.6879456213830442`*^9, 3.6879456613631*^9}, { 3.6879457292931952`*^9, 3.6879457736132574`*^9}, {3.688022923252344*^9, 3.688023002982456*^9}, {3.6880230753425574`*^9, 3.688023230782775*^9}, 3.688023348002939*^9, {3.688023553833227*^9, 3.6880235620032387`*^9}, { 3.6880236295333333`*^9, 3.6880236382433453`*^9}, 3.6880237756035376`*^9, { 3.688031422416407*^9, 3.688031557816597*^9}, {3.6881117497443466`*^9, 3.688111797854414*^9}, {3.6881166477118034`*^9, 3.688116649471806*^9}, { 3.688118444084318*^9, 3.6881185798545084`*^9}, {3.688118642824597*^9, 3.688118799384816*^9}, {3.688118855204894*^9, 3.688118917084981*^9}, { 3.6881194959182944`*^9, 3.688119497718297*^9}, {3.6881196404384966`*^9, 3.688119655048517*^9}, {3.688119702888584*^9, 3.688119727678619*^9}, { 3.6881200919291286`*^9, 3.6881201295191813`*^9}, {3.6881202044892864`*^9, 3.688120237039332*^9}, {3.688120497669697*^9, 3.688120502989704*^9}, { 3.688120738340034*^9, 3.6881207493700495`*^9}, {3.6882745101002936`*^9, 3.6882745118602962`*^9}, {3.6883042728760366`*^9, 3.688304806616784*^9}, { 3.6883051027271986`*^9, 3.6883051086172066`*^9}, {3.6883054642977047`*^9, 3.6883054716377153`*^9}, {3.688306465909107*^9, 3.6883064729091167`*^9}, { 3.6883066024792986`*^9, 3.6883066550893717`*^9}, {3.6883071311300383`*^9, 3.688307145950059*^9}, 3.6883073798003864`*^9, {3.6887815904603148`*^9, 3.6887816040203333`*^9}, 3.6887816433103886`*^9, {3.6887816741004314`*^9, 3.688781699230467*^9}, {3.6887817847405863`*^9, 3.688781813880627*^9}, { 3.688781885830728*^9, 3.6887819020407505`*^9}, {3.6889574605581684`*^9, 3.688957501788226*^9}, {3.688960184803222*^9, 3.6889601992032423`*^9}, { 3.692771817740493*^9, 3.692771905640616*^9}, {3.6927726676816826`*^9, 3.6927727032617326`*^9}, {3.6927727333717747`*^9, 3.692772736561779*^9}, { 3.692772826191905*^9, 3.692772844901931*^9}, {3.692772893741999*^9, 3.6927728997420073`*^9}, {3.6927729636420975`*^9, 3.692773125862324*^9}, { 3.6927731981924257`*^9, 3.692773236352479*^9}, {3.6927732729025297`*^9, 3.692773282242543*^9}, {3.6927733353526173`*^9, 3.6927734137827272`*^9}, 3.6927736473730545`*^9, {3.6934868115444183`*^9, 3.693486813494421*^9}, { 3.6934868553944798`*^9, 3.693486917754567*^9}, {3.6934869973946786`*^9, 3.693487001174684*^9}, {3.6934870442947445`*^9, 3.6934870479747496`*^9}, { 3.693487349135171*^9, 3.6934873994352417`*^9}, {3.693487456975322*^9, 3.6934874585553246`*^9}, {3.6939897066669016`*^9, 3.6939897907970195`*^9}, {3.6939898244170666`*^9, 3.693989829937074*^9}, { 3.6939901042074585`*^9, 3.693990124237486*^9}, {3.69399018398757*^9, 3.6939902403476486`*^9}, {3.6939902781277018`*^9, 3.69399032732777*^9}, { 3.6939903908278594`*^9, 3.693990609328165*^9}, {3.693990640658209*^9, 3.693990673878256*^9}, {3.693990761178378*^9, 3.6939907769384003`*^9}, { 3.6939908128884506`*^9, 3.6939908380384855`*^9}, {3.6939908895785575`*^9, 3.6939908941885643`*^9}, {3.6939909859386926`*^9, 3.693991001898715*^9}, { 3.6939910395887675`*^9, 3.6939910643988028`*^9}, {3.693991107098862*^9, 3.6939911407889094`*^9}, {3.6939911957989864`*^9, 3.6939913838692493`*^9}, {3.6939918465598974`*^9, 3.693991856479911*^9}, { 3.6939919173699965`*^9, 3.6939919296100135`*^9}, {3.693991979330083*^9, 3.693992022780144*^9}, {3.6939921266502895`*^9, 3.6939921416103106`*^9}, { 3.6939921886903763`*^9, 3.693992235260442*^9}, {3.6939924451107354`*^9, 3.6939924757207785`*^9}, {3.6939925308708553`*^9, 3.693992535490862*^9}, { 3.69408137357989*^9, 3.6940813990399256`*^9}, {3.694081492270056*^9, 3.694081500430067*^9}, 3.694085807686309*^9, 3.694336369074993*^9, { 3.694336447585103*^9, 3.694336534165224*^9}, {3.6943365695452733`*^9, 3.694336572935278*^9}, {3.6943366355853662`*^9, 3.694336663395405*^9}, { 3.694336707865467*^9, 3.694336813505615*^9}, {3.6943368708856955`*^9, 3.694336972645838*^9}, {3.694337005795884*^9, 3.69433752400661*^9}, { 3.694337943297197*^9, 3.6943379730472383`*^9}, {3.694338096757412*^9, 3.694338100087416*^9}, {3.6943381564174953`*^9, 3.694338172057517*^9}, { 3.6943382111375713`*^9, 3.6943382179975815`*^9}, {3.694338370357795*^9, 3.694338415207857*^9}, {3.694338519908004*^9, 3.694338533448023*^9}, { 3.694338742738316*^9, 3.6943387845683746`*^9}, {3.6943388672484903`*^9, 3.694338909398549*^9}, {3.6943394389592905`*^9, 3.694339477079344*^9}, { 3.6943395685694723`*^9, 3.6943395881794996`*^9}, 3.6943396627096043`*^9, { 3.694339797119792*^9, 3.6943398030098004`*^9}, {3.6943398885999203`*^9, 3.6943400438301373`*^9}, {3.6943517756956816`*^9, 3.694351778765686*^9}, { 3.694351814965737*^9, 3.694351920335884*^9}, {3.6943520375260487`*^9, 3.694352038046049*^9}, {3.6943546301696777`*^9, 3.694354641489694*^9}, { 3.6943547065797853`*^9, 3.694354780889889*^9}, {3.694415922397947*^9, 3.694415933787963*^9}, {3.6944160021080585`*^9, 3.6944160163480783`*^9}, { 3.6944161612482815`*^9, 3.694416186218316*^9}, {3.6944162181183605`*^9, 3.694416241358393*^9}, {3.694416776009142*^9, 3.694416778289145*^9}, { 3.694417304849882*^9, 3.694417340579932*^9}, {3.6944179310727587`*^9, 3.6944179657728076`*^9}, {3.6944182927132654`*^9, 3.694418302313279*^9}, { 3.6944316170705633`*^9, 3.6944316923568697`*^9}, {3.6944318163219357`*^9, 3.694431820105152*^9}, {3.6965609549111967`*^9, 3.696560966061212*^9}, { 3.696560998851258*^9, 3.6965610020812626`*^9}, {3.6965611422314587`*^9, 3.696561159171482*^9}, 3.696563445644683*^9, {3.6965635186347857`*^9, 3.6965635322048044`*^9}, {3.696563569074856*^9, 3.6965635745148635`*^9}, { 3.696563720555068*^9, 3.69656372185507*^9}, {3.6965637807551527`*^9, 3.696563824135213*^9}, {3.6965639935254507`*^9, 3.696564031985504*^9}, { 3.696596096992402*^9, 3.696596186502527*^9}, {3.696596234252594*^9, 3.696596260452631*^9}, {3.6965963110027018`*^9, 3.69659632407272*^9}, 3.6965963803627987`*^9, {3.7244123642779827`*^9, 3.7244123648119507`*^9}, { 3.7255912428848085`*^9, 3.7255912492295227`*^9}, {3.725591466627203*^9, 3.725591704636403*^9}, {3.7255917405776634`*^9, 3.7255917613142586`*^9}, { 3.7255980783777914`*^9, 3.7255980873943977`*^9}, {3.725598135321295*^9, 3.7255981566673255`*^9}, {3.7255985463958807`*^9, 3.7255985750395555`*^9}, {3.725598660297285*^9, 3.725598669548276*^9}, { 3.7255989613446465`*^9, 3.7255989963014574`*^9}, {3.7255990922803245`*^9, 3.725599092624111*^9}, {3.7255991287997694`*^9, 3.7255991802271013`*^9}, 3.7255992673973975`*^9, {3.725599302619891*^9, 3.725599630275236*^9}, { 3.7255996917974653`*^9, 3.725600173598138*^9}, {3.72560026574846*^9, 3.7256002767652473`*^9}, 3.7256003308803263`*^9, {3.7256003995281887`*^9, 3.72560041238892*^9}, {3.725600503405278*^9, 3.725600537768276*^9}, { 3.72560062249599*^9, 3.725600660390954*^9}, {3.7256015423497496`*^9, 3.725601551460086*^9}, {3.725602674641403*^9, 3.725602676188448*^9}, { 3.725606737765007*^9, 3.7256067379681726`*^9}, {3.7259411263577843`*^9, 3.725941161974596*^9}, {3.7259413328141994`*^9, 3.7259413530325947`*^9}, { 3.725948620999795*^9, 3.7259486419857845`*^9}, 3.7259487502361426`*^9, { 3.725948801316684*^9, 3.7259488049789305`*^9}, {3.7259488747343755`*^9, 3.7259488880408845`*^9}, {3.7262144247900543`*^9, 3.7262144477456355`*^9}, {3.7574171303554697`*^9, 3.7574171843446183`*^9}, {3.7574172301540523`*^9, 3.757417230424534*^9}, { 3.7574172774582806`*^9, 3.757417279859251*^9}, {3.757418119406087*^9, 3.757418162231819*^9}, {3.790129674473545*^9, 3.79012968521891*^9}, { 3.814675393524129*^9, 3.8146753964039536`*^9}, {3.8216148844365788`*^9, 3.8216149206900663`*^9}, 3.8217798501935825`*^9}, CellLabel-> "In[172]:=",ExpressionUUID->"840e941d-81a2-4261-a512-1ef088e26675"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]_", ",", "\[Nu]_"}], "}"}], ",", RowBox[{"{", "t_", "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Triangle", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "pol", ",", "sha", ",", "nod", ",", "x", ",", "y", ",", "NN", ",", "u", ",", "v", ",", "E\[Sigma]", ",", "EE", ",", "\[Delta]E", ",", "SS", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]WW"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nod", " ", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"sha", "=", RowBox[{"{", RowBox[{"1", ",", "x", ",", "y"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"pol", "=", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nod", ",", "1", ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"sha", " ", ".", RowBox[{"Inverse", "[", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"sha", " ", "/.", " ", RowBox[{"Thread", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], "\[Rule]", "#"}], "]"}]}], "&"}], ",", "pol"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "approximations", "*)"}], " ", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nod", ",", "2", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nod", ",", "2", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"plane", " ", "stress", " ", "elasticity"}], "*)"}], "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"\[CapitalEpsilon]", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"strain", " ", "and", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"EE", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}], ")"}], "^", "2"}]}], ")"}], "/", "2"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "v"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "y"], "u"}], ")"}], "^", "2"}], "+", RowBox[{ RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "y"], "v"}], ")"}], "^", "2"}]}], ")"}], "/", "2"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}], "+", RowBox[{ SubscriptBox["\[PartialD]", "y"], "u"}]}], ")"}], "+", RowBox[{ RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], ")"}], "*", RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "y"], "u"}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}], ")"}], "*", RowBox[{"(", RowBox[{ SubscriptBox["\[PartialD]", "y"], "v"}], ")"}]}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]E", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], "]"}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], "]"}], RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}], "]"}], RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}]}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "y"], "v"}], "]"}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "y"], "u"}], "]"}], RowBox[{ SubscriptBox["\[PartialD]", "y"], "u"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "y"], "v"}], "]"}], RowBox[{ SubscriptBox["\[PartialD]", "y"], "v"}]}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}], "+", RowBox[{ SubscriptBox["\[PartialD]", "y"], "u"}]}], "]"}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], "]"}], "*", RowBox[{ SubscriptBox["\[PartialD]", "y"], "u"}]}], "+", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], "*", RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "y"], "u"}], "]"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}], "]"}], "*", RowBox[{ SubscriptBox["\[PartialD]", "y"], "v"}]}], "+", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}], "*", RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "y"], "v"}], "]"}]}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"SS", "=", RowBox[{"t", " ", RowBox[{"E\[Sigma]", ".", "EE"}]}]}], " ", ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{"-", RowBox[{"\[Delta]E", ".", "SS"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "0"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"Integrate", "[", RowBox[{ RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], RowBox[{"Polygon", "[", "pol", "]"}]}], ",", RowBox[{"Assumptions", "\[Rule]", RowBox[{"L", ">", "0"}]}]}], "]"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{{3.4426473093646455`*^9, 3.4426474078630457`*^9}, { 3.4426597184894*^9, 3.4426597783310003`*^9}, {3.442659859139*^9, 3.4426599679021997`*^9}, {3.4426601154852*^9, 3.442660125282*^9}, 3.4426603153866*^9, {3.4426606694491997`*^9, 3.442660676984*^9}, { 3.4426607660341997`*^9, 3.442660767017*^9}, {3.4426607970782003`*^9, 3.4426609236566*^9}, {3.4426609993859997`*^9, 3.442661000946*^9}, { 3.4426611720156*^9, 3.4426611866796*^9}, {3.4426612192836*^9, 3.4426612396104*^9}, {3.4426613536776*^9, 3.4426613563764*^9}, { 3.4426613962188*^9, 3.4426613966556*^9}, {3.443184440921*^9, 3.4431845165186*^9}, {3.4431848052298*^9, 3.4431848237002*^9}, { 3.4431849834618*^9, 3.4431849851934*^9}, {3.4431850342574*^9, 3.4431850385318003`*^9}, {3.4444402127514*^9, 3.4444402360889997`*^9}, { 3.44509636787*^9, 3.445096458974*^9}, {3.4450965569264*^9, 3.4450965855056*^9}, {3.4450966736612*^9, 3.4450967018348*^9}, 3.4450967876972*^9, {3.4451000792358*^9, 3.4451001019962*^9}, { 3.445132280975*^9, 3.4451322867782*^9}, 3.4451325631488*^9, 3.4451346101028*^9, {3.4455261966926003`*^9, 3.4455262691078*^9}, { 3.4455263543462*^9, 3.445526490113*^9}, {3.4455265305794*^9, 3.4455265347602*^9}, {3.4455267552349997`*^9, 3.4455267826754*^9}, 3.445526922233*^9, {3.445527218711*^9, 3.4455272895818*^9}, { 3.4455273640094*^9, 3.445527481259*^9}, 3.4455276192202*^9, { 3.4455278074376*^9, 3.4455278187164*^9}, {3.4455279660896*^9, 3.4455279742016*^9}, 3.4455280249016*^9, 3.4455285464407997`*^9, { 3.4461837560238*^9, 3.4461837697986*^9}, {3.446183892165*^9, 3.4461839004486*^9}, {3.4461839570142*^9, 3.4461841265550003`*^9}, 3.4461841729182*^9, {3.4461842101398*^9, 3.4461842206074*^9}, { 3.4461845241088*^9, 3.4461845410972*^9}, {3.4461845879440002`*^9, 3.4461847021516*^9}, {3.4461848428032*^9, 3.4461848544096003`*^9}, { 3.4461849111956*^9, 3.4461849123344*^9}, {3.4461850134868*^9, 3.446185058608*^9}, {3.4461852067616*^9, 3.446185223282*^9}, { 3.4461852548876*^9, 3.4461852626408*^9}, {3.4461853186604*^9, 3.446185320392*^9}, {3.4512642010481997`*^9, 3.451264207413*^9}, { 3.4512642788766003`*^9, 3.4512643136334*^9}, {3.4512643770006*^9, 3.4512644269362*^9}, {3.4512646983138*^9, 3.4512647384994*^9}, { 3.4512647823354*^9, 3.4512647868126*^9}, {3.4939932066616*^9, 3.4939932082060003`*^9}, {3.4939932399988003`*^9, 3.4939932614955997`*^9}, {3.493993300014*^9, 3.4939933073304*^9}, { 3.4939933992174*^9, 3.4939934078129997`*^9}, {3.4939934932314*^9, 3.493993515009*^9}, {3.4939935468556004`*^9, 3.493993568543*^9}, { 3.4939936486404*^9, 3.4939936621812*^9}, {3.4940328887262*^9, 3.4940328895218*^9}, {3.499487154582*^9, 3.49948716324*^9}, { 3.4994872083708*^9, 3.499487247324*^9}, {3.4994872822368*^9, 3.4994873816244*^9}, 3.499487417676*^9, {3.4994878504918003`*^9, 3.4994879045458*^9}, {3.4994879529370003`*^9, 3.4994879707794*^9}, { 3.4994880482042*^9, 3.4994880616826*^9}, {3.4994881084202003`*^9, 3.4994881177334003`*^9}, {3.4994884740218*^9, 3.4994884920554*^9}, { 3.4994885948282003`*^9, 3.4994886477434*^9}, {3.4994886790369997`*^9, 3.4994886860257998`*^9}, {3.4994887712953997`*^9, 3.4994887717478*^9}, { 3.6305517490219865`*^9, 3.6305518383945436`*^9}, 3.6305519329151096`*^9, { 3.6305521477354264`*^9, 3.6305521796235647`*^9}, {3.630552211063363*^9, 3.630552234159684*^9}, {3.6305523097380066`*^9, 3.6305523261429453`*^9}, { 3.630552400293186*^9, 3.630552443246643*^9}, {3.6305524899713154`*^9, 3.630552532581753*^9}, {3.630552564078554*^9, 3.630552660703081*^9}, { 3.6308069732471952`*^9, 3.6308070226836824`*^9}, {3.630831568112257*^9, 3.630831577359786*^9}, {3.632037136188613*^9, 3.6320372275628395`*^9}, { 3.632037282822*^9, 3.6320372864142056`*^9}, {3.632037326777514*^9, 3.6320373338819203`*^9}, {3.6320374068820953`*^9, 3.632037461262206*^9}, { 3.632037495368157*^9, 3.6320375996761227`*^9}, {3.632037657282418*^9, 3.6320377668306837`*^9}, {3.6320377993975463`*^9, 3.6320378258790607`*^9}, {3.6320379375314474`*^9, 3.632037944011818*^9}, { 3.632037974774577*^9, 3.63203804108137*^9}, {3.632038115937651*^9, 3.6320381168477035`*^9}, {3.632038171547832*^9, 3.6320381721648674`*^9}, { 3.6320382092969913`*^9, 3.6320382642141323`*^9}, 3.632038311238822*^9, { 3.6320383438376865`*^9, 3.6320384084533825`*^9}, {3.632038502612768*^9, 3.632038536966733*^9}, {3.6320386355663724`*^9, 3.632038663028943*^9}, { 3.6320387578143644`*^9, 3.632038876049127*^9}, {3.632038925681966*^9, 3.6320390116098804`*^9}, {3.6320390559574175`*^9, 3.632039057440502*^9}, { 3.6320390909984217`*^9, 3.6320392794842024`*^9}, {3.6320393098219376`*^9, 3.6320393228646836`*^9}, {3.6320393691423306`*^9, 3.632039469157051*^9}, { 3.6320395408921537`*^9, 3.6320395753041224`*^9}, {3.632039607865985*^9, 3.6320396287681804`*^9}, {3.632039834419943*^9, 3.6320399635053263`*^9}, { 3.632040008307889*^9, 3.632040011081047*^9}, {3.632040111200774*^9, 3.6320401709411907`*^9}, {3.6320402797014112`*^9, 3.6320403974661474`*^9}, {3.6320411172793183`*^9, 3.6320411297080293`*^9}, 3.632041280201637*^9, {3.632041357828077*^9, 3.632041361657296*^9}, { 3.632041402765647*^9, 3.632041437279621*^9}, 3.632041474164731*^9, { 3.6320415074596353`*^9, 3.632041548877004*^9}, {3.6320415931405363`*^9, 3.632041610919553*^9}, {3.632041656484159*^9, 3.6320416691688843`*^9}, { 3.6320420632294235`*^9, 3.6320420791513343`*^9}, {3.6320424482774467`*^9, 3.632042550289282*^9}, {3.632042803353756*^9, 3.632042928840934*^9}, { 3.632042961566806*^9, 3.63204301077662*^9}, {3.632043063037609*^9, 3.6320430712580795`*^9}, {3.632043120691907*^9, 3.632043161148221*^9}, { 3.6320432062678013`*^9, 3.6320432094549837`*^9}, 3.632043258394783*^9, { 3.632043351071084*^9, 3.632043352668175*^9}, {3.6345677461009674`*^9, 3.634568027044036*^9}, 3.634568059784909*^9, {3.6345686692177663`*^9, 3.6345687304812703`*^9}, {3.634568765543276*^9, 3.634568827443816*^9}, { 3.6346120324026976`*^9, 3.6346120417672334`*^9}, {3.6346121382917542`*^9, 3.6346122118989644`*^9}, {3.6346122814849443`*^9, 3.634612333070895*^9}, { 3.634612471677823*^9, 3.634612552263432*^9}, {3.6346125863993845`*^9, 3.6346126554953365`*^9}, {3.634612698763811*^9, 3.634612702163006*^9}, { 3.6348726356017313`*^9, 3.634872755937614*^9}, {3.634877631123617*^9, 3.6348776427762833`*^9}, {3.6348782474488688`*^9, 3.6348782744724145`*^9}, {3.63487832072106*^9, 3.634878440448908*^9}, { 3.6852817264030714`*^9, 3.6852817834531507`*^9}, {3.68794462572165*^9, 3.687944776911862*^9}, {3.6879451060223227`*^9, 3.6879451445423765`*^9}, { 3.6879452810225677`*^9, 3.6879452918025827`*^9}, {3.6879455589529567`*^9, 3.687945567592969*^9}, {3.6879456213830442`*^9, 3.6879456613631*^9}, { 3.6879457292931952`*^9, 3.6879457736132574`*^9}, {3.688022923252344*^9, 3.688023002982456*^9}, {3.6880230753425574`*^9, 3.688023230782775*^9}, 3.688023348002939*^9, {3.688023553833227*^9, 3.6880235620032387`*^9}, { 3.6880236295333333`*^9, 3.6880236382433453`*^9}, 3.6880237756035376`*^9, { 3.688031422416407*^9, 3.688031557816597*^9}, {3.6881117497443466`*^9, 3.688111797854414*^9}, {3.6881166477118034`*^9, 3.688116649471806*^9}, { 3.688118444084318*^9, 3.6881185798545084`*^9}, {3.688118642824597*^9, 3.688118799384816*^9}, {3.688118855204894*^9, 3.688118917084981*^9}, { 3.6881194959182944`*^9, 3.688119497718297*^9}, {3.6881196404384966`*^9, 3.688119655048517*^9}, {3.688119702888584*^9, 3.688119727678619*^9}, { 3.6881200919291286`*^9, 3.6881201295191813`*^9}, {3.6881202044892864`*^9, 3.688120237039332*^9}, {3.688120497669697*^9, 3.688120502989704*^9}, { 3.688120738340034*^9, 3.6881207493700495`*^9}, {3.6882745101002936`*^9, 3.6882745118602962`*^9}, {3.6883042728760366`*^9, 3.688304806616784*^9}, { 3.6883051027271986`*^9, 3.6883051086172066`*^9}, {3.6883054642977047`*^9, 3.6883054716377153`*^9}, {3.688306465909107*^9, 3.6883064729091167`*^9}, { 3.6883066024792986`*^9, 3.6883066550893717`*^9}, {3.6883071311300383`*^9, 3.688307145950059*^9}, 3.6883073798003864`*^9, {3.6887815904603148`*^9, 3.6887816040203333`*^9}, 3.6887816433103886`*^9, {3.6887816741004314`*^9, 3.688781699230467*^9}, {3.6887817847405863`*^9, 3.688781813880627*^9}, { 3.688781885830728*^9, 3.6887819020407505`*^9}, {3.6889574605581684`*^9, 3.688957501788226*^9}, {3.688960184803222*^9, 3.6889601992032423`*^9}, { 3.692771817740493*^9, 3.692771905640616*^9}, {3.6927726676816826`*^9, 3.6927727032617326`*^9}, {3.6927727333717747`*^9, 3.692772736561779*^9}, { 3.692772826191905*^9, 3.692772844901931*^9}, {3.692772893741999*^9, 3.6927728997420073`*^9}, {3.6927729636420975`*^9, 3.692773125862324*^9}, { 3.6927731981924257`*^9, 3.692773236352479*^9}, {3.6927732729025297`*^9, 3.692773282242543*^9}, {3.6927733353526173`*^9, 3.6927734137827272`*^9}, 3.6927736473730545`*^9, {3.6934868115444183`*^9, 3.693486813494421*^9}, { 3.6934868553944798`*^9, 3.693486917754567*^9}, {3.6934869973946786`*^9, 3.693487001174684*^9}, {3.6934870442947445`*^9, 3.6934870479747496`*^9}, { 3.693487349135171*^9, 3.6934873994352417`*^9}, {3.693487456975322*^9, 3.6934874585553246`*^9}, {3.6939897066669016`*^9, 3.6939897907970195`*^9}, {3.6939898244170666`*^9, 3.693989829937074*^9}, { 3.6939901042074585`*^9, 3.693990124237486*^9}, {3.69399018398757*^9, 3.6939902403476486`*^9}, {3.6939902781277018`*^9, 3.69399032732777*^9}, { 3.6939903908278594`*^9, 3.693990609328165*^9}, {3.693990640658209*^9, 3.693990673878256*^9}, {3.693990761178378*^9, 3.6939907769384003`*^9}, { 3.6939908128884506`*^9, 3.6939908380384855`*^9}, {3.6939908895785575`*^9, 3.6939908941885643`*^9}, {3.6939909859386926`*^9, 3.693991001898715*^9}, { 3.6939910395887675`*^9, 3.6939910643988028`*^9}, {3.693991107098862*^9, 3.6939911407889094`*^9}, {3.6939911957989864`*^9, 3.6939913838692493`*^9}, {3.6939918465598974`*^9, 3.693991856479911*^9}, { 3.6939919173699965`*^9, 3.6939919296100135`*^9}, {3.693991979330083*^9, 3.693992022780144*^9}, {3.6939921266502895`*^9, 3.6939921416103106`*^9}, { 3.6939921886903763`*^9, 3.693992235260442*^9}, {3.6939924451107354`*^9, 3.6939924757207785`*^9}, {3.6939925308708553`*^9, 3.693992535490862*^9}, { 3.69408137357989*^9, 3.6940813990399256`*^9}, {3.694081492270056*^9, 3.694081500430067*^9}, 3.694085807686309*^9, 3.694336369074993*^9, { 3.694336447585103*^9, 3.694336534165224*^9}, {3.6943365695452733`*^9, 3.694336572935278*^9}, {3.6943366355853662`*^9, 3.694336663395405*^9}, { 3.694336707865467*^9, 3.694336813505615*^9}, {3.6943368708856955`*^9, 3.694336972645838*^9}, {3.694337005795884*^9, 3.69433752400661*^9}, { 3.694337943297197*^9, 3.6943379730472383`*^9}, {3.694338096757412*^9, 3.694338100087416*^9}, {3.6943381564174953`*^9, 3.694338172057517*^9}, { 3.6943382111375713`*^9, 3.6943382179975815`*^9}, {3.694338370357795*^9, 3.694338415207857*^9}, {3.694338519908004*^9, 3.694338533448023*^9}, { 3.694338742738316*^9, 3.6943387845683746`*^9}, {3.6943388672484903`*^9, 3.694338909398549*^9}, {3.6943394389592905`*^9, 3.694339477079344*^9}, { 3.6943395685694723`*^9, 3.6943395881794996`*^9}, 3.6943396627096043`*^9, { 3.694339797119792*^9, 3.6943398030098004`*^9}, {3.6943398885999203`*^9, 3.6943400438301373`*^9}, {3.6943517756956816`*^9, 3.694351778765686*^9}, { 3.694351814965737*^9, 3.694351920335884*^9}, {3.6943520375260487`*^9, 3.694352038046049*^9}, {3.6943546301696777`*^9, 3.694354641489694*^9}, { 3.6943547065797853`*^9, 3.694354780889889*^9}, {3.694415922397947*^9, 3.694415933787963*^9}, {3.6944160021080585`*^9, 3.6944160163480783`*^9}, { 3.6944161612482815`*^9, 3.694416186218316*^9}, {3.6944162181183605`*^9, 3.694416241358393*^9}, {3.694416776009142*^9, 3.694416778289145*^9}, { 3.694417304849882*^9, 3.694417340579932*^9}, {3.6944179310727587`*^9, 3.6944179657728076`*^9}, {3.6944182927132654`*^9, 3.694418302313279*^9}, { 3.6944316170705633`*^9, 3.6944316923568697`*^9}, {3.6944318163219357`*^9, 3.694431820105152*^9}, {3.6965609549111967`*^9, 3.696560966061212*^9}, { 3.696560998851258*^9, 3.6965610020812626`*^9}, {3.6965611422314587`*^9, 3.696561159171482*^9}, 3.696563445644683*^9, {3.6965635186347857`*^9, 3.6965635322048044`*^9}, {3.696563569074856*^9, 3.6965635745148635`*^9}, { 3.696563720555068*^9, 3.69656372185507*^9}, {3.6965637807551527`*^9, 3.696563824135213*^9}, {3.6965639935254507`*^9, 3.696564031985504*^9}, { 3.696596096992402*^9, 3.696596186502527*^9}, {3.696596234252594*^9, 3.696596260452631*^9}, {3.6965963110027018`*^9, 3.69659632407272*^9}, 3.6965963803627987`*^9, {3.7244123642779827`*^9, 3.7244123648119507`*^9}, { 3.7255912428848085`*^9, 3.7255912492295227`*^9}, {3.725591466627203*^9, 3.725591704636403*^9}, {3.7255917405776634`*^9, 3.7255917613142586`*^9}, { 3.7255980783777914`*^9, 3.7255980873943977`*^9}, {3.725598135321295*^9, 3.7255981566673255`*^9}, {3.7255985463958807`*^9, 3.7255985750395555`*^9}, {3.725598660297285*^9, 3.725598669548276*^9}, { 3.7255989613446465`*^9, 3.7255989963014574`*^9}, {3.7255990922803245`*^9, 3.725599092624111*^9}, {3.7255991287997694`*^9, 3.7255991802271013`*^9}, 3.7255992673973975`*^9, {3.725599302619891*^9, 3.725599630275236*^9}, { 3.7255996917974653`*^9, 3.725600173598138*^9}, {3.72560026574846*^9, 3.7256002767652473`*^9}, 3.7256003308803263`*^9, {3.7256003995281887`*^9, 3.72560041238892*^9}, {3.725600503405278*^9, 3.725600537768276*^9}, { 3.72560062249599*^9, 3.725600660390954*^9}, {3.7256015423497496`*^9, 3.725601551460086*^9}, {3.725602674641403*^9, 3.725602676188448*^9}, { 3.725606737765007*^9, 3.7256067379681726`*^9}, {3.7259411263577843`*^9, 3.725941161974596*^9}, {3.7259413328141994`*^9, 3.7259413530325947`*^9}, { 3.725948620999795*^9, 3.7259486419857845`*^9}, 3.7259487502361426`*^9, { 3.725948801316684*^9, 3.7259488049789305`*^9}, {3.7259488747343755`*^9, 3.7259488880408845`*^9}, {3.7262144247900543`*^9, 3.7262144477456355`*^9}, {3.7574171303554697`*^9, 3.7574171843446183`*^9}, {3.7574172301540523`*^9, 3.757417230424534*^9}, { 3.7574172774582806`*^9, 3.757417279859251*^9}, {3.757418119406087*^9, 3.757418162231819*^9}, {3.790129674473545*^9, 3.79012968521891*^9}, { 3.814675393524129*^9, 3.8146753964039536`*^9}, {3.8216148844365788`*^9, 3.8216149206900663`*^9}, 3.8217798501935825`*^9},ExpressionUUID->"94be9ac1-804c-4c21-bfe9-\ f24914de4b8b"] }, Closed]], Cell[CellGroupData[{ Cell["PLANE ELEMENT (tmec) defs ", "Subsection", CellChangeTimes->{{3.7577458100953183`*^9, 3.757745817919499*^9}, { 3.7901297746587725`*^9, 3.79012978895208*^9}},ExpressionUUID->"ea1acd62-479c-4ad6-824b-\ 7b581beec004"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"TMEC", ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "EE_", ",", "\[Nu]\[Nu]_", ",", "\[Alpha]\[Alpha]_", ",", "kk_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "ss_", ",", "\[CurlyTheta]0_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "INT", ",", "MID", ",", "r", ",", "e1", ",", "e2", ",", "e3", ",", "nn", ",", "FF", ",", "FFINV", ",", "jac", ",", "uvw", ",", "du", ",", "d\[CurlyTheta]", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "EEEE", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]pint", ",", "\[Delta]pext", ",", "\[CurlyTheta]\[CurlyTheta]"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"Length", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", "3", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Xi]", "-", "\[Eta]"}], ",", "\[Xi]", ",", "\[Eta]"}], "}"}]}], ";", RowBox[{ RowBox[{"NN", "[", "4", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Eta]"}], ")"}]}], ",", RowBox[{"\[Xi]", RowBox[{"(", RowBox[{"1", "-", "\[Eta]"}], ")"}]}], ",", RowBox[{"\[Xi]", " ", "\[Eta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], "\[Eta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"INT", "[", "3", "]"}], "=", "TRI7"}], ";", RowBox[{ RowBox[{"INT", "[", "4", "]"}], "=", "REC9"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"MID", "[", "3", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"\[Xi]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Eta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"MID", "[", "4", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"\[Xi]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Eta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{ RowBox[{"NN", "[", "nl", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"e1", ",", "e2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Eta]"], "r"}]}], "}"}], " ", "/.", RowBox[{"MID", "[", "nl", "]"}]}]}], ";", "\[IndentingNewLine]", " ", RowBox[{"e3", "=", RowBox[{"e1", StyleBox["\[Cross]", "OperatorCharacter"], "e2"}]}], ";", "\[IndentingNewLine]", RowBox[{"nn", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"e3", "/", RowBox[{"Sqrt", "[", RowBox[{"e3", ".", "e3"}], "]"}]}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e1", ",", " ", "e2", ",", "nn"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{ RowBox[{"NN", "[", "nl", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CurlyTheta]\[CurlyTheta]", "=", RowBox[{ RowBox[{"NN", "[", "nl", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "4"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "gradient", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"du", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Eta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Zeta]"], "uvw"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"d\[CurlyTheta]", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "\[CurlyTheta]\[CurlyTheta]"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Eta]"], "\[CurlyTheta]\[CurlyTheta]"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Zeta]"], "\[CurlyTheta]\[CurlyTheta]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Plane", " ", "stress", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", " ", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", " ", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", " ", "\[Nu]\[Nu]"}]}], ")"}], "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{"EEEE", "-", RowBox[{ RowBox[{"(", RowBox[{"EEEE", ".", "nn"}], ")"}], ".", RowBox[{"Inverse", "[", RowBox[{"nn", ".", "EEEE", ".", "nn"}], "]"}], ".", RowBox[{"(", RowBox[{"nn", ".", "EEEE"}], ")"}]}]}], "]"}]}], ";", " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"du", "-", RowBox[{ RowBox[{"IdentityMatrix", "[", "3", "]"}], "*", "\[Alpha]\[Alpha]", "*", RowBox[{"(", RowBox[{"\[CurlyTheta]\[CurlyTheta]", "-", "\[CurlyTheta]0"}], ")"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]\[Delta]", "[", "du", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}], "*", "tt"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]pint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "d\[CurlyTheta]", "]"}], ".", "d\[CurlyTheta]"}]}], "*", "kk", "*", "tt"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]pext", "=", " ", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "\[CurlyTheta]\[CurlyTheta]", "]"}], "*", "ss"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"QUAD", "[", RowBox[{ RowBox[{"INT", "[", "nl", "]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wext", "+", "\[Delta]wint", "+", "\[Delta]pint", "+", "\[Delta]pext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "\[Eta]"}], "}"}]}], "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426473093646455`*^9, 3.4426474078630457`*^9}, { 3.4426597184894*^9, 3.4426597783310003`*^9}, {3.442659859139*^9, 3.4426599679021997`*^9}, {3.4426601154852*^9, 3.442660125282*^9}, 3.4426603153866*^9, {3.4426606694491997`*^9, 3.442660676984*^9}, { 3.4426607660341997`*^9, 3.442660767017*^9}, {3.4426607970782003`*^9, 3.4426609236566*^9}, {3.4426609993859997`*^9, 3.442661000946*^9}, { 3.4426611720156*^9, 3.4426611866796*^9}, {3.4426612192836*^9, 3.4426612396104*^9}, {3.4426613536776*^9, 3.4426613563764*^9}, { 3.4426613962188*^9, 3.4426613966556*^9}, {3.443184440921*^9, 3.4431845165186*^9}, {3.4431848052298*^9, 3.4431848237002*^9}, { 3.4431849834618*^9, 3.4431849851934*^9}, {3.4431850342574*^9, 3.4431850385318003`*^9}, {3.4444402127514*^9, 3.4444402360889997`*^9}, { 3.44509636787*^9, 3.445096458974*^9}, {3.4450965569264*^9, 3.4450965855056*^9}, {3.4450966736612*^9, 3.4450967018348*^9}, 3.4450967876972*^9, {3.4451000792358*^9, 3.4451001019962*^9}, { 3.445132280975*^9, 3.4451322867782*^9}, 3.4451325631488*^9, 3.4451346101028*^9, {3.4455261966926003`*^9, 3.4455262691078*^9}, { 3.4455263543462*^9, 3.445526490113*^9}, {3.4455265305794*^9, 3.4455265347602*^9}, {3.4455267552349997`*^9, 3.4455267826754*^9}, 3.445526922233*^9, {3.445527218711*^9, 3.4455272895818*^9}, { 3.4455273640094*^9, 3.445527481259*^9}, 3.4455276192202*^9, { 3.4455278074376*^9, 3.4455278187164*^9}, {3.4455279660896*^9, 3.4455279742016*^9}, 3.4455280249016*^9, 3.4455285464407997`*^9, { 3.4461837560238*^9, 3.4461837697986*^9}, {3.446183892165*^9, 3.4461839004486*^9}, {3.4461839570142*^9, 3.4461841265550003`*^9}, 3.4461841729182*^9, {3.4461842101398*^9, 3.4461842206074*^9}, { 3.4461845241088*^9, 3.4461845410972*^9}, {3.4461845879440002`*^9, 3.4461847021516*^9}, {3.4461848428032*^9, 3.4461848544096003`*^9}, { 3.4461849111956*^9, 3.4461849123344*^9}, {3.4461850134868*^9, 3.446185058608*^9}, {3.4461852067616*^9, 3.446185223282*^9}, { 3.4461852548876*^9, 3.4461852626408*^9}, {3.4461853186604*^9, 3.446185320392*^9}, {3.4512642010481997`*^9, 3.451264207413*^9}, { 3.4512642788766003`*^9, 3.4512643136334*^9}, {3.4512643770006*^9, 3.4512644269362*^9}, {3.4512646983138*^9, 3.4512647384994*^9}, { 3.4512647823354*^9, 3.4512647868126*^9}, {3.4939932066616*^9, 3.4939932082060003`*^9}, {3.4939932399988003`*^9, 3.4939932614955997`*^9}, {3.493993300014*^9, 3.4939933073304*^9}, { 3.4939933992174*^9, 3.4939934078129997`*^9}, {3.4939934932314*^9, 3.493993515009*^9}, {3.4939935468556004`*^9, 3.493993568543*^9}, { 3.4939936486404*^9, 3.4939936621812*^9}, {3.4940328887262*^9, 3.4940328895218*^9}, {3.499487154582*^9, 3.49948716324*^9}, { 3.4994872083708*^9, 3.499487247324*^9}, {3.4994872822368*^9, 3.4994873816244*^9}, 3.499487417676*^9, {3.4994878504918003`*^9, 3.4994879045458*^9}, {3.4994879529370003`*^9, 3.4994879707794*^9}, { 3.4994880482042*^9, 3.4994880616826*^9}, {3.4994881084202003`*^9, 3.4994881177334003`*^9}, {3.4994884740218*^9, 3.4994884920554*^9}, { 3.4994885948282003`*^9, 3.4994886477434*^9}, {3.4994886790369997`*^9, 3.4994886860257998`*^9}, {3.4994887712953997`*^9, 3.4994887717478*^9}, { 3.6305517490219865`*^9, 3.6305518383945436`*^9}, 3.6305519329151096`*^9, { 3.6305521477354264`*^9, 3.6305521796235647`*^9}, {3.630552211063363*^9, 3.630552234159684*^9}, {3.6305523097380066`*^9, 3.6305523261429453`*^9}, { 3.630552400293186*^9, 3.630552443246643*^9}, {3.6305524899713154`*^9, 3.630552532581753*^9}, {3.630552564078554*^9, 3.630552660703081*^9}, { 3.6308069732471952`*^9, 3.6308070226836824`*^9}, {3.630831568112257*^9, 3.630831577359786*^9}, {3.632037136188613*^9, 3.6320372275628395`*^9}, { 3.632037282822*^9, 3.6320372864142056`*^9}, {3.632037326777514*^9, 3.6320373338819203`*^9}, {3.6320374068820953`*^9, 3.632037461262206*^9}, { 3.632037495368157*^9, 3.6320375996761227`*^9}, {3.632037657282418*^9, 3.6320377668306837`*^9}, {3.6320377993975463`*^9, 3.6320378258790607`*^9}, {3.6320379375314474`*^9, 3.632037944011818*^9}, { 3.632037974774577*^9, 3.63203804108137*^9}, {3.632038115937651*^9, 3.6320381168477035`*^9}, {3.632038171547832*^9, 3.6320381721648674`*^9}, { 3.6320382092969913`*^9, 3.6320382642141323`*^9}, 3.632038311238822*^9, { 3.6320383438376865`*^9, 3.6320384084533825`*^9}, {3.632038502612768*^9, 3.632038536966733*^9}, {3.6320386355663724`*^9, 3.632038663028943*^9}, { 3.6320387578143644`*^9, 3.632038876049127*^9}, {3.632038925681966*^9, 3.6320390116098804`*^9}, {3.6320390559574175`*^9, 3.632039057440502*^9}, { 3.6320390909984217`*^9, 3.6320392794842024`*^9}, {3.6320393098219376`*^9, 3.6320393228646836`*^9}, {3.6320393691423306`*^9, 3.632039469157051*^9}, { 3.6320395408921537`*^9, 3.6320395753041224`*^9}, {3.632039607865985*^9, 3.6320396287681804`*^9}, {3.632039834419943*^9, 3.6320399635053263`*^9}, { 3.632040008307889*^9, 3.632040011081047*^9}, {3.632040111200774*^9, 3.6320401709411907`*^9}, {3.6320402797014112`*^9, 3.6320403974661474`*^9}, {3.6320411172793183`*^9, 3.6320411297080293`*^9}, 3.632041280201637*^9, {3.632041357828077*^9, 3.632041361657296*^9}, { 3.632041402765647*^9, 3.632041437279621*^9}, 3.632041474164731*^9, { 3.6320415074596353`*^9, 3.632041548877004*^9}, {3.6320415931405363`*^9, 3.632041610919553*^9}, {3.632041656484159*^9, 3.6320416691688843`*^9}, { 3.6320420632294235`*^9, 3.6320420791513343`*^9}, {3.6320424482774467`*^9, 3.632042550289282*^9}, {3.632042803353756*^9, 3.632042928840934*^9}, { 3.632042961566806*^9, 3.63204301077662*^9}, {3.632043063037609*^9, 3.6320430712580795`*^9}, {3.632043120691907*^9, 3.632043161148221*^9}, { 3.6320432062678013`*^9, 3.6320432094549837`*^9}, 3.632043258394783*^9, { 3.632043351071084*^9, 3.632043352668175*^9}, {3.6345677461009674`*^9, 3.634568027044036*^9}, 3.634568059784909*^9, {3.6345686692177663`*^9, 3.6345687304812703`*^9}, {3.634568765543276*^9, 3.634568827443816*^9}, { 3.6346120324026976`*^9, 3.6346120417672334`*^9}, {3.6346121382917542`*^9, 3.6346122118989644`*^9}, {3.6346122814849443`*^9, 3.634612333070895*^9}, { 3.634612471677823*^9, 3.634612552263432*^9}, {3.6346125863993845`*^9, 3.6346126554953365`*^9}, {3.634612698763811*^9, 3.634612702163006*^9}, { 3.6348726356017313`*^9, 3.634872755937614*^9}, {3.634877631123617*^9, 3.6348776427762833`*^9}, {3.6348782474488688`*^9, 3.6348782744724145`*^9}, {3.63487832072106*^9, 3.634878440448908*^9}, { 3.6852817264030714`*^9, 3.6852817834531507`*^9}, {3.68794462572165*^9, 3.687944776911862*^9}, {3.6879451060223227`*^9, 3.6879451445423765`*^9}, { 3.6879452810225677`*^9, 3.6879452918025827`*^9}, {3.6879455589529567`*^9, 3.687945567592969*^9}, {3.6879456213830442`*^9, 3.6879456613631*^9}, { 3.6879457292931952`*^9, 3.6879457736132574`*^9}, {3.688022923252344*^9, 3.688023002982456*^9}, {3.6880230753425574`*^9, 3.688023230782775*^9}, 3.688023348002939*^9, {3.688023553833227*^9, 3.6880235620032387`*^9}, { 3.6880236295333333`*^9, 3.6880236382433453`*^9}, 3.6880237756035376`*^9, { 3.688031422416407*^9, 3.688031557816597*^9}, {3.6881117497443466`*^9, 3.688111797854414*^9}, {3.6881166477118034`*^9, 3.688116649471806*^9}, { 3.688118444084318*^9, 3.6881185798545084`*^9}, {3.688118642824597*^9, 3.688118799384816*^9}, {3.688118855204894*^9, 3.688118917084981*^9}, { 3.6881194959182944`*^9, 3.688119497718297*^9}, {3.6881196404384966`*^9, 3.688119655048517*^9}, {3.688119702888584*^9, 3.688119727678619*^9}, { 3.6881200919291286`*^9, 3.6881201295191813`*^9}, {3.6881202044892864`*^9, 3.688120237039332*^9}, {3.688120497669697*^9, 3.688120502989704*^9}, { 3.688120738340034*^9, 3.6881207493700495`*^9}, {3.6882745101002936`*^9, 3.6882745118602962`*^9}, {3.6883042728760366`*^9, 3.688304806616784*^9}, { 3.6883051027271986`*^9, 3.6883051086172066`*^9}, {3.6883054642977047`*^9, 3.6883054716377153`*^9}, {3.688306465909107*^9, 3.6883064729091167`*^9}, { 3.6883066024792986`*^9, 3.6883066550893717`*^9}, {3.6883071311300383`*^9, 3.688307145950059*^9}, 3.6883073798003864`*^9, {3.6887815904603148`*^9, 3.6887816040203333`*^9}, 3.6887816433103886`*^9, {3.6887816741004314`*^9, 3.688781699230467*^9}, {3.6887817847405863`*^9, 3.688781813880627*^9}, { 3.688781885830728*^9, 3.6887819020407505`*^9}, {3.6889574605581684`*^9, 3.688957501788226*^9}, {3.688960184803222*^9, 3.6889601992032423`*^9}, { 3.692771817740493*^9, 3.692771905640616*^9}, {3.6927726676816826`*^9, 3.6927727032617326`*^9}, {3.6927727333717747`*^9, 3.692772736561779*^9}, { 3.692772826191905*^9, 3.692772844901931*^9}, {3.692772893741999*^9, 3.6927728997420073`*^9}, {3.6927729636420975`*^9, 3.692773125862324*^9}, { 3.6927731981924257`*^9, 3.692773236352479*^9}, {3.6927732729025297`*^9, 3.692773282242543*^9}, {3.6927733353526173`*^9, 3.6927734137827272`*^9}, 3.6927736473730545`*^9, {3.6934868115444183`*^9, 3.693486813494421*^9}, { 3.6934868553944798`*^9, 3.693486917754567*^9}, {3.6934869973946786`*^9, 3.693487001174684*^9}, {3.6934870442947445`*^9, 3.6934870479747496`*^9}, { 3.693487349135171*^9, 3.6934873994352417`*^9}, {3.693487456975322*^9, 3.6934874585553246`*^9}, {3.6939897066669016`*^9, 3.6939897907970195`*^9}, {3.6939898244170666`*^9, 3.693989829937074*^9}, { 3.6939901042074585`*^9, 3.693990124237486*^9}, {3.69399018398757*^9, 3.6939902403476486`*^9}, {3.6939902781277018`*^9, 3.69399032732777*^9}, { 3.6939903908278594`*^9, 3.693990609328165*^9}, {3.693990640658209*^9, 3.693990673878256*^9}, {3.693990761178378*^9, 3.6939907769384003`*^9}, { 3.6939908128884506`*^9, 3.6939908380384855`*^9}, {3.6939908895785575`*^9, 3.6939908941885643`*^9}, {3.6939909859386926`*^9, 3.693991001898715*^9}, { 3.6939910395887675`*^9, 3.6939910643988028`*^9}, {3.693991107098862*^9, 3.6939911407889094`*^9}, {3.6939911957989864`*^9, 3.6939913838692493`*^9}, {3.6939918465598974`*^9, 3.693991856479911*^9}, { 3.6939919173699965`*^9, 3.6939919296100135`*^9}, {3.693991979330083*^9, 3.693992022780144*^9}, {3.6939921266502895`*^9, 3.6939921416103106`*^9}, { 3.6939921886903763`*^9, 3.693992235260442*^9}, {3.6939924451107354`*^9, 3.6939924757207785`*^9}, {3.6939925308708553`*^9, 3.693992535490862*^9}, { 3.69408137357989*^9, 3.6940813990399256`*^9}, {3.694081492270056*^9, 3.694081500430067*^9}, 3.694085807686309*^9, 3.694336369074993*^9, { 3.694336447585103*^9, 3.694336534165224*^9}, {3.6943365695452733`*^9, 3.694336572935278*^9}, {3.6943366355853662`*^9, 3.694336663395405*^9}, { 3.694336707865467*^9, 3.694336813505615*^9}, {3.6943368708856955`*^9, 3.694336972645838*^9}, {3.694337005795884*^9, 3.69433752400661*^9}, { 3.694337943297197*^9, 3.6943379730472383`*^9}, {3.694338096757412*^9, 3.694338100087416*^9}, {3.6943381564174953`*^9, 3.694338172057517*^9}, { 3.6943382111375713`*^9, 3.6943382179975815`*^9}, {3.694338370357795*^9, 3.694338415207857*^9}, {3.694338519908004*^9, 3.694338533448023*^9}, { 3.694338742738316*^9, 3.6943387845683746`*^9}, {3.6943388672484903`*^9, 3.694338909398549*^9}, {3.6943394389592905`*^9, 3.694339477079344*^9}, { 3.6943395685694723`*^9, 3.6943395881794996`*^9}, 3.6943396627096043`*^9, { 3.694339797119792*^9, 3.6943398030098004`*^9}, {3.6943398885999203`*^9, 3.6943400438301373`*^9}, {3.6943517756956816`*^9, 3.694351778765686*^9}, { 3.694351814965737*^9, 3.694351920335884*^9}, {3.6943520375260487`*^9, 3.694352038046049*^9}, {3.6943546301696777`*^9, 3.694354641489694*^9}, { 3.6943547065797853`*^9, 3.694354780889889*^9}, {3.694415922397947*^9, 3.694415933787963*^9}, {3.6944160021080585`*^9, 3.6944160163480783`*^9}, { 3.6944161612482815`*^9, 3.694416186218316*^9}, {3.6944162181183605`*^9, 3.694416241358393*^9}, {3.694416776009142*^9, 3.694416778289145*^9}, { 3.694417304849882*^9, 3.694417340579932*^9}, {3.6944179310727587`*^9, 3.6944179657728076`*^9}, {3.6944182927132654`*^9, 3.694418302313279*^9}, { 3.6944316170705633`*^9, 3.6944316923568697`*^9}, {3.6944318163219357`*^9, 3.694431820105152*^9}, {3.6965609549111967`*^9, 3.696560966061212*^9}, { 3.696560998851258*^9, 3.6965610020812626`*^9}, {3.6965611422314587`*^9, 3.696561159171482*^9}, 3.696563445644683*^9, {3.6965635186347857`*^9, 3.6965635322048044`*^9}, {3.696563569074856*^9, 3.6965635745148635`*^9}, { 3.696563720555068*^9, 3.69656372185507*^9}, {3.6965637807551527`*^9, 3.696563824135213*^9}, {3.6965639935254507`*^9, 3.696564031985504*^9}, { 3.696596096992402*^9, 3.696596186502527*^9}, {3.696596234252594*^9, 3.696596260452631*^9}, {3.6965963110027018`*^9, 3.69659632407272*^9}, 3.6965963803627987`*^9, {3.7244123642779827`*^9, 3.7244123648119507`*^9}, { 3.7255912428848085`*^9, 3.7255912492295227`*^9}, {3.725591466627203*^9, 3.725591704636403*^9}, {3.7255917405776634`*^9, 3.7255917613142586`*^9}, { 3.7255980783777914`*^9, 3.7255980873943977`*^9}, {3.725598135321295*^9, 3.7255981566673255`*^9}, {3.7255985463958807`*^9, 3.7255985750395555`*^9}, {3.725598660297285*^9, 3.725598669548276*^9}, { 3.7255989613446465`*^9, 3.7255989963014574`*^9}, {3.7255990922803245`*^9, 3.725599092624111*^9}, {3.7255991287997694`*^9, 3.7255991802271013`*^9}, 3.7255992673973975`*^9, {3.725599302619891*^9, 3.725599630275236*^9}, { 3.7255996917974653`*^9, 3.725600173598138*^9}, {3.72560026574846*^9, 3.7256002767652473`*^9}, 3.7256003308803263`*^9, {3.7256003995281887`*^9, 3.72560041238892*^9}, {3.725600503405278*^9, 3.725600537768276*^9}, { 3.72560062249599*^9, 3.725600660390954*^9}, {3.7256015423497496`*^9, 3.725601551460086*^9}, {3.725602674641403*^9, 3.725602676188448*^9}, { 3.725606737765007*^9, 3.7256067379681726`*^9}, {3.7259411263577843`*^9, 3.725941161974596*^9}, {3.7259413328141994`*^9, 3.7259413530325947`*^9}, { 3.725948620999795*^9, 3.7259486419857845`*^9}, 3.7259487502361426`*^9, { 3.725948801316684*^9, 3.7259488049789305`*^9}, {3.7259488747343755`*^9, 3.7259488880408845`*^9}, {3.7262144247900543`*^9, 3.7262144477456355`*^9}, {3.7574170493225684`*^9, 3.757417053184463*^9}, 3.757746126576226*^9, 3.7577461878004365`*^9, {3.7901299755504103`*^9, 3.7901299864607277`*^9}, {3.822369517016216*^9, 3.8223695503530917`*^9}}, CellLabel-> "In[174]:=",ExpressionUUID->"23c44407-89d7-49c3-8402-db98f08de967"] }, Closed]], Cell[CellGroupData[{ Cell["PLATE ELEMENT (disp) defs ", "Subsection", CellChangeTimes->{{3.6302475626780834`*^9, 3.6302475636452847`*^9}, { 3.6303896204112215`*^9, 3.630389621175623*^9}, {3.7658855359334097`*^9, 3.7658855563942738`*^9}, {3.7882511594490995`*^9, 3.788251160663724*^9}},ExpressionUUID->"86fd674a-5cf8-425e-9838-\ f6b1c24994b0"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MEC", "-", "E1050"}], "|", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", "tt", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "n\[Alpha]", ",", "n\[Beta]", ",", "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "NN", ",", "mat", ",", "MM", ",", "r", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "r\[Gamma]", ",", "rn", ",", "jac", ",", "h\[Alpha]", ",", "e\[Alpha]", ",", "h\[Beta]", ",", "h\[Gamma]", ",", "e\[Beta]", ",", "en", ",", "e\[Gamma]", ",", "FF", ",", "\[Alpha]\[Gamma]", ",", "\[Beta]\[Gamma]", ",", "edg", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "\[Pi]u", ",", "\[Pi]v", ",", "\[Pi]w", ",", "\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]", ",", "f\[Alpha]", ",", "f\[Gamma]", ",", "fn", ",", "m\[Alpha]", ",", "m\[Gamma]", ",", "mn", ",", "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]", ",", "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]", ",", "\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]", ",", "GG", ",", "N\[Alpha]\[Alpha]", ",", "N\[Gamma]\[Gamma]", ",", "N\[Alpha]\[Gamma]", ",", "N\[Gamma]\[Alpha]", ",", "M\[Alpha]\[Alpha]", ",", "M\[Gamma]\[Gamma]", ",", "M\[Alpha]\[Gamma]", ",", "Q\[Alpha]", ",", "Q\[Gamma]", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wmap", ",", "AA"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"mat", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]", "=", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}]}], ";", " ", RowBox[{"r\[Beta]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Norm", "[", "r\[Beta]", "]"}]}], ";", " ", RowBox[{"h\[Alpha]", "=", RowBox[{"Norm", "[", "r\[Alpha]", "]"}]}], ";", RowBox[{"jac", "=", RowBox[{"Norm", "[", RowBox[{"r\[Alpha]", "\[Cross]", "r\[Beta]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Alpha]", "=", RowBox[{"r\[Alpha]", "/", "h\[Alpha]"}]}], ";", RowBox[{"e\[Beta]", "=", RowBox[{"r\[Beta]", "/", "h\[Beta]"}]}], ";", " ", RowBox[{"en", "=", RowBox[{ RowBox[{"r\[Alpha]", "\[Cross]", "r\[Beta]"}], " ", "/", "jac"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r\[Gamma]", "=", RowBox[{"r\[Beta]", "-", RowBox[{ RowBox[{"(", RowBox[{"r\[Beta]", ".", "e\[Alpha]"}], ")"}], " ", "e\[Alpha]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Gamma]", "=", RowBox[{"Norm", "[", "r\[Gamma]", "]"}]}], ";", RowBox[{"e\[Gamma]", "=", RowBox[{"r\[Gamma]", "/", "h\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", "e\[Gamma]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]\[Gamma]", ",", "\[Beta]\[Gamma]"}], "}"}], "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Alpha]"}], ",", RowBox[{"r\[Alpha]", ".", "r\[Beta]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Beta]"}], ",", RowBox[{"r\[Beta]", ".", "r\[Beta]"}]}], "}"}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Gamma]"}], ",", RowBox[{"r\[Beta]", ".", "r\[Gamma]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"edg", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Sort", "[", "#", "]"}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"(", RowBox[{"mat", ".", "NN"}], ")"}], ".", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", "#", "]"}]}], "]"}], "&"}], ",", "edg"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "1"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "projection", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Pi]\[Phi]", "=", RowBox[{ RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}], "/", "60"}], "+", " ", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "1"}], "]"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Theta]", "=", RowBox[{ RowBox[{ RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}], "/", "60"}], "+", " ", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "2"}], "]"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"continuous", " ", "displacement"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Pi]w", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "the", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]"}], "}"}], "=", RowBox[{ RowBox[{"FF", "[", RowBox[{"[", RowBox[{ RowBox[{"1", ";;", "2"}], ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]"}], "}"}], "=", RowBox[{ RowBox[{"FF", "[", RowBox[{"[", RowBox[{ RowBox[{"1", ";;", "2"}], ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"fn", "=", RowBox[{ RowBox[{"FF", "[", RowBox[{"[", "3", "]"}], "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"strain", " ", "measures", " ", "with", " ", "non"}], "-", RowBox[{"symmetric", " ", "\[Epsilon]"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}]}]}], ")"}]}], "/", "h\[Gamma]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", " ", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Theta]"}]}]}], ")"}], "/", "h\[Gamma]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], "/", "h\[Alpha]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], "/", "h\[Alpha]"}], "+", "\[Pi]\[Theta]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}]}]}], ")"}], "/", "h\[Gamma]"}], "-", "\[Pi]\[Phi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Alpha]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Gamma]\[Gamma]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Gamma]\[Gamma]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Gamma]\[Gamma]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Gamma]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", " ", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}], "*", "\[Kappa]\[Alpha]\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Alpha]", "=", RowBox[{ RowBox[{"5", "/", "6"}], " ", "*", "GG", "*", "tt", "*", "\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Gamma]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"virtual", " ", "work"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "M\[Alpha]\[Alpha]", ",", "M\[Gamma]\[Gamma]", ",", "M\[Alpha]\[Gamma]"}], "}"}]}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"Q\[Alpha]", ",", "Q\[Gamma]"}], "}"}]}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], "*", "fn"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wmap", "=", RowBox[{ RowBox[{ RowBox[{"-", "1"}], "/", "100000"}], "*", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Pi]w", "-", "w"}], "]"}], "*", RowBox[{"(", RowBox[{"\[Pi]w", "-", "w"}], ")"}]}], ")"}], "*", "tt", "*", RowBox[{"EE", "/", "jac"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI3", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wmap"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "n\[Alpha]", ",", "n\[Beta]", ",", "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "NN", ",", "mat", ",", "MM", ",", "r", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "r\[Gamma]", ",", "rn", ",", "jac", ",", "h\[Alpha]", ",", "e\[Alpha]", ",", "h\[Beta]", ",", "h\[Gamma]", ",", "e\[Beta]", ",", "en", ",", "e\[Gamma]", ",", "FF", ",", "\[Alpha]\[Gamma]", ",", "\[Beta]\[Gamma]", ",", "edg", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "\[Pi]u", ",", "\[Pi]v", ",", "\[Pi]w", ",", "\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]", ",", "f\[Alpha]", ",", "f\[Gamma]", ",", "fn", ",", "m\[Alpha]", ",", "m\[Gamma]", ",", "mn", ",", "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]", ",", "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]", ",", "\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]", ",", "N\[Alpha]\[Alpha]", ",", "N\[Gamma]\[Gamma]", ",", "N\[Alpha]\[Gamma]", ",", "N\[Gamma]\[Alpha]", ",", "M\[Alpha]\[Alpha]", ",", "M\[Gamma]\[Gamma]", ",", "M\[Alpha]\[Gamma]", ",", "Q\[Alpha]", ",", "Q\[Gamma]", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wmap", ",", "AA"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "n1", ",", "n2", ",", "n3", ",", "n12", ",", "n23", ",", "n31"}], "*)"}], "\[IndentingNewLine]", RowBox[{"MM", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "+", RowBox[{"2", " ", SuperscriptBox["\[Alpha]", "2"]}], "-", RowBox[{"3", " ", "\[Beta]"}], "+", RowBox[{"2", " ", SuperscriptBox["\[Beta]", "2"]}], "+", RowBox[{"\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "3"}], "+", RowBox[{"4", " ", "\[Beta]"}]}], ")"}]}]}], ",", RowBox[{"\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}]}], ",", RowBox[{"\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"-", "4"}], " ", "\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]", "+", "\[Beta]"}], ")"}]}], ",", RowBox[{"4", " ", "\[Alpha]", " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"-", "4"}], " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]", "+", "\[Beta]"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]", "=", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}]}], ";", " ", RowBox[{"r\[Beta]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Norm", "[", "r\[Beta]", "]"}]}], ";", " ", RowBox[{"h\[Alpha]", "=", RowBox[{"Norm", "[", "r\[Alpha]", "]"}]}], ";", RowBox[{"jac", "=", RowBox[{"Norm", "[", RowBox[{"r\[Alpha]", "\[Cross]", "r\[Beta]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Alpha]", "=", RowBox[{"r\[Alpha]", "/", "h\[Alpha]"}]}], ";", RowBox[{"e\[Beta]", "=", RowBox[{"r\[Beta]", "/", "h\[Beta]"}]}], ";", " ", RowBox[{"en", "=", RowBox[{ RowBox[{"r\[Alpha]", "\[Cross]", "r\[Beta]"}], " ", "/", "jac"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r\[Gamma]", "=", RowBox[{"r\[Beta]", "-", RowBox[{ RowBox[{"(", RowBox[{"r\[Beta]", ".", "e\[Alpha]"}], ")"}], " ", "e\[Alpha]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Gamma]", "=", RowBox[{"Norm", "[", "r\[Gamma]", "]"}]}], ";", RowBox[{"e\[Gamma]", "=", RowBox[{"r\[Gamma]", "/", "h\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", "e\[Gamma]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]\[Gamma]", ",", "\[Beta]\[Gamma]"}], "}"}], "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Alpha]"}], ",", RowBox[{"r\[Alpha]", ".", "r\[Beta]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Beta]"}], ",", RowBox[{"r\[Beta]", ".", "r\[Beta]"}]}], "}"}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Gamma]"}], ",", RowBox[{"r\[Beta]", ".", "r\[Gamma]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"edg", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Sort", "[", "#", "]"}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"MM", ".", RowBox[{"Join", "[", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"{", RowBox[{ RowBox[{"uZ", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}], "}"}]}], ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", "#", "]"}]}], "]"}], "&"}], ",", "edg"}], "]"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "1"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}]}], ")"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}]}], ")"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "projection", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Pi]\[Phi]", "=", RowBox[{"NN", ".", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "5", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "5"}], "}"}]}], "}"}], "/", "420"}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], ",", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}], ",", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}], "}"}]}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Theta]", "=", RowBox[{"NN", ".", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "2"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "5", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "5"}], "}"}]}], "}"}], "/", "420"}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}], "}"}]}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"continuous", " ", "displacement"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Pi]w", "=", RowBox[{"MM", ".", RowBox[{"Join", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "3"}], "]"}], "]"}], ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", "#", "]"}]}], "]"}], "&"}], ",", "edg"}], "]"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "the", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]"}], "}"}], "=", RowBox[{ RowBox[{"FF", "[", RowBox[{"[", RowBox[{ RowBox[{"1", ";;", "2"}], ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]"}], "}"}], "=", RowBox[{ RowBox[{"FF", "[", RowBox[{"[", RowBox[{ RowBox[{"1", ";;", "2"}], ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}], ".", RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"fn", "=", RowBox[{ RowBox[{"FF", "[", RowBox[{"[", "3", "]"}], "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"strain", " ", "measures", " ", "with", " ", "non"}], "-", RowBox[{"symmetric", " ", "\[Epsilon]"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}]}]}], ")"}]}], "/", "h\[Gamma]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", " ", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Theta]"}]}]}], ")"}], "/", "h\[Gamma]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], "/", "h\[Alpha]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], "/", "h\[Alpha]"}], "+", "\[Pi]\[Theta]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}]}]}], ")"}], "/", "h\[Gamma]"}], "-", "\[Pi]\[Phi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Alpha]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Gamma]\[Gamma]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Gamma]\[Gamma]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Gamma]\[Gamma]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Gamma]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", " ", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}], "*", "\[Kappa]\[Alpha]\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Alpha]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Gamma]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"virtual", " ", "work"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "M\[Alpha]\[Alpha]", ",", "M\[Gamma]\[Gamma]", ",", "M\[Alpha]\[Gamma]"}], "}"}]}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"Q\[Alpha]", ",", "Q\[Gamma]"}], "}"}]}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], "*", "fn"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wmap", "=", RowBox[{ RowBox[{ RowBox[{"-", "1"}], "/", "100000"}], "*", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Pi]w", "-", "w"}], "]"}], "*", RowBox[{"(", RowBox[{"\[Pi]w", "-", "w"}], ")"}]}], ")"}], "*", "tt", "*", RowBox[{"EE", "/", "jac"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"exp", "=", RowBox[{"QUAD", "[", RowBox[{"TRI28", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wmap"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", "exp", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"int", "=", RowBox[{"Join", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"uZ", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], ",", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}], ",", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"eqs", "=", RowBox[{"D", "[", RowBox[{"exp", ",", RowBox[{"{", RowBox[{"\[Delta]", "[", "int", "]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", " ", "=", " ", RowBox[{ RowBox[{"Solve", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"eqs", "==", "0"}], "]"}], ",", "int"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{ RowBox[{"exp", " ", "/.", "sol"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{ RowBox[{"\[Delta]", "[", "int", "]"}], "->", "0"}], "]"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.4426474258030453`*^9, {3.4444401255942*^9, 3.4444401388073997`*^9}, { 3.4444401803034*^9, 3.4444401844062*^9}, 3.4444402418922*^9, { 3.4444402805022*^9, 3.4444403134026003`*^9}, {3.4444403443062*^9, 3.4444404484049997`*^9}, {3.444483267101*^9, 3.444483267335*^9}, { 3.4444833136046*^9, 3.4444835622998*^9}, {3.4444836421094*^9, 3.4444837777981997`*^9}, {3.444483920429*^9, 3.4444839412237997`*^9}, 3.4444842905546*^9, {3.4444843207406*^9, 3.4444844162282*^9}, { 3.4444844465078*^9, 3.4444844624354*^9}, {3.4444845255998*^9, 3.4444845894505997`*^9}, {3.4444846290746*^9, 3.444484933025*^9}, { 3.4444849790917997`*^9, 3.4444851148742*^9}, {3.444534936054*^9, 3.4445349675348*^9}, {3.4445355821731997`*^9, 3.44453585174*^9}, { 3.4445372162198*^9, 3.4445372264378*^9}, 3.444537384731*^9, { 3.4445377585382*^9, 3.4445377605818*^9}, {3.4445379733658*^9, 3.4445379736934*^9}, {3.4445380176762*^9, 3.444538032777*^9}, { 3.4445381079222*^9, 3.4445381581386003`*^9}, {3.4445382726456003`*^9, 3.4445382910067997`*^9}, {3.4445383401312*^9, 3.4445383475880003`*^9}, { 3.444538438458*^9, 3.4445384464608*^9}, {3.4445385680783997`*^9, 3.4445385687648*^9}, {3.4445389411991997`*^9, 3.4445389431024*^9}, { 3.444539746605*^9, 3.4445397807846003`*^9}, {3.4445408839765997`*^9, 3.4445409234133997`*^9}, {3.4445409681698*^9, 3.4445409932702*^9}, { 3.4445415452906*^9, 3.4445415706717997`*^9}, {3.4445416647242002`*^9, 3.4445416909477997`*^9}, {3.4445417660150003`*^9, 3.444541788557*^9}, { 3.4445420906977997`*^9, 3.444542104847*^9}, {3.4445421885878*^9, 3.4445421941414003`*^9}, {3.4445422252166*^9, 3.4445422386014*^9}, { 3.444542280425*^9, 3.4445423014538*^9}, {3.444542455769*^9, 3.4445424578282003`*^9}, {3.4445431739214*^9, 3.444543175809*^9}, { 3.4445647020962*^9, 3.4445648405618*^9}, {3.4445648825414*^9, 3.4445648858486*^9}, {3.4445649382646*^9, 3.4445651882702*^9}, { 3.4446164822206*^9, 3.4446165344494*^9}, {3.4446166121842003`*^9, 3.4446166738822002`*^9}, {3.4446167223046*^9, 3.4446168047974*^9}, { 3.444616843033*^9, 3.444616906447*^9}, {3.4446444694708*^9, 3.4446444700948*^9}, {3.4446477738310003`*^9, 3.4446477939862003`*^9}, { 3.4446478467298*^9, 3.4446478681018*^9}, 3.4446480456142*^9, { 3.4446487557418003`*^9, 3.4446487636198*^9}, 3.4446488179974003`*^9, { 3.4446488971205997`*^9, 3.4446489152478*^9}, {3.4446490003458*^9, 3.4446490008294*^9}, {3.4447042728942003`*^9, 3.4447042751562*^9}, { 3.4447044703278*^9, 3.4447044865362*^9}, 3.4447046475282*^9, 3.4447047993786*^9, {3.444704908329*^9, 3.4447049292642*^9}, { 3.4447049861926003`*^9, 3.4447049877214003`*^9}, {3.4447050279296*^9, 3.4447050419695997`*^9}, {3.4447053486656*^9, 3.4447053739376*^9}, 3.4447054561963997`*^9, 3.44470561612*^9, {3.4472133996876*^9, 3.4472134108571997`*^9}, {3.4472134470179996`*^9, 3.4472134648332*^9}, { 3.4472135032872*^9, 3.4472135245344*^9}, {3.4472136963059998`*^9, 3.4472137794384003`*^9}, {3.4472138235708*^9, 3.4472138388900003`*^9}, { 3.4472139099792*^9, 3.4472141367096*^9}, {3.447214202682*^9, 3.4472142975924*^9}, {3.4472144187732*^9, 3.4472145910284*^9}, { 3.4472146560492*^9, 3.4472147023968*^9}, {3.447214803594*^9, 3.4472148728736*^9}, {3.4472149156956*^9, 3.447214940484*^9}, { 3.447216227284*^9, 3.4472162419948*^9}, {3.4472163068908*^9, 3.4472163720832*^9}, {3.4472164665880003`*^9, 3.447216530392*^9}, { 3.4472166237268*^9, 3.4472167058452*^9}, 3.4472167362808*^9, { 3.4472171394658003`*^9, 3.4472171532874002`*^9}, {3.4472172028993998`*^9, 3.4472172216661997`*^9}, {3.4472172524606*^9, 3.4472172690278*^9}, { 3.4472173209133997`*^9, 3.4472173334245996`*^9}, {3.4472173920846*^9, 3.447217404861*^9}, {3.4472179572548*^9, 3.4472180351456003`*^9}, { 3.4472509764091997`*^9, 3.4472511017396*^9}, {3.4473910422216*^9, 3.4473912901524*^9}, 3.4473918688344*^9, {3.447392021185*^9, 3.4473920346633997`*^9}, {3.4473921383304*^9, 3.4473921479088*^9}, { 3.4473923024112*^9, 3.4473923734379997`*^9}, {3.4473928098168*^9, 3.4473928648691998`*^9}, {3.4473931872432003`*^9, 3.4473932461800003`*^9}, {3.4473933026675997`*^9, 3.4473934579812*^9}, { 3.4473935755271997`*^9, 3.447393742572*^9}, {3.4473939032676*^9, 3.4473939384144*^9}, {3.447395257644*^9, 3.4473953141628*^9}, { 3.4473954231132*^9, 3.4473954756384*^9}, {3.4473955348716*^9, 3.4473955723272*^9}, {3.447395648502*^9, 3.4473957588876*^9}, { 3.4473957903996*^9, 3.4473958488372*^9}, 3.4473962894154*^9, { 3.447396350817*^9, 3.447396352611*^9}, {3.4474625379146*^9, 3.4474625637326*^9}, {3.558360651728078*^9, 3.558360652102478*^9}, { 3.5619791319820857`*^9, 3.561979135788492*^9}, 3.561979369382504*^9, { 3.5619794930439215`*^9, 3.5619795010155354`*^9}, {3.561979569218855*^9, 3.56197960614412*^9}, {3.5619797417551584`*^9, 3.5619797448751636`*^9}, { 3.618719065033702*^9, 3.618719075426296*^9}, {3.6187194011669273`*^9, 3.6187194449454317`*^9}, {3.6187196998040085`*^9, 3.6187197102436056`*^9}, {3.618719902254588*^9, 3.6187199711455283`*^9}, { 3.618722365406472*^9, 3.6187225412555304`*^9}, {3.6187226885009522`*^9, 3.6187227109872384`*^9}, {3.618722756922866*^9, 3.6187231317203026`*^9}, { 3.618723424250035*^9, 3.6187234267291765`*^9}, {3.6187235105259695`*^9, 3.6187236491028957`*^9}, {3.618723691580325*^9, 3.618723745975436*^9}, { 3.618723778837316*^9, 3.6187238310002995`*^9}, {3.6187239055875654`*^9, 3.618723940035536*^9}, {3.6187239782667227`*^9, 3.6187240219352207`*^9}, { 3.618724166762504*^9, 3.618724177411113*^9}, {3.618729321696159*^9, 3.618729328067523*^9}, 3.618729374058154*^9, {3.6187294379838104`*^9, 3.618729708464281*^9}, {3.6187297631904106`*^9, 3.618729773195983*^9}, { 3.618729822648812*^9, 3.6187299321490746`*^9}, {3.618729984399063*^9, 3.61873000654133*^9}, {3.6187300746012225`*^9, 3.6187300860458775`*^9}, { 3.618731390835507*^9, 3.6187315116174154`*^9}, {3.618731747324897*^9, 3.6187318214091344`*^9}, {3.6187318769243097`*^9, 3.618732065297084*^9}, { 3.6187321012351394`*^9, 3.618732157420353*^9}, {3.618732188384124*^9, 3.6187322435542793`*^9}, {3.6187322786112847`*^9, 3.6187325478446836`*^9}, {3.6187325819856367`*^9, 3.6187326817653437`*^9}, {3.618732810863728*^9, 3.61873282594359*^9}, { 3.6187336474335766`*^9, 3.618733754678711*^9}, {3.618733827497876*^9, 3.61873396201257*^9}, {3.6187342020362988`*^9, 3.618734236455267*^9}, 3.618734298201799*^9, {3.618734712498495*^9, 3.618734712716508*^9}, 3.6187347739640107`*^9, {3.618738817361748*^9, 3.6187388333816643`*^9}, { 3.6187391349349127`*^9, 3.6187391457955337`*^9}, {3.618739376900752*^9, 3.618739397023903*^9}, {3.618739528394417*^9, 3.618739534809784*^9}, { 3.618739972366811*^9, 3.61873997340687*^9}, {3.6187400416617737`*^9, 3.618740043022852*^9}, {3.6187400971579485`*^9, 3.618740107902563*^9}, { 3.6187401713671927`*^9, 3.6187401723312483`*^9}, {3.6187402613443394`*^9, 3.618740268819767*^9}, {3.6187403697625403`*^9, 3.6187404057615995`*^9}, { 3.618740488277319*^9, 3.618740516244919*^9}, {3.618740647782442*^9, 3.6187406551668644`*^9}, 3.6187407823021364`*^9, {3.6187418050786357`*^9, 3.618741805749674*^9}, {3.6187418557605343`*^9, 3.6187419895921893`*^9}, { 3.618742022944097*^9, 3.61874204379729*^9}, {3.6187420836395683`*^9, 3.618742103384698*^9}, {3.620462440882641*^9, 3.6204624460519366`*^9}, { 3.6204624990259666`*^9, 3.620462576450395*^9}, {3.620463682857678*^9, 3.620463713336421*^9}, 3.6204637901188126`*^9, {3.620464238835478*^9, 3.62046424411378*^9}, 3.628912429385081*^9, {3.6289135207155013`*^9, 3.6289135210805225`*^9}, 3.6289497746958513`*^9, 3.6289498371774254`*^9, { 3.62894988410911*^9, 3.6289500319795675`*^9}, {3.6289501333883677`*^9, 3.628950183744248*^9}, {3.6289503323017445`*^9, 3.628950390181055*^9}, { 3.6289505050536256`*^9, 3.6289505113579865`*^9}, {3.62895070863527*^9, 3.6289507095043197`*^9}, {3.628951013180689*^9, 3.62895101407374*^9}, { 3.629190743153632*^9, 3.629190816645361*^9}, {3.6291909709608326`*^9, 3.629190981678051*^9}, {3.629191034624544*^9, 3.6291910410049553`*^9}, { 3.6293846391370816`*^9, 3.629384641102685*^9}, {3.6294628543371735`*^9, 3.629462867097191*^9}, {3.629468063172048*^9, 3.6294681151669397`*^9}, { 3.6295205836757097`*^9, 3.6295206295085897`*^9}, {3.6295206788826766`*^9, 3.6295207067911253`*^9}, {3.6295207408927855`*^9, 3.629520753700408*^9}, { 3.629521020590745*^9, 3.6295210354395943`*^9}, {3.6295211107369013`*^9, 3.62952114882508*^9}, {3.6295212327348795`*^9, 3.6295212477237363`*^9}, { 3.6295213424816394`*^9, 3.629521343230441*^9}, {3.6295215363119802`*^9, 3.6295216753550243`*^9}, {3.629521922272258*^9, 3.6295219939855833`*^9}, { 3.6295220298188467`*^9, 3.629522446058778*^9}, {3.629522499348471*^9, 3.629522604352256*^9}, {3.629522755188921*^9, 3.62952288580795*^9}, { 3.629522918084407*^9, 3.6295233421087513`*^9}, {3.6295233808436193`*^9, 3.629523390936837*^9}, {3.629523424274096*^9, 3.6295234533369465`*^9}, { 3.6295235190130625`*^9, 3.629523521680667*^9}, 3.6295235894315863`*^9, { 3.6295237270706277`*^9, 3.629523799454755*^9}, {3.6295238514808464`*^9, 3.629523883460902*^9}, {3.6295239376085978`*^9, 3.6295239442386093`*^9}, { 3.6295241089904985`*^9, 3.629524177537019*^9}, 3.629524211888279*^9, { 3.629524277423994*^9, 3.629524396904604*^9}, {3.6295244794839497`*^9, 3.6295246248450055`*^9}, 3.629524657090262*^9, {3.6295259599109507`*^9, 3.629526013465844*^9}, {3.6295261092188125`*^9, 3.629526201414974*^9}, 3.6295263436092243`*^9, {3.6295263910333076`*^9, 3.629526583303645*^9}, { 3.629526616672104*^9, 3.629526647653758*^9}, {3.629526687558628*^9, 3.629526744888729*^9}, {3.629526804075233*^9, 3.6295268598453307`*^9}, { 3.6295269393898706`*^9, 3.6295269586559043`*^9}, {3.6295271490074387`*^9, 3.6295272149019547`*^9}, {3.6295272553684254`*^9, 3.6295272827620735`*^9}, {3.6295274137087035`*^9, 3.6295274761244135`*^9}, {3.6295275252801*^9, 3.6295279912529182`*^9}, { 3.6295281572216096`*^9, 3.629528160435215*^9}, {3.6295282905550437`*^9, 3.6295284308616905`*^9}, 3.6295285402022824`*^9, {3.629528582088356*^9, 3.629528616798417*^9}, {3.6295287666834803`*^9, 3.6295290316343455`*^9}, { 3.629529086515242*^9, 3.629529118432898*^9}, {3.6295291548121614`*^9, 3.629529292794404*^9}, {3.6295293426208916`*^9, 3.6295293491261034`*^9}, { 3.629529420699029*^9, 3.629529571535694*^9}, {3.6295296539506383`*^9, 3.629529656103442*^9}, {3.6295296894407005`*^9, 3.629529692295506*^9}, { 3.6295297445555973`*^9, 3.629529766426836*^9}, {3.6295298053333044`*^9, 3.6295298209489317`*^9}, {3.6295308380551186`*^9, 3.6295308386635194`*^9}, {3.629532377840223*^9, 3.6295323811630287`*^9}, { 3.629532480020402*^9, 3.629532482454006*^9}, {3.629532520720874*^9, 3.629532564619351*^9}, {3.62953259842461*^9, 3.6295326002654133`*^9}, { 3.6295326327758703`*^9, 3.6295326715107384`*^9}, {3.629532742428463*^9, 3.6295328288058147`*^9}, {3.6295329692184625`*^9, 3.6295330530062094`*^9}, {3.6295331824396367`*^9, 3.629533193562456*^9}, 3.6295350321720915`*^9, 3.629535158485513*^9, {3.629535245471266*^9, 3.6295352687465067`*^9}, {3.62953541293756*^9, 3.629535446384019*^9}, { 3.6295355043381205`*^9, 3.6295355262249594`*^9}, {3.629543790136781*^9, 3.629543791181983*^9}, {3.629543871350524*^9, 3.629544001673153*^9}, { 3.6295446682009234`*^9, 3.629544668466124*^9}, {3.6296010216162376`*^9, 3.6296010236442413`*^9}, {3.629601079336339*^9, 3.6296010902875586`*^9}, 3.6296011425476503`*^9, {3.6296043522397404`*^9, 3.629604399031022*^9}, { 3.629623884428093*^9, 3.629623914723346*^9}, {3.6296239662190366`*^9, 3.6296239738006496`*^9}, {3.6296240514731865`*^9, 3.6296240920176573`*^9}, {3.629624125947717*^9, 3.629624369432945*^9}, { 3.6296256512247963`*^9, 3.6296256817072496`*^9}, {3.6296260472626915`*^9, 3.629626047434292*^9}, {3.629628055568204*^9, 3.629628056098605*^9}, { 3.6296280911206665`*^9, 3.6296281088266973`*^9}, {3.6296281406819534`*^9, 3.629628273032586*^9}, {3.629628378831972*^9, 3.6296283814995766`*^9}, { 3.629628459562114*^9, 3.629628466379326*^9}, {3.629628519419419*^9, 3.6296285390754533`*^9}, {3.629633008133008*^9, 3.629633008835009*^9}, { 3.6296337764967575`*^9, 3.6296338344040594`*^9}, {3.6296342997684765`*^9, 3.629634432150309*^9}, {3.629634494035618*^9, 3.6296345320060844`*^9}, { 3.629634594499794*^9, 3.629634812182576*^9}, {3.6296348599810605`*^9, 3.6296348746918864`*^9}, {3.6296349071867433`*^9, 3.629635023172947*^9}, 3.6296350995818815`*^9, {3.6296363797201295`*^9, 3.6296363868961425`*^9}, { 3.629636462025874*^9, 3.6296364833355117`*^9}, {3.629636555922439*^9, 3.62963656780966*^9}, {3.629636770469616*^9, 3.629636774151222*^9}, { 3.6296369192782774`*^9, 3.6296369318830996`*^9}, {3.629637058539722*^9, 3.6296370719401455`*^9}, {3.629637278172508*^9, 3.629637286814923*^9}, { 3.6296376418091464`*^9, 3.629637662385583*^9}, {3.629637773551378*^9, 3.629637795360216*^9}, {3.6296390041751394`*^9, 3.629639039571602*^9}, 3.6296393829750047`*^9, {3.6296395546065063`*^9, 3.6296395649961243`*^9}, { 3.62964113386068*^9, 3.6296412507048855`*^9}, {3.629641303167777*^9, 3.629641313744596*^9}, {3.6296416285116315`*^9, 3.629641628886032*^9}, { 3.6296416658736973`*^9, 3.6296416815049243`*^9}, 3.6296417376338234`*^9, { 3.6296855551269727`*^9, 3.6296855804270077`*^9}, {3.6297079065796247`*^9, 3.6297079070476255`*^9}, {3.6297080850439377`*^9, 3.629708135728427*^9}, { 3.6297083496516027`*^9, 3.6297084025512953`*^9}, {3.629708781767563*^9, 3.629708790940379*^9}, {3.6297089402482414`*^9, 3.6297089618542795`*^9}, { 3.6297105345398417`*^9, 3.629710538580249*^9}, {3.6297107810514746`*^9, 3.6297107850138817`*^9}, {3.6297109100481014`*^9, 3.629710915710911*^9}, { 3.629711201534613*^9, 3.629711204311418*^9}, {3.629711236307074*^9, 3.6297115007275386`*^9}, {3.6297115377464037`*^9, 3.6297115441112146`*^9}, 3.6297116025645175`*^9, {3.6298716505389357`*^9, 3.629871851841689*^9}, { 3.62987837458679*^9, 3.629878383510006*^9}, {3.6298784402629056`*^9, 3.629878447345318*^9}, {3.6298785221786494`*^9, 3.6298786580236883`*^9}, { 3.629878689613744*^9, 3.629878737147027*^9}, 3.629878783853509*^9, { 3.629878832322794*^9, 3.6298789171723433`*^9}, {3.6298802128122005`*^9, 3.6298802929723125`*^9}, 3.6298813644148126`*^9, {3.629882428887303*^9, 3.629882435887313*^9}, {3.6298986251827383`*^9, 3.6298988530367384`*^9}, { 3.6298989036744275`*^9, 3.6298989486493063`*^9}, {3.629899016868226*^9, 3.6298991622448816`*^9}, {3.6298997154530535`*^9, 3.629899740147897*^9}, { 3.6298998248560457`*^9, 3.629899978048314*^9}, {3.6299000396372223`*^9, 3.6299001557638264`*^9}, {3.6299001966826982`*^9, 3.6299002595352087`*^9}, 3.6299005011236343`*^9, {3.6299005468317146`*^9, 3.629900567642151*^9}, { 3.629900887676713*^9, 3.629900990153293*^9}, {3.6299011689220085`*^9, 3.6299012295125146`*^9}, {3.6299013754039707`*^9, 3.6299014166036434`*^9}, 3.6299014589733176`*^9, {3.6299015096734066`*^9, 3.629901588765546*^9}, { 3.629901662569275*^9, 3.6299016974665365`*^9}, {3.629901952339784*^9, 3.6299019599057975`*^9}, 3.6299020306051216`*^9, {3.6299022330934772`*^9, 3.6299022682559395`*^9}, {3.6299023020455985`*^9, 3.629902332808852*^9}, { 3.6299024532566643`*^9, 3.629902462850681*^9}, {3.629949880225117*^9, 3.6299498807867184`*^9}, {3.6299503101150723`*^9, 3.6299503156998825`*^9}, {3.629950355058751*^9, 3.629950498937804*^9}, { 3.6299555415202007`*^9, 3.6299555507086167`*^9}, {3.6299556061667137`*^9, 3.6299557553497763`*^9}, {3.629955788499834*^9, 3.6299558948608212`*^9}, { 3.629956042764681*^9, 3.629956043809883*^9}, {3.6299560914211664`*^9, 3.6299561017327843`*^9}, 3.629956145849662*^9, {3.6299584813821354`*^9, 3.6299585082765827`*^9}, 3.6299585652946825`*^9, {3.629958616587573*^9, 3.6299586356508064`*^9}, {3.629958715073346*^9, 3.6299588186419287`*^9}, { 3.629958857454797*^9, 3.629958927249319*^9}, {3.629959427994599*^9, 3.629959494669116*^9}, {3.6299595293323765`*^9, 3.6299596037913074`*^9}, { 3.62995966795422*^9, 3.62995967360143*^9}, {3.6299597835972233`*^9, 3.6299597841120243`*^9}, {3.629959826622099*^9, 3.629959862533362*^9}, { 3.6299599051682367`*^9, 3.6299599235918694`*^9}, 3.629959979939168*^9, { 3.6299601345354395`*^9, 3.62996014612626*^9}, 3.6299601769831142`*^9, { 3.629960253142448*^9, 3.629960269538077*^9}, {3.6299603041701374`*^9, 3.6299603078205442`*^9}, {3.6299604300467587`*^9, 3.629960435491168*^9}, { 3.6299605300585346`*^9, 3.6299605636609936`*^9}, {3.6299606195870914`*^9, 3.6299606581971593`*^9}, {3.629960824228251*^9, 3.6299608755367413`*^9}, { 3.629960906658796*^9, 3.6299609978409557`*^9}, {3.6299610312250147`*^9, 3.629961070646284*^9}, {3.629961135698398*^9, 3.6299611643088484`*^9}, { 3.6299720458358483`*^9, 3.6299721791536827`*^9}, {3.6299722439717965`*^9, 3.629972300007095*^9}, {3.6299723670872126`*^9, 3.6299723937008595`*^9}, { 3.629972457801372*^9, 3.6299724710613956`*^9}, {3.629972740193068*^9, 3.6299728251196175`*^9}, {3.6299729203577843`*^9, 3.6299729350218105`*^9}, {3.6299729720874753`*^9, 3.6299730462188053`*^9}, {3.629973116044528*^9, 3.6299731230177402`*^9}, { 3.629973184310248*^9, 3.6299732090830917`*^9}, {3.629973349982539*^9, 3.6299734360166903`*^9}, 3.629973534562063*^9, {3.629973577446539*^9, 3.629973586104554*^9}, {3.6299740374133463`*^9, 3.629974083823428*^9}, { 3.6299742505565205`*^9, 3.629974337089873*^9}, {3.629974382907153*^9, 3.6299744466176653`*^9}, {3.629974589794717*^9, 3.629974590761918*^9}, { 3.629974776215044*^9, 3.6299747850134597`*^9}, {3.6299748226095257`*^9, 3.6299748237483273`*^9}, 3.6299748618435946`*^9, {3.629975198476586*^9, 3.6299752545898843`*^9}, {3.62997531475919*^9, 3.6299753175515947`*^9}, { 3.6299754601982455`*^9, 3.6299754625382495`*^9}, {3.629975592034077*^9, 3.629975592502078*^9}, {3.629983277446268*^9, 3.6299832946842985`*^9}, { 3.62998342081052*^9, 3.6299835439883366`*^9}, {3.629983615514462*^9, 3.629983931009416*^9}, {3.6299919807040443`*^9, 3.6299919808912444`*^9}, { 3.629992028330928*^9, 3.6299920922130404`*^9}, 3.629992198480427*^9, { 3.6299922299300823`*^9, 3.629992250506518*^9}, {3.629992292657792*^9, 3.6299923603151107`*^9}, {3.6299924387676487`*^9, 3.6299924398440504`*^9}, {3.6299925764846907`*^9, 3.6299926096347485`*^9}, {3.6299928122323046`*^9, 3.629992818768716*^9}, { 3.6299929049120674`*^9, 3.629992905411268*^9}, {3.6299929850338078`*^9, 3.6299929866250105`*^9}, {3.6299931061992207`*^9, 3.62999312270405*^9}, { 3.629993172312137*^9, 3.6299932618718944`*^9}, {3.6299933276572104`*^9, 3.6299933842073092`*^9}, {3.630287775665962*^9, 3.630287795852398*^9}, { 3.6303896387100534`*^9, 3.630389666774503*^9}, {3.6303896967889557`*^9, 3.6303897095341783`*^9}, {3.6303897587054644`*^9, 3.630389880448078*^9}, { 3.6303899127557354`*^9, 3.630390009444705*^9}, 3.630390057321189*^9, 3.630390443484267*^9, {3.63039095720877*^9, 3.6303909789240074`*^9}, { 3.6303910572205453`*^9, 3.6303911291054716`*^9}, {3.630391163035531*^9, 3.6303911740803504`*^9}, {3.630391240224467*^9, 3.6303912875081496`*^9}, { 3.6303913396902413`*^9, 3.630391404570755*^9}, {3.630391479513287*^9, 3.6303917572873745`*^9}, {3.630391868905571*^9, 3.6303920027226057`*^9}, { 3.630392064327114*^9, 3.630392219843787*^9}, {3.63039226121506*^9, 3.63039232943398*^9}, {3.6303924315985594`*^9, 3.6303924441097813`*^9}, { 3.6303926866122074`*^9, 3.6303927118530517`*^9}, {3.630392795671999*^9, 3.6303928006172075`*^9}, {3.6303986032190485`*^9, 3.6303986046230516`*^9}, {3.6303986654631586`*^9, 3.6303987936485834`*^9}, {3.63039889979117*^9, 3.6303989091199865`*^9}, { 3.630399006323757*^9, 3.630399007259759*^9}, {3.630399117224352*^9, 3.630399214771323*^9}, {3.6303992555185947`*^9, 3.6303993036758795`*^9}, { 3.630399467725767*^9, 3.630399502731636*^9}, {3.6303995748037624`*^9, 3.630399595614199*^9}, {3.6303996329294643`*^9, 3.630399658076709*^9}, { 3.630399711335202*^9, 3.6303997453120623`*^9}, {3.6303998546994543`*^9, 3.6303999880484886`*^9}, {3.6304000742074394`*^9, 3.630400123441126*^9}, { 3.6304001724564123`*^9, 3.630400251595351*^9}, {3.630400324166679*^9, 3.630400327052684*^9}, {3.630400358190338*^9, 3.6304003597503414`*^9}, { 3.6304004587481155`*^9, 3.6304004640521245`*^9}, {3.630400521975026*^9, 3.630400526124634*^9}, {3.630400567199506*^9, 3.630400593516752*^9}, { 3.6304012340070767`*^9, 3.6304013035207987`*^9}, {3.6304013614749007`*^9, 3.630401367933312*^9}, {3.630401686939398*^9, 3.6304017294598303`*^9}, { 3.630401794020523*^9, 3.6304018922061386`*^9}, {3.6304019687775183`*^9, 3.630401987153569*^9}, {3.630402072749465*^9, 3.63040208297405*^9}, { 3.6304022247881613`*^9, 3.630402255931943*^9}, 3.630402329306139*^9, { 3.6304023806970787`*^9, 3.6304024212403975`*^9}, {3.6304025002259154`*^9, 3.630402528595538*^9}, {3.6304025620694523`*^9, 3.630402575015193*^9}, { 3.6304026411829777`*^9, 3.630402649073429*^9}, {3.630402695548087*^9, 3.6304027128260756`*^9}, {3.630402783923142*^9, 3.6304027982389607`*^9}, { 3.6304028797236214`*^9, 3.6304030111811404`*^9}, {3.6304030562107162`*^9, 3.6304031598846455`*^9}, {3.630403236330018*^9, 3.6304032404072514`*^9}, { 3.630403373001835*^9, 3.6304033888147397`*^9}, {3.6304039420953856`*^9, 3.6304039512829113`*^9}, 3.6304039831437335`*^9, {3.630404015975611*^9, 3.6304040663624935`*^9}, {3.630404173614628*^9, 3.630404246945822*^9}, { 3.6304042891772375`*^9, 3.630404299595834*^9}, {3.630404391083066*^9, 3.630404392406142*^9}, {3.6304045301800222`*^9, 3.6304045579486103`*^9}, { 3.630404640215316*^9, 3.630404762796327*^9}, {3.630404877629895*^9, 3.630404883104208*^9}, {3.6304050364729805`*^9, 3.630405098270515*^9}, { 3.6304051736118245`*^9, 3.6304051965901384`*^9}, {3.6304053802536435`*^9, 3.63040539242334*^9}, {3.630406035965148*^9, 3.630406041998493*^9}, { 3.630406072049212*^9, 3.6304060962065935`*^9}, {3.630406264081196*^9, 3.6304062707025747`*^9}, {3.63040632219952*^9, 3.630406385461138*^9}, { 3.630406477200385*^9, 3.630406482095665*^9}, {3.6304066170883865`*^9, 3.6304066222256804`*^9}, {3.630406957868878*^9, 3.630406973411767*^9}, { 3.6304070081447535`*^9, 3.630407018199329*^9}, {3.630407411376817*^9, 3.630407412542884*^9}, {3.6304080609339695`*^9, 3.630408121202417*^9}, { 3.6304081585485525`*^9, 3.6304081832129636`*^9}, {3.63040821409673*^9, 3.630408421131572*^9}, 3.6304934333363276`*^9, {3.63049350751357*^9, 3.630493677593298*^9}, {3.630493716898546*^9, 3.6304937846684227`*^9}, 3.630493922944331*^9, {3.6304939556752033`*^9, 3.630494117430455*^9}, { 3.6304941486092386`*^9, 3.6304941767788496`*^9}, {3.6304942118648567`*^9, 3.6304942530272107`*^9}, {3.6304942838399734`*^9, 3.6304942845820155`*^9}, {3.6304943454054947`*^9, 3.6304944442451477`*^9}, {3.63080749995092*^9, 3.6308075480801234`*^9}, { 3.630807586536323*^9, 3.630807621440319*^9}, {3.630807680459695*^9, 3.630807682914836*^9}, {3.630807736889923*^9, 3.6308077644745007`*^9}, { 3.6308078081089964`*^9, 3.6308078670123653`*^9}, {3.630807991648494*^9, 3.630807997541831*^9}, {3.6308081080891542`*^9, 3.6308081919599514`*^9}, { 3.630808306368495*^9, 3.630808345060708*^9}, {3.6308087281906223`*^9, 3.6308087555171847`*^9}, {3.630809110815507*^9, 3.630809169033837*^9}, { 3.6308091998195972`*^9, 3.630809448512822*^9}, {3.6308095328996487`*^9, 3.6308095448223305`*^9}, {3.630809582269472*^9, 3.6308095873607635`*^9}, { 3.630809665529235*^9, 3.630809684808337*^9}, {3.6308316258485594`*^9, 3.6308318380886984`*^9}, {3.63083188164919*^9, 3.630831966930068*^9}, 3.6320400558356075`*^9, {3.6354749882908883`*^9, 3.635474989418953*^9}, { 3.635475084557395*^9, 3.6354750875145636`*^9}, {3.6354751334091887`*^9, 3.635475162315842*^9}, {3.6354754001974483`*^9, 3.6354754820331287`*^9}, 3.635475512931896*^9, {3.6354756222781506`*^9, 3.635475622861184*^9}, { 3.635475691642118*^9, 3.6354757057969275`*^9}, {3.6354757798291616`*^9, 3.635475797395167*^9}, {3.635475884848169*^9, 3.6354758981309285`*^9}, { 3.635475961488552*^9, 3.6354759738382587`*^9}, {3.6354760213729773`*^9, 3.6354760572050266`*^9}, {3.6354761282470903`*^9, 3.635476136040536*^9}, { 3.6354761719365892`*^9, 3.635476212217893*^9}, {3.6593346599546614`*^9, 3.659334660890663*^9}, {3.6593347077219453`*^9, 3.659334720701168*^9}, { 3.6593348752974396`*^9, 3.6593348758122406`*^9}, {3.6593349140947075`*^9, 3.6593350070240707`*^9}, {3.6593350466949406`*^9, 3.6593350543701544`*^9}, {3.659335103791041*^9, 3.6593351614487424`*^9}, 3.659335217686841*^9, {3.659335262084519*^9, 3.6593352995869846`*^9}, { 3.6593356899482727`*^9, 3.659335701819893*^9}, {3.659335964227954*^9, 3.659335964602355*^9}, {3.65933603594128*^9, 3.6593360629605274`*^9}, { 3.6593361352354546`*^9, 3.6593361504454813`*^9}, {3.6593363929479074`*^9, 3.6593364061611304`*^9}, 3.6593368946915884`*^9, {3.6884748265656157`*^9, 3.6884748268716326`*^9}, {3.6884748600075283`*^9, 3.688474861420609*^9}, { 3.6885242858240776`*^9, 3.6885243001140976`*^9}, {3.6888842911675606`*^9, 3.6888843311676164`*^9}, {3.688966242423658*^9, 3.688966263933688*^9}, { 3.6897393587897596`*^9, 3.6897393649897685`*^9}, 3.689739477049925*^9, { 3.6898595970621734`*^9, 3.689859597272174*^9}, {3.6898596707522764`*^9, 3.6898597190523443`*^9}, {3.689859768552414*^9, 3.6898597721424184`*^9}, { 3.689859855272535*^9, 3.689859859882541*^9}, {3.6898605078334484`*^9, 3.6898607266237545`*^9}, 3.6898608811139708`*^9, {3.6898609634740863`*^9, 3.689860974304102*^9}, 3.6898610140141573`*^9, {3.6898611496043468`*^9, 3.6898611683243732`*^9}, {3.689861462024784*^9, 3.6898615624849253`*^9}, { 3.6898616142149973`*^9, 3.6898616164350004`*^9}, 3.6898616657950697`*^9, { 3.689861716805141*^9, 3.689861749905187*^9}, {3.732677920575506*^9, 3.7326779208190203`*^9}, {3.7519672427004185`*^9, 3.7519672444968877`*^9}, {3.7519674022097683`*^9, 3.75196742976579*^9}, { 3.751967484127989*^9, 3.751967510853814*^9}, {3.7519675409404893`*^9, 3.751967541549782*^9}, {3.7519675797751045`*^9, 3.751967592209671*^9}, { 3.7519676829383273`*^9, 3.7519676841255474`*^9}, {3.7519677154775553`*^9, 3.7519677953499403`*^9}, 3.751967827811061*^9, {3.7519679545625095`*^9, 3.751967957999185*^9}, {3.751968003754015*^9, 3.7519681477513895`*^9}, { 3.751968264817631*^9, 3.751968270722477*^9}, {3.7519689618119907`*^9, 3.751968969888235*^9}, {3.7519691168917775`*^9, 3.7519691395895615`*^9}, { 3.751969242782174*^9, 3.7519692581691785`*^9}, {3.7519693625211954`*^9, 3.751969378579924*^9}, {3.751969409572627*^9, 3.751969438643936*^9}, { 3.7519695894526725`*^9, 3.751969614306203*^9}, {3.7523200108586655`*^9, 3.752320012354121*^9}, {3.7553831315619707`*^9, 3.755383134119626*^9}, { 3.7553831893197794`*^9, 3.755383241814331*^9}, {3.7553832736267967`*^9, 3.7553832810757113`*^9}, {3.7554336536222963`*^9, 3.755433684797229*^9}, { 3.7554337764737434`*^9, 3.7554338315300155`*^9}, {3.755433998047738*^9, 3.7554340265485487`*^9}, {3.755446573138784*^9, 3.755446636911299*^9}, { 3.75544667493072*^9, 3.755446753435521*^9}, {3.755446891541581*^9, 3.7554468921547422`*^9}, {3.7554469323588533`*^9, 3.755446936867403*^9}, { 3.7554470190332975`*^9, 3.7554472776872244`*^9}, {3.7555217323692026`*^9, 3.755521732847602*^9}, {3.755521767127169*^9, 3.7555217972041793`*^9}, { 3.755522561453134*^9, 3.755522564231819*^9}, {3.755522601885935*^9, 3.7555226037287407`*^9}, {3.7555226758687305`*^9, 3.755522678585092*^9}, { 3.7555234832604623`*^9, 3.7555235920444417`*^9}, {3.7555239506007543`*^9, 3.755524013893358*^9}, {3.755524076791689*^9, 3.7555240812793446`*^9}, { 3.7555241238138275`*^9, 3.7555241268985643`*^9}, {3.7555242930449886`*^9, 3.7555243378577013`*^9}, {3.7555256673767824`*^9, 3.7555256808205338`*^9}, {3.7555258588384123`*^9, 3.755525900317296*^9}, { 3.755525930708299*^9, 3.7555260436531134`*^9}, {3.755607147401991*^9, 3.7556071504143705`*^9}, {3.755607992884314*^9, 3.7556080025382996`*^9}, { 3.7556094344057455`*^9, 3.7556094348690443`*^9}, {3.7559613653116636`*^9, 3.755961445097105*^9}, 3.755961484246889*^9, {3.7559618979231987`*^9, 3.755961939470047*^9}, {3.7559620323724904`*^9, 3.7559620330864005`*^9}, { 3.755962155557907*^9, 3.7559621601593847`*^9}, {3.755962303755834*^9, 3.755962343830135*^9}, {3.7559624058018165`*^9, 3.7559624450501757`*^9}, 3.756002186674869*^9, 3.7560029626855392`*^9, {3.756003222110388*^9, 3.756003295034633*^9}, {3.7560056331492863`*^9, 3.7560056663855457`*^9}, { 3.7560057813555765`*^9, 3.7560057863836613`*^9}, {3.7560058917172394`*^9, 3.756005927847292*^9}, 3.756006092376186*^9, 3.756009112317705*^9, { 3.756091886039587*^9, 3.756091887764086*^9}, {3.756092005435152*^9, 3.7560920727337685`*^9}, {3.75609212911592*^9, 3.7560921293252516`*^9}, { 3.756092262958163*^9, 3.756092263157668*^9}, {3.756092342487877*^9, 3.756092347894502*^9}, {3.7560929036769304`*^9, 3.7560929278911004`*^9}, { 3.7560930741522417`*^9, 3.756093083420331*^9}, {3.7560932986236534`*^9, 3.7560933139459305`*^9}, {3.756093449985523*^9, 3.7560934874491863`*^9}, { 3.756093592694581*^9, 3.7560936019456573`*^9}, {3.756093634438078*^9, 3.756093673866626*^9}, {3.756093873069885*^9, 3.756093897964734*^9}, { 3.7560940650109406`*^9, 3.756094078056768*^9}, {3.756442536546026*^9, 3.756442607904289*^9}, {3.7564436397451363`*^9, 3.7564436403231254`*^9}, { 3.7636034984570236`*^9, 3.7636034989933815`*^9}, {3.763603551051456*^9, 3.7636035527617817`*^9}, {3.7636036049384193`*^9, 3.7636036392233057`*^9}, {3.7636036850937223`*^9, 3.763603692587598*^9}, { 3.7636037258272257`*^9, 3.7636037459031096`*^9}, {3.7636037792254367`*^9, 3.76360387572289*^9}, {3.763603971837229*^9, 3.7636040341423655`*^9}, { 3.763604066526084*^9, 3.7636040756798687`*^9}, {3.7636041452118535`*^9, 3.763604278007333*^9}, {3.763604317710966*^9, 3.7636043271387568`*^9}, { 3.7636043584877644`*^9, 3.763604415561053*^9}, {3.763604445680462*^9, 3.7636044504114943`*^9}, {3.763604615444647*^9, 3.7636048082554193`*^9}, 3.763604854904996*^9, {3.7636133594095488`*^9, 3.7636133618464766`*^9}, { 3.7636136063756704`*^9, 3.7636136315671196`*^9}, {3.7636990373827705`*^9, 3.7636990431157646`*^9}, {3.763699090332087*^9, 3.763699110952259*^9}, { 3.763699227420497*^9, 3.7636993642943506`*^9}, {3.763700085627533*^9, 3.763700088329999*^9}, {3.7637001721125274`*^9, 3.763700181422837*^9}, { 3.763700248063385*^9, 3.7637003918630466`*^9}, {3.763700591783223*^9, 3.7637006017496295`*^9}, {3.7637007583576717`*^9, 3.7637007603074865`*^9}, {3.7637137795793185`*^9, 3.7637137822587233`*^9}, {3.7637148704355187`*^9, 3.763714870624051*^9}, { 3.763727592158518*^9, 3.7637275933445053`*^9}, {3.7637276688363667`*^9, 3.7637276694756594`*^9}, 3.763803448896332*^9, {3.76380349501632*^9, 3.7638036835067654`*^9}, {3.763804829093463*^9, 3.7638048385675254`*^9}, 3.7638051033646154`*^9, 3.7638053924528885`*^9, {3.763805557684454*^9, 3.763805634255308*^9}, {3.763806843847647*^9, 3.763806847966059*^9}, { 3.763806942652097*^9, 3.7638071770752254`*^9}, {3.7638141184594107`*^9, 3.763814134133461*^9}, {3.7638146808628216`*^9, 3.7638146925645113`*^9}, { 3.7638147709278784`*^9, 3.7638147811883087`*^9}, {3.7638148155281043`*^9, 3.763814819843194*^9}, {3.7638150259647446`*^9, 3.763815028601293*^9}, { 3.7638151529595194`*^9, 3.763815155849978*^9}, {3.7638163770262136`*^9, 3.763816380851597*^9}, {3.7638164181856327`*^9, 3.7638164950537987`*^9}, 3.763816568304102*^9, {3.7638166173645625`*^9, 3.763816618808757*^9}, { 3.7638167204462805`*^9, 3.763816721012859*^9}, {3.763857602253485*^9, 3.7638579604183645`*^9}, {3.7638580038507566`*^9, 3.7638580060526443`*^9}, {3.763858082269992*^9, 3.7638581746835337`*^9}, { 3.7638582163351564`*^9, 3.7638582415275116`*^9}, {3.7638582983238*^9, 3.763858907503306*^9}, {3.763858941318697*^9, 3.763858956626134*^9}, { 3.7638602435602536`*^9, 3.763860245408451*^9}, {3.7638694636456347`*^9, 3.7638694647177277`*^9}, {3.7638708199536576`*^9, 3.763870829436488*^9}, { 3.763871287170555*^9, 3.7638712876184006`*^9}, {3.763943214376035*^9, 3.7639432984591475`*^9}, {3.763943418832348*^9, 3.7639434335508127`*^9}, { 3.76394347113767*^9, 3.7639435187320576`*^9}, {3.763943585908682*^9, 3.7639436125255404`*^9}, {3.763951722152746*^9, 3.76395172989299*^9}, { 3.7639517863423367`*^9, 3.7639519945900664`*^9}, {3.763952081515512*^9, 3.7639521530710773`*^9}, {3.763952353248129*^9, 3.763952357026309*^9}, { 3.7639524211903834`*^9, 3.7639524243979177`*^9}, {3.7639527174925117`*^9, 3.7639527180252266`*^9}, {3.7641265625745993`*^9, 3.7641265632314167`*^9}, {3.764126605555829*^9, 3.7641266075095396`*^9}, { 3.7641268313964133`*^9, 3.7641268543573804`*^9}, {3.764127044657903*^9, 3.7641270479422092`*^9}, {3.7641271442332697`*^9, 3.7641271469362774`*^9}, {3.764127227626192*^9, 3.7641272592640233`*^9}, { 3.764127335707515*^9, 3.7641273386484756`*^9}, {3.764127429843852*^9, 3.7641274364304185`*^9}, {3.7641275071859307`*^9, 3.764127516803895*^9}, 3.7641276043548007`*^9, {3.7641276925365753`*^9, 3.764127697080591*^9}, 3.764127798472331*^9, 3.764127853631323*^9, 3.764127908496078*^9, { 3.7641280050343323`*^9, 3.764128022046494*^9}, {3.764128128597419*^9, 3.764128154116727*^9}, {3.7641286864636617`*^9, 3.764128701643106*^9}, { 3.7641289910924444`*^9, 3.7641290126680794`*^9}, {3.7641290672285347`*^9, 3.7641290737798567`*^9}, {3.7641325425120363`*^9, 3.764132565390477*^9}, { 3.7641327425004654`*^9, 3.764132750040793*^9}, 3.7641327968340364`*^9, { 3.764133146776842*^9, 3.764133204874522*^9}, {3.7641333488187037`*^9, 3.7641333525577593`*^9}, {3.764413145593136*^9, 3.7644131471236105`*^9}, { 3.764413201645049*^9, 3.7644132349609704`*^9}, {3.764413325008136*^9, 3.7644133748980193`*^9}, {3.7644134113425665`*^9, 3.7644135151187*^9}, { 3.764413554409053*^9, 3.7644136160674934`*^9}, {3.76441371984758*^9, 3.764413730103909*^9}, 3.764419641962368*^9, {3.7644198522879405`*^9, 3.764419879249356*^9}, 3.764419909536559*^9, {3.764419991012162*^9, 3.764420000171088*^9}, {3.7644200798862047`*^9, 3.7644200950961914`*^9}, { 3.7644201529471693`*^9, 3.764420153715966*^9}, {3.764420210346301*^9, 3.764420255343707*^9}, {3.764420296178318*^9, 3.7644203000939393`*^9}, { 3.7644203803359275`*^9, 3.7644203931390867`*^9}, 3.7644204418727274`*^9, { 3.7647259720700207`*^9, 3.7647261047260523`*^9}, {3.7647263483375626`*^9, 3.76472635879602*^9}, 3.764726656736601*^9, {3.764727009127914*^9, 3.764727020100875*^9}, {3.7647270591828785`*^9, 3.7647270819631023`*^9}, { 3.7647272109090505`*^9, 3.764727227846332*^9}, {3.76473247809907*^9, 3.7647324813925114`*^9}, {3.7647349484962797`*^9, 3.7647349979358416`*^9}, {3.7647351097258167`*^9, 3.764735124772463*^9}, { 3.7647352810674453`*^9, 3.7647352901139917`*^9}, {3.7647353746429515`*^9, 3.764735379550926*^9}, {3.7647354596539807`*^9, 3.764735507677454*^9}, { 3.7647355546341*^9, 3.764735728811817*^9}, {3.764735837449795*^9, 3.76473584132898*^9}, {3.76473603649269*^9, 3.7647360592982664`*^9}, { 3.7647360998228803`*^9, 3.76473621551197*^9}, {3.7647362545599003`*^9, 3.764736286430997*^9}, {3.7647364592833533`*^9, 3.764736464019006*^9}, { 3.764736566167658*^9, 3.7647365918958225`*^9}, {3.764764761680134*^9, 3.7647648482473745`*^9}, 3.764764917763693*^9, {3.764764964821686*^9, 3.764765090741813*^9}, {3.7647651742140284`*^9, 3.7647652517335076`*^9}, { 3.764765341266399*^9, 3.7647653614173465`*^9}, 3.764765400284145*^9, { 3.764765691384389*^9, 3.764765708710143*^9}, 3.7647657454275875`*^9, { 3.76476578351686*^9, 3.764765871262255*^9}, {3.7647661045180917`*^9, 3.76476612822571*^9}, {3.7647661964223824`*^9, 3.764766239375331*^9}, { 3.764766330361228*^9, 3.764766338297905*^9}, {3.764767015060799*^9, 3.7647670193029037`*^9}, {3.764767076590926*^9, 3.7647671160277977`*^9}, { 3.7647671493139205`*^9, 3.7647672079236426`*^9}, {3.764767458938404*^9, 3.7647674608323865`*^9}, {3.764810938444873*^9, 3.7648109399353456`*^9}, { 3.7648118616019874`*^9, 3.7648118695079126`*^9}, {3.7648120589477816`*^9, 3.7648124600413237`*^9}, {3.76481250476682*^9, 3.7648125259602103`*^9}, { 3.764812601341893*^9, 3.7648126577763243`*^9}, {3.7648126944039307`*^9, 3.7648128855627623`*^9}, {3.764812924923909*^9, 3.764812926481821*^9}, { 3.764813041485982*^9, 3.764813131254232*^9}, {3.7648134679328885`*^9, 3.7648136479313235`*^9}, {3.7648136917777314`*^9, 3.764813697753367*^9}, { 3.7648137297570653`*^9, 3.764813747862262*^9}, 3.764813784221693*^9, { 3.7648138370678406`*^9, 3.7648141387969923`*^9}, {3.764814321050164*^9, 3.764814422489184*^9}, {3.764814461366684*^9, 3.7648145835728483`*^9}, { 3.764814614769511*^9, 3.7648147525825167`*^9}, {3.764815363375289*^9, 3.7648153644907384`*^9}, {3.764815451671169*^9, 3.7648154601533747`*^9}, { 3.7648175917802963`*^9, 3.7648176401910563`*^9}, {3.765885491237231*^9, 3.765885501131465*^9}, {3.766572999289345*^9, 3.7665729996020145`*^9}, { 3.7665730613126965`*^9, 3.7665730616706066`*^9}, {3.7840103262125545`*^9, 3.7840103546413517`*^9}, {3.784011309725755*^9, 3.7840113197719574`*^9}, { 3.784013374800973*^9, 3.7840133842981763`*^9}, {3.7840238533665447`*^9, 3.78402395932942*^9}, {3.784024091276659*^9, 3.784024112209529*^9}, { 3.7840242793219643`*^9, 3.784024296655184*^9}, {3.7840290670892677`*^9, 3.7840291348388853`*^9}, {3.784029222997594*^9, 3.784029542926179*^9}, { 3.784375172285057*^9, 3.784375319701829*^9}, {3.7843753678421807`*^9, 3.7843753788103914`*^9}, {3.7843754844339557`*^9, 3.784375827494117*^9}, { 3.784375862317687*^9, 3.7843759567563844`*^9}, {3.784376004941759*^9, 3.7843760080157185`*^9}, {3.784376101918992*^9, 3.7843761244332943`*^9}, { 3.784376181191763*^9, 3.7843762145091863`*^9}, {3.7843792489960337`*^9, 3.78437926273014*^9}, {3.7843793293934345`*^9, 3.784379368676588*^9}, { 3.7843796529835215`*^9, 3.7843796858862267`*^9}, {3.784450863324359*^9, 3.7844508986076546`*^9}, {3.7844510208392324`*^9, 3.784451027915551*^9}, { 3.7844511176315613`*^9, 3.7844511673791957`*^9}, {3.784451235055628*^9, 3.78445132575735*^9}, {3.784451995615477*^9, 3.7844520110330954`*^9}, { 3.7844522907551537`*^9, 3.7844523421551*^9}, {3.784700119490345*^9, 3.7847001627913013`*^9}, {3.7847004221290607`*^9, 3.7847004380767317`*^9}, 3.7847007913506136`*^9, {3.784781955129138*^9, 3.784781977787957*^9}, { 3.78488170216677*^9, 3.784881704210422*^9}, 3.784882130557441*^9, { 3.78488220347418*^9, 3.7848822064697027`*^9}, {3.784883393455822*^9, 3.784883458551924*^9}, 3.7848835306495824`*^9, {3.7848836822092113`*^9, 3.7848837303696923`*^9}, 3.7848838199009576`*^9, {3.7848842507527857`*^9, 3.7848842836585226`*^9}, 3.7848843847882996`*^9, {3.784884461405264*^9, 3.7848844645041113`*^9}, {3.784884559404122*^9, 3.7848845656634912`*^9}, { 3.7848852409944844`*^9, 3.7848852740337477`*^9}, {3.7848854548929386`*^9, 3.7848854893046365`*^9}, {3.7848856741783943`*^9, 3.784885691704702*^9}, { 3.784885809660874*^9, 3.784885811424426*^9}, {3.7848860031948376`*^9, 3.784886020570098*^9}, 3.7848861057105627`*^9, {3.7848861627726107`*^9, 3.7848862212876124`*^9}, {3.784886306497995*^9, 3.7848863509322224`*^9}, 3.784886472690192*^9, {3.7848866596243*^9, 3.784886664116289*^9}, { 3.7848866987282944`*^9, 3.7848867077911897`*^9}, {3.78488676128524*^9, 3.7848868667029366`*^9}, {3.7848869381224003`*^9, 3.7848869414281464`*^9}, {3.7848870104508753`*^9, 3.784887039889447*^9}, { 3.7848871795058794`*^9, 3.7848871976746817`*^9}, {3.7848872311446314`*^9, 3.78488724075662*^9}, 3.784887405188785*^9, {3.784887591926689*^9, 3.7848876119305134`*^9}, {3.784887676620901*^9, 3.7848876786672792`*^9}, { 3.78488771054331*^9, 3.784887714354906*^9}, {3.7848877625809546`*^9, 3.7848878103041153`*^9}, 3.7848878862881575`*^9, {3.787717235155089*^9, 3.787717269464238*^9}, {3.7877174592607603`*^9, 3.7877174674038067`*^9}, { 3.7877271032841845`*^9, 3.787727136247201*^9}, 3.787727355369296*^9, 3.7877274973278403`*^9, {3.787727855959008*^9, 3.78772792141208*^9}, 3.787728113487193*^9, {3.7877281704571557`*^9, 3.7877281735077004`*^9}, 3.7877282789827795`*^9, {3.7877286510229864`*^9, 3.787728665729192*^9}, { 3.7877287942225084`*^9, 3.787728807671986*^9}, {3.787729044867985*^9, 3.787729045536916*^9}, {3.787729589732438*^9, 3.7877296062090626`*^9}, { 3.787729794037467*^9, 3.7877297950347877`*^9}, {3.787729855548402*^9, 3.7877299039179935`*^9}, {3.7877300373241186`*^9, 3.787730068136018*^9}, { 3.7877301999859333`*^9, 3.7877302014150777`*^9}, {3.787732033225385*^9, 3.7877320471634016`*^9}, {3.787732077195259*^9, 3.7877320780358667`*^9}, 3.787732189759206*^9, {3.78773231889835*^9, 3.787732327710633*^9}, { 3.7877324857166643`*^9, 3.787732496655479*^9}, {3.7877325848303585`*^9, 3.78773258503596*^9}, {3.7877328504631166`*^9, 3.7877328625892415`*^9}, { 3.7877330254884944`*^9, 3.7877330271019044`*^9}, {3.787733136128061*^9, 3.7877331422258835`*^9}, {3.787733243513567*^9, 3.78773324558677*^9}, 3.787733310555999*^9, 3.7877334085329347`*^9, {3.7877337955932293`*^9, 3.7877337970498257`*^9}, {3.787733867727028*^9, 3.7877338687324905`*^9}, { 3.7877352224369583`*^9, 3.787735224161746*^9}, {3.787735343322833*^9, 3.787735348772827*^9}, {3.787735422704711*^9, 3.7877354268945775`*^9}, { 3.7877355100355635`*^9, 3.787735514671461*^9}, {3.7877356541994534`*^9, 3.7877356632141013`*^9}, 3.7877357913476543`*^9, 3.787736261837074*^9, { 3.7882542159043374`*^9, 3.7882542747998285`*^9}, {3.788254310967661*^9, 3.788254318430212*^9}, {3.788254585790197*^9, 3.7882545888318524`*^9}, { 3.7882547349987383`*^9, 3.788254735940298*^9}, 3.788254830063775*^9, 3.7882549155286837`*^9, {3.7882550121437798`*^9, 3.788255037735396*^9}, { 3.7882551764404287`*^9, 3.78825518352113*^9}, {3.7882552540030313`*^9, 3.788255290224329*^9}, {3.7882553843544893`*^9, 3.788255423248046*^9}, { 3.78825567982127*^9, 3.7882556852479534`*^9}, {3.7882557908576803`*^9, 3.7882558029800806`*^9}, {3.7882560240494256`*^9, 3.7882560388846164`*^9}, 3.788256102343512*^9, {3.788256161397396*^9, 3.7882561626372194`*^9}, { 3.7882562304311895`*^9, 3.78825629590362*^9}, {3.7882563614677362`*^9, 3.7882563620189795`*^9}, {3.7882564138122153`*^9, 3.7882564294158382`*^9}, {3.788256467457189*^9, 3.7882564889521217`*^9}, { 3.7882565883311844`*^9, 3.788256591497148*^9}, {3.7882568409513097`*^9, 3.7882568724526567`*^9}, {3.788256965258837*^9, 3.788256966444976*^9}, { 3.7882570073831463`*^9, 3.7882570497349973`*^9}, {3.7882570992487097`*^9, 3.788257144206352*^9}, {3.78825721252205*^9, 3.788257307277931*^9}, { 3.788257350410209*^9, 3.7882573617262745`*^9}, {3.788257424936472*^9, 3.788257434118204*^9}, {3.788276311330668*^9, 3.788276311647092*^9}, { 3.7882765465512347`*^9, 3.788276608568333*^9}, {3.7882767715851693`*^9, 3.7882768045752783`*^9}, {3.7882769342607436`*^9, 3.7882769409894867`*^9}, {3.7882770202208567`*^9, 3.7882770424485188`*^9}, {3.7882770760040703`*^9, 3.788277077341468*^9}, { 3.788277147336176*^9, 3.788277150397852*^9}, {3.7882772069909*^9, 3.7882772101572385`*^9}, {3.7882772503366175`*^9, 3.7882772773759403`*^9}, {3.7882773922958755`*^9, 3.7882773927832017`*^9}, {3.788277450684473*^9, 3.788277482126852*^9}, { 3.78827754293396*^9, 3.788277545027956*^9}, 3.7890961565048018`*^9, { 3.789096242941472*^9, 3.7890962452874937`*^9}, {3.789096286771101*^9, 3.789096287939043*^9}, {3.7890963300637918`*^9, 3.789096330454324*^9}, { 3.789096421623994*^9, 3.789096482010544*^9}, {3.789123616007924*^9, 3.7891236603119373`*^9}, {3.82004560462539*^9, 3.820045628865552*^9}, { 3.820045711583801*^9, 3.82004571444415*^9}, {3.82004574552601*^9, 3.8200458146656227`*^9}, {3.8200459471200194`*^9, 3.820045947496038*^9}, { 3.820113346283964*^9, 3.820113420687029*^9}, {3.843547853319944*^9, 3.8435478596811757`*^9}, {3.8435479019503555`*^9, 3.8435479743034277`*^9}, {3.843560932189252*^9, 3.8435609338416433`*^9}, { 3.8435611914261384`*^9, 3.8435611920632486`*^9}, {3.8435624320536933`*^9, 3.8435624411683536`*^9}, {3.8437295238924494`*^9, 3.843729569229367*^9}, { 3.8443920425579967`*^9, 3.844392043749901*^9}, {3.844392085066965*^9, 3.84439210220125*^9}, 3.8443921338951335`*^9, {3.8443921701680193`*^9, 3.8443921937971706`*^9}, {3.844513395563983*^9, 3.8445134085996456`*^9}, { 3.8447683674104347`*^9, 3.844768368670556*^9}, {3.8447684443309875`*^9, 3.8447684484900866`*^9}, 3.8447686520157948`*^9, {3.844768745687599*^9, 3.844768745855211*^9}, 3.845183304458513*^9, {3.8451835940010877`*^9, 3.845183594542489*^9}, {3.845184390302038*^9, 3.845184391945329*^9}, { 3.8451845184651327`*^9, 3.845184537503073*^9}, {3.845184725810747*^9, 3.845184727862517*^9}, 3.8451848085572977`*^9, {3.845255005543473*^9, 3.8452550701614428`*^9}, {3.845255116528925*^9, 3.845255130817441*^9}, { 3.8452553159491444`*^9, 3.845255398239421*^9}, {3.8452554316887584`*^9, 3.845255516323632*^9}, {3.845255572312236*^9, 3.84525558031181*^9}, { 3.8452556104383307`*^9, 3.845255693908064*^9}, {3.845527992682146*^9, 3.8455280119549503`*^9}, {3.8455280677849493`*^9, 3.8455282068632755`*^9}, 3.845528296510269*^9, {3.84552838544649*^9, 3.8455283972662654`*^9}, { 3.8455285111156416`*^9, 3.845528620724532*^9}, {3.8455286507394857`*^9, 3.8455286778537693`*^9}, {3.84552875397721*^9, 3.8455287832150126`*^9}, { 3.8455288134263644`*^9, 3.8455288242659492`*^9}, {3.845528882756366*^9, 3.845528933497317*^9}, {3.845529287839986*^9, 3.8455293012812443`*^9}, { 3.8455293978278055`*^9, 3.8455293981111383`*^9}, {3.845529499537836*^9, 3.8455295004065795`*^9}, {3.845609477072257*^9, 3.8456096065189395`*^9}, { 3.845609662788809*^9, 3.845609668689152*^9}, {3.845609712860342*^9, 3.8456097209108343`*^9}, {3.845609845478004*^9, 3.845609907655341*^9}, { 3.8456103094907556`*^9, 3.845610323020236*^9}, {3.845610368769788*^9, 3.845610376316151*^9}, {3.845610434176654*^9, 3.84561049090069*^9}, 3.845610522214707*^9, 3.8456107866420207`*^9, {3.8456108553684444`*^9, 3.845610855574578*^9}, {3.845611041459861*^9, 3.845611043810052*^9}, { 3.8456116165491714`*^9, 3.8456117283491564`*^9}, {3.8456117769969835`*^9, 3.8456118220363483`*^9}, {3.8456118703237553`*^9, 3.8456119831151495`*^9}, {3.8456124022981386`*^9, 3.8456124224583464`*^9}, {3.8456127164733524`*^9, 3.845612740344495*^9}, { 3.845780852075635*^9, 3.8457808657114325`*^9}, {3.8457821230286026`*^9, 3.845782123716519*^9}, {3.8457825521920204`*^9, 3.845782609179036*^9}, { 3.845782729323619*^9, 3.8457827515157847`*^9}, {3.845782785128273*^9, 3.845782803453997*^9}, {3.8457828344736314`*^9, 3.8457828358311925`*^9}, { 3.845783094796917*^9, 3.8457830991701584`*^9}, {3.8457833361542873`*^9, 3.845783501335464*^9}, {3.845783531957113*^9, 3.8457835680525503`*^9}, 3.845783764414663*^9, 3.84578597144022*^9, 3.8457864896793737`*^9, { 3.845787119546991*^9, 3.84578713411397*^9}, {3.845787696751997*^9, 3.8457877204318814`*^9}, 3.8457882983714895`*^9, {3.8457885986921697`*^9, 3.8457886169047403`*^9}, {3.8457887088707514`*^9, 3.8457887217894297`*^9}, {3.8457887909210815`*^9, 3.8457888144201937`*^9}, {3.8457888906519327`*^9, 3.8457889466368628`*^9}, {3.8457890416459827`*^9, 3.845789052312254*^9}, { 3.845789116545609*^9, 3.8457891180744157`*^9}, {3.845789226429738*^9, 3.8457892292024574`*^9}, {3.845790510151396*^9, 3.845790519684927*^9}, 3.8457906357570543`*^9, {3.8458635760826883`*^9, 3.845863582446103*^9}, { 3.8458636696732097`*^9, 3.845863680633752*^9}, {3.8458637198783617`*^9, 3.845863725217595*^9}, 3.8458643039964285`*^9, {3.845864896377093*^9, 3.8458649228570347`*^9}, 3.8458654592977276`*^9, {3.8458655305222178`*^9, 3.845865533812125*^9}, 3.8458656269752007`*^9, 3.8458662253983583`*^9, { 3.845866315341114*^9, 3.845866316735467*^9}, {3.8458664630238924`*^9, 3.845866520383334*^9}, {3.845866555205945*^9, 3.845866566614134*^9}, { 3.845866724894957*^9, 3.8458667295073595`*^9}, {3.8458670210920024`*^9, 3.8458670231028185`*^9}, 3.8458671129063563`*^9, 3.8458672295699835`*^9, 3.845867522574538*^9, {3.845867616322856*^9, 3.845867616819559*^9}, { 3.8458677144565196`*^9, 3.8458677161961637`*^9}, {3.845867821061138*^9, 3.845867825279958*^9}, 3.8458680066485095`*^9, {3.845868278532402*^9, 3.845868302364672*^9}, {3.8458688185729504`*^9, 3.845868834819693*^9}, { 3.845869294519817*^9, 3.845869295105886*^9}}, CellLabel-> "In[175]:=",ExpressionUUID->"1268ceed-469b-40e1-868a-eeb97f8bcf68"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", "fn_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Alpha]", ",", "\[Beta]", ",", "r", ",", "e1", ",", "e2", ",", "e3", ",", "en", ",", "FF", ",", "FFINV", ",", "jac", ",", "NN", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "AA", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Phi]", ",", "wc", ",", "E\[Sigma]", ",", "\[Delta]w", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wmap", ",", "\[Kappa]\[Kappa]", ",", "\[Gamma]\[Gamma]", ",", "MM", ",", "QQ", ",", "tri", ",", RowBox[{"mat", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "}"}]}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"mapping", " ", "for", " ", "the", " ", "geometry"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"e1", ",", "e2"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"e3", "=", RowBox[{"e1", StyleBox["\[Cross]", "OperatorCharacter"], "e2"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"e3", "/", RowBox[{"Sqrt", "[", RowBox[{"e3", ".", "e3"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1", ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"D", "[", RowBox[{"r", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", " ", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "approximations", "*)"}], "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"(", RowBox[{"mat", ".", "NN"}], ")"}], ".", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"ind", "=", RowBox[{"{", RowBox[{ RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], ",", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], ",", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"(", RowBox[{"mat", ".", "NN"}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"wc", "=", RowBox[{"NN", ".", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2"}], "]"}], "]"}], ".", "en"}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "projection", "*)"}], "\[IndentingNewLine]", RowBox[{"AA", "=", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", "jac", ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]"}], "}"}], "=", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]"}], "}"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "/", "AA"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"strain", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Kappa]\[Kappa]", "=", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}]}], "}"}], ".", RowBox[{"Transpose", "[", "FFINV", "]"}], ".", RowBox[{"D", "[", RowBox[{"\[Phi]", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}], "}"}]}], "]"}]}], "-", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}]}], "}"}], ".", RowBox[{"Transpose", "[", "FFINV", "]"}], ".", RowBox[{"D", "[", RowBox[{"\[Theta]", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}], "}"}]}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Gamma]\[Gamma]", "=", RowBox[{ RowBox[{ RowBox[{"Transpose", "[", "FFINV", "]"}], ".", RowBox[{"D", "[", RowBox[{"w", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}], "}"}]}], "]"}]}], "+", RowBox[{"{", RowBox[{"\[Pi]\[Theta]", ",", RowBox[{"-", "\[Pi]\[Phi]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", "E\[Sigma]"}], ")"}], ".", "\[Kappa]\[Kappa]"}]}], ";", "\[IndentingNewLine]", RowBox[{"QQ", "=", RowBox[{"tt", "*", "GG", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]\[Kappa]", "]"}], ".", "MM"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Gamma]\[Gamma]", "]"}], ".", "QQ"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], "*", "fn"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wmap", "=", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]", "[", RowBox[{"wc", "-", "w"}], "]"}]}], "*", RowBox[{"(", RowBox[{"wc", "-", "w"}], ")"}], "*", RowBox[{"tt", "/", "AA"}], "*", "EE"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI1", ",", RowBox[{ RowBox[{"(", "\[Delta]wmap", ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Dohrmann", " ", "Bochev"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLATETEST", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", "fn_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Alpha]", ",", "\[Beta]", ",", "xg", ",", "yg", ",", "r", ",", "FF", ",", "FFINV", ",", "jac", ",", "NN", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "AA", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Phi]", ",", "wc", ",", "E\[Sigma]", ",", "\[Delta]w", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wmap", ",", "\[Kappa]\[Kappa]", ",", "\[Gamma]\[Gamma]", ",", "MM", ",", "QQ", ",", "tri"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"mapping", " ", "for", " ", "the", " ", "geometry"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1", ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"D", "[", RowBox[{"r", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", " ", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "approximations", "*)"}], "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]wx", "=", RowBox[{ RowBox[{"b", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "0"}], "}"}], "]"}], "+", RowBox[{ RowBox[{"b", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], "*", "x"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]wy", "=", RowBox[{ RowBox[{"b", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}], "+", RowBox[{ RowBox[{"b", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "4"}], "}"}], "]"}], "*", "y"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"strain", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Kappa]\[Kappa]", "=", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}]}], "}"}], ".", RowBox[{"Transpose", "[", "FFINV", "]"}], ".", RowBox[{"D", "[", RowBox[{"\[Phi]", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}], "}"}]}], "]"}]}], "-", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}]}], "}"}], ".", RowBox[{"Transpose", "[", "FFINV", "]"}], ".", RowBox[{"D", "[", RowBox[{"\[Theta]", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}], "}"}]}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Gamma]\[Gamma]", "=", RowBox[{ RowBox[{ RowBox[{"Transpose", "[", "FFINV", "]"}], ".", RowBox[{"D", "[", RowBox[{"\[Pi]w", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}], "}"}]}], "]"}]}], "+", RowBox[{"{", RowBox[{"\[Theta]", ",", RowBox[{"-", "\[Phi]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", "E\[Sigma]"}], ")"}], ".", "\[Kappa]\[Kappa]"}]}], ";", "\[IndentingNewLine]", RowBox[{"QQ", "=", RowBox[{"tt", "*", "GG", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]\[Kappa]", "]"}], ".", "MM"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Gamma]\[Gamma]", "]"}], ".", "QQ"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], "*", "fn"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wmap", "=", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]", "[", RowBox[{"(", RowBox[{"\[Pi]w", "-", "w"}], ")"}], "]"}]}], "*", RowBox[{"(", RowBox[{"\[Pi]w", "-", "w"}], ")"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext", "+", RowBox[{"100", "*", "\[Delta]wmap"}]}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLATEBUILD", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", "fn_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "xn", ",", "yn", ",", "x", ",", "y", ",", "NN", ",", "MM", ",", "w", ",", "ww", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Phi]", ",", "E\[Sigma]", ",", "\[Delta]w", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Kappa]", ",", "\[Gamma]", ",", "M", ",", "Q", ",", "tri", ",", "Ae", ",", "asm"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"xn", "=", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1", ",", "1"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"yn", "=", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1", ",", "2"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",", "xn", ",", "yn"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"1", ",", "x", ",", "y"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "1"}], "}"}]}], "}"}], "]"}], ".", "NN"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"bending", " ", "mode", " ", "approximations"}], "*)"}], "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"MM", ".", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"ww", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]x", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "projection", "*)"}], "\[IndentingNewLine]", RowBox[{"asm", "=", RowBox[{ RowBox[{"h", ">", "0"}], "&&", RowBox[{"L", ">", "0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"tri", "=", RowBox[{"Polygon", "[", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"xn", ",", "yn"}], "}"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Ae", "=", RowBox[{"Integrate", "[", RowBox[{"1", ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["tri", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], RowBox[{ StyleBox["Assumptions", "OperatorCharacter"], StyleBox["\[Rule]", "OperatorCharacter"], "asm"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Phi]", "=", RowBox[{ RowBox[{"Integrate", "[", RowBox[{"\[Phi]", ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["tri", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], RowBox[{ StyleBox["Assumptions", "OperatorCharacter"], StyleBox["\[Rule]", "OperatorCharacter"], "asm"}]}], "]"}], "/", "Ae"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Theta]", "=", RowBox[{ RowBox[{"Integrate", "[", RowBox[{"\[Theta]", ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["tri", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], RowBox[{ StyleBox["Assumptions", "OperatorCharacter"], StyleBox["\[Rule]", "OperatorCharacter"], "asm"}]}], "]"}], "/", "Ae"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"strain", " ", "and", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Kappa]", "=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Theta]"}]}], ",", RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Phi]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Phi]"}], "-", RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Theta]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Gamma]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "w"}], "-", "\[Pi]\[Phi]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "w"}], "+", "\[Pi]\[Theta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{ RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", RowBox[{"(", RowBox[{"E\[Sigma]", ".", "\[Kappa]"}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Q", "=", RowBox[{"tt", "*", "GG", "*", "\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]w", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]", "]"}], ".", "M"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Gamma]", "]"}], ".", "Q"}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], "*", "fn"}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "ww", "]"}], "*", RowBox[{"(", RowBox[{"ww", "-", "w"}], ")"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Integrate", "[", RowBox[{"\[Delta]w", ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["tri", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], RowBox[{ StyleBox["Assumptions", "OperatorCharacter"], StyleBox["\[Rule]", "OperatorCharacter"], "asm"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLATEBUILD", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", "fn_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Alpha]", ",", "\[Beta]", ",", "xg", ",", "yg", ",", "jac", ",", "xn", ",", "yn", ",", "xm", ",", "ym", ",", "x", ",", "y", ",", "N3", ",", "M3", ",", "K3", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "AA", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Phi]", ",", "wc", ",", "E\[Sigma]", ",", "\[Delta]w", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wmap", ",", "\[Kappa]\[Kappa]", ",", "\[Gamma]\[Gamma]", ",", "MM", ",", "QQ", ",", "tri"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"mapping", " ", "for", " ", "the", " ", "geometry"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"xn", ",", "yn"}], "}"}], "=", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1", ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"K3", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"xg", "=", RowBox[{"K3", ".", "xn"}]}], ";", "\[IndentingNewLine]", RowBox[{"yg", "=", RowBox[{"K3", ".", "yn"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Abs", "[", RowBox[{"Det", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "xg"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "xg"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "yg"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "yg"}]}], "}"}]}], "}"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"xm", " ", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xn", "[", RowBox[{"[", "1", "]"}], "]"}], "+", RowBox[{"xn", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"xn", "[", RowBox[{"[", "2", "]"}], "]"}], "+", RowBox[{"xn", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"xn", "[", RowBox[{"[", "3", "]"}], "]"}], "+", RowBox[{"xn", "[", RowBox[{"[", "1", "]"}], "]"}]}]}], "}"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"ym", " ", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"yn", "[", RowBox[{"[", "1", "]"}], "]"}], "+", RowBox[{"yn", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"yn", "[", RowBox[{"[", "2", "]"}], "]"}], "+", RowBox[{"yn", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"yn", "[", RowBox[{"[", "3", "]"}], "]"}], "+", RowBox[{"yn", "[", RowBox[{"[", "1", "]"}], "]"}]}]}], "}"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"N3", "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",", "xn", ",", "yn"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"1", ",", "x", ",", "y"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M3", "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",", "xm", ",", "ym"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"1", ",", "x", ",", "y"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"M3", ".", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"wc", "=", RowBox[{"N3", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{ RowBox[{"N3", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"N3", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"N3", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"N3", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"N3", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"N3", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"N3", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"N3", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "projection", "*)"}], "\[IndentingNewLine]", RowBox[{"AA", "=", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", "jac", ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Theta]", "=", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Theta]", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"x", "\[Rule]", "xg"}], ",", RowBox[{"y", "\[Rule]", "yg"}]}], "}"}]}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "/", "AA"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Phi]", "=", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Phi]", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"x", "\[Rule]", "xg"}], ",", RowBox[{"y", "\[Rule]", "yg"}]}], "}"}]}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "/", "AA"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Kappa]\[Kappa]", "=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Theta]"}]}], ",", RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Phi]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Phi]"}], "-", RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Theta]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Gamma]\[Gamma]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "w"}], "+", "\[Pi]\[Theta]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "w"}], "-", "\[Pi]\[Phi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", "E\[Sigma]"}], ")"}], ".", "\[Kappa]\[Kappa]"}]}], ";", "\[IndentingNewLine]", RowBox[{"QQ", "=", RowBox[{"tt", "*", "GG", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]\[Kappa]", "]"}], ".", "MM"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Gamma]\[Gamma]", "]"}], ".", "QQ"}]}], ")"}], " ", "/.", " ", RowBox[{"{", RowBox[{ RowBox[{"x", "\[Rule]", "xg"}], ",", RowBox[{"y", "\[Rule]", "yg"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], "*", "fn"}], ")"}], "/.", " ", RowBox[{"{", RowBox[{ RowBox[{"x", "\[Rule]", "xg"}], ",", RowBox[{"y", "\[Rule]", "yg"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wmap", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]", "[", "wc", "]"}], "*", RowBox[{"(", RowBox[{"wc", "-", "w"}], ")"}]}], ")"}], " ", "/.", " ", RowBox[{"{", RowBox[{ RowBox[{"x", "\[Rule]", "xg"}], ",", RowBox[{"y", "\[Rule]", "yg"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wmap"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ RowBox[{"HETEROSIS", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ "n1_", ",", "n2_", ",", "n3_", ",", "n4_", ",", "n5_", ",", "n6_", ",", "n7_", ",", "n8_", ",", "n9_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}]}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "\[Alpha]", ",", "\[Beta]", ",", "\[IndentingNewLine]", "n", ",", "enode", ",", "N9", ",", "N8", ",", "r0", ",", "r0\[Alpha]", ",", "r0\[Beta]", ",", "e\[Alpha]", ",", "e\[Beta]", ",", "en", ",", "h\[Alpha]", ",", "h\[Beta]", ",", "FF", ",", "jac", ",", "x", ",", "y", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "E\[Sigma]", ",", "\[Epsilon]\[Epsilon]", ",", "\[Kappa]\[Kappa]", ",", "\[Gamma]\[Gamma]", ",", "M", ",", "Q", ",", "F", ",", "\[Delta]wint1", ",", "\[Delta]wint2", ",", "\[Delta]wext", ",", "f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{ "n1", ",", "n2", ",", "n3", ",", "n4", ",", "n5", ",", "n6", ",", "n7", ",", "n8", ",", "n9"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"N9", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", "\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", "\[Beta]"}], ",", RowBox[{"16", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", "\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"-", "4"}], " ", "\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", "\[Alpha]", " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"N8", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", "\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", "\[Beta]"}], ",", "0", ",", RowBox[{ RowBox[{"-", "4"}], " ", "\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", "\[Alpha]", " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "mapping", " ", "to", " ", "orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{"N9", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Alpha]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Beta]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0\[Alpha]", ".", "r0\[Alpha]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0\[Beta]", ".", "r0\[Beta]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Alpha]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"r0\[Alpha]", "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Beta]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"r0\[Beta]", "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"e\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"r0\[Alpha]", ",", "r0\[Beta]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Det", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"f\[Alpha]", "=", RowBox[{"e\[Alpha]", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"f\[Beta]", "=", RowBox[{"e\[Beta]", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"fn", "=", RowBox[{"en", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "functions", " ", "in", " ", "the", " ", "material", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"N8", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}], ".", "e\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"N8", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}], ".", "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"N8", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}], ".", "en"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"N9", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}], ".", "e\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"N9", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}], ".", "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{"N9", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}], ".", "en"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"plane", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]\[Nu]", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]\[Nu]", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"plate", " ", "strain", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]\[Epsilon]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v"}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], "/", "h\[Alpha]"}], "-", "\[Psi]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u"}], "/", "h\[Beta]"}], "+", "\[Psi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]\[Kappa]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}]}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], "/", "h\[Alpha]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Theta]"}], "/", "h\[Beta]"}]}], ",", "0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Gamma]\[Gamma]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}], "/", "h\[Beta]"}], "-", "\[Phi]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], "/", "h\[Alpha]"}], "+", "\[Theta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"plate", " ", "stress", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{"tt", "*", RowBox[{"E\[Sigma]", ".", "\[Epsilon]\[Epsilon]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{ RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", RowBox[{"E\[Sigma]", ".", "\[Kappa]\[Kappa]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Q", "=", RowBox[{"tt", "*", "GG", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint1", "=", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]\[Kappa]", "]"}], ".", "M"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Epsilon]\[Epsilon]", "]"}], ".", "F"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint2", "=", RowBox[{"(", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Gamma]\[Gamma]", "]"}], ".", "Q"}]}], " ", ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"LIN2", ",", RowBox[{"QUAD", "[", RowBox[{"LIN2", ",", RowBox[{ RowBox[{"(", "\[Delta]wint2", ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}], ",", RowBox[{"{", "\[Beta]", "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"LIN3", ",", RowBox[{"QUAD", "[", RowBox[{"LIN3", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint1", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}], ",", RowBox[{"{", "\[Beta]", "}"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "HETEROSIS", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLATEF", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ "n1_Integer", ",", "n2_Integer", ",", "n3_Integer", ",", "n4_Integer"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "enode", ",", "N4", ",", "N9", ",", "N8", ",", "r0", ",", "r0\[Alpha]", ",", "r0\[Beta]", ",", "e\[Alpha]", ",", "e\[Beta]", ",", "en", ",", "h\[Alpha]", ",", "h\[Beta]", ",", "FF", ",", "jac", ",", "x", ",", "y", ",", "dofu", ",", "dof\[Theta]", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "E\[Sigma]", ",", "\[Epsilon]\[Epsilon]", ",", "\[Kappa]\[Kappa]", ",", "\[Gamma]\[Gamma]", ",", "M", ",", "Q", ",", "F", ",", "\[Delta]wint1", ",", "\[Delta]wint2", ",", "\[Delta]wint3", ",", "\[Delta]wext", ",", "f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"N4", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"N9", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", "\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", "\[Beta]"}], ",", RowBox[{"16", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", "\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"-", "4"}], " ", "\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", "\[Alpha]", " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"N8", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", "\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", "\[Beta]"}], ",", "0", ",", RowBox[{ RowBox[{"-", "4"}], " ", "\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Beta]"}], ")"}], " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", "\[Alpha]", " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}], " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "mapping", " ", "to", " ", "orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{"N4", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Alpha]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Beta]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0\[Alpha]", ".", "r0\[Alpha]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0\[Beta]", ".", "r0\[Beta]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Alpha]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"r0\[Alpha]", "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Beta]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"r0\[Beta]", "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"e\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"r0\[Alpha]", ",", "r0\[Beta]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Det", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"f\[Alpha]", "=", RowBox[{"e\[Alpha]", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"f\[Beta]", "=", RowBox[{"e\[Beta]", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"fn", "=", RowBox[{"en", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "functions", " ", "in", " ", "the", " ", "material", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"dofu", "=", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n4"}], "}"}], "]"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n4"}], "}"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n4"}], "}"}], "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n4", ",", "2"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n3", ",", "2"}], "]"}], "]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof\[Theta]", "=", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n4"}], "}"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n4"}], "}"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n4"}], "}"}], "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n4", ",", "3"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n3", ",", "3"}], "]"}], "]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"N8", ".", "dofu", ".", "e\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"N8", ".", "dofu", ".", "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"N8", ".", "dofu", ".", "en"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"N9", ".", "dof\[Theta]", ".", "e\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"N9", ".", "dof\[Theta]", ".", "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{"N9", ".", "dof\[Theta]", ".", "en"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"plane", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]\[Nu]", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]\[Nu]", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"plate", " ", "strain", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]\[Epsilon]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v"}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], "/", "h\[Alpha]"}], "-", "\[Psi]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u"}], "/", "h\[Beta]"}], "+", "\[Psi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]\[Kappa]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}]}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], "/", "h\[Alpha]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Theta]"}], "/", "h\[Beta]"}]}], ",", "0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Gamma]\[Gamma]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}], "/", "h\[Beta]"}], "-", "\[Phi]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], "/", "h\[Alpha]"}], "+", "\[Theta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"plate", " ", "stress", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{"tt", "*", RowBox[{"E\[Sigma]", ".", "\[Epsilon]\[Epsilon]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{ RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", RowBox[{"E\[Sigma]", ".", "\[Kappa]\[Kappa]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Q", "=", RowBox[{"tt", "*", "GG", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint1", "=", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]\[Kappa]", "]"}], ".", "M"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint2", "=", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Epsilon]\[Epsilon]", "]"}], ".", "F"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint3", "=", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Gamma]\[Gamma]", "]"}], ".", "Q"}]}]}], " ", ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}]}], ")"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"LIN3", ",", RowBox[{"QUAD", "[", RowBox[{"LIN3", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint1", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}], ",", RowBox[{"{", "\[Beta]", "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"LIN2", ",", RowBox[{"QUAD", "[", RowBox[{"LIN2", ",", RowBox[{ RowBox[{"(", "\[Delta]wint2", ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}], ",", RowBox[{"{", "\[Beta]", "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"LIN2", ",", RowBox[{"QUAD", "[", RowBox[{"LIN2", ",", RowBox[{ RowBox[{"(", "\[Delta]wint3", ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}], ",", RowBox[{"{", "\[Beta]", "}"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"HUGHES", "-", "TEZDUAR"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ "n1_Integer", ",", "n2_Integer", ",", "n3_Integer", ",", "n4_Integer"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "\[Alpha]", ",", "\[Beta]", ",", "\[IndentingNewLine]", "n", ",", "enode", ",", "NN", ",", "r0", ",", "r0\[Alpha]", ",", "r0\[Beta]", ",", "e\[Alpha]", ",", "e\[Beta]", ",", "en", ",", "h\[Alpha]", ",", "h\[Beta]", ",", "FF", ",", "jac", ",", "x", ",", "y", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]\[Alpha]", ",", "\[Pi]\[Psi]\[Beta]", ",", "E\[Sigma]", ",", "\[Epsilon]\[Epsilon]", ",", "\[Kappa]\[Kappa]", ",", "\[Gamma]\[Gamma]", ",", "M", ",", "Q", ",", "F", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "f\[Alpha]", ",", "f\[Beta]", ",", "fn", ",", "int"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "mapping", " ", "to", " ", "orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Alpha]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Beta]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0\[Alpha]", ".", "r0\[Alpha]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0\[Beta]", ".", "r0\[Beta]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Alpha]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"r0\[Alpha]", "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Beta]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"r0\[Beta]", "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"e\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"r0\[Alpha]", ",", "r0\[Beta]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Det", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"f\[Alpha]", "=", RowBox[{"e\[Alpha]", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"f\[Beta]", "=", RowBox[{"e\[Beta]", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"fn", "=", RowBox[{"en", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "functions", " ", "in", " ", "the", " ", "material", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}], ".", "e\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}], ".", "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}], ".", "en"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}], ".", "e\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}], ".", "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}], ".", "en"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "taylor", " ", "projections", " ", "onto", " ", "constants"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Pi]\[Phi]", "=", RowBox[{"\[Phi]", "/.", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Theta]", "=", RowBox[{"\[Theta]", "/.", RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Psi]\[Alpha]", "=", RowBox[{"\[Psi]", "/.", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Psi]\[Beta]", "=", RowBox[{"\[Psi]", "/.", RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"plane", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]\[Nu]", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]\[Nu]", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "plate", " ", "strain", " ", "and", " ", "stress", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]\[Epsilon]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v"}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], "/", "h\[Alpha]"}], "-", "\[Pi]\[Psi]\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u"}], "/", "h\[Beta]"}], "+", "\[Pi]\[Psi]\[Alpha]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]\[Kappa]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}]}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], "/", "h\[Alpha]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Theta]"}], "/", "h\[Beta]"}]}], ",", "0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Gamma]\[Gamma]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}], "/", "h\[Beta]"}], "-", "\[Pi]\[Phi]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], "/", "h\[Alpha]"}], "+", "\[Pi]\[Theta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{"tt", "*", RowBox[{"E\[Sigma]", ".", "\[Epsilon]\[Epsilon]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{ RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", RowBox[{"E\[Sigma]", ".", "\[Kappa]\[Kappa]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Q", "=", RowBox[{"tt", "*", "GG", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]\[Kappa]", "]"}], ".", "M"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Gamma]\[Gamma]", "]"}], ".", "Q"}], " ", "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Epsilon]\[Epsilon]", "]"}], ".", "F"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"LIN3", ",", RowBox[{"QUAD", "[", RowBox[{"LIN3", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}], ",", RowBox[{"{", "\[Beta]", "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"HUGHES", "-", "TEZDUAR"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLATEF", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ "n1_Integer", ",", "n2_Integer", ",", "n3_Integer", ",", "n4_Integer"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "\[Alpha]", ",", "\[Beta]", ",", "\[IndentingNewLine]", "n", ",", "enode", ",", "NN", ",", "MM", ",", "r0", ",", "r0\[Alpha]", ",", "r0\[Beta]", ",", "e\[Alpha]", ",", "e\[Beta]", ",", "en", ",", "h\[Alpha]", ",", "h\[Beta]", ",", "ex", ",", "ey", ",", "\[Rho]", ",", "FF", ",", "jac", ",", "x", ",", "y", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]x", ",", "\[Pi]\[Psi]y", ",", "E\[Sigma]", ",", "\[Epsilon]\[Epsilon]", ",", "\[Kappa]\[Kappa]", ",", "\[Gamma]\[Gamma]", ",", "M", ",", "Q", ",", "F", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "fx", ",", "fy", ",", "fn", ",", "int", ",", "xn", ",", "yn", ",", "xc", ",", "yc"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"orthonormal", " ", "material", " ", "xyn"}], "-", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{"MM", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Alpha]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]", "=", RowBox[{"Sqrt", "[", RowBox[{"r0\[Alpha]", ".", "r0\[Alpha]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ex", "=", RowBox[{"r0\[Alpha]", "/", "h\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Beta]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Beta]", "=", RowBox[{"r0\[Beta]", "-", RowBox[{ RowBox[{"(", RowBox[{"r0\[Beta]", ".", "ex"}], ")"}], "ex"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Sqrt", "[", RowBox[{"r0\[Beta]", ".", "r0\[Beta]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ey", "=", RowBox[{"r0\[Beta]", "/", "h\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"ex", StyleBox["\[Cross]", "OperatorCharacter"], "ey"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"geometry", " ", "in", " ", "the", " ", "xyn"}], "-", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"rc", "=", RowBox[{"r0", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"xn", ",", "yn"}], "}"}], "=", RowBox[{"Transpose", "[", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"#", "-", "rc"}], ")"}], ".", "ex"}], ",", RowBox[{ RowBox[{"(", RowBox[{"#", "-", "rc"}], ")"}], ".", "ey"}]}], "}"}], "&"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1", ",", "1"}], "}"}], ",", "xn", ",", "yn", ",", RowBox[{"xn", "*", "yn"}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"1", ",", "x", ",", "y", ",", RowBox[{"x", " ", "y"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"xc", "=", RowBox[{"Mean", "[", "xn", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"yc", "=", RowBox[{"Mean", "[", "yn", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"x\[Alpha]\[Beta]", "=", RowBox[{"NN", ".", "xn"}]}], ";", "\[IndentingNewLine]", RowBox[{"y\[Alpha]\[Beta]", "=", RowBox[{"NN", ".", "yn"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"fx", "=", RowBox[{"ex", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"fy", "=", RowBox[{"ey", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"fn", "=", RowBox[{"en", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "functions", " ", "in", " ", "the", " ", "material", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}], ".", "ex"}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}], ".", "ey"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}], ".", "en"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}], ".", "ex"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}], ".", "ey"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}], ".", "en"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "taylor", " ", "projections", " ", "onto", " ", "constants"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Pi]\[Phi]", "=", RowBox[{"\[Phi]", "/.", RowBox[{"y", "\[Rule]", "yc"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Theta]", "=", RowBox[{"\[Theta]", "/.", RowBox[{"x", "\[Rule]", "xc"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Psi]x", "=", RowBox[{"\[Psi]", "/.", RowBox[{"y", "\[Rule]", "yc"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Psi]y", "=", RowBox[{"\[Psi]", "/.", RowBox[{"x", "\[Rule]", "xc"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"plane", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]\[Nu]", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]\[Nu]", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "plate", " ", "strain", " ", "and", " ", "stress", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]\[Epsilon]", "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "y"], "v"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}], "-", "\[Pi]\[Psi]y"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "u"}], "+", "\[Pi]\[Psi]x"}]}], "}"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]\[Kappa]", "=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Theta]"}]}], ",", RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Phi]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Phi]"}], "-", RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Theta]"}]}], ",", "0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Gamma]\[Gamma]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "w"}], "+", "\[Pi]\[Theta]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "w"}], "-", "\[Pi]\[Phi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{"tt", "*", RowBox[{"E\[Sigma]", ".", "\[Epsilon]\[Epsilon]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{ RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", RowBox[{"E\[Sigma]", ".", "\[Kappa]\[Kappa]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Q", "=", RowBox[{"tt", "*", "GG", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]\[Kappa]", "]"}], ".", "M"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Gamma]\[Gamma]", "]"}], ".", "Q"}], " ", "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Epsilon]\[Epsilon]", "]"}], ".", "F"}]}], ")"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"x", "->", RowBox[{"NN", ".", "xn"}]}], ",", RowBox[{"y", "->", RowBox[{"NN", ".", "yn"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fn"}], "}"}]}], ")"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"x", "->", RowBox[{"NN", ".", "xn"}]}], ",", RowBox[{"y", "->", RowBox[{"NN", ".", "yn"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"LIN3", ",", RowBox[{"QUAD", "[", RowBox[{"LIN3", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}], ",", RowBox[{"{", "\[Beta]", "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"PLATEF", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "\[Alpha]", ",", "\[Beta]", ",", "\[IndentingNewLine]", "n", ",", "n\[Alpha]", ",", "n\[Beta]", ",", "NN", ",", "r0", ",", "r0\[Alpha]", ",", "r0\[Beta]", ",", "e\[Alpha]", ",", "e\[Beta]", ",", "en", ",", "hx", ",", "hy", ",", "FF", ",", "jac", ",", "x", ",", "y", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]x", ",", "\[Pi]\[Psi]y", ",", "E\[Sigma]", ",", "\[Epsilon]\[Epsilon]", ",", "\[Kappa]\[Kappa]", ",", "\[Gamma]\[Gamma]", ",", "M", ",", "Q", ",", "F", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "nodes", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"n\[Alpha]", ",", "n\[Beta]"}], "}"}], "=", RowBox[{"Dimensions", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nl", "=", RowBox[{"Flatten", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"Flatten", "[", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n\[Alpha]", ",", "\[Alpha]"}], "}"}], ",", RowBox[{"{", RowBox[{"n\[Beta]", ",", "\[Beta]"}], "}"}]}], "}"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "mapping", " ", "to", " ", "orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Alpha]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Beta]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"hx", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0\[Alpha]", ".", "r0\[Alpha]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"hy", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0\[Beta]", ".", "r0\[Beta]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Alpha]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"r0\[Alpha]", "/", RowBox[{"Sqrt", "[", RowBox[{"r0\[Alpha]", ".", "r0\[Alpha]"}], "]"}]}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Beta]", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"r0\[Beta]", "/", RowBox[{"Sqrt", "[", RowBox[{"r0\[Beta]", ".", "r0\[Beta]"}], "]"}]}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"e\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"r0\[Alpha]", ",", "r0\[Beta]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Det", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "shape", " ", "function", " ", "in", " ", "material", " ", "coordinates"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"NN", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"x", "/", "hx"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"y", "/", "hy"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "functions", " ", "in", " ", "the", " ", "material", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}], ".", "e\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}], ".", "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}], ".", "en"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}], ".", "e\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}], ".", "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}], ".", "en"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Print", "[", "\"\\"", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"taylor", " ", "projections", " ", "onto", " ", "linears"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Pi]\[Phi]", "=", RowBox[{ RowBox[{"(", RowBox[{"\[Phi]", "/.", RowBox[{"y", "\[Rule]", RowBox[{"hy", "/", "2"}]}]}], ")"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Phi]"}], "/.", RowBox[{"y", "\[Rule]", RowBox[{"hy", "/", "2"}]}]}], ")"}], "*", RowBox[{"(", RowBox[{"y", "-", RowBox[{"hy", "/", "2"}]}], ")"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"+", RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "\[Phi]"}], "/.", RowBox[{"y", "\[Rule]", RowBox[{"hy", "/", "2"}]}]}], ")"}]}], "*", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"y", "-", RowBox[{"hy", "/", "2"}]}], ")"}], "^", "2"}], "/", "2"}], "*", "0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Theta]", "=", RowBox[{ RowBox[{"(", RowBox[{"\[Theta]", "/.", RowBox[{"x", "\[Rule]", RowBox[{"hx", "/", "2"}]}]}], ")"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Theta]"}], "/.", RowBox[{"x", "\[Rule]", RowBox[{"hx", "/", "2"}]}]}], ")"}], "*", RowBox[{"(", RowBox[{"x", "-", RowBox[{"hx", "/", "2"}]}], ")"}], "*", RowBox[{"(", RowBox[{"9", "/", "4"}], ")"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"+", RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "\[Theta]"}], "/.", RowBox[{"x", "\[Rule]", RowBox[{"hx", "/", "2"}]}]}], ")"}]}], "*", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"x", "-", RowBox[{"hx", "/", "2"}]}], ")"}], "^", "2"}], "/", "2"}], "*", "0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Psi]x", "=", RowBox[{ RowBox[{"(", RowBox[{"\[Psi]", "/.", RowBox[{"y", "\[Rule]", RowBox[{"hy", "/", "2"}]}]}], ")"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Psi]"}], "/.", RowBox[{"y", "\[Rule]", RowBox[{"hy", "/", "2"}]}]}], ")"}], "*", RowBox[{"(", RowBox[{"y", "-", RowBox[{"hy", "/", "2"}]}], ")"}], "*", RowBox[{"(", RowBox[{"9", "/", "4"}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "\[Psi]"}], "/.", RowBox[{"y", "\[Rule]", RowBox[{"hy", "/", "2"}]}]}], ")"}], "*", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"y", "-", RowBox[{"hy", "/", "2"}]}], ")"}], "^", "2"}], "/", "2"}], "*", "0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Psi]y", "=", RowBox[{ RowBox[{"(", RowBox[{"\[Psi]", "/.", RowBox[{"x", "\[Rule]", RowBox[{"hx", "/", "2"}]}]}], ")"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Psi]"}], "/.", RowBox[{"x", "\[Rule]", RowBox[{"hx", "/", "2"}]}]}], ")"}], "*", RowBox[{"(", RowBox[{"x", "-", RowBox[{"hx", "/", "2"}]}], ")"}], "*", "0"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "\[Psi]"}], "/.", RowBox[{"x", "\[Rule]", RowBox[{"hx", "/", "2"}]}]}], ")"}], "*", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"x", "-", RowBox[{"hx", "/", "2"}]}], ")"}], "^", "2"}], "/", "2"}], "*", "0"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"plane", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]\[Nu]", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]\[Nu]", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "plate", " ", "strain", " ", "and", " ", "stress", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]\[Epsilon]", "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "y"], "v"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}], "-", "\[Pi]\[Psi]y"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "u"}], "+", "\[Pi]\[Psi]x"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]\[Kappa]", "=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Theta]"}]}], ",", RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Phi]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Phi]"}], "-", RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Theta]"}]}], ",", "0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Gamma]\[Gamma]", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "w"}], "-", "\[Pi]\[Phi]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "w"}], "+", "\[Pi]\[Theta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{"tt", "*", RowBox[{"E\[Sigma]", ".", "\[Epsilon]\[Epsilon]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{ RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", RowBox[{"E\[Sigma]", ".", "\[Kappa]\[Kappa]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Q", "=", RowBox[{"tt", "*", "GG", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]\[Kappa]", "]"}], ".", "M"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Gamma]\[Gamma]", "]"}], ".", "Q"}], " ", "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Epsilon]\[Epsilon]", "]"}], ".", "F"}]}], ")"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"x", "->", RowBox[{"\[Alpha]", "*", "hx"}]}], ",", RowBox[{"y", "\[Rule]", RowBox[{"\[Beta]", "*", "hy"}]}]}], "}"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}], ")"}], "/.", RowBox[{"{", RowBox[{ RowBox[{"x", "->", RowBox[{"\[Alpha]", "*", "hx"}]}], ",", RowBox[{"y", "\[Rule]", RowBox[{"\[Beta]", "*", "hy"}]}]}], "}"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}], ",", RowBox[{"{", "\[Beta]", "}"}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]\[Kappa]", "]"}], ".", "M"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Gamma]\[Gamma]", "]"}], ".", "Q"}], " ", "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Epsilon]\[Epsilon]", "]"}], ".", "F"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"Integrate", "[", RowBox[{ RowBox[{"Integrate", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "hx"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"y", ",", "0", ",", "hy"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"GENERICPLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"MODE", ",", RowBox[{"{", RowBox[{"GENERICPLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{"tt", ",", "0", ",", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"GENERICPLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{"tt_", ",", "st_", ",", "it_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "enode", ",", "n\[Alpha]", ",", "n\[Beta]", ",", "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "NN", ",", "r0", ",", "r\[Alpha]0", ",", "r\[Beta]0", ",", "rn0", ",", "h\[Alpha]0", ",", "h\[Beta]0", ",", "hn0", ",", "i\[Alpha]0", ",", "i\[Beta]0", ",", "in0", ",", "jac", ",", "FF", ",", "FFINV", ",", "GG", ",", "PP", ",", "u0", ",", "\[Theta]0", ",", "u00", ",", "\[Theta]00", ",", "\[Omega]00", ",", "f00", ",", "m00", ",", "F", ",", "M", ",", "\[Epsilon]", ",", "\[Kappa]", ",", "II0", ",", "III", ",", "IIII", ",", "IIII1", ",", "IIII2", ",", "EEEE", ",", "AE", ",", "BE", ",", "CE", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]WW"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "nodes", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"n\[Alpha]", ",", "n\[Beta]"}], "}"}], "=", RowBox[{"Dimensions", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"enode", "=", RowBox[{"Flatten", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"Flatten", "[", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n\[Alpha]", ",", "\[Alpha]"}], "}"}], ",", RowBox[{"{", RowBox[{"n\[Beta]", ",", "\[Beta]"}], "}"}]}], "}"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"generic", " ", "basis", " ", "vectors"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]0", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Beta]0", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"rn0", "=", RowBox[{ RowBox[{"r\[Alpha]0", "\[Cross]", "r\[Beta]0"}], "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"hn0", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Norm", "[", "rn0", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"in0", "=", RowBox[{"rn0", "/", "hn0"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", "hn0"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "metric", " ", "dyad", " ", "and", " ", "permutation", " ", "symbol", " ", "of", " ", "generic", " ", "metrics"}], "*)"}], "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"r\[Alpha]0", ",", "r\[Beta]0", ",", "in0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], " ", "&&", " ", RowBox[{"h", ">", "0"}]}]}], " ", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GG", " ", "=", RowBox[{"FF", ".", RowBox[{"Transpose", "[", "FF", "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"PP", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"FF", "[", RowBox[{"[", RowBox[{"a", ",", "i"}], "]"}], "]"}], "*", RowBox[{"FF", "[", RowBox[{"[", RowBox[{"b", ",", "j"}], "]"}], "]"}], "*", RowBox[{"FFINV", "[", RowBox[{"[", RowBox[{"k", ",", "c"}], "]"}], "]"}], "*", RowBox[{ RowBox[{"LeviCivitaTensor", "[", "3", "]"}], "[", RowBox[{"[", RowBox[{"i", ",", "j", ",", "k"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"a", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacement", " ", "and", " ", "rotation"}], "*)"}], "\[IndentingNewLine]", RowBox[{"u0", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]0", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"transform", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"u00", "=", RowBox[{"u0", ".", "FFINV"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]00", "=", RowBox[{"\[Theta]0", ".", "FFINV"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Omega]00", "=", RowBox[{"in0", ".", RowBox[{"(", RowBox[{"\[Theta]00", ".", "PP"}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"f00", "=", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", RowBox[{"m00", "=", RowBox[{ RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "strain", " ", "measures", " ", "of", " ", "plate", " ", "model"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{ RowBox[{ RowBox[{"D", "[", RowBox[{"u00", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "n"}], "}"}], "}"}]}], "]"}], ".", RowBox[{"Transpose", "[", "FFINV", "]"}], ".", "FFINV"}], "+", RowBox[{"Outer", "[", RowBox[{"Times", ",", "in0", ",", "\[Omega]00"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]", "=", RowBox[{ RowBox[{"D", "[", RowBox[{"\[Omega]00", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "n"}], "}"}], "}"}]}], "]"}], ".", RowBox[{"Transpose", "[", "FFINV", "]"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "elasticity", " ", "dyad", " ", "of", " ", "isotropic", " ", "plate"}], "*)"}], "\[IndentingNewLine]", RowBox[{"II0", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"FFINV", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"FFINV", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "i", ",", "j", ",", "j", ",", "i"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "FFINV"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "FFINV"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII1", "=", RowBox[{"Outer", "[", RowBox[{"Times", ",", "II0", ",", "II0"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII2", "=", RowBox[{ RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}], "+", RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"j", ",", "i", ",", "k", ",", "l"}], "]"}], "]"}], "+", RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"i", ",", "j", ",", "l", ",", "k"}], "]"}], "]"}], "+", RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"j", ",", "i", ",", "l", ",", "k"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}]}], "]"}], "/", "4"}], "-", RowBox[{"Outer", "[", RowBox[{"Times", ",", "in0", ",", "in0", ",", "in0", ",", "in0"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "+", "\[Nu]\[Nu]"}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Nu]\[Nu]", "/", RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}]}], "*", "IIII1"}], "+", "IIII2"}], ")"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"AE", " ", "=", RowBox[{"tt", "*", "EEEE"}]}], ";", "\[IndentingNewLine]", RowBox[{"CE", "=", RowBox[{"st", "*", "EEEE"}]}], ";", "\[IndentingNewLine]", RowBox[{"BE", " ", "=", RowBox[{"it", "*", "EEEE"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "resultants"}], "*)"}], "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{"tt", "*", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "k", ",", "l"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"l", ",", "m"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"k", ",", "n"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"m", ",", "n"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"m", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"n", ",", "1", ",", "3"}], "}"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{"it", "*", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "k", ",", "l"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"l", ",", "m"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"k", ",", "n"}], "]"}], "]"}], "*", RowBox[{"\[Kappa]", "[", RowBox[{"[", RowBox[{"m", ",", "n"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"m", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"n", ",", "1", ",", "3"}], "}"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "densities"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"M", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"j", ",", "l"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"i", ",", "k"}], "]"}], "]"}], "*", RowBox[{"\[Delta]", "[", RowBox[{"\[Kappa]", "[", RowBox[{"[", RowBox[{"k", ",", "l"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}]}], "]"}]}], "-", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"F", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"j", ",", "l"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"i", ",", "k"}], "]"}], "]"}], "*", RowBox[{"\[Delta]", "[", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"k", ",", "l"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "u00", "]"}], ".", "GG", ".", "f00"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}], ",", RowBox[{"{", "\[Beta]", "}"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", "enode_", "]"}]}], "}"}]}], "]"}], ":=", RowBox[{ RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Delta]", ",", "nne", ",", "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "NN", ",", "r0", ",", "r\[Alpha]0", ",", "r\[Beta]0", ",", "rn0", ",", "h\[Alpha]0", ",", "h\[Beta]0", ",", "hn0", ",", "i\[Alpha]0", ",", "i\[Beta]0", ",", "in0", ",", "jac", ",", "FF", ",", "FFINV", ",", "GG", ",", "PP", ",", "u0", ",", "\[Theta]0", ",", "u00", ",", "\[Theta]00", ",", "\[Omega]00", ",", "f00", ",", "F", ",", "M", ",", "\[Epsilon]", ",", "\[Kappa]", ",", "II0", ",", "III", ",", "IIII", ",", "IIII1", ",", "IIII2", ",", "EEEE", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]WW"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "rule", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", "u_", "]"}], ":=", RowBox[{"u", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"a", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"\[Delta]a", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"b", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"\[Delta]b", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"c", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"\[Delta]c", "[", "any", "]"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"nne", "=", RowBox[{"Dimensions", "[", "enode", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", RowBox[{"{", "3", "}"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", RowBox[{"{", "10", "}"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"1", "/", "2"}], "*", "\[Alpha]", "*", RowBox[{"(", RowBox[{"2", "-", RowBox[{"9", "*", "\[Alpha]"}], "+", RowBox[{"9", "*", SuperscriptBox["\[Alpha]", "2"]}]}], ")"}]}], ",", RowBox[{ RowBox[{"1", "/", "2"}], "*", " ", "\[Beta]", "*", RowBox[{"(", RowBox[{"2", "-", RowBox[{"9", "*", " ", "\[Beta]"}], "+", RowBox[{"9", " ", "*", SuperscriptBox["\[Beta]", "2"]}]}], ")"}]}], ",", RowBox[{ RowBox[{"1", "/", "2"}], "*", RowBox[{"(", RowBox[{"2", "-", RowBox[{"9", " ", SuperscriptBox["\[Alpha]", "3"]}], "-", RowBox[{"11", " ", "\[Beta]"}], "+", RowBox[{"18", " ", SuperscriptBox["\[Beta]", "2"]}], "-", RowBox[{"9", " ", SuperscriptBox["\[Beta]", "3"]}], "-", RowBox[{"9", " ", "*", SuperscriptBox["\[Alpha]", "2"], "*", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"3", "*", "\[Beta]"}]}], ")"}]}], "+", RowBox[{"\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "11"}], "+", RowBox[{"36", "*", "\[Beta]"}], "-", RowBox[{"27", "*", SuperscriptBox["\[Beta]", "2"]}]}], ")"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"9", "/", "2"}], "*", " ", "\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", "*", "\[Alpha]"}]}], ")"}], "*", "\[Beta]"}], ",", RowBox[{ RowBox[{"9", "/", "2"}], "*", " ", "\[Alpha]", "*", "\[Beta]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", "*", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{ RowBox[{"-", "9"}], "/", "2"}], "*", " ", "\[Beta]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]", "+", "\[Beta]"}], ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", "*", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"9", "/", "2"}], "*", " ", "\[Beta]", "*", RowBox[{"(", RowBox[{"2", "+", RowBox[{"3", "*", SuperscriptBox["\[Alpha]", "2"]}], "-", RowBox[{"5", "*", "\[Beta]"}], "+", RowBox[{"3", "*", SuperscriptBox["\[Beta]", "2"]}], "+", RowBox[{"\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "5"}], "+", RowBox[{"6", "*", "\[Beta]"}]}], ")"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"9", "/", "2"}], "*", "\[Alpha]", "*", RowBox[{"(", RowBox[{"2", "+", RowBox[{"3", "*", SuperscriptBox["\[Alpha]", "2"]}], "-", RowBox[{"5", "*", "\[Beta]"}], "+", RowBox[{"3", "*", SuperscriptBox["\[Beta]", "2"]}], "+", RowBox[{"\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "5"}], "+", RowBox[{"6", "*", "\[Beta]"}]}], ")"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{ RowBox[{"-", "9"}], "/", "2"}], "*", " ", "\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", "*", "\[Alpha]"}]}], ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]", "+", "\[Beta]"}], ")"}]}], ",", RowBox[{ RowBox[{"-", "27"}], "*", "\[Alpha]", "*", "\[Beta]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]", "+", "\[Beta]"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"generic", " ", "basis", " ", "vectors"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{ RowBox[{"NN", "[", "nne", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]0", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Beta]0", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"rn0", "=", RowBox[{ RowBox[{"r\[Alpha]0", "\[Cross]", "r\[Beta]0"}], "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"hn0", "=", RowBox[{"Norm", "[", "rn0", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"in0", "=", RowBox[{"rn0", "/", "hn0"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", "hn0"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "metric", " ", "dyad", " ", "and", " ", "permutation", " ", "symbol", " ", "of", " ", "generic", " ", "metrics"}], "*)"}], "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"r\[Alpha]0", ",", "r\[Beta]0", ",", "in0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GG", " ", "=", RowBox[{"FF", ".", RowBox[{"Transpose", "[", "FF", "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"PP", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"FF", "[", RowBox[{"[", RowBox[{"a", ",", "i"}], "]"}], "]"}], "*", RowBox[{"FF", "[", RowBox[{"[", RowBox[{"b", ",", "j"}], "]"}], "]"}], "*", RowBox[{"FFINV", "[", RowBox[{"[", RowBox[{"k", ",", "c"}], "]"}], "]"}], "*", RowBox[{ RowBox[{"LeviCivitaTensor", "[", "3", "]"}], "[", RowBox[{"[", RowBox[{"i", ",", "j", ",", "k"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"a", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"b", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacement", " ", "and", " ", "rotation"}], "*)"}], "\[IndentingNewLine]", RowBox[{"u0", "=", RowBox[{ RowBox[{"NN", "[", "nne", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]0", "=", RowBox[{ RowBox[{"NN", "[", "nne", "]"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"transform", " ", "to", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"u00", "=", RowBox[{"u0", ".", "FFINV"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]00", "=", RowBox[{"\[Theta]0", ".", "FFINV"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Omega]00", "=", RowBox[{"in0", ".", RowBox[{"(", RowBox[{"\[Theta]00", ".", "PP"}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"f00", "=", RowBox[{ RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", RowBox[{"m00", "=", RowBox[{ RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "strain", " ", "measures", " ", "of", " ", "plate", " ", "model"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{ RowBox[{ RowBox[{"D", "[", RowBox[{"u00", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "n"}], "}"}], "}"}]}], "]"}], ".", RowBox[{"Transpose", "[", "FFINV", "]"}], ".", "FFINV"}], "+", RowBox[{"Outer", "[", RowBox[{"Times", ",", "in0", ",", "\[Omega]00"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]", "=", RowBox[{ RowBox[{"D", "[", RowBox[{"\[Omega]00", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "n"}], "}"}], "}"}]}], "]"}], ".", RowBox[{"Transpose", "[", "FFINV", "]"}], ".", "FFINV"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "elasticity", " ", "dyad", " ", "of", " ", "isotropic", " ", "plate"}], "*)"}], "\[IndentingNewLine]", RowBox[{"II0", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"FFINV", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"FFINV", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "2"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "i", ",", "j", ",", "j", ",", "i"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "FFINV"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "FFINV"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII1", "=", RowBox[{"Outer", "[", RowBox[{"Times", ",", "II0", ",", "II0"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII2", "=", RowBox[{ RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}], "+", RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"j", ",", "i", ",", "k", ",", "l"}], "]"}], "]"}], "+", RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"i", ",", "j", ",", "l", ",", "k"}], "]"}], "]"}], "+", RowBox[{"IIII", "[", RowBox[{"[", RowBox[{"j", ",", "i", ",", "l", ",", "k"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}]}], "]"}], "/", "4"}], "-", RowBox[{"Outer", "[", RowBox[{"Times", ",", "in0", ",", "in0", ",", "in0", ",", "in0"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "+", "\[Nu]\[Nu]"}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Nu]\[Nu]", "/", RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}]}], "*", "IIII1"}], "+", "IIII2"}], ")"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "resultants"}], "*)"}], "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{"tt", "*", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "k", ",", "l"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"l", ",", "m"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"k", ",", "n"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"m", ",", "n"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"m", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"n", ",", "1", ",", "3"}], "}"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{ RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "k", ",", "l"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"l", ",", "m"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"k", ",", "n"}], "]"}], "]"}], "*", RowBox[{"\[Kappa]", "[", RowBox[{"[", RowBox[{"m", ",", "n"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"m", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"n", ",", "1", ",", "3"}], "}"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "density"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"M", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"j", ",", "l"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"i", ",", "k"}], "]"}], "]"}], "*", RowBox[{"\[Delta]", "[", RowBox[{"\[Kappa]", "[", RowBox[{"[", RowBox[{"k", ",", "l"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}]}], "]"}]}], "-", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"F", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"j", ",", "l"}], "]"}], "]"}], "*", RowBox[{"GG", "[", RowBox[{"[", RowBox[{"i", ",", "k"}], "]"}], "]"}], "*", RowBox[{"\[Delta]", "[", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"k", ",", "l"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"l", ",", "1", ",", "3"}], "}"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "u00", "]"}], ".", "GG", ".", "f00"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"QUAD", "[", RowBox[{"TRI28", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}]}], "]"}], "/;", " ", RowBox[{ RowBox[{"Dimensions", "[", "enode", "]"}], "\[Equal]", RowBox[{"{", "10", "}"}]}]}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{ 3.4426474258030453`*^9, {3.4444401255942*^9, 3.4444401388073997`*^9}, { 3.4444401803034*^9, 3.4444401844062*^9}, 3.4444402418922*^9, { 3.4444402805022*^9, 3.4444403134026003`*^9}, {3.4444403443062*^9, 3.4444404484049997`*^9}, {3.444483267101*^9, 3.444483267335*^9}, { 3.4444833136046*^9, 3.4444835622998*^9}, {3.4444836421094*^9, 3.4444837777981997`*^9}, {3.444483920429*^9, 3.4444839412237997`*^9}, 3.4444842905546*^9, {3.4444843207406*^9, 3.4444844162282*^9}, { 3.4444844465078*^9, 3.4444844624354*^9}, {3.4444845255998*^9, 3.4444845894505997`*^9}, {3.4444846290746*^9, 3.444484933025*^9}, { 3.4444849790917997`*^9, 3.4444851148742*^9}, {3.444534936054*^9, 3.4445349675348*^9}, {3.4445355821731997`*^9, 3.44453585174*^9}, { 3.4445372162198*^9, 3.4445372264378*^9}, 3.444537384731*^9, { 3.4445377585382*^9, 3.4445377605818*^9}, {3.4445379733658*^9, 3.4445379736934*^9}, {3.4445380176762*^9, 3.444538032777*^9}, { 3.4445381079222*^9, 3.4445381581386003`*^9}, {3.4445382726456003`*^9, 3.4445382910067997`*^9}, {3.4445383401312*^9, 3.4445383475880003`*^9}, { 3.444538438458*^9, 3.4445384464608*^9}, {3.4445385680783997`*^9, 3.4445385687648*^9}, {3.4445389411991997`*^9, 3.4445389431024*^9}, { 3.444539746605*^9, 3.4445397807846003`*^9}, {3.4445408839765997`*^9, 3.4445409234133997`*^9}, {3.4445409681698*^9, 3.4445409932702*^9}, { 3.4445415452906*^9, 3.4445415706717997`*^9}, {3.4445416647242002`*^9, 3.4445416909477997`*^9}, {3.4445417660150003`*^9, 3.444541788557*^9}, { 3.4445420906977997`*^9, 3.444542104847*^9}, {3.4445421885878*^9, 3.4445421941414003`*^9}, {3.4445422252166*^9, 3.4445422386014*^9}, { 3.444542280425*^9, 3.4445423014538*^9}, {3.444542455769*^9, 3.4445424578282003`*^9}, {3.4445431739214*^9, 3.444543175809*^9}, { 3.4445647020962*^9, 3.4445648405618*^9}, {3.4445648825414*^9, 3.4445648858486*^9}, {3.4445649382646*^9, 3.4445651882702*^9}, { 3.4446164822206*^9, 3.4446165344494*^9}, {3.4446166121842003`*^9, 3.4446166738822002`*^9}, {3.4446167223046*^9, 3.4446168047974*^9}, { 3.444616843033*^9, 3.444616906447*^9}, {3.4446444694708*^9, 3.4446444700948*^9}, {3.4446477738310003`*^9, 3.4446477939862003`*^9}, { 3.4446478467298*^9, 3.4446478681018*^9}, 3.4446480456142*^9, { 3.4446487557418003`*^9, 3.4446487636198*^9}, 3.4446488179974003`*^9, { 3.4446488971205997`*^9, 3.4446489152478*^9}, {3.4446490003458*^9, 3.4446490008294*^9}, {3.4447042728942003`*^9, 3.4447042751562*^9}, { 3.4447044703278*^9, 3.4447044865362*^9}, 3.4447046475282*^9, 3.4447047993786*^9, {3.444704908329*^9, 3.4447049292642*^9}, { 3.4447049861926003`*^9, 3.4447049877214003`*^9}, {3.4447050279296*^9, 3.4447050419695997`*^9}, {3.4447053486656*^9, 3.4447053739376*^9}, 3.4447054561963997`*^9, 3.44470561612*^9, {3.4472133996876*^9, 3.4472134108571997`*^9}, {3.4472134470179996`*^9, 3.4472134648332*^9}, { 3.4472135032872*^9, 3.4472135245344*^9}, {3.4472136963059998`*^9, 3.4472137794384003`*^9}, {3.4472138235708*^9, 3.4472138388900003`*^9}, { 3.4472139099792*^9, 3.4472141367096*^9}, {3.447214202682*^9, 3.4472142975924*^9}, {3.4472144187732*^9, 3.4472145910284*^9}, { 3.4472146560492*^9, 3.4472147023968*^9}, {3.447214803594*^9, 3.4472148728736*^9}, {3.4472149156956*^9, 3.447214940484*^9}, { 3.447216227284*^9, 3.4472162419948*^9}, {3.4472163068908*^9, 3.4472163720832*^9}, {3.4472164665880003`*^9, 3.447216530392*^9}, { 3.4472166237268*^9, 3.4472167058452*^9}, 3.4472167362808*^9, { 3.4472171394658003`*^9, 3.4472171532874002`*^9}, {3.4472172028993998`*^9, 3.4472172216661997`*^9}, {3.4472172524606*^9, 3.4472172690278*^9}, { 3.4472173209133997`*^9, 3.4472173334245996`*^9}, {3.4472173920846*^9, 3.447217404861*^9}, {3.4472179572548*^9, 3.4472180351456003`*^9}, { 3.4472509764091997`*^9, 3.4472511017396*^9}, {3.4473910422216*^9, 3.4473912901524*^9}, 3.4473918688344*^9, {3.447392021185*^9, 3.4473920346633997`*^9}, {3.4473921383304*^9, 3.4473921479088*^9}, { 3.4473923024112*^9, 3.4473923734379997`*^9}, {3.4473928098168*^9, 3.4473928648691998`*^9}, {3.4473931872432003`*^9, 3.4473932461800003`*^9}, {3.4473933026675997`*^9, 3.4473934579812*^9}, { 3.4473935755271997`*^9, 3.447393742572*^9}, {3.4473939032676*^9, 3.4473939384144*^9}, {3.447395257644*^9, 3.4473953141628*^9}, { 3.4473954231132*^9, 3.4473954756384*^9}, {3.4473955348716*^9, 3.4473955723272*^9}, {3.447395648502*^9, 3.4473957588876*^9}, { 3.4473957903996*^9, 3.4473958488372*^9}, 3.4473962894154*^9, { 3.447396350817*^9, 3.447396352611*^9}, {3.4474625379146*^9, 3.4474625637326*^9}, {3.558360651728078*^9, 3.558360652102478*^9}, { 3.5619791319820857`*^9, 3.561979135788492*^9}, 3.561979369382504*^9, { 3.5619794930439215`*^9, 3.5619795010155354`*^9}, {3.561979569218855*^9, 3.56197960614412*^9}, {3.5619797417551584`*^9, 3.5619797448751636`*^9}, { 3.618719065033702*^9, 3.618719075426296*^9}, {3.6187194011669273`*^9, 3.6187194449454317`*^9}, {3.6187196998040085`*^9, 3.6187197102436056`*^9}, {3.618719902254588*^9, 3.6187199711455283`*^9}, { 3.618722365406472*^9, 3.6187225412555304`*^9}, {3.6187226885009522`*^9, 3.6187227109872384`*^9}, {3.618722756922866*^9, 3.6187231317203026`*^9}, { 3.618723424250035*^9, 3.6187234267291765`*^9}, {3.6187235105259695`*^9, 3.6187236491028957`*^9}, {3.618723691580325*^9, 3.618723745975436*^9}, { 3.618723778837316*^9, 3.6187238310002995`*^9}, {3.6187239055875654`*^9, 3.618723940035536*^9}, {3.6187239782667227`*^9, 3.6187240219352207`*^9}, { 3.618724166762504*^9, 3.618724177411113*^9}, {3.618729321696159*^9, 3.618729328067523*^9}, 3.618729374058154*^9, {3.6187294379838104`*^9, 3.618729708464281*^9}, {3.6187297631904106`*^9, 3.618729773195983*^9}, { 3.618729822648812*^9, 3.6187299321490746`*^9}, {3.618729984399063*^9, 3.61873000654133*^9}, {3.6187300746012225`*^9, 3.6187300860458775`*^9}, { 3.618731390835507*^9, 3.6187315116174154`*^9}, {3.618731747324897*^9, 3.6187318214091344`*^9}, {3.6187318769243097`*^9, 3.618732065297084*^9}, { 3.6187321012351394`*^9, 3.618732157420353*^9}, {3.618732188384124*^9, 3.6187322435542793`*^9}, {3.6187322786112847`*^9, 3.6187325478446836`*^9}, {3.6187325819856367`*^9, 3.6187326817653437`*^9}, {3.618732810863728*^9, 3.61873282594359*^9}, { 3.6187336474335766`*^9, 3.618733754678711*^9}, {3.618733827497876*^9, 3.61873396201257*^9}, {3.6187342020362988`*^9, 3.618734236455267*^9}, 3.618734298201799*^9, {3.618734712498495*^9, 3.618734712716508*^9}, 3.6187347739640107`*^9, {3.618738817361748*^9, 3.6187388333816643`*^9}, { 3.6187391349349127`*^9, 3.6187391457955337`*^9}, {3.618739376900752*^9, 3.618739397023903*^9}, {3.618739528394417*^9, 3.618739534809784*^9}, { 3.618739972366811*^9, 3.61873997340687*^9}, {3.6187400416617737`*^9, 3.618740043022852*^9}, {3.6187400971579485`*^9, 3.618740107902563*^9}, { 3.6187401713671927`*^9, 3.6187401723312483`*^9}, {3.6187402613443394`*^9, 3.618740268819767*^9}, {3.6187403697625403`*^9, 3.6187404057615995`*^9}, { 3.618740488277319*^9, 3.618740516244919*^9}, {3.618740647782442*^9, 3.6187406551668644`*^9}, 3.6187407823021364`*^9, {3.6187418050786357`*^9, 3.618741805749674*^9}, {3.6187418557605343`*^9, 3.6187419895921893`*^9}, { 3.618742022944097*^9, 3.61874204379729*^9}, {3.6187420836395683`*^9, 3.618742103384698*^9}, {3.620462440882641*^9, 3.6204624460519366`*^9}, { 3.6204624990259666`*^9, 3.620462576450395*^9}, {3.620463682857678*^9, 3.620463713336421*^9}, 3.6204637901188126`*^9, {3.620464238835478*^9, 3.62046424411378*^9}, 3.628912429385081*^9, {3.6289135207155013`*^9, 3.6289135210805225`*^9}, 3.6289497746958513`*^9, 3.6289498371774254`*^9, { 3.62894988410911*^9, 3.6289500319795675`*^9}, {3.6289501333883677`*^9, 3.628950183744248*^9}, {3.6289503323017445`*^9, 3.628950390181055*^9}, { 3.6289505050536256`*^9, 3.6289505113579865`*^9}, {3.62895070863527*^9, 3.6289507095043197`*^9}, {3.628951013180689*^9, 3.62895101407374*^9}, { 3.629190743153632*^9, 3.629190816645361*^9}, {3.6291909709608326`*^9, 3.629190981678051*^9}, {3.629191034624544*^9, 3.6291910410049553`*^9}, { 3.6293846391370816`*^9, 3.629384641102685*^9}, {3.6294628543371735`*^9, 3.629462867097191*^9}, {3.629468063172048*^9, 3.6294681151669397`*^9}, { 3.6295205836757097`*^9, 3.6295206295085897`*^9}, {3.6295206788826766`*^9, 3.6295207067911253`*^9}, {3.6295207408927855`*^9, 3.629520753700408*^9}, { 3.629521020590745*^9, 3.6295210354395943`*^9}, {3.6295211107369013`*^9, 3.62952114882508*^9}, {3.6295212327348795`*^9, 3.6295212477237363`*^9}, { 3.6295213424816394`*^9, 3.629521343230441*^9}, {3.6295215363119802`*^9, 3.6295216753550243`*^9}, {3.629521922272258*^9, 3.6295219939855833`*^9}, { 3.6295220298188467`*^9, 3.629522446058778*^9}, {3.629522499348471*^9, 3.629522604352256*^9}, {3.629522755188921*^9, 3.62952288580795*^9}, { 3.629522918084407*^9, 3.6295233421087513`*^9}, {3.6295233808436193`*^9, 3.629523390936837*^9}, {3.629523424274096*^9, 3.6295234533369465`*^9}, { 3.6295235190130625`*^9, 3.629523521680667*^9}, 3.6295235894315863`*^9, { 3.6295237270706277`*^9, 3.629523799454755*^9}, {3.6295238514808464`*^9, 3.629523883460902*^9}, {3.6295239376085978`*^9, 3.6295239442386093`*^9}, { 3.6295241089904985`*^9, 3.629524177537019*^9}, 3.629524211888279*^9, { 3.629524277423994*^9, 3.629524396904604*^9}, {3.6295244794839497`*^9, 3.6295246248450055`*^9}, 3.629524657090262*^9, {3.6295259599109507`*^9, 3.629526013465844*^9}, {3.6295261092188125`*^9, 3.629526201414974*^9}, 3.6295263436092243`*^9, {3.6295263910333076`*^9, 3.629526583303645*^9}, { 3.629526616672104*^9, 3.629526647653758*^9}, {3.629526687558628*^9, 3.629526744888729*^9}, {3.629526804075233*^9, 3.6295268598453307`*^9}, { 3.6295269393898706`*^9, 3.6295269586559043`*^9}, {3.6295271490074387`*^9, 3.6295272149019547`*^9}, {3.6295272553684254`*^9, 3.6295272827620735`*^9}, {3.6295274137087035`*^9, 3.6295274761244135`*^9}, {3.6295275252801*^9, 3.6295279912529182`*^9}, { 3.6295281572216096`*^9, 3.629528160435215*^9}, {3.6295282905550437`*^9, 3.6295284308616905`*^9}, 3.6295285402022824`*^9, {3.629528582088356*^9, 3.629528616798417*^9}, {3.6295287666834803`*^9, 3.6295290316343455`*^9}, { 3.629529086515242*^9, 3.629529118432898*^9}, {3.6295291548121614`*^9, 3.629529292794404*^9}, {3.6295293426208916`*^9, 3.6295293491261034`*^9}, { 3.629529420699029*^9, 3.629529571535694*^9}, {3.6295296539506383`*^9, 3.629529656103442*^9}, {3.6295296894407005`*^9, 3.629529692295506*^9}, { 3.6295297445555973`*^9, 3.629529766426836*^9}, {3.6295298053333044`*^9, 3.6295298209489317`*^9}, {3.6295308380551186`*^9, 3.6295308386635194`*^9}, {3.629532377840223*^9, 3.6295323811630287`*^9}, { 3.629532480020402*^9, 3.629532482454006*^9}, {3.629532520720874*^9, 3.629532564619351*^9}, {3.62953259842461*^9, 3.6295326002654133`*^9}, { 3.6295326327758703`*^9, 3.6295326715107384`*^9}, {3.629532742428463*^9, 3.6295328288058147`*^9}, {3.6295329692184625`*^9, 3.6295330530062094`*^9}, {3.6295331824396367`*^9, 3.629533193562456*^9}, 3.6295350321720915`*^9, 3.629535158485513*^9, {3.629535245471266*^9, 3.6295352687465067`*^9}, {3.62953541293756*^9, 3.629535446384019*^9}, { 3.6295355043381205`*^9, 3.6295355262249594`*^9}, {3.629543790136781*^9, 3.629543791181983*^9}, {3.629543871350524*^9, 3.629544001673153*^9}, { 3.6295446682009234`*^9, 3.629544668466124*^9}, {3.6296010216162376`*^9, 3.6296010236442413`*^9}, {3.629601079336339*^9, 3.6296010902875586`*^9}, 3.6296011425476503`*^9, {3.6296043522397404`*^9, 3.629604399031022*^9}, { 3.629623884428093*^9, 3.629623914723346*^9}, {3.6296239662190366`*^9, 3.6296239738006496`*^9}, {3.6296240514731865`*^9, 3.6296240920176573`*^9}, {3.629624125947717*^9, 3.629624369432945*^9}, { 3.6296256512247963`*^9, 3.6296256817072496`*^9}, {3.6296260472626915`*^9, 3.629626047434292*^9}, {3.629628055568204*^9, 3.629628056098605*^9}, { 3.6296280911206665`*^9, 3.6296281088266973`*^9}, {3.6296281406819534`*^9, 3.629628273032586*^9}, {3.629628378831972*^9, 3.6296283814995766`*^9}, { 3.629628459562114*^9, 3.629628466379326*^9}, {3.629628519419419*^9, 3.6296285390754533`*^9}, {3.629633008133008*^9, 3.629633008835009*^9}, { 3.6296337764967575`*^9, 3.6296338344040594`*^9}, {3.6296342997684765`*^9, 3.629634432150309*^9}, {3.629634494035618*^9, 3.6296345320060844`*^9}, { 3.629634594499794*^9, 3.629634812182576*^9}, {3.6296348599810605`*^9, 3.6296348746918864`*^9}, {3.6296349071867433`*^9, 3.629635023172947*^9}, 3.6296350995818815`*^9, {3.6296363797201295`*^9, 3.6296363868961425`*^9}, { 3.629636462025874*^9, 3.6296364833355117`*^9}, {3.629636555922439*^9, 3.62963656780966*^9}, {3.629636770469616*^9, 3.629636774151222*^9}, { 3.6296369192782774`*^9, 3.6296369318830996`*^9}, {3.629637058539722*^9, 3.6296370719401455`*^9}, {3.629637278172508*^9, 3.629637286814923*^9}, { 3.6296376418091464`*^9, 3.629637662385583*^9}, {3.629637773551378*^9, 3.629637795360216*^9}, {3.6296390041751394`*^9, 3.629639039571602*^9}, 3.6296393829750047`*^9, {3.6296395546065063`*^9, 3.6296395649961243`*^9}, { 3.62964113386068*^9, 3.6296412507048855`*^9}, {3.629641303167777*^9, 3.629641313744596*^9}, {3.6296416285116315`*^9, 3.629641628886032*^9}, { 3.6296416658736973`*^9, 3.6296416815049243`*^9}, 3.6296417376338234`*^9, { 3.6296855551269727`*^9, 3.6296855804270077`*^9}, {3.6297079065796247`*^9, 3.6297079070476255`*^9}, {3.6297080850439377`*^9, 3.629708135728427*^9}, { 3.6297083496516027`*^9, 3.6297084025512953`*^9}, {3.629708781767563*^9, 3.629708790940379*^9}, {3.6297089402482414`*^9, 3.6297089618542795`*^9}, { 3.6297105345398417`*^9, 3.629710538580249*^9}, {3.6297107810514746`*^9, 3.6297107850138817`*^9}, {3.6297109100481014`*^9, 3.629710915710911*^9}, { 3.629711201534613*^9, 3.629711204311418*^9}, {3.629711236307074*^9, 3.6297115007275386`*^9}, {3.6297115377464037`*^9, 3.6297115441112146`*^9}, 3.6297116025645175`*^9, {3.6298716505389357`*^9, 3.629871851841689*^9}, { 3.62987837458679*^9, 3.629878383510006*^9}, {3.6298784402629056`*^9, 3.629878447345318*^9}, {3.6298785221786494`*^9, 3.6298786580236883`*^9}, { 3.629878689613744*^9, 3.629878737147027*^9}, 3.629878783853509*^9, { 3.629878832322794*^9, 3.6298789171723433`*^9}, {3.6298802128122005`*^9, 3.6298802929723125`*^9}, 3.6298813644148126`*^9, {3.629882428887303*^9, 3.629882435887313*^9}, {3.6298986251827383`*^9, 3.6298988530367384`*^9}, { 3.6298989036744275`*^9, 3.6298989486493063`*^9}, {3.629899016868226*^9, 3.6298991622448816`*^9}, {3.6298997154530535`*^9, 3.629899740147897*^9}, { 3.6298998248560457`*^9, 3.629899978048314*^9}, {3.6299000396372223`*^9, 3.6299001557638264`*^9}, {3.6299001966826982`*^9, 3.6299002595352087`*^9}, 3.6299005011236343`*^9, {3.6299005468317146`*^9, 3.629900567642151*^9}, { 3.629900887676713*^9, 3.629900990153293*^9}, {3.6299011689220085`*^9, 3.6299012295125146`*^9}, {3.6299013754039707`*^9, 3.6299014166036434`*^9}, 3.6299014589733176`*^9, {3.6299015096734066`*^9, 3.629901588765546*^9}, { 3.629901662569275*^9, 3.6299016974665365`*^9}, {3.629901952339784*^9, 3.6299019599057975`*^9}, 3.6299020306051216`*^9, {3.6299022330934772`*^9, 3.6299022682559395`*^9}, {3.6299023020455985`*^9, 3.629902332808852*^9}, { 3.6299024532566643`*^9, 3.629902462850681*^9}, {3.629949880225117*^9, 3.6299498807867184`*^9}, {3.6299503101150723`*^9, 3.6299503156998825`*^9}, {3.629950355058751*^9, 3.629950498937804*^9}, { 3.6299555415202007`*^9, 3.6299555507086167`*^9}, {3.6299556061667137`*^9, 3.6299557553497763`*^9}, {3.629955788499834*^9, 3.6299558948608212`*^9}, { 3.629956042764681*^9, 3.629956043809883*^9}, {3.6299560914211664`*^9, 3.6299561017327843`*^9}, 3.629956145849662*^9, {3.6299584813821354`*^9, 3.6299585082765827`*^9}, 3.6299585652946825`*^9, {3.629958616587573*^9, 3.6299586356508064`*^9}, {3.629958715073346*^9, 3.6299588186419287`*^9}, { 3.629958857454797*^9, 3.629958927249319*^9}, {3.629959427994599*^9, 3.629959494669116*^9}, {3.6299595293323765`*^9, 3.6299596037913074`*^9}, { 3.62995966795422*^9, 3.62995967360143*^9}, {3.6299597835972233`*^9, 3.6299597841120243`*^9}, {3.629959826622099*^9, 3.629959862533362*^9}, { 3.6299599051682367`*^9, 3.6299599235918694`*^9}, 3.629959979939168*^9, { 3.6299601345354395`*^9, 3.62996014612626*^9}, 3.6299601769831142`*^9, { 3.629960253142448*^9, 3.629960269538077*^9}, {3.6299603041701374`*^9, 3.6299603078205442`*^9}, {3.6299604300467587`*^9, 3.629960435491168*^9}, { 3.6299605300585346`*^9, 3.6299605636609936`*^9}, {3.6299606195870914`*^9, 3.6299606581971593`*^9}, {3.629960824228251*^9, 3.6299608755367413`*^9}, { 3.629960906658796*^9, 3.6299609978409557`*^9}, {3.6299610312250147`*^9, 3.629961070646284*^9}, {3.629961135698398*^9, 3.6299611643088484`*^9}, { 3.6299720458358483`*^9, 3.6299721791536827`*^9}, {3.6299722439717965`*^9, 3.629972300007095*^9}, {3.6299723670872126`*^9, 3.6299723937008595`*^9}, { 3.629972457801372*^9, 3.6299724710613956`*^9}, {3.629972740193068*^9, 3.6299728251196175`*^9}, {3.6299729203577843`*^9, 3.6299729350218105`*^9}, {3.6299729720874753`*^9, 3.6299730462188053`*^9}, {3.629973116044528*^9, 3.6299731230177402`*^9}, { 3.629973184310248*^9, 3.6299732090830917`*^9}, {3.629973349982539*^9, 3.6299734360166903`*^9}, 3.629973534562063*^9, {3.629973577446539*^9, 3.629973586104554*^9}, {3.6299740374133463`*^9, 3.629974083823428*^9}, { 3.6299742505565205`*^9, 3.629974337089873*^9}, {3.629974382907153*^9, 3.6299744466176653`*^9}, {3.629974589794717*^9, 3.629974590761918*^9}, { 3.629974776215044*^9, 3.6299747850134597`*^9}, {3.6299748226095257`*^9, 3.6299748237483273`*^9}, 3.6299748618435946`*^9, {3.629975198476586*^9, 3.6299752545898843`*^9}, {3.62997531475919*^9, 3.6299753175515947`*^9}, { 3.6299754601982455`*^9, 3.6299754625382495`*^9}, {3.629975592034077*^9, 3.629975592502078*^9}, {3.629983277446268*^9, 3.6299832946842985`*^9}, { 3.62998342081052*^9, 3.6299835439883366`*^9}, {3.629983615514462*^9, 3.629983931009416*^9}, {3.6299919807040443`*^9, 3.6299919808912444`*^9}, { 3.629992028330928*^9, 3.6299920922130404`*^9}, 3.629992198480427*^9, { 3.6299922299300823`*^9, 3.629992250506518*^9}, {3.629992292657792*^9, 3.6299923603151107`*^9}, {3.6299924387676487`*^9, 3.6299924398440504`*^9}, {3.6299925764846907`*^9, 3.6299926096347485`*^9}, {3.6299928122323046`*^9, 3.629992818768716*^9}, { 3.6299929049120674`*^9, 3.629992905411268*^9}, {3.6299929850338078`*^9, 3.6299929866250105`*^9}, {3.6299931061992207`*^9, 3.62999312270405*^9}, { 3.629993172312137*^9, 3.6299932618718944`*^9}, {3.6299933276572104`*^9, 3.6299933842073092`*^9}, {3.630287775665962*^9, 3.630287795852398*^9}, { 3.6303896387100534`*^9, 3.630389666774503*^9}, {3.6303896967889557`*^9, 3.6303897095341783`*^9}, {3.6303897587054644`*^9, 3.630389880448078*^9}, { 3.6303899127557354`*^9, 3.630390009444705*^9}, 3.630390057321189*^9, 3.630390443484267*^9, {3.63039095720877*^9, 3.6303909789240074`*^9}, { 3.6303910572205453`*^9, 3.6303911291054716`*^9}, {3.630391163035531*^9, 3.6303911740803504`*^9}, {3.630391240224467*^9, 3.6303912875081496`*^9}, { 3.6303913396902413`*^9, 3.630391404570755*^9}, {3.630391479513287*^9, 3.6303917572873745`*^9}, {3.630391868905571*^9, 3.6303920027226057`*^9}, { 3.630392064327114*^9, 3.630392219843787*^9}, {3.63039226121506*^9, 3.63039232943398*^9}, {3.6303924315985594`*^9, 3.6303924441097813`*^9}, { 3.6303926866122074`*^9, 3.6303927118530517`*^9}, {3.630392795671999*^9, 3.6303928006172075`*^9}, {3.6303986032190485`*^9, 3.6303986046230516`*^9}, {3.6303986654631586`*^9, 3.6303987936485834`*^9}, {3.63039889979117*^9, 3.6303989091199865`*^9}, { 3.630399006323757*^9, 3.630399007259759*^9}, {3.630399117224352*^9, 3.630399214771323*^9}, {3.6303992555185947`*^9, 3.6303993036758795`*^9}, { 3.630399467725767*^9, 3.630399502731636*^9}, {3.6303995748037624`*^9, 3.630399595614199*^9}, {3.6303996329294643`*^9, 3.630399658076709*^9}, { 3.630399711335202*^9, 3.6303997453120623`*^9}, {3.6303998546994543`*^9, 3.6303999880484886`*^9}, {3.6304000742074394`*^9, 3.630400123441126*^9}, { 3.6304001724564123`*^9, 3.630400251595351*^9}, {3.630400324166679*^9, 3.630400327052684*^9}, {3.630400358190338*^9, 3.6304003597503414`*^9}, { 3.6304004587481155`*^9, 3.6304004640521245`*^9}, {3.630400521975026*^9, 3.630400526124634*^9}, {3.630400567199506*^9, 3.630400593516752*^9}, { 3.6304012340070767`*^9, 3.6304013035207987`*^9}, {3.6304013614749007`*^9, 3.630401367933312*^9}, {3.630401686939398*^9, 3.6304017294598303`*^9}, { 3.630401794020523*^9, 3.6304018922061386`*^9}, {3.6304019687775183`*^9, 3.630401987153569*^9}, {3.630402072749465*^9, 3.63040208297405*^9}, { 3.6304022247881613`*^9, 3.630402255931943*^9}, 3.630402329306139*^9, { 3.6304023806970787`*^9, 3.6304024212403975`*^9}, {3.6304025002259154`*^9, 3.630402528595538*^9}, {3.6304025620694523`*^9, 3.630402575015193*^9}, { 3.6304026411829777`*^9, 3.630402649073429*^9}, {3.630402695548087*^9, 3.6304027128260756`*^9}, {3.630402783923142*^9, 3.6304027982389607`*^9}, { 3.6304028797236214`*^9, 3.6304030111811404`*^9}, {3.6304030562107162`*^9, 3.6304031598846455`*^9}, {3.630403236330018*^9, 3.6304032404072514`*^9}, { 3.630403373001835*^9, 3.6304033888147397`*^9}, {3.6304039420953856`*^9, 3.6304039512829113`*^9}, 3.6304039831437335`*^9, {3.630404015975611*^9, 3.6304040663624935`*^9}, {3.630404173614628*^9, 3.630404246945822*^9}, { 3.6304042891772375`*^9, 3.630404299595834*^9}, {3.630404391083066*^9, 3.630404392406142*^9}, {3.6304045301800222`*^9, 3.6304045579486103`*^9}, { 3.630404640215316*^9, 3.630404762796327*^9}, {3.630404877629895*^9, 3.630404883104208*^9}, {3.6304050364729805`*^9, 3.630405098270515*^9}, { 3.6304051736118245`*^9, 3.6304051965901384`*^9}, {3.6304053802536435`*^9, 3.63040539242334*^9}, {3.630406035965148*^9, 3.630406041998493*^9}, { 3.630406072049212*^9, 3.6304060962065935`*^9}, {3.630406264081196*^9, 3.6304062707025747`*^9}, {3.63040632219952*^9, 3.630406385461138*^9}, { 3.630406477200385*^9, 3.630406482095665*^9}, {3.6304066170883865`*^9, 3.6304066222256804`*^9}, {3.630406957868878*^9, 3.630406973411767*^9}, { 3.6304070081447535`*^9, 3.630407018199329*^9}, {3.630407411376817*^9, 3.630407412542884*^9}, {3.6304080609339695`*^9, 3.630408121202417*^9}, { 3.6304081585485525`*^9, 3.6304081832129636`*^9}, {3.63040821409673*^9, 3.630408421131572*^9}, 3.6304934333363276`*^9, {3.63049350751357*^9, 3.630493677593298*^9}, {3.630493716898546*^9, 3.6304937846684227`*^9}, 3.630493922944331*^9, {3.6304939556752033`*^9, 3.630494117430455*^9}, { 3.6304941486092386`*^9, 3.6304941767788496`*^9}, {3.6304942118648567`*^9, 3.6304942530272107`*^9}, {3.6304942838399734`*^9, 3.6304942845820155`*^9}, {3.6304943454054947`*^9, 3.6304944442451477`*^9}, {3.63080749995092*^9, 3.6308075480801234`*^9}, { 3.630807586536323*^9, 3.630807621440319*^9}, {3.630807680459695*^9, 3.630807682914836*^9}, {3.630807736889923*^9, 3.6308077644745007`*^9}, { 3.6308078081089964`*^9, 3.6308078670123653`*^9}, {3.630807991648494*^9, 3.630807997541831*^9}, {3.6308081080891542`*^9, 3.6308081919599514`*^9}, { 3.630808306368495*^9, 3.630808345060708*^9}, {3.6308087281906223`*^9, 3.6308087555171847`*^9}, {3.630809110815507*^9, 3.630809169033837*^9}, { 3.6308091998195972`*^9, 3.630809448512822*^9}, {3.6308095328996487`*^9, 3.6308095448223305`*^9}, {3.630809582269472*^9, 3.6308095873607635`*^9}, { 3.630809665529235*^9, 3.630809684808337*^9}, {3.6308316258485594`*^9, 3.6308318380886984`*^9}, {3.63083188164919*^9, 3.630831966930068*^9}, 3.6320400558356075`*^9, {3.6354749882908883`*^9, 3.635474989418953*^9}, { 3.635475084557395*^9, 3.6354750875145636`*^9}, {3.6354751334091887`*^9, 3.635475162315842*^9}, {3.6354754001974483`*^9, 3.6354754820331287`*^9}, 3.635475512931896*^9, {3.6354756222781506`*^9, 3.635475622861184*^9}, { 3.635475691642118*^9, 3.6354757057969275`*^9}, {3.6354757798291616`*^9, 3.635475797395167*^9}, {3.635475884848169*^9, 3.6354758981309285`*^9}, { 3.635475961488552*^9, 3.6354759738382587`*^9}, {3.6354760213729773`*^9, 3.6354760572050266`*^9}, {3.6354761282470903`*^9, 3.635476136040536*^9}, { 3.6354761719365892`*^9, 3.635476212217893*^9}, {3.6593346599546614`*^9, 3.659334660890663*^9}, {3.6593347077219453`*^9, 3.659334720701168*^9}, { 3.6593348752974396`*^9, 3.6593348758122406`*^9}, {3.6593349140947075`*^9, 3.6593350070240707`*^9}, {3.6593350466949406`*^9, 3.6593350543701544`*^9}, {3.659335103791041*^9, 3.6593351614487424`*^9}, 3.659335217686841*^9, {3.659335262084519*^9, 3.6593352995869846`*^9}, { 3.6593356899482727`*^9, 3.659335701819893*^9}, {3.659335964227954*^9, 3.659335964602355*^9}, {3.65933603594128*^9, 3.6593360629605274`*^9}, { 3.6593361352354546`*^9, 3.6593361504454813`*^9}, {3.6593363929479074`*^9, 3.6593364061611304`*^9}, 3.6593368946915884`*^9, {3.6884748265656157`*^9, 3.6884748268716326`*^9}, {3.6884748600075283`*^9, 3.688474861420609*^9}, { 3.6885242858240776`*^9, 3.6885243001140976`*^9}, {3.6888842911675606`*^9, 3.6888843311676164`*^9}, {3.688966242423658*^9, 3.688966263933688*^9}, { 3.6897393587897596`*^9, 3.6897393649897685`*^9}, 3.689739477049925*^9, { 3.6898595970621734`*^9, 3.689859597272174*^9}, {3.6898596707522764`*^9, 3.6898597190523443`*^9}, {3.689859768552414*^9, 3.6898597721424184`*^9}, { 3.689859855272535*^9, 3.689859859882541*^9}, {3.6898605078334484`*^9, 3.6898607266237545`*^9}, 3.6898608811139708`*^9, {3.6898609634740863`*^9, 3.689860974304102*^9}, 3.6898610140141573`*^9, {3.6898611496043468`*^9, 3.6898611683243732`*^9}, {3.689861462024784*^9, 3.6898615624849253`*^9}, { 3.6898616142149973`*^9, 3.6898616164350004`*^9}, 3.6898616657950697`*^9, { 3.689861716805141*^9, 3.689861749905187*^9}, {3.732677920575506*^9, 3.7326779208190203`*^9}, {3.7519672427004185`*^9, 3.7519672444968877`*^9}, {3.7519674022097683`*^9, 3.75196742976579*^9}, { 3.751967484127989*^9, 3.751967510853814*^9}, {3.7519675409404893`*^9, 3.751967541549782*^9}, {3.7519675797751045`*^9, 3.751967592209671*^9}, { 3.7519676829383273`*^9, 3.7519676841255474`*^9}, {3.7519677154775553`*^9, 3.7519677953499403`*^9}, 3.751967827811061*^9, {3.7519679545625095`*^9, 3.751967957999185*^9}, {3.751968003754015*^9, 3.7519681477513895`*^9}, { 3.751968264817631*^9, 3.751968270722477*^9}, {3.7519689618119907`*^9, 3.751968969888235*^9}, {3.7519691168917775`*^9, 3.7519691395895615`*^9}, { 3.751969242782174*^9, 3.7519692581691785`*^9}, {3.7519693625211954`*^9, 3.751969378579924*^9}, {3.751969409572627*^9, 3.751969438643936*^9}, { 3.7519695894526725`*^9, 3.751969614306203*^9}, {3.7523200108586655`*^9, 3.752320012354121*^9}, {3.7553831315619707`*^9, 3.755383134119626*^9}, { 3.7553831893197794`*^9, 3.755383241814331*^9}, {3.7553832736267967`*^9, 3.7553832810757113`*^9}, {3.7554336536222963`*^9, 3.755433684797229*^9}, { 3.7554337764737434`*^9, 3.7554338315300155`*^9}, {3.755433998047738*^9, 3.7554340265485487`*^9}, {3.755446573138784*^9, 3.755446636911299*^9}, { 3.75544667493072*^9, 3.755446753435521*^9}, {3.755446891541581*^9, 3.7554468921547422`*^9}, {3.7554469323588533`*^9, 3.755446936867403*^9}, { 3.7554470190332975`*^9, 3.7554472776872244`*^9}, {3.7555217323692026`*^9, 3.755521732847602*^9}, {3.755521767127169*^9, 3.7555217972041793`*^9}, { 3.755522561453134*^9, 3.755522564231819*^9}, {3.755522601885935*^9, 3.7555226037287407`*^9}, {3.7555226758687305`*^9, 3.755522678585092*^9}, { 3.7555234832604623`*^9, 3.7555235920444417`*^9}, {3.7555239506007543`*^9, 3.755524013893358*^9}, {3.755524076791689*^9, 3.7555240812793446`*^9}, { 3.7555241238138275`*^9, 3.7555241268985643`*^9}, {3.7555242930449886`*^9, 3.7555243378577013`*^9}, {3.7555256673767824`*^9, 3.7555256808205338`*^9}, {3.7555258588384123`*^9, 3.755525900317296*^9}, { 3.755525930708299*^9, 3.7555260436531134`*^9}, {3.755607147401991*^9, 3.7556071504143705`*^9}, {3.755607992884314*^9, 3.7556080025382996`*^9}, { 3.7556094344057455`*^9, 3.7556094348690443`*^9}, {3.7559613653116636`*^9, 3.755961445097105*^9}, 3.755961484246889*^9, {3.7559618979231987`*^9, 3.755961939470047*^9}, {3.7559620323724904`*^9, 3.7559620330864005`*^9}, { 3.755962155557907*^9, 3.7559621601593847`*^9}, {3.755962303755834*^9, 3.755962343830135*^9}, {3.7559624058018165`*^9, 3.7559624450501757`*^9}, 3.756002186674869*^9, 3.7560029626855392`*^9, {3.756003222110388*^9, 3.756003295034633*^9}, {3.7560056331492863`*^9, 3.7560056663855457`*^9}, { 3.7560057813555765`*^9, 3.7560057863836613`*^9}, {3.7560058917172394`*^9, 3.756005927847292*^9}, 3.756006092376186*^9, 3.756009112317705*^9, { 3.756091886039587*^9, 3.756091887764086*^9}, {3.756092005435152*^9, 3.7560920727337685`*^9}, {3.75609212911592*^9, 3.7560921293252516`*^9}, { 3.756092262958163*^9, 3.756092263157668*^9}, {3.756092342487877*^9, 3.756092347894502*^9}, {3.7560929036769304`*^9, 3.7560929278911004`*^9}, { 3.7560930741522417`*^9, 3.756093083420331*^9}, {3.7560932986236534`*^9, 3.7560933139459305`*^9}, {3.756093449985523*^9, 3.7560934874491863`*^9}, { 3.756093592694581*^9, 3.7560936019456573`*^9}, {3.756093634438078*^9, 3.756093673866626*^9}, {3.756093873069885*^9, 3.756093897964734*^9}, { 3.7560940650109406`*^9, 3.756094078056768*^9}, {3.756442536546026*^9, 3.756442607904289*^9}, {3.7564436397451363`*^9, 3.7564436403231254`*^9}, { 3.7636034984570236`*^9, 3.7636034989933815`*^9}, {3.763603551051456*^9, 3.7636035527617817`*^9}, {3.7636036049384193`*^9, 3.7636036392233057`*^9}, {3.7636036850937223`*^9, 3.763603692587598*^9}, { 3.7636037258272257`*^9, 3.7636037459031096`*^9}, {3.7636037792254367`*^9, 3.76360387572289*^9}, {3.763603971837229*^9, 3.7636040341423655`*^9}, { 3.763604066526084*^9, 3.7636040756798687`*^9}, {3.7636041452118535`*^9, 3.763604278007333*^9}, {3.763604317710966*^9, 3.7636043271387568`*^9}, { 3.7636043584877644`*^9, 3.763604415561053*^9}, {3.763604445680462*^9, 3.7636044504114943`*^9}, {3.763604615444647*^9, 3.7636048082554193`*^9}, 3.763604854904996*^9, {3.7636133594095488`*^9, 3.7636133618464766`*^9}, { 3.7636136063756704`*^9, 3.7636136315671196`*^9}, {3.7636990373827705`*^9, 3.7636990431157646`*^9}, {3.763699090332087*^9, 3.763699110952259*^9}, { 3.763699227420497*^9, 3.7636993642943506`*^9}, {3.763700085627533*^9, 3.763700088329999*^9}, {3.7637001721125274`*^9, 3.763700181422837*^9}, { 3.763700248063385*^9, 3.7637003918630466`*^9}, {3.763700591783223*^9, 3.7637006017496295`*^9}, {3.7637007583576717`*^9, 3.7637007603074865`*^9}, {3.7637137795793185`*^9, 3.7637137822587233`*^9}, {3.7637148704355187`*^9, 3.763714870624051*^9}, { 3.763727592158518*^9, 3.7637275933445053`*^9}, {3.7637276688363667`*^9, 3.7637276694756594`*^9}, 3.763803448896332*^9, {3.76380349501632*^9, 3.7638036835067654`*^9}, {3.763804829093463*^9, 3.7638048385675254`*^9}, 3.7638051033646154`*^9, 3.7638053924528885`*^9, {3.763805557684454*^9, 3.763805634255308*^9}, {3.763806843847647*^9, 3.763806847966059*^9}, { 3.763806942652097*^9, 3.7638071770752254`*^9}, {3.7638141184594107`*^9, 3.763814134133461*^9}, {3.7638146808628216`*^9, 3.7638146925645113`*^9}, { 3.7638147709278784`*^9, 3.7638147811883087`*^9}, {3.7638148155281043`*^9, 3.763814819843194*^9}, {3.7638150259647446`*^9, 3.763815028601293*^9}, { 3.7638151529595194`*^9, 3.763815155849978*^9}, {3.7638163770262136`*^9, 3.763816380851597*^9}, {3.7638164181856327`*^9, 3.7638164950537987`*^9}, 3.763816568304102*^9, {3.7638166173645625`*^9, 3.763816618808757*^9}, { 3.7638167204462805`*^9, 3.763816721012859*^9}, {3.763857602253485*^9, 3.7638579604183645`*^9}, {3.7638580038507566`*^9, 3.7638580060526443`*^9}, {3.763858082269992*^9, 3.7638581746835337`*^9}, { 3.7638582163351564`*^9, 3.7638582415275116`*^9}, {3.7638582983238*^9, 3.763858907503306*^9}, {3.763858941318697*^9, 3.763858956626134*^9}, { 3.7638602435602536`*^9, 3.763860245408451*^9}, {3.7638694636456347`*^9, 3.7638694647177277`*^9}, {3.7638708199536576`*^9, 3.763870829436488*^9}, { 3.763871287170555*^9, 3.7638712876184006`*^9}, {3.763943214376035*^9, 3.7639432984591475`*^9}, {3.763943418832348*^9, 3.7639434335508127`*^9}, { 3.76394347113767*^9, 3.7639435187320576`*^9}, {3.763943585908682*^9, 3.7639436125255404`*^9}, {3.763951722152746*^9, 3.76395172989299*^9}, { 3.7639517863423367`*^9, 3.7639519945900664`*^9}, {3.763952081515512*^9, 3.7639521530710773`*^9}, {3.763952353248129*^9, 3.763952357026309*^9}, { 3.7639524211903834`*^9, 3.7639524243979177`*^9}, {3.7639527174925117`*^9, 3.7639527180252266`*^9}, {3.7641265625745993`*^9, 3.7641265632314167`*^9}, {3.764126605555829*^9, 3.7641266075095396`*^9}, { 3.7641268313964133`*^9, 3.7641268543573804`*^9}, {3.764127044657903*^9, 3.7641270479422092`*^9}, {3.7641271442332697`*^9, 3.7641271469362774`*^9}, {3.764127227626192*^9, 3.7641272592640233`*^9}, { 3.764127335707515*^9, 3.7641273386484756`*^9}, {3.764127429843852*^9, 3.7641274364304185`*^9}, {3.7641275071859307`*^9, 3.764127516803895*^9}, 3.7641276043548007`*^9, {3.7641276925365753`*^9, 3.764127697080591*^9}, 3.764127798472331*^9, 3.764127853631323*^9, 3.764127908496078*^9, { 3.7641280050343323`*^9, 3.764128022046494*^9}, {3.764128128597419*^9, 3.764128154116727*^9}, {3.7641286864636617`*^9, 3.764128701643106*^9}, { 3.7641289910924444`*^9, 3.7641290126680794`*^9}, {3.7641290672285347`*^9, 3.7641290737798567`*^9}, {3.7641325425120363`*^9, 3.764132565390477*^9}, { 3.7641327425004654`*^9, 3.764132750040793*^9}, 3.7641327968340364`*^9, { 3.764133146776842*^9, 3.764133204874522*^9}, {3.7641333488187037`*^9, 3.7641333525577593`*^9}, {3.764413145593136*^9, 3.7644131471236105`*^9}, { 3.764413201645049*^9, 3.7644132349609704`*^9}, {3.764413325008136*^9, 3.7644133748980193`*^9}, {3.7644134113425665`*^9, 3.7644135151187*^9}, { 3.764413554409053*^9, 3.7644136160674934`*^9}, {3.76441371984758*^9, 3.764413730103909*^9}, 3.764419641962368*^9, {3.7644198522879405`*^9, 3.764419879249356*^9}, 3.764419909536559*^9, {3.764419991012162*^9, 3.764420000171088*^9}, {3.7644200798862047`*^9, 3.7644200950961914`*^9}, { 3.7644201529471693`*^9, 3.764420153715966*^9}, {3.764420210346301*^9, 3.764420255343707*^9}, {3.764420296178318*^9, 3.7644203000939393`*^9}, { 3.7644203803359275`*^9, 3.7644203931390867`*^9}, 3.7644204418727274`*^9, { 3.7647259720700207`*^9, 3.7647261047260523`*^9}, {3.7647263483375626`*^9, 3.76472635879602*^9}, 3.764726656736601*^9, {3.764727009127914*^9, 3.764727020100875*^9}, {3.7647270591828785`*^9, 3.7647270819631023`*^9}, { 3.7647272109090505`*^9, 3.764727227846332*^9}, {3.76473247809907*^9, 3.7647324813925114`*^9}, {3.7647349484962797`*^9, 3.7647349979358416`*^9}, {3.7647351097258167`*^9, 3.764735124772463*^9}, { 3.7647352810674453`*^9, 3.7647352901139917`*^9}, {3.7647353746429515`*^9, 3.764735379550926*^9}, {3.7647354596539807`*^9, 3.764735507677454*^9}, { 3.7647355546341*^9, 3.764735728811817*^9}, {3.764735837449795*^9, 3.76473584132898*^9}, {3.76473603649269*^9, 3.7647360592982664`*^9}, { 3.7647360998228803`*^9, 3.76473621551197*^9}, {3.7647362545599003`*^9, 3.764736286430997*^9}, {3.7647364592833533`*^9, 3.764736464019006*^9}, { 3.764736566167658*^9, 3.7647365918958225`*^9}, {3.764764761680134*^9, 3.7647648482473745`*^9}, 3.764764917763693*^9, {3.764764964821686*^9, 3.764765090741813*^9}, {3.7647651742140284`*^9, 3.7647652517335076`*^9}, { 3.764765341266399*^9, 3.7647653614173465`*^9}, 3.764765400284145*^9, { 3.764765691384389*^9, 3.764765708710143*^9}, 3.7647657454275875`*^9, { 3.76476578351686*^9, 3.764765871262255*^9}, {3.7647661045180917`*^9, 3.76476612822571*^9}, {3.7647661964223824`*^9, 3.764766239375331*^9}, { 3.764766330361228*^9, 3.764766338297905*^9}, {3.764767015060799*^9, 3.7647670193029037`*^9}, {3.764767076590926*^9, 3.7647671160277977`*^9}, { 3.7647671493139205`*^9, 3.7647672079236426`*^9}, {3.764767458938404*^9, 3.7647674608323865`*^9}, {3.764810938444873*^9, 3.7648109399353456`*^9}, { 3.7648118616019874`*^9, 3.7648118695079126`*^9}, {3.7648120589477816`*^9, 3.7648124600413237`*^9}, {3.76481250476682*^9, 3.7648125259602103`*^9}, { 3.764812601341893*^9, 3.7648126577763243`*^9}, {3.7648126944039307`*^9, 3.7648128855627623`*^9}, {3.764812924923909*^9, 3.764812926481821*^9}, { 3.764813041485982*^9, 3.764813131254232*^9}, {3.7648134679328885`*^9, 3.7648136479313235`*^9}, {3.7648136917777314`*^9, 3.764813697753367*^9}, { 3.7648137297570653`*^9, 3.764813747862262*^9}, 3.764813784221693*^9, { 3.7648138370678406`*^9, 3.7648141387969923`*^9}, {3.764814321050164*^9, 3.764814422489184*^9}, {3.764814461366684*^9, 3.7648145835728483`*^9}, { 3.764814614769511*^9, 3.7648147525825167`*^9}, {3.764815363375289*^9, 3.7648153644907384`*^9}, {3.764815451671169*^9, 3.7648154601533747`*^9}, { 3.7648175917802963`*^9, 3.7648176401910563`*^9}, {3.765885491237231*^9, 3.765885501131465*^9}, {3.766572999289345*^9, 3.7665729996020145`*^9}, { 3.7665730613126965`*^9, 3.7665730616706066`*^9}, {3.7840103262125545`*^9, 3.7840103546413517`*^9}, {3.784011309725755*^9, 3.7840113197719574`*^9}, { 3.784013374800973*^9, 3.7840133842981763`*^9}, {3.7840238533665447`*^9, 3.78402395932942*^9}, {3.784024091276659*^9, 3.784024112209529*^9}, { 3.7840242793219643`*^9, 3.784024296655184*^9}, {3.7840290670892677`*^9, 3.7840291348388853`*^9}, {3.784029222997594*^9, 3.784029542926179*^9}, { 3.784375172285057*^9, 3.784375319701829*^9}, {3.7843753678421807`*^9, 3.7843753788103914`*^9}, {3.7843754844339557`*^9, 3.784375827494117*^9}, { 3.784375862317687*^9, 3.7843759567563844`*^9}, {3.784376004941759*^9, 3.7843760080157185`*^9}, {3.784376101918992*^9, 3.7843761244332943`*^9}, { 3.784376181191763*^9, 3.7843762145091863`*^9}, {3.7843792489960337`*^9, 3.78437926273014*^9}, {3.7843793293934345`*^9, 3.784379368676588*^9}, { 3.7843796529835215`*^9, 3.7843796858862267`*^9}, {3.784450863324359*^9, 3.7844508986076546`*^9}, {3.7844510208392324`*^9, 3.784451027915551*^9}, { 3.7844511176315613`*^9, 3.7844511673791957`*^9}, {3.784451235055628*^9, 3.78445132575735*^9}, {3.784451995615477*^9, 3.7844520110330954`*^9}, { 3.7844522907551537`*^9, 3.7844523421551*^9}, {3.784700119490345*^9, 3.7847001627913013`*^9}, {3.7847004221290607`*^9, 3.7847004380767317`*^9}, 3.7847007913506136`*^9, {3.784781955129138*^9, 3.784781977787957*^9}, { 3.78488170216677*^9, 3.784881704210422*^9}, 3.784882130557441*^9, { 3.78488220347418*^9, 3.7848822064697027`*^9}, {3.784883393455822*^9, 3.784883458551924*^9}, 3.7848835306495824`*^9, {3.7848836822092113`*^9, 3.7848837303696923`*^9}, 3.7848838199009576`*^9, {3.7848842507527857`*^9, 3.7848842836585226`*^9}, 3.7848843847882996`*^9, {3.784884461405264*^9, 3.7848844645041113`*^9}, {3.784884559404122*^9, 3.7848845656634912`*^9}, { 3.7848852409944844`*^9, 3.7848852740337477`*^9}, {3.7848854548929386`*^9, 3.7848854893046365`*^9}, {3.7848856741783943`*^9, 3.784885691704702*^9}, { 3.784885809660874*^9, 3.784885811424426*^9}, {3.7848860031948376`*^9, 3.784886020570098*^9}, 3.7848861057105627`*^9, {3.7848861627726107`*^9, 3.7848862212876124`*^9}, {3.784886306497995*^9, 3.7848863509322224`*^9}, 3.784886472690192*^9, {3.7848866596243*^9, 3.784886664116289*^9}, { 3.7848866987282944`*^9, 3.7848867077911897`*^9}, {3.78488676128524*^9, 3.7848868667029366`*^9}, {3.7848869381224003`*^9, 3.7848869414281464`*^9}, {3.7848870104508753`*^9, 3.784887039889447*^9}, { 3.7848871795058794`*^9, 3.7848871976746817`*^9}, {3.7848872311446314`*^9, 3.78488724075662*^9}, 3.784887405188785*^9, {3.784887591926689*^9, 3.7848876119305134`*^9}, {3.784887676620901*^9, 3.7848876786672792`*^9}, { 3.78488771054331*^9, 3.784887714354906*^9}, {3.7848877625809546`*^9, 3.7848878103041153`*^9}, 3.7848878862881575`*^9, {3.787717235155089*^9, 3.787717269464238*^9}, {3.7877174592607603`*^9, 3.7877174674038067`*^9}, { 3.7877271032841845`*^9, 3.787727136247201*^9}, 3.787727355369296*^9, 3.7877274973278403`*^9, {3.787727855959008*^9, 3.78772792141208*^9}, 3.787728113487193*^9, {3.7877281704571557`*^9, 3.7877281735077004`*^9}, 3.7877282789827795`*^9, {3.7877286510229864`*^9, 3.787728665729192*^9}, { 3.7877287942225084`*^9, 3.787728807671986*^9}, {3.787729044867985*^9, 3.787729045536916*^9}, {3.787729589732438*^9, 3.7877296062090626`*^9}, { 3.787729794037467*^9, 3.7877297950347877`*^9}, {3.787729855548402*^9, 3.7877299039179935`*^9}, {3.7877300373241186`*^9, 3.787730068136018*^9}, { 3.7877301999859333`*^9, 3.7877302014150777`*^9}, {3.787732033225385*^9, 3.7877320471634016`*^9}, {3.787732077195259*^9, 3.7877320780358667`*^9}, 3.787732189759206*^9, {3.78773231889835*^9, 3.787732327710633*^9}, { 3.7877324857166643`*^9, 3.787732496655479*^9}, {3.7877325848303585`*^9, 3.78773258503596*^9}, {3.7877328504631166`*^9, 3.7877328625892415`*^9}, { 3.7877330254884944`*^9, 3.7877330271019044`*^9}, {3.787733136128061*^9, 3.7877331422258835`*^9}, {3.787733243513567*^9, 3.78773324558677*^9}, 3.787733310555999*^9, 3.7877334085329347`*^9, {3.7877337955932293`*^9, 3.7877337970498257`*^9}, {3.787733867727028*^9, 3.7877338687324905`*^9}, { 3.7877352224369583`*^9, 3.787735224161746*^9}, {3.787735343322833*^9, 3.787735348772827*^9}, {3.787735422704711*^9, 3.7877354268945775`*^9}, { 3.7877355100355635`*^9, 3.787735514671461*^9}, {3.7877356541994534`*^9, 3.7877356632141013`*^9}, 3.7877357913476543`*^9, 3.787736261837074*^9, { 3.7882542159043374`*^9, 3.7882542747998285`*^9}, {3.788254310967661*^9, 3.788254318430212*^9}, {3.788254585790197*^9, 3.7882545888318524`*^9}, { 3.7882547349987383`*^9, 3.788254735940298*^9}, 3.788254830063775*^9, 3.7882549155286837`*^9, {3.7882550121437798`*^9, 3.788255037735396*^9}, { 3.7882551764404287`*^9, 3.78825518352113*^9}, {3.7882552540030313`*^9, 3.788255290224329*^9}, {3.7882553843544893`*^9, 3.788255423248046*^9}, { 3.78825567982127*^9, 3.7882556852479534`*^9}, {3.7882557908576803`*^9, 3.7882558029800806`*^9}, {3.7882560240494256`*^9, 3.7882560388846164`*^9}, 3.788256102343512*^9, {3.788256161397396*^9, 3.7882561626372194`*^9}, { 3.7882562304311895`*^9, 3.78825629590362*^9}, {3.7882563614677362`*^9, 3.7882563620189795`*^9}, {3.7882564138122153`*^9, 3.7882564294158382`*^9}, {3.788256467457189*^9, 3.7882564889521217`*^9}, { 3.7882565883311844`*^9, 3.788256591497148*^9}, {3.7882568409513097`*^9, 3.7882568724526567`*^9}, {3.788256965258837*^9, 3.788256966444976*^9}, { 3.7882570073831463`*^9, 3.7882570497349973`*^9}, {3.7882570992487097`*^9, 3.788257144206352*^9}, {3.78825721252205*^9, 3.788257307277931*^9}, { 3.788257350410209*^9, 3.7882573617262745`*^9}, {3.788257424936472*^9, 3.788257434118204*^9}, {3.788276311330668*^9, 3.788276311647092*^9}, { 3.7882765465512347`*^9, 3.788276608568333*^9}, {3.7882767715851693`*^9, 3.7882768045752783`*^9}, {3.7882769342607436`*^9, 3.7882769409894867`*^9}, {3.7882770202208567`*^9, 3.7882770424485188`*^9}, {3.7882770760040703`*^9, 3.788277077341468*^9}, { 3.788277147336176*^9, 3.788277150397852*^9}, {3.7882772069909*^9, 3.7882772101572385`*^9}, {3.7882772503366175`*^9, 3.7882772773759403`*^9}, {3.7882773922958755`*^9, 3.7882773927832017`*^9}, {3.788277450684473*^9, 3.788277482126852*^9}, { 3.78827754293396*^9, 3.788277545027956*^9}, 3.7890961565048018`*^9, { 3.789096242941472*^9, 3.7890962452874937`*^9}, {3.789096286771101*^9, 3.789096287939043*^9}, {3.7890963300637918`*^9, 3.789096330454324*^9}, { 3.789096421623994*^9, 3.789096482010544*^9}, {3.789123616007924*^9, 3.789123644103528*^9}},ExpressionUUID->"d990fa64-d965-4e29-9c59-\ b5555456e043"] }, Closed]], Cell[CellGroupData[{ Cell["PLATE ELEMENT (evnt) defs", "Subsection", InitializationCell->True, CellChangeTimes->{{3.753018875511382*^9, 3.7530188786265306`*^9}, { 3.781589886623744*^9, 3.7815898932426767`*^9}, {3.7878947601549573`*^9, 3.787894760728943*^9}, 3.7878948945295725`*^9, {3.817439343565061*^9, 3.8174393448082724`*^9}, {3.817439544553817*^9, 3.8174395452236648`*^9}, { 3.817439659219601*^9, 3.8174396600345135`*^9}, 3.817439764967313*^9, 3.843182905672008*^9},ExpressionUUID->"04462f9f-e715-4713-8a04-\ a5c3d934cd66"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNT", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"PLATE", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781589928213842*^9, 3.781590052438653*^9}, { 3.7815900898176003`*^9, 3.781590109307678*^9}, {3.781590201383393*^9, 3.7815902433873234`*^9}, {3.7815905445265956`*^9, 3.781590569573782*^9}, { 3.7815906952864275`*^9, 3.781590715680611*^9}, {3.7815908323678637`*^9, 3.781590881239719*^9}, {3.7815911048122363`*^9, 3.781591119274813*^9}, { 3.817439386305109*^9, 3.8174394287787733`*^9}, {3.8174395552770724`*^9, 3.8174395603447847`*^9}, {3.8174396709099665`*^9, 3.817439676294123*^9}, { 3.8174397747716293`*^9, 3.8174397780717535`*^9}, 3.817521343573311*^9, 3.843182901255577*^9}, CellLabel-> "In[178]:=",ExpressionUUID->"0eff7b2c-7b11-4884-baf9-c3916ffec121"] }, Closed]], Cell[CellGroupData[{ Cell["PLATE ELEMENT (vibr) defs ", "Subsection", CellChangeTimes->{{3.6302475626780834`*^9, 3.6302475636452847`*^9}, { 3.6303896204112215`*^9, 3.630389621175623*^9}, {3.7658855359334097`*^9, 3.7658855563942738`*^9}, {3.7882511594490995`*^9, 3.788251160663724*^9}, { 3.7883213876221266`*^9, 3.788321388914168*^9}},ExpressionUUID->"16424e4c-b557-40ab-a156-\ 4211ca37baa7"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "EE_", ",", "GG_", ",", "\[Nu]\[Nu]_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", "fn_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Alpha]", ",", "\[Beta]", ",", "r", ",", "FF", ",", "FFINV", ",", "jac", ",", "NN", ",", "w", ",", "w0", ",", "w2", ",", "\[Phi]", ",", "\[Phi]0", ",", "\[Phi]2", ",", "\[Theta]", ",", "\[Theta]0", ",", "\[Theta]2", ",", "AA", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Theta]0", ",", "\[Pi]\[Theta]2", ",", "\[Pi]\[Phi]", ",", "\[Pi]\[Phi]0", ",", "\[Pi]\[Phi]2", ",", "wc", ",", "wc0", ",", "wc2", ",", "E\[Sigma]", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wine", ",", "\[Delta]wmap", ",", "\[Kappa]\[Kappa]", ",", "\[Gamma]\[Gamma]", ",", "MM", ",", "QQ", ",", "tri", ",", RowBox[{"mat", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "}"}]}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"mapping", " ", "for", " ", "the", " ", "geometry"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1", ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"D", "[", RowBox[{"r", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", " ", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "approximations", "*)"}], "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"(", RowBox[{"mat", ".", "NN"}], ")"}], ".", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"w", "=", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{"mat", ".", "NN"}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}], "}"}]}], ")"}]}], ";"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"w0", "=", RowBox[{"w", "/.", " ", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", " ", RowBox[{"w2", "=", RowBox[{"w", "/.", " ", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"wc", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"wc0", "=", RowBox[{"wc", "/.", " ", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", RowBox[{"wc2", "=", RowBox[{"wc", "/.", " ", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]0", "=", RowBox[{"\[Phi]", "/.", " ", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", " ", RowBox[{"\[Phi]2", "=", RowBox[{"\[Phi]", "/.", " ", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]0", "=", RowBox[{"\[Theta]", "/.", " ", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", " ", RowBox[{"\[Theta]2", "=", RowBox[{"\[Theta]", "/.", " ", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "projection", "*)"}], "\[IndentingNewLine]", RowBox[{"AA", "=", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", "jac", ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Pi]\[Phi]0", ",", "\[Pi]\[Theta]0"}], "}"}], "=", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]0", ",", "\[Theta]0"}], "}"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "/", "AA"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Pi]\[Phi]2", ",", "\[Pi]\[Theta]2"}], "}"}], "=", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]2", ",", "\[Theta]2"}], "}"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "/", "AA"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"strain", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Kappa]\[Kappa]", "=", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}]}], "}"}], ".", RowBox[{"Transpose", "[", "FFINV", "]"}], ".", RowBox[{"D", "[", RowBox[{"\[Phi]0", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}], "}"}]}], "]"}]}], "-", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}]}], "}"}], ".", RowBox[{"Transpose", "[", "FFINV", "]"}], ".", RowBox[{"D", "[", RowBox[{"\[Theta]0", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}], "}"}]}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Gamma]\[Gamma]", "=", RowBox[{ RowBox[{ RowBox[{"Transpose", "[", "FFINV", "]"}], ".", RowBox[{"D", "[", RowBox[{"w0", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}], "}"}]}], "]"}]}], "+", RowBox[{"{", RowBox[{"\[Pi]\[Theta]0", ",", RowBox[{"-", "\[Pi]\[Phi]0"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", "E\[Sigma]"}], ")"}], ".", "\[Kappa]\[Kappa]"}]}], ";", "\[IndentingNewLine]", RowBox[{"QQ", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "tt", "*", "GG", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]\[Kappa]", "]"}], ".", "MM"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Gamma]\[Gamma]", "]"}], ".", "QQ"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "w0", "]"}], "*", "fn"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wine", "=", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"\[Delta]", "[", "w0", "]"}]}], "*", "tt", "*", "\[Rho]\[Rho]", "*", "w2"}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Phi]0", "]"}], "*", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", "\[Rho]\[Rho]", "*", "\[Phi]2"}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Theta]0", "]"}], "*", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", "\[Rho]\[Rho]", "*", "\[Theta]2"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wmap", "=", RowBox[{ RowBox[{"-", "0.1"}], "*", RowBox[{"\[Delta]", "[", RowBox[{"wc0", "-", "w0"}], "]"}], "*", RowBox[{"(", RowBox[{"wc0", "-", "w0"}], ")"}], "*", RowBox[{"tt", "/", "AA"}], "*", "EE"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{"\[Delta]wine", "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "+", RowBox[{"QUAD", "[", RowBox[{"TRI1", ",", RowBox[{"\[Delta]wmap", "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.4426474258030453`*^9, {3.4444401255942*^9, 3.4444401388073997`*^9}, { 3.4444401803034*^9, 3.4444401844062*^9}, 3.4444402418922*^9, { 3.4444402805022*^9, 3.4444403134026003`*^9}, {3.4444403443062*^9, 3.4444404484049997`*^9}, {3.444483267101*^9, 3.444483267335*^9}, { 3.4444833136046*^9, 3.4444835622998*^9}, {3.4444836421094*^9, 3.4444837777981997`*^9}, {3.444483920429*^9, 3.4444839412237997`*^9}, 3.4444842905546*^9, {3.4444843207406*^9, 3.4444844162282*^9}, { 3.4444844465078*^9, 3.4444844624354*^9}, {3.4444845255998*^9, 3.4444845894505997`*^9}, {3.4444846290746*^9, 3.444484933025*^9}, { 3.4444849790917997`*^9, 3.4444851148742*^9}, {3.444534936054*^9, 3.4445349675348*^9}, {3.4445355821731997`*^9, 3.44453585174*^9}, { 3.4445372162198*^9, 3.4445372264378*^9}, 3.444537384731*^9, { 3.4445377585382*^9, 3.4445377605818*^9}, {3.4445379733658*^9, 3.4445379736934*^9}, {3.4445380176762*^9, 3.444538032777*^9}, { 3.4445381079222*^9, 3.4445381581386003`*^9}, {3.4445382726456003`*^9, 3.4445382910067997`*^9}, {3.4445383401312*^9, 3.4445383475880003`*^9}, { 3.444538438458*^9, 3.4445384464608*^9}, {3.4445385680783997`*^9, 3.4445385687648*^9}, {3.4445389411991997`*^9, 3.4445389431024*^9}, { 3.444539746605*^9, 3.4445397807846003`*^9}, {3.4445408839765997`*^9, 3.4445409234133997`*^9}, {3.4445409681698*^9, 3.4445409932702*^9}, { 3.4445415452906*^9, 3.4445415706717997`*^9}, {3.4445416647242002`*^9, 3.4445416909477997`*^9}, {3.4445417660150003`*^9, 3.444541788557*^9}, { 3.4445420906977997`*^9, 3.444542104847*^9}, {3.4445421885878*^9, 3.4445421941414003`*^9}, {3.4445422252166*^9, 3.4445422386014*^9}, { 3.444542280425*^9, 3.4445423014538*^9}, {3.444542455769*^9, 3.4445424578282003`*^9}, {3.4445431739214*^9, 3.444543175809*^9}, { 3.4445647020962*^9, 3.4445648405618*^9}, {3.4445648825414*^9, 3.4445648858486*^9}, {3.4445649382646*^9, 3.4445651882702*^9}, { 3.4446164822206*^9, 3.4446165344494*^9}, {3.4446166121842003`*^9, 3.4446166738822002`*^9}, {3.4446167223046*^9, 3.4446168047974*^9}, { 3.444616843033*^9, 3.444616906447*^9}, {3.4446444694708*^9, 3.4446444700948*^9}, {3.4446477738310003`*^9, 3.4446477939862003`*^9}, { 3.4446478467298*^9, 3.4446478681018*^9}, 3.4446480456142*^9, { 3.4446487557418003`*^9, 3.4446487636198*^9}, 3.4446488179974003`*^9, { 3.4446488971205997`*^9, 3.4446489152478*^9}, {3.4446490003458*^9, 3.4446490008294*^9}, {3.4447042728942003`*^9, 3.4447042751562*^9}, { 3.4447044703278*^9, 3.4447044865362*^9}, 3.4447046475282*^9, 3.4447047993786*^9, {3.444704908329*^9, 3.4447049292642*^9}, { 3.4447049861926003`*^9, 3.4447049877214003`*^9}, {3.4447050279296*^9, 3.4447050419695997`*^9}, {3.4447053486656*^9, 3.4447053739376*^9}, 3.4447054561963997`*^9, 3.44470561612*^9, {3.4472133996876*^9, 3.4472134108571997`*^9}, {3.4472134470179996`*^9, 3.4472134648332*^9}, { 3.4472135032872*^9, 3.4472135245344*^9}, {3.4472136963059998`*^9, 3.4472137794384003`*^9}, {3.4472138235708*^9, 3.4472138388900003`*^9}, { 3.4472139099792*^9, 3.4472141367096*^9}, {3.447214202682*^9, 3.4472142975924*^9}, {3.4472144187732*^9, 3.4472145910284*^9}, { 3.4472146560492*^9, 3.4472147023968*^9}, {3.447214803594*^9, 3.4472148728736*^9}, {3.4472149156956*^9, 3.447214940484*^9}, { 3.447216227284*^9, 3.4472162419948*^9}, {3.4472163068908*^9, 3.4472163720832*^9}, {3.4472164665880003`*^9, 3.447216530392*^9}, { 3.4472166237268*^9, 3.4472167058452*^9}, 3.4472167362808*^9, { 3.4472171394658003`*^9, 3.4472171532874002`*^9}, {3.4472172028993998`*^9, 3.4472172216661997`*^9}, {3.4472172524606*^9, 3.4472172690278*^9}, { 3.4472173209133997`*^9, 3.4472173334245996`*^9}, {3.4472173920846*^9, 3.447217404861*^9}, {3.4472179572548*^9, 3.4472180351456003`*^9}, { 3.4472509764091997`*^9, 3.4472511017396*^9}, {3.4473910422216*^9, 3.4473912901524*^9}, 3.4473918688344*^9, {3.447392021185*^9, 3.4473920346633997`*^9}, {3.4473921383304*^9, 3.4473921479088*^9}, { 3.4473923024112*^9, 3.4473923734379997`*^9}, {3.4473928098168*^9, 3.4473928648691998`*^9}, {3.4473931872432003`*^9, 3.4473932461800003`*^9}, {3.4473933026675997`*^9, 3.4473934579812*^9}, { 3.4473935755271997`*^9, 3.447393742572*^9}, {3.4473939032676*^9, 3.4473939384144*^9}, {3.447395257644*^9, 3.4473953141628*^9}, { 3.4473954231132*^9, 3.4473954756384*^9}, {3.4473955348716*^9, 3.4473955723272*^9}, {3.447395648502*^9, 3.4473957588876*^9}, { 3.4473957903996*^9, 3.4473958488372*^9}, 3.4473962894154*^9, { 3.447396350817*^9, 3.447396352611*^9}, {3.4474625379146*^9, 3.4474625637326*^9}, {3.558360651728078*^9, 3.558360652102478*^9}, { 3.5619791319820857`*^9, 3.561979135788492*^9}, 3.561979369382504*^9, { 3.5619794930439215`*^9, 3.5619795010155354`*^9}, {3.561979569218855*^9, 3.56197960614412*^9}, {3.5619797417551584`*^9, 3.5619797448751636`*^9}, { 3.618719065033702*^9, 3.618719075426296*^9}, {3.6187194011669273`*^9, 3.6187194449454317`*^9}, {3.6187196998040085`*^9, 3.6187197102436056`*^9}, {3.618719902254588*^9, 3.6187199711455283`*^9}, { 3.618722365406472*^9, 3.6187225412555304`*^9}, {3.6187226885009522`*^9, 3.6187227109872384`*^9}, {3.618722756922866*^9, 3.6187231317203026`*^9}, { 3.618723424250035*^9, 3.6187234267291765`*^9}, {3.6187235105259695`*^9, 3.6187236491028957`*^9}, {3.618723691580325*^9, 3.618723745975436*^9}, { 3.618723778837316*^9, 3.6187238310002995`*^9}, {3.6187239055875654`*^9, 3.618723940035536*^9}, {3.6187239782667227`*^9, 3.6187240219352207`*^9}, { 3.618724166762504*^9, 3.618724177411113*^9}, {3.618729321696159*^9, 3.618729328067523*^9}, 3.618729374058154*^9, {3.6187294379838104`*^9, 3.618729708464281*^9}, {3.6187297631904106`*^9, 3.618729773195983*^9}, { 3.618729822648812*^9, 3.6187299321490746`*^9}, {3.618729984399063*^9, 3.61873000654133*^9}, {3.6187300746012225`*^9, 3.6187300860458775`*^9}, { 3.618731390835507*^9, 3.6187315116174154`*^9}, {3.618731747324897*^9, 3.6187318214091344`*^9}, {3.6187318769243097`*^9, 3.618732065297084*^9}, { 3.6187321012351394`*^9, 3.618732157420353*^9}, {3.618732188384124*^9, 3.6187322435542793`*^9}, {3.6187322786112847`*^9, 3.6187325478446836`*^9}, {3.6187325819856367`*^9, 3.6187326817653437`*^9}, {3.618732810863728*^9, 3.61873282594359*^9}, { 3.6187336474335766`*^9, 3.618733754678711*^9}, {3.618733827497876*^9, 3.61873396201257*^9}, {3.6187342020362988`*^9, 3.618734236455267*^9}, 3.618734298201799*^9, {3.618734712498495*^9, 3.618734712716508*^9}, 3.6187347739640107`*^9, {3.618738817361748*^9, 3.6187388333816643`*^9}, { 3.6187391349349127`*^9, 3.6187391457955337`*^9}, {3.618739376900752*^9, 3.618739397023903*^9}, {3.618739528394417*^9, 3.618739534809784*^9}, { 3.618739972366811*^9, 3.61873997340687*^9}, {3.6187400416617737`*^9, 3.618740043022852*^9}, {3.6187400971579485`*^9, 3.618740107902563*^9}, { 3.6187401713671927`*^9, 3.6187401723312483`*^9}, {3.6187402613443394`*^9, 3.618740268819767*^9}, {3.6187403697625403`*^9, 3.6187404057615995`*^9}, { 3.618740488277319*^9, 3.618740516244919*^9}, {3.618740647782442*^9, 3.6187406551668644`*^9}, 3.6187407823021364`*^9, {3.6187418050786357`*^9, 3.618741805749674*^9}, {3.6187418557605343`*^9, 3.6187419895921893`*^9}, { 3.618742022944097*^9, 3.61874204379729*^9}, {3.6187420836395683`*^9, 3.618742103384698*^9}, {3.620462440882641*^9, 3.6204624460519366`*^9}, { 3.6204624990259666`*^9, 3.620462576450395*^9}, {3.620463682857678*^9, 3.620463713336421*^9}, 3.6204637901188126`*^9, {3.620464238835478*^9, 3.62046424411378*^9}, 3.628912429385081*^9, {3.6289135207155013`*^9, 3.6289135210805225`*^9}, 3.6289497746958513`*^9, 3.6289498371774254`*^9, { 3.62894988410911*^9, 3.6289500319795675`*^9}, {3.6289501333883677`*^9, 3.628950183744248*^9}, {3.6289503323017445`*^9, 3.628950390181055*^9}, { 3.6289505050536256`*^9, 3.6289505113579865`*^9}, {3.62895070863527*^9, 3.6289507095043197`*^9}, {3.628951013180689*^9, 3.62895101407374*^9}, { 3.629190743153632*^9, 3.629190816645361*^9}, {3.6291909709608326`*^9, 3.629190981678051*^9}, {3.629191034624544*^9, 3.6291910410049553`*^9}, { 3.6293846391370816`*^9, 3.629384641102685*^9}, {3.6294628543371735`*^9, 3.629462867097191*^9}, {3.629468063172048*^9, 3.6294681151669397`*^9}, { 3.6295205836757097`*^9, 3.6295206295085897`*^9}, {3.6295206788826766`*^9, 3.6295207067911253`*^9}, {3.6295207408927855`*^9, 3.629520753700408*^9}, { 3.629521020590745*^9, 3.6295210354395943`*^9}, {3.6295211107369013`*^9, 3.62952114882508*^9}, {3.6295212327348795`*^9, 3.6295212477237363`*^9}, { 3.6295213424816394`*^9, 3.629521343230441*^9}, {3.6295215363119802`*^9, 3.6295216753550243`*^9}, {3.629521922272258*^9, 3.6295219939855833`*^9}, { 3.6295220298188467`*^9, 3.629522446058778*^9}, {3.629522499348471*^9, 3.629522604352256*^9}, {3.629522755188921*^9, 3.62952288580795*^9}, { 3.629522918084407*^9, 3.6295233421087513`*^9}, {3.6295233808436193`*^9, 3.629523390936837*^9}, {3.629523424274096*^9, 3.6295234533369465`*^9}, { 3.6295235190130625`*^9, 3.629523521680667*^9}, 3.6295235894315863`*^9, { 3.6295237270706277`*^9, 3.629523799454755*^9}, {3.6295238514808464`*^9, 3.629523883460902*^9}, {3.6295239376085978`*^9, 3.6295239442386093`*^9}, { 3.6295241089904985`*^9, 3.629524177537019*^9}, 3.629524211888279*^9, { 3.629524277423994*^9, 3.629524396904604*^9}, {3.6295244794839497`*^9, 3.6295246248450055`*^9}, 3.629524657090262*^9, {3.6295259599109507`*^9, 3.629526013465844*^9}, {3.6295261092188125`*^9, 3.629526201414974*^9}, 3.6295263436092243`*^9, {3.6295263910333076`*^9, 3.629526583303645*^9}, { 3.629526616672104*^9, 3.629526647653758*^9}, {3.629526687558628*^9, 3.629526744888729*^9}, {3.629526804075233*^9, 3.6295268598453307`*^9}, { 3.6295269393898706`*^9, 3.6295269586559043`*^9}, {3.6295271490074387`*^9, 3.6295272149019547`*^9}, {3.6295272553684254`*^9, 3.6295272827620735`*^9}, {3.6295274137087035`*^9, 3.6295274761244135`*^9}, {3.6295275252801*^9, 3.6295279912529182`*^9}, { 3.6295281572216096`*^9, 3.629528160435215*^9}, {3.6295282905550437`*^9, 3.6295284308616905`*^9}, 3.6295285402022824`*^9, {3.629528582088356*^9, 3.629528616798417*^9}, {3.6295287666834803`*^9, 3.6295290316343455`*^9}, { 3.629529086515242*^9, 3.629529118432898*^9}, {3.6295291548121614`*^9, 3.629529292794404*^9}, {3.6295293426208916`*^9, 3.6295293491261034`*^9}, { 3.629529420699029*^9, 3.629529571535694*^9}, {3.6295296539506383`*^9, 3.629529656103442*^9}, {3.6295296894407005`*^9, 3.629529692295506*^9}, { 3.6295297445555973`*^9, 3.629529766426836*^9}, {3.6295298053333044`*^9, 3.6295298209489317`*^9}, {3.6295308380551186`*^9, 3.6295308386635194`*^9}, {3.629532377840223*^9, 3.6295323811630287`*^9}, { 3.629532480020402*^9, 3.629532482454006*^9}, {3.629532520720874*^9, 3.629532564619351*^9}, {3.62953259842461*^9, 3.6295326002654133`*^9}, { 3.6295326327758703`*^9, 3.6295326715107384`*^9}, {3.629532742428463*^9, 3.6295328288058147`*^9}, {3.6295329692184625`*^9, 3.6295330530062094`*^9}, {3.6295331824396367`*^9, 3.629533193562456*^9}, 3.6295350321720915`*^9, 3.629535158485513*^9, {3.629535245471266*^9, 3.6295352687465067`*^9}, {3.62953541293756*^9, 3.629535446384019*^9}, { 3.6295355043381205`*^9, 3.6295355262249594`*^9}, {3.629543790136781*^9, 3.629543791181983*^9}, {3.629543871350524*^9, 3.629544001673153*^9}, { 3.6295446682009234`*^9, 3.629544668466124*^9}, {3.6296010216162376`*^9, 3.6296010236442413`*^9}, {3.629601079336339*^9, 3.6296010902875586`*^9}, 3.6296011425476503`*^9, {3.6296043522397404`*^9, 3.629604399031022*^9}, { 3.629623884428093*^9, 3.629623914723346*^9}, {3.6296239662190366`*^9, 3.6296239738006496`*^9}, {3.6296240514731865`*^9, 3.6296240920176573`*^9}, {3.629624125947717*^9, 3.629624369432945*^9}, { 3.6296256512247963`*^9, 3.6296256817072496`*^9}, {3.6296260472626915`*^9, 3.629626047434292*^9}, {3.629628055568204*^9, 3.629628056098605*^9}, { 3.6296280911206665`*^9, 3.6296281088266973`*^9}, {3.6296281406819534`*^9, 3.629628273032586*^9}, {3.629628378831972*^9, 3.6296283814995766`*^9}, { 3.629628459562114*^9, 3.629628466379326*^9}, {3.629628519419419*^9, 3.6296285390754533`*^9}, {3.629633008133008*^9, 3.629633008835009*^9}, { 3.6296337764967575`*^9, 3.6296338344040594`*^9}, {3.6296342997684765`*^9, 3.629634432150309*^9}, {3.629634494035618*^9, 3.6296345320060844`*^9}, { 3.629634594499794*^9, 3.629634812182576*^9}, {3.6296348599810605`*^9, 3.6296348746918864`*^9}, {3.6296349071867433`*^9, 3.629635023172947*^9}, 3.6296350995818815`*^9, {3.6296363797201295`*^9, 3.6296363868961425`*^9}, { 3.629636462025874*^9, 3.6296364833355117`*^9}, {3.629636555922439*^9, 3.62963656780966*^9}, {3.629636770469616*^9, 3.629636774151222*^9}, { 3.6296369192782774`*^9, 3.6296369318830996`*^9}, {3.629637058539722*^9, 3.6296370719401455`*^9}, {3.629637278172508*^9, 3.629637286814923*^9}, { 3.6296376418091464`*^9, 3.629637662385583*^9}, {3.629637773551378*^9, 3.629637795360216*^9}, {3.6296390041751394`*^9, 3.629639039571602*^9}, 3.6296393829750047`*^9, {3.6296395546065063`*^9, 3.6296395649961243`*^9}, { 3.62964113386068*^9, 3.6296412507048855`*^9}, {3.629641303167777*^9, 3.629641313744596*^9}, {3.6296416285116315`*^9, 3.629641628886032*^9}, { 3.6296416658736973`*^9, 3.6296416815049243`*^9}, 3.6296417376338234`*^9, { 3.6296855551269727`*^9, 3.6296855804270077`*^9}, {3.6297079065796247`*^9, 3.6297079070476255`*^9}, {3.6297080850439377`*^9, 3.629708135728427*^9}, { 3.6297083496516027`*^9, 3.6297084025512953`*^9}, {3.629708781767563*^9, 3.629708790940379*^9}, {3.6297089402482414`*^9, 3.6297089618542795`*^9}, { 3.6297105345398417`*^9, 3.629710538580249*^9}, {3.6297107810514746`*^9, 3.6297107850138817`*^9}, {3.6297109100481014`*^9, 3.629710915710911*^9}, { 3.629711201534613*^9, 3.629711204311418*^9}, {3.629711236307074*^9, 3.6297115007275386`*^9}, {3.6297115377464037`*^9, 3.6297115441112146`*^9}, 3.6297116025645175`*^9, {3.6298716505389357`*^9, 3.629871851841689*^9}, { 3.62987837458679*^9, 3.629878383510006*^9}, {3.6298784402629056`*^9, 3.629878447345318*^9}, {3.6298785221786494`*^9, 3.6298786580236883`*^9}, { 3.629878689613744*^9, 3.629878737147027*^9}, 3.629878783853509*^9, { 3.629878832322794*^9, 3.6298789171723433`*^9}, {3.6298802128122005`*^9, 3.6298802929723125`*^9}, 3.6298813644148126`*^9, {3.629882428887303*^9, 3.629882435887313*^9}, {3.6298986251827383`*^9, 3.6298988530367384`*^9}, { 3.6298989036744275`*^9, 3.6298989486493063`*^9}, {3.629899016868226*^9, 3.6298991622448816`*^9}, {3.6298997154530535`*^9, 3.629899740147897*^9}, { 3.6298998248560457`*^9, 3.629899978048314*^9}, {3.6299000396372223`*^9, 3.6299001557638264`*^9}, {3.6299001966826982`*^9, 3.6299002595352087`*^9}, 3.6299005011236343`*^9, {3.6299005468317146`*^9, 3.629900567642151*^9}, { 3.629900887676713*^9, 3.629900990153293*^9}, {3.6299011689220085`*^9, 3.6299012295125146`*^9}, {3.6299013754039707`*^9, 3.6299014166036434`*^9}, 3.6299014589733176`*^9, {3.6299015096734066`*^9, 3.629901588765546*^9}, { 3.629901662569275*^9, 3.6299016974665365`*^9}, {3.629901952339784*^9, 3.6299019599057975`*^9}, 3.6299020306051216`*^9, {3.6299022330934772`*^9, 3.6299022682559395`*^9}, {3.6299023020455985`*^9, 3.629902332808852*^9}, { 3.6299024532566643`*^9, 3.629902462850681*^9}, {3.629949880225117*^9, 3.6299498807867184`*^9}, {3.6299503101150723`*^9, 3.6299503156998825`*^9}, {3.629950355058751*^9, 3.629950498937804*^9}, { 3.6299555415202007`*^9, 3.6299555507086167`*^9}, {3.6299556061667137`*^9, 3.6299557553497763`*^9}, {3.629955788499834*^9, 3.6299558948608212`*^9}, { 3.629956042764681*^9, 3.629956043809883*^9}, {3.6299560914211664`*^9, 3.6299561017327843`*^9}, 3.629956145849662*^9, {3.6299584813821354`*^9, 3.6299585082765827`*^9}, 3.6299585652946825`*^9, {3.629958616587573*^9, 3.6299586356508064`*^9}, {3.629958715073346*^9, 3.6299588186419287`*^9}, { 3.629958857454797*^9, 3.629958927249319*^9}, {3.629959427994599*^9, 3.629959494669116*^9}, {3.6299595293323765`*^9, 3.6299596037913074`*^9}, { 3.62995966795422*^9, 3.62995967360143*^9}, {3.6299597835972233`*^9, 3.6299597841120243`*^9}, {3.629959826622099*^9, 3.629959862533362*^9}, { 3.6299599051682367`*^9, 3.6299599235918694`*^9}, 3.629959979939168*^9, { 3.6299601345354395`*^9, 3.62996014612626*^9}, 3.6299601769831142`*^9, { 3.629960253142448*^9, 3.629960269538077*^9}, {3.6299603041701374`*^9, 3.6299603078205442`*^9}, {3.6299604300467587`*^9, 3.629960435491168*^9}, { 3.6299605300585346`*^9, 3.6299605636609936`*^9}, {3.6299606195870914`*^9, 3.6299606581971593`*^9}, {3.629960824228251*^9, 3.6299608755367413`*^9}, { 3.629960906658796*^9, 3.6299609978409557`*^9}, {3.6299610312250147`*^9, 3.629961070646284*^9}, {3.629961135698398*^9, 3.6299611643088484`*^9}, { 3.6299720458358483`*^9, 3.6299721791536827`*^9}, {3.6299722439717965`*^9, 3.629972300007095*^9}, {3.6299723670872126`*^9, 3.6299723937008595`*^9}, { 3.629972457801372*^9, 3.6299724710613956`*^9}, {3.629972740193068*^9, 3.6299728251196175`*^9}, {3.6299729203577843`*^9, 3.6299729350218105`*^9}, {3.6299729720874753`*^9, 3.6299730462188053`*^9}, {3.629973116044528*^9, 3.6299731230177402`*^9}, { 3.629973184310248*^9, 3.6299732090830917`*^9}, {3.629973349982539*^9, 3.6299734360166903`*^9}, 3.629973534562063*^9, {3.629973577446539*^9, 3.629973586104554*^9}, {3.6299740374133463`*^9, 3.629974083823428*^9}, { 3.6299742505565205`*^9, 3.629974337089873*^9}, {3.629974382907153*^9, 3.6299744466176653`*^9}, {3.629974589794717*^9, 3.629974590761918*^9}, { 3.629974776215044*^9, 3.6299747850134597`*^9}, {3.6299748226095257`*^9, 3.6299748237483273`*^9}, 3.6299748618435946`*^9, {3.629975198476586*^9, 3.6299752545898843`*^9}, {3.62997531475919*^9, 3.6299753175515947`*^9}, { 3.6299754601982455`*^9, 3.6299754625382495`*^9}, {3.629975592034077*^9, 3.629975592502078*^9}, {3.629983277446268*^9, 3.6299832946842985`*^9}, { 3.62998342081052*^9, 3.6299835439883366`*^9}, {3.629983615514462*^9, 3.629983931009416*^9}, {3.6299919807040443`*^9, 3.6299919808912444`*^9}, { 3.629992028330928*^9, 3.6299920922130404`*^9}, 3.629992198480427*^9, { 3.6299922299300823`*^9, 3.629992250506518*^9}, {3.629992292657792*^9, 3.6299923603151107`*^9}, {3.6299924387676487`*^9, 3.6299924398440504`*^9}, {3.6299925764846907`*^9, 3.6299926096347485`*^9}, {3.6299928122323046`*^9, 3.629992818768716*^9}, { 3.6299929049120674`*^9, 3.629992905411268*^9}, {3.6299929850338078`*^9, 3.6299929866250105`*^9}, {3.6299931061992207`*^9, 3.62999312270405*^9}, { 3.629993172312137*^9, 3.6299932618718944`*^9}, {3.6299933276572104`*^9, 3.6299933842073092`*^9}, {3.630287775665962*^9, 3.630287795852398*^9}, { 3.6303896387100534`*^9, 3.630389666774503*^9}, {3.6303896967889557`*^9, 3.6303897095341783`*^9}, {3.6303897587054644`*^9, 3.630389880448078*^9}, { 3.6303899127557354`*^9, 3.630390009444705*^9}, 3.630390057321189*^9, 3.630390443484267*^9, {3.63039095720877*^9, 3.6303909789240074`*^9}, { 3.6303910572205453`*^9, 3.6303911291054716`*^9}, {3.630391163035531*^9, 3.6303911740803504`*^9}, {3.630391240224467*^9, 3.6303912875081496`*^9}, { 3.6303913396902413`*^9, 3.630391404570755*^9}, {3.630391479513287*^9, 3.6303917572873745`*^9}, {3.630391868905571*^9, 3.6303920027226057`*^9}, { 3.630392064327114*^9, 3.630392219843787*^9}, {3.63039226121506*^9, 3.63039232943398*^9}, {3.6303924315985594`*^9, 3.6303924441097813`*^9}, { 3.6303926866122074`*^9, 3.6303927118530517`*^9}, {3.630392795671999*^9, 3.6303928006172075`*^9}, {3.6303986032190485`*^9, 3.6303986046230516`*^9}, {3.6303986654631586`*^9, 3.6303987936485834`*^9}, {3.63039889979117*^9, 3.6303989091199865`*^9}, { 3.630399006323757*^9, 3.630399007259759*^9}, {3.630399117224352*^9, 3.630399214771323*^9}, {3.6303992555185947`*^9, 3.6303993036758795`*^9}, { 3.630399467725767*^9, 3.630399502731636*^9}, {3.6303995748037624`*^9, 3.630399595614199*^9}, {3.6303996329294643`*^9, 3.630399658076709*^9}, { 3.630399711335202*^9, 3.6303997453120623`*^9}, {3.6303998546994543`*^9, 3.6303999880484886`*^9}, {3.6304000742074394`*^9, 3.630400123441126*^9}, { 3.6304001724564123`*^9, 3.630400251595351*^9}, {3.630400324166679*^9, 3.630400327052684*^9}, {3.630400358190338*^9, 3.6304003597503414`*^9}, { 3.6304004587481155`*^9, 3.6304004640521245`*^9}, {3.630400521975026*^9, 3.630400526124634*^9}, {3.630400567199506*^9, 3.630400593516752*^9}, { 3.6304012340070767`*^9, 3.6304013035207987`*^9}, {3.6304013614749007`*^9, 3.630401367933312*^9}, {3.630401686939398*^9, 3.6304017294598303`*^9}, { 3.630401794020523*^9, 3.6304018922061386`*^9}, {3.6304019687775183`*^9, 3.630401987153569*^9}, {3.630402072749465*^9, 3.63040208297405*^9}, { 3.6304022247881613`*^9, 3.630402255931943*^9}, 3.630402329306139*^9, { 3.6304023806970787`*^9, 3.6304024212403975`*^9}, {3.6304025002259154`*^9, 3.630402528595538*^9}, {3.6304025620694523`*^9, 3.630402575015193*^9}, { 3.6304026411829777`*^9, 3.630402649073429*^9}, {3.630402695548087*^9, 3.6304027128260756`*^9}, {3.630402783923142*^9, 3.6304027982389607`*^9}, { 3.6304028797236214`*^9, 3.6304030111811404`*^9}, {3.6304030562107162`*^9, 3.6304031598846455`*^9}, {3.630403236330018*^9, 3.6304032404072514`*^9}, { 3.630403373001835*^9, 3.6304033888147397`*^9}, {3.6304039420953856`*^9, 3.6304039512829113`*^9}, 3.6304039831437335`*^9, {3.630404015975611*^9, 3.6304040663624935`*^9}, {3.630404173614628*^9, 3.630404246945822*^9}, { 3.6304042891772375`*^9, 3.630404299595834*^9}, {3.630404391083066*^9, 3.630404392406142*^9}, {3.6304045301800222`*^9, 3.6304045579486103`*^9}, { 3.630404640215316*^9, 3.630404762796327*^9}, {3.630404877629895*^9, 3.630404883104208*^9}, {3.6304050364729805`*^9, 3.630405098270515*^9}, { 3.6304051736118245`*^9, 3.6304051965901384`*^9}, {3.6304053802536435`*^9, 3.63040539242334*^9}, {3.630406035965148*^9, 3.630406041998493*^9}, { 3.630406072049212*^9, 3.6304060962065935`*^9}, {3.630406264081196*^9, 3.6304062707025747`*^9}, {3.63040632219952*^9, 3.630406385461138*^9}, { 3.630406477200385*^9, 3.630406482095665*^9}, {3.6304066170883865`*^9, 3.6304066222256804`*^9}, {3.630406957868878*^9, 3.630406973411767*^9}, { 3.6304070081447535`*^9, 3.630407018199329*^9}, {3.630407411376817*^9, 3.630407412542884*^9}, {3.6304080609339695`*^9, 3.630408121202417*^9}, { 3.6304081585485525`*^9, 3.6304081832129636`*^9}, {3.63040821409673*^9, 3.630408421131572*^9}, 3.6304934333363276`*^9, {3.63049350751357*^9, 3.630493677593298*^9}, {3.630493716898546*^9, 3.6304937846684227`*^9}, 3.630493922944331*^9, {3.6304939556752033`*^9, 3.630494117430455*^9}, { 3.6304941486092386`*^9, 3.6304941767788496`*^9}, {3.6304942118648567`*^9, 3.6304942530272107`*^9}, {3.6304942838399734`*^9, 3.6304942845820155`*^9}, {3.6304943454054947`*^9, 3.6304944442451477`*^9}, {3.63080749995092*^9, 3.6308075480801234`*^9}, { 3.630807586536323*^9, 3.630807621440319*^9}, {3.630807680459695*^9, 3.630807682914836*^9}, {3.630807736889923*^9, 3.6308077644745007`*^9}, { 3.6308078081089964`*^9, 3.6308078670123653`*^9}, {3.630807991648494*^9, 3.630807997541831*^9}, {3.6308081080891542`*^9, 3.6308081919599514`*^9}, { 3.630808306368495*^9, 3.630808345060708*^9}, {3.6308087281906223`*^9, 3.6308087555171847`*^9}, {3.630809110815507*^9, 3.630809169033837*^9}, { 3.6308091998195972`*^9, 3.630809448512822*^9}, {3.6308095328996487`*^9, 3.6308095448223305`*^9}, {3.630809582269472*^9, 3.6308095873607635`*^9}, { 3.630809665529235*^9, 3.630809684808337*^9}, {3.6308316258485594`*^9, 3.6308318380886984`*^9}, {3.63083188164919*^9, 3.630831966930068*^9}, 3.6320400558356075`*^9, {3.6354749882908883`*^9, 3.635474989418953*^9}, { 3.635475084557395*^9, 3.6354750875145636`*^9}, {3.6354751334091887`*^9, 3.635475162315842*^9}, {3.6354754001974483`*^9, 3.6354754820331287`*^9}, 3.635475512931896*^9, {3.6354756222781506`*^9, 3.635475622861184*^9}, { 3.635475691642118*^9, 3.6354757057969275`*^9}, {3.6354757798291616`*^9, 3.635475797395167*^9}, {3.635475884848169*^9, 3.6354758981309285`*^9}, { 3.635475961488552*^9, 3.6354759738382587`*^9}, {3.6354760213729773`*^9, 3.6354760572050266`*^9}, {3.6354761282470903`*^9, 3.635476136040536*^9}, { 3.6354761719365892`*^9, 3.635476212217893*^9}, {3.6593346599546614`*^9, 3.659334660890663*^9}, {3.6593347077219453`*^9, 3.659334720701168*^9}, { 3.6593348752974396`*^9, 3.6593348758122406`*^9}, {3.6593349140947075`*^9, 3.6593350070240707`*^9}, {3.6593350466949406`*^9, 3.6593350543701544`*^9}, {3.659335103791041*^9, 3.6593351614487424`*^9}, 3.659335217686841*^9, {3.659335262084519*^9, 3.6593352995869846`*^9}, { 3.6593356899482727`*^9, 3.659335701819893*^9}, {3.659335964227954*^9, 3.659335964602355*^9}, {3.65933603594128*^9, 3.6593360629605274`*^9}, { 3.6593361352354546`*^9, 3.6593361504454813`*^9}, {3.6593363929479074`*^9, 3.6593364061611304`*^9}, 3.6593368946915884`*^9, {3.6884748265656157`*^9, 3.6884748268716326`*^9}, {3.6884748600075283`*^9, 3.688474861420609*^9}, { 3.6885242858240776`*^9, 3.6885243001140976`*^9}, {3.6888842911675606`*^9, 3.6888843311676164`*^9}, {3.688966242423658*^9, 3.688966263933688*^9}, { 3.6897393587897596`*^9, 3.6897393649897685`*^9}, 3.689739477049925*^9, { 3.6898595970621734`*^9, 3.689859597272174*^9}, {3.6898596707522764`*^9, 3.6898597190523443`*^9}, {3.689859768552414*^9, 3.6898597721424184`*^9}, { 3.689859855272535*^9, 3.689859859882541*^9}, {3.6898605078334484`*^9, 3.6898607266237545`*^9}, 3.6898608811139708`*^9, {3.6898609634740863`*^9, 3.689860974304102*^9}, 3.6898610140141573`*^9, {3.6898611496043468`*^9, 3.6898611683243732`*^9}, {3.689861462024784*^9, 3.6898615624849253`*^9}, { 3.6898616142149973`*^9, 3.6898616164350004`*^9}, 3.6898616657950697`*^9, { 3.689861716805141*^9, 3.689861749905187*^9}, {3.732677920575506*^9, 3.7326779208190203`*^9}, {3.7519672427004185`*^9, 3.7519672444968877`*^9}, {3.7519674022097683`*^9, 3.75196742976579*^9}, { 3.751967484127989*^9, 3.751967510853814*^9}, {3.7519675409404893`*^9, 3.751967541549782*^9}, {3.7519675797751045`*^9, 3.751967592209671*^9}, { 3.7519676829383273`*^9, 3.7519676841255474`*^9}, {3.7519677154775553`*^9, 3.7519677953499403`*^9}, 3.751967827811061*^9, {3.7519679545625095`*^9, 3.751967957999185*^9}, {3.751968003754015*^9, 3.7519681477513895`*^9}, { 3.751968264817631*^9, 3.751968270722477*^9}, {3.7519689618119907`*^9, 3.751968969888235*^9}, {3.7519691168917775`*^9, 3.7519691395895615`*^9}, { 3.751969242782174*^9, 3.7519692581691785`*^9}, {3.7519693625211954`*^9, 3.751969378579924*^9}, {3.751969409572627*^9, 3.751969438643936*^9}, { 3.7519695894526725`*^9, 3.751969614306203*^9}, {3.7523200108586655`*^9, 3.752320012354121*^9}, {3.7553831315619707`*^9, 3.755383134119626*^9}, { 3.7553831893197794`*^9, 3.755383241814331*^9}, {3.7553832736267967`*^9, 3.7553832810757113`*^9}, {3.7554336536222963`*^9, 3.755433684797229*^9}, { 3.7554337764737434`*^9, 3.7554338315300155`*^9}, {3.755433998047738*^9, 3.7554340265485487`*^9}, {3.755446573138784*^9, 3.755446636911299*^9}, { 3.75544667493072*^9, 3.755446753435521*^9}, {3.755446891541581*^9, 3.7554468921547422`*^9}, {3.7554469323588533`*^9, 3.755446936867403*^9}, { 3.7554470190332975`*^9, 3.7554472776872244`*^9}, {3.7555217323692026`*^9, 3.755521732847602*^9}, {3.755521767127169*^9, 3.7555217972041793`*^9}, { 3.755522561453134*^9, 3.755522564231819*^9}, {3.755522601885935*^9, 3.7555226037287407`*^9}, {3.7555226758687305`*^9, 3.755522678585092*^9}, { 3.7555234832604623`*^9, 3.7555235920444417`*^9}, {3.7555239506007543`*^9, 3.755524013893358*^9}, {3.755524076791689*^9, 3.7555240812793446`*^9}, { 3.7555241238138275`*^9, 3.7555241268985643`*^9}, {3.7555242930449886`*^9, 3.7555243378577013`*^9}, {3.7555256673767824`*^9, 3.7555256808205338`*^9}, {3.7555258588384123`*^9, 3.755525900317296*^9}, { 3.755525930708299*^9, 3.7555260436531134`*^9}, {3.755607147401991*^9, 3.7556071504143705`*^9}, {3.755607992884314*^9, 3.7556080025382996`*^9}, { 3.7556094344057455`*^9, 3.7556094348690443`*^9}, {3.7559613653116636`*^9, 3.755961445097105*^9}, 3.755961484246889*^9, {3.7559618979231987`*^9, 3.755961939470047*^9}, {3.7559620323724904`*^9, 3.7559620330864005`*^9}, { 3.755962155557907*^9, 3.7559621601593847`*^9}, {3.755962303755834*^9, 3.755962343830135*^9}, {3.7559624058018165`*^9, 3.7559624450501757`*^9}, 3.756002186674869*^9, 3.7560029626855392`*^9, {3.756003222110388*^9, 3.756003295034633*^9}, {3.7560056331492863`*^9, 3.7560056663855457`*^9}, { 3.7560057813555765`*^9, 3.7560057863836613`*^9}, {3.7560058917172394`*^9, 3.756005927847292*^9}, 3.756006092376186*^9, 3.756009112317705*^9, { 3.756091886039587*^9, 3.756091887764086*^9}, {3.756092005435152*^9, 3.7560920727337685`*^9}, {3.75609212911592*^9, 3.7560921293252516`*^9}, { 3.756092262958163*^9, 3.756092263157668*^9}, {3.756092342487877*^9, 3.756092347894502*^9}, {3.7560929036769304`*^9, 3.7560929278911004`*^9}, { 3.7560930741522417`*^9, 3.756093083420331*^9}, {3.7560932986236534`*^9, 3.7560933139459305`*^9}, {3.756093449985523*^9, 3.7560934874491863`*^9}, { 3.756093592694581*^9, 3.7560936019456573`*^9}, {3.756093634438078*^9, 3.756093673866626*^9}, {3.756093873069885*^9, 3.756093897964734*^9}, { 3.7560940650109406`*^9, 3.756094078056768*^9}, {3.756442536546026*^9, 3.756442607904289*^9}, {3.7564436397451363`*^9, 3.7564436403231254`*^9}, { 3.7636034984570236`*^9, 3.7636034989933815`*^9}, {3.763603551051456*^9, 3.7636035527617817`*^9}, {3.7636036049384193`*^9, 3.7636036392233057`*^9}, {3.7636036850937223`*^9, 3.763603692587598*^9}, { 3.7636037258272257`*^9, 3.7636037459031096`*^9}, {3.7636037792254367`*^9, 3.76360387572289*^9}, {3.763603971837229*^9, 3.7636040341423655`*^9}, { 3.763604066526084*^9, 3.7636040756798687`*^9}, {3.7636041452118535`*^9, 3.763604278007333*^9}, {3.763604317710966*^9, 3.7636043271387568`*^9}, { 3.7636043584877644`*^9, 3.763604415561053*^9}, {3.763604445680462*^9, 3.7636044504114943`*^9}, {3.763604615444647*^9, 3.7636048082554193`*^9}, 3.763604854904996*^9, {3.7636133594095488`*^9, 3.7636133618464766`*^9}, { 3.7636136063756704`*^9, 3.7636136315671196`*^9}, {3.7636990373827705`*^9, 3.7636990431157646`*^9}, {3.763699090332087*^9, 3.763699110952259*^9}, { 3.763699227420497*^9, 3.7636993642943506`*^9}, {3.763700085627533*^9, 3.763700088329999*^9}, {3.7637001721125274`*^9, 3.763700181422837*^9}, { 3.763700248063385*^9, 3.7637003918630466`*^9}, {3.763700591783223*^9, 3.7637006017496295`*^9}, {3.7637007583576717`*^9, 3.7637007603074865`*^9}, {3.7637137795793185`*^9, 3.7637137822587233`*^9}, {3.7637148704355187`*^9, 3.763714870624051*^9}, { 3.763727592158518*^9, 3.7637275933445053`*^9}, {3.7637276688363667`*^9, 3.7637276694756594`*^9}, 3.763803448896332*^9, {3.76380349501632*^9, 3.7638036835067654`*^9}, {3.763804829093463*^9, 3.7638048385675254`*^9}, 3.7638051033646154`*^9, 3.7638053924528885`*^9, {3.763805557684454*^9, 3.763805634255308*^9}, {3.763806843847647*^9, 3.763806847966059*^9}, { 3.763806942652097*^9, 3.7638071770752254`*^9}, {3.7638141184594107`*^9, 3.763814134133461*^9}, {3.7638146808628216`*^9, 3.7638146925645113`*^9}, { 3.7638147709278784`*^9, 3.7638147811883087`*^9}, {3.7638148155281043`*^9, 3.763814819843194*^9}, {3.7638150259647446`*^9, 3.763815028601293*^9}, { 3.7638151529595194`*^9, 3.763815155849978*^9}, {3.7638163770262136`*^9, 3.763816380851597*^9}, {3.7638164181856327`*^9, 3.7638164950537987`*^9}, 3.763816568304102*^9, {3.7638166173645625`*^9, 3.763816618808757*^9}, { 3.7638167204462805`*^9, 3.763816721012859*^9}, {3.763857602253485*^9, 3.7638579604183645`*^9}, {3.7638580038507566`*^9, 3.7638580060526443`*^9}, {3.763858082269992*^9, 3.7638581746835337`*^9}, { 3.7638582163351564`*^9, 3.7638582415275116`*^9}, {3.7638582983238*^9, 3.763858907503306*^9}, {3.763858941318697*^9, 3.763858956626134*^9}, { 3.7638602435602536`*^9, 3.763860245408451*^9}, {3.7638694636456347`*^9, 3.7638694647177277`*^9}, {3.7638708199536576`*^9, 3.763870829436488*^9}, { 3.763871287170555*^9, 3.7638712876184006`*^9}, {3.763943214376035*^9, 3.7639432984591475`*^9}, {3.763943418832348*^9, 3.7639434335508127`*^9}, { 3.76394347113767*^9, 3.7639435187320576`*^9}, {3.763943585908682*^9, 3.7639436125255404`*^9}, {3.763951722152746*^9, 3.76395172989299*^9}, { 3.7639517863423367`*^9, 3.7639519945900664`*^9}, {3.763952081515512*^9, 3.7639521530710773`*^9}, {3.763952353248129*^9, 3.763952357026309*^9}, { 3.7639524211903834`*^9, 3.7639524243979177`*^9}, {3.7639527174925117`*^9, 3.7639527180252266`*^9}, {3.7641265625745993`*^9, 3.7641265632314167`*^9}, {3.764126605555829*^9, 3.7641266075095396`*^9}, { 3.7641268313964133`*^9, 3.7641268543573804`*^9}, {3.764127044657903*^9, 3.7641270479422092`*^9}, {3.7641271442332697`*^9, 3.7641271469362774`*^9}, {3.764127227626192*^9, 3.7641272592640233`*^9}, { 3.764127335707515*^9, 3.7641273386484756`*^9}, {3.764127429843852*^9, 3.7641274364304185`*^9}, {3.7641275071859307`*^9, 3.764127516803895*^9}, 3.7641276043548007`*^9, {3.7641276925365753`*^9, 3.764127697080591*^9}, 3.764127798472331*^9, 3.764127853631323*^9, 3.764127908496078*^9, { 3.7641280050343323`*^9, 3.764128022046494*^9}, {3.764128128597419*^9, 3.764128154116727*^9}, {3.7641286864636617`*^9, 3.764128701643106*^9}, { 3.7641289910924444`*^9, 3.7641290126680794`*^9}, {3.7641290672285347`*^9, 3.7641290737798567`*^9}, {3.7641325425120363`*^9, 3.764132565390477*^9}, { 3.7641327425004654`*^9, 3.764132750040793*^9}, 3.7641327968340364`*^9, { 3.764133146776842*^9, 3.764133204874522*^9}, {3.7641333488187037`*^9, 3.7641333525577593`*^9}, {3.764413145593136*^9, 3.7644131471236105`*^9}, { 3.764413201645049*^9, 3.7644132349609704`*^9}, {3.764413325008136*^9, 3.7644133748980193`*^9}, {3.7644134113425665`*^9, 3.7644135151187*^9}, { 3.764413554409053*^9, 3.7644136160674934`*^9}, {3.76441371984758*^9, 3.764413730103909*^9}, 3.764419641962368*^9, {3.7644198522879405`*^9, 3.764419879249356*^9}, 3.764419909536559*^9, {3.764419991012162*^9, 3.764420000171088*^9}, {3.7644200798862047`*^9, 3.7644200950961914`*^9}, { 3.7644201529471693`*^9, 3.764420153715966*^9}, {3.764420210346301*^9, 3.764420255343707*^9}, {3.764420296178318*^9, 3.7644203000939393`*^9}, { 3.7644203803359275`*^9, 3.7644203931390867`*^9}, 3.7644204418727274`*^9, { 3.7647259720700207`*^9, 3.7647261047260523`*^9}, {3.7647263483375626`*^9, 3.76472635879602*^9}, 3.764726656736601*^9, {3.764727009127914*^9, 3.764727020100875*^9}, {3.7647270591828785`*^9, 3.7647270819631023`*^9}, { 3.7647272109090505`*^9, 3.764727227846332*^9}, {3.76473247809907*^9, 3.7647324813925114`*^9}, {3.7647349484962797`*^9, 3.7647349979358416`*^9}, {3.7647351097258167`*^9, 3.764735124772463*^9}, { 3.7647352810674453`*^9, 3.7647352901139917`*^9}, {3.7647353746429515`*^9, 3.764735379550926*^9}, {3.7647354596539807`*^9, 3.764735507677454*^9}, { 3.7647355546341*^9, 3.764735728811817*^9}, {3.764735837449795*^9, 3.76473584132898*^9}, {3.76473603649269*^9, 3.7647360592982664`*^9}, { 3.7647360998228803`*^9, 3.76473621551197*^9}, {3.7647362545599003`*^9, 3.764736286430997*^9}, {3.7647364592833533`*^9, 3.764736464019006*^9}, { 3.764736566167658*^9, 3.7647365918958225`*^9}, {3.764764761680134*^9, 3.7647648482473745`*^9}, 3.764764917763693*^9, {3.764764964821686*^9, 3.764765090741813*^9}, {3.7647651742140284`*^9, 3.7647652517335076`*^9}, { 3.764765341266399*^9, 3.7647653614173465`*^9}, 3.764765400284145*^9, { 3.764765691384389*^9, 3.764765708710143*^9}, 3.7647657454275875`*^9, { 3.76476578351686*^9, 3.764765871262255*^9}, {3.7647661045180917`*^9, 3.76476612822571*^9}, {3.7647661964223824`*^9, 3.764766239375331*^9}, { 3.764766330361228*^9, 3.764766338297905*^9}, {3.764767015060799*^9, 3.7647670193029037`*^9}, {3.764767076590926*^9, 3.7647671160277977`*^9}, { 3.7647671493139205`*^9, 3.7647672079236426`*^9}, {3.764767458938404*^9, 3.7647674608323865`*^9}, {3.764810938444873*^9, 3.7648109399353456`*^9}, { 3.7648118616019874`*^9, 3.7648118695079126`*^9}, {3.7648120589477816`*^9, 3.7648124600413237`*^9}, {3.76481250476682*^9, 3.7648125259602103`*^9}, { 3.764812601341893*^9, 3.7648126577763243`*^9}, {3.7648126944039307`*^9, 3.7648128855627623`*^9}, {3.764812924923909*^9, 3.764812926481821*^9}, { 3.764813041485982*^9, 3.764813131254232*^9}, {3.7648134679328885`*^9, 3.7648136479313235`*^9}, {3.7648136917777314`*^9, 3.764813697753367*^9}, { 3.7648137297570653`*^9, 3.764813747862262*^9}, 3.764813784221693*^9, { 3.7648138370678406`*^9, 3.7648141387969923`*^9}, {3.764814321050164*^9, 3.764814422489184*^9}, {3.764814461366684*^9, 3.7648145835728483`*^9}, { 3.764814614769511*^9, 3.7648147525825167`*^9}, {3.764815363375289*^9, 3.7648153644907384`*^9}, {3.764815451671169*^9, 3.7648154601533747`*^9}, { 3.7648175917802963`*^9, 3.7648176401910563`*^9}, {3.765885491237231*^9, 3.765885501131465*^9}, {3.766572999289345*^9, 3.7665729996020145`*^9}, { 3.7665730613126965`*^9, 3.7665730616706066`*^9}, {3.7840103262125545`*^9, 3.7840103546413517`*^9}, {3.784011309725755*^9, 3.7840113197719574`*^9}, { 3.784013374800973*^9, 3.7840133842981763`*^9}, {3.7840238533665447`*^9, 3.78402395932942*^9}, {3.784024091276659*^9, 3.784024112209529*^9}, { 3.7840242793219643`*^9, 3.784024296655184*^9}, {3.7840290670892677`*^9, 3.7840291348388853`*^9}, {3.784029222997594*^9, 3.784029542926179*^9}, { 3.784375172285057*^9, 3.784375319701829*^9}, {3.7843753678421807`*^9, 3.7843753788103914`*^9}, {3.7843754844339557`*^9, 3.784375827494117*^9}, { 3.784375862317687*^9, 3.7843759567563844`*^9}, {3.784376004941759*^9, 3.7843760080157185`*^9}, {3.784376101918992*^9, 3.7843761244332943`*^9}, { 3.784376181191763*^9, 3.7843762145091863`*^9}, {3.7843792489960337`*^9, 3.78437926273014*^9}, {3.7843793293934345`*^9, 3.784379368676588*^9}, { 3.7843796529835215`*^9, 3.7843796858862267`*^9}, {3.784450863324359*^9, 3.7844508986076546`*^9}, {3.7844510208392324`*^9, 3.784451027915551*^9}, { 3.7844511176315613`*^9, 3.7844511673791957`*^9}, {3.784451235055628*^9, 3.78445132575735*^9}, {3.784451995615477*^9, 3.7844520110330954`*^9}, { 3.7844522907551537`*^9, 3.7844523421551*^9}, {3.784700119490345*^9, 3.7847001627913013`*^9}, {3.7847004221290607`*^9, 3.7847004380767317`*^9}, 3.7847007913506136`*^9, {3.784781955129138*^9, 3.784781977787957*^9}, { 3.78488170216677*^9, 3.784881704210422*^9}, 3.784882130557441*^9, { 3.78488220347418*^9, 3.7848822064697027`*^9}, {3.784883393455822*^9, 3.784883458551924*^9}, 3.7848835306495824`*^9, {3.7848836822092113`*^9, 3.7848837303696923`*^9}, 3.7848838199009576`*^9, {3.7848842507527857`*^9, 3.7848842836585226`*^9}, 3.7848843847882996`*^9, {3.784884461405264*^9, 3.7848844645041113`*^9}, {3.784884559404122*^9, 3.7848845656634912`*^9}, { 3.7848852409944844`*^9, 3.7848852740337477`*^9}, {3.7848854548929386`*^9, 3.7848854893046365`*^9}, {3.7848856741783943`*^9, 3.784885691704702*^9}, { 3.784885809660874*^9, 3.784885811424426*^9}, {3.7848860031948376`*^9, 3.784886020570098*^9}, 3.7848861057105627`*^9, {3.7848861627726107`*^9, 3.7848862212876124`*^9}, {3.784886306497995*^9, 3.7848863509322224`*^9}, 3.784886472690192*^9, {3.7848866596243*^9, 3.784886664116289*^9}, { 3.7848866987282944`*^9, 3.7848867077911897`*^9}, {3.78488676128524*^9, 3.7848868667029366`*^9}, {3.7848869381224003`*^9, 3.7848869414281464`*^9}, {3.7848870104508753`*^9, 3.784887039889447*^9}, { 3.7848871795058794`*^9, 3.7848871976746817`*^9}, {3.7848872311446314`*^9, 3.78488724075662*^9}, 3.784887405188785*^9, {3.784887591926689*^9, 3.7848876119305134`*^9}, {3.784887676620901*^9, 3.7848876786672792`*^9}, { 3.78488771054331*^9, 3.784887714354906*^9}, {3.7848877625809546`*^9, 3.7848878103041153`*^9}, 3.7848878862881575`*^9, {3.787717235155089*^9, 3.787717269464238*^9}, {3.7877174592607603`*^9, 3.7877174674038067`*^9}, { 3.7877271032841845`*^9, 3.787727136247201*^9}, 3.787727355369296*^9, 3.7877274973278403`*^9, {3.787727855959008*^9, 3.78772792141208*^9}, 3.787728113487193*^9, {3.7877281704571557`*^9, 3.7877281735077004`*^9}, 3.7877282789827795`*^9, {3.7877286510229864`*^9, 3.787728665729192*^9}, { 3.7877287942225084`*^9, 3.787728807671986*^9}, {3.787729044867985*^9, 3.787729045536916*^9}, {3.787729589732438*^9, 3.7877296062090626`*^9}, { 3.787729794037467*^9, 3.7877297950347877`*^9}, {3.787729855548402*^9, 3.7877299039179935`*^9}, {3.7877300373241186`*^9, 3.787730068136018*^9}, { 3.7877301999859333`*^9, 3.7877302014150777`*^9}, {3.787732033225385*^9, 3.7877320471634016`*^9}, {3.787732077195259*^9, 3.7877320780358667`*^9}, 3.787732189759206*^9, {3.78773231889835*^9, 3.787732327710633*^9}, { 3.7877324857166643`*^9, 3.787732496655479*^9}, {3.7877325848303585`*^9, 3.78773258503596*^9}, {3.7877328504631166`*^9, 3.7877328625892415`*^9}, { 3.7877330254884944`*^9, 3.7877330271019044`*^9}, {3.787733136128061*^9, 3.7877331422258835`*^9}, {3.787733243513567*^9, 3.78773324558677*^9}, 3.787733310555999*^9, 3.7877334085329347`*^9, {3.7877337955932293`*^9, 3.7877337970498257`*^9}, {3.787733867727028*^9, 3.7877338687324905`*^9}, { 3.7877352224369583`*^9, 3.787735224161746*^9}, {3.787735343322833*^9, 3.787735348772827*^9}, {3.787735422704711*^9, 3.7877354268945775`*^9}, { 3.7877355100355635`*^9, 3.787735514671461*^9}, {3.7877356541994534`*^9, 3.7877356632141013`*^9}, 3.7877357913476543`*^9, 3.787736261837074*^9, { 3.7882542159043374`*^9, 3.7882542747998285`*^9}, {3.788254310967661*^9, 3.788254318430212*^9}, {3.788254585790197*^9, 3.7882545888318524`*^9}, { 3.7882547349987383`*^9, 3.788254735940298*^9}, 3.788254830063775*^9, 3.7882549155286837`*^9, {3.7882550121437798`*^9, 3.788255037735396*^9}, { 3.7882551764404287`*^9, 3.78825518352113*^9}, {3.7882552540030313`*^9, 3.788255290224329*^9}, {3.7882553843544893`*^9, 3.788255423248046*^9}, { 3.78825567982127*^9, 3.7882556852479534`*^9}, {3.7882557908576803`*^9, 3.7882558029800806`*^9}, {3.7882560240494256`*^9, 3.7882560388846164`*^9}, 3.788256102343512*^9, {3.788256161397396*^9, 3.7882561626372194`*^9}, { 3.7882562304311895`*^9, 3.78825629590362*^9}, {3.7882563614677362`*^9, 3.7882563620189795`*^9}, {3.7882564138122153`*^9, 3.7882564294158382`*^9}, {3.788256467457189*^9, 3.7882564889521217`*^9}, { 3.7882565883311844`*^9, 3.788256591497148*^9}, {3.7882568409513097`*^9, 3.7882568724526567`*^9}, {3.788256965258837*^9, 3.788256966444976*^9}, { 3.7882570073831463`*^9, 3.7882570497349973`*^9}, {3.7882570992487097`*^9, 3.788257144206352*^9}, {3.78825721252205*^9, 3.788257307277931*^9}, { 3.788257350410209*^9, 3.7882573617262745`*^9}, {3.788257424936472*^9, 3.788257434118204*^9}, {3.788276311330668*^9, 3.788276311647092*^9}, { 3.7882765465512347`*^9, 3.788276608568333*^9}, {3.7882767715851693`*^9, 3.7882768045752783`*^9}, {3.7882769342607436`*^9, 3.7882769409894867`*^9}, {3.7882770202208567`*^9, 3.7882770424485188`*^9}, {3.7882770760040703`*^9, 3.788277077341468*^9}, { 3.788277147336176*^9, 3.788277150397852*^9}, {3.7882772069909*^9, 3.7882772101572385`*^9}, {3.7882772503366175`*^9, 3.7882772773759403`*^9}, {3.7882773922958755`*^9, 3.7882773927832017`*^9}, {3.788277450684473*^9, 3.788277482126852*^9}, { 3.78827754293396*^9, 3.788277545027956*^9}, {3.7883214550230436`*^9, 3.7883214742097826`*^9}, {3.788321520104019*^9, 3.788321685390153*^9}, { 3.788321717307153*^9, 3.788321801831746*^9}, {3.788321836768508*^9, 3.788322037754008*^9}, {3.7883220686363816`*^9, 3.788322220085001*^9}, { 3.7883255906192427`*^9, 3.788325646609389*^9}, {3.7883257976991563`*^9, 3.788325804097658*^9}, {3.788325969279187*^9, 3.7883259830028267`*^9}, { 3.788326975877249*^9, 3.788326979070017*^9}, {3.788328539286415*^9, 3.788328618410488*^9}, {3.788328648595448*^9, 3.788328762662589*^9}, { 3.7883288060890923`*^9, 3.7883288805716724`*^9}, {3.7883319188300047`*^9, 3.78833193230753*^9}, {3.7883321144947567`*^9, 3.788332115050151*^9}, { 3.7883333680456443`*^9, 3.7883333686272163`*^9}, 3.7883336421611414`*^9, { 3.788333691323177*^9, 3.7883336916362*^9}, {3.788333797629262*^9, 3.7883338348662343`*^9}, {3.7883339555470386`*^9, 3.7883339660305166`*^9}, {3.7883340291758356`*^9, 3.788334031484354*^9}, { 3.788334368484807*^9, 3.7883343918754945`*^9}, {3.7883345963739557`*^9, 3.788334645315611*^9}, {3.788411405608647*^9, 3.788411409092114*^9}, { 3.7884115644712825`*^9, 3.7884115911998663`*^9}, {3.7884116673998833`*^9, 3.788411758799066*^9}, {3.788411985303985*^9, 3.788412002701314*^9}, { 3.78841218266156*^9, 3.788412217652734*^9}, {3.788412679618697*^9, 3.78841268296084*^9}, {3.788412968920223*^9, 3.7884129782039633`*^9}, { 3.7884155241723013`*^9, 3.7884155243798914`*^9}, 3.7884156619519596`*^9, { 3.7884162343262696`*^9, 3.788416236013459*^9}}, CellLabel-> "In[179]:=",ExpressionUUID->"3f23569e-19b7-498c-90fe-ac251be3f35d"] }, Closed]], Cell[CellGroupData[{ Cell["PLATE ELEMENT (stab) defs ", "Subsection", CellChangeTimes->{{3.6302475626780834`*^9, 3.6302475636452847`*^9}, { 3.6303896204112215`*^9, 3.630389621175623*^9}, {3.7658855359334097`*^9, 3.7658855563942738`*^9}, {3.7882511594490995`*^9, 3.788251160663724*^9}, { 3.7883213876221266`*^9, 3.788321388914168*^9}, {3.7890220324441195`*^9, 3.789022033389088*^9}},ExpressionUUID->"45ebb470-e7a9-441d-bef7-\ 8be05910bc1d"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "r", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "r\[Gamma]", ",", "FF", ",", "FFINV", ",", "jac", ",", "NN", ",", "u", ",", "ux", ",", "uy", ",", "uz", ",", "v", ",", "vx", ",", "vy", ",", "vz", ",", "w", ",", "wx", ",", "wy", ",", "wz", ",", "\[Phi]", ",", "\[Phi]x", ",", "\[Phi]y", ",", "\[Phi]z", ",", "\[Theta]", ",", "\[Theta]x", ",", "\[Theta]y", ",", "\[Theta]z", ",", "AA", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Phi]", ",", "wc", ",", "E\[Sigma]", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wsta", ",", "\[Delta]wmap", ",", "\[Epsilon]\[Epsilon]", ",", "\[Kappa]\[Kappa]", ",", "\[Gamma]\[Gamma]", ",", "MM", ",", "QQ", ",", "tri", ",", RowBox[{"mat", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "}"}]}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"ARNOLD", "-", "FALCK"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "mapping", " ", "for", " ", "the", " ", "plate", " ", "geometry"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"r\[Alpha]", ",", "r\[Beta]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Gamma]", "=", RowBox[{"r\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "r\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Sqrt", "[", RowBox[{"r\[Gamma]", ".", "r\[Gamma]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"r\[Alpha]", ",", "r\[Beta]", ",", RowBox[{"r\[Gamma]", "/", "jac"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", " ", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "approximations", "*)"}], "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"(", RowBox[{"mat", ".", "NN"}], ")"}], ".", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"wc", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "projection", "*)"}], "\[IndentingNewLine]", RowBox[{"AA", "=", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", "jac", ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]"}], "}"}], "=", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]"}], "}"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "/", "AA"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "derivatives", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"ux", ",", "uy", ",", "uz"}], "}"}], "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u"}], ",", "0"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"vx", ",", "vy", ",", "vz"}], "}"}], "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v"}], ",", "0"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"wx", ",", "wy", ",", "wz"}], "}"}], "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}], ",", "0"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]x", ",", "\[Phi]y", ",", "\[Phi]z"}], "}"}], "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}], ",", "0"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Theta]x", ",", "\[Theta]y", ",", "\[Theta]z"}], "}"}], "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Theta]"}], ",", "0"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"strain", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]\[Epsilon]", "=", RowBox[{"{", RowBox[{"ux", ",", "vy", ",", RowBox[{"uy", "+", "vx"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]\[Kappa]", "=", RowBox[{"{", RowBox[{"\[Theta]x", ",", RowBox[{"-", "\[Phi]y"}], ",", RowBox[{ RowBox[{"-", "\[Phi]x"}], "+", "\[Theta]y"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Gamma]\[Gamma]", "=", RowBox[{ RowBox[{"{", RowBox[{"wx", ",", "wy"}], "}"}], "+", RowBox[{"{", RowBox[{"\[Pi]\[Theta]", ",", RowBox[{"-", "\[Pi]\[Phi]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", "E\[Sigma]"}], ")"}], ".", "\[Kappa]\[Kappa]"}]}], ";", "\[IndentingNewLine]", RowBox[{"QQ", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "tt", "*", "GG", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"tt", "*", RowBox[{"E\[Sigma]", ".", "\[Epsilon]\[Epsilon]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Epsilon]\[Epsilon]", "]"}], ".", "NN"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]\[Kappa]", "]"}], ".", "MM"}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Gamma]\[Gamma]", "]"}], ".", "QQ"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"fX", " ", ",", "fY", ",", "fZ"}], "}"}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wsta", "=", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"wx", ",", "wy"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}]}], "}"}], ".", RowBox[{"{", RowBox[{"wx", ",", "wy"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wmap", "=", RowBox[{ RowBox[{"-", "0.1"}], "*", RowBox[{"\[Delta]", "[", RowBox[{"wc", "-", "w"}], "]"}], "*", RowBox[{"(", RowBox[{"wc", "-", "w"}], ")"}], "*", RowBox[{"tt", "/", "AA"}], "*", "EE"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wsta"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI1", ",", RowBox[{"\[Delta]wmap", "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.4426474258030453`*^9, {3.4444401255942*^9, 3.4444401388073997`*^9}, { 3.4444401803034*^9, 3.4444401844062*^9}, 3.4444402418922*^9, { 3.4444402805022*^9, 3.4444403134026003`*^9}, {3.4444403443062*^9, 3.4444404484049997`*^9}, {3.444483267101*^9, 3.444483267335*^9}, { 3.4444833136046*^9, 3.4444835622998*^9}, {3.4444836421094*^9, 3.4444837777981997`*^9}, {3.444483920429*^9, 3.4444839412237997`*^9}, 3.4444842905546*^9, {3.4444843207406*^9, 3.4444844162282*^9}, { 3.4444844465078*^9, 3.4444844624354*^9}, {3.4444845255998*^9, 3.4444845894505997`*^9}, {3.4444846290746*^9, 3.444484933025*^9}, { 3.4444849790917997`*^9, 3.4444851148742*^9}, {3.444534936054*^9, 3.4445349675348*^9}, {3.4445355821731997`*^9, 3.44453585174*^9}, { 3.4445372162198*^9, 3.4445372264378*^9}, 3.444537384731*^9, { 3.4445377585382*^9, 3.4445377605818*^9}, {3.4445379733658*^9, 3.4445379736934*^9}, {3.4445380176762*^9, 3.444538032777*^9}, { 3.4445381079222*^9, 3.4445381581386003`*^9}, {3.4445382726456003`*^9, 3.4445382910067997`*^9}, {3.4445383401312*^9, 3.4445383475880003`*^9}, { 3.444538438458*^9, 3.4445384464608*^9}, {3.4445385680783997`*^9, 3.4445385687648*^9}, {3.4445389411991997`*^9, 3.4445389431024*^9}, { 3.444539746605*^9, 3.4445397807846003`*^9}, {3.4445408839765997`*^9, 3.4445409234133997`*^9}, {3.4445409681698*^9, 3.4445409932702*^9}, { 3.4445415452906*^9, 3.4445415706717997`*^9}, {3.4445416647242002`*^9, 3.4445416909477997`*^9}, {3.4445417660150003`*^9, 3.444541788557*^9}, { 3.4445420906977997`*^9, 3.444542104847*^9}, {3.4445421885878*^9, 3.4445421941414003`*^9}, {3.4445422252166*^9, 3.4445422386014*^9}, { 3.444542280425*^9, 3.4445423014538*^9}, {3.444542455769*^9, 3.4445424578282003`*^9}, {3.4445431739214*^9, 3.444543175809*^9}, { 3.4445647020962*^9, 3.4445648405618*^9}, {3.4445648825414*^9, 3.4445648858486*^9}, {3.4445649382646*^9, 3.4445651882702*^9}, { 3.4446164822206*^9, 3.4446165344494*^9}, {3.4446166121842003`*^9, 3.4446166738822002`*^9}, {3.4446167223046*^9, 3.4446168047974*^9}, { 3.444616843033*^9, 3.444616906447*^9}, {3.4446444694708*^9, 3.4446444700948*^9}, {3.4446477738310003`*^9, 3.4446477939862003`*^9}, { 3.4446478467298*^9, 3.4446478681018*^9}, 3.4446480456142*^9, { 3.4446487557418003`*^9, 3.4446487636198*^9}, 3.4446488179974003`*^9, { 3.4446488971205997`*^9, 3.4446489152478*^9}, {3.4446490003458*^9, 3.4446490008294*^9}, {3.4447042728942003`*^9, 3.4447042751562*^9}, { 3.4447044703278*^9, 3.4447044865362*^9}, 3.4447046475282*^9, 3.4447047993786*^9, {3.444704908329*^9, 3.4447049292642*^9}, { 3.4447049861926003`*^9, 3.4447049877214003`*^9}, {3.4447050279296*^9, 3.4447050419695997`*^9}, {3.4447053486656*^9, 3.4447053739376*^9}, 3.4447054561963997`*^9, 3.44470561612*^9, {3.4472133996876*^9, 3.4472134108571997`*^9}, {3.4472134470179996`*^9, 3.4472134648332*^9}, { 3.4472135032872*^9, 3.4472135245344*^9}, {3.4472136963059998`*^9, 3.4472137794384003`*^9}, {3.4472138235708*^9, 3.4472138388900003`*^9}, { 3.4472139099792*^9, 3.4472141367096*^9}, {3.447214202682*^9, 3.4472142975924*^9}, {3.4472144187732*^9, 3.4472145910284*^9}, { 3.4472146560492*^9, 3.4472147023968*^9}, {3.447214803594*^9, 3.4472148728736*^9}, {3.4472149156956*^9, 3.447214940484*^9}, { 3.447216227284*^9, 3.4472162419948*^9}, {3.4472163068908*^9, 3.4472163720832*^9}, {3.4472164665880003`*^9, 3.447216530392*^9}, { 3.4472166237268*^9, 3.4472167058452*^9}, 3.4472167362808*^9, { 3.4472171394658003`*^9, 3.4472171532874002`*^9}, {3.4472172028993998`*^9, 3.4472172216661997`*^9}, {3.4472172524606*^9, 3.4472172690278*^9}, { 3.4472173209133997`*^9, 3.4472173334245996`*^9}, {3.4472173920846*^9, 3.447217404861*^9}, {3.4472179572548*^9, 3.4472180351456003`*^9}, { 3.4472509764091997`*^9, 3.4472511017396*^9}, {3.4473910422216*^9, 3.4473912901524*^9}, 3.4473918688344*^9, {3.447392021185*^9, 3.4473920346633997`*^9}, {3.4473921383304*^9, 3.4473921479088*^9}, { 3.4473923024112*^9, 3.4473923734379997`*^9}, {3.4473928098168*^9, 3.4473928648691998`*^9}, {3.4473931872432003`*^9, 3.4473932461800003`*^9}, {3.4473933026675997`*^9, 3.4473934579812*^9}, { 3.4473935755271997`*^9, 3.447393742572*^9}, {3.4473939032676*^9, 3.4473939384144*^9}, {3.447395257644*^9, 3.4473953141628*^9}, { 3.4473954231132*^9, 3.4473954756384*^9}, {3.4473955348716*^9, 3.4473955723272*^9}, {3.447395648502*^9, 3.4473957588876*^9}, { 3.4473957903996*^9, 3.4473958488372*^9}, 3.4473962894154*^9, { 3.447396350817*^9, 3.447396352611*^9}, {3.4474625379146*^9, 3.4474625637326*^9}, {3.558360651728078*^9, 3.558360652102478*^9}, { 3.5619791319820857`*^9, 3.561979135788492*^9}, 3.561979369382504*^9, { 3.5619794930439215`*^9, 3.5619795010155354`*^9}, {3.561979569218855*^9, 3.56197960614412*^9}, {3.5619797417551584`*^9, 3.5619797448751636`*^9}, { 3.618719065033702*^9, 3.618719075426296*^9}, {3.6187194011669273`*^9, 3.6187194449454317`*^9}, {3.6187196998040085`*^9, 3.6187197102436056`*^9}, {3.618719902254588*^9, 3.6187199711455283`*^9}, { 3.618722365406472*^9, 3.6187225412555304`*^9}, {3.6187226885009522`*^9, 3.6187227109872384`*^9}, {3.618722756922866*^9, 3.6187231317203026`*^9}, { 3.618723424250035*^9, 3.6187234267291765`*^9}, {3.6187235105259695`*^9, 3.6187236491028957`*^9}, {3.618723691580325*^9, 3.618723745975436*^9}, { 3.618723778837316*^9, 3.6187238310002995`*^9}, {3.6187239055875654`*^9, 3.618723940035536*^9}, {3.6187239782667227`*^9, 3.6187240219352207`*^9}, { 3.618724166762504*^9, 3.618724177411113*^9}, {3.618729321696159*^9, 3.618729328067523*^9}, 3.618729374058154*^9, {3.6187294379838104`*^9, 3.618729708464281*^9}, {3.6187297631904106`*^9, 3.618729773195983*^9}, { 3.618729822648812*^9, 3.6187299321490746`*^9}, {3.618729984399063*^9, 3.61873000654133*^9}, {3.6187300746012225`*^9, 3.6187300860458775`*^9}, { 3.618731390835507*^9, 3.6187315116174154`*^9}, {3.618731747324897*^9, 3.6187318214091344`*^9}, {3.6187318769243097`*^9, 3.618732065297084*^9}, { 3.6187321012351394`*^9, 3.618732157420353*^9}, {3.618732188384124*^9, 3.6187322435542793`*^9}, {3.6187322786112847`*^9, 3.6187325478446836`*^9}, {3.6187325819856367`*^9, 3.6187326817653437`*^9}, {3.618732810863728*^9, 3.61873282594359*^9}, { 3.6187336474335766`*^9, 3.618733754678711*^9}, {3.618733827497876*^9, 3.61873396201257*^9}, {3.6187342020362988`*^9, 3.618734236455267*^9}, 3.618734298201799*^9, {3.618734712498495*^9, 3.618734712716508*^9}, 3.6187347739640107`*^9, {3.618738817361748*^9, 3.6187388333816643`*^9}, { 3.6187391349349127`*^9, 3.6187391457955337`*^9}, {3.618739376900752*^9, 3.618739397023903*^9}, {3.618739528394417*^9, 3.618739534809784*^9}, { 3.618739972366811*^9, 3.61873997340687*^9}, {3.6187400416617737`*^9, 3.618740043022852*^9}, {3.6187400971579485`*^9, 3.618740107902563*^9}, { 3.6187401713671927`*^9, 3.6187401723312483`*^9}, {3.6187402613443394`*^9, 3.618740268819767*^9}, {3.6187403697625403`*^9, 3.6187404057615995`*^9}, { 3.618740488277319*^9, 3.618740516244919*^9}, {3.618740647782442*^9, 3.6187406551668644`*^9}, 3.6187407823021364`*^9, {3.6187418050786357`*^9, 3.618741805749674*^9}, {3.6187418557605343`*^9, 3.6187419895921893`*^9}, { 3.618742022944097*^9, 3.61874204379729*^9}, {3.6187420836395683`*^9, 3.618742103384698*^9}, {3.620462440882641*^9, 3.6204624460519366`*^9}, { 3.6204624990259666`*^9, 3.620462576450395*^9}, {3.620463682857678*^9, 3.620463713336421*^9}, 3.6204637901188126`*^9, {3.620464238835478*^9, 3.62046424411378*^9}, 3.628912429385081*^9, {3.6289135207155013`*^9, 3.6289135210805225`*^9}, 3.6289497746958513`*^9, 3.6289498371774254`*^9, { 3.62894988410911*^9, 3.6289500319795675`*^9}, {3.6289501333883677`*^9, 3.628950183744248*^9}, {3.6289503323017445`*^9, 3.628950390181055*^9}, { 3.6289505050536256`*^9, 3.6289505113579865`*^9}, {3.62895070863527*^9, 3.6289507095043197`*^9}, {3.628951013180689*^9, 3.62895101407374*^9}, { 3.629190743153632*^9, 3.629190816645361*^9}, {3.6291909709608326`*^9, 3.629190981678051*^9}, {3.629191034624544*^9, 3.6291910410049553`*^9}, { 3.6293846391370816`*^9, 3.629384641102685*^9}, {3.6294628543371735`*^9, 3.629462867097191*^9}, {3.629468063172048*^9, 3.6294681151669397`*^9}, { 3.6295205836757097`*^9, 3.6295206295085897`*^9}, {3.6295206788826766`*^9, 3.6295207067911253`*^9}, {3.6295207408927855`*^9, 3.629520753700408*^9}, { 3.629521020590745*^9, 3.6295210354395943`*^9}, {3.6295211107369013`*^9, 3.62952114882508*^9}, {3.6295212327348795`*^9, 3.6295212477237363`*^9}, { 3.6295213424816394`*^9, 3.629521343230441*^9}, {3.6295215363119802`*^9, 3.6295216753550243`*^9}, {3.629521922272258*^9, 3.6295219939855833`*^9}, { 3.6295220298188467`*^9, 3.629522446058778*^9}, {3.629522499348471*^9, 3.629522604352256*^9}, {3.629522755188921*^9, 3.62952288580795*^9}, { 3.629522918084407*^9, 3.6295233421087513`*^9}, {3.6295233808436193`*^9, 3.629523390936837*^9}, {3.629523424274096*^9, 3.6295234533369465`*^9}, { 3.6295235190130625`*^9, 3.629523521680667*^9}, 3.6295235894315863`*^9, { 3.6295237270706277`*^9, 3.629523799454755*^9}, {3.6295238514808464`*^9, 3.629523883460902*^9}, {3.6295239376085978`*^9, 3.6295239442386093`*^9}, { 3.6295241089904985`*^9, 3.629524177537019*^9}, 3.629524211888279*^9, { 3.629524277423994*^9, 3.629524396904604*^9}, {3.6295244794839497`*^9, 3.6295246248450055`*^9}, 3.629524657090262*^9, {3.6295259599109507`*^9, 3.629526013465844*^9}, {3.6295261092188125`*^9, 3.629526201414974*^9}, 3.6295263436092243`*^9, {3.6295263910333076`*^9, 3.629526583303645*^9}, { 3.629526616672104*^9, 3.629526647653758*^9}, {3.629526687558628*^9, 3.629526744888729*^9}, {3.629526804075233*^9, 3.6295268598453307`*^9}, { 3.6295269393898706`*^9, 3.6295269586559043`*^9}, {3.6295271490074387`*^9, 3.6295272149019547`*^9}, {3.6295272553684254`*^9, 3.6295272827620735`*^9}, {3.6295274137087035`*^9, 3.6295274761244135`*^9}, {3.6295275252801*^9, 3.6295279912529182`*^9}, { 3.6295281572216096`*^9, 3.629528160435215*^9}, {3.6295282905550437`*^9, 3.6295284308616905`*^9}, 3.6295285402022824`*^9, {3.629528582088356*^9, 3.629528616798417*^9}, {3.6295287666834803`*^9, 3.6295290316343455`*^9}, { 3.629529086515242*^9, 3.629529118432898*^9}, {3.6295291548121614`*^9, 3.629529292794404*^9}, {3.6295293426208916`*^9, 3.6295293491261034`*^9}, { 3.629529420699029*^9, 3.629529571535694*^9}, {3.6295296539506383`*^9, 3.629529656103442*^9}, {3.6295296894407005`*^9, 3.629529692295506*^9}, { 3.6295297445555973`*^9, 3.629529766426836*^9}, {3.6295298053333044`*^9, 3.6295298209489317`*^9}, {3.6295308380551186`*^9, 3.6295308386635194`*^9}, {3.629532377840223*^9, 3.6295323811630287`*^9}, { 3.629532480020402*^9, 3.629532482454006*^9}, {3.629532520720874*^9, 3.629532564619351*^9}, {3.62953259842461*^9, 3.6295326002654133`*^9}, { 3.6295326327758703`*^9, 3.6295326715107384`*^9}, {3.629532742428463*^9, 3.6295328288058147`*^9}, {3.6295329692184625`*^9, 3.6295330530062094`*^9}, {3.6295331824396367`*^9, 3.629533193562456*^9}, 3.6295350321720915`*^9, 3.629535158485513*^9, {3.629535245471266*^9, 3.6295352687465067`*^9}, {3.62953541293756*^9, 3.629535446384019*^9}, { 3.6295355043381205`*^9, 3.6295355262249594`*^9}, {3.629543790136781*^9, 3.629543791181983*^9}, {3.629543871350524*^9, 3.629544001673153*^9}, { 3.6295446682009234`*^9, 3.629544668466124*^9}, {3.6296010216162376`*^9, 3.6296010236442413`*^9}, {3.629601079336339*^9, 3.6296010902875586`*^9}, 3.6296011425476503`*^9, {3.6296043522397404`*^9, 3.629604399031022*^9}, { 3.629623884428093*^9, 3.629623914723346*^9}, {3.6296239662190366`*^9, 3.6296239738006496`*^9}, {3.6296240514731865`*^9, 3.6296240920176573`*^9}, {3.629624125947717*^9, 3.629624369432945*^9}, { 3.6296256512247963`*^9, 3.6296256817072496`*^9}, {3.6296260472626915`*^9, 3.629626047434292*^9}, {3.629628055568204*^9, 3.629628056098605*^9}, { 3.6296280911206665`*^9, 3.6296281088266973`*^9}, {3.6296281406819534`*^9, 3.629628273032586*^9}, {3.629628378831972*^9, 3.6296283814995766`*^9}, { 3.629628459562114*^9, 3.629628466379326*^9}, {3.629628519419419*^9, 3.6296285390754533`*^9}, {3.629633008133008*^9, 3.629633008835009*^9}, { 3.6296337764967575`*^9, 3.6296338344040594`*^9}, {3.6296342997684765`*^9, 3.629634432150309*^9}, {3.629634494035618*^9, 3.6296345320060844`*^9}, { 3.629634594499794*^9, 3.629634812182576*^9}, {3.6296348599810605`*^9, 3.6296348746918864`*^9}, {3.6296349071867433`*^9, 3.629635023172947*^9}, 3.6296350995818815`*^9, {3.6296363797201295`*^9, 3.6296363868961425`*^9}, { 3.629636462025874*^9, 3.6296364833355117`*^9}, {3.629636555922439*^9, 3.62963656780966*^9}, {3.629636770469616*^9, 3.629636774151222*^9}, { 3.6296369192782774`*^9, 3.6296369318830996`*^9}, {3.629637058539722*^9, 3.6296370719401455`*^9}, {3.629637278172508*^9, 3.629637286814923*^9}, { 3.6296376418091464`*^9, 3.629637662385583*^9}, {3.629637773551378*^9, 3.629637795360216*^9}, {3.6296390041751394`*^9, 3.629639039571602*^9}, 3.6296393829750047`*^9, {3.6296395546065063`*^9, 3.6296395649961243`*^9}, { 3.62964113386068*^9, 3.6296412507048855`*^9}, {3.629641303167777*^9, 3.629641313744596*^9}, {3.6296416285116315`*^9, 3.629641628886032*^9}, { 3.6296416658736973`*^9, 3.6296416815049243`*^9}, 3.6296417376338234`*^9, { 3.6296855551269727`*^9, 3.6296855804270077`*^9}, {3.6297079065796247`*^9, 3.6297079070476255`*^9}, {3.6297080850439377`*^9, 3.629708135728427*^9}, { 3.6297083496516027`*^9, 3.6297084025512953`*^9}, {3.629708781767563*^9, 3.629708790940379*^9}, {3.6297089402482414`*^9, 3.6297089618542795`*^9}, { 3.6297105345398417`*^9, 3.629710538580249*^9}, {3.6297107810514746`*^9, 3.6297107850138817`*^9}, {3.6297109100481014`*^9, 3.629710915710911*^9}, { 3.629711201534613*^9, 3.629711204311418*^9}, {3.629711236307074*^9, 3.6297115007275386`*^9}, {3.6297115377464037`*^9, 3.6297115441112146`*^9}, 3.6297116025645175`*^9, {3.6298716505389357`*^9, 3.629871851841689*^9}, { 3.62987837458679*^9, 3.629878383510006*^9}, {3.6298784402629056`*^9, 3.629878447345318*^9}, {3.6298785221786494`*^9, 3.6298786580236883`*^9}, { 3.629878689613744*^9, 3.629878737147027*^9}, 3.629878783853509*^9, { 3.629878832322794*^9, 3.6298789171723433`*^9}, {3.6298802128122005`*^9, 3.6298802929723125`*^9}, 3.6298813644148126`*^9, {3.629882428887303*^9, 3.629882435887313*^9}, {3.6298986251827383`*^9, 3.6298988530367384`*^9}, { 3.6298989036744275`*^9, 3.6298989486493063`*^9}, {3.629899016868226*^9, 3.6298991622448816`*^9}, {3.6298997154530535`*^9, 3.629899740147897*^9}, { 3.6298998248560457`*^9, 3.629899978048314*^9}, {3.6299000396372223`*^9, 3.6299001557638264`*^9}, {3.6299001966826982`*^9, 3.6299002595352087`*^9}, 3.6299005011236343`*^9, {3.6299005468317146`*^9, 3.629900567642151*^9}, { 3.629900887676713*^9, 3.629900990153293*^9}, {3.6299011689220085`*^9, 3.6299012295125146`*^9}, {3.6299013754039707`*^9, 3.6299014166036434`*^9}, 3.6299014589733176`*^9, {3.6299015096734066`*^9, 3.629901588765546*^9}, { 3.629901662569275*^9, 3.6299016974665365`*^9}, {3.629901952339784*^9, 3.6299019599057975`*^9}, 3.6299020306051216`*^9, {3.6299022330934772`*^9, 3.6299022682559395`*^9}, {3.6299023020455985`*^9, 3.629902332808852*^9}, { 3.6299024532566643`*^9, 3.629902462850681*^9}, {3.629949880225117*^9, 3.6299498807867184`*^9}, {3.6299503101150723`*^9, 3.6299503156998825`*^9}, {3.629950355058751*^9, 3.629950498937804*^9}, { 3.6299555415202007`*^9, 3.6299555507086167`*^9}, {3.6299556061667137`*^9, 3.6299557553497763`*^9}, {3.629955788499834*^9, 3.6299558948608212`*^9}, { 3.629956042764681*^9, 3.629956043809883*^9}, {3.6299560914211664`*^9, 3.6299561017327843`*^9}, 3.629956145849662*^9, {3.6299584813821354`*^9, 3.6299585082765827`*^9}, 3.6299585652946825`*^9, {3.629958616587573*^9, 3.6299586356508064`*^9}, {3.629958715073346*^9, 3.6299588186419287`*^9}, { 3.629958857454797*^9, 3.629958927249319*^9}, {3.629959427994599*^9, 3.629959494669116*^9}, {3.6299595293323765`*^9, 3.6299596037913074`*^9}, { 3.62995966795422*^9, 3.62995967360143*^9}, {3.6299597835972233`*^9, 3.6299597841120243`*^9}, {3.629959826622099*^9, 3.629959862533362*^9}, { 3.6299599051682367`*^9, 3.6299599235918694`*^9}, 3.629959979939168*^9, { 3.6299601345354395`*^9, 3.62996014612626*^9}, 3.6299601769831142`*^9, { 3.629960253142448*^9, 3.629960269538077*^9}, {3.6299603041701374`*^9, 3.6299603078205442`*^9}, {3.6299604300467587`*^9, 3.629960435491168*^9}, { 3.6299605300585346`*^9, 3.6299605636609936`*^9}, {3.6299606195870914`*^9, 3.6299606581971593`*^9}, {3.629960824228251*^9, 3.6299608755367413`*^9}, { 3.629960906658796*^9, 3.6299609978409557`*^9}, {3.6299610312250147`*^9, 3.629961070646284*^9}, {3.629961135698398*^9, 3.6299611643088484`*^9}, { 3.6299720458358483`*^9, 3.6299721791536827`*^9}, {3.6299722439717965`*^9, 3.629972300007095*^9}, {3.6299723670872126`*^9, 3.6299723937008595`*^9}, { 3.629972457801372*^9, 3.6299724710613956`*^9}, {3.629972740193068*^9, 3.6299728251196175`*^9}, {3.6299729203577843`*^9, 3.6299729350218105`*^9}, {3.6299729720874753`*^9, 3.6299730462188053`*^9}, {3.629973116044528*^9, 3.6299731230177402`*^9}, { 3.629973184310248*^9, 3.6299732090830917`*^9}, {3.629973349982539*^9, 3.6299734360166903`*^9}, 3.629973534562063*^9, {3.629973577446539*^9, 3.629973586104554*^9}, {3.6299740374133463`*^9, 3.629974083823428*^9}, { 3.6299742505565205`*^9, 3.629974337089873*^9}, {3.629974382907153*^9, 3.6299744466176653`*^9}, {3.629974589794717*^9, 3.629974590761918*^9}, { 3.629974776215044*^9, 3.6299747850134597`*^9}, {3.6299748226095257`*^9, 3.6299748237483273`*^9}, 3.6299748618435946`*^9, {3.629975198476586*^9, 3.6299752545898843`*^9}, {3.62997531475919*^9, 3.6299753175515947`*^9}, { 3.6299754601982455`*^9, 3.6299754625382495`*^9}, {3.629975592034077*^9, 3.629975592502078*^9}, {3.629983277446268*^9, 3.6299832946842985`*^9}, { 3.62998342081052*^9, 3.6299835439883366`*^9}, {3.629983615514462*^9, 3.629983931009416*^9}, {3.6299919807040443`*^9, 3.6299919808912444`*^9}, { 3.629992028330928*^9, 3.6299920922130404`*^9}, 3.629992198480427*^9, { 3.6299922299300823`*^9, 3.629992250506518*^9}, {3.629992292657792*^9, 3.6299923603151107`*^9}, {3.6299924387676487`*^9, 3.6299924398440504`*^9}, {3.6299925764846907`*^9, 3.6299926096347485`*^9}, {3.6299928122323046`*^9, 3.629992818768716*^9}, { 3.6299929049120674`*^9, 3.629992905411268*^9}, {3.6299929850338078`*^9, 3.6299929866250105`*^9}, {3.6299931061992207`*^9, 3.62999312270405*^9}, { 3.629993172312137*^9, 3.6299932618718944`*^9}, {3.6299933276572104`*^9, 3.6299933842073092`*^9}, {3.630287775665962*^9, 3.630287795852398*^9}, { 3.6303896387100534`*^9, 3.630389666774503*^9}, {3.6303896967889557`*^9, 3.6303897095341783`*^9}, {3.6303897587054644`*^9, 3.630389880448078*^9}, { 3.6303899127557354`*^9, 3.630390009444705*^9}, 3.630390057321189*^9, 3.630390443484267*^9, {3.63039095720877*^9, 3.6303909789240074`*^9}, { 3.6303910572205453`*^9, 3.6303911291054716`*^9}, {3.630391163035531*^9, 3.6303911740803504`*^9}, {3.630391240224467*^9, 3.6303912875081496`*^9}, { 3.6303913396902413`*^9, 3.630391404570755*^9}, {3.630391479513287*^9, 3.6303917572873745`*^9}, {3.630391868905571*^9, 3.6303920027226057`*^9}, { 3.630392064327114*^9, 3.630392219843787*^9}, {3.63039226121506*^9, 3.63039232943398*^9}, {3.6303924315985594`*^9, 3.6303924441097813`*^9}, { 3.6303926866122074`*^9, 3.6303927118530517`*^9}, {3.630392795671999*^9, 3.6303928006172075`*^9}, {3.6303986032190485`*^9, 3.6303986046230516`*^9}, {3.6303986654631586`*^9, 3.6303987936485834`*^9}, {3.63039889979117*^9, 3.6303989091199865`*^9}, { 3.630399006323757*^9, 3.630399007259759*^9}, {3.630399117224352*^9, 3.630399214771323*^9}, {3.6303992555185947`*^9, 3.6303993036758795`*^9}, { 3.630399467725767*^9, 3.630399502731636*^9}, {3.6303995748037624`*^9, 3.630399595614199*^9}, {3.6303996329294643`*^9, 3.630399658076709*^9}, { 3.630399711335202*^9, 3.6303997453120623`*^9}, {3.6303998546994543`*^9, 3.6303999880484886`*^9}, {3.6304000742074394`*^9, 3.630400123441126*^9}, { 3.6304001724564123`*^9, 3.630400251595351*^9}, {3.630400324166679*^9, 3.630400327052684*^9}, {3.630400358190338*^9, 3.6304003597503414`*^9}, { 3.6304004587481155`*^9, 3.6304004640521245`*^9}, {3.630400521975026*^9, 3.630400526124634*^9}, {3.630400567199506*^9, 3.630400593516752*^9}, { 3.6304012340070767`*^9, 3.6304013035207987`*^9}, {3.6304013614749007`*^9, 3.630401367933312*^9}, {3.630401686939398*^9, 3.6304017294598303`*^9}, { 3.630401794020523*^9, 3.6304018922061386`*^9}, {3.6304019687775183`*^9, 3.630401987153569*^9}, {3.630402072749465*^9, 3.63040208297405*^9}, { 3.6304022247881613`*^9, 3.630402255931943*^9}, 3.630402329306139*^9, { 3.6304023806970787`*^9, 3.6304024212403975`*^9}, {3.6304025002259154`*^9, 3.630402528595538*^9}, {3.6304025620694523`*^9, 3.630402575015193*^9}, { 3.6304026411829777`*^9, 3.630402649073429*^9}, {3.630402695548087*^9, 3.6304027128260756`*^9}, {3.630402783923142*^9, 3.6304027982389607`*^9}, { 3.6304028797236214`*^9, 3.6304030111811404`*^9}, {3.6304030562107162`*^9, 3.6304031598846455`*^9}, {3.630403236330018*^9, 3.6304032404072514`*^9}, { 3.630403373001835*^9, 3.6304033888147397`*^9}, {3.6304039420953856`*^9, 3.6304039512829113`*^9}, 3.6304039831437335`*^9, {3.630404015975611*^9, 3.6304040663624935`*^9}, {3.630404173614628*^9, 3.630404246945822*^9}, { 3.6304042891772375`*^9, 3.630404299595834*^9}, {3.630404391083066*^9, 3.630404392406142*^9}, {3.6304045301800222`*^9, 3.6304045579486103`*^9}, { 3.630404640215316*^9, 3.630404762796327*^9}, {3.630404877629895*^9, 3.630404883104208*^9}, {3.6304050364729805`*^9, 3.630405098270515*^9}, { 3.6304051736118245`*^9, 3.6304051965901384`*^9}, {3.6304053802536435`*^9, 3.63040539242334*^9}, {3.630406035965148*^9, 3.630406041998493*^9}, { 3.630406072049212*^9, 3.6304060962065935`*^9}, {3.630406264081196*^9, 3.6304062707025747`*^9}, {3.63040632219952*^9, 3.630406385461138*^9}, { 3.630406477200385*^9, 3.630406482095665*^9}, {3.6304066170883865`*^9, 3.6304066222256804`*^9}, {3.630406957868878*^9, 3.630406973411767*^9}, { 3.6304070081447535`*^9, 3.630407018199329*^9}, {3.630407411376817*^9, 3.630407412542884*^9}, {3.6304080609339695`*^9, 3.630408121202417*^9}, { 3.6304081585485525`*^9, 3.6304081832129636`*^9}, {3.63040821409673*^9, 3.630408421131572*^9}, 3.6304934333363276`*^9, {3.63049350751357*^9, 3.630493677593298*^9}, {3.630493716898546*^9, 3.6304937846684227`*^9}, 3.630493922944331*^9, {3.6304939556752033`*^9, 3.630494117430455*^9}, { 3.6304941486092386`*^9, 3.6304941767788496`*^9}, {3.6304942118648567`*^9, 3.6304942530272107`*^9}, {3.6304942838399734`*^9, 3.6304942845820155`*^9}, {3.6304943454054947`*^9, 3.6304944442451477`*^9}, {3.63080749995092*^9, 3.6308075480801234`*^9}, { 3.630807586536323*^9, 3.630807621440319*^9}, {3.630807680459695*^9, 3.630807682914836*^9}, {3.630807736889923*^9, 3.6308077644745007`*^9}, { 3.6308078081089964`*^9, 3.6308078670123653`*^9}, {3.630807991648494*^9, 3.630807997541831*^9}, {3.6308081080891542`*^9, 3.6308081919599514`*^9}, { 3.630808306368495*^9, 3.630808345060708*^9}, {3.6308087281906223`*^9, 3.6308087555171847`*^9}, {3.630809110815507*^9, 3.630809169033837*^9}, { 3.6308091998195972`*^9, 3.630809448512822*^9}, {3.6308095328996487`*^9, 3.6308095448223305`*^9}, {3.630809582269472*^9, 3.6308095873607635`*^9}, { 3.630809665529235*^9, 3.630809684808337*^9}, {3.6308316258485594`*^9, 3.6308318380886984`*^9}, {3.63083188164919*^9, 3.630831966930068*^9}, 3.6320400558356075`*^9, {3.6354749882908883`*^9, 3.635474989418953*^9}, { 3.635475084557395*^9, 3.6354750875145636`*^9}, {3.6354751334091887`*^9, 3.635475162315842*^9}, {3.6354754001974483`*^9, 3.6354754820331287`*^9}, 3.635475512931896*^9, {3.6354756222781506`*^9, 3.635475622861184*^9}, { 3.635475691642118*^9, 3.6354757057969275`*^9}, {3.6354757798291616`*^9, 3.635475797395167*^9}, {3.635475884848169*^9, 3.6354758981309285`*^9}, { 3.635475961488552*^9, 3.6354759738382587`*^9}, {3.6354760213729773`*^9, 3.6354760572050266`*^9}, {3.6354761282470903`*^9, 3.635476136040536*^9}, { 3.6354761719365892`*^9, 3.635476212217893*^9}, {3.6593346599546614`*^9, 3.659334660890663*^9}, {3.6593347077219453`*^9, 3.659334720701168*^9}, { 3.6593348752974396`*^9, 3.6593348758122406`*^9}, {3.6593349140947075`*^9, 3.6593350070240707`*^9}, {3.6593350466949406`*^9, 3.6593350543701544`*^9}, {3.659335103791041*^9, 3.6593351614487424`*^9}, 3.659335217686841*^9, {3.659335262084519*^9, 3.6593352995869846`*^9}, { 3.6593356899482727`*^9, 3.659335701819893*^9}, {3.659335964227954*^9, 3.659335964602355*^9}, {3.65933603594128*^9, 3.6593360629605274`*^9}, { 3.6593361352354546`*^9, 3.6593361504454813`*^9}, {3.6593363929479074`*^9, 3.6593364061611304`*^9}, 3.6593368946915884`*^9, {3.6884748265656157`*^9, 3.6884748268716326`*^9}, {3.6884748600075283`*^9, 3.688474861420609*^9}, { 3.6885242858240776`*^9, 3.6885243001140976`*^9}, {3.6888842911675606`*^9, 3.6888843311676164`*^9}, {3.688966242423658*^9, 3.688966263933688*^9}, { 3.6897393587897596`*^9, 3.6897393649897685`*^9}, 3.689739477049925*^9, { 3.6898595970621734`*^9, 3.689859597272174*^9}, {3.6898596707522764`*^9, 3.6898597190523443`*^9}, {3.689859768552414*^9, 3.6898597721424184`*^9}, { 3.689859855272535*^9, 3.689859859882541*^9}, {3.6898605078334484`*^9, 3.6898607266237545`*^9}, 3.6898608811139708`*^9, {3.6898609634740863`*^9, 3.689860974304102*^9}, 3.6898610140141573`*^9, {3.6898611496043468`*^9, 3.6898611683243732`*^9}, {3.689861462024784*^9, 3.6898615624849253`*^9}, { 3.6898616142149973`*^9, 3.6898616164350004`*^9}, 3.6898616657950697`*^9, { 3.689861716805141*^9, 3.689861749905187*^9}, {3.732677920575506*^9, 3.7326779208190203`*^9}, {3.7519672427004185`*^9, 3.7519672444968877`*^9}, {3.7519674022097683`*^9, 3.75196742976579*^9}, { 3.751967484127989*^9, 3.751967510853814*^9}, {3.7519675409404893`*^9, 3.751967541549782*^9}, {3.7519675797751045`*^9, 3.751967592209671*^9}, { 3.7519676829383273`*^9, 3.7519676841255474`*^9}, {3.7519677154775553`*^9, 3.7519677953499403`*^9}, 3.751967827811061*^9, {3.7519679545625095`*^9, 3.751967957999185*^9}, {3.751968003754015*^9, 3.7519681477513895`*^9}, { 3.751968264817631*^9, 3.751968270722477*^9}, {3.7519689618119907`*^9, 3.751968969888235*^9}, {3.7519691168917775`*^9, 3.7519691395895615`*^9}, { 3.751969242782174*^9, 3.7519692581691785`*^9}, {3.7519693625211954`*^9, 3.751969378579924*^9}, {3.751969409572627*^9, 3.751969438643936*^9}, { 3.7519695894526725`*^9, 3.751969614306203*^9}, {3.7523200108586655`*^9, 3.752320012354121*^9}, {3.7553831315619707`*^9, 3.755383134119626*^9}, { 3.7553831893197794`*^9, 3.755383241814331*^9}, {3.7553832736267967`*^9, 3.7553832810757113`*^9}, {3.7554336536222963`*^9, 3.755433684797229*^9}, { 3.7554337764737434`*^9, 3.7554338315300155`*^9}, {3.755433998047738*^9, 3.7554340265485487`*^9}, {3.755446573138784*^9, 3.755446636911299*^9}, { 3.75544667493072*^9, 3.755446753435521*^9}, {3.755446891541581*^9, 3.7554468921547422`*^9}, {3.7554469323588533`*^9, 3.755446936867403*^9}, { 3.7554470190332975`*^9, 3.7554472776872244`*^9}, {3.7555217323692026`*^9, 3.755521732847602*^9}, {3.755521767127169*^9, 3.7555217972041793`*^9}, { 3.755522561453134*^9, 3.755522564231819*^9}, {3.755522601885935*^9, 3.7555226037287407`*^9}, {3.7555226758687305`*^9, 3.755522678585092*^9}, { 3.7555234832604623`*^9, 3.7555235920444417`*^9}, {3.7555239506007543`*^9, 3.755524013893358*^9}, {3.755524076791689*^9, 3.7555240812793446`*^9}, { 3.7555241238138275`*^9, 3.7555241268985643`*^9}, {3.7555242930449886`*^9, 3.7555243378577013`*^9}, {3.7555256673767824`*^9, 3.7555256808205338`*^9}, {3.7555258588384123`*^9, 3.755525900317296*^9}, { 3.755525930708299*^9, 3.7555260436531134`*^9}, {3.755607147401991*^9, 3.7556071504143705`*^9}, {3.755607992884314*^9, 3.7556080025382996`*^9}, { 3.7556094344057455`*^9, 3.7556094348690443`*^9}, {3.7559613653116636`*^9, 3.755961445097105*^9}, 3.755961484246889*^9, {3.7559618979231987`*^9, 3.755961939470047*^9}, {3.7559620323724904`*^9, 3.7559620330864005`*^9}, { 3.755962155557907*^9, 3.7559621601593847`*^9}, {3.755962303755834*^9, 3.755962343830135*^9}, {3.7559624058018165`*^9, 3.7559624450501757`*^9}, 3.756002186674869*^9, 3.7560029626855392`*^9, {3.756003222110388*^9, 3.756003295034633*^9}, {3.7560056331492863`*^9, 3.7560056663855457`*^9}, { 3.7560057813555765`*^9, 3.7560057863836613`*^9}, {3.7560058917172394`*^9, 3.756005927847292*^9}, 3.756006092376186*^9, 3.756009112317705*^9, { 3.756091886039587*^9, 3.756091887764086*^9}, {3.756092005435152*^9, 3.7560920727337685`*^9}, {3.75609212911592*^9, 3.7560921293252516`*^9}, { 3.756092262958163*^9, 3.756092263157668*^9}, {3.756092342487877*^9, 3.756092347894502*^9}, {3.7560929036769304`*^9, 3.7560929278911004`*^9}, { 3.7560930741522417`*^9, 3.756093083420331*^9}, {3.7560932986236534`*^9, 3.7560933139459305`*^9}, {3.756093449985523*^9, 3.7560934874491863`*^9}, { 3.756093592694581*^9, 3.7560936019456573`*^9}, {3.756093634438078*^9, 3.756093673866626*^9}, {3.756093873069885*^9, 3.756093897964734*^9}, { 3.7560940650109406`*^9, 3.756094078056768*^9}, {3.756442536546026*^9, 3.756442607904289*^9}, {3.7564436397451363`*^9, 3.7564436403231254`*^9}, { 3.7636034984570236`*^9, 3.7636034989933815`*^9}, {3.763603551051456*^9, 3.7636035527617817`*^9}, {3.7636036049384193`*^9, 3.7636036392233057`*^9}, {3.7636036850937223`*^9, 3.763603692587598*^9}, { 3.7636037258272257`*^9, 3.7636037459031096`*^9}, {3.7636037792254367`*^9, 3.76360387572289*^9}, {3.763603971837229*^9, 3.7636040341423655`*^9}, { 3.763604066526084*^9, 3.7636040756798687`*^9}, {3.7636041452118535`*^9, 3.763604278007333*^9}, {3.763604317710966*^9, 3.7636043271387568`*^9}, { 3.7636043584877644`*^9, 3.763604415561053*^9}, {3.763604445680462*^9, 3.7636044504114943`*^9}, {3.763604615444647*^9, 3.7636048082554193`*^9}, 3.763604854904996*^9, {3.7636133594095488`*^9, 3.7636133618464766`*^9}, { 3.7636136063756704`*^9, 3.7636136315671196`*^9}, {3.7636990373827705`*^9, 3.7636990431157646`*^9}, {3.763699090332087*^9, 3.763699110952259*^9}, { 3.763699227420497*^9, 3.7636993642943506`*^9}, {3.763700085627533*^9, 3.763700088329999*^9}, {3.7637001721125274`*^9, 3.763700181422837*^9}, { 3.763700248063385*^9, 3.7637003918630466`*^9}, {3.763700591783223*^9, 3.7637006017496295`*^9}, {3.7637007583576717`*^9, 3.7637007603074865`*^9}, {3.7637137795793185`*^9, 3.7637137822587233`*^9}, {3.7637148704355187`*^9, 3.763714870624051*^9}, { 3.763727592158518*^9, 3.7637275933445053`*^9}, {3.7637276688363667`*^9, 3.7637276694756594`*^9}, 3.763803448896332*^9, {3.76380349501632*^9, 3.7638036835067654`*^9}, {3.763804829093463*^9, 3.7638048385675254`*^9}, 3.7638051033646154`*^9, 3.7638053924528885`*^9, {3.763805557684454*^9, 3.763805634255308*^9}, {3.763806843847647*^9, 3.763806847966059*^9}, { 3.763806942652097*^9, 3.7638071770752254`*^9}, {3.7638141184594107`*^9, 3.763814134133461*^9}, {3.7638146808628216`*^9, 3.7638146925645113`*^9}, { 3.7638147709278784`*^9, 3.7638147811883087`*^9}, {3.7638148155281043`*^9, 3.763814819843194*^9}, {3.7638150259647446`*^9, 3.763815028601293*^9}, { 3.7638151529595194`*^9, 3.763815155849978*^9}, {3.7638163770262136`*^9, 3.763816380851597*^9}, {3.7638164181856327`*^9, 3.7638164950537987`*^9}, 3.763816568304102*^9, {3.7638166173645625`*^9, 3.763816618808757*^9}, { 3.7638167204462805`*^9, 3.763816721012859*^9}, {3.763857602253485*^9, 3.7638579604183645`*^9}, {3.7638580038507566`*^9, 3.7638580060526443`*^9}, {3.763858082269992*^9, 3.7638581746835337`*^9}, { 3.7638582163351564`*^9, 3.7638582415275116`*^9}, {3.7638582983238*^9, 3.763858907503306*^9}, {3.763858941318697*^9, 3.763858956626134*^9}, { 3.7638602435602536`*^9, 3.763860245408451*^9}, {3.7638694636456347`*^9, 3.7638694647177277`*^9}, {3.7638708199536576`*^9, 3.763870829436488*^9}, { 3.763871287170555*^9, 3.7638712876184006`*^9}, {3.763943214376035*^9, 3.7639432984591475`*^9}, {3.763943418832348*^9, 3.7639434335508127`*^9}, { 3.76394347113767*^9, 3.7639435187320576`*^9}, {3.763943585908682*^9, 3.7639436125255404`*^9}, {3.763951722152746*^9, 3.76395172989299*^9}, { 3.7639517863423367`*^9, 3.7639519945900664`*^9}, {3.763952081515512*^9, 3.7639521530710773`*^9}, {3.763952353248129*^9, 3.763952357026309*^9}, { 3.7639524211903834`*^9, 3.7639524243979177`*^9}, {3.7639527174925117`*^9, 3.7639527180252266`*^9}, {3.7641265625745993`*^9, 3.7641265632314167`*^9}, {3.764126605555829*^9, 3.7641266075095396`*^9}, { 3.7641268313964133`*^9, 3.7641268543573804`*^9}, {3.764127044657903*^9, 3.7641270479422092`*^9}, {3.7641271442332697`*^9, 3.7641271469362774`*^9}, {3.764127227626192*^9, 3.7641272592640233`*^9}, { 3.764127335707515*^9, 3.7641273386484756`*^9}, {3.764127429843852*^9, 3.7641274364304185`*^9}, {3.7641275071859307`*^9, 3.764127516803895*^9}, 3.7641276043548007`*^9, {3.7641276925365753`*^9, 3.764127697080591*^9}, 3.764127798472331*^9, 3.764127853631323*^9, 3.764127908496078*^9, { 3.7641280050343323`*^9, 3.764128022046494*^9}, {3.764128128597419*^9, 3.764128154116727*^9}, {3.7641286864636617`*^9, 3.764128701643106*^9}, { 3.7641289910924444`*^9, 3.7641290126680794`*^9}, {3.7641290672285347`*^9, 3.7641290737798567`*^9}, {3.7641325425120363`*^9, 3.764132565390477*^9}, { 3.7641327425004654`*^9, 3.764132750040793*^9}, 3.7641327968340364`*^9, { 3.764133146776842*^9, 3.764133204874522*^9}, {3.7641333488187037`*^9, 3.7641333525577593`*^9}, {3.764413145593136*^9, 3.7644131471236105`*^9}, { 3.764413201645049*^9, 3.7644132349609704`*^9}, {3.764413325008136*^9, 3.7644133748980193`*^9}, {3.7644134113425665`*^9, 3.7644135151187*^9}, { 3.764413554409053*^9, 3.7644136160674934`*^9}, {3.76441371984758*^9, 3.764413730103909*^9}, 3.764419641962368*^9, {3.7644198522879405`*^9, 3.764419879249356*^9}, 3.764419909536559*^9, {3.764419991012162*^9, 3.764420000171088*^9}, {3.7644200798862047`*^9, 3.7644200950961914`*^9}, { 3.7644201529471693`*^9, 3.764420153715966*^9}, {3.764420210346301*^9, 3.764420255343707*^9}, {3.764420296178318*^9, 3.7644203000939393`*^9}, { 3.7644203803359275`*^9, 3.7644203931390867`*^9}, 3.7644204418727274`*^9, { 3.7647259720700207`*^9, 3.7647261047260523`*^9}, {3.7647263483375626`*^9, 3.76472635879602*^9}, 3.764726656736601*^9, {3.764727009127914*^9, 3.764727020100875*^9}, {3.7647270591828785`*^9, 3.7647270819631023`*^9}, { 3.7647272109090505`*^9, 3.764727227846332*^9}, {3.76473247809907*^9, 3.7647324813925114`*^9}, {3.7647349484962797`*^9, 3.7647349979358416`*^9}, {3.7647351097258167`*^9, 3.764735124772463*^9}, { 3.7647352810674453`*^9, 3.7647352901139917`*^9}, {3.7647353746429515`*^9, 3.764735379550926*^9}, {3.7647354596539807`*^9, 3.764735507677454*^9}, { 3.7647355546341*^9, 3.764735728811817*^9}, {3.764735837449795*^9, 3.76473584132898*^9}, {3.76473603649269*^9, 3.7647360592982664`*^9}, { 3.7647360998228803`*^9, 3.76473621551197*^9}, {3.7647362545599003`*^9, 3.764736286430997*^9}, {3.7647364592833533`*^9, 3.764736464019006*^9}, { 3.764736566167658*^9, 3.7647365918958225`*^9}, {3.764764761680134*^9, 3.7647648482473745`*^9}, 3.764764917763693*^9, {3.764764964821686*^9, 3.764765090741813*^9}, {3.7647651742140284`*^9, 3.7647652517335076`*^9}, { 3.764765341266399*^9, 3.7647653614173465`*^9}, 3.764765400284145*^9, { 3.764765691384389*^9, 3.764765708710143*^9}, 3.7647657454275875`*^9, { 3.76476578351686*^9, 3.764765871262255*^9}, {3.7647661045180917`*^9, 3.76476612822571*^9}, {3.7647661964223824`*^9, 3.764766239375331*^9}, { 3.764766330361228*^9, 3.764766338297905*^9}, {3.764767015060799*^9, 3.7647670193029037`*^9}, {3.764767076590926*^9, 3.7647671160277977`*^9}, { 3.7647671493139205`*^9, 3.7647672079236426`*^9}, {3.764767458938404*^9, 3.7647674608323865`*^9}, {3.764810938444873*^9, 3.7648109399353456`*^9}, { 3.7648118616019874`*^9, 3.7648118695079126`*^9}, {3.7648120589477816`*^9, 3.7648124600413237`*^9}, {3.76481250476682*^9, 3.7648125259602103`*^9}, { 3.764812601341893*^9, 3.7648126577763243`*^9}, {3.7648126944039307`*^9, 3.7648128855627623`*^9}, {3.764812924923909*^9, 3.764812926481821*^9}, { 3.764813041485982*^9, 3.764813131254232*^9}, {3.7648134679328885`*^9, 3.7648136479313235`*^9}, {3.7648136917777314`*^9, 3.764813697753367*^9}, { 3.7648137297570653`*^9, 3.764813747862262*^9}, 3.764813784221693*^9, { 3.7648138370678406`*^9, 3.7648141387969923`*^9}, {3.764814321050164*^9, 3.764814422489184*^9}, {3.764814461366684*^9, 3.7648145835728483`*^9}, { 3.764814614769511*^9, 3.7648147525825167`*^9}, {3.764815363375289*^9, 3.7648153644907384`*^9}, {3.764815451671169*^9, 3.7648154601533747`*^9}, { 3.7648175917802963`*^9, 3.7648176401910563`*^9}, {3.765885491237231*^9, 3.765885501131465*^9}, {3.766572999289345*^9, 3.7665729996020145`*^9}, { 3.7665730613126965`*^9, 3.7665730616706066`*^9}, {3.7840103262125545`*^9, 3.7840103546413517`*^9}, {3.784011309725755*^9, 3.7840113197719574`*^9}, { 3.784013374800973*^9, 3.7840133842981763`*^9}, {3.7840238533665447`*^9, 3.78402395932942*^9}, {3.784024091276659*^9, 3.784024112209529*^9}, { 3.7840242793219643`*^9, 3.784024296655184*^9}, {3.7840290670892677`*^9, 3.7840291348388853`*^9}, {3.784029222997594*^9, 3.784029542926179*^9}, { 3.784375172285057*^9, 3.784375319701829*^9}, {3.7843753678421807`*^9, 3.7843753788103914`*^9}, {3.7843754844339557`*^9, 3.784375827494117*^9}, { 3.784375862317687*^9, 3.7843759567563844`*^9}, {3.784376004941759*^9, 3.7843760080157185`*^9}, {3.784376101918992*^9, 3.7843761244332943`*^9}, { 3.784376181191763*^9, 3.7843762145091863`*^9}, {3.7843792489960337`*^9, 3.78437926273014*^9}, {3.7843793293934345`*^9, 3.784379368676588*^9}, { 3.7843796529835215`*^9, 3.7843796858862267`*^9}, {3.784450863324359*^9, 3.7844508986076546`*^9}, {3.7844510208392324`*^9, 3.784451027915551*^9}, { 3.7844511176315613`*^9, 3.7844511673791957`*^9}, {3.784451235055628*^9, 3.78445132575735*^9}, {3.784451995615477*^9, 3.7844520110330954`*^9}, { 3.7844522907551537`*^9, 3.7844523421551*^9}, {3.784700119490345*^9, 3.7847001627913013`*^9}, {3.7847004221290607`*^9, 3.7847004380767317`*^9}, 3.7847007913506136`*^9, {3.784781955129138*^9, 3.784781977787957*^9}, { 3.78488170216677*^9, 3.784881704210422*^9}, 3.784882130557441*^9, { 3.78488220347418*^9, 3.7848822064697027`*^9}, {3.784883393455822*^9, 3.784883458551924*^9}, 3.7848835306495824`*^9, {3.7848836822092113`*^9, 3.7848837303696923`*^9}, 3.7848838199009576`*^9, {3.7848842507527857`*^9, 3.7848842836585226`*^9}, 3.7848843847882996`*^9, {3.784884461405264*^9, 3.7848844645041113`*^9}, {3.784884559404122*^9, 3.7848845656634912`*^9}, { 3.7848852409944844`*^9, 3.7848852740337477`*^9}, {3.7848854548929386`*^9, 3.7848854893046365`*^9}, {3.7848856741783943`*^9, 3.784885691704702*^9}, { 3.784885809660874*^9, 3.784885811424426*^9}, {3.7848860031948376`*^9, 3.784886020570098*^9}, 3.7848861057105627`*^9, {3.7848861627726107`*^9, 3.7848862212876124`*^9}, {3.784886306497995*^9, 3.7848863509322224`*^9}, 3.784886472690192*^9, {3.7848866596243*^9, 3.784886664116289*^9}, { 3.7848866987282944`*^9, 3.7848867077911897`*^9}, {3.78488676128524*^9, 3.7848868667029366`*^9}, {3.7848869381224003`*^9, 3.7848869414281464`*^9}, {3.7848870104508753`*^9, 3.784887039889447*^9}, { 3.7848871795058794`*^9, 3.7848871976746817`*^9}, {3.7848872311446314`*^9, 3.78488724075662*^9}, 3.784887405188785*^9, {3.784887591926689*^9, 3.7848876119305134`*^9}, {3.784887676620901*^9, 3.7848876786672792`*^9}, { 3.78488771054331*^9, 3.784887714354906*^9}, {3.7848877625809546`*^9, 3.7848878103041153`*^9}, 3.7848878862881575`*^9, {3.787717235155089*^9, 3.787717269464238*^9}, {3.7877174592607603`*^9, 3.7877174674038067`*^9}, { 3.7877271032841845`*^9, 3.787727136247201*^9}, 3.787727355369296*^9, 3.7877274973278403`*^9, {3.787727855959008*^9, 3.78772792141208*^9}, 3.787728113487193*^9, {3.7877281704571557`*^9, 3.7877281735077004`*^9}, 3.7877282789827795`*^9, {3.7877286510229864`*^9, 3.787728665729192*^9}, { 3.7877287942225084`*^9, 3.787728807671986*^9}, {3.787729044867985*^9, 3.787729045536916*^9}, {3.787729589732438*^9, 3.7877296062090626`*^9}, { 3.787729794037467*^9, 3.7877297950347877`*^9}, {3.787729855548402*^9, 3.7877299039179935`*^9}, {3.7877300373241186`*^9, 3.787730068136018*^9}, { 3.7877301999859333`*^9, 3.7877302014150777`*^9}, {3.787732033225385*^9, 3.7877320471634016`*^9}, {3.787732077195259*^9, 3.7877320780358667`*^9}, 3.787732189759206*^9, {3.78773231889835*^9, 3.787732327710633*^9}, { 3.7877324857166643`*^9, 3.787732496655479*^9}, {3.7877325848303585`*^9, 3.78773258503596*^9}, {3.7877328504631166`*^9, 3.7877328625892415`*^9}, { 3.7877330254884944`*^9, 3.7877330271019044`*^9}, {3.787733136128061*^9, 3.7877331422258835`*^9}, {3.787733243513567*^9, 3.78773324558677*^9}, 3.787733310555999*^9, 3.7877334085329347`*^9, {3.7877337955932293`*^9, 3.7877337970498257`*^9}, {3.787733867727028*^9, 3.7877338687324905`*^9}, { 3.7877352224369583`*^9, 3.787735224161746*^9}, {3.787735343322833*^9, 3.787735348772827*^9}, {3.787735422704711*^9, 3.7877354268945775`*^9}, { 3.7877355100355635`*^9, 3.787735514671461*^9}, {3.7877356541994534`*^9, 3.7877356632141013`*^9}, 3.7877357913476543`*^9, 3.787736261837074*^9, { 3.7882542159043374`*^9, 3.7882542747998285`*^9}, {3.788254310967661*^9, 3.788254318430212*^9}, {3.788254585790197*^9, 3.7882545888318524`*^9}, { 3.7882547349987383`*^9, 3.788254735940298*^9}, 3.788254830063775*^9, 3.7882549155286837`*^9, {3.7882550121437798`*^9, 3.788255037735396*^9}, { 3.7882551764404287`*^9, 3.78825518352113*^9}, {3.7882552540030313`*^9, 3.788255290224329*^9}, {3.7882553843544893`*^9, 3.788255423248046*^9}, { 3.78825567982127*^9, 3.7882556852479534`*^9}, {3.7882557908576803`*^9, 3.7882558029800806`*^9}, {3.7882560240494256`*^9, 3.7882560388846164`*^9}, 3.788256102343512*^9, {3.788256161397396*^9, 3.7882561626372194`*^9}, { 3.7882562304311895`*^9, 3.78825629590362*^9}, {3.7882563614677362`*^9, 3.7882563620189795`*^9}, {3.7882564138122153`*^9, 3.7882564294158382`*^9}, {3.788256467457189*^9, 3.7882564889521217`*^9}, { 3.7882565883311844`*^9, 3.788256591497148*^9}, {3.7882568409513097`*^9, 3.7882568724526567`*^9}, {3.788256965258837*^9, 3.788256966444976*^9}, { 3.7882570073831463`*^9, 3.7882570497349973`*^9}, {3.7882570992487097`*^9, 3.788257144206352*^9}, {3.78825721252205*^9, 3.788257307277931*^9}, { 3.788257350410209*^9, 3.7882573617262745`*^9}, {3.788257424936472*^9, 3.788257434118204*^9}, {3.788276311330668*^9, 3.788276311647092*^9}, { 3.7882765465512347`*^9, 3.788276608568333*^9}, {3.7882767715851693`*^9, 3.7882768045752783`*^9}, {3.7882769342607436`*^9, 3.7882769409894867`*^9}, {3.7882770202208567`*^9, 3.7882770424485188`*^9}, {3.7882770760040703`*^9, 3.788277077341468*^9}, { 3.788277147336176*^9, 3.788277150397852*^9}, {3.7882772069909*^9, 3.7882772101572385`*^9}, {3.7882772503366175`*^9, 3.7882772773759403`*^9}, {3.7882773922958755`*^9, 3.7882773927832017`*^9}, {3.788277450684473*^9, 3.788277482126852*^9}, { 3.78827754293396*^9, 3.788277545027956*^9}, {3.7883214550230436`*^9, 3.7883214742097826`*^9}, {3.788321520104019*^9, 3.788321685390153*^9}, { 3.788321717307153*^9, 3.788321801831746*^9}, {3.788321836768508*^9, 3.788322037754008*^9}, {3.7883220686363816`*^9, 3.788322220085001*^9}, { 3.7883255906192427`*^9, 3.788325646609389*^9}, {3.7883257976991563`*^9, 3.788325804097658*^9}, {3.788325969279187*^9, 3.7883259830028267`*^9}, { 3.788326975877249*^9, 3.788326979070017*^9}, {3.788328539286415*^9, 3.788328618410488*^9}, {3.788328648595448*^9, 3.788328762662589*^9}, { 3.7883288060890923`*^9, 3.7883288805716724`*^9}, {3.7883319188300047`*^9, 3.78833193230753*^9}, {3.7883321144947567`*^9, 3.788332115050151*^9}, { 3.7883333680456443`*^9, 3.7883333686272163`*^9}, 3.7883336421611414`*^9, { 3.788333691323177*^9, 3.7883336916362*^9}, {3.788333797629262*^9, 3.7883338348662343`*^9}, {3.7883339555470386`*^9, 3.7883339660305166`*^9}, {3.7883340291758356`*^9, 3.788334031484354*^9}, { 3.788334368484807*^9, 3.7883343918754945`*^9}, {3.7883345963739557`*^9, 3.788334645315611*^9}, {3.788411405608647*^9, 3.788411409092114*^9}, { 3.7884115644712825`*^9, 3.7884115911998663`*^9}, {3.7884116673998833`*^9, 3.788411758799066*^9}, {3.788411985303985*^9, 3.788412002701314*^9}, { 3.78841218266156*^9, 3.788412217652734*^9}, {3.788412679618697*^9, 3.78841268296084*^9}, {3.788412968920223*^9, 3.7884129782039633`*^9}, { 3.7884155241723013`*^9, 3.7884155243798914`*^9}, 3.7884156619519596`*^9, { 3.7884162343262696`*^9, 3.788416236013459*^9}, {3.789022054245319*^9, 3.7890221116154556`*^9}, {3.7890222001685014`*^9, 3.789022205961149*^9}, { 3.789094077050009*^9, 3.7890940781167436`*^9}, {3.7890941254883175`*^9, 3.7890942919861226`*^9}, {3.789094340508856*^9, 3.789094543716852*^9}, { 3.789094583794143*^9, 3.7890947278803444`*^9}, {3.7890947714417076`*^9, 3.7890948342626343`*^9}, {3.789095197615344*^9, 3.789095215073329*^9}, { 3.789095256390032*^9, 3.78909525710861*^9}, {3.7890954241290827`*^9, 3.78909583987399*^9}, {3.789096056032333*^9, 3.7890960602768464`*^9}, { 3.7890960928429904`*^9, 3.789096098149865*^9}, {3.789096721918685*^9, 3.789096734998893*^9}, {3.7890967741973257`*^9, 3.78909683859006*^9}, { 3.789096947653244*^9, 3.789097122315098*^9}, {3.7890971528708224`*^9, 3.789097530683948*^9}, {3.7890975852885656`*^9, 3.7890975882562447`*^9}, { 3.7890976430709224`*^9, 3.789097656213524*^9}, {3.789107592314107*^9, 3.7891076537760305`*^9}, {3.789107685160589*^9, 3.789107760590632*^9}, { 3.7891078105008087`*^9, 3.789107846610609*^9}, {3.789107989236459*^9, 3.7891080001561875`*^9}, {3.7891082032172785`*^9, 3.7891082064574785`*^9}, {3.7891083013630204`*^9, 3.789108444864075*^9}, { 3.7891084751958127`*^9, 3.7891085010044174`*^9}, {3.7891085322441816`*^9, 3.7891085353767447`*^9}, {3.789108620037199*^9, 3.789108662297584*^9}, 3.7891087252471294`*^9, {3.789108773507248*^9, 3.7891088501491203`*^9}, { 3.7891088829987*^9, 3.789108918319019*^9}, {3.7891089606286983`*^9, 3.7891090044788837`*^9}, {3.789109048556943*^9, 3.7891091177554493`*^9}, { 3.7891091628149347`*^9, 3.7891092922346783`*^9}, {3.789109382870388*^9, 3.789109402625166*^9}, {3.7891111380334797`*^9, 3.7891113582877145`*^9}, { 3.789111396694514*^9, 3.7891114221541777`*^9}, {3.7891114539845037`*^9, 3.7891114952359962`*^9}, {3.789112929457416*^9, 3.7891129318274393`*^9}, { 3.789112963290578*^9, 3.7891131302196255`*^9}, {3.789113202949188*^9, 3.789113203379569*^9}, {3.7891144371217365`*^9, 3.789114518411393*^9}, { 3.789114638487608*^9, 3.78911468069436*^9}, {3.789114763918976*^9, 3.789114777923211*^9}, {3.789114809301983*^9, 3.7891148392057247`*^9}, { 3.7891148923150015`*^9, 3.789114904054755*^9}, {3.7891149560740595`*^9, 3.7891150071774015`*^9}, {3.789115109642312*^9, 3.7891151147637*^9}, { 3.7891185439211864`*^9, 3.789118561569729*^9}, {3.7891187834106455`*^9, 3.7891187854068985`*^9}, {3.7891188764873776`*^9, 3.7891188767373095`*^9}, {3.789121799028477*^9, 3.789121806719482*^9}, { 3.7891222627163153`*^9, 3.7891222774782734`*^9}, {3.7891223914541044`*^9, 3.7891224006004095`*^9}, {3.789122431773783*^9, 3.7891224422816577`*^9}, { 3.7891224731160736`*^9, 3.789122501042121*^9}, {3.7891226653529224`*^9, 3.7891226664045706`*^9}, 3.789122819901965*^9, {3.789122893844426*^9, 3.7891229543768473`*^9}, {3.7891229964274464`*^9, 3.7891231044294157`*^9}, {3.789123228485856*^9, 3.789123374714591*^9}, { 3.789124218156231*^9, 3.789124220106046*^9}, {3.789124254593116*^9, 3.7891242583777695`*^9}, {3.7891243156014767`*^9, 3.789124326373148*^9}, { 3.789125154499303*^9, 3.7891252228031907`*^9}, {3.8200454708911095`*^9, 3.8200454840718527`*^9}}, CellLabel-> "In[180]:=",ExpressionUUID->"117c0ca4-532b-4c80-b984-5aae860e39e2"] }, Closed]], Cell[CellGroupData[{ Cell["SHELL ELEMENT (disp) defs ", "Subsection", CellChangeTimes->{{3.6303896070263977`*^9, 3.6303896080872*^9}, 3.8435394517660627`*^9},ExpressionUUID->"410f6a81-8c7a-41cd-94e3-\ 8503e0e4f664"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MEC", "-", "E1050"}], " ", "|", " ", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", "tt", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "n\[Alpha]", ",", "n\[Beta]", ",", "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "NN", ",", "mat", ",", "MM", ",", "r", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "r\[Gamma]", ",", "rn", ",", "jac", ",", "h\[Alpha]", ",", "e\[Alpha]", ",", "h\[Beta]", ",", "h\[Gamma]", ",", "e\[Beta]", ",", "en", ",", "e\[Gamma]", ",", "FF", ",", "\[Alpha]\[Gamma]", ",", "\[Beta]\[Gamma]", ",", "edg", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "\[Pi]u", ",", "\[Pi]v", ",", "\[Pi]w", ",", "\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]", ",", "f\[Alpha]", ",", "f\[Gamma]", ",", "fn", ",", "m\[Alpha]", ",", "m\[Gamma]", ",", "mn", ",", "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]", ",", "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]", ",", "\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]", ",", "GG", ",", "N\[Alpha]\[Alpha]", ",", "N\[Gamma]\[Gamma]", ",", "N\[Alpha]\[Gamma]", ",", "N\[Gamma]\[Alpha]", ",", "M\[Alpha]\[Alpha]", ",", "M\[Gamma]\[Gamma]", ",", "M\[Alpha]\[Gamma]", ",", "Q\[Alpha]", ",", "Q\[Gamma]", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wmap", ",", "AA"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"mat", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]", "=", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}]}], ";", " ", RowBox[{"r\[Beta]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Norm", "[", "r\[Beta]", "]"}]}], ";", " ", RowBox[{"h\[Alpha]", "=", RowBox[{"Norm", "[", "r\[Alpha]", "]"}]}], ";", RowBox[{"jac", "=", RowBox[{"Norm", "[", RowBox[{"r\[Alpha]", "\[Cross]", "r\[Beta]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Alpha]", "=", RowBox[{"r\[Alpha]", "/", "h\[Alpha]"}]}], ";", RowBox[{"e\[Beta]", "=", RowBox[{"r\[Beta]", "/", "h\[Beta]"}]}], ";", " ", RowBox[{"en", "=", RowBox[{ RowBox[{"r\[Alpha]", "\[Cross]", "r\[Beta]"}], " ", "/", "jac"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r\[Gamma]", "=", RowBox[{"r\[Beta]", "-", RowBox[{ RowBox[{"(", RowBox[{"r\[Beta]", ".", "e\[Alpha]"}], ")"}], " ", "e\[Alpha]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Gamma]", "=", RowBox[{"Norm", "[", "r\[Gamma]", "]"}]}], ";", RowBox[{"e\[Gamma]", "=", RowBox[{"r\[Gamma]", "/", "h\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", "e\[Gamma]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]\[Gamma]", ",", "\[Beta]\[Gamma]"}], "}"}], "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Alpha]"}], ",", RowBox[{"r\[Alpha]", ".", "r\[Beta]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Beta]"}], ",", RowBox[{"r\[Beta]", ".", "r\[Beta]"}]}], "}"}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Gamma]"}], ",", RowBox[{"r\[Beta]", ".", "r\[Gamma]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"edg", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Sort", "[", "#", "]"}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{ RowBox[{"(", RowBox[{"mat", ".", "NN"}], ")"}], ".", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", "#", "]"}]}], "]"}], "&"}], ",", "edg"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{ RowBox[{"(", RowBox[{"mat", ".", "NN"}], ")"}], ".", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", "#", "]"}]}], "]"}], "&"}], ",", "edg"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"(", RowBox[{"mat", ".", "NN"}], ")"}], ".", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", "#", "]"}]}], "]"}], "&"}], ",", "edg"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "1"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "3"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]Z", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"projection", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Pi]\[Phi]", "=", RowBox[{ RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}], "/", "60"}], "+", " ", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "1"}], "]"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Theta]", "=", RowBox[{ RowBox[{ RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}], "/", "60"}], "+", " ", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "2"}], "]"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Psi]", "=", RowBox[{ RowBox[{ RowBox[{"\[Theta]Z", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}], "/", "60"}], "+", " ", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "3"}], "]"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Pi]u", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]v", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]w", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "the", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Pi]u", ",", "\[Pi]v", ",", "\[Pi]w"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"\[Pi]u", ",", "\[Pi]v", ",", "\[Pi]w"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Gamma]", ",", "fn"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"strain", " ", "measures", " ", "with", " ", "non"}], "-", RowBox[{"symmetric", " ", "\[Epsilon]"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v"}]}]}], ")"}], "/", "h\[Gamma]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], "/", "h\[Alpha]"}], "-", "\[Psi]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u"}]}]}], ")"}], "/", "h\[Gamma]"}], "+", "\[Psi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}]}]}], ")"}]}], "/", "h\[Gamma]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", " ", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Theta]"}]}]}], ")"}], "/", "h\[Gamma]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], "/", "h\[Alpha]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], "/", "h\[Alpha]"}], "+", "\[Pi]\[Theta]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}]}]}], ")"}], "/", "h\[Gamma]"}], "-", "\[Pi]\[Phi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "stress", " ", "resultants", " ", "with", " ", "a", " ", "nonsymmetric", " ", "N"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Alpha]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Gamma]\[Gamma]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Gamma]\[Gamma]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Gamma]\[Gamma]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Gamma]", "=", RowBox[{ "tt", "*", "2", " ", "GG", "*", "\[Epsilon]\[Alpha]\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Gamma]\[Alpha]", "=", RowBox[{ "tt", "*", "2", " ", "GG", "*", "\[Epsilon]\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Alpha]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Gamma]\[Gamma]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Gamma]\[Gamma]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Gamma]\[Gamma]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Gamma]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", " ", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "\[Nu]\[Nu]"}]}], ")"}]}], "*", "\[Kappa]\[Alpha]\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Alpha]", "=", RowBox[{ RowBox[{"5", "/", "6"}], " ", "*", "GG", "*", "tt", "*", "\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Gamma]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"virtual", " ", "work"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "N\[Alpha]\[Alpha]", ",", "N\[Gamma]\[Gamma]", ",", "N\[Alpha]\[Gamma]", ",", "N\[Gamma]\[Alpha]"}], "}"}]}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "M\[Alpha]\[Alpha]", ",", "M\[Gamma]\[Gamma]", ",", "M\[Alpha]\[Gamma]"}], "}"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"Q\[Alpha]", ",", "Q\[Gamma]"}], "}"}]}]}]}], ";", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Gamma]", ",", "fn"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wmap", "=", RowBox[{ RowBox[{ RowBox[{"-", "1"}], "/", "100000"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Pi]u", "-", "u"}], "]"}], "*", RowBox[{"(", RowBox[{"\[Pi]u", "-", "u"}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Pi]v", "-", "v"}], "]"}], "*", RowBox[{"(", RowBox[{"\[Pi]v", "-", "v"}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Pi]w", "-", "w"}], "]"}], "*", RowBox[{"(", RowBox[{"\[Pi]w", "-", "w"}], ")"}]}]}], ")"}], "*", "tt", "*", RowBox[{"EE", "/", "jac"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI3", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wmap"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}], "]"}]}], ";"}], "\n", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", "tt", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "n\[Alpha]", ",", "n\[Beta]", ",", "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "NN", ",", "mat", ",", "MM", ",", "r", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "r\[Gamma]", ",", "rn", ",", "jac", ",", "h\[Alpha]", ",", "e\[Alpha]", ",", "h\[Beta]", ",", "h\[Gamma]", ",", "e\[Beta]", ",", "en", ",", "e\[Gamma]", ",", "FF", ",", "\[Alpha]\[Gamma]", ",", "\[Beta]\[Gamma]", ",", "edg", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]", ",", "f\[Alpha]", ",", "f\[Gamma]", ",", "fn", ",", "m\[Alpha]", ",", "m\[Gamma]", ",", "mn", ",", "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]", ",", "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]", ",", "\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]", ",", "N\[Alpha]\[Alpha]", ",", "N\[Gamma]\[Gamma]", ",", "N\[Alpha]\[Gamma]", ",", "N\[Gamma]\[Alpha]", ",", "M\[Alpha]\[Alpha]", ",", "M\[Gamma]\[Gamma]", ",", "M\[Alpha]\[Gamma]", ",", "Q\[Alpha]", ",", "Q\[Gamma]", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wmap"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "n1", ",", "n2", ",", "n3", ",", "n12", ",", "n23", ",", "n31"}], "*)"}], "\[IndentingNewLine]", RowBox[{"MM", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "+", RowBox[{"2", " ", SuperscriptBox["\[Alpha]", "2"]}], "-", RowBox[{"3", " ", "\[Beta]"}], "+", RowBox[{"2", " ", SuperscriptBox["\[Beta]", "2"]}], "+", RowBox[{"\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "3"}], "+", RowBox[{"4", " ", "\[Beta]"}]}], ")"}]}]}], ",", RowBox[{"\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Alpha]"}]}], ")"}]}], ",", RowBox[{"\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", "\[Beta]"}]}], ")"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"-", "4"}], " ", "\[Alpha]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]", "+", "\[Beta]"}], ")"}]}], ",", RowBox[{"4", " ", "\[Alpha]", " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"-", "4"}], " ", "\[Beta]", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]", "+", "\[Beta]"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]", "=", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}]}], ";", " ", RowBox[{"r\[Beta]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Norm", "[", "r\[Beta]", "]"}]}], ";", " ", RowBox[{"h\[Alpha]", "=", RowBox[{"Norm", "[", "r\[Alpha]", "]"}]}], ";", RowBox[{"jac", "=", RowBox[{"Norm", "[", RowBox[{"r\[Alpha]", "\[Cross]", "r\[Beta]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Alpha]", "=", RowBox[{"r\[Alpha]", "/", "h\[Alpha]"}]}], ";", RowBox[{"e\[Beta]", "=", RowBox[{"r\[Beta]", "/", "h\[Beta]"}]}], ";", " ", RowBox[{"en", "=", RowBox[{ RowBox[{"r\[Alpha]", "\[Cross]", "r\[Beta]"}], " ", "/", "jac"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r\[Gamma]", "=", RowBox[{"r\[Beta]", "-", RowBox[{ RowBox[{"(", RowBox[{"r\[Beta]", ".", "e\[Alpha]"}], ")"}], " ", "e\[Alpha]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Gamma]", "=", RowBox[{"Norm", "[", "r\[Gamma]", "]"}]}], ";", RowBox[{"e\[Gamma]", "=", RowBox[{"r\[Gamma]", "/", "h\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", "e\[Gamma]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]\[Gamma]", ",", "\[Beta]\[Gamma]"}], "}"}], "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Alpha]"}], ",", RowBox[{"r\[Alpha]", ".", "r\[Beta]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Beta]"}], ",", RowBox[{"r\[Beta]", ".", "r\[Beta]"}]}], "}"}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Gamma]"}], ",", RowBox[{"r\[Beta]", ".", "r\[Gamma]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"edg", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Sort", "[", "#", "]"}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"MM", ".", RowBox[{"Join", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"uX", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], ",", RowBox[{"uX", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}], ",", RowBox[{"uX", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}], "}"}], ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"uX", "[", "#", "]"}], "&"}], ",", "edg"}], "]"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"MM", ".", RowBox[{"Join", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"uY", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}], "}"}], ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"uY", "[", "#", "]"}], "&"}], ",", "edg"}], "]"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"MM", ".", RowBox[{"Join", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"uZ", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}], "}"}], ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"uZ", "[", "#", "]"}], "&"}], ",", "edg"}], "]"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "1"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}]}], ")"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}]}], ")"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "3"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"\[Theta]Z", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"\[Theta]Z", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]Z", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}]}], ")"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Theta]", "=", RowBox[{"NN", ".", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "2"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "5", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "5"}], "}"}]}], "}"}], "/", "420"}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}], "}"}]}]}], ")"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "projection", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Pi]\[Phi]", "=", RowBox[{"NN", ".", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "5", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "5"}], "}"}]}], "}"}], "/", "420"}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], ",", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}], ",", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}], "}"}]}]}], ")"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Theta]", "=", RowBox[{"NN", ".", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "2"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "5", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "5"}], "}"}]}], "}"}], "/", "420"}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}], "}"}]}]}], ")"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Pi]\[Psi]", "=", RowBox[{"NN", ".", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "3"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "5", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "5"}], "}"}]}], "}"}], "/", "420"}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]Z", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "1"}], "}"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "2"}], "}"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "3"}], "}"}], "]"}]}], "}"}]}]}], ")"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Pi]u", "=", RowBox[{"MM", ".", RowBox[{"Join", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "1"}], "]"}], "]"}], ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"uX", "[", "#", "]"}], "&"}], ",", "edg"}], "]"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Pi]v", "=", RowBox[{"MM", ".", RowBox[{"Join", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "2"}], "]"}], "]"}], ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"uY", "[", "#", "]"}], "&"}], ",", "edg"}], "]"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Pi]w", "=", RowBox[{"MM", ".", RowBox[{"Join", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "3"}], "]"}], "]"}], ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"uZ", "[", "#", "]"}], "&"}], ",", "edg"}], "]"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "the", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Gamma]", ",", "fn"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"strain", " ", "measures", " ", "with", " ", "non"}], "-", RowBox[{"symmetric", " ", "\[Epsilon]"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v"}]}]}], ")"}], "/", "h\[Gamma]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], "/", "h\[Alpha]"}], "-", "\[Psi]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u"}]}]}], ")"}], "/", "h\[Gamma]"}], "+", "\[Psi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}]}]}], ")"}]}], "/", "h\[Gamma]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", " ", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Theta]"}]}]}], ")"}], "/", "h\[Gamma]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], "/", "h\[Alpha]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], "/", "h\[Alpha]"}], "+", "\[Pi]\[Theta]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}]}]}], ")"}], "/", "h\[Gamma]"}], "-", "\[Pi]\[Phi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "stress", " ", "resultants", " ", "with", " ", "a", " ", "nonsymmetric", " ", "N"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Alpha]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Gamma]\[Gamma]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Gamma]\[Gamma]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Gamma]\[Gamma]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Gamma]", "=", RowBox[{ "tt", "*", "2", " ", "GG", "*", "\[Epsilon]\[Alpha]\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Gamma]\[Alpha]", "=", RowBox[{ "tt", "*", "2", " ", "GG", "*", "\[Epsilon]\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Alpha]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Gamma]\[Gamma]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Gamma]\[Gamma]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Gamma]\[Gamma]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Gamma]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", " ", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "\[Nu]\[Nu]"}]}], ")"}]}], "*", "\[Kappa]\[Alpha]\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Alpha]", "=", RowBox[{ RowBox[{"5", "/", "6"}], " ", "*", "GG", "*", "tt", "*", "\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Gamma]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"virtual", " ", "work"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "N\[Alpha]\[Alpha]", ",", "N\[Gamma]\[Gamma]", ",", "N\[Alpha]\[Gamma]", ",", "N\[Gamma]\[Alpha]"}], "}"}]}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "M\[Alpha]\[Alpha]", ",", "M\[Gamma]\[Gamma]", ",", "M\[Alpha]\[Gamma]"}], "}"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"Q\[Alpha]", ",", "Q\[Gamma]"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Gamma]", ",", "fn"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wmap", "=", RowBox[{ RowBox[{ RowBox[{"-", "1"}], "/", "100"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Pi]u", "-", "u"}], "]"}], "*", RowBox[{"(", RowBox[{"\[Pi]u", "-", "u"}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Pi]v", "-", "v"}], "]"}], "*", RowBox[{"(", RowBox[{"\[Pi]v", "-", "v"}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Pi]w", "-", "w"}], "]"}], "*", RowBox[{"(", RowBox[{"\[Pi]w", "-", "w"}], ")"}]}]}], ")"}], "*", "tt", "*", RowBox[{"EE", "/", "jac"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI28", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}], "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.4426474258030453`*^9, {3.4444401255942*^9, 3.4444401388073997`*^9}, { 3.4444401803034*^9, 3.4444401844062*^9}, 3.4444402418922*^9, { 3.4444402805022*^9, 3.4444403134026003`*^9}, {3.4444403443062*^9, 3.4444404484049997`*^9}, {3.444483267101*^9, 3.444483267335*^9}, { 3.4444833136046*^9, 3.4444835622998*^9}, {3.4444836421094*^9, 3.4444837777981997`*^9}, {3.444483920429*^9, 3.4444839412237997`*^9}, 3.4444842905546*^9, {3.4444843207406*^9, 3.4444844162282*^9}, { 3.4444844465078*^9, 3.4444844624354*^9}, {3.4444845255998*^9, 3.4444845894505997`*^9}, {3.4444846290746*^9, 3.444484933025*^9}, { 3.4444849790917997`*^9, 3.4444851148742*^9}, {3.444534936054*^9, 3.4445349675348*^9}, {3.4445355821731997`*^9, 3.44453585174*^9}, { 3.4445372162198*^9, 3.4445372264378*^9}, 3.444537384731*^9, { 3.4445377585382*^9, 3.4445377605818*^9}, {3.4445379733658*^9, 3.4445379736934*^9}, {3.4445380176762*^9, 3.444538032777*^9}, { 3.4445381079222*^9, 3.4445381581386003`*^9}, {3.4445382726456003`*^9, 3.4445382910067997`*^9}, {3.4445383401312*^9, 3.4445383475880003`*^9}, { 3.444538438458*^9, 3.4445384464608*^9}, {3.4445385680783997`*^9, 3.4445385687648*^9}, {3.4445389411991997`*^9, 3.4445389431024*^9}, { 3.444539746605*^9, 3.4445397807846003`*^9}, {3.4445408839765997`*^9, 3.4445409234133997`*^9}, {3.4445409681698*^9, 3.4445409932702*^9}, { 3.4445415452906*^9, 3.4445415706717997`*^9}, {3.4445416647242002`*^9, 3.4445416909477997`*^9}, {3.4445417660150003`*^9, 3.444541788557*^9}, { 3.4445420906977997`*^9, 3.444542104847*^9}, {3.4445421885878*^9, 3.4445421941414003`*^9}, {3.4445422252166*^9, 3.4445422386014*^9}, { 3.444542280425*^9, 3.4445423014538*^9}, {3.444542455769*^9, 3.4445424578282003`*^9}, {3.4445431739214*^9, 3.444543175809*^9}, { 3.4445647020962*^9, 3.4445648405618*^9}, {3.4445648825414*^9, 3.4445648858486*^9}, {3.4445649382646*^9, 3.4445651882702*^9}, { 3.4446164822206*^9, 3.4446165344494*^9}, {3.4446166121842003`*^9, 3.4446166738822002`*^9}, {3.4446167223046*^9, 3.4446168047974*^9}, { 3.444616843033*^9, 3.444616906447*^9}, {3.4446444694708*^9, 3.4446444700948*^9}, {3.4446477738310003`*^9, 3.4446477939862003`*^9}, { 3.4446478467298*^9, 3.4446478681018*^9}, 3.4446480456142*^9, { 3.4446487557418003`*^9, 3.4446487636198*^9}, 3.4446488179974003`*^9, { 3.4446488971205997`*^9, 3.4446489152478*^9}, {3.4446490003458*^9, 3.4446490008294*^9}, {3.4447042728942003`*^9, 3.4447042751562*^9}, { 3.4447044703278*^9, 3.4447044865362*^9}, 3.4447046475282*^9, 3.4447047993786*^9, {3.444704908329*^9, 3.4447049292642*^9}, { 3.4447049861926003`*^9, 3.4447049877214003`*^9}, {3.4447050279296*^9, 3.4447050419695997`*^9}, {3.4447053486656*^9, 3.4447053739376*^9}, 3.4447054561963997`*^9, 3.44470561612*^9, {3.4472133996876*^9, 3.4472134108571997`*^9}, {3.4472134470179996`*^9, 3.4472134648332*^9}, { 3.4472135032872*^9, 3.4472135245344*^9}, {3.4472136963059998`*^9, 3.4472137794384003`*^9}, {3.4472138235708*^9, 3.4472138388900003`*^9}, { 3.4472139099792*^9, 3.4472141367096*^9}, {3.447214202682*^9, 3.4472142975924*^9}, {3.4472144187732*^9, 3.4472145910284*^9}, { 3.4472146560492*^9, 3.4472147023968*^9}, {3.447214803594*^9, 3.4472148728736*^9}, {3.4472149156956*^9, 3.447214940484*^9}, { 3.447216227284*^9, 3.4472162419948*^9}, {3.4472163068908*^9, 3.4472163720832*^9}, {3.4472164665880003`*^9, 3.447216530392*^9}, { 3.4472166237268*^9, 3.4472167058452*^9}, 3.4472167362808*^9, { 3.4472171394658003`*^9, 3.4472171532874002`*^9}, {3.4472172028993998`*^9, 3.4472172216661997`*^9}, {3.4472172524606*^9, 3.4472172690278*^9}, { 3.4472173209133997`*^9, 3.4472173334245996`*^9}, {3.4472173920846*^9, 3.447217404861*^9}, {3.4472179572548*^9, 3.4472180351456003`*^9}, { 3.4472509764091997`*^9, 3.4472511017396*^9}, {3.4473910422216*^9, 3.4473912901524*^9}, 3.4473918688344*^9, {3.447392021185*^9, 3.4473920346633997`*^9}, {3.4473921383304*^9, 3.4473921479088*^9}, { 3.4473923024112*^9, 3.4473923734379997`*^9}, {3.4473928098168*^9, 3.4473928648691998`*^9}, {3.4473931872432003`*^9, 3.4473932461800003`*^9}, {3.4473933026675997`*^9, 3.4473934579812*^9}, { 3.4473935755271997`*^9, 3.447393742572*^9}, {3.4473939032676*^9, 3.4473939384144*^9}, {3.447395257644*^9, 3.4473953141628*^9}, { 3.4473954231132*^9, 3.4473954756384*^9}, {3.4473955348716*^9, 3.4473955723272*^9}, {3.447395648502*^9, 3.4473957588876*^9}, { 3.4473957903996*^9, 3.4473958488372*^9}, 3.4473962894154*^9, { 3.447396350817*^9, 3.447396352611*^9}, {3.4474625379146*^9, 3.4474625637326*^9}, {3.558360651728078*^9, 3.558360652102478*^9}, { 3.5619791319820857`*^9, 3.561979135788492*^9}, 3.561979369382504*^9, { 3.5619794930439215`*^9, 3.5619795010155354`*^9}, {3.561979569218855*^9, 3.56197960614412*^9}, {3.5619797417551584`*^9, 3.5619797448751636`*^9}, { 3.618719065033702*^9, 3.618719075426296*^9}, {3.6187194011669273`*^9, 3.6187194449454317`*^9}, {3.6187196998040085`*^9, 3.6187197102436056`*^9}, {3.618719902254588*^9, 3.6187199711455283`*^9}, { 3.618722365406472*^9, 3.6187225412555304`*^9}, {3.6187226885009522`*^9, 3.6187227109872384`*^9}, {3.618722756922866*^9, 3.6187231317203026`*^9}, { 3.618723424250035*^9, 3.6187234267291765`*^9}, {3.6187235105259695`*^9, 3.6187236491028957`*^9}, {3.618723691580325*^9, 3.618723745975436*^9}, { 3.618723778837316*^9, 3.6187238310002995`*^9}, {3.6187239055875654`*^9, 3.618723940035536*^9}, {3.6187239782667227`*^9, 3.6187240219352207`*^9}, { 3.618724166762504*^9, 3.618724177411113*^9}, {3.618729321696159*^9, 3.618729328067523*^9}, 3.618729374058154*^9, {3.6187294379838104`*^9, 3.618729708464281*^9}, {3.6187297631904106`*^9, 3.618729773195983*^9}, { 3.618729822648812*^9, 3.6187299321490746`*^9}, {3.618729984399063*^9, 3.61873000654133*^9}, {3.6187300746012225`*^9, 3.6187300860458775`*^9}, { 3.618731390835507*^9, 3.6187315116174154`*^9}, {3.618731747324897*^9, 3.6187318214091344`*^9}, {3.6187318769243097`*^9, 3.618732065297084*^9}, { 3.6187321012351394`*^9, 3.618732157420353*^9}, {3.618732188384124*^9, 3.6187322435542793`*^9}, {3.6187322786112847`*^9, 3.6187325478446836`*^9}, {3.6187325819856367`*^9, 3.6187326817653437`*^9}, {3.618732810863728*^9, 3.61873282594359*^9}, { 3.6187336474335766`*^9, 3.618733754678711*^9}, {3.618733827497876*^9, 3.61873396201257*^9}, {3.6187342020362988`*^9, 3.618734236455267*^9}, 3.618734298201799*^9, {3.618734712498495*^9, 3.618734712716508*^9}, 3.6187347739640107`*^9, {3.618738817361748*^9, 3.6187388333816643`*^9}, { 3.6187391349349127`*^9, 3.6187391457955337`*^9}, {3.618739376900752*^9, 3.618739397023903*^9}, {3.618739528394417*^9, 3.618739534809784*^9}, { 3.618739972366811*^9, 3.61873997340687*^9}, {3.6187400416617737`*^9, 3.618740043022852*^9}, {3.6187400971579485`*^9, 3.618740107902563*^9}, { 3.6187401713671927`*^9, 3.6187401723312483`*^9}, {3.6187402613443394`*^9, 3.618740268819767*^9}, {3.6187403697625403`*^9, 3.6187404057615995`*^9}, { 3.618740488277319*^9, 3.618740516244919*^9}, {3.618740647782442*^9, 3.6187406551668644`*^9}, 3.6187407823021364`*^9, {3.6187418050786357`*^9, 3.618741805749674*^9}, {3.6187418557605343`*^9, 3.6187419895921893`*^9}, { 3.618742022944097*^9, 3.61874204379729*^9}, {3.6187420836395683`*^9, 3.618742103384698*^9}, {3.620462440882641*^9, 3.6204624460519366`*^9}, { 3.6204624990259666`*^9, 3.620462576450395*^9}, {3.620463682857678*^9, 3.620463713336421*^9}, 3.6204637901188126`*^9, {3.620464238835478*^9, 3.62046424411378*^9}, 3.628912429385081*^9, {3.6289135207155013`*^9, 3.6289135210805225`*^9}, 3.6289497746958513`*^9, 3.6289498371774254`*^9, { 3.62894988410911*^9, 3.6289500319795675`*^9}, {3.6289501333883677`*^9, 3.628950183744248*^9}, {3.6289503323017445`*^9, 3.628950390181055*^9}, { 3.6289505050536256`*^9, 3.6289505113579865`*^9}, {3.62895070863527*^9, 3.6289507095043197`*^9}, {3.628951013180689*^9, 3.62895101407374*^9}, { 3.629190743153632*^9, 3.629190816645361*^9}, {3.6291909709608326`*^9, 3.629190981678051*^9}, {3.629191034624544*^9, 3.6291910410049553`*^9}, { 3.6293846391370816`*^9, 3.629384641102685*^9}, {3.6294628543371735`*^9, 3.629462867097191*^9}, {3.629468063172048*^9, 3.6294681151669397`*^9}, { 3.6295205836757097`*^9, 3.6295206295085897`*^9}, {3.6295206788826766`*^9, 3.6295207067911253`*^9}, {3.6295207408927855`*^9, 3.629520753700408*^9}, { 3.629521020590745*^9, 3.6295210354395943`*^9}, {3.6295211107369013`*^9, 3.62952114882508*^9}, {3.6295212327348795`*^9, 3.6295212477237363`*^9}, { 3.6295213424816394`*^9, 3.629521343230441*^9}, {3.6295215363119802`*^9, 3.6295216753550243`*^9}, {3.629521922272258*^9, 3.6295219939855833`*^9}, { 3.6295220298188467`*^9, 3.629522446058778*^9}, {3.629522499348471*^9, 3.629522604352256*^9}, {3.629522755188921*^9, 3.62952288580795*^9}, { 3.629522918084407*^9, 3.6295233421087513`*^9}, {3.6295233808436193`*^9, 3.629523390936837*^9}, {3.629523424274096*^9, 3.6295234533369465`*^9}, { 3.6295235190130625`*^9, 3.629523521680667*^9}, 3.6295235894315863`*^9, { 3.6295237270706277`*^9, 3.629523799454755*^9}, {3.6295238514808464`*^9, 3.629523883460902*^9}, {3.6295239376085978`*^9, 3.6295239442386093`*^9}, { 3.6295241089904985`*^9, 3.629524177537019*^9}, 3.629524211888279*^9, { 3.629524277423994*^9, 3.629524396904604*^9}, {3.6295244794839497`*^9, 3.6295246248450055`*^9}, 3.629524657090262*^9, {3.6295259599109507`*^9, 3.629526013465844*^9}, {3.6295261092188125`*^9, 3.629526201414974*^9}, 3.6295263436092243`*^9, {3.6295263910333076`*^9, 3.629526583303645*^9}, { 3.629526616672104*^9, 3.629526647653758*^9}, {3.629526687558628*^9, 3.629526744888729*^9}, {3.629526804075233*^9, 3.6295268598453307`*^9}, { 3.6295269393898706`*^9, 3.6295269586559043`*^9}, {3.6295271490074387`*^9, 3.6295272149019547`*^9}, {3.6295272553684254`*^9, 3.6295272827620735`*^9}, {3.6295274137087035`*^9, 3.6295274761244135`*^9}, {3.6295275252801*^9, 3.6295279912529182`*^9}, { 3.6295281572216096`*^9, 3.629528160435215*^9}, {3.6295282905550437`*^9, 3.6295284308616905`*^9}, 3.6295285402022824`*^9, {3.629528582088356*^9, 3.629528616798417*^9}, {3.6295287666834803`*^9, 3.6295290316343455`*^9}, { 3.629529086515242*^9, 3.629529118432898*^9}, {3.6295291548121614`*^9, 3.629529292794404*^9}, {3.6295293426208916`*^9, 3.6295293491261034`*^9}, { 3.629529420699029*^9, 3.629529571535694*^9}, {3.6295296539506383`*^9, 3.629529656103442*^9}, {3.6295296894407005`*^9, 3.629529692295506*^9}, { 3.6295297445555973`*^9, 3.629529766426836*^9}, {3.6295298053333044`*^9, 3.6295298209489317`*^9}, {3.6295308380551186`*^9, 3.6295308386635194`*^9}, {3.629532377840223*^9, 3.6295323811630287`*^9}, { 3.629532480020402*^9, 3.629532482454006*^9}, {3.629532520720874*^9, 3.629532564619351*^9}, {3.62953259842461*^9, 3.6295326002654133`*^9}, { 3.6295326327758703`*^9, 3.6295326715107384`*^9}, {3.629532742428463*^9, 3.6295328288058147`*^9}, {3.6295329692184625`*^9, 3.6295330530062094`*^9}, {3.6295331824396367`*^9, 3.629533193562456*^9}, 3.6295350321720915`*^9, 3.629535158485513*^9, {3.629535245471266*^9, 3.6295352687465067`*^9}, {3.62953541293756*^9, 3.629535446384019*^9}, { 3.6295355043381205`*^9, 3.6295355262249594`*^9}, {3.629543790136781*^9, 3.629543791181983*^9}, {3.629543871350524*^9, 3.629544001673153*^9}, { 3.6295446682009234`*^9, 3.629544668466124*^9}, {3.6296010216162376`*^9, 3.6296010236442413`*^9}, {3.629601079336339*^9, 3.6296010902875586`*^9}, 3.6296011425476503`*^9, {3.6296043522397404`*^9, 3.629604399031022*^9}, { 3.629623884428093*^9, 3.629623914723346*^9}, {3.6296239662190366`*^9, 3.6296239738006496`*^9}, {3.6296240514731865`*^9, 3.6296240920176573`*^9}, {3.629624125947717*^9, 3.629624369432945*^9}, { 3.6296256512247963`*^9, 3.6296256817072496`*^9}, {3.6296260472626915`*^9, 3.629626047434292*^9}, {3.629628055568204*^9, 3.629628056098605*^9}, { 3.6296280911206665`*^9, 3.6296281088266973`*^9}, {3.6296281406819534`*^9, 3.629628273032586*^9}, {3.629628378831972*^9, 3.6296283814995766`*^9}, { 3.629628459562114*^9, 3.629628466379326*^9}, {3.629628519419419*^9, 3.6296285390754533`*^9}, {3.629633008133008*^9, 3.629633008835009*^9}, { 3.6296337764967575`*^9, 3.6296338344040594`*^9}, {3.6296342997684765`*^9, 3.629634432150309*^9}, {3.629634494035618*^9, 3.6296345320060844`*^9}, { 3.629634594499794*^9, 3.629634812182576*^9}, {3.6296348599810605`*^9, 3.6296348746918864`*^9}, {3.6296349071867433`*^9, 3.629635023172947*^9}, 3.6296350995818815`*^9, {3.6296363797201295`*^9, 3.6296363868961425`*^9}, { 3.629636462025874*^9, 3.6296364833355117`*^9}, {3.629636555922439*^9, 3.62963656780966*^9}, {3.629636770469616*^9, 3.629636774151222*^9}, { 3.6296369192782774`*^9, 3.6296369318830996`*^9}, {3.629637058539722*^9, 3.6296370719401455`*^9}, {3.629637278172508*^9, 3.629637286814923*^9}, { 3.6296376418091464`*^9, 3.629637662385583*^9}, {3.629637773551378*^9, 3.629637795360216*^9}, {3.6296390041751394`*^9, 3.629639039571602*^9}, 3.6296393829750047`*^9, {3.6296395546065063`*^9, 3.6296395649961243`*^9}, { 3.62964113386068*^9, 3.6296412507048855`*^9}, {3.629641303167777*^9, 3.629641313744596*^9}, {3.6296416285116315`*^9, 3.629641628886032*^9}, { 3.6296416658736973`*^9, 3.6296416815049243`*^9}, 3.6296417376338234`*^9, { 3.6296855551269727`*^9, 3.6296855804270077`*^9}, {3.6297079065796247`*^9, 3.6297079070476255`*^9}, {3.6297080850439377`*^9, 3.629708135728427*^9}, { 3.6297083496516027`*^9, 3.6297084025512953`*^9}, {3.629708781767563*^9, 3.629708790940379*^9}, {3.6297089402482414`*^9, 3.6297089618542795`*^9}, { 3.6297105345398417`*^9, 3.629710538580249*^9}, {3.6297107810514746`*^9, 3.6297107850138817`*^9}, {3.6297109100481014`*^9, 3.629710915710911*^9}, { 3.629711201534613*^9, 3.629711204311418*^9}, {3.629711236307074*^9, 3.6297115007275386`*^9}, {3.6297115377464037`*^9, 3.6297115441112146`*^9}, 3.6297116025645175`*^9, {3.6298716505389357`*^9, 3.629871851841689*^9}, { 3.62987837458679*^9, 3.629878383510006*^9}, {3.6298784402629056`*^9, 3.629878447345318*^9}, {3.6298785221786494`*^9, 3.6298786580236883`*^9}, { 3.629878689613744*^9, 3.629878737147027*^9}, 3.629878783853509*^9, { 3.629878832322794*^9, 3.6298789171723433`*^9}, {3.6298802128122005`*^9, 3.6298802929723125`*^9}, 3.6298813644148126`*^9, {3.629882428887303*^9, 3.629882435887313*^9}, {3.6298986251827383`*^9, 3.6298988530367384`*^9}, { 3.6298989036744275`*^9, 3.6298989486493063`*^9}, {3.629899016868226*^9, 3.6298991622448816`*^9}, {3.6298997154530535`*^9, 3.629899740147897*^9}, { 3.6298998248560457`*^9, 3.629899978048314*^9}, {3.6299000396372223`*^9, 3.6299001557638264`*^9}, {3.6299001966826982`*^9, 3.6299002595352087`*^9}, 3.6299005011236343`*^9, {3.6299005468317146`*^9, 3.629900567642151*^9}, { 3.629900887676713*^9, 3.629900990153293*^9}, {3.6299011689220085`*^9, 3.6299012295125146`*^9}, {3.6299013754039707`*^9, 3.6299014166036434`*^9}, 3.6299014589733176`*^9, {3.6299015096734066`*^9, 3.629901588765546*^9}, { 3.629901662569275*^9, 3.6299016974665365`*^9}, {3.629901952339784*^9, 3.6299019599057975`*^9}, 3.6299020306051216`*^9, {3.6299022330934772`*^9, 3.6299022682559395`*^9}, {3.6299023020455985`*^9, 3.629902332808852*^9}, { 3.6299024532566643`*^9, 3.629902462850681*^9}, {3.629949880225117*^9, 3.6299498807867184`*^9}, {3.6299503101150723`*^9, 3.6299503156998825`*^9}, {3.629950355058751*^9, 3.629950498937804*^9}, { 3.6299555415202007`*^9, 3.6299555507086167`*^9}, {3.6299556061667137`*^9, 3.6299557553497763`*^9}, {3.629955788499834*^9, 3.6299558948608212`*^9}, { 3.629956042764681*^9, 3.629956043809883*^9}, {3.6299560914211664`*^9, 3.6299561017327843`*^9}, 3.629956145849662*^9, {3.6299584813821354`*^9, 3.6299585082765827`*^9}, 3.6299585652946825`*^9, {3.629958616587573*^9, 3.6299586356508064`*^9}, {3.629958715073346*^9, 3.6299588186419287`*^9}, { 3.629958857454797*^9, 3.629958927249319*^9}, {3.629959427994599*^9, 3.629959494669116*^9}, {3.6299595293323765`*^9, 3.6299596037913074`*^9}, { 3.62995966795422*^9, 3.62995967360143*^9}, {3.6299597835972233`*^9, 3.6299597841120243`*^9}, {3.629959826622099*^9, 3.629959862533362*^9}, { 3.6299599051682367`*^9, 3.6299599235918694`*^9}, 3.629959979939168*^9, { 3.6299601345354395`*^9, 3.62996014612626*^9}, 3.6299601769831142`*^9, { 3.629960253142448*^9, 3.629960269538077*^9}, {3.6299603041701374`*^9, 3.6299603078205442`*^9}, {3.6299604300467587`*^9, 3.629960435491168*^9}, { 3.6299605300585346`*^9, 3.6299605636609936`*^9}, {3.6299606195870914`*^9, 3.6299606581971593`*^9}, {3.629960824228251*^9, 3.6299608755367413`*^9}, { 3.629960906658796*^9, 3.6299609978409557`*^9}, {3.6299610312250147`*^9, 3.629961070646284*^9}, {3.629961135698398*^9, 3.6299611643088484`*^9}, { 3.6299720458358483`*^9, 3.6299721791536827`*^9}, {3.6299722439717965`*^9, 3.629972300007095*^9}, {3.6299723670872126`*^9, 3.6299723937008595`*^9}, { 3.629972457801372*^9, 3.6299724710613956`*^9}, {3.629972740193068*^9, 3.6299728251196175`*^9}, {3.6299729203577843`*^9, 3.6299729350218105`*^9}, {3.6299729720874753`*^9, 3.6299730462188053`*^9}, {3.629973116044528*^9, 3.6299731230177402`*^9}, { 3.629973184310248*^9, 3.6299732090830917`*^9}, {3.629973349982539*^9, 3.6299734360166903`*^9}, 3.629973534562063*^9, {3.629973577446539*^9, 3.629973586104554*^9}, {3.6299740374133463`*^9, 3.629974083823428*^9}, { 3.6299742505565205`*^9, 3.629974337089873*^9}, {3.629974382907153*^9, 3.6299744466176653`*^9}, {3.629974589794717*^9, 3.629974590761918*^9}, { 3.629974776215044*^9, 3.6299747850134597`*^9}, {3.6299748226095257`*^9, 3.6299748237483273`*^9}, 3.6299748618435946`*^9, {3.629975198476586*^9, 3.6299752545898843`*^9}, {3.62997531475919*^9, 3.6299753175515947`*^9}, { 3.6299754601982455`*^9, 3.6299754625382495`*^9}, {3.629975592034077*^9, 3.629975592502078*^9}, {3.629983277446268*^9, 3.6299832946842985`*^9}, { 3.62998342081052*^9, 3.6299835439883366`*^9}, {3.629983615514462*^9, 3.629983931009416*^9}, {3.6299919807040443`*^9, 3.6299919808912444`*^9}, { 3.629992028330928*^9, 3.6299920922130404`*^9}, 3.629992198480427*^9, { 3.6299922299300823`*^9, 3.629992250506518*^9}, {3.629992292657792*^9, 3.6299923603151107`*^9}, {3.6299924387676487`*^9, 3.6299924398440504`*^9}, {3.6299925764846907`*^9, 3.6299926096347485`*^9}, {3.6299928122323046`*^9, 3.629992818768716*^9}, { 3.6299929049120674`*^9, 3.629992905411268*^9}, {3.6299929850338078`*^9, 3.6299929866250105`*^9}, {3.6299931061992207`*^9, 3.62999312270405*^9}, { 3.629993172312137*^9, 3.6299932618718944`*^9}, {3.6299933276572104`*^9, 3.6299933842073092`*^9}, {3.630287775665962*^9, 3.630287795852398*^9}, { 3.6303896387100534`*^9, 3.630389666774503*^9}, {3.6303896967889557`*^9, 3.6303897095341783`*^9}, {3.6303897587054644`*^9, 3.630389880448078*^9}, { 3.6303899127557354`*^9, 3.630390009444705*^9}, 3.630390057321189*^9, 3.630390443484267*^9, {3.63039095720877*^9, 3.6303909789240074`*^9}, { 3.6303910572205453`*^9, 3.6303911291054716`*^9}, {3.630391163035531*^9, 3.6303911740803504`*^9}, {3.630391240224467*^9, 3.6303912875081496`*^9}, { 3.6303913396902413`*^9, 3.630391404570755*^9}, {3.630391479513287*^9, 3.6303917572873745`*^9}, {3.630391868905571*^9, 3.6303920027226057`*^9}, { 3.630392064327114*^9, 3.630392219843787*^9}, {3.63039226121506*^9, 3.63039232943398*^9}, {3.6303924315985594`*^9, 3.6303924441097813`*^9}, { 3.6303926866122074`*^9, 3.6303927118530517`*^9}, {3.630392795671999*^9, 3.6303928006172075`*^9}, {3.6303986032190485`*^9, 3.6303986046230516`*^9}, {3.6303986654631586`*^9, 3.6303987936485834`*^9}, {3.63039889979117*^9, 3.6303989091199865`*^9}, { 3.630399006323757*^9, 3.630399007259759*^9}, {3.630399117224352*^9, 3.630399214771323*^9}, {3.6303992555185947`*^9, 3.6303993036758795`*^9}, { 3.630399467725767*^9, 3.630399502731636*^9}, {3.6303995748037624`*^9, 3.630399595614199*^9}, {3.6303996329294643`*^9, 3.630399658076709*^9}, { 3.630399711335202*^9, 3.6303997453120623`*^9}, {3.6303998546994543`*^9, 3.6303999880484886`*^9}, {3.6304000742074394`*^9, 3.630400123441126*^9}, { 3.6304001724564123`*^9, 3.630400251595351*^9}, {3.630400324166679*^9, 3.630400327052684*^9}, {3.630400358190338*^9, 3.6304003597503414`*^9}, { 3.6304004587481155`*^9, 3.6304004640521245`*^9}, {3.630400521975026*^9, 3.630400526124634*^9}, {3.630400567199506*^9, 3.630400593516752*^9}, { 3.6304012340070767`*^9, 3.6304013035207987`*^9}, {3.6304013614749007`*^9, 3.630401367933312*^9}, {3.630401686939398*^9, 3.6304017294598303`*^9}, { 3.630401794020523*^9, 3.6304018922061386`*^9}, {3.6304019687775183`*^9, 3.630401987153569*^9}, {3.630402072749465*^9, 3.63040208297405*^9}, { 3.6304022247881613`*^9, 3.630402255931943*^9}, 3.630402329306139*^9, { 3.6304023806970787`*^9, 3.6304024212403975`*^9}, {3.6304025002259154`*^9, 3.630402528595538*^9}, {3.6304025620694523`*^9, 3.630402575015193*^9}, { 3.6304026411829777`*^9, 3.630402649073429*^9}, {3.630402695548087*^9, 3.6304027128260756`*^9}, {3.630402783923142*^9, 3.6304027982389607`*^9}, { 3.6304028797236214`*^9, 3.6304030111811404`*^9}, {3.6304030562107162`*^9, 3.6304031598846455`*^9}, {3.630403236330018*^9, 3.6304032404072514`*^9}, { 3.630403373001835*^9, 3.6304033888147397`*^9}, {3.6304039420953856`*^9, 3.6304039512829113`*^9}, 3.6304039831437335`*^9, {3.630404015975611*^9, 3.6304040663624935`*^9}, {3.630404173614628*^9, 3.630404246945822*^9}, { 3.6304042891772375`*^9, 3.630404299595834*^9}, {3.630404391083066*^9, 3.630404392406142*^9}, {3.6304045301800222`*^9, 3.6304045579486103`*^9}, { 3.630404640215316*^9, 3.630404762796327*^9}, {3.630404877629895*^9, 3.630404883104208*^9}, {3.6304050364729805`*^9, 3.630405098270515*^9}, { 3.6304051736118245`*^9, 3.6304051965901384`*^9}, {3.6304053802536435`*^9, 3.63040539242334*^9}, {3.630406035965148*^9, 3.630406041998493*^9}, { 3.630406072049212*^9, 3.6304060962065935`*^9}, {3.630406264081196*^9, 3.6304062707025747`*^9}, {3.63040632219952*^9, 3.630406385461138*^9}, { 3.630406477200385*^9, 3.630406482095665*^9}, {3.6304066170883865`*^9, 3.6304066222256804`*^9}, {3.630406957868878*^9, 3.630406973411767*^9}, { 3.6304070081447535`*^9, 3.630407018199329*^9}, {3.630407411376817*^9, 3.630407412542884*^9}, {3.6304080609339695`*^9, 3.630408121202417*^9}, { 3.6304081585485525`*^9, 3.6304081832129636`*^9}, {3.63040821409673*^9, 3.630408421131572*^9}, 3.6304934333363276`*^9, {3.63049350751357*^9, 3.630493677593298*^9}, {3.630493716898546*^9, 3.6304937846684227`*^9}, 3.630493922944331*^9, {3.6304939556752033`*^9, 3.630494117430455*^9}, { 3.6304941486092386`*^9, 3.6304941767788496`*^9}, {3.6304942118648567`*^9, 3.6304942530272107`*^9}, {3.6304942838399734`*^9, 3.6304942845820155`*^9}, {3.6304943454054947`*^9, 3.6304944442451477`*^9}, {3.63080749995092*^9, 3.6308075480801234`*^9}, { 3.630807586536323*^9, 3.630807621440319*^9}, {3.630807680459695*^9, 3.630807682914836*^9}, {3.630807736889923*^9, 3.6308077644745007`*^9}, { 3.6308078081089964`*^9, 3.6308078670123653`*^9}, {3.630807991648494*^9, 3.630807997541831*^9}, {3.6308081080891542`*^9, 3.6308081919599514`*^9}, { 3.630808306368495*^9, 3.630808345060708*^9}, {3.6308087281906223`*^9, 3.6308087555171847`*^9}, {3.630809110815507*^9, 3.630809169033837*^9}, { 3.6308091998195972`*^9, 3.630809448512822*^9}, {3.6308095328996487`*^9, 3.6308095448223305`*^9}, {3.630809582269472*^9, 3.6308095873607635`*^9}, { 3.630809665529235*^9, 3.630809684808337*^9}, {3.6308316258485594`*^9, 3.6308318380886984`*^9}, {3.63083188164919*^9, 3.630831966930068*^9}, 3.6320400558356075`*^9, {3.6354749882908883`*^9, 3.635474989418953*^9}, { 3.635475084557395*^9, 3.6354750875145636`*^9}, {3.6354751334091887`*^9, 3.635475162315842*^9}, {3.6354754001974483`*^9, 3.6354754820331287`*^9}, 3.635475512931896*^9, {3.6354756222781506`*^9, 3.635475622861184*^9}, { 3.635475691642118*^9, 3.6354757057969275`*^9}, {3.6354757798291616`*^9, 3.635475797395167*^9}, {3.635475884848169*^9, 3.6354758981309285`*^9}, { 3.635475961488552*^9, 3.6354759738382587`*^9}, {3.6354760213729773`*^9, 3.6354760572050266`*^9}, {3.6354761282470903`*^9, 3.635476136040536*^9}, { 3.6354761719365892`*^9, 3.635476212217893*^9}, {3.6593346599546614`*^9, 3.659334660890663*^9}, {3.6593347077219453`*^9, 3.659334720701168*^9}, { 3.6593348752974396`*^9, 3.6593348758122406`*^9}, {3.6593349140947075`*^9, 3.6593350070240707`*^9}, {3.6593350466949406`*^9, 3.6593350543701544`*^9}, {3.659335103791041*^9, 3.6593351614487424`*^9}, 3.659335217686841*^9, {3.659335262084519*^9, 3.6593352995869846`*^9}, { 3.6593356899482727`*^9, 3.659335701819893*^9}, {3.659335964227954*^9, 3.659335964602355*^9}, {3.65933603594128*^9, 3.6593360629605274`*^9}, { 3.6593361352354546`*^9, 3.6593361504454813`*^9}, {3.6593363929479074`*^9, 3.6593364061611304`*^9}, 3.6593368946915884`*^9, {3.6884748265656157`*^9, 3.6884748268716326`*^9}, {3.6884748600075283`*^9, 3.688474861420609*^9}, { 3.6885242858240776`*^9, 3.6885243001140976`*^9}, {3.6888842911675606`*^9, 3.6888843311676164`*^9}, {3.688966242423658*^9, 3.688966263933688*^9}, { 3.6897393587897596`*^9, 3.6897393649897685`*^9}, 3.689739477049925*^9, { 3.6898595970621734`*^9, 3.689859597272174*^9}, {3.6898596707522764`*^9, 3.6898597190523443`*^9}, {3.689859768552414*^9, 3.6898597721424184`*^9}, { 3.689859855272535*^9, 3.689859859882541*^9}, {3.6898605078334484`*^9, 3.6898607266237545`*^9}, 3.6898608811139708`*^9, {3.6898609634740863`*^9, 3.689860974304102*^9}, 3.6898610140141573`*^9, {3.6898611496043468`*^9, 3.6898611683243732`*^9}, {3.689861462024784*^9, 3.6898615624849253`*^9}, { 3.6898616142149973`*^9, 3.6898616164350004`*^9}, 3.6898616657950697`*^9, { 3.689861716805141*^9, 3.689861749905187*^9}, {3.732677920575506*^9, 3.7326779208190203`*^9}, {3.7519672427004185`*^9, 3.7519672444968877`*^9}, {3.7519674022097683`*^9, 3.75196742976579*^9}, { 3.751967484127989*^9, 3.751967510853814*^9}, {3.7519675409404893`*^9, 3.751967541549782*^9}, {3.7519675797751045`*^9, 3.751967592209671*^9}, { 3.7519676829383273`*^9, 3.7519676841255474`*^9}, {3.7519677154775553`*^9, 3.7519677953499403`*^9}, 3.751967827811061*^9, {3.7519679545625095`*^9, 3.751967957999185*^9}, {3.751968003754015*^9, 3.7519681477513895`*^9}, { 3.751968264817631*^9, 3.751968270722477*^9}, {3.7519689618119907`*^9, 3.751968969888235*^9}, {3.7519691168917775`*^9, 3.7519691395895615`*^9}, { 3.751969242782174*^9, 3.7519692581691785`*^9}, {3.7519693625211954`*^9, 3.751969378579924*^9}, {3.751969409572627*^9, 3.751969438643936*^9}, { 3.7519695894526725`*^9, 3.751969614306203*^9}, {3.7523200108586655`*^9, 3.752320012354121*^9}, {3.7553831315619707`*^9, 3.755383134119626*^9}, { 3.7553831893197794`*^9, 3.755383241814331*^9}, {3.7553832736267967`*^9, 3.7553832810757113`*^9}, {3.7554336536222963`*^9, 3.755433684797229*^9}, { 3.7554337764737434`*^9, 3.7554338315300155`*^9}, {3.755433998047738*^9, 3.7554340265485487`*^9}, {3.755446573138784*^9, 3.755446636911299*^9}, { 3.75544667493072*^9, 3.755446753435521*^9}, {3.755446891541581*^9, 3.7554468921547422`*^9}, {3.7554469323588533`*^9, 3.755446936867403*^9}, { 3.7554470190332975`*^9, 3.7554472776872244`*^9}, {3.7555217323692026`*^9, 3.755521732847602*^9}, {3.755521767127169*^9, 3.7555217972041793`*^9}, { 3.755522561453134*^9, 3.755522564231819*^9}, {3.755522601885935*^9, 3.7555226037287407`*^9}, {3.7555226758687305`*^9, 3.755522678585092*^9}, { 3.7555234832604623`*^9, 3.7555235920444417`*^9}, {3.7555239506007543`*^9, 3.755524013893358*^9}, {3.755524076791689*^9, 3.7555240812793446`*^9}, { 3.7555241238138275`*^9, 3.7555241268985643`*^9}, {3.7555242930449886`*^9, 3.7555243378577013`*^9}, {3.7555256673767824`*^9, 3.7555256808205338`*^9}, {3.7555258588384123`*^9, 3.755525900317296*^9}, { 3.755525930708299*^9, 3.7555260436531134`*^9}, {3.755607147401991*^9, 3.7556071504143705`*^9}, {3.755607992884314*^9, 3.7556080025382996`*^9}, { 3.7556094344057455`*^9, 3.7556094348690443`*^9}, {3.7559613653116636`*^9, 3.755961445097105*^9}, 3.755961484246889*^9, {3.7559618979231987`*^9, 3.755961939470047*^9}, {3.7559620323724904`*^9, 3.7559620330864005`*^9}, { 3.755962155557907*^9, 3.7559621601593847`*^9}, {3.755962303755834*^9, 3.755962343830135*^9}, {3.7559624058018165`*^9, 3.7559624450501757`*^9}, 3.756002186674869*^9, 3.7560029626855392`*^9, {3.756003222110388*^9, 3.756003295034633*^9}, {3.7560056331492863`*^9, 3.7560056663855457`*^9}, { 3.7560057813555765`*^9, 3.7560057863836613`*^9}, {3.7560058917172394`*^9, 3.756005927847292*^9}, 3.756006092376186*^9, 3.756009112317705*^9, { 3.756091886039587*^9, 3.756091887764086*^9}, {3.756092005435152*^9, 3.7560920727337685`*^9}, {3.75609212911592*^9, 3.7560921293252516`*^9}, { 3.756092262958163*^9, 3.756092263157668*^9}, {3.756092342487877*^9, 3.756092347894502*^9}, {3.7560929036769304`*^9, 3.7560929278911004`*^9}, { 3.7560930741522417`*^9, 3.756093083420331*^9}, {3.7560932986236534`*^9, 3.7560933139459305`*^9}, {3.756093449985523*^9, 3.7560934874491863`*^9}, { 3.756093592694581*^9, 3.7560936019456573`*^9}, {3.756093634438078*^9, 3.756093673866626*^9}, {3.756093873069885*^9, 3.756093897964734*^9}, { 3.7560940650109406`*^9, 3.756094078056768*^9}, {3.756442536546026*^9, 3.756442607904289*^9}, {3.7564436397451363`*^9, 3.7564436403231254`*^9}, { 3.7636034984570236`*^9, 3.7636034989933815`*^9}, {3.763603551051456*^9, 3.7636035527617817`*^9}, {3.7636036049384193`*^9, 3.7636036392233057`*^9}, {3.7636036850937223`*^9, 3.763603692587598*^9}, { 3.7636037258272257`*^9, 3.7636037459031096`*^9}, {3.7636037792254367`*^9, 3.76360387572289*^9}, {3.763603971837229*^9, 3.7636040341423655`*^9}, { 3.763604066526084*^9, 3.7636040756798687`*^9}, {3.7636041452118535`*^9, 3.763604278007333*^9}, {3.763604317710966*^9, 3.7636043271387568`*^9}, { 3.7636043584877644`*^9, 3.763604415561053*^9}, {3.763604445680462*^9, 3.7636044504114943`*^9}, {3.763604615444647*^9, 3.7636048082554193`*^9}, 3.763604854904996*^9, {3.7636133594095488`*^9, 3.7636133618464766`*^9}, { 3.7636136063756704`*^9, 3.7636136315671196`*^9}, {3.7636990373827705`*^9, 3.7636990431157646`*^9}, {3.763699090332087*^9, 3.763699110952259*^9}, { 3.763699227420497*^9, 3.7636993642943506`*^9}, {3.763700085627533*^9, 3.763700088329999*^9}, {3.7637001721125274`*^9, 3.763700181422837*^9}, { 3.763700248063385*^9, 3.7637003918630466`*^9}, {3.763700591783223*^9, 3.7637006017496295`*^9}, {3.7637007583576717`*^9, 3.7637007603074865`*^9}, {3.7637137795793185`*^9, 3.7637137822587233`*^9}, {3.7637148704355187`*^9, 3.763714870624051*^9}, { 3.763727592158518*^9, 3.7637275933445053`*^9}, {3.7637276688363667`*^9, 3.7637276694756594`*^9}, 3.763803448896332*^9, {3.76380349501632*^9, 3.7638036835067654`*^9}, {3.763804829093463*^9, 3.7638048385675254`*^9}, 3.7638051033646154`*^9, 3.7638053924528885`*^9, {3.763805557684454*^9, 3.763805634255308*^9}, {3.763806843847647*^9, 3.763806847966059*^9}, { 3.763806942652097*^9, 3.7638071770752254`*^9}, {3.7638141184594107`*^9, 3.763814134133461*^9}, {3.7638146808628216`*^9, 3.7638146925645113`*^9}, { 3.7638147709278784`*^9, 3.7638147811883087`*^9}, {3.7638148155281043`*^9, 3.763814819843194*^9}, {3.7638150259647446`*^9, 3.763815028601293*^9}, { 3.7638151529595194`*^9, 3.763815155849978*^9}, {3.7638163770262136`*^9, 3.763816380851597*^9}, {3.7638164181856327`*^9, 3.7638164950537987`*^9}, 3.763816568304102*^9, {3.7638166173645625`*^9, 3.763816618808757*^9}, { 3.7638167204462805`*^9, 3.763816721012859*^9}, {3.763857602253485*^9, 3.7638579604183645`*^9}, {3.7638580038507566`*^9, 3.7638580060526443`*^9}, {3.763858082269992*^9, 3.7638581746835337`*^9}, { 3.7638582163351564`*^9, 3.7638582415275116`*^9}, {3.7638582983238*^9, 3.763858907503306*^9}, {3.763858941318697*^9, 3.763858956626134*^9}, { 3.7638602435602536`*^9, 3.763860245408451*^9}, {3.7638694636456347`*^9, 3.7638694647177277`*^9}, {3.7638708199536576`*^9, 3.763870829436488*^9}, { 3.763871287170555*^9, 3.7638712876184006`*^9}, {3.763943214376035*^9, 3.7639432984591475`*^9}, {3.763943418832348*^9, 3.7639434335508127`*^9}, { 3.76394347113767*^9, 3.7639435187320576`*^9}, {3.763943585908682*^9, 3.7639436125255404`*^9}, {3.763951722152746*^9, 3.76395172989299*^9}, { 3.7639517863423367`*^9, 3.7639519945900664`*^9}, {3.763952081515512*^9, 3.7639521530710773`*^9}, {3.763952353248129*^9, 3.763952357026309*^9}, { 3.7639524211903834`*^9, 3.7639524243979177`*^9}, {3.7639527174925117`*^9, 3.7639527180252266`*^9}, {3.7641265625745993`*^9, 3.7641265632314167`*^9}, {3.764126605555829*^9, 3.7641266075095396`*^9}, { 3.7641268313964133`*^9, 3.7641268543573804`*^9}, {3.764127044657903*^9, 3.7641270479422092`*^9}, {3.7641271442332697`*^9, 3.7641271469362774`*^9}, {3.764127227626192*^9, 3.7641272592640233`*^9}, { 3.764127335707515*^9, 3.7641273386484756`*^9}, {3.764127429843852*^9, 3.7641274364304185`*^9}, {3.7641275071859307`*^9, 3.764127516803895*^9}, 3.7641276043548007`*^9, {3.7641276925365753`*^9, 3.764127697080591*^9}, 3.764127798472331*^9, 3.764127853631323*^9, 3.764127908496078*^9, { 3.7641280050343323`*^9, 3.764128022046494*^9}, {3.764128128597419*^9, 3.764128154116727*^9}, {3.7641286864636617`*^9, 3.764128701643106*^9}, { 3.7641289910924444`*^9, 3.7641290126680794`*^9}, {3.7641290672285347`*^9, 3.7641290737798567`*^9}, {3.7641325425120363`*^9, 3.764132565390477*^9}, { 3.7641327425004654`*^9, 3.764132750040793*^9}, 3.7641327968340364`*^9, { 3.764133146776842*^9, 3.764133204874522*^9}, {3.7641333488187037`*^9, 3.7641333525577593`*^9}, {3.764413145593136*^9, 3.7644131471236105`*^9}, { 3.764413201645049*^9, 3.7644132349609704`*^9}, {3.764413325008136*^9, 3.7644133748980193`*^9}, {3.7644134113425665`*^9, 3.7644135151187*^9}, { 3.764413554409053*^9, 3.7644136160674934`*^9}, {3.76441371984758*^9, 3.764413730103909*^9}, 3.764419641962368*^9, {3.7644198522879405`*^9, 3.764419879249356*^9}, 3.764419909536559*^9, {3.764419991012162*^9, 3.764420000171088*^9}, {3.7644200798862047`*^9, 3.7644200950961914`*^9}, { 3.7644201529471693`*^9, 3.764420153715966*^9}, {3.764420210346301*^9, 3.764420255343707*^9}, {3.764420296178318*^9, 3.7644203000939393`*^9}, { 3.7644203803359275`*^9, 3.7644203931390867`*^9}, 3.7644204418727274`*^9, { 3.7647259720700207`*^9, 3.7647261047260523`*^9}, {3.7647263483375626`*^9, 3.76472635879602*^9}, 3.764726656736601*^9, {3.764727009127914*^9, 3.764727020100875*^9}, {3.7647270591828785`*^9, 3.7647270819631023`*^9}, { 3.7647272109090505`*^9, 3.764727227846332*^9}, {3.76473247809907*^9, 3.7647324813925114`*^9}, {3.7647349484962797`*^9, 3.7647349979358416`*^9}, {3.7647351097258167`*^9, 3.764735124772463*^9}, { 3.7647352810674453`*^9, 3.7647352901139917`*^9}, {3.7647353746429515`*^9, 3.764735379550926*^9}, {3.7647354596539807`*^9, 3.764735507677454*^9}, { 3.7647355546341*^9, 3.764735728811817*^9}, {3.764735837449795*^9, 3.76473584132898*^9}, {3.76473603649269*^9, 3.7647360592982664`*^9}, { 3.7647360998228803`*^9, 3.76473621551197*^9}, {3.7647362545599003`*^9, 3.764736286430997*^9}, {3.7647364592833533`*^9, 3.764736464019006*^9}, { 3.764736566167658*^9, 3.7647365918958225`*^9}, {3.764764761680134*^9, 3.7647648482473745`*^9}, 3.764764917763693*^9, {3.764764964821686*^9, 3.764765090741813*^9}, {3.7647651742140284`*^9, 3.7647652517335076`*^9}, { 3.764765341266399*^9, 3.7647653614173465`*^9}, 3.764765400284145*^9, { 3.764765691384389*^9, 3.764765708710143*^9}, 3.7647657454275875`*^9, { 3.76476578351686*^9, 3.764765871262255*^9}, {3.7647661045180917`*^9, 3.76476612822571*^9}, {3.7647661964223824`*^9, 3.764766239375331*^9}, { 3.764766330361228*^9, 3.764766338297905*^9}, {3.764767015060799*^9, 3.7647670193029037`*^9}, {3.764767076590926*^9, 3.7647671160277977`*^9}, { 3.7647671493139205`*^9, 3.7647672079236426`*^9}, {3.764767458938404*^9, 3.7647674608323865`*^9}, {3.764810938444873*^9, 3.7648109399353456`*^9}, { 3.7648118616019874`*^9, 3.7648118695079126`*^9}, {3.7648120589477816`*^9, 3.7648124600413237`*^9}, {3.76481250476682*^9, 3.7648125259602103`*^9}, { 3.764812601341893*^9, 3.7648126577763243`*^9}, {3.7648126944039307`*^9, 3.7648128855627623`*^9}, {3.764812924923909*^9, 3.764812926481821*^9}, { 3.764813041485982*^9, 3.764813131254232*^9}, {3.7648134679328885`*^9, 3.7648136479313235`*^9}, {3.7648136917777314`*^9, 3.764813697753367*^9}, { 3.7648137297570653`*^9, 3.764813747862262*^9}, 3.764813784221693*^9, { 3.7648138370678406`*^9, 3.7648141387969923`*^9}, {3.764814321050164*^9, 3.764814422489184*^9}, {3.764814461366684*^9, 3.7648145835728483`*^9}, { 3.764814614769511*^9, 3.7648147525825167`*^9}, {3.764815363375289*^9, 3.7648153644907384`*^9}, {3.764815451671169*^9, 3.7648154601533747`*^9}, { 3.7648175917802963`*^9, 3.7648176401910563`*^9}, {3.765885491237231*^9, 3.765885501131465*^9}, {3.766572999289345*^9, 3.7665729996020145`*^9}, { 3.7665730613126965`*^9, 3.7665730616706066`*^9}, {3.7840103262125545`*^9, 3.7840103546413517`*^9}, {3.784011309725755*^9, 3.7840113197719574`*^9}, { 3.784013374800973*^9, 3.7840133842981763`*^9}, {3.7840238533665447`*^9, 3.78402395932942*^9}, {3.784024091276659*^9, 3.784024112209529*^9}, { 3.7840242793219643`*^9, 3.784024296655184*^9}, {3.7840290670892677`*^9, 3.7840291348388853`*^9}, {3.784029222997594*^9, 3.784029542926179*^9}, { 3.784375172285057*^9, 3.784375319701829*^9}, {3.7843753678421807`*^9, 3.7843753788103914`*^9}, {3.7843754844339557`*^9, 3.784375827494117*^9}, { 3.784375862317687*^9, 3.7843759567563844`*^9}, {3.784376004941759*^9, 3.7843760080157185`*^9}, {3.784376101918992*^9, 3.7843761244332943`*^9}, { 3.784376181191763*^9, 3.7843762145091863`*^9}, {3.7843792489960337`*^9, 3.78437926273014*^9}, {3.7843793293934345`*^9, 3.784379368676588*^9}, { 3.7843796529835215`*^9, 3.7843796858862267`*^9}, {3.784450863324359*^9, 3.7844508986076546`*^9}, {3.7844510208392324`*^9, 3.784451027915551*^9}, { 3.7844511176315613`*^9, 3.7844511673791957`*^9}, {3.784451235055628*^9, 3.78445132575735*^9}, {3.784451995615477*^9, 3.7844520110330954`*^9}, { 3.7844522907551537`*^9, 3.7844523421551*^9}, {3.784700119490345*^9, 3.7847001627913013`*^9}, {3.7847004221290607`*^9, 3.7847004380767317`*^9}, 3.7847007913506136`*^9, {3.784781955129138*^9, 3.784781977787957*^9}, { 3.78488170216677*^9, 3.784881704210422*^9}, 3.784882130557441*^9, { 3.78488220347418*^9, 3.7848822064697027`*^9}, {3.784883393455822*^9, 3.784883458551924*^9}, 3.7848835306495824`*^9, {3.7848836822092113`*^9, 3.7848837303696923`*^9}, 3.7848838199009576`*^9, {3.7848842507527857`*^9, 3.7848842836585226`*^9}, 3.7848843847882996`*^9, {3.784884461405264*^9, 3.7848844645041113`*^9}, {3.784884559404122*^9, 3.7848845656634912`*^9}, { 3.7848852409944844`*^9, 3.7848852740337477`*^9}, {3.7848854548929386`*^9, 3.7848854893046365`*^9}, {3.7848856741783943`*^9, 3.784885691704702*^9}, { 3.784885809660874*^9, 3.784885811424426*^9}, {3.7848860031948376`*^9, 3.784886020570098*^9}, 3.7848861057105627`*^9, {3.7848861627726107`*^9, 3.7848862212876124`*^9}, {3.784886306497995*^9, 3.7848863509322224`*^9}, 3.784886472690192*^9, {3.7848866596243*^9, 3.784886664116289*^9}, { 3.7848866987282944`*^9, 3.7848867077911897`*^9}, {3.78488676128524*^9, 3.7848868667029366`*^9}, {3.7848869381224003`*^9, 3.7848869414281464`*^9}, {3.7848870104508753`*^9, 3.784887039889447*^9}, { 3.7848871795058794`*^9, 3.7848871976746817`*^9}, {3.7848872311446314`*^9, 3.78488724075662*^9}, 3.784887405188785*^9, {3.784887591926689*^9, 3.7848876119305134`*^9}, {3.784887676620901*^9, 3.7848876786672792`*^9}, { 3.78488771054331*^9, 3.784887714354906*^9}, {3.7848877625809546`*^9, 3.7848878103041153`*^9}, 3.7848878862881575`*^9, {3.787717235155089*^9, 3.787717269464238*^9}, {3.7877174592607603`*^9, 3.7877174674038067`*^9}, { 3.7877271032841845`*^9, 3.787727136247201*^9}, 3.787727355369296*^9, 3.7877274973278403`*^9, {3.787727855959008*^9, 3.78772792141208*^9}, 3.787728113487193*^9, {3.7877281704571557`*^9, 3.7877281735077004`*^9}, 3.7877282789827795`*^9, {3.7877286510229864`*^9, 3.787728665729192*^9}, { 3.7877287942225084`*^9, 3.787728807671986*^9}, {3.787729044867985*^9, 3.787729045536916*^9}, {3.787729589732438*^9, 3.7877296062090626`*^9}, { 3.787729794037467*^9, 3.7877297950347877`*^9}, {3.787729855548402*^9, 3.7877299039179935`*^9}, {3.7877300373241186`*^9, 3.787730068136018*^9}, { 3.7877301999859333`*^9, 3.7877302014150777`*^9}, {3.787732033225385*^9, 3.7877320471634016`*^9}, {3.787732077195259*^9, 3.7877320780358667`*^9}, 3.787732189759206*^9, {3.78773231889835*^9, 3.787732327710633*^9}, { 3.7877324857166643`*^9, 3.787732496655479*^9}, {3.7877325848303585`*^9, 3.78773258503596*^9}, {3.7877328504631166`*^9, 3.7877328625892415`*^9}, { 3.7877330254884944`*^9, 3.7877330271019044`*^9}, {3.787733136128061*^9, 3.7877331422258835`*^9}, {3.787733243513567*^9, 3.78773324558677*^9}, 3.787733310555999*^9, 3.7877334085329347`*^9, {3.7877337955932293`*^9, 3.7877337970498257`*^9}, {3.787733867727028*^9, 3.7877338687324905`*^9}, { 3.7877352224369583`*^9, 3.787735224161746*^9}, {3.787735343322833*^9, 3.787735348772827*^9}, {3.787735422704711*^9, 3.7877354268945775`*^9}, { 3.7877355100355635`*^9, 3.787735514671461*^9}, {3.7877356541994534`*^9, 3.7877356632141013`*^9}, 3.7877357913476543`*^9, 3.787736261837074*^9, { 3.7882542159043374`*^9, 3.7882542747998285`*^9}, {3.788254310967661*^9, 3.788254318430212*^9}, {3.788254585790197*^9, 3.7882545888318524`*^9}, { 3.7882547349987383`*^9, 3.788254735940298*^9}, 3.788254830063775*^9, 3.7882549155286837`*^9, {3.7882550121437798`*^9, 3.788255037735396*^9}, { 3.7882551764404287`*^9, 3.78825518352113*^9}, {3.7882552540030313`*^9, 3.788255290224329*^9}, {3.7882553843544893`*^9, 3.788255423248046*^9}, { 3.78825567982127*^9, 3.7882556852479534`*^9}, {3.7882557908576803`*^9, 3.7882558029800806`*^9}, {3.7882560240494256`*^9, 3.7882560388846164`*^9}, 3.788256102343512*^9, {3.788256161397396*^9, 3.7882561626372194`*^9}, { 3.7882562304311895`*^9, 3.78825629590362*^9}, {3.7882563614677362`*^9, 3.7882563620189795`*^9}, {3.7882564138122153`*^9, 3.7882564294158382`*^9}, {3.788256467457189*^9, 3.7882564889521217`*^9}, { 3.7882565883311844`*^9, 3.788256591497148*^9}, {3.7882568409513097`*^9, 3.7882568724526567`*^9}, {3.788256965258837*^9, 3.788256966444976*^9}, { 3.7882570073831463`*^9, 3.7882570497349973`*^9}, {3.7882570992487097`*^9, 3.788257144206352*^9}, {3.78825721252205*^9, 3.788257307277931*^9}, { 3.788257350410209*^9, 3.7882573617262745`*^9}, {3.788257424936472*^9, 3.788257434118204*^9}, {3.788276311330668*^9, 3.788276311647092*^9}, { 3.7882765465512347`*^9, 3.788276608568333*^9}, {3.7882767715851693`*^9, 3.7882768045752783`*^9}, {3.7882769342607436`*^9, 3.7882769409894867`*^9}, {3.7882770202208567`*^9, 3.7882770424485188`*^9}, {3.7882770760040703`*^9, 3.788277077341468*^9}, { 3.788277147336176*^9, 3.788277150397852*^9}, {3.7882772069909*^9, 3.7882772101572385`*^9}, {3.7882772503366175`*^9, 3.7882772773759403`*^9}, {3.7882773922958755`*^9, 3.7882773927832017`*^9}, {3.788277450684473*^9, 3.788277482126852*^9}, { 3.78827754293396*^9, 3.788277545027956*^9}, {3.7883214550230436`*^9, 3.7883214742097826`*^9}, {3.788321520104019*^9, 3.788321685390153*^9}, { 3.788321717307153*^9, 3.788321801831746*^9}, {3.788321836768508*^9, 3.788322037754008*^9}, {3.7883220686363816`*^9, 3.788322220085001*^9}, { 3.7883255906192427`*^9, 3.788325646609389*^9}, {3.7883257976991563`*^9, 3.788325804097658*^9}, {3.788325969279187*^9, 3.7883259830028267`*^9}, { 3.788326975877249*^9, 3.788326979070017*^9}, {3.788328539286415*^9, 3.788328618410488*^9}, {3.788328648595448*^9, 3.788328762662589*^9}, { 3.7883288060890923`*^9, 3.7883288805716724`*^9}, {3.7883319188300047`*^9, 3.78833193230753*^9}, {3.7883321144947567`*^9, 3.788332115050151*^9}, { 3.7883333680456443`*^9, 3.7883333686272163`*^9}, 3.7883336421611414`*^9, { 3.788333691323177*^9, 3.7883336916362*^9}, {3.788333797629262*^9, 3.7883338348662343`*^9}, {3.7883339555470386`*^9, 3.7883339660305166`*^9}, {3.7883340291758356`*^9, 3.788334031484354*^9}, { 3.788334368484807*^9, 3.7883343918754945`*^9}, {3.7883345963739557`*^9, 3.788334645315611*^9}, {3.788411405608647*^9, 3.788411409092114*^9}, { 3.7884115644712825`*^9, 3.7884115911998663`*^9}, {3.7884116673998833`*^9, 3.788411758799066*^9}, {3.788411985303985*^9, 3.788412002701314*^9}, { 3.78841218266156*^9, 3.788412217652734*^9}, {3.788412679618697*^9, 3.78841268296084*^9}, {3.788412968920223*^9, 3.7884129782039633`*^9}, { 3.7884155241723013`*^9, 3.7884155243798914`*^9}, 3.7884156619519596`*^9, { 3.7884162343262696`*^9, 3.788416236013459*^9}, {3.789022054245319*^9, 3.7890221116154556`*^9}, {3.7890222001685014`*^9, 3.789022205961149*^9}, { 3.789094077050009*^9, 3.7890940781167436`*^9}, {3.7890941254883175`*^9, 3.7890942919861226`*^9}, {3.789094340508856*^9, 3.789094543716852*^9}, { 3.789094583794143*^9, 3.7890947278803444`*^9}, {3.7890947714417076`*^9, 3.7890948342626343`*^9}, {3.789095197615344*^9, 3.789095215073329*^9}, { 3.789095256390032*^9, 3.78909525710861*^9}, {3.7890954241290827`*^9, 3.78909583987399*^9}, {3.789096056032333*^9, 3.7890960602768464`*^9}, { 3.7890960928429904`*^9, 3.789096098149865*^9}, {3.789096721918685*^9, 3.789096734998893*^9}, {3.7890967741973257`*^9, 3.78909683859006*^9}, { 3.789096947653244*^9, 3.789097122315098*^9}, {3.7890971528708224`*^9, 3.789097530683948*^9}, {3.7890975852885656`*^9, 3.7890975882562447`*^9}, { 3.7890976430709224`*^9, 3.789097656213524*^9}, {3.789107592314107*^9, 3.7891076537760305`*^9}, {3.789107685160589*^9, 3.789107760590632*^9}, { 3.7891078105008087`*^9, 3.789107846610609*^9}, {3.789107989236459*^9, 3.7891080001561875`*^9}, {3.7891082032172785`*^9, 3.7891082064574785`*^9}, {3.7891083013630204`*^9, 3.789108444864075*^9}, { 3.7891084751958127`*^9, 3.7891085010044174`*^9}, {3.7891085322441816`*^9, 3.7891085353767447`*^9}, {3.789108620037199*^9, 3.789108662297584*^9}, 3.7891087252471294`*^9, {3.789108773507248*^9, 3.7891088501491203`*^9}, { 3.7891088829987*^9, 3.789108918319019*^9}, {3.7891089606286983`*^9, 3.7891090044788837`*^9}, {3.789109048556943*^9, 3.7891091177554493`*^9}, { 3.7891091628149347`*^9, 3.7891092922346783`*^9}, {3.789109382870388*^9, 3.789109402625166*^9}, {3.7891111380334797`*^9, 3.7891113582877145`*^9}, { 3.789111396694514*^9, 3.7891114221541777`*^9}, {3.7891114539845037`*^9, 3.7891114952359962`*^9}, {3.789112929457416*^9, 3.7891129318274393`*^9}, { 3.789112963290578*^9, 3.7891131302196255`*^9}, {3.789113202949188*^9, 3.789113203379569*^9}, {3.7891144371217365`*^9, 3.789114518411393*^9}, { 3.789114638487608*^9, 3.78911468069436*^9}, {3.789114763918976*^9, 3.789114777923211*^9}, {3.789114809301983*^9, 3.7891148392057247`*^9}, { 3.7891148923150015`*^9, 3.789114904054755*^9}, {3.7891149560740595`*^9, 3.7891150071774015`*^9}, {3.789115109642312*^9, 3.7891151147637*^9}, { 3.7891185439211864`*^9, 3.789118561569729*^9}, {3.7891187834106455`*^9, 3.7891187854068985`*^9}, {3.7891188764873776`*^9, 3.7891188767373095`*^9}, {3.789121799028477*^9, 3.789121806719482*^9}, { 3.7891222627163153`*^9, 3.7891222774782734`*^9}, {3.7891223914541044`*^9, 3.7891224006004095`*^9}, {3.789122431773783*^9, 3.7891224422816577`*^9}, { 3.7891224731160736`*^9, 3.789122501042121*^9}, {3.7891226653529224`*^9, 3.7891226664045706`*^9}, 3.789122819901965*^9, {3.789122893844426*^9, 3.7891229543768473`*^9}, {3.7891229964274464`*^9, 3.7891231044294157`*^9}, {3.789123228485856*^9, 3.789123374714591*^9}, { 3.7891235661360893`*^9, 3.7891235688754067`*^9}, {3.8435393751961174`*^9, 3.84353937620569*^9}, {3.843539421737421*^9, 3.843539430280121*^9}, { 3.8435484777900076`*^9, 3.8435484882620373`*^9}, {3.8435489691083994`*^9, 3.843548981201047*^9}, {3.8435491420371304`*^9, 3.8435491556997023`*^9}, { 3.8435491977347035`*^9, 3.8435491982438793`*^9}, 3.8435492510860806`*^9, { 3.8435495081660933`*^9, 3.8435495131948795`*^9}, {3.8435495856936626`*^9, 3.843549589991126*^9}, {3.8435496998060937`*^9, 3.843549707814079*^9}, { 3.84355004136615*^9, 3.843550041760812*^9}, {3.843550160256809*^9, 3.8435501604677615`*^9}, {3.8435532120250945`*^9, 3.843553317388692*^9}, { 3.8435535239731655`*^9, 3.8435535314678483`*^9}, {3.8435535808757987`*^9, 3.843553663159541*^9}, {3.843553779645311*^9, 3.843553786004609*^9}, 3.843553906141655*^9, 3.84355405714793*^9, {3.843554149489615*^9, 3.8435541503712645`*^9}, {3.843554206843628*^9, 3.8435542071044455`*^9}, { 3.8435543508802266`*^9, 3.843554351606327*^9}, {3.843554424038799*^9, 3.8435544242271614`*^9}, {3.8435607207357883`*^9, 3.843560727908863*^9}, { 3.843560832774662*^9, 3.8435608400783997`*^9}, {3.843561442743278*^9, 3.8435614495857325`*^9}, {3.8435616862804203`*^9, 3.8435617473408427`*^9}, {3.8435618416220255`*^9, 3.84356184949818*^9}, { 3.843561965458202*^9, 3.843561967390591*^9}, {3.8435620399418516`*^9, 3.8435620427564726`*^9}, 3.8435620999099693`*^9, {3.843562319425266*^9, 3.843562335822353*^9}, {3.843562479271407*^9, 3.8435624872362185`*^9}, { 3.8435625915602407`*^9, 3.843562614304778*^9}, {3.843562735879742*^9, 3.843562741836786*^9}, {3.8436143557463255`*^9, 3.843614430899438*^9}, { 3.843614466526642*^9, 3.843614494745638*^9}, {3.84361472265639*^9, 3.8436147354884176`*^9}, {3.843614883845476*^9, 3.8436148880544443`*^9}, { 3.843615637703328*^9, 3.8436156940260696`*^9}, {3.843615818169777*^9, 3.8436159022117233`*^9}, {3.843621164525605*^9, 3.8436211674899387`*^9}, { 3.8436212248219557`*^9, 3.8436212383818884`*^9}, {3.843623395248974*^9, 3.8436234811296377`*^9}, 3.8436235228419657`*^9, {3.843710421018984*^9, 3.843710422106656*^9}, {3.843710498981309*^9, 3.843710537614964*^9}, { 3.843710579319264*^9, 3.843710645627423*^9}, {3.8437106875546417`*^9, 3.843710688153476*^9}, {3.843710725428294*^9, 3.843710785146202*^9}, { 3.843710821351383*^9, 3.8437110234294205`*^9}, {3.8437111173417163`*^9, 3.843711129714572*^9}, {3.843711236237468*^9, 3.8437112372387085`*^9}, { 3.8437113572143283`*^9, 3.8437113718734703`*^9}, {3.8437115790188246`*^9, 3.843711601014681*^9}, {3.843711741747123*^9, 3.843711755218405*^9}, { 3.8437118059023905`*^9, 3.8437118104255657`*^9}, {3.843711922772312*^9, 3.8437119230384417`*^9}, {3.8437119637523017`*^9, 3.8437119924289055`*^9}, {3.843712070094509*^9, 3.843712071922304*^9}, { 3.8437303811976614`*^9, 3.84373041381275*^9}, {3.843730744283455*^9, 3.8437307459908094`*^9}, {3.8437396200557556`*^9, 3.8437396419414387`*^9}, 3.843886670451059*^9, 3.8438867203204308`*^9, 3.84388678658553*^9, { 3.843886846967881*^9, 3.843886872522117*^9}, {3.8438869150992565`*^9, 3.8438869153482804`*^9}, {3.8443227935999327`*^9, 3.8443228741400695`*^9}, 3.84432529516883*^9, 3.84432540227769*^9, {3.844325496215137*^9, 3.8443254968116083`*^9}, {3.8443255607450824`*^9, 3.84432556531176*^9}, { 3.8443257292349973`*^9, 3.844325729451268*^9}, {3.8443271837653055`*^9, 3.8443271897353077`*^9}, 3.844327630363053*^9, 3.844327741570508*^9, { 3.8443278373713217`*^9, 3.84432790019408*^9}, {3.844328356730674*^9, 3.8443283589066696`*^9}, {3.8443286085720377`*^9, 3.844328633889926*^9}, { 3.844328780662943*^9, 3.844328797514555*^9}, 3.844328890335701*^9, 3.844329541823058*^9, 3.8443297290733314`*^9, 3.8443298258170156`*^9, 3.8443299792211103`*^9, {3.844330023182226*^9, 3.8443300241626625`*^9}, { 3.844330096584533*^9, 3.8443300969210296`*^9}, {3.8443301540407066`*^9, 3.844330184720361*^9}, 3.844330343560071*^9, 3.8443304466315546`*^9, 3.84438870778086*^9, {3.844388798979218*^9, 3.8443888166069407`*^9}, { 3.844388850689955*^9, 3.84438889324323*^9}, 3.8443891579040785`*^9, { 3.8443893096760817`*^9, 3.844389351546801*^9}, {3.8443894390725183`*^9, 3.8443894521629066`*^9}, 3.844389648527203*^9, {3.8443897876199207`*^9, 3.844389824625575*^9}, 3.8443900109195027`*^9, {3.844390820677456*^9, 3.8443908278248734`*^9}, {3.8443909207770224`*^9, 3.8443910088808312`*^9}, 3.844391050490807*^9, 3.844391867983138*^9, {3.844394157403282*^9, 3.844394211279689*^9}, {3.844394341187828*^9, 3.8443943435847197`*^9}, { 3.8443944350783367`*^9, 3.8443944719623637`*^9}, 3.844394554883594*^9, 3.844394790974487*^9, 3.844394878078925*^9, 3.844395085745798*^9, { 3.8443953351049013`*^9, 3.844395416952881*^9}, {3.844395746514305*^9, 3.844395749726533*^9}, 3.8443958397241535`*^9, {3.8443959211672125`*^9, 3.8443959248882713`*^9}, {3.8443960479537315`*^9, 3.844396058908654*^9}, 3.844396301967287*^9, 3.844396496810913*^9, {3.8443967365950084`*^9, 3.8443967370378094`*^9}, 3.8443972200199785`*^9, {3.8444115993210382`*^9, 3.8444115995187025`*^9}, {3.8444116721502385`*^9, 3.8444116838525047`*^9}, 3.8444117955604706`*^9, 3.8444120838091917`*^9, 3.8444123486564503`*^9, { 3.8444124716223226`*^9, 3.8444124796999335`*^9}, {3.8444125495255537`*^9, 3.844412567726659*^9}, 3.844412769483656*^9, {3.844499964651905*^9, 3.84449997397132*^9}, {3.844500043831334*^9, 3.8445000552814937`*^9}, 3.844500094473071*^9, {3.844500426135293*^9, 3.8445004336024866`*^9}, 3.844500503309535*^9, {3.84450071418834*^9, 3.8445007145632133`*^9}, 3.84450075086576*^9, {3.844500802343947*^9, 3.844500805685542*^9}, { 3.844500857916894*^9, 3.844500860801999*^9}, {3.8445009435074234`*^9, 3.8445010378770485`*^9}, {3.844501486443882*^9, 3.844501488956464*^9}, { 3.844501593768973*^9, 3.8445016087484674`*^9}, {3.8445019589459047`*^9, 3.8445019618400517`*^9}, {3.8445142536442575`*^9, 3.844514303852824*^9}, { 3.844514457425339*^9, 3.8445145337724867`*^9}, {3.8445146121090136`*^9, 3.844514612805125*^9}, {3.8445152618516026`*^9, 3.8445152626808715`*^9}, { 3.84451667854188*^9, 3.8445166978368387`*^9}, {3.8445168384209423`*^9, 3.8445168531952915`*^9}, 3.844516936102404*^9, {3.844517144912083*^9, 3.8445171602908783`*^9}, {3.844517313347111*^9, 3.844517374315425*^9}, { 3.844563740797083*^9, 3.844563842955555*^9}, {3.8445647632618103`*^9, 3.844564764558693*^9}, {3.844564893032794*^9, 3.8445648966363597`*^9}, 3.844566001126281*^9, {3.8445661160863905`*^9, 3.844566152674224*^9}, { 3.844566264323254*^9, 3.8445663747877293`*^9}, {3.8445664543449287`*^9, 3.844566491779601*^9}, {3.8445666670048437`*^9, 3.8445667378245735`*^9}, { 3.84456677184741*^9, 3.8445669208491745`*^9}, {3.8445681586856985`*^9, 3.8445681603926296`*^9}, {3.844568433360468*^9, 3.8445684731196322`*^9}, { 3.844568732407946*^9, 3.844568737446255*^9}, 3.844568945877626*^9, { 3.844569099528115*^9, 3.844569106514072*^9}, {3.8445691536508603`*^9, 3.8445691542699223`*^9}, {3.8445698639037194`*^9, 3.8445698642398653`*^9}, {3.844570012985527*^9, 3.84457001409229*^9}, { 3.844570136399222*^9, 3.84457022295549*^9}, {3.8445702927401485`*^9, 3.8445702943727927`*^9}, {3.8445703589410896`*^9, 3.844570359479988*^9}, { 3.844570433361819*^9, 3.844570434479186*^9}, {3.8445708385437922`*^9, 3.844570865548447*^9}, 3.8445719038536615`*^9, {3.84457369886672*^9, 3.844573716165063*^9}, {3.844573766574627*^9, 3.844573766741207*^9}, { 3.8445738390520935`*^9, 3.8445738397153697`*^9}, {3.844574626193658*^9, 3.844574626336315*^9}, 3.8445754934014444`*^9, {3.844575765512229*^9, 3.8445757670064106`*^9}, {3.8445797808579626`*^9, 3.8445797824906826`*^9}, {3.8445801889436493`*^9, 3.8445802499386616`*^9}, {3.8445802832055655`*^9, 3.8445804322445507`*^9}, {3.8445806095243425`*^9, 3.844580784490394*^9}, { 3.8445808660823193`*^9, 3.8445808672575426`*^9}, {3.8445810704154396`*^9, 3.844581084375619*^9}, {3.8445812578925953`*^9, 3.8445812836521835`*^9}, { 3.8445814486128545`*^9, 3.844581454694955*^9}, 3.8445815919025917`*^9, 3.8445816963679733`*^9, 3.8445818761230197`*^9, {3.844581973276004*^9, 3.84458197871758*^9}, {3.8445820591801286`*^9, 3.8445820669279137`*^9}, { 3.844766120152509*^9, 3.844766220989109*^9}, {3.8447666299757333`*^9, 3.844766632861744*^9}, {3.8447669924782996`*^9, 3.844766998824834*^9}, { 3.844767166360729*^9, 3.8447671685821986`*^9}, {3.8447672972644825`*^9, 3.844767489140806*^9}, {3.8447675202758884`*^9, 3.8447677076499157`*^9}, { 3.8447677386160955`*^9, 3.844767751930085*^9}, {3.8447678367494764`*^9, 3.8447678460718756`*^9}, {3.8447679275644846`*^9, 3.844767951604962*^9}, { 3.844823802025931*^9, 3.8448238152889323`*^9}, {3.844823957041947*^9, 3.8448239585139303`*^9}, {3.8448243004194326`*^9, 3.8448243149899445`*^9}, 3.8448243583360662`*^9, 3.844934867394837*^9, 3.845011466205801*^9, { 3.8450117207709064`*^9, 3.8450117245772066`*^9}, 3.845012400796516*^9, { 3.8450126148924513`*^9, 3.8450126150945854`*^9}, 3.845012697578274*^9, 3.845014370057255*^9, {3.8451838607018776`*^9, 3.845183871901742*^9}, { 3.845183946334877*^9, 3.84518395366415*^9}, {3.8451840514184165`*^9, 3.8451840516680007`*^9}, {3.8451841516428566`*^9, 3.845184154374053*^9}, { 3.845184357905266*^9, 3.8451843580652475`*^9}, {3.845184866633246*^9, 3.845184879284834*^9}, {3.8451856542674866`*^9, 3.845185661519927*^9}, 3.845185843485832*^9, 3.845188805837329*^9, {3.845208711326853*^9, 3.8452087400435753`*^9}, {3.8452088755132847`*^9, 3.845208885710583*^9}, { 3.8452090240719767`*^9, 3.8452090275669355`*^9}, {3.845209172626273*^9, 3.8452091859860196`*^9}, {3.845209314813764*^9, 3.8452093153470325`*^9}, { 3.8452093525944805`*^9, 3.845209356766179*^9}, {3.8452094333426437`*^9, 3.845209437202387*^9}, {3.845209581540662*^9, 3.8452096027603593`*^9}, { 3.845209834131934*^9, 3.845209849152528*^9}, {3.8452099760880327`*^9, 3.8452099795576005`*^9}, {3.84521001531735*^9, 3.845210023119549*^9}, { 3.8452101492309895`*^9, 3.8452101507171693`*^9}, {3.845210218508196*^9, 3.8452102205052843`*^9}, {3.845210284636221*^9, 3.8452102908524485`*^9}, { 3.8452104469844484`*^9, 3.845210448865471*^9}, {3.845210722276207*^9, 3.8452107618886013`*^9}, {3.8452108540735493`*^9, 3.8452108566476297`*^9}, 3.8452108885672226`*^9, 3.8452113817145267`*^9, {3.8452544138546667`*^9, 3.845254415221461*^9}, {3.8452544682669744`*^9, 3.845254497242826*^9}, { 3.845254813158949*^9, 3.845254813962109*^9}, {3.845255159389332*^9, 3.8452551602997503`*^9}, 3.8453713836088*^9, 3.8453728273858185`*^9, { 3.8453730671369777`*^9, 3.845373072521226*^9}, {3.8453735876364107`*^9, 3.8453736185890512`*^9}, 3.8453741162299414`*^9, {3.8453744985094943`*^9, 3.8453745049495716`*^9}, {3.845374723838398*^9, 3.8453747280613575`*^9}, 3.845375413181964*^9, {3.845375667874572*^9, 3.845375678759179*^9}, { 3.8453757305367117`*^9, 3.8453757318964834`*^9}, {3.845375795765346*^9, 3.8453759475892797`*^9}, 3.8453762911344376`*^9, {3.845376343496214*^9, 3.845376394269949*^9}, 3.8454413952988825`*^9, {3.8454605213498316`*^9, 3.845460526259059*^9}, {3.8454605688149014`*^9, 3.845460571220699*^9}, { 3.8454607495560193`*^9, 3.8454607590768337`*^9}, {3.845462509735139*^9, 3.845462509985168*^9}, {3.8454655927984095`*^9, 3.8454655941092844`*^9}, { 3.8454656351939297`*^9, 3.8454657716449366`*^9}, {3.8454659031914606`*^9, 3.8454659091378775`*^9}, {3.8454660264366956`*^9, 3.845466050881938*^9}, { 3.8454670388067656`*^9, 3.8454670407645473`*^9}, {3.8454695818972855`*^9, 3.8454695927423058`*^9}, 3.8458628196288977`*^9, {3.8458629698321857`*^9, 3.8458629918325853`*^9}, {3.84586302904202*^9, 3.845863076602502*^9}, { 3.8458631448574963`*^9, 3.8458632007479205`*^9}, {3.845863269580724*^9, 3.8458632726734605`*^9}, {3.845863307748892*^9, 3.8458633353940535`*^9}, { 3.845863395099148*^9, 3.8458634980995226`*^9}, 3.845863530554716*^9, { 3.8458725905500464`*^9, 3.8458726644563165`*^9}, {3.845872707441972*^9, 3.8458727236944923`*^9}, {3.8458728091280556`*^9, 3.845872842539483*^9}, 3.8458728978104*^9, {3.8458730281409388`*^9, 3.8458730351358786`*^9}}, CellLabel-> "In[181]:=",ExpressionUUID->"714e8f10-d6ae-4aae-9c9b-1edf0cec46c5"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SHELLS", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nod", ",", "edg", ",", "row", ",", "dof", ",", "n\[Alpha]", ",", "n\[Beta]", ",", "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "NN", ",", "mat", ",", "MM", ",", "r", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "r\[Gamma]", ",", "rn", ",", "jac", ",", "h\[Alpha]", ",", "e\[Alpha]", ",", "h\[Beta]", ",", "h\[Gamma]", ",", "e\[Beta]", ",", "en", ",", "e\[Gamma]", ",", "FF", ",", "\[Alpha]\[Gamma]", ",", "\[Beta]\[Gamma]", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]", ",", "f\[Alpha]", ",", "f\[Gamma]", ",", "fn", ",", "m\[Alpha]", ",", "m\[Gamma]", ",", "mn", ",", "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]", ",", "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]", ",", "\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]", ",", "GG", ",", "N\[Alpha]\[Alpha]", ",", "N\[Gamma]\[Gamma]", ",", "N\[Alpha]\[Gamma]", ",", "N\[Gamma]\[Alpha]", ",", "M\[Alpha]\[Alpha]", ",", "M\[Gamma]\[Gamma]", ",", "M\[Alpha]\[Gamma]", ",", "Q\[Alpha]", ",", "Q\[Gamma]", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wmap"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nod", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"edg", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"nod", ",", RowBox[{"RotateLeft", "[", "nod", "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"row", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"uX", ",", "uY", ",", "uZ"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Theta]X", ",", "\[Theta]Y", ",", "\[Theta]Z"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"dof", "[", RowBox[{"i_", ",", "j_"}], "]"}], ":=", RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nod", ",", "i", ",", "j"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}], ",", "i", ",", "j"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "2", ",", "1"}], "]"}], "]"}]}], "+", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "i", ",", "j"}], "]"}], "]"}]}], ")"}], "/", "3"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "2", ",", "1"}], "]"}], "]"}], "+", RowBox[{"2", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "i", ",", "j"}], "]"}], "]"}]}]}], ")"}], "/", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"row", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}]}], "}"}], "]"}], "]"}], ",", RowBox[{ RowBox[{"row", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}], "]"}], "]"}]}], "}"}]}], "]"}], "&"}], ",", "edg"}], "]"}], ",", RowBox[{ RowBox[{"row", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "[", "nod", "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", " ", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"1", "/", "2"}], "*", "\[Alpha]", "*", RowBox[{"(", RowBox[{"2", "-", RowBox[{"9", "*", "\[Alpha]"}], "+", RowBox[{"9", "*", SuperscriptBox["\[Alpha]", "2"]}]}], ")"}]}], ",", RowBox[{ RowBox[{"1", "/", "2"}], "*", " ", "\[Beta]", "*", RowBox[{"(", RowBox[{"2", "-", RowBox[{"9", "*", " ", "\[Beta]"}], "+", RowBox[{"9", " ", "*", SuperscriptBox["\[Beta]", "2"]}]}], ")"}]}], ",", RowBox[{ RowBox[{"1", "/", "2"}], "*", RowBox[{"(", RowBox[{"2", "-", RowBox[{"9", " ", SuperscriptBox["\[Alpha]", "3"]}], "-", RowBox[{"11", " ", "\[Beta]"}], "+", RowBox[{"18", " ", SuperscriptBox["\[Beta]", "2"]}], "-", RowBox[{"9", " ", SuperscriptBox["\[Beta]", "3"]}], "-", RowBox[{"9", " ", "*", SuperscriptBox["\[Alpha]", "2"], "*", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"3", "*", "\[Beta]"}]}], ")"}]}], "+", RowBox[{"\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "11"}], "+", RowBox[{"36", "*", "\[Beta]"}], "-", RowBox[{"27", "*", SuperscriptBox["\[Beta]", "2"]}]}], ")"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"9", "/", "2"}], "*", " ", "\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", "*", "\[Alpha]"}]}], ")"}], "*", "\[Beta]"}], ",", RowBox[{ RowBox[{"9", "/", "2"}], "*", " ", "\[Alpha]", "*", "\[Beta]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", "*", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{ RowBox[{"-", "9"}], "/", "2"}], "*", " ", "\[Beta]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]", "+", "\[Beta]"}], ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", "*", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"9", "/", "2"}], "*", " ", "\[Beta]", "*", RowBox[{"(", RowBox[{"2", "+", RowBox[{"3", "*", SuperscriptBox["\[Alpha]", "2"]}], "-", RowBox[{"5", "*", "\[Beta]"}], "+", RowBox[{"3", "*", SuperscriptBox["\[Beta]", "2"]}], "+", RowBox[{"\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "5"}], "+", RowBox[{"6", "*", "\[Beta]"}]}], ")"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"9", "/", "2"}], "*", "\[Alpha]", "*", RowBox[{"(", RowBox[{"2", "+", RowBox[{"3", "*", SuperscriptBox["\[Alpha]", "2"]}], "-", RowBox[{"5", "*", "\[Beta]"}], "+", RowBox[{"3", "*", SuperscriptBox["\[Beta]", "2"]}], "+", RowBox[{"\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "5"}], "+", RowBox[{"6", "*", "\[Beta]"}]}], ")"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{ RowBox[{"-", "9"}], "/", "2"}], "*", " ", "\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", "*", "\[Alpha]"}]}], ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]", "+", "\[Beta]"}], ")"}]}], ",", RowBox[{ RowBox[{"-", "27"}], "*", "\[Alpha]", "*", "\[Beta]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]", "+", "\[Beta]"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nod", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]", "=", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}]}], ";", " ", RowBox[{"r\[Beta]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Norm", "[", "r\[Beta]", "]"}]}], ";", " ", RowBox[{"h\[Alpha]", "=", RowBox[{"Norm", "[", "r\[Alpha]", "]"}]}], ";", RowBox[{"jac", "=", RowBox[{"Norm", "[", RowBox[{"r\[Alpha]", "\[Cross]", "r\[Beta]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Alpha]", "=", RowBox[{"r\[Alpha]", "/", "h\[Alpha]"}]}], ";", RowBox[{"e\[Beta]", "=", RowBox[{"r\[Beta]", "/", "h\[Beta]"}]}], ";", " ", RowBox[{"en", "=", RowBox[{ RowBox[{"r\[Alpha]", "\[Cross]", "r\[Beta]"}], " ", "/", "jac"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r\[Gamma]", "=", RowBox[{"r\[Beta]", "-", RowBox[{ RowBox[{"(", RowBox[{"r\[Beta]", ".", "e\[Alpha]"}], ")"}], " ", "e\[Alpha]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Gamma]", "=", RowBox[{"Norm", "[", "r\[Gamma]", "]"}]}], ";", RowBox[{"e\[Gamma]", "=", RowBox[{"r\[Gamma]", "/", "h\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", "e\[Gamma]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]\[Gamma]", ",", "\[Beta]\[Gamma]"}], "}"}], "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Alpha]"}], ",", RowBox[{"r\[Alpha]", ".", "r\[Beta]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Beta]"}], ",", RowBox[{"r\[Beta]", ".", "r\[Beta]"}]}], "}"}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Gamma]"}], ",", RowBox[{"r\[Beta]", ".", "r\[Gamma]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"MM", ".", RowBox[{"dof", "[", RowBox[{"2", ",", "1"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"MM", ".", RowBox[{"dof", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"MM", ".", RowBox[{"dof", "[", RowBox[{"2", ",", "3"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"MM", ".", RowBox[{"dof", "[", RowBox[{"3", ",", "1"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"MM", ".", RowBox[{"dof", "[", RowBox[{"3", ",", "2"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{"MM", ".", RowBox[{"dof", "[", RowBox[{"3", ",", "3"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "the", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Gamma]", ",", "fn"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"strain", " ", "measures", " ", "with", " ", "non"}], "-", RowBox[{"symmetric", " ", "\[Epsilon]"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v"}]}]}], ")"}], "/", "h\[Gamma]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], "/", "h\[Alpha]"}], "-", "\[Psi]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u"}]}]}], ")"}], "/", "h\[Gamma]"}], "+", "\[Psi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}]}]}], ")"}]}], "/", "h\[Gamma]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", " ", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Theta]"}]}]}], ")"}], "/", "h\[Gamma]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], "/", "h\[Alpha]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], "/", "h\[Alpha]"}], "+", "\[Theta]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}]}]}], ")"}], "/", "h\[Gamma]"}], "-", "\[Phi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "stress", " ", "resultants", " ", "with", " ", "a", " ", "nonsymmetric", " ", "N"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Alpha]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Gamma]\[Gamma]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Gamma]\[Gamma]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Gamma]\[Gamma]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Gamma]", "=", RowBox[{ "tt", "*", "2", " ", "GG", "*", "\[Epsilon]\[Alpha]\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Gamma]\[Alpha]", "=", RowBox[{ "tt", "*", "2", " ", "GG", "*", "\[Epsilon]\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Alpha]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Gamma]\[Gamma]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Gamma]\[Gamma]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Gamma]\[Gamma]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Gamma]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", " ", "GG", "*", "\[Kappa]\[Alpha]\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Alpha]", "=", RowBox[{ RowBox[{"5", "/", "6"}], " ", "*", "GG", "*", "tt", "*", "\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Gamma]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"virtual", " ", "work"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "N\[Alpha]\[Alpha]", ",", "N\[Gamma]\[Gamma]", ",", "N\[Alpha]\[Gamma]", ",", "N\[Gamma]\[Alpha]"}], "}"}]}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "M\[Alpha]\[Alpha]", ",", "M\[Gamma]\[Gamma]", ",", "M\[Alpha]\[Gamma]"}], "}"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"Q\[Alpha]", ",", "Q\[Gamma]"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Gamma]", ",", "fn"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI28", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{{3.8448250537576227`*^9, 3.8448251771278715`*^9}, { 3.8448252137845707`*^9, 3.8448252155580893`*^9}, {3.8448254288715434`*^9, 3.8448254325068684`*^9}, {3.844825473502449*^9, 3.844825487394247*^9}, { 3.8448255700281677`*^9, 3.8448256123923707`*^9}, {3.8448258113699675`*^9, 3.8448259039303937`*^9}, {3.8448259506719284`*^9, 3.844826284306115*^9}, { 3.8448268689947243`*^9, 3.8448268699886227`*^9}, 3.8448270259285955`*^9, { 3.8448271042647657`*^9, 3.8448271098964405`*^9}, {3.844827241092888*^9, 3.844827245842145*^9}, {3.8449345617461205`*^9, 3.844934602408169*^9}, { 3.844934658197948*^9, 3.8449348350524793`*^9}, {3.844935059720586*^9, 3.8449350605941477`*^9}, {3.844936139535534*^9, 3.8449361403797927`*^9}, { 3.8449953938751106`*^9, 3.8449953942218556`*^9}, {3.844995606823018*^9, 3.8449956071318903`*^9}, {3.8449970717317686`*^9, 3.8449970738159122`*^9}, 3.844997131164296*^9, {3.8449973802320213`*^9, 3.844997380443988*^9}, 3.8450114546701565`*^9, {3.8450127082731895`*^9, 3.84501270987388*^9}, { 3.8450127530150876`*^9, 3.845012810587885*^9}, 3.8450128586967945`*^9, { 3.8450132292910776`*^9, 3.8450132368337135`*^9}, {3.8450133572020845`*^9, 3.845013369791489*^9}, {3.845013427008649*^9, 3.845013479380189*^9}, { 3.8450138434327407`*^9, 3.845013858812168*^9}, {3.8450141220982046`*^9, 3.84501413941072*^9}, 3.8450144174596987`*^9},ExpressionUUID->"93793ff8-843b-44a4-ae78-\ 021f7fa68b70"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "n\[Alpha]", ",", "n\[Beta]", ",", "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "NN", ",", "mat", ",", "MM", ",", "r", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "r\[Gamma]", ",", "rn", ",", "jac", ",", "h\[Alpha]", ",", "e\[Alpha]", ",", "h\[Beta]", ",", "h\[Gamma]", ",", "e\[Beta]", ",", "en", ",", "e\[Gamma]", ",", "FF", ",", "\[Alpha]\[Gamma]", ",", "\[Beta]\[Gamma]", ",", "edg", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "\[Pi]u", ",", "\[Pi]v", ",", "\[Pi]w", ",", "\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]", ",", "f\[Alpha]", ",", "f\[Gamma]", ",", "fn", ",", "m\[Alpha]", ",", "m\[Gamma]", ",", "mn", ",", "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]", ",", "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]", ",", "\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]", ",", "GG", ",", "N\[Alpha]\[Alpha]", ",", "N\[Gamma]\[Gamma]", ",", "N\[Alpha]\[Gamma]", ",", "N\[Gamma]\[Alpha]", ",", "M\[Alpha]\[Alpha]", ",", "M\[Gamma]\[Gamma]", ",", "M\[Alpha]\[Gamma]", ",", "Q\[Alpha]", ",", "Q\[Gamma]", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wmap"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"mat", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]", "=", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}]}], ";", " ", RowBox[{"r\[Beta]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Norm", "[", "r\[Beta]", "]"}]}], ";", " ", RowBox[{"h\[Alpha]", "=", RowBox[{"Norm", "[", "r\[Alpha]", "]"}]}], ";", RowBox[{"jac", "=", RowBox[{"Norm", "[", RowBox[{"r\[Alpha]", "\[Cross]", "r\[Beta]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"e\[Alpha]", "=", RowBox[{"r\[Alpha]", "/", "h\[Alpha]"}]}], ";", RowBox[{"e\[Beta]", "=", RowBox[{"r\[Beta]", "/", "h\[Beta]"}]}], ";", " ", RowBox[{"en", "=", RowBox[{ RowBox[{"r\[Alpha]", "\[Cross]", "r\[Beta]"}], " ", "/", "jac"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r\[Gamma]", "=", RowBox[{"r\[Beta]", "-", RowBox[{ RowBox[{"(", RowBox[{"r\[Beta]", ".", "e\[Alpha]"}], ")"}], " ", "e\[Alpha]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Gamma]", "=", RowBox[{"Norm", "[", "r\[Gamma]", "]"}]}], ";", RowBox[{"e\[Gamma]", "=", RowBox[{"r\[Gamma]", "/", "h\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", "e\[Gamma]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]\[Gamma]", ",", "\[Beta]\[Gamma]"}], "}"}], "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Alpha]"}], ",", RowBox[{"r\[Alpha]", ".", "r\[Beta]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Beta]"}], ",", RowBox[{"r\[Beta]", ".", "r\[Beta]"}]}], "}"}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{"r\[Alpha]", ".", "r\[Gamma]"}], ",", RowBox[{"r\[Beta]", ".", "r\[Gamma]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"edg", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Sort", "[", "#", "]"}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{ RowBox[{"(", RowBox[{"mat", ".", "NN"}], ")"}], ".", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", "#", "]"}]}], "]"}], "&"}], ",", "edg"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{ RowBox[{"(", RowBox[{"mat", ".", "NN"}], ")"}], ".", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", "#", "]"}]}], "]"}], "&"}], ",", "edg"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"(", RowBox[{"mat", ".", "NN"}], ")"}], ".", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"#", ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", "#", "]"}]}], "]"}], "&"}], ",", "edg"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "1"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "3"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]Z", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "projection", "*)"}], "\[IndentingNewLine]", RowBox[{"AA", "=", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", "jac", ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]"}], "}"}], "=", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "/", "AA"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]u", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]v", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Pi]w", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "the", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Psi]"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Gamma]", ",", "fn"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"strain", " ", "measures", " ", "with", " ", "non"}], "-", RowBox[{"symmetric", " ", "\[Epsilon]"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v"}]}]}], ")"}], "/", "h\[Gamma]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], "/", "h\[Alpha]"}], "-", "\[Psi]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u"}]}]}], ")"}], "/", "h\[Gamma]"}], "+", "\[Psi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}]}]}], ")"}]}], "/", "h\[Gamma]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", " ", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Theta]"}]}]}], ")"}], "/", "h\[Gamma]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], "/", "h\[Alpha]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], "/", "h\[Alpha]"}], "+", "\[Pi]\[Theta]"}], ",", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Alpha]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}]}], "+", RowBox[{"\[Beta]\[Gamma]", " ", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}]}]}], ")"}], "/", "h\[Gamma]"}], "-", "\[Pi]\[Phi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "stress", " ", "resultants", " ", "with", " ", "a", " ", "nonsymmetric", " ", "N"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Alpha]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Gamma]\[Gamma]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Gamma]\[Gamma]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Gamma]\[Gamma]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Gamma]", "=", RowBox[{ "tt", "*", "2", " ", "GG", "*", "\[Epsilon]\[Alpha]\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Gamma]\[Alpha]", "=", RowBox[{ "tt", "*", "2", " ", "GG", "*", "\[Epsilon]\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Alpha]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Gamma]\[Gamma]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Gamma]\[Gamma]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Gamma]\[Gamma]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Gamma]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", " ", "GG", "*", "\[Kappa]\[Alpha]\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Alpha]", "=", RowBox[{ RowBox[{"5", "/", "6"}], " ", "*", "GG", "*", "tt", "*", "\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Gamma]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"virtual", " ", "work"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Gamma]\[Gamma]", ",", "\[Epsilon]\[Alpha]\[Gamma]", ",", "\[Epsilon]\[Gamma]\[Alpha]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "N\[Alpha]\[Alpha]", ",", "N\[Gamma]\[Gamma]", ",", "N\[Alpha]\[Gamma]", ",", "N\[Gamma]\[Alpha]"}], "}"}]}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Gamma]\[Gamma]", ",", "\[Kappa]\[Alpha]\[Gamma]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "M\[Alpha]\[Alpha]", ",", "M\[Gamma]\[Gamma]", ",", "M\[Alpha]\[Gamma]"}], "}"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Gamma]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"Q\[Alpha]", ",", "Q\[Gamma]"}], "}"}]}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Gamma]", ",", "fn"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wmap", "=", RowBox[{ RowBox[{ RowBox[{"-", "1"}], "/", "10"}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Pi]u", "-", "u"}], "]"}], "*", RowBox[{"(", RowBox[{"\[Pi]u", "-", "u"}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Pi]v", "-", "v"}], "]"}], "*", RowBox[{"(", RowBox[{"\[Pi]v", "-", "v"}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"\[Pi]w", "-", "w"}], "]"}], "*", RowBox[{"(", RowBox[{"\[Pi]w", "-", "w"}], ")"}]}]}], ")"}], "*", "tt", "*", RowBox[{"EE", "/", "jac"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI3", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI1", ",", RowBox[{ RowBox[{"(", "\[Delta]wmap", ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{ 3.4426474258030453`*^9, {3.4444401255942*^9, 3.4444401388073997`*^9}, { 3.4444401803034*^9, 3.4444401844062*^9}, 3.4444402418922*^9, { 3.4444402805022*^9, 3.4444403134026003`*^9}, {3.4444403443062*^9, 3.4444404484049997`*^9}, {3.444483267101*^9, 3.444483267335*^9}, { 3.4444833136046*^9, 3.4444835622998*^9}, {3.4444836421094*^9, 3.4444837777981997`*^9}, {3.444483920429*^9, 3.4444839412237997`*^9}, 3.4444842905546*^9, {3.4444843207406*^9, 3.4444844162282*^9}, { 3.4444844465078*^9, 3.4444844624354*^9}, {3.4444845255998*^9, 3.4444845894505997`*^9}, {3.4444846290746*^9, 3.444484933025*^9}, { 3.4444849790917997`*^9, 3.4444851148742*^9}, {3.444534936054*^9, 3.4445349675348*^9}, {3.4445355821731997`*^9, 3.44453585174*^9}, { 3.4445372162198*^9, 3.4445372264378*^9}, 3.444537384731*^9, { 3.4445377585382*^9, 3.4445377605818*^9}, {3.4445379733658*^9, 3.4445379736934*^9}, {3.4445380176762*^9, 3.444538032777*^9}, { 3.4445381079222*^9, 3.4445381581386003`*^9}, {3.4445382726456003`*^9, 3.4445382910067997`*^9}, {3.4445383401312*^9, 3.4445383475880003`*^9}, { 3.444538438458*^9, 3.4445384464608*^9}, {3.4445385680783997`*^9, 3.4445385687648*^9}, {3.4445389411991997`*^9, 3.4445389431024*^9}, { 3.444539746605*^9, 3.4445397807846003`*^9}, {3.4445408839765997`*^9, 3.4445409234133997`*^9}, {3.4445409681698*^9, 3.4445409932702*^9}, { 3.4445415452906*^9, 3.4445415706717997`*^9}, {3.4445416647242002`*^9, 3.4445416909477997`*^9}, {3.4445417660150003`*^9, 3.444541788557*^9}, { 3.4445420906977997`*^9, 3.444542104847*^9}, {3.4445421885878*^9, 3.4445421941414003`*^9}, {3.4445422252166*^9, 3.4445422386014*^9}, { 3.444542280425*^9, 3.4445423014538*^9}, {3.444542455769*^9, 3.4445424578282003`*^9}, {3.4445431739214*^9, 3.444543175809*^9}, { 3.4445647020962*^9, 3.4445648405618*^9}, {3.4445648825414*^9, 3.4445648858486*^9}, {3.4445649382646*^9, 3.4445651882702*^9}, { 3.4446164822206*^9, 3.4446165344494*^9}, {3.4446166121842003`*^9, 3.4446166738822002`*^9}, {3.4446167223046*^9, 3.4446168047974*^9}, { 3.444616843033*^9, 3.444616906447*^9}, {3.4446444694708*^9, 3.4446444700948*^9}, {3.4446477738310003`*^9, 3.4446477939862003`*^9}, { 3.4446478467298*^9, 3.4446478681018*^9}, 3.4446480456142*^9, { 3.4446487557418003`*^9, 3.4446487636198*^9}, 3.4446488179974003`*^9, { 3.4446488971205997`*^9, 3.4446489152478*^9}, {3.4446490003458*^9, 3.4446490008294*^9}, {3.4447042728942003`*^9, 3.4447042751562*^9}, { 3.4447044703278*^9, 3.4447044865362*^9}, 3.4447046475282*^9, 3.4447047993786*^9, {3.444704908329*^9, 3.4447049292642*^9}, { 3.4447049861926003`*^9, 3.4447049877214003`*^9}, {3.4447050279296*^9, 3.4447050419695997`*^9}, {3.4447053486656*^9, 3.4447053739376*^9}, 3.4447054561963997`*^9, 3.44470561612*^9, {3.4472133996876*^9, 3.4472134108571997`*^9}, {3.4472134470179996`*^9, 3.4472134648332*^9}, { 3.4472135032872*^9, 3.4472135245344*^9}, {3.4472136963059998`*^9, 3.4472137794384003`*^9}, {3.4472138235708*^9, 3.4472138388900003`*^9}, { 3.4472139099792*^9, 3.4472141367096*^9}, {3.447214202682*^9, 3.4472142975924*^9}, {3.4472144187732*^9, 3.4472145910284*^9}, { 3.4472146560492*^9, 3.4472147023968*^9}, {3.447214803594*^9, 3.4472148728736*^9}, {3.4472149156956*^9, 3.447214940484*^9}, { 3.447216227284*^9, 3.4472162419948*^9}, {3.4472163068908*^9, 3.4472163720832*^9}, {3.4472164665880003`*^9, 3.447216530392*^9}, { 3.4472166237268*^9, 3.4472167058452*^9}, 3.4472167362808*^9, { 3.4472171394658003`*^9, 3.4472171532874002`*^9}, {3.4472172028993998`*^9, 3.4472172216661997`*^9}, {3.4472172524606*^9, 3.4472172690278*^9}, { 3.4472173209133997`*^9, 3.4472173334245996`*^9}, {3.4472173920846*^9, 3.447217404861*^9}, {3.4472179572548*^9, 3.4472180351456003`*^9}, { 3.4472509764091997`*^9, 3.4472511017396*^9}, {3.4473910422216*^9, 3.4473912901524*^9}, 3.4473918688344*^9, {3.447392021185*^9, 3.4473920346633997`*^9}, {3.4473921383304*^9, 3.4473921479088*^9}, { 3.4473923024112*^9, 3.4473923734379997`*^9}, {3.4473928098168*^9, 3.4473928648691998`*^9}, {3.4473931872432003`*^9, 3.4473932461800003`*^9}, {3.4473933026675997`*^9, 3.4473934579812*^9}, { 3.4473935755271997`*^9, 3.447393742572*^9}, {3.4473939032676*^9, 3.4473939384144*^9}, {3.447395257644*^9, 3.4473953141628*^9}, { 3.4473954231132*^9, 3.4473954756384*^9}, {3.4473955348716*^9, 3.4473955723272*^9}, {3.447395648502*^9, 3.4473957588876*^9}, { 3.4473957903996*^9, 3.4473958488372*^9}, 3.4473962894154*^9, { 3.447396350817*^9, 3.447396352611*^9}, {3.4474625379146*^9, 3.4474625637326*^9}, {3.558360651728078*^9, 3.558360652102478*^9}, { 3.5619791319820857`*^9, 3.561979135788492*^9}, 3.561979369382504*^9, { 3.5619794930439215`*^9, 3.5619795010155354`*^9}, {3.561979569218855*^9, 3.56197960614412*^9}, {3.5619797417551584`*^9, 3.5619797448751636`*^9}, { 3.618719065033702*^9, 3.618719075426296*^9}, {3.6187194011669273`*^9, 3.6187194449454317`*^9}, {3.6187196998040085`*^9, 3.6187197102436056`*^9}, {3.618719902254588*^9, 3.6187199711455283`*^9}, { 3.618722365406472*^9, 3.6187225412555304`*^9}, {3.6187226885009522`*^9, 3.6187227109872384`*^9}, {3.618722756922866*^9, 3.6187231317203026`*^9}, { 3.618723424250035*^9, 3.6187234267291765`*^9}, {3.6187235105259695`*^9, 3.6187236491028957`*^9}, {3.618723691580325*^9, 3.618723745975436*^9}, { 3.618723778837316*^9, 3.6187238310002995`*^9}, {3.6187239055875654`*^9, 3.618723940035536*^9}, {3.6187239782667227`*^9, 3.6187240219352207`*^9}, { 3.618724166762504*^9, 3.618724177411113*^9}, {3.618729321696159*^9, 3.618729328067523*^9}, 3.618729374058154*^9, {3.6187294379838104`*^9, 3.618729708464281*^9}, {3.6187297631904106`*^9, 3.618729773195983*^9}, { 3.618729822648812*^9, 3.6187299321490746`*^9}, {3.618729984399063*^9, 3.61873000654133*^9}, {3.6187300746012225`*^9, 3.6187300860458775`*^9}, { 3.618731390835507*^9, 3.6187315116174154`*^9}, {3.618731747324897*^9, 3.6187318214091344`*^9}, {3.6187318769243097`*^9, 3.618732065297084*^9}, { 3.6187321012351394`*^9, 3.618732157420353*^9}, {3.618732188384124*^9, 3.6187322435542793`*^9}, {3.6187322786112847`*^9, 3.6187325478446836`*^9}, {3.6187325819856367`*^9, 3.6187326817653437`*^9}, {3.618732810863728*^9, 3.61873282594359*^9}, { 3.6187336474335766`*^9, 3.618733754678711*^9}, {3.618733827497876*^9, 3.61873396201257*^9}, {3.6187342020362988`*^9, 3.618734236455267*^9}, 3.618734298201799*^9, {3.618734712498495*^9, 3.618734712716508*^9}, 3.6187347739640107`*^9, {3.618738817361748*^9, 3.6187388333816643`*^9}, { 3.6187391349349127`*^9, 3.6187391457955337`*^9}, {3.618739376900752*^9, 3.618739397023903*^9}, {3.618739528394417*^9, 3.618739534809784*^9}, { 3.618739972366811*^9, 3.61873997340687*^9}, {3.6187400416617737`*^9, 3.618740043022852*^9}, {3.6187400971579485`*^9, 3.618740107902563*^9}, { 3.6187401713671927`*^9, 3.6187401723312483`*^9}, {3.6187402613443394`*^9, 3.618740268819767*^9}, {3.6187403697625403`*^9, 3.6187404057615995`*^9}, { 3.618740488277319*^9, 3.618740516244919*^9}, {3.618740647782442*^9, 3.6187406551668644`*^9}, 3.6187407823021364`*^9, {3.6187418050786357`*^9, 3.618741805749674*^9}, {3.6187418557605343`*^9, 3.6187419895921893`*^9}, { 3.618742022944097*^9, 3.61874204379729*^9}, {3.6187420836395683`*^9, 3.618742103384698*^9}, {3.620462440882641*^9, 3.6204624460519366`*^9}, { 3.6204624990259666`*^9, 3.620462576450395*^9}, {3.620463682857678*^9, 3.620463713336421*^9}, 3.6204637901188126`*^9, {3.620464238835478*^9, 3.62046424411378*^9}, 3.628912429385081*^9, {3.6289135207155013`*^9, 3.6289135210805225`*^9}, 3.6289497746958513`*^9, 3.6289498371774254`*^9, { 3.62894988410911*^9, 3.6289500319795675`*^9}, {3.6289501333883677`*^9, 3.628950183744248*^9}, {3.6289503323017445`*^9, 3.628950390181055*^9}, { 3.6289505050536256`*^9, 3.6289505113579865`*^9}, {3.62895070863527*^9, 3.6289507095043197`*^9}, {3.628951013180689*^9, 3.62895101407374*^9}, { 3.629190743153632*^9, 3.629190816645361*^9}, {3.6291909709608326`*^9, 3.629190981678051*^9}, {3.629191034624544*^9, 3.6291910410049553`*^9}, { 3.6293846391370816`*^9, 3.629384641102685*^9}, {3.6294628543371735`*^9, 3.629462867097191*^9}, {3.629468063172048*^9, 3.6294681151669397`*^9}, { 3.6295205836757097`*^9, 3.6295206295085897`*^9}, {3.6295206788826766`*^9, 3.6295207067911253`*^9}, {3.6295207408927855`*^9, 3.629520753700408*^9}, { 3.629521020590745*^9, 3.6295210354395943`*^9}, {3.6295211107369013`*^9, 3.62952114882508*^9}, {3.6295212327348795`*^9, 3.6295212477237363`*^9}, { 3.6295213424816394`*^9, 3.629521343230441*^9}, {3.6295215363119802`*^9, 3.6295216753550243`*^9}, {3.629521922272258*^9, 3.6295219939855833`*^9}, { 3.6295220298188467`*^9, 3.629522446058778*^9}, {3.629522499348471*^9, 3.629522604352256*^9}, {3.629522755188921*^9, 3.62952288580795*^9}, { 3.629522918084407*^9, 3.6295233421087513`*^9}, {3.6295233808436193`*^9, 3.629523390936837*^9}, {3.629523424274096*^9, 3.6295234533369465`*^9}, { 3.6295235190130625`*^9, 3.629523521680667*^9}, 3.6295235894315863`*^9, { 3.6295237270706277`*^9, 3.629523799454755*^9}, {3.6295238514808464`*^9, 3.629523883460902*^9}, {3.6295239376085978`*^9, 3.6295239442386093`*^9}, { 3.6295241089904985`*^9, 3.629524177537019*^9}, 3.629524211888279*^9, { 3.629524277423994*^9, 3.629524396904604*^9}, {3.6295244794839497`*^9, 3.6295246248450055`*^9}, 3.629524657090262*^9, {3.6295259599109507`*^9, 3.629526013465844*^9}, {3.6295261092188125`*^9, 3.629526201414974*^9}, 3.6295263436092243`*^9, {3.6295263910333076`*^9, 3.629526583303645*^9}, { 3.629526616672104*^9, 3.629526647653758*^9}, {3.629526687558628*^9, 3.629526744888729*^9}, {3.629526804075233*^9, 3.6295268598453307`*^9}, { 3.6295269393898706`*^9, 3.6295269586559043`*^9}, {3.6295271490074387`*^9, 3.6295272149019547`*^9}, {3.6295272553684254`*^9, 3.6295272827620735`*^9}, {3.6295274137087035`*^9, 3.6295274761244135`*^9}, {3.6295275252801*^9, 3.6295279912529182`*^9}, { 3.6295281572216096`*^9, 3.629528160435215*^9}, {3.6295282905550437`*^9, 3.6295284308616905`*^9}, 3.6295285402022824`*^9, {3.629528582088356*^9, 3.629528616798417*^9}, {3.6295287666834803`*^9, 3.6295290316343455`*^9}, { 3.629529086515242*^9, 3.629529118432898*^9}, {3.6295291548121614`*^9, 3.629529292794404*^9}, {3.6295293426208916`*^9, 3.6295293491261034`*^9}, { 3.629529420699029*^9, 3.629529571535694*^9}, {3.6295296539506383`*^9, 3.629529656103442*^9}, {3.6295296894407005`*^9, 3.629529692295506*^9}, { 3.6295297445555973`*^9, 3.629529766426836*^9}, {3.6295298053333044`*^9, 3.6295298209489317`*^9}, {3.6295308380551186`*^9, 3.6295308386635194`*^9}, {3.629532377840223*^9, 3.6295323811630287`*^9}, { 3.629532480020402*^9, 3.629532482454006*^9}, {3.629532520720874*^9, 3.629532564619351*^9}, {3.62953259842461*^9, 3.6295326002654133`*^9}, { 3.6295326327758703`*^9, 3.6295326715107384`*^9}, {3.629532742428463*^9, 3.6295328288058147`*^9}, {3.6295329692184625`*^9, 3.6295330530062094`*^9}, {3.6295331824396367`*^9, 3.629533193562456*^9}, 3.6295350321720915`*^9, 3.629535158485513*^9, {3.629535245471266*^9, 3.6295352687465067`*^9}, {3.62953541293756*^9, 3.629535446384019*^9}, { 3.6295355043381205`*^9, 3.6295355262249594`*^9}, {3.629543790136781*^9, 3.629543791181983*^9}, {3.629543871350524*^9, 3.629544001673153*^9}, { 3.6295446682009234`*^9, 3.629544668466124*^9}, {3.6296010216162376`*^9, 3.6296010236442413`*^9}, {3.629601079336339*^9, 3.6296010902875586`*^9}, 3.6296011425476503`*^9, {3.6296043522397404`*^9, 3.629604399031022*^9}, { 3.629623884428093*^9, 3.629623914723346*^9}, {3.6296239662190366`*^9, 3.6296239738006496`*^9}, {3.6296240514731865`*^9, 3.6296240920176573`*^9}, {3.629624125947717*^9, 3.629624369432945*^9}, { 3.6296256512247963`*^9, 3.6296256817072496`*^9}, {3.6296260472626915`*^9, 3.629626047434292*^9}, {3.629628055568204*^9, 3.629628056098605*^9}, { 3.6296280911206665`*^9, 3.6296281088266973`*^9}, {3.6296281406819534`*^9, 3.629628273032586*^9}, {3.629628378831972*^9, 3.6296283814995766`*^9}, { 3.629628459562114*^9, 3.629628466379326*^9}, {3.629628519419419*^9, 3.6296285390754533`*^9}, {3.629633008133008*^9, 3.629633008835009*^9}, { 3.6296337764967575`*^9, 3.6296338344040594`*^9}, {3.6296342997684765`*^9, 3.629634432150309*^9}, {3.629634494035618*^9, 3.6296345320060844`*^9}, { 3.629634594499794*^9, 3.629634812182576*^9}, {3.6296348599810605`*^9, 3.6296348746918864`*^9}, {3.6296349071867433`*^9, 3.629635023172947*^9}, 3.6296350995818815`*^9, {3.6296363797201295`*^9, 3.6296363868961425`*^9}, { 3.629636462025874*^9, 3.6296364833355117`*^9}, {3.629636555922439*^9, 3.62963656780966*^9}, {3.629636770469616*^9, 3.629636774151222*^9}, { 3.6296369192782774`*^9, 3.6296369318830996`*^9}, {3.629637058539722*^9, 3.6296370719401455`*^9}, {3.629637278172508*^9, 3.629637286814923*^9}, { 3.6296376418091464`*^9, 3.629637662385583*^9}, {3.629637773551378*^9, 3.629637795360216*^9}, {3.6296390041751394`*^9, 3.629639039571602*^9}, 3.6296393829750047`*^9, {3.6296395546065063`*^9, 3.6296395649961243`*^9}, { 3.62964113386068*^9, 3.6296412507048855`*^9}, {3.629641303167777*^9, 3.629641313744596*^9}, {3.6296416285116315`*^9, 3.629641628886032*^9}, { 3.6296416658736973`*^9, 3.6296416815049243`*^9}, 3.6296417376338234`*^9, { 3.6296855551269727`*^9, 3.6296855804270077`*^9}, {3.6297079065796247`*^9, 3.6297079070476255`*^9}, {3.6297080850439377`*^9, 3.629708135728427*^9}, { 3.6297083496516027`*^9, 3.6297084025512953`*^9}, {3.629708781767563*^9, 3.629708790940379*^9}, {3.6297089402482414`*^9, 3.6297089618542795`*^9}, { 3.6297105345398417`*^9, 3.629710538580249*^9}, {3.6297107810514746`*^9, 3.6297107850138817`*^9}, {3.6297109100481014`*^9, 3.629710915710911*^9}, { 3.629711201534613*^9, 3.629711204311418*^9}, {3.629711236307074*^9, 3.6297115007275386`*^9}, {3.6297115377464037`*^9, 3.6297115441112146`*^9}, 3.6297116025645175`*^9, {3.6298716505389357`*^9, 3.629871851841689*^9}, { 3.62987837458679*^9, 3.629878383510006*^9}, {3.6298784402629056`*^9, 3.629878447345318*^9}, {3.6298785221786494`*^9, 3.6298786580236883`*^9}, { 3.629878689613744*^9, 3.629878737147027*^9}, 3.629878783853509*^9, { 3.629878832322794*^9, 3.6298789171723433`*^9}, {3.6298802128122005`*^9, 3.6298802929723125`*^9}, 3.6298813644148126`*^9, {3.629882428887303*^9, 3.629882435887313*^9}, {3.6298986251827383`*^9, 3.6298988530367384`*^9}, { 3.6298989036744275`*^9, 3.6298989486493063`*^9}, {3.629899016868226*^9, 3.6298991622448816`*^9}, {3.6298997154530535`*^9, 3.629899740147897*^9}, { 3.6298998248560457`*^9, 3.629899978048314*^9}, {3.6299000396372223`*^9, 3.6299001557638264`*^9}, {3.6299001966826982`*^9, 3.6299002595352087`*^9}, 3.6299005011236343`*^9, {3.6299005468317146`*^9, 3.629900567642151*^9}, { 3.629900887676713*^9, 3.629900990153293*^9}, {3.6299011689220085`*^9, 3.6299012295125146`*^9}, {3.6299013754039707`*^9, 3.6299014166036434`*^9}, 3.6299014589733176`*^9, {3.6299015096734066`*^9, 3.629901588765546*^9}, { 3.629901662569275*^9, 3.6299016974665365`*^9}, {3.629901952339784*^9, 3.6299019599057975`*^9}, 3.6299020306051216`*^9, {3.6299022330934772`*^9, 3.6299022682559395`*^9}, {3.6299023020455985`*^9, 3.629902332808852*^9}, { 3.6299024532566643`*^9, 3.629902462850681*^9}, {3.629949880225117*^9, 3.6299498807867184`*^9}, {3.6299503101150723`*^9, 3.6299503156998825`*^9}, {3.629950355058751*^9, 3.629950498937804*^9}, { 3.6299555415202007`*^9, 3.6299555507086167`*^9}, {3.6299556061667137`*^9, 3.6299557553497763`*^9}, {3.629955788499834*^9, 3.6299558948608212`*^9}, { 3.629956042764681*^9, 3.629956043809883*^9}, {3.6299560914211664`*^9, 3.6299561017327843`*^9}, 3.629956145849662*^9, {3.6299584813821354`*^9, 3.6299585082765827`*^9}, 3.6299585652946825`*^9, {3.629958616587573*^9, 3.6299586356508064`*^9}, {3.629958715073346*^9, 3.6299588186419287`*^9}, { 3.629958857454797*^9, 3.629958927249319*^9}, {3.629959427994599*^9, 3.629959494669116*^9}, {3.6299595293323765`*^9, 3.6299596037913074`*^9}, { 3.62995966795422*^9, 3.62995967360143*^9}, {3.6299597835972233`*^9, 3.6299597841120243`*^9}, {3.629959826622099*^9, 3.629959862533362*^9}, { 3.6299599051682367`*^9, 3.6299599235918694`*^9}, 3.629959979939168*^9, { 3.6299601345354395`*^9, 3.62996014612626*^9}, 3.6299601769831142`*^9, { 3.629960253142448*^9, 3.629960269538077*^9}, {3.6299603041701374`*^9, 3.6299603078205442`*^9}, {3.6299604300467587`*^9, 3.629960435491168*^9}, { 3.6299605300585346`*^9, 3.6299605636609936`*^9}, {3.6299606195870914`*^9, 3.6299606581971593`*^9}, {3.629960824228251*^9, 3.6299608755367413`*^9}, { 3.629960906658796*^9, 3.6299609978409557`*^9}, {3.6299610312250147`*^9, 3.629961070646284*^9}, {3.629961135698398*^9, 3.6299611643088484`*^9}, { 3.6299720458358483`*^9, 3.6299721791536827`*^9}, {3.6299722439717965`*^9, 3.629972300007095*^9}, {3.6299723670872126`*^9, 3.6299723937008595`*^9}, { 3.629972457801372*^9, 3.6299724710613956`*^9}, {3.629972740193068*^9, 3.6299728251196175`*^9}, {3.6299729203577843`*^9, 3.6299729350218105`*^9}, {3.6299729720874753`*^9, 3.6299730462188053`*^9}, {3.629973116044528*^9, 3.6299731230177402`*^9}, { 3.629973184310248*^9, 3.6299732090830917`*^9}, {3.629973349982539*^9, 3.6299734360166903`*^9}, 3.629973534562063*^9, {3.629973577446539*^9, 3.629973586104554*^9}, {3.6299740374133463`*^9, 3.629974083823428*^9}, { 3.6299742505565205`*^9, 3.629974337089873*^9}, {3.629974382907153*^9, 3.6299744466176653`*^9}, {3.629974589794717*^9, 3.629974590761918*^9}, { 3.629974776215044*^9, 3.6299747850134597`*^9}, {3.6299748226095257`*^9, 3.6299748237483273`*^9}, 3.6299748618435946`*^9, {3.629975198476586*^9, 3.6299752545898843`*^9}, {3.62997531475919*^9, 3.6299753175515947`*^9}, { 3.6299754601982455`*^9, 3.6299754625382495`*^9}, {3.629975592034077*^9, 3.629975592502078*^9}, {3.629983277446268*^9, 3.6299832946842985`*^9}, { 3.62998342081052*^9, 3.6299835439883366`*^9}, {3.629983615514462*^9, 3.629983931009416*^9}, {3.6299919807040443`*^9, 3.6299919808912444`*^9}, { 3.629992028330928*^9, 3.6299920922130404`*^9}, 3.629992198480427*^9, { 3.6299922299300823`*^9, 3.629992250506518*^9}, {3.629992292657792*^9, 3.6299923603151107`*^9}, {3.6299924387676487`*^9, 3.6299924398440504`*^9}, {3.6299925764846907`*^9, 3.6299926096347485`*^9}, {3.6299928122323046`*^9, 3.629992818768716*^9}, { 3.6299929049120674`*^9, 3.629992905411268*^9}, {3.6299929850338078`*^9, 3.6299929866250105`*^9}, {3.6299931061992207`*^9, 3.62999312270405*^9}, { 3.629993172312137*^9, 3.6299932618718944`*^9}, {3.6299933276572104`*^9, 3.6299933842073092`*^9}, {3.630287775665962*^9, 3.630287795852398*^9}, { 3.6303896387100534`*^9, 3.630389666774503*^9}, {3.6303896967889557`*^9, 3.6303897095341783`*^9}, {3.6303897587054644`*^9, 3.630389880448078*^9}, { 3.6303899127557354`*^9, 3.630390009444705*^9}, 3.630390057321189*^9, 3.630390443484267*^9, {3.63039095720877*^9, 3.6303909789240074`*^9}, { 3.6303910572205453`*^9, 3.6303911291054716`*^9}, {3.630391163035531*^9, 3.6303911740803504`*^9}, {3.630391240224467*^9, 3.6303912875081496`*^9}, { 3.6303913396902413`*^9, 3.630391404570755*^9}, {3.630391479513287*^9, 3.6303917572873745`*^9}, {3.630391868905571*^9, 3.6303920027226057`*^9}, { 3.630392064327114*^9, 3.630392219843787*^9}, {3.63039226121506*^9, 3.63039232943398*^9}, {3.6303924315985594`*^9, 3.6303924441097813`*^9}, { 3.6303926866122074`*^9, 3.6303927118530517`*^9}, {3.630392795671999*^9, 3.6303928006172075`*^9}, {3.6303986032190485`*^9, 3.6303986046230516`*^9}, {3.6303986654631586`*^9, 3.6303987936485834`*^9}, {3.63039889979117*^9, 3.6303989091199865`*^9}, { 3.630399006323757*^9, 3.630399007259759*^9}, {3.630399117224352*^9, 3.630399214771323*^9}, {3.6303992555185947`*^9, 3.6303993036758795`*^9}, { 3.630399467725767*^9, 3.630399502731636*^9}, {3.6303995748037624`*^9, 3.630399595614199*^9}, {3.6303996329294643`*^9, 3.630399658076709*^9}, { 3.630399711335202*^9, 3.6303997453120623`*^9}, {3.6303998546994543`*^9, 3.6303999880484886`*^9}, {3.6304000742074394`*^9, 3.630400123441126*^9}, { 3.6304001724564123`*^9, 3.630400251595351*^9}, {3.630400324166679*^9, 3.630400327052684*^9}, {3.630400358190338*^9, 3.6304003597503414`*^9}, { 3.6304004587481155`*^9, 3.6304004640521245`*^9}, {3.630400521975026*^9, 3.630400526124634*^9}, {3.630400567199506*^9, 3.630400593516752*^9}, { 3.6304012340070767`*^9, 3.6304013035207987`*^9}, {3.6304013614749007`*^9, 3.630401367933312*^9}, {3.630401686939398*^9, 3.6304017294598303`*^9}, { 3.630401794020523*^9, 3.6304018922061386`*^9}, {3.6304019687775183`*^9, 3.630401987153569*^9}, {3.630402072749465*^9, 3.63040208297405*^9}, { 3.6304022247881613`*^9, 3.630402255931943*^9}, 3.630402329306139*^9, { 3.6304023806970787`*^9, 3.6304024212403975`*^9}, {3.6304025002259154`*^9, 3.630402528595538*^9}, {3.6304025620694523`*^9, 3.630402575015193*^9}, { 3.6304026411829777`*^9, 3.630402649073429*^9}, {3.630402695548087*^9, 3.6304027128260756`*^9}, {3.630402783923142*^9, 3.6304027982389607`*^9}, { 3.6304028797236214`*^9, 3.6304030111811404`*^9}, {3.6304030562107162`*^9, 3.6304031598846455`*^9}, {3.630403236330018*^9, 3.6304032404072514`*^9}, { 3.630403373001835*^9, 3.6304033888147397`*^9}, {3.6304039420953856`*^9, 3.6304039512829113`*^9}, 3.6304039831437335`*^9, {3.630404015975611*^9, 3.6304040663624935`*^9}, {3.630404173614628*^9, 3.630404246945822*^9}, { 3.6304042891772375`*^9, 3.630404299595834*^9}, {3.630404391083066*^9, 3.630404392406142*^9}, {3.6304045301800222`*^9, 3.6304045579486103`*^9}, { 3.630404640215316*^9, 3.630404762796327*^9}, {3.630404877629895*^9, 3.630404883104208*^9}, {3.6304050364729805`*^9, 3.630405098270515*^9}, { 3.6304051736118245`*^9, 3.6304051965901384`*^9}, {3.6304053802536435`*^9, 3.63040539242334*^9}, {3.630406035965148*^9, 3.630406041998493*^9}, { 3.630406072049212*^9, 3.6304060962065935`*^9}, {3.630406264081196*^9, 3.6304062707025747`*^9}, {3.63040632219952*^9, 3.630406385461138*^9}, { 3.630406477200385*^9, 3.630406482095665*^9}, {3.6304066170883865`*^9, 3.6304066222256804`*^9}, {3.630406957868878*^9, 3.630406973411767*^9}, { 3.6304070081447535`*^9, 3.630407018199329*^9}, {3.630407411376817*^9, 3.630407412542884*^9}, {3.6304080609339695`*^9, 3.630408121202417*^9}, { 3.6304081585485525`*^9, 3.6304081832129636`*^9}, {3.63040821409673*^9, 3.630408421131572*^9}, 3.6304934333363276`*^9, {3.63049350751357*^9, 3.630493677593298*^9}, {3.630493716898546*^9, 3.6304937846684227`*^9}, 3.630493922944331*^9, {3.6304939556752033`*^9, 3.630494117430455*^9}, { 3.6304941486092386`*^9, 3.6304941767788496`*^9}, {3.6304942118648567`*^9, 3.6304942530272107`*^9}, {3.6304942838399734`*^9, 3.6304942845820155`*^9}, {3.6304943454054947`*^9, 3.6304944442451477`*^9}, {3.63080749995092*^9, 3.6308075480801234`*^9}, { 3.630807586536323*^9, 3.630807621440319*^9}, {3.630807680459695*^9, 3.630807682914836*^9}, {3.630807736889923*^9, 3.6308077644745007`*^9}, { 3.6308078081089964`*^9, 3.6308078670123653`*^9}, {3.630807991648494*^9, 3.630807997541831*^9}, {3.6308081080891542`*^9, 3.6308081919599514`*^9}, { 3.630808306368495*^9, 3.630808345060708*^9}, {3.6308087281906223`*^9, 3.6308087555171847`*^9}, {3.630809110815507*^9, 3.630809169033837*^9}, { 3.6308091998195972`*^9, 3.630809448512822*^9}, {3.6308095328996487`*^9, 3.6308095448223305`*^9}, {3.630809582269472*^9, 3.6308095873607635`*^9}, { 3.630809665529235*^9, 3.630809684808337*^9}, {3.6308316258485594`*^9, 3.6308318380886984`*^9}, {3.63083188164919*^9, 3.630831966930068*^9}, 3.6320400558356075`*^9, {3.6354749882908883`*^9, 3.635474989418953*^9}, { 3.635475084557395*^9, 3.6354750875145636`*^9}, {3.6354751334091887`*^9, 3.635475162315842*^9}, {3.6354754001974483`*^9, 3.6354754820331287`*^9}, 3.635475512931896*^9, {3.6354756222781506`*^9, 3.635475622861184*^9}, { 3.635475691642118*^9, 3.6354757057969275`*^9}, {3.6354757798291616`*^9, 3.635475797395167*^9}, {3.635475884848169*^9, 3.6354758981309285`*^9}, { 3.635475961488552*^9, 3.6354759738382587`*^9}, {3.6354760213729773`*^9, 3.6354760572050266`*^9}, {3.6354761282470903`*^9, 3.635476136040536*^9}, { 3.6354761719365892`*^9, 3.635476212217893*^9}, {3.6593346599546614`*^9, 3.659334660890663*^9}, {3.6593347077219453`*^9, 3.659334720701168*^9}, { 3.6593348752974396`*^9, 3.6593348758122406`*^9}, {3.6593349140947075`*^9, 3.6593350070240707`*^9}, {3.6593350466949406`*^9, 3.6593350543701544`*^9}, {3.659335103791041*^9, 3.6593351614487424`*^9}, 3.659335217686841*^9, {3.659335262084519*^9, 3.6593352995869846`*^9}, { 3.6593356899482727`*^9, 3.659335701819893*^9}, {3.659335964227954*^9, 3.659335964602355*^9}, {3.65933603594128*^9, 3.6593360629605274`*^9}, { 3.6593361352354546`*^9, 3.6593361504454813`*^9}, {3.6593363929479074`*^9, 3.6593364061611304`*^9}, 3.6593368946915884`*^9, {3.6884748265656157`*^9, 3.6884748268716326`*^9}, {3.6884748600075283`*^9, 3.688474861420609*^9}, { 3.6885242858240776`*^9, 3.6885243001140976`*^9}, {3.6888842911675606`*^9, 3.6888843311676164`*^9}, {3.688966242423658*^9, 3.688966263933688*^9}, { 3.6897393587897596`*^9, 3.6897393649897685`*^9}, 3.689739477049925*^9, { 3.6898595970621734`*^9, 3.689859597272174*^9}, {3.6898596707522764`*^9, 3.6898597190523443`*^9}, {3.689859768552414*^9, 3.6898597721424184`*^9}, { 3.689859855272535*^9, 3.689859859882541*^9}, {3.6898605078334484`*^9, 3.6898607266237545`*^9}, 3.6898608811139708`*^9, {3.6898609634740863`*^9, 3.689860974304102*^9}, 3.6898610140141573`*^9, {3.6898611496043468`*^9, 3.6898611683243732`*^9}, {3.689861462024784*^9, 3.6898615624849253`*^9}, { 3.6898616142149973`*^9, 3.6898616164350004`*^9}, 3.6898616657950697`*^9, { 3.689861716805141*^9, 3.689861749905187*^9}, {3.732677920575506*^9, 3.7326779208190203`*^9}, {3.7519672427004185`*^9, 3.7519672444968877`*^9}, {3.7519674022097683`*^9, 3.75196742976579*^9}, { 3.751967484127989*^9, 3.751967510853814*^9}, {3.7519675409404893`*^9, 3.751967541549782*^9}, {3.7519675797751045`*^9, 3.751967592209671*^9}, { 3.7519676829383273`*^9, 3.7519676841255474`*^9}, {3.7519677154775553`*^9, 3.7519677953499403`*^9}, 3.751967827811061*^9, {3.7519679545625095`*^9, 3.751967957999185*^9}, {3.751968003754015*^9, 3.7519681477513895`*^9}, { 3.751968264817631*^9, 3.751968270722477*^9}, {3.7519689618119907`*^9, 3.751968969888235*^9}, {3.7519691168917775`*^9, 3.7519691395895615`*^9}, { 3.751969242782174*^9, 3.7519692581691785`*^9}, {3.7519693625211954`*^9, 3.751969378579924*^9}, {3.751969409572627*^9, 3.751969438643936*^9}, { 3.7519695894526725`*^9, 3.751969614306203*^9}, {3.7523200108586655`*^9, 3.752320012354121*^9}, {3.7553831315619707`*^9, 3.755383134119626*^9}, { 3.7553831893197794`*^9, 3.755383241814331*^9}, {3.7553832736267967`*^9, 3.7553832810757113`*^9}, {3.7554336536222963`*^9, 3.755433684797229*^9}, { 3.7554337764737434`*^9, 3.7554338315300155`*^9}, {3.755433998047738*^9, 3.7554340265485487`*^9}, {3.755446573138784*^9, 3.755446636911299*^9}, { 3.75544667493072*^9, 3.755446753435521*^9}, {3.755446891541581*^9, 3.7554468921547422`*^9}, {3.7554469323588533`*^9, 3.755446936867403*^9}, { 3.7554470190332975`*^9, 3.7554472776872244`*^9}, {3.7555217323692026`*^9, 3.755521732847602*^9}, {3.755521767127169*^9, 3.7555217972041793`*^9}, { 3.755522561453134*^9, 3.755522564231819*^9}, {3.755522601885935*^9, 3.7555226037287407`*^9}, {3.7555226758687305`*^9, 3.755522678585092*^9}, { 3.7555234832604623`*^9, 3.7555235920444417`*^9}, {3.7555239506007543`*^9, 3.755524013893358*^9}, {3.755524076791689*^9, 3.7555240812793446`*^9}, { 3.7555241238138275`*^9, 3.7555241268985643`*^9}, {3.7555242930449886`*^9, 3.7555243378577013`*^9}, {3.7555256673767824`*^9, 3.7555256808205338`*^9}, {3.7555258588384123`*^9, 3.755525900317296*^9}, { 3.755525930708299*^9, 3.7555260436531134`*^9}, {3.755607147401991*^9, 3.7556071504143705`*^9}, {3.755607992884314*^9, 3.7556080025382996`*^9}, { 3.7556094344057455`*^9, 3.7556094348690443`*^9}, {3.7559613653116636`*^9, 3.755961445097105*^9}, 3.755961484246889*^9, {3.7559618979231987`*^9, 3.755961939470047*^9}, {3.7559620323724904`*^9, 3.7559620330864005`*^9}, { 3.755962155557907*^9, 3.7559621601593847`*^9}, {3.755962303755834*^9, 3.755962343830135*^9}, {3.7559624058018165`*^9, 3.7559624450501757`*^9}, 3.756002186674869*^9, 3.7560029626855392`*^9, {3.756003222110388*^9, 3.756003295034633*^9}, {3.7560056331492863`*^9, 3.7560056663855457`*^9}, { 3.7560057813555765`*^9, 3.7560057863836613`*^9}, {3.7560058917172394`*^9, 3.756005927847292*^9}, 3.756006092376186*^9, 3.756009112317705*^9, { 3.756091886039587*^9, 3.756091887764086*^9}, {3.756092005435152*^9, 3.7560920727337685`*^9}, {3.75609212911592*^9, 3.7560921293252516`*^9}, { 3.756092262958163*^9, 3.756092263157668*^9}, {3.756092342487877*^9, 3.756092347894502*^9}, {3.7560929036769304`*^9, 3.7560929278911004`*^9}, { 3.7560930741522417`*^9, 3.756093083420331*^9}, {3.7560932986236534`*^9, 3.7560933139459305`*^9}, {3.756093449985523*^9, 3.7560934874491863`*^9}, { 3.756093592694581*^9, 3.7560936019456573`*^9}, {3.756093634438078*^9, 3.756093673866626*^9}, {3.756093873069885*^9, 3.756093897964734*^9}, { 3.7560940650109406`*^9, 3.756094078056768*^9}, {3.756442536546026*^9, 3.756442607904289*^9}, {3.7564436397451363`*^9, 3.7564436403231254`*^9}, { 3.7636034984570236`*^9, 3.7636034989933815`*^9}, {3.763603551051456*^9, 3.7636035527617817`*^9}, {3.7636036049384193`*^9, 3.7636036392233057`*^9}, {3.7636036850937223`*^9, 3.763603692587598*^9}, { 3.7636037258272257`*^9, 3.7636037459031096`*^9}, {3.7636037792254367`*^9, 3.76360387572289*^9}, {3.763603971837229*^9, 3.7636040341423655`*^9}, { 3.763604066526084*^9, 3.7636040756798687`*^9}, {3.7636041452118535`*^9, 3.763604278007333*^9}, {3.763604317710966*^9, 3.7636043271387568`*^9}, { 3.7636043584877644`*^9, 3.763604415561053*^9}, {3.763604445680462*^9, 3.7636044504114943`*^9}, {3.763604615444647*^9, 3.7636048082554193`*^9}, 3.763604854904996*^9, {3.7636133594095488`*^9, 3.7636133618464766`*^9}, { 3.7636136063756704`*^9, 3.7636136315671196`*^9}, {3.7636990373827705`*^9, 3.7636990431157646`*^9}, {3.763699090332087*^9, 3.763699110952259*^9}, { 3.763699227420497*^9, 3.7636993642943506`*^9}, {3.763700085627533*^9, 3.763700088329999*^9}, {3.7637001721125274`*^9, 3.763700181422837*^9}, { 3.763700248063385*^9, 3.7637003918630466`*^9}, {3.763700591783223*^9, 3.7637006017496295`*^9}, {3.7637007583576717`*^9, 3.7637007603074865`*^9}, {3.7637137795793185`*^9, 3.7637137822587233`*^9}, {3.7637148704355187`*^9, 3.763714870624051*^9}, { 3.763727592158518*^9, 3.7637275933445053`*^9}, {3.7637276688363667`*^9, 3.7637276694756594`*^9}, 3.763803448896332*^9, {3.76380349501632*^9, 3.7638036835067654`*^9}, {3.763804829093463*^9, 3.7638048385675254`*^9}, 3.7638051033646154`*^9, 3.7638053924528885`*^9, {3.763805557684454*^9, 3.763805634255308*^9}, {3.763806843847647*^9, 3.763806847966059*^9}, { 3.763806942652097*^9, 3.7638071770752254`*^9}, {3.7638141184594107`*^9, 3.763814134133461*^9}, {3.7638146808628216`*^9, 3.7638146925645113`*^9}, { 3.7638147709278784`*^9, 3.7638147811883087`*^9}, {3.7638148155281043`*^9, 3.763814819843194*^9}, {3.7638150259647446`*^9, 3.763815028601293*^9}, { 3.7638151529595194`*^9, 3.763815155849978*^9}, {3.7638163770262136`*^9, 3.763816380851597*^9}, {3.7638164181856327`*^9, 3.7638164950537987`*^9}, 3.763816568304102*^9, {3.7638166173645625`*^9, 3.763816618808757*^9}, { 3.7638167204462805`*^9, 3.763816721012859*^9}, {3.763857602253485*^9, 3.7638579604183645`*^9}, {3.7638580038507566`*^9, 3.7638580060526443`*^9}, {3.763858082269992*^9, 3.7638581746835337`*^9}, { 3.7638582163351564`*^9, 3.7638582415275116`*^9}, {3.7638582983238*^9, 3.763858907503306*^9}, {3.763858941318697*^9, 3.763858956626134*^9}, { 3.7638602435602536`*^9, 3.763860245408451*^9}, {3.7638694636456347`*^9, 3.7638694647177277`*^9}, {3.7638708199536576`*^9, 3.763870829436488*^9}, { 3.763871287170555*^9, 3.7638712876184006`*^9}, {3.763943214376035*^9, 3.7639432984591475`*^9}, {3.763943418832348*^9, 3.7639434335508127`*^9}, { 3.76394347113767*^9, 3.7639435187320576`*^9}, {3.763943585908682*^9, 3.7639436125255404`*^9}, {3.763951722152746*^9, 3.76395172989299*^9}, { 3.7639517863423367`*^9, 3.7639519945900664`*^9}, {3.763952081515512*^9, 3.7639521530710773`*^9}, {3.763952353248129*^9, 3.763952357026309*^9}, { 3.7639524211903834`*^9, 3.7639524243979177`*^9}, {3.7639527174925117`*^9, 3.7639527180252266`*^9}, {3.7641265625745993`*^9, 3.7641265632314167`*^9}, {3.764126605555829*^9, 3.7641266075095396`*^9}, { 3.7641268313964133`*^9, 3.7641268543573804`*^9}, {3.764127044657903*^9, 3.7641270479422092`*^9}, {3.7641271442332697`*^9, 3.7641271469362774`*^9}, {3.764127227626192*^9, 3.7641272592640233`*^9}, { 3.764127335707515*^9, 3.7641273386484756`*^9}, {3.764127429843852*^9, 3.7641274364304185`*^9}, {3.7641275071859307`*^9, 3.764127516803895*^9}, 3.7641276043548007`*^9, {3.7641276925365753`*^9, 3.764127697080591*^9}, 3.764127798472331*^9, 3.764127853631323*^9, 3.764127908496078*^9, { 3.7641280050343323`*^9, 3.764128022046494*^9}, {3.764128128597419*^9, 3.764128154116727*^9}, {3.7641286864636617`*^9, 3.764128701643106*^9}, { 3.7641289910924444`*^9, 3.7641290126680794`*^9}, {3.7641290672285347`*^9, 3.7641290737798567`*^9}, {3.7641325425120363`*^9, 3.764132565390477*^9}, { 3.7641327425004654`*^9, 3.764132750040793*^9}, 3.7641327968340364`*^9, { 3.764133146776842*^9, 3.764133204874522*^9}, {3.7641333488187037`*^9, 3.7641333525577593`*^9}, {3.764413145593136*^9, 3.7644131471236105`*^9}, { 3.764413201645049*^9, 3.7644132349609704`*^9}, {3.764413325008136*^9, 3.7644133748980193`*^9}, {3.7644134113425665`*^9, 3.7644135151187*^9}, { 3.764413554409053*^9, 3.7644136160674934`*^9}, {3.76441371984758*^9, 3.764413730103909*^9}, 3.764419641962368*^9, {3.7644198522879405`*^9, 3.764419879249356*^9}, 3.764419909536559*^9, {3.764419991012162*^9, 3.764420000171088*^9}, {3.7644200798862047`*^9, 3.7644200950961914`*^9}, { 3.7644201529471693`*^9, 3.764420153715966*^9}, {3.764420210346301*^9, 3.764420255343707*^9}, {3.764420296178318*^9, 3.7644203000939393`*^9}, { 3.7644203803359275`*^9, 3.7644203931390867`*^9}, 3.7644204418727274`*^9, { 3.7647259720700207`*^9, 3.7647261047260523`*^9}, {3.7647263483375626`*^9, 3.76472635879602*^9}, 3.764726656736601*^9, {3.764727009127914*^9, 3.764727020100875*^9}, {3.7647270591828785`*^9, 3.7647270819631023`*^9}, { 3.7647272109090505`*^9, 3.764727227846332*^9}, {3.76473247809907*^9, 3.7647324813925114`*^9}, {3.7647349484962797`*^9, 3.7647349979358416`*^9}, {3.7647351097258167`*^9, 3.764735124772463*^9}, { 3.7647352810674453`*^9, 3.7647352901139917`*^9}, {3.7647353746429515`*^9, 3.764735379550926*^9}, {3.7647354596539807`*^9, 3.764735507677454*^9}, { 3.7647355546341*^9, 3.764735728811817*^9}, {3.764735837449795*^9, 3.76473584132898*^9}, {3.76473603649269*^9, 3.7647360592982664`*^9}, { 3.7647360998228803`*^9, 3.76473621551197*^9}, {3.7647362545599003`*^9, 3.764736286430997*^9}, {3.7647364592833533`*^9, 3.764736464019006*^9}, { 3.764736566167658*^9, 3.7647365918958225`*^9}, {3.764764761680134*^9, 3.7647648482473745`*^9}, 3.764764917763693*^9, {3.764764964821686*^9, 3.764765090741813*^9}, {3.7647651742140284`*^9, 3.7647652517335076`*^9}, { 3.764765341266399*^9, 3.7647653614173465`*^9}, 3.764765400284145*^9, { 3.764765691384389*^9, 3.764765708710143*^9}, 3.7647657454275875`*^9, { 3.76476578351686*^9, 3.764765871262255*^9}, {3.7647661045180917`*^9, 3.76476612822571*^9}, {3.7647661964223824`*^9, 3.764766239375331*^9}, { 3.764766330361228*^9, 3.764766338297905*^9}, {3.764767015060799*^9, 3.7647670193029037`*^9}, {3.764767076590926*^9, 3.7647671160277977`*^9}, { 3.7647671493139205`*^9, 3.7647672079236426`*^9}, {3.764767458938404*^9, 3.7647674608323865`*^9}, {3.764810938444873*^9, 3.7648109399353456`*^9}, { 3.7648118616019874`*^9, 3.7648118695079126`*^9}, {3.7648120589477816`*^9, 3.7648124600413237`*^9}, {3.76481250476682*^9, 3.7648125259602103`*^9}, { 3.764812601341893*^9, 3.7648126577763243`*^9}, {3.7648126944039307`*^9, 3.7648128855627623`*^9}, {3.764812924923909*^9, 3.764812926481821*^9}, { 3.764813041485982*^9, 3.764813131254232*^9}, {3.7648134679328885`*^9, 3.7648136479313235`*^9}, {3.7648136917777314`*^9, 3.764813697753367*^9}, { 3.7648137297570653`*^9, 3.764813747862262*^9}, 3.764813784221693*^9, { 3.7648138370678406`*^9, 3.7648141387969923`*^9}, {3.764814321050164*^9, 3.764814422489184*^9}, {3.764814461366684*^9, 3.7648145835728483`*^9}, { 3.764814614769511*^9, 3.7648147525825167`*^9}, {3.764815363375289*^9, 3.7648153644907384`*^9}, {3.764815451671169*^9, 3.7648154601533747`*^9}, { 3.7648175917802963`*^9, 3.7648176401910563`*^9}, {3.765885491237231*^9, 3.765885501131465*^9}, {3.766572999289345*^9, 3.7665729996020145`*^9}, { 3.7665730613126965`*^9, 3.7665730616706066`*^9}, {3.7840103262125545`*^9, 3.7840103546413517`*^9}, {3.784011309725755*^9, 3.7840113197719574`*^9}, { 3.784013374800973*^9, 3.7840133842981763`*^9}, {3.7840238533665447`*^9, 3.78402395932942*^9}, {3.784024091276659*^9, 3.784024112209529*^9}, { 3.7840242793219643`*^9, 3.784024296655184*^9}, {3.7840290670892677`*^9, 3.7840291348388853`*^9}, {3.784029222997594*^9, 3.784029542926179*^9}, { 3.784375172285057*^9, 3.784375319701829*^9}, {3.7843753678421807`*^9, 3.7843753788103914`*^9}, {3.7843754844339557`*^9, 3.784375827494117*^9}, { 3.784375862317687*^9, 3.7843759567563844`*^9}, {3.784376004941759*^9, 3.7843760080157185`*^9}, {3.784376101918992*^9, 3.7843761244332943`*^9}, { 3.784376181191763*^9, 3.7843762145091863`*^9}, {3.7843792489960337`*^9, 3.78437926273014*^9}, {3.7843793293934345`*^9, 3.784379368676588*^9}, { 3.7843796529835215`*^9, 3.7843796858862267`*^9}, {3.784450863324359*^9, 3.7844508986076546`*^9}, {3.7844510208392324`*^9, 3.784451027915551*^9}, { 3.7844511176315613`*^9, 3.7844511673791957`*^9}, {3.784451235055628*^9, 3.78445132575735*^9}, {3.784451995615477*^9, 3.7844520110330954`*^9}, { 3.7844522907551537`*^9, 3.7844523421551*^9}, {3.784700119490345*^9, 3.7847001627913013`*^9}, {3.7847004221290607`*^9, 3.7847004380767317`*^9}, 3.7847007913506136`*^9, {3.784781955129138*^9, 3.784781977787957*^9}, { 3.78488170216677*^9, 3.784881704210422*^9}, 3.784882130557441*^9, { 3.78488220347418*^9, 3.7848822064697027`*^9}, {3.784883393455822*^9, 3.784883458551924*^9}, 3.7848835306495824`*^9, {3.7848836822092113`*^9, 3.7848837303696923`*^9}, 3.7848838199009576`*^9, {3.7848842507527857`*^9, 3.7848842836585226`*^9}, 3.7848843847882996`*^9, {3.784884461405264*^9, 3.7848844645041113`*^9}, {3.784884559404122*^9, 3.7848845656634912`*^9}, { 3.7848852409944844`*^9, 3.7848852740337477`*^9}, {3.7848854548929386`*^9, 3.7848854893046365`*^9}, {3.7848856741783943`*^9, 3.784885691704702*^9}, { 3.784885809660874*^9, 3.784885811424426*^9}, {3.7848860031948376`*^9, 3.784886020570098*^9}, 3.7848861057105627`*^9, {3.7848861627726107`*^9, 3.7848862212876124`*^9}, {3.784886306497995*^9, 3.7848863509322224`*^9}, 3.784886472690192*^9, {3.7848866596243*^9, 3.784886664116289*^9}, { 3.7848866987282944`*^9, 3.7848867077911897`*^9}, {3.78488676128524*^9, 3.7848868667029366`*^9}, {3.7848869381224003`*^9, 3.7848869414281464`*^9}, {3.7848870104508753`*^9, 3.784887039889447*^9}, { 3.7848871795058794`*^9, 3.7848871976746817`*^9}, {3.7848872311446314`*^9, 3.78488724075662*^9}, 3.784887405188785*^9, {3.784887591926689*^9, 3.7848876119305134`*^9}, {3.784887676620901*^9, 3.7848876786672792`*^9}, { 3.78488771054331*^9, 3.784887714354906*^9}, {3.7848877625809546`*^9, 3.7848878103041153`*^9}, 3.7848878862881575`*^9, {3.787717235155089*^9, 3.787717269464238*^9}, {3.7877174592607603`*^9, 3.7877174674038067`*^9}, { 3.7877271032841845`*^9, 3.787727136247201*^9}, 3.787727355369296*^9, 3.7877274973278403`*^9, {3.787727855959008*^9, 3.78772792141208*^9}, 3.787728113487193*^9, {3.7877281704571557`*^9, 3.7877281735077004`*^9}, 3.7877282789827795`*^9, {3.7877286510229864`*^9, 3.787728665729192*^9}, { 3.7877287942225084`*^9, 3.787728807671986*^9}, {3.787729044867985*^9, 3.787729045536916*^9}, {3.787729589732438*^9, 3.7877296062090626`*^9}, { 3.787729794037467*^9, 3.7877297950347877`*^9}, {3.787729855548402*^9, 3.7877299039179935`*^9}, {3.7877300373241186`*^9, 3.787730068136018*^9}, { 3.7877301999859333`*^9, 3.7877302014150777`*^9}, {3.787732033225385*^9, 3.7877320471634016`*^9}, {3.787732077195259*^9, 3.7877320780358667`*^9}, 3.787732189759206*^9, {3.78773231889835*^9, 3.787732327710633*^9}, { 3.7877324857166643`*^9, 3.787732496655479*^9}, {3.7877325848303585`*^9, 3.78773258503596*^9}, {3.7877328504631166`*^9, 3.7877328625892415`*^9}, { 3.7877330254884944`*^9, 3.7877330271019044`*^9}, {3.787733136128061*^9, 3.7877331422258835`*^9}, {3.787733243513567*^9, 3.78773324558677*^9}, 3.787733310555999*^9, 3.7877334085329347`*^9, {3.7877337955932293`*^9, 3.7877337970498257`*^9}, {3.787733867727028*^9, 3.7877338687324905`*^9}, { 3.7877352224369583`*^9, 3.787735224161746*^9}, {3.787735343322833*^9, 3.787735348772827*^9}, {3.787735422704711*^9, 3.7877354268945775`*^9}, { 3.7877355100355635`*^9, 3.787735514671461*^9}, {3.7877356541994534`*^9, 3.7877356632141013`*^9}, 3.7877357913476543`*^9, 3.787736261837074*^9, { 3.7882542159043374`*^9, 3.7882542747998285`*^9}, {3.788254310967661*^9, 3.788254318430212*^9}, {3.788254585790197*^9, 3.7882545888318524`*^9}, { 3.7882547349987383`*^9, 3.788254735940298*^9}, 3.788254830063775*^9, 3.7882549155286837`*^9, {3.7882550121437798`*^9, 3.788255037735396*^9}, { 3.7882551764404287`*^9, 3.78825518352113*^9}, {3.7882552540030313`*^9, 3.788255290224329*^9}, {3.7882553843544893`*^9, 3.788255423248046*^9}, { 3.78825567982127*^9, 3.7882556852479534`*^9}, {3.7882557908576803`*^9, 3.7882558029800806`*^9}, {3.7882560240494256`*^9, 3.7882560388846164`*^9}, 3.788256102343512*^9, {3.788256161397396*^9, 3.7882561626372194`*^9}, { 3.7882562304311895`*^9, 3.78825629590362*^9}, {3.7882563614677362`*^9, 3.7882563620189795`*^9}, {3.7882564138122153`*^9, 3.7882564294158382`*^9}, {3.788256467457189*^9, 3.7882564889521217`*^9}, { 3.7882565883311844`*^9, 3.788256591497148*^9}, {3.7882568409513097`*^9, 3.7882568724526567`*^9}, {3.788256965258837*^9, 3.788256966444976*^9}, { 3.7882570073831463`*^9, 3.7882570497349973`*^9}, {3.7882570992487097`*^9, 3.788257144206352*^9}, {3.78825721252205*^9, 3.788257307277931*^9}, { 3.788257350410209*^9, 3.7882573617262745`*^9}, {3.788257424936472*^9, 3.788257434118204*^9}, {3.788276311330668*^9, 3.788276311647092*^9}, { 3.7882765465512347`*^9, 3.788276608568333*^9}, {3.7882767715851693`*^9, 3.7882768045752783`*^9}, {3.7882769342607436`*^9, 3.7882769409894867`*^9}, {3.7882770202208567`*^9, 3.7882770424485188`*^9}, {3.7882770760040703`*^9, 3.788277077341468*^9}, { 3.788277147336176*^9, 3.788277150397852*^9}, {3.7882772069909*^9, 3.7882772101572385`*^9}, {3.7882772503366175`*^9, 3.7882772773759403`*^9}, {3.7882773922958755`*^9, 3.7882773927832017`*^9}, {3.788277450684473*^9, 3.788277482126852*^9}, { 3.78827754293396*^9, 3.788277545027956*^9}, {3.7883214550230436`*^9, 3.7883214742097826`*^9}, {3.788321520104019*^9, 3.788321685390153*^9}, { 3.788321717307153*^9, 3.788321801831746*^9}, {3.788321836768508*^9, 3.788322037754008*^9}, {3.7883220686363816`*^9, 3.788322220085001*^9}, { 3.7883255906192427`*^9, 3.788325646609389*^9}, {3.7883257976991563`*^9, 3.788325804097658*^9}, {3.788325969279187*^9, 3.7883259830028267`*^9}, { 3.788326975877249*^9, 3.788326979070017*^9}, {3.788328539286415*^9, 3.788328618410488*^9}, {3.788328648595448*^9, 3.788328762662589*^9}, { 3.7883288060890923`*^9, 3.7883288805716724`*^9}, {3.7883319188300047`*^9, 3.78833193230753*^9}, {3.7883321144947567`*^9, 3.788332115050151*^9}, { 3.7883333680456443`*^9, 3.7883333686272163`*^9}, 3.7883336421611414`*^9, { 3.788333691323177*^9, 3.7883336916362*^9}, {3.788333797629262*^9, 3.7883338348662343`*^9}, {3.7883339555470386`*^9, 3.7883339660305166`*^9}, {3.7883340291758356`*^9, 3.788334031484354*^9}, { 3.788334368484807*^9, 3.7883343918754945`*^9}, {3.7883345963739557`*^9, 3.788334645315611*^9}, {3.788411405608647*^9, 3.788411409092114*^9}, { 3.7884115644712825`*^9, 3.7884115911998663`*^9}, {3.7884116673998833`*^9, 3.788411758799066*^9}, {3.788411985303985*^9, 3.788412002701314*^9}, { 3.78841218266156*^9, 3.788412217652734*^9}, {3.788412679618697*^9, 3.78841268296084*^9}, {3.788412968920223*^9, 3.7884129782039633`*^9}, { 3.7884155241723013`*^9, 3.7884155243798914`*^9}, 3.7884156619519596`*^9, { 3.7884162343262696`*^9, 3.788416236013459*^9}, {3.789022054245319*^9, 3.7890221116154556`*^9}, {3.7890222001685014`*^9, 3.789022205961149*^9}, { 3.789094077050009*^9, 3.7890940781167436`*^9}, {3.7890941254883175`*^9, 3.7890942919861226`*^9}, {3.789094340508856*^9, 3.789094543716852*^9}, { 3.789094583794143*^9, 3.7890947278803444`*^9}, {3.7890947714417076`*^9, 3.7890948342626343`*^9}, {3.789095197615344*^9, 3.789095215073329*^9}, { 3.789095256390032*^9, 3.78909525710861*^9}, {3.7890954241290827`*^9, 3.78909583987399*^9}, {3.789096056032333*^9, 3.7890960602768464`*^9}, { 3.7890960928429904`*^9, 3.789096098149865*^9}, {3.789096721918685*^9, 3.789096734998893*^9}, {3.7890967741973257`*^9, 3.78909683859006*^9}, { 3.789096947653244*^9, 3.789097122315098*^9}, {3.7890971528708224`*^9, 3.789097530683948*^9}, {3.7890975852885656`*^9, 3.7890975882562447`*^9}, { 3.7890976430709224`*^9, 3.789097656213524*^9}, {3.789107592314107*^9, 3.7891076537760305`*^9}, {3.789107685160589*^9, 3.789107760590632*^9}, { 3.7891078105008087`*^9, 3.789107846610609*^9}, {3.789107989236459*^9, 3.7891080001561875`*^9}, {3.7891082032172785`*^9, 3.7891082064574785`*^9}, {3.7891083013630204`*^9, 3.789108444864075*^9}, { 3.7891084751958127`*^9, 3.7891085010044174`*^9}, {3.7891085322441816`*^9, 3.7891085353767447`*^9}, {3.789108620037199*^9, 3.789108662297584*^9}, 3.7891087252471294`*^9, {3.789108773507248*^9, 3.7891088501491203`*^9}, { 3.7891088829987*^9, 3.789108918319019*^9}, {3.7891089606286983`*^9, 3.7891090044788837`*^9}, {3.789109048556943*^9, 3.7891091177554493`*^9}, { 3.7891091628149347`*^9, 3.7891092922346783`*^9}, {3.789109382870388*^9, 3.789109402625166*^9}, {3.7891111380334797`*^9, 3.7891113582877145`*^9}, { 3.789111396694514*^9, 3.7891114221541777`*^9}, {3.7891114539845037`*^9, 3.7891114952359962`*^9}, {3.789112929457416*^9, 3.7891129318274393`*^9}, { 3.789112963290578*^9, 3.7891131302196255`*^9}, {3.789113202949188*^9, 3.789113203379569*^9}, {3.7891144371217365`*^9, 3.789114518411393*^9}, { 3.789114638487608*^9, 3.78911468069436*^9}, {3.789114763918976*^9, 3.789114777923211*^9}, {3.789114809301983*^9, 3.7891148392057247`*^9}, { 3.7891148923150015`*^9, 3.789114904054755*^9}, {3.7891149560740595`*^9, 3.7891150071774015`*^9}, {3.789115109642312*^9, 3.7891151147637*^9}, { 3.7891185439211864`*^9, 3.789118561569729*^9}, {3.7891187834106455`*^9, 3.7891187854068985`*^9}, {3.7891188764873776`*^9, 3.7891188767373095`*^9}, {3.789121799028477*^9, 3.789121806719482*^9}, { 3.7891222627163153`*^9, 3.7891222774782734`*^9}, {3.7891223914541044`*^9, 3.7891224006004095`*^9}, {3.789122431773783*^9, 3.7891224422816577`*^9}, { 3.7891224731160736`*^9, 3.789122501042121*^9}, {3.7891226653529224`*^9, 3.7891226664045706`*^9}, 3.789122819901965*^9, {3.789122893844426*^9, 3.7891229543768473`*^9}, {3.7891229964274464`*^9, 3.7891231044294157`*^9}, {3.789123228485856*^9, 3.789123374714591*^9}, { 3.7891235661360893`*^9, 3.7891235688754067`*^9}, {3.8435393751961174`*^9, 3.84353937620569*^9}, {3.843539421737421*^9, 3.843539430280121*^9}, { 3.8435484777900076`*^9, 3.8435484882620373`*^9}, {3.8435489691083994`*^9, 3.843548981201047*^9}, {3.8435491420371304`*^9, 3.8435491556997023`*^9}, { 3.8435491977347035`*^9, 3.8435491982438793`*^9}, 3.8435492510860806`*^9, { 3.8435495081660933`*^9, 3.8435495131948795`*^9}, {3.8435495856936626`*^9, 3.843549589991126*^9}, {3.8435496998060937`*^9, 3.843549707814079*^9}, { 3.84355004136615*^9, 3.843550041760812*^9}, {3.843550160256809*^9, 3.8435501604677615`*^9}, {3.8435532120250945`*^9, 3.843553317388692*^9}, { 3.8435535239731655`*^9, 3.8435535314678483`*^9}, {3.8435535808757987`*^9, 3.843553663159541*^9}, {3.843553779645311*^9, 3.843553786004609*^9}, 3.843553906141655*^9, 3.84355405714793*^9, {3.843554149489615*^9, 3.8435541503712645`*^9}, {3.843554206843628*^9, 3.8435542071044455`*^9}, { 3.8435543508802266`*^9, 3.843554351606327*^9}, {3.843554424038799*^9, 3.8435544242271614`*^9}, {3.8435607207357883`*^9, 3.843560727908863*^9}, { 3.843560832774662*^9, 3.8435608400783997`*^9}, {3.843561442743278*^9, 3.8435614495857325`*^9}, {3.8435616862804203`*^9, 3.8435617473408427`*^9}, {3.8435618416220255`*^9, 3.84356184949818*^9}, { 3.843561965458202*^9, 3.843561967390591*^9}, {3.8435620399418516`*^9, 3.8435620427564726`*^9}, 3.8435620999099693`*^9, {3.843562319425266*^9, 3.843562335822353*^9}, {3.843562479271407*^9, 3.8435624872362185`*^9}, { 3.8435625915602407`*^9, 3.843562614304778*^9}, {3.843562735879742*^9, 3.843562741836786*^9}, {3.8436143557463255`*^9, 3.843614430899438*^9}, { 3.843614466526642*^9, 3.843614494745638*^9}, {3.84361472265639*^9, 3.8436147354884176`*^9}, {3.843614883845476*^9, 3.8436148880544443`*^9}, { 3.843615637703328*^9, 3.8436156940260696`*^9}, {3.843615818169777*^9, 3.8436159022117233`*^9}, {3.843621164525605*^9, 3.8436211674899387`*^9}, { 3.8436212248219557`*^9, 3.8436212383818884`*^9}, {3.843623395248974*^9, 3.8436234811296377`*^9}, 3.8436235228419657`*^9, {3.843710421018984*^9, 3.843710422106656*^9}, {3.843710498981309*^9, 3.843710537614964*^9}, { 3.843710579319264*^9, 3.843710645627423*^9}, {3.8437106875546417`*^9, 3.843710688153476*^9}, {3.843710725428294*^9, 3.843710785146202*^9}, { 3.843710821351383*^9, 3.8437110234294205`*^9}, {3.8437111173417163`*^9, 3.843711129714572*^9}, {3.843711236237468*^9, 3.8437112372387085`*^9}, { 3.8437113572143283`*^9, 3.8437113718734703`*^9}, {3.8437115790188246`*^9, 3.843711601014681*^9}, {3.843711741747123*^9, 3.843711755218405*^9}, { 3.8437118059023905`*^9, 3.8437118104255657`*^9}, {3.843711922772312*^9, 3.8437119230384417`*^9}, {3.8437119637523017`*^9, 3.8437119924289055`*^9}, {3.843712070094509*^9, 3.843712071922304*^9}, { 3.8437303811976614`*^9, 3.84373041381275*^9}, {3.843730744283455*^9, 3.8437307459908094`*^9}, {3.8437396200557556`*^9, 3.8437396419414387`*^9}, 3.843886670451059*^9, 3.8438867203204308`*^9, 3.84388678658553*^9, { 3.843886846967881*^9, 3.843886872522117*^9}, {3.8438869150992565`*^9, 3.8438869153482804`*^9}, {3.8443227935999327`*^9, 3.8443228741400695`*^9}, 3.84432529516883*^9, 3.84432540227769*^9, {3.844325496215137*^9, 3.8443254968116083`*^9}, {3.8443255607450824`*^9, 3.84432556531176*^9}, { 3.8443257292349973`*^9, 3.844325729451268*^9}, {3.8443271837653055`*^9, 3.8443271897353077`*^9}, 3.844327630363053*^9, 3.844327741570508*^9, { 3.8443278373713217`*^9, 3.84432790019408*^9}, {3.844328356730674*^9, 3.8443283589066696`*^9}, {3.8443286085720377`*^9, 3.844328633889926*^9}, { 3.844328780662943*^9, 3.844328797514555*^9}, 3.844328890335701*^9, 3.844329541823058*^9, 3.8443297290733314`*^9, 3.8443298258170156`*^9, 3.8443299792211103`*^9, {3.844330023182226*^9, 3.8443300241626625`*^9}, { 3.844330096584533*^9, 3.8443300969210296`*^9}, {3.8443301540407066`*^9, 3.844330184720361*^9}, 3.844330343560071*^9, 3.8443304466315546`*^9, 3.84438870778086*^9, {3.844388798979218*^9, 3.8443888166069407`*^9}, { 3.844388850689955*^9, 3.84438889324323*^9}, 3.8443891579040785`*^9, { 3.8443893096760817`*^9, 3.844389351546801*^9}, {3.8443894390725183`*^9, 3.8443894521629066`*^9}, 3.844389648527203*^9, {3.8443897876199207`*^9, 3.844389824625575*^9}, 3.8443900109195027`*^9, {3.844390820677456*^9, 3.8443908278248734`*^9}, {3.8443909207770224`*^9, 3.8443910088808312`*^9}, 3.844391050490807*^9, 3.844391867983138*^9, {3.844394157403282*^9, 3.844394211279689*^9}, {3.844394341187828*^9, 3.8443943435847197`*^9}, { 3.8443944350783367`*^9, 3.8443944719623637`*^9}, 3.844394554883594*^9, 3.844394790974487*^9, 3.844394878078925*^9, 3.844395085745798*^9, { 3.8443953351049013`*^9, 3.844395416952881*^9}, {3.844395746514305*^9, 3.844395749726533*^9}, 3.8443958397241535`*^9, {3.8443959211672125`*^9, 3.8443959248882713`*^9}, {3.8443960479537315`*^9, 3.844396058908654*^9}, 3.844396301967287*^9, 3.844396496810913*^9, {3.8443967365950084`*^9, 3.8443967370378094`*^9}, 3.8443972200199785`*^9, {3.8444115993210382`*^9, 3.8444115995187025`*^9}, {3.8444116721502385`*^9, 3.8444116838525047`*^9}, 3.8444117955604706`*^9, 3.8444120838091917`*^9, 3.8444123486564503`*^9, { 3.8444124716223226`*^9, 3.8444124796999335`*^9}, {3.8444125495255537`*^9, 3.844412567726659*^9}, 3.844412769483656*^9, {3.844499964651905*^9, 3.84449997397132*^9}, {3.844500043831334*^9, 3.8445000552814937`*^9}, 3.844500094473071*^9, {3.844500426135293*^9, 3.8445004336024866`*^9}, 3.844500503309535*^9, {3.84450071418834*^9, 3.8445007145632133`*^9}, 3.84450075086576*^9, {3.844500802343947*^9, 3.844500805685542*^9}, { 3.844500857916894*^9, 3.844500860801999*^9}, {3.8445009435074234`*^9, 3.8445010378770485`*^9}, {3.844501486443882*^9, 3.844501488956464*^9}, { 3.844501593768973*^9, 3.8445016087484674`*^9}, {3.8445019589459047`*^9, 3.8445019618400517`*^9}, {3.8445142536442575`*^9, 3.844514303852824*^9}, { 3.844514457425339*^9, 3.8445145337724867`*^9}, {3.8445146121090136`*^9, 3.844514612805125*^9}, {3.8445152618516026`*^9, 3.8445152626808715`*^9}, { 3.84451667854188*^9, 3.8445166978368387`*^9}, {3.8445168384209423`*^9, 3.8445168531952915`*^9}, 3.844516936102404*^9, {3.844517144912083*^9, 3.8445171602908783`*^9}, {3.844517313347111*^9, 3.844517374315425*^9}, { 3.844563740797083*^9, 3.844563842955555*^9}, {3.8445647632618103`*^9, 3.844564764558693*^9}, {3.844564893032794*^9, 3.8445648966363597`*^9}, 3.844566001126281*^9, {3.8445661160863905`*^9, 3.844566152674224*^9}, { 3.844566264323254*^9, 3.8445663747877293`*^9}, {3.8445664543449287`*^9, 3.844566491779601*^9}, {3.8445666670048437`*^9, 3.8445667378245735`*^9}, { 3.84456677184741*^9, 3.8445669208491745`*^9}, {3.8445681586856985`*^9, 3.8445681603926296`*^9}, {3.844568433360468*^9, 3.8445684731196322`*^9}, { 3.844568732407946*^9, 3.844568737446255*^9}, 3.844568945877626*^9, { 3.844569099528115*^9, 3.844569106514072*^9}, {3.8445691536508603`*^9, 3.8445691542699223`*^9}, {3.8445698639037194`*^9, 3.8445698642398653`*^9}, {3.844570012985527*^9, 3.84457001409229*^9}, { 3.844570136399222*^9, 3.84457022295549*^9}, {3.8445702927401485`*^9, 3.8445702943727927`*^9}, {3.8445703589410896`*^9, 3.844570359479988*^9}, { 3.844570433361819*^9, 3.844570434479186*^9}, {3.8445708385437922`*^9, 3.844570865548447*^9}, 3.8445719038536615`*^9, {3.84457369886672*^9, 3.844573716165063*^9}, {3.844573766574627*^9, 3.844573766741207*^9}, { 3.8445738390520935`*^9, 3.8445738397153697`*^9}, {3.844574626193658*^9, 3.844574626336315*^9}, 3.8445754934014444`*^9, {3.844575765512229*^9, 3.8445757670064106`*^9}, {3.8445797808579626`*^9, 3.8445797824906826`*^9}, {3.8445801889436493`*^9, 3.8445802499386616`*^9}, {3.8445802832055655`*^9, 3.8445804322445507`*^9}, {3.8445806095243425`*^9, 3.844580784490394*^9}, { 3.8445808660823193`*^9, 3.8445808672575426`*^9}, {3.8445810704154396`*^9, 3.844581084375619*^9}, {3.8445812578925953`*^9, 3.8445812836521835`*^9}, { 3.8445814486128545`*^9, 3.844581454694955*^9}, 3.8445815919025917`*^9, 3.8445816963679733`*^9, 3.8445818761230197`*^9, {3.844581973276004*^9, 3.84458197871758*^9}, {3.8445820591801286`*^9, 3.8445820669279137`*^9}, { 3.844766120152509*^9, 3.844766220989109*^9}, {3.8447666299757333`*^9, 3.844766632861744*^9}, {3.8447669924782996`*^9, 3.844766998824834*^9}, { 3.844767166360729*^9, 3.8447671685821986`*^9}, {3.8447672972644825`*^9, 3.844767489140806*^9}, {3.8447675202758884`*^9, 3.8447677076499157`*^9}, { 3.8447677386160955`*^9, 3.844767751930085*^9}, {3.8447678367494764`*^9, 3.8447678460718756`*^9}, {3.8447679275644846`*^9, 3.844767951604962*^9}, { 3.844823802025931*^9, 3.8448238152889323`*^9}, {3.844823957041947*^9, 3.8448239585139303`*^9}, {3.8448243004194326`*^9, 3.8448243266930485`*^9}, 3.8451858142422566`*^9},ExpressionUUID->"ad5cd93e-7679-404b-95f5-\ f8587e8e8f84"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "r", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "r\[Gamma]", ",", "FF", ",", "FFINV", ",", "jac", ",", "NN", ",", "u", ",", "ux", ",", "uy", ",", "uz", ",", "v", ",", "vx", ",", "vy", ",", "vz", ",", "w", ",", "wx", ",", "wy", ",", "wz", ",", "\[Phi]", ",", "\[Phi]x", ",", "\[Phi]y", ",", "\[Phi]z", ",", "\[Theta]", ",", "\[Theta]x", ",", "\[Theta]y", ",", "\[Theta]z", ",", "AA", ",", "\[Pi]\[Theta]", ",", "\[Pi]\[Phi]", ",", "wc", ",", "E\[Sigma]", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wsta", ",", "\[Delta]wmap", ",", "\[Epsilon]\[Epsilon]", ",", "\[Kappa]\[Kappa]", ",", "\[Gamma]\[Gamma]", ",", "MM", ",", "QQ", ",", "tri", ",", RowBox[{"mat", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "}"}]}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "mapping", " ", "for", " ", "the", " ", "plate", " ", "geometry"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"r\[Alpha]", ",", "r\[Beta]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Gamma]", "=", RowBox[{"r\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "r\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Sqrt", "[", RowBox[{"r\[Gamma]", ".", "r\[Gamma]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"r\[Alpha]", ",", "r\[Beta]", ",", RowBox[{"r\[Gamma]", "/", "jac"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", " ", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "approximations", "*)"}], "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"(", RowBox[{"mat", ".", "NN"}], ")"}], ".", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"wc", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]X", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{ RowBox[{"NN", "[", RowBox[{"[", "1", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "2", "]"}], "]"}], "*", RowBox[{"NN", "[", RowBox[{"[", "3", "]"}], "]"}], "*", RowBox[{"\[Theta]Y", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "projection", "*)"}], "\[IndentingNewLine]", RowBox[{"AA", "=", RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", "jac", ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Pi]\[Phi]", ",", "\[Pi]\[Theta]"}], "}"}], "=", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]"}], "}"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "/", "AA"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "derivatives", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"ux", ",", "uy", ",", "uz"}], "}"}], "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u"}], ",", "0"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"vx", ",", "vy", ",", "vz"}], "}"}], "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v"}], ",", "0"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"wx", ",", "wy", ",", "wz"}], "}"}], "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}], ",", "0"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]x", ",", "\[Phi]y", ",", "\[Phi]z"}], "}"}], "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}], ",", "0"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Theta]x", ",", "\[Theta]y", ",", "\[Theta]z"}], "}"}], "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Theta]"}], ",", "0"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"strain", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]\[Epsilon]", "=", RowBox[{"{", RowBox[{"ux", ",", "vy", ",", RowBox[{"uy", "+", "vx"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Kappa]\[Kappa]", "=", RowBox[{"{", RowBox[{"\[Theta]x", ",", RowBox[{"-", "\[Phi]y"}], ",", RowBox[{ RowBox[{"-", "\[Phi]x"}], "+", "\[Theta]y"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Gamma]\[Gamma]", "=", RowBox[{ RowBox[{"{", RowBox[{"wx", ",", "wy"}], "}"}], "+", RowBox[{"{", RowBox[{"\[Pi]\[Theta]", ",", RowBox[{"-", "\[Pi]\[Phi]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "measures"}], "*)"}], "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", "E\[Sigma]"}], ")"}], ".", "\[Kappa]\[Kappa]"}]}], ";", "\[IndentingNewLine]", RowBox[{"QQ", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "tt", "*", "GG", "*", "\[Gamma]\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"tt", "*", RowBox[{"E\[Sigma]", ".", "\[Epsilon]\[Epsilon]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Epsilon]\[Epsilon]", "]"}], ".", "NN"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Kappa]\[Kappa]", "]"}], ".", "MM"}], "-", RowBox[{ RowBox[{"\[Delta]", "[", "\[Gamma]\[Gamma]", "]"}], ".", "QQ"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"fX", " ", ",", "fY", ",", "fZ"}], "}"}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"\[Delta]wsta", "=", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"wx", ",", "wy"}], "}"}], "]"}], ".", "NN", ".", RowBox[{"{", RowBox[{"wx", ",", "wy"}], "}"}]}]}]}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wmap", "=", RowBox[{ RowBox[{"-", "0.1"}], "*", RowBox[{"\[Delta]", "[", RowBox[{"wc", "-", "w"}], "]"}], "*", RowBox[{"(", RowBox[{"wc", "-", "w"}], ")"}], "*", RowBox[{"tt", "/", "AA"}], "*", "EE"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI1", ",", RowBox[{"\[Delta]wmap", "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]], "Input", CellChangeTimes->{ 3.4426474258030453`*^9, {3.4444401255942*^9, 3.4444401388073997`*^9}, { 3.4444401803034*^9, 3.4444401844062*^9}, 3.4444402418922*^9, { 3.4444402805022*^9, 3.4444403134026003`*^9}, {3.4444403443062*^9, 3.4444404484049997`*^9}, {3.444483267101*^9, 3.444483267335*^9}, { 3.4444833136046*^9, 3.4444835622998*^9}, {3.4444836421094*^9, 3.4444837777981997`*^9}, {3.444483920429*^9, 3.4444839412237997`*^9}, 3.4444842905546*^9, {3.4444843207406*^9, 3.4444844162282*^9}, { 3.4444844465078*^9, 3.4444844624354*^9}, {3.4444845255998*^9, 3.4444845894505997`*^9}, {3.4444846290746*^9, 3.444484933025*^9}, { 3.4444849790917997`*^9, 3.4444851148742*^9}, {3.444534936054*^9, 3.4445349675348*^9}, {3.4445355821731997`*^9, 3.44453585174*^9}, { 3.4445372162198*^9, 3.4445372264378*^9}, 3.444537384731*^9, { 3.4445377585382*^9, 3.4445377605818*^9}, {3.4445379733658*^9, 3.4445379736934*^9}, {3.4445380176762*^9, 3.444538032777*^9}, { 3.4445381079222*^9, 3.4445381581386003`*^9}, {3.4445382726456003`*^9, 3.4445382910067997`*^9}, {3.4445383401312*^9, 3.4445383475880003`*^9}, { 3.444538438458*^9, 3.4445384464608*^9}, {3.4445385680783997`*^9, 3.4445385687648*^9}, {3.4445389411991997`*^9, 3.4445389431024*^9}, { 3.444539746605*^9, 3.4445397807846003`*^9}, {3.4445408839765997`*^9, 3.4445409234133997`*^9}, {3.4445409681698*^9, 3.4445409932702*^9}, { 3.4445415452906*^9, 3.4445415706717997`*^9}, {3.4445416647242002`*^9, 3.4445416909477997`*^9}, {3.4445417660150003`*^9, 3.444541788557*^9}, { 3.4445420906977997`*^9, 3.444542104847*^9}, {3.4445421885878*^9, 3.4445421941414003`*^9}, {3.4445422252166*^9, 3.4445422386014*^9}, { 3.444542280425*^9, 3.4445423014538*^9}, {3.444542455769*^9, 3.4445424578282003`*^9}, {3.4445431739214*^9, 3.444543175809*^9}, { 3.4445647020962*^9, 3.4445648405618*^9}, {3.4445648825414*^9, 3.4445648858486*^9}, {3.4445649382646*^9, 3.4445651882702*^9}, { 3.4446164822206*^9, 3.4446165344494*^9}, {3.4446166121842003`*^9, 3.4446166738822002`*^9}, {3.4446167223046*^9, 3.4446168047974*^9}, { 3.444616843033*^9, 3.444616906447*^9}, {3.4446444694708*^9, 3.4446444700948*^9}, {3.4446477738310003`*^9, 3.4446477939862003`*^9}, { 3.4446478467298*^9, 3.4446478681018*^9}, 3.4446480456142*^9, { 3.4446487557418003`*^9, 3.4446487636198*^9}, 3.4446488179974003`*^9, { 3.4446488971205997`*^9, 3.4446489152478*^9}, {3.4446490003458*^9, 3.4446490008294*^9}, {3.4447042728942003`*^9, 3.4447042751562*^9}, { 3.4447044703278*^9, 3.4447044865362*^9}, 3.4447046475282*^9, 3.4447047993786*^9, {3.444704908329*^9, 3.4447049292642*^9}, { 3.4447049861926003`*^9, 3.4447049877214003`*^9}, {3.4447050279296*^9, 3.4447050419695997`*^9}, {3.4447053486656*^9, 3.4447053739376*^9}, 3.4447054561963997`*^9, 3.44470561612*^9, {3.4472133996876*^9, 3.4472134108571997`*^9}, {3.4472134470179996`*^9, 3.4472134648332*^9}, { 3.4472135032872*^9, 3.4472135245344*^9}, {3.4472136963059998`*^9, 3.4472137794384003`*^9}, {3.4472138235708*^9, 3.4472138388900003`*^9}, { 3.4472139099792*^9, 3.4472141367096*^9}, {3.447214202682*^9, 3.4472142975924*^9}, {3.4472144187732*^9, 3.4472145910284*^9}, { 3.4472146560492*^9, 3.4472147023968*^9}, {3.447214803594*^9, 3.4472148728736*^9}, {3.4472149156956*^9, 3.447214940484*^9}, { 3.447216227284*^9, 3.4472162419948*^9}, {3.4472163068908*^9, 3.4472163720832*^9}, {3.4472164665880003`*^9, 3.447216530392*^9}, { 3.4472166237268*^9, 3.4472167058452*^9}, 3.4472167362808*^9, { 3.4472171394658003`*^9, 3.4472171532874002`*^9}, {3.4472172028993998`*^9, 3.4472172216661997`*^9}, {3.4472172524606*^9, 3.4472172690278*^9}, { 3.4472173209133997`*^9, 3.4472173334245996`*^9}, {3.4472173920846*^9, 3.447217404861*^9}, {3.4472179572548*^9, 3.4472180351456003`*^9}, { 3.4472509764091997`*^9, 3.4472511017396*^9}, {3.4473910422216*^9, 3.4473912901524*^9}, 3.4473918688344*^9, {3.447392021185*^9, 3.4473920346633997`*^9}, {3.4473921383304*^9, 3.4473921479088*^9}, { 3.4473923024112*^9, 3.4473923734379997`*^9}, {3.4473928098168*^9, 3.4473928648691998`*^9}, {3.4473931872432003`*^9, 3.4473932461800003`*^9}, {3.4473933026675997`*^9, 3.4473934579812*^9}, { 3.4473935755271997`*^9, 3.447393742572*^9}, {3.4473939032676*^9, 3.4473939384144*^9}, {3.447395257644*^9, 3.4473953141628*^9}, { 3.4473954231132*^9, 3.4473954756384*^9}, {3.4473955348716*^9, 3.4473955723272*^9}, {3.447395648502*^9, 3.4473957588876*^9}, { 3.4473957903996*^9, 3.4473958488372*^9}, 3.4473962894154*^9, { 3.447396350817*^9, 3.447396352611*^9}, {3.4474625379146*^9, 3.4474625637326*^9}, {3.558360651728078*^9, 3.558360652102478*^9}, { 3.5619791319820857`*^9, 3.561979135788492*^9}, 3.561979369382504*^9, { 3.5619794930439215`*^9, 3.5619795010155354`*^9}, {3.561979569218855*^9, 3.56197960614412*^9}, {3.5619797417551584`*^9, 3.5619797448751636`*^9}, { 3.618719065033702*^9, 3.618719075426296*^9}, {3.6187194011669273`*^9, 3.6187194449454317`*^9}, {3.6187196998040085`*^9, 3.6187197102436056`*^9}, {3.618719902254588*^9, 3.6187199711455283`*^9}, { 3.618722365406472*^9, 3.6187225412555304`*^9}, {3.6187226885009522`*^9, 3.6187227109872384`*^9}, {3.618722756922866*^9, 3.6187231317203026`*^9}, { 3.618723424250035*^9, 3.6187234267291765`*^9}, {3.6187235105259695`*^9, 3.6187236491028957`*^9}, {3.618723691580325*^9, 3.618723745975436*^9}, { 3.618723778837316*^9, 3.6187238310002995`*^9}, {3.6187239055875654`*^9, 3.618723940035536*^9}, {3.6187239782667227`*^9, 3.6187240219352207`*^9}, { 3.618724166762504*^9, 3.618724177411113*^9}, {3.618729321696159*^9, 3.618729328067523*^9}, 3.618729374058154*^9, {3.6187294379838104`*^9, 3.618729708464281*^9}, {3.6187297631904106`*^9, 3.618729773195983*^9}, { 3.618729822648812*^9, 3.6187299321490746`*^9}, {3.618729984399063*^9, 3.61873000654133*^9}, {3.6187300746012225`*^9, 3.6187300860458775`*^9}, { 3.618731390835507*^9, 3.6187315116174154`*^9}, {3.618731747324897*^9, 3.6187318214091344`*^9}, {3.6187318769243097`*^9, 3.618732065297084*^9}, { 3.6187321012351394`*^9, 3.618732157420353*^9}, {3.618732188384124*^9, 3.6187322435542793`*^9}, {3.6187322786112847`*^9, 3.6187325478446836`*^9}, {3.6187325819856367`*^9, 3.6187326817653437`*^9}, {3.618732810863728*^9, 3.61873282594359*^9}, { 3.6187336474335766`*^9, 3.618733754678711*^9}, {3.618733827497876*^9, 3.61873396201257*^9}, {3.6187342020362988`*^9, 3.618734236455267*^9}, 3.618734298201799*^9, {3.618734712498495*^9, 3.618734712716508*^9}, 3.6187347739640107`*^9, {3.618738817361748*^9, 3.6187388333816643`*^9}, { 3.6187391349349127`*^9, 3.6187391457955337`*^9}, {3.618739376900752*^9, 3.618739397023903*^9}, {3.618739528394417*^9, 3.618739534809784*^9}, { 3.618739972366811*^9, 3.61873997340687*^9}, {3.6187400416617737`*^9, 3.618740043022852*^9}, {3.6187400971579485`*^9, 3.618740107902563*^9}, { 3.6187401713671927`*^9, 3.6187401723312483`*^9}, {3.6187402613443394`*^9, 3.618740268819767*^9}, {3.6187403697625403`*^9, 3.6187404057615995`*^9}, { 3.618740488277319*^9, 3.618740516244919*^9}, {3.618740647782442*^9, 3.6187406551668644`*^9}, 3.6187407823021364`*^9, {3.6187418050786357`*^9, 3.618741805749674*^9}, {3.6187418557605343`*^9, 3.6187419895921893`*^9}, { 3.618742022944097*^9, 3.61874204379729*^9}, {3.6187420836395683`*^9, 3.618742103384698*^9}, {3.620462440882641*^9, 3.6204624460519366`*^9}, { 3.6204624990259666`*^9, 3.620462576450395*^9}, {3.620463682857678*^9, 3.620463713336421*^9}, 3.6204637901188126`*^9, {3.620464238835478*^9, 3.62046424411378*^9}, 3.628912429385081*^9, {3.6289135207155013`*^9, 3.6289135210805225`*^9}, 3.6289497746958513`*^9, 3.6289498371774254`*^9, { 3.62894988410911*^9, 3.6289500319795675`*^9}, {3.6289501333883677`*^9, 3.628950183744248*^9}, {3.6289503323017445`*^9, 3.628950390181055*^9}, { 3.6289505050536256`*^9, 3.6289505113579865`*^9}, {3.62895070863527*^9, 3.6289507095043197`*^9}, {3.628951013180689*^9, 3.62895101407374*^9}, { 3.629190743153632*^9, 3.629190816645361*^9}, {3.6291909709608326`*^9, 3.629190981678051*^9}, {3.629191034624544*^9, 3.6291910410049553`*^9}, { 3.6293846391370816`*^9, 3.629384641102685*^9}, {3.6294628543371735`*^9, 3.629462867097191*^9}, {3.629468063172048*^9, 3.6294681151669397`*^9}, { 3.6295205836757097`*^9, 3.6295206295085897`*^9}, {3.6295206788826766`*^9, 3.6295207067911253`*^9}, {3.6295207408927855`*^9, 3.629520753700408*^9}, { 3.629521020590745*^9, 3.6295210354395943`*^9}, {3.6295211107369013`*^9, 3.62952114882508*^9}, {3.6295212327348795`*^9, 3.6295212477237363`*^9}, { 3.6295213424816394`*^9, 3.629521343230441*^9}, {3.6295215363119802`*^9, 3.6295216753550243`*^9}, {3.629521922272258*^9, 3.6295219939855833`*^9}, { 3.6295220298188467`*^9, 3.629522446058778*^9}, {3.629522499348471*^9, 3.629522604352256*^9}, {3.629522755188921*^9, 3.62952288580795*^9}, { 3.629522918084407*^9, 3.6295233421087513`*^9}, {3.6295233808436193`*^9, 3.629523390936837*^9}, {3.629523424274096*^9, 3.6295234533369465`*^9}, { 3.6295235190130625`*^9, 3.629523521680667*^9}, 3.6295235894315863`*^9, { 3.6295237270706277`*^9, 3.629523799454755*^9}, {3.6295238514808464`*^9, 3.629523883460902*^9}, {3.6295239376085978`*^9, 3.6295239442386093`*^9}, { 3.6295241089904985`*^9, 3.629524177537019*^9}, 3.629524211888279*^9, { 3.629524277423994*^9, 3.629524396904604*^9}, {3.6295244794839497`*^9, 3.6295246248450055`*^9}, 3.629524657090262*^9, {3.6295259599109507`*^9, 3.629526013465844*^9}, {3.6295261092188125`*^9, 3.629526201414974*^9}, 3.6295263436092243`*^9, {3.6295263910333076`*^9, 3.629526583303645*^9}, { 3.629526616672104*^9, 3.629526647653758*^9}, {3.629526687558628*^9, 3.629526744888729*^9}, {3.629526804075233*^9, 3.6295268598453307`*^9}, { 3.6295269393898706`*^9, 3.6295269586559043`*^9}, {3.6295271490074387`*^9, 3.6295272149019547`*^9}, {3.6295272553684254`*^9, 3.6295272827620735`*^9}, {3.6295274137087035`*^9, 3.6295274761244135`*^9}, {3.6295275252801*^9, 3.6295279912529182`*^9}, { 3.6295281572216096`*^9, 3.629528160435215*^9}, {3.6295282905550437`*^9, 3.6295284308616905`*^9}, 3.6295285402022824`*^9, {3.629528582088356*^9, 3.629528616798417*^9}, {3.6295287666834803`*^9, 3.6295290316343455`*^9}, { 3.629529086515242*^9, 3.629529118432898*^9}, {3.6295291548121614`*^9, 3.629529292794404*^9}, {3.6295293426208916`*^9, 3.6295293491261034`*^9}, { 3.629529420699029*^9, 3.629529571535694*^9}, {3.6295296539506383`*^9, 3.629529656103442*^9}, {3.6295296894407005`*^9, 3.629529692295506*^9}, { 3.6295297445555973`*^9, 3.629529766426836*^9}, {3.6295298053333044`*^9, 3.6295298209489317`*^9}, {3.6295308380551186`*^9, 3.6295308386635194`*^9}, {3.629532377840223*^9, 3.6295323811630287`*^9}, { 3.629532480020402*^9, 3.629532482454006*^9}, {3.629532520720874*^9, 3.629532564619351*^9}, {3.62953259842461*^9, 3.6295326002654133`*^9}, { 3.6295326327758703`*^9, 3.6295326715107384`*^9}, {3.629532742428463*^9, 3.6295328288058147`*^9}, {3.6295329692184625`*^9, 3.6295330530062094`*^9}, {3.6295331824396367`*^9, 3.629533193562456*^9}, 3.6295350321720915`*^9, 3.629535158485513*^9, {3.629535245471266*^9, 3.6295352687465067`*^9}, {3.62953541293756*^9, 3.629535446384019*^9}, { 3.6295355043381205`*^9, 3.6295355262249594`*^9}, {3.629543790136781*^9, 3.629543791181983*^9}, {3.629543871350524*^9, 3.629544001673153*^9}, { 3.6295446682009234`*^9, 3.629544668466124*^9}, {3.6296010216162376`*^9, 3.6296010236442413`*^9}, {3.629601079336339*^9, 3.6296010902875586`*^9}, 3.6296011425476503`*^9, {3.6296043522397404`*^9, 3.629604399031022*^9}, { 3.629623884428093*^9, 3.629623914723346*^9}, {3.6296239662190366`*^9, 3.6296239738006496`*^9}, {3.6296240514731865`*^9, 3.6296240920176573`*^9}, {3.629624125947717*^9, 3.629624369432945*^9}, { 3.6296256512247963`*^9, 3.6296256817072496`*^9}, {3.6296260472626915`*^9, 3.629626047434292*^9}, {3.629628055568204*^9, 3.629628056098605*^9}, { 3.6296280911206665`*^9, 3.6296281088266973`*^9}, {3.6296281406819534`*^9, 3.629628273032586*^9}, {3.629628378831972*^9, 3.6296283814995766`*^9}, { 3.629628459562114*^9, 3.629628466379326*^9}, {3.629628519419419*^9, 3.6296285390754533`*^9}, {3.629633008133008*^9, 3.629633008835009*^9}, { 3.6296337764967575`*^9, 3.6296338344040594`*^9}, {3.6296342997684765`*^9, 3.629634432150309*^9}, {3.629634494035618*^9, 3.6296345320060844`*^9}, { 3.629634594499794*^9, 3.629634812182576*^9}, {3.6296348599810605`*^9, 3.6296348746918864`*^9}, {3.6296349071867433`*^9, 3.629635023172947*^9}, 3.6296350995818815`*^9, {3.6296363797201295`*^9, 3.6296363868961425`*^9}, { 3.629636462025874*^9, 3.6296364833355117`*^9}, {3.629636555922439*^9, 3.62963656780966*^9}, {3.629636770469616*^9, 3.629636774151222*^9}, { 3.6296369192782774`*^9, 3.6296369318830996`*^9}, {3.629637058539722*^9, 3.6296370719401455`*^9}, {3.629637278172508*^9, 3.629637286814923*^9}, { 3.6296376418091464`*^9, 3.629637662385583*^9}, {3.629637773551378*^9, 3.629637795360216*^9}, {3.6296390041751394`*^9, 3.629639039571602*^9}, 3.6296393829750047`*^9, {3.6296395546065063`*^9, 3.6296395649961243`*^9}, { 3.62964113386068*^9, 3.6296412507048855`*^9}, {3.629641303167777*^9, 3.629641313744596*^9}, {3.6296416285116315`*^9, 3.629641628886032*^9}, { 3.6296416658736973`*^9, 3.6296416815049243`*^9}, 3.6296417376338234`*^9, { 3.6296855551269727`*^9, 3.6296855804270077`*^9}, {3.6297079065796247`*^9, 3.6297079070476255`*^9}, {3.6297080850439377`*^9, 3.629708135728427*^9}, { 3.6297083496516027`*^9, 3.6297084025512953`*^9}, {3.629708781767563*^9, 3.629708790940379*^9}, {3.6297089402482414`*^9, 3.6297089618542795`*^9}, { 3.6297105345398417`*^9, 3.629710538580249*^9}, {3.6297107810514746`*^9, 3.6297107850138817`*^9}, {3.6297109100481014`*^9, 3.629710915710911*^9}, { 3.629711201534613*^9, 3.629711204311418*^9}, {3.629711236307074*^9, 3.6297115007275386`*^9}, {3.6297115377464037`*^9, 3.6297115441112146`*^9}, 3.6297116025645175`*^9, {3.6298716505389357`*^9, 3.629871851841689*^9}, { 3.62987837458679*^9, 3.629878383510006*^9}, {3.6298784402629056`*^9, 3.629878447345318*^9}, {3.6298785221786494`*^9, 3.6298786580236883`*^9}, { 3.629878689613744*^9, 3.629878737147027*^9}, 3.629878783853509*^9, { 3.629878832322794*^9, 3.6298789171723433`*^9}, {3.6298802128122005`*^9, 3.6298802929723125`*^9}, 3.6298813644148126`*^9, {3.629882428887303*^9, 3.629882435887313*^9}, {3.6298986251827383`*^9, 3.6298988530367384`*^9}, { 3.6298989036744275`*^9, 3.6298989486493063`*^9}, {3.629899016868226*^9, 3.6298991622448816`*^9}, {3.6298997154530535`*^9, 3.629899740147897*^9}, { 3.6298998248560457`*^9, 3.629899978048314*^9}, {3.6299000396372223`*^9, 3.6299001557638264`*^9}, {3.6299001966826982`*^9, 3.6299002595352087`*^9}, 3.6299005011236343`*^9, {3.6299005468317146`*^9, 3.629900567642151*^9}, { 3.629900887676713*^9, 3.629900990153293*^9}, {3.6299011689220085`*^9, 3.6299012295125146`*^9}, {3.6299013754039707`*^9, 3.6299014166036434`*^9}, 3.6299014589733176`*^9, {3.6299015096734066`*^9, 3.629901588765546*^9}, { 3.629901662569275*^9, 3.6299016974665365`*^9}, {3.629901952339784*^9, 3.6299019599057975`*^9}, 3.6299020306051216`*^9, {3.6299022330934772`*^9, 3.6299022682559395`*^9}, {3.6299023020455985`*^9, 3.629902332808852*^9}, { 3.6299024532566643`*^9, 3.629902462850681*^9}, {3.629949880225117*^9, 3.6299498807867184`*^9}, {3.6299503101150723`*^9, 3.6299503156998825`*^9}, {3.629950355058751*^9, 3.629950498937804*^9}, { 3.6299555415202007`*^9, 3.6299555507086167`*^9}, {3.6299556061667137`*^9, 3.6299557553497763`*^9}, {3.629955788499834*^9, 3.6299558948608212`*^9}, { 3.629956042764681*^9, 3.629956043809883*^9}, {3.6299560914211664`*^9, 3.6299561017327843`*^9}, 3.629956145849662*^9, {3.6299584813821354`*^9, 3.6299585082765827`*^9}, 3.6299585652946825`*^9, {3.629958616587573*^9, 3.6299586356508064`*^9}, {3.629958715073346*^9, 3.6299588186419287`*^9}, { 3.629958857454797*^9, 3.629958927249319*^9}, {3.629959427994599*^9, 3.629959494669116*^9}, {3.6299595293323765`*^9, 3.6299596037913074`*^9}, { 3.62995966795422*^9, 3.62995967360143*^9}, {3.6299597835972233`*^9, 3.6299597841120243`*^9}, {3.629959826622099*^9, 3.629959862533362*^9}, { 3.6299599051682367`*^9, 3.6299599235918694`*^9}, 3.629959979939168*^9, { 3.6299601345354395`*^9, 3.62996014612626*^9}, 3.6299601769831142`*^9, { 3.629960253142448*^9, 3.629960269538077*^9}, {3.6299603041701374`*^9, 3.6299603078205442`*^9}, {3.6299604300467587`*^9, 3.629960435491168*^9}, { 3.6299605300585346`*^9, 3.6299605636609936`*^9}, {3.6299606195870914`*^9, 3.6299606581971593`*^9}, {3.629960824228251*^9, 3.6299608755367413`*^9}, { 3.629960906658796*^9, 3.6299609978409557`*^9}, {3.6299610312250147`*^9, 3.629961070646284*^9}, {3.629961135698398*^9, 3.6299611643088484`*^9}, { 3.6299720458358483`*^9, 3.6299721791536827`*^9}, {3.6299722439717965`*^9, 3.629972300007095*^9}, {3.6299723670872126`*^9, 3.6299723937008595`*^9}, { 3.629972457801372*^9, 3.6299724710613956`*^9}, {3.629972740193068*^9, 3.6299728251196175`*^9}, {3.6299729203577843`*^9, 3.6299729350218105`*^9}, {3.6299729720874753`*^9, 3.6299730462188053`*^9}, {3.629973116044528*^9, 3.6299731230177402`*^9}, { 3.629973184310248*^9, 3.6299732090830917`*^9}, {3.629973349982539*^9, 3.6299734360166903`*^9}, 3.629973534562063*^9, {3.629973577446539*^9, 3.629973586104554*^9}, {3.6299740374133463`*^9, 3.629974083823428*^9}, { 3.6299742505565205`*^9, 3.629974337089873*^9}, {3.629974382907153*^9, 3.6299744466176653`*^9}, {3.629974589794717*^9, 3.629974590761918*^9}, { 3.629974776215044*^9, 3.6299747850134597`*^9}, {3.6299748226095257`*^9, 3.6299748237483273`*^9}, 3.6299748618435946`*^9, {3.629975198476586*^9, 3.6299752545898843`*^9}, {3.62997531475919*^9, 3.6299753175515947`*^9}, { 3.6299754601982455`*^9, 3.6299754625382495`*^9}, {3.629975592034077*^9, 3.629975592502078*^9}, {3.629983277446268*^9, 3.6299832946842985`*^9}, { 3.62998342081052*^9, 3.6299835439883366`*^9}, {3.629983615514462*^9, 3.629983931009416*^9}, {3.6299919807040443`*^9, 3.6299919808912444`*^9}, { 3.629992028330928*^9, 3.6299920922130404`*^9}, 3.629992198480427*^9, { 3.6299922299300823`*^9, 3.629992250506518*^9}, {3.629992292657792*^9, 3.6299923603151107`*^9}, {3.6299924387676487`*^9, 3.6299924398440504`*^9}, {3.6299925764846907`*^9, 3.6299926096347485`*^9}, {3.6299928122323046`*^9, 3.629992818768716*^9}, { 3.6299929049120674`*^9, 3.629992905411268*^9}, {3.6299929850338078`*^9, 3.6299929866250105`*^9}, {3.6299931061992207`*^9, 3.62999312270405*^9}, { 3.629993172312137*^9, 3.6299932618718944`*^9}, {3.6299933276572104`*^9, 3.6299933842073092`*^9}, {3.630287775665962*^9, 3.630287795852398*^9}, { 3.6303896387100534`*^9, 3.630389666774503*^9}, {3.6303896967889557`*^9, 3.6303897095341783`*^9}, {3.6303897587054644`*^9, 3.630389880448078*^9}, { 3.6303899127557354`*^9, 3.630390009444705*^9}, 3.630390057321189*^9, 3.630390443484267*^9, {3.63039095720877*^9, 3.6303909789240074`*^9}, { 3.6303910572205453`*^9, 3.6303911291054716`*^9}, {3.630391163035531*^9, 3.6303911740803504`*^9}, {3.630391240224467*^9, 3.6303912875081496`*^9}, { 3.6303913396902413`*^9, 3.630391404570755*^9}, {3.630391479513287*^9, 3.6303917572873745`*^9}, {3.630391868905571*^9, 3.6303920027226057`*^9}, { 3.630392064327114*^9, 3.630392219843787*^9}, {3.63039226121506*^9, 3.63039232943398*^9}, {3.6303924315985594`*^9, 3.6303924441097813`*^9}, { 3.6303926866122074`*^9, 3.6303927118530517`*^9}, {3.630392795671999*^9, 3.6303928006172075`*^9}, {3.6303986032190485`*^9, 3.6303986046230516`*^9}, {3.6303986654631586`*^9, 3.6303987936485834`*^9}, {3.63039889979117*^9, 3.6303989091199865`*^9}, { 3.630399006323757*^9, 3.630399007259759*^9}, {3.630399117224352*^9, 3.630399214771323*^9}, {3.6303992555185947`*^9, 3.6303993036758795`*^9}, { 3.630399467725767*^9, 3.630399502731636*^9}, {3.6303995748037624`*^9, 3.630399595614199*^9}, {3.6303996329294643`*^9, 3.630399658076709*^9}, { 3.630399711335202*^9, 3.6303997453120623`*^9}, {3.6303998546994543`*^9, 3.6303999880484886`*^9}, {3.6304000742074394`*^9, 3.630400123441126*^9}, { 3.6304001724564123`*^9, 3.630400251595351*^9}, {3.630400324166679*^9, 3.630400327052684*^9}, {3.630400358190338*^9, 3.6304003597503414`*^9}, { 3.6304004587481155`*^9, 3.6304004640521245`*^9}, {3.630400521975026*^9, 3.630400526124634*^9}, {3.630400567199506*^9, 3.630400593516752*^9}, { 3.6304012340070767`*^9, 3.6304013035207987`*^9}, {3.6304013614749007`*^9, 3.630401367933312*^9}, {3.630401686939398*^9, 3.6304017294598303`*^9}, { 3.630401794020523*^9, 3.6304018922061386`*^9}, {3.6304019687775183`*^9, 3.630401987153569*^9}, {3.630402072749465*^9, 3.63040208297405*^9}, { 3.6304022247881613`*^9, 3.630402255931943*^9}, 3.630402329306139*^9, { 3.6304023806970787`*^9, 3.6304024212403975`*^9}, {3.6304025002259154`*^9, 3.630402528595538*^9}, {3.6304025620694523`*^9, 3.630402575015193*^9}, { 3.6304026411829777`*^9, 3.630402649073429*^9}, {3.630402695548087*^9, 3.6304027128260756`*^9}, {3.630402783923142*^9, 3.6304027982389607`*^9}, { 3.6304028797236214`*^9, 3.6304030111811404`*^9}, {3.6304030562107162`*^9, 3.6304031598846455`*^9}, {3.630403236330018*^9, 3.6304032404072514`*^9}, { 3.630403373001835*^9, 3.6304033888147397`*^9}, {3.6304039420953856`*^9, 3.6304039512829113`*^9}, 3.6304039831437335`*^9, {3.630404015975611*^9, 3.6304040663624935`*^9}, {3.630404173614628*^9, 3.630404246945822*^9}, { 3.6304042891772375`*^9, 3.630404299595834*^9}, {3.630404391083066*^9, 3.630404392406142*^9}, {3.6304045301800222`*^9, 3.6304045579486103`*^9}, { 3.630404640215316*^9, 3.630404762796327*^9}, {3.630404877629895*^9, 3.630404883104208*^9}, {3.6304050364729805`*^9, 3.630405098270515*^9}, { 3.6304051736118245`*^9, 3.6304051965901384`*^9}, {3.6304053802536435`*^9, 3.63040539242334*^9}, {3.630406035965148*^9, 3.630406041998493*^9}, { 3.630406072049212*^9, 3.6304060962065935`*^9}, {3.630406264081196*^9, 3.6304062707025747`*^9}, {3.63040632219952*^9, 3.630406385461138*^9}, { 3.630406477200385*^9, 3.630406482095665*^9}, {3.6304066170883865`*^9, 3.6304066222256804`*^9}, {3.630406957868878*^9, 3.630406973411767*^9}, { 3.6304070081447535`*^9, 3.630407018199329*^9}, {3.630407411376817*^9, 3.630407412542884*^9}, {3.6304080609339695`*^9, 3.630408121202417*^9}, { 3.6304081585485525`*^9, 3.6304081832129636`*^9}, {3.63040821409673*^9, 3.630408421131572*^9}, 3.6304934333363276`*^9, {3.63049350751357*^9, 3.630493677593298*^9}, {3.630493716898546*^9, 3.6304937846684227`*^9}, 3.630493922944331*^9, {3.6304939556752033`*^9, 3.630494117430455*^9}, { 3.6304941486092386`*^9, 3.6304941767788496`*^9}, {3.6304942118648567`*^9, 3.6304942530272107`*^9}, {3.6304942838399734`*^9, 3.6304942845820155`*^9}, {3.6304943454054947`*^9, 3.6304944442451477`*^9}, {3.63080749995092*^9, 3.6308075480801234`*^9}, { 3.630807586536323*^9, 3.630807621440319*^9}, {3.630807680459695*^9, 3.630807682914836*^9}, {3.630807736889923*^9, 3.6308077644745007`*^9}, { 3.6308078081089964`*^9, 3.6308078670123653`*^9}, {3.630807991648494*^9, 3.630807997541831*^9}, {3.6308081080891542`*^9, 3.6308081919599514`*^9}, { 3.630808306368495*^9, 3.630808345060708*^9}, {3.6308087281906223`*^9, 3.6308087555171847`*^9}, {3.630809110815507*^9, 3.630809169033837*^9}, { 3.6308091998195972`*^9, 3.630809448512822*^9}, {3.6308095328996487`*^9, 3.6308095448223305`*^9}, {3.630809582269472*^9, 3.6308095873607635`*^9}, { 3.630809665529235*^9, 3.630809684808337*^9}, {3.6308316258485594`*^9, 3.6308318380886984`*^9}, {3.63083188164919*^9, 3.630831966930068*^9}, 3.6320400558356075`*^9, {3.6354749882908883`*^9, 3.635474989418953*^9}, { 3.635475084557395*^9, 3.6354750875145636`*^9}, {3.6354751334091887`*^9, 3.635475162315842*^9}, {3.6354754001974483`*^9, 3.6354754820331287`*^9}, 3.635475512931896*^9, {3.6354756222781506`*^9, 3.635475622861184*^9}, { 3.635475691642118*^9, 3.6354757057969275`*^9}, {3.6354757798291616`*^9, 3.635475797395167*^9}, {3.635475884848169*^9, 3.6354758981309285`*^9}, { 3.635475961488552*^9, 3.6354759738382587`*^9}, {3.6354760213729773`*^9, 3.6354760572050266`*^9}, {3.6354761282470903`*^9, 3.635476136040536*^9}, { 3.6354761719365892`*^9, 3.635476212217893*^9}, {3.6593346599546614`*^9, 3.659334660890663*^9}, {3.6593347077219453`*^9, 3.659334720701168*^9}, { 3.6593348752974396`*^9, 3.6593348758122406`*^9}, {3.6593349140947075`*^9, 3.6593350070240707`*^9}, {3.6593350466949406`*^9, 3.6593350543701544`*^9}, {3.659335103791041*^9, 3.6593351614487424`*^9}, 3.659335217686841*^9, {3.659335262084519*^9, 3.6593352995869846`*^9}, { 3.6593356899482727`*^9, 3.659335701819893*^9}, {3.659335964227954*^9, 3.659335964602355*^9}, {3.65933603594128*^9, 3.6593360629605274`*^9}, { 3.6593361352354546`*^9, 3.6593361504454813`*^9}, {3.6593363929479074`*^9, 3.6593364061611304`*^9}, 3.6593368946915884`*^9, {3.6884748265656157`*^9, 3.6884748268716326`*^9}, {3.6884748600075283`*^9, 3.688474861420609*^9}, { 3.6885242858240776`*^9, 3.6885243001140976`*^9}, {3.6888842911675606`*^9, 3.6888843311676164`*^9}, {3.688966242423658*^9, 3.688966263933688*^9}, { 3.6897393587897596`*^9, 3.6897393649897685`*^9}, 3.689739477049925*^9, { 3.6898595970621734`*^9, 3.689859597272174*^9}, {3.6898596707522764`*^9, 3.6898597190523443`*^9}, {3.689859768552414*^9, 3.6898597721424184`*^9}, { 3.689859855272535*^9, 3.689859859882541*^9}, {3.6898605078334484`*^9, 3.6898607266237545`*^9}, 3.6898608811139708`*^9, {3.6898609634740863`*^9, 3.689860974304102*^9}, 3.6898610140141573`*^9, {3.6898611496043468`*^9, 3.6898611683243732`*^9}, {3.689861462024784*^9, 3.6898615624849253`*^9}, { 3.6898616142149973`*^9, 3.6898616164350004`*^9}, 3.6898616657950697`*^9, { 3.689861716805141*^9, 3.689861749905187*^9}, {3.732677920575506*^9, 3.7326779208190203`*^9}, {3.7519672427004185`*^9, 3.7519672444968877`*^9}, {3.7519674022097683`*^9, 3.75196742976579*^9}, { 3.751967484127989*^9, 3.751967510853814*^9}, {3.7519675409404893`*^9, 3.751967541549782*^9}, {3.7519675797751045`*^9, 3.751967592209671*^9}, { 3.7519676829383273`*^9, 3.7519676841255474`*^9}, {3.7519677154775553`*^9, 3.7519677953499403`*^9}, 3.751967827811061*^9, {3.7519679545625095`*^9, 3.751967957999185*^9}, {3.751968003754015*^9, 3.7519681477513895`*^9}, { 3.751968264817631*^9, 3.751968270722477*^9}, {3.7519689618119907`*^9, 3.751968969888235*^9}, {3.7519691168917775`*^9, 3.7519691395895615`*^9}, { 3.751969242782174*^9, 3.7519692581691785`*^9}, {3.7519693625211954`*^9, 3.751969378579924*^9}, {3.751969409572627*^9, 3.751969438643936*^9}, { 3.7519695894526725`*^9, 3.751969614306203*^9}, {3.7523200108586655`*^9, 3.752320012354121*^9}, {3.7553831315619707`*^9, 3.755383134119626*^9}, { 3.7553831893197794`*^9, 3.755383241814331*^9}, {3.7553832736267967`*^9, 3.7553832810757113`*^9}, {3.7554336536222963`*^9, 3.755433684797229*^9}, { 3.7554337764737434`*^9, 3.7554338315300155`*^9}, {3.755433998047738*^9, 3.7554340265485487`*^9}, {3.755446573138784*^9, 3.755446636911299*^9}, { 3.75544667493072*^9, 3.755446753435521*^9}, {3.755446891541581*^9, 3.7554468921547422`*^9}, {3.7554469323588533`*^9, 3.755446936867403*^9}, { 3.7554470190332975`*^9, 3.7554472776872244`*^9}, {3.7555217323692026`*^9, 3.755521732847602*^9}, {3.755521767127169*^9, 3.7555217972041793`*^9}, { 3.755522561453134*^9, 3.755522564231819*^9}, {3.755522601885935*^9, 3.7555226037287407`*^9}, {3.7555226758687305`*^9, 3.755522678585092*^9}, { 3.7555234832604623`*^9, 3.7555235920444417`*^9}, {3.7555239506007543`*^9, 3.755524013893358*^9}, {3.755524076791689*^9, 3.7555240812793446`*^9}, { 3.7555241238138275`*^9, 3.7555241268985643`*^9}, {3.7555242930449886`*^9, 3.7555243378577013`*^9}, {3.7555256673767824`*^9, 3.7555256808205338`*^9}, {3.7555258588384123`*^9, 3.755525900317296*^9}, { 3.755525930708299*^9, 3.7555260436531134`*^9}, {3.755607147401991*^9, 3.7556071504143705`*^9}, {3.755607992884314*^9, 3.7556080025382996`*^9}, { 3.7556094344057455`*^9, 3.7556094348690443`*^9}, {3.7559613653116636`*^9, 3.755961445097105*^9}, 3.755961484246889*^9, {3.7559618979231987`*^9, 3.755961939470047*^9}, {3.7559620323724904`*^9, 3.7559620330864005`*^9}, { 3.755962155557907*^9, 3.7559621601593847`*^9}, {3.755962303755834*^9, 3.755962343830135*^9}, {3.7559624058018165`*^9, 3.7559624450501757`*^9}, 3.756002186674869*^9, 3.7560029626855392`*^9, {3.756003222110388*^9, 3.756003295034633*^9}, {3.7560056331492863`*^9, 3.7560056663855457`*^9}, { 3.7560057813555765`*^9, 3.7560057863836613`*^9}, {3.7560058917172394`*^9, 3.756005927847292*^9}, 3.756006092376186*^9, 3.756009112317705*^9, { 3.756091886039587*^9, 3.756091887764086*^9}, {3.756092005435152*^9, 3.7560920727337685`*^9}, {3.75609212911592*^9, 3.7560921293252516`*^9}, { 3.756092262958163*^9, 3.756092263157668*^9}, {3.756092342487877*^9, 3.756092347894502*^9}, {3.7560929036769304`*^9, 3.7560929278911004`*^9}, { 3.7560930741522417`*^9, 3.756093083420331*^9}, {3.7560932986236534`*^9, 3.7560933139459305`*^9}, {3.756093449985523*^9, 3.7560934874491863`*^9}, { 3.756093592694581*^9, 3.7560936019456573`*^9}, {3.756093634438078*^9, 3.756093673866626*^9}, {3.756093873069885*^9, 3.756093897964734*^9}, { 3.7560940650109406`*^9, 3.756094078056768*^9}, {3.756442536546026*^9, 3.756442607904289*^9}, {3.7564436397451363`*^9, 3.7564436403231254`*^9}, { 3.7636034984570236`*^9, 3.7636034989933815`*^9}, {3.763603551051456*^9, 3.7636035527617817`*^9}, {3.7636036049384193`*^9, 3.7636036392233057`*^9}, {3.7636036850937223`*^9, 3.763603692587598*^9}, { 3.7636037258272257`*^9, 3.7636037459031096`*^9}, {3.7636037792254367`*^9, 3.76360387572289*^9}, {3.763603971837229*^9, 3.7636040341423655`*^9}, { 3.763604066526084*^9, 3.7636040756798687`*^9}, {3.7636041452118535`*^9, 3.763604278007333*^9}, {3.763604317710966*^9, 3.7636043271387568`*^9}, { 3.7636043584877644`*^9, 3.763604415561053*^9}, {3.763604445680462*^9, 3.7636044504114943`*^9}, {3.763604615444647*^9, 3.7636048082554193`*^9}, 3.763604854904996*^9, {3.7636133594095488`*^9, 3.7636133618464766`*^9}, { 3.7636136063756704`*^9, 3.7636136315671196`*^9}, {3.7636990373827705`*^9, 3.7636990431157646`*^9}, {3.763699090332087*^9, 3.763699110952259*^9}, { 3.763699227420497*^9, 3.7636993642943506`*^9}, {3.763700085627533*^9, 3.763700088329999*^9}, {3.7637001721125274`*^9, 3.763700181422837*^9}, { 3.763700248063385*^9, 3.7637003918630466`*^9}, {3.763700591783223*^9, 3.7637006017496295`*^9}, {3.7637007583576717`*^9, 3.7637007603074865`*^9}, {3.7637137795793185`*^9, 3.7637137822587233`*^9}, {3.7637148704355187`*^9, 3.763714870624051*^9}, { 3.763727592158518*^9, 3.7637275933445053`*^9}, {3.7637276688363667`*^9, 3.7637276694756594`*^9}, 3.763803448896332*^9, {3.76380349501632*^9, 3.7638036835067654`*^9}, {3.763804829093463*^9, 3.7638048385675254`*^9}, 3.7638051033646154`*^9, 3.7638053924528885`*^9, {3.763805557684454*^9, 3.763805634255308*^9}, {3.763806843847647*^9, 3.763806847966059*^9}, { 3.763806942652097*^9, 3.7638071770752254`*^9}, {3.7638141184594107`*^9, 3.763814134133461*^9}, {3.7638146808628216`*^9, 3.7638146925645113`*^9}, { 3.7638147709278784`*^9, 3.7638147811883087`*^9}, {3.7638148155281043`*^9, 3.763814819843194*^9}, {3.7638150259647446`*^9, 3.763815028601293*^9}, { 3.7638151529595194`*^9, 3.763815155849978*^9}, {3.7638163770262136`*^9, 3.763816380851597*^9}, {3.7638164181856327`*^9, 3.7638164950537987`*^9}, 3.763816568304102*^9, {3.7638166173645625`*^9, 3.763816618808757*^9}, { 3.7638167204462805`*^9, 3.763816721012859*^9}, {3.763857602253485*^9, 3.7638579604183645`*^9}, {3.7638580038507566`*^9, 3.7638580060526443`*^9}, {3.763858082269992*^9, 3.7638581746835337`*^9}, { 3.7638582163351564`*^9, 3.7638582415275116`*^9}, {3.7638582983238*^9, 3.763858907503306*^9}, {3.763858941318697*^9, 3.763858956626134*^9}, { 3.7638602435602536`*^9, 3.763860245408451*^9}, {3.7638694636456347`*^9, 3.7638694647177277`*^9}, {3.7638708199536576`*^9, 3.763870829436488*^9}, { 3.763871287170555*^9, 3.7638712876184006`*^9}, {3.763943214376035*^9, 3.7639432984591475`*^9}, {3.763943418832348*^9, 3.7639434335508127`*^9}, { 3.76394347113767*^9, 3.7639435187320576`*^9}, {3.763943585908682*^9, 3.7639436125255404`*^9}, {3.763951722152746*^9, 3.76395172989299*^9}, { 3.7639517863423367`*^9, 3.7639519945900664`*^9}, {3.763952081515512*^9, 3.7639521530710773`*^9}, {3.763952353248129*^9, 3.763952357026309*^9}, { 3.7639524211903834`*^9, 3.7639524243979177`*^9}, {3.7639527174925117`*^9, 3.7639527180252266`*^9}, {3.7641265625745993`*^9, 3.7641265632314167`*^9}, {3.764126605555829*^9, 3.7641266075095396`*^9}, { 3.7641268313964133`*^9, 3.7641268543573804`*^9}, {3.764127044657903*^9, 3.7641270479422092`*^9}, {3.7641271442332697`*^9, 3.7641271469362774`*^9}, {3.764127227626192*^9, 3.7641272592640233`*^9}, { 3.764127335707515*^9, 3.7641273386484756`*^9}, {3.764127429843852*^9, 3.7641274364304185`*^9}, {3.7641275071859307`*^9, 3.764127516803895*^9}, 3.7641276043548007`*^9, {3.7641276925365753`*^9, 3.764127697080591*^9}, 3.764127798472331*^9, 3.764127853631323*^9, 3.764127908496078*^9, { 3.7641280050343323`*^9, 3.764128022046494*^9}, {3.764128128597419*^9, 3.764128154116727*^9}, {3.7641286864636617`*^9, 3.764128701643106*^9}, { 3.7641289910924444`*^9, 3.7641290126680794`*^9}, {3.7641290672285347`*^9, 3.7641290737798567`*^9}, {3.7641325425120363`*^9, 3.764132565390477*^9}, { 3.7641327425004654`*^9, 3.764132750040793*^9}, 3.7641327968340364`*^9, { 3.764133146776842*^9, 3.764133204874522*^9}, {3.7641333488187037`*^9, 3.7641333525577593`*^9}, {3.764413145593136*^9, 3.7644131471236105`*^9}, { 3.764413201645049*^9, 3.7644132349609704`*^9}, {3.764413325008136*^9, 3.7644133748980193`*^9}, {3.7644134113425665`*^9, 3.7644135151187*^9}, { 3.764413554409053*^9, 3.7644136160674934`*^9}, {3.76441371984758*^9, 3.764413730103909*^9}, 3.764419641962368*^9, {3.7644198522879405`*^9, 3.764419879249356*^9}, 3.764419909536559*^9, {3.764419991012162*^9, 3.764420000171088*^9}, {3.7644200798862047`*^9, 3.7644200950961914`*^9}, { 3.7644201529471693`*^9, 3.764420153715966*^9}, {3.764420210346301*^9, 3.764420255343707*^9}, {3.764420296178318*^9, 3.7644203000939393`*^9}, { 3.7644203803359275`*^9, 3.7644203931390867`*^9}, 3.7644204418727274`*^9, { 3.7647259720700207`*^9, 3.7647261047260523`*^9}, {3.7647263483375626`*^9, 3.76472635879602*^9}, 3.764726656736601*^9, {3.764727009127914*^9, 3.764727020100875*^9}, {3.7647270591828785`*^9, 3.7647270819631023`*^9}, { 3.7647272109090505`*^9, 3.764727227846332*^9}, {3.76473247809907*^9, 3.7647324813925114`*^9}, {3.7647349484962797`*^9, 3.7647349979358416`*^9}, {3.7647351097258167`*^9, 3.764735124772463*^9}, { 3.7647352810674453`*^9, 3.7647352901139917`*^9}, {3.7647353746429515`*^9, 3.764735379550926*^9}, {3.7647354596539807`*^9, 3.764735507677454*^9}, { 3.7647355546341*^9, 3.764735728811817*^9}, {3.764735837449795*^9, 3.76473584132898*^9}, {3.76473603649269*^9, 3.7647360592982664`*^9}, { 3.7647360998228803`*^9, 3.76473621551197*^9}, {3.7647362545599003`*^9, 3.764736286430997*^9}, {3.7647364592833533`*^9, 3.764736464019006*^9}, { 3.764736566167658*^9, 3.7647365918958225`*^9}, {3.764764761680134*^9, 3.7647648482473745`*^9}, 3.764764917763693*^9, {3.764764964821686*^9, 3.764765090741813*^9}, {3.7647651742140284`*^9, 3.7647652517335076`*^9}, { 3.764765341266399*^9, 3.7647653614173465`*^9}, 3.764765400284145*^9, { 3.764765691384389*^9, 3.764765708710143*^9}, 3.7647657454275875`*^9, { 3.76476578351686*^9, 3.764765871262255*^9}, {3.7647661045180917`*^9, 3.76476612822571*^9}, {3.7647661964223824`*^9, 3.764766239375331*^9}, { 3.764766330361228*^9, 3.764766338297905*^9}, {3.764767015060799*^9, 3.7647670193029037`*^9}, {3.764767076590926*^9, 3.7647671160277977`*^9}, { 3.7647671493139205`*^9, 3.7647672079236426`*^9}, {3.764767458938404*^9, 3.7647674608323865`*^9}, {3.764810938444873*^9, 3.7648109399353456`*^9}, { 3.7648118616019874`*^9, 3.7648118695079126`*^9}, {3.7648120589477816`*^9, 3.7648124600413237`*^9}, {3.76481250476682*^9, 3.7648125259602103`*^9}, { 3.764812601341893*^9, 3.7648126577763243`*^9}, {3.7648126944039307`*^9, 3.7648128855627623`*^9}, {3.764812924923909*^9, 3.764812926481821*^9}, { 3.764813041485982*^9, 3.764813131254232*^9}, {3.7648134679328885`*^9, 3.7648136479313235`*^9}, {3.7648136917777314`*^9, 3.764813697753367*^9}, { 3.7648137297570653`*^9, 3.764813747862262*^9}, 3.764813784221693*^9, { 3.7648138370678406`*^9, 3.7648141387969923`*^9}, {3.764814321050164*^9, 3.764814422489184*^9}, {3.764814461366684*^9, 3.7648145835728483`*^9}, { 3.764814614769511*^9, 3.7648147525825167`*^9}, {3.764815363375289*^9, 3.7648153644907384`*^9}, {3.764815451671169*^9, 3.7648154601533747`*^9}, { 3.7648175917802963`*^9, 3.7648176401910563`*^9}, {3.765885491237231*^9, 3.765885501131465*^9}, {3.766572999289345*^9, 3.7665729996020145`*^9}, { 3.7665730613126965`*^9, 3.7665730616706066`*^9}, {3.7840103262125545`*^9, 3.7840103546413517`*^9}, {3.784011309725755*^9, 3.7840113197719574`*^9}, { 3.784013374800973*^9, 3.7840133842981763`*^9}, {3.7840238533665447`*^9, 3.78402395932942*^9}, {3.784024091276659*^9, 3.784024112209529*^9}, { 3.7840242793219643`*^9, 3.784024296655184*^9}, {3.7840290670892677`*^9, 3.7840291348388853`*^9}, {3.784029222997594*^9, 3.784029542926179*^9}, { 3.784375172285057*^9, 3.784375319701829*^9}, {3.7843753678421807`*^9, 3.7843753788103914`*^9}, {3.7843754844339557`*^9, 3.784375827494117*^9}, { 3.784375862317687*^9, 3.7843759567563844`*^9}, {3.784376004941759*^9, 3.7843760080157185`*^9}, {3.784376101918992*^9, 3.7843761244332943`*^9}, { 3.784376181191763*^9, 3.7843762145091863`*^9}, {3.7843792489960337`*^9, 3.78437926273014*^9}, {3.7843793293934345`*^9, 3.784379368676588*^9}, { 3.7843796529835215`*^9, 3.7843796858862267`*^9}, {3.784450863324359*^9, 3.7844508986076546`*^9}, {3.7844510208392324`*^9, 3.784451027915551*^9}, { 3.7844511176315613`*^9, 3.7844511673791957`*^9}, {3.784451235055628*^9, 3.78445132575735*^9}, {3.784451995615477*^9, 3.7844520110330954`*^9}, { 3.7844522907551537`*^9, 3.7844523421551*^9}, {3.784700119490345*^9, 3.7847001627913013`*^9}, {3.7847004221290607`*^9, 3.7847004380767317`*^9}, 3.7847007913506136`*^9, {3.784781955129138*^9, 3.784781977787957*^9}, { 3.78488170216677*^9, 3.784881704210422*^9}, 3.784882130557441*^9, { 3.78488220347418*^9, 3.7848822064697027`*^9}, {3.784883393455822*^9, 3.784883458551924*^9}, 3.7848835306495824`*^9, {3.7848836822092113`*^9, 3.7848837303696923`*^9}, 3.7848838199009576`*^9, {3.7848842507527857`*^9, 3.7848842836585226`*^9}, 3.7848843847882996`*^9, {3.784884461405264*^9, 3.7848844645041113`*^9}, {3.784884559404122*^9, 3.7848845656634912`*^9}, { 3.7848852409944844`*^9, 3.7848852740337477`*^9}, {3.7848854548929386`*^9, 3.7848854893046365`*^9}, {3.7848856741783943`*^9, 3.784885691704702*^9}, { 3.784885809660874*^9, 3.784885811424426*^9}, {3.7848860031948376`*^9, 3.784886020570098*^9}, 3.7848861057105627`*^9, {3.7848861627726107`*^9, 3.7848862212876124`*^9}, {3.784886306497995*^9, 3.7848863509322224`*^9}, 3.784886472690192*^9, {3.7848866596243*^9, 3.784886664116289*^9}, { 3.7848866987282944`*^9, 3.7848867077911897`*^9}, {3.78488676128524*^9, 3.7848868667029366`*^9}, {3.7848869381224003`*^9, 3.7848869414281464`*^9}, {3.7848870104508753`*^9, 3.784887039889447*^9}, { 3.7848871795058794`*^9, 3.7848871976746817`*^9}, {3.7848872311446314`*^9, 3.78488724075662*^9}, 3.784887405188785*^9, {3.784887591926689*^9, 3.7848876119305134`*^9}, {3.784887676620901*^9, 3.7848876786672792`*^9}, { 3.78488771054331*^9, 3.784887714354906*^9}, {3.7848877625809546`*^9, 3.7848878103041153`*^9}, 3.7848878862881575`*^9, {3.787717235155089*^9, 3.787717269464238*^9}, {3.7877174592607603`*^9, 3.7877174674038067`*^9}, { 3.7877271032841845`*^9, 3.787727136247201*^9}, 3.787727355369296*^9, 3.7877274973278403`*^9, {3.787727855959008*^9, 3.78772792141208*^9}, 3.787728113487193*^9, {3.7877281704571557`*^9, 3.7877281735077004`*^9}, 3.7877282789827795`*^9, {3.7877286510229864`*^9, 3.787728665729192*^9}, { 3.7877287942225084`*^9, 3.787728807671986*^9}, {3.787729044867985*^9, 3.787729045536916*^9}, {3.787729589732438*^9, 3.7877296062090626`*^9}, { 3.787729794037467*^9, 3.7877297950347877`*^9}, {3.787729855548402*^9, 3.7877299039179935`*^9}, {3.7877300373241186`*^9, 3.787730068136018*^9}, { 3.7877301999859333`*^9, 3.7877302014150777`*^9}, {3.787732033225385*^9, 3.7877320471634016`*^9}, {3.787732077195259*^9, 3.7877320780358667`*^9}, 3.787732189759206*^9, {3.78773231889835*^9, 3.787732327710633*^9}, { 3.7877324857166643`*^9, 3.787732496655479*^9}, {3.7877325848303585`*^9, 3.78773258503596*^9}, {3.7877328504631166`*^9, 3.7877328625892415`*^9}, { 3.7877330254884944`*^9, 3.7877330271019044`*^9}, {3.787733136128061*^9, 3.7877331422258835`*^9}, {3.787733243513567*^9, 3.78773324558677*^9}, 3.787733310555999*^9, 3.7877334085329347`*^9, {3.7877337955932293`*^9, 3.7877337970498257`*^9}, {3.787733867727028*^9, 3.7877338687324905`*^9}, { 3.7877352224369583`*^9, 3.787735224161746*^9}, {3.787735343322833*^9, 3.787735348772827*^9}, {3.787735422704711*^9, 3.7877354268945775`*^9}, { 3.7877355100355635`*^9, 3.787735514671461*^9}, {3.7877356541994534`*^9, 3.7877356632141013`*^9}, 3.7877357913476543`*^9, 3.787736261837074*^9, { 3.7882542159043374`*^9, 3.7882542747998285`*^9}, {3.788254310967661*^9, 3.788254318430212*^9}, {3.788254585790197*^9, 3.7882545888318524`*^9}, { 3.7882547349987383`*^9, 3.788254735940298*^9}, 3.788254830063775*^9, 3.7882549155286837`*^9, {3.7882550121437798`*^9, 3.788255037735396*^9}, { 3.7882551764404287`*^9, 3.78825518352113*^9}, {3.7882552540030313`*^9, 3.788255290224329*^9}, {3.7882553843544893`*^9, 3.788255423248046*^9}, { 3.78825567982127*^9, 3.7882556852479534`*^9}, {3.7882557908576803`*^9, 3.7882558029800806`*^9}, {3.7882560240494256`*^9, 3.7882560388846164`*^9}, 3.788256102343512*^9, {3.788256161397396*^9, 3.7882561626372194`*^9}, { 3.7882562304311895`*^9, 3.78825629590362*^9}, {3.7882563614677362`*^9, 3.7882563620189795`*^9}, {3.7882564138122153`*^9, 3.7882564294158382`*^9}, {3.788256467457189*^9, 3.7882564889521217`*^9}, { 3.7882565883311844`*^9, 3.788256591497148*^9}, {3.7882568409513097`*^9, 3.7882568724526567`*^9}, {3.788256965258837*^9, 3.788256966444976*^9}, { 3.7882570073831463`*^9, 3.7882570497349973`*^9}, {3.7882570992487097`*^9, 3.788257144206352*^9}, {3.78825721252205*^9, 3.788257307277931*^9}, { 3.788257350410209*^9, 3.7882573617262745`*^9}, {3.788257424936472*^9, 3.788257434118204*^9}, {3.788276311330668*^9, 3.788276311647092*^9}, { 3.7882765465512347`*^9, 3.788276608568333*^9}, {3.7882767715851693`*^9, 3.7882768045752783`*^9}, {3.7882769342607436`*^9, 3.7882769409894867`*^9}, {3.7882770202208567`*^9, 3.7882770424485188`*^9}, {3.7882770760040703`*^9, 3.788277077341468*^9}, { 3.788277147336176*^9, 3.788277150397852*^9}, {3.7882772069909*^9, 3.7882772101572385`*^9}, {3.7882772503366175`*^9, 3.7882772773759403`*^9}, {3.7882773922958755`*^9, 3.7882773927832017`*^9}, {3.788277450684473*^9, 3.788277482126852*^9}, { 3.78827754293396*^9, 3.788277545027956*^9}, {3.7883214550230436`*^9, 3.7883214742097826`*^9}, {3.788321520104019*^9, 3.788321685390153*^9}, { 3.788321717307153*^9, 3.788321801831746*^9}, {3.788321836768508*^9, 3.788322037754008*^9}, {3.7883220686363816`*^9, 3.788322220085001*^9}, { 3.7883255906192427`*^9, 3.788325646609389*^9}, {3.7883257976991563`*^9, 3.788325804097658*^9}, {3.788325969279187*^9, 3.7883259830028267`*^9}, { 3.788326975877249*^9, 3.788326979070017*^9}, {3.788328539286415*^9, 3.788328618410488*^9}, {3.788328648595448*^9, 3.788328762662589*^9}, { 3.7883288060890923`*^9, 3.7883288805716724`*^9}, {3.7883319188300047`*^9, 3.78833193230753*^9}, {3.7883321144947567`*^9, 3.788332115050151*^9}, { 3.7883333680456443`*^9, 3.7883333686272163`*^9}, 3.7883336421611414`*^9, { 3.788333691323177*^9, 3.7883336916362*^9}, {3.788333797629262*^9, 3.7883338348662343`*^9}, {3.7883339555470386`*^9, 3.7883339660305166`*^9}, {3.7883340291758356`*^9, 3.788334031484354*^9}, { 3.788334368484807*^9, 3.7883343918754945`*^9}, {3.7883345963739557`*^9, 3.788334645315611*^9}, {3.788411405608647*^9, 3.788411409092114*^9}, { 3.7884115644712825`*^9, 3.7884115911998663`*^9}, {3.7884116673998833`*^9, 3.788411758799066*^9}, {3.788411985303985*^9, 3.788412002701314*^9}, { 3.78841218266156*^9, 3.788412217652734*^9}, {3.788412679618697*^9, 3.78841268296084*^9}, {3.788412968920223*^9, 3.7884129782039633`*^9}, { 3.7884155241723013`*^9, 3.7884155243798914`*^9}, 3.7884156619519596`*^9, { 3.7884162343262696`*^9, 3.788416236013459*^9}, {3.789022054245319*^9, 3.7890221116154556`*^9}, {3.7890222001685014`*^9, 3.789022205961149*^9}, { 3.789094077050009*^9, 3.7890940781167436`*^9}, {3.7890941254883175`*^9, 3.7890942919861226`*^9}, {3.789094340508856*^9, 3.789094543716852*^9}, { 3.789094583794143*^9, 3.7890947278803444`*^9}, {3.7890947714417076`*^9, 3.7890948342626343`*^9}, {3.789095197615344*^9, 3.789095215073329*^9}, { 3.789095256390032*^9, 3.78909525710861*^9}, {3.7890954241290827`*^9, 3.78909583987399*^9}, {3.789096056032333*^9, 3.7890960602768464`*^9}, { 3.7890960928429904`*^9, 3.789096098149865*^9}, {3.789096721918685*^9, 3.789096734998893*^9}, {3.7890967741973257`*^9, 3.78909683859006*^9}, { 3.789096947653244*^9, 3.789097122315098*^9}, {3.7890971528708224`*^9, 3.789097530683948*^9}, {3.7890975852885656`*^9, 3.7890975882562447`*^9}, { 3.7890976430709224`*^9, 3.789097656213524*^9}, {3.789107592314107*^9, 3.7891076537760305`*^9}, {3.789107685160589*^9, 3.789107760590632*^9}, { 3.7891078105008087`*^9, 3.789107846610609*^9}, {3.789107989236459*^9, 3.7891080001561875`*^9}, {3.7891082032172785`*^9, 3.7891082064574785`*^9}, {3.7891083013630204`*^9, 3.789108444864075*^9}, { 3.7891084751958127`*^9, 3.7891085010044174`*^9}, {3.7891085322441816`*^9, 3.7891085353767447`*^9}, {3.789108620037199*^9, 3.789108662297584*^9}, 3.7891087252471294`*^9, {3.789108773507248*^9, 3.7891088501491203`*^9}, { 3.7891088829987*^9, 3.789108918319019*^9}, {3.7891089606286983`*^9, 3.7891090044788837`*^9}, {3.789109048556943*^9, 3.7891091177554493`*^9}, { 3.7891091628149347`*^9, 3.7891092922346783`*^9}, {3.789109382870388*^9, 3.789109402625166*^9}, {3.7891111380334797`*^9, 3.7891113582877145`*^9}, { 3.789111396694514*^9, 3.7891114221541777`*^9}, {3.7891114539845037`*^9, 3.7891114952359962`*^9}, {3.789112929457416*^9, 3.7891129318274393`*^9}, { 3.789112963290578*^9, 3.7891131302196255`*^9}, {3.789113202949188*^9, 3.789113203379569*^9}, {3.7891144371217365`*^9, 3.789114518411393*^9}, { 3.789114638487608*^9, 3.78911468069436*^9}, {3.789114763918976*^9, 3.789114777923211*^9}, {3.789114809301983*^9, 3.7891148392057247`*^9}, { 3.7891148923150015`*^9, 3.789114904054755*^9}, {3.7891149560740595`*^9, 3.7891150071774015`*^9}, {3.789115109642312*^9, 3.7891151147637*^9}, { 3.7891185439211864`*^9, 3.789118561569729*^9}, {3.7891187834106455`*^9, 3.7891187854068985`*^9}, {3.7891188764873776`*^9, 3.7891188767373095`*^9}, {3.789121799028477*^9, 3.789121806719482*^9}, { 3.7891222627163153`*^9, 3.7891222774782734`*^9}, {3.7891223914541044`*^9, 3.7891224006004095`*^9}, {3.789122431773783*^9, 3.7891224422816577`*^9}, { 3.7891224731160736`*^9, 3.789122501042121*^9}, {3.7891226653529224`*^9, 3.7891226664045706`*^9}, 3.789122819901965*^9, {3.789122893844426*^9, 3.7891229543768473`*^9}, {3.7891229964274464`*^9, 3.7891231044294157`*^9}, {3.789123228485856*^9, 3.789123374714591*^9}, { 3.7891235661360893`*^9, 3.7891235688754067`*^9}}, CellLabel-> "In[399]:=",ExpressionUUID->"36da5ee8-c081-4034-82cc-77b43ee6cf2c"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E1005", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ "n1_", ",", "n2_", ",", "n3_", ",", "n4_", ",", "n5_", ",", "n6_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "node", ",", "n\[Alpha]", ",", "n\[Beta]", ",", "\[Alpha]", ",", "\[Beta]", ",", "NN", ",", "r", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "rn", ",", "jac", ",", "h\[Alpha]", ",", "e\[Alpha]", ",", "h\[Beta]", ",", "e\[Beta]", ",", "en", ",", "FF", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]", ",", "f\[Alpha]", ",", "f\[Beta]", ",", "fn", ",", "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]", ",", "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]", ",", "\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]", ",", "GG", ",", "N\[Alpha]\[Alpha]", ",", "N\[Beta]\[Beta]", ",", "N\[Alpha]\[Beta]", ",", "N\[Beta]\[Alpha]", ",", "M\[Alpha]\[Alpha]", ",", "M\[Beta]\[Beta]", ",", "M\[Alpha]\[Beta]", ",", "Q\[Alpha]", ",", "Q\[Beta]", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ")"}], "-", RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ")"}], "\[Alpha]"}], "-", RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ")"}], "\[Beta]"}]}], ",", RowBox[{"4", RowBox[{"(", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ")"}], "\[Alpha]"}], ",", "\[IndentingNewLine]", RowBox[{"\[Alpha]", "-", RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ")"}], "\[Alpha]"}], "-", RowBox[{"2", " ", "\[Alpha]", " ", "\[Beta]"}]}], ",", RowBox[{"4", " ", "\[Alpha]", " ", "\[Beta]"}], ",", RowBox[{"\[Beta]", "-", RowBox[{"2", " ", "\[Alpha]", " ", "\[Beta]"}], "-", RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ")"}], "\[Beta]"}]}], " ", ",", RowBox[{"4", RowBox[{"(", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ")"}], "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"node", "=", RowBox[{"{", RowBox[{ "n1", ",", "n2", ",", "n3", ",", "n4", ",", "n5", ",", "n6"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "mapping", " ", "to", " ", "orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]", "=", RowBox[{"Norm", "[", "r\[Alpha]", "]"}]}], ";", RowBox[{"e\[Alpha]", "=", RowBox[{"r\[Alpha]", "/", "h\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Beta]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Beta]", "=", RowBox[{"r\[Beta]", "-", RowBox[{ RowBox[{"(", RowBox[{"r\[Beta]", ".", "e\[Alpha]"}], ")"}], "*", "e\[Alpha]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Norm", "[", "r\[Beta]", "]"}]}], ";", RowBox[{"e\[Beta]", "=", RowBox[{"r\[Beta]", "/", "h\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"e\[Alpha]", "\[Cross]", "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", RowBox[{"h\[Alpha]", "*", "h\[Beta]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"in", " ", "flat", " ", "geometry"}], "*)"}], "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", "e\[Beta]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "transform", " ", "into", " ", "the", " ", "material", " ", "\[Alpha]\[Beta]n"}], "-", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"(", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"(", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "3"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"strain", " ", "measures", " ", "with", " ", "non"}], "-", RowBox[{"symmetric", " ", "\[Epsilon]"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v"}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], "/", "h\[Alpha]"}], "-", "\[Psi]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u"}], "/", "h\[Beta]"}], "+", "\[Psi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[CapitalTheta]"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}]}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[CapitalTheta]"}], "/", "h\[Beta]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], "/", "h\[Alpha]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], "/", "h\[Alpha]"}], "+", "\[CapitalTheta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}], "/", "h\[Beta]"}], "-", "\[Phi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "stress", " ", "resultants", " ", "with", " ", "a", " ", "nonsymmetric", " ", "N"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Alpha]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Beta]\[Beta]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Beta]\[Beta]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Beta]\[Beta]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Beta]", "=", RowBox[{"tt", "*", "GG", "*", "\[Epsilon]\[Alpha]\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Beta]\[Alpha]", "=", RowBox[{"tt", "*", "GG", "*", "\[Epsilon]\[Beta]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Alpha]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Beta]\[Beta]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Beta]\[Beta]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Beta]\[Beta]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Beta]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", "GG", "*", "\[Kappa]\[Alpha]\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Alpha]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Beta]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Beta]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"virtual", " ", "work"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint1", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "N\[Alpha]\[Alpha]", ",", "N\[Beta]\[Beta]", ",", "N\[Alpha]\[Beta]", ",", "N\[Beta]\[Alpha]"}], "}"}]}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "M\[Alpha]\[Alpha]", ",", "M\[Beta]\[Beta]", ",", "M\[Alpha]\[Beta]"}], "}"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"Q\[Alpha]", ",", "Q\[Beta]"}], "}"}]}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint2", "=", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"Q\[Alpha]", ",", "Q\[Beta]"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"QUAD", "[", RowBox[{"TRI7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint1", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}], "+", RowBox[{"QUAD", "[", RowBox[{"TRI4", ",", RowBox[{ RowBox[{"(", "\[Delta]wint2", ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"ELEMENT", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{ RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "n\[Alpha]", ",", "n\[Beta]", ",", "\[Alpha]", ",", "\[Beta]", ",", "NN", ",", "r", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "rn", ",", "jac", ",", "h\[Alpha]", ",", "e\[Alpha]", ",", "h\[Beta]", ",", "e\[Beta]", ",", "en", ",", "FF", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]", ",", "f\[Alpha]", ",", "f\[Beta]", ",", "fn", ",", "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]", ",", "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]", ",", "\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]", ",", "GG", ",", "N\[Alpha]\[Alpha]", ",", "N\[Beta]\[Beta]", ",", "N\[Alpha]\[Beta]", ",", "N\[Beta]\[Alpha]", ",", "M\[Alpha]\[Alpha]", ",", "M\[Beta]\[Beta]", ",", "M\[Alpha]\[Beta]", ",", "Q\[Alpha]", ",", "Q\[Beta]", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"1", "/", "2"}], "*", "\[Alpha]", "*", RowBox[{"(", RowBox[{"2", "-", RowBox[{"9", "*", "\[Alpha]"}], "+", RowBox[{"9", "*", SuperscriptBox["\[Alpha]", "2"]}]}], ")"}]}], ",", RowBox[{ RowBox[{"1", "/", "2"}], "*", " ", "\[Beta]", "*", RowBox[{"(", RowBox[{"2", "-", RowBox[{"9", "*", " ", "\[Beta]"}], "+", RowBox[{"9", " ", "*", SuperscriptBox["\[Beta]", "2"]}]}], ")"}]}], ",", RowBox[{ RowBox[{"1", "/", "2"}], "*", RowBox[{"(", RowBox[{"2", "-", RowBox[{"9", " ", SuperscriptBox["\[Alpha]", "3"]}], "-", RowBox[{"11", " ", "\[Beta]"}], "+", RowBox[{"18", " ", SuperscriptBox["\[Beta]", "2"]}], "-", RowBox[{"9", " ", SuperscriptBox["\[Beta]", "3"]}], "-", RowBox[{"9", " ", "*", SuperscriptBox["\[Alpha]", "2"], "*", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"3", "*", "\[Beta]"}]}], ")"}]}], "+", RowBox[{"\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "11"}], "+", RowBox[{"36", "*", "\[Beta]"}], "-", RowBox[{"27", "*", SuperscriptBox["\[Beta]", "2"]}]}], ")"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"9", "/", "2"}], "*", " ", "\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", "*", "\[Alpha]"}]}], ")"}], "*", "\[Beta]"}], ",", RowBox[{ RowBox[{"9", "/", "2"}], "*", " ", "\[Alpha]", "*", "\[Beta]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", "*", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{ RowBox[{"-", "9"}], "/", "2"}], "*", " ", "\[Beta]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]", "+", "\[Beta]"}], ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", "*", "\[Beta]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"9", "/", "2"}], "*", " ", "\[Beta]", "*", RowBox[{"(", RowBox[{"2", "+", RowBox[{"3", "*", SuperscriptBox["\[Alpha]", "2"]}], "-", RowBox[{"5", "*", "\[Beta]"}], "+", RowBox[{"3", "*", SuperscriptBox["\[Beta]", "2"]}], "+", RowBox[{"\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "5"}], "+", RowBox[{"6", "*", "\[Beta]"}]}], ")"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{"9", "/", "2"}], "*", "\[Alpha]", "*", RowBox[{"(", RowBox[{"2", "+", RowBox[{"3", "*", SuperscriptBox["\[Alpha]", "2"]}], "-", RowBox[{"5", "*", "\[Beta]"}], "+", RowBox[{"3", "*", SuperscriptBox["\[Beta]", "2"]}], "+", RowBox[{"\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "5"}], "+", RowBox[{"6", "*", "\[Beta]"}]}], ")"}]}]}], ")"}]}], ",", RowBox[{ RowBox[{ RowBox[{"-", "9"}], "/", "2"}], "*", " ", "\[Alpha]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"3", "*", "\[Alpha]"}]}], ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]", "+", "\[Beta]"}], ")"}]}], ",", RowBox[{ RowBox[{"-", "27"}], "*", "\[Alpha]", "*", "\[Beta]", "*", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", "\[Alpha]", "+", "\[Beta]"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "mapping", " ", "to", " ", "orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]", "=", RowBox[{"Norm", "[", "r\[Alpha]", "]"}]}], ";", RowBox[{"e\[Alpha]", "=", RowBox[{"r\[Alpha]", "/", "h\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Beta]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Beta]", "=", RowBox[{"r\[Beta]", "-", RowBox[{ RowBox[{"(", RowBox[{"r\[Beta]", ".", "e\[Alpha]"}], ")"}], "*", "e\[Alpha]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Norm", "[", "r\[Beta]", "]"}]}], ";", RowBox[{"e\[Beta]", "=", RowBox[{"r\[Beta]", "/", "h\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"e\[Alpha]", "\[Cross]", "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", RowBox[{"h\[Alpha]", "*", "h\[Beta]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"in", " ", "flat", " ", "geometry"}], "*)"}], "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", "e\[Beta]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "transform", " ", "into", " ", "the", " ", "material", " ", "\[Alpha]\[Beta]n"}], "-", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"(", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"(", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "3"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"strain", " ", "measures", " ", "with", " ", "non"}], "-", RowBox[{"symmetric", " ", "\[Epsilon]"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v"}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], "/", "h\[Alpha]"}], "-", "\[Psi]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u"}], "/", "h\[Beta]"}], "+", "\[Psi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[CapitalTheta]"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}]}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[CapitalTheta]"}], "/", "h\[Beta]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], "/", "h\[Alpha]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], "/", "h\[Alpha]"}], "+", "\[CapitalTheta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}], "/", "h\[Beta]"}], "-", "\[Phi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "stress", " ", "resultants", " ", "with", " ", "a", " ", "nonsymmetric", " ", "N"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Alpha]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Beta]\[Beta]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Beta]\[Beta]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Beta]\[Beta]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Beta]", "=", RowBox[{"tt", "*", "GG", "*", "\[Epsilon]\[Alpha]\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Beta]\[Alpha]", "=", RowBox[{"tt", "*", "GG", "*", "\[Epsilon]\[Beta]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Alpha]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Beta]\[Beta]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Beta]\[Beta]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Beta]\[Beta]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Beta]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", "GG", "*", "\[Kappa]\[Alpha]\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Alpha]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Beta]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Beta]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"virtual", " ", "work"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "N\[Alpha]\[Alpha]", ",", "N\[Beta]\[Beta]", ",", "N\[Alpha]\[Beta]", ",", "N\[Beta]\[Alpha]"}], "}"}]}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "M\[Alpha]\[Alpha]", ",", "M\[Beta]\[Beta]", ",", "M\[Alpha]\[Beta]"}], "}"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"Q\[Alpha]", ",", "Q\[Beta]"}], "}"}]}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TRI28", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]"}], "}"}]}], "]"}]}]}], "]"}], "/;", " ", RowBox[{ RowBox[{"Dimensions", "[", "node", "]"}], "\[Equal]", RowBox[{"{", "10", "}"}]}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"ELEMENT", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{ RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "n\[Alpha]", ",", "n\[Beta]", ",", "nne", ",", "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "enode", ",", "NN", ",", "r", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "rn", ",", "jac", ",", "h\[Alpha]", ",", "e\[Alpha]", ",", "h\[Beta]", ",", "e\[Beta]", ",", "en", ",", "FF", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]", ",", "f\[Alpha]", ",", "f\[Beta]", ",", "fn", ",", "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]", ",", "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]", ",", "\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]", ",", "GG", ",", "N\[Alpha]\[Alpha]", ",", "N\[Beta]\[Beta]", ",", "N\[Alpha]\[Beta]", ",", "N\[Beta]\[Alpha]", ",", "M\[Alpha]\[Alpha]", ",", "M\[Beta]\[Beta]", ",", "M\[Alpha]\[Beta]", ",", "Q\[Alpha]", ",", "Q\[Beta]", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "nodes", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"n\[Alpha]", ",", "n\[Beta]"}], "}"}], "=", RowBox[{"Dimensions", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nne", " ", "=", RowBox[{"n\[Alpha]", "*", "n\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"enode", "=", RowBox[{"Flatten", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n\[Alpha]", ",", "\[Alpha]"}], "}"}], ",", RowBox[{"{", RowBox[{"n\[Beta]", ",", "\[Beta]"}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "mapping", " ", "to", " ", "orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]", "=", RowBox[{"Norm", "[", "r\[Alpha]", "]"}]}], ";", RowBox[{"e\[Alpha]", "=", RowBox[{"r\[Alpha]", "/", "h\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Beta]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Beta]", "=", RowBox[{"r\[Beta]", "-", RowBox[{ RowBox[{"(", RowBox[{"r\[Beta]", ".", "e\[Alpha]"}], ")"}], "*", "e\[Alpha]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Norm", "[", "r\[Beta]", "]"}]}], ";", RowBox[{"e\[Beta]", "=", RowBox[{"r\[Beta]", "/", "h\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"e\[Alpha]", "\[Cross]", "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", RowBox[{"h\[Alpha]", "*", "h\[Beta]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"in", " ", "flat", " ", "geometry"}], "*)"}], "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", "e\[Beta]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "transform", " ", "into", " ", "the", " ", "material", " ", "\[Alpha]\[Beta]n"}], "-", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"(", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "2"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"(", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "3"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"strain", " ", "measures", " ", "with", " ", "non"}], "-", RowBox[{"symmetric", " ", "\[Epsilon]"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v"}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], "/", "h\[Alpha]"}], "-", "\[Psi]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u"}], "/", "h\[Beta]"}], "+", "\[Psi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[CapitalTheta]"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}]}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[CapitalTheta]"}], "/", "h\[Beta]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], "/", "h\[Alpha]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], "/", "h\[Alpha]"}], "+", "\[CapitalTheta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}], "/", "h\[Beta]"}], "-", "\[Phi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "stress", " ", "resultants", " ", "with", " ", "a", " ", "nonsymmetric", " ", "N"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Alpha]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Beta]\[Beta]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Beta]\[Beta]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Beta]\[Beta]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Beta]", "=", RowBox[{"tt", "*", "GG", "*", "\[Epsilon]\[Alpha]\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Beta]\[Alpha]", "=", RowBox[{"tt", "*", "GG", "*", "\[Epsilon]\[Beta]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Alpha]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Beta]\[Beta]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Beta]\[Beta]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Beta]\[Beta]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Beta]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", "GG", "*", "\[Kappa]\[Alpha]\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Alpha]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Beta]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Beta]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"virtual", " ", "work"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "N\[Alpha]\[Alpha]", ",", "N\[Beta]\[Beta]", ",", "N\[Alpha]\[Beta]", ",", "N\[Beta]\[Alpha]"}], "}"}]}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "M\[Alpha]\[Alpha]", ",", "M\[Beta]\[Beta]", ",", "M\[Alpha]\[Beta]"}], "}"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"Q\[Alpha]", ",", "Q\[Beta]"}], "}"}]}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", "\[Alpha]"}], "]"}], ",", "\[Beta]"}], "]"}]}]}], "]"}], "/;", " ", RowBox[{ RowBox[{"Dimensions", "[", "node", "]"}], "\[Equal]", RowBox[{"{", RowBox[{"4", ",", "4"}], "}"}]}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{ "fx_", ",", "fy_", ",", "fz_", ",", "mx_", ",", "my_", ",", "mz_"}], "}"}]}], "}"}], ",", RowBox[{"ELEMENT", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{ RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "n\[Alpha]", ",", "n\[Beta]", ",", "nne", ",", "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "enode", ",", "NN", ",", "r", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "rn", ",", "jac", ",", "h\[Alpha]", ",", "e\[Alpha]", ",", "h\[Beta]", ",", "e\[Beta]", ",", "en", ",", "FF", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]", ",", "f\[Alpha]", ",", "f\[Beta]", ",", "fn", ",", "m\[Alpha]", ",", "m\[Beta]", ",", "mn", ",", "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]", ",", "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]", ",", "\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]", ",", "GG", ",", "N\[Alpha]\[Alpha]", ",", "N\[Beta]\[Beta]", ",", "N\[Alpha]\[Beta]", ",", "N\[Beta]\[Alpha]", ",", "M\[Alpha]\[Alpha]", ",", "M\[Beta]\[Beta]", ",", "M\[Alpha]\[Beta]", ",", "Q\[Alpha]", ",", "Q\[Beta]", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "nodes", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"n\[Alpha]", ",", "n\[Beta]"}], "}"}], "=", RowBox[{"Dimensions", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nne", " ", "=", RowBox[{"n\[Alpha]", "*", "n\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"enode", "=", RowBox[{"Flatten", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n\[Alpha]", ",", "\[Alpha]"}], "}"}], ",", RowBox[{"{", RowBox[{"n\[Beta]", ",", "\[Beta]"}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "mapping", " ", "to", " ", "orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]", "=", RowBox[{"Norm", "[", "r\[Alpha]", "]"}]}], ";", RowBox[{"e\[Alpha]", "=", RowBox[{"r\[Alpha]", "/", "h\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Beta]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Beta]", "=", RowBox[{"r\[Beta]", "-", RowBox[{ RowBox[{"(", RowBox[{"r\[Beta]", ".", "e\[Alpha]"}], ")"}], "*", "e\[Alpha]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Norm", "[", "r\[Beta]", "]"}]}], ";", RowBox[{"e\[Beta]", "=", RowBox[{"r\[Beta]", "/", "h\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"e\[Alpha]", "\[Cross]", "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", RowBox[{"h\[Alpha]", "*", "h\[Beta]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"in", " ", "flat", " ", "geometry"}], "*)"}], "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", "e\[Beta]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "transform", " ", "into", " ", "the", " ", "material", " ", "\[Alpha]\[Beta]n"}], "-", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"(", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "2"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"(", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "3"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"m\[Alpha]", ",", "m\[Beta]", ",", "mn"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"mx", ",", "my", ",", "mz"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"strain", " ", "measures", " ", "with", " ", "non"}], "-", RowBox[{"symmetric", " ", "\[Epsilon]"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v"}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v"}], "/", "h\[Alpha]"}], "-", "\[Psi]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u"}], "/", "h\[Beta]"}], "+", "\[Psi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[CapitalTheta]"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]"}]}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[CapitalTheta]"}], "/", "h\[Beta]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]"}], "/", "h\[Alpha]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w"}], "/", "h\[Alpha]"}], "+", "\[CapitalTheta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w"}], "/", "h\[Beta]"}], "-", "\[Phi]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "stress", " ", "resultants", " ", "with", " ", "a", " ", "nonsymmetric", " ", "N"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Alpha]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Beta]\[Beta]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Beta]\[Beta]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Beta]\[Beta]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Beta]", "=", RowBox[{"tt", "*", "GG", "*", "\[Epsilon]\[Alpha]\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Beta]\[Alpha]", "=", RowBox[{"tt", "*", "GG", "*", "\[Epsilon]\[Beta]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Alpha]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Beta]\[Beta]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Beta]\[Beta]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Beta]\[Beta]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Beta]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", "GG", "*", "\[Kappa]\[Alpha]\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Alpha]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Beta]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Beta]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"virtual", " ", "work"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "N\[Alpha]\[Alpha]", ",", "N\[Beta]\[Beta]", ",", "N\[Alpha]\[Beta]", ",", "N\[Beta]\[Alpha]"}], "}"}]}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "M\[Alpha]\[Alpha]", ",", "M\[Beta]\[Beta]", ",", "M\[Alpha]\[Beta]"}], "}"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"Q\[Alpha]", ",", "Q\[Beta]"}], "}"}]}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"m\[Alpha]", ",", "m\[Beta]", ",", "mn"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ")"}], "*", "jac"}], ",", "\[Alpha]"}], "]"}], ",", "\[Beta]"}], "]"}]}]}], "]"}], "/;", " ", RowBox[{ RowBox[{"Dimensions", "[", "node", "]"}], "\[Equal]", RowBox[{"{", RowBox[{"4", ",", "4"}], "}"}]}]}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{ 3.4426474258030453`*^9, {3.4444401255942*^9, 3.4444401388073997`*^9}, { 3.4444401803034*^9, 3.4444401844062*^9}, 3.4444402418922*^9, { 3.4444402805022*^9, 3.4444403134026003`*^9}, {3.4444403443062*^9, 3.4444404484049997`*^9}, {3.444483267101*^9, 3.444483267335*^9}, { 3.4444833136046*^9, 3.4444835622998*^9}, {3.4444836421094*^9, 3.4444837777981997`*^9}, {3.444483920429*^9, 3.4444839412237997`*^9}, 3.4444842905546*^9, {3.4444843207406*^9, 3.4444844162282*^9}, { 3.4444844465078*^9, 3.4444844624354*^9}, {3.4444845255998*^9, 3.4444845894505997`*^9}, {3.4444846290746*^9, 3.444484933025*^9}, { 3.4444849790917997`*^9, 3.4444851148742*^9}, {3.444534936054*^9, 3.4445349675348*^9}, {3.4445355821731997`*^9, 3.44453585174*^9}, { 3.4445372162198*^9, 3.4445372264378*^9}, 3.444537384731*^9, { 3.4445377585382*^9, 3.4445377605818*^9}, {3.4445379733658*^9, 3.4445379736934*^9}, {3.4445380176762*^9, 3.444538032777*^9}, { 3.4445381079222*^9, 3.4445381581386003`*^9}, {3.4445382726456003`*^9, 3.4445382910067997`*^9}, {3.4445383401312*^9, 3.4445383475880003`*^9}, { 3.444538438458*^9, 3.4445384464608*^9}, {3.4445385680783997`*^9, 3.4445385687648*^9}, {3.4445389411991997`*^9, 3.4445389431024*^9}, { 3.444539746605*^9, 3.4445397807846003`*^9}, {3.4445408839765997`*^9, 3.4445409234133997`*^9}, {3.4445409681698*^9, 3.4445409932702*^9}, { 3.4445415452906*^9, 3.4445415706717997`*^9}, {3.4445416647242002`*^9, 3.4445416909477997`*^9}, {3.4445417660150003`*^9, 3.444541788557*^9}, { 3.4445420906977997`*^9, 3.444542104847*^9}, {3.4445421885878*^9, 3.4445421941414003`*^9}, {3.4445422252166*^9, 3.4445422386014*^9}, { 3.444542280425*^9, 3.4445423014538*^9}, {3.444542455769*^9, 3.4445424578282003`*^9}, {3.4445431739214*^9, 3.444543175809*^9}, { 3.4445647020962*^9, 3.4445648405618*^9}, {3.4445648825414*^9, 3.4445648858486*^9}, {3.4445649382646*^9, 3.4445651882702*^9}, { 3.4446164822206*^9, 3.4446165344494*^9}, {3.4446166121842003`*^9, 3.4446166738822002`*^9}, {3.4446167223046*^9, 3.4446168047974*^9}, { 3.444616843033*^9, 3.444616906447*^9}, {3.4446444694708*^9, 3.4446444700948*^9}, {3.4446477738310003`*^9, 3.4446477939862003`*^9}, { 3.4446478467298*^9, 3.4446478681018*^9}, 3.4446480456142*^9, { 3.4446487557418003`*^9, 3.4446487636198*^9}, 3.4446488179974003`*^9, { 3.4446488971205997`*^9, 3.4446489152478*^9}, {3.4446490003458*^9, 3.4446490008294*^9}, {3.4447042728942003`*^9, 3.4447042751562*^9}, { 3.4447044703278*^9, 3.4447044865362*^9}, 3.4447046475282*^9, 3.4447047993786*^9, {3.444704908329*^9, 3.4447049292642*^9}, { 3.4447049861926003`*^9, 3.4447049877214003`*^9}, {3.4447050279296*^9, 3.4447050419695997`*^9}, {3.4447053486656*^9, 3.4447053739376*^9}, 3.4447054561963997`*^9, 3.44470561612*^9, {3.4472133996876*^9, 3.4472134108571997`*^9}, {3.4472134470179996`*^9, 3.4472134648332*^9}, { 3.4472135032872*^9, 3.4472135245344*^9}, {3.4472136963059998`*^9, 3.4472137794384003`*^9}, {3.4472138235708*^9, 3.4472138388900003`*^9}, { 3.4472139099792*^9, 3.4472141367096*^9}, {3.447214202682*^9, 3.4472142975924*^9}, {3.4472144187732*^9, 3.4472145910284*^9}, { 3.4472146560492*^9, 3.4472147023968*^9}, {3.447214803594*^9, 3.4472148728736*^9}, {3.4472149156956*^9, 3.447214940484*^9}, { 3.447216227284*^9, 3.4472162419948*^9}, {3.4472163068908*^9, 3.4472163720832*^9}, {3.4472164665880003`*^9, 3.447216530392*^9}, { 3.4472166237268*^9, 3.4472167058452*^9}, 3.4472167362808*^9, { 3.4472171394658003`*^9, 3.4472171532874002`*^9}, {3.4472172028993998`*^9, 3.4472172216661997`*^9}, {3.4472172524606*^9, 3.4472172690278*^9}, { 3.4472173209133997`*^9, 3.4472173334245996`*^9}, {3.4472173920846*^9, 3.447217404861*^9}, {3.4472179572548*^9, 3.4472180351456003`*^9}, { 3.4472509764091997`*^9, 3.4472511017396*^9}, {3.4473910422216*^9, 3.4473912901524*^9}, 3.4473918688344*^9, {3.447392021185*^9, 3.4473920346633997`*^9}, {3.4473921383304*^9, 3.4473921479088*^9}, { 3.4473923024112*^9, 3.4473923734379997`*^9}, {3.4473928098168*^9, 3.4473928648691998`*^9}, {3.4473931872432003`*^9, 3.4473932461800003`*^9}, {3.4473933026675997`*^9, 3.4473934579812*^9}, { 3.4473935755271997`*^9, 3.447393742572*^9}, {3.4473939032676*^9, 3.4473939384144*^9}, {3.447395257644*^9, 3.4473953141628*^9}, { 3.4473954231132*^9, 3.4473954756384*^9}, {3.4473955348716*^9, 3.4473955723272*^9}, {3.447395648502*^9, 3.4473957588876*^9}, { 3.4473957903996*^9, 3.4473958488372*^9}, 3.4473962894154*^9, { 3.447396350817*^9, 3.447396352611*^9}, {3.4474625379146*^9, 3.4474625637326*^9}, {3.558360651728078*^9, 3.558360652102478*^9}, { 3.5619791319820857`*^9, 3.561979135788492*^9}, 3.561979369382504*^9, { 3.5619794930439215`*^9, 3.5619795010155354`*^9}, {3.561979569218855*^9, 3.56197960614412*^9}, {3.5619797417551584`*^9, 3.5619797448751636`*^9}, { 3.618719065033702*^9, 3.618719075426296*^9}, {3.6187194011669273`*^9, 3.6187194449454317`*^9}, {3.6187196998040085`*^9, 3.6187197102436056`*^9}, {3.618719902254588*^9, 3.6187199711455283`*^9}, { 3.618722365406472*^9, 3.6187225412555304`*^9}, {3.6187226885009522`*^9, 3.6187227109872384`*^9}, {3.618722756922866*^9, 3.6187231317203026`*^9}, { 3.618723424250035*^9, 3.6187234267291765`*^9}, {3.6187235105259695`*^9, 3.6187236491028957`*^9}, {3.618723691580325*^9, 3.618723745975436*^9}, { 3.618723778837316*^9, 3.6187238310002995`*^9}, {3.6187239055875654`*^9, 3.618723940035536*^9}, {3.6187239782667227`*^9, 3.6187240219352207`*^9}, { 3.618724166762504*^9, 3.618724177411113*^9}, {3.618729321696159*^9, 3.618729328067523*^9}, 3.618729374058154*^9, {3.6187294379838104`*^9, 3.618729708464281*^9}, {3.6187297631904106`*^9, 3.618729773195983*^9}, { 3.618729822648812*^9, 3.6187299321490746`*^9}, {3.618729984399063*^9, 3.61873000654133*^9}, {3.6187300746012225`*^9, 3.6187300860458775`*^9}, { 3.618731390835507*^9, 3.6187315116174154`*^9}, {3.618731747324897*^9, 3.6187318214091344`*^9}, {3.6187318769243097`*^9, 3.618732065297084*^9}, { 3.6187321012351394`*^9, 3.618732157420353*^9}, {3.618732188384124*^9, 3.6187322435542793`*^9}, {3.6187322786112847`*^9, 3.6187325478446836`*^9}, {3.6187325819856367`*^9, 3.6187326817653437`*^9}, {3.618732810863728*^9, 3.61873282594359*^9}, { 3.6187336474335766`*^9, 3.618733754678711*^9}, {3.618733827497876*^9, 3.61873396201257*^9}, {3.6187342020362988`*^9, 3.618734236455267*^9}, 3.618734298201799*^9, {3.618734712498495*^9, 3.618734712716508*^9}, 3.6187347739640107`*^9, {3.618738817361748*^9, 3.6187388333816643`*^9}, { 3.6187391349349127`*^9, 3.6187391457955337`*^9}, {3.618739376900752*^9, 3.618739397023903*^9}, {3.618739528394417*^9, 3.618739534809784*^9}, { 3.618739972366811*^9, 3.61873997340687*^9}, {3.6187400416617737`*^9, 3.618740043022852*^9}, {3.6187400971579485`*^9, 3.618740107902563*^9}, { 3.6187401713671927`*^9, 3.6187401723312483`*^9}, {3.6187402613443394`*^9, 3.618740268819767*^9}, {3.6187403697625403`*^9, 3.6187404057615995`*^9}, { 3.618740488277319*^9, 3.618740516244919*^9}, {3.618740647782442*^9, 3.6187406551668644`*^9}, 3.6187407823021364`*^9, {3.6187418050786357`*^9, 3.618741805749674*^9}, {3.6187418557605343`*^9, 3.6187419895921893`*^9}, { 3.618742022944097*^9, 3.61874204379729*^9}, {3.6187420836395683`*^9, 3.618742103384698*^9}, {3.620462440882641*^9, 3.6204624460519366`*^9}, { 3.6204624990259666`*^9, 3.620462576450395*^9}, {3.620463682857678*^9, 3.620463713336421*^9}, 3.6204637901188126`*^9, {3.620464238835478*^9, 3.62046424411378*^9}, 3.628912429385081*^9, {3.6289135207155013`*^9, 3.6289135210805225`*^9}, 3.6289497746958513`*^9, 3.6289498371774254`*^9, { 3.62894988410911*^9, 3.6289500319795675`*^9}, {3.6289501333883677`*^9, 3.628950183744248*^9}, {3.6289503323017445`*^9, 3.628950390181055*^9}, { 3.6289505050536256`*^9, 3.6289505113579865`*^9}, {3.62895070863527*^9, 3.6289507095043197`*^9}, {3.628951013180689*^9, 3.62895101407374*^9}, { 3.629190743153632*^9, 3.629190816645361*^9}, {3.6291909709608326`*^9, 3.629190981678051*^9}, {3.629191034624544*^9, 3.6291910410049553`*^9}, { 3.6293846391370816`*^9, 3.629384641102685*^9}, {3.6294628543371735`*^9, 3.629462867097191*^9}, {3.629468063172048*^9, 3.6294681151669397`*^9}, { 3.6295205836757097`*^9, 3.6295206295085897`*^9}, {3.6295206788826766`*^9, 3.6295207067911253`*^9}, {3.6295207408927855`*^9, 3.629520753700408*^9}, { 3.629521020590745*^9, 3.6295210354395943`*^9}, {3.6295211107369013`*^9, 3.62952114882508*^9}, {3.6295212327348795`*^9, 3.6295212477237363`*^9}, { 3.6295213424816394`*^9, 3.629521343230441*^9}, {3.6295215363119802`*^9, 3.6295216753550243`*^9}, {3.629521922272258*^9, 3.6295219939855833`*^9}, { 3.6295220298188467`*^9, 3.629522446058778*^9}, {3.629522499348471*^9, 3.629522604352256*^9}, {3.629522755188921*^9, 3.62952288580795*^9}, { 3.629522918084407*^9, 3.6295233421087513`*^9}, {3.6295233808436193`*^9, 3.629523390936837*^9}, {3.629523424274096*^9, 3.6295234533369465`*^9}, { 3.6295235190130625`*^9, 3.629523521680667*^9}, 3.6295235894315863`*^9, { 3.6295237270706277`*^9, 3.629523799454755*^9}, {3.6295238514808464`*^9, 3.629523883460902*^9}, {3.6295239376085978`*^9, 3.6295239442386093`*^9}, { 3.6295241089904985`*^9, 3.629524177537019*^9}, 3.629524211888279*^9, { 3.629524277423994*^9, 3.629524396904604*^9}, {3.6295244794839497`*^9, 3.6295246248450055`*^9}, 3.629524657090262*^9, {3.6295259599109507`*^9, 3.629526013465844*^9}, {3.6295261092188125`*^9, 3.629526201414974*^9}, 3.6295263436092243`*^9, {3.6295263910333076`*^9, 3.629526583303645*^9}, { 3.629526616672104*^9, 3.629526647653758*^9}, {3.629526687558628*^9, 3.629526744888729*^9}, {3.629526804075233*^9, 3.6295268598453307`*^9}, { 3.6295269393898706`*^9, 3.6295269586559043`*^9}, {3.6295271490074387`*^9, 3.6295272149019547`*^9}, {3.6295272553684254`*^9, 3.6295272827620735`*^9}, {3.6295274137087035`*^9, 3.6295274761244135`*^9}, {3.6295275252801*^9, 3.6295279912529182`*^9}, { 3.6295281572216096`*^9, 3.629528160435215*^9}, {3.6295282905550437`*^9, 3.6295284308616905`*^9}, 3.6295285402022824`*^9, {3.629528582088356*^9, 3.629528616798417*^9}, {3.6295287666834803`*^9, 3.6295290316343455`*^9}, { 3.629529086515242*^9, 3.629529118432898*^9}, {3.6295291548121614`*^9, 3.629529292794404*^9}, {3.6295293426208916`*^9, 3.6295293491261034`*^9}, { 3.629529420699029*^9, 3.629529571535694*^9}, {3.6295296539506383`*^9, 3.629529656103442*^9}, {3.6295296894407005`*^9, 3.629529692295506*^9}, { 3.6295297445555973`*^9, 3.629529766426836*^9}, {3.6295298053333044`*^9, 3.6295298209489317`*^9}, {3.6295308380551186`*^9, 3.6295308386635194`*^9}, {3.629532377840223*^9, 3.6295323811630287`*^9}, { 3.629532480020402*^9, 3.629532482454006*^9}, {3.629532520720874*^9, 3.629532564619351*^9}, {3.62953259842461*^9, 3.6295326002654133`*^9}, { 3.6295326327758703`*^9, 3.6295326715107384`*^9}, {3.629532742428463*^9, 3.6295328288058147`*^9}, {3.6295329692184625`*^9, 3.6295330530062094`*^9}, {3.6295331824396367`*^9, 3.629533193562456*^9}, 3.6295350321720915`*^9, 3.629535158485513*^9, {3.629535245471266*^9, 3.6295352687465067`*^9}, {3.62953541293756*^9, 3.629535446384019*^9}, { 3.6295355043381205`*^9, 3.6295355262249594`*^9}, {3.629543790136781*^9, 3.629543791181983*^9}, {3.629543871350524*^9, 3.629544001673153*^9}, { 3.6295446682009234`*^9, 3.629544668466124*^9}, {3.6296010216162376`*^9, 3.6296010236442413`*^9}, {3.629601079336339*^9, 3.6296010902875586`*^9}, 3.6296011425476503`*^9, {3.6296043522397404`*^9, 3.629604399031022*^9}, { 3.629623884428093*^9, 3.629623914723346*^9}, {3.6296239662190366`*^9, 3.6296239738006496`*^9}, {3.6296240514731865`*^9, 3.6296240920176573`*^9}, {3.629624125947717*^9, 3.629624369432945*^9}, { 3.6296256512247963`*^9, 3.6296256817072496`*^9}, {3.6296260472626915`*^9, 3.629626047434292*^9}, {3.629628055568204*^9, 3.629628056098605*^9}, { 3.6296280911206665`*^9, 3.6296281088266973`*^9}, {3.6296281406819534`*^9, 3.629628273032586*^9}, {3.629628378831972*^9, 3.6296283814995766`*^9}, { 3.629628459562114*^9, 3.629628466379326*^9}, {3.629628519419419*^9, 3.6296285390754533`*^9}, {3.629633008133008*^9, 3.629633008835009*^9}, { 3.6296337764967575`*^9, 3.6296338344040594`*^9}, {3.6296342997684765`*^9, 3.629634432150309*^9}, {3.629634494035618*^9, 3.6296345320060844`*^9}, { 3.629634594499794*^9, 3.629634812182576*^9}, {3.6296348599810605`*^9, 3.6296348746918864`*^9}, {3.6296349071867433`*^9, 3.629635023172947*^9}, 3.6296350995818815`*^9, {3.6296363797201295`*^9, 3.6296363868961425`*^9}, { 3.629636462025874*^9, 3.6296364833355117`*^9}, {3.629636555922439*^9, 3.62963656780966*^9}, {3.629636770469616*^9, 3.629636774151222*^9}, { 3.6296369192782774`*^9, 3.6296369318830996`*^9}, {3.629637058539722*^9, 3.6296370719401455`*^9}, {3.629637278172508*^9, 3.629637286814923*^9}, { 3.6296376418091464`*^9, 3.629637662385583*^9}, {3.629637773551378*^9, 3.629637795360216*^9}, {3.6296390041751394`*^9, 3.629639039571602*^9}, 3.6296393829750047`*^9, {3.6296395546065063`*^9, 3.6296395649961243`*^9}, { 3.62964113386068*^9, 3.6296412507048855`*^9}, {3.629641303167777*^9, 3.629641313744596*^9}, {3.6296416285116315`*^9, 3.629641628886032*^9}, { 3.6296416658736973`*^9, 3.6296416815049243`*^9}, 3.6296417376338234`*^9, { 3.6296855551269727`*^9, 3.6296855804270077`*^9}, {3.6297079065796247`*^9, 3.6297079070476255`*^9}, {3.6297080850439377`*^9, 3.629708135728427*^9}, { 3.6297083496516027`*^9, 3.6297084025512953`*^9}, {3.629708781767563*^9, 3.629708790940379*^9}, {3.6297089402482414`*^9, 3.6297089618542795`*^9}, { 3.6297105345398417`*^9, 3.629710538580249*^9}, {3.6297107810514746`*^9, 3.6297107850138817`*^9}, {3.6297109100481014`*^9, 3.629710915710911*^9}, { 3.629711201534613*^9, 3.629711204311418*^9}, {3.629711236307074*^9, 3.6297115007275386`*^9}, {3.6297115377464037`*^9, 3.6297115441112146`*^9}, 3.6297116025645175`*^9, {3.6298716505389357`*^9, 3.629871851841689*^9}, { 3.62987837458679*^9, 3.629878383510006*^9}, {3.6298784402629056`*^9, 3.629878447345318*^9}, {3.6298785221786494`*^9, 3.6298786580236883`*^9}, { 3.629878689613744*^9, 3.629878737147027*^9}, 3.629878783853509*^9, { 3.629878832322794*^9, 3.6298789171723433`*^9}, {3.6298802128122005`*^9, 3.6298802929723125`*^9}, 3.6298813644148126`*^9, {3.629882428887303*^9, 3.629882435887313*^9}, {3.6298986251827383`*^9, 3.6298988530367384`*^9}, { 3.6298989036744275`*^9, 3.6298989486493063`*^9}, {3.629899016868226*^9, 3.6298991622448816`*^9}, {3.6298997154530535`*^9, 3.629899740147897*^9}, { 3.6298998248560457`*^9, 3.629899978048314*^9}, {3.6299000396372223`*^9, 3.6299001557638264`*^9}, {3.6299001966826982`*^9, 3.6299002595352087`*^9}, 3.6299005011236343`*^9, {3.6299005468317146`*^9, 3.629900567642151*^9}, { 3.629900887676713*^9, 3.629900990153293*^9}, {3.6299011689220085`*^9, 3.6299012295125146`*^9}, {3.6299013754039707`*^9, 3.6299014166036434`*^9}, 3.6299014589733176`*^9, {3.6299015096734066`*^9, 3.629901588765546*^9}, { 3.629901662569275*^9, 3.6299016974665365`*^9}, {3.629901952339784*^9, 3.6299019599057975`*^9}, 3.6299020306051216`*^9, {3.6299022330934772`*^9, 3.6299022682559395`*^9}, {3.6299023020455985`*^9, 3.629902332808852*^9}, { 3.6299024532566643`*^9, 3.629902462850681*^9}, {3.629949880225117*^9, 3.6299498807867184`*^9}, {3.6299503101150723`*^9, 3.6299503156998825`*^9}, {3.629950355058751*^9, 3.629950498937804*^9}, { 3.6299555415202007`*^9, 3.6299555507086167`*^9}, {3.6299556061667137`*^9, 3.6299557553497763`*^9}, {3.629955788499834*^9, 3.6299558948608212`*^9}, { 3.629956042764681*^9, 3.629956043809883*^9}, {3.6299560914211664`*^9, 3.6299561017327843`*^9}, 3.629956145849662*^9, {3.6299584813821354`*^9, 3.6299585082765827`*^9}, 3.6299585652946825`*^9, {3.629958616587573*^9, 3.6299586356508064`*^9}, {3.629958715073346*^9, 3.6299588186419287`*^9}, { 3.629958857454797*^9, 3.629958927249319*^9}, {3.629959427994599*^9, 3.629959494669116*^9}, {3.6299595293323765`*^9, 3.6299596037913074`*^9}, { 3.62995966795422*^9, 3.62995967360143*^9}, {3.6299597835972233`*^9, 3.6299597841120243`*^9}, {3.629959826622099*^9, 3.629959862533362*^9}, { 3.6299599051682367`*^9, 3.6299599235918694`*^9}, 3.629959979939168*^9, { 3.6299601345354395`*^9, 3.62996014612626*^9}, 3.6299601769831142`*^9, { 3.629960253142448*^9, 3.629960269538077*^9}, {3.6299603041701374`*^9, 3.6299603078205442`*^9}, {3.6299604300467587`*^9, 3.629960435491168*^9}, { 3.6299605300585346`*^9, 3.6299605636609936`*^9}, {3.6299606195870914`*^9, 3.6299606581971593`*^9}, {3.629960824228251*^9, 3.6299608755367413`*^9}, { 3.629960906658796*^9, 3.6299609978409557`*^9}, {3.6299610312250147`*^9, 3.629961070646284*^9}, {3.629961135698398*^9, 3.6299611643088484`*^9}, { 3.6299720458358483`*^9, 3.6299721791536827`*^9}, {3.6299722439717965`*^9, 3.629972300007095*^9}, {3.6299723670872126`*^9, 3.6299723937008595`*^9}, { 3.629972457801372*^9, 3.6299724710613956`*^9}, {3.629972740193068*^9, 3.6299728251196175`*^9}, {3.6299729203577843`*^9, 3.6299729350218105`*^9}, {3.6299729720874753`*^9, 3.6299730462188053`*^9}, {3.629973116044528*^9, 3.6299731230177402`*^9}, { 3.629973184310248*^9, 3.6299732090830917`*^9}, {3.629973349982539*^9, 3.6299734360166903`*^9}, 3.629973534562063*^9, {3.629973577446539*^9, 3.629973586104554*^9}, {3.6299740374133463`*^9, 3.629974083823428*^9}, { 3.6299742505565205`*^9, 3.629974337089873*^9}, {3.629974382907153*^9, 3.6299744466176653`*^9}, {3.629974589794717*^9, 3.629974590761918*^9}, { 3.629974776215044*^9, 3.6299747850134597`*^9}, {3.6299748226095257`*^9, 3.6299748237483273`*^9}, 3.6299748618435946`*^9, {3.629975198476586*^9, 3.6299752545898843`*^9}, {3.62997531475919*^9, 3.6299753175515947`*^9}, { 3.6299754601982455`*^9, 3.6299754625382495`*^9}, {3.629975592034077*^9, 3.629975592502078*^9}, {3.629983277446268*^9, 3.6299832946842985`*^9}, { 3.62998342081052*^9, 3.6299835439883366`*^9}, {3.629983615514462*^9, 3.629983931009416*^9}, {3.6299919807040443`*^9, 3.6299919808912444`*^9}, { 3.629992028330928*^9, 3.6299920922130404`*^9}, 3.629992198480427*^9, { 3.6299922299300823`*^9, 3.629992250506518*^9}, {3.629992292657792*^9, 3.6299923603151107`*^9}, {3.6299924387676487`*^9, 3.6299924398440504`*^9}, {3.6299925764846907`*^9, 3.6299926096347485`*^9}, {3.6299928122323046`*^9, 3.629992818768716*^9}, { 3.6299929049120674`*^9, 3.629992905411268*^9}, {3.6299929850338078`*^9, 3.6299929866250105`*^9}, {3.6299931061992207`*^9, 3.62999312270405*^9}, { 3.629993172312137*^9, 3.6299932618718944`*^9}, {3.6299933276572104`*^9, 3.6299933842073092`*^9}, {3.6302476464502306`*^9, 3.6302477023607283`*^9}, {3.630247749738012*^9, 3.6302479456119556`*^9}, { 3.630247987076829*^9, 3.6302480916126122`*^9}, {3.6302481317670827`*^9, 3.630248155245124*^9}, {3.6302481927163897`*^9, 3.63024823257446*^9}, { 3.6302869660869403`*^9, 3.6302871959065437`*^9}, {3.6302872330814095`*^9, 3.630287236560216*^9}, {3.630287274421482*^9, 3.6302874119357233`*^9}, { 3.6302874551009994`*^9, 3.6302874699990253`*^9}, {3.6302875003722787`*^9, 3.6302877505343184`*^9}, {3.63038960251799*^9, 3.630389603672392*^9}, { 3.630808954640574*^9, 3.6308089697374372`*^9}, {3.6308090558753643`*^9, 3.63080905807349*^9}, {3.633681137596347*^9, 3.6336812675647807`*^9}, { 3.633692346227066*^9, 3.6336923608039*^9}, {3.6336924823428516`*^9, 3.633692482984888*^9}, {3.6336927709053564`*^9, 3.633692779378841*^9}, { 3.635474649291499*^9, 3.6354747135141726`*^9}, {3.635474757347679*^9, 3.635474767084236*^9}, {3.7326781791979923`*^9, 3.7326782541070137`*^9}, { 3.732678384546839*^9, 3.732678387154627*^9}, {3.7326784528278866`*^9, 3.7326784536419926`*^9}, {3.7326785658888392`*^9, 3.732678606948255*^9}, { 3.7326786429394207`*^9, 3.732678671328236*^9}, 3.7326787139495087`*^9, 3.7326824710029726`*^9, {3.732682535085518*^9, 3.7326825394060144`*^9}, { 3.732788367344186*^9, 3.7327883679512634`*^9}, {3.733659479173915*^9, 3.733659479686716*^9}, {3.733659736778194*^9, 3.733659738223981*^9}, { 3.733660235678305*^9, 3.7336603371354585`*^9}, {3.733660451788246*^9, 3.733660466320716*^9}, {3.733660509132059*^9, 3.7336605685538363`*^9}, 3.7336606346231527`*^9, {3.7336606902677946`*^9, 3.7336607839480886`*^9}, { 3.7336608179615364`*^9, 3.7336608319530153`*^9}, {3.733660881327427*^9, 3.733660897330119*^9}, {3.7336609300986814`*^9, 3.7336609594994287`*^9}, { 3.73366136360488*^9, 3.733661402781823*^9}, {3.733661450979083*^9, 3.7336615506703176`*^9}, {3.733661609102705*^9, 3.7336616507411423`*^9}, { 3.7336616844880095`*^9, 3.7336616852837515`*^9}, 3.7336618066988688`*^9, { 3.7336620707975283`*^9, 3.7336621071155624`*^9}, {3.7337028629370823`*^9, 3.733703205450749*^9}, {3.733703243487465*^9, 3.7337032610824347`*^9}, { 3.733703298061898*^9, 3.7337033664147425`*^9}, {3.7337033982918806`*^9, 3.73370344248729*^9}, {3.7337034777924*^9, 3.7337035051606703`*^9}, { 3.733703582604458*^9, 3.733703668421293*^9}, 3.73370371853176*^9, { 3.7337039455508604`*^9, 3.7337039986094637`*^9}, 3.7337040398626404`*^9, { 3.733709014619094*^9, 3.733709032928876*^9}, {3.733710962294444*^9, 3.7337109655993176`*^9}, {3.7337116551468105`*^9, 3.7337116628867064`*^9}, {3.734177223332971*^9, 3.7341772262673383`*^9}, { 3.734177304096835*^9, 3.7341773117663164`*^9}, {3.7341773527732897`*^9, 3.7341774236892753`*^9}, {3.734177567269784*^9, 3.7341775896576233`*^9}, { 3.7341776260785637`*^9, 3.7341776336188316`*^9}, {3.7341776647735634`*^9, 3.734177725567827*^9}, {3.7341777815164194`*^9, 3.734177803193592*^9}, { 3.76372700789438*^9, 3.763727008977229*^9}, {3.826362782570422*^9, 3.8263628105149765`*^9}, {3.826362869553932*^9, 3.826362899896824*^9}, 3.826363328101153*^9, {3.840426739187541*^9, 3.840426900661952*^9}, { 3.8411217229845905`*^9, 3.8411217360480766`*^9}, {3.8411217736618304`*^9, 3.84112182564371*^9}, {3.8411218641628623`*^9, 3.8411221348500795`*^9}, { 3.8411222111856875`*^9, 3.8411224614927535`*^9}, {3.8411226025233316`*^9, 3.84112265659787*^9}, {3.841122702844118*^9, 3.8411227358089767`*^9}, { 3.841122767000372*^9, 3.841122789115695*^9}, {3.8411228263291655`*^9, 3.841122840147561*^9}, {3.8411229052717075`*^9, 3.8411229596287527`*^9}, { 3.8411230527118196`*^9, 3.841123112582203*^9}, 3.8411231449179096`*^9, 3.8411234197043743`*^9, {3.8411252927002463`*^9, 3.8411252949718075`*^9}, { 3.841128200732338*^9, 3.841128200920005*^9}, {3.841128712216941*^9, 3.8411287125067186`*^9}, {3.841133254755392*^9, 3.8411332882095027`*^9}, { 3.8411333562672715`*^9, 3.8411333591533422`*^9}, {3.841134926084315*^9, 3.8411349277121115`*^9}, {3.841134957993024*^9, 3.841135019642999*^9}, 3.8448244774776583`*^9},ExpressionUUID->"88c3f936-3b11-434c-bb05-\ 97e011bf5282"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["SOLID MODEL", "Section", CellChangeTimes->{ 3.4430806364968*^9, {3.4453166713873997`*^9, 3.4453166747414*^9}, { 3.447462264275*^9, 3.4474622644154*^9}, {3.4695731321116*^9, 3.4695731359491997`*^9}, 3.473055186341*^9, {3.4730552472860003`*^9, 3.47305524884*^9}, {3.473055399782*^9, 3.473055419801*^9}, { 3.4734696760778*^9, 3.4734697047349997`*^9}, {3.4770537891542*^9, 3.4770537950354*^9}, {3.4932799754514*^9, 3.4932799779161997`*^9}, { 3.4945558951644*^9, 3.4945558957416*^9}, {3.4957646303032*^9, 3.4957646329084*^9}, {3.497581602118*^9, 3.4975816042552*^9}, { 3.500960505817*^9, 3.5009605094206*^9}, {3.556623836083009*^9, 3.5566238462386265`*^9}, {3.5568725055395393`*^9, 3.5568725163821597`*^9}, {3.556872678728445*^9, 3.5568726810485783`*^9}, { 3.7323376045620503`*^9, 3.7323376086812124`*^9}, {3.7335630623483887`*^9, 3.733563072583865*^9}, {3.733563130246215*^9, 3.733563131355714*^9}, { 3.817531746848799*^9, 3.817531749407099*^9}},ExpressionUUID->"ccf8b197-f437-4be7-a518-\ 6e1f1f2ea080"], Cell[CellGroupData[{ Cell["SOLID ELEMENT (disp) defs ", "Subsection", CellChangeTimes->{{3.629430162287647*^9, 3.6294301631768484`*^9}, { 3.7575037777673283`*^9, 3.7575037833217053`*^9}, {3.7884237836971426`*^9, 3.7884237842050157`*^9}},ExpressionUUID->"6bf300f2-b919-4630-b02f-\ 5e8f2a256dfd"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MEC", "-", "E1050"}], "|", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "ns", ",", "NN", ",", "r", ",", "FF", ",", "PP", ",", "uvw", ",", "\[Phi]\[Theta]\[Psi]", ",", "Duvw", ",", "\[Sigma]\[Sigma]", ",", "\[Sigma]", ",", "\[Rho]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "EEEE", ",", "\[Delta]w\[Sigma]", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "e", ",", "ee", ",", "\[Epsilon]", ",", "EM", ",", "GM", ",", "GG", ",", "nl", ",", "jac", ",", "FFINV"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]", "-", "\[Gamma]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"Transpose", "[", RowBox[{"D", "[", RowBox[{"r", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}], "}"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "approximations", "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", " ", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacement", " ", "gradient"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"Transpose", "[", RowBox[{"D", "[", RowBox[{"uvw", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}], "}"}]}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"IdentityMatrix", "[", "3", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", " ", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "GG"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "/", "GG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"1", "/", "GG"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TET5", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], "}"}], ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "n1_", ",", "n2_", ",", "n3_", ",", "n4_", ",", "n5_", ",", "n6_", ",", "n7_", ",", "n8_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "n1", ",", "n2", ",", "n3", ",", "n4", ",", "n5", ",", "n6", ",", "n7", ",", "n8"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "n1_", ",", "n2_", ",", "n3_", ",", "n4_", ",", "n5_", ",", "n6_", ",", "n7_", ",", "n8_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r", ",", "FF", ",", "PP", ",", "uvw", ",", "\[Sigma]", ",", "EEEE", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "GG", ",", "jac", ",", "FFINV", ",", "\[Epsilon]", ",", "\[Delta]wext", ",", "\[Delta]wint"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{ "n1", ",", "n2", ",", "n3", ",", "n4", ",", "n5", ",", "n6", ",", "n7", ",", "n8"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]", RowBox[{"(", RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]", RowBox[{"(", RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}], "\[Gamma]"}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}], "\[Gamma]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]", " ", "\[Gamma]"}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]", " ", "\[Gamma]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{ RowBox[{"Transpose", "[", RowBox[{"D", "[", RowBox[{"r", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}], "}"}]}], "]"}], "]"}], "/.", " ", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", " ", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Gamma]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacement", " ", "gradient"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"Transpose", "[", RowBox[{"D", "[", RowBox[{"uvw", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}], "}"}]}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"IdentityMatrix", "[", "3", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "GG"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "/", "GG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"1", "/", "GG"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"HEX27", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"non", "-", RowBox[{"symmetric", " ", "formulation"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "ns", ",", "NN", ",", "r", ",", "FF", ",", "FFINV", ",", "jac", ",", "PP", ",", "uvw", ",", "\[Phi]\[Theta]\[Psi]", ",", "Duvw", ",", "\[Sigma]\[Sigma]", ",", "\[Sigma]", ",", "\[Rho]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "EEEE", ",", "\[Delta]w\[Sigma]", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "GG", ",", "nl", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Epsilon]"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]", "-", "\[Gamma]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"Transpose", "[", RowBox[{"D", "[", RowBox[{"r", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}], "}"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"PP", "=", RowBox[{"LeviCivitaTensor", "[", "3", "]"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]\[Theta]\[Psi]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacement", " ", "gradient"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{ RowBox[{"FFINV", ".", RowBox[{"Transpose", "[", RowBox[{"D", "[", RowBox[{"uvw", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}], "}"}]}], "]"}], "]"}]}], "-", RowBox[{"PP", ".", "\[Phi]\[Theta]\[Psi]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"IdentityMatrix", "[", "3", "]"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "+", "\[Nu]\[Nu]"}], ")"}]}], "*", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], "]"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"nonsymmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "\[Phi]\[Theta]\[Psi]", "]"}], ".", RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TET5", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.4426474258030453`*^9, {3.4444401255942*^9, 3.4444401388073997`*^9}, { 3.4444401803034*^9, 3.4444401844062*^9}, 3.4444402418922*^9, { 3.4444402805022*^9, 3.4444403134026003`*^9}, {3.4444403443062*^9, 3.4444404484049997`*^9}, {3.444483267101*^9, 3.444483267335*^9}, { 3.4444833136046*^9, 3.4444835622998*^9}, {3.4444836421094*^9, 3.4444837777981997`*^9}, {3.444483920429*^9, 3.4444839412237997`*^9}, 3.4444842905546*^9, {3.4444843207406*^9, 3.4444844162282*^9}, { 3.4444844465078*^9, 3.4444844624354*^9}, {3.4444845255998*^9, 3.4444845894505997`*^9}, {3.4444846290746*^9, 3.444484933025*^9}, { 3.4444849790917997`*^9, 3.4444851148742*^9}, {3.444534936054*^9, 3.4445349675348*^9}, {3.4445355821731997`*^9, 3.44453585174*^9}, { 3.4445372162198*^9, 3.4445372264378*^9}, 3.444537384731*^9, { 3.4445377585382*^9, 3.4445377605818*^9}, {3.4445379733658*^9, 3.4445379736934*^9}, {3.4445380176762*^9, 3.444538032777*^9}, { 3.4445381079222*^9, 3.4445381581386003`*^9}, {3.4445382726456003`*^9, 3.4445382910067997`*^9}, {3.4445383401312*^9, 3.4445383475880003`*^9}, { 3.444538438458*^9, 3.4445384464608*^9}, {3.4445385680783997`*^9, 3.4445385687648*^9}, {3.4445389411991997`*^9, 3.4445389431024*^9}, { 3.444539746605*^9, 3.4445397807846003`*^9}, {3.4445408839765997`*^9, 3.4445409234133997`*^9}, {3.4445409681698*^9, 3.4445409932702*^9}, { 3.4445415452906*^9, 3.4445415706717997`*^9}, {3.4445416647242002`*^9, 3.4445416909477997`*^9}, {3.4445417660150003`*^9, 3.444541788557*^9}, { 3.4445420906977997`*^9, 3.444542104847*^9}, {3.4445421885878*^9, 3.4445421941414003`*^9}, {3.4445422252166*^9, 3.4445422386014*^9}, { 3.444542280425*^9, 3.4445423014538*^9}, {3.444542455769*^9, 3.4445424578282003`*^9}, {3.4445431739214*^9, 3.444543175809*^9}, { 3.4445647020962*^9, 3.4445648405618*^9}, {3.4445648825414*^9, 3.4445648858486*^9}, {3.4445649382646*^9, 3.4445651882702*^9}, { 3.4446164822206*^9, 3.4446165344494*^9}, {3.4446166121842003`*^9, 3.4446166738822002`*^9}, {3.4446167223046*^9, 3.4446168047974*^9}, { 3.444616843033*^9, 3.444616906447*^9}, {3.4446444694708*^9, 3.4446444700948*^9}, {3.4446477738310003`*^9, 3.4446477939862003`*^9}, { 3.4446478467298*^9, 3.4446478681018*^9}, 3.4446480456142*^9, { 3.4446487557418003`*^9, 3.4446487636198*^9}, 3.4446488179974003`*^9, { 3.4446488971205997`*^9, 3.4446489152478*^9}, {3.4446490003458*^9, 3.4446490008294*^9}, {3.4447042728942003`*^9, 3.4447042751562*^9}, { 3.4447044703278*^9, 3.4447044865362*^9}, 3.4447046475282*^9, 3.4447047993786*^9, {3.444704908329*^9, 3.4447049292642*^9}, { 3.4447049861926003`*^9, 3.4447049877214003`*^9}, {3.4447050279296*^9, 3.4447050419695997`*^9}, {3.4447053486656*^9, 3.4447053739376*^9}, 3.4447054561963997`*^9, 3.44470561612*^9, {3.4472133996876*^9, 3.4472134108571997`*^9}, {3.4472134470179996`*^9, 3.4472134648332*^9}, { 3.4472135032872*^9, 3.4472135245344*^9}, {3.4472136963059998`*^9, 3.4472137794384003`*^9}, {3.4472138235708*^9, 3.4472138388900003`*^9}, { 3.4472139099792*^9, 3.4472141367096*^9}, {3.447214202682*^9, 3.4472142975924*^9}, {3.4472144187732*^9, 3.4472145910284*^9}, { 3.4472146560492*^9, 3.4472147023968*^9}, {3.447214803594*^9, 3.4472148728736*^9}, {3.4472149156956*^9, 3.447214940484*^9}, { 3.447216227284*^9, 3.4472162419948*^9}, {3.4472163068908*^9, 3.4472163720832*^9}, {3.4472164665880003`*^9, 3.447216530392*^9}, { 3.4472166237268*^9, 3.4472167058452*^9}, 3.4472167362808*^9, { 3.4472171394658003`*^9, 3.4472171532874002`*^9}, {3.4472172028993998`*^9, 3.4472172216661997`*^9}, {3.4472172524606*^9, 3.4472172690278*^9}, { 3.4472173209133997`*^9, 3.4472173334245996`*^9}, {3.4472173920846*^9, 3.447217404861*^9}, {3.4472179572548*^9, 3.4472180351456003`*^9}, { 3.4472509764091997`*^9, 3.4472511017396*^9}, {3.4473910422216*^9, 3.4473912901524*^9}, 3.4473918688344*^9, {3.447392021185*^9, 3.4473920346633997`*^9}, {3.4473921383304*^9, 3.4473921479088*^9}, { 3.4473923024112*^9, 3.4473923734379997`*^9}, {3.4473928098168*^9, 3.4473928648691998`*^9}, {3.4473931872432003`*^9, 3.4473932461800003`*^9}, {3.4473933026675997`*^9, 3.4473934579812*^9}, { 3.4473935755271997`*^9, 3.447393742572*^9}, {3.4473939032676*^9, 3.4473939384144*^9}, {3.447395257644*^9, 3.4473953141628*^9}, { 3.4473954231132*^9, 3.4473954756384*^9}, {3.4473955348716*^9, 3.4473955723272*^9}, {3.447395648502*^9, 3.4473957588876*^9}, { 3.4473957903996*^9, 3.4473958488372*^9}, 3.4473962894154*^9, { 3.447396350817*^9, 3.447396352611*^9}, {3.4474625379146*^9, 3.4474625637326*^9}, {3.558360651728078*^9, 3.558360652102478*^9}, { 3.5619791319820857`*^9, 3.561979135788492*^9}, 3.561979369382504*^9, { 3.5619794930439215`*^9, 3.5619795010155354`*^9}, {3.561979569218855*^9, 3.56197960614412*^9}, {3.5619797417551584`*^9, 3.5619797448751636`*^9}, { 3.618719065033702*^9, 3.618719075426296*^9}, {3.6187194011669273`*^9, 3.6187194449454317`*^9}, {3.6187196998040085`*^9, 3.6187197102436056`*^9}, {3.618719902254588*^9, 3.6187199711455283`*^9}, { 3.618722365406472*^9, 3.6187225412555304`*^9}, {3.6187226885009522`*^9, 3.6187227109872384`*^9}, {3.618722756922866*^9, 3.6187231317203026`*^9}, { 3.618723424250035*^9, 3.6187234267291765`*^9}, {3.6187235105259695`*^9, 3.6187236491028957`*^9}, {3.618723691580325*^9, 3.618723745975436*^9}, { 3.618723778837316*^9, 3.6187238310002995`*^9}, {3.6187239055875654`*^9, 3.618723940035536*^9}, {3.6187239782667227`*^9, 3.6187240219352207`*^9}, { 3.618724166762504*^9, 3.618724177411113*^9}, {3.618729321696159*^9, 3.618729328067523*^9}, 3.618729374058154*^9, {3.6187294379838104`*^9, 3.618729708464281*^9}, {3.6187297631904106`*^9, 3.618729773195983*^9}, { 3.618729822648812*^9, 3.6187299321490746`*^9}, {3.618729984399063*^9, 3.61873000654133*^9}, {3.6187300746012225`*^9, 3.6187300860458775`*^9}, { 3.618731390835507*^9, 3.6187315116174154`*^9}, {3.618731747324897*^9, 3.6187318214091344`*^9}, {3.6187318769243097`*^9, 3.618732065297084*^9}, { 3.6187321012351394`*^9, 3.618732157420353*^9}, {3.618732188384124*^9, 3.6187322435542793`*^9}, {3.6187322786112847`*^9, 3.6187325478446836`*^9}, {3.6187325819856367`*^9, 3.6187326817653437`*^9}, {3.618732810863728*^9, 3.61873282594359*^9}, { 3.6187336474335766`*^9, 3.618733754678711*^9}, {3.618733827497876*^9, 3.61873396201257*^9}, {3.6187342020362988`*^9, 3.618734236455267*^9}, 3.618734298201799*^9, {3.618734712498495*^9, 3.618734712716508*^9}, 3.6187347739640107`*^9, {3.618738817361748*^9, 3.6187388333816643`*^9}, { 3.6187391349349127`*^9, 3.6187391457955337`*^9}, {3.618739376900752*^9, 3.618739397023903*^9}, {3.618739528394417*^9, 3.618739534809784*^9}, { 3.618739972366811*^9, 3.61873997340687*^9}, {3.6187400416617737`*^9, 3.618740043022852*^9}, {3.6187400971579485`*^9, 3.618740107902563*^9}, { 3.6187401713671927`*^9, 3.6187401723312483`*^9}, {3.6187402613443394`*^9, 3.618740268819767*^9}, {3.6187403697625403`*^9, 3.6187404057615995`*^9}, { 3.618740488277319*^9, 3.618740516244919*^9}, {3.618740647782442*^9, 3.6187406551668644`*^9}, 3.6187407823021364`*^9, {3.6187418050786357`*^9, 3.618741805749674*^9}, {3.6187418557605343`*^9, 3.6187419895921893`*^9}, { 3.618742022944097*^9, 3.61874204379729*^9}, {3.6187420836395683`*^9, 3.618742103384698*^9}, {3.620462440882641*^9, 3.6204624460519366`*^9}, { 3.6204624990259666`*^9, 3.620462576450395*^9}, {3.620463682857678*^9, 3.620463713336421*^9}, 3.6204637901188126`*^9, {3.620464238835478*^9, 3.62046424411378*^9}, 3.628912429385081*^9, {3.6289135207155013`*^9, 3.6289135210805225`*^9}, 3.6289497746958513`*^9, 3.6289498371774254`*^9, { 3.62894988410911*^9, 3.6289500319795675`*^9}, {3.6289501333883677`*^9, 3.628950183744248*^9}, {3.6289503323017445`*^9, 3.628950390181055*^9}, { 3.6289505050536256`*^9, 3.6289505113579865`*^9}, {3.62895070863527*^9, 3.6289507095043197`*^9}, {3.628951013180689*^9, 3.62895101407374*^9}, { 3.629190743153632*^9, 3.629190816645361*^9}, {3.6291909709608326`*^9, 3.629190981678051*^9}, {3.629191034624544*^9, 3.6291910410049553`*^9}, { 3.6293846391370816`*^9, 3.629384641102685*^9}, 3.6294302231277533`*^9, 3.629430298397886*^9, {3.6294304452097435`*^9, 3.6294304461769457`*^9}, 3.629430512991863*^9, {3.629430631630071*^9, 3.6294306397264853`*^9}, { 3.629430697477787*^9, 3.629430801373969*^9}, {3.6294470005483365`*^9, 3.629447006658345*^9}, {3.6294476264402127`*^9, 3.62944766022026*^9}, { 3.629455940543494*^9, 3.6294559434734983`*^9}, {3.6294560037335825`*^9, 3.6294560722536783`*^9}, {3.6294561182137423`*^9, 3.629456154053793*^9}, { 3.6294562173438816`*^9, 3.629456291433985*^9}, 3.629456575994384*^9, { 3.6294571194161444`*^9, 3.629457325936434*^9}, {3.6294573681664925`*^9, 3.629457469696635*^9}, {3.630830822369603*^9, 3.630830833380233*^9}, { 3.6308308916105633`*^9, 3.630830892690625*^9}, {3.630830934683027*^9, 3.6308309652587757`*^9}, {3.630831001140828*^9, 3.6308310302394924`*^9}, { 3.6308311286591215`*^9, 3.6308311872784743`*^9}, {3.6308312724803476`*^9, 3.630831331484722*^9}, {3.630831362277484*^9, 3.630831473963872*^9}, { 3.6308315048656397`*^9, 3.6308315251297984`*^9}, {3.6308500199956975`*^9, 3.630850092130224*^9}, {3.6308926160699577`*^9, 3.630892648580415*^9}, { 3.6308926904976883`*^9, 3.6308930396419015`*^9}, {3.6308931926157703`*^9, 3.6308932605850897`*^9}, {3.630893319631193*^9, 3.6308933413620315`*^9}, { 3.630893371735285*^9, 3.6308933746056895`*^9}, {3.630893484195882*^9, 3.630893495552702*^9}, {3.6308935513072*^9, 3.6308937035322676`*^9}, { 3.630893900966214*^9, 3.630893903165818*^9}, {3.63089401261561*^9, 3.6308940229584284`*^9}, {3.630894084734537*^9, 3.630894141612237*^9}, { 3.6308941732958927`*^9, 3.63089421168756*^9}, {3.6308943234305563`*^9, 3.6308945706597905`*^9}, {3.630894732057674*^9, 3.6308948540342884`*^9}, { 3.6308949175576*^9, 3.6308950352130065`*^9}, {3.6308963280663238`*^9, 3.6308964339281096`*^9}, {3.630896483785797*^9, 3.6308965147216516`*^9}, { 3.630995110764593*^9, 3.6309952194788113`*^9}, 3.631017673702475*^9, 3.6339410343181667`*^9, {3.6339411434394083`*^9, 3.6339413336822896`*^9}, { 3.6339414012381535`*^9, 3.6339415162277308`*^9}, {3.633941550612697*^9, 3.6339415854086876`*^9}, {3.633941898820614*^9, 3.633941918825758*^9}, { 3.633942028814049*^9, 3.6339421351881332`*^9}, 3.6339421753194284`*^9, { 3.6339527595260005`*^9, 3.633952797347164*^9}, {3.6339528326231813`*^9, 3.6339528434568014`*^9}, 3.63395311337924*^9, {3.633953318391966*^9, 3.633953320104064*^9}, {3.6339533894880323`*^9, 3.633953398914572*^9}, { 3.6339534904578075`*^9, 3.6339534909158335`*^9}, {3.6339544324266853`*^9, 3.633954436992946*^9}, {3.633955355536484*^9, 3.633955361782841*^9}, { 3.634613015576932*^9, 3.63461301623897*^9}, {3.6346130510409603`*^9, 3.634613077198457*^9}, 3.634613188324813*^9, {3.6878638635768104`*^9, 3.6878639724170356`*^9}, 3.687864019557732*^9, 3.6878641001403413`*^9, { 3.687864195050747*^9, 3.6878641958857946`*^9}, {3.6878642401333256`*^9, 3.68786426136654*^9}, 3.687864352036726*^9, {3.687864450280345*^9, 3.6878644606039357`*^9}, {3.6878646809015083`*^9, 3.6878646814075365`*^9}, {3.687864779357139*^9, 3.6878648062606783`*^9}, { 3.6878651827021837`*^9, 3.687865213182927*^9}, {3.6878652461998158`*^9, 3.6878652992218485`*^9}, {3.687865350343772*^9, 3.687865355912091*^9}, { 3.687865609571577*^9, 3.6878656309137974`*^9}, {3.687865671576123*^9, 3.6878656918812847`*^9}, 3.687865733639673*^9, {3.6878657691897063`*^9, 3.6878657965562716`*^9}, {3.687865834375435*^9, 3.6878658387066827`*^9}, { 3.687865912326894*^9, 3.6878659163341227`*^9}, {3.6878659782786655`*^9, 3.687866006047254*^9}, {3.6878660595832973`*^9, 3.6878660659666624`*^9}, { 3.6878661218058558`*^9, 3.6878661872325983`*^9}, {3.687866245499931*^9, 3.687866274822608*^9}, 3.687866805421936*^9, {3.6879301815930185`*^9, 3.6879301828630204`*^9}, {3.687930277763153*^9, 3.6879302977631817`*^9}, { 3.6879303280532236`*^9, 3.687930399193323*^9}, {3.6879304307033677`*^9, 3.6879304862434454`*^9}, {3.6879305350435133`*^9, 3.6879306368336563`*^9}, {3.6879308629839725`*^9, 3.6879309443840866`*^9}, {3.6880225059517603`*^9, 3.688022695772026*^9}, { 3.6880227285420723`*^9, 3.688022739402087*^9}, 3.688124666129181*^9, { 3.6882843273150387`*^9, 3.6882845888454046`*^9}, {3.688285837009152*^9, 3.6882858406491575`*^9}, {3.688286818441526*^9, 3.688286844251562*^9}, { 3.6882870165218034`*^9, 3.688287041201838*^9}, {3.68828707122188*^9, 3.68828709261191*^9}, 3.68828714986199*^9, {3.688287467572435*^9, 3.6882874756924467`*^9}, {3.6882875215825105`*^9, 3.688287521962511*^9}, { 3.6924976946811843`*^9, 3.6924978409113894`*^9}, {3.692497927801511*^9, 3.6924979661015644`*^9}, {3.692498035281661*^9, 3.6924981004717526`*^9}, { 3.6924981611518373`*^9, 3.692498164851843*^9}, {3.692498211401908*^9, 3.6924983125120497`*^9}, {3.692502435097616*^9, 3.692502447592331*^9}, { 3.692502485821518*^9, 3.6925024860295296`*^9}, 3.6925027340347147`*^9, { 3.6940858758564043`*^9, 3.6940858848364167`*^9}, {3.6940859944465704`*^9, 3.6940860158966007`*^9}, {3.6940861169567423`*^9, 3.694086419977166*^9}, { 3.6940872923193874`*^9, 3.6940872938293896`*^9}, {3.6940873646994886`*^9, 3.694087369319495*^9}, 3.694087530509721*^9, {3.6945281161723194`*^9, 3.694528128442337*^9}, {3.6945281951824303`*^9, 3.694528217482462*^9}, { 3.694528268612533*^9, 3.694528649083066*^9}, {3.694528693523128*^9, 3.6945286979031343`*^9}, {3.6945781605358806`*^9, 3.6945782254759717`*^9}, {3.6945782921660647`*^9, 3.694578304996083*^9}, { 3.694578337066128*^9, 3.6945783532861505`*^9}, {3.6945783849061947`*^9, 3.6945783866561975`*^9}, {3.6945784400462723`*^9, 3.694578482566332*^9}, 3.694578713616655*^9, {3.7511979506411643`*^9, 3.751197960841903*^9}, { 3.755352558606639*^9, 3.7553526159830475`*^9}, {3.774071654702608*^9, 3.7740716613755894`*^9}, {3.774071748661003*^9, 3.7740718483755345`*^9}, { 3.7740718923844557`*^9, 3.774071983649667*^9}, 3.774072057837844*^9, { 3.774072100100342*^9, 3.774072136005568*^9}, {3.774072187780233*^9, 3.7740722037066555`*^9}, {3.774072323322257*^9, 3.7740724309500237`*^9}, { 3.7740724933285646`*^9, 3.774072635753066*^9}, {3.774072687249714*^9, 3.7740727925054007`*^9}, {3.7740728598637686`*^9, 3.7740728945968986`*^9}, 3.774072979683737*^9, {3.774172222258683*^9, 3.7741722646358166`*^9}, { 3.7741723702318573`*^9, 3.7741723746656275`*^9}, {3.7741725406355767`*^9, 3.7741725730793257`*^9}, 3.7741726613919673`*^9, {3.7741727284394493`*^9, 3.774172868506016*^9}, {3.7741729101771226`*^9, 3.774173007341322*^9}, { 3.774173102959459*^9, 3.7741731324499664`*^9}, 3.774236409887308*^9, { 3.7742365098127813`*^9, 3.7742365393429565`*^9}, {3.7830787204505596`*^9, 3.783078728236431*^9}, {3.7830788333789034`*^9, 3.783078891201686*^9}, { 3.7830789381996555`*^9, 3.7830789386494493`*^9}, 3.783078981596484*^9, { 3.783137965886668*^9, 3.7831381275811653`*^9}, {3.7831382197652965`*^9, 3.7831382711318674`*^9}, {3.7831383021548166`*^9, 3.783138316699332*^9}, { 3.7831384156346865`*^9, 3.7831384387677746`*^9}, {3.7831385999718432`*^9, 3.7831386289162683`*^9}, {3.783138703438572*^9, 3.7831388313574543`*^9}, { 3.7831388726832438`*^9, 3.7831389799876423`*^9}, {3.783139114486741*^9, 3.7831391207657857`*^9}, {3.7831392058372374`*^9, 3.7831392347077627`*^9}, {3.7831392881204815`*^9, 3.783139298414276*^9}, { 3.783139379567049*^9, 3.7831394938819885`*^9}, 3.7831396004671617`*^9, { 3.7831412786243258`*^9, 3.7831412860913258`*^9}, {3.7831414844000688`*^9, 3.7831415377807136`*^9}, {3.7831416766317453`*^9, 3.7831416816557817`*^9}, {3.7831417135337715`*^9, 3.7831417541137705`*^9}, {3.783141785061674*^9, 3.78314188080105*^9}, 3.783142056404602*^9, {3.7834133193911924`*^9, 3.783413370443163*^9}, { 3.7884238054537177`*^9, 3.788423817167117*^9}, {3.7884238549377203`*^9, 3.7884238763673477`*^9}, {3.788423922628934*^9, 3.7884239232207956`*^9}, { 3.788423982788879*^9, 3.7884239842015057`*^9}, {3.7884240163856163`*^9, 3.7884240253516703`*^9}, {3.8200253398852043`*^9, 3.8200254773530717`*^9}, 3.8411959691970887`*^9, {3.84318199280597*^9, 3.8431820660833826`*^9}}, CellLabel-> "In[185]:=",ExpressionUUID->"8c877f05-ab7f-4546-96d0-9f87dcd7faf5"] }, Closed]], Cell[CellGroupData[{ Cell["SOLID ELEMENT (evnt) defs", "Subsection", InitializationCell->True, CellChangeTimes->{{3.753018875511382*^9, 3.7530188786265306`*^9}, { 3.781589886623744*^9, 3.7815898932426767`*^9}, {3.7878947601549573`*^9, 3.787894760728943*^9}, 3.7878948945295725`*^9, {3.817439343565061*^9, 3.8174393448082724`*^9}, {3.817439544553817*^9, 3.8174395452236648`*^9}, { 3.817439659219601*^9, 3.8174396600345135`*^9}, 3.817439764967313*^9, { 3.8174398145177484`*^9, 3.8174398153738604`*^9}, 3.8431829457768335`*^9},ExpressionUUID->"77210dc9-9440-4101-86c4-\ 8373a5004ce6"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNT", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"SOLID", ",", "anya_", ",", "anyb_"}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"SOLID", ",", "anya", ",", "anyb"}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.4426466268192453`*^9, 3.4426467788544455`*^9}, { 3.443680046807*^9, 3.443680117163*^9}, {3.4436945929248*^9, 3.4436946334536*^9}, 3.4436946653087997`*^9, 3.4436947104396*^9, { 3.4461861532916*^9, 3.446186153744*^9}, {3.4461862231328*^9, 3.4461862553468*^9}, {3.446186292506*^9, 3.4461863473556004`*^9}, { 3.4461863827988*^9, 3.4461864352304*^9}, {3.446186572526*^9, 3.4461865777052*^9}, {3.451263479283*^9, 3.451263479751*^9}, { 3.4938807027527814`*^9, 3.4938807074171515`*^9}, {3.493880800287371*^9, 3.4938808523754373`*^9}, 3.4938809479786386`*^9, 3.4938811002466917`*^9, { 3.4938811515079627`*^9, 3.4938811517107615`*^9}, {3.4941655092594*^9, 3.4941656750562*^9}, {3.4941657353501997`*^9, 3.4941657435246*^9}, { 3.4941657779382*^9, 3.4941658634418*^9}, {3.4957207052706003`*^9, 3.4957207485294*^9}, {3.4957208264826*^9, 3.4957208443914003`*^9}, 3.4957209431258*^9, {3.4957210322642*^9, 3.4957210490341997`*^9}, 3.4957211815324*^9, {3.4957212363352003`*^9, 3.4957212456328*^9}, { 3.4957212942609997`*^9, 3.495721324993*^9}, {3.4975823349274*^9, 3.4975823545366*^9}, {3.4975824057046003`*^9, 3.4975824948898*^9}, { 3.4975825327354*^9, 3.4975825337650003`*^9}, {3.4975826475076*^9, 3.4975826545744*^9}, {3.4993509657212*^9, 3.499350971072*^9}, { 3.4993510472623997`*^9, 3.4993510481828003`*^9}, {3.4993511463536*^9, 3.4993512159764*^9}, {3.4993512745699997`*^9, 3.4993512754748*^9}, { 3.4994811051716003`*^9, 3.4994811663392*^9}, {3.4994811996452*^9, 3.4994813495144*^9}, {3.4994814548164*^9, 3.4994814597148*^9}, { 3.4994815491963997`*^9, 3.4994815501324*^9}, 3.5007041508297997`*^9, { 3.5007041887066*^9, 3.5007042038073997`*^9}, {3.5007042395938*^9, 3.5007042409978*^9}, {3.5007043421602*^9, 3.5007043514421997`*^9}, { 3.5007044087455997`*^9, 3.5007044250632*^9}, {3.5007044934178*^9, 3.5007045024034*^9}, {3.5007046824406*^9, 3.500704999808*^9}, { 3.5007050353234*^9, 3.5007050451202*^9}, {3.5007052587142*^9, 3.5007052605706*^9}, {3.5007053328766003`*^9, 3.5007054596577997`*^9}, { 3.5007159735338*^9, 3.5007161853984003`*^9}, {3.5007162280332003`*^9, 3.5007163483716*^9}, {3.5007163981823997`*^9, 3.5007164168244*^9}, { 3.5007164654028*^9, 3.5007167457036*^9}, {3.5007176771076*^9, 3.5007176863896*^9}, {3.5007177671352*^9, 3.500717783874*^9}, { 3.5007179049924*^9, 3.50071796265*^9}, {3.5009579544962*^9, 3.5009579659934*^9}, {3.5009580383814*^9, 3.5009581011401997`*^9}, { 3.5009581956988*^9, 3.5009582131864*^9}, {3.5009583928048*^9, 3.5009583930388002`*^9}, {3.5009587458640003`*^9, 3.5009587595296*^9}, { 3.5009592634954*^9, 3.5009592736354*^9}, {3.500959331527*^9, 3.5009593527897997`*^9}, {3.5625699941459312`*^9, 3.5625700053623505`*^9}, {3.5625701202721524`*^9, 3.562570128836568*^9}, { 3.6293860977240434`*^9, 3.629386104244855*^9}, {3.629386199327022*^9, 3.629386220496259*^9}, {3.6296431182972393`*^9, 3.62964311889004*^9}, { 3.629777573965969*^9, 3.629777733585449*^9}, {3.6297779641070547`*^9, 3.6297781672591486`*^9}, {3.6297782105906267`*^9, 3.6297787648833303`*^9}, {3.6297788067577257`*^9, 3.6297788473980503`*^9}, {3.6297790116215076`*^9, 3.629779171927389*^9}, { 3.6297795741584954`*^9, 3.629779653484635*^9}, {3.6297818984505787`*^9, 3.6297819210082183`*^9}, {3.629782000178357*^9, 3.6297820021907606`*^9}, { 3.629782216020336*^9, 3.629782224319551*^9}, 3.6297823407737556`*^9, { 3.629783163862401*^9, 3.6297832496313515`*^9}, {3.629870677773334*^9, 3.6298707174286036`*^9}, {3.6298707896411304`*^9, 3.6298709878862786`*^9}, {3.6306592122375627`*^9, 3.6306592151235676`*^9}, {3.6306598443506727`*^9, 3.630659875316727*^9}, 3.63065995660847*^9, 3.630670566864462*^9, {3.63083558537886*^9, 3.6308359887799683`*^9}, {3.6308362111739593`*^9, 3.6308362148243656`*^9}, {3.630836286288091*^9, 3.6308363606378217`*^9}, 3.6308364233343315`*^9, {3.631888358317337*^9, 3.631888434445471*^9}, { 3.6318884656455255`*^9, 3.6318885138028097`*^9}, {3.6318886621590705`*^9, 3.6318886772754974`*^9}, {3.631888745837618*^9, 3.6318888213573503`*^9}, { 3.6318890221765027`*^9, 3.6318890526121564`*^9}, 3.631889169159961*^9, 3.6318894033631725`*^9, {3.631889517414973*^9, 3.6318895524526343`*^9}, { 3.6318896836488647`*^9, 3.631889698765291*^9}, {3.6321898139439125`*^9, 3.632189856272333*^9}, {3.6321898953545685`*^9, 3.6321900355675883`*^9}, { 3.6321900697005405`*^9, 3.6321903203378763`*^9}, {3.6321903691376677`*^9, 3.632190388074751*^9}, {3.632190466145216*^9, 3.6321904844272614`*^9}, { 3.632190625107308*^9, 3.6321907202867517`*^9}, {3.632190835720354*^9, 3.6321908837511015`*^9}, {3.632190986102956*^9, 3.6321910052410507`*^9}, { 3.6321927997536907`*^9, 3.6321928025258493`*^9}, {3.6321941664038568`*^9, 3.632194191948318*^9}, {3.6624544812484736`*^9, 3.662454485084693*^9}, { 3.6624545866345015`*^9, 3.6624546098018265`*^9}, {3.685233396707606*^9, 3.6852334069476204`*^9}, {3.685233673317993*^9, 3.6852336973580265`*^9}, 3.685264712020458*^9, {3.685264780390554*^9, 3.6852648241406155`*^9}, { 3.6852713583430376`*^9, 3.6852714170531197`*^9}, {3.6852718305336986`*^9, 3.6852718842537737`*^9}, {3.6852720012539377`*^9, 3.685272008663948*^9}, { 3.685272070164034*^9, 3.6852720840640535`*^9}, 3.6853404120151405`*^9, { 3.6853405127463226`*^9, 3.685340625313761*^9}, {3.6853410657279515`*^9, 3.685341078722695*^9}, {3.685341189812049*^9, 3.6853411945933223`*^9}, { 3.685341231602439*^9, 3.6853412388978567`*^9}, 3.6853430337255144`*^9, { 3.68585373700861*^9, 3.6858537556736774`*^9}, 3.685853822475498*^9, { 3.68585391622186*^9, 3.6858539266884584`*^9}, {3.685853962796524*^9, 3.685853970925989*^9}, 3.6858541341643257`*^9, {3.685854449069337*^9, 3.685854452354525*^9}, {3.6858544860604534`*^9, 3.6858544933768716`*^9}, { 3.685854943776633*^9, 3.6858549563563523`*^9}, {3.6859534582909718`*^9, 3.685953483154394*^9}, {3.685965935028836*^9, 3.6859660165689497`*^9}, { 3.68596614502913*^9, 3.68596618077918*^9}, {3.6859665004496274`*^9, 3.685966524549661*^9}, {3.6859666104197817`*^9, 3.685966617519791*^9}, { 3.6860123360453115`*^9, 3.6860123945753937`*^9}, {3.6860124484754686`*^9, 3.6860124852555203`*^9}, {3.686012537365593*^9, 3.6860125428256006`*^9}, 3.6860126339057283`*^9, 3.686012710945836*^9, {3.6860128143059807`*^9, 3.6860128145959816`*^9}, {3.6860129183361263`*^9, 3.6860129676061954`*^9}, 3.686013029216282*^9, {3.686019337710574*^9, 3.6860195425908613`*^9}, { 3.686019651761014*^9, 3.6860196633110304`*^9}, 3.6860202343918295`*^9, { 3.6860237604228506`*^9, 3.6860238349729548`*^9}, 3.686023961653132*^9, { 3.68714588472073*^9, 3.687145885140731*^9}, {3.6871460474709578`*^9, 3.687146053790967*^9}, {3.6871460941910233`*^9, 3.6871460981810293`*^9}, { 3.6871461354510813`*^9, 3.687146395471445*^9}, {3.6871464425315113`*^9, 3.687146453221526*^9}, 3.687146604551738*^9, 3.6871466841818495`*^9, { 3.6871470071023016`*^9, 3.687147008182303*^9}, 3.687147048432359*^9, { 3.6871470932524223`*^9, 3.6871471214924617`*^9}, {3.6871471604425163`*^9, 3.6871473693028083`*^9}, {3.6874228236597347`*^9, 3.6874228709898005`*^9}, {3.6874231158501434`*^9, 3.6874232243002954`*^9}, {3.6875189610998473`*^9, 3.687519005537389*^9}, { 3.687519062781663*^9, 3.6875192133922777`*^9}, {3.6875193939396043`*^9, 3.6875193991879044`*^9}, {3.687520128393613*^9, 3.687520238740924*^9}, 3.6875261810306673`*^9, {3.6876715960629864`*^9, 3.6876717494132013`*^9}, { 3.6876718441833344`*^9, 3.6876718768033795`*^9}, {3.6876723915341005`*^9, 3.687672434904161*^9}, 3.688395660193591*^9, 3.6883964158577833`*^9, { 3.692412576581642*^9, 3.6924125803116474`*^9}, {3.6924126302817173`*^9, 3.692412655961754*^9}, {3.692412695731809*^9, 3.6924127074218254`*^9}, { 3.6924127522818885`*^9, 3.6924127586918974`*^9}, {3.69241285349203*^9, 3.6924128539320307`*^9}, {3.692412907092105*^9, 3.692413029772277*^9}, { 3.692413068192331*^9, 3.692413166452468*^9}, {3.692413741305273*^9, 3.6924137594552984`*^9}, {3.6924168804381475`*^9, 3.692416890318161*^9}, { 3.692416926028211*^9, 3.6924169565082536`*^9}, {3.6924169983583126`*^9, 3.692417051860387*^9}, {3.6924171044204607`*^9, 3.6924171568505344`*^9}, { 3.692417194820587*^9, 3.692417195170588*^9}, {3.6924213133305225`*^9, 3.6924213143205233`*^9}, {3.692421353670579*^9, 3.6924213540405793`*^9}, { 3.69277257982156*^9, 3.6927725838615656`*^9}, {3.692855931835436*^9, 3.692855932875437*^9}, {3.6928567610465965`*^9, 3.6928568324266963`*^9}, { 3.692856901206793*^9, 3.6928569095168047`*^9}, {3.69285698469691*^9, 3.692856993426922*^9}, {3.69285703490698*^9, 3.692857117767096*^9}, { 3.6928573265673885`*^9, 3.6928576414078293`*^9}, {3.6932192279315724`*^9, 3.693219231191577*^9}, 3.6932193482617407`*^9, {3.6932193866617947`*^9, 3.693219399421812*^9}, {3.693220387105195*^9, 3.693220395585207*^9}, { 3.693220619885521*^9, 3.693220622315525*^9}, 3.6932206741055975`*^9, { 3.6937158692541003`*^9, 3.693715869654101*^9}, {3.6937159892942686`*^9, 3.693716052294357*^9}, {3.693716084724402*^9, 3.6937165234970164`*^9}, { 3.69371656887708*^9, 3.6937167464873285`*^9}, {3.6937167931673937`*^9, 3.693716881127517*^9}, {3.6937174784783535`*^9, 3.6937174801583557`*^9}, { 3.6937209970340457`*^9, 3.693721056784129*^9}, {3.6940658253906527`*^9, 3.69406583796067*^9}, {3.694065981390871*^9, 3.6940660285909367`*^9}, { 3.69406631676134*^9, 3.694066328431357*^9}, {3.6940663845914354`*^9, 3.69406638788144*^9}, {3.6940667791219873`*^9, 3.6940668111720324`*^9}, { 3.694067197922574*^9, 3.694067205792585*^9}, {3.694230787618657*^9, 3.6942308443987365`*^9}, {3.694230880048786*^9, 3.6942309310488577`*^9}, { 3.6942309647089047`*^9, 3.6942310590790367`*^9}, {3.6942311817392087`*^9, 3.6942313193904014`*^9}, {3.6942313582004557`*^9, 3.6942317436109953`*^9}, {3.694232100401495*^9, 3.694232179791606*^9}, { 3.694232591252182*^9, 3.694232606942204*^9}, 3.694265123583295*^9, 3.6943208649568324`*^9, {3.6944241392570753`*^9, 3.694424146417085*^9}, { 3.72541924301532*^9, 3.7254192468679457`*^9}, {3.725431584796835*^9, 3.725431637535695*^9}, 3.725432095606172*^9, {3.749695458974357*^9, 3.7496954653226786`*^9}, {3.749695629209482*^9, 3.7496957170177097`*^9}, { 3.749695766766241*^9, 3.7496959409872313`*^9}, {3.749696586402536*^9, 3.7496965868288536`*^9}, {3.7496969375048475`*^9, 3.749696939543347*^9}, { 3.7496975602512183`*^9, 3.749697622751583*^9}, {3.7496976733864603`*^9, 3.749697733500789*^9}, 3.749698076456645*^9, {3.7496981179531765`*^9, 3.749698128232212*^9}, {3.7496982428286314`*^9, 3.749698362156461*^9}, { 3.7496984682622967`*^9, 3.7496985284496694`*^9}, {3.7496992170188684`*^9, 3.7496992868619986`*^9}, {3.7496993728466873`*^9, 3.749699375486853*^9}, { 3.7530189177531705`*^9, 3.753018918350237*^9}, {3.753018991800671*^9, 3.753019041865839*^9}, {3.7530191095313196`*^9, 3.7530191100576744`*^9}, 3.753019155952956*^9, {3.7530192458219423`*^9, 3.753019353286773*^9}, { 3.773986323215969*^9, 3.7739864366876383`*^9}, {3.7739864700193005`*^9, 3.7739865885966825`*^9}, {3.7739869332783327`*^9, 3.7739870501829805`*^9}, 3.773987085528166*^9, {3.7739872536160583`*^9, 3.773987270466986*^9}, { 3.773987482712697*^9, 3.7739875221812735`*^9}, {3.773987740298462*^9, 3.7739877466065903`*^9}, {3.7739878599976892`*^9, 3.7739878861137896`*^9}, {3.773987965425336*^9, 3.7739879715632877`*^9}, 3.773988098774023*^9, 3.7739883193781385`*^9, {3.7739884099852057`*^9, 3.7739885862960095`*^9}, {3.773988628922502*^9, 3.773988632767228*^9}, { 3.7739891227568517`*^9, 3.77398915009042*^9}, {3.7739892774900556`*^9, 3.773989291800435*^9}, {3.7739896060525217`*^9, 3.773989635013425*^9}, { 3.7751890832095585`*^9, 3.7751890882413054`*^9}, {3.7751894923762302`*^9, 3.7751895008441906`*^9}, {3.7751911834227276`*^9, 3.775191222686661*^9}, 3.7751912606478214`*^9, {3.7751943412188396`*^9, 3.775194461553982*^9}, { 3.775194496052539*^9, 3.7751945353727713`*^9}, {3.7751945737174063`*^9, 3.775194621343042*^9}, {3.775194667862669*^9, 3.7751947598351893`*^9}, { 3.7751948235734253`*^9, 3.7751949415953684`*^9}, {3.775195100078847*^9, 3.77519512113822*^9}, {3.7751954506873007`*^9, 3.775195467864645*^9}, { 3.775270786870551*^9, 3.775270796325161*^9}, {3.7752708274391947`*^9, 3.775270839737406*^9}, {3.7752709283091574`*^9, 3.7752709474534383`*^9}, { 3.7752710502850266`*^9, 3.7752711744130797`*^9}, {3.7752712273079033`*^9, 3.7752713060364757`*^9}, {3.775271448825513*^9, 3.7752714699277525`*^9}, { 3.775271509321142*^9, 3.775271585609558*^9}, {3.775271620653377*^9, 3.77527180192237*^9}, {3.781589928213842*^9, 3.781590052438653*^9}, { 3.7815900898176003`*^9, 3.781590109307678*^9}, {3.781590201383393*^9, 3.7815902433873234`*^9}, {3.7815905445265956`*^9, 3.781590569573782*^9}, { 3.7815906952864275`*^9, 3.781590715680611*^9}, {3.7815908323678637`*^9, 3.781590881239719*^9}, {3.7815911048122363`*^9, 3.781591119274813*^9}, { 3.817439386305109*^9, 3.8174394287787733`*^9}, {3.8174395552770724`*^9, 3.8174395603447847`*^9}, {3.8174396709099665`*^9, 3.817439676294123*^9}, { 3.8174397747716293`*^9, 3.8174397780717535`*^9}, {3.8174398318697805`*^9, 3.817439837879761*^9}, 3.8175213595144067`*^9, 3.8431829500234118`*^9}, CellLabel-> "In[190]:=",ExpressionUUID->"20a8e7b5-46a0-428a-a7ca-ea695f616c57"] }, Closed]], Cell[CellGroupData[{ Cell["SOLID ELEMENT (vibr) defs ", "Subsection", CellChangeTimes->{{3.629430162287647*^9, 3.6294301631768484`*^9}, { 3.7575037777673283`*^9, 3.7575037970958652`*^9}, 3.788423792328411*^9},ExpressionUUID->"640869b2-f9d5-43c0-94d5-\ f8518fe4e81a"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_", ",", "\[Rho]\[Rho]_"}], "}"}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]", ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_", ",", "I4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "ns", ",", "NN", ",", "r", ",", "FF", ",", "PP", ",", "uvw", ",", "uvw0", ",", "uvw2", ",", "Duvw", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "EEEE", ",", "\[Delta]w\[Sigma]", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "GG", ",", "nl", ",", "jac", ",", "FFINV", ",", "\[Delta]wext", ",", "\[Delta]wint", ",", "\[Delta]wine"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I3", ",", "I4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]", "-", "\[Gamma]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "r"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"uvw0", "=", " ", RowBox[{"uvw", "/.", " ", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"uvw2", "=", " ", RowBox[{"uvw", " ", "/.", " ", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacement", " ", "gradient"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw0"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw0"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw0"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "GG"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "/", "GG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"1", "/", "GG"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw0", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wine", "=", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "uvw0", "]"}], ".", RowBox[{"(", RowBox[{"\[Rho]\[Rho]", " ", "uvw2"}], ")"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TET5", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wext", "+", "\[Delta]wint", "+", "\[Delta]wine"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_", ",", "\[Rho]\[Rho]_"}], "}"}], "}"}], ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "n1_", ",", "n2_", ",", "n3_", ",", "n4_", ",", "n5_", ",", "n6_", ",", "n7_", ",", "n8_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]", ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "n1", ",", "n2", ",", "n3", ",", "n4", ",", "n5", ",", "n6", ",", "n7", ",", "n8"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "n1_", ",", "n2_", ",", "n3_", ",", "n4_", ",", "n5_", ",", "n6_", ",", "n7_", ",", "n8_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r", ",", "FF", ",", "PP", ",", "uvw0", ",", "uvw2", ",", "\[Sigma]", ",", "EEEE", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "GG", ",", "jac", ",", "FFINV", ",", "\[Epsilon]", ",", "\[Delta]wext", ",", "\[Delta]wint", ",", "\[Delta]wine"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{ "n1", ",", "n2", ",", "n3", ",", "n4", ",", "n5", ",", "n6", ",", "n7", ",", "n8"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]", RowBox[{"(", RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]", RowBox[{"(", RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}], "\[Gamma]"}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}], "\[Gamma]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]", " ", "\[Gamma]"}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]", " ", "\[Gamma]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{ RowBox[{"Transpose", "[", RowBox[{"D", "[", RowBox[{"r", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}], "}"}]}], "]"}], "]"}], "/.", " ", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", " ", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Gamma]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw0", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}], " ", "/.", " ", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"uvw2", "=", RowBox[{ RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}], " ", "/.", " ", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacement", " ", "gradient"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"Transpose", "[", RowBox[{"D", "[", RowBox[{"uvw0", ",", RowBox[{"{", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}], "}"}]}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"IdentityMatrix", "[", "3", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "GG"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "/", "GG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"1", "/", "GG"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw0", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wine", "=", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "uvw0", "]"}], ".", RowBox[{"(", RowBox[{"\[Rho]\[Rho]", " ", "uvw2"}], ")"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"HEX27", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wext", "+", "\[Delta]wint", "+", "\[Delta]wine"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.4426474258030453`*^9, {3.4444401255942*^9, 3.4444401388073997`*^9}, { 3.4444401803034*^9, 3.4444401844062*^9}, 3.4444402418922*^9, { 3.4444402805022*^9, 3.4444403134026003`*^9}, {3.4444403443062*^9, 3.4444404484049997`*^9}, {3.444483267101*^9, 3.444483267335*^9}, { 3.4444833136046*^9, 3.4444835622998*^9}, {3.4444836421094*^9, 3.4444837777981997`*^9}, {3.444483920429*^9, 3.4444839412237997`*^9}, 3.4444842905546*^9, {3.4444843207406*^9, 3.4444844162282*^9}, { 3.4444844465078*^9, 3.4444844624354*^9}, {3.4444845255998*^9, 3.4444845894505997`*^9}, {3.4444846290746*^9, 3.444484933025*^9}, { 3.4444849790917997`*^9, 3.4444851148742*^9}, {3.444534936054*^9, 3.4445349675348*^9}, {3.4445355821731997`*^9, 3.44453585174*^9}, { 3.4445372162198*^9, 3.4445372264378*^9}, 3.444537384731*^9, { 3.4445377585382*^9, 3.4445377605818*^9}, {3.4445379733658*^9, 3.4445379736934*^9}, {3.4445380176762*^9, 3.444538032777*^9}, { 3.4445381079222*^9, 3.4445381581386003`*^9}, {3.4445382726456003`*^9, 3.4445382910067997`*^9}, {3.4445383401312*^9, 3.4445383475880003`*^9}, { 3.444538438458*^9, 3.4445384464608*^9}, {3.4445385680783997`*^9, 3.4445385687648*^9}, {3.4445389411991997`*^9, 3.4445389431024*^9}, { 3.444539746605*^9, 3.4445397807846003`*^9}, {3.4445408839765997`*^9, 3.4445409234133997`*^9}, {3.4445409681698*^9, 3.4445409932702*^9}, { 3.4445415452906*^9, 3.4445415706717997`*^9}, {3.4445416647242002`*^9, 3.4445416909477997`*^9}, {3.4445417660150003`*^9, 3.444541788557*^9}, { 3.4445420906977997`*^9, 3.444542104847*^9}, {3.4445421885878*^9, 3.4445421941414003`*^9}, {3.4445422252166*^9, 3.4445422386014*^9}, { 3.444542280425*^9, 3.4445423014538*^9}, {3.444542455769*^9, 3.4445424578282003`*^9}, {3.4445431739214*^9, 3.444543175809*^9}, { 3.4445647020962*^9, 3.4445648405618*^9}, {3.4445648825414*^9, 3.4445648858486*^9}, {3.4445649382646*^9, 3.4445651882702*^9}, { 3.4446164822206*^9, 3.4446165344494*^9}, {3.4446166121842003`*^9, 3.4446166738822002`*^9}, {3.4446167223046*^9, 3.4446168047974*^9}, { 3.444616843033*^9, 3.444616906447*^9}, {3.4446444694708*^9, 3.4446444700948*^9}, {3.4446477738310003`*^9, 3.4446477939862003`*^9}, { 3.4446478467298*^9, 3.4446478681018*^9}, 3.4446480456142*^9, { 3.4446487557418003`*^9, 3.4446487636198*^9}, 3.4446488179974003`*^9, { 3.4446488971205997`*^9, 3.4446489152478*^9}, {3.4446490003458*^9, 3.4446490008294*^9}, {3.4447042728942003`*^9, 3.4447042751562*^9}, { 3.4447044703278*^9, 3.4447044865362*^9}, 3.4447046475282*^9, 3.4447047993786*^9, {3.444704908329*^9, 3.4447049292642*^9}, { 3.4447049861926003`*^9, 3.4447049877214003`*^9}, {3.4447050279296*^9, 3.4447050419695997`*^9}, {3.4447053486656*^9, 3.4447053739376*^9}, 3.4447054561963997`*^9, 3.44470561612*^9, {3.4472133996876*^9, 3.4472134108571997`*^9}, {3.4472134470179996`*^9, 3.4472134648332*^9}, { 3.4472135032872*^9, 3.4472135245344*^9}, {3.4472136963059998`*^9, 3.4472137794384003`*^9}, {3.4472138235708*^9, 3.4472138388900003`*^9}, { 3.4472139099792*^9, 3.4472141367096*^9}, {3.447214202682*^9, 3.4472142975924*^9}, {3.4472144187732*^9, 3.4472145910284*^9}, { 3.4472146560492*^9, 3.4472147023968*^9}, {3.447214803594*^9, 3.4472148728736*^9}, {3.4472149156956*^9, 3.447214940484*^9}, { 3.447216227284*^9, 3.4472162419948*^9}, {3.4472163068908*^9, 3.4472163720832*^9}, {3.4472164665880003`*^9, 3.447216530392*^9}, { 3.4472166237268*^9, 3.4472167058452*^9}, 3.4472167362808*^9, { 3.4472171394658003`*^9, 3.4472171532874002`*^9}, {3.4472172028993998`*^9, 3.4472172216661997`*^9}, {3.4472172524606*^9, 3.4472172690278*^9}, { 3.4472173209133997`*^9, 3.4472173334245996`*^9}, {3.4472173920846*^9, 3.447217404861*^9}, {3.4472179572548*^9, 3.4472180351456003`*^9}, { 3.4472509764091997`*^9, 3.4472511017396*^9}, {3.4473910422216*^9, 3.4473912901524*^9}, 3.4473918688344*^9, {3.447392021185*^9, 3.4473920346633997`*^9}, {3.4473921383304*^9, 3.4473921479088*^9}, { 3.4473923024112*^9, 3.4473923734379997`*^9}, {3.4473928098168*^9, 3.4473928648691998`*^9}, {3.4473931872432003`*^9, 3.4473932461800003`*^9}, {3.4473933026675997`*^9, 3.4473934579812*^9}, { 3.4473935755271997`*^9, 3.447393742572*^9}, {3.4473939032676*^9, 3.4473939384144*^9}, {3.447395257644*^9, 3.4473953141628*^9}, { 3.4473954231132*^9, 3.4473954756384*^9}, {3.4473955348716*^9, 3.4473955723272*^9}, {3.447395648502*^9, 3.4473957588876*^9}, { 3.4473957903996*^9, 3.4473958488372*^9}, 3.4473962894154*^9, { 3.447396350817*^9, 3.447396352611*^9}, {3.4474625379146*^9, 3.4474625637326*^9}, {3.558360651728078*^9, 3.558360652102478*^9}, { 3.5619791319820857`*^9, 3.561979135788492*^9}, 3.561979369382504*^9, { 3.5619794930439215`*^9, 3.5619795010155354`*^9}, {3.561979569218855*^9, 3.56197960614412*^9}, {3.5619797417551584`*^9, 3.5619797448751636`*^9}, { 3.618719065033702*^9, 3.618719075426296*^9}, {3.6187194011669273`*^9, 3.6187194449454317`*^9}, {3.6187196998040085`*^9, 3.6187197102436056`*^9}, {3.618719902254588*^9, 3.6187199711455283`*^9}, { 3.618722365406472*^9, 3.6187225412555304`*^9}, {3.6187226885009522`*^9, 3.6187227109872384`*^9}, {3.618722756922866*^9, 3.6187231317203026`*^9}, { 3.618723424250035*^9, 3.6187234267291765`*^9}, {3.6187235105259695`*^9, 3.6187236491028957`*^9}, {3.618723691580325*^9, 3.618723745975436*^9}, { 3.618723778837316*^9, 3.6187238310002995`*^9}, {3.6187239055875654`*^9, 3.618723940035536*^9}, {3.6187239782667227`*^9, 3.6187240219352207`*^9}, { 3.618724166762504*^9, 3.618724177411113*^9}, {3.618729321696159*^9, 3.618729328067523*^9}, 3.618729374058154*^9, {3.6187294379838104`*^9, 3.618729708464281*^9}, {3.6187297631904106`*^9, 3.618729773195983*^9}, { 3.618729822648812*^9, 3.6187299321490746`*^9}, {3.618729984399063*^9, 3.61873000654133*^9}, {3.6187300746012225`*^9, 3.6187300860458775`*^9}, { 3.618731390835507*^9, 3.6187315116174154`*^9}, {3.618731747324897*^9, 3.6187318214091344`*^9}, {3.6187318769243097`*^9, 3.618732065297084*^9}, { 3.6187321012351394`*^9, 3.618732157420353*^9}, {3.618732188384124*^9, 3.6187322435542793`*^9}, {3.6187322786112847`*^9, 3.6187325478446836`*^9}, {3.6187325819856367`*^9, 3.6187326817653437`*^9}, {3.618732810863728*^9, 3.61873282594359*^9}, { 3.6187336474335766`*^9, 3.618733754678711*^9}, {3.618733827497876*^9, 3.61873396201257*^9}, {3.6187342020362988`*^9, 3.618734236455267*^9}, 3.618734298201799*^9, {3.618734712498495*^9, 3.618734712716508*^9}, 3.6187347739640107`*^9, {3.618738817361748*^9, 3.6187388333816643`*^9}, { 3.6187391349349127`*^9, 3.6187391457955337`*^9}, {3.618739376900752*^9, 3.618739397023903*^9}, {3.618739528394417*^9, 3.618739534809784*^9}, { 3.618739972366811*^9, 3.61873997340687*^9}, {3.6187400416617737`*^9, 3.618740043022852*^9}, {3.6187400971579485`*^9, 3.618740107902563*^9}, { 3.6187401713671927`*^9, 3.6187401723312483`*^9}, {3.6187402613443394`*^9, 3.618740268819767*^9}, {3.6187403697625403`*^9, 3.6187404057615995`*^9}, { 3.618740488277319*^9, 3.618740516244919*^9}, {3.618740647782442*^9, 3.6187406551668644`*^9}, 3.6187407823021364`*^9, {3.6187418050786357`*^9, 3.618741805749674*^9}, {3.6187418557605343`*^9, 3.6187419895921893`*^9}, { 3.618742022944097*^9, 3.61874204379729*^9}, {3.6187420836395683`*^9, 3.618742103384698*^9}, {3.620462440882641*^9, 3.6204624460519366`*^9}, { 3.6204624990259666`*^9, 3.620462576450395*^9}, {3.620463682857678*^9, 3.620463713336421*^9}, 3.6204637901188126`*^9, {3.620464238835478*^9, 3.62046424411378*^9}, 3.628912429385081*^9, {3.6289135207155013`*^9, 3.6289135210805225`*^9}, 3.6289497746958513`*^9, 3.6289498371774254`*^9, { 3.62894988410911*^9, 3.6289500319795675`*^9}, {3.6289501333883677`*^9, 3.628950183744248*^9}, {3.6289503323017445`*^9, 3.628950390181055*^9}, { 3.6289505050536256`*^9, 3.6289505113579865`*^9}, {3.62895070863527*^9, 3.6289507095043197`*^9}, {3.628951013180689*^9, 3.62895101407374*^9}, { 3.629190743153632*^9, 3.629190816645361*^9}, {3.6291909709608326`*^9, 3.629190981678051*^9}, {3.629191034624544*^9, 3.6291910410049553`*^9}, { 3.6293846391370816`*^9, 3.629384641102685*^9}, 3.6294302231277533`*^9, 3.629430298397886*^9, {3.6294304452097435`*^9, 3.6294304461769457`*^9}, 3.629430512991863*^9, {3.629430631630071*^9, 3.6294306397264853`*^9}, { 3.629430697477787*^9, 3.629430801373969*^9}, {3.6294470005483365`*^9, 3.629447006658345*^9}, {3.6294476264402127`*^9, 3.62944766022026*^9}, { 3.629455940543494*^9, 3.6294559434734983`*^9}, {3.6294560037335825`*^9, 3.6294560722536783`*^9}, {3.6294561182137423`*^9, 3.629456154053793*^9}, { 3.6294562173438816`*^9, 3.629456291433985*^9}, 3.629456575994384*^9, { 3.6294571194161444`*^9, 3.629457325936434*^9}, {3.6294573681664925`*^9, 3.629457469696635*^9}, {3.630830822369603*^9, 3.630830833380233*^9}, { 3.6308308916105633`*^9, 3.630830892690625*^9}, {3.630830934683027*^9, 3.6308309652587757`*^9}, {3.630831001140828*^9, 3.6308310302394924`*^9}, { 3.6308311286591215`*^9, 3.6308311872784743`*^9}, {3.6308312724803476`*^9, 3.630831331484722*^9}, {3.630831362277484*^9, 3.630831473963872*^9}, { 3.6308315048656397`*^9, 3.6308315251297984`*^9}, {3.6308500199956975`*^9, 3.630850092130224*^9}, {3.6308926160699577`*^9, 3.630892648580415*^9}, { 3.6308926904976883`*^9, 3.6308930396419015`*^9}, {3.6308931926157703`*^9, 3.6308932605850897`*^9}, {3.630893319631193*^9, 3.6308933413620315`*^9}, { 3.630893371735285*^9, 3.6308933746056895`*^9}, {3.630893484195882*^9, 3.630893495552702*^9}, {3.6308935513072*^9, 3.6308937035322676`*^9}, { 3.630893900966214*^9, 3.630893903165818*^9}, {3.63089401261561*^9, 3.6308940229584284`*^9}, {3.630894084734537*^9, 3.630894141612237*^9}, { 3.6308941732958927`*^9, 3.63089421168756*^9}, {3.6308943234305563`*^9, 3.6308945706597905`*^9}, {3.630894732057674*^9, 3.6308948540342884`*^9}, { 3.6308949175576*^9, 3.6308950352130065`*^9}, {3.6308963280663238`*^9, 3.6308964339281096`*^9}, {3.630896483785797*^9, 3.6308965147216516`*^9}, { 3.630995110764593*^9, 3.6309952194788113`*^9}, 3.631017673702475*^9, 3.6339410343181667`*^9, {3.6339411434394083`*^9, 3.6339413336822896`*^9}, { 3.6339414012381535`*^9, 3.6339415162277308`*^9}, {3.633941550612697*^9, 3.6339415854086876`*^9}, {3.633941898820614*^9, 3.633941918825758*^9}, { 3.633942028814049*^9, 3.6339421351881332`*^9}, 3.6339421753194284`*^9, { 3.6339527595260005`*^9, 3.633952797347164*^9}, {3.6339528326231813`*^9, 3.6339528434568014`*^9}, 3.63395311337924*^9, {3.633953318391966*^9, 3.633953320104064*^9}, {3.6339533894880323`*^9, 3.633953398914572*^9}, { 3.6339534904578075`*^9, 3.6339534909158335`*^9}, {3.6339544324266853`*^9, 3.633954436992946*^9}, {3.633955355536484*^9, 3.633955361782841*^9}, { 3.634613015576932*^9, 3.63461301623897*^9}, {3.6346130510409603`*^9, 3.634613077198457*^9}, 3.634613188324813*^9, {3.6878638635768104`*^9, 3.6878639724170356`*^9}, 3.687864019557732*^9, 3.6878641001403413`*^9, { 3.687864195050747*^9, 3.6878641958857946`*^9}, {3.6878642401333256`*^9, 3.68786426136654*^9}, 3.687864352036726*^9, {3.687864450280345*^9, 3.6878644606039357`*^9}, {3.6878646809015083`*^9, 3.6878646814075365`*^9}, {3.687864779357139*^9, 3.6878648062606783`*^9}, { 3.6878651827021837`*^9, 3.687865213182927*^9}, {3.6878652461998158`*^9, 3.6878652992218485`*^9}, {3.687865350343772*^9, 3.687865355912091*^9}, { 3.687865609571577*^9, 3.6878656309137974`*^9}, {3.687865671576123*^9, 3.6878656918812847`*^9}, 3.687865733639673*^9, {3.6878657691897063`*^9, 3.6878657965562716`*^9}, {3.687865834375435*^9, 3.6878658387066827`*^9}, { 3.687865912326894*^9, 3.6878659163341227`*^9}, {3.6878659782786655`*^9, 3.687866006047254*^9}, {3.6878660595832973`*^9, 3.6878660659666624`*^9}, { 3.6878661218058558`*^9, 3.6878661872325983`*^9}, {3.687866245499931*^9, 3.687866274822608*^9}, 3.687866805421936*^9, {3.6879301815930185`*^9, 3.6879301828630204`*^9}, {3.687930277763153*^9, 3.6879302977631817`*^9}, { 3.6879303280532236`*^9, 3.687930399193323*^9}, {3.6879304307033677`*^9, 3.6879304862434454`*^9}, {3.6879305350435133`*^9, 3.6879306368336563`*^9}, {3.6879308629839725`*^9, 3.6879309443840866`*^9}, {3.6880225059517603`*^9, 3.688022695772026*^9}, { 3.6880227285420723`*^9, 3.688022739402087*^9}, 3.688124666129181*^9, { 3.6882843273150387`*^9, 3.6882845888454046`*^9}, {3.688285837009152*^9, 3.6882858406491575`*^9}, {3.688286818441526*^9, 3.688286844251562*^9}, { 3.6882870165218034`*^9, 3.688287041201838*^9}, {3.68828707122188*^9, 3.68828709261191*^9}, 3.68828714986199*^9, {3.688287467572435*^9, 3.6882874756924467`*^9}, {3.6882875215825105`*^9, 3.688287521962511*^9}, { 3.6924976946811843`*^9, 3.6924978409113894`*^9}, {3.692497927801511*^9, 3.6924979661015644`*^9}, {3.692498035281661*^9, 3.6924981004717526`*^9}, { 3.6924981611518373`*^9, 3.692498164851843*^9}, {3.692498211401908*^9, 3.6924983125120497`*^9}, {3.692502435097616*^9, 3.692502447592331*^9}, { 3.692502485821518*^9, 3.6925024860295296`*^9}, 3.6925027340347147`*^9, { 3.6940858758564043`*^9, 3.6940858848364167`*^9}, {3.6940859944465704`*^9, 3.6940860158966007`*^9}, {3.6940861169567423`*^9, 3.694086419977166*^9}, { 3.6940872923193874`*^9, 3.6940872938293896`*^9}, {3.6940873646994886`*^9, 3.694087369319495*^9}, 3.694087530509721*^9, {3.6945281161723194`*^9, 3.694528128442337*^9}, {3.6945281951824303`*^9, 3.694528217482462*^9}, { 3.694528268612533*^9, 3.694528649083066*^9}, {3.694528693523128*^9, 3.6945286979031343`*^9}, {3.6945781605358806`*^9, 3.6945782254759717`*^9}, {3.6945782921660647`*^9, 3.694578304996083*^9}, { 3.694578337066128*^9, 3.6945783532861505`*^9}, {3.6945783849061947`*^9, 3.6945783866561975`*^9}, {3.6945784400462723`*^9, 3.694578482566332*^9}, 3.694578713616655*^9, {3.7511979506411643`*^9, 3.751197960841903*^9}, { 3.755352558606639*^9, 3.7553526159830475`*^9}, 3.7575038949254227`*^9, { 3.7884241022211647`*^9, 3.788424103002448*^9}, {3.788424158557418*^9, 3.7884241691882877`*^9}, {3.788424255454542*^9, 3.788424261482607*^9}, { 3.78842429669483*^9, 3.788424433254586*^9}, {3.8200255168660507`*^9, 3.820025546496957*^9}, {3.8200255872523527`*^9, 3.8200255963085623`*^9}, { 3.820025628744812*^9, 3.8200257952584977`*^9}, {3.8200260474034243`*^9, 3.820026053432946*^9}}, CellLabel-> "In[191]:=",ExpressionUUID->"9917111a-b82b-483a-b43a-888e173b84e8"] }, Closed]], Cell[CellGroupData[{ Cell["SOLID ELEMENT (nonl) defs ", "Subsection", CellChangeTimes->{{3.629430162287647*^9, 3.6294301631768484`*^9}, { 3.7575037777673283`*^9, 3.7575038085600357`*^9}, 3.7575039711454515`*^9, 3.790129876602686*^9},ExpressionUUID->"5b9b2344-6d28-41c7-a30d-\ 1943c6764594"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", "E8001"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_", ",", "I4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I3", ",", "I4"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_", ",", "I4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r", ",", "FF", ",", "uvw", ",", "DG", ",", "GL", ",", "\[Delta]GL", ",", "SS", ",", "\[Delta]wext", ",", "\[Delta]wint", ",", "EEEE", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "GG", ",", "jac", ",", "FFINV"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I3", ",", "I4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]", "-", "\[Gamma]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "r"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacement", " ", "gradient"}], "*)"}], "\[IndentingNewLine]", RowBox[{"DG", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"GL", "=", RowBox[{ RowBox[{"(", RowBox[{"DG", "+", RowBox[{"Transpose", "[", "DG", "]"}], "+", RowBox[{"DG", ".", RowBox[{"Transpose", "[", "DG", "]"}]}]}], ")"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]GL", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]", "[", "DG", "]"}], "+", RowBox[{"Transpose", "[", RowBox[{"\[Delta]", "[", "DG", "]"}], "]"}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "DG", "]"}], ".", RowBox[{"Transpose", "[", "DG", "]"}]}], "+", RowBox[{"DG", ".", RowBox[{"Transpose", "[", RowBox[{"\[Delta]", "[", "DG", "]"}], "]"}]}]}], ")"}], "/", "2"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "GG"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "/", "GG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"1", "/", "GG"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"PK2", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"SS", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"GL", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", "\[Delta]GL", "]"}], ".", RowBox[{"Flatten", "[", "SS", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TET5", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.4426474258030453`*^9, {3.4444401255942*^9, 3.4444401388073997`*^9}, { 3.4444401803034*^9, 3.4444401844062*^9}, 3.4444402418922*^9, { 3.4444402805022*^9, 3.4444403134026003`*^9}, {3.4444403443062*^9, 3.4444404484049997`*^9}, {3.444483267101*^9, 3.444483267335*^9}, { 3.4444833136046*^9, 3.4444835622998*^9}, {3.4444836421094*^9, 3.4444837777981997`*^9}, {3.444483920429*^9, 3.4444839412237997`*^9}, 3.4444842905546*^9, {3.4444843207406*^9, 3.4444844162282*^9}, { 3.4444844465078*^9, 3.4444844624354*^9}, {3.4444845255998*^9, 3.4444845894505997`*^9}, {3.4444846290746*^9, 3.444484933025*^9}, { 3.4444849790917997`*^9, 3.4444851148742*^9}, {3.444534936054*^9, 3.4445349675348*^9}, {3.4445355821731997`*^9, 3.44453585174*^9}, { 3.4445372162198*^9, 3.4445372264378*^9}, 3.444537384731*^9, { 3.4445377585382*^9, 3.4445377605818*^9}, {3.4445379733658*^9, 3.4445379736934*^9}, {3.4445380176762*^9, 3.444538032777*^9}, { 3.4445381079222*^9, 3.4445381581386003`*^9}, {3.4445382726456003`*^9, 3.4445382910067997`*^9}, {3.4445383401312*^9, 3.4445383475880003`*^9}, { 3.444538438458*^9, 3.4445384464608*^9}, {3.4445385680783997`*^9, 3.4445385687648*^9}, {3.4445389411991997`*^9, 3.4445389431024*^9}, { 3.444539746605*^9, 3.4445397807846003`*^9}, {3.4445408839765997`*^9, 3.4445409234133997`*^9}, {3.4445409681698*^9, 3.4445409932702*^9}, { 3.4445415452906*^9, 3.4445415706717997`*^9}, {3.4445416647242002`*^9, 3.4445416909477997`*^9}, {3.4445417660150003`*^9, 3.444541788557*^9}, { 3.4445420906977997`*^9, 3.444542104847*^9}, {3.4445421885878*^9, 3.4445421941414003`*^9}, {3.4445422252166*^9, 3.4445422386014*^9}, { 3.444542280425*^9, 3.4445423014538*^9}, {3.444542455769*^9, 3.4445424578282003`*^9}, {3.4445431739214*^9, 3.444543175809*^9}, { 3.4445647020962*^9, 3.4445648405618*^9}, {3.4445648825414*^9, 3.4445648858486*^9}, {3.4445649382646*^9, 3.4445651882702*^9}, { 3.4446164822206*^9, 3.4446165344494*^9}, {3.4446166121842003`*^9, 3.4446166738822002`*^9}, {3.4446167223046*^9, 3.4446168047974*^9}, { 3.444616843033*^9, 3.444616906447*^9}, {3.4446444694708*^9, 3.4446444700948*^9}, {3.4446477738310003`*^9, 3.4446477939862003`*^9}, { 3.4446478467298*^9, 3.4446478681018*^9}, 3.4446480456142*^9, { 3.4446487557418003`*^9, 3.4446487636198*^9}, 3.4446488179974003`*^9, { 3.4446488971205997`*^9, 3.4446489152478*^9}, {3.4446490003458*^9, 3.4446490008294*^9}, {3.4447042728942003`*^9, 3.4447042751562*^9}, { 3.4447044703278*^9, 3.4447044865362*^9}, 3.4447046475282*^9, 3.4447047993786*^9, {3.444704908329*^9, 3.4447049292642*^9}, { 3.4447049861926003`*^9, 3.4447049877214003`*^9}, {3.4447050279296*^9, 3.4447050419695997`*^9}, {3.4447053486656*^9, 3.4447053739376*^9}, 3.4447054561963997`*^9, 3.44470561612*^9, {3.4472133996876*^9, 3.4472134108571997`*^9}, {3.4472134470179996`*^9, 3.4472134648332*^9}, { 3.4472135032872*^9, 3.4472135245344*^9}, {3.4472136963059998`*^9, 3.4472137794384003`*^9}, {3.4472138235708*^9, 3.4472138388900003`*^9}, { 3.4472139099792*^9, 3.4472141367096*^9}, {3.447214202682*^9, 3.4472142975924*^9}, {3.4472144187732*^9, 3.4472145910284*^9}, { 3.4472146560492*^9, 3.4472147023968*^9}, {3.447214803594*^9, 3.4472148728736*^9}, {3.4472149156956*^9, 3.447214940484*^9}, { 3.447216227284*^9, 3.4472162419948*^9}, {3.4472163068908*^9, 3.4472163720832*^9}, {3.4472164665880003`*^9, 3.447216530392*^9}, { 3.4472166237268*^9, 3.4472167058452*^9}, 3.4472167362808*^9, { 3.4472171394658003`*^9, 3.4472171532874002`*^9}, {3.4472172028993998`*^9, 3.4472172216661997`*^9}, {3.4472172524606*^9, 3.4472172690278*^9}, { 3.4472173209133997`*^9, 3.4472173334245996`*^9}, {3.4472173920846*^9, 3.447217404861*^9}, {3.4472179572548*^9, 3.4472180351456003`*^9}, { 3.4472509764091997`*^9, 3.4472511017396*^9}, {3.4473910422216*^9, 3.4473912901524*^9}, 3.4473918688344*^9, {3.447392021185*^9, 3.4473920346633997`*^9}, {3.4473921383304*^9, 3.4473921479088*^9}, { 3.4473923024112*^9, 3.4473923734379997`*^9}, {3.4473928098168*^9, 3.4473928648691998`*^9}, {3.4473931872432003`*^9, 3.4473932461800003`*^9}, {3.4473933026675997`*^9, 3.4473934579812*^9}, { 3.4473935755271997`*^9, 3.447393742572*^9}, {3.4473939032676*^9, 3.4473939384144*^9}, {3.447395257644*^9, 3.4473953141628*^9}, { 3.4473954231132*^9, 3.4473954756384*^9}, {3.4473955348716*^9, 3.4473955723272*^9}, {3.447395648502*^9, 3.4473957588876*^9}, { 3.4473957903996*^9, 3.4473958488372*^9}, 3.4473962894154*^9, { 3.447396350817*^9, 3.447396352611*^9}, {3.4474625379146*^9, 3.4474625637326*^9}, {3.558360651728078*^9, 3.558360652102478*^9}, { 3.5619791319820857`*^9, 3.561979135788492*^9}, 3.561979369382504*^9, { 3.5619794930439215`*^9, 3.5619795010155354`*^9}, {3.561979569218855*^9, 3.56197960614412*^9}, {3.5619797417551584`*^9, 3.5619797448751636`*^9}, { 3.618719065033702*^9, 3.618719075426296*^9}, {3.6187194011669273`*^9, 3.6187194449454317`*^9}, {3.6187196998040085`*^9, 3.6187197102436056`*^9}, {3.618719902254588*^9, 3.6187199711455283`*^9}, { 3.618722365406472*^9, 3.6187225412555304`*^9}, {3.6187226885009522`*^9, 3.6187227109872384`*^9}, {3.618722756922866*^9, 3.6187231317203026`*^9}, { 3.618723424250035*^9, 3.6187234267291765`*^9}, {3.6187235105259695`*^9, 3.6187236491028957`*^9}, {3.618723691580325*^9, 3.618723745975436*^9}, { 3.618723778837316*^9, 3.6187238310002995`*^9}, {3.6187239055875654`*^9, 3.618723940035536*^9}, {3.6187239782667227`*^9, 3.6187240219352207`*^9}, { 3.618724166762504*^9, 3.618724177411113*^9}, {3.618729321696159*^9, 3.618729328067523*^9}, 3.618729374058154*^9, {3.6187294379838104`*^9, 3.618729708464281*^9}, {3.6187297631904106`*^9, 3.618729773195983*^9}, { 3.618729822648812*^9, 3.6187299321490746`*^9}, {3.618729984399063*^9, 3.61873000654133*^9}, {3.6187300746012225`*^9, 3.6187300860458775`*^9}, { 3.618731390835507*^9, 3.6187315116174154`*^9}, {3.618731747324897*^9, 3.6187318214091344`*^9}, {3.6187318769243097`*^9, 3.618732065297084*^9}, { 3.6187321012351394`*^9, 3.618732157420353*^9}, {3.618732188384124*^9, 3.6187322435542793`*^9}, {3.6187322786112847`*^9, 3.6187325478446836`*^9}, {3.6187325819856367`*^9, 3.6187326817653437`*^9}, {3.618732810863728*^9, 3.61873282594359*^9}, { 3.6187336474335766`*^9, 3.618733754678711*^9}, {3.618733827497876*^9, 3.61873396201257*^9}, {3.6187342020362988`*^9, 3.618734236455267*^9}, 3.618734298201799*^9, {3.618734712498495*^9, 3.618734712716508*^9}, 3.6187347739640107`*^9, {3.618738817361748*^9, 3.6187388333816643`*^9}, { 3.6187391349349127`*^9, 3.6187391457955337`*^9}, {3.618739376900752*^9, 3.618739397023903*^9}, {3.618739528394417*^9, 3.618739534809784*^9}, { 3.618739972366811*^9, 3.61873997340687*^9}, {3.6187400416617737`*^9, 3.618740043022852*^9}, {3.6187400971579485`*^9, 3.618740107902563*^9}, { 3.6187401713671927`*^9, 3.6187401723312483`*^9}, {3.6187402613443394`*^9, 3.618740268819767*^9}, {3.6187403697625403`*^9, 3.6187404057615995`*^9}, { 3.618740488277319*^9, 3.618740516244919*^9}, {3.618740647782442*^9, 3.6187406551668644`*^9}, 3.6187407823021364`*^9, {3.6187418050786357`*^9, 3.618741805749674*^9}, {3.6187418557605343`*^9, 3.6187419895921893`*^9}, { 3.618742022944097*^9, 3.61874204379729*^9}, {3.6187420836395683`*^9, 3.618742103384698*^9}, {3.620462440882641*^9, 3.6204624460519366`*^9}, { 3.6204624990259666`*^9, 3.620462576450395*^9}, {3.620463682857678*^9, 3.620463713336421*^9}, 3.6204637901188126`*^9, {3.620464238835478*^9, 3.62046424411378*^9}, 3.628912429385081*^9, {3.6289135207155013`*^9, 3.6289135210805225`*^9}, 3.6289497746958513`*^9, 3.6289498371774254`*^9, { 3.62894988410911*^9, 3.6289500319795675`*^9}, {3.6289501333883677`*^9, 3.628950183744248*^9}, {3.6289503323017445`*^9, 3.628950390181055*^9}, { 3.6289505050536256`*^9, 3.6289505113579865`*^9}, {3.62895070863527*^9, 3.6289507095043197`*^9}, {3.628951013180689*^9, 3.62895101407374*^9}, { 3.629190743153632*^9, 3.629190816645361*^9}, {3.6291909709608326`*^9, 3.629190981678051*^9}, {3.629191034624544*^9, 3.6291910410049553`*^9}, { 3.6293846391370816`*^9, 3.629384641102685*^9}, 3.6294302231277533`*^9, 3.629430298397886*^9, {3.6294304452097435`*^9, 3.6294304461769457`*^9}, 3.629430512991863*^9, {3.629430631630071*^9, 3.6294306397264853`*^9}, { 3.629430697477787*^9, 3.629430801373969*^9}, {3.6294470005483365`*^9, 3.629447006658345*^9}, {3.6294476264402127`*^9, 3.62944766022026*^9}, { 3.629455940543494*^9, 3.6294559434734983`*^9}, {3.6294560037335825`*^9, 3.6294560722536783`*^9}, {3.6294561182137423`*^9, 3.629456154053793*^9}, { 3.6294562173438816`*^9, 3.629456291433985*^9}, 3.629456575994384*^9, { 3.6294571194161444`*^9, 3.629457325936434*^9}, {3.6294573681664925`*^9, 3.629457469696635*^9}, {3.630830822369603*^9, 3.630830833380233*^9}, { 3.6308308916105633`*^9, 3.630830892690625*^9}, {3.630830934683027*^9, 3.6308309652587757`*^9}, {3.630831001140828*^9, 3.6308310302394924`*^9}, { 3.6308311286591215`*^9, 3.6308311872784743`*^9}, {3.6308312724803476`*^9, 3.630831331484722*^9}, {3.630831362277484*^9, 3.630831473963872*^9}, { 3.6308315048656397`*^9, 3.6308315251297984`*^9}, {3.6308500199956975`*^9, 3.630850092130224*^9}, {3.6308926160699577`*^9, 3.630892648580415*^9}, { 3.6308926904976883`*^9, 3.6308930396419015`*^9}, {3.6308931926157703`*^9, 3.6308932605850897`*^9}, {3.630893319631193*^9, 3.6308933413620315`*^9}, { 3.630893371735285*^9, 3.6308933746056895`*^9}, {3.630893484195882*^9, 3.630893495552702*^9}, {3.6308935513072*^9, 3.6308937035322676`*^9}, { 3.630893900966214*^9, 3.630893903165818*^9}, {3.63089401261561*^9, 3.6308940229584284`*^9}, {3.630894084734537*^9, 3.630894141612237*^9}, { 3.6308941732958927`*^9, 3.63089421168756*^9}, {3.6308943234305563`*^9, 3.6308945706597905`*^9}, {3.630894732057674*^9, 3.6308948540342884`*^9}, { 3.6308949175576*^9, 3.6308950352130065`*^9}, {3.6308963280663238`*^9, 3.6308964339281096`*^9}, {3.630896483785797*^9, 3.6308965147216516`*^9}, { 3.630995110764593*^9, 3.6309952194788113`*^9}, 3.631017673702475*^9, 3.6339410343181667`*^9, {3.6339411434394083`*^9, 3.6339413336822896`*^9}, { 3.6339414012381535`*^9, 3.6339415162277308`*^9}, {3.633941550612697*^9, 3.6339415854086876`*^9}, {3.633941898820614*^9, 3.633941918825758*^9}, { 3.633942028814049*^9, 3.6339421351881332`*^9}, 3.6339421753194284`*^9, { 3.6339527595260005`*^9, 3.633952797347164*^9}, {3.6339528326231813`*^9, 3.6339528434568014`*^9}, 3.63395311337924*^9, {3.633953318391966*^9, 3.633953320104064*^9}, {3.6339533894880323`*^9, 3.633953398914572*^9}, { 3.6339534904578075`*^9, 3.6339534909158335`*^9}, {3.6339544324266853`*^9, 3.633954436992946*^9}, {3.633955355536484*^9, 3.633955361782841*^9}, { 3.634613015576932*^9, 3.63461301623897*^9}, {3.6346130510409603`*^9, 3.634613077198457*^9}, 3.634613188324813*^9, {3.6878638635768104`*^9, 3.6878639724170356`*^9}, 3.687864019557732*^9, 3.6878641001403413`*^9, { 3.687864195050747*^9, 3.6878641958857946`*^9}, {3.6878642401333256`*^9, 3.68786426136654*^9}, 3.687864352036726*^9, {3.687864450280345*^9, 3.6878644606039357`*^9}, {3.6878646809015083`*^9, 3.6878646814075365`*^9}, {3.687864779357139*^9, 3.6878648062606783`*^9}, { 3.6878651827021837`*^9, 3.687865213182927*^9}, {3.6878652461998158`*^9, 3.6878652992218485`*^9}, {3.687865350343772*^9, 3.687865355912091*^9}, { 3.687865609571577*^9, 3.6878656309137974`*^9}, {3.687865671576123*^9, 3.6878656918812847`*^9}, 3.687865733639673*^9, {3.6878657691897063`*^9, 3.6878657965562716`*^9}, {3.687865834375435*^9, 3.6878658387066827`*^9}, { 3.687865912326894*^9, 3.6878659163341227`*^9}, {3.6878659782786655`*^9, 3.687866006047254*^9}, {3.6878660595832973`*^9, 3.6878660659666624`*^9}, { 3.6878661218058558`*^9, 3.6878661872325983`*^9}, {3.687866245499931*^9, 3.687866274822608*^9}, 3.687866805421936*^9, {3.6879301815930185`*^9, 3.6879301828630204`*^9}, {3.687930277763153*^9, 3.6879302977631817`*^9}, { 3.6879303280532236`*^9, 3.687930399193323*^9}, {3.6879304307033677`*^9, 3.6879304862434454`*^9}, {3.6879305350435133`*^9, 3.6879306368336563`*^9}, {3.6879308629839725`*^9, 3.6879309443840866`*^9}, {3.6880225059517603`*^9, 3.688022695772026*^9}, { 3.6880227285420723`*^9, 3.688022739402087*^9}, 3.688124666129181*^9, { 3.6882843273150387`*^9, 3.6882845888454046`*^9}, {3.688285837009152*^9, 3.6882858406491575`*^9}, {3.688286818441526*^9, 3.688286844251562*^9}, { 3.6882870165218034`*^9, 3.688287041201838*^9}, {3.68828707122188*^9, 3.68828709261191*^9}, 3.68828714986199*^9, {3.688287467572435*^9, 3.6882874756924467`*^9}, {3.6882875215825105`*^9, 3.688287521962511*^9}, { 3.6924976946811843`*^9, 3.6924978409113894`*^9}, {3.692497927801511*^9, 3.6924979661015644`*^9}, {3.692498035281661*^9, 3.6924981004717526`*^9}, { 3.6924981611518373`*^9, 3.692498164851843*^9}, {3.692498211401908*^9, 3.6924983125120497`*^9}, {3.692502435097616*^9, 3.692502447592331*^9}, { 3.692502485821518*^9, 3.6925024860295296`*^9}, 3.6925027340347147`*^9, { 3.6940858758564043`*^9, 3.6940858848364167`*^9}, {3.6940859944465704`*^9, 3.6940860158966007`*^9}, {3.6940861169567423`*^9, 3.694086419977166*^9}, { 3.6940872923193874`*^9, 3.6940872938293896`*^9}, {3.6940873646994886`*^9, 3.694087369319495*^9}, 3.694087530509721*^9, {3.6945281161723194`*^9, 3.694528128442337*^9}, {3.6945281951824303`*^9, 3.694528217482462*^9}, { 3.694528268612533*^9, 3.694528649083066*^9}, {3.694528693523128*^9, 3.6945286979031343`*^9}, {3.6945781605358806`*^9, 3.6945782254759717`*^9}, {3.6945782921660647`*^9, 3.694578304996083*^9}, { 3.694578337066128*^9, 3.6945783532861505`*^9}, {3.6945783849061947`*^9, 3.6945783866561975`*^9}, {3.6945784400462723`*^9, 3.694578482566332*^9}, 3.694578713616655*^9, {3.7511979506411643`*^9, 3.751197960841903*^9}, { 3.755352558606639*^9, 3.7553526159830475`*^9}, {3.7575040694816446`*^9, 3.757504093838356*^9}, {3.7901321001392207`*^9, 3.7901321234170127`*^9}, { 3.8216149607895*^9, 3.821615019490923*^9}}, CellLabel-> "In[195]:=",ExpressionUUID->"7a3e4ae7-d95b-47bb-85dd-24623cf64400"] }, Closed]], Cell[CellGroupData[{ Cell["SOLID ELEMENT (tmec) defs ", "Subsection", CellChangeTimes->{{3.629430162287647*^9, 3.6294301631768484`*^9}, { 3.7575037777673283`*^9, 3.7575038085600357`*^9}, 3.757503967837716*^9, { 3.790129869617339*^9, 3.790129870017767*^9}},ExpressionUUID->"2201b58f-dad0-41eb-9809-\ 747a032c8c90"], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"MEC", "-", "E8001"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"TMEC", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "EE_", ",", "\[Nu]\[Nu]_", ",", "\[Alpha]\[Alpha]_", ",", "kk_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "ss_", ",", "\[CurlyTheta]0_"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_", ",", "I4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r", ",", "FF", ",", "uvw", ",", "\[CurlyTheta]\[CurlyTheta]", ",", "Duvw", ",", "D\[CurlyTheta]\[CurlyTheta]", ",", "\[Sigma]", ",", "\[Rho]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "EEEE", ",", "\[Delta]w\[Sigma]", ",", "\[Epsilon]", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "GG", ",", "jac", ",", "FFINV", ",", "\[Delta]wext", ",", "\[Delta]wint", ",", "\[Delta]pext", ",", "\[Delta]pint"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I3", ",", "I4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Xi]", ",", "\[Eta]", ",", "\[Zeta]", ",", RowBox[{"1", "-", "\[Xi]", "-", "\[Eta]", "-", "\[Zeta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Eta]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Zeta]"], "r"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CurlyTheta]\[CurlyTheta]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "4"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "gradients", "*)"}], "\[IndentingNewLine]", RowBox[{"Duvw", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Eta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Zeta]"], "uvw"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"D\[CurlyTheta]\[CurlyTheta]", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Xi]"], "\[CurlyTheta]\[CurlyTheta]"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Eta]"], "\[CurlyTheta]\[CurlyTheta]"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Zeta]"], "\[CurlyTheta]\[CurlyTheta]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "GG"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "/", "GG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"1", "/", "GG"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"nonsymmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"Duvw", "-", RowBox[{ RowBox[{"IdentityMatrix", "[", "3", "]"}], "*", "\[Alpha]\[Alpha]", "*", RowBox[{"(", RowBox[{"\[CurlyTheta]\[CurlyTheta]", "-", "\[CurlyTheta]0"}], ")"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]\[Delta]", "[", "Duvw", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]pint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{ "\[Delta]\[Delta]", "[", "D\[CurlyTheta]\[CurlyTheta]", "]"}], ".", "D\[CurlyTheta]\[CurlyTheta]"}]}], "*", "kk"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]pext", "=", " ", RowBox[{ RowBox[{"\[Delta]\[Delta]", "[", "\[CurlyTheta]\[CurlyTheta]", "]"}], "*", "ss"}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TET5", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wext", "+", "\[Delta]wint", "+", "\[Delta]pext", "+", "\[Delta]pint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "\[Eta]", ",", "\[Zeta]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.4426474258030453`*^9, {3.4444401255942*^9, 3.4444401388073997`*^9}, { 3.4444401803034*^9, 3.4444401844062*^9}, 3.4444402418922*^9, { 3.4444402805022*^9, 3.4444403134026003`*^9}, {3.4444403443062*^9, 3.4444404484049997`*^9}, {3.444483267101*^9, 3.444483267335*^9}, { 3.4444833136046*^9, 3.4444835622998*^9}, {3.4444836421094*^9, 3.4444837777981997`*^9}, {3.444483920429*^9, 3.4444839412237997`*^9}, 3.4444842905546*^9, {3.4444843207406*^9, 3.4444844162282*^9}, { 3.4444844465078*^9, 3.4444844624354*^9}, {3.4444845255998*^9, 3.4444845894505997`*^9}, {3.4444846290746*^9, 3.444484933025*^9}, { 3.4444849790917997`*^9, 3.4444851148742*^9}, {3.444534936054*^9, 3.4445349675348*^9}, {3.4445355821731997`*^9, 3.44453585174*^9}, { 3.4445372162198*^9, 3.4445372264378*^9}, 3.444537384731*^9, { 3.4445377585382*^9, 3.4445377605818*^9}, {3.4445379733658*^9, 3.4445379736934*^9}, {3.4445380176762*^9, 3.444538032777*^9}, { 3.4445381079222*^9, 3.4445381581386003`*^9}, {3.4445382726456003`*^9, 3.4445382910067997`*^9}, {3.4445383401312*^9, 3.4445383475880003`*^9}, { 3.444538438458*^9, 3.4445384464608*^9}, {3.4445385680783997`*^9, 3.4445385687648*^9}, {3.4445389411991997`*^9, 3.4445389431024*^9}, { 3.444539746605*^9, 3.4445397807846003`*^9}, {3.4445408839765997`*^9, 3.4445409234133997`*^9}, {3.4445409681698*^9, 3.4445409932702*^9}, { 3.4445415452906*^9, 3.4445415706717997`*^9}, {3.4445416647242002`*^9, 3.4445416909477997`*^9}, {3.4445417660150003`*^9, 3.444541788557*^9}, { 3.4445420906977997`*^9, 3.444542104847*^9}, {3.4445421885878*^9, 3.4445421941414003`*^9}, {3.4445422252166*^9, 3.4445422386014*^9}, { 3.444542280425*^9, 3.4445423014538*^9}, {3.444542455769*^9, 3.4445424578282003`*^9}, {3.4445431739214*^9, 3.444543175809*^9}, { 3.4445647020962*^9, 3.4445648405618*^9}, {3.4445648825414*^9, 3.4445648858486*^9}, {3.4445649382646*^9, 3.4445651882702*^9}, { 3.4446164822206*^9, 3.4446165344494*^9}, {3.4446166121842003`*^9, 3.4446166738822002`*^9}, {3.4446167223046*^9, 3.4446168047974*^9}, { 3.444616843033*^9, 3.444616906447*^9}, {3.4446444694708*^9, 3.4446444700948*^9}, {3.4446477738310003`*^9, 3.4446477939862003`*^9}, { 3.4446478467298*^9, 3.4446478681018*^9}, 3.4446480456142*^9, { 3.4446487557418003`*^9, 3.4446487636198*^9}, 3.4446488179974003`*^9, { 3.4446488971205997`*^9, 3.4446489152478*^9}, {3.4446490003458*^9, 3.4446490008294*^9}, {3.4447042728942003`*^9, 3.4447042751562*^9}, { 3.4447044703278*^9, 3.4447044865362*^9}, 3.4447046475282*^9, 3.4447047993786*^9, {3.444704908329*^9, 3.4447049292642*^9}, { 3.4447049861926003`*^9, 3.4447049877214003`*^9}, {3.4447050279296*^9, 3.4447050419695997`*^9}, {3.4447053486656*^9, 3.4447053739376*^9}, 3.4447054561963997`*^9, 3.44470561612*^9, {3.4472133996876*^9, 3.4472134108571997`*^9}, {3.4472134470179996`*^9, 3.4472134648332*^9}, { 3.4472135032872*^9, 3.4472135245344*^9}, {3.4472136963059998`*^9, 3.4472137794384003`*^9}, {3.4472138235708*^9, 3.4472138388900003`*^9}, { 3.4472139099792*^9, 3.4472141367096*^9}, {3.447214202682*^9, 3.4472142975924*^9}, {3.4472144187732*^9, 3.4472145910284*^9}, { 3.4472146560492*^9, 3.4472147023968*^9}, {3.447214803594*^9, 3.4472148728736*^9}, {3.4472149156956*^9, 3.447214940484*^9}, { 3.447216227284*^9, 3.4472162419948*^9}, {3.4472163068908*^9, 3.4472163720832*^9}, {3.4472164665880003`*^9, 3.447216530392*^9}, { 3.4472166237268*^9, 3.4472167058452*^9}, 3.4472167362808*^9, { 3.4472171394658003`*^9, 3.4472171532874002`*^9}, {3.4472172028993998`*^9, 3.4472172216661997`*^9}, {3.4472172524606*^9, 3.4472172690278*^9}, { 3.4472173209133997`*^9, 3.4472173334245996`*^9}, {3.4472173920846*^9, 3.447217404861*^9}, {3.4472179572548*^9, 3.4472180351456003`*^9}, { 3.4472509764091997`*^9, 3.4472511017396*^9}, {3.4473910422216*^9, 3.4473912901524*^9}, 3.4473918688344*^9, {3.447392021185*^9, 3.4473920346633997`*^9}, {3.4473921383304*^9, 3.4473921479088*^9}, { 3.4473923024112*^9, 3.4473923734379997`*^9}, {3.4473928098168*^9, 3.4473928648691998`*^9}, {3.4473931872432003`*^9, 3.4473932461800003`*^9}, {3.4473933026675997`*^9, 3.4473934579812*^9}, { 3.4473935755271997`*^9, 3.447393742572*^9}, {3.4473939032676*^9, 3.4473939384144*^9}, {3.447395257644*^9, 3.4473953141628*^9}, { 3.4473954231132*^9, 3.4473954756384*^9}, {3.4473955348716*^9, 3.4473955723272*^9}, {3.447395648502*^9, 3.4473957588876*^9}, { 3.4473957903996*^9, 3.4473958488372*^9}, 3.4473962894154*^9, { 3.447396350817*^9, 3.447396352611*^9}, {3.4474625379146*^9, 3.4474625637326*^9}, {3.558360651728078*^9, 3.558360652102478*^9}, { 3.5619791319820857`*^9, 3.561979135788492*^9}, 3.561979369382504*^9, { 3.5619794930439215`*^9, 3.5619795010155354`*^9}, {3.561979569218855*^9, 3.56197960614412*^9}, {3.5619797417551584`*^9, 3.5619797448751636`*^9}, { 3.618719065033702*^9, 3.618719075426296*^9}, {3.6187194011669273`*^9, 3.6187194449454317`*^9}, {3.6187196998040085`*^9, 3.6187197102436056`*^9}, {3.618719902254588*^9, 3.6187199711455283`*^9}, { 3.618722365406472*^9, 3.6187225412555304`*^9}, {3.6187226885009522`*^9, 3.6187227109872384`*^9}, {3.618722756922866*^9, 3.6187231317203026`*^9}, { 3.618723424250035*^9, 3.6187234267291765`*^9}, {3.6187235105259695`*^9, 3.6187236491028957`*^9}, {3.618723691580325*^9, 3.618723745975436*^9}, { 3.618723778837316*^9, 3.6187238310002995`*^9}, {3.6187239055875654`*^9, 3.618723940035536*^9}, {3.6187239782667227`*^9, 3.6187240219352207`*^9}, { 3.618724166762504*^9, 3.618724177411113*^9}, {3.618729321696159*^9, 3.618729328067523*^9}, 3.618729374058154*^9, {3.6187294379838104`*^9, 3.618729708464281*^9}, {3.6187297631904106`*^9, 3.618729773195983*^9}, { 3.618729822648812*^9, 3.6187299321490746`*^9}, {3.618729984399063*^9, 3.61873000654133*^9}, {3.6187300746012225`*^9, 3.6187300860458775`*^9}, { 3.618731390835507*^9, 3.6187315116174154`*^9}, {3.618731747324897*^9, 3.6187318214091344`*^9}, {3.6187318769243097`*^9, 3.618732065297084*^9}, { 3.6187321012351394`*^9, 3.618732157420353*^9}, {3.618732188384124*^9, 3.6187322435542793`*^9}, {3.6187322786112847`*^9, 3.6187325478446836`*^9}, {3.6187325819856367`*^9, 3.6187326817653437`*^9}, {3.618732810863728*^9, 3.61873282594359*^9}, { 3.6187336474335766`*^9, 3.618733754678711*^9}, {3.618733827497876*^9, 3.61873396201257*^9}, {3.6187342020362988`*^9, 3.618734236455267*^9}, 3.618734298201799*^9, {3.618734712498495*^9, 3.618734712716508*^9}, 3.6187347739640107`*^9, {3.618738817361748*^9, 3.6187388333816643`*^9}, { 3.6187391349349127`*^9, 3.6187391457955337`*^9}, {3.618739376900752*^9, 3.618739397023903*^9}, {3.618739528394417*^9, 3.618739534809784*^9}, { 3.618739972366811*^9, 3.61873997340687*^9}, {3.6187400416617737`*^9, 3.618740043022852*^9}, {3.6187400971579485`*^9, 3.618740107902563*^9}, { 3.6187401713671927`*^9, 3.6187401723312483`*^9}, {3.6187402613443394`*^9, 3.618740268819767*^9}, {3.6187403697625403`*^9, 3.6187404057615995`*^9}, { 3.618740488277319*^9, 3.618740516244919*^9}, {3.618740647782442*^9, 3.6187406551668644`*^9}, 3.6187407823021364`*^9, {3.6187418050786357`*^9, 3.618741805749674*^9}, {3.6187418557605343`*^9, 3.6187419895921893`*^9}, { 3.618742022944097*^9, 3.61874204379729*^9}, {3.6187420836395683`*^9, 3.618742103384698*^9}, {3.620462440882641*^9, 3.6204624460519366`*^9}, { 3.6204624990259666`*^9, 3.620462576450395*^9}, {3.620463682857678*^9, 3.620463713336421*^9}, 3.6204637901188126`*^9, {3.620464238835478*^9, 3.62046424411378*^9}, 3.628912429385081*^9, {3.6289135207155013`*^9, 3.6289135210805225`*^9}, 3.6289497746958513`*^9, 3.6289498371774254`*^9, { 3.62894988410911*^9, 3.6289500319795675`*^9}, {3.6289501333883677`*^9, 3.628950183744248*^9}, {3.6289503323017445`*^9, 3.628950390181055*^9}, { 3.6289505050536256`*^9, 3.6289505113579865`*^9}, {3.62895070863527*^9, 3.6289507095043197`*^9}, {3.628951013180689*^9, 3.62895101407374*^9}, { 3.629190743153632*^9, 3.629190816645361*^9}, {3.6291909709608326`*^9, 3.629190981678051*^9}, {3.629191034624544*^9, 3.6291910410049553`*^9}, { 3.6293846391370816`*^9, 3.629384641102685*^9}, 3.6294302231277533`*^9, 3.629430298397886*^9, {3.6294304452097435`*^9, 3.6294304461769457`*^9}, 3.629430512991863*^9, {3.629430631630071*^9, 3.6294306397264853`*^9}, { 3.629430697477787*^9, 3.629430801373969*^9}, {3.6294470005483365`*^9, 3.629447006658345*^9}, {3.6294476264402127`*^9, 3.62944766022026*^9}, { 3.629455940543494*^9, 3.6294559434734983`*^9}, {3.6294560037335825`*^9, 3.6294560722536783`*^9}, {3.6294561182137423`*^9, 3.629456154053793*^9}, { 3.6294562173438816`*^9, 3.629456291433985*^9}, 3.629456575994384*^9, { 3.6294571194161444`*^9, 3.629457325936434*^9}, {3.6294573681664925`*^9, 3.629457469696635*^9}, {3.630830822369603*^9, 3.630830833380233*^9}, { 3.6308308916105633`*^9, 3.630830892690625*^9}, {3.630830934683027*^9, 3.6308309652587757`*^9}, {3.630831001140828*^9, 3.6308310302394924`*^9}, { 3.6308311286591215`*^9, 3.6308311872784743`*^9}, {3.6308312724803476`*^9, 3.630831331484722*^9}, {3.630831362277484*^9, 3.630831473963872*^9}, { 3.6308315048656397`*^9, 3.6308315251297984`*^9}, {3.6308500199956975`*^9, 3.630850092130224*^9}, {3.6308926160699577`*^9, 3.630892648580415*^9}, { 3.6308926904976883`*^9, 3.6308930396419015`*^9}, {3.6308931926157703`*^9, 3.6308932605850897`*^9}, {3.630893319631193*^9, 3.6308933413620315`*^9}, { 3.630893371735285*^9, 3.6308933746056895`*^9}, {3.630893484195882*^9, 3.630893495552702*^9}, {3.6308935513072*^9, 3.6308937035322676`*^9}, { 3.630893900966214*^9, 3.630893903165818*^9}, {3.63089401261561*^9, 3.6308940229584284`*^9}, {3.630894084734537*^9, 3.630894141612237*^9}, { 3.6308941732958927`*^9, 3.63089421168756*^9}, {3.6308943234305563`*^9, 3.6308945706597905`*^9}, {3.630894732057674*^9, 3.6308948540342884`*^9}, { 3.6308949175576*^9, 3.6308950352130065`*^9}, {3.6308963280663238`*^9, 3.6308964339281096`*^9}, {3.630896483785797*^9, 3.6308965147216516`*^9}, { 3.630995110764593*^9, 3.6309952194788113`*^9}, 3.631017673702475*^9, 3.6339410343181667`*^9, {3.6339411434394083`*^9, 3.6339413336822896`*^9}, { 3.6339414012381535`*^9, 3.6339415162277308`*^9}, {3.633941550612697*^9, 3.6339415854086876`*^9}, {3.633941898820614*^9, 3.633941918825758*^9}, { 3.633942028814049*^9, 3.6339421351881332`*^9}, 3.6339421753194284`*^9, { 3.6339527595260005`*^9, 3.633952797347164*^9}, {3.6339528326231813`*^9, 3.6339528434568014`*^9}, 3.63395311337924*^9, {3.633953318391966*^9, 3.633953320104064*^9}, {3.6339533894880323`*^9, 3.633953398914572*^9}, { 3.6339534904578075`*^9, 3.6339534909158335`*^9}, {3.6339544324266853`*^9, 3.633954436992946*^9}, {3.633955355536484*^9, 3.633955361782841*^9}, { 3.634613015576932*^9, 3.63461301623897*^9}, {3.6346130510409603`*^9, 3.634613077198457*^9}, 3.634613188324813*^9, {3.6878638635768104`*^9, 3.6878639724170356`*^9}, 3.687864019557732*^9, 3.6878641001403413`*^9, { 3.687864195050747*^9, 3.6878641958857946`*^9}, {3.6878642401333256`*^9, 3.68786426136654*^9}, 3.687864352036726*^9, {3.687864450280345*^9, 3.6878644606039357`*^9}, {3.6878646809015083`*^9, 3.6878646814075365`*^9}, {3.687864779357139*^9, 3.6878648062606783`*^9}, { 3.6878651827021837`*^9, 3.687865213182927*^9}, {3.6878652461998158`*^9, 3.6878652992218485`*^9}, {3.687865350343772*^9, 3.687865355912091*^9}, { 3.687865609571577*^9, 3.6878656309137974`*^9}, {3.687865671576123*^9, 3.6878656918812847`*^9}, 3.687865733639673*^9, {3.6878657691897063`*^9, 3.6878657965562716`*^9}, {3.687865834375435*^9, 3.6878658387066827`*^9}, { 3.687865912326894*^9, 3.6878659163341227`*^9}, {3.6878659782786655`*^9, 3.687866006047254*^9}, {3.6878660595832973`*^9, 3.6878660659666624`*^9}, { 3.6878661218058558`*^9, 3.6878661872325983`*^9}, {3.687866245499931*^9, 3.687866274822608*^9}, 3.687866805421936*^9, {3.6879301815930185`*^9, 3.6879301828630204`*^9}, {3.687930277763153*^9, 3.6879302977631817`*^9}, { 3.6879303280532236`*^9, 3.687930399193323*^9}, {3.6879304307033677`*^9, 3.6879304862434454`*^9}, {3.6879305350435133`*^9, 3.6879306368336563`*^9}, {3.6879308629839725`*^9, 3.6879309443840866`*^9}, {3.6880225059517603`*^9, 3.688022695772026*^9}, { 3.6880227285420723`*^9, 3.688022739402087*^9}, 3.688124666129181*^9, { 3.6882843273150387`*^9, 3.6882845888454046`*^9}, {3.688285837009152*^9, 3.6882858406491575`*^9}, {3.688286818441526*^9, 3.688286844251562*^9}, { 3.6882870165218034`*^9, 3.688287041201838*^9}, {3.68828707122188*^9, 3.68828709261191*^9}, 3.68828714986199*^9, {3.688287467572435*^9, 3.6882874756924467`*^9}, {3.6882875215825105`*^9, 3.688287521962511*^9}, { 3.6924976946811843`*^9, 3.6924978409113894`*^9}, {3.692497927801511*^9, 3.6924979661015644`*^9}, {3.692498035281661*^9, 3.6924981004717526`*^9}, { 3.6924981611518373`*^9, 3.692498164851843*^9}, {3.692498211401908*^9, 3.6924983125120497`*^9}, {3.692502435097616*^9, 3.692502447592331*^9}, { 3.692502485821518*^9, 3.6925024860295296`*^9}, 3.6925027340347147`*^9, { 3.6940858758564043`*^9, 3.6940858848364167`*^9}, {3.6940859944465704`*^9, 3.6940860158966007`*^9}, {3.6940861169567423`*^9, 3.694086419977166*^9}, { 3.6940872923193874`*^9, 3.6940872938293896`*^9}, {3.6940873646994886`*^9, 3.694087369319495*^9}, 3.694087530509721*^9, {3.6945281161723194`*^9, 3.694528128442337*^9}, {3.6945281951824303`*^9, 3.694528217482462*^9}, { 3.694528268612533*^9, 3.694528649083066*^9}, {3.694528693523128*^9, 3.6945286979031343`*^9}, {3.6945781605358806`*^9, 3.6945782254759717`*^9}, {3.6945782921660647`*^9, 3.694578304996083*^9}, { 3.694578337066128*^9, 3.6945783532861505`*^9}, {3.6945783849061947`*^9, 3.6945783866561975`*^9}, {3.6945784400462723`*^9, 3.694578482566332*^9}, 3.694578713616655*^9, {3.7511979506411643`*^9, 3.751197960841903*^9}, { 3.755352558606639*^9, 3.7553526159830475`*^9}, {3.7901319321297035`*^9, 3.790131942849823*^9}, {3.790132020952048*^9, 3.790132043231386*^9}, 3.7901320781631036`*^9, {3.8223695908336563`*^9, 3.8223695921212144`*^9}}, CellLabel-> "In[197]:=",ExpressionUUID->"af03442a-e0f0-45b5-b640-b53fb5e99224"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", "node_", "]"}]}], "}"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"MODE", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", "node_", "]"}]}], "}"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"MODE", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX", ",", "fY", ",", "fZ", ",", "mX", ",", "mY", ",", "mZ"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_", ",", "I4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "ns", ",", "NN", ",", "r", ",", "FF", ",", "PP", ",", "uvw", ",", "\[Phi]\[Theta]\[Psi]", ",", "Duvw", ",", "\[Sigma]\[Sigma]", ",", "\[Sigma]", ",", "\[Rho]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "EEEE", ",", "\[Delta]w\[Sigma]", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "e", ",", "ee", ",", "\[Epsilon]", ",", "EM", ",", "GM", ",", "GG", ",", "nl", ",", "jac", ",", "FFINV"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I3", ",", "I4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]", "-", "\[Gamma]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "r"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{ RowBox[{"L", ">", "0"}], "&&", RowBox[{"h", ">", "0"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacement", " ", "gradient"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "GG"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "/", "GG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"1", "/", "GG"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"nonsymmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TET5", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Hexahedron", "[", "node_", "]"}]}], "}"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"MODE", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "}"}], ",", RowBox[{"Hexahedron", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "I1_", ",", "I2_", ",", "I3_", ",", "I4_", ",", "I5_", ",", "I6_", ",", "I7_", ",", "I8_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "ns", ",", "NN", ",", "r", ",", "FF", ",", "PP", ",", "uvw", ",", "\[Phi]\[Theta]\[Psi]", ",", "Duvw", ",", "\[Sigma]\[Sigma]", ",", "\[Sigma]", ",", "\[Rho]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "EEEE", ",", "\[Delta]w\[Sigma]", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "GG", ",", "nl", ",", "jac", ",", "FFINV", ",", "\[Epsilon]", ",", "\[Delta]wext", ",", "\[Delta]wint"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{ "I1", ",", "I2", ",", "I3", ",", "I4", ",", "I5", ",", "I6", ",", "I7", ",", "I8"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]", RowBox[{"(", RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]", RowBox[{"(", RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}], "\[Gamma]"}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}], "\[Gamma]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]", " ", "\[Gamma]"}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]", " ", "\[Gamma]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "r"}]}], "}"}], " ", "/.", " ", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", " ", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Gamma]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacement", " ", "gradient"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "GG"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "/", "GG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"1", "/", "GG"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"nonsymmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"HEX27", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_", ",", "I4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "ns", ",", "NN", ",", "r", ",", "FF", ",", "FFINV", ",", "jac", ",", "PP", ",", "uvw", ",", "\[Phi]\[Theta]\[Psi]", ",", "Duvw", ",", "\[Sigma]\[Sigma]", ",", "\[Sigma]", ",", "\[Rho]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "EEEE", ",", "\[Delta]w\[Sigma]", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "GG", ",", "nl", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Epsilon]"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I3", ",", "I4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]", "-", "\[Gamma]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "r"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"PP", "=", RowBox[{"LeviCivitaTensor", "[", "3", "]"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]\[Theta]\[Psi]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacement", " ", "gradient"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{ RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw"}]}], "}"}]}], "-", RowBox[{"PP", ".", "\[Phi]\[Theta]\[Psi]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "GG"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "/", "GG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"1", "/", "GG"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], "]"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"nonsymmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "\[Phi]\[Theta]\[Psi]", "]"}], ".", RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TET5", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"SOLIDB", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fX_", ",", "fY_", ",", "fZ_", ",", "mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_", ",", "I4_"}], "}"}], "]"}]}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Delta]", ",", "ns", ",", "NN", ",", "r", ",", "FF", ",", "FFINV", ",", "PP", ",", "jac", ",", "uvw", ",", "\[Phi]\[Theta]\[Psi]", ",", "Duvw", ",", "\[Delta]uvw", ",", "\[Delta]Duvw", ",", "\[Delta]\[Lambda]\[Lambda]", ",", "\[Sigma]\[Sigma]", ",", "\[Sigma]", ",", "\[Rho]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "e1", ",", "e2", ",", "e3", ",", "EEEE", ",", "IIII", ",", "II", ",", "IIII1", ",", "IIII2", ",", "\[Delta]w\[Sigma]"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]", "-", "\[Gamma]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "r"}]}], "}"}], "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"\[Gamma]", "\[Rule]", RowBox[{"1", "/", "3"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"PP", "=", RowBox[{"LeviCivitaTensor", "[", "3", "]"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]\[Theta]\[Psi]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "nonsymmetric", " ", "strain", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{ RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw"}]}], "}"}]}], "-", RowBox[{"PP", ".", "\[Phi]\[Theta]\[Psi]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"nonsymmetric", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"II", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII1", "=", RowBox[{"Outer", "[", RowBox[{"Times", ",", "II", ",", "II"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII2", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "i", ",", "j", ",", "j", ",", "i"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "II"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "II"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "+", "\[Nu]\[Nu]"}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Nu]\[Nu]", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}], "*", "IIII1"}], "+", "IIII2"}], ")"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"nonsymmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "\[Phi]\[Theta]\[Psi]", "]"}], ".", RowBox[{"{", RowBox[{"mX", ",", "mY", ",", "mZ"}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"QUAD", "[", RowBox[{"TET5", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"MODE_", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"ELEMENT", "[", "node_", "]"}]}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Delta]", ",", "n\[Alpha]", ",", "n\[Beta]", ",", "n\[Gamma]", ",", "enode", ",", "\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "NN", ",", "r", ",", "FF", ",", "FFINV", ",", "PP", ",", "jac", ",", "uvw", ",", "\[Phi]\[Theta]\[Psi]", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "EEEE", ",", "IIII", ",", "II", ",", "IIII1", ",", "IIII2", ",", "\[Delta]wint", ",", "\[Delta]wext"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", "u_", "]"}], ":=", RowBox[{"u", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"a", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"\[Delta]a", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"b", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"\[Delta]b", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"c", "[", "any__", "]"}], " ", "\[Rule]", " ", RowBox[{"\[Delta]c", "[", "any", "]"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "nodes", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"n\[Gamma]", ",", "n\[Beta]", ",", "n\[Alpha]"}], "}"}], "=", RowBox[{"Dimensions", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"enode", "=", RowBox[{"Flatten", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"Flatten", "[", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n\[Alpha]", ",", "\[Alpha]"}], "}"}], ",", RowBox[{"{", RowBox[{"n\[Beta]", ",", "\[Beta]"}], "}"}], ",", RowBox[{"{", RowBox[{"n\[Gamma]", ",", "\[Gamma]"}], "}"}]}], "}"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "r"}]}], "}"}], "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Gamma]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", " ", "=", RowBox[{"Inverse", "[", "FF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"PP", "=", RowBox[{"LeviCivitaTensor", "[", "3", "]"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]\[Theta]\[Psi]", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "nonsymmetric", " ", "strain", " ", "in", " ", "the", " ", "structural", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{ RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw"}]}], "}"}]}], "-", RowBox[{"PP", ".", "\[Phi]\[Theta]\[Psi]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"nonsymmetric", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"II", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII1", "=", RowBox[{"Outer", "[", RowBox[{"Times", ",", "II", ",", "II"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"IIII2", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "i", ",", "j", ",", "j", ",", "i"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "II"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "II"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{ RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "+", "\[Nu]\[Nu]"}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Nu]\[Nu]", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}], "*", "IIII1"}], "+", "IIII2"}], ")"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"nonsymmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", "\[Alpha]", "}"}]}], "]"}], ",", RowBox[{"{", "\[Beta]", "}"}]}], "]"}], ",", RowBox[{"{", "\[Gamma]", "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", "node_", "]"}]}], "}"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]\[Nu]", ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", "node", "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_", ",", "I4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "ns", ",", "NN", ",", "r", ",", "FF", ",", "PP", ",", "uvw", ",", "uvw0", ",", "uvw2", ",", "Duvw", ",", "\[Epsilon]", ",", "\[Sigma]", ",", "\[Delta]ww", ",", "\[Delta]WW", ",", "EEEE", ",", "\[Delta]w\[Sigma]", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "GG", ",", "nl", ",", "jac", ",", "FFINV", ",", "\[Delta]wext", ",", "\[Delta]wint", ",", "\[Delta]wine"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I3", ",", "I4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]", "-", "\[Gamma]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "r"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"uvw0", "=", " ", RowBox[{"uvw", "/.", RowBox[{"{", " ", RowBox[{ RowBox[{"anya_", "[", "any_", "]"}], " ", "\[Rule]", " ", RowBox[{"anya", "[", RowBox[{"any", ",", "0"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"uvw2", "=", " ", RowBox[{"uvw", " ", "/.", RowBox[{"{", " ", RowBox[{ RowBox[{"anya_", "[", "any_", "]"}], " ", "\[Rule]", RowBox[{"anya", "[", RowBox[{"any", ",", "2"}], "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacement", " ", "gradient"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Epsilon]", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw0"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw0"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw0"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "GG"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "/", "GG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"1", "/", "GG"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"\[Epsilon]", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"\[Delta]", "[", "\[Epsilon]", "]"}], "]"}], ".", RowBox[{"Flatten", "[", "\[Sigma]", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw0", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wine", "=", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", "uvw0", "]"}], ".", RowBox[{"(", RowBox[{"\[Rho]\[Rho]", " ", "uvw2"}], ")"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TET5", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wext", "+", "\[Delta]wint", "+", "\[Delta]wine"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_"}], "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_", ",", "I4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r", ",", "FF", ",", "uvw", ",", "DG", ",", "GL", ",", "\[Delta]GL", ",", "SS", ",", "\[Delta]wext", ",", "\[Delta]wint", ",", "EEEE", ",", "e", ",", "ee", ",", "EM", ",", "GM", ",", "GG", ",", "jac", ",", "FFINV"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I3", ",", "I4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]", "-", "\[Gamma]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"assuming", " ", "a", " ", "linear", " ", "mapping"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "r"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"FFINV", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", "FF", "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Abs", "[", RowBox[{"Det", "[", "FF", "]"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "approximations", " ", "in", " ", "structural", " ", "system"}], "*)"}], " ", "\[IndentingNewLine]", RowBox[{"uvw", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacement", " ", "gradient"}], "*)"}], "\[IndentingNewLine]", RowBox[{"DG", "=", RowBox[{"FFINV", ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "uvw"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "\[Gamma]"], "uvw"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"GL", "=", RowBox[{ RowBox[{"(", RowBox[{"DG", "+", RowBox[{"Transpose", "[", "DG", "]"}], "+", RowBox[{"DG", ".", RowBox[{"Transpose", "[", "DG", "]"}]}]}], ")"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]GL", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]", "[", "DG", "]"}], "+", RowBox[{"Transpose", "[", RowBox[{"\[Delta]", "[", "DG", "]"}], "]"}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "DG", "]"}], ".", RowBox[{"Transpose", "[", "DG", "]"}]}], "+", RowBox[{"DG", ".", RowBox[{"Transpose", "[", RowBox[{"\[Delta]", "[", "DG", "]"}], "]"}]}]}], ")"}], "/", "2"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"symmetric", " ", "elasticity", " ", "dyad"}], "*)"}], "\[IndentingNewLine]", RowBox[{"e", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"ee", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"Times", ",", "e1", ",", "e2"}], "]"}], ",", RowBox[{"{", RowBox[{"e1", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"e2", ",", "e"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EM", "=", RowBox[{"Inverse", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{ RowBox[{"-", "\[Nu]\[Nu]"}], "/", "EE"}], ",", RowBox[{"1", "/", "EE"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"GM", "=", RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "/", "GG"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "/", "GG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"1", "/", "GG"}]}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"EEEE", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EM", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"j", ",", "j"}], "]"}], "]"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"2", ",", "3"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"GM", "[", RowBox[{"[", RowBox[{"3", ",", "3"}], "]"}], "]"}], "*", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"ee", "[", RowBox[{"[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ee", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"PK2", " ", "stress"}], "*)"}], "\[IndentingNewLine]", RowBox[{"SS", "=", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{"EEEE", "[", RowBox[{"[", RowBox[{";;", ",", ";;", ",", "i", ",", "j"}], "]"}], "]"}], "*", RowBox[{"GL", "[", RowBox[{"[", RowBox[{"j", ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "3"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"virtual", " ", "work", " ", "expression"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{"-", RowBox[{ RowBox[{"Flatten", "[", "\[Delta]GL", "]"}], ".", RowBox[{"Flatten", "[", "SS", "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "uvw", "]"}], ".", RowBox[{"{", RowBox[{"fX", ",", "fY", ",", "fZ"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"TET5", ",", RowBox[{ RowBox[{"(", RowBox[{"\[Delta]wext", "+", "\[Delta]wint"}], ")"}], "*", "jac"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{ 3.4426474258030453`*^9, {3.4444401255942*^9, 3.4444401388073997`*^9}, { 3.4444401803034*^9, 3.4444401844062*^9}, 3.4444402418922*^9, { 3.4444402805022*^9, 3.4444403134026003`*^9}, {3.4444403443062*^9, 3.4444404484049997`*^9}, {3.444483267101*^9, 3.444483267335*^9}, { 3.4444833136046*^9, 3.4444835622998*^9}, {3.4444836421094*^9, 3.4444837777981997`*^9}, {3.444483920429*^9, 3.4444839412237997`*^9}, 3.4444842905546*^9, {3.4444843207406*^9, 3.4444844162282*^9}, { 3.4444844465078*^9, 3.4444844624354*^9}, {3.4444845255998*^9, 3.4444845894505997`*^9}, {3.4444846290746*^9, 3.444484933025*^9}, { 3.4444849790917997`*^9, 3.4444851148742*^9}, {3.444534936054*^9, 3.4445349675348*^9}, {3.4445355821731997`*^9, 3.44453585174*^9}, { 3.4445372162198*^9, 3.4445372264378*^9}, 3.444537384731*^9, { 3.4445377585382*^9, 3.4445377605818*^9}, {3.4445379733658*^9, 3.4445379736934*^9}, {3.4445380176762*^9, 3.444538032777*^9}, { 3.4445381079222*^9, 3.4445381581386003`*^9}, {3.4445382726456003`*^9, 3.4445382910067997`*^9}, {3.4445383401312*^9, 3.4445383475880003`*^9}, { 3.444538438458*^9, 3.4445384464608*^9}, {3.4445385680783997`*^9, 3.4445385687648*^9}, {3.4445389411991997`*^9, 3.4445389431024*^9}, { 3.444539746605*^9, 3.4445397807846003`*^9}, {3.4445408839765997`*^9, 3.4445409234133997`*^9}, {3.4445409681698*^9, 3.4445409932702*^9}, { 3.4445415452906*^9, 3.4445415706717997`*^9}, {3.4445416647242002`*^9, 3.4445416909477997`*^9}, {3.4445417660150003`*^9, 3.444541788557*^9}, { 3.4445420906977997`*^9, 3.444542104847*^9}, {3.4445421885878*^9, 3.4445421941414003`*^9}, {3.4445422252166*^9, 3.4445422386014*^9}, { 3.444542280425*^9, 3.4445423014538*^9}, {3.444542455769*^9, 3.4445424578282003`*^9}, {3.4445431739214*^9, 3.444543175809*^9}, { 3.4445647020962*^9, 3.4445648405618*^9}, {3.4445648825414*^9, 3.4445648858486*^9}, {3.4445649382646*^9, 3.4445651882702*^9}, { 3.4446164822206*^9, 3.4446165344494*^9}, {3.4446166121842003`*^9, 3.4446166738822002`*^9}, {3.4446167223046*^9, 3.4446168047974*^9}, { 3.444616843033*^9, 3.444616906447*^9}, {3.4446444694708*^9, 3.4446444700948*^9}, {3.4446477738310003`*^9, 3.4446477939862003`*^9}, { 3.4446478467298*^9, 3.4446478681018*^9}, 3.4446480456142*^9, { 3.4446487557418003`*^9, 3.4446487636198*^9}, 3.4446488179974003`*^9, { 3.4446488971205997`*^9, 3.4446489152478*^9}, {3.4446490003458*^9, 3.4446490008294*^9}, {3.4447042728942003`*^9, 3.4447042751562*^9}, { 3.4447044703278*^9, 3.4447044865362*^9}, 3.4447046475282*^9, 3.4447047993786*^9, {3.444704908329*^9, 3.4447049292642*^9}, { 3.4447049861926003`*^9, 3.4447049877214003`*^9}, {3.4447050279296*^9, 3.4447050419695997`*^9}, {3.4447053486656*^9, 3.4447053739376*^9}, 3.4447054561963997`*^9, 3.44470561612*^9, {3.4472133996876*^9, 3.4472134108571997`*^9}, {3.4472134470179996`*^9, 3.4472134648332*^9}, { 3.4472135032872*^9, 3.4472135245344*^9}, {3.4472136963059998`*^9, 3.4472137794384003`*^9}, {3.4472138235708*^9, 3.4472138388900003`*^9}, { 3.4472139099792*^9, 3.4472141367096*^9}, {3.447214202682*^9, 3.4472142975924*^9}, {3.4472144187732*^9, 3.4472145910284*^9}, { 3.4472146560492*^9, 3.4472147023968*^9}, {3.447214803594*^9, 3.4472148728736*^9}, {3.4472149156956*^9, 3.447214940484*^9}, { 3.447216227284*^9, 3.4472162419948*^9}, {3.4472163068908*^9, 3.4472163720832*^9}, {3.4472164665880003`*^9, 3.447216530392*^9}, { 3.4472166237268*^9, 3.4472167058452*^9}, 3.4472167362808*^9, { 3.4472171394658003`*^9, 3.4472171532874002`*^9}, {3.4472172028993998`*^9, 3.4472172216661997`*^9}, {3.4472172524606*^9, 3.4472172690278*^9}, { 3.4472173209133997`*^9, 3.4472173334245996`*^9}, {3.4472173920846*^9, 3.447217404861*^9}, {3.4472179572548*^9, 3.4472180351456003`*^9}, { 3.4472509764091997`*^9, 3.4472511017396*^9}, {3.4473910422216*^9, 3.4473912901524*^9}, 3.4473918688344*^9, {3.447392021185*^9, 3.4473920346633997`*^9}, {3.4473921383304*^9, 3.4473921479088*^9}, { 3.4473923024112*^9, 3.4473923734379997`*^9}, {3.4473928098168*^9, 3.4473928648691998`*^9}, {3.4473931872432003`*^9, 3.4473932461800003`*^9}, {3.4473933026675997`*^9, 3.4473934579812*^9}, { 3.4473935755271997`*^9, 3.447393742572*^9}, {3.4473939032676*^9, 3.4473939384144*^9}, {3.447395257644*^9, 3.4473953141628*^9}, { 3.4473954231132*^9, 3.4473954756384*^9}, {3.4473955348716*^9, 3.4473955723272*^9}, {3.447395648502*^9, 3.4473957588876*^9}, { 3.4473957903996*^9, 3.4473958488372*^9}, 3.4473962894154*^9, { 3.447396350817*^9, 3.447396352611*^9}, {3.4474625379146*^9, 3.4474625637326*^9}, {3.558360651728078*^9, 3.558360652102478*^9}, { 3.5619791319820857`*^9, 3.561979135788492*^9}, 3.561979369382504*^9, { 3.5619794930439215`*^9, 3.5619795010155354`*^9}, {3.561979569218855*^9, 3.56197960614412*^9}, {3.5619797417551584`*^9, 3.5619797448751636`*^9}, { 3.618719065033702*^9, 3.618719075426296*^9}, {3.6187194011669273`*^9, 3.6187194449454317`*^9}, {3.6187196998040085`*^9, 3.6187197102436056`*^9}, {3.618719902254588*^9, 3.6187199711455283`*^9}, { 3.618722365406472*^9, 3.6187225412555304`*^9}, {3.6187226885009522`*^9, 3.6187227109872384`*^9}, {3.618722756922866*^9, 3.6187231317203026`*^9}, { 3.618723424250035*^9, 3.6187234267291765`*^9}, {3.6187235105259695`*^9, 3.6187236491028957`*^9}, {3.618723691580325*^9, 3.618723745975436*^9}, { 3.618723778837316*^9, 3.6187238310002995`*^9}, {3.6187239055875654`*^9, 3.618723940035536*^9}, {3.6187239782667227`*^9, 3.6187240219352207`*^9}, { 3.618724166762504*^9, 3.618724177411113*^9}, {3.618729321696159*^9, 3.618729328067523*^9}, 3.618729374058154*^9, {3.6187294379838104`*^9, 3.618729708464281*^9}, {3.6187297631904106`*^9, 3.618729773195983*^9}, { 3.618729822648812*^9, 3.6187299321490746`*^9}, {3.618729984399063*^9, 3.61873000654133*^9}, {3.6187300746012225`*^9, 3.6187300860458775`*^9}, { 3.618731390835507*^9, 3.6187315116174154`*^9}, {3.618731747324897*^9, 3.6187318214091344`*^9}, {3.6187318769243097`*^9, 3.618732065297084*^9}, { 3.6187321012351394`*^9, 3.618732157420353*^9}, {3.618732188384124*^9, 3.6187322435542793`*^9}, {3.6187322786112847`*^9, 3.6187325478446836`*^9}, {3.6187325819856367`*^9, 3.6187326817653437`*^9}, {3.618732810863728*^9, 3.61873282594359*^9}, { 3.6187336474335766`*^9, 3.618733754678711*^9}, {3.618733827497876*^9, 3.61873396201257*^9}, {3.6187342020362988`*^9, 3.618734236455267*^9}, 3.618734298201799*^9, {3.618734712498495*^9, 3.618734712716508*^9}, 3.6187347739640107`*^9, {3.618738817361748*^9, 3.6187388333816643`*^9}, { 3.6187391349349127`*^9, 3.6187391457955337`*^9}, {3.618739376900752*^9, 3.618739397023903*^9}, {3.618739528394417*^9, 3.618739534809784*^9}, { 3.618739972366811*^9, 3.61873997340687*^9}, {3.6187400416617737`*^9, 3.618740043022852*^9}, {3.6187400971579485`*^9, 3.618740107902563*^9}, { 3.6187401713671927`*^9, 3.6187401723312483`*^9}, {3.6187402613443394`*^9, 3.618740268819767*^9}, {3.6187403697625403`*^9, 3.6187404057615995`*^9}, { 3.618740488277319*^9, 3.618740516244919*^9}, {3.618740647782442*^9, 3.6187406551668644`*^9}, 3.6187407823021364`*^9, {3.6187418050786357`*^9, 3.618741805749674*^9}, {3.6187418557605343`*^9, 3.6187419895921893`*^9}, { 3.618742022944097*^9, 3.61874204379729*^9}, {3.6187420836395683`*^9, 3.618742103384698*^9}, {3.620462440882641*^9, 3.6204624460519366`*^9}, { 3.6204624990259666`*^9, 3.620462576450395*^9}, {3.620463682857678*^9, 3.620463713336421*^9}, 3.6204637901188126`*^9, {3.620464238835478*^9, 3.62046424411378*^9}, 3.628912429385081*^9, {3.6289135207155013`*^9, 3.6289135210805225`*^9}, 3.6289497746958513`*^9, 3.6289498371774254`*^9, { 3.62894988410911*^9, 3.6289500319795675`*^9}, {3.6289501333883677`*^9, 3.628950183744248*^9}, {3.6289503323017445`*^9, 3.628950390181055*^9}, { 3.6289505050536256`*^9, 3.6289505113579865`*^9}, {3.62895070863527*^9, 3.6289507095043197`*^9}, {3.628951013180689*^9, 3.62895101407374*^9}, { 3.629190743153632*^9, 3.629190816645361*^9}, {3.6291909709608326`*^9, 3.629190981678051*^9}, {3.629191034624544*^9, 3.6291910410049553`*^9}, { 3.6293846391370816`*^9, 3.629384641102685*^9}, 3.6294302231277533`*^9, 3.629430298397886*^9, {3.6294304452097435`*^9, 3.6294304461769457`*^9}, 3.629430512991863*^9, {3.629430631630071*^9, 3.6294306397264853`*^9}, { 3.629430697477787*^9, 3.629430801373969*^9}, {3.6294470005483365`*^9, 3.629447006658345*^9}, {3.6294476264402127`*^9, 3.62944766022026*^9}, { 3.629455940543494*^9, 3.6294559434734983`*^9}, {3.6294560037335825`*^9, 3.6294560722536783`*^9}, {3.6294561182137423`*^9, 3.629456154053793*^9}, { 3.6294562173438816`*^9, 3.629456291433985*^9}, 3.629456575994384*^9, { 3.6294571194161444`*^9, 3.629457325936434*^9}, {3.6294573681664925`*^9, 3.629457469696635*^9}, {3.630830822369603*^9, 3.630830833380233*^9}, { 3.6308308916105633`*^9, 3.630830892690625*^9}, {3.630830934683027*^9, 3.6308309652587757`*^9}, {3.630831001140828*^9, 3.6308310302394924`*^9}, { 3.6308311286591215`*^9, 3.6308311872784743`*^9}, {3.6308312724803476`*^9, 3.630831331484722*^9}, {3.630831362277484*^9, 3.630831473963872*^9}, { 3.6308315048656397`*^9, 3.6308315251297984`*^9}, {3.6308500199956975`*^9, 3.630850092130224*^9}, {3.6308926160699577`*^9, 3.630892648580415*^9}, { 3.6308926904976883`*^9, 3.6308930396419015`*^9}, {3.6308931926157703`*^9, 3.6308932605850897`*^9}, {3.630893319631193*^9, 3.6308933413620315`*^9}, { 3.630893371735285*^9, 3.6308933746056895`*^9}, {3.630893484195882*^9, 3.630893495552702*^9}, {3.6308935513072*^9, 3.6308937035322676`*^9}, { 3.630893900966214*^9, 3.630893903165818*^9}, {3.63089401261561*^9, 3.6308940229584284`*^9}, {3.630894084734537*^9, 3.630894141612237*^9}, { 3.6308941732958927`*^9, 3.63089421168756*^9}, {3.6308943234305563`*^9, 3.6308945706597905`*^9}, {3.630894732057674*^9, 3.6308948540342884`*^9}, { 3.6308949175576*^9, 3.6308950352130065`*^9}, {3.6308963280663238`*^9, 3.6308964339281096`*^9}, {3.630896483785797*^9, 3.6308965147216516`*^9}, { 3.630995110764593*^9, 3.6309952194788113`*^9}, 3.631017673702475*^9, 3.6339410343181667`*^9, {3.6339411434394083`*^9, 3.6339413336822896`*^9}, { 3.6339414012381535`*^9, 3.6339415162277308`*^9}, {3.633941550612697*^9, 3.6339415854086876`*^9}, {3.633941898820614*^9, 3.633941918825758*^9}, { 3.633942028814049*^9, 3.6339421351881332`*^9}, 3.6339421753194284`*^9, { 3.6339527595260005`*^9, 3.633952797347164*^9}, {3.6339528326231813`*^9, 3.6339528434568014`*^9}, 3.63395311337924*^9, {3.633953318391966*^9, 3.633953320104064*^9}, {3.6339533894880323`*^9, 3.633953398914572*^9}, { 3.6339534904578075`*^9, 3.6339534909158335`*^9}, {3.6339544324266853`*^9, 3.633954436992946*^9}, {3.633955355536484*^9, 3.633955361782841*^9}, { 3.634613015576932*^9, 3.63461301623897*^9}, {3.6346130510409603`*^9, 3.634613077198457*^9}, 3.634613188324813*^9, {3.6878638635768104`*^9, 3.6878639724170356`*^9}, 3.687864019557732*^9, 3.6878641001403413`*^9, { 3.687864195050747*^9, 3.6878641958857946`*^9}, {3.6878642401333256`*^9, 3.68786426136654*^9}, 3.687864352036726*^9, {3.687864450280345*^9, 3.6878644606039357`*^9}, {3.6878646809015083`*^9, 3.6878646814075365`*^9}, {3.687864779357139*^9, 3.6878648062606783`*^9}, { 3.6878651827021837`*^9, 3.687865213182927*^9}, {3.6878652461998158`*^9, 3.6878652992218485`*^9}, {3.687865350343772*^9, 3.687865355912091*^9}, { 3.687865609571577*^9, 3.6878656309137974`*^9}, {3.687865671576123*^9, 3.6878656918812847`*^9}, 3.687865733639673*^9, {3.6878657691897063`*^9, 3.6878657965562716`*^9}, {3.687865834375435*^9, 3.6878658387066827`*^9}, { 3.687865912326894*^9, 3.6878659163341227`*^9}, {3.6878659782786655`*^9, 3.687866006047254*^9}, {3.6878660595832973`*^9, 3.6878660659666624`*^9}, { 3.6878661218058558`*^9, 3.6878661872325983`*^9}, {3.687866245499931*^9, 3.687866274822608*^9}, 3.687866805421936*^9, {3.6879301815930185`*^9, 3.6879301828630204`*^9}, {3.687930277763153*^9, 3.6879302977631817`*^9}, { 3.6879303280532236`*^9, 3.687930399193323*^9}, {3.6879304307033677`*^9, 3.6879304862434454`*^9}, {3.6879305350435133`*^9, 3.6879306368336563`*^9}, {3.6879308629839725`*^9, 3.6879309443840866`*^9}, {3.6880225059517603`*^9, 3.688022695772026*^9}, { 3.6880227285420723`*^9, 3.688022739402087*^9}, 3.688124666129181*^9, { 3.6882843273150387`*^9, 3.6882845888454046`*^9}, {3.688285837009152*^9, 3.6882858406491575`*^9}, {3.688286818441526*^9, 3.688286844251562*^9}, { 3.6882870165218034`*^9, 3.688287041201838*^9}, {3.68828707122188*^9, 3.68828709261191*^9}, 3.68828714986199*^9, {3.688287467572435*^9, 3.6882874756924467`*^9}, {3.6882875215825105`*^9, 3.688287521962511*^9}, { 3.6924976946811843`*^9, 3.6924978409113894`*^9}, {3.692497927801511*^9, 3.6924979661015644`*^9}, {3.692498035281661*^9, 3.6924981004717526`*^9}, { 3.6924981611518373`*^9, 3.692498164851843*^9}, {3.692498211401908*^9, 3.6924983125120497`*^9}, {3.692502435097616*^9, 3.692502447592331*^9}, { 3.692502485821518*^9, 3.6925024860295296`*^9}, 3.6925027340347147`*^9, { 3.6940858758564043`*^9, 3.6940858848364167`*^9}, {3.6940859944465704`*^9, 3.6940860158966007`*^9}, {3.6940861169567423`*^9, 3.694086419977166*^9}, { 3.6940872923193874`*^9, 3.6940872938293896`*^9}, {3.6940873646994886`*^9, 3.694087369319495*^9}, 3.694087530509721*^9, {3.6945281161723194`*^9, 3.694528128442337*^9}, {3.6945281951824303`*^9, 3.694528217482462*^9}, { 3.694528268612533*^9, 3.694528649083066*^9}, {3.694528693523128*^9, 3.6945286979031343`*^9}, {3.6945781605358806`*^9, 3.6945782254759717`*^9}, {3.6945782921660647`*^9, 3.694578304996083*^9}, { 3.694578337066128*^9, 3.6945783532861505`*^9}, {3.6945783849061947`*^9, 3.6945783866561975`*^9}, {3.6945784400462723`*^9, 3.694578482566332*^9}, 3.694578713616655*^9, {3.7511979506411643`*^9, 3.751197960841903*^9}, { 3.755352558606639*^9, 3.7553526159830475`*^9}, {3.7901319321297035`*^9, 3.790131942849823*^9}, {3.790132020952048*^9, 3.790132068764365*^9}},ExpressionUUID->"e1dec4b3-4115-45d3-be49-\ 0be3b9702bd9"] }, Closed]], Cell[CellGroupData[{ Cell["Element needs 1005", "Subsection", CellChangeTimes->{{3.6337757022685537`*^9, 3.6337757351784363`*^9}, { 3.734064727558645*^9, 3.7340647333030305`*^9}, {3.746150005514146*^9, 3.7461500076701665`*^9}},ExpressionUUID->"f6cfb6ce-9abf-4d3e-b8c0-\ ef164529365e"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"force", " ", "element"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[Rho]_", "}"}], ",", RowBox[{"{", RowBox[{"lx_", ",", "ly_", ",", "lz_", ",", "ix_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{ "FX_", ",", "FY_", ",", "FZ_", ",", "MX_", ",", "MY_", ",", "MZ_"}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "I1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"m", ",", "J", ",", "ux", ",", "uy", ",", "uz", ",", "T"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"m", "=", RowBox[{"\[Rho]", "*", "lx", "*", "ly", "*", "lz"}]}], ";", "\[IndentingNewLine]", RowBox[{"J", "=", RowBox[{"m", "*", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"lx", "^", "2"}], "+", RowBox[{"lz", "^", "2"}]}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"ly", "^", "2"}], "+", RowBox[{"lz", "^", "2"}]}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"lx", "^", "2"}], "+", RowBox[{"ly", "^", "2"}]}]}], "}"}]}], "}"}], "/", "12"}]}]}], ";", "\[IndentingNewLine]", StyleBox[ RowBox[{"T", "=", RowBox[{"{", RowBox[{"ix", ",", "iy", ",", RowBox[{"ix", "\[Cross]", "iy"}]}], "}"}]}], "OperatorCharacter"], StyleBox[";", "OperatorCharacter"], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"FX", ",", "FY", ",", "FZ"}], "}"}], "-", RowBox[{"m", " ", "*", " ", RowBox[{"T", ".", " ", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "2"}], "]"}], "]"}]}]}]}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}], ")"}], ".", " ", RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"T", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "2"}], "]"}], "]"}]}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"MX", ",", "MY", ",", "MZ"}], "}"}], "-", RowBox[{"J", ".", " ", "T", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "3"}], "]"}], "]"}]}]}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}], ")"}], ".", RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"T", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "3"}], "]"}], "]"}]}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}]}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"I1_", ",", "I2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I2", ",", "2"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], ".", RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FX", "[", RowBox[{"{", RowBox[{"I2", ",", "I1"}], "}"}], "]"}], ",", RowBox[{"FY", "[", RowBox[{"{", RowBox[{"I2", ",", "I1"}], "}"}], "]"}], ",", RowBox[{"FZ", "[", RowBox[{"{", RowBox[{"I2", ",", "I1"}], "}"}], "]"}]}], "}"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], ")"}]}], "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I2", ",", "2"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], ")"}], ".", RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FX", "[", RowBox[{"{", RowBox[{"I2", ",", "I1"}], "}"}], "]"}], ",", RowBox[{"FY", "[", RowBox[{"{", RowBox[{"I2", ",", "I1"}], "}"}], "]"}], ",", RowBox[{"FZ", "[", RowBox[{"{", RowBox[{"I2", ",", "I1"}], "}"}], "]"}]}], "}"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}], "+", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I2", ",", "3"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}], ".", RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"MX", "[", RowBox[{"{", RowBox[{"I2", ",", "I1"}], "}"}], "]"}], ",", RowBox[{"MY", "[", RowBox[{"{", RowBox[{"I2", ",", "I1"}], "}"}], "]"}], ",", RowBox[{"MZ", "[", RowBox[{"{", RowBox[{"I2", ",", "I1"}], "}"}], "]"}]}], "}"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], ")"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I2", ",", "3"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], ")"}], ".", RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"MX", "[", RowBox[{"{", RowBox[{"I2", ",", "I1"}], "}"}], "]"}], ",", RowBox[{"MY", "[", RowBox[{"{", RowBox[{"I2", ",", "I1"}], "}"}], "]"}], ",", RowBox[{"MZ", "[", RowBox[{"{", RowBox[{"I2", ",", "I1"}], "}"}], "]"}]}], "}"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"m_", ",", "J_"}], "}"}], ",", RowBox[{"{", RowBox[{ "FX_", ",", "FY_", ",", "FZ_", ",", "MX_", ",", "MY_", ",", "MZ_"}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "I1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"FX", ",", "FY", ",", "FZ"}], "}"}], "-", RowBox[{"m", " ", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "2"}], "]"}], "]"}]}]}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}], ")"}], ".", " ", RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "2"}], "]"}], "]"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}], " ", "+", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"MX", ",", "MY", ",", "MZ"}], "}"}], "-", RowBox[{"J", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "3"}], "]"}], "]"}]}]}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}], ")"}], ".", RowBox[{"\[Delta]", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "3"}], "]"}], "]"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}], "]"}]}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Kappa]\[Kappa]_"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"d_", ",", "t_"}], "}"}], ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Kappa]\[Kappa]"}], "}"}], ",", RowBox[{"{", " ", RowBox[{ RowBox[{"d", " ", "\[Pi]", " ", "t"}], ",", " ", RowBox[{"d", " ", "\[Pi]", " ", "t", " ", RowBox[{ RowBox[{"(", RowBox[{ SuperscriptBox["d", "2"], "+", SuperscriptBox["t", "2"]}], ")"}], "/", "8"}]}], ",", " ", RowBox[{"d", " ", "\[Pi]", " ", "t", " ", RowBox[{ RowBox[{"(", RowBox[{ SuperscriptBox["d", "2"], "+", SuperscriptBox["t", "2"]}], ")"}], "/", "8"}]}], ",", "iy0"}], "}"}], ",", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Kappa]\[Kappa]_"}], "}"}], ",", RowBox[{"{", RowBox[{"d_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Kappa]\[Kappa]"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"Pi", "*", RowBox[{ RowBox[{"d", "^", "2"}], "/", "4"}]}], ",", RowBox[{"Pi", "*", RowBox[{ RowBox[{"d", "^", "4"}], "/", "64"}]}], ",", RowBox[{"Pi", "*", RowBox[{ RowBox[{"d", "^", "4"}], "/", "64"}]}], ",", "iy0"}], "}"}], ",", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Kappa]\[Kappa]_"}], "}"}], ",", RowBox[{"{", RowBox[{"hy_", ",", "hz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Kappa]\[Kappa]"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"hy", "*", "hz"}], ",", RowBox[{ RowBox[{"hz", "^", "3"}], "*", RowBox[{"hy", "/", "12"}]}], ",", RowBox[{ RowBox[{"hy", "^", "3"}], "*", RowBox[{"hz", "/", "12"}]}], ",", "iy0"}], "}"}], ",", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Kappa]\[Kappa]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "h", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "ux", ",", "uy", " ", ",", "uz", " ", ",", "\[Theta]x", " ", ",", "\[Theta]y", " ", ",", "\[Theta]z", " ", ",", "\[Delta]ux", " ", ",", "\[Delta]uy", ",", "\[Delta]uz", ",", "\[Delta]\[Theta]x", ",", "\[Delta]\[Theta]y", ",", "\[Delta]\[Theta]z"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "mapping", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"h", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{ RowBox[{"ux", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"uy", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{ RowBox[{"uy", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"uz", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{ RowBox[{"uz", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]x", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{ RowBox[{"\[Theta]x", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]y", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{ RowBox[{"\[Theta]y", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]z", "[", "1", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{ RowBox[{"\[Theta]z", "[", "2", "]"}], "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{ RowBox[{"\[Delta]ux", "[", "2", "]"}], "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]uy", "[", "1", "]"}], "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{ RowBox[{"\[Delta]uy", "[", "2", "]"}], "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]uz", "[", "1", "]"}], "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{ RowBox[{"\[Delta]uz", "[", "2", "]"}], "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", " ", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}], "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "]"}], ".", "ix0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", " ", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}], "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "]"}], ".", "iy0"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", " ", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}], "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], "]"}], ".", "iz0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["AA", "2"], " ", SuperscriptBox["GG", "2"], " ", SuperscriptBox["h", "4"], " ", SuperscriptBox["\[Kappa]\[Kappa]", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "fx", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"6", " ", "fz", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "+", RowBox[{"6", " ", "fz", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "-", RowBox[{"fz", " ", SuperscriptBox["h", "3"], " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"fz", " ", SuperscriptBox["h", "3"], " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], "+", RowBox[{"fy", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "+", RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "+", RowBox[{"h", " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}]}], "-", RowBox[{"h", " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}]}], ")"}]}], "-", RowBox[{"12", " ", "GG", " ", "Iyy", " ", RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], " ", RowBox[{"\[Theta]x", "[", "1", "]"}]}], "-", RowBox[{"12", " ", "GG", " ", "Izz", " ", RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], " ", RowBox[{"\[Theta]x", "[", "1", "]"}]}], "+", RowBox[{"12", " ", "GG", " ", "Iyy", " ", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}], " ", RowBox[{"\[Theta]x", "[", "1", "]"}]}], "+", RowBox[{"12", " ", "GG", " ", "Izz", " ", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}], " ", RowBox[{"\[Theta]x", "[", "1", "]"}]}], "+", RowBox[{"12", " ", "GG", " ", "Iyy", " ", RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], " ", RowBox[{"\[Theta]x", "[", "2", "]"}]}], "+", RowBox[{"12", " ", "GG", " ", "Izz", " ", RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], " ", RowBox[{"\[Theta]x", "[", "2", "]"}]}], "-", RowBox[{"12", " ", "GG", " ", "Iyy", " ", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}], " ", RowBox[{"\[Theta]x", "[", "2", "]"}]}], "-", RowBox[{"12", " ", "GG", " ", "Izz", " ", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}], " ", RowBox[{"\[Theta]x", "[", "2", "]"}]}]}], ")"}]}], "-", RowBox[{"1728", " ", SuperscriptBox["EE", "3"], " ", "Iyy", " ", "Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"AA", " ", RowBox[{"(", RowBox[{ RowBox[{"ux", "[", "1", "]"}], "-", RowBox[{"ux", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "-", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], "-", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", "1", "]"}], "-", RowBox[{"\[Theta]y", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], "-", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", "1", "]"}], "-", RowBox[{"\[Theta]z", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"144", " ", SuperscriptBox["EE", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", SuperscriptBox["AA", "2"]}], " ", "GG", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"Iyy", "+", "Izz"}], ")"}], " ", "\[Kappa]\[Kappa]", " ", RowBox[{"(", RowBox[{ RowBox[{"ux", "[", "1", "]"}], "-", RowBox[{"ux", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "-", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"6", " ", "fx", " ", SuperscriptBox["h", "2"], " ", "Iyy", " ", "Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"Iyy", " ", "Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"fz", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "+", RowBox[{"6", " ", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "-", RowBox[{"h", " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"h", " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}]}], ")"}]}], "+", RowBox[{"fy", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "+", RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "+", RowBox[{"h", " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}]}], "-", RowBox[{"h", " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}]}], ")"}]}], "-", RowBox[{"12", " ", "GG", " ", RowBox[{"(", RowBox[{"Iyy", "+", "Izz"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], "-", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", "1", "]"}], "-", RowBox[{"\[Theta]x", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"AA", " ", "GG", " ", "\[Kappa]\[Kappa]", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["h", "2"], " ", SuperscriptBox["Izz", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], "-", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", "1", "]"}], "-", RowBox[{"\[Theta]y", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", SuperscriptBox["Iyy", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], "-", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", "1", "]"}], "-", RowBox[{"\[Theta]z", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"2", " ", "Iyy", " ", "Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", RowBox[{"uz", "[", "1", "]"}], " ", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "-", RowBox[{"6", " ", RowBox[{"uz", "[", "2", "]"}], " ", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "-", RowBox[{"6", " ", RowBox[{"uz", "[", "1", "]"}], " ", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "+", RowBox[{"6", " ", RowBox[{"uz", "[", "2", "]"}], " ", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "-", RowBox[{"3", " ", "h", " ", RowBox[{"uz", "[", "1", "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"3", " ", "h", " ", RowBox[{"uz", "[", "2", "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}]}], "-", RowBox[{"3", " ", "h", " ", RowBox[{"uz", "[", "1", "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], "+", RowBox[{"3", " ", "h", " ", RowBox[{"uz", "[", "2", "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], "+", RowBox[{"3", " ", RowBox[{"uy", "[", "1", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "-", RowBox[{"2", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"3", " ", RowBox[{"uy", "[", "2", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "-", RowBox[{"2", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"3", " ", "h", " ", RowBox[{"\[Delta]uz", "[", "1", "]"}], " ", RowBox[{"\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"3", " ", "h", " ", RowBox[{"\[Delta]uz", "[", "2", "]"}], " ", RowBox[{"\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], " ", RowBox[{"\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}], " ", RowBox[{"\[Theta]y", "[", "1", "]"}]}], "-", RowBox[{"3", " ", "h", " ", RowBox[{"\[Delta]uz", "[", "1", "]"}], " ", RowBox[{"\[Theta]y", "[", "2", "]"}]}], "+", RowBox[{"3", " ", "h", " ", RowBox[{"\[Delta]uz", "[", "2", "]"}], " ", RowBox[{"\[Theta]y", "[", "2", "]"}]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], " ", RowBox[{"\[Theta]y", "[", "2", "]"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}], " ", RowBox[{"\[Theta]y", "[", "2", "]"}]}], "+", RowBox[{"3", " ", "h", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}], " ", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "-", RowBox[{"3", " ", "h", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}], " ", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], " ", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}], " ", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "+", RowBox[{"3", " ", "h", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}], " ", RowBox[{"\[Theta]z", "[", "2", "]"}]}], "-", RowBox[{"3", " ", "h", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}], " ", RowBox[{"\[Theta]z", "[", "2", "]"}]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], " ", RowBox[{"\[Theta]z", "[", "2", "]"}]}], "+", RowBox[{"2", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}], " ", RowBox[{"\[Theta]z", "[", "2", "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"12", " ", "AA", " ", "EE", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "\[Kappa]\[Kappa]", " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["AA", "2"], " ", "GG", " ", SuperscriptBox["h", "2"], " ", "\[Kappa]\[Kappa]", " ", RowBox[{"(", RowBox[{ RowBox[{"ux", "[", "1", "]"}], "-", RowBox[{"ux", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "-", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}], "-", RowBox[{"6", " ", "fx", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{"Iyy", "+", "Izz"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", "1", "]"}], "+", RowBox[{"\[Delta]ux", "[", "2", "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{"Iyy", "+", "Izz"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"fz", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "+", RowBox[{"6", " ", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "-", RowBox[{"h", " ", RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"h", " ", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}]}], ")"}]}], "+", RowBox[{"fy", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "+", RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "+", RowBox[{"h", " ", RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}]}], "-", RowBox[{"h", " ", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}]}], ")"}]}], "-", RowBox[{"12", " ", "GG", " ", RowBox[{"(", RowBox[{"Iyy", "+", "Izz"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "1", "]"}], "-", RowBox[{"\[Delta]\[Theta]x", "[", "2", "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", "1", "]"}], "-", RowBox[{"\[Theta]x", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"2", " ", "AA", " ", "GG", " ", "\[Kappa]\[Kappa]", " ", RowBox[{"(", RowBox[{ RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "3"}], " ", RowBox[{"uz", "[", "1", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"3", " ", RowBox[{"uz", "[", "2", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", RowBox[{"\[Delta]uz", "[", "1", "]"}]}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]uz", "[", "2", "]"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "3"}], " ", RowBox[{"\[Delta]uz", "[", "1", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", "1", "]"}], "+", RowBox[{"\[Theta]y", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"3", " ", RowBox[{"\[Delta]uz", "[", "2", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", "1", "]"}], "+", RowBox[{"\[Theta]y", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "1", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"\[Theta]y", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "2", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", "1", "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]y", "[", "2", "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", RowBox[{"uy", "[", "1", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "-", RowBox[{"2", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"3", " ", RowBox[{"uy", "[", "2", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}]}], "-", RowBox[{"2", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"3", " ", RowBox[{"\[Delta]uy", "[", "1", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", "1", "]"}], "+", RowBox[{"\[Theta]z", "[", "2", "]"}]}], ")"}]}], "-", RowBox[{"3", " ", RowBox[{"\[Delta]uy", "[", "2", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", "1", "]"}], "+", RowBox[{"\[Theta]z", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "1", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]z", "[", "1", "]"}]}], "+", RowBox[{"\[Theta]z", "[", "2", "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "2", "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", "1", "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]z", "[", "2", "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{"12", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "Iyy"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "\[Kappa]\[Kappa]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"12", " ", "EE", " ", "Izz"}], "+", RowBox[{"AA", " ", "GG", " ", SuperscriptBox["h", "2"], " ", "\[Kappa]\[Kappa]"}]}], ")"}]}], ")"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"d_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"Pi", "*", RowBox[{ RowBox[{"d", "^", "2"}], "/", "4"}]}], ",", RowBox[{"Pi", "*", RowBox[{ RowBox[{"d", "^", "4"}], "/", "64"}]}], ",", RowBox[{"Pi", "*", RowBox[{ RowBox[{"d", "^", "4"}], "/", "64"}]}], ",", "iy0"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx", ",", "fy", ",", "fz", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"hy_", ",", "hz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG", ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"hy", "*", "hz"}], ",", RowBox[{ RowBox[{"hz", "^", "3"}], "*", RowBox[{"hy", "/", "12"}]}], ",", RowBox[{ RowBox[{"hy", "^", "3"}], "*", RowBox[{"hz", "/", "12"}]}], ",", "iy0"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx", ",", "fy", ",", "fz", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "iy0_"}], "}"}], ",", RowBox[{"{", RowBox[{ "fx_", ",", "fy_", ",", "fz_", ",", "mx_", ",", "my_", ",", "mz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r0", ",", "h0", ",", "h", ",", "h\[Alpha]0", ",", "i\[Alpha]0", ",", "ix0", ",", "iz0", ",", "ux", ",", "uy", " ", ",", "uz", " ", ",", "\[Theta]x", " ", ",", "\[Theta]y", " ", ",", "\[Theta]z", " ", ",", "\[Delta]ux", " ", ",", "\[Delta]uy", ",", "\[Delta]uz", ",", "\[Delta]\[Theta]x", ",", "\[Delta]\[Theta]y", ",", "\[Delta]\[Theta]z"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "mapping", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h0", "=", RowBox[{"h", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"r0", ".", "r0"}], "]"}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"ix0", "=", RowBox[{"r0", "/", "h0"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz0", "=", RowBox[{"ix0", "\[Cross]", "iy0"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "}"}], "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{"ix0", ",", "iy0", ",", "iz0"}], "}"}], ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}], ")"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "=", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], ",", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"-", FractionBox["1", RowBox[{"420", " ", SuperscriptBox["h", "3"]}]]}], RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "210"}], " ", "fx", " ", SuperscriptBox["h", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"AA", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"420", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"ux", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["h", "2"], " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"70", " ", RowBox[{"ux", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"70", " ", RowBox[{"ux", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]ux", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Delta]ux", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}], "+", RowBox[{"156", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"156", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"156", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"54", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"156", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"22", " ", "h", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"13", " ", "h", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"13", " ", "h", " ", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"22", " ", "h", " ", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"22", " ", "h", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"13", " ", "h", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "-", RowBox[{"13", " ", "h", " ", RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"22", " ", "h", " ", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], "-", RowBox[{"22", " ", "h", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"13", " ", "h", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"13", " ", "h", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"22", " ", "h", " ", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"22", " ", "h", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"13", " ", "h", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{"13", " ", "h", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"22", " ", "h", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "-", RowBox[{"3", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", SuperscriptBox["h", "2"], " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"7", " ", RowBox[{"(", RowBox[{ RowBox[{"720", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"5", " ", "fz", " ", SuperscriptBox["h", "5"], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{"5", " ", "fy", " ", SuperscriptBox["h", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"6", " ", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"360", " ", "EE", " ", "h", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"uz", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"uy", "[", RowBox[{"1", ",", "0"}], "]"}]}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"uy", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"12", " ", SuperscriptBox["h", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}], "-", RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"5", " ", RowBox[{"(", RowBox[{ RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"2", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"6", " ", "\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], "-", RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"5", " ", RowBox[{"(", RowBox[{ RowBox[{"GG", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"2", " ", "EE", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}]}], "+", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "-", RowBox[{"2", " ", SuperscriptBox["h", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"15", " ", "fz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"15", " ", "mx", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{"\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{"5", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}]}], "+", RowBox[{"5", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"4", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{"5", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}]}], "+", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}]}], "+", RowBox[{"5", " ", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]x", "[", RowBox[{"1", ",", "2"}], "]"}], "+", RowBox[{"2", " ", RowBox[{"\[Theta]x", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}], "+", RowBox[{"4", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}]}], "-", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], "+", RowBox[{"4", " ", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}], " ", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"6", " ", SuperscriptBox["h", "3"], " ", RowBox[{"(", RowBox[{ RowBox[{"10", " ", "mz", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{"10", " ", "my", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{"\[Rho]\[Rho]", " ", RowBox[{"(", RowBox[{ RowBox[{"Iyy", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"uz", "[", RowBox[{"1", ",", "2"}], "]"}]}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"uz", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uz", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uz", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", RowBox[{"1", ",", "2"}], "]"}], "+", RowBox[{"\[Theta]y", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}]}]}], ")"}]}], "+", RowBox[{"Izz", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"uy", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "-", RowBox[{ RowBox[{"uy", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"1", ",", "0"}], "]"}], "+", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]uy", "[", RowBox[{"1", ",", "0"}], "]"}], "-", RowBox[{"\[Delta]uy", "[", RowBox[{"2", ",", "0"}], "]"}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]z", "[", RowBox[{"1", ",", "2"}], "]"}], "+", RowBox[{"\[Theta]z", "[", RowBox[{"2", ",", "2"}], "]"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"ELEMENT", "[", "node_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "n\[Alpha]", ",", "n\[Beta]", ",", "nne", ",", "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "enode", ",", "NN", ",", "r", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "rn", ",", "jac", ",", "h\[Alpha]", ",", "e\[Alpha]", ",", "h\[Beta]", ",", "e\[Beta]", ",", "en", ",", "FF", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "u0", ",", "v0", ",", "w0", ",", "\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0", ",", "u2", ",", "v2", ",", "w2", ",", "\[Phi]2", ",", "\[Theta]2", ",", "\[Psi]2", ",", "f\[Alpha]", ",", "f\[Beta]", ",", "fn", ",", "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]", ",", "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]", ",", "\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]", ",", "GG", ",", "N\[Alpha]\[Alpha]", ",", "N\[Beta]\[Beta]", ",", "N\[Alpha]\[Beta]", ",", "N\[Beta]\[Alpha]", ",", "M\[Alpha]\[Alpha]", ",", "M\[Beta]\[Beta]", ",", "M\[Alpha]\[Beta]", ",", "Q\[Alpha]", ",", "Q\[Beta]", ",", "\[Delta]wint", ",", "\[Delta]wext", ",", "\[Delta]wine"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "nodes", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"n\[Alpha]", ",", "n\[Beta]"}], "}"}], "=", RowBox[{"Dimensions", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nne", " ", "=", RowBox[{"n\[Alpha]", "*", "n\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"enode", "=", RowBox[{"Flatten", "[", "node", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"shape", " ", "functions"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n\[Alpha]", ",", "\[Alpha]"}], "}"}], ",", RowBox[{"{", RowBox[{"n\[Beta]", ",", "\[Beta]"}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "mapping", " ", "to", " ", "orthonormal", " ", "material", " ", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Alpha]", "=", RowBox[{"Norm", "[", "r\[Alpha]", "]"}]}], ";", RowBox[{"e\[Alpha]", "=", RowBox[{"r\[Alpha]", "/", "h\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Beta]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Beta]", "=", RowBox[{"r\[Beta]", "-", RowBox[{ RowBox[{"(", RowBox[{"r\[Beta]", ".", "e\[Alpha]"}], ")"}], "*", "e\[Alpha]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h\[Beta]", "=", RowBox[{"Norm", "[", "r\[Beta]", "]"}]}], ";", RowBox[{"e\[Beta]", "=", RowBox[{"r\[Beta]", "/", "h\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"e\[Alpha]", "\[Cross]", "e\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"jac", " ", "=", RowBox[{"h\[Alpha]", "*", "h\[Beta]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"in", " ", "flat", " ", "geometry"}], "*)"}], "\[IndentingNewLine]", RowBox[{"FF", "=", RowBox[{"{", RowBox[{"e\[Alpha]", ",", "e\[Beta]", ",", "en"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "transform", " ", "into", " ", "the", " ", "material", " ", "\[Alpha]\[Beta]n"}], "-", "system"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"(", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "2"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"(", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"enode", ",", "3"}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u0", ",", "v0", ",", "w0"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], " ", "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], " ", "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u2", ",", "v2", ",", "w2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]2", ",", "\[Theta]2", ",", "\[Psi]2"}], "}"}], "=", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], " ", "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}], "=", RowBox[{"FF", ".", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"strain", " ", "measures", " ", "with", " ", "non"}], "-", RowBox[{"symmetric", " ", "\[Epsilon]"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "u0"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "v0"}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "v0"}], "/", "h\[Alpha]"}], "-", "\[Psi]0"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "u0"}], "/", "h\[Beta]"}], "+", "\[Psi]0"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Theta]0"}], "/", "h\[Alpha]"}], ",", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Phi]0"}]}], "/", "h\[Beta]"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "\[Theta]0"}], "/", "h\[Beta]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "\[Phi]0"}], "/", "h\[Alpha]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]"}], "}"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "w0"}], "/", "h\[Alpha]"}], "+", "\[Theta]0"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "w0"}], "/", "h\[Beta]"}], "-", "\[Phi]0"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"GG", "=", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", "*", "\[Nu]\[Nu]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "stress", " ", "resultants", " ", "with", " ", "a", " ", "nonsymmetric", " ", "N"}], "-", "part"}], "*)"}], "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Alpha]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Beta]\[Beta]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Beta]\[Beta]", "=", RowBox[{"tt", "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Epsilon]\[Beta]\[Beta]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Epsilon]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Alpha]\[Beta]", "=", RowBox[{"tt", "*", "GG", "*", "\[Epsilon]\[Alpha]\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"N\[Beta]\[Alpha]", "=", RowBox[{"tt", "*", "GG", "*", "\[Epsilon]\[Beta]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Alpha]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Alpha]\[Alpha]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Beta]\[Beta]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Beta]\[Beta]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]\[Nu]", "^", "2"}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"\[Kappa]\[Beta]\[Beta]", "+", RowBox[{"\[Nu]\[Nu]", "*", "\[Kappa]\[Alpha]\[Alpha]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"M\[Alpha]\[Beta]", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], ")"}], "*", "GG", "*", "\[Kappa]\[Alpha]\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Alpha]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Alpha]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q\[Beta]", "=", RowBox[{ RowBox[{"5", "/", "6"}], "*", "GG", "*", "tt", "*", "\[Gamma]\[Beta]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"virtual", " ", "work"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Epsilon]\[Alpha]\[Alpha]", ",", "\[Epsilon]\[Beta]\[Beta]", ",", "\[Epsilon]\[Alpha]\[Beta]", ",", "\[Epsilon]\[Beta]\[Alpha]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "N\[Alpha]\[Alpha]", ",", "N\[Beta]\[Beta]", ",", "N\[Alpha]\[Beta]", ",", "N\[Beta]\[Alpha]"}], "}"}]}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ "\[Kappa]\[Alpha]\[Alpha]", ",", "\[Kappa]\[Beta]\[Beta]", ",", "\[Kappa]\[Alpha]\[Beta]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ "M\[Alpha]\[Alpha]", ",", "M\[Beta]\[Beta]", ",", "M\[Alpha]\[Beta]"}], "}"}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Gamma]\[Alpha]", ",", "\[Gamma]\[Beta]"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"Q\[Alpha]", ",", "Q\[Beta]"}], "}"}]}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u0", ",", "v0", ",", "w0"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"f\[Alpha]", ",", "f\[Beta]", ",", "fn"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wine", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u0", ",", "v0", ",", "w0"}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{"\[Rho]\[Rho]", "*", "tt", "*", RowBox[{"{", RowBox[{"u2", ",", "v2", ",", "w2"}], "}"}]}], ")"}]}]}], "-", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Phi]0", ",", "\[Theta]0", ",", "\[Psi]0"}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{"\[Rho]\[Rho]", "*", RowBox[{ RowBox[{"tt", "^", "3"}], "/", "12"}], "*", RowBox[{"{", RowBox[{"\[Phi]2", ",", "\[Theta]2", ",", "\[Psi]2"}], "}"}]}], ")"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{"QUAD", "[", RowBox[{"LIN7", ",", RowBox[{ RowBox[{"(", RowBox[{ "\[Delta]wint", "+", "\[Delta]wext", "+", "\[Delta]wine"}], ")"}], "*", "jac"}], ",", "\[Alpha]"}], "]"}], ",", "\[Beta]"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.633673923685915*^9, 3.6336739535006204`*^9}, { 3.633674155068149*^9, 3.6336741996717005`*^9}, {3.6336745049841633`*^9, 3.6336745219741354`*^9}, {3.6336919593939404`*^9, 3.6336919775979815`*^9}, 3.633692380551029*^9, {3.6336927116599674`*^9, 3.633692727194856*^9}, { 3.635310826749509*^9, 3.6353108343419433`*^9}, {3.635311461613821*^9, 3.6353114619508405`*^9}, {3.7326759806780663`*^9, 3.7326760008674326`*^9}, {3.7326760331212645`*^9, 3.7326760385677853`*^9}, {3.732684137201784*^9, 3.73268419404665*^9}, { 3.732684306221466*^9, 3.7326843382153635`*^9}, 3.7326844699232764`*^9, { 3.7326845133861027`*^9, 3.73268452322455*^9}, {3.732759973190983*^9, 3.7327599776758347`*^9}, {3.7327613720703106`*^9, 3.7327614888170295`*^9}, {3.732761535853627*^9, 3.7327615404943867`*^9}, { 3.7327615972663317`*^9, 3.7327616122832594`*^9}, {3.7327616693361855`*^9, 3.73276183332095*^9}, {3.732761876700554*^9, 3.7327618790133*^9}, { 3.732761909063363*^9, 3.732761910469795*^9}, {3.73276200508918*^9, 3.732762006042756*^9}, {3.7327620750344048`*^9, 3.732762101490326*^9}, 3.7327688007102947`*^9, {3.7327705695330524`*^9, 3.7327705708254137`*^9}, { 3.732788507552166*^9, 3.7327885085870132`*^9}, {3.732788681344634*^9, 3.7327887090994544`*^9}, {3.732788743287696*^9, 3.73278879848213*^9}, { 3.732788922306119*^9, 3.7327889462731514`*^9}, {3.732789012151597*^9, 3.732789028200858*^9}, {3.7327890791192408`*^9, 3.732789086999034*^9}, { 3.732789135698248*^9, 3.7327891358892384`*^9}, {3.7327891989507074`*^9, 3.7327891993104925`*^9}, {3.733116709198372*^9, 3.733116731638229*^9}, { 3.7334931331412554`*^9, 3.7334932071522064`*^9}, {3.733493353668892*^9, 3.7334934953404007`*^9}, {3.733493581610343*^9, 3.733493589891471*^9}, { 3.7334936319789553`*^9, 3.7334936623392687`*^9}, {3.7334936935401745`*^9, 3.733493716917615*^9}, {3.7334937687375154`*^9, 3.733493799379287*^9}, { 3.7335602963276734`*^9, 3.7335603891038685`*^9}, {3.7337039222525787`*^9, 3.733703929721642*^9}, {3.7337040222462597`*^9, 3.7337040262631474`*^9}, { 3.733710121070121*^9, 3.733710122358057*^9}, 3.7337110885786676`*^9, 3.733711184948838*^9, {3.733711259729956*^9, 3.733711278366322*^9}, 3.7337113240271106`*^9, {3.733711384581702*^9, 3.733711436236964*^9}, 3.7337114809469175`*^9, {3.7337115173918333`*^9, 3.733711518879483*^9}, 3.733711560439453*^9, {3.733711609599924*^9, 3.7337116342722664`*^9}, { 3.733711689751358*^9, 3.7337116969119487`*^9}, {3.7337129879879694`*^9, 3.7337130014112797`*^9}, {3.733713172835663*^9, 3.733713173913886*^9}, { 3.7337132483436465`*^9, 3.7337132496094065`*^9}, {3.733713283003566*^9, 3.7337134200180254`*^9}, {3.733713464428997*^9, 3.7337135191222897`*^9}, { 3.7337135777847366`*^9, 3.73371367154463*^9}, {3.7337140009857264`*^9, 3.7337140458967295`*^9}, {3.733714091198394*^9, 3.7337141070440063`*^9}, { 3.733714143813529*^9, 3.733714146610505*^9}, {3.733721976862414*^9, 3.7337219813629093`*^9}, {3.733722281191476*^9, 3.7337222944429536`*^9}, { 3.733722382186266*^9, 3.7337223828425617`*^9}, {3.7337224624293957`*^9, 3.7337224858690815`*^9}, 3.7337225537825146`*^9, {3.733722654230641*^9, 3.733722661731436*^9}, {3.733722818999301*^9, 3.7337228267499514`*^9}, { 3.733723144924486*^9, 3.733723159691375*^9}, {3.733723196273369*^9, 3.733723198695795*^9}, {3.7337232377777586`*^9, 3.7337232408874655`*^9}, { 3.73372435111442*^9, 3.733724354067712*^9}, {3.7337244099801674`*^9, 3.733724433076069*^9}, {3.7337245236325226`*^9, 3.733724524679802*^9}, { 3.7337873724058084`*^9, 3.7337873841879997`*^9}, {3.7337879154409466`*^9, 3.7337879158316607`*^9}, {3.734065101190684*^9, 3.734065109945911*^9}, 3.734071634767725*^9, {3.734219464256485*^9, 3.734219489352889*^9}, { 3.734219525211231*^9, 3.7342195715720572`*^9}, 3.73421973141712*^9, { 3.7348415845456142`*^9, 3.7348415857332087`*^9}, {3.7440202929533424`*^9, 3.7440202932363644`*^9}, {3.746150119112222*^9, 3.7461501205962443`*^9}, { 3.7650873052252254`*^9, 3.765087311647415*^9}},ExpressionUUID->"491bae6e-a5df-4b54-83fe-\ c75123523470"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["SOLVER", "Section", CellChangeTimes->{ 3.4430806364968*^9, {3.4453166713873997`*^9, 3.4453166747414*^9}, { 3.447462264275*^9, 3.4474622644154*^9}, {3.4695731321116*^9, 3.4695731359491997`*^9}, 3.473055186341*^9, {3.4730552472860003`*^9, 3.47305524884*^9}, {3.473055399782*^9, 3.473055419801*^9}, { 3.4734696760778*^9, 3.4734697047349997`*^9}, {3.4770537891542*^9, 3.4770537950354*^9}, {3.4932799754514*^9, 3.4932799779161997`*^9}, { 3.4945558951644*^9, 3.4945558957416*^9}, {3.4957646303032*^9, 3.4957646329084*^9}, {3.497581602118*^9, 3.4975816042552*^9}, { 3.500960505817*^9, 3.5009605094206*^9}, {3.556623836083009*^9, 3.5566238462386265`*^9}, {3.5568725055395393`*^9, 3.5568725163821597`*^9}, {3.556872678728445*^9, 3.5568726810485783`*^9}, { 3.7323376045620503`*^9, 3.7323376086812124`*^9}, {3.7335630623483887`*^9, 3.733563072583865*^9}, {3.733563159827469*^9, 3.7335631629996696`*^9}, { 3.7335632161458936`*^9, 3.733563217193006*^9}},ExpressionUUID->"657d6ff8-7686-44a2-b63b-\ fef1894f6835"], Cell[CellGroupData[{ Cell["DISP defs", "Subsection", CellChangeTimes->{{3.7582531074375505`*^9, 3.7582531288543863`*^9}, { 3.787892825419589*^9, 3.7878928340449758`*^9}, 3.8223696918276553`*^9},ExpressionUUID->"9a0b5f7d-b858-4edd-bcd6-\ 6d923bcb25ae"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"MEC", "-", "E1050"}], "|", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}], "]"}], ":=", RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "equ", ",", "sol", ",", "\[Delta]WT"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WT", "=", RowBox[{"ParallelMap", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WT", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WT", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"D", "[", RowBox[{"\[Delta]WT", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Solve", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", "dof"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"First", "[", "sol", "]"}], "]"}]}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"large", " ", "scale", " ", "defs"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", "CLASSIC", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", " ", ",", "\[Delta]dof", ",", "sol", ",", "\[Delta]We", ",", "DOF", ",", "\[Delta]DOF", ",", "MAP", ",", "\[Delta]MAP", ",", "ABL", ",", "nequ", ",", "ndof", ",", "A", ",", "B", ",", "dofe", ",", "\[Delta]dofe", ",", "eque", ",", "Le", ",", "LA", ",", "LB", ",", "tt"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"tt", "=", RowBox[{"TimeUsed", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "element", " ", "contributions", " ", "in", " ", "parallel"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"ABL", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]We", " ", "=", " ", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", "#"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dofe", " ", "=", RowBox[{"Union", "[", RowBox[{"Cases", "[", RowBox[{"\[Delta]We", ",", RowBox[{ RowBox[{"a", "[", "__", "]"}], "|", RowBox[{"b", "[", "__", "]"}]}], ",", "Infinity"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]dofe", " ", "=", RowBox[{"Union", "[", RowBox[{"Cases", "[", RowBox[{"\[Delta]We", ",", RowBox[{ RowBox[{"\[Delta]a", "[", "__", "]"}], "|", RowBox[{"\[Delta]b", "[", "__", "]"}]}], ",", "Infinity"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"eque", "=", RowBox[{"D", "[", RowBox[{"\[Delta]We", ",", RowBox[{"{", "\[Delta]dofe", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Join", "[", RowBox[{ RowBox[{"CoefficientArrays", "[", RowBox[{"eque", ",", "dofe"}], "]"}], ",", RowBox[{"{", RowBox[{"dofe", ",", "\[Delta]dofe"}], "}"}]}], "]"}]}], ")"}], "&"}], ",", "\[IndentingNewLine]", "ele"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\\"", ",", RowBox[{ RowBox[{"TimeUsed", "[", "]"}], "-", "tt"}], ",", "\"\<): nele = \>\"", ",", RowBox[{"Length", "[", "ele", "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"tt", "=", RowBox[{"TimeUsed", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"dof", " ", "mapping"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"DOF", "=", RowBox[{"Union", "[", RowBox[{"Flatten", "[", RowBox[{"ABL", "[", RowBox[{"[", RowBox[{"All", ",", "3"}], "]"}], "]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]DOF", "=", RowBox[{"Union", "[", RowBox[{"Flatten", "[", RowBox[{"ABL", "[", RowBox[{"[", RowBox[{"All", ",", "4"}], "]"}], "]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ndof", "=", RowBox[{"Length", "[", "DOF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nequ", "=", RowBox[{"Length", "[", "\[Delta]DOF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"MAP", "=", " ", RowBox[{"Dispatch", "[", RowBox[{"Thread", "[", RowBox[{"DOF", "->", RowBox[{"Array", "[", RowBox[{ RowBox[{"#", "&"}], ",", "ndof"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]MAP", "=", " ", RowBox[{"Dispatch", "[", RowBox[{"Thread", "[", RowBox[{"\[Delta]DOF", "->", RowBox[{"Array", "[", RowBox[{ RowBox[{"#", "&"}], ",", "nequ"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ABL", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "3", "]"}], "]"}], "/.", " ", "MAP"}], ",", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "4", "]"}], "]"}], "/.", " ", "\[Delta]MAP"}]}], "}"}], "&"}], ",", "ABL"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"A", " ", "=", RowBox[{"SparseArray", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "->", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"nequ", ",", "ndof"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"B", " ", "=", RowBox[{"SparseArray", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", "1", "}"}], "->", "0"}], "}"}], ",", RowBox[{"{", "nequ", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\\"", ",", RowBox[{ RowBox[{"TimeUsed", "[", "]"}], "-", "tt"}], ",", "\"\<): {nequ,ndof} = \>\"", ",", RowBox[{"{", RowBox[{"nequ", ",", "ndof"}], "}"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"parallel", " ", "build"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"tt", "=", RowBox[{"TimeUsed", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Do", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"LA", " ", "=", " ", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"List", ",", RowBox[{"ec", "[", RowBox[{"[", "4", "]"}], "]"}], ",", RowBox[{"ec", "[", RowBox[{"[", "3", "]"}], "]"}]}], "]"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"LB", " ", "=", " ", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"{", "#", "}"}], "&"}], ",", RowBox[{"ec", "[", RowBox[{"[", "4", "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"A", "+=", RowBox[{"SparseArray", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"LA", "\[Rule]", RowBox[{"Flatten", "[", RowBox[{"ec", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"nequ", ",", "ndof"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"B", "+=", RowBox[{"SparseArray", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"LB", "\[Rule]", RowBox[{"Flatten", "[", RowBox[{"ec", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}]}], "]"}], ",", RowBox[{"{", "nequ", "}"}]}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"ec", ",", "ABL"}], "}"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\\"", ",", RowBox[{ RowBox[{"TimeUsed", "[", "]"}], "-", "tt"}], ",", "\"\<): nele = \>\"", ",", RowBox[{"Length", "[", "ele", "]"}]}], "]"}], ";", " ", "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"solve", " ", "with", " ", "default", " ", "method"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"tt", "=", RowBox[{"TimeUsed", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Thread", "[", RowBox[{"DOF", "->", RowBox[{"LinearSolve", "[", RowBox[{"A", ",", RowBox[{"-", "B"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\\"", ",", RowBox[{ RowBox[{"TimeUsed", "[", "]"}], "-", "tt"}], ",", "\"\<)\>\""}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", "sol", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", "CLASSICP", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", " ", ",", "\[Delta]dof", ",", "sol", ",", "\[Delta]We", ",", "DOF", ",", "\[Delta]DOF", ",", "MAP", ",", "\[Delta]MAP", ",", "ABL", ",", "nequ", ",", "ndof", ",", "A", ",", "B", ",", "dofe", ",", "\[Delta]dofe", ",", "eque", ",", "Le", ",", "LA", ",", "LB", ",", "tt", ",", "ec"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"tt", "=", RowBox[{"TimeUsed", "[", "]"}]}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"element", " ", "contributions", " ", "in", " ", "parallel"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ABL", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"\[Delta]We", " ", "=", " ", RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", "#"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dofe", " ", "=", RowBox[{"Union", "[", RowBox[{"Cases", "[", RowBox[{"\[Delta]We", ",", RowBox[{ RowBox[{"a", "[", "__", "]"}], "|", RowBox[{"b", "[", "__", "]"}], "|", RowBox[{"c", "[", "__", "]"}]}], ",", "Infinity"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]dofe", " ", "=", RowBox[{"Union", "[", RowBox[{"Cases", "[", RowBox[{"\[Delta]We", ",", RowBox[{ RowBox[{"\[Delta]a", "[", "__", "]"}], "|", RowBox[{"\[Delta]b", "[", "__", "]"}], "|", RowBox[{"\[Delta]c", "[", "__", "]"}]}], ",", "Infinity"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"for", " ", "load", " ", "elements"}], "*)"}], "\[IndentingNewLine]", RowBox[{"dofe", "=", RowBox[{"If", "[", RowBox[{ RowBox[{"dofe", "\[Equal]", RowBox[{"{", "}"}]}], ",", RowBox[{"(", RowBox[{"\[Delta]dofe", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Delta]a", "\[Rule]", "a"}], ",", RowBox[{"\[Delta]b", "->", "b"}], ",", RowBox[{"\[Delta]c", "\[Rule]", "c"}]}], "}"}]}], ")"}], ",", "dofe"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"eque", "=", RowBox[{"D", "[", RowBox[{"\[Delta]We", ",", RowBox[{"{", "\[Delta]dofe", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"coff", "=", RowBox[{"CoefficientArrays", "[", RowBox[{"eque", ",", "dofe"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"coff", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", "coff", "]"}], "\[Equal]", "1"}], ",", RowBox[{"Append", "[", RowBox[{"coff", ",", RowBox[{"SparseArray", "[", RowBox[{ RowBox[{"{", "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"Length", "[", "\[Delta]dofe", "]"}], ",", RowBox[{"Length", "[", "\[Delta]dofe", "]"}]}], "}"}]}], "]"}]}], "]"}], ",", "coff"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Join", "[", RowBox[{"coff", ",", RowBox[{"{", RowBox[{"dofe", ",", "\[Delta]dofe"}], "}"}]}], "]"}]}], ")"}], "&"}], ",", "\[IndentingNewLine]", "ele"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"Print", "[", RowBox[{"\"\\"", ",", RowBox[{ RowBox[{"TimeUsed", "[", "]"}], "-", "tt"}], ",", "\"\<): nele = \>\"", ",", RowBox[{"Length", "[", "ele", "]"}]}], "]"}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"tt", "=", RowBox[{"TimeUsed", "[", "]"}]}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"dof", " ", "mapping"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"DOF", "=", RowBox[{"Union", "[", RowBox[{"Flatten", "[", RowBox[{"ABL", "[", RowBox[{"[", RowBox[{"All", ",", "3"}], "]"}], "]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]DOF", "=", RowBox[{"Union", "[", RowBox[{"Flatten", "[", RowBox[{"ABL", "[", RowBox[{"[", RowBox[{"All", ",", "4"}], "]"}], "]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ndof", "=", RowBox[{"Length", "[", "DOF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nequ", "=", RowBox[{"Length", "[", "\[Delta]DOF", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"MAP", "=", " ", RowBox[{"Dispatch", "[", RowBox[{"Thread", "[", RowBox[{"DOF", "->", RowBox[{"Array", "[", RowBox[{ RowBox[{"#", "&"}], ",", "ndof"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]MAP", "=", " ", RowBox[{"Dispatch", "[", RowBox[{"Thread", "[", RowBox[{"\[Delta]DOF", "->", RowBox[{"Array", "[", RowBox[{ RowBox[{"#", "&"}], ",", "nequ"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ABL", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "3", "]"}], "]"}], "/.", " ", "MAP"}], ",", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "4", "]"}], "]"}], "/.", " ", "\[Delta]MAP"}]}], "}"}], "&"}], ",", "ABL"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"A", " ", "=", RowBox[{"SparseArray", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "->", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"nequ", ",", "ndof"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"B", " ", "=", RowBox[{"SparseArray", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", "1", "}"}], "->", "0"}], "}"}], ",", RowBox[{"{", "nequ", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"Print", "[", RowBox[{"\"\\"", ",", RowBox[{ RowBox[{"TimeUsed", "[", "]"}], "-", "tt"}], ",", "\"\<): {nequ,ndof} = \>\"", ",", RowBox[{"{", RowBox[{"nequ", ",", "ndof"}], "}"}]}], "]"}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"parallel", " ", "build"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"tt", "=", RowBox[{"TimeUsed", "[", "]"}]}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{"A", "=", RowBox[{"ParallelSum", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"LA", " ", "=", " ", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Outer", "[", RowBox[{"List", ",", RowBox[{"ec", "[", RowBox[{"[", "4", "]"}], "]"}], ",", RowBox[{"ec", "[", RowBox[{"[", "3", "]"}], "]"}]}], "]"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SparseArray", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"LA", "\[Rule]", RowBox[{"Flatten", "[", RowBox[{"ec", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"nequ", ",", "ndof"}], "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"ec", ",", "ABL"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"B", "=", RowBox[{"ParallelSum", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"LB", " ", "=", " ", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"{", "#", "}"}], "&"}], ",", RowBox[{"ec", "[", RowBox[{"[", "4", "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SparseArray", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"LB", "\[Rule]", RowBox[{"Flatten", "[", RowBox[{"ec", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}]}], "]"}], ",", RowBox[{"{", "nequ", "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"ec", ",", "ABL"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"Print", "[", RowBox[{"\"\\"", ",", RowBox[{ RowBox[{"TimeUsed", "[", "]"}], "-", "tt"}], ",", "\"\<): nele = \>\"", ",", RowBox[{"Length", "[", "ele", "]"}]}], "]"}], ";"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"solve", " ", "with", " ", "default", " ", "method"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"tt", "=", RowBox[{"TimeUsed", "[", "]"}]}], ";"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Thread", "[", RowBox[{"DOF", "->", RowBox[{"LinearSolve", "[", RowBox[{"A", ",", RowBox[{"-", "B"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"Print", "[", RowBox[{"\"\\"", ",", RowBox[{ RowBox[{"TimeUsed", "[", "]"}], "-", "tt"}], ",", "\"\<)\>\""}], "]"}], ";"}], "*)"}], "\[IndentingNewLine]", RowBox[{"Return", "[", "sol", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", "\[Delta]WW_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"equ", ",", "sol"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"equ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Solve", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"First", "[", "sol", "]"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.445098179109*^9, 3.4450982721786003`*^9, {3.451279000619*^9, 3.4512790074518003`*^9}, {3.4512864298050003`*^9, 3.4512864368094*^9}, { 3.4706476335011683`*^9, 3.4706476477283683`*^9}, {3.4770540063998003`*^9, 3.4770540103154*^9}, {3.4818115795696*^9, 3.481811581816*^9}, { 3.4820252104592*^9, 3.4820252549035997`*^9}, {3.4820583880738*^9, 3.4820584077454*^9}, {3.4822351571716003`*^9, 3.4822351901188*^9}, { 3.4823004164308*^9, 3.4823004243712*^9}, {3.493344815723*^9, 3.4933448166745996`*^9}, {3.4933448517122*^9, 3.4933448763445997`*^9}, { 3.4933449778422003`*^9, 3.4933449867342*^9}, {3.4942053389948*^9, 3.4942053532688*^9}, {3.495099886848*^9, 3.4950998935959997`*^9}, { 3.495099958993*^9, 3.495099969426*^9}, 3.495100042671*^9, { 3.495100076422*^9, 3.495100110413*^9}, {3.49510016601*^9, 3.4951001814849997`*^9}, 3.4951002189040003`*^9, {3.495100255352*^9, 3.495100257927*^9}, {3.495100455098*^9, 3.4951004564449997`*^9}, { 3.495100515517*^9, 3.4951005243059998`*^9}, {3.495100586*^9, 3.4951006116359997`*^9}, {3.496055002618*^9, 3.496055006674*^9}, { 3.5007168179316*^9, 3.5007168299904003`*^9}, {3.557657331191841*^9, 3.5576573613778934`*^9}, {3.557658058371518*^9, 3.5576580893531723`*^9}, { 3.6204640425822525`*^9, 3.620464043896328*^9}, {3.629448441451354*^9, 3.6294484425113554`*^9}, {3.632027966812848*^9, 3.63202808169145*^9}, { 3.632028112439104*^9, 3.632028231997714*^9}, {3.632028264944972*^9, 3.632028286223409*^9}, 3.6320284618641176`*^9, 3.6320284928925724`*^9, { 3.6321887622237573`*^9, 3.6321887797107573`*^9}, {3.6321888300516367`*^9, 3.6321888552960806`*^9}, 3.6321889475563574`*^9, {3.63218903764051*^9, 3.6321890646730566`*^9}, {3.632189114899929*^9, 3.63218912051025*^9}, { 3.632189363344139*^9, 3.632189368985462*^9}, {3.65933624669765*^9, 3.6593362536240625`*^9}, {3.659336346288225*^9, 3.6593363466002254`*^9}, { 3.685234016837945*^9, 3.6852340690569315`*^9}, {3.6852341853385825`*^9, 3.6852342255038795`*^9}, {3.6852342700224257`*^9, 3.685234275388733*^9}, 3.685260724724876*^9, {3.685271245062879*^9, 3.685271273442919*^9}, { 3.685340120474733*^9, 3.6853401228547363`*^9}, {3.6873488134786153`*^9, 3.6873488145086164`*^9}, {3.687348848548664*^9, 3.6873488495686655`*^9}, { 3.6873489495588055`*^9, 3.687348976528844*^9}, {3.6873490107688913`*^9, 3.6873490208289056`*^9}, {3.6873490736689796`*^9, 3.6873490997690163`*^9}, {3.6873491395590715`*^9, 3.6873491721791177`*^9}, {3.6873493303593388`*^9, 3.687349336179347*^9}, { 3.687521139333435*^9, 3.687521232626771*^9}, {3.687526828204684*^9, 3.6875268662258587`*^9}, {3.687744603751021*^9, 3.687744621651046*^9}, { 3.687744782441271*^9, 3.687744793141286*^9}, {3.687744898361433*^9, 3.687744900871437*^9}, {3.687828873646782*^9, 3.6878288977768154`*^9}, { 3.6893872627070065`*^9, 3.6893872737370224`*^9}, {3.689388189828305*^9, 3.689388190108305*^9}, {3.6924132329925613`*^9, 3.692413234362563*^9}, { 3.6924133951727886`*^9, 3.6924134472928615`*^9}, {3.692413504072941*^9, 3.6924135542830114`*^9}, {3.6924138300453973`*^9, 3.692413892645485*^9}, { 3.6924150151235356`*^9, 3.692415019653542*^9}, {3.6924150955736485`*^9, 3.692415151833727*^9}, {3.6924152984639325`*^9, 3.692415397454071*^9}, { 3.6924155440942764`*^9, 3.6924155997043543`*^9}, {3.6924163099373484`*^9, 3.692416448987543*^9}, {3.6924164799875865`*^9, 3.692416520217643*^9}, { 3.6926047241829367`*^9, 3.6926047936630344`*^9}, {3.692694606764871*^9, 3.6926946080948734`*^9}, {3.6926946485549297`*^9, 3.6926946848649807`*^9}, {3.692694726505039*^9, 3.6926947795951133`*^9}, { 3.6926948533452168`*^9, 3.6926948903052683`*^9}, {3.692695016775445*^9, 3.6926950466854873`*^9}, {3.6926951047455683`*^9, 3.6926952014557037`*^9}, {3.692695400025982*^9, 3.6926954007959833`*^9}, { 3.692699088631146*^9, 3.6926990917611504`*^9}, {3.692699130701205*^9, 3.692699150701233*^9}, {3.6926992111213174`*^9, 3.692699243221362*^9}, { 3.692767928345048*^9, 3.6927679342250557`*^9}, {3.692768078185258*^9, 3.692768090845275*^9}, {3.692768583705965*^9, 3.6927686080859995`*^9}, { 3.692768652936062*^9, 3.6927686668160815`*^9}, {3.6927686975061245`*^9, 3.692768721766158*^9}, {3.6927687546262045`*^9, 3.692768807796279*^9}, { 3.6927688439663296`*^9, 3.692768846666333*^9}, {3.6927689511864796`*^9, 3.6927690097565613`*^9}, {3.692769047276614*^9, 3.6927692269968657`*^9}, { 3.692769260096912*^9, 3.6927692611369133`*^9}, {3.692769508057259*^9, 3.6927695324672937`*^9}, {3.692769570707347*^9, 3.692769719217555*^9}, { 3.6927698159576902`*^9, 3.6927698318077126`*^9}, 3.6927699552978854`*^9, { 3.6927701375081406`*^9, 3.6927701495781574`*^9}, {3.692772614961609*^9, 3.692772638701642*^9}, {3.692782982318822*^9, 3.6927829888081927`*^9}, { 3.6927830390960693`*^9, 3.692783045068411*^9}, {3.692783125046985*^9, 3.6927831273591175`*^9}, {3.692784897481363*^9, 3.6927849907176957`*^9}, 3.6927851596043553`*^9, {3.692786968327264*^9, 3.6927869691872644`*^9}, { 3.6927917561302457`*^9, 3.6927918079203186`*^9}, {3.6927918834304237`*^9, 3.692791893050438*^9}, 3.692791931280491*^9, {3.692791999660587*^9, 3.692792026840625*^9}, {3.6927921455307913`*^9, 3.6927921655908194`*^9}, { 3.692792200960869*^9, 3.692792228630907*^9}, {3.692792265330959*^9, 3.6927922938409986`*^9}, {3.6927923374910593`*^9, 3.6927923700511055`*^9}, {3.6927924565012264`*^9, 3.692792499271286*^9}, { 3.692792553391362*^9, 3.6927925860314074`*^9}, {3.692792731971612*^9, 3.6927927381216207`*^9}, {3.692792820381736*^9, 3.692792853021782*^9}, { 3.6927928932518377`*^9, 3.6927929516419196`*^9}, {3.6927929886919713`*^9, 3.6927930024219904`*^9}, {3.69279305234206*^9, 3.6927930715320873`*^9}, { 3.6927932237223005`*^9, 3.692793224982302*^9}, 3.6927932572523475`*^9, { 3.6927934421826067`*^9, 3.6927934498726172`*^9}, {3.692793484652666*^9, 3.6927935029226913`*^9}, {3.6927954180780883`*^9, 3.692795446828129*^9}, { 3.6928535571114936`*^9, 3.692853577521522*^9}, {3.692854825823887*^9, 3.692854837063903*^9}, {3.692854874433955*^9, 3.6928548775639596`*^9}, { 3.6928579822683063`*^9, 3.6928579955883245`*^9}, {3.6929656707917795`*^9, 3.692965795661954*^9}, {3.6929658426120195`*^9, 3.6929658536320353`*^9}, { 3.6929659138621197`*^9, 3.6929659218321304`*^9}, {3.692965990142226*^9, 3.6929660268822775`*^9}, {3.692966066362333*^9, 3.692966192182509*^9}, 3.69296637876277*^9, {3.6929669253235354`*^9, 3.692966936273551*^9}, { 3.6929669714336*^9, 3.692966971953601*^9}, 3.6929670139636593`*^9, 3.692967433554247*^9, {3.6929675634944286`*^9, 3.6929676911746073`*^9}, { 3.6929677832047367`*^9, 3.6929678068347692`*^9}, {3.6929678599332247`*^9, 3.6929678711132402`*^9}, 3.692967908543293*^9, {3.693017052482854*^9, 3.6930171392429757`*^9}, {3.6930174027243443`*^9, 3.6930175965956163`*^9}, {3.6930184697368383`*^9, 3.6930185654269724`*^9}, {3.6930186942971525`*^9, 3.6930188354373503`*^9}, {3.6930188926684303`*^9, 3.6930189600095253`*^9}, {3.693018990869568*^9, 3.693018991349569*^9}, { 3.693019036009631*^9, 3.693019041239639*^9}, {3.6930190980797186`*^9, 3.693019098629719*^9}, {3.693019130059763*^9, 3.6930192205398893`*^9}, { 3.693020315081422*^9, 3.693020326351438*^9}, {3.6930205415560236`*^9, 3.6930206058761134`*^9}, {3.6931381375028915`*^9, 3.693138137902892*^9}, { 3.693138677303647*^9, 3.693138683263655*^9}, {3.693139600730257*^9, 3.6931396288802967`*^9}, {3.6932135226775846`*^9, 3.6932135229775853`*^9}, {3.693219312471691*^9, 3.69321932632171*^9}, { 3.6932194762919197`*^9, 3.6932194879419365`*^9}, 3.6932195481520205`*^9, { 3.693220303405078*^9, 3.6932203178550987`*^9}, {3.693220688975618*^9, 3.693220698955632*^9}, {3.6933024593938713`*^9, 3.6933024657438803`*^9}, { 3.693302603694073*^9, 3.693302604214074*^9}, {3.6933103950923057`*^9, 3.693310399082311*^9}, {3.6933104528223867`*^9, 3.693310456172391*^9}, { 3.693380733755448*^9, 3.693380746175465*^9}, {3.6936247413492084`*^9, 3.6936247436692114`*^9}, {3.69362490643944*^9, 3.6936249099894447`*^9}, { 3.6937175435584445`*^9, 3.6937175579984646`*^9}, {3.693717708199675*^9, 3.6937177268707013`*^9}, {3.6937178194508305`*^9, 3.6937178401008596`*^9}, {3.693717934550992*^9, 3.6937179428310037`*^9}, { 3.6937180305511265`*^9, 3.693718060841169*^9}, {3.693718198801362*^9, 3.6937182028213673`*^9}, {3.693723123415037*^9, 3.6937231809651175`*^9}, { 3.693723252275217*^9, 3.69372327580525*^9}, {3.6937233347053328`*^9, 3.693723337655337*^9}, {3.693723689337829*^9, 3.6937237730079465`*^9}, { 3.6937240089782767`*^9, 3.6937240113382797`*^9}, {3.6938202843684807`*^9, 3.6938203172553616`*^9}, {3.6938203482121134`*^9, 3.6938203495041876`*^9}, 3.6938204448556414`*^9, {3.693826654370701*^9, 3.693826713082033*^9}, 3.6938269274112916`*^9, {3.69384095960849*^9, 3.6938409879385295`*^9}, { 3.6938967427518525`*^9, 3.6938967457718563`*^9}, {3.693896818211958*^9, 3.6938968234619656`*^9}, {3.6940917346582804`*^9, 3.6940917372882843`*^9}, {3.6949174720509205`*^9, 3.6949174781309295`*^9}, {3.69491751432098*^9, 3.6949175560810385`*^9}, { 3.697770949307855*^9, 3.697770962227873*^9}, {3.723799262336609*^9, 3.723799262645475*^9}, 3.7239435284061375`*^9, {3.7239436460810485`*^9, 3.72394364668592*^9}, {3.7254330838452635`*^9, 3.72543315169353*^9}, { 3.7254331912947936`*^9, 3.7254332075936446`*^9}, {3.725433705009429*^9, 3.7254337902858543`*^9}, {3.72543382083533*^9, 3.7254339260782228`*^9}, { 3.7254341992826924`*^9, 3.725434210286269*^9}, {3.7254342875818415`*^9, 3.7254342880778885`*^9}, {3.725443796293885*^9, 3.7254438161441803`*^9}, { 3.725756614481497*^9, 3.725756618125969*^9}, {3.7257914023599677`*^9, 3.7257914032179613`*^9}, {3.725791548301742*^9, 3.7257915491082635`*^9}, { 3.7257916547512665`*^9, 3.725791656837747*^9}, {3.725891883570933*^9, 3.7258919550235353`*^9}, {3.7258922912790194`*^9, 3.725892303666605*^9}, { 3.7258923638013153`*^9, 3.7258923917562647`*^9}, {3.732781849897335*^9, 3.732781851740935*^9}, {3.756128796258463*^9, 3.756128808101935*^9}, { 3.7561289636033297`*^9, 3.7561289674012337`*^9}, {3.7561291581496544`*^9, 3.756129161730915*^9}, {3.756168228209236*^9, 3.7561682921182303`*^9}, { 3.756168336119172*^9, 3.7561683422817945`*^9}, {3.7561687588268995`*^9, 3.756168760043317*^9}, {3.756168790608805*^9, 3.7561688096838417`*^9}, { 3.7562669791923923`*^9, 3.7562669871894484`*^9}, {3.7562671345571966`*^9, 3.7562671514185095`*^9}, {3.756267238618904*^9, 3.75626728245811*^9}, { 3.7562673231127896`*^9, 3.756267369934089*^9}, {3.7562679132987003`*^9, 3.7562679378330235`*^9}, {3.7562686403059607`*^9, 3.75626865150496*^9}, 3.756268910964476*^9, 3.756268975347582*^9, {3.756291635829771*^9, 3.756291670714565*^9}, {3.7562970292001624`*^9, 3.7562971110957913`*^9}, { 3.756354727514307*^9, 3.7563547516317015`*^9}, {3.756354849442463*^9, 3.7563548962495594`*^9}, {3.7563549974812*^9, 3.7563550014513693`*^9}, { 3.756355080997491*^9, 3.756355089151907*^9}, {3.7563551640676885`*^9, 3.756355171626652*^9}, {3.756355203033866*^9, 3.7563553257026477`*^9}, { 3.7563554337406178`*^9, 3.7563554593890176`*^9}, {3.756355541718184*^9, 3.756355546747837*^9}, {3.7563557326318254`*^9, 3.7563557465035677`*^9}, { 3.7563558550458755`*^9, 3.7563558609196053`*^9}, {3.756355910283166*^9, 3.75635593869836*^9}, {3.7563560087797346`*^9, 3.7563560102950015`*^9}, { 3.756797773170301*^9, 3.7567978192689314`*^9}, {3.756798047305444*^9, 3.7567980844374113`*^9}, {3.7567981179139524`*^9, 3.756798154780326*^9}, { 3.7568139377944374`*^9, 3.756813941735011*^9}, {3.7578171254549913`*^9, 3.7578171982352457`*^9}, {3.75781775424854*^9, 3.7578177761870728`*^9}, { 3.75781956271533*^9, 3.757819566308566*^9}, 3.7878930157969465`*^9, 3.7878931876970196`*^9, {3.7890171909617825`*^9, 3.789017212740966*^9}, { 3.8152685002967186`*^9, 3.815268678285927*^9}, {3.815269201087903*^9, 3.815269223194291*^9}}, CellLabel-> "In[198]:=",ExpressionUUID->"9827ba0c-f14a-44a8-a693-bdba463b97ad"] }, Closed]], Cell[CellGroupData[{ Cell["EVNT defs", "Subsection", CellChangeTimes->{{3.7582531074375505`*^9, 3.7582531288543863`*^9}, { 3.787892825419589*^9, 3.7878928340449758`*^9}, {3.8175215825088205`*^9, 3.8175215865117702`*^9}, {3.8223696966597366`*^9, 3.822369704047408*^9}},ExpressionUUID->"d99e426c-6455-459f-b463-\ 1d4642751703"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNT", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "equ", ",", "sol", ",", "\[Delta]WT", ",", "\[CapitalDelta]s"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WT", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNT", ",", RowBox[{"{", RowBox[{"s0", ",", "sol0"}], "}"}]}], "}"}], ",", "#", " ", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WT", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WT", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"D", "[", RowBox[{"\[Delta]WT", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"First", "[", RowBox[{"Solve", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", "dof"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", "sol", "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "find", " ", "\[CapitalDelta]s", " ", "for", " ", "the", " ", "next", " ", "event"}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[CapitalDelta]s", "=", RowBox[{"Min", "[", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"EVNTPOST", ",", RowBox[{"{", RowBox[{"s0", ",", "sol"}], "}"}]}], "}"}], ",", "#", ",", "fun"}], "]"}], "&"}], ",", RowBox[{"Select", "[", RowBox[{"ele", ",", RowBox[{ RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "\[Equal]", "CONTACT"}], "&"}]}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "solution", " ", "at", " ", "the", " ", "next", " ", "event", " ", "U"}], "=", RowBox[{ RowBox[{"0", " ", "or", " ", "F"}], "=", RowBox[{"0", " ", "or", " ", "both"}]}]}], " ", "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{ RowBox[{"s0", "+", "\[CapitalDelta]s"}], ",", RowBox[{"sol", " ", "/.", RowBox[{"s", "\[Rule]", RowBox[{"s0", "+", "\[CapitalDelta]s"}]}]}]}], "}"}], "]"}]}]}], "]"}]}], ";"}], " "}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.445098179109*^9, 3.4450982721786003`*^9, {3.451279000619*^9, 3.4512790074518003`*^9}, {3.4512864298050003`*^9, 3.4512864368094*^9}, { 3.4706476335011683`*^9, 3.4706476477283683`*^9}, {3.4770540063998003`*^9, 3.4770540103154*^9}, {3.4818115795696*^9, 3.481811581816*^9}, { 3.4820252104592*^9, 3.4820252549035997`*^9}, {3.4820583880738*^9, 3.4820584077454*^9}, {3.4822351571716003`*^9, 3.4822351901188*^9}, { 3.4823004164308*^9, 3.4823004243712*^9}, {3.493344815723*^9, 3.4933448166745996`*^9}, {3.4933448517122*^9, 3.4933448763445997`*^9}, { 3.4933449778422003`*^9, 3.4933449867342*^9}, {3.4942053389948*^9, 3.4942053532688*^9}, {3.495099886848*^9, 3.4950998935959997`*^9}, { 3.495099958993*^9, 3.495099969426*^9}, 3.495100042671*^9, { 3.495100076422*^9, 3.495100110413*^9}, {3.49510016601*^9, 3.4951001814849997`*^9}, 3.4951002189040003`*^9, {3.495100255352*^9, 3.495100257927*^9}, {3.495100455098*^9, 3.4951004564449997`*^9}, { 3.495100515517*^9, 3.4951005243059998`*^9}, {3.495100586*^9, 3.4951006116359997`*^9}, {3.496055002618*^9, 3.496055006674*^9}, { 3.5007168179316*^9, 3.5007168299904003`*^9}, {3.557657331191841*^9, 3.5576573613778934`*^9}, {3.557658058371518*^9, 3.5576580893531723`*^9}, { 3.6204640425822525`*^9, 3.620464043896328*^9}, {3.629448441451354*^9, 3.6294484425113554`*^9}, {3.632027966812848*^9, 3.63202808169145*^9}, { 3.632028112439104*^9, 3.632028231997714*^9}, {3.632028264944972*^9, 3.632028286223409*^9}, 3.6320284618641176`*^9, 3.6320284928925724`*^9, { 3.6321887622237573`*^9, 3.6321887797107573`*^9}, {3.6321888300516367`*^9, 3.6321888552960806`*^9}, 3.6321889475563574`*^9, {3.63218903764051*^9, 3.6321890646730566`*^9}, {3.632189114899929*^9, 3.63218912051025*^9}, { 3.632189363344139*^9, 3.632189368985462*^9}, {3.65933624669765*^9, 3.6593362536240625`*^9}, {3.659336346288225*^9, 3.6593363466002254`*^9}, { 3.685234016837945*^9, 3.6852340690569315`*^9}, {3.6852341853385825`*^9, 3.6852342255038795`*^9}, {3.6852342700224257`*^9, 3.685234275388733*^9}, 3.685260724724876*^9, {3.685271245062879*^9, 3.685271273442919*^9}, { 3.685340120474733*^9, 3.6853401228547363`*^9}, {3.6873488134786153`*^9, 3.6873488145086164`*^9}, {3.687348848548664*^9, 3.6873488495686655`*^9}, { 3.6873489495588055`*^9, 3.687348976528844*^9}, {3.6873490107688913`*^9, 3.6873490208289056`*^9}, {3.6873490736689796`*^9, 3.6873490997690163`*^9}, {3.6873491395590715`*^9, 3.6873491721791177`*^9}, {3.6873493303593388`*^9, 3.687349336179347*^9}, { 3.687521139333435*^9, 3.687521232626771*^9}, {3.687526828204684*^9, 3.6875268662258587`*^9}, {3.687744603751021*^9, 3.687744621651046*^9}, { 3.687744782441271*^9, 3.687744793141286*^9}, {3.687744898361433*^9, 3.687744900871437*^9}, {3.687828873646782*^9, 3.6878288977768154`*^9}, { 3.6893872627070065`*^9, 3.6893872737370224`*^9}, {3.689388189828305*^9, 3.689388190108305*^9}, {3.6924132329925613`*^9, 3.692413234362563*^9}, { 3.6924133951727886`*^9, 3.6924134472928615`*^9}, {3.692413504072941*^9, 3.6924135542830114`*^9}, {3.6924138300453973`*^9, 3.692413892645485*^9}, { 3.6924150151235356`*^9, 3.692415019653542*^9}, {3.6924150955736485`*^9, 3.692415151833727*^9}, {3.6924152984639325`*^9, 3.692415397454071*^9}, { 3.6924155440942764`*^9, 3.6924155997043543`*^9}, {3.6924163099373484`*^9, 3.692416448987543*^9}, {3.6924164799875865`*^9, 3.692416520217643*^9}, { 3.6926047241829367`*^9, 3.6926047936630344`*^9}, {3.692694606764871*^9, 3.6926946080948734`*^9}, {3.6926946485549297`*^9, 3.6926946848649807`*^9}, {3.692694726505039*^9, 3.6926947795951133`*^9}, { 3.6926948533452168`*^9, 3.6926948903052683`*^9}, {3.692695016775445*^9, 3.6926950466854873`*^9}, {3.6926951047455683`*^9, 3.6926952014557037`*^9}, {3.692695400025982*^9, 3.6926954007959833`*^9}, { 3.692699088631146*^9, 3.6926990917611504`*^9}, {3.692699130701205*^9, 3.692699150701233*^9}, {3.6926992111213174`*^9, 3.692699243221362*^9}, { 3.692767928345048*^9, 3.6927679342250557`*^9}, {3.692768078185258*^9, 3.692768090845275*^9}, {3.692768583705965*^9, 3.6927686080859995`*^9}, { 3.692768652936062*^9, 3.6927686668160815`*^9}, {3.6927686975061245`*^9, 3.692768721766158*^9}, {3.6927687546262045`*^9, 3.692768807796279*^9}, { 3.6927688439663296`*^9, 3.692768846666333*^9}, {3.6927689511864796`*^9, 3.6927690097565613`*^9}, {3.692769047276614*^9, 3.6927692269968657`*^9}, { 3.692769260096912*^9, 3.6927692611369133`*^9}, {3.692769508057259*^9, 3.6927695324672937`*^9}, {3.692769570707347*^9, 3.692769719217555*^9}, { 3.6927698159576902`*^9, 3.6927698318077126`*^9}, 3.6927699552978854`*^9, { 3.6927701375081406`*^9, 3.6927701495781574`*^9}, {3.692772614961609*^9, 3.692772638701642*^9}, {3.692782982318822*^9, 3.6927829888081927`*^9}, { 3.6927830390960693`*^9, 3.692783045068411*^9}, {3.692783125046985*^9, 3.6927831273591175`*^9}, {3.692784897481363*^9, 3.6927849907176957`*^9}, 3.6927851596043553`*^9, {3.692786968327264*^9, 3.6927869691872644`*^9}, { 3.6927917561302457`*^9, 3.6927918079203186`*^9}, {3.6927918834304237`*^9, 3.692791893050438*^9}, 3.692791931280491*^9, {3.692791999660587*^9, 3.692792026840625*^9}, {3.6927921455307913`*^9, 3.6927921655908194`*^9}, { 3.692792200960869*^9, 3.692792228630907*^9}, {3.692792265330959*^9, 3.6927922938409986`*^9}, {3.6927923374910593`*^9, 3.6927923700511055`*^9}, {3.6927924565012264`*^9, 3.692792499271286*^9}, { 3.692792553391362*^9, 3.6927925860314074`*^9}, {3.692792731971612*^9, 3.6927927381216207`*^9}, {3.692792820381736*^9, 3.692792853021782*^9}, { 3.6927928932518377`*^9, 3.6927929516419196`*^9}, {3.6927929886919713`*^9, 3.6927930024219904`*^9}, {3.69279305234206*^9, 3.6927930715320873`*^9}, { 3.6927932237223005`*^9, 3.692793224982302*^9}, 3.6927932572523475`*^9, { 3.6927934421826067`*^9, 3.6927934498726172`*^9}, {3.692793484652666*^9, 3.6927935029226913`*^9}, {3.6927954180780883`*^9, 3.692795446828129*^9}, { 3.6928535571114936`*^9, 3.692853577521522*^9}, {3.692854825823887*^9, 3.692854837063903*^9}, {3.692854874433955*^9, 3.6928548775639596`*^9}, { 3.6928579822683063`*^9, 3.6928579955883245`*^9}, {3.6929656707917795`*^9, 3.692965795661954*^9}, {3.6929658426120195`*^9, 3.6929658536320353`*^9}, { 3.6929659138621197`*^9, 3.6929659218321304`*^9}, {3.692965990142226*^9, 3.6929660268822775`*^9}, {3.692966066362333*^9, 3.692966192182509*^9}, 3.69296637876277*^9, {3.6929669253235354`*^9, 3.692966936273551*^9}, { 3.6929669714336*^9, 3.692966971953601*^9}, 3.6929670139636593`*^9, 3.692967433554247*^9, {3.6929675634944286`*^9, 3.6929676911746073`*^9}, { 3.6929677832047367`*^9, 3.6929678068347692`*^9}, {3.6929678599332247`*^9, 3.6929678711132402`*^9}, 3.692967908543293*^9, {3.693017052482854*^9, 3.6930171392429757`*^9}, {3.6930174027243443`*^9, 3.6930175965956163`*^9}, {3.6930184697368383`*^9, 3.6930185654269724`*^9}, {3.6930186942971525`*^9, 3.6930188354373503`*^9}, {3.6930188926684303`*^9, 3.6930189600095253`*^9}, {3.693018990869568*^9, 3.693018991349569*^9}, { 3.693019036009631*^9, 3.693019041239639*^9}, {3.6930190980797186`*^9, 3.693019098629719*^9}, {3.693019130059763*^9, 3.6930192205398893`*^9}, { 3.693020315081422*^9, 3.693020326351438*^9}, {3.6930205415560236`*^9, 3.6930206058761134`*^9}, {3.6931381375028915`*^9, 3.693138137902892*^9}, { 3.693138677303647*^9, 3.693138683263655*^9}, {3.693139600730257*^9, 3.6931396288802967`*^9}, {3.6932135226775846`*^9, 3.6932135229775853`*^9}, {3.693219312471691*^9, 3.69321932632171*^9}, { 3.6932194762919197`*^9, 3.6932194879419365`*^9}, 3.6932195481520205`*^9, { 3.693220303405078*^9, 3.6932203178550987`*^9}, {3.693220688975618*^9, 3.693220698955632*^9}, {3.6933024593938713`*^9, 3.6933024657438803`*^9}, { 3.693302603694073*^9, 3.693302604214074*^9}, {3.6933103950923057`*^9, 3.693310399082311*^9}, {3.6933104528223867`*^9, 3.693310456172391*^9}, { 3.693380733755448*^9, 3.693380746175465*^9}, {3.6936247413492084`*^9, 3.6936247436692114`*^9}, {3.69362490643944*^9, 3.6936249099894447`*^9}, { 3.6937175435584445`*^9, 3.6937175579984646`*^9}, {3.693717708199675*^9, 3.6937177268707013`*^9}, {3.6937178194508305`*^9, 3.6937178401008596`*^9}, {3.693717934550992*^9, 3.6937179428310037`*^9}, { 3.6937180305511265`*^9, 3.693718060841169*^9}, {3.693718198801362*^9, 3.6937182028213673`*^9}, {3.693723123415037*^9, 3.6937231809651175`*^9}, { 3.693723252275217*^9, 3.69372327580525*^9}, {3.6937233347053328`*^9, 3.693723337655337*^9}, {3.693723689337829*^9, 3.6937237730079465`*^9}, { 3.6937240089782767`*^9, 3.6937240113382797`*^9}, {3.6938202843684807`*^9, 3.6938203172553616`*^9}, {3.6938203482121134`*^9, 3.6938203495041876`*^9}, 3.6938204448556414`*^9, {3.693826654370701*^9, 3.693826713082033*^9}, 3.6938269274112916`*^9, {3.69384095960849*^9, 3.6938409879385295`*^9}, { 3.6938967427518525`*^9, 3.6938967457718563`*^9}, {3.693896818211958*^9, 3.6938968234619656`*^9}, {3.6940917346582804`*^9, 3.6940917372882843`*^9}, {3.6949174720509205`*^9, 3.6949174781309295`*^9}, {3.69491751432098*^9, 3.6949175560810385`*^9}, { 3.697770949307855*^9, 3.697770962227873*^9}, {3.723799262336609*^9, 3.723799262645475*^9}, 3.7239435284061375`*^9, {3.7239436460810485`*^9, 3.72394364668592*^9}, {3.7254330838452635`*^9, 3.72543315169353*^9}, { 3.7254331912947936`*^9, 3.7254332075936446`*^9}, {3.725433705009429*^9, 3.7254337902858543`*^9}, {3.72543382083533*^9, 3.7254339260782228`*^9}, { 3.7254341992826924`*^9, 3.725434210286269*^9}, {3.7254342875818415`*^9, 3.7254342880778885`*^9}, {3.725443796293885*^9, 3.7254438161441803`*^9}, { 3.725756614481497*^9, 3.725756618125969*^9}, {3.7257914023599677`*^9, 3.7257914032179613`*^9}, {3.725791548301742*^9, 3.7257915491082635`*^9}, { 3.7257916547512665`*^9, 3.725791656837747*^9}, {3.725891883570933*^9, 3.7258919550235353`*^9}, {3.7258922912790194`*^9, 3.725892303666605*^9}, { 3.7258923638013153`*^9, 3.7258923917562647`*^9}, {3.732781849897335*^9, 3.732781851740935*^9}, {3.756128796258463*^9, 3.756128808101935*^9}, { 3.7561289636033297`*^9, 3.7561289674012337`*^9}, {3.7561291581496544`*^9, 3.756129161730915*^9}, {3.756168228209236*^9, 3.7561682921182303`*^9}, { 3.756168336119172*^9, 3.7561683422817945`*^9}, {3.7561687588268995`*^9, 3.756168760043317*^9}, {3.756168790608805*^9, 3.7561688096838417`*^9}, { 3.7562669791923923`*^9, 3.7562669871894484`*^9}, {3.7562671345571966`*^9, 3.7562671514185095`*^9}, {3.756267238618904*^9, 3.75626728245811*^9}, { 3.7562673231127896`*^9, 3.756267369934089*^9}, {3.7562679132987003`*^9, 3.7562679378330235`*^9}, {3.7562686403059607`*^9, 3.75626865150496*^9}, 3.756268910964476*^9, 3.756268975347582*^9, {3.756291635829771*^9, 3.756291670714565*^9}, {3.7562970292001624`*^9, 3.7562971110957913`*^9}, { 3.756354727514307*^9, 3.7563547516317015`*^9}, {3.756354849442463*^9, 3.7563548962495594`*^9}, {3.7563549974812*^9, 3.7563550014513693`*^9}, { 3.756355080997491*^9, 3.756355089151907*^9}, {3.7563551640676885`*^9, 3.756355171626652*^9}, {3.756355203033866*^9, 3.7563553257026477`*^9}, { 3.7563554337406178`*^9, 3.7563554593890176`*^9}, {3.756355541718184*^9, 3.756355546747837*^9}, {3.7563557326318254`*^9, 3.7563557465035677`*^9}, { 3.7563558550458755`*^9, 3.7563558609196053`*^9}, {3.756355910283166*^9, 3.75635593869836*^9}, {3.7563560087797346`*^9, 3.7563560102950015`*^9}, { 3.756797773170301*^9, 3.7567978192689314`*^9}, {3.756798047305444*^9, 3.7567980844374113`*^9}, {3.7567981179139524`*^9, 3.756798154780326*^9}, { 3.7568139377944374`*^9, 3.756813941735011*^9}, {3.7578171254549913`*^9, 3.7578171982352457`*^9}, {3.75781775424854*^9, 3.7578177761870728`*^9}, { 3.75781956271533*^9, 3.757819566308566*^9}, 3.7878930157969465`*^9, 3.7878931876970196`*^9, {3.7890171909617825`*^9, 3.789017212740966*^9}, { 3.8152685002967186`*^9, 3.815268678285927*^9}, {3.815269201087903*^9, 3.815269223194291*^9}, {3.8175216334258814`*^9, 3.8175216554867306`*^9}, { 3.817608992647215*^9, 3.8176090081319494`*^9}, 3.817609084026562*^9, { 3.8176091236756463`*^9, 3.817609192978817*^9}, {3.8176102671403065`*^9, 3.817610319221841*^9}, {3.817610354806981*^9, 3.8176103596390924`*^9}, { 3.817791293771158*^9, 3.817791414961601*^9}, {3.8177914936598372`*^9, 3.817791499828621*^9}, {3.8177915743263783`*^9, 3.817791574905566*^9}, { 3.8178746728163805`*^9, 3.8178746918171453`*^9}, {3.8178747220729046`*^9, 3.8178747512740507`*^9}, {3.8178747818821955`*^9, 3.817874800317868*^9}, { 3.817874856079772*^9, 3.81787487676381*^9}, {3.843182965086443*^9, 3.8431829731823196`*^9}}, CellLabel-> "In[203]:=",ExpressionUUID->"3f4dd650-a4b6-418a-9799-78367e3945b1"] }, Closed]], Cell[CellGroupData[{ Cell["VIBR defs", "Subsection", CellChangeTimes->{{3.7582531074375505`*^9, 3.7582531288543863`*^9}, { 3.7878928096029596`*^9, 3.787892817639742*^9}, 3.822369708831148*^9},ExpressionUUID->"c021cc63-b183-4f96-8540-\ adfef1ccd063"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", "VIBR", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "dofall", ",", "dof0", " ", ",", "dof2", " ", ",", "equ", ",", "sol", ",", "\[Delta]WW", ",", "KK", ",", "MM", ",", "nn", ",", "val", ",", "vec"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"Simplify", "[", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", " ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dofall", "=", RowBox[{"Union", "[", RowBox[{"dof", " ", "/.", " ", RowBox[{ RowBox[{"anya_", "[", RowBox[{"anyb_", ",", RowBox[{"0", "|", "2"}]}], "]"}], "\[Rule]", RowBox[{"anya", "[", "anyb", "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof0", " ", "=", RowBox[{"dofall", "/.", " ", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dof2", " ", "=", RowBox[{"dofall", "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"KK", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof0", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof2", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"val", ",", "vec"}], "}"}], "=", RowBox[{"Eigensystem", "[", RowBox[{"{", RowBox[{"KK", ",", "MM"}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Table", "[", " ", RowBox[{ RowBox[{"{", " ", RowBox[{ RowBox[{ RowBox[{"\[Omega]", "[", "ii", "]"}], "->", RowBox[{"Sqrt", "[", RowBox[{"val", "[", RowBox[{"[", "ii", "]"}], "]"}], "]"}]}], ",", RowBox[{"Thread", "[", RowBox[{"dofall", "\[Rule]", RowBox[{"vec", "[", RowBox[{"[", RowBox[{"ii", ",", ";;"}], "]"}], "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", RowBox[{"Length", "[", "dofall", "]"}]}], "}"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", "VIBR", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "dofall", ",", "dof0", " ", ",", "dof2", " ", ",", "equ", ",", "sol", ",", "\[Delta]WW", ",", "KK", ",", "MM", ",", "nn", ",", "val", ",", "vec"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"Simplify", "[", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", " ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dofall", "=", RowBox[{"Union", "[", RowBox[{"dof", " ", "/.", " ", RowBox[{ RowBox[{"anya_", "[", RowBox[{"anyb_", ",", RowBox[{"0", "|", "2"}]}], "]"}], "\[Rule]", RowBox[{"anya", "[", "anyb", "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof0", " ", "=", RowBox[{"dofall", "/.", " ", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dof2", " ", "=", RowBox[{"dofall", "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"KK", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof0", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof2", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"val", ",", "vec"}], "}"}], "=", RowBox[{"Eigensystem", "[", RowBox[{"{", RowBox[{"KK", ",", "MM"}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Table", "[", " ", RowBox[{ RowBox[{"{", " ", RowBox[{ RowBox[{ RowBox[{"\[Omega]", "[", "ii", "]"}], "->", RowBox[{"Sqrt", "[", RowBox[{"val", "[", RowBox[{"[", "ii", "]"}], "]"}], "]"}]}], ",", RowBox[{"Thread", "[", RowBox[{"dofall", "\[Rule]", RowBox[{"vec", "[", RowBox[{"[", RowBox[{"ii", ",", ";;"}], "]"}], "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", RowBox[{"Length", "[", "dofall", "]"}]}], "}"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", "VIBR", "}"}], ",", "\[Delta]WW_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "dofall", ",", "dof0", " ", ",", "dof2", " ", ",", "equ", ",", "sol", ",", "KK", ",", "MM", ",", "nn", ",", "val", ",", "vec"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", " ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dofall", "=", RowBox[{"Union", "[", RowBox[{"dof", " ", "/.", " ", RowBox[{ RowBox[{"anya_", "[", RowBox[{"anyb_", ",", RowBox[{"0", "|", "2"}]}], "]"}], "\[Rule]", RowBox[{"anya", "[", "anyb", "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof0", " ", "=", RowBox[{"dofall", "/.", " ", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dof2", " ", "=", RowBox[{"dofall", "/.", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"KK", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof0", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof2", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"val", ",", "vec"}], "}"}], "=", RowBox[{"Eigensystem", "[", RowBox[{"{", RowBox[{"KK", ",", "MM"}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Table", "[", " ", RowBox[{ RowBox[{"{", " ", RowBox[{ RowBox[{ RowBox[{"\[Omega]", "[", "ii", "]"}], "->", RowBox[{"Sqrt", "[", RowBox[{"val", "[", RowBox[{"[", "ii", "]"}], "]"}], "]"}]}], ",", RowBox[{"Thread", "[", RowBox[{"dofall", "\[Rule]", RowBox[{"vec", "[", RowBox[{"[", RowBox[{"ii", ",", ";;"}], "]"}], "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", RowBox[{"Length", "[", "dofall", "]"}]}], "}"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"MATRIXFUNCTION", "[", RowBox[{"f_", ",", "M_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"val", ",", "vec"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"val", ",", "vec"}], "}"}], "=", RowBox[{"Eigensystem", "[", "M", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"Transpose", "[", "vec", "]"}], ".", RowBox[{"DiagonalMatrix", "[", RowBox[{"Map", "[", RowBox[{"f", ",", "val"}], "]"}], "]"}], ".", RowBox[{"Inverse", "[", RowBox[{"Transpose", "[", "vec", "]"}], "]"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", RowBox[{"VIBR", ",", "rule_"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "dof0", ",", "dof1", ",", "dof2", ",", "\[Delta]dof", ",", "dofall", ",", "equ", ",", "\[Delta]WW", ",", "KK", ",", "MM", ",", "\[CapitalOmega]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"Simplify", "[", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", " ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dofall", "=", RowBox[{"Union", "[", RowBox[{"dof", " ", "/.", " ", RowBox[{ RowBox[{"anya_", "[", RowBox[{"anyb_", ",", RowBox[{"0", "|", "2"}]}], "]"}], "\[Rule]", RowBox[{"anya", "[", "anyb", "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof0", " ", "=", RowBox[{"dofall", "/.", " ", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dof1", " ", "=", RowBox[{"dofall", "/.", " ", RowBox[{"DRULE", "[", "1", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dof2", " ", "=", RowBox[{"dofall", "/.", " ", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"KK", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof0", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof2", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", "=", RowBox[{"MATRIXFUNCTION", "[", RowBox[{ RowBox[{ RowBox[{"Sqrt", "[", "#", "]"}], "&"}], ",", RowBox[{ RowBox[{"Inverse", "[", "MM", "]"}], ".", "KK"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Thread", "[", RowBox[{"dofall", "->", "\[IndentingNewLine]", RowBox[{"Simplify", "[", RowBox[{ RowBox[{ RowBox[{"MATRIXFUNCTION", "[", RowBox[{ RowBox[{ RowBox[{"Cos", "[", RowBox[{"#", "*", "t"}], "]"}], "&"}], ",", "\[CapitalOmega]"}], "]"}], ".", RowBox[{"(", RowBox[{"dof0", "/.", "rule"}], ")"}]}], "+", RowBox[{ RowBox[{"MATRIXFUNCTION", "[", RowBox[{ RowBox[{ RowBox[{"Sin", "[", RowBox[{"#", "*", "t"}], "]"}], "&"}], ",", "\[CapitalOmega]"}], "]"}], ".", RowBox[{"Inverse", "[", "\[CapitalOmega]", "]"}], ".", RowBox[{"(", RowBox[{"dof1", "/.", "rule"}], ")"}]}]}], "]"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", RowBox[{"VIBR", ",", "rule_"}], "}"}], ",", "\[Delta]WW_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "dof0", ",", "dof1", ",", "dof2", ",", "\[Delta]dof", ",", "dofall", ",", "equ", ",", "KK", ",", "MM", ",", "\[CapitalOmega]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", " ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dofall", "=", RowBox[{"Union", "[", RowBox[{"dof", " ", "/.", " ", RowBox[{ RowBox[{"anya_", "[", RowBox[{"anyb_", ",", RowBox[{"0", "|", "2"}]}], "]"}], "\[Rule]", RowBox[{"anya", "[", "anyb", "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof0", " ", "=", RowBox[{"dofall", "/.", " ", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dof1", " ", "=", RowBox[{"dofall", "/.", " ", RowBox[{"DRULE", "[", "1", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dof2", " ", "=", RowBox[{"dofall", "/.", " ", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"KK", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof0", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof2", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", "=", RowBox[{"MATRIXFUNCTION", "[", RowBox[{ RowBox[{ RowBox[{"Sqrt", "[", "#", "]"}], "&"}], ",", RowBox[{ RowBox[{"Inverse", "[", "MM", "]"}], ".", "KK"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Thread", "[", RowBox[{"dofall", "->", "\[IndentingNewLine]", RowBox[{"Simplify", "[", RowBox[{ RowBox[{ RowBox[{"MATRIXFUNCTION", "[", RowBox[{ RowBox[{ RowBox[{"Cos", "[", RowBox[{"#", "*", "t"}], "]"}], "&"}], ",", "\[CapitalOmega]"}], "]"}], ".", RowBox[{"(", RowBox[{"dof0", "/.", "rule"}], ")"}]}], "+", RowBox[{ RowBox[{"MATRIXFUNCTION", "[", RowBox[{ RowBox[{ RowBox[{"Sin", "[", RowBox[{"#", "*", "t"}], "]"}], "&"}], ",", "\[CapitalOmega]"}], "]"}], ".", RowBox[{"Inverse", "[", "\[CapitalOmega]", "]"}], ".", RowBox[{"(", RowBox[{"dof1", "/.", "rule"}], ")"}]}]}], "]"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{ 3.445098179109*^9, 3.4450982721786003`*^9, {3.451279000619*^9, 3.4512790074518003`*^9}, {3.4512864298050003`*^9, 3.4512864368094*^9}, { 3.4706476335011683`*^9, 3.4706476477283683`*^9}, {3.4770540063998003`*^9, 3.4770540103154*^9}, {3.4818115795696*^9, 3.481811581816*^9}, { 3.4820252104592*^9, 3.4820252549035997`*^9}, {3.4820583880738*^9, 3.4820584077454*^9}, {3.4822351571716003`*^9, 3.4822351901188*^9}, { 3.4823004164308*^9, 3.4823004243712*^9}, {3.493344815723*^9, 3.4933448166745996`*^9}, {3.4933448517122*^9, 3.4933448763445997`*^9}, { 3.4933449778422003`*^9, 3.4933449867342*^9}, {3.4942053389948*^9, 3.4942053532688*^9}, {3.495099886848*^9, 3.4950998935959997`*^9}, { 3.495099958993*^9, 3.495099969426*^9}, 3.495100042671*^9, { 3.495100076422*^9, 3.495100110413*^9}, {3.49510016601*^9, 3.4951001814849997`*^9}, 3.4951002189040003`*^9, {3.495100255352*^9, 3.495100257927*^9}, {3.495100455098*^9, 3.4951004564449997`*^9}, { 3.495100515517*^9, 3.4951005243059998`*^9}, {3.495100586*^9, 3.4951006116359997`*^9}, {3.496055002618*^9, 3.496055006674*^9}, { 3.5007168179316*^9, 3.5007168299904003`*^9}, {3.557657331191841*^9, 3.5576573613778934`*^9}, {3.557658058371518*^9, 3.5576580893531723`*^9}, { 3.6204640425822525`*^9, 3.620464043896328*^9}, {3.629448441451354*^9, 3.6294484425113554`*^9}, {3.632027966812848*^9, 3.63202808169145*^9}, { 3.632028112439104*^9, 3.632028231997714*^9}, {3.632028264944972*^9, 3.632028286223409*^9}, 3.6320284618641176`*^9, 3.6320284928925724`*^9, { 3.6321887622237573`*^9, 3.6321887797107573`*^9}, {3.6321888300516367`*^9, 3.6321888552960806`*^9}, 3.6321889475563574`*^9, {3.63218903764051*^9, 3.6321890646730566`*^9}, {3.632189114899929*^9, 3.63218912051025*^9}, { 3.632189363344139*^9, 3.632189368985462*^9}, {3.65933624669765*^9, 3.6593362536240625`*^9}, {3.659336346288225*^9, 3.6593363466002254`*^9}, { 3.685234016837945*^9, 3.6852340690569315`*^9}, {3.6852341853385825`*^9, 3.6852342255038795`*^9}, {3.6852342700224257`*^9, 3.685234275388733*^9}, 3.685260724724876*^9, {3.685271245062879*^9, 3.685271273442919*^9}, { 3.685340120474733*^9, 3.6853401228547363`*^9}, {3.6873488134786153`*^9, 3.6873488145086164`*^9}, {3.687348848548664*^9, 3.6873488495686655`*^9}, { 3.6873489495588055`*^9, 3.687348976528844*^9}, {3.6873490107688913`*^9, 3.6873490208289056`*^9}, {3.6873490736689796`*^9, 3.6873490997690163`*^9}, {3.6873491395590715`*^9, 3.6873491721791177`*^9}, {3.6873493303593388`*^9, 3.687349336179347*^9}, { 3.687521139333435*^9, 3.687521232626771*^9}, {3.687526828204684*^9, 3.6875268662258587`*^9}, {3.687744603751021*^9, 3.687744621651046*^9}, { 3.687744782441271*^9, 3.687744793141286*^9}, {3.687744898361433*^9, 3.687744900871437*^9}, {3.687828873646782*^9, 3.6878288977768154`*^9}, { 3.6893872627070065`*^9, 3.6893872737370224`*^9}, {3.689388189828305*^9, 3.689388190108305*^9}, {3.6924132329925613`*^9, 3.692413234362563*^9}, { 3.6924133951727886`*^9, 3.6924134472928615`*^9}, {3.692413504072941*^9, 3.6924135542830114`*^9}, {3.6924138300453973`*^9, 3.692413892645485*^9}, { 3.6924150151235356`*^9, 3.692415019653542*^9}, {3.6924150955736485`*^9, 3.692415151833727*^9}, {3.6924152984639325`*^9, 3.692415397454071*^9}, { 3.6924155440942764`*^9, 3.6924155997043543`*^9}, {3.6924163099373484`*^9, 3.692416448987543*^9}, {3.6924164799875865`*^9, 3.692416520217643*^9}, { 3.6926047241829367`*^9, 3.6926047936630344`*^9}, {3.692694606764871*^9, 3.6926946080948734`*^9}, {3.6926946485549297`*^9, 3.6926946848649807`*^9}, {3.692694726505039*^9, 3.6926947795951133`*^9}, { 3.6926948533452168`*^9, 3.6926948903052683`*^9}, {3.692695016775445*^9, 3.6926950466854873`*^9}, {3.6926951047455683`*^9, 3.6926952014557037`*^9}, {3.692695400025982*^9, 3.6926954007959833`*^9}, { 3.692699088631146*^9, 3.6926990917611504`*^9}, {3.692699130701205*^9, 3.692699150701233*^9}, {3.6926992111213174`*^9, 3.692699243221362*^9}, { 3.692767928345048*^9, 3.6927679342250557`*^9}, {3.692768078185258*^9, 3.692768090845275*^9}, {3.692768583705965*^9, 3.6927686080859995`*^9}, { 3.692768652936062*^9, 3.6927686668160815`*^9}, {3.6927686975061245`*^9, 3.692768721766158*^9}, {3.6927687546262045`*^9, 3.692768807796279*^9}, { 3.6927688439663296`*^9, 3.692768846666333*^9}, {3.6927689511864796`*^9, 3.6927690097565613`*^9}, {3.692769047276614*^9, 3.6927692269968657`*^9}, { 3.692769260096912*^9, 3.6927692611369133`*^9}, {3.692769508057259*^9, 3.6927695324672937`*^9}, {3.692769570707347*^9, 3.692769719217555*^9}, { 3.6927698159576902`*^9, 3.6927698318077126`*^9}, 3.6927699552978854`*^9, { 3.6927701375081406`*^9, 3.6927701495781574`*^9}, {3.692772614961609*^9, 3.692772638701642*^9}, {3.692782982318822*^9, 3.6927829888081927`*^9}, { 3.6927830390960693`*^9, 3.692783045068411*^9}, {3.692783125046985*^9, 3.6927831273591175`*^9}, {3.692784897481363*^9, 3.6927849907176957`*^9}, 3.6927851596043553`*^9, {3.692786968327264*^9, 3.6927869691872644`*^9}, { 3.6927917561302457`*^9, 3.6927918079203186`*^9}, {3.6927918834304237`*^9, 3.692791893050438*^9}, 3.692791931280491*^9, {3.692791999660587*^9, 3.692792026840625*^9}, {3.6927921455307913`*^9, 3.6927921655908194`*^9}, { 3.692792200960869*^9, 3.692792228630907*^9}, {3.692792265330959*^9, 3.6927922938409986`*^9}, {3.6927923374910593`*^9, 3.6927923700511055`*^9}, {3.6927924565012264`*^9, 3.692792499271286*^9}, { 3.692792553391362*^9, 3.6927925860314074`*^9}, {3.692792731971612*^9, 3.6927927381216207`*^9}, {3.692792820381736*^9, 3.692792853021782*^9}, { 3.6927928932518377`*^9, 3.6927929516419196`*^9}, {3.6927929886919713`*^9, 3.6927930024219904`*^9}, {3.69279305234206*^9, 3.6927930715320873`*^9}, { 3.6927932237223005`*^9, 3.692793224982302*^9}, 3.6927932572523475`*^9, { 3.6927934421826067`*^9, 3.6927934498726172`*^9}, {3.692793484652666*^9, 3.6927935029226913`*^9}, {3.6927954180780883`*^9, 3.692795446828129*^9}, { 3.6928535571114936`*^9, 3.692853577521522*^9}, {3.692854825823887*^9, 3.692854837063903*^9}, {3.692854874433955*^9, 3.6928548775639596`*^9}, { 3.6928579822683063`*^9, 3.6928579955883245`*^9}, {3.6929656707917795`*^9, 3.692965795661954*^9}, {3.6929658426120195`*^9, 3.6929658536320353`*^9}, { 3.6929659138621197`*^9, 3.6929659218321304`*^9}, {3.692965990142226*^9, 3.6929660268822775`*^9}, {3.692966066362333*^9, 3.692966192182509*^9}, 3.69296637876277*^9, {3.6929669253235354`*^9, 3.692966936273551*^9}, { 3.6929669714336*^9, 3.692966971953601*^9}, 3.6929670139636593`*^9, 3.692967433554247*^9, {3.6929675634944286`*^9, 3.6929676911746073`*^9}, { 3.6929677832047367`*^9, 3.6929678068347692`*^9}, {3.6929678599332247`*^9, 3.6929678711132402`*^9}, 3.692967908543293*^9, {3.693017052482854*^9, 3.6930171392429757`*^9}, {3.6930174027243443`*^9, 3.6930175965956163`*^9}, {3.6930184697368383`*^9, 3.6930185654269724`*^9}, {3.6930186942971525`*^9, 3.6930188354373503`*^9}, {3.6930188926684303`*^9, 3.6930189600095253`*^9}, {3.693018990869568*^9, 3.693018991349569*^9}, { 3.693019036009631*^9, 3.693019041239639*^9}, {3.6930190980797186`*^9, 3.693019098629719*^9}, {3.693019130059763*^9, 3.6930192205398893`*^9}, { 3.693020315081422*^9, 3.693020326351438*^9}, {3.6930205415560236`*^9, 3.6930206058761134`*^9}, {3.6931381375028915`*^9, 3.693138137902892*^9}, { 3.693138677303647*^9, 3.693138683263655*^9}, {3.693139600730257*^9, 3.6931396288802967`*^9}, {3.6932135226775846`*^9, 3.6932135229775853`*^9}, {3.693219312471691*^9, 3.69321932632171*^9}, { 3.6932194762919197`*^9, 3.6932194879419365`*^9}, 3.6932195481520205`*^9, { 3.693220303405078*^9, 3.6932203178550987`*^9}, {3.693220688975618*^9, 3.693220698955632*^9}, {3.6933024593938713`*^9, 3.6933024657438803`*^9}, { 3.693302603694073*^9, 3.693302604214074*^9}, {3.6933103950923057`*^9, 3.693310399082311*^9}, {3.6933104528223867`*^9, 3.693310456172391*^9}, { 3.693380733755448*^9, 3.693380746175465*^9}, {3.6936247413492084`*^9, 3.6936247436692114`*^9}, {3.69362490643944*^9, 3.6936249099894447`*^9}, { 3.6937175435584445`*^9, 3.6937175579984646`*^9}, {3.693717708199675*^9, 3.6937177268707013`*^9}, {3.6937178194508305`*^9, 3.6937178401008596`*^9}, {3.693717934550992*^9, 3.6937179428310037`*^9}, { 3.6937180305511265`*^9, 3.693718060841169*^9}, {3.693718198801362*^9, 3.6937182028213673`*^9}, {3.693723123415037*^9, 3.6937231809651175`*^9}, { 3.693723252275217*^9, 3.69372327580525*^9}, {3.6937233347053328`*^9, 3.693723337655337*^9}, {3.693723689337829*^9, 3.6937237730079465`*^9}, { 3.6937240089782767`*^9, 3.6937240113382797`*^9}, {3.6938202843684807`*^9, 3.6938203172553616`*^9}, {3.6938203482121134`*^9, 3.6938203495041876`*^9}, 3.6938204448556414`*^9, {3.693826654370701*^9, 3.693826713082033*^9}, 3.6938269274112916`*^9, {3.69384095960849*^9, 3.6938409879385295`*^9}, { 3.6938967427518525`*^9, 3.6938967457718563`*^9}, {3.693896818211958*^9, 3.6938968234619656`*^9}, {3.6940917346582804`*^9, 3.6940917372882843`*^9}, {3.6949174720509205`*^9, 3.6949174781309295`*^9}, {3.69491751432098*^9, 3.6949175560810385`*^9}, { 3.697770949307855*^9, 3.697770962227873*^9}, {3.723799262336609*^9, 3.723799262645475*^9}, 3.7239435284061375`*^9, {3.7239436460810485`*^9, 3.72394364668592*^9}, {3.7254330838452635`*^9, 3.72543315169353*^9}, { 3.7254331912947936`*^9, 3.7254332075936446`*^9}, {3.725433705009429*^9, 3.7254337902858543`*^9}, {3.72543382083533*^9, 3.7254339260782228`*^9}, { 3.7254341992826924`*^9, 3.725434210286269*^9}, {3.7254342875818415`*^9, 3.7254342880778885`*^9}, {3.725443796293885*^9, 3.7254438161441803`*^9}, { 3.725756614481497*^9, 3.725756618125969*^9}, {3.7257914023599677`*^9, 3.7257914032179613`*^9}, {3.725791548301742*^9, 3.7257915491082635`*^9}, { 3.7257916547512665`*^9, 3.725791656837747*^9}, {3.725891883570933*^9, 3.7258919550235353`*^9}, {3.7258922912790194`*^9, 3.725892303666605*^9}, { 3.7258923638013153`*^9, 3.7258923917562647`*^9}, {3.732781849897335*^9, 3.732781851740935*^9}, {3.756128796258463*^9, 3.756128808101935*^9}, { 3.7561289636033297`*^9, 3.7561289674012337`*^9}, {3.7561291581496544`*^9, 3.756129161730915*^9}, {3.756168228209236*^9, 3.7561682921182303`*^9}, { 3.756168336119172*^9, 3.7561683422817945`*^9}, {3.7561687588268995`*^9, 3.756168760043317*^9}, {3.756168790608805*^9, 3.7561688096838417`*^9}, { 3.7562669791923923`*^9, 3.7562669871894484`*^9}, {3.7562671345571966`*^9, 3.7562671514185095`*^9}, {3.756267238618904*^9, 3.75626728245811*^9}, { 3.7562673231127896`*^9, 3.756267369934089*^9}, {3.7562679132987003`*^9, 3.7562679378330235`*^9}, {3.7562686403059607`*^9, 3.75626865150496*^9}, 3.756268910964476*^9, 3.756268975347582*^9, {3.756291635829771*^9, 3.756291670714565*^9}, {3.7562970292001624`*^9, 3.7562971110957913`*^9}, { 3.756354727514307*^9, 3.7563547516317015`*^9}, {3.756354849442463*^9, 3.7563548962495594`*^9}, {3.7563549974812*^9, 3.7563550014513693`*^9}, { 3.756355080997491*^9, 3.756355089151907*^9}, {3.7563551640676885`*^9, 3.756355171626652*^9}, {3.756355203033866*^9, 3.7563553257026477`*^9}, { 3.7563554337406178`*^9, 3.7563554593890176`*^9}, {3.756355541718184*^9, 3.756355546747837*^9}, {3.7563557326318254`*^9, 3.7563557465035677`*^9}, { 3.7563558550458755`*^9, 3.7563558609196053`*^9}, {3.756355910283166*^9, 3.75635593869836*^9}, {3.7563560087797346`*^9, 3.7563560102950015`*^9}, { 3.756797773170301*^9, 3.7567978192689314`*^9}, {3.756798047305444*^9, 3.7567980844374113`*^9}, {3.7567981179139524`*^9, 3.756798154780326*^9}, { 3.7568139377944374`*^9, 3.756813941735011*^9}, {3.7578171254549913`*^9, 3.7578171982352457`*^9}, {3.75781775424854*^9, 3.7578177761870728`*^9}, { 3.75781956271533*^9, 3.757819566308566*^9}, {3.787892909261981*^9, 3.787892939075147*^9}, 3.787893197839568*^9, {3.7883277627917256`*^9, 3.7883277632122145`*^9}, {3.788327835267661*^9, 3.788327837618348*^9}}, CellLabel-> "In[204]:=",ExpressionUUID->"a26deb09-9e51-4dbf-acba-0dffcb8dacec"] }, Closed]], Cell[CellGroupData[{ Cell["STAB defs", "Subsection", CellChangeTimes->{{3.7582531074375505`*^9, 3.758253144538479*^9}, 3.7878928381949763`*^9, 3.822369712103414*^9},ExpressionUUID->"02c99945-5048-4fc6-90b3-\ fe31246f5f65"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", RowBox[{"STAB", ",", "p_"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Delta]WT", ",", "dof", ",", "\[Delta]dof", ",", "equ", ",", "sol", ",", "KK", ",", "KK0", ",", "FF0", ",", "rule0", ",", "KK1", ",", "KK10", ",", "KK11", ",", "val", ",", "vec", ",", "modes", ",", "prule", ",", "list"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WT", "=", RowBox[{"ParallelMap", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WT", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WT", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"D", "[", RowBox[{"\[Delta]WT", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ StyleBox["KK", "OperatorCharacter"], StyleBox["=", "OperatorCharacter"], RowBox[{ StyleBox["D", "OperatorCharacter"], StyleBox["[", "OperatorCharacter"], RowBox[{ StyleBox["equ", "OperatorCharacter"], ",", RowBox[{"{", "dof", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"linearized", " ", "problem"}], "*)"}], "\[IndentingNewLine]", RowBox[{"KK0", "=", RowBox[{"KK", "/.", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", "0"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"FF0", "=", RowBox[{"equ", "/.", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", "0"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"rule0", "=", RowBox[{"Thread", "[", RowBox[{"dof", "->", RowBox[{"LinearSolve", "[", RowBox[{"KK0", ",", RowBox[{"-", "FF0"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", StyleBox["\[IndentingNewLine]", "OperatorCharacter"], RowBox[{"KK1", "=", RowBox[{"KK", "/.", "rule0"}]}], ";", "\[IndentingNewLine]", RowBox[{"KK10", "=", " ", RowBox[{"KK1", " ", "/.", " ", RowBox[{"p", "\[Rule]", "0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"KK11", " ", "=", RowBox[{"D", "[", RowBox[{"KK1", " ", ",", "p"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"list", "=", RowBox[{"Transpose", "[", RowBox[{"Eigensystem", "[", RowBox[{"{", RowBox[{"KK10", ",", "KK11"}], "}"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"pick", " ", "the", " ", "real", " ", "ones"}], "*)"}], "\[IndentingNewLine]", RowBox[{"list", "=", RowBox[{"Select", "[", RowBox[{"list", ",", RowBox[{ RowBox[{"Not", "[", RowBox[{"PossibleZeroQ", "[", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "&"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"list", "=", RowBox[{"Select", "[", RowBox[{"list", ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Count", "[", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "\[ImaginaryI]"}], "]"}], "\[Equal]", "0"}], ")"}], "&"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"list", "=", RowBox[{"Select", "[", RowBox[{"list", ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Count", "[", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"-", "\[ImaginaryI]"}]}], "]"}], "\[Equal]", "0"}], ")"}], "&"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"list", "=", RowBox[{"Select", "[", RowBox[{"list", ",", RowBox[{ RowBox[{"Not", "[", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "===", "Infinity"}], "]"}], "&"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"p", "[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "\[Rule]", RowBox[{"-", RowBox[{"#1", "[", RowBox[{"[", "1", "]"}], "]"}]}]}], ",", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", RowBox[{"#1", "[", RowBox[{"[", "2", "]"}], "]"}]}], "]"}]}], "}"}], "&"}], ",", "list"}], "]"}]}]}], " ", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", RowBox[{"STAB", ",", "p_"}], "}"}], ",", "\[Delta]WW_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "equ", ",", "sol", ",", "KK", ",", "FF0", ",", "KK0", ",", "rule0", ",", "KK1", ",", "KK10", ",", "KK11", ",", "val", ",", "vec", ",", "modes", ",", "prule", ",", "list"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "first", "*)"}], StyleBox["\[IndentingNewLine]", "OperatorCharacter"], RowBox[{ RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", " ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ StyleBox["KK", "OperatorCharacter"], StyleBox["=", "OperatorCharacter"], RowBox[{ StyleBox["D", "OperatorCharacter"], StyleBox["[", "OperatorCharacter"], RowBox[{ StyleBox["equ", "OperatorCharacter"], ",", RowBox[{"{", "dof", "}"}]}], "]"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"KK0", "=", RowBox[{"KK", "/.", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", "0"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"FF0", "=", RowBox[{"equ", "/.", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", "0"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"rule0", "=", RowBox[{"Thread", "[", RowBox[{"dof", "->", RowBox[{"LinearSolve", "[", RowBox[{"KK0", ",", RowBox[{"-", "FF0"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", StyleBox["\[IndentingNewLine]", "OperatorCharacter"], RowBox[{"KK1", "=", RowBox[{"KK", "/.", "rule0"}]}], ";", "\[IndentingNewLine]", RowBox[{"KK10", "=", " ", RowBox[{"KK1", " ", "/.", " ", RowBox[{"p", "\[Rule]", "0"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"KK11", " ", "=", RowBox[{"D", "[", RowBox[{"KK1", " ", ",", "p"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"list", "=", RowBox[{"Transpose", "[", RowBox[{"Eigensystem", "[", RowBox[{"{", RowBox[{"KK10", ",", "KK11"}], "}"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"pick", " ", "the", " ", "real", " ", "ones"}], "*)"}], "\[IndentingNewLine]", RowBox[{"list", "=", RowBox[{"Select", "[", RowBox[{"list", ",", RowBox[{ RowBox[{"Not", "[", RowBox[{"PossibleZeroQ", "[", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "&"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"list", "=", RowBox[{"Select", "[", RowBox[{"list", ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Count", "[", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "\[ImaginaryI]"}], "]"}], "\[Equal]", "0"}], ")"}], "&"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"list", "=", RowBox[{"Select", "[", RowBox[{"list", ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Count", "[", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"-", "\[ImaginaryI]"}]}], "]"}], "\[Equal]", "0"}], ")"}], "&"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"list", "=", RowBox[{"Select", "[", RowBox[{"list", ",", RowBox[{ RowBox[{"Not", "[", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "===", "Infinity"}], "]"}], "&"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"p", "[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "\[Rule]", RowBox[{"-", RowBox[{"#1", "[", RowBox[{"[", "1", "]"}], "]"}]}]}], ",", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", RowBox[{"#1", "[", RowBox[{"[", "2", "]"}], "]"}]}], "]"}]}], "}"}], "&"}], ",", "list"}], "]"}]}]}], "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.445098179109*^9, 3.4450982721786003`*^9, {3.451279000619*^9, 3.4512790074518003`*^9}, {3.4512864298050003`*^9, 3.4512864368094*^9}, { 3.4706476335011683`*^9, 3.4706476477283683`*^9}, {3.4770540063998003`*^9, 3.4770540103154*^9}, {3.4818115795696*^9, 3.481811581816*^9}, { 3.4820252104592*^9, 3.4820252549035997`*^9}, {3.4820583880738*^9, 3.4820584077454*^9}, {3.4822351571716003`*^9, 3.4822351901188*^9}, { 3.4823004164308*^9, 3.4823004243712*^9}, {3.493344815723*^9, 3.4933448166745996`*^9}, {3.4933448517122*^9, 3.4933448763445997`*^9}, { 3.4933449778422003`*^9, 3.4933449867342*^9}, {3.4942053389948*^9, 3.4942053532688*^9}, {3.495099886848*^9, 3.4950998935959997`*^9}, { 3.495099958993*^9, 3.495099969426*^9}, 3.495100042671*^9, { 3.495100076422*^9, 3.495100110413*^9}, {3.49510016601*^9, 3.4951001814849997`*^9}, 3.4951002189040003`*^9, {3.495100255352*^9, 3.495100257927*^9}, {3.495100455098*^9, 3.4951004564449997`*^9}, { 3.495100515517*^9, 3.4951005243059998`*^9}, {3.495100586*^9, 3.4951006116359997`*^9}, {3.496055002618*^9, 3.496055006674*^9}, { 3.5007168179316*^9, 3.5007168299904003`*^9}, {3.557657331191841*^9, 3.5576573613778934`*^9}, {3.557658058371518*^9, 3.5576580893531723`*^9}, { 3.6204640425822525`*^9, 3.620464043896328*^9}, {3.629448441451354*^9, 3.6294484425113554`*^9}, {3.632027966812848*^9, 3.63202808169145*^9}, { 3.632028112439104*^9, 3.632028231997714*^9}, {3.632028264944972*^9, 3.632028286223409*^9}, 3.6320284618641176`*^9, 3.6320284928925724`*^9, { 3.6321887622237573`*^9, 3.6321887797107573`*^9}, {3.6321888300516367`*^9, 3.6321888552960806`*^9}, 3.6321889475563574`*^9, {3.63218903764051*^9, 3.6321890646730566`*^9}, {3.632189114899929*^9, 3.63218912051025*^9}, { 3.632189363344139*^9, 3.632189368985462*^9}, {3.65933624669765*^9, 3.6593362536240625`*^9}, {3.659336346288225*^9, 3.6593363466002254`*^9}, { 3.685234016837945*^9, 3.6852340690569315`*^9}, {3.6852341853385825`*^9, 3.6852342255038795`*^9}, {3.6852342700224257`*^9, 3.685234275388733*^9}, 3.685260724724876*^9, {3.685271245062879*^9, 3.685271273442919*^9}, { 3.685340120474733*^9, 3.6853401228547363`*^9}, {3.6873488134786153`*^9, 3.6873488145086164`*^9}, {3.687348848548664*^9, 3.6873488495686655`*^9}, { 3.6873489495588055`*^9, 3.687348976528844*^9}, {3.6873490107688913`*^9, 3.6873490208289056`*^9}, {3.6873490736689796`*^9, 3.6873490997690163`*^9}, {3.6873491395590715`*^9, 3.6873491721791177`*^9}, {3.6873493303593388`*^9, 3.687349336179347*^9}, { 3.687521139333435*^9, 3.687521232626771*^9}, {3.687526828204684*^9, 3.6875268662258587`*^9}, {3.687744603751021*^9, 3.687744621651046*^9}, { 3.687744782441271*^9, 3.687744793141286*^9}, {3.687744898361433*^9, 3.687744900871437*^9}, {3.687828873646782*^9, 3.6878288977768154`*^9}, { 3.6893872627070065`*^9, 3.6893872737370224`*^9}, {3.689388189828305*^9, 3.689388190108305*^9}, {3.6924132329925613`*^9, 3.692413234362563*^9}, { 3.6924133951727886`*^9, 3.6924134472928615`*^9}, {3.692413504072941*^9, 3.6924135542830114`*^9}, {3.6924138300453973`*^9, 3.692413892645485*^9}, { 3.6924150151235356`*^9, 3.692415019653542*^9}, {3.6924150955736485`*^9, 3.692415151833727*^9}, {3.6924152984639325`*^9, 3.692415397454071*^9}, { 3.6924155440942764`*^9, 3.6924155997043543`*^9}, {3.6924163099373484`*^9, 3.692416448987543*^9}, {3.6924164799875865`*^9, 3.692416520217643*^9}, { 3.6926047241829367`*^9, 3.6926047936630344`*^9}, {3.692694606764871*^9, 3.6926946080948734`*^9}, {3.6926946485549297`*^9, 3.6926946848649807`*^9}, {3.692694726505039*^9, 3.6926947795951133`*^9}, { 3.6926948533452168`*^9, 3.6926948903052683`*^9}, {3.692695016775445*^9, 3.6926950466854873`*^9}, {3.6926951047455683`*^9, 3.6926952014557037`*^9}, {3.692695400025982*^9, 3.6926954007959833`*^9}, { 3.692699088631146*^9, 3.6926990917611504`*^9}, {3.692699130701205*^9, 3.692699150701233*^9}, {3.6926992111213174`*^9, 3.692699243221362*^9}, { 3.692767928345048*^9, 3.6927679342250557`*^9}, {3.692768078185258*^9, 3.692768090845275*^9}, {3.692768583705965*^9, 3.6927686080859995`*^9}, { 3.692768652936062*^9, 3.6927686668160815`*^9}, {3.6927686975061245`*^9, 3.692768721766158*^9}, {3.6927687546262045`*^9, 3.692768807796279*^9}, { 3.6927688439663296`*^9, 3.692768846666333*^9}, {3.6927689511864796`*^9, 3.6927690097565613`*^9}, {3.692769047276614*^9, 3.6927692269968657`*^9}, { 3.692769260096912*^9, 3.6927692611369133`*^9}, {3.692769508057259*^9, 3.6927695324672937`*^9}, {3.692769570707347*^9, 3.692769719217555*^9}, { 3.6927698159576902`*^9, 3.6927698318077126`*^9}, 3.6927699552978854`*^9, { 3.6927701375081406`*^9, 3.6927701495781574`*^9}, {3.692772614961609*^9, 3.692772638701642*^9}, {3.692782982318822*^9, 3.6927829888081927`*^9}, { 3.6927830390960693`*^9, 3.692783045068411*^9}, {3.692783125046985*^9, 3.6927831273591175`*^9}, {3.692784897481363*^9, 3.6927849907176957`*^9}, 3.6927851596043553`*^9, {3.692786968327264*^9, 3.6927869691872644`*^9}, { 3.6927917561302457`*^9, 3.6927918079203186`*^9}, {3.6927918834304237`*^9, 3.692791893050438*^9}, 3.692791931280491*^9, {3.692791999660587*^9, 3.692792026840625*^9}, {3.6927921455307913`*^9, 3.6927921655908194`*^9}, { 3.692792200960869*^9, 3.692792228630907*^9}, {3.692792265330959*^9, 3.6927922938409986`*^9}, {3.6927923374910593`*^9, 3.6927923700511055`*^9}, {3.6927924565012264`*^9, 3.692792499271286*^9}, { 3.692792553391362*^9, 3.6927925860314074`*^9}, {3.692792731971612*^9, 3.6927927381216207`*^9}, {3.692792820381736*^9, 3.692792853021782*^9}, { 3.6927928932518377`*^9, 3.6927929516419196`*^9}, {3.6927929886919713`*^9, 3.6927930024219904`*^9}, {3.69279305234206*^9, 3.6927930715320873`*^9}, { 3.6927932237223005`*^9, 3.692793224982302*^9}, 3.6927932572523475`*^9, { 3.6927934421826067`*^9, 3.6927934498726172`*^9}, {3.692793484652666*^9, 3.6927935029226913`*^9}, {3.6927954180780883`*^9, 3.692795446828129*^9}, { 3.6928535571114936`*^9, 3.692853577521522*^9}, {3.692854825823887*^9, 3.692854837063903*^9}, {3.692854874433955*^9, 3.6928548775639596`*^9}, { 3.6928579822683063`*^9, 3.6928579955883245`*^9}, {3.6929656707917795`*^9, 3.692965795661954*^9}, {3.6929658426120195`*^9, 3.6929658536320353`*^9}, { 3.6929659138621197`*^9, 3.6929659218321304`*^9}, {3.692965990142226*^9, 3.6929660268822775`*^9}, {3.692966066362333*^9, 3.692966192182509*^9}, 3.69296637876277*^9, {3.6929669253235354`*^9, 3.692966936273551*^9}, { 3.6929669714336*^9, 3.692966971953601*^9}, 3.6929670139636593`*^9, 3.692967433554247*^9, {3.6929675634944286`*^9, 3.6929676911746073`*^9}, { 3.6929677832047367`*^9, 3.6929678068347692`*^9}, {3.6929678599332247`*^9, 3.6929678711132402`*^9}, 3.692967908543293*^9, {3.693017052482854*^9, 3.6930171392429757`*^9}, {3.6930174027243443`*^9, 3.6930175965956163`*^9}, {3.6930184697368383`*^9, 3.6930185654269724`*^9}, {3.6930186942971525`*^9, 3.6930188354373503`*^9}, {3.6930188926684303`*^9, 3.6930189600095253`*^9}, {3.693018990869568*^9, 3.693018991349569*^9}, { 3.693019036009631*^9, 3.693019041239639*^9}, {3.6930190980797186`*^9, 3.693019098629719*^9}, {3.693019130059763*^9, 3.6930192205398893`*^9}, { 3.693020315081422*^9, 3.693020326351438*^9}, {3.6930205415560236`*^9, 3.6930206058761134`*^9}, {3.6931381375028915`*^9, 3.693138137902892*^9}, { 3.693138677303647*^9, 3.693138683263655*^9}, {3.693139600730257*^9, 3.6931396288802967`*^9}, {3.6932135226775846`*^9, 3.6932135229775853`*^9}, {3.693219312471691*^9, 3.69321932632171*^9}, { 3.6932194762919197`*^9, 3.6932194879419365`*^9}, 3.6932195481520205`*^9, { 3.693220303405078*^9, 3.6932203178550987`*^9}, {3.693220688975618*^9, 3.693220698955632*^9}, {3.6933024593938713`*^9, 3.6933024657438803`*^9}, { 3.693302603694073*^9, 3.693302604214074*^9}, {3.6933103950923057`*^9, 3.693310399082311*^9}, {3.6933104528223867`*^9, 3.693310456172391*^9}, { 3.693380733755448*^9, 3.693380746175465*^9}, {3.6936247413492084`*^9, 3.6936247436692114`*^9}, {3.69362490643944*^9, 3.6936249099894447`*^9}, { 3.6937175435584445`*^9, 3.6937175579984646`*^9}, {3.693717708199675*^9, 3.6937177268707013`*^9}, {3.6937178194508305`*^9, 3.6937178401008596`*^9}, {3.693717934550992*^9, 3.6937179428310037`*^9}, { 3.6937180305511265`*^9, 3.693718060841169*^9}, {3.693718198801362*^9, 3.6937182028213673`*^9}, {3.693723123415037*^9, 3.6937231809651175`*^9}, { 3.693723252275217*^9, 3.69372327580525*^9}, {3.6937233347053328`*^9, 3.693723337655337*^9}, {3.693723689337829*^9, 3.6937237730079465`*^9}, { 3.6937240089782767`*^9, 3.6937240113382797`*^9}, {3.6938202843684807`*^9, 3.6938203172553616`*^9}, {3.6938203482121134`*^9, 3.6938203495041876`*^9}, 3.6938204448556414`*^9, {3.693826654370701*^9, 3.693826713082033*^9}, 3.6938269274112916`*^9, {3.69384095960849*^9, 3.6938409879385295`*^9}, { 3.6938967427518525`*^9, 3.6938967457718563`*^9}, {3.693896818211958*^9, 3.6938968234619656`*^9}, {3.6940917346582804`*^9, 3.6940917372882843`*^9}, {3.6949174720509205`*^9, 3.6949174781309295`*^9}, {3.69491751432098*^9, 3.6949175560810385`*^9}, { 3.697770949307855*^9, 3.697770962227873*^9}, {3.723799262336609*^9, 3.723799262645475*^9}, 3.7239435284061375`*^9, {3.7239436460810485`*^9, 3.72394364668592*^9}, {3.7254330838452635`*^9, 3.72543315169353*^9}, { 3.7254331912947936`*^9, 3.7254332075936446`*^9}, {3.725433705009429*^9, 3.7254337902858543`*^9}, {3.72543382083533*^9, 3.7254339260782228`*^9}, { 3.7254341992826924`*^9, 3.725434210286269*^9}, {3.7254342875818415`*^9, 3.7254342880778885`*^9}, {3.725443796293885*^9, 3.7254438161441803`*^9}, { 3.725756614481497*^9, 3.725756618125969*^9}, {3.7257914023599677`*^9, 3.7257914032179613`*^9}, {3.725791548301742*^9, 3.7257915491082635`*^9}, { 3.7257916547512665`*^9, 3.725791656837747*^9}, {3.725891883570933*^9, 3.7258919550235353`*^9}, {3.7258922912790194`*^9, 3.725892303666605*^9}, { 3.7258923638013153`*^9, 3.7258923917562647`*^9}, {3.732781849897335*^9, 3.732781851740935*^9}, {3.756128796258463*^9, 3.756128808101935*^9}, { 3.7561289636033297`*^9, 3.7561289674012337`*^9}, {3.7561291581496544`*^9, 3.756129161730915*^9}, {3.756168228209236*^9, 3.7561682921182303`*^9}, { 3.756168336119172*^9, 3.7561683422817945`*^9}, {3.7561687588268995`*^9, 3.756168760043317*^9}, {3.756168790608805*^9, 3.7561688096838417`*^9}, { 3.7562669791923923`*^9, 3.7562669871894484`*^9}, {3.7562671345571966`*^9, 3.7562671514185095`*^9}, {3.756267238618904*^9, 3.75626728245811*^9}, { 3.7562673231127896`*^9, 3.756267369934089*^9}, {3.7562679132987003`*^9, 3.7562679378330235`*^9}, {3.7562686403059607`*^9, 3.75626865150496*^9}, 3.756268910964476*^9, 3.756268975347582*^9, {3.756291635829771*^9, 3.756291670714565*^9}, {3.7562970292001624`*^9, 3.7562971110957913`*^9}, { 3.756354727514307*^9, 3.7563547516317015`*^9}, {3.756354849442463*^9, 3.7563548962495594`*^9}, {3.7563549974812*^9, 3.7563550014513693`*^9}, { 3.756355080997491*^9, 3.756355089151907*^9}, {3.7563551640676885`*^9, 3.756355171626652*^9}, {3.756355203033866*^9, 3.7563553257026477`*^9}, { 3.7563554337406178`*^9, 3.7563554593890176`*^9}, {3.756355541718184*^9, 3.756355546747837*^9}, {3.7563557326318254`*^9, 3.7563557465035677`*^9}, { 3.7563558550458755`*^9, 3.7563558609196053`*^9}, {3.756355910283166*^9, 3.75635593869836*^9}, {3.7563560087797346`*^9, 3.7563560102950015`*^9}, { 3.756797773170301*^9, 3.7567978192689314`*^9}, {3.756798047305444*^9, 3.7567980844374113`*^9}, {3.7567981179139524`*^9, 3.756798154780326*^9}, { 3.7568139377944374`*^9, 3.756813941735011*^9}, {3.7578171254549913`*^9, 3.7578171982352457`*^9}, {3.75781775424854*^9, 3.7578177761870728`*^9}, { 3.75781956271533*^9, 3.757819566308566*^9}, {3.758253198275837*^9, 3.7582532020405736`*^9}, {3.7582533756088347`*^9, 3.7582533985722675`*^9}, {3.760670938512352*^9, 3.76067094654175*^9}, { 3.7887482820103493`*^9, 3.7887483199991317`*^9}, {3.7887510286740055`*^9, 3.788751062737857*^9}, {3.788793141413883*^9, 3.788793141695051*^9}, { 3.7888311797760434`*^9, 3.7888312564184446`*^9}, {3.7888312978346624`*^9, 3.7888313137858887`*^9}, {3.788831356407742*^9, 3.7888313933141465`*^9}, { 3.7888314684197545`*^9, 3.7888315368553815`*^9}, {3.7888315954696364`*^9, 3.7888316472186213`*^9}, {3.788831857305335*^9, 3.788831917189584*^9}, { 3.788832255517164*^9, 3.788832334400532*^9}, {3.788832692802744*^9, 3.7888327546283236`*^9}, {3.788832880589661*^9, 3.788832889111374*^9}, { 3.788833325826789*^9, 3.7888333376722994`*^9}, {3.7888334458148613`*^9, 3.7888334462053633`*^9}, {3.7888341360558033`*^9, 3.7888341464830675`*^9}, {3.788834414977331*^9, 3.7888344465268445`*^9}, { 3.7888360737524185`*^9, 3.788836130856104*^9}, {3.7888363421132617`*^9, 3.788836345010672*^9}, {3.7888364482319136`*^9, 3.7888364523480806`*^9}, { 3.7888365732220283`*^9, 3.788836684808531*^9}, {3.7888368167754717`*^9, 3.7888368666444435`*^9}, {3.7888369683341913`*^9, 3.788836976352211*^9}, { 3.788837175638712*^9, 3.7888371869179506`*^9}, {3.788838309650617*^9, 3.788838324612111*^9}, {3.7888530458034954`*^9, 3.7888530623012686`*^9}, { 3.7889364043469267`*^9, 3.7889364238717265`*^9}, {3.7889365367269278`*^9, 3.788936567426444*^9}, {3.7889366124938154`*^9, 3.788936620487116*^9}, { 3.789125410293588*^9, 3.789125420141614*^9}, {3.7891256058149447`*^9, 3.789125607960622*^9}, {3.7891257972104635`*^9, 3.789125797405059*^9}, { 3.7891270413135867`*^9, 3.7891270457560563`*^9}, {3.7891270757650013`*^9, 3.789127077657934*^9}, {3.7891271091340284`*^9, 3.7891271251918364`*^9}, { 3.7891271735278482`*^9, 3.7891271838765836`*^9}, {3.7891272283986025`*^9, 3.7891272986842737`*^9}, 3.789127339177758*^9}, CellLabel-> "In[210]:=",ExpressionUUID->"046f5f3b-31d4-41a0-9a97-ff1a42c41e38"] }, Closed]], Cell[CellGroupData[{ Cell["NONL defs", "Subsection", CellChangeTimes->{{3.7582531074375505`*^9, 3.7582531288543863`*^9}, { 3.787892825419589*^9, 3.7878928340449758`*^9}, {3.787893238336218*^9, 3.787893239616878*^9}, {3.822369723252593*^9, 3.822369724343676*^9}},ExpressionUUID->"eed16c42-4b72-40f7-933a-\ 709d06a62f0f"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", "E8001"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", "NONL", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "dof0", ",", "\[Delta]dof", ",", "equ", ",", "sol", ",", "\[Delta]WT"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WT", "=", RowBox[{"ParallelMap", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WT", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WT", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"D", "[", RowBox[{"\[Delta]WT", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"NSolve", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", "dof", ",", "Reals"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{ RowBox[{"MinimalBy", "[", RowBox[{"sol", ",", RowBox[{ RowBox[{"Norm", "[", RowBox[{"dof", " ", "/.", " ", "#"}], "]"}], "&"}]}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "]"}]}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", RowBox[{"NONL", ",", "ALL"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "equ", ",", "sol", ",", "\[Delta]WT"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WT", "=", RowBox[{"ParallelMap", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WT", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WT", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"D", "[", RowBox[{"\[Delta]WT", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Solve", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", "dof"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", "sol", "]"}]}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", "NONL", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}], ",", RowBox[{"{", RowBox[{"p_", ",", "pmin_", ",", "pmax_", ",", "\[CapitalDelta]p_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Delta]WT", ",", "equ", ",", "sol", ",", "sol0", ",", "dof", ",", "\[Delta]dof"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WT", "=", RowBox[{"ParallelMap", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WT", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WT", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"D", "[", RowBox[{"\[Delta]WT", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", "0"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ReleaseHold", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"sol", "=", RowBox[{"FindRoot", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", RowBox[{"sol", " ", "/.", RowBox[{"Rule", "\[Rule]", "List"}]}]}], "]"}]}], ";", RowBox[{"Prepend", "[", RowBox[{"sol", ",", RowBox[{ RowBox[{"Hold", "[", "p", "]"}], "\[Rule]", "p"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"p", ",", "pmin", ",", "pmax", ",", "\[CapitalDelta]p"}], "}"}]}], "]"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", RowBox[{"NONL", ",", "rule_"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "dof0", ",", "equ", ",", "sol", ",", "\[Delta]WT"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WT", "=", RowBox[{"ParallelMap", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WT", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WT", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof0", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"dof", ",", RowBox[{"dof", " ", "/.", "rule"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"D", "[", RowBox[{"\[Delta]WT", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"FindRoot", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", "dof0", ",", "Reals"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", "sol", "]"}]}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", "NONL", "}"}], ",", "\[Delta]WW_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"equ", ",", "sol", ",", "dof", ",", "\[Delta]dof"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Solve", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", "dof", ",", "Reals"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{ RowBox[{"MinimalBy", "[", RowBox[{"sol", ",", RowBox[{ RowBox[{"Norm", "[", RowBox[{"dof", " ", "/.", " ", "#"}], "]"}], "&"}]}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", RowBox[{"NONL", ",", "ALL"}], "}"}], ",", "\[Delta]WW_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"equ", ",", "sol"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"equ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Solve", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}], ",", "Reals"}], "]"}]}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", RowBox[{"NONL", ",", "rule_"}], "}"}], ",", "\[Delta]WW_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "dof0", ",", "equ", ",", "sol"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof0", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"dof", ",", RowBox[{"dof", " ", "/.", "rule"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FindRoot", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", "dof0"}], "]"}]}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", RowBox[{"NONL", ",", "rule0_", ",", "rulen_"}], "}"}], ",", "\[Delta]WW_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "dof0", ",", "equ", ",", "sol"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof0", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"dof", ",", RowBox[{"dof", " ", "/.", "rule"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"FindRoot", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", "dof0", ",", RowBox[{"DampingFactor", "\[Rule]", "4"}], ",", RowBox[{"AccuracyGoal", "\[Rule]", "2"}], ",", RowBox[{"PrecisionGoal", "\[Rule]", "2"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", "sol", "]"}]}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", "NONL", "}"}], ",", "\[Delta]WW_", ",", RowBox[{"{", RowBox[{"p_", ",", "pmin_", ",", "pmax_", ",", "\[CapitalDelta]p_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "equ", ",", "sol", ",", "sol0", ",", "dof", ",", "\[Delta]dof"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", "0.0000001"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ReleaseHold", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"sol", "=", RowBox[{"FindRoot", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", RowBox[{"sol", " ", "/.", RowBox[{"Rule", "\[Rule]", "List"}]}]}], "]"}]}], ";", RowBox[{"Prepend", "[", RowBox[{"sol", ",", RowBox[{ RowBox[{"Hold", "[", "p", "]"}], "\[Rule]", "p"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"p", ",", "pmin", ",", "pmax", ",", "\[CapitalDelta]p"}], "}"}]}], "]"}], "]"}]}]}], "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.445098179109*^9, 3.4450982721786003`*^9, {3.451279000619*^9, 3.4512790074518003`*^9}, {3.4512864298050003`*^9, 3.4512864368094*^9}, { 3.4706476335011683`*^9, 3.4706476477283683`*^9}, {3.4770540063998003`*^9, 3.4770540103154*^9}, {3.4818115795696*^9, 3.481811581816*^9}, { 3.4820252104592*^9, 3.4820252549035997`*^9}, {3.4820583880738*^9, 3.4820584077454*^9}, {3.4822351571716003`*^9, 3.4822351901188*^9}, { 3.4823004164308*^9, 3.4823004243712*^9}, {3.493344815723*^9, 3.4933448166745996`*^9}, {3.4933448517122*^9, 3.4933448763445997`*^9}, { 3.4933449778422003`*^9, 3.4933449867342*^9}, {3.4942053389948*^9, 3.4942053532688*^9}, {3.495099886848*^9, 3.4950998935959997`*^9}, { 3.495099958993*^9, 3.495099969426*^9}, 3.495100042671*^9, { 3.495100076422*^9, 3.495100110413*^9}, {3.49510016601*^9, 3.4951001814849997`*^9}, 3.4951002189040003`*^9, {3.495100255352*^9, 3.495100257927*^9}, {3.495100455098*^9, 3.4951004564449997`*^9}, { 3.495100515517*^9, 3.4951005243059998`*^9}, {3.495100586*^9, 3.4951006116359997`*^9}, {3.496055002618*^9, 3.496055006674*^9}, { 3.5007168179316*^9, 3.5007168299904003`*^9}, {3.557657331191841*^9, 3.5576573613778934`*^9}, {3.557658058371518*^9, 3.5576580893531723`*^9}, { 3.6204640425822525`*^9, 3.620464043896328*^9}, {3.629448441451354*^9, 3.6294484425113554`*^9}, {3.632027966812848*^9, 3.63202808169145*^9}, { 3.632028112439104*^9, 3.632028231997714*^9}, {3.632028264944972*^9, 3.632028286223409*^9}, 3.6320284618641176`*^9, 3.6320284928925724`*^9, { 3.6321887622237573`*^9, 3.6321887797107573`*^9}, {3.6321888300516367`*^9, 3.6321888552960806`*^9}, 3.6321889475563574`*^9, {3.63218903764051*^9, 3.6321890646730566`*^9}, {3.632189114899929*^9, 3.63218912051025*^9}, { 3.632189363344139*^9, 3.632189368985462*^9}, {3.65933624669765*^9, 3.6593362536240625`*^9}, {3.659336346288225*^9, 3.6593363466002254`*^9}, { 3.685234016837945*^9, 3.6852340690569315`*^9}, {3.6852341853385825`*^9, 3.6852342255038795`*^9}, {3.6852342700224257`*^9, 3.685234275388733*^9}, 3.685260724724876*^9, {3.685271245062879*^9, 3.685271273442919*^9}, { 3.685340120474733*^9, 3.6853401228547363`*^9}, {3.6873488134786153`*^9, 3.6873488145086164`*^9}, {3.687348848548664*^9, 3.6873488495686655`*^9}, { 3.6873489495588055`*^9, 3.687348976528844*^9}, {3.6873490107688913`*^9, 3.6873490208289056`*^9}, {3.6873490736689796`*^9, 3.6873490997690163`*^9}, {3.6873491395590715`*^9, 3.6873491721791177`*^9}, {3.6873493303593388`*^9, 3.687349336179347*^9}, { 3.687521139333435*^9, 3.687521232626771*^9}, {3.687526828204684*^9, 3.6875268662258587`*^9}, {3.687744603751021*^9, 3.687744621651046*^9}, { 3.687744782441271*^9, 3.687744793141286*^9}, {3.687744898361433*^9, 3.687744900871437*^9}, {3.687828873646782*^9, 3.6878288977768154`*^9}, { 3.6893872627070065`*^9, 3.6893872737370224`*^9}, {3.689388189828305*^9, 3.689388190108305*^9}, {3.6924132329925613`*^9, 3.692413234362563*^9}, { 3.6924133951727886`*^9, 3.6924134472928615`*^9}, {3.692413504072941*^9, 3.6924135542830114`*^9}, {3.6924138300453973`*^9, 3.692413892645485*^9}, { 3.6924150151235356`*^9, 3.692415019653542*^9}, {3.6924150955736485`*^9, 3.692415151833727*^9}, {3.6924152984639325`*^9, 3.692415397454071*^9}, { 3.6924155440942764`*^9, 3.6924155997043543`*^9}, {3.6924163099373484`*^9, 3.692416448987543*^9}, {3.6924164799875865`*^9, 3.692416520217643*^9}, { 3.6926047241829367`*^9, 3.6926047936630344`*^9}, {3.692694606764871*^9, 3.6926946080948734`*^9}, {3.6926946485549297`*^9, 3.6926946848649807`*^9}, {3.692694726505039*^9, 3.6926947795951133`*^9}, { 3.6926948533452168`*^9, 3.6926948903052683`*^9}, {3.692695016775445*^9, 3.6926950466854873`*^9}, {3.6926951047455683`*^9, 3.6926952014557037`*^9}, {3.692695400025982*^9, 3.6926954007959833`*^9}, { 3.692699088631146*^9, 3.6926990917611504`*^9}, {3.692699130701205*^9, 3.692699150701233*^9}, {3.6926992111213174`*^9, 3.692699243221362*^9}, { 3.692767928345048*^9, 3.6927679342250557`*^9}, {3.692768078185258*^9, 3.692768090845275*^9}, {3.692768583705965*^9, 3.6927686080859995`*^9}, { 3.692768652936062*^9, 3.6927686668160815`*^9}, {3.6927686975061245`*^9, 3.692768721766158*^9}, {3.6927687546262045`*^9, 3.692768807796279*^9}, { 3.6927688439663296`*^9, 3.692768846666333*^9}, {3.6927689511864796`*^9, 3.6927690097565613`*^9}, {3.692769047276614*^9, 3.6927692269968657`*^9}, { 3.692769260096912*^9, 3.6927692611369133`*^9}, {3.692769508057259*^9, 3.6927695324672937`*^9}, {3.692769570707347*^9, 3.692769719217555*^9}, { 3.6927698159576902`*^9, 3.6927698318077126`*^9}, 3.6927699552978854`*^9, { 3.6927701375081406`*^9, 3.6927701495781574`*^9}, {3.692772614961609*^9, 3.692772638701642*^9}, {3.692782982318822*^9, 3.6927829888081927`*^9}, { 3.6927830390960693`*^9, 3.692783045068411*^9}, {3.692783125046985*^9, 3.6927831273591175`*^9}, {3.692784897481363*^9, 3.6927849907176957`*^9}, 3.6927851596043553`*^9, {3.692786968327264*^9, 3.6927869691872644`*^9}, { 3.6927917561302457`*^9, 3.6927918079203186`*^9}, {3.6927918834304237`*^9, 3.692791893050438*^9}, 3.692791931280491*^9, {3.692791999660587*^9, 3.692792026840625*^9}, {3.6927921455307913`*^9, 3.6927921655908194`*^9}, { 3.692792200960869*^9, 3.692792228630907*^9}, {3.692792265330959*^9, 3.6927922938409986`*^9}, {3.6927923374910593`*^9, 3.6927923700511055`*^9}, {3.6927924565012264`*^9, 3.692792499271286*^9}, { 3.692792553391362*^9, 3.6927925860314074`*^9}, {3.692792731971612*^9, 3.6927927381216207`*^9}, {3.692792820381736*^9, 3.692792853021782*^9}, { 3.6927928932518377`*^9, 3.6927929516419196`*^9}, {3.6927929886919713`*^9, 3.6927930024219904`*^9}, {3.69279305234206*^9, 3.6927930715320873`*^9}, { 3.6927932237223005`*^9, 3.692793224982302*^9}, 3.6927932572523475`*^9, { 3.6927934421826067`*^9, 3.6927934498726172`*^9}, {3.692793484652666*^9, 3.6927935029226913`*^9}, {3.6927954180780883`*^9, 3.692795446828129*^9}, { 3.6928535571114936`*^9, 3.692853577521522*^9}, {3.692854825823887*^9, 3.692854837063903*^9}, {3.692854874433955*^9, 3.6928548775639596`*^9}, { 3.6928579822683063`*^9, 3.6928579955883245`*^9}, {3.6929656707917795`*^9, 3.692965795661954*^9}, {3.6929658426120195`*^9, 3.6929658536320353`*^9}, { 3.6929659138621197`*^9, 3.6929659218321304`*^9}, {3.692965990142226*^9, 3.6929660268822775`*^9}, {3.692966066362333*^9, 3.692966192182509*^9}, 3.69296637876277*^9, {3.6929669253235354`*^9, 3.692966936273551*^9}, { 3.6929669714336*^9, 3.692966971953601*^9}, 3.6929670139636593`*^9, 3.692967433554247*^9, {3.6929675634944286`*^9, 3.6929676911746073`*^9}, { 3.6929677832047367`*^9, 3.6929678068347692`*^9}, {3.6929678599332247`*^9, 3.6929678711132402`*^9}, 3.692967908543293*^9, {3.693017052482854*^9, 3.6930171392429757`*^9}, {3.6930174027243443`*^9, 3.6930175965956163`*^9}, {3.6930184697368383`*^9, 3.6930185654269724`*^9}, {3.6930186942971525`*^9, 3.6930188354373503`*^9}, {3.6930188926684303`*^9, 3.6930189600095253`*^9}, {3.693018990869568*^9, 3.693018991349569*^9}, { 3.693019036009631*^9, 3.693019041239639*^9}, {3.6930190980797186`*^9, 3.693019098629719*^9}, {3.693019130059763*^9, 3.6930192205398893`*^9}, { 3.693020315081422*^9, 3.693020326351438*^9}, {3.6930205415560236`*^9, 3.6930206058761134`*^9}, {3.6931381375028915`*^9, 3.693138137902892*^9}, { 3.693138677303647*^9, 3.693138683263655*^9}, {3.693139600730257*^9, 3.6931396288802967`*^9}, {3.6932135226775846`*^9, 3.6932135229775853`*^9}, {3.693219312471691*^9, 3.69321932632171*^9}, { 3.6932194762919197`*^9, 3.6932194879419365`*^9}, 3.6932195481520205`*^9, { 3.693220303405078*^9, 3.6932203178550987`*^9}, {3.693220688975618*^9, 3.693220698955632*^9}, {3.6933024593938713`*^9, 3.6933024657438803`*^9}, { 3.693302603694073*^9, 3.693302604214074*^9}, {3.6933103950923057`*^9, 3.693310399082311*^9}, {3.6933104528223867`*^9, 3.693310456172391*^9}, { 3.693380733755448*^9, 3.693380746175465*^9}, {3.6936247413492084`*^9, 3.6936247436692114`*^9}, {3.69362490643944*^9, 3.6936249099894447`*^9}, { 3.6937175435584445`*^9, 3.6937175579984646`*^9}, {3.693717708199675*^9, 3.6937177268707013`*^9}, {3.6937178194508305`*^9, 3.6937178401008596`*^9}, {3.693717934550992*^9, 3.6937179428310037`*^9}, { 3.6937180305511265`*^9, 3.693718060841169*^9}, {3.693718198801362*^9, 3.6937182028213673`*^9}, {3.693723123415037*^9, 3.6937231809651175`*^9}, { 3.693723252275217*^9, 3.69372327580525*^9}, {3.6937233347053328`*^9, 3.693723337655337*^9}, {3.693723689337829*^9, 3.6937237730079465`*^9}, { 3.6937240089782767`*^9, 3.6937240113382797`*^9}, {3.6938202843684807`*^9, 3.6938203172553616`*^9}, {3.6938203482121134`*^9, 3.6938203495041876`*^9}, 3.6938204448556414`*^9, {3.693826654370701*^9, 3.693826713082033*^9}, 3.6938269274112916`*^9, {3.69384095960849*^9, 3.6938409879385295`*^9}, { 3.6938967427518525`*^9, 3.6938967457718563`*^9}, {3.693896818211958*^9, 3.6938968234619656`*^9}, {3.6940917346582804`*^9, 3.6940917372882843`*^9}, {3.6949174720509205`*^9, 3.6949174781309295`*^9}, {3.69491751432098*^9, 3.6949175560810385`*^9}, { 3.697770949307855*^9, 3.697770962227873*^9}, {3.723799262336609*^9, 3.723799262645475*^9}, 3.7239435284061375`*^9, {3.7239436460810485`*^9, 3.72394364668592*^9}, {3.7254330838452635`*^9, 3.72543315169353*^9}, { 3.7254331912947936`*^9, 3.7254332075936446`*^9}, {3.725433705009429*^9, 3.7254337902858543`*^9}, {3.72543382083533*^9, 3.7254339260782228`*^9}, { 3.7254341992826924`*^9, 3.725434210286269*^9}, {3.7254342875818415`*^9, 3.7254342880778885`*^9}, {3.725443796293885*^9, 3.7254438161441803`*^9}, { 3.725756614481497*^9, 3.725756618125969*^9}, {3.7257914023599677`*^9, 3.7257914032179613`*^9}, {3.725791548301742*^9, 3.7257915491082635`*^9}, { 3.7257916547512665`*^9, 3.725791656837747*^9}, {3.725891883570933*^9, 3.7258919550235353`*^9}, {3.7258922912790194`*^9, 3.725892303666605*^9}, { 3.7258923638013153`*^9, 3.7258923917562647`*^9}, {3.732781849897335*^9, 3.732781851740935*^9}, {3.756128796258463*^9, 3.756128808101935*^9}, { 3.7561289636033297`*^9, 3.7561289674012337`*^9}, {3.7561291581496544`*^9, 3.756129161730915*^9}, {3.756168228209236*^9, 3.7561682921182303`*^9}, { 3.756168336119172*^9, 3.7561683422817945`*^9}, {3.7561687588268995`*^9, 3.756168760043317*^9}, {3.756168790608805*^9, 3.7561688096838417`*^9}, { 3.7562669791923923`*^9, 3.7562669871894484`*^9}, {3.7562671345571966`*^9, 3.7562671514185095`*^9}, {3.756267238618904*^9, 3.75626728245811*^9}, { 3.7562673231127896`*^9, 3.756267369934089*^9}, {3.7562679132987003`*^9, 3.7562679378330235`*^9}, {3.7562686403059607`*^9, 3.75626865150496*^9}, 3.756268910964476*^9, 3.756268975347582*^9, {3.756291635829771*^9, 3.756291670714565*^9}, {3.7562970292001624`*^9, 3.7562971110957913`*^9}, { 3.756354727514307*^9, 3.7563547516317015`*^9}, {3.756354849442463*^9, 3.7563548962495594`*^9}, {3.7563549974812*^9, 3.7563550014513693`*^9}, { 3.756355080997491*^9, 3.756355089151907*^9}, {3.7563551640676885`*^9, 3.756355171626652*^9}, {3.756355203033866*^9, 3.7563553257026477`*^9}, { 3.7563554337406178`*^9, 3.7563554593890176`*^9}, {3.756355541718184*^9, 3.756355546747837*^9}, {3.7563557326318254`*^9, 3.7563557465035677`*^9}, { 3.7563558550458755`*^9, 3.7563558609196053`*^9}, {3.756355910283166*^9, 3.75635593869836*^9}, {3.7563560087797346`*^9, 3.7563560102950015`*^9}, { 3.756797773170301*^9, 3.7567978192689314`*^9}, {3.756798047305444*^9, 3.7567980844374113`*^9}, {3.7567981179139524`*^9, 3.756798154780326*^9}, { 3.7568139377944374`*^9, 3.756813941735011*^9}, {3.7578171254549913`*^9, 3.7578171982352457`*^9}, {3.75781775424854*^9, 3.7578177761870728`*^9}, { 3.75781956271533*^9, 3.757819566308566*^9}, 3.7878930157969465`*^9, { 3.7878932625371447`*^9, 3.787893293562251*^9}, {3.789011658828579*^9, 3.789011685106179*^9}, {3.7890117693402524`*^9, 3.789011778591201*^9}, { 3.7890118169046745`*^9, 3.789011856496833*^9}, {3.789011916734619*^9, 3.7890119176130137`*^9}, {3.7890120044003463`*^9, 3.7890120790499506`*^9}, {3.7890170225675735`*^9, 3.7890170409915233`*^9}, {3.789137822804145*^9, 3.789137840140971*^9}, { 3.789138830369392*^9, 3.789138831966152*^9}, {3.7891389641705704`*^9, 3.7891389664011173`*^9}, {3.7891390002011633`*^9, 3.7891390083921847`*^9}, {3.7891390613275332`*^9, 3.789139181303717*^9}, { 3.7891788441595936`*^9, 3.7891788709933996`*^9}, {3.789197516887492*^9, 3.7891975292926593`*^9}, {3.789197640603428*^9, 3.7891976690423317`*^9}, { 3.7891980332343006`*^9, 3.789198036543322*^9}, {3.7894414019567575`*^9, 3.7894414188832755`*^9}, {3.7894415106536922`*^9, 3.7894415689767485`*^9}, {3.7894417279374404`*^9, 3.7894417609320536`*^9}, {3.7894418267668767`*^9, 3.789441867240697*^9}, { 3.7894419854165044`*^9, 3.7894419959085493`*^9}, {3.7894812275884027`*^9, 3.789481229196883*^9}, {3.789565208967163*^9, 3.789565222891079*^9}, { 3.7895652677339725`*^9, 3.789565310260277*^9}, {3.7897242364891343`*^9, 3.7897242407177544`*^9}}, CellLabel-> "In[212]:=",ExpressionUUID->"33d30078-cc3d-4d5c-a4e8-d5dbdede8fdd"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", RowBox[{"NONL", ",", "rule0_"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "equ", ",", "sol", ",", "\[Delta]WT"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WT", "=", RowBox[{"ParallelMap", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"NONL", ",", "rule0"}], "}"}], ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WT", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WT", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"D", "[", RowBox[{"\[Delta]WT", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Solve", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", "dof"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"First", "[", "sol", "]"}], "]"}]}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", RowBox[{"NONL", ",", "rule0_", ",", "rule1_"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "equ", ",", "sol", ",", "\[Delta]WT"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WT", "=", RowBox[{"ParallelMap", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"NONL", ",", "rule0", ",", "rule1"}], "}"}], ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WT", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WT", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"D", "[", RowBox[{"\[Delta]WT", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Solve", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", "dof"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"First", "[", "sol", "]"}], "]"}]}]}], "]"}]}], ";"}], " "}]}], "Input",ExpressionUUID->"01855d71-763c-460a-b439-176235fd4af7"] }, Closed]], Cell[CellGroupData[{ Cell["TMEC defs", "Subsection", CellChangeTimes->{{3.7582531074375505`*^9, 3.7582531288543863`*^9}, { 3.787892825419589*^9, 3.7878928340449758`*^9}, {3.822369175023527*^9, 3.8223691834150925`*^9}, {3.8223697280437837`*^9, 3.8223697285388823`*^9}},ExpressionUUID->"3b20f4a3-9a10-4b9f-838d-\ 56dbb413c268"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"{", "TMEC", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "equ", ",", "sol", ",", "\[Delta]WT"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WT", "=", RowBox[{"ParallelMap", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"TMEC", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WT", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WT", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"D", "[", RowBox[{"\[Delta]WT", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Solve", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"equ", "\[Equal]", "0"}], "]"}], ",", "dof"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"First", "[", "sol", "]"}], "]"}]}]}], "]"}]}], ";"}], " ", ";"}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.445098179109*^9, 3.4450982721786003`*^9, {3.451279000619*^9, 3.4512790074518003`*^9}, {3.4512864298050003`*^9, 3.4512864368094*^9}, { 3.4706476335011683`*^9, 3.4706476477283683`*^9}, {3.4770540063998003`*^9, 3.4770540103154*^9}, {3.4818115795696*^9, 3.481811581816*^9}, { 3.4820252104592*^9, 3.4820252549035997`*^9}, {3.4820583880738*^9, 3.4820584077454*^9}, {3.4822351571716003`*^9, 3.4822351901188*^9}, { 3.4823004164308*^9, 3.4823004243712*^9}, {3.493344815723*^9, 3.4933448166745996`*^9}, {3.4933448517122*^9, 3.4933448763445997`*^9}, { 3.4933449778422003`*^9, 3.4933449867342*^9}, {3.4942053389948*^9, 3.4942053532688*^9}, {3.495099886848*^9, 3.4950998935959997`*^9}, { 3.495099958993*^9, 3.495099969426*^9}, 3.495100042671*^9, { 3.495100076422*^9, 3.495100110413*^9}, {3.49510016601*^9, 3.4951001814849997`*^9}, 3.4951002189040003`*^9, {3.495100255352*^9, 3.495100257927*^9}, {3.495100455098*^9, 3.4951004564449997`*^9}, { 3.495100515517*^9, 3.4951005243059998`*^9}, {3.495100586*^9, 3.4951006116359997`*^9}, {3.496055002618*^9, 3.496055006674*^9}, { 3.5007168179316*^9, 3.5007168299904003`*^9}, {3.557657331191841*^9, 3.5576573613778934`*^9}, {3.557658058371518*^9, 3.5576580893531723`*^9}, { 3.6204640425822525`*^9, 3.620464043896328*^9}, {3.629448441451354*^9, 3.6294484425113554`*^9}, {3.632027966812848*^9, 3.63202808169145*^9}, { 3.632028112439104*^9, 3.632028231997714*^9}, {3.632028264944972*^9, 3.632028286223409*^9}, 3.6320284618641176`*^9, 3.6320284928925724`*^9, { 3.6321887622237573`*^9, 3.6321887797107573`*^9}, {3.6321888300516367`*^9, 3.6321888552960806`*^9}, 3.6321889475563574`*^9, {3.63218903764051*^9, 3.6321890646730566`*^9}, {3.632189114899929*^9, 3.63218912051025*^9}, { 3.632189363344139*^9, 3.632189368985462*^9}, {3.65933624669765*^9, 3.6593362536240625`*^9}, {3.659336346288225*^9, 3.6593363466002254`*^9}, { 3.685234016837945*^9, 3.6852340690569315`*^9}, {3.6852341853385825`*^9, 3.6852342255038795`*^9}, {3.6852342700224257`*^9, 3.685234275388733*^9}, 3.685260724724876*^9, {3.685271245062879*^9, 3.685271273442919*^9}, { 3.685340120474733*^9, 3.6853401228547363`*^9}, {3.6873488134786153`*^9, 3.6873488145086164`*^9}, {3.687348848548664*^9, 3.6873488495686655`*^9}, { 3.6873489495588055`*^9, 3.687348976528844*^9}, {3.6873490107688913`*^9, 3.6873490208289056`*^9}, {3.6873490736689796`*^9, 3.6873490997690163`*^9}, {3.6873491395590715`*^9, 3.6873491721791177`*^9}, {3.6873493303593388`*^9, 3.687349336179347*^9}, { 3.687521139333435*^9, 3.687521232626771*^9}, {3.687526828204684*^9, 3.6875268662258587`*^9}, {3.687744603751021*^9, 3.687744621651046*^9}, { 3.687744782441271*^9, 3.687744793141286*^9}, {3.687744898361433*^9, 3.687744900871437*^9}, {3.687828873646782*^9, 3.6878288977768154`*^9}, { 3.6893872627070065`*^9, 3.6893872737370224`*^9}, {3.689388189828305*^9, 3.689388190108305*^9}, {3.6924132329925613`*^9, 3.692413234362563*^9}, { 3.6924133951727886`*^9, 3.6924134472928615`*^9}, {3.692413504072941*^9, 3.6924135542830114`*^9}, {3.6924138300453973`*^9, 3.692413892645485*^9}, { 3.6924150151235356`*^9, 3.692415019653542*^9}, {3.6924150955736485`*^9, 3.692415151833727*^9}, {3.6924152984639325`*^9, 3.692415397454071*^9}, { 3.6924155440942764`*^9, 3.6924155997043543`*^9}, {3.6924163099373484`*^9, 3.692416448987543*^9}, {3.6924164799875865`*^9, 3.692416520217643*^9}, { 3.6926047241829367`*^9, 3.6926047936630344`*^9}, {3.692694606764871*^9, 3.6926946080948734`*^9}, {3.6926946485549297`*^9, 3.6926946848649807`*^9}, {3.692694726505039*^9, 3.6926947795951133`*^9}, { 3.6926948533452168`*^9, 3.6926948903052683`*^9}, {3.692695016775445*^9, 3.6926950466854873`*^9}, {3.6926951047455683`*^9, 3.6926952014557037`*^9}, {3.692695400025982*^9, 3.6926954007959833`*^9}, { 3.692699088631146*^9, 3.6926990917611504`*^9}, {3.692699130701205*^9, 3.692699150701233*^9}, {3.6926992111213174`*^9, 3.692699243221362*^9}, { 3.692767928345048*^9, 3.6927679342250557`*^9}, {3.692768078185258*^9, 3.692768090845275*^9}, {3.692768583705965*^9, 3.6927686080859995`*^9}, { 3.692768652936062*^9, 3.6927686668160815`*^9}, {3.6927686975061245`*^9, 3.692768721766158*^9}, {3.6927687546262045`*^9, 3.692768807796279*^9}, { 3.6927688439663296`*^9, 3.692768846666333*^9}, {3.6927689511864796`*^9, 3.6927690097565613`*^9}, {3.692769047276614*^9, 3.6927692269968657`*^9}, { 3.692769260096912*^9, 3.6927692611369133`*^9}, {3.692769508057259*^9, 3.6927695324672937`*^9}, {3.692769570707347*^9, 3.692769719217555*^9}, { 3.6927698159576902`*^9, 3.6927698318077126`*^9}, 3.6927699552978854`*^9, { 3.6927701375081406`*^9, 3.6927701495781574`*^9}, {3.692772614961609*^9, 3.692772638701642*^9}, {3.692782982318822*^9, 3.6927829888081927`*^9}, { 3.6927830390960693`*^9, 3.692783045068411*^9}, {3.692783125046985*^9, 3.6927831273591175`*^9}, {3.692784897481363*^9, 3.6927849907176957`*^9}, 3.6927851596043553`*^9, {3.692786968327264*^9, 3.6927869691872644`*^9}, { 3.6927917561302457`*^9, 3.6927918079203186`*^9}, {3.6927918834304237`*^9, 3.692791893050438*^9}, 3.692791931280491*^9, {3.692791999660587*^9, 3.692792026840625*^9}, {3.6927921455307913`*^9, 3.6927921655908194`*^9}, { 3.692792200960869*^9, 3.692792228630907*^9}, {3.692792265330959*^9, 3.6927922938409986`*^9}, {3.6927923374910593`*^9, 3.6927923700511055`*^9}, {3.6927924565012264`*^9, 3.692792499271286*^9}, { 3.692792553391362*^9, 3.6927925860314074`*^9}, {3.692792731971612*^9, 3.6927927381216207`*^9}, {3.692792820381736*^9, 3.692792853021782*^9}, { 3.6927928932518377`*^9, 3.6927929516419196`*^9}, {3.6927929886919713`*^9, 3.6927930024219904`*^9}, {3.69279305234206*^9, 3.6927930715320873`*^9}, { 3.6927932237223005`*^9, 3.692793224982302*^9}, 3.6927932572523475`*^9, { 3.6927934421826067`*^9, 3.6927934498726172`*^9}, {3.692793484652666*^9, 3.6927935029226913`*^9}, {3.6927954180780883`*^9, 3.692795446828129*^9}, { 3.6928535571114936`*^9, 3.692853577521522*^9}, {3.692854825823887*^9, 3.692854837063903*^9}, {3.692854874433955*^9, 3.6928548775639596`*^9}, { 3.6928579822683063`*^9, 3.6928579955883245`*^9}, {3.6929656707917795`*^9, 3.692965795661954*^9}, {3.6929658426120195`*^9, 3.6929658536320353`*^9}, { 3.6929659138621197`*^9, 3.6929659218321304`*^9}, {3.692965990142226*^9, 3.6929660268822775`*^9}, {3.692966066362333*^9, 3.692966192182509*^9}, 3.69296637876277*^9, {3.6929669253235354`*^9, 3.692966936273551*^9}, { 3.6929669714336*^9, 3.692966971953601*^9}, 3.6929670139636593`*^9, 3.692967433554247*^9, {3.6929675634944286`*^9, 3.6929676911746073`*^9}, { 3.6929677832047367`*^9, 3.6929678068347692`*^9}, {3.6929678599332247`*^9, 3.6929678711132402`*^9}, 3.692967908543293*^9, {3.693017052482854*^9, 3.6930171392429757`*^9}, {3.6930174027243443`*^9, 3.6930175965956163`*^9}, {3.6930184697368383`*^9, 3.6930185654269724`*^9}, {3.6930186942971525`*^9, 3.6930188354373503`*^9}, {3.6930188926684303`*^9, 3.6930189600095253`*^9}, {3.693018990869568*^9, 3.693018991349569*^9}, { 3.693019036009631*^9, 3.693019041239639*^9}, {3.6930190980797186`*^9, 3.693019098629719*^9}, {3.693019130059763*^9, 3.6930192205398893`*^9}, { 3.693020315081422*^9, 3.693020326351438*^9}, {3.6930205415560236`*^9, 3.6930206058761134`*^9}, {3.6931381375028915`*^9, 3.693138137902892*^9}, { 3.693138677303647*^9, 3.693138683263655*^9}, {3.693139600730257*^9, 3.6931396288802967`*^9}, {3.6932135226775846`*^9, 3.6932135229775853`*^9}, {3.693219312471691*^9, 3.69321932632171*^9}, { 3.6932194762919197`*^9, 3.6932194879419365`*^9}, 3.6932195481520205`*^9, { 3.693220303405078*^9, 3.6932203178550987`*^9}, {3.693220688975618*^9, 3.693220698955632*^9}, {3.6933024593938713`*^9, 3.6933024657438803`*^9}, { 3.693302603694073*^9, 3.693302604214074*^9}, {3.6933103950923057`*^9, 3.693310399082311*^9}, {3.6933104528223867`*^9, 3.693310456172391*^9}, { 3.693380733755448*^9, 3.693380746175465*^9}, {3.6936247413492084`*^9, 3.6936247436692114`*^9}, {3.69362490643944*^9, 3.6936249099894447`*^9}, { 3.6937175435584445`*^9, 3.6937175579984646`*^9}, {3.693717708199675*^9, 3.6937177268707013`*^9}, {3.6937178194508305`*^9, 3.6937178401008596`*^9}, {3.693717934550992*^9, 3.6937179428310037`*^9}, { 3.6937180305511265`*^9, 3.693718060841169*^9}, {3.693718198801362*^9, 3.6937182028213673`*^9}, {3.693723123415037*^9, 3.6937231809651175`*^9}, { 3.693723252275217*^9, 3.69372327580525*^9}, {3.6937233347053328`*^9, 3.693723337655337*^9}, {3.693723689337829*^9, 3.6937237730079465`*^9}, { 3.6937240089782767`*^9, 3.6937240113382797`*^9}, {3.6938202843684807`*^9, 3.6938203172553616`*^9}, {3.6938203482121134`*^9, 3.6938203495041876`*^9}, 3.6938204448556414`*^9, {3.693826654370701*^9, 3.693826713082033*^9}, 3.6938269274112916`*^9, {3.69384095960849*^9, 3.6938409879385295`*^9}, { 3.6938967427518525`*^9, 3.6938967457718563`*^9}, {3.693896818211958*^9, 3.6938968234619656`*^9}, {3.6940917346582804`*^9, 3.6940917372882843`*^9}, {3.6949174720509205`*^9, 3.6949174781309295`*^9}, {3.69491751432098*^9, 3.6949175560810385`*^9}, { 3.697770949307855*^9, 3.697770962227873*^9}, {3.723799262336609*^9, 3.723799262645475*^9}, 3.7239435284061375`*^9, {3.7239436460810485`*^9, 3.72394364668592*^9}, {3.7254330838452635`*^9, 3.72543315169353*^9}, { 3.7254331912947936`*^9, 3.7254332075936446`*^9}, {3.725433705009429*^9, 3.7254337902858543`*^9}, {3.72543382083533*^9, 3.7254339260782228`*^9}, { 3.7254341992826924`*^9, 3.725434210286269*^9}, {3.7254342875818415`*^9, 3.7254342880778885`*^9}, {3.725443796293885*^9, 3.7254438161441803`*^9}, { 3.725756614481497*^9, 3.725756618125969*^9}, {3.7257914023599677`*^9, 3.7257914032179613`*^9}, {3.725791548301742*^9, 3.7257915491082635`*^9}, { 3.7257916547512665`*^9, 3.725791656837747*^9}, {3.725891883570933*^9, 3.7258919550235353`*^9}, {3.7258922912790194`*^9, 3.725892303666605*^9}, { 3.7258923638013153`*^9, 3.7258923917562647`*^9}, {3.732781849897335*^9, 3.732781851740935*^9}, {3.756128796258463*^9, 3.756128808101935*^9}, { 3.7561289636033297`*^9, 3.7561289674012337`*^9}, {3.7561291581496544`*^9, 3.756129161730915*^9}, {3.756168228209236*^9, 3.7561682921182303`*^9}, { 3.756168336119172*^9, 3.7561683422817945`*^9}, {3.7561687588268995`*^9, 3.756168760043317*^9}, {3.756168790608805*^9, 3.7561688096838417`*^9}, { 3.7562669791923923`*^9, 3.7562669871894484`*^9}, {3.7562671345571966`*^9, 3.7562671514185095`*^9}, {3.756267238618904*^9, 3.75626728245811*^9}, { 3.7562673231127896`*^9, 3.756267369934089*^9}, {3.7562679132987003`*^9, 3.7562679378330235`*^9}, {3.7562686403059607`*^9, 3.75626865150496*^9}, 3.756268910964476*^9, 3.756268975347582*^9, {3.756291635829771*^9, 3.756291670714565*^9}, {3.7562970292001624`*^9, 3.7562971110957913`*^9}, { 3.756354727514307*^9, 3.7563547516317015`*^9}, {3.756354849442463*^9, 3.7563548962495594`*^9}, {3.7563549974812*^9, 3.7563550014513693`*^9}, { 3.756355080997491*^9, 3.756355089151907*^9}, {3.7563551640676885`*^9, 3.756355171626652*^9}, {3.756355203033866*^9, 3.7563553257026477`*^9}, { 3.7563554337406178`*^9, 3.7563554593890176`*^9}, {3.756355541718184*^9, 3.756355546747837*^9}, {3.7563557326318254`*^9, 3.7563557465035677`*^9}, { 3.7563558550458755`*^9, 3.7563558609196053`*^9}, {3.756355910283166*^9, 3.75635593869836*^9}, {3.7563560087797346`*^9, 3.7563560102950015`*^9}, { 3.756797773170301*^9, 3.7567978192689314`*^9}, {3.756798047305444*^9, 3.7567980844374113`*^9}, {3.7567981179139524`*^9, 3.756798154780326*^9}, { 3.7568139377944374`*^9, 3.756813941735011*^9}, {3.7578171254549913`*^9, 3.7578171982352457`*^9}, {3.75781775424854*^9, 3.7578177761870728`*^9}, { 3.75781956271533*^9, 3.757819566308566*^9}, 3.7878930157969465`*^9, 3.7878931876970196`*^9, {3.7890171909617825`*^9, 3.789017212740966*^9}, { 3.8152685002967186`*^9, 3.815268678285927*^9}, {3.815269201087903*^9, 3.815269223194291*^9}, {3.8223692003538074`*^9, 3.822369210700147*^9}, { 3.822369272776178*^9, 3.822369299587499*^9}, 3.8223697355995836`*^9, { 3.822370335148969*^9, 3.8223703474091916`*^9}}, CellLabel-> "In[221]:=",ExpressionUUID->"a143894d-97eb-4fc0-9a36-2d93d0212ba8"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["PRE-POST", "Section", CellChangeTimes->{ 3.4430806364968*^9, {3.4453166713873997`*^9, 3.4453166747414*^9}, { 3.447462264275*^9, 3.4474622644154*^9}, {3.4695731321116*^9, 3.4695731359491997`*^9}, 3.473055186341*^9, {3.4730552472860003`*^9, 3.47305524884*^9}, {3.473055399782*^9, 3.473055419801*^9}, { 3.4734696760778*^9, 3.4734697047349997`*^9}, {3.4770537891542*^9, 3.4770537950354*^9}, {3.4932799754514*^9, 3.4932799779161997`*^9}, { 3.4945558951644*^9, 3.4945558957416*^9}, {3.4957646303032*^9, 3.4957646329084*^9}, {3.497581602118*^9, 3.4975816042552*^9}, { 3.500960505817*^9, 3.5009605094206*^9}, {3.556623836083009*^9, 3.5566238462386265`*^9}, {3.5568725055395393`*^9, 3.5568725163821597`*^9}, {3.556872678728445*^9, 3.5568726810485783`*^9}, { 3.7323376045620503`*^9, 3.7323376086812124`*^9}, {3.7335630623483887`*^9, 3.733563072583865*^9}, {3.733563159827469*^9, 3.7335631629996696`*^9}},ExpressionUUID->"d1b2a4b7-b851-477f-bec8-\ f9861ea8da3e"], Cell[CellGroupData[{ Cell["LINK-TIE defs", "Subsection", CellChangeTimes->{{3.632187277028809*^9, 3.63218727949695*^9}, 3.632188602208605*^9, {3.632189487917265*^9, 3.6321894914104643`*^9}, { 3.68532054956944*^9, 3.6853205513594418`*^9}, {3.685326992341719*^9, 3.685326999819147*^9}, {3.685327113810607*^9, 3.685327116900611*^9}, { 3.76060719416889*^9, 3.760607206352191*^9}},ExpressionUUID->"ffeac167-9361-4429-95a4-\ 0272e369e589"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"LINK", "[", RowBox[{"{", RowBox[{"I1_Integer", ",", "I2_Integer"}], "}"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"DeleteCases", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{ RowBox[{"Thread", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I2", ",", "3"}], "]"}], "]"}], "\[Rule]", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "3"}], "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Thread", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I2", ",", "2"}], "]"}], "]"}], "\[Rule]", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "2"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], RowBox[{ StyleBox["(", "OperatorCharacter"], RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"I1", ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ")"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"0", "\[Rule]", "0"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"rigid", " ", "link"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"LINK", "[", RowBox[{"lnk_", ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", " ", RowBox[{ RowBox[{"{", RowBox[{"funout", ",", "n1", ",", "n2"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"funout", " ", "=", "fun"}], ";", "\[IndentingNewLine]", RowBox[{"Do", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "=", RowBox[{"lnk", "[", RowBox[{"[", "i", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", "n1", "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], ",", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}]}], ")"}]}]}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}]}], "}"}]}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"Length", "[", "lnk", "]"}]}], "}"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", "funout", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "one", " ", "node", " ", "tie", " ", "with", " ", "any", " ", "element"}], "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"could", " ", "be", " ", "generalized"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"TIE", "[", RowBox[{"n0_", ",", "nodes_", ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", " ", RowBox[{ RowBox[{"{", RowBox[{ "funout", ",", "n\[Xi]", ",", "n\[Eta]", ",", "\[Xi]", ",", "\[Eta]", ",", "NN", ",", "x", ",", "y", ",", "z", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"funout", " ", "=", "fun"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"n\[Xi]", ",", "n\[Eta]"}], "}"}], "=", RowBox[{"Dimensions", "[", "nodes", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n\[Xi]", ",", "\[Xi]"}], "}"}], ",", RowBox[{"{", RowBox[{"n\[Eta]", ",", "\[Eta]"}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"Flatten", "[", "nodes", "]"}], ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Xi]", ",", "\[Eta]"}], "}"}], "=", RowBox[{ RowBox[{"MinimalBy", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Xi]", ",", "\[Eta]", ",", " ", RowBox[{"Norm", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n0", ",", "1"}], "]"}], "]"}], "-", RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "20"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Eta]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "20"}]}], "}"}]}], "]"}], ",", "1"}], "]"}], ",", "Last"}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"Flatten", "[", "nodes", "]"}], ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"Flatten", "[", "nodes", "]"}], ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", "n0", "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n0", ",", "1"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", "funout", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "one", " ", "node", " ", "tie", " ", "with", " ", "any", " ", "element"}], "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ RowBox[{"could", " ", "be", " ", "generalized", "\[IndentingNewLine]", RowBox[{"TIE", "[", RowBox[{"n0_", ",", "nodes_", ",", "fun_"}], "]"}]}], ":=", RowBox[{"Module", "[", " ", RowBox[{ RowBox[{"{", RowBox[{ "funout", ",", "n\[Xi]", ",", "n\[Eta]", ",", "\[Xi]", ",", "\[Eta]", ",", "NN", ",", "x", ",", "y", ",", "z", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"funout", " ", "=", "fun"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"n\[Xi]", ",", "n\[Eta]"}], "}"}], "=", RowBox[{"Dimensions", "[", "nodes", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n\[Xi]", ",", "\[Xi]"}], "}"}], ",", RowBox[{"{", RowBox[{"n\[Eta]", ",", "\[Eta]"}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"Flatten", "[", "nodes", "]"}], ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Xi]", ",", "\[Eta]"}], "}"}], "=", RowBox[{ RowBox[{"MinimalBy", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Xi]", ",", "\[Eta]", ",", " ", RowBox[{"Norm", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n0", ",", "1"}], "]"}], "]"}], "-", RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "20"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Eta]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "20"}]}], "}"}]}], "]"}], ",", "1"}], "]"}], ",", "Last"}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"Flatten", "[", "nodes", "]"}], ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"Flatten", "[", "nodes", "]"}], ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", "n0", "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n0", ",", "1"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", "funout", "]"}]}]}], "]"}]}], ";"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ RowBox[{ "one", " ", "node", " ", "tie", " ", "with", " ", "any", " ", "element", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"could", " ", "be", " ", "generalized"}], "*)"}], "\[IndentingNewLine]", RowBox[{"TIE", "[", RowBox[{"n0_", ",", "nodes_", ",", "fun_"}], "]"}]}], ":=", RowBox[{"Module", "[", " ", RowBox[{ RowBox[{"{", RowBox[{ "funout", ",", "n\[Xi]", ",", "n\[Eta]", ",", "\[Xi]", ",", "\[Eta]", ",", "NN", ",", "x", ",", "y", ",", "z", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"funout", " ", "=", "fun"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"n\[Xi]", ",", "n\[Eta]"}], "}"}], "=", RowBox[{"Dimensions", "[", "nodes", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n\[Xi]", ",", "\[Xi]"}], "}"}], ",", RowBox[{"{", RowBox[{"n\[Eta]", ",", "\[Eta]"}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"Flatten", "[", "nodes", "]"}], ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Xi]", ",", "\[Eta]"}], "}"}], "=", RowBox[{ RowBox[{"MinimalBy", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Xi]", ",", "\[Eta]", ",", " ", RowBox[{"Norm", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n0", ",", "1"}], "]"}], "]"}], "-", RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "20"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Eta]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "20"}]}], "}"}]}], "]"}], ",", "1"}], "]"}], ",", "Last"}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"Flatten", "[", "nodes", "]"}], ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"Flatten", "[", "nodes", "]"}], ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", "n0", "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n0", ",", "1"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Phi]", ",", "\[CapitalTheta]", ",", "\[Psi]"}], "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", "funout", "]"}]}]}], "]"}]}], ";"}], "*)"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.496939383309*^9, 3.4969394213417997`*^9}, { 3.559961640310264*^9, 3.559961656783893*^9}, {3.5599617303692226`*^9, 3.5599617392300377`*^9}, {3.5601312763250604`*^9, 3.5601312794606657`*^9}, {3.5601313134219255`*^9, 3.560131324388745*^9}, { 3.560132497854006*^9, 3.5601324981348066`*^9}, {3.63023183959678*^9, 3.630231884758859*^9}, {3.630649684386073*^9, 3.630649712146661*^9}, { 3.630649747889705*^9, 3.6306497780604305`*^9}, {3.630649843969201*^9, 3.6306501496326838`*^9}, {3.6306501928641567`*^9, 3.630650252234552*^9}, { 3.630650308727783*^9, 3.6306503113519335`*^9}, {3.630650349614122*^9, 3.630650420974203*^9}, {3.630650474367257*^9, 3.630650601725542*^9}, { 3.630651184910898*^9, 3.630651194788463*^9}, {3.6306517131931143`*^9, 3.6306517167213163`*^9}, {3.6306573863011556`*^9, 3.6306574164092083`*^9}, {3.6306574511192694`*^9, 3.630657474862511*^9}, { 3.6306575678542747`*^9, 3.6306576670080485`*^9}, {3.6306577117645273`*^9, 3.6306579038944645`*^9}, {3.630658012221055*^9, 3.630658091874795*^9}, { 3.6306581291432605`*^9, 3.630658226440631*^9}, {3.63065827139991*^9, 3.6306582739115143`*^9}, 3.630658635254949*^9, {3.6306586682178073`*^9, 3.6306586813998303`*^9}, {3.6306590619156985`*^9, 3.630659069606512*^9}, { 3.6321872976489887`*^9, 3.6321873151349883`*^9}, 3.6321874056671667`*^9, { 3.632187463194457*^9, 3.6321878547998557`*^9}, {3.632187889913864*^9, 3.6321878942471123`*^9}, {3.632187976697828*^9, 3.632187979874009*^9}, { 3.6321886111201143`*^9, 3.63218861505834*^9}, {3.632188654528598*^9, 3.6321886640741434`*^9}, {3.632189320010661*^9, 3.632189331931343*^9}, { 3.6853206095995235`*^9, 3.685320631309554*^9}, {3.6853206843496284`*^9, 3.685320754049726*^9}, {3.685320792059779*^9, 3.685320823639823*^9}, { 3.685321020360099*^9, 3.6853211351402597`*^9}, {3.6853211801403227`*^9, 3.685321665981003*^9}, {3.6853216989010487`*^9, 3.6853217094910636`*^9}, { 3.6853217810511637`*^9, 3.6853220138814898`*^9}, {3.6853225388622246`*^9, 3.6853226020023127`*^9}, {3.6853270065604563`*^9, 3.685327020590476*^9}, { 3.685327067740542*^9, 3.6853271904307137`*^9}, {3.6853272344507756`*^9, 3.685327367150961*^9}, {3.685327539861203*^9, 3.685327565421239*^9}, { 3.6853276026012907`*^9, 3.685327613201306*^9}, 3.685327846481632*^9, { 3.7606071666879735`*^9, 3.760607186226157*^9}, {3.7606081322359104`*^9, 3.7606081444875402`*^9}, {3.7831752763351398`*^9, 3.783175293210803*^9}, { 3.783175332699009*^9, 3.783175341729051*^9}, {3.7888532050250206`*^9, 3.7888532418332033`*^9}}, CellLabel-> "In[222]:=",ExpressionUUID->"649234a4-34ab-42d1-a5e4-6f7bf669327e"] }, Closed]], Cell[CellGroupData[{ Cell["TOOL defs", "Subsection",ExpressionUUID->"008c559b-cf80-4a8c-b950-b9601f7ba0b6"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"EX", "[", RowBox[{"M_", ",", "K_", ",", "alist_", ",", "rule_", ",", "time_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "t0", ",", "A", ",", "fun", ",", "dfun", ",", "out", ",", "alist0", ",", "alist1", ",", "a0", ",", "a1"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"alist0", " ", "=", RowBox[{"(", RowBox[{"alist", " ", "/.", RowBox[{"{", " ", RowBox[{ RowBox[{"a", "[", "b_", "]"}], " ", "\[Rule]", " ", RowBox[{"a", "[", RowBox[{"b", ",", "0"}], "]"}]}], "}"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"alist1", " ", "=", RowBox[{"(", RowBox[{"alist", " ", "/.", RowBox[{"{", " ", RowBox[{ RowBox[{"a", "[", "b_", "]"}], " ", "\[Rule]", " ", RowBox[{"a", "[", RowBox[{"b", ",", "1"}], "]"}]}], "}"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"a0", " ", "=", RowBox[{"(", RowBox[{"alist0", " ", "/.", " ", "rule"}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"a1", " ", "=", RowBox[{"(", RowBox[{"alist1", " ", "/.", " ", "rule"}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"t0", " ", "=", " ", RowBox[{"First", "[", "time", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"A", " ", "=", " ", RowBox[{ RowBox[{"Inverse", "[", "M", "]"}], ".", "K"}]}], ";", "\[IndentingNewLine]", RowBox[{"fun", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{ RowBox[{"MATRIXFUN", "[", RowBox[{"A", ",", RowBox[{ RowBox[{"Cos", "[", RowBox[{ RowBox[{"Sqrt", "[", "#", "]"}], "*", RowBox[{"(", RowBox[{"t", "-", "t0"}], ")"}]}], "]"}], "&"}]}], "]"}], ".", "a0"}], "+", RowBox[{ RowBox[{"MATRIXFUN", "[", RowBox[{"A", ",", RowBox[{ RowBox[{ RowBox[{"Sin", "[", RowBox[{ RowBox[{"Sqrt", "[", "#", "]"}], "*", RowBox[{"(", RowBox[{"t", "-", "t0"}], ")"}]}], "]"}], "/", RowBox[{"Sqrt", "[", "#", "]"}]}], "&"}]}], "]"}], ".", "a1"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dfun", " ", "=", " ", RowBox[{"D", "[", RowBox[{"fun", ",", "t"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"out", " ", "=", " ", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Join", "[", RowBox[{"fun", ",", "dfun"}], "]"}], " ", "/.", " ", RowBox[{"t", "->", "#"}]}], ")"}], "&"}], ",", "time"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"alist0", " ", "=", RowBox[{"(", RowBox[{"alist", " ", "/.", RowBox[{"{", " ", RowBox[{ RowBox[{"a", "[", "b_", "]"}], " ", "\[Rule]", " ", RowBox[{"a", "[", RowBox[{"b", ",", "0"}], "]"}]}], "}"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"alist1", " ", "=", RowBox[{"(", RowBox[{"alist", " ", "/.", RowBox[{"{", " ", RowBox[{ RowBox[{"a", "[", "b_", "]"}], " ", "\[Rule]", " ", RowBox[{"a", "[", RowBox[{"b", ",", "1"}], "]"}]}], "}"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"MAKERULE", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{"alist0", ",", "alist1"}], "]"}], ",", "#"}], "]"}], "&"}], " ", ",", "out"}], "]"}]}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"CR", "[", RowBox[{"M_", ",", "K_", ",", "alist_", ",", "rule_", ",", "time_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nn", ",", "\[CapitalDelta]t", ",", "A", ",", "II", ",", "AA", ",", "out", ",", "alist0", ",", "alist1", ",", "a0", ",", "a1"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"alist0", " ", "=", RowBox[{"(", RowBox[{"alist", " ", "/.", RowBox[{"{", " ", RowBox[{ RowBox[{"a", "[", "b_", "]"}], " ", "\[Rule]", " ", RowBox[{"a", "[", RowBox[{"b", ",", "0"}], "]"}]}], "}"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"alist1", " ", "=", RowBox[{"(", RowBox[{"alist", " ", "/.", RowBox[{"{", " ", RowBox[{ RowBox[{"a", "[", "b_", "]"}], " ", "\[Rule]", " ", RowBox[{"a", "[", RowBox[{"b", ",", "1"}], "]"}]}], "}"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"a0", " ", "=", RowBox[{"(", RowBox[{"alist0", " ", "/.", " ", "rule"}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"a1", " ", "=", RowBox[{"(", RowBox[{"alist1", " ", "/.", " ", "rule"}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"nn", " ", "=", RowBox[{ RowBox[{"Length", "[", "time", "]"}], "-", "1"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalDelta]t", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Last", "[", "time", "]"}], "-", RowBox[{"First", "[", "time", "]"}]}], ")"}], "/", "nn"}]}], ";", "\[IndentingNewLine]", RowBox[{"A", " ", "=", " ", RowBox[{ RowBox[{"Inverse", "[", "M", "]"}], ".", "K"}]}], ";", "\[IndentingNewLine]", RowBox[{"II", " ", "=", " ", RowBox[{"IdentityMatrix", "[", RowBox[{"Length", "[", "a0", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"AA", " ", "=", " ", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"ArrayFlatten", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"II", ",", RowBox[{ RowBox[{ RowBox[{"-", "II"}], "/", "2"}], "*", "\[CapitalDelta]t"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"A", "*", RowBox[{ RowBox[{"\[CapitalDelta]t", "^", "2"}], "/", "2"}]}], ",", RowBox[{"II", "*", "\[CapitalDelta]t"}]}], "}"}]}], "}"}], "]"}], "]"}], ".", RowBox[{"ArrayFlatten", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"II", ",", RowBox[{ RowBox[{"II", "/", "2"}], "*", "\[CapitalDelta]t"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "A"}], "*", RowBox[{ RowBox[{"\[CapitalDelta]t", "^", "2"}], "/", "2"}]}], ",", RowBox[{"II", "*", "\[CapitalDelta]t"}]}], "}"}]}], "}"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"out", " ", "=", RowBox[{"NestList", "[", RowBox[{ RowBox[{ RowBox[{"AA", ".", "#"}], "&"}], ",", RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"a0", ",", "a1"}], "}"}], "]"}], ",", "nn"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"MAKERULE", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{"alist0", ",", "alist1"}], "]"}], ",", "#"}], "]"}], "&"}], " ", ",", "out"}], "]"}]}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"DG", "[", RowBox[{"M_", ",", "K_", ",", "alist_", ",", "rule_", ",", "time_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nn", ",", "\[CapitalDelta]t", ",", "A", ",", "II", " ", ",", "AA", " ", ",", "out", ",", "alist0", ",", "alist1", ",", "a0", ",", "a1"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"alist0", " ", "=", RowBox[{"(", RowBox[{"alist", " ", "/.", RowBox[{"{", " ", RowBox[{ RowBox[{"a", "[", "b_", "]"}], " ", "\[Rule]", " ", RowBox[{"a", "[", RowBox[{"b", ",", "0"}], "]"}]}], "}"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"alist1", " ", "=", RowBox[{"(", RowBox[{"alist", " ", "/.", RowBox[{"{", " ", RowBox[{ RowBox[{"a", "[", "b_", "]"}], " ", "\[Rule]", " ", RowBox[{"a", "[", RowBox[{"b", ",", "1"}], "]"}]}], "}"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"a0", " ", "=", RowBox[{"(", RowBox[{"alist0", " ", "/.", " ", "rule"}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"a1", " ", "=", RowBox[{"(", RowBox[{"alist1", " ", "/.", " ", "rule"}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"nn", " ", "=", RowBox[{ RowBox[{"Length", "[", "time", "]"}], "-", "1"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalDelta]t", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Last", "[", "time", "]"}], "-", RowBox[{"First", "[", "time", "]"}]}], ")"}], "/", "nn"}]}], ";", "\[IndentingNewLine]", RowBox[{"A", " ", "=", " ", RowBox[{ RowBox[{"Inverse", "[", "M", "]"}], ".", "K"}]}], ";", "\[IndentingNewLine]", RowBox[{"II", " ", "=", " ", RowBox[{"IdentityMatrix", "[", RowBox[{"Length", "[", "a0", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"AA", " ", "=", " ", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"ArrayFlatten", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"A", "*", RowBox[{"\[CapitalDelta]t", "^", "2"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"II", "-", RowBox[{"A", "*", RowBox[{ RowBox[{"\[CapitalDelta]t", "^", "2"}], "/", "2"}]}]}], ")"}], "*", "\[CapitalDelta]t"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "II"}], "-", RowBox[{"A", "*", RowBox[{ RowBox[{"\[CapitalDelta]t", "^", "2"}], "/", "2"}]}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"A", "*", RowBox[{ RowBox[{"\[CapitalDelta]t", "^", "2"}], "/", "3"}]}], ")"}], "*", "\[CapitalDelta]t"}]}], "}"}]}], "}"}], "]"}], "]"}], ".", RowBox[{"ArrayFlatten", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"0", "*", "II"}], ",", RowBox[{"II", "*", "\[CapitalDelta]t"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "II"}], ",", RowBox[{ RowBox[{"-", "II"}], "*", "\[CapitalDelta]t"}]}], "}"}]}], "}"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"out", " ", "=", RowBox[{"NestList", "[", RowBox[{ RowBox[{ RowBox[{"AA", ".", "#"}], "&"}], ",", RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"a0", ",", "a1"}], "}"}], "]"}], ",", "nn"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"MAKERULE", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{"alist0", ",", "alist1"}], "]"}], ",", "#"}], "]"}], "&"}], " ", ",", "out"}], "]"}]}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"NEWTON", "[", RowBox[{"equ_", ",", "var_", ",", "rule_", ",", RowBox[{"{", RowBox[{"\[CurlyEpsilon]_", ",", "m_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"Dequ", ",", "sol", ",", "dsol", ",", "K", ",", "F", ",", RowBox[{"ii", "=", "m"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Dequ", "=", RowBox[{"Transpose", "[", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "var", "}"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", " ", "=", RowBox[{"var", " ", "/.", " ", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{"While", "[", RowBox[{ RowBox[{"ii", ">", "0"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"K", "=", RowBox[{"Dequ", " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "->", "sol"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"F", "=", RowBox[{"equ", " ", "/.", RowBox[{"Thread", "[", RowBox[{"var", "->", "sol"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dsol", "=", RowBox[{"-", RowBox[{"LinearSolve", "[", RowBox[{"K", ",", "F"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", "dsol", "]"}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"sol", "+", "dsol"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Norm", "[", "dsol", "]"}], "<", RowBox[{"\[CurlyEpsilon]", "*", RowBox[{"Norm", "[", "sol", "]"}]}]}], ",", RowBox[{"Break", "[", "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"ii", "=", RowBox[{"ii", "-", "1"}]}]}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"Thread", "[", RowBox[{"var", "->", "sol"}], "]"}]}]}], "]"}]}], ";"}], " "}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.4941679835598*^9, 3.4941680104542*^9}, { 3.7258920393300085`*^9, 3.725892047236313*^9}, {3.7258921328118224`*^9, 3.725892185576483*^9}}, CellLabel-> "In[225]:=",ExpressionUUID->"63ee557b-078f-4e76-a040-efcb45c49c52"] }, Closed]], Cell[CellGroupData[{ Cell["REFINE defs", "Subsection", CellChangeTimes->{{3.7555369693812027`*^9, 3.7555369706487265`*^9}},ExpressionUUID->"35f9c0f9-59f8-4daa-bbce-\ 6d9e5feb8eca"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"left", " ", ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_", ",", "a3_"}], "}"}], "->", RowBox[{"{", RowBox[{"a1", ",", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"3", " ", "a1"}], "+", RowBox[{"6", " ", "a2"}], "-", "a3"}], ")"}], "/", "8"}], ",", "a2"}], "}"}]}], ",", RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "->", RowBox[{"{", RowBox[{"a1", ",", RowBox[{ RowBox[{"(", RowBox[{"a1", "+", "a2"}], ")"}], "/", "2"}]}], "}"}]}], ",", RowBox[{"a1_", "->", "a1"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"right", " ", ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_", ",", "a3_"}], "}"}], "->", RowBox[{"{", RowBox[{"a2", ",", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "a1"}], "+", RowBox[{"6", " ", "a2"}], "+", RowBox[{"3", " ", "a3"}]}], ")"}], "/", "8"}], ",", "a3"}], "}"}]}], ",", RowBox[{ RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "->", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"a1", "+", "a2"}], ")"}], "/", "2"}], ",", "a2"}], "}"}]}], ",", RowBox[{"a1_", "->", "a1"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"RIGID", ",", "mat_", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"RIGID", ",", "mat", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"RIGID", ",", "mat", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"FORCE", ",", "mat_", ",", RowBox[{"Point", "[", RowBox[{"{", "a1_", "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{"{", RowBox[{"FORCE", ",", "mat", ",", RowBox[{"Point", "[", RowBox[{"{", "a1", "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"fX", " ", "/.", "left"}], ",", RowBox[{"fY", "/.", "left"}], ",", RowBox[{"fZ", "/.", "left"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"fX", " ", "/.", "right"}], ",", RowBox[{"fY", "/.", "right"}], ",", RowBox[{"fZ", "/.", "right"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", "AA_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", " ", "/.", "left"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", "/.", "left"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"BAR", ",", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", " ", "/.", "right"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", "/.", "right"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", "AA_", "}"}], ",", RowBox[{"{", RowBox[{"fX_", ",", "fY_", ",", "fZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", " ", "/.", "left"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", "/.", "left"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fX", "/.", "left"}], ",", RowBox[{"fY", "/.", "left"}], ",", RowBox[{"fZ", "/.", "left"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"BAR", ",", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", " ", "/.", "right"}], "}"}], ",", RowBox[{"{", RowBox[{"AA", "/.", "right"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fX", "/.", "right"}], ",", RowBox[{"fY", "/.", "right"}], ",", RowBox[{"fZ", "/.", "right"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "AA_", "}"}], ",", RowBox[{"{", "ff_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EE", " ", "/.", "left"}], ",", RowBox[{"\[Rho]\[Rho]", "/.", "left"}]}], "}"}], ",", RowBox[{"{", RowBox[{"AA", "/.", "left"}], "}"}], ",", RowBox[{"{", RowBox[{"ff", "/.", "left"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"BAR", ",", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EE", " ", "/.", "right"}], ",", RowBox[{"\[Rho]\[Rho]", "/.", "right"}]}], "}"}], ",", RowBox[{"{", RowBox[{"AA", "/.", "right"}], "}"}], ",", RowBox[{"{", RowBox[{"ff", "/.", "right"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", " ", "/.", "left"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"AA", "/.", "left"}], ",", "iy"}], " ", "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fx", "/.", "left"}], ",", RowBox[{"fy", "/.", "left"}], ",", RowBox[{"fz", "/.", "left"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", " ", "/.", "right"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"AA", "/.", "right"}], ",", "iy"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fx", "/.", "right"}], ",", RowBox[{"fy", "/.", "right"}], ",", RowBox[{"fz", "/.", "right"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Alpha]\[Alpha]_", ",", "kk_"}], "}"}], ",", RowBox[{"{", "AA_", "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "ss_", ",", "\[CurlyTheta]\[CurlyTheta]_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EE", " ", "/.", "left"}], ",", RowBox[{"\[Alpha]\[Alpha]", "/.", "left"}], ",", RowBox[{"kk", "/.", "left"}]}], " ", "}"}], ",", RowBox[{"{", RowBox[{"AA", "/.", "left"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fx", "/.", "left"}], ",", RowBox[{"ss", "/.", "left"}], ",", RowBox[{"\[CurlyTheta]\[CurlyTheta]", "/.", "left"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODET", "[", RowBox[{"BAR", ",", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EE", " ", "/.", "right"}], ",", RowBox[{"\[Alpha]\[Alpha]", "/.", "right"}], ",", RowBox[{"kk", "/.", "right"}]}], " ", "}"}], ",", RowBox[{"{", RowBox[{"AA", "/.", "right"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fx", "/.", "right"}], ",", RowBox[{"ss", "/.", "right"}], ",", RowBox[{"\[CurlyTheta]\[CurlyTheta]", "/.", "right"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "GG_", "}"}], ",", RowBox[{"{", "JJ_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"GG", "/.", "left"}], "}"}], ",", RowBox[{"{", RowBox[{"JJ", "/.", "left"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"BAR", ",", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"GG", " ", "/.", "right"}], "}"}], ",", RowBox[{"{", RowBox[{"JJ", "/.", "right"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "GG_", "}"}], ",", RowBox[{"{", "JJ_", "}"}], ",", RowBox[{"{", RowBox[{"mX_", ",", "mY_", ",", "mZ_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"GG", "/.", "left"}], "}"}], ",", RowBox[{"{", RowBox[{"JJ", "/.", "left"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"mX", "/.", "left"}], ",", RowBox[{"mY", "/.", "left"}], ",", RowBox[{"mZ", "/.", "left"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"BAR", ",", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"GG", " ", "/.", "right"}], "}"}], ",", RowBox[{"{", RowBox[{"JJ", "/.", "right"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"mX", "/.", "right"}], ",", RowBox[{"mY", "/.", "right"}], ",", RowBox[{"mZ", "/.", "right"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "JJ_", "}"}], ",", RowBox[{"{", "mm_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"GG", " ", "/.", "left"}], ",", RowBox[{"\[Rho]\[Rho]", "/.", "left"}]}], "}"}], ",", RowBox[{"{", RowBox[{"JJ", "/.", "left"}], "}"}], ",", RowBox[{"{", RowBox[{"mm", "/.", "left"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"BAR", ",", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"GG", " ", "/.", "right"}], ",", RowBox[{"\[Rho]\[Rho]", "/.", "right"}]}], "}"}], ",", RowBox[{"{", RowBox[{"JJ", "/.", "right"}], "}"}], ",", RowBox[{"{", RowBox[{"mm", "/.", "right"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", "\[Kappa]0_"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE_", "}"}], ",", RowBox[{"{", RowBox[{"Ln_", ",", "Lb_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", "\[Kappa]0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE", "}"}], ",", RowBox[{"{", RowBox[{"Ln", " ", ",", "Lb"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", "\[Kappa]0"}], "}"}], ",", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", "\[Kappa]0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE", "}"}], ",", RowBox[{"{", RowBox[{"Ln", ",", "Lb"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"BEAM", ",", "pro_", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", "pro", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", "pro", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EE", " ", "/.", "left"}], ",", RowBox[{"GG", " ", "/.", "left"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"AA", " ", "/.", "left"}], ",", RowBox[{"Iyy", " ", "/.", "left"}], ",", RowBox[{"Izz", " ", "/.", "left"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fx", " ", "/.", "left"}], ",", RowBox[{"fy", " ", "/.", "left"}], ",", RowBox[{"fz", " ", "/.", "left"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EE", " ", "/.", "right"}], ",", RowBox[{"GG", " ", "/.", "right"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"AA", " ", "/.", "right"}], ",", RowBox[{"Iyy", " ", "/.", "right"}], ",", RowBox[{"Izz", " ", "/.", "right"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fx", " ", "/.", "right"}], ",", RowBox[{"fy", " ", "/.", "right"}], ",", RowBox[{"fz", " ", "/.", "right"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "Ip_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EE", " ", "/.", "left"}], ",", RowBox[{"GG", " ", "/.", "left"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"AA", " ", "/.", "left"}], ",", RowBox[{"Iyy", " ", "/.", "left"}], ",", RowBox[{"Izz", " ", "/.", "left"}], ",", "Ip"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fx", " ", "/.", "left"}], ",", RowBox[{"fy", " ", "/.", "left"}], ",", RowBox[{"fz", " ", "/.", "left"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EE", " ", "/.", "right"}], ",", RowBox[{"GG", " ", "/.", "right"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"AA", " ", "/.", "right"}], ",", RowBox[{"Iyy", " ", "/.", "right"}], ",", RowBox[{"Izz", " ", "/.", "right"}], ",", "Ip"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fx", " ", "/.", "right"}], ",", RowBox[{"fy", " ", "/.", "right"}], ",", RowBox[{"fz", " ", "/.", "right"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EE", " ", "/.", "left"}], ",", RowBox[{"GG", " ", "/.", "left"}], ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"AA", " ", "/.", "left"}], ",", RowBox[{"Iyy", " ", "/.", "left"}], ",", RowBox[{"Izz", " ", "/.", "left"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fx", " ", "/.", "left"}], ",", RowBox[{"fy", " ", "/.", "left"}], ",", RowBox[{"fz", " ", "/.", "left"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EE", " ", "/.", "right"}], ",", RowBox[{"GG", " ", "/.", "right"}], ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"AA", " ", "/.", "right"}], ",", RowBox[{"Iyy", " ", "/.", "right"}], ",", RowBox[{"Izz", " ", "/.", "right"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fx", " ", "/.", "right"}], ",", RowBox[{"fy", " ", "/.", "right"}], ",", RowBox[{"fz", " ", "/.", "right"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Iyy_", ",", "Izz_", ",", "Ip_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EE", " ", "/.", "left"}], ",", RowBox[{"GG", " ", "/.", "left"}], ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"AA", " ", "/.", "left"}], ",", RowBox[{"Iyy", " ", "/.", "left"}], ",", RowBox[{"Izz", " ", "/.", "left"}], ",", "Ip"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fx", " ", "/.", "left"}], ",", RowBox[{"fy", " ", "/.", "left"}], ",", RowBox[{"fz", " ", "/.", "left"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"EE", " ", "/.", "right"}], ",", RowBox[{"GG", " ", "/.", "right"}], ",", "\[Rho]\[Rho]"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"AA", " ", "/.", "right"}], ",", RowBox[{"Iyy", " ", "/.", "right"}], ",", RowBox[{"Izz", " ", "/.", "right"}], ",", "Ip"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"fx", " ", "/.", "right"}], ",", RowBox[{"fy", " ", "/.", "right"}], ",", RowBox[{"fz", " ", "/.", "right"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"TWODIM", ",", "mat_", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"TWODIM", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n4", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"TWODIM", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n2", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"TWODIM", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n6", ",", "n5", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"TWODIM", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n5", ",", "n6"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"PLANE", ",", "mat_", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n4", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n2", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n6", ",", "n5", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n5", ",", "n6"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"PLANE", ",", "mat_", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n4", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n2", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n6", ",", "n5", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n5", ",", "n6"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"SOLID1", ",", "mat_", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"SOLID1", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n4", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID1", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n2", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID1", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n6", ",", "n5", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID1", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n5", ",", "n6"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"SOLID2", ",", "mat_", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"SOLID2", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n4", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID2", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n2", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID2", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n6", ",", "n5", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID2", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n5", ",", "n6"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"EMS", ",", "mat_", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"EMS", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n8", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n3"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n9", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"EMS", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n5", ",", "n2", ",", "n9", ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n4"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"EMS", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n8", ",", "n9", ",", "n3", ",", RowBox[{"n7", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"EMS", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n9", ",", "n6", ",", "n7", ",", "n4"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"PLANE", ",", "mat_", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"n9", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n8", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n4"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n5", ",", "n2", ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], ",", "n9"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n8", ",", "n9", ",", RowBox[{"n7", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}], "]"}]}], ",", "n4"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n9", ",", "n6", ",", "n3", ",", "n7"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"PLATE", ",", "mat_", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLATE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n4", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLATE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n2", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLATE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n6", ",", "n5", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLATE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n5", ",", "n6"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"PLATE", ",", "mat_", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLATE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n9", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n8", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n4"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLATE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n5", ",", "n2", ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], ",", "n9"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLATE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n8", ",", "n9", ",", RowBox[{"n7", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}], "]"}]}], ",", "n4"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLATE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n9", ",", "n6", ",", "n3", ",", "n7"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"PLATE", ",", "mat_", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], ",", RowBox[{"{", RowBox[{"n3_", ",", "n4_"}], "}"}]}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLATE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"n8", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n3"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n9", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}], "]"}]}]}], "}"}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLATE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n5", ",", "n2"}], "}"}], ",", RowBox[{"{", RowBox[{"n9", ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n4"}], "}"}], "]"}], "]"}]}]}], "}"}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLATE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n8", ",", "n9"}], "}"}], ",", RowBox[{"{", RowBox[{"n3", ",", RowBox[{"n7", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}], "]"}]}]}], "}"}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLATE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n9", ",", "n6"}], "}"}], ",", RowBox[{"{", RowBox[{"n7", ",", "n4"}], "}"}]}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"SOLID", ",", "mat_", ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{ RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n8", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n4"}], "}"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"n7", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n3"}], "}"}], "]"}], "]"}]}], ",", "n1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n5", ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"n9", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n4"}], "}"}], "]"}], "]"}]}], ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n8", ",", "n9", ",", RowBox[{"n10", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}], "]"}]}], ",", "n4"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n7", ",", "n10", ",", "n6", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n8", ",", "n6", ",", "n10", ",", "n9"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n8", ",", "n6", ",", "n5", ",", "n9"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n8", ",", "n6", ",", "n10", ",", "n7"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n8", ",", "n6", ",", "n5", ",", "n7"}], "}"}], "]"}]}], "}"}]}], "\[IndentingNewLine]", " ", "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"SOLID", ",", "mat_", ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "n1_", ",", "n2_", ",", "n3_", ",", "n4_", ",", "n5_", ",", "n6_", ",", "n7_", ",", "n8_"}], "}"}], "]"}]}], "}"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n9", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"n13", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n12", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n4"}], "}"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"n14", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n5"}], "}"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"n18", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n6", ",", "n5"}], "}"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"n22", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{ "n1", ",", "n2", ",", "n3", ",", "n4", ",", "n5", ",", "n6", ",", "n7", ",", "n8"}], "}"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"n21", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n4", ",", "n5", ",", "n8"}], "}"}], "]"}], "]"}]}]}], " ", "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{"n9", ",", "n2", ",", "\[IndentingNewLine]", RowBox[{"n10", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}], ",", "n13", ",", "n18", ",", "\[IndentingNewLine]", RowBox[{"n15", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n6"}], "}"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"n19", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3", ",", "n7", ",", "n6"}], "}"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", "n22"}], " ", "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{"n13", ",", "n10", ",", "n3", ",", "\[IndentingNewLine]", RowBox[{"n11", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}], "]"}]}], ",", "n22", ",", "n19", ",", "\[IndentingNewLine]", RowBox[{"n16", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n7"}], "}"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"n20", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n4", ",", "n3", ",", "n7", ",", "n8"}], "}"}], "]"}], "]"}]}]}], " ", "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "n12", ",", "n13", ",", "n11", ",", "n4", ",", "\[IndentingNewLine]", "n21", ",", "n22", ",", "n20", ",", "\[IndentingNewLine]", RowBox[{"n17", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n4", ",", "n8"}], "}"}], "]"}], "]"}]}]}], " ", "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "n14", ",", "n18", ",", "n22", ",", "n21", ",", "n5", ",", "\[IndentingNewLine]", RowBox[{"n23", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n6", ",", "n5"}], "}"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"n27", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n5", ",", "n6", ",", "n7", ",", "n8"}], "}"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"n26", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n5", ",", "n8"}], "}"}], "]"}], "]"}]}]}], " ", "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "n18", ",", "n15", ",", "n19", ",", "n22", ",", "n23", ",", "n6", ",", "\[IndentingNewLine]", RowBox[{"n24", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n6", ",", "n7"}], "}"}], "]"}], "]"}]}], ",", "n27"}], " ", "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "n22", ",", "n19", ",", "n16", ",", "n20", ",", "n27", ",", "n24", ",", "n7", ",", "\[IndentingNewLine]", RowBox[{"n25", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n7", ",", "n8"}], "}"}], "]"}], "]"}]}]}], " ", "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", "mat", ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "n21", ",", "n22", ",", "n20", ",", "n17", ",", "n26", ",", "n27", ",", "n25", ",", "\[IndentingNewLine]", "n8"}], " ", "}"}], "]"}]}], "}"}]}], "\[IndentingNewLine]", " ", "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"if", " ", "nothing", " ", "applies"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REF", "[", RowBox[{"{", RowBox[{"typ_", ",", "mat_", ",", "nod_"}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{"{", RowBox[{"typ", ",", "mat", ",", "nod"}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REFINE", "[", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"funout", "=", "fun"}], ",", RowBox[{"eleout", "=", "ele"}], ",", "ii", ",", "rule", ",", "a1", ",", "a2", ",", "a3", ",", "a4", ",", "a5", ",", "a6", ",", "left", ",", "right"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "refinement", " ", "inherits", " ", "conditions", " ", "and", " ", "has", " ", "memory"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ii", " ", "=", RowBox[{ RowBox[{"Length", "[", "funout", "]"}], "+", "1"}]}], ";", "\[IndentingNewLine]", RowBox[{"Clear", "[", RowBox[{"NEWNODE", ",", "NEWNODET"}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"NEWNODET", "[", RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "]"}], ":=", RowBox[{ RowBox[{"NEWNODET", "[", RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], "]"}], "=", RowBox[{"CompoundExpression", "[", RowBox[{ RowBox[{"funout", "=", RowBox[{"Join", "[", RowBox[{"funout", ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "2"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", "ii", "]"}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]X", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", "ii", "]"}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", " ", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "4"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[CurlyTheta]", "[", "ii", "]"}]}], "]"}]}], "}"}], "}"}]}], "]"}]}], ";", RowBox[{"ii", "++"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "]"}], ":=", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], "]"}], "=", RowBox[{"CompoundExpression", "[", RowBox[{ RowBox[{"funout", "=", RowBox[{"Join", "[", RowBox[{"funout", ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "2"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", "ii", "]"}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]X", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", "ii", "]"}]}], "]"}]}], "}"}]}], "}"}], "}"}]}], "]"}]}], ";", RowBox[{"ii", "++"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"offset", "[", RowBox[{"\[Kappa]_", ",", "n1_", ",", "n2_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"r12", ",", "L"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"\[Kappa]", "\[Equal]", "0"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"r12", "=", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"L", "=", RowBox[{"Sqrt", "[", RowBox[{"r12", ".", "r12"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}], StyleBox["\[Cross]", "OperatorCharacter"], "r12"}]}], "/", "L"}], "*", RowBox[{"(", RowBox[{ RowBox[{"1.", "/", "\[Kappa]"}], "-", RowBox[{"Sqrt", "[", RowBox[{ RowBox[{"1.", "/", RowBox[{"\[Kappa]", "^", "2"}]}], "-", RowBox[{ RowBox[{"L", "^", "2"}], "/", "4"}]}], "]"}]}], ")"}]}]}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", "\[Kappa]_"}], "}"}], ",", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}]}], "]"}], ":=", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", "\[Kappa]"}], "}"}], ",", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}]}], "]"}], "=", RowBox[{"CompoundExpression", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"funout", "=", RowBox[{"Join", "[", RowBox[{"funout", ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "2"}], "+", RowBox[{"offset", "[", RowBox[{"\[Kappa]", ",", "n1", ",", "n2"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", RowBox[{"ii", ",", "0"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{"ii", ",", "0"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"ii", ",", "0"}], "]"}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", RowBox[{"ii", ",", "1"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{"ii", ",", "1"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"ii", ",", "1"}], "]"}]}], "]"}]}], "}"}]}], " ", "}"}], "}"}]}], "]"}]}], ";", RowBox[{"ii", "++"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1_", ",", "a2_", ",", "a3_", ",", "a4_"}], "}"}], "]"}], ":=", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4"}], "}"}], "]"}], "=", RowBox[{"CompoundExpression", "[", RowBox[{ RowBox[{"funout", "=", RowBox[{"Join", "[", RowBox[{"funout", ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}], "+", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a3", ",", "1"}], "]"}], "]"}], "+", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a4", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "4"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", "ii", "]"}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]X", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", "ii", "]"}]}], "]"}]}], "}"}]}], " ", " ", "}"}], "}"}]}], "]"}]}], ";", RowBox[{"ii", "++"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{ "a1_", ",", "a2_", ",", "a3_", ",", "a4_", ",", "a5_", ",", "a6_", ",", "a7_", ",", "a8_"}], "}"}], "]"}], ":=", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{ "a1", ",", "a2", ",", "a3", ",", "a4", ",", "a5", ",", "a6", ",", "a7", ",", "a8"}], "}"}], "]"}], "=", RowBox[{"CompoundExpression", "[", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{ "a1", ",", "a2", ",", "a3", ",", "a4", ",", "a5", ",", "a6", ",", "a7", ",", "a8"}], "}"}]}], ";", RowBox[{"funout", "=", RowBox[{"Join", "[", RowBox[{"funout", ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"nl", ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", "ii", "]"}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]X", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"nl", ",", "3", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", "ii", "]"}]}], "]"}]}], "}"}]}], " ", " ", "}"}], "}"}]}], "]"}]}], ";", RowBox[{"ii", "++"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}]}], "]"}], ":=", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a2", ",", "a1"}], "}"}], "]"}], "=", RowBox[{"CompoundExpression", "[", RowBox[{ RowBox[{"funout", "=", RowBox[{"Join", "[", RowBox[{"funout", ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "2"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "ii", "]"}], "*", RowBox[{"Simplify", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "\[IndentingNewLine]", RowBox[{"Sqrt", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}]}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}]}], ")"}]}], "]"}]}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], "}"}]}], "]"}]}], ";", RowBox[{"ii", "++"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"NEWNODET", "[", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}]}], "]"}], ":=", RowBox[{ RowBox[{"NEWNODET", "[", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{"a2", ",", "a1"}], "}"}]}], "]"}], "=", RowBox[{"CompoundExpression", "[", RowBox[{ RowBox[{"funout", "=", RowBox[{"Join", "[", RowBox[{"funout", ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "2"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "ii", "]"}], "*", RowBox[{"Simplify", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "\[IndentingNewLine]", RowBox[{"Sqrt", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}]}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}]}], ")"}]}], "]"}]}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", " ", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "4"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[CurlyTheta]", "[", "ii", "]"}]}], "]"}]}], "}"}], "}"}]}], "]"}]}], ";", RowBox[{"ii", "++"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"DO", " ", "IT"}], "*)"}], "\[IndentingNewLine]", RowBox[{"eleout", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"REF", "[", "#", "]"}], "&"}], ",", "eleout"}], "]"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"eleout", ",", "funout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REFINE", "[", RowBox[{"{", RowBox[{"ele_", ",", "fun_", ",", "lnk_"}], "}"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"funout", "=", "fun"}], ",", RowBox[{"eleout", "=", "ele"}], ",", RowBox[{"lnkout", "=", "lnk"}], ",", "ii", ",", "rule", ",", "a1", ",", "a2", ",", "a3", ",", "a4", ",", "a5", ",", "a6", ",", "left", ",", "right"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "refinement", " ", "inherits", " ", "conditions", " ", "and", " ", "has", " ", "memory"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ii", " ", "=", RowBox[{ RowBox[{"Length", "[", "funout", "]"}], "+", "1"}]}], ";", "\[IndentingNewLine]", RowBox[{"Clear", "[", "NEWNODE", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "]"}], ":=", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], "]"}], "=", RowBox[{"CompoundExpression", "[", RowBox[{ RowBox[{"funout", "=", RowBox[{"Join", "[", RowBox[{"funout", ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "2"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", "ii", "]"}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]X", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", "ii", "]"}]}], "]"}]}], "}"}]}], "}"}], "}"}]}], "]"}]}], ";", RowBox[{"ii", "++"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}]}], "]"}], ":=", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a2", ",", "a1"}], "}"}], "]"}], "=", RowBox[{"CompoundExpression", "[", RowBox[{ RowBox[{"funout", "=", RowBox[{"Join", "[", RowBox[{"funout", ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "2"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"ux", "[", "ii", "]"}], "*", RowBox[{"Simplify", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "\[IndentingNewLine]", RowBox[{"Sqrt", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}]}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}]}], ")"}]}], "]"}]}], ",", RowBox[{"L", ">", "0"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], "}"}]}], "]"}]}], ";", RowBox[{"ii", "++"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"driven", " ", "by", " ", "this"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"rule", ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", "mat_", ",", RowBox[{"Triangle", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], "\[RuleDelayed]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Triangle", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n4", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Triangle", "[", RowBox[{"{", RowBox[{"n4", ",", "n2", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Triangle", "[", RowBox[{"{", RowBox[{"n6", ",", "n5", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Triangle", "[", RowBox[{"{", RowBox[{"n4", ",", "n5", ",", "n6"}], "}"}], "]"}]}], "}"}]}], "}"}]}], "\[IndentingNewLine]", "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"eleout", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"(", RowBox[{"eleout", " ", "/.", " ", "rule"}], ")"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"eleout", ",", "funout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"REFINE", "[", RowBox[{"{", RowBox[{"ele_", ",", "fun_", ",", "elnk_"}], "}"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"funout", "=", "fun"}], ",", RowBox[{"eleout", "=", "ele"}], ",", RowBox[{"elnkout", "=", "elnk"}], ",", "ii", ",", "rule", ",", "a1", ",", "a2", ",", "a3", ",", "a4", ",", "a5", ",", "a6", ",", "left", ",", "right", ",", "NEWNODE"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "refinement", " ", "inherits", " ", "conditions", " ", "and", " ", "has", " ", "memory"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ii", " ", "=", RowBox[{ RowBox[{"Length", "[", "funout", "]"}], "+", "1"}]}], ";", "\[IndentingNewLine]", RowBox[{"Clear", "[", "NEWNODE", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "]"}], ":=", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], "]"}], "=", RowBox[{"CompoundExpression", "[", RowBox[{ RowBox[{"funout", "=", RowBox[{"Join", "[", RowBox[{"funout", ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "2"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", "ii", "]"}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]X", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", "ii", "]"}]}], "]"}]}], "}"}]}], "}"}], "}"}]}], "]"}]}], ";", RowBox[{"ii", "++"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"driven", " ", "by", " ", "this"}], "*)"}], "\[IndentingNewLine]", RowBox[{"rule", ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", "mat_", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], "\[RuleDelayed]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n4", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n2", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n6", ",", "n5", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n5", ",", "n6"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"FACE", ",", "mat_", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], "\[RuleDelayed]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"FACE", ",", "mat", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n3", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FACE", ",", "mat", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n3", ",", "n2"}], "}"}], "]"}]}], "}"}]}], "}"}]}]}], "\[IndentingNewLine]", "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "refined", " ", "edges", " ", "should", " ", "be", " ", "removed"}], "*)"}], "\[IndentingNewLine]", RowBox[{"elnkout", "=", RowBox[{"DeleteDuplicates", "[", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"#", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"#", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"#", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"#", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}]}], "}"}]}], "}"}]}], "}"}], "&"}], ",", "elnk"}], "]"}], ",", "1"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"eleout", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"(", RowBox[{"eleout", " ", "/.", " ", "rule"}], ")"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"eleout", ",", "funout", ",", "elnkout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "*)"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.443930973126174*^9, {3.4771023549018*^9, 3.4771023808445997`*^9}, { 3.4771024577682*^9, 3.4771025046618*^9}, {3.4771063565654*^9, 3.4771063705898*^9}, 3.4771089762209997`*^9, 3.477109006645*^9, { 3.4771109395810003`*^9, 3.4771109526226*^9}, {3.477110989427*^9, 3.4771110302522*^9}, {3.4771110800372*^9, 3.4771111191308002`*^9}, { 3.4771220486066*^9, 3.4771220663286*^9}, {3.4771317865394*^9, 3.4771318192214003`*^9}, {3.4771323345362*^9, 3.477132377639*^9}, { 3.630489883760623*^9, 3.630489885414226*^9}, {3.631409232246135*^9, 3.631409318077486*^9}, {3.6314094294772816`*^9, 3.631409430304083*^9}, { 3.6314095931215687`*^9, 3.6314095963195744`*^9}, {3.6314105089523773`*^9, 3.631410515504389*^9}, 3.631435133305333*^9, {3.631435355203025*^9, 3.6314353561500793`*^9}, 3.6314356018121305`*^9, 3.631435754368856*^9, 3.631435796315255*^9, {3.63143606319652*^9, 3.631436069549884*^9}, { 3.6347884698816414`*^9, 3.63478847685104*^9}, {3.6347954098385844`*^9, 3.6347954141598315`*^9}, {3.6347956603329115`*^9, 3.634795675947805*^9}, { 3.634796217815798*^9, 3.6347962287334223`*^9}, {3.6347962930030985`*^9, 3.6347963097820582`*^9}, {3.63479634495407*^9, 3.6347963538665795`*^9}, { 3.6347967044436316`*^9, 3.6347967222076473`*^9}, {3.6348910182399282`*^9, 3.6348910703229065`*^9}, {3.634891202082443*^9, 3.63489120569665*^9}, { 3.635129073304618*^9, 3.6351290927607307`*^9}, {3.6351291514160852`*^9, 3.6351291562713633`*^9}, {3.6351296027379*^9, 3.635129640630067*^9}, { 3.6351296766311264`*^9, 3.6351296770091476`*^9}, {3.635133864772954*^9, 3.6351340703167105`*^9}, {3.635134178738912*^9, 3.635134204883407*^9}, { 3.6351532590142465`*^9, 3.6351534908115044`*^9}, {3.6353108694909534`*^9, 3.635310875829316*^9}, {3.657768370048919*^9, 3.6577683714841213`*^9}, { 3.6853593982958508`*^9, 3.6853593994858527`*^9}, 3.685359462505941*^9, { 3.685359541326051*^9, 3.685359573806097*^9}, {3.6874387445294027`*^9, 3.687438822019511*^9}, 3.6874389450596833`*^9, {3.6874389956197543`*^9, 3.6874390405998173`*^9}, {3.6874391238499336`*^9, 3.6874391937200317`*^9}, {3.6874392244700747`*^9, 3.687439453750396*^9}, { 3.687439572800562*^9, 3.68743958546058*^9}, {3.68743962102063*^9, 3.687439653600675*^9}, {3.6874397535808153`*^9, 3.6874397667108335`*^9}, 3.6874457948947306`*^9, {3.6874461481952252`*^9, 3.6874461564952374`*^9}, { 3.6876686346644025`*^9, 3.6876686478844213`*^9}, {3.6876686911644816`*^9, 3.687668823124666*^9}, {3.687668960604859*^9, 3.6876691302750964`*^9}, { 3.687669356755413*^9, 3.6876695631957026`*^9}, {3.68766976165598*^9, 3.687669770715993*^9}, {3.6876724948642445`*^9, 3.687672495474246*^9}, { 3.687672580794365*^9, 3.6876727153745537`*^9}, {3.687672853854748*^9, 3.6876729332848587`*^9}, {3.6876729722949133`*^9, 3.6876731124151096`*^9}, {3.687673280685345*^9, 3.687673411335528*^9}, 3.6879313344746327`*^9, {3.687931387314707*^9, 3.6879314004147253`*^9}, { 3.6879314569548044`*^9, 3.6879314600748086`*^9}, {3.687931618845031*^9, 3.687931690255131*^9}, {3.687931744255206*^9, 3.6879317511352158`*^9}, { 3.6879317991852837`*^9, 3.6879318101552987`*^9}, {3.6879318528753586`*^9, 3.687931875785391*^9}, {3.6880321738474593`*^9, 3.688032324857671*^9}, { 3.68811073769691*^9, 3.68811083105704*^9}, {3.688182194807842*^9, 3.6881822090088615`*^9}, {3.6881823158700113`*^9, 3.6881824932602596`*^9}, {3.6881827603406334`*^9, 3.688182807210699*^9}, { 3.6881829158708515`*^9, 3.68818292930087*^9}, {3.688182999800969*^9, 3.6881831324711547`*^9}, {3.688183628661849*^9, 3.6881836750819144`*^9}, { 3.688211059016615*^9, 3.6882111198466997`*^9}, {3.6882111896067977`*^9, 3.6882112272568502`*^9}, {3.688211687127494*^9, 3.688211814657673*^9}, { 3.688211854527728*^9, 3.6882118603977365`*^9}, {3.6882139698004313`*^9, 3.68821399050046*^9}, {3.68821420020687*^9, 3.688214201756872*^9}, 3.6882144390772047`*^9, {3.6882146560475082`*^9, 3.6882146684575257`*^9}, { 3.688214751567642*^9, 3.6882147680976653`*^9}, {3.688214804297716*^9, 3.6882149595979333`*^9}, {3.6882150203480186`*^9, 3.6882152133382883`*^9}, {3.6882152437383313`*^9, 3.688215312948428*^9}, 3.6882155446087523`*^9, {3.688540867416464*^9, 3.688540868276465*^9}, { 3.688540923456542*^9, 3.688540987616632*^9}, {3.689509628603777*^9, 3.6895096840119457`*^9}, 3.6895097148397093`*^9, {3.689568676097738*^9, 3.689568771827872*^9}, {3.689737582567273*^9, 3.689737610517312*^9}, { 3.689738148338065*^9, 3.689738254678214*^9}, {3.689738292788267*^9, 3.689738346768343*^9}, {3.6897387257888737`*^9, 3.6897388179090023`*^9}, { 3.6898585271206756`*^9, 3.689858545170701*^9}, {3.6898585824607525`*^9, 3.689858769851015*^9}, {3.6940970096156654`*^9, 3.6940970747057567`*^9}, 3.6941413988145113`*^9, {3.694354094868929*^9, 3.6943541832790527`*^9}, { 3.694920239046096*^9, 3.694920319576208*^9}, {3.6949203962063155`*^9, 3.694920412426338*^9}, {3.6949204882764444`*^9, 3.6949204937164516`*^9}, 3.6949205606465454`*^9, {3.695100444594348*^9, 3.6951004570843654`*^9}, { 3.6973395634474907`*^9, 3.69733958428752*^9}, {3.697985422771953*^9, 3.6979855230120935`*^9}, {3.697985573722165*^9, 3.697985597992199*^9}, { 3.6979856429622617`*^9, 3.6979856711723013`*^9}, {3.7244643325478783`*^9, 3.724464348643357*^9}, {3.724467403856756*^9, 3.724467437838467*^9}, { 3.7244675479335804`*^9, 3.724467563230343*^9}, 3.7244676966368866`*^9, { 3.724467772264612*^9, 3.724467824163081*^9}, {3.7244678625415535`*^9, 3.724467863396864*^9}, {3.724468018783759*^9, 3.72446802144991*^9}, { 3.7244681559004545`*^9, 3.7244681850540376`*^9}, {3.724468459327367*^9, 3.724468483652465*^9}, {3.7244686219080153`*^9, 3.7244687024486265`*^9}, { 3.7244712391235456`*^9, 3.7244712430734224`*^9}, {3.7244712821065245`*^9, 3.724471282307459*^9}, {3.7244718283139167`*^9, 3.724471852982109*^9}, { 3.7245109260422964`*^9, 3.7245109717411103`*^9}, {3.7254180257070103`*^9, 3.725418132591786*^9}, {3.725418186497287*^9, 3.725418198564393*^9}, { 3.725418240702896*^9, 3.7254182427078333`*^9}, 3.7254182729821267`*^9, { 3.7254183742147875`*^9, 3.72541838162965*^9}, {3.7254184135842233`*^9, 3.7254184150237846`*^9}, {3.725418877464322*^9, 3.7254189569953265`*^9}, { 3.725418994143058*^9, 3.725419023781932*^9}, {3.7254193126441193`*^9, 3.725419396185589*^9}, {3.725432214366968*^9, 3.725432235836476*^9}, { 3.7254322894678383`*^9, 3.725432377695853*^9}, {3.726401253407773*^9, 3.7264012633218203`*^9}, {3.726401405512204*^9, 3.7264014071162825`*^9}, { 3.7264014439323297`*^9, 3.7264014462981124`*^9}, {3.726401485648699*^9, 3.7264016429140606`*^9}, {3.726401682872032*^9, 3.726401718837957*^9}, { 3.726401899357152*^9, 3.7264019010212574`*^9}, {3.7264019889732013`*^9, 3.726401991903804*^9}, {3.7264021595991826`*^9, 3.7264021616913195`*^9}, { 3.726402447890601*^9, 3.726402463475356*^9}, {3.747040699533342*^9, 3.7470408363290567`*^9}, {3.7471061663693695`*^9, 3.747106214420479*^9}, { 3.7471067469638214`*^9, 3.747106834372692*^9}, {3.7471068959871335`*^9, 3.747106915079779*^9}, {3.7471069588898473`*^9, 3.747106998742816*^9}, 3.747107044736511*^9, {3.747107087544964*^9, 3.7471070893575435`*^9}, { 3.7471138002489843`*^9, 3.747113811418234*^9}, {3.7471138500028563`*^9, 3.747113892211589*^9}, 3.747114310142033*^9, {3.7471143424625273`*^9, 3.747114343868453*^9}, {3.7471148744458303`*^9, 3.747114931572899*^9}, { 3.74711503534515*^9, 3.747115041218787*^9}, {3.7471156330947733`*^9, 3.7471156387028475`*^9}, {3.747116431240279*^9, 3.7471164335522423`*^9}, { 3.7471164808222904`*^9, 3.7471166104321785`*^9}, {3.747116647876696*^9, 3.7471167102835293`*^9}, {3.74865997476248*^9, 3.7486600101981816`*^9}, { 3.748660042393119*^9, 3.748660069138746*^9}, {3.748660177148834*^9, 3.748660251952998*^9}, {3.7486604981713724`*^9, 3.748660508798976*^9}, { 3.7486929231374454`*^9, 3.7486929342382526`*^9}, {3.7486929737776747`*^9, 3.7486929903337507`*^9}, {3.7486930264117804`*^9, 3.7486931799453707`*^9}, {3.748693249361241*^9, 3.7486932724173203`*^9}, 3.7486933276281357`*^9, 3.7486939237519407`*^9, {3.7486939698417687`*^9, 3.7486939700127883`*^9}, {3.748694008103215*^9, 3.7486940757142344`*^9}, { 3.7486942326282196`*^9, 3.748694304005413*^9}, {3.748695188924658*^9, 3.748695190701332*^9}, {3.7486952252639275`*^9, 3.7486953104760585`*^9}, { 3.748695384723056*^9, 3.748695811151685*^9}, {3.7486958766029434`*^9, 3.7486959097256002`*^9}, {3.7486964229653544`*^9, 3.7486964578684864`*^9}, 3.7487454821763644`*^9, {3.754056041592442*^9, 3.754056060140006*^9}, { 3.754056347029888*^9, 3.754056351327733*^9}, {3.754056854382514*^9, 3.754056862089791*^9}, {3.7540569630968127`*^9, 3.7540569674225426`*^9}, { 3.7540570759551015`*^9, 3.7540570801772118`*^9}, {3.754057135076915*^9, 3.754057152630065*^9}, {3.7540571929041653`*^9, 3.754057236529367*^9}, { 3.754057397662035*^9, 3.7540574231277227`*^9}, {3.7540574560189123`*^9, 3.754057472695193*^9}, {3.754057518721182*^9, 3.754057583163235*^9}, 3.754057631189864*^9, {3.7540576696626444`*^9, 3.754057832330846*^9}, { 3.7540578903947163`*^9, 3.7540579289766736`*^9}, {3.7540580507949033`*^9, 3.7540580513826957`*^9}, {3.7540978904321117`*^9, 3.7540979191340885`*^9}, {3.7540979931579046`*^9, 3.7540979999909244`*^9}, {3.7540980363245296`*^9, 3.754098095196913*^9}, { 3.7540981279820137`*^9, 3.75409817510705*^9}, {3.7540983080840054`*^9, 3.7540983887416687`*^9}, {3.754098433086689*^9, 3.7540984487715254`*^9}, { 3.754098518107086*^9, 3.7540985418746586`*^9}, {3.7540985740895276`*^9, 3.7540985855956683`*^9}, {3.7540986329334645`*^9, 3.754098651832582*^9}, 3.754098694943287*^9, {3.7540987996641817`*^9, 3.7540988293199515`*^9}, { 3.754098922368672*^9, 3.754098946956335*^9}, {3.7541009656118875`*^9, 3.754100966064907*^9}, {3.7541260794470377`*^9, 3.754126112298939*^9}, { 3.7541261993178277`*^9, 3.7541263394250636`*^9}, {3.7541264153576813`*^9, 3.754126455276905*^9}, {3.7541264972202415`*^9, 3.754126628008542*^9}, { 3.7541266613158674`*^9, 3.754126719835323*^9}, 3.7541267961648273`*^9, { 3.754126828833903*^9, 3.754126890819979*^9}, {3.754126943227796*^9, 3.754127112269927*^9}, {3.7541271553116074`*^9, 3.7541271992360067`*^9}, { 3.754127253229822*^9, 3.754127273225658*^9}, {3.754127329226965*^9, 3.7541273643065696`*^9}, {3.7541277175880594`*^9, 3.754127721159455*^9}, { 3.754127900093892*^9, 3.754127900428954*^9}, {3.7555365688081875`*^9, 3.7555368169423947`*^9}, {3.7566194252966633`*^9, 3.756619503340211*^9}, { 3.7606073727611165`*^9, 3.7606074044677906`*^9}, {3.7639037635827665`*^9, 3.7639039669013567`*^9}, {3.7639040036658916`*^9, 3.7639040352749486`*^9}, {3.7639041491982164`*^9, 3.7639041498420076`*^9}, {3.7641295066295767`*^9, 3.7641296291063385`*^9}, 3.7641297671450467`*^9, {3.764129842917159*^9, 3.76412986403855*^9}, { 3.7641299539495287`*^9, 3.7641299638308244`*^9}, {3.764130242057335*^9, 3.764130264998592*^9}, {3.7641304121561837`*^9, 3.764130517277567*^9}, { 3.764905400658563*^9, 3.764905448073204*^9}, {3.7661917992707295`*^9, 3.7661918111029887`*^9}, {3.7661937058475633`*^9, 3.7661937308527126`*^9}, {3.766288732159727*^9, 3.7662887421574078`*^9}, 3.7741665150318885`*^9, {3.774166583333705*^9, 3.7741666346924067`*^9}, { 3.7741666777885046`*^9, 3.7741667276801615`*^9}, {3.7741681843844967`*^9, 3.774168277409542*^9}, {3.774237957645171*^9, 3.7742379961381702`*^9}, { 3.774238228752078*^9, 3.7742383203485446`*^9}, {3.7742384167748957`*^9, 3.774238438885627*^9}, {3.774238499096892*^9, 3.7742385555597315`*^9}, { 3.7742385931019473`*^9, 3.774238669464537*^9}, {3.774239332037335*^9, 3.774239458024664*^9}, {3.7742396127858567`*^9, 3.7742396524321165`*^9}, { 3.774239693440149*^9, 3.774239749194436*^9}, {3.774239781513965*^9, 3.7742399183443785`*^9}, {3.774239993088747*^9, 3.7742399984000196`*^9}, { 3.774240080591405*^9, 3.7742403502486305`*^9}, {3.7742403925474215`*^9, 3.7742406200754595`*^9}, {3.7742406536016474`*^9, 3.774240771836528*^9}, { 3.774240802985832*^9, 3.7742408207850018`*^9}, {3.7742408510511465`*^9, 3.7742409420304427`*^9}, 3.7742409770366917`*^9, {3.7742410127101192`*^9, 3.774241115672659*^9}, {3.7742411489763308`*^9, 3.7742412065999565`*^9}, { 3.7751895563614497`*^9, 3.775189557474781*^9}, {3.7751896076191764`*^9, 3.7751897799276996`*^9}, {3.777096408797056*^9, 3.7770964403195615`*^9}, { 3.777096485036745*^9, 3.7770965029912896`*^9}, {3.7956770978646717`*^9, 3.7956772181619654`*^9}, {3.8146735876267333`*^9, 3.814673589766639*^9}, { 3.8146739729339857`*^9, 3.8146740117645845`*^9}, {3.8146740671049843`*^9, 3.8146741049177666`*^9}, {3.8146741507745976`*^9, 3.8146741804277105`*^9}, {3.814674251422745*^9, 3.8146743106812353`*^9}, 3.814674726159151*^9, 3.814674968815707*^9, 3.814675018726674*^9, { 3.820993565028139*^9, 3.8209935658103247`*^9}, {3.8209936225592756`*^9, 3.8209937079555244`*^9}, {3.8209937406519527`*^9, 3.820993799726659*^9}, { 3.8449114536299915`*^9, 3.8449114597094784`*^9}, 3.844911489750399*^9, { 3.844911524811378*^9, 3.8449116115216727`*^9}, {3.8449116508263726`*^9, 3.8449118900319576`*^9}, {3.8449119415999355`*^9, 3.8449119426680517`*^9}, {3.8449119732971334`*^9, 3.8449120379798584`*^9}, {3.8449120825540514`*^9, 3.84491208370156*^9}, { 3.8449131304497786`*^9, 3.84491313620944*^9}, {3.844913600565547*^9, 3.844913684928097*^9}, {3.8449138096165752`*^9, 3.8449138945019174`*^9}, { 3.8469121733333035`*^9, 3.846912212029579*^9}, {3.846912263742777*^9, 3.846912264841491*^9}, {3.846913863799194*^9, 3.8469138819214835`*^9}}, CellLabel-> "In[229]:=",ExpressionUUID->"42d273ec-45a6-4362-beeb-c92eb51e9932"] }, Closed]], Cell[CellGroupData[{ Cell["ENRICH defs", "Subsection", CellChangeTimes->{{3.7555369693812027`*^9, 3.7555369706487265`*^9}, { 3.7594889422016716`*^9, 3.759488944733738*^9}},ExpressionUUID->"a68cf54f-3908-4207-b6c2-\ e2fb00414d9f"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"(*", RowBox[{"enrich", " ", "triangle"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"ENRICH", "[", RowBox[{"{", RowBox[{"crd_", ",", "nod_"}], "}"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"ii", ",", "FN", ",", "rule", ",", "crdnew", ",", "nodnew"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"crdnew", " ", "=", "crd"}], ";", " ", "\[IndentingNewLine]", RowBox[{"ii", "=", RowBox[{ RowBox[{"Length", "[", "crdnew", "]"}], "+", "1"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"FN", "[", RowBox[{"{", RowBox[{"a_", ",", "b_"}], "}"}], "]"}], ":=", RowBox[{ RowBox[{"FN", "[", RowBox[{"{", RowBox[{"b", ",", "a"}], "}"}], "]"}], "=", RowBox[{ RowBox[{"FN", "[", RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], "]"}], "=", RowBox[{"CompoundExpression", "[", RowBox[{ RowBox[{"crdnew", "=", RowBox[{"Append", "[", RowBox[{"crdnew", ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"crdnew", "[", RowBox[{"[", "a", "]"}], "]"}], "+", RowBox[{"crdnew", "[", RowBox[{"[", "b", "]"}], "]"}]}], ")"}], "/", "2"}]}], "]"}]}], ";", RowBox[{"ii", "++"}]}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"rule", ":=", RowBox[{ RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"a_", ",", "b_", ",", "c_"}], "}"}], "]"}], "\[RuleDelayed]", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", RowBox[{"FN", "[", RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], "]"}], ",", RowBox[{"FN", "[", RowBox[{"{", RowBox[{"b", ",", "c"}], "}"}], "]"}], ",", RowBox[{"FN", "[", RowBox[{"{", RowBox[{"c", ",", "a"}], "}"}], "]"}]}], "}"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"nodnew", "=", RowBox[{"nod", " ", "/.", " ", "rule"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"crdnew", ",", "nodnew"}], " ", "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ RowBox[{"ENRICH", "[", RowBox[{"{", RowBox[{"nod_", ",", "crd_"}], "}"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"FN", ",", "ii", ",", "rule", ",", "nodout", ",", "crdout"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"crdout", " ", "=", "crd"}], ";", RowBox[{"nodout", "=", "nod"}], ";", "\[IndentingNewLine]", RowBox[{"ii", "=", RowBox[{ RowBox[{"Length", "[", "crdout", "]"}], "+", "1"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"FN", "[", RowBox[{"{", RowBox[{"a_", ",", "b_"}], "}"}], "]"}], ":=", RowBox[{ RowBox[{"FN", "[", RowBox[{"{", RowBox[{"b", ",", "a"}], "}"}], "]"}], "=", RowBox[{"CompoundExpression", "[", RowBox[{ RowBox[{"crdout", "=", RowBox[{"Join", "[", RowBox[{"crdout", ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{"crdout", "[", RowBox[{"[", "a", "]"}], "]"}]}], "+", RowBox[{"crdout", "[", RowBox[{"[", "b", "]"}], "]"}]}], ")"}], "/", "3"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"crdout", "[", RowBox[{"[", "a", "]"}], "]"}], "+", RowBox[{"2", RowBox[{"crdout", "[", RowBox[{"[", "b", "]"}], "]"}]}]}], ")"}], "/", "3"}]}], "}"}]}], "]"}]}], ";", RowBox[{"{", RowBox[{ RowBox[{"ii", "++"}], ",", RowBox[{"ii", "++"}]}], "}"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"rule", ":=", RowBox[{ RowBox[{"Line", "[", RowBox[{"{", RowBox[{"a_", ",", "b_"}], "}"}], "]"}], "\[RuleDelayed]", RowBox[{"Line", "[", RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"a", ",", RowBox[{"FN", "[", RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], "]"}], ",", "b"}], "}"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"nodout", "=", RowBox[{"(", RowBox[{"nodout", "/.", " ", "rule"}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"nodout", ",", "crdout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], " ", "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ENRICH", "[", RowBox[{"{", RowBox[{"ele_", ",", "fun_", ",", "elnk_"}], "}"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"funout", "=", "fun"}], ",", RowBox[{"eleout", "=", "ele"}], ",", RowBox[{"elnkout", "=", "elnk"}], ",", "ii", ",", "rule", ",", "a1", ",", "a2", ",", "a3", ",", "a4", ",", "a5", ",", "a6", ",", "left", ",", "right", ",", "NEWNODE", ",", "edg", ",", "lnkrule"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "refinement", " ", "inherits", " ", "conditions", " ", "and", " ", "has", " ", "memory"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ii", " ", "=", RowBox[{ RowBox[{"Length", "[", "funout", "]"}], "+", "1"}]}], ";", "\[IndentingNewLine]", RowBox[{"Clear", "[", "NEWNODE", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "]"}], ":=", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], "]"}], "=", RowBox[{"CompoundExpression", "[", RowBox[{ RowBox[{"funout", "=", RowBox[{"Join", "[", RowBox[{"funout", ",", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"funout", "[", RowBox[{"[", RowBox[{"a2", ",", "1"}], "]"}], "]"}]}], ")"}], "/", "2"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"uX", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"uY", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "2", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"uZ", "[", "ii", "]"}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]X", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "2"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", "ii", "]"}]}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], ",", "NumberQ"}], "]"}], ",", RowBox[{"Mean", "[", RowBox[{"funout", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], ",", "3", ",", "3"}], "]"}], "]"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", "ii", "]"}]}], "]"}]}], "}"}]}], "}"}], "}"}]}], "]"}]}], ";", RowBox[{"ii", "++"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"driven", " ", "by", " ", "this"}], "*)"}], "\[IndentingNewLine]", RowBox[{"rule", ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", "mat_", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], "\[RuleDelayed]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", "mat", ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}], ",", "n2", ",", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}], ",", "n3", ",", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}], " ", "}"}], "]"}]}], "}"}], "}"}]}], "\[IndentingNewLine]", "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"elnkout", "=", RowBox[{"Join", "[", RowBox[{"elnk", ",", RowBox[{"DeleteDuplicates", "[", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"#", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"#", "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"#", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"#", "[", RowBox[{"[", RowBox[{"2", ",", "2"}], "]"}], "]"}]}], "}"}]}], "}"}]}], "}"}], "&"}], ",", "elnk"}], "]"}], ",", "1"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"eleout", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"(", RowBox[{"eleout", " ", "/.", " ", "rule"}], ")"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"eleout", ",", "funout", ",", "elnkout"}], "}"}], "]"}]}]}], "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.697985830982525*^9, 3.6979858329925275`*^9}, { 3.698414463543007*^9, 3.698414476843025*^9}, {3.6984148090934906`*^9, 3.6984148464035425`*^9}, {3.6984149699237156`*^9, 3.6984149730637197`*^9}, {3.698415039563813*^9, 3.6984150501038275`*^9}, { 3.698415130973941*^9, 3.6984151547039742`*^9}, {3.6984151857740173`*^9, 3.6984152096340513`*^9}, {3.6984152435240984`*^9, 3.698415255934116*^9}, 3.6984153434742384`*^9, {3.698415428614358*^9, 3.6984155528645315`*^9}, { 3.698415650334668*^9, 3.6984156957947316`*^9}, {3.6984971216481996`*^9, 3.6984971440082307`*^9}, {3.698497256408388*^9, 3.6984972586283913`*^9}, { 3.698497324188483*^9, 3.698497334418497*^9}, {3.6984974231086216`*^9, 3.69849751476875*^9}, {3.699107129086978*^9, 3.69910719511707*^9}, { 3.6994220214505434`*^9, 3.699422023570546*^9}, 3.6994224722011747`*^9, { 3.700296892213687*^9, 3.7002969404537544`*^9}, {3.700297153924053*^9, 3.700297154704054*^9}, {3.700298036047288*^9, 3.7002980600173216`*^9}, { 3.7002981562074566`*^9, 3.7002981872574997`*^9}, {3.7129791718840046`*^9, 3.7129791800257635`*^9}, {3.712979232875139*^9, 3.712979252111267*^9}, { 3.7129794197387886`*^9, 3.712979525828207*^9}, {3.7129795809903307`*^9, 3.712979590413209*^9}, {3.7129796478565316`*^9, 3.7129796809538364`*^9}, { 3.7129804673191423`*^9, 3.7129804748198795`*^9}, {3.712980610928114*^9, 3.712980622210312*^9}, {3.7129807144235544`*^9, 3.712980726627682*^9}, { 3.7129807741799045`*^9, 3.7129807809461966`*^9}, {3.7129811406876945`*^9, 3.7129811475474696`*^9}, 3.7129820013233137`*^9, 3.712982092129925*^9, { 3.7129824843276033`*^9, 3.7129825137528653`*^9}, {3.71298256627383*^9, 3.712982670207111*^9}, {3.7129827678737044`*^9, 3.712982856273471*^9}, { 3.7129829454548435`*^9, 3.712983022932089*^9}, {3.712983202325946*^9, 3.7129832392986393`*^9}, {3.712983366989815*^9, 3.712983388023601*^9}, { 3.7129834186205378`*^9, 3.7129835372579465`*^9}, {3.712983834758374*^9, 3.712983894467859*^9}, {3.7129840417335854`*^9, 3.712984063673375*^9}, 3.7129841515267477`*^9, {3.7129844471207294`*^9, 3.7129845210814824`*^9}, { 3.712984569477442*^9, 3.7129845739623785`*^9}, {3.712984641406767*^9, 3.712984648032766*^9}, {3.712985039824218*^9, 3.71298523890793*^9}, 3.7129853718321877`*^9, {3.7129854137561316`*^9, 3.7129854179438295`*^9}, { 3.712985449603707*^9, 3.7129854556822214`*^9}, {3.7129855201112256`*^9, 3.712985525768077*^9}, {3.712985625231479*^9, 3.7129857027712817`*^9}, { 3.7129857629336724`*^9, 3.712985769059338*^9}, {3.7129858314881444`*^9, 3.712985835050726*^9}, {3.7129860602431355`*^9, 3.712986064853248*^9}, { 3.7129862394499397`*^9, 3.712986242887823*^9}, {3.7129866297240076`*^9, 3.7129866397563314`*^9}, {3.71298680167982*^9, 3.712986860763974*^9}, { 3.7129869813135347`*^9, 3.7129869942367897`*^9}, {3.712987135892788*^9, 3.712987136814763*^9}, {3.7129950311602526`*^9, 3.7129950408646345`*^9}, { 3.7129950854940643`*^9, 3.712995128842733*^9}, {3.712995161470902*^9, 3.712995164018298*^9}, {3.712995233556699*^9, 3.712995253965371*^9}, 3.712995343491997*^9, {3.7129953798398485`*^9, 3.712995411374176*^9}, { 3.712996268059813*^9, 3.712996279264394*^9}, {3.712996332785453*^9, 3.7129963339887047`*^9}, {3.7129963699143753`*^9, 3.7129965642163386`*^9}, {3.7129967399069395`*^9, 3.7129967825364337`*^9}, {3.7130023714774327`*^9, 3.713002390011431*^9}, { 3.7130024555486317`*^9, 3.713002456033061*^9}, {3.7130096859044127`*^9, 3.713009698562335*^9}, {3.713009785977857*^9, 3.7130098720964165`*^9}, { 3.7138474164601574`*^9, 3.713847460605017*^9}, {3.713848647902732*^9, 3.7138486952205644`*^9}, {3.7140410034418354`*^9, 3.71404102099051*^9}, { 3.7140410516813707`*^9, 3.7140410571662374`*^9}, {3.7500561163492336`*^9, 3.750056118309679*^9}, {3.75005644772439*^9, 3.750056460364983*^9}, { 3.750418955819368*^9, 3.750418991955581*^9}, {3.7504190504328346`*^9, 3.7504191179118333`*^9}, {3.750419148990396*^9, 3.7504192971886773`*^9}, { 3.7504193704776974`*^9, 3.750419371460817*^9}, {3.750419622202434*^9, 3.7504196274570265`*^9}, {3.750419676396184*^9, 3.7504197005232496`*^9}, { 3.7504199014205647`*^9, 3.7504199105731564`*^9}, 3.7504199674269505`*^9, { 3.75042000580826*^9, 3.7504200179820857`*^9}, {3.7504200623902054`*^9, 3.7504200725254693`*^9}, {3.7594891152396383`*^9, 3.759489154065875*^9}, { 3.7606073008309183`*^9, 3.7606073145514975`*^9}, {3.7606073578977823`*^9, 3.760607359417551*^9}, {3.7606074424144297`*^9, 3.760607457401692*^9}, { 3.844827354234421*^9, 3.8448273760220327`*^9}, {3.8448275231364627`*^9, 3.8448275266575537`*^9}, 3.8448276238320646`*^9, {3.8448277812192287`*^9, 3.8448277848034983`*^9}, {3.844827829780749*^9, 3.8448278559054637`*^9}, { 3.844828686628151*^9, 3.8448286878814173`*^9}}, CellLabel-> "In[263]:=",ExpressionUUID->"1306deec-76f6-46a2-93e3-831fdf4aa5f9"] }, Closed]], Cell[CellGroupData[{ Cell["GREFINE defs", "Subsection", CellChangeTimes->{{3.7555369693812027`*^9, 3.7555369706487265`*^9}, { 3.7594889422016716`*^9, 3.759488944733738*^9}, {3.7597145150982075`*^9, 3.759714542190567*^9}, {3.7597145828965845`*^9, 3.7597145848583384`*^9}},ExpressionUUID->"ec2c7712-6aa8-458d-8e5f-\ 914811d43f19"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GREF", "[", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"n4", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", "n2", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n5", ",", "n3", ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n6", ",", "n1", ",", "n4"}], "}"}], "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n4", ",", "n5", ",", "n6"}], "}"}], "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GREF", "[", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n8", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n3"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"n9", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n5", ",", "n2", ",", "n9", ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n4"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n8", ",", "n9", ",", "n3", ",", RowBox[{"n7", "=", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}], "]"}]}]}], "}"}], "]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n9", ",", "n6", ",", "n7", ",", "n4"}], "}"}], "]"}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GREFINE", "[", RowBox[{"{", RowBox[{"crd_", ",", "nod_"}], "}"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"crdout", "=", "crd"}], ",", RowBox[{"nodout", "=", "nod"}], ",", "ii"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"ii", " ", "=", RowBox[{ RowBox[{"Length", "[", "crdout", "]"}], "+", "1"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Clear", "[", "NEWNODE", "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "]"}], ":=", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], "]"}], "=", RowBox[{"CompoundExpression", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"crdout", "=", RowBox[{"Join", "[", RowBox[{"crdout", ",", RowBox[{"{", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"crdout", "[", RowBox[{"[", "a1", "]"}], "]"}], "+", RowBox[{"crdout", "[", RowBox[{"[", "a2", "]"}], "]"}]}], ")"}], "/", "2"}], "}"}]}], "]"}]}], ",", RowBox[{"ii", "++"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"nodout", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"GREF", "[", "#", "]"}], "&"}], ",", "nodout"}], "]"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"crdout", ",", "nodout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GENR", "[", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}], "]"}], ":=", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}], "]"}], ",", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n2", ",", "n3"}], "}"}], "]"}], "]"}], ",", RowBox[{"NEWNODE", "[", RowBox[{"Sort", "[", RowBox[{"{", RowBox[{"n3", ",", "n1"}], "}"}], "]"}], "]"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ RowBox[{"GENR", "[", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", RowBox[{"n5", "=", RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], ",", RowBox[{"n8", "=", RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"n1", ",", "n3"}], "}"}], "]"}]}], ",", RowBox[{"n9", "=", RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}]}]}], "}"}], "]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n5", ",", "n2", ",", "n9", ",", RowBox[{"n6", "=", RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"n2", ",", "n4"}], "}"}], "]"}]}]}], "}"}], "]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n8", ",", "n9", ",", "n3", ",", RowBox[{"n7", "=", RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"n3", ",", "n4"}], "}"}], "]"}]}]}], "}"}], "]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n9", ",", "n6", ",", "n7", ",", "n4"}], "}"}], "]"}], "}"}]}], "}"}]}], ";"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GENRICH", "[", RowBox[{"{", RowBox[{"crd_", ",", "nod_"}], "}"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"ii", ",", "FN", ",", "rule", ",", RowBox[{"crdout", "=", "crd"}], ",", RowBox[{"nodout", "=", "nod"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"ii", "=", RowBox[{ RowBox[{"Length", "[", "crdout", "]"}], "+", "1"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Clear", "[", "NEWNODE", "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1_", ",", "a2_"}], "}"}], "]"}], ":=", RowBox[{ RowBox[{"NEWNODE", "[", RowBox[{"{", RowBox[{"a1", ",", "a2"}], "}"}], "]"}], "=", RowBox[{"CompoundExpression", "[", RowBox[{ RowBox[{"crdout", "=", RowBox[{"Join", "[", RowBox[{"crdout", ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"crdout", "[", RowBox[{"[", "a1", "]"}], "]"}], "+", RowBox[{"crdout", "[", RowBox[{"[", "a2", "]"}], "]"}]}], ")"}], "/", "2"}], "}"}]}], "]"}]}], ",", RowBox[{"ii", "++"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"nodout", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"GENR", "[", "#", "]"}], "&"}], ",", "nodout"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"crdout", ",", "nodout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.697985830982525*^9, 3.6979858329925275`*^9}, { 3.698414463543007*^9, 3.698414476843025*^9}, {3.6984148090934906`*^9, 3.6984148464035425`*^9}, {3.6984149699237156`*^9, 3.6984149730637197`*^9}, {3.698415039563813*^9, 3.6984150501038275`*^9}, { 3.698415130973941*^9, 3.6984151547039742`*^9}, {3.6984151857740173`*^9, 3.6984152096340513`*^9}, {3.6984152435240984`*^9, 3.698415255934116*^9}, 3.6984153434742384`*^9, {3.698415428614358*^9, 3.6984155528645315`*^9}, { 3.698415650334668*^9, 3.6984156957947316`*^9}, {3.6984971216481996`*^9, 3.6984971440082307`*^9}, {3.698497256408388*^9, 3.6984972586283913`*^9}, { 3.698497324188483*^9, 3.698497334418497*^9}, {3.6984974231086216`*^9, 3.69849751476875*^9}, {3.699107129086978*^9, 3.69910719511707*^9}, { 3.6994220214505434`*^9, 3.699422023570546*^9}, 3.6994224722011747`*^9, { 3.700296892213687*^9, 3.7002969404537544`*^9}, {3.700297153924053*^9, 3.700297154704054*^9}, {3.700298036047288*^9, 3.7002980600173216`*^9}, { 3.7002981562074566`*^9, 3.7002981872574997`*^9}, {3.7129791718840046`*^9, 3.7129791800257635`*^9}, {3.712979232875139*^9, 3.712979252111267*^9}, { 3.7129794197387886`*^9, 3.712979525828207*^9}, {3.7129795809903307`*^9, 3.712979590413209*^9}, {3.7129796478565316`*^9, 3.7129796809538364`*^9}, { 3.7129804673191423`*^9, 3.7129804748198795`*^9}, {3.712980610928114*^9, 3.712980622210312*^9}, {3.7129807144235544`*^9, 3.712980726627682*^9}, { 3.7129807741799045`*^9, 3.7129807809461966`*^9}, {3.7129811406876945`*^9, 3.7129811475474696`*^9}, 3.7129820013233137`*^9, 3.712982092129925*^9, { 3.7129824843276033`*^9, 3.7129825137528653`*^9}, {3.71298256627383*^9, 3.712982670207111*^9}, {3.7129827678737044`*^9, 3.712982856273471*^9}, { 3.7129829454548435`*^9, 3.712983022932089*^9}, {3.712983202325946*^9, 3.7129832392986393`*^9}, {3.712983366989815*^9, 3.712983388023601*^9}, { 3.7129834186205378`*^9, 3.7129835372579465`*^9}, {3.712983834758374*^9, 3.712983894467859*^9}, {3.7129840417335854`*^9, 3.712984063673375*^9}, 3.7129841515267477`*^9, {3.7129844471207294`*^9, 3.7129845210814824`*^9}, { 3.712984569477442*^9, 3.7129845739623785`*^9}, {3.712984641406767*^9, 3.712984648032766*^9}, {3.712985039824218*^9, 3.71298523890793*^9}, 3.7129853718321877`*^9, {3.7129854137561316`*^9, 3.7129854179438295`*^9}, { 3.712985449603707*^9, 3.7129854556822214`*^9}, {3.7129855201112256`*^9, 3.712985525768077*^9}, {3.712985625231479*^9, 3.7129857027712817`*^9}, { 3.7129857629336724`*^9, 3.712985769059338*^9}, {3.7129858314881444`*^9, 3.712985835050726*^9}, {3.7129860602431355`*^9, 3.712986064853248*^9}, { 3.7129862394499397`*^9, 3.712986242887823*^9}, {3.7129866297240076`*^9, 3.7129866397563314`*^9}, {3.71298680167982*^9, 3.712986860763974*^9}, { 3.7129869813135347`*^9, 3.7129869942367897`*^9}, {3.712987135892788*^9, 3.712987136814763*^9}, {3.7129950311602526`*^9, 3.7129950408646345`*^9}, { 3.7129950854940643`*^9, 3.712995128842733*^9}, {3.712995161470902*^9, 3.712995164018298*^9}, {3.712995233556699*^9, 3.712995253965371*^9}, 3.712995343491997*^9, {3.7129953798398485`*^9, 3.712995411374176*^9}, { 3.712996268059813*^9, 3.712996279264394*^9}, {3.712996332785453*^9, 3.7129963339887047`*^9}, {3.7129963699143753`*^9, 3.7129965642163386`*^9}, {3.7129967399069395`*^9, 3.7129967825364337`*^9}, {3.7130023714774327`*^9, 3.713002390011431*^9}, { 3.7130024555486317`*^9, 3.713002456033061*^9}, {3.7130096859044127`*^9, 3.713009698562335*^9}, {3.713009785977857*^9, 3.7130098720964165`*^9}, { 3.7138474164601574`*^9, 3.713847460605017*^9}, {3.713848647902732*^9, 3.7138486952205644`*^9}, {3.7140410034418354`*^9, 3.71404102099051*^9}, { 3.7140410516813707`*^9, 3.7140410571662374`*^9}, {3.7500561163492336`*^9, 3.750056118309679*^9}, {3.75005644772439*^9, 3.750056460364983*^9}, { 3.750418955819368*^9, 3.750418991955581*^9}, {3.7504190504328346`*^9, 3.7504191179118333`*^9}, {3.750419148990396*^9, 3.7504192971886773`*^9}, { 3.7504193704776974`*^9, 3.750419371460817*^9}, {3.750419622202434*^9, 3.7504196274570265`*^9}, {3.750419676396184*^9, 3.7504197005232496`*^9}, { 3.7504199014205647`*^9, 3.7504199105731564`*^9}, 3.7504199674269505`*^9, { 3.75042000580826*^9, 3.7504200179820857`*^9}, {3.7504200623902054`*^9, 3.7504200725254693`*^9}, {3.7594891152396383`*^9, 3.759489154065875*^9}, { 3.7597145916194983`*^9, 3.759714665591065*^9}, {3.75971472891543*^9, 3.759714824916602*^9}, {3.7597148706987467`*^9, 3.759714947478797*^9}, { 3.7597150349307227`*^9, 3.7597151634794807`*^9}, {3.759715246935138*^9, 3.7597153062491665`*^9}, {3.7597153377190075`*^9, 3.7597153870577526`*^9}, {3.7597154590071197`*^9, 3.759715500272478*^9}, { 3.7597155491240797`*^9, 3.7597155760904846`*^9}, {3.7597156273541317`*^9, 3.75971569203012*^9}, {3.759715739514512*^9, 3.7597157580149326`*^9}, { 3.7597158013411117`*^9, 3.75971588340364*^9}, {3.759715927490775*^9, 3.7597160612515965`*^9}, {3.759716123477256*^9, 3.759716134998943*^9}, { 3.7597192931263885`*^9, 3.7597193363351936`*^9}, {3.7597193773167334`*^9, 3.759719404125424*^9}, {3.7597244593792834`*^9, 3.759724529395421*^9}, { 3.7597247902250433`*^9, 3.759724797335229*^9}, {3.7597248368354387`*^9, 3.7597248400493813`*^9}, {3.759727702871601*^9, 3.7597277380976105`*^9}, { 3.759727774307602*^9, 3.759727786273531*^9}, {3.759727871612993*^9, 3.7597278889996324`*^9}, 3.7597279993022413`*^9, {3.75973165307685*^9, 3.7597316585755997`*^9}, {3.7597317206705837`*^9, 3.759731738556853*^9}, { 3.759731825620432*^9, 3.759731856878929*^9}, {3.759735536137723*^9, 3.7597356755580835`*^9}, {3.759743445765726*^9, 3.759743450812235*^9}, 3.7597442184489155`*^9}, CellLabel-> "In[265]:=",ExpressionUUID->"28919976-0232-4a4a-92be-b11521f57c6f"] }, Closed]], Cell[CellGroupData[{ Cell["EXTRUDE defs", "Subsection", CellChangeTimes->{{3.6337757022685537`*^9, 3.6337757351784363`*^9}, { 3.734064727558645*^9, 3.73406474989952*^9}, {3.7451438105166326`*^9, 3.745143811840375*^9}, {3.7606070835401344`*^9, 3.760607098895162*^9}, { 3.760607554619519*^9, 3.7606075611760683`*^9}},ExpressionUUID->"05d1a658-f72c-486f-8e29-\ 1c0c62b4a747"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"extrude", " ", "a", " ", "cross"}], "-", RowBox[{"section", " ", "in", " ", "z"}], "-", "direction"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"EXTRUDE", "[", RowBox[{ RowBox[{"{", RowBox[{"nod_", ",", "crd_"}], "}"}], ",", RowBox[{"{", RowBox[{"ns_", ",", "np_"}], "}"}], ",", "L_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"nodout", ",", "crdout", ",", "offset", ",", "nnod"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"crdout", "=", RowBox[{"Table", "[", " ", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Append", "[", RowBox[{"#", ",", RowBox[{"L", "*", RowBox[{"ii", "/", RowBox[{"(", RowBox[{"np", "*", "ns"}], ")"}]}]}]}], "]"}], "&"}], ",", "crd"}], "]"}], ",", RowBox[{"{", RowBox[{"ii", ",", "0", ",", RowBox[{"np", "*", "ns"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nnod", "=", RowBox[{"Max", "[", RowBox[{"Flatten", "[", RowBox[{"nod", " ", "/.", " ", RowBox[{ RowBox[{"Line", "[", "a_", "]"}], "\[Rule]", "a"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"offset", " ", "=", RowBox[{"Partition", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{"ii", ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", " ", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"np", "+", "1"}], ")"}], "*", "ns"}], "-", RowBox[{"(", RowBox[{"ns", "-", "1"}], ")"}]}]}], "}"}]}], "]"}], ",", RowBox[{"np", "+", "1"}], ",", "np"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nodout", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"nod", " ", "/.", RowBox[{ RowBox[{"Line", "[", "a_", "]"}], "\[Rule]", RowBox[{"ELEMENT", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"a", "+", RowBox[{ RowBox[{"(", RowBox[{"ii", "-", "1"}], ")"}], "*", "nnod"}]}], ",", RowBox[{"{", RowBox[{"ii", ",", "off"}], "}"}]}], "]"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"off", ",", "offset"}], "}"}]}], "]"}], ",", "1"}], "]"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"nodout", ",", "crdout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"extrude", " ", "a", " ", "cross"}], "-", RowBox[{"section", " ", "in", " ", "z"}], "-", "direction"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"EXTRUDE", "[", RowBox[{ RowBox[{"{", RowBox[{"nod_", ",", "crd_"}], "}"}], ",", "np_", ",", "z_List"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nodout", ",", "crdout", ",", "offset", ",", "nnod", ",", "ns"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"ns", "=", RowBox[{ RowBox[{"Length", "[", "z", "]"}], "-", "1"}]}], ";", "\[IndentingNewLine]", RowBox[{"crdout", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"Table", "[", " ", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Append", "[", RowBox[{"#", ",", RowBox[{ RowBox[{"z", "[", RowBox[{"[", "is", "]"}], "]"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"z", "[", RowBox[{"[", RowBox[{"is", "+", "1"}], "]"}], "]"}], "-", RowBox[{"z", "[", RowBox[{"[", "is", "]"}], "]"}]}], ")"}], "*", RowBox[{"ii", "/", "np"}]}]}]}], "]"}], "&"}], ",", "crd"}], "]"}], ",", RowBox[{"{", RowBox[{"ii", ",", RowBox[{"If", "[", RowBox[{ RowBox[{"is", "==", "1"}], ",", "0", ",", "1"}], "]"}], ",", "np"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"is", ",", "1", ",", "ns"}], "}"}]}], "]"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nnod", "=", RowBox[{"Max", "[", RowBox[{"Flatten", "[", RowBox[{"nod", " ", "/.", " ", RowBox[{ RowBox[{"Line", "[", "a_", "]"}], "\[Rule]", "a"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"offset", " ", "=", RowBox[{"Partition", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{"ii", ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", " ", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"np", "+", "1"}], ")"}], "*", "ns"}], "-", RowBox[{"(", RowBox[{"ns", "-", "1"}], ")"}]}]}], "}"}]}], "]"}], ",", RowBox[{"np", "+", "1"}], ",", "np"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nodout", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"nod", " ", "/.", RowBox[{ RowBox[{"Line", "[", "a_", "]"}], "\[Rule]", RowBox[{"ELEMENT", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"a", "+", RowBox[{ RowBox[{"(", RowBox[{"ii", "-", "1"}], ")"}], "*", "nnod"}]}], ",", RowBox[{"{", RowBox[{"ii", ",", "off"}], "}"}]}], "]"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"off", ",", "offset"}], "}"}]}], "]"}], ",", "1"}], "]"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"nodout", ",", "crdout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.633673923685915*^9, 3.6336739535006204`*^9}, { 3.633674155068149*^9, 3.6336741996717005`*^9}, {3.6336745049841633`*^9, 3.6336745219741354`*^9}, {3.6336919593939404`*^9, 3.6336919775979815`*^9}, 3.633692380551029*^9, {3.6336927116599674`*^9, 3.633692727194856*^9}, { 3.635310826749509*^9, 3.6353108343419433`*^9}, {3.635311461613821*^9, 3.6353114619508405`*^9}, {3.7326759806780663`*^9, 3.7326760008674326`*^9}, {3.7326760331212645`*^9, 3.7326760385677853`*^9}, {3.732684137201784*^9, 3.73268419404665*^9}, { 3.732684306221466*^9, 3.7326843382153635`*^9}, 3.7326844699232764`*^9, { 3.7326845133861027`*^9, 3.73268452322455*^9}, {3.732759973190983*^9, 3.7327599776758347`*^9}, {3.7327613720703106`*^9, 3.7327614888170295`*^9}, {3.732761535853627*^9, 3.7327615404943867`*^9}, { 3.7327615972663317`*^9, 3.7327616122832594`*^9}, {3.7327616693361855`*^9, 3.73276183332095*^9}, {3.732761876700554*^9, 3.7327618790133*^9}, { 3.732761909063363*^9, 3.732761910469795*^9}, {3.73276200508918*^9, 3.732762006042756*^9}, {3.7327620750344048`*^9, 3.732762101490326*^9}, 3.7327688007102947`*^9, {3.7327705695330524`*^9, 3.7327705708254137`*^9}, { 3.732788507552166*^9, 3.7327885085870132`*^9}, {3.732788681344634*^9, 3.7327887090994544`*^9}, {3.732788743287696*^9, 3.73278879848213*^9}, { 3.732788922306119*^9, 3.7327889462731514`*^9}, {3.732789012151597*^9, 3.732789028200858*^9}, {3.7327890791192408`*^9, 3.732789086999034*^9}, { 3.732789135698248*^9, 3.7327891358892384`*^9}, {3.7327891989507074`*^9, 3.7327891993104925`*^9}, {3.733116709198372*^9, 3.733116731638229*^9}, { 3.7334931331412554`*^9, 3.7334932071522064`*^9}, {3.733493353668892*^9, 3.7334934953404007`*^9}, {3.733493581610343*^9, 3.733493589891471*^9}, { 3.7334936319789553`*^9, 3.7334936623392687`*^9}, {3.7334936935401745`*^9, 3.733493716917615*^9}, {3.7334937687375154`*^9, 3.733493799379287*^9}, { 3.7335602963276734`*^9, 3.7335603891038685`*^9}, {3.7337039222525787`*^9, 3.733703929721642*^9}, {3.7337040222462597`*^9, 3.7337040262631474`*^9}, { 3.733710121070121*^9, 3.733710122358057*^9}, 3.7337110885786676`*^9, 3.733711184948838*^9, {3.733711259729956*^9, 3.733711278366322*^9}, 3.7337113240271106`*^9, {3.733711384581702*^9, 3.733711436236964*^9}, 3.7337114809469175`*^9, {3.7337115173918333`*^9, 3.733711518879483*^9}, 3.733711560439453*^9, {3.733711609599924*^9, 3.7337116342722664`*^9}, { 3.733711689751358*^9, 3.7337116969119487`*^9}, {3.7337129879879694`*^9, 3.7337130014112797`*^9}, {3.733713172835663*^9, 3.733713173913886*^9}, { 3.7337132483436465`*^9, 3.7337132496094065`*^9}, {3.733713283003566*^9, 3.7337134200180254`*^9}, {3.733713464428997*^9, 3.7337135191222897`*^9}, { 3.7337135777847366`*^9, 3.73371367154463*^9}, {3.7337140009857264`*^9, 3.7337140458967295`*^9}, {3.733714091198394*^9, 3.7337141070440063`*^9}, { 3.733714143813529*^9, 3.733714146610505*^9}, {3.733721976862414*^9, 3.7337219813629093`*^9}, {3.733722281191476*^9, 3.7337222944429536`*^9}, { 3.733722382186266*^9, 3.7337223828425617`*^9}, {3.7337224624293957`*^9, 3.7337224858690815`*^9}, 3.7337225537825146`*^9, {3.733722654230641*^9, 3.733722661731436*^9}, {3.733722818999301*^9, 3.7337228267499514`*^9}, { 3.733723144924486*^9, 3.733723159691375*^9}, {3.733723196273369*^9, 3.733723198695795*^9}, {3.7337232377777586`*^9, 3.7337232408874655`*^9}, { 3.73372435111442*^9, 3.733724354067712*^9}, {3.7337244099801674`*^9, 3.733724433076069*^9}, {3.7337245236325226`*^9, 3.733724524679802*^9}, { 3.7337873724058084`*^9, 3.7337873841879997`*^9}, {3.7337879154409466`*^9, 3.7337879158316607`*^9}, {3.7340647908247976`*^9, 3.73406479426425*^9}, { 3.7340650184820967`*^9, 3.7340650196896086`*^9}, {3.7340717757289314`*^9, 3.734071783044138*^9}, 3.760607155346615*^9, {3.7606075704439325`*^9, 3.76060759034247*^9}}, CellLabel-> "In[270]:=",ExpressionUUID->"f4a53cb2-aa33-4e7e-9481-fa85a4104ee5"] }, Closed]], Cell[CellGroupData[{ Cell["TRIANGULATE defs", "Subsection", CellChangeTimes->{{3.7555369693812027`*^9, 3.7555369706487265`*^9}, { 3.784699941516708*^9, 3.7846999469147763`*^9}},ExpressionUUID->"ba47b52f-9cc2-4be0-8141-\ e1ab59eca28a"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"Needs", "[", "\"\\"", "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"TRIANGULATE", "[", RowBox[{ RowBox[{"{", RowBox[{"seg_", ",", "crd_", ",", "mrk_"}], "}"}], ",", RowBox[{"{", RowBox[{"dms_", ",", "atr_", ",", "cns_"}], "}"}], ",", "a_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "inInst", ",", "outInst", ",", "crdout", ",", "polout", ",", "typout", ",", "segout", ",", "mrkout", ",", "str"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"set", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"inInst", "=", RowBox[{"TriangleCreate", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetPoints", "[", RowBox[{"inInst", ",", "crd"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetSegments", "[", RowBox[{"inInst", ",", "seg"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetSegmentMarkers", "[", RowBox[{"inInst", ",", "mrk"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetRegions", "[", RowBox[{"inInst", ",", "dms", ",", " ", "atr", ",", " ", "cns"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"do", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{"str", "=", RowBox[{"\"\\"", StyleBox["<>", "OperatorCharacter"], RowBox[{"ToString", "[", RowBox[{"1.", "*", "a"}], "]"}], StyleBox["<>", "OperatorCharacter"], "\"\\""}]}], ";", "\[IndentingNewLine]", RowBox[{"outInst", " ", "=", " ", RowBox[{"TriangleTriangulate", "[", RowBox[{"inInst", ",", "str"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", "extract", "*)"}], "\[IndentingNewLine]", RowBox[{"crdout", "=", " ", RowBox[{"TriangleGetPoints", "[", "outInst", "]"}]}], ";", RowBox[{"polout", "=", RowBox[{"TriangleGetElements", "[", "outInst", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"segout", "=", RowBox[{"TriangleGetSegments", "[", "outInst", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mrkout", "=", RowBox[{"TriangleGetSegmentMarkers", "[", "outInst", "]"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"typout", "=", RowBox[{"Flatten", "[", RowBox[{"Round", "[", RowBox[{"TriangleGetElementAttributes", "[", "outInst", "]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{ "crdout", ",", "polout", ",", "typout", ",", "segout", ",", "mrkout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"TRIANGULATE", "[", RowBox[{ RowBox[{"{", RowBox[{"seg_", ",", "mrk_"}], "}"}], ",", "crd_", ",", "a_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "inInst", ",", "outInst", ",", "crdout", ",", "eleout", ",", "segout", ",", "mrkout"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"set", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"inInst", "=", RowBox[{"TriangleCreate", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetPoints", "[", RowBox[{"inInst", ",", "crd"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetSegments", "[", RowBox[{"inInst", ",", "seg"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetSegmentMarkers", "[", RowBox[{"inInst", ",", "mrk"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"do", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{"str", "=", RowBox[{"\"\\"", StyleBox["<>", "OperatorCharacter"], RowBox[{"ToString", "[", RowBox[{"1.", "*", "a"}], "]"}], StyleBox["<>", "OperatorCharacter"], "\"\\""}]}], ";", "\[IndentingNewLine]", RowBox[{"outInst", " ", "=", " ", RowBox[{"TriangleTriangulate", "[", RowBox[{"inInst", ",", "str"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", "extract", "*)"}], "\[IndentingNewLine]", RowBox[{"crdout", "=", " ", RowBox[{"TriangleGetPoints", "[", "outInst", "]"}]}], ";", RowBox[{"eleout", "=", RowBox[{"TriangleGetElements", "[", "outInst", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"segout", "=", RowBox[{"TriangleGetSegments", "[", "outInst", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mrkout", "=", RowBox[{"TriangleGetSegmentMarkers", "[", "outInst", "]"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"eleout", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Polygon", "[", "#", "]"}], "&"}], ",", "eleout"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"crdout", ",", "eleout", ",", "segout", ",", "mrkout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"TRIANGULATE", "[", RowBox[{"{", RowBox[{"crd_", ",", "nod_"}], "}"}], "]"}], ":=", RowBox[{"TRIANGULATE", "[", RowBox[{ RowBox[{"nod", " ", "/.", RowBox[{ RowBox[{"Line", "[", "any_", "]"}], "\[Rule]", "any"}]}], ",", "crd"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"TRIANGULATE", "[", RowBox[{"seg_", ",", "crd_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"inInst", ",", "outInst", ",", "crdout", ",", "eleout"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"set", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"inInst", "=", RowBox[{"TriangleCreate", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetPoints", "[", RowBox[{"inInst", ",", "crd"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetSegments", "[", RowBox[{"inInst", ",", "seg"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"do", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{"outInst", " ", "=", " ", RowBox[{"TriangleTriangulate", "[", RowBox[{"inInst", ",", "\"\\""}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", "extract", "*)"}], "\[IndentingNewLine]", RowBox[{"crdout", "=", " ", RowBox[{"TriangleGetPoints", "[", "outInst", "]"}]}], ";", RowBox[{"eleout", "=", RowBox[{"TriangleGetElements", "[", "outInst", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"eleout", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Polygon", "[", "#", "]"}], "&"}], ",", "eleout"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"crdout", ",", "eleout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"TRIANGULATE", "[", RowBox[{ RowBox[{"{", RowBox[{"crd_", ",", "nod_"}], "}"}], ",", "a_"}], "]"}], ":=", RowBox[{"TRIANGULATE", "[", RowBox[{ RowBox[{"nod", " ", "/.", RowBox[{ RowBox[{"Line", "[", "any_", "]"}], "\[Rule]", "any"}]}], ",", "crd", ",", "a"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"TRIANGULATE", "[", RowBox[{"seg_", ",", "crd_", ",", "a_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "inInst", ",", "outInst", ",", "crdout", ",", "eleout", ",", "str"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"set", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"inInst", "=", RowBox[{"TriangleCreate", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetPoints", "[", RowBox[{"inInst", ",", "crd"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetSegments", "[", RowBox[{"inInst", ",", "seg"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"do", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{"str", "=", RowBox[{"\"\\"", StyleBox["<>", "OperatorCharacter"], RowBox[{"ToString", "[", RowBox[{"1.", "*", "a"}], "]"}], StyleBox["<>", "OperatorCharacter"], "\"\\""}]}], ";", "\[IndentingNewLine]", RowBox[{"outInst", " ", "=", " ", RowBox[{"TriangleTriangulate", "[", RowBox[{"inInst", ",", "str"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", "extract", "*)"}], "\[IndentingNewLine]", RowBox[{"crdout", "=", " ", RowBox[{"TriangleGetPoints", "[", "outInst", "]"}]}], ";", RowBox[{"eleout", "=", RowBox[{"TriangleGetElements", "[", "outInst", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"eleout", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Polygon", "[", "#", "]"}], "&"}], ",", "eleout"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"crdout", ",", "eleout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"TRIANGULATE", "[", RowBox[{ RowBox[{"{", RowBox[{"crd_", ",", "nod_"}], "}"}], ",", RowBox[{"{", RowBox[{"dms_", ",", "atr_", ",", "cns_"}], "}"}]}], "]"}], ":=", RowBox[{"TRIANGULATE", "[", RowBox[{ RowBox[{"nod", " ", "/.", RowBox[{ RowBox[{"Line", "[", "any_", "]"}], "\[Rule]", "any"}]}], ",", "crd", ",", RowBox[{"{", RowBox[{"dms", ",", "atr", ",", "cns"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"TRIANGULATE", "[", RowBox[{"seg_", ",", "crd_", ",", RowBox[{"{", RowBox[{"dms_", ",", "atr_", ",", "cns_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "inInst", ",", "outInst", ",", "crdout", ",", "polout", ",", "typout"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"set", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"inInst", "=", RowBox[{"TriangleCreate", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetPoints", "[", RowBox[{"inInst", ",", "crd"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetSegments", "[", RowBox[{"inInst", ",", "seg"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetRegions", "[", RowBox[{"inInst", ",", "dms", ",", " ", "atr", ",", " ", "cns"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"do", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{"outInst", " ", "=", " ", RowBox[{"TriangleTriangulate", "[", RowBox[{"inInst", ",", "\"\\""}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", "extract", "*)"}], "\[IndentingNewLine]", RowBox[{"crdout", "=", " ", RowBox[{"TriangleGetPoints", "[", "outInst", "]"}]}], ";", RowBox[{"polout", "=", RowBox[{"TriangleGetElements", "[", "outInst", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"polout", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Polygon", "[", "#", "]"}], "&"}], ",", "polout"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"typout", "=", RowBox[{"Flatten", "[", RowBox[{"Round", "[", RowBox[{"TriangleGetElementAttributes", "[", "outInst", "]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"crdout", ",", "polout", ",", "typout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"TRIANGULATE", "[", RowBox[{ RowBox[{"{", RowBox[{"crd_", ",", "nod_"}], "}"}], ",", RowBox[{"{", RowBox[{"dms_", ",", "atr_", ",", "cns_"}], "}"}], ",", "a_"}], "]"}], ":=", RowBox[{"TRIANGULATE", "[", RowBox[{ RowBox[{"nod", " ", "/.", RowBox[{ RowBox[{"Line", "[", "any_", "]"}], "\[Rule]", "any"}]}], ",", "crd", ",", RowBox[{"{", RowBox[{"dms", ",", "atr", ",", "cns"}], "}"}], ",", "a"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"TRIANGULATE", "[", RowBox[{"seg_", ",", "crd_", ",", RowBox[{"{", RowBox[{"dms_", ",", "atr_", ",", "cns_"}], "}"}], ",", "a_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "inInst", ",", "outInst", ",", "crdout", ",", "polout", ",", "typout", ",", "str"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"set", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"inInst", "=", RowBox[{"TriangleCreate", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetPoints", "[", RowBox[{"inInst", ",", "crd"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetSegments", "[", RowBox[{"inInst", ",", "seg"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetRegions", "[", RowBox[{"inInst", ",", "dms", ",", " ", "atr", ",", " ", "cns"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"do", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{"str", "=", RowBox[{"\"\\"", StyleBox["<>", "OperatorCharacter"], RowBox[{"ToString", "[", RowBox[{"1.", "*", "a"}], "]"}], StyleBox["<>", "OperatorCharacter"], "\"\\""}]}], ";", "\[IndentingNewLine]", RowBox[{"outInst", " ", "=", " ", RowBox[{"TriangleTriangulate", "[", RowBox[{"inInst", ",", "str"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", "extract", "*)"}], "\[IndentingNewLine]", RowBox[{"crdout", "=", " ", RowBox[{"TriangleGetPoints", "[", "outInst", "]"}]}], ";", RowBox[{"polout", "=", RowBox[{"TriangleGetElements", "[", "outInst", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"polout", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Polygon", "[", "#", "]"}], "&"}], ",", "polout"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"typout", "=", RowBox[{"Flatten", "[", RowBox[{"Round", "[", RowBox[{"TriangleGetElementAttributes", "[", "outInst", "]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"crdout", ",", "polout", ",", "typout"}], "}"}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"TRIANGULATE", "[", RowBox[{"seg_", ",", "crd_", ",", RowBox[{"{", RowBox[{"dms_", ",", "atr_", ",", "cns_", ",", "hls_"}], "}"}], ",", "a_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "inInst", ",", "outInst", ",", "crdout", ",", "polout", ",", "typout", ",", "str"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"set", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"inInst", "=", RowBox[{"TriangleCreate", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetPoints", "[", RowBox[{"inInst", ",", "crd"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetSegments", "[", RowBox[{"inInst", ",", "seg"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetRegions", "[", RowBox[{"inInst", ",", "dms", ",", " ", "atr", ",", " ", "cns"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"TriangleSetHoles", "[", RowBox[{"inInst", ",", " ", "hls"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"do", " ", "it"}], "*)"}], "\[IndentingNewLine]", RowBox[{"str", "=", RowBox[{"\"\\"", StyleBox["<>", "OperatorCharacter"], RowBox[{"ToString", "[", RowBox[{"1.", "*", "a"}], "]"}], StyleBox["<>", "OperatorCharacter"], "\"\\""}]}], ";", "\[IndentingNewLine]", RowBox[{"outInst", " ", "=", " ", RowBox[{"TriangleTriangulate", "[", RowBox[{"inInst", ",", "str"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", "extract", "*)"}], "\[IndentingNewLine]", RowBox[{"crdout", "=", " ", RowBox[{"TriangleGetPoints", "[", "outInst", "]"}]}], ";", RowBox[{"polout", "=", RowBox[{"TriangleGetElements", "[", "outInst", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"polout", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Polygon", "[", "#", "]"}], "&"}], ",", "polout"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"typout", "=", RowBox[{"Flatten", "[", RowBox[{"Round", "[", RowBox[{"TriangleGetElementAttributes", "[", "outInst", "]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", RowBox[{"{", RowBox[{"polout", ",", "crdout", ",", "typout"}], "}"}], "]"}]}]}], "]"}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{ 3.443930973126174*^9, {3.4771023549018*^9, 3.4771023808445997`*^9}, { 3.4771024577682*^9, 3.4771025046618*^9}, {3.4771063565654*^9, 3.4771063705898*^9}, 3.4771089762209997`*^9, 3.477109006645*^9, { 3.4771109395810003`*^9, 3.4771109526226*^9}, {3.477110989427*^9, 3.4771110302522*^9}, {3.4771110800372*^9, 3.4771111191308002`*^9}, { 3.4771220486066*^9, 3.4771220663286*^9}, {3.4771317865394*^9, 3.4771318192214003`*^9}, {3.4771323345362*^9, 3.477132377639*^9}, { 3.630489883760623*^9, 3.630489885414226*^9}, {3.631409232246135*^9, 3.631409318077486*^9}, {3.6314094294772816`*^9, 3.631409430304083*^9}, { 3.6314095931215687`*^9, 3.6314095963195744`*^9}, {3.6314105089523773`*^9, 3.631410515504389*^9}, 3.631435133305333*^9, {3.631435355203025*^9, 3.6314353561500793`*^9}, 3.6314356018121305`*^9, 3.631435754368856*^9, 3.631435796315255*^9, {3.63143606319652*^9, 3.631436069549884*^9}, { 3.6347884698816414`*^9, 3.63478847685104*^9}, {3.6347954098385844`*^9, 3.6347954141598315`*^9}, {3.6347956603329115`*^9, 3.634795675947805*^9}, { 3.634796217815798*^9, 3.6347962287334223`*^9}, {3.6347962930030985`*^9, 3.6347963097820582`*^9}, {3.63479634495407*^9, 3.6347963538665795`*^9}, { 3.6347967044436316`*^9, 3.6347967222076473`*^9}, {3.6348910182399282`*^9, 3.6348910703229065`*^9}, {3.634891202082443*^9, 3.63489120569665*^9}, { 3.635129073304618*^9, 3.6351290927607307`*^9}, {3.6351291514160852`*^9, 3.6351291562713633`*^9}, {3.6351296027379*^9, 3.635129640630067*^9}, { 3.6351296766311264`*^9, 3.6351296770091476`*^9}, {3.635133864772954*^9, 3.6351340703167105`*^9}, {3.635134178738912*^9, 3.635134204883407*^9}, { 3.6351532590142465`*^9, 3.6351534908115044`*^9}, {3.6353108694909534`*^9, 3.635310875829316*^9}, {3.657768370048919*^9, 3.6577683714841213`*^9}, { 3.6853593982958508`*^9, 3.6853593994858527`*^9}, 3.685359462505941*^9, { 3.685359541326051*^9, 3.685359573806097*^9}, {3.6874387445294027`*^9, 3.687438822019511*^9}, 3.6874389450596833`*^9, {3.6874389956197543`*^9, 3.6874390405998173`*^9}, {3.6874391238499336`*^9, 3.6874391937200317`*^9}, {3.6874392244700747`*^9, 3.687439453750396*^9}, { 3.687439572800562*^9, 3.68743958546058*^9}, {3.68743962102063*^9, 3.687439653600675*^9}, {3.6874397535808153`*^9, 3.6874397667108335`*^9}, 3.6874457948947306`*^9, {3.6874461481952252`*^9, 3.6874461564952374`*^9}, { 3.6876686346644025`*^9, 3.6876686478844213`*^9}, {3.6876686911644816`*^9, 3.687668823124666*^9}, {3.687668960604859*^9, 3.6876691302750964`*^9}, { 3.687669356755413*^9, 3.6876695631957026`*^9}, {3.68766976165598*^9, 3.687669770715993*^9}, {3.6876724948642445`*^9, 3.687672495474246*^9}, { 3.687672580794365*^9, 3.6876727153745537`*^9}, {3.687672853854748*^9, 3.6876729332848587`*^9}, {3.6876729722949133`*^9, 3.6876731124151096`*^9}, {3.687673280685345*^9, 3.687673411335528*^9}, 3.6879313344746327`*^9, {3.687931387314707*^9, 3.6879314004147253`*^9}, { 3.6879314569548044`*^9, 3.6879314600748086`*^9}, {3.687931618845031*^9, 3.687931690255131*^9}, {3.687931744255206*^9, 3.6879317511352158`*^9}, { 3.6879317991852837`*^9, 3.6879318101552987`*^9}, {3.6879318528753586`*^9, 3.687931875785391*^9}, {3.6880321738474593`*^9, 3.688032324857671*^9}, { 3.68811073769691*^9, 3.68811083105704*^9}, {3.688182194807842*^9, 3.6881822090088615`*^9}, {3.6881823158700113`*^9, 3.6881824932602596`*^9}, {3.6881827603406334`*^9, 3.688182807210699*^9}, { 3.6881829158708515`*^9, 3.68818292930087*^9}, {3.688182999800969*^9, 3.6881831324711547`*^9}, {3.688183628661849*^9, 3.6881836750819144`*^9}, { 3.688211059016615*^9, 3.6882111198466997`*^9}, {3.6882111896067977`*^9, 3.6882112272568502`*^9}, {3.688211687127494*^9, 3.688211814657673*^9}, { 3.688211854527728*^9, 3.6882118603977365`*^9}, {3.6882139698004313`*^9, 3.68821399050046*^9}, {3.68821420020687*^9, 3.688214201756872*^9}, 3.6882144390772047`*^9, {3.6882146560475082`*^9, 3.6882146684575257`*^9}, { 3.688214751567642*^9, 3.6882147680976653`*^9}, {3.688214804297716*^9, 3.6882149595979333`*^9}, {3.6882150203480186`*^9, 3.6882152133382883`*^9}, {3.6882152437383313`*^9, 3.688215312948428*^9}, 3.6882155446087523`*^9, {3.688540867416464*^9, 3.688540868276465*^9}, { 3.688540923456542*^9, 3.688540987616632*^9}, {3.689509628603777*^9, 3.6895096840119457`*^9}, 3.6895097148397093`*^9, {3.689568676097738*^9, 3.689568771827872*^9}, {3.689737582567273*^9, 3.689737610517312*^9}, { 3.689738148338065*^9, 3.689738254678214*^9}, {3.689738292788267*^9, 3.689738346768343*^9}, {3.6897387257888737`*^9, 3.6897388179090023`*^9}, { 3.6898585271206756`*^9, 3.689858545170701*^9}, {3.6898585824607525`*^9, 3.689858769851015*^9}, {3.6940970096156654`*^9, 3.6940970747057567`*^9}, 3.6941413988145113`*^9, {3.694354094868929*^9, 3.6943541832790527`*^9}, { 3.694920239046096*^9, 3.694920319576208*^9}, {3.6949203962063155`*^9, 3.694920412426338*^9}, {3.6949204882764444`*^9, 3.6949204937164516`*^9}, 3.6949205606465454`*^9, {3.695100444594348*^9, 3.6951004570843654`*^9}, { 3.6973395634474907`*^9, 3.69733958428752*^9}, {3.697985422771953*^9, 3.6979855230120935`*^9}, {3.697985573722165*^9, 3.697985597992199*^9}, { 3.6979856429622617`*^9, 3.6979856711723013`*^9}, {3.7244643325478783`*^9, 3.724464348643357*^9}, {3.724467403856756*^9, 3.724467437838467*^9}, { 3.7244675479335804`*^9, 3.724467563230343*^9}, 3.7244676966368866`*^9, { 3.724467772264612*^9, 3.724467824163081*^9}, {3.7244678625415535`*^9, 3.724467863396864*^9}, {3.724468018783759*^9, 3.72446802144991*^9}, { 3.7244681559004545`*^9, 3.7244681850540376`*^9}, {3.724468459327367*^9, 3.724468483652465*^9}, {3.7244686219080153`*^9, 3.7244687024486265`*^9}, { 3.7244712391235456`*^9, 3.7244712430734224`*^9}, {3.7244712821065245`*^9, 3.724471282307459*^9}, {3.7244718283139167`*^9, 3.724471852982109*^9}, { 3.7245109260422964`*^9, 3.7245109717411103`*^9}, {3.7254180257070103`*^9, 3.725418132591786*^9}, {3.725418186497287*^9, 3.725418198564393*^9}, { 3.725418240702896*^9, 3.7254182427078333`*^9}, 3.7254182729821267`*^9, { 3.7254183742147875`*^9, 3.72541838162965*^9}, {3.7254184135842233`*^9, 3.7254184150237846`*^9}, {3.725418877464322*^9, 3.7254189569953265`*^9}, { 3.725418994143058*^9, 3.725419023781932*^9}, {3.7254193126441193`*^9, 3.725419396185589*^9}, {3.725432214366968*^9, 3.725432235836476*^9}, { 3.7254322894678383`*^9, 3.725432377695853*^9}, {3.726401253407773*^9, 3.7264012633218203`*^9}, {3.726401405512204*^9, 3.7264014071162825`*^9}, { 3.7264014439323297`*^9, 3.7264014462981124`*^9}, {3.726401485648699*^9, 3.7264016429140606`*^9}, {3.726401682872032*^9, 3.726401718837957*^9}, { 3.726401899357152*^9, 3.7264019010212574`*^9}, {3.7264019889732013`*^9, 3.726401991903804*^9}, {3.7264021595991826`*^9, 3.7264021616913195`*^9}, { 3.726402447890601*^9, 3.726402463475356*^9}, {3.747040699533342*^9, 3.7470408363290567`*^9}, {3.7471061663693695`*^9, 3.747106214420479*^9}, { 3.7471067469638214`*^9, 3.747106834372692*^9}, {3.7471068959871335`*^9, 3.747106915079779*^9}, {3.7471069588898473`*^9, 3.747106998742816*^9}, 3.747107044736511*^9, {3.747107087544964*^9, 3.7471070893575435`*^9}, { 3.7471138002489843`*^9, 3.747113811418234*^9}, {3.7471138500028563`*^9, 3.747113892211589*^9}, 3.747114310142033*^9, {3.7471143424625273`*^9, 3.747114343868453*^9}, {3.7471148744458303`*^9, 3.747114931572899*^9}, { 3.74711503534515*^9, 3.747115041218787*^9}, {3.7471156330947733`*^9, 3.7471156387028475`*^9}, {3.747116431240279*^9, 3.7471164335522423`*^9}, { 3.7471164808222904`*^9, 3.7471166104321785`*^9}, {3.747116647876696*^9, 3.7471167102835293`*^9}, {3.74865997476248*^9, 3.7486600101981816`*^9}, { 3.748660042393119*^9, 3.748660069138746*^9}, {3.748660177148834*^9, 3.748660251952998*^9}, {3.7486604981713724`*^9, 3.748660508798976*^9}, { 3.7486929231374454`*^9, 3.7486929342382526`*^9}, {3.7486929737776747`*^9, 3.7486929903337507`*^9}, {3.7486930264117804`*^9, 3.7486931799453707`*^9}, {3.748693249361241*^9, 3.7486932724173203`*^9}, 3.7486933276281357`*^9, 3.7486939237519407`*^9, {3.7486939698417687`*^9, 3.7486939700127883`*^9}, {3.748694008103215*^9, 3.7486940757142344`*^9}, { 3.7486942326282196`*^9, 3.748694304005413*^9}, {3.748695188924658*^9, 3.748695190701332*^9}, {3.7486952252639275`*^9, 3.7486953104760585`*^9}, { 3.748695384723056*^9, 3.748695811151685*^9}, {3.7486958766029434`*^9, 3.7486959097256002`*^9}, {3.7486964229653544`*^9, 3.7486964578684864`*^9}, 3.7487454821763644`*^9, {3.754056041592442*^9, 3.754056060140006*^9}, { 3.754056347029888*^9, 3.754056351327733*^9}, {3.754056854382514*^9, 3.754056862089791*^9}, {3.7540569630968127`*^9, 3.7540569674225426`*^9}, { 3.7540570759551015`*^9, 3.7540570801772118`*^9}, {3.754057135076915*^9, 3.754057152630065*^9}, {3.7540571929041653`*^9, 3.754057236529367*^9}, { 3.754057397662035*^9, 3.7540574231277227`*^9}, {3.7540574560189123`*^9, 3.754057472695193*^9}, {3.754057518721182*^9, 3.754057583163235*^9}, 3.754057631189864*^9, {3.7540576696626444`*^9, 3.754057832330846*^9}, { 3.7540578903947163`*^9, 3.7540579289766736`*^9}, {3.7540580507949033`*^9, 3.7540580513826957`*^9}, {3.7540978904321117`*^9, 3.7540979191340885`*^9}, {3.7540979931579046`*^9, 3.7540979999909244`*^9}, {3.7540980363245296`*^9, 3.754098095196913*^9}, { 3.7540981279820137`*^9, 3.75409817510705*^9}, {3.7540983080840054`*^9, 3.7540983887416687`*^9}, {3.754098433086689*^9, 3.7540984487715254`*^9}, { 3.754098518107086*^9, 3.7540985418746586`*^9}, {3.7540985740895276`*^9, 3.7540985855956683`*^9}, {3.7540986329334645`*^9, 3.754098651832582*^9}, 3.754098694943287*^9, {3.7540987996641817`*^9, 3.7540988293199515`*^9}, { 3.754098922368672*^9, 3.754098946956335*^9}, {3.7541009656118875`*^9, 3.754100966064907*^9}, {3.7541260794470377`*^9, 3.754126112298939*^9}, { 3.7541261993178277`*^9, 3.7541263394250636`*^9}, {3.7541264153576813`*^9, 3.754126455276905*^9}, {3.7541264972202415`*^9, 3.754126628008542*^9}, { 3.7541266613158674`*^9, 3.754126719835323*^9}, 3.7541267961648273`*^9, { 3.754126828833903*^9, 3.754126890819979*^9}, {3.754126943227796*^9, 3.754127112269927*^9}, {3.7541271553116074`*^9, 3.7541271992360067`*^9}, { 3.754127253229822*^9, 3.754127273225658*^9}, {3.754127329226965*^9, 3.7541273643065696`*^9}, {3.7541277175880594`*^9, 3.754127721159455*^9}, { 3.754127900093892*^9, 3.754127900428954*^9}, {3.7555365688081875`*^9, 3.7555368169423947`*^9}, {3.7566194252966633`*^9, 3.756619503340211*^9}, { 3.7606073727611165`*^9, 3.7606074044677906`*^9}, {3.7639037635827665`*^9, 3.7639039669013567`*^9}, {3.7639040036658916`*^9, 3.7639040352749486`*^9}, {3.7639041491982164`*^9, 3.7639041498420076`*^9}, {3.7641295066295767`*^9, 3.7641296291063385`*^9}, 3.7641297671450467`*^9, {3.764129842917159*^9, 3.76412986403855*^9}, { 3.7641299539495287`*^9, 3.7641299638308244`*^9}, {3.764130242057335*^9, 3.764130264998592*^9}, {3.7641304121561837`*^9, 3.764130517277567*^9}, { 3.764905400658563*^9, 3.764905448073204*^9}, {3.7661917992707295`*^9, 3.7661918111029887`*^9}, {3.7661937058475633`*^9, 3.7661937308527126`*^9}, {3.766288732159727*^9, 3.7662887421574078`*^9}, 3.7741665150318885`*^9, {3.774166583333705*^9, 3.7741666346924067`*^9}, { 3.7741666777885046`*^9, 3.7741667276801615`*^9}, {3.7741681843844967`*^9, 3.774168277409542*^9}, {3.774237957645171*^9, 3.7742379961381702`*^9}, { 3.774238228752078*^9, 3.7742383203485446`*^9}, {3.7742384167748957`*^9, 3.774238438885627*^9}, {3.774238499096892*^9, 3.7742385555597315`*^9}, { 3.7742385931019473`*^9, 3.774238669464537*^9}, {3.774239332037335*^9, 3.774239458024664*^9}, {3.7742396127858567`*^9, 3.7742396524321165`*^9}, { 3.774239693440149*^9, 3.774239749194436*^9}, {3.774239781513965*^9, 3.7742399183443785`*^9}, {3.774239993088747*^9, 3.7742399984000196`*^9}, { 3.774240080591405*^9, 3.7742403502486305`*^9}, {3.7742403925474215`*^9, 3.7742406200754595`*^9}, {3.7742406536016474`*^9, 3.774240771836528*^9}, { 3.774240802985832*^9, 3.7742408207850018`*^9}, {3.7742408510511465`*^9, 3.7742409420304427`*^9}, 3.7742409770366917`*^9, {3.7742410127101192`*^9, 3.774241115672659*^9}, {3.7742411489763308`*^9, 3.7742412065999565`*^9}, { 3.7751895563614497`*^9, 3.775189557474781*^9}, {3.7751896076191764`*^9, 3.7751897799276996`*^9}, {3.777096408797056*^9, 3.7770964403195615`*^9}, { 3.777096485036745*^9, 3.7770965029912896`*^9}, 3.7847000290779285`*^9, { 3.7866769257536707`*^9, 3.7866769613037777`*^9}, {3.7873053599413404`*^9, 3.7873054240368595`*^9}, {3.78730664769903*^9, 3.7873066512662177`*^9}, { 3.7873066825368905`*^9, 3.787306955112986*^9}, {3.787307227184967*^9, 3.787307234638444*^9}, {3.787307265472159*^9, 3.787307267764142*^9}, { 3.7873080496920834`*^9, 3.7873080627577534`*^9}, {3.787313297531843*^9, 3.787313308431161*^9}, 3.7873133927244625`*^9, 3.787628244885955*^9, 3.787651422801089*^9, {3.787651471253007*^9, 3.787651471569529*^9}, { 3.7876536890179644`*^9, 3.7876536899407806`*^9}, {3.843283788165268*^9, 3.8432838872123113`*^9}, {3.843283923901783*^9, 3.843283925305036*^9}, { 3.8432839713240523`*^9, 3.8432840064768605`*^9}, {3.8432847051109915`*^9, 3.8432847055104575`*^9}}, CellLabel-> "In[272]:=",ExpressionUUID->"54f77baf-834d-40bc-962c-1df46c275e82"] }, Closed]], Cell[CellGroupData[{ Cell["STANDARDFORM ETC. defs", "Subsection", CellChangeTimes->{{3.687518097184434*^9, 3.687518099119545*^9}, { 3.8223704779241266`*^9, 3.8223704849224677`*^9}, {3.847105064772148*^9, 3.8471050666839848`*^9}},ExpressionUUID->"923244d4-cd19-419f-84b5-\ 91ad3160cf11"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"MEC", "-", "E1050", "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", "\[Delta]W_", "]"}], ":=", RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", "\[Delta]W"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", "\[Delta]W_"}], "]"}], ":=", " ", RowBox[{"Print", "[", RowBox[{"\"\<\[Delta]W = -\>\"", ",", SuperscriptBox[ RowBox[{"MatrixForm", "[", RowBox[{"\[Delta]DOFS", "[", "\[Delta]W", "]"}], "]"}], "T"], ",", "\"\<(\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"-", RowBox[{"D", "[", RowBox[{ RowBox[{"D", "[", RowBox[{"\[Delta]W", ",", RowBox[{"{", RowBox[{"\[Delta]DOFS", "[", "\[Delta]W", "]"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"DOFS", "[", "\[Delta]W", "]"}], "}"}]}], "]"}]}], "]"}], "]"}], ",", "\[IndentingNewLine]", "\"\<\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"DOFS", "[", "\[Delta]W", "]"}], "]"}], ",", "\"\<-\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"D", "[", RowBox[{"\[Delta]W", ",", RowBox[{"{", RowBox[{"\[Delta]DOFS", "[", "\[Delta]W", "]"}], "}"}]}], "]"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{ RowBox[{"DOFS", "[", "\[Delta]W", "]"}], "\[Rule]", "0"}], "]"}]}], "]"}], "]"}], ",", "\"\<)\>\""}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "TMEC", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}], "]"}], ":=", RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ELEMENTFORM", "[", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}], "]"}], ":=", RowBox[{"ELEMENTFORM", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ELEMENTFORM", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Delta]WW", ",", "dof", ",", "\[Delta]dof", ",", "equ", ",", "frule", ",", "ind", ",", "\[Delta]ind"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"Simplify", "[", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"ind", " ", "=", RowBox[{"Union", "[", RowBox[{"dof", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"uX", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"ux", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"uY", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"uy", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"uZ", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"uz", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Theta]X", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Theta]x", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Theta]Y", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Theta]y", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Theta]Z", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Theta]z", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"Flatten", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", " ", RowBox[{ RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"uX", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"ux", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"uY", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"uy", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"uZ", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"uz", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"\[Theta]X", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"\[Theta]x", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"\[Theta]Y", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"\[Theta]y", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"\[Theta]Z", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"\[Theta]z", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "ind"}], "}"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]ind", " ", "=", RowBox[{"Union", "[", RowBox[{"\[Delta]dof", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"\[Delta]uX", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]ux", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]uY", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]uy", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]uZ", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]uz", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]X", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]Y", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]Z", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]dof", "=", RowBox[{"Flatten", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", " ", RowBox[{ RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]uX", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]ux", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]uY", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]uy", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]uZ", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]uz", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]\[Theta]X", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]\[Theta]Y", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]\[Theta]Z", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "\[Delta]ind"}], "}"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"frule", " ", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"\[Delta]uX", "[", "any__", "]"}], "\[Rule]", RowBox[{"FX", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Delta]ux", "[", "any__", "]"}], "\[Rule]", RowBox[{"Fx", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Delta]uY", "[", "any__", "]"}], "\[Rule]", RowBox[{"FY", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Delta]uy", "[", "any__", "]"}], "\[Rule]", RowBox[{"Fy", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Delta]uZ", "[", "any__", "]"}], "\[Rule]", RowBox[{"FZ", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Delta]uz", "[", "any__", "]"}], "\[Rule]", RowBox[{"Fz", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]X", "[", "any__", "]"}], "\[Rule]", RowBox[{"MX", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "any__", "]"}], "\[Rule]", RowBox[{"Mx", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]Y", "[", "any__", "]"}], "\[Rule]", RowBox[{"MY", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "any__", "]"}], "\[Rule]", RowBox[{"My", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]Z", "[", "any__", "]"}], "\[Rule]", RowBox[{"MZ", "[", "any", "]"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "any__", "]"}], "\[Rule]", RowBox[{"Mz", "[", "any", "]"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{"\[Delta]dof", " ", "/.", "frule"}], "]"}], ",", "\"\< = \>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"-", RowBox[{"D", "[", RowBox[{ RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}], ",", RowBox[{"{", "dof", "}"}]}], "]"}]}], "]"}], "]"}], ",", "\[IndentingNewLine]", "\"\<\>\"", ",", RowBox[{"MatrixForm", "[", "dof", "]"}], ",", "\"\<-\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", "0"}], "]"}]}], "]"}], "]"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Delta]WW", ",", "dof", ",", "\[Delta]dof", ",", "equ", ",", "ind", ",", "\[Delta]ind"}], " ", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"Simplify", "[", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"ind", " ", "=", RowBox[{"Union", "[", RowBox[{"dof", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"uX", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"ux", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"uY", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"uy", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"uZ", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"uz", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Theta]X", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Theta]x", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Theta]Y", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Theta]y", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Theta]Z", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Theta]z", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"Flatten", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", " ", RowBox[{ RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"uX", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"ux", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"uY", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"uy", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"uZ", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"uz", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"\[Theta]X", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"\[Theta]x", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"\[Theta]Y", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"\[Theta]y", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"\[Theta]Z", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"dof", ",", RowBox[{"\[Theta]z", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "ind"}], "}"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]ind", " ", "=", RowBox[{"Union", "[", RowBox[{"\[Delta]dof", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"\[Delta]uX", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]ux", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]uY", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]uy", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]uZ", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]uz", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]X", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]x", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]Y", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]y", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]Z", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}], ",", RowBox[{ RowBox[{"\[Delta]\[Theta]z", "[", "any__", "]"}], "\[Rule]", RowBox[{"{", "any", "}"}]}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]dof", "=", RowBox[{"Flatten", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", " ", RowBox[{ RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]uX", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]ux", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]uY", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]uy", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]uZ", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]uz", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]\[Theta]X", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]\[Theta]x", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]\[Theta]Y", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]\[Theta]y", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]\[Theta]Z", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cases", "[", RowBox[{"\[Delta]dof", ",", RowBox[{"\[Delta]\[Theta]z", "[", RowBox[{"i", " ", "/.", RowBox[{"List", "\[Rule]", "Sequence"}]}], "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "\[Delta]ind"}], "}"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\<\[Delta]W = -\>\"", ",", SuperscriptBox[ RowBox[{"MatrixForm", "[", "\[Delta]dof", "]"}], "T"], ",", "\"\<(\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"-", RowBox[{"D", "[", RowBox[{ RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}], ",", RowBox[{"{", "dof", "}"}]}], "]"}]}], "]"}], "]"}], ",", "\[IndentingNewLine]", "\"\<\>\"", ",", RowBox[{"MatrixForm", "[", "dof", "]"}], ",", "\"\<-\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", "0"}], "]"}]}], "]"}], "]"}], ",", "\"\<)\>\""}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Delta]WW", ",", "dof", ",", "\[Delta]dof", ",", "equ", ",", "ind", ",", "\[Delta]ind"}], " ", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"Simplify", "[", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"DISP", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\<\[Delta]W = -\>\"", ",", SuperscriptBox[ RowBox[{"MatrixForm", "[", "\[Delta]dof", "]"}], "T"], ",", "\"\<(\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"-", RowBox[{"D", "[", RowBox[{ RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}], ",", RowBox[{"{", "dof", "}"}]}], "]"}]}], "]"}], "]"}], ",", "\[IndentingNewLine]", "\"\<\>\"", ",", RowBox[{"MatrixForm", "[", "dof", "]"}], ",", "\"\<-\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", "0"}], "]"}]}], "]"}], "]"}], ",", "\"\<)\>\""}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "TMEC", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Delta]WW", ",", "dof", ",", "\[Delta]dof", ",", "equ", ",", "ind", ",", "\[Delta]ind"}], " ", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"Simplify", "[", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"TMEC", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\<\[Delta]W = -\>\"", ",", SuperscriptBox[ RowBox[{"MatrixForm", "[", "\[Delta]dof", "]"}], "T"], ",", "\"\<(\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"-", RowBox[{"D", "[", RowBox[{ RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}], ",", RowBox[{"{", "dof", "}"}]}], "]"}]}], "]"}], "]"}], ",", "\[IndentingNewLine]", "\"\<\>\"", ",", RowBox[{"MatrixForm", "[", "dof", "]"}], ",", "\"\<-\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", "0"}], "]"}]}], "]"}], "]"}], ",", "\"\<)\>\""}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", RowBox[{"EVENT", ",", RowBox[{"{", RowBox[{"s0_", ",", "sol0_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "STAB", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Delta]WW", ",", "dof", ",", "\[Delta]dof", ",", "equ"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"Simplify", "[", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STAB", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Simplify", "[", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\<\[Delta]W = -\>\"", ",", SuperscriptBox[ RowBox[{"MatrixForm", "[", "\[Delta]dof", "]"}], "T"], ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", "equ", "]"}], "]"}]}], " ", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "STAB", "}"}], ",", "\[Delta]WW_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"dof", ",", "\[Delta]dof", ",", "equ"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Simplify", "[", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\<\[Delta]W = -\>\"", ",", SuperscriptBox[ RowBox[{"MatrixForm", "[", "\[Delta]dof", "]"}], "T"], ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", "equ", "]"}], "]"}]}], " ", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "NONL", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Delta]WW", ",", "dof", ",", "\[Delta]dof", ",", "equ"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"Simplify", "[", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"NONL", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Simplify", "[", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\<\[Delta]W = -\>\"", ",", SuperscriptBox[ RowBox[{"MatrixForm", "[", "\[Delta]dof", "]"}], "T"], ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"-", "equ"}], "]"}], "]"}]}], " ", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", RowBox[{"NONL", ",", "rule0_"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Delta]WW", ",", "dof", ",", "\[Delta]dof", ",", "equ"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"Simplify", "[", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"NONL", ",", "rule0"}], "}"}], ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Simplify", "[", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\<\[Delta]W = -\>\"", ",", SuperscriptBox[ RowBox[{"MatrixForm", "[", "\[Delta]dof", "]"}], "T"], ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"-", "equ"}], "]"}], "]"}]}], " ", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", RowBox[{"NONL", ",", "rule0_"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Delta]WW", ",", "dof", ",", "\[Delta]dof", ",", "equ"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"Simplify", "[", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{ RowBox[{"{", RowBox[{"NONL", ",", "rule0"}], "}"}], ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", "=", RowBox[{"Simplify", "[", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\<\[Delta]W = -\>\"", ",", SuperscriptBox[ RowBox[{"MatrixForm", "[", "\[Delta]dof", "]"}], "T"], ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"-", "equ"}], "]"}], "]"}]}], " ", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "VIBR", "}"}], ",", "\[Delta]W_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "dof", ",", "\[Delta]dof", ",", "equ", ",", "dofall", ",", "dof0", ",", "dof2", ",", "KK", ",", "MM"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]W", "]"}]}], ";", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]W", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", " ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]W", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dofall", "=", RowBox[{"Union", "[", RowBox[{"dof", " ", "/.", " ", RowBox[{ RowBox[{"anya_", "[", RowBox[{"anyb__", ",", RowBox[{"0", "|", "2"}]}], "]"}], "\[Rule]", RowBox[{"anya", "[", "anyb", "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof0", " ", "=", RowBox[{"dofall", " ", "/.", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dof2", " ", "=", RowBox[{"dofall", "/.", " ", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"KK", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof0", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof2", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\<\[Delta]W = -\>\"", ",", SuperscriptBox[ RowBox[{"MatrixForm", "[", "\[Delta]dof", "]"}], "T"], ",", "\"\<(\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"-", "KK"}], "]"}], "]"}], ",", "\[IndentingNewLine]", "\"\<\>\"", ",", RowBox[{"MatrixForm", "[", "dof0", "]"}], ",", "\"\<+\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"-", "MM"}], "]"}], "]"}], ",", "\[IndentingNewLine]", "\"\<\>\"", ",", RowBox[{"MatrixForm", "[", "dof2", "]"}], ",", "\"\<-\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"equ", " ", "/.", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", "0"}], "]"}]}], "]"}], ",", "\"\<)\>\""}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{ RowBox[{"{", "VIBR", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Delta]WW", ",", "dof", ",", "\[Delta]dof", ",", "equ", ",", "dofall", ",", "dof0", ",", "dof2", ",", "KK", ",", "MM"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]WW", "=", RowBox[{"Simplify", "[", RowBox[{"Apply", "[", RowBox[{"Plus", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"VIBR", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof", "=", RowBox[{"DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]dof", "=", RowBox[{"\[Delta]DOFS", "[", "\[Delta]WW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"equ", " ", "=", RowBox[{"D", "[", RowBox[{"\[Delta]WW", ",", RowBox[{"{", "\[Delta]dof", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dofall", "=", RowBox[{"Union", "[", RowBox[{"dof", " ", "/.", " ", RowBox[{ RowBox[{"anya_", "[", RowBox[{"anyb_", ",", RowBox[{"0", "|", "2"}]}], "]"}], "\[Rule]", RowBox[{"anya", "[", "anyb", "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"dof0", " ", "=", RowBox[{"dofall", " ", "/.", " ", RowBox[{"DRULE", "[", "0", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dof2", " ", "=", RowBox[{"dofall", "/.", " ", RowBox[{"DRULE", "[", "2", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"KK", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof0", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"MM", " ", "=", RowBox[{"D", "[", RowBox[{"equ", ",", RowBox[{"{", "dof2", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\<\[Delta]W = -\>\"", ",", SuperscriptBox[ RowBox[{"MatrixForm", "[", "\[Delta]dof", "]"}], "T"], ",", "\"\<(\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"-", "KK"}], "]"}], "]"}], ",", "\[IndentingNewLine]", "\"\<\>\"", ",", RowBox[{"MatrixForm", "[", "dof0", "]"}], ",", "\"\<+\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"-", "MM"}], "]"}], "]"}], ",", "\[IndentingNewLine]", "\"\<\>\"", ",", RowBox[{"MatrixForm", "[", "dof2", "]"}], ",", "\"\<-\>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"equ", " ", "/.", RowBox[{"Thread", "[", RowBox[{"dof", "\[Rule]", "0"}], "]"}]}], "]"}], ",", "\"\<)\>\""}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}], "]"}], ":=", RowBox[{"Grid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"TableForm", "[", RowBox[{"ele", ",", RowBox[{"TableDepth", "\[Rule]", "2"}], ",", RowBox[{"TableHeadings", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"Array", "[", RowBox[{ RowBox[{"#", "&"}], ",", RowBox[{"Length", "[", "ele", "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}], "}"}]}]}], "]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"TableForm", "[", RowBox[{"fun", ",", RowBox[{"TableDepth", "\[Rule]", "2"}], ",", RowBox[{"TableHeadings", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"Array", "[", RowBox[{ RowBox[{"#", "&"}], ",", RowBox[{"Length", "[", "fun", "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{ "\"\<{X,Y,Z}\>\"", ",", "\"\<{\!\(\*SubscriptBox[\(u\), \(X\)]\),\!\(\*SubscriptBox[\ \(u\), \(Y\)]\),\!\(\*SubscriptBox[\(u\), \(Z\)]\)}\>\"", ",", "\"\<{\!\(\*SubscriptBox[\(\[Theta]\), \ \(X\)]\),\!\(\*SubscriptBox[\(\[Theta]\), \(Y\)]\),\!\(\*SubscriptBox[\(\ \[Theta]\), \(Z\)]\)}\>\"", ",", "\"\<\[CurlyTheta]\>\""}], "}"}]}], "}"}]}]}], "]"}], "}"}]}], "}"}], ",", RowBox[{"Alignment", "\[Rule]", "Left"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"MESH", "[", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"pick", ",", "labs", ",", "crds", ",", "\[ScriptCapitalR]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"pick", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Not", "[", RowBox[{"AllTrue", "[", RowBox[{"#", ",", "PossibleZeroQ"}], "]"}], "]"}], "&"}], ",", RowBox[{"Transpose", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{";;", ",", "1"}], "]"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"crds", "=", RowBox[{"Pick", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", "pick"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"labs", "=", RowBox[{"Pick", "[", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], ",", "pick"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[ScriptCapitalR]", "=", RowBox[{"MeshRegion", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{";;", ",", "1", ",", "crds"}], "]"}], "]"}], ",", RowBox[{"ele", "[", RowBox[{"[", RowBox[{";;", ",", "3"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{ RowBox[{"HighlightMesh", "[", RowBox[{"\[ScriptCapitalR]", ",", RowBox[{"Style", "[", RowBox[{"1", ",", "Thin"}], "]"}]}], "]"}], ",", RowBox[{"HighlightMesh", "[", RowBox[{"\[ScriptCapitalR]", ",", "0"}], "]"}], ",", RowBox[{"AxesLabel", "\[Rule]", "labs"}], ",", RowBox[{"Axes", "\[Rule]", "True"}], ",", RowBox[{"SphericalRegion", "\[Rule]", "True"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"DISP", "[", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "pick", ",", "labs", ",", "crds", ",", "\[ScriptCapitalR]", ",", "range", ",", "off"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"pick", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Not", "[", RowBox[{"AllTrue", "[", RowBox[{"#", ",", "PossibleZeroQ"}], "]"}], "]"}], "&"}], ",", RowBox[{"Transpose", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{";;", ",", "1"}], "]"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"crds", "=", RowBox[{"Pick", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", "pick"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"labs", "=", RowBox[{"Pick", "[", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], ",", "pick"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"range", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"MinMax", "[", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{";;", ",", "1", ",", "#"}], "]"}], "]"}], "+", RowBox[{"fun", "[", RowBox[{"[", RowBox[{";;", ",", "2", ",", "#"}], "]"}], "]"}]}], ")"}], "]"}], "&"}], ",", "crds"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"off", "=", RowBox[{"Norm", "[", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], "-", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}]}], "&"}], ",", "range"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"range", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "-", RowBox[{"off", "/", "5"}]}], ",", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], "+", RowBox[{"off", "/", "5"}]}]}], "}"}], "&"}], ",", "range"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[ScriptCapitalR]", "=", RowBox[{"MeshRegion", "[", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{";;", ",", "1", ",", "crds"}], "]"}], "]"}], "+", RowBox[{"fun", "[", RowBox[{"[", RowBox[{";;", ",", "2", ",", "crds"}], "]"}], "]"}]}], ",", RowBox[{"ele", "[", RowBox[{"[", RowBox[{";;", ",", "3"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{ RowBox[{"HighlightMesh", "[", RowBox[{"\[ScriptCapitalR]", ",", RowBox[{"Style", "[", RowBox[{"1", ",", "Thin"}], "]"}]}], "]"}], ",", RowBox[{"HighlightMesh", "[", RowBox[{"\[ScriptCapitalR]", ",", "0"}], "]"}], ",", RowBox[{"AxesLabel", "\[Rule]", "labs"}], ",", RowBox[{"Axes", "\[Rule]", "True"}], ",", RowBox[{"Boxed", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", "range"}], ",", RowBox[{"SphericalRegion", "\[Rule]", "True"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"STRESS", "[", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}], "]"}], ":=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "===", "PLANE"}], ")"}], "||", RowBox[{"(", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "===", "TWODIM"}], ")"}]}], ",", RowBox[{"\[Delta]W", "[", RowBox[{"STRES", ",", "#", ",", "fun"}], "]"}], ",", "None"}], "]"}], "&"}], ",", "ele"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"COLORFUNCTION", "[", RowBox[{"min_", ",", "max_"}], "]"}], ":=", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"#", "<", "0"}], ",", RowBox[{"Blend", "[", RowBox[{ RowBox[{"{", RowBox[{"Blue", ",", "LightGray"}], "}"}], ",", RowBox[{ RowBox[{"(", RowBox[{"#", "-", "min"}], ")"}], "/", RowBox[{"(", RowBox[{"0", "-", "min"}], ")"}]}]}], "]"}], ",", RowBox[{"Blend", "[", RowBox[{ RowBox[{"{", RowBox[{"LightGray", ",", "Red"}], "}"}], ",", RowBox[{ RowBox[{"(", RowBox[{"#", "-", "0"}], ")"}], "/", RowBox[{"(", RowBox[{"max", "-", "0"}], ")"}]}]}], "]"}]}], "]"}], "&"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"stress", " ", "calculations"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"DISP", "[", RowBox[{ RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}], ",", "exp_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "pick", ",", "labs", ",", "crds", ",", "srule", ",", "val", ",", "min", ",", "max", ",", "grule"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"pick", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Not", "[", RowBox[{"AllTrue", "[", RowBox[{"#", ",", "PossibleZeroQ"}], "]"}], "]"}], "&"}], ",", RowBox[{"Transpose", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{";;", ",", "1"}], "]"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"crds", "=", RowBox[{"Pick", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", "pick"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"labs", "=", RowBox[{"Pick", "[", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], ",", "pick"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"srule", " ", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"\[Delta]W", "[", RowBox[{"STRES", ",", "#", ",", "fun"}], "]"}], "&"}], ",", "ele"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"val", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"exp", " ", "/.", "#"}], "&"}], ",", "srule"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", "val", "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"min", ",", "max"}], "}"}], "=", RowBox[{"MinMax", "[", "val", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"grule", " ", ":=", RowBox[{ RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "\[RuleDelayed]", " ", RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "1", ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}], "+", RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], ",", "2", ",", RowBox[{"1", ";;", "2"}]}], "]"}], "]"}]}], ")"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{ RowBox[{"Graphics", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"COLORFUNCTION", "[", RowBox[{"min", ",", "max"}], "]"}], "[", RowBox[{"val", "[", RowBox[{"[", "e", "]"}], "]"}], "]"}], ",", RowBox[{ RowBox[{"ele", "[", RowBox[{"[", RowBox[{"e", ",", "3"}], "]"}], "]"}], "/.", "grule"}]}], "}"}], ",", RowBox[{"{", RowBox[{"e", ",", "1", ",", RowBox[{"Length", "[", "ele", "]"}]}], "}"}]}], "]"}], "]"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", "labs"}]}], "]"}]}]}], " ", "\[IndentingNewLine]", "]"}]}], ";"}], " ", "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.443930973126174*^9, {3.4771023549018*^9, 3.4771023808445997`*^9}, { 3.4771024577682*^9, 3.4771025046618*^9}, {3.4771063565654*^9, 3.4771063705898*^9}, 3.4771089762209997`*^9, 3.477109006645*^9, { 3.4771109395810003`*^9, 3.4771109526226*^9}, {3.477110989427*^9, 3.4771110302522*^9}, {3.4771110800372*^9, 3.4771111191308002`*^9}, { 3.4771220486066*^9, 3.4771220663286*^9}, {3.4771317865394*^9, 3.4771318192214003`*^9}, {3.4771323345362*^9, 3.477132377639*^9}, { 3.630489883760623*^9, 3.630489885414226*^9}, {3.631409232246135*^9, 3.631409318077486*^9}, {3.6314094294772816`*^9, 3.631409430304083*^9}, { 3.6314095931215687`*^9, 3.6314095963195744`*^9}, {3.6314105089523773`*^9, 3.631410515504389*^9}, 3.631435133305333*^9, {3.631435355203025*^9, 3.6314353561500793`*^9}, 3.6314356018121305`*^9, 3.631435754368856*^9, 3.631435796315255*^9, {3.63143606319652*^9, 3.631436069549884*^9}, { 3.6347884698816414`*^9, 3.63478847685104*^9}, {3.6347954098385844`*^9, 3.6347954141598315`*^9}, {3.6347956603329115`*^9, 3.634795675947805*^9}, { 3.634796217815798*^9, 3.6347962287334223`*^9}, {3.6347962930030985`*^9, 3.6347963097820582`*^9}, {3.63479634495407*^9, 3.6347963538665795`*^9}, { 3.6347967044436316`*^9, 3.6347967222076473`*^9}, {3.6348910182399282`*^9, 3.6348910703229065`*^9}, {3.634891202082443*^9, 3.63489120569665*^9}, { 3.635129073304618*^9, 3.6351290927607307`*^9}, {3.6351291514160852`*^9, 3.6351291562713633`*^9}, {3.6351296027379*^9, 3.635129640630067*^9}, { 3.6351296766311264`*^9, 3.6351296770091476`*^9}, {3.635133864772954*^9, 3.6351340703167105`*^9}, {3.635134178738912*^9, 3.635134204883407*^9}, { 3.6351532590142465`*^9, 3.6351534908115044`*^9}, {3.6353108694909534`*^9, 3.635310875829316*^9}, {3.657768370048919*^9, 3.6577683714841213`*^9}, { 3.6853593982958508`*^9, 3.6853593994858527`*^9}, 3.685359462505941*^9, { 3.685359541326051*^9, 3.685359573806097*^9}, {3.6874387445294027`*^9, 3.687438822019511*^9}, 3.6874389450596833`*^9, {3.6874389956197543`*^9, 3.6874390405998173`*^9}, {3.6874391238499336`*^9, 3.6874391937200317`*^9}, {3.6874392244700747`*^9, 3.687439453750396*^9}, { 3.687439572800562*^9, 3.68743958546058*^9}, {3.68743962102063*^9, 3.687439653600675*^9}, {3.6874397535808153`*^9, 3.6874397667108335`*^9}, 3.6874457948947306`*^9, {3.6874461481952252`*^9, 3.6874461564952374`*^9}, { 3.6875181522405834`*^9, 3.68751815568078*^9}, {3.6875204157420483`*^9, 3.687520416720104*^9}, 3.68752138033622*^9, {3.687521416058263*^9, 3.687521421832593*^9}, {3.688053601494135*^9, 3.688053602544136*^9}, { 3.688053924504587*^9, 3.688053958964635*^9}, {3.6882157502790403`*^9, 3.6882158044791164`*^9}, {3.6882622853518825`*^9, 3.6882623772920113`*^9}, {3.688262410942058*^9, 3.688262438992098*^9}, { 3.6883055547978315`*^9, 3.6883055581478367`*^9}, 3.6885556940086794`*^9, { 3.6887891056829405`*^9, 3.688789118792959*^9}, {3.689569235320521*^9, 3.6895692415105295`*^9}, {3.6895692890105963`*^9, 3.6895693069106207`*^9}, 3.6895693822507267`*^9, {3.689569427000789*^9, 3.6895694482508187`*^9}, 3.6895694919908876`*^9, {3.6895695387109528`*^9, 3.689569578131008*^9}, { 3.689569627301077*^9, 3.689569645991103*^9}, {3.6895697401912346`*^9, 3.6895697702212768`*^9}, 3.6895698011213202`*^9, {3.689744714260333*^9, 3.6897447652504044`*^9}, {3.689744965010684*^9, 3.689744999060732*^9}, { 3.689745080870846*^9, 3.6897450850308523`*^9}, {3.689931309632269*^9, 3.6899314628124833`*^9}, {3.6899315289025755`*^9, 3.6899315295525765`*^9}, 3.6899317777829237`*^9, {3.6899318153929768`*^9, 3.6899319421931543`*^9}, { 3.6899320773633437`*^9, 3.6899320881033583`*^9}, {3.689932151873448*^9, 3.6899321525034485`*^9}, {3.690167105883365*^9, 3.690167146283422*^9}, { 3.6902010125655856`*^9, 3.6902010371956205`*^9}, {3.690201134205756*^9, 3.6902011393057632`*^9}, {3.6902012251758833`*^9, 3.6902012529259224`*^9}, {3.690201324926023*^9, 3.690201330666031*^9}, { 3.690201373796091*^9, 3.6902013758560944`*^9}, {3.692601858964926*^9, 3.692601979185094*^9}, {3.692602032125168*^9, 3.692602087355245*^9}, { 3.692602118515289*^9, 3.6926021393253183`*^9}, {3.6926022282954426`*^9, 3.6926022417854614`*^9}, {3.6926023345055914`*^9, 3.6926024870358047`*^9}, {3.692602578835933*^9, 3.692602643676024*^9}, { 3.692602680546076*^9, 3.6926027938862343`*^9}, {3.6926033898490686`*^9, 3.69260341914911*^9}, {3.6926034700191813`*^9, 3.6926034970292187`*^9}, { 3.692603554029299*^9, 3.692603577969332*^9}, 3.692603688499487*^9, { 3.6926038593097258`*^9, 3.692603862659731*^9}, {3.692604812853061*^9, 3.692604831743088*^9}, {3.6926231439402156`*^9, 3.6926232412303514`*^9}, { 3.692690175958668*^9, 3.692690189128687*^9}, {3.6926902468687677`*^9, 3.692690268088797*^9}, {3.6926903035588465`*^9, 3.692690322168873*^9}, { 3.692690954409758*^9, 3.6926910022098246`*^9}, {3.6927712759197345`*^9, 3.6927713146397886`*^9}, {3.6931903688317842`*^9, 3.693190412011845*^9}, { 3.693190453611903*^9, 3.693190645072171*^9}, {3.693190734522297*^9, 3.6931907666223416`*^9}, {3.6931908229324207`*^9, 3.69319083728244*^9}, { 3.6931909707526274`*^9, 3.693190977632637*^9}, {3.693191099552808*^9, 3.693191167062902*^9}, {3.693380931925725*^9, 3.6933809742257843`*^9}, { 3.693381048845889*^9, 3.6933810491658893`*^9}, {3.6937172796980753`*^9, 3.6937172962480984`*^9}, 3.6940830696432643`*^9, {3.694265186313383*^9, 3.6942652017534046`*^9}, {3.6943214452576447`*^9, 3.694321472597683*^9}, { 3.694321554517798*^9, 3.6943215869878435`*^9}, {3.694321622098892*^9, 3.6943216224888935`*^9}, 3.6994204614383593`*^9, {3.699421287129515*^9, 3.6994212950795264`*^9}, {3.6994213310795765`*^9, 3.6994213778796425`*^9}, 3.6994215436398745`*^9, {3.7242984497704906`*^9, 3.7242984923330016`*^9}, { 3.72441256854047*^9, 3.7244125884060483`*^9}, {3.724423663595652*^9, 3.7244236935801315`*^9}, {3.7244238000272264`*^9, 3.724423808981761*^9}, { 3.724423851341444*^9, 3.72442385406735*^9}, 3.7531742584901376`*^9, { 3.75317433551407*^9, 3.753174346315694*^9}, {3.7531744883509235`*^9, 3.7531745210492754`*^9}, {3.753174634967907*^9, 3.7531746472931037`*^9}, { 3.753175721657942*^9, 3.7531757255294914`*^9}, {3.7557182025229635`*^9, 3.7557182030038967`*^9}, {3.756297307135029*^9, 3.756297308897887*^9}, { 3.7606708035908995`*^9, 3.7606708139790516`*^9}, {3.760670898506214*^9, 3.760670900521375*^9}, {3.7739914305755105`*^9, 3.7739914316320434`*^9}, { 3.7821126248524623`*^9, 3.7821126618917875`*^9}, {3.7821128287376575`*^9, 3.782113058088851*^9}, 3.7821131332211285`*^9, {3.78230654015934*^9, 3.782306645788203*^9}, {3.7823084511158514`*^9, 3.7823084719170256`*^9}, { 3.7823089681411147`*^9, 3.782309014159138*^9}, {3.7823090529903145`*^9, 3.782309098299096*^9}, {3.7834165730387535`*^9, 3.783416574885394*^9}, { 3.7834177206360197`*^9, 3.7834177235800114`*^9}, {3.7834178083523865`*^9, 3.783417811301102*^9}, {3.78341790496704*^9, 3.7834179579660645`*^9}, { 3.7834205477524905`*^9, 3.783420592682665*^9}, {3.7834206239423256`*^9, 3.783420694447334*^9}, {3.783420731072624*^9, 3.7834207678524528`*^9}, { 3.783420801192772*^9, 3.7834208184926167`*^9}, {3.7834208900921984`*^9, 3.7834208997123528`*^9}, {3.7834209626227193`*^9, 3.783420995272684*^9}, 3.783421034482338*^9, {3.7834210681022635`*^9, 3.7834210798275776`*^9}, { 3.783421113532735*^9, 3.7834211771988773`*^9}, {3.783421696697568*^9, 3.7834216971028566`*^9}, {3.7834218696329055`*^9, 3.783421906748032*^9}, { 3.7883262853435993`*^9, 3.7883263022151365`*^9}, {3.7883263694714775`*^9, 3.788326373049384*^9}, 3.788326407340768*^9, {3.788326462030433*^9, 3.7883264759465675`*^9}, {3.7883266381172643`*^9, 3.7883266752530084`*^9}, {3.78832683682738*^9, 3.788326853529421*^9}, { 3.788327257534025*^9, 3.7883272687062693`*^9}, {3.788575008576598*^9, 3.7885750852092667`*^9}, {3.7885752039321165`*^9, 3.7885752254012146`*^9}, {3.788677105989899*^9, 3.7886771563854265`*^9}, { 3.788677419098531*^9, 3.7886776914502583`*^9}, {3.788677863953772*^9, 3.788677873982659*^9}, {3.788677972296945*^9, 3.7886779751198874`*^9}, { 3.788678104512977*^9, 3.788678132702388*^9}, {3.788678229588771*^9, 3.7886782311665745`*^9}, {3.7886782945295157`*^9, 3.7886783636952543`*^9}, {3.7886784043995614`*^9, 3.788678410344158*^9}, { 3.788678513776554*^9, 3.7886785139327545`*^9}, {3.7887492506266127`*^9, 3.788749271502985*^9}, {3.7887494537067327`*^9, 3.7887494576578264`*^9}, { 3.7888494712317395`*^9, 3.788849476626989*^9}, {3.7890121503559027`*^9, 3.7890121818326073`*^9}, 3.789567712832692*^9, {3.790128896256201*^9, 3.790128897703824*^9}, {3.7901289319915466`*^9, 3.790128937645911*^9}, { 3.790128972298277*^9, 3.790128973869923*^9}, {3.8146823682070165`*^9, 3.814682369609891*^9}, {3.8146824749880943`*^9, 3.8146825013459005`*^9}, { 3.8146825650091476`*^9, 3.814682574936365*^9}, {3.814682678090005*^9, 3.8146827094381466`*^9}, {3.8146827427363567`*^9, 3.8146827504312325`*^9}, {3.814682781533187*^9, 3.814682798049752*^9}, { 3.814683865904718*^9, 3.814683921031538*^9}, {3.817549572368679*^9, 3.817549648245356*^9}, {3.8223698040336294`*^9, 3.8223698883671684`*^9}, { 3.822370507521001*^9, 3.8223705081203985`*^9}, {3.822370624230193*^9, 3.8223706400618677`*^9}}, CellLabel-> "In[284]:=",ExpressionUUID->"6ecadde8-ad0e-42ff-a3d9-ff07b146b3fd"] }, Closed]], Cell[CellGroupData[{ Cell["POST defs", "Subsection",ExpressionUUID->"3d4d5ab8-5457-4359-9752-7ace1683ea66"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Clear", "[", RowBox[{"SHOW", ",", "GRAPH"}], "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"box", " ", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "}"}], "*", "1.5"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"jointsize", " ", "=", "0.02"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"scale", " ", "=", "1."}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"aspectratio", "=", RowBox[{"1", "/", "4"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"PRINT", "[", RowBox[{"label_", ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], " ", ":=", " ", RowBox[{"Print", "[", RowBox[{"label", ",", "\"\< \>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"ele", ",", RowBox[{"TableDepth", "\[Rule]", "2"}]}], "]"}], ",", "\"\< \>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"fun", ",", RowBox[{"TableDepth", "\[Rule]", "2"}]}], "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"PRINT", "[", RowBox[{"label_", ",", RowBox[{"{", "tab_", "}"}]}], "]"}], " ", ":=", " ", RowBox[{"Print", "[", RowBox[{"label", ",", "\"\< \>\"", ",", RowBox[{"MatrixForm", "[", RowBox[{"tab", ",", RowBox[{"TableDepth", "\[Rule]", "2"}]}], "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SHOW", "[", RowBox[{"var_", ",", "rule_", ",", "time_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"nn", ",", "ne", ",", "sol"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"nn", "=", RowBox[{"Length", "[", "time", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ne", " ", "=", RowBox[{"Length", "[", "var", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"sol", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"time", "[", RowBox[{"[", "ii", "]"}], "]"}], ",", RowBox[{"(", RowBox[{ RowBox[{"var", "[", RowBox[{"[", "jj", "]"}], "]"}], " ", "/.", " ", RowBox[{"rule", "[", RowBox[{"[", "ii", "]"}], "]"}]}], ")"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", "nn"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ListPlot", "[", RowBox[{"sol", ",", RowBox[{"Joined", "\[Rule]", "True"}], ",", RowBox[{"Frame", "\[Rule]", " ", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", " ", "All"}], ",", RowBox[{"AspectRatio", "\[Rule]", "aspectratio"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", "ne"}], "}"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SHOW", "[", RowBox[{ RowBox[{"{", RowBox[{"MODE", ",", "step_", ",", "time_"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "funin_"}], "}"}]}], "]"}], ":=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", " ", "=", " ", RowBox[{"funin", " ", "/.", " ", RowBox[{"t", " ", "\[Rule]", " ", "#"}]}]}], ";", " ", RowBox[{"SHOW", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}]}], "]"}]}], ")"}], "&"}], ",", "time"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SHOW", "[", RowBox[{ RowBox[{"{", RowBox[{"STAB", ",", "rule_"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "funin_"}], "}"}]}], "]"}], ":=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", " ", "=", " ", RowBox[{"funin", " ", "/.", " ", "#"}]}], ";", " ", RowBox[{"SHOW", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}]}], "]"}]}], ")"}], "&"}], ",", "rule"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SHOW", "[", RowBox[{ RowBox[{"{", RowBox[{"DG", ",", "rule_", ",", "time_"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "funin_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "localrule", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"localrule", " ", "=", RowBox[{"rule", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"a", "[", RowBox[{"b_", ",", "0"}], "]"}], "\[Rule]", " ", RowBox[{"a", "[", "b", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", " ", RowBox[{"(", RowBox[{"funin", " ", "/.", RowBox[{"localrule", "[", RowBox[{"[", "ii", "]"}], "]"}]}], ")"}]}], ";", " ", RowBox[{"SHOW", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", RowBox[{"Length", "[", "rule", "]"}]}], "}"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SHOW", "[", RowBox[{ RowBox[{"{", "DISP", "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Show", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], ",", RowBox[{"Axes", "\[Rule]", " ", "True"}], ",", RowBox[{"Boxed", "\[Rule]", "True"}], ",", RowBox[{"SphericalRegion", " ", "\[Rule]", " ", "True"}], ",", RowBox[{"Lighting", "\[Rule]", "Automatic"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}], ",", RowBox[{"PlotRange", "\[Rule]", "box"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SHOW", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "rule_"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Show", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{"{", RowBox[{"ele", ",", RowBox[{"fun", " ", "/.", "rule"}]}], "}"}], "]"}], ",", RowBox[{"Axes", "\[Rule]", " ", "True"}], ",", RowBox[{"Boxed", "\[Rule]", "True"}], ",", RowBox[{"SphericalRegion", " ", "\[Rule]", " ", "True"}], ",", RowBox[{"Lighting", "\[Rule]", "None"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}], ",", RowBox[{"PlotRange", "\[Rule]", "box"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}], "]"}], ":=", RowBox[{"Flatten", "[", RowBox[{"Join", "[", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", "#", "]"}], "&"}], ",", "ele"}], "]"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ "FX_", ",", "FY_", ",", "FZ_", ",", "MX_", ",", "MY_", ",", "MZ_"}], "}"}], ",", RowBox[{"{", "I1_", "}"}]}], "}"}], "]"}], ":=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", RowBox[{"{", RowBox[{"GLUE", ",", RowBox[{"{", RowBox[{"{", RowBox[{"kx_", ",", "ky_"}], "}"}], "}"}], ",", RowBox[{"{", RowBox[{"I1_", ",", "I2_"}], "}"}]}], "}"}], "]"}], ":=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", RowBox[{"{", RowBox[{"GLUE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"kx_", ",", "ky_", ",", "kz_"}], "}"}], ",", RowBox[{"{", RowBox[{"z1_", ",", "z2_", ",", "iy_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_", ",", "I4_"}], "}"}]}], "}"}], "]"}], ":=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", RowBox[{"{", RowBox[{"GLUE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"kx_", ",", "ky_", ",", "kz_"}], "}"}], ",", RowBox[{"{", RowBox[{"z1_", ",", "z2_", ",", "ty_", ",", "iy_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "I1_", ",", "I2_", ",", "I3_", ",", "I4_", ",", "I5_", ",", "I6_"}], "}"}]}], "}"}], "]"}], ":=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", RowBox[{"{", RowBox[{"GLUET", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"kx_", ",", "ky_", ",", "kz_"}], "}"}], ",", RowBox[{"{", RowBox[{"z1_", ",", "z2_", ",", "ty_", ",", "iy_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ "I1_", ",", "I2_", ",", "I3_", ",", "I4_", ",", "I5_", ",", "I6_"}], "}"}]}], "}"}], "]"}], ":=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "mm_", ",", "Ixx_", ",", "Iyy_", ",", "Izz_", ",", "ix_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{ "Fx_", ",", "Fy_", ",", "Fz_", ",", "Mx_", ",", "My_", ",", "Mz_"}], "}"}]}], "}"}], ",", RowBox[{"{", "I1_", "}"}]}], "}"}], "]"}], ":=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "AA_", "}"}], ",", RowBox[{"{", "fx_", "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"I1_", ",", "I2_"}], "}"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"Thickness", "[", "0.005", "]"}], ",", "Black", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"XYZ", "[", "I1", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I1", "]"}], "*", "scale"}]}], ",", RowBox[{ RowBox[{"XYZ", "[", "I2", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I2", "]"}], "*", "scale"}]}]}], " ", "}"}], "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "jointsize", "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I1", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I1", "]"}], "*", "scale"}]}], "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I2", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I2", "]"}], "*", "scale"}]}], "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", RowBox[{"{", RowBox[{"BAR", ",", "list_", ",", RowBox[{"{", RowBox[{"I1_", ",", "I2_"}], "}"}]}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"Thickness", "[", "0.005", "]"}], ",", "Black", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"XYZ", "[", "I1", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I1", "]"}], "*", "scale"}]}], ",", RowBox[{ RowBox[{"XYZ", "[", "I2", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I2", "]"}], "*", "scale"}]}]}], " ", "}"}], "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "jointsize", "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I1", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I1", "]"}], "*", "scale"}]}], "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I2", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I2", "]"}], "*", "scale"}]}], "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Irr_", ",", "Iyy_", ",", "Izz_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"I1_", ",", "I2_"}], "}"}]}], "}"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "ix", ",", "hx", ",", "iz", ",", "ty", ",", "tz", ",", "\[CapitalOmega]", ",", "NL", ",", "NC", ",", "XX", ",", "YY", ",", "ZZ", ",", "uu", ",", "vv", ",", "ww", ",", "\[Phi]\[Phi]", ",", "\[CapitalTheta]\[CapitalTheta]", ",", "\[Psi]\[Psi]", ",", "XYZN"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"ix", ",", "hx"}], "}"}], "=", RowBox[{"UNIT", "[", RowBox[{ RowBox[{"XYZ", "[", "I2", "]"}], "-", RowBox[{"XYZ", "[", "I1", "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", "=", RowBox[{"CROSS", "[", RowBox[{"ix", ",", "iy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ty", " ", "=", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"12", "*", RowBox[{"Iyy", "/", "AA"}]}], "]"}], "/", "2"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"tz", " ", "=", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"12", "*", RowBox[{"Izz", "/", "AA"}]}], "]"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"{", "0", "}"}], ",", RowBox[{"{", "hx", "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NL", "=", " ", RowBox[{"SHAPES1", "[", " ", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "x"}], "}"}], ",", "\[CapitalOmega]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NC", "=", " ", RowBox[{"SHAPES11", "[", " ", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "x", ",", RowBox[{"x", "^", "2"}], ",", RowBox[{"x", "^", "3"}]}], "}"}], ",", "\[CapitalOmega]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"XX", "=", " ", RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"X", "[", "I1", "]"}], ",", RowBox[{"X", "[", "I2", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"YY", "=", " ", RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"Y", "[", "I1", "]"}], ",", RowBox[{"Y", "[", "I2", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"ZZ", "=", " ", RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"Z", "[", "I1", "]"}], ",", RowBox[{"Z", "[", "I2", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"uu", "=", " ", RowBox[{ RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"ix", ".", RowBox[{"UVW", "[", "I1", "]"}]}], ",", RowBox[{"ix", ".", RowBox[{"UVW", "[", "I2", "]"}]}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"vv", "=", " ", RowBox[{ RowBox[{"NC", ".", RowBox[{"{", RowBox[{ RowBox[{"iy", ".", RowBox[{"UVW", "[", "I1", "]"}]}], ",", RowBox[{"iz", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I1", "]"}]}], ",", RowBox[{"iy", ".", RowBox[{"UVW", "[", "I2", "]"}]}], ",", RowBox[{"iz", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I2", "]"}]}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"ww", "=", " ", RowBox[{ RowBox[{"NC", ".", RowBox[{"{", RowBox[{ RowBox[{"iz", ".", RowBox[{"UVW", "[", "I1", "]"}]}], ",", RowBox[{"-", RowBox[{"iy", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I1", "]"}]}]}], ",", RowBox[{"iz", ".", RowBox[{"UVW", "[", "I2", "]"}]}], ",", RowBox[{"-", RowBox[{"iy", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I2", "]"}]}]}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]\[Phi]", "=", " ", RowBox[{ RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"ix", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I1", "]"}]}], ",", RowBox[{"ix", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I2", "]"}]}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalTheta]\[CapitalTheta]", "=", RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "ww"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]\[Psi]", "=", " ", RowBox[{ SubscriptBox["\[PartialD]", "x"], "vv"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"XYZN", "[", RowBox[{"y_", ",", "z_"}], "]"}], "=", RowBox[{ RowBox[{"{", RowBox[{"XX", ",", "YY", ",", "ZZ"}], "}"}], "+", RowBox[{"ix", "*", "uu"}], "+", RowBox[{"iy", "*", RowBox[{"(", RowBox[{"y", "+", "vv"}], ")"}]}], "+", RowBox[{"iz", "*", RowBox[{"(", RowBox[{"z", "+", "ww"}], ")"}]}], "+", RowBox[{"CROSS", "[", RowBox[{ RowBox[{ RowBox[{"ix", "*", "\[Phi]\[Phi]"}], "+", RowBox[{"iy", "*", "\[CapitalTheta]\[CapitalTheta]"}], "+", RowBox[{"iz", "*", "\[Psi]\[Psi]"}]}], ",", RowBox[{ RowBox[{"iy", "*", "y"}], "+", RowBox[{"iz", "*", "z"}]}]}], "]"}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"Join", "[", " ", RowBox[{ RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FaceForm", "[", "Gray", "]"}], ",", RowBox[{ RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"XYZN", "[", RowBox[{"ty", ",", "tz"}], "]"}], ",", RowBox[{"XYZN", "[", RowBox[{ RowBox[{"-", "ty"}], ",", "tz"}], "]"}], ",", RowBox[{"XYZN", "[", RowBox[{ RowBox[{"-", "ty"}], ",", RowBox[{"-", "tz"}]}], "]"}], ",", RowBox[{"XYZN", "[", RowBox[{"ty", ",", RowBox[{"-", "tz"}]}], "]"}]}], "}"}], " ", "]"}], "/.", RowBox[{"x", "\[Rule]", "xr"}]}]}], "}"}], ",", " ", RowBox[{"{", RowBox[{"xr", ",", "0", ",", "hx", ",", RowBox[{"hx", "/", "20"}]}], "}"}]}], "]"}], " ", ",", RowBox[{"{", "Gray", "}"}], ",", RowBox[{"{", RowBox[{"Line", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"XYZN", "[", RowBox[{"0", ",", "0"}], "]"}], "/.", RowBox[{"x", "\[Rule]", "xr"}]}], ",", RowBox[{"{", RowBox[{"xr", ",", "0", ",", "hx", ",", RowBox[{"hx", "/", "50"}]}], "}"}]}], "]"}], " ", "]"}], "}"}], " ", ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Blue", ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I1", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I1", "]"}], "*", "scale"}]}], "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I2", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I2", "]"}], "*", "scale"}]}], "]"}]}], "}"}]}], " ", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Irr_", ",", "Iyy_", ",", "Izz_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_"}], "}"}]}], "}"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "ix", ",", "hx", ",", "iz", ",", "ty", ",", "tz", ",", "\[CapitalOmega]", ",", "NL", ",", "NC", ",", "XX", ",", "YY", ",", "ZZ", ",", "uu", ",", "vv", ",", "ww", ",", "\[Phi]\[Phi]", ",", "\[CapitalTheta]\[CapitalTheta]", ",", "\[Psi]\[Psi]", ",", "XYZN"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"ix", ",", "hx"}], "}"}], "=", RowBox[{"UNIT", "[", RowBox[{ RowBox[{"XYZ", "[", "I3", "]"}], "-", RowBox[{"XYZ", "[", "I1", "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", "=", RowBox[{"CROSS", "[", RowBox[{"ix", ",", "iy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ty", " ", "=", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"12", "*", RowBox[{"Iyy", "/", "AA"}]}], "]"}], "/", "2"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"tz", " ", "=", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"12", "*", RowBox[{"Izz", "/", "AA"}]}], "]"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"{", "0", "}"}], ",", RowBox[{"{", "hx", "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NL", "=", " ", RowBox[{"SHAPES1", "[", " ", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "x"}], "}"}], ",", "\[CapitalOmega]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NQ", "=", " ", RowBox[{"SHAPES1", "[", " ", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "x", ",", RowBox[{"x", "^", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", "0", "}"}], ",", RowBox[{ RowBox[{"{", "hx", "}"}], "/", "2"}], ",", RowBox[{"{", "hx", "}"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NC", "=", " ", RowBox[{"SHAPES11", "[", " ", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "x", ",", RowBox[{"x", "^", "2"}], ",", RowBox[{"x", "^", "3"}]}], "}"}], ",", "\[CapitalOmega]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"XX", "=", " ", RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"X", "[", "I1", "]"}], ",", RowBox[{"X", "[", "I3", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"YY", "=", " ", RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"Y", "[", "I1", "]"}], ",", RowBox[{"Y", "[", "I3", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"ZZ", "=", " ", RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"Z", "[", "I1", "]"}], ",", RowBox[{"Z", "[", "I3", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"uu", "=", " ", RowBox[{ RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"ix", ".", RowBox[{"UVW", "[", "I1", "]"}]}], ",", RowBox[{"ix", ".", RowBox[{"UVW", "[", "I2", "]"}]}], ",", RowBox[{"ix", ".", RowBox[{"UVW", "[", "I3", "]"}]}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"vv", "=", " ", RowBox[{ RowBox[{"NC", ".", RowBox[{"{", RowBox[{ RowBox[{"iy", ".", RowBox[{"UVW", "[", "I1", "]"}]}], ",", RowBox[{"iz", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I1", "]"}]}], ",", RowBox[{"iy", ".", RowBox[{"UVW", "[", "I3", "]"}]}], ",", RowBox[{"iz", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I3", "]"}]}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"ww", "=", " ", RowBox[{ RowBox[{"NC", ".", RowBox[{"{", RowBox[{ RowBox[{"iz", ".", RowBox[{"UVW", "[", "I1", "]"}]}], ",", RowBox[{"-", RowBox[{"iy", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I1", "]"}]}]}], ",", RowBox[{"iz", ".", RowBox[{"UVW", "[", "I3", "]"}]}], ",", RowBox[{"-", RowBox[{"iy", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I3", "]"}]}]}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]\[Phi]", "=", " ", RowBox[{ RowBox[{"NL", ".", RowBox[{"{", RowBox[{ RowBox[{"ix", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I1", "]"}]}], ",", RowBox[{"ix", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I3", "]"}]}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalTheta]\[CapitalTheta]", "=", RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "ww"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]\[Psi]", "=", " ", RowBox[{ SubscriptBox["\[PartialD]", "x"], "vv"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"XYZN", "[", RowBox[{"y_", ",", "z_"}], "]"}], "=", RowBox[{ RowBox[{"{", RowBox[{"XX", ",", "YY", ",", "ZZ"}], "}"}], "+", RowBox[{"ix", "*", "uu"}], "+", RowBox[{"iy", "*", RowBox[{"(", RowBox[{"y", "+", "vv"}], ")"}]}], "+", RowBox[{"iz", "*", RowBox[{"(", RowBox[{"z", "+", "ww"}], ")"}]}], "+", RowBox[{"CROSS", "[", RowBox[{ RowBox[{ RowBox[{"ix", "*", "\[Phi]\[Phi]"}], "+", RowBox[{"iy", "*", "\[CapitalTheta]\[CapitalTheta]"}], "+", RowBox[{"iz", "*", "\[Psi]\[Psi]"}]}], ",", RowBox[{ RowBox[{"iy", "*", "y"}], "+", RowBox[{"iz", "*", "z"}]}]}], "]"}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"Join", "[", " ", RowBox[{ RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FaceForm", "[", "Gray", "]"}], ",", RowBox[{ RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"XYZN", "[", RowBox[{"ty", ",", "tz"}], "]"}], ",", RowBox[{"XYZN", "[", RowBox[{ RowBox[{"-", "ty"}], ",", "tz"}], "]"}], ",", RowBox[{"XYZN", "[", RowBox[{ RowBox[{"-", "ty"}], ",", RowBox[{"-", "tz"}]}], "]"}], ",", RowBox[{"XYZN", "[", RowBox[{"ty", ",", RowBox[{"-", "tz"}]}], "]"}]}], "}"}], " ", "]"}], "/.", RowBox[{"x", "\[Rule]", "xr"}]}]}], "}"}], ",", " ", RowBox[{"{", RowBox[{"xr", ",", "0", ",", "hx", ",", RowBox[{"hx", "/", "20"}]}], "}"}]}], "]"}], " ", ",", RowBox[{"{", "Gray", "}"}], ",", RowBox[{"{", RowBox[{"Line", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"XYZN", "[", RowBox[{"0", ",", "0"}], "]"}], "/.", RowBox[{"x", "\[Rule]", "xr"}]}], ",", RowBox[{"{", RowBox[{"xr", ",", "0", ",", "hx", ",", RowBox[{"hx", "/", "50"}]}], "}"}]}], "]"}], " ", "]"}], "}"}], " ", ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Blue", ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I1", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I1", "]"}], "*", "scale"}]}], "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I2", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I2", "]"}], "*", "scale"}]}], "]"}]}], "}"}]}], " ", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", RowBox[{"{", RowBox[{"BEAMT", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "GG_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", RowBox[{"AA_", ",", "Irr_", ",", "Iyy_", ",", "Izz_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_", ",", "fz_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_"}], "}"}]}], "}"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "ix", ",", "hx", ",", "iz", ",", "ty", ",", "tz", ",", "\[CapitalOmega]", ",", "NL", ",", "NC", ",", "XX", ",", "YY", ",", "ZZ", ",", "uu", ",", "vv", ",", "ww", ",", "\[Phi]\[Phi]", ",", "\[CapitalTheta]\[CapitalTheta]", ",", "\[Psi]\[Psi]", ",", "XYZN"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"ix", ",", "hx"}], "}"}], "=", RowBox[{"UNIT", "[", RowBox[{ RowBox[{"XYZ", "[", "I3", "]"}], "-", RowBox[{"XYZ", "[", "I1", "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", "=", RowBox[{"CROSS", "[", RowBox[{"ix", ",", "iy"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ty", " ", "=", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"12", "*", RowBox[{"Iyy", "/", "AA"}]}], "]"}], "/", "2"}]}], ";", " ", "\[IndentingNewLine]", RowBox[{"tz", " ", "=", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"12", "*", RowBox[{"Izz", "/", "AA"}]}], "]"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"{", "0", "}"}], ",", RowBox[{"{", "hx", "}"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NQ", "=", " ", RowBox[{"SHAPES1", "[", " ", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "x", ",", RowBox[{"x", "^", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", "0", "}"}], ",", RowBox[{ RowBox[{"{", "hx", "}"}], "/", "2"}], ",", RowBox[{"{", "hx", "}"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"XX", "=", " ", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"X", "[", "I1", "]"}], ",", RowBox[{"X", "[", "I2", "]"}], ",", RowBox[{"X", "[", "I3", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"YY", "=", " ", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"Y", "[", "I1", "]"}], ",", RowBox[{"Y", "[", "I2", "]"}], ",", RowBox[{"Y", "[", "I3", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"ZZ", "=", " ", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"Z", "[", "I1", "]"}], ",", RowBox[{"Z", "[", "I2", "]"}], ",", RowBox[{"Z", "[", "I3", "]"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"uu", "=", " ", RowBox[{ RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"ix", ".", RowBox[{"UVW", "[", "I1", "]"}]}], ",", RowBox[{"ix", ".", RowBox[{"UVW", "[", "I2", "]"}]}], ",", RowBox[{"ix", ".", RowBox[{"UVW", "[", "I3", "]"}]}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"vv", "=", " ", RowBox[{ RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"iy", ".", RowBox[{"UVW", "[", "I1", "]"}]}], ",", RowBox[{"iy", ".", RowBox[{"UVW", "[", "I2", "]"}]}], ",", RowBox[{"iy", ".", RowBox[{"UVW", "[", "I3", "]"}]}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"ww", "=", " ", RowBox[{ RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"iz", ".", RowBox[{"UVW", "[", "I1", "]"}]}], ",", RowBox[{"iz", ".", RowBox[{"UVW", "[", "I2", "]"}]}], ",", RowBox[{"iz", ".", RowBox[{"UVW", "[", "I3", "]"}]}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]\[Phi]", "=", " ", RowBox[{ RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"ix", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I1", "]"}]}], ",", RowBox[{"ix", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I2", "]"}]}], ",", RowBox[{"ix", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I3", "]"}]}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalTheta]\[CapitalTheta]", "=", " ", RowBox[{ RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"iy", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I1", "]"}]}], ",", RowBox[{"iy", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I2", "]"}]}], ",", RowBox[{"iy", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I3", "]"}]}]}], "}"}]}], "*", "scale"}]}], ";"}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]\[Psi]", "=", " ", RowBox[{ RowBox[{"NQ", ".", RowBox[{"{", RowBox[{ RowBox[{"iz", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I1", "]"}]}], ",", RowBox[{"iz", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I2", "]"}]}], ",", RowBox[{"iz", ".", RowBox[{"\[Phi]\[CapitalTheta]\[Psi]", "[", "I3", "]"}]}]}], "}"}]}], "*", "scale"}]}], ";"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"XYZN", "[", RowBox[{"y_", ",", "z_"}], "]"}], "=", RowBox[{ RowBox[{"{", RowBox[{"XX", ",", "YY", ",", "ZZ"}], "}"}], "+", RowBox[{"ix", "*", "uu"}], "+", RowBox[{"iy", "*", RowBox[{"(", RowBox[{"y", "+", "vv"}], ")"}]}], "+", RowBox[{"iz", "*", RowBox[{"(", RowBox[{"z", "+", "ww"}], ")"}]}], "+", RowBox[{"CROSS", "[", RowBox[{ RowBox[{ RowBox[{"ix", "*", "\[Phi]\[Phi]"}], "+", RowBox[{"iy", "*", "\[CapitalTheta]\[CapitalTheta]"}], "+", RowBox[{"iz", "*", "\[Psi]\[Psi]"}]}], ",", RowBox[{ RowBox[{"iy", "*", "y"}], "+", RowBox[{"iz", "*", "z"}]}]}], "]"}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"Join", "[", " ", RowBox[{ RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FaceForm", "[", "Gray", "]"}], ",", RowBox[{ RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"XYZN", "[", RowBox[{"ty", ",", "tz"}], "]"}], ",", RowBox[{"XYZN", "[", RowBox[{ RowBox[{"-", "ty"}], ",", "tz"}], "]"}], ",", RowBox[{"XYZN", "[", RowBox[{ RowBox[{"-", "ty"}], ",", RowBox[{"-", "tz"}]}], "]"}], ",", RowBox[{"XYZN", "[", RowBox[{"ty", ",", RowBox[{"-", "tz"}]}], "]"}]}], "}"}], " ", "]"}], "/.", RowBox[{"x", "\[Rule]", "xr"}]}]}], "}"}], ",", " ", RowBox[{"{", RowBox[{"xr", ",", "0", ",", "hx", ",", RowBox[{"hx", "/", "20"}]}], "}"}]}], "]"}], " ", ",", RowBox[{"{", "Gray", "}"}], ",", RowBox[{"{", RowBox[{"Line", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"XYZN", "[", RowBox[{"0", ",", "0"}], "]"}], "/.", RowBox[{"x", "\[Rule]", "xr"}]}], ",", RowBox[{"{", RowBox[{"xr", ",", "0", ",", "hx", ",", RowBox[{"hx", "/", "50"}]}], "}"}]}], "]"}], " ", "]"}], "}"}], " ", ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Blue", ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I1", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I1", "]"}], "*", "scale"}]}], "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I2", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I2", "]"}], "*", "scale"}]}], "]"}]}], "}"}]}], " ", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_"}], "}"}]}], "}"}], "]"}], ":=", "\n", RowBox[{"{", RowBox[{"Gray", ",", RowBox[{"Polygon", "[", " ", RowBox[{ RowBox[{"XYZ", "[", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I3", ",", "I1"}], "}"}], "]"}], "+", " ", RowBox[{ RowBox[{"UVW", "[", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I3", ",", "I1"}], "}"}], "]"}], "*", "scale"}]}], "]"}], ",", "Blue", ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I1", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I1", "]"}], "*", "scale"}]}], "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I2", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I2", "]"}], "*", "scale"}]}], "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I3", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I3", "]"}], "*", "scale"}]}], "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPH", "[", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE_", ",", "\[Nu]\[Nu]_", ",", "\[Rho]\[Rho]_"}], "}"}], ",", RowBox[{"{", "tt_", "}"}], ",", RowBox[{"{", RowBox[{"fx_", ",", "fy_"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"I1_", ",", "I2_", ",", "I3_", ",", "I4_"}], "}"}]}], "}"}], "]"}], ":=", "\n", RowBox[{"{", RowBox[{"Gray", ",", RowBox[{"Polygon", "[", " ", RowBox[{ RowBox[{"XYZ", "[", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I4", ",", "I3", ",", "I1"}], "}"}], "]"}], "+", " ", RowBox[{ RowBox[{"UVW", "[", RowBox[{"{", RowBox[{"I1", ",", "I2", ",", "I4", ",", "I3", ",", "I1"}], "}"}], "]"}], "*", "scale"}]}], "]"}], ",", "Blue", ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I1", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I1", "]"}], "*", "scale"}]}], "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I2", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I2", "]"}], "*", "scale"}]}], "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I3", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I3", "]"}], "*", "scale"}]}], "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"XYZ", "[", "I4", "]"}], "+", RowBox[{ RowBox[{"UVW", "[", "I4", "]"}], "*", "scale"}]}], "]"}]}], "}"}]}], ";"}]}]}]], "Input", CellChangeTimes->{{3.443928906918974*^9, 3.443928929991374*^9}, { 3.443929321457774*^9, 3.443929366962974*^9}, {3.443929418474174*^9, 3.4439294203773737`*^9}, {3.443929488800974*^9, 3.4439294898461742`*^9}, { 3.443930075892174*^9, 3.4439300788405743`*^9}, {3.443930455096974*^9, 3.4439304595273743`*^9}, {3.443930823241374*^9, 3.443930856126174*^9}, { 3.443931095008974*^9, 3.443931111997374*^9}, {3.443931155724174*^9, 3.4439311829461737`*^9}, {3.443931237046974*^9, 3.443931263410974*^9}, 3.4439313163885736`*^9, {3.4439313583057737`*^9, 3.443931361909374*^9}, 3.4439314336509743`*^9, {3.443931519341774*^9, 3.4439315263773737`*^9}, { 3.443931599338574*^9, 3.4439315999157743`*^9}, {3.443931654312974*^9, 3.443931663626174*^9}, {3.443931727149374*^9, 3.4439317436853743`*^9}, { 3.443931775712174*^9, 3.443931903195374*^9}, {3.443932055919374*^9, 3.443932087025774*^9}, {3.4439321180697737`*^9, 3.4439322133857737`*^9}, { 3.443932558437174*^9, 3.443932580074374*^9}, {3.443932636171974*^9, 3.443932669587174*^9}, {3.4439327043127737`*^9, 3.443932734670374*^9}, { 3.4439327953075743`*^9, 3.443932797023574*^9}, {3.443933058434774*^9, 3.443933059136774*^9}, {3.443933108214374*^9, 3.4439331098211737`*^9}, 3.443933204232374*^9, 3.443933238567974*^9, {3.443933324492774*^9, 3.4439333252727737`*^9}, {3.443933359343174*^9, 3.4439334752043743`*^9}, 3.443933509758374*^9, {3.443933589006374*^9, 3.443933589786374*^9}, { 3.443933864798774*^9, 3.443933872177574*^9}, {3.443933907417974*^9, 3.443933934561974*^9}, 3.443934011001974*^9, {3.443934148547174*^9, 3.4439341545999737`*^9}, {3.443934196688774*^9, 3.443934199559174*^9}, 3.443934615985574*^9, {3.443934665562374*^9, 3.443934690335174*^9}, { 3.4439348709051743`*^9, 3.443934878829974*^9}, {3.443934986984774*^9, 3.443934989371574*^9}, {3.4439362770051737`*^9, 3.443936288673974*^9}, 3.443937073322974*^9, {3.4439453557081738`*^9, 3.443945414722974*^9}, { 3.4439454486685743`*^9, 3.443945493908574*^9}, {3.443945592813574*^9, 3.443945602610374*^9}, {3.444042647998565*^9, 3.444042677045765*^9}, 3.4444395736456003`*^9, {3.4444396926112003`*^9, 3.4444397018152*^9}, { 3.4464299717019997`*^9, 3.4464299849308*^9}, {3.4466049799505997`*^9, 3.4466049833514*^9}, {3.4466050206822*^9, 3.4466050890257998`*^9}, { 3.4466051204286003`*^9, 3.4466052301902*^9}, 3.4771131915032*^9, { 3.5007268004706*^9, 3.5007268065234003`*^9}, {3.5007272402033997`*^9, 3.5007272528238*^9}, 3.5007273148494*^9, {3.6880535892141175`*^9, 3.6880535907041197`*^9}},ExpressionUUID->"077b31cc-233b-4faf-af08-\ b1fe74f0d421"] }, Closed]], Cell[CellGroupData[{ Cell["GRAPHICS defs", "Subsection", CellChangeTimes->{{3.6337757022685537`*^9, 3.6337757351784363`*^9}, { 3.734064727558645*^9, 3.73406474989952*^9}, {3.734064825975355*^9, 3.734064828569765*^9}, {3.7451438050875483`*^9, 3.7451438075158496`*^9}, { 3.750748347033251*^9, 3.750748355529561*^9}, {3.78956792066949*^9, 3.789567926782812*^9}, 3.7895679585556145`*^9},ExpressionUUID->"0cf95315-5399-437e-b49e-\ c54ac4203061"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"beam", " ", "graphics"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{"MESH", ",", RowBox[{"{", RowBox[{"BEAM", ",", "pro_", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"{", RowBox[{"Gray", ",", RowBox[{"Cylinder", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}]}], "}"}], ",", "0.003"}], "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}]}], "}"}], "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"d_", ",", "t_"}], "}"}], ",", "iy_"}], "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Rho]", ",", "h", ",", "NL", ",", "NQ", ",", "ix", ",", "iz", ",", "T"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Rho]", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"\[Rho]", ".", "\[Rho]"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"h", ">", "0"}], ",", RowBox[{"L", ">", "0"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NL", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Xi]"}], ",", "\[Xi]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NQ", "=", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", "\[Xi]"}]}], ")"}]}], ",", RowBox[{"h", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], "2"], " ", "\[Xi]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", "\[Xi]"}]}], ")"}], " ", SuperscriptBox["\[Xi]", "2"]}], ",", RowBox[{"h", " ", SuperscriptBox["\[Xi]", "2"], " ", RowBox[{"(", RowBox[{"\[Xi]", "-", "1"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix", "=", RowBox[{"\[Rho]", "/", "h"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", "=", RowBox[{"ix", "\[Cross]", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"{", RowBox[{"ix", ",", "iy", ",", "iz"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"ux2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"uy2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"uz2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]x1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"\[Theta]x2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]y1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"\[Theta]y2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]z1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"\[Theta]z2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{ RowBox[{"NL", ".", RowBox[{"{", RowBox[{"ux1", ",", "ux2"}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{ RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uy1", ",", RowBox[{"-", "\[Theta]z1"}], ",", "uy2", ",", RowBox[{"-", "\[Theta]z2"}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uz1", ",", RowBox[{"-", "\[Theta]y1"}], ",", "uz2", ",", RowBox[{"-", "\[Theta]y2"}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Partition", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ix", "*", "h", "*", "\[Xi]"}], "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], ".", "T"}]}], ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "10"}]}], "}"}]}], "]"}], ",", "2", ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ix", "*", "h", "*", "\[Xi]"}], "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], ".", "T"}]}], ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "10"}]}], "}"}]}], "]"}]}], ";", RowBox[{"{", RowBox[{"Gray", ",", RowBox[{"CapForm", "[", "\"\\"", "]"}], ",", RowBox[{"Tube", "[", RowBox[{"pp", ",", RowBox[{"d", "/", "2"}]}], " ", "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}]}], "}"}]}]}], " ", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{"ly_", ",", "lz_", ",", "iy_"}], "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Rho]", ",", "h", ",", "x", ",", "y", ",", "z", ",", "NL", ",", "NQ", ",", "ix", ",", "iz", ",", "T", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Rho]", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"\[Rho]", ".", "\[Rho]"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"h", ">", "0"}], ",", RowBox[{"L", ">", "0"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix", "=", RowBox[{"\[Rho]", "/", "h"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", "=", RowBox[{"ix", "\[Cross]", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Rho]", "=", RowBox[{ RowBox[{"x", " ", "ix"}], "+", RowBox[{"y", " ", "iy"}], "+", RowBox[{"z", " ", "iz"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"{", RowBox[{"ix", ",", "iy", ",", "iz"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NL", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ",", RowBox[{"x", "/", "h"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NQ", "=", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}]}], ",", RowBox[{"h", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"x", "/", "h"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"]}], ",", RowBox[{"h", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"x", "/", "h"}], "-", "1"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"ux2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"uy2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"uz2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]x1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"\[Theta]x2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]y1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"\[Theta]y2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]z1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"\[Theta]z2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{"ux1", ",", "ux2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uy1", ",", RowBox[{"-", "\[Theta]z1"}], ",", "uy2", ",", RowBox[{"-", "\[Theta]z2"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uz1", ",", RowBox[{"-", "\[Theta]y1"}], ",", "uz2", ",", RowBox[{"-", "\[Theta]y2"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{"\[Theta]x1", ",", "\[Theta]x2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "w"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux", "=", RowBox[{ RowBox[{"(", RowBox[{"u", "+", RowBox[{"\[Theta]", " ", "z"}], "-", RowBox[{"\[Psi]", " ", "y"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy", "=", RowBox[{ RowBox[{"(", RowBox[{"v", "-", RowBox[{"\[Phi]", " ", "z"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz", "=", RowBox[{ RowBox[{"(", RowBox[{"w", "+", RowBox[{"\[Phi]", " ", "y"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", "\[Rho]", "+", RowBox[{ RowBox[{"{", RowBox[{"ux", ",", "uy", ",", "uz"}], "}"}], ".", "T"}]}], ")"}], "/.", RowBox[{"Thread", "[", RowBox[{ RowBox[{"{", RowBox[{"y", ",", "z"}], "}"}], "\[Rule]", "yz"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "h", ",", RowBox[{"h", "/", "10"}]}], "}"}], ",", RowBox[{"{", RowBox[{"yz", ",", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"ly", ",", "lz"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "ly"}], ",", "lz"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "ly"}], ",", RowBox[{"-", "lz"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ly", ",", RowBox[{"-", "lz"}]}], "}"}]}], "}"}], "/", "2"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Join", "[", RowBox[{ RowBox[{"{", RowBox[{"Gray", ",", RowBox[{"EdgeForm", "[", "]"}]}], "}"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "1"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "2"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "2"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "1"}], "]"}], "]"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "2"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "3"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "3"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "2"}], "]"}], "]"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "4"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "3"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "3"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "4"}], "]"}], "]"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "1"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "4"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "4"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "1"}], "]"}], "]"}]}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", RowBox[{ RowBox[{"Length", "[", "pp", "]"}], "-", "1"}]}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}]}], "}"}]}], " ", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{"MESH", ",", RowBox[{"{", RowBox[{"RIGID", ",", "pro_", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"{", RowBox[{"Black", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}]}], "}"}], "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], ",", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}]}], "}"}], "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"RIGID", ",", "pro_", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"crd1", ",", "crd2"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"crd1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "*", "scale"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"crd2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "*", "scale"}]}]}], ";", RowBox[{"{", RowBox[{"Black", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"crd1", ",", "crd2"}], "}"}], "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{"crd1", ",", "crd2"}], "}"}], "]"}]}], "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", RowBox[{"d_", ",", "b_", ",", "iy_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"crd1", ",", "crd2"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"crd1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "-", RowBox[{"iy", "*", RowBox[{"b", "/", "2"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"crd2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "+", RowBox[{"iy", "*", RowBox[{"b", "/", "2"}]}]}]}], ";", RowBox[{"{", RowBox[{"Black", ",", RowBox[{"Cylinder", "[", RowBox[{ RowBox[{"{", RowBox[{"crd1", ",", "crd2"}], "}"}], ",", RowBox[{"d", "/", "2"}]}], "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{"crd1", ",", "crd2"}], "}"}], "]"}]}], "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[Rho]_", "}"}], ",", RowBox[{"{", RowBox[{"lx_", ",", "ly_", ",", "lz_", ",", "ix_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{ "FX_", ",", "FY_", ",", "FZ_", ",", "MX_", ",", "MY_", ",", "MZ_"}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"r", ",", "T"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"pnt", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "lx"}], ",", RowBox[{"-", "ly"}], ",", RowBox[{"-", "lz"}]}], "}"}], ",", RowBox[{"{", RowBox[{"lx", ",", RowBox[{"-", "ly"}], ",", RowBox[{"-", "lz"}]}], "}"}], ",", RowBox[{"{", RowBox[{"lx", ",", "ly", ",", RowBox[{"-", "lz"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "lx"}], ",", "ly", ",", RowBox[{"-", "lz"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"-", "lx"}], ",", RowBox[{"-", "ly"}], ",", "lz"}], "}"}], ",", RowBox[{"{", RowBox[{"lx", ",", RowBox[{"-", "ly"}], ",", "lz"}], "}"}], ",", RowBox[{"{", RowBox[{"lx", ",", "ly", ",", "lz"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "lx"}], ",", "ly", ",", "lz"}], "}"}]}], "}"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"crd", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"ix", ",", "iy", ",", RowBox[{"ix", StyleBox["\[Cross]", "OperatorCharacter"], "iy"}]}], "}"}], ".", "#"}], "&"}], ",", "pnt"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", "#", "+", RowBox[{"scale", "*", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{"scale", "*", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], RowBox[{ StyleBox["(", "OperatorCharacter"], RowBox[{ StyleBox["#", "OperatorCharacter"], StyleBox["-", "OperatorCharacter"], RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ")"}]}]}]}], "&"}], ",", "crd"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Gray", ",", RowBox[{"Opacity", "[", "0.5", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"r", "[", RowBox[{"[", "4", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "1", "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"r", "[", RowBox[{"[", "5", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "6", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "7", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "8", "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"r", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "6", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "5", "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"r", "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "4", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "8", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "7", "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"r", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "5", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "8", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "4", "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"r", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "7", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "6", "]"}], "]"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", "Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"scale", "*", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "t_", "}"}], ",", "for_"}], "}"}], ",", RowBox[{"ELEMENT", "[", "nodes_", "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "node", ",", "n\[Alpha]", ",", "n\[Beta]", ",", "\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Rho]", ",", "r\[Alpha]", ",", "r\[Beta]", ",", "rn", ",", "r0", ",", "n", ",", "NN", ",", "en", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "pp", ",", "face1", ",", "face2", ",", "face3", ",", "face4", ",", "face5", ",", "face6"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"n\[Alpha]", ",", "n\[Beta]"}], "}"}], "=", RowBox[{"Dimensions", "[", "nodes", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"LAGRANGE", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"n\[Alpha]", ",", "\[Alpha]"}], "}"}], ",", RowBox[{"{", RowBox[{"n\[Beta]", ",", "\[Beta]"}], "}"}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"node", "=", RowBox[{"Flatten", "[", "nodes", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Alpha]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r\[Beta]", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r0"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"rn", "=", RowBox[{"r\[Alpha]", "\[Cross]", "r\[Beta]"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{"rn", "/", RowBox[{"Norm", "[", "rn", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Rho]", "=", RowBox[{"en", "*", "\[Gamma]"}]}], ";", "\[IndentingNewLine]", RowBox[{"n", "=", "5"}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"r0", "+", "\[Rho]", "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "*", "scale"}], "+", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "\[Cross]", "\[Rho]"}], "*", "scale"}]}], ")"}], " ", "/.", " ", RowBox[{"\[Gamma]", "->", RowBox[{"t", "/", "2"}]}]}], ",", RowBox[{"{", RowBox[{"\[Beta]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "n"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "n"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"face1", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "1"}], ",", "j"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "1"}], ",", RowBox[{"j", "+", "1"}]}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"i", ",", RowBox[{"j", "+", "1"}]}], "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"r0", "+", "\[Rho]", "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "*", "scale"}], "+", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "\[Cross]", "\[Rho]"}], "*", "scale"}]}], ")"}], " ", "/.", " ", RowBox[{"\[Gamma]", "\[Rule]", RowBox[{ RowBox[{"-", "t"}], "/", "2"}]}]}], " ", ",", RowBox[{"{", RowBox[{"\[Beta]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "n"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "n"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"face2", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"Reverse", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "1"}], ",", "j"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "1"}], ",", RowBox[{"j", "+", "1"}]}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"i", ",", RowBox[{"j", "+", "1"}]}], "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"r0", "+", "\[Rho]", "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "*", "scale"}], "+", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "\[Cross]", "\[Rho]"}], "*", "scale"}]}], ")"}], " ", "/.", " ", RowBox[{"\[Beta]", "\[Rule]", "1"}]}], ",", RowBox[{"{", RowBox[{"\[Gamma]", ",", RowBox[{ RowBox[{"-", "t"}], "/", "2"}], ",", RowBox[{"t", "/", "2"}], ",", RowBox[{"t", "/", "n"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "n"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"n", "=", "1"}], ";", "\[IndentingNewLine]", RowBox[{"face3", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "1"}], ",", "j"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "1"}], ",", RowBox[{"j", "+", "1"}]}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"i", ",", RowBox[{"j", "+", "1"}]}], "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"r0", "+", "\[Rho]", "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "*", "scale"}], "+", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "\[Cross]", "\[Rho]"}], "*", "scale"}]}], ")"}], " ", "/.", " ", RowBox[{"\[Beta]", "\[Rule]", "0"}]}], ",", RowBox[{"{", RowBox[{"\[Gamma]", ",", RowBox[{ RowBox[{"-", "t"}], "/", "2"}], ",", RowBox[{"t", "/", "2"}], ",", RowBox[{"t", "/", "n"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "n"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"face4", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"Reverse", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "1"}], ",", "j"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "1"}], ",", RowBox[{"j", "+", "1"}]}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"i", ",", RowBox[{"j", "+", "1"}]}], "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"r0", "+", "\[Rho]", "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "*", "scale"}], "+", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "\[Cross]", "\[Rho]"}], "*", "scale"}]}], ")"}], " ", "/.", " ", RowBox[{"\[Alpha]", "\[Rule]", "1"}]}], ",", RowBox[{"{", RowBox[{"\[Gamma]", ",", RowBox[{ RowBox[{"-", "t"}], "/", "2"}], ",", RowBox[{"t", "/", "2"}], ",", RowBox[{"t", "/", "n"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Beta]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "n"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"face5", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "1"}], ",", "j"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "1"}], ",", RowBox[{"j", "+", "1"}]}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"i", ",", RowBox[{"j", "+", "1"}]}], "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"r0", "+", "\[Rho]", "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "*", "scale"}], "+", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "\[Cross]", "\[Rho]"}], "*", "scale"}]}], ")"}], " ", "/.", " ", RowBox[{"\[Alpha]", "\[Rule]", "0"}]}], ",", RowBox[{"{", RowBox[{"\[Gamma]", ",", RowBox[{ RowBox[{"-", "t"}], "/", "2"}], ",", RowBox[{"t", "/", "2"}], ",", RowBox[{"t", "/", "n"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Beta]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "n"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"face6", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"Reverse", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "1"}], ",", "j"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"i", "+", "1"}], ",", RowBox[{"j", "+", "1"}]}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"i", ",", RowBox[{"j", "+", "1"}]}], "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Gray", ",", RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"EdgeForm", "[", "]"}], ",", RowBox[{"Polygon", "[", "face1", "]"}], ",", RowBox[{"Polygon", "[", "face2", "]"}], ",", RowBox[{"Polygon", "[", "face3", "]"}], ",", RowBox[{"Polygon", "[", "face4", "]"}], ",", RowBox[{"Polygon", "[", "face5", "]"}], ",", RowBox[{"Polygon", "[", "face6", "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "Tiny", "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"node", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}]}], "}"}]}]}], " ", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{"d_", ",", "iy_"}], "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Rho]", ",", "h", ",", "NL", ",", "NQ", ",", "ix", ",", "iz", ",", "T"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Rho]", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"\[Rho]", ".", "\[Rho]"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"h", ">", "0"}], ",", RowBox[{"L", ">", "0"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NL", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Xi]"}], ",", "\[Xi]"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NQ", "=", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", "\[Xi]"}]}], ")"}]}], ",", RowBox[{"h", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], "2"], " ", "\[Xi]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", "\[Xi]"}]}], ")"}], " ", SuperscriptBox["\[Xi]", "2"]}], ",", RowBox[{"h", " ", SuperscriptBox["\[Xi]", "2"], " ", RowBox[{"(", RowBox[{"\[Xi]", "-", "1"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix", "=", RowBox[{"\[Rho]", "/", "h"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", "=", RowBox[{"ix", "\[Cross]", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"{", RowBox[{"ix", ",", "iy", ",", "iz"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"ux2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"uy2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"uz2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]x1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"\[Theta]x2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]y1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"\[Theta]y2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]z1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"\[Theta]z2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{ RowBox[{"NL", ".", RowBox[{"{", RowBox[{"ux1", ",", "ux2"}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{ RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uy1", ",", RowBox[{"-", "\[Theta]z1"}], ",", "uy2", ",", RowBox[{"-", "\[Theta]z2"}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uz1", ",", RowBox[{"-", "\[Theta]y1"}], ",", "uz2", ",", RowBox[{"-", "\[Theta]y2"}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Partition", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ix", "*", "h", "*", "\[Xi]"}], "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], ".", "T"}]}], ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "10"}]}], "}"}]}], "]"}], ",", "2", ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ix", "*", "h", "*", "\[Xi]"}], "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], ".", "T"}]}], ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "0", ",", "1", ",", RowBox[{"1", "/", "10"}]}], "}"}]}], "]"}]}], ";", RowBox[{"{", RowBox[{"Gray", ",", RowBox[{"Tube", "[", RowBox[{"pp", ",", RowBox[{"d", "/", "2"}]}], " ", "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}], ",", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "+", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}]}], "]"}], "*", "scale"}]}], "}"}]}]}], " ", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"FX_Real", ",", "FY_Real", ",", "FZ_Real"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "r0"}], "}"}], ",", RowBox[{ RowBox[{"L", "=", RowBox[{"Max", "[", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], "-", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}]}], "&"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"MinMax", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{";;", ",", "1", ",", "i"}], "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}]}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"scale", "*", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Black", ",", "Thick", ",", RowBox[{"Arrowheads", "[", "Medium", "]"}], ",", RowBox[{"Arrow", "[", RowBox[{"{", RowBox[{"r0", ",", RowBox[{"r0", "+", RowBox[{ RowBox[{"L", "/", "10"}], "*", RowBox[{ RowBox[{"{", RowBox[{"FX", ",", "FY", ",", "FZ"}], "}"}], "/", RowBox[{"Max", "[", RowBox[{ RowBox[{"Norm", "[", RowBox[{"{", RowBox[{"FX", ",", "FY", ",", "FZ"}], "}"}], "]"}], ",", RowBox[{"1", "/", "100"}]}], "]"}]}]}]}]}], "}"}], "]"}]}], "}"}]}]}], "]"}]}], ";"}], "*)"}], "\[IndentingNewLine]"}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.633673923685915*^9, 3.6336739535006204`*^9}, { 3.633674155068149*^9, 3.6336741996717005`*^9}, {3.6336745049841633`*^9, 3.6336745219741354`*^9}, {3.6336919593939404`*^9, 3.6336919775979815`*^9}, 3.633692380551029*^9, {3.6336927116599674`*^9, 3.633692727194856*^9}, { 3.635310826749509*^9, 3.6353108343419433`*^9}, {3.635311461613821*^9, 3.6353114619508405`*^9}, {3.7326759806780663`*^9, 3.7326760008674326`*^9}, {3.7326760331212645`*^9, 3.7326760385677853`*^9}, {3.732684137201784*^9, 3.73268419404665*^9}, { 3.732684306221466*^9, 3.7326843382153635`*^9}, 3.7326844699232764`*^9, { 3.7326845133861027`*^9, 3.73268452322455*^9}, {3.732759973190983*^9, 3.7327599776758347`*^9}, {3.7327613720703106`*^9, 3.7327614888170295`*^9}, {3.732761535853627*^9, 3.7327615404943867`*^9}, { 3.7327615972663317`*^9, 3.7327616122832594`*^9}, {3.7327616693361855`*^9, 3.73276183332095*^9}, {3.732761876700554*^9, 3.7327618790133*^9}, { 3.732761909063363*^9, 3.732761910469795*^9}, {3.73276200508918*^9, 3.732762006042756*^9}, {3.7327620750344048`*^9, 3.732762101490326*^9}, 3.7327688007102947`*^9, {3.7327705695330524`*^9, 3.7327705708254137`*^9}, { 3.732788507552166*^9, 3.7327885085870132`*^9}, {3.732788681344634*^9, 3.7327887090994544`*^9}, {3.732788743287696*^9, 3.73278879848213*^9}, { 3.732788922306119*^9, 3.7327889462731514`*^9}, {3.732789012151597*^9, 3.732789028200858*^9}, {3.7327890791192408`*^9, 3.732789086999034*^9}, { 3.732789135698248*^9, 3.7327891358892384`*^9}, {3.7327891989507074`*^9, 3.7327891993104925`*^9}, {3.733116709198372*^9, 3.733116731638229*^9}, { 3.7334931331412554`*^9, 3.7334932071522064`*^9}, {3.733493353668892*^9, 3.7334934953404007`*^9}, {3.733493581610343*^9, 3.733493589891471*^9}, { 3.7334936319789553`*^9, 3.7334936623392687`*^9}, {3.7334936935401745`*^9, 3.733493716917615*^9}, {3.7334937687375154`*^9, 3.733493799379287*^9}, { 3.7335602963276734`*^9, 3.7335603891038685`*^9}, {3.7337039222525787`*^9, 3.733703929721642*^9}, {3.7337040222462597`*^9, 3.7337040262631474`*^9}, { 3.733710121070121*^9, 3.733710122358057*^9}, 3.7337110885786676`*^9, 3.733711184948838*^9, {3.733711259729956*^9, 3.733711278366322*^9}, 3.7337113240271106`*^9, {3.733711384581702*^9, 3.733711436236964*^9}, 3.7337114809469175`*^9, {3.7337115173918333`*^9, 3.733711518879483*^9}, 3.733711560439453*^9, {3.733711609599924*^9, 3.7337116342722664`*^9}, { 3.733711689751358*^9, 3.7337116969119487`*^9}, {3.7337129879879694`*^9, 3.7337130014112797`*^9}, {3.733713172835663*^9, 3.733713173913886*^9}, { 3.7337132483436465`*^9, 3.7337132496094065`*^9}, {3.733713283003566*^9, 3.7337134200180254`*^9}, {3.733713464428997*^9, 3.7337135191222897`*^9}, { 3.7337135777847366`*^9, 3.73371367154463*^9}, {3.7337140009857264`*^9, 3.7337140458967295`*^9}, {3.733714091198394*^9, 3.7337141070440063`*^9}, { 3.733714143813529*^9, 3.733714146610505*^9}, {3.733721976862414*^9, 3.7337219813629093`*^9}, {3.733722281191476*^9, 3.7337222944429536`*^9}, { 3.733722382186266*^9, 3.7337223828425617`*^9}, {3.7337224624293957`*^9, 3.7337224858690815`*^9}, 3.7337225537825146`*^9, {3.733722654230641*^9, 3.733722661731436*^9}, {3.733722818999301*^9, 3.7337228267499514`*^9}, { 3.733723144924486*^9, 3.733723159691375*^9}, {3.733723196273369*^9, 3.733723198695795*^9}, {3.7337232377777586`*^9, 3.7337232408874655`*^9}, { 3.73372435111442*^9, 3.733724354067712*^9}, {3.7337244099801674`*^9, 3.733724433076069*^9}, {3.7337245236325226`*^9, 3.733724524679802*^9}, { 3.7337873724058084`*^9, 3.7337873841879997`*^9}, {3.7337879154409466`*^9, 3.7337879158316607`*^9}, {3.7340647908247976`*^9, 3.73406479426425*^9}, 3.734064961166012*^9, {3.7340649924958353`*^9, 3.7340650071121197`*^9}, { 3.734065080806053*^9, 3.7340651183371983`*^9}, {3.7340717082263236`*^9, 3.7340717106541834`*^9}, {3.7340733640961533`*^9, 3.734073544150256*^9}, { 3.734073575450083*^9, 3.7340736415768323`*^9}, {3.7340736917524757`*^9, 3.7340736979070516`*^9}, {3.7340738227246733`*^9, 3.734073837462171*^9}, { 3.7340739034480777`*^9, 3.734073926441464*^9}, {3.7340739810895205`*^9, 3.734073989147008*^9}, {3.7340742070861125`*^9, 3.7340742176873407`*^9}, { 3.7340743130118575`*^9, 3.7340743136367188`*^9}, 3.734147513058416*^9, { 3.734147568916667*^9, 3.7341475939306383`*^9}, {3.734147807211531*^9, 3.7341478287481747`*^9}, {3.734147861578357*^9, 3.7341478856653595`*^9}, 3.73414797622887*^9, {3.734148333604216*^9, 3.7341483447645597`*^9}, { 3.734148391271126*^9, 3.734148430462343*^9}, {3.7341486538224015`*^9, 3.734148655872754*^9}, {3.734780635679473*^9, 3.7347806548690386`*^9}, { 3.734780765771411*^9, 3.7347807803670073`*^9}, {3.7347809996713924`*^9, 3.734781008203253*^9}, {3.7348427053556232`*^9, 3.7348427411876764`*^9}, { 3.7348427811917715`*^9, 3.7348428157425947`*^9}, {3.7352741876350036`*^9, 3.735274188984682*^9}, {3.744334694805724*^9, 3.744334695602414*^9}, { 3.7443347269076095`*^9, 3.7443347277042484`*^9}, {3.7443708556292257`*^9, 3.744370857925562*^9}, {3.7443710360558863`*^9, 3.7443710373681135`*^9}, { 3.7443728681474504`*^9, 3.7443728796447964`*^9}, {3.744372944801361*^9, 3.7443729465196667`*^9}, 3.7444272378898153`*^9, {3.7450269816449513`*^9, 3.745026983254672*^9}, {3.7461503454492016`*^9, 3.7461503964527383`*^9}, { 3.7461504977259088`*^9, 3.7461505005843096`*^9}, {3.7461505589454737`*^9, 3.7461506157760525`*^9}, {3.746150984703903*^9, 3.74615099456116*^9}, { 3.750748457386656*^9, 3.75074846753214*^9}, {3.750748881443331*^9, 3.7507488854690557`*^9}, {3.750749005058874*^9, 3.750749023499106*^9}, { 3.7507501792180104`*^9, 3.750750248150975*^9}, {3.7507502795426817`*^9, 3.750750280787862*^9}, {3.7507503174292965`*^9, 3.7507503665913057`*^9}, { 3.7507503972457952`*^9, 3.7507504187333727`*^9}, {3.7507505335852304`*^9, 3.750750827854561*^9}, {3.7507508607353168`*^9, 3.7507508749873066`*^9}, { 3.750750906727187*^9, 3.750750925222521*^9}, {3.7507511964801655`*^9, 3.7507512498091383`*^9}, {3.760607688544195*^9, 3.7606077135130415`*^9}, 3.7606087463370066`*^9, {3.765086128848972*^9, 3.765086135973978*^9}, { 3.765086334880218*^9, 3.765086340797302*^9}}, CellLabel-> "In[307]:=",ExpressionUUID->"9fb3c6dd-bdc9-4023-ac32-c5ef1cb7aca5"] }, Closed]], Cell[CellGroupData[{ Cell["SHOW3D GRAPHICS defs", "Subsection", CellChangeTimes->{{3.6337757022685537`*^9, 3.6337757351784363`*^9}, { 3.734064727558645*^9, 3.73406474989952*^9}, {3.7451438105166326`*^9, 3.745143811840375*^9}, {3.7606070835401344`*^9, 3.760607098895162*^9}, { 3.760607741638811*^9, 3.760607749187194*^9}, {3.760608900875217*^9, 3.7606089113767295`*^9}},ExpressionUUID->"160ac8b6-0f7a-49c6-a200-\ 2b47d976864a"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"POSTFORM", "=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHOW3D", "[", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}], "]"}], ":=", RowBox[{"SHOW3D", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHOW3D", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "}"}], ",", "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{ RowBox[{"Graphics3D", "[", RowBox[{"Join", "[", " ", RowBox[{ RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", "#", ",", "fun"}], " ", "]"}], "&"}], ",", "ele"}], "]"}], ",", "1"}], "]"}], ",", "POSTFORM"}], "]"}], "]"}], ",", RowBox[{"SphericalRegion", "\[Rule]", "True"}], ",", RowBox[{"Axes", "->", "True"}], ",", RowBox[{"Lighting", "\[Rule]", "\"\\""}]}], "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SHOW3D", "[", RowBox[{"MESH", ",", RowBox[{"{", RowBox[{"ele_", ",", "fun_"}], "}"}]}], "]"}], ":=", RowBox[{"SHOW3D", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"MEC", "-", RowBox[{"E1050", " ", "and", " ", "MEC"}], "-", RowBox[{"E8001", " ", "defs"}]}], "*)"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"typ_", ",", "pro_", ",", "nod_"}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"LINK", ",", "typ_", ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"FX_", ",", "FY_", ",", "FZ_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "r0"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"L", "=", RowBox[{"Max", "[", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], "-", RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}]}], "&"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"MinMax", "[", RowBox[{"fun", "[", RowBox[{"[", RowBox[{";;", ",", "1", ",", "i"}], "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "3"}], "}"}]}], "]"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"scale", "*", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Black", ",", "Thick", ",", RowBox[{"Arrowheads", "[", "Medium", "]"}], ",", RowBox[{"Arrow", "[", RowBox[{"{", RowBox[{"r0", ",", RowBox[{"r0", "+", RowBox[{ RowBox[{"L", "/", "10"}], "*", RowBox[{ RowBox[{"{", RowBox[{"FX", ",", "FY", ",", "FZ"}], "}"}], "/", RowBox[{"Max", "[", RowBox[{ RowBox[{"Norm", "[", RowBox[{"{", RowBox[{"FX", ",", "FY", ",", "FZ"}], "}"}], "]"}], ",", RowBox[{"1", "/", "100"}]}], "]"}]}]}]}]}], "}"}], "]"}]}], "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"m_", ",", "J_"}], "}"}], ",", RowBox[{"{", RowBox[{"ix_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{"xyz_", ",", "mc_"}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"r", ",", "crd"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"crd", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"ix", ",", "iy", ",", RowBox[{"ix", StyleBox["\[Cross]", "OperatorCharacter"], "iy"}]}], "}"}], ".", "#"}], "&"}], ",", "xyz"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", "#", "+", RowBox[{"scale", "*", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{"scale", "*", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], RowBox[{ StyleBox["(", "OperatorCharacter"], RowBox[{ StyleBox["#", "OperatorCharacter"], StyleBox["-", "OperatorCharacter"], RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ")"}]}]}]}], "&"}], ",", "crd"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Join", "[", RowBox[{"FORCEFORM", ",", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Polygon", "[", RowBox[{"r", "[", RowBox[{"[", "#", "]"}], "]"}], "]"}], "&"}], ",", "mc"}], "]"}], ",", "\[IndentingNewLine]", "POINTFORM", ",", RowBox[{"{", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"scale", "*", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}]}], "]"}], "}"}]}], "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"AA_", ",", "Iy_", ",", "Iz_"}], "}"}], ",", "iy_", ",", RowBox[{"{", RowBox[{"yz_", ",", "mc_"}], "}"}]}], "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"AA", ",", "Iy", ",", "Iz", ",", "iy"}], "}"}], ",", RowBox[{"{", RowBox[{"yz", ",", "mc"}], "}"}]}], "}"}], ",", "for"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"AA_", ",", "Iy_", ",", "Iz_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{"crd_", ",", "nod_"}], "}"}]}], "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r1", ",", "\[CapitalDelta]r", ",", "r", ",", "h", ",", "x", ",", "y", ",", "z", ",", "NL", ",", "NQ", ",", "ix", ",", "iz", ",", "T", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "ux1", ",", "ux2", ",", "uz1", ",", "uz2", ",", "uy1", ",", "uy2", ",", "\[Theta]x1", ",", "\[Theta]x2", ",", "\[Theta]y1", ",", "\[Theta]y2", ",", "\[Theta]z1", ",", "\[Theta]z2", ",", "ux", ",", "uy", ",", "uz", ",", "pp", ",", "nn"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"r1", "=", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalDelta]r", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h", "=", RowBox[{"Sqrt", "[", RowBox[{"\[CapitalDelta]r", ".", "\[CapitalDelta]r"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix", "=", RowBox[{"\[CapitalDelta]r", "/", "h"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", "=", RowBox[{"ix", "\[Cross]", "iy"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacements", " ", "and", " ", "rotations"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NL", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ",", RowBox[{"x", "/", "h"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NQ", "=", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}]}], ",", RowBox[{"h", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"x", "/", "h"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"]}], ",", RowBox[{"h", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"x", "/", "h"}], "-", "1"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"ux2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"uy2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"uz2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]x1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"\[Theta]x2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]y1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"\[Theta]y2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]z1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"\[Theta]z2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{"ux1", ",", "ux2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uy1", ",", "\[Theta]z1", ",", "uy2", ",", "\[Theta]z2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uz1", ",", RowBox[{"-", "\[Theta]y1"}], ",", "uz2", ",", RowBox[{"-", "\[Theta]y2"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{"\[Theta]x1", ",", "\[Theta]x2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "w"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux", "=", RowBox[{ RowBox[{"(", RowBox[{"u", "+", RowBox[{"\[Theta]", " ", "z"}], "-", RowBox[{"\[Psi]", " ", "y"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy", "=", RowBox[{ RowBox[{"(", RowBox[{"v", "-", RowBox[{"\[Phi]", " ", "z"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz", "=", RowBox[{ RowBox[{"(", RowBox[{"w", "+", RowBox[{"\[Phi]", " ", "y"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"nn", "=", "10"}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"ii", " ", "slab", " ", "and", " ", "jj", " ", "nod"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"pp", "[", RowBox[{"ii_", ",", "jj_"}], "]"}], ":=", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"r1", "+", RowBox[{ RowBox[{"(", RowBox[{"x", "+", "ux"}], ")"}], " ", "ix"}], "+", RowBox[{ RowBox[{"(", RowBox[{"y", "+", "uy"}], " ", ")"}], "iy"}], " ", "+", RowBox[{ RowBox[{"(", RowBox[{"z", "+", "uz"}], ")"}], " ", "iz"}]}], ")"}], "/.", RowBox[{"x", "\[Rule]", RowBox[{"(", RowBox[{"ii", "*", RowBox[{"h", "/", "nn"}]}], ")"}]}]}], "/.", RowBox[{"Thread", "[", RowBox[{ RowBox[{"{", RowBox[{"y", ",", "z"}], "}"}], "\[Rule]", RowBox[{"crd", "[", RowBox[{"[", "jj", "]"}], "]"}]}], "]"}]}]}], " ", ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Join", "[", RowBox[{"BEAMFORM", ",", RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"ii", ",", RowBox[{"nod", "[", RowBox[{"[", RowBox[{"ip", ",", "1"}], "]"}], "]"}]}], "]"}], ",", RowBox[{"pp", "[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", RowBox[{"nod", "[", RowBox[{"[", RowBox[{"ip", ",", "1"}], "]"}], "]"}]}], "]"}], ",", RowBox[{"pp", "[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", RowBox[{"nod", "[", RowBox[{"[", RowBox[{"ip", ",", "2"}], "]"}], "]"}]}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"ii", ",", RowBox[{"nod", "[", RowBox[{"[", RowBox[{"ip", ",", "2"}], "]"}], "]"}]}], "]"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"ii", ",", "0", ",", RowBox[{"nn", "-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ip", ",", "1", ",", RowBox[{"Length", "[", "nod", "]"}]}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "POINTFORM", ",", RowBox[{"{", RowBox[{ RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}]}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"project", " ", "definitions"}], "*)"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"CORNERE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"d_", ",", "l_"}], "}"}], ",", "i1_", ",", "i2_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"i3", ",", "r0", ",", "dr1", ",", "dr2", ",", "dr3"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"i3", "=", RowBox[{ RowBox[{"i1", StyleBox["\[Cross]", "OperatorCharacter"], "i2"}], "/", RowBox[{"Norm", "[", RowBox[{"i1", StyleBox["\[Cross]", "OperatorCharacter"], "i2"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"scale", "*", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dr1", "=", RowBox[{ RowBox[{"i1", "*", "l"}], "+", RowBox[{"scale", "*", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], "i1"}], "*", "l"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dr2", "=", RowBox[{ RowBox[{"i2", "*", "l"}], "+", RowBox[{"scale", "*", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], "i2"}], "*", "l"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dr3", "=", RowBox[{ RowBox[{"i3", "*", "l"}], "+", RowBox[{"scale", "*", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], "i3"}], "*", "l"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Red", ",", RowBox[{"Sphere", "[", RowBox[{"r0", ",", RowBox[{"d", "/", "2"}]}], "]"}], ",", RowBox[{"Cylinder", "[", RowBox[{ RowBox[{"{", RowBox[{"r0", ",", RowBox[{"r0", "+", "dr1"}]}], "}"}], ",", RowBox[{"d", "/", "2"}]}], "]"}], ",", RowBox[{"Cylinder", "[", RowBox[{ RowBox[{"{", RowBox[{"r0", ",", RowBox[{"r0", "+", "dr2"}]}], "}"}], ",", RowBox[{"d", "/", "2"}]}], "]"}], ",", RowBox[{"Cylinder", "[", RowBox[{ RowBox[{"{", RowBox[{"r0", ",", RowBox[{"r0", "+", "dr3"}]}], "}"}], ",", RowBox[{"d", "/", "2"}]}], "]"}]}], "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"PIVOTA", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"d_", ",", "l_"}], "}"}], ",", "i1_", ",", "i2_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"i3", ",", "r0", ",", "dr1", ",", "dr2", ",", "dr3"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"i3", "=", RowBox[{ RowBox[{"i1", StyleBox["\[Cross]", "OperatorCharacter"], "i2"}], "/", RowBox[{"Norm", "[", RowBox[{"i1", StyleBox["\[Cross]", "OperatorCharacter"], "i2"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"scale", "*", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dr1", "=", RowBox[{ RowBox[{"i1", "*", "l"}], "+", RowBox[{"scale", "*", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], "i1"}], "*", "l"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dr2", "=", RowBox[{ RowBox[{"i2", "*", "l"}], "+", RowBox[{"scale", "*", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], "i2"}], "*", "l"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dr3", "=", RowBox[{ RowBox[{"i3", "*", RowBox[{"d", "/", "4"}]}], "+", RowBox[{"scale", "*", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], "i3"}], "*", RowBox[{"d", "/", "4"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Blue", ",", RowBox[{"Cylinder", "[", RowBox[{ RowBox[{"{", RowBox[{"r0", ",", RowBox[{"r0", "+", "dr1"}]}], "}"}], ",", RowBox[{"d", "/", "2"}]}], "]"}], ",", RowBox[{"Cylinder", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"r0", "-", "dr2"}], ",", RowBox[{"r0", "+", "dr2"}]}], "}"}], ",", RowBox[{"d", "/", "2"}]}], "]"}], ",", RowBox[{"Cylinder", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"r0", "-", "dr3"}], ",", RowBox[{"r0", "+", "dr3"}]}], "}"}], ",", "d"}], "]"}]}], "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"SLEEVEA", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"d_", ",", "l_"}], "}"}], ",", "i1_", ",", "i2_"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "i3", ",", "r0", ",", "r1", ",", "dr1", ",", "dr2", ",", "dr3"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"i3", "=", RowBox[{ RowBox[{"i1", StyleBox["\[Cross]", "OperatorCharacter"], "i2"}], "/", RowBox[{"Norm", "[", RowBox[{"i1", StyleBox["\[Cross]", "OperatorCharacter"], "i2"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"scale", "*", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r1", "=", RowBox[{"r0", "+", RowBox[{"i2", "*", RowBox[{"d", "/", "2"}]}], "+", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], "i2"}], "*", RowBox[{"d", "/", "2"}], "*", "scale"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dr1", "=", RowBox[{ RowBox[{"i1", "*", RowBox[{"l", "/", "2"}]}], "+", RowBox[{"scale", "*", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], "i1"}], "*", RowBox[{"l", "/", "2"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"dr3", "=", RowBox[{ RowBox[{"i3", "*", RowBox[{"d", "/", "8"}]}], "+", RowBox[{"scale", "*", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], "i3"}], "*", RowBox[{"d", "/", "8"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Blue", ",", RowBox[{"Cylinder", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"r0", "-", "dr1"}], ",", RowBox[{"r0", "+", "dr1"}]}], "}"}], ",", RowBox[{"d", "/", "2"}]}], "]"}], ",", RowBox[{"Cylinder", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"r1", "-", "dr3"}], ",", RowBox[{"r1", "+", "dr3"}]}], "}"}], ",", "d"}], "]"}]}], "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "first", " ", "order", " ", "beam", " ", "model", " ", "graphics"}], "*)"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{"AA_", ",", "Iy_", ",", "Iz_", ",", "Jx_", ",", RowBox[{"{", RowBox[{"iyr_", ",", "\[Alpha]_"}], "}"}], ",", "pol_"}], "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r1", ",", "\[CapitalDelta]r", ",", "r", ",", "h", ",", "x", ",", "y", ",", "z", ",", "NL", ",", "NQ", ",", "ixr", ",", "izr", ",", "ix", ",", "iy", ",", "iz", ",", "T", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "ux1", ",", "ux2", ",", "uz1", ",", "uz2", ",", "uy1", ",", "uy2", ",", "\[Theta]x1", ",", "\[Theta]x2", ",", "\[Theta]y1", ",", "\[Theta]y2", ",", "\[Theta]z1", ",", "\[Theta]z2", ",", "ux", ",", "uy", ",", "uz", ",", "pp", ",", "nn"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"r1", "=", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalDelta]r", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h", "=", RowBox[{"Sqrt", "[", RowBox[{"\[CapitalDelta]r", ".", "\[CapitalDelta]r"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ixr", "=", RowBox[{"\[CapitalDelta]r", "/", "h"}]}], ";", "\[IndentingNewLine]", RowBox[{"izr", "=", RowBox[{"ixr", "\[Cross]", "iyr"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix", " ", "=", "ixr"}], ";", "\[IndentingNewLine]", RowBox[{"iy", " ", "=", RowBox[{ RowBox[{ RowBox[{"Cos", "[", "\[Alpha]", "]"}], " ", "iyr"}], "+", RowBox[{ RowBox[{"Sin", "[", "\[Alpha]", "]"}], "izr"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", " ", "=", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"Sin", "[", "\[Alpha]", "]"}]}], " ", "iyr"}], "+", RowBox[{ RowBox[{"Cos", "[", "\[Alpha]", "]"}], "izr"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacements", " ", "and", " ", "rotations"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NL", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ",", RowBox[{"x", "/", "h"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NQ", "=", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}]}], ",", RowBox[{"h", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"x", "/", "h"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"]}], ",", RowBox[{"h", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"x", "/", "h"}], "-", "1"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"ux2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"uy2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"uz2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]x1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"\[Theta]x2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]y1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"\[Theta]y2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]z1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"\[Theta]z2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{"ux1", ",", "ux2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uy1", ",", "\[Theta]z1", ",", "uy2", ",", "\[Theta]z2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uz1", ",", RowBox[{"-", "\[Theta]y1"}], ",", "uz2", ",", RowBox[{"-", "\[Theta]y2"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{"\[Theta]x1", ",", "\[Theta]x2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "w"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux", "=", RowBox[{ RowBox[{"(", RowBox[{"u", "+", RowBox[{"\[Theta]", " ", "z"}], "-", RowBox[{"\[Psi]", " ", "y"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy", "=", RowBox[{ RowBox[{"(", RowBox[{"v", "-", RowBox[{"\[Phi]", " ", "z"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz", "=", RowBox[{ RowBox[{"(", RowBox[{"w", "+", RowBox[{"\[Phi]", " ", "y"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"nn", "=", "10"}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"ii", " ", "slab", " ", "and", " ", "jj", " ", "nod"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"pp", "[", RowBox[{"ii_", ",", "jj_"}], "]"}], ":=", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"r1", "+", RowBox[{ RowBox[{"(", RowBox[{"x", "+", "ux"}], ")"}], " ", "ix"}], "+", RowBox[{ RowBox[{"(", RowBox[{"y", "+", "uy"}], " ", ")"}], "iy"}], " ", "+", RowBox[{ RowBox[{"(", RowBox[{"z", "+", "uz"}], ")"}], " ", "iz"}]}], ")"}], "/.", RowBox[{"x", "\[Rule]", RowBox[{"(", RowBox[{"ii", "*", RowBox[{"h", "/", "nn"}]}], ")"}]}]}], "/.", RowBox[{"Thread", "[", RowBox[{ RowBox[{"{", RowBox[{"y", ",", "z"}], "}"}], "\[Rule]", RowBox[{"pol", "[", RowBox[{"[", "jj", "]"}], "]"}]}], "]"}]}]}], " ", ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Join", "[", RowBox[{"BEAMFORM", ",", RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"ii", ",", "jj"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "jj"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", RowBox[{"jj", "+", "1"}]}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"ii", ",", RowBox[{"jj", "+", "1"}]}], "]"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"ii", ",", "0", ",", RowBox[{"nn", "-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{ RowBox[{"Length", "[", "pol", "]"}], "-", "1"}]}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "POINTFORM", ",", RowBox[{"{", RowBox[{ RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"scale", "\[Equal]", "0"}], ",", RowBox[{"{", RowBox[{"Red", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"r1", "+", RowBox[{"\[CapitalDelta]r", "/", "2"}]}], ",", RowBox[{"r1", "+", RowBox[{"\[CapitalDelta]r", "/", "2"}], "+", RowBox[{"ix", "*", RowBox[{"h", "/", "10"}]}]}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", "Green", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"r1", "+", RowBox[{"\[CapitalDelta]r", "/", "2"}]}], ",", RowBox[{"r1", "+", RowBox[{"\[CapitalDelta]r", "/", "2"}], "+", RowBox[{"iy", "*", RowBox[{"h", "/", "10"}]}]}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", "Blue", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"r1", "+", RowBox[{"\[CapitalDelta]r", "/", "2"}]}], ",", RowBox[{"r1", "+", RowBox[{"\[CapitalDelta]r", "/", "2"}], "+", RowBox[{"iz", "*", RowBox[{"h", "/", "10"}]}]}]}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", "}"}]}], "]"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{ "AA_", ",", "Iy_", ",", "Iz_", ",", "Jx_", ",", "iy_", ",", "pol_"}], "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "r1", ",", "\[CapitalDelta]r", ",", "r", ",", "h", ",", "x", ",", "y", ",", "z", ",", "NL", ",", "NQ", ",", "ix", ",", "iz", ",", "T", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "ux1", ",", "ux2", ",", "uz1", ",", "uz2", ",", "uy1", ",", "uy2", ",", "\[Theta]x1", ",", "\[Theta]x2", ",", "\[Theta]y1", ",", "\[Theta]y2", ",", "\[Theta]z1", ",", "\[Theta]z2", ",", "ux", ",", "uy", ",", "uz", ",", "pp", ",", "nn"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"r1", "=", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[CapitalDelta]r", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h", "=", RowBox[{"Sqrt", "[", RowBox[{"\[CapitalDelta]r", ".", "\[CapitalDelta]r"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix", "=", RowBox[{"\[CapitalDelta]r", "/", "h"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", "=", RowBox[{"ix", "\[Cross]", "iy"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"displacements", " ", "and", " ", "rotations"}], "*)"}], "\[IndentingNewLine]", RowBox[{"NL", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ",", RowBox[{"x", "/", "h"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NQ", "=", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}]}], ",", RowBox[{"h", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"x", "/", "h"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"]}], ",", RowBox[{"h", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"x", "/", "h"}], "-", "1"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"ux2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"uy2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"uz2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]x1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"\[Theta]x2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]y1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"\[Theta]y2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]z1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"\[Theta]z2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{"ux1", ",", "ux2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uy1", ",", "\[Theta]z1", ",", "uy2", ",", "\[Theta]z2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uz1", ",", RowBox[{"-", "\[Theta]y1"}], ",", "uz2", ",", RowBox[{"-", "\[Theta]y2"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{"\[Theta]x1", ",", "\[Theta]x2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "w"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux", "=", RowBox[{ RowBox[{"(", RowBox[{"u", "+", RowBox[{"\[Theta]", " ", "z"}], "-", RowBox[{"\[Psi]", " ", "y"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy", "=", RowBox[{ RowBox[{"(", RowBox[{"v", "-", RowBox[{"\[Phi]", " ", "z"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz", "=", RowBox[{ RowBox[{"(", RowBox[{"w", "+", RowBox[{"\[Phi]", " ", "y"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"nn", "=", "10"}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"ii", " ", "slab", " ", "and", " ", "jj", " ", "nod"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"pp", "[", RowBox[{"ii_", ",", "jj_"}], "]"}], ":=", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"r1", "+", RowBox[{ RowBox[{"(", RowBox[{"x", "+", "ux"}], ")"}], " ", "ix"}], "+", RowBox[{ RowBox[{"(", RowBox[{"y", "+", "uy"}], " ", ")"}], "iy"}], " ", "+", RowBox[{ RowBox[{"(", RowBox[{"z", "+", "uz"}], ")"}], " ", "iz"}]}], ")"}], "/.", RowBox[{"x", "\[Rule]", RowBox[{"(", RowBox[{"ii", "*", RowBox[{"h", "/", "nn"}]}], ")"}]}]}], "/.", RowBox[{"Thread", "[", RowBox[{ RowBox[{"{", RowBox[{"y", ",", "z"}], "}"}], "\[Rule]", RowBox[{"pol", "[", RowBox[{"[", "jj", "]"}], "]"}]}], "]"}]}]}], " ", ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Join", "[", RowBox[{"BEAMFORM", ",", RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"ii", ",", "jj"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "jj"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", RowBox[{"jj", "+", "1"}]}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"ii", ",", RowBox[{"jj", "+", "1"}]}], "]"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"ii", ",", "0", ",", RowBox[{"nn", "-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{ RowBox[{"Length", "[", "pol", "]"}], "-", "1"}]}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "POINTFORM", ",", RowBox[{"{", RowBox[{ RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}]}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "d_", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", RowBox[{"d", ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{"d_", ",", "iy_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", RowBox[{ RowBox[{"CIRCLE", "[", "d", "]"}], ",", "iy"}], "}"}], ",", "for"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"BEAMFORM", "=", RowBox[{"{", RowBox[{ RowBox[{"FaceForm", "[", "Gray", "]"}], ",", RowBox[{"EdgeForm", "[", "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"POINTFORM", "=", RowBox[{"{", RowBox[{"Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{"d_", ",", "iy_"}], "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Rho]", ",", "h", ",", "x", ",", "y", ",", "z", ",", "NL", ",", "NQ", ",", "ix", ",", "iz", ",", "T", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "ux1", ",", "ux2", ",", "uz1", ",", "uz2", ",", "uy1", ",", "uy2", ",", "\[Theta]x1", ",", "\[Theta]x2", ",", "\[Theta]y1", ",", "\[Theta]y2", ",", "\[Theta]z1", ",", "\[Theta]z2", ",", "ux", ",", "uy", ",", "uz", ",", "pp"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Rho]", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h", "=", RowBox[{"Sqrt", "[", RowBox[{"\[Rho]", ".", "\[Rho]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NL", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ",", RowBox[{"x", "/", "h"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NQ", "=", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}]}], ",", RowBox[{"h", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"x", "/", "h"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"]}], ",", RowBox[{"h", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"x", "/", "h"}], "-", "1"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix", "=", RowBox[{"\[Rho]", "/", "h"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", "=", RowBox[{"ix", "\[Cross]", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"{", RowBox[{"ix", ",", "iy", ",", "iz"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"ux2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"uy2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"uz2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]x1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"\[Theta]x2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]y1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"\[Theta]y2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]z1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"\[Theta]z2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{ RowBox[{"NL", ".", RowBox[{"{", RowBox[{"ux1", ",", "ux2"}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{ RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uy1", ",", RowBox[{"-", "\[Theta]z1"}], ",", "uy2", ",", RowBox[{"-", "\[Theta]z2"}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{ RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uz1", ",", RowBox[{"-", "\[Theta]y1"}], ",", "uz2", ",", RowBox[{"-", "\[Theta]y2"}]}], "}"}]}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Partition", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ix", "*", "x"}], "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], ".", "T"}]}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "h", ",", RowBox[{"h", "/", "10"}]}], "}"}]}], "]"}], ",", "2", ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"ix", "*", "x"}], "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], ".", "T"}]}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "h", ",", RowBox[{"h", "/", "10"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Join", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FaceForm", "[", "Black", "]"}], ",", RowBox[{"EdgeForm", "[", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"Tube", "[", RowBox[{"pp", ",", RowBox[{"d", "/", "2"}]}], "]"}], "}"}], ",", "POINTFORM", ",", RowBox[{"{", RowBox[{ RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}]}], "}"}]}], " ", "]"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{ RowBox[{"RECTANGLE", "[", RowBox[{"ly_", ",", "lz_", ",", "t_"}], "]"}], ",", "iy_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", RowBox[{ RowBox[{"RECTANGLE", "[", RowBox[{"ly", ",", "lz"}], "]"}], ",", "iy"}], "}"}], ",", "for"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{ RowBox[{"RECTANGLE", "[", RowBox[{"ly_", ",", "lz_"}], "]"}], ",", "iy_"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", RowBox[{ RowBox[{"RECTANGLE", "[", RowBox[{"ly", ",", "lz"}], "]"}], ",", "iy"}], "}"}], ",", "for"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{"RECTANGLE", "[", RowBox[{"ly_", ",", "lz_"}], "]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", RowBox[{ RowBox[{"RECTANGLE", "[", RowBox[{"ly", ",", "lz"}], "]"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", "for"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{"RECTANGLE", "[", RowBox[{"ly_", ",", "lz_"}], "]"}], "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", RowBox[{ RowBox[{"RECTANGLE", "[", RowBox[{"ly", ",", "lz"}], "]"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], ",", "for"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1", ",", "n2"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", RowBox[{ RowBox[{"RECTANGLE", "[", RowBox[{"ly_", ",", "lz_"}], "]"}], ",", "iy_"}], "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[Rho]", ",", "h", ",", "x", ",", "y", ",", "z", ",", "NL", ",", "NQ", ",", "ix", ",", "iz", ",", "T", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "ux1", ",", "ux2", ",", "uz1", ",", "uz2", ",", "uy1", ",", "uy2", ",", "\[Theta]x1", ",", "\[Theta]x2", ",", "\[Theta]y1", ",", "\[Theta]y2", ",", "\[Theta]z1", ",", "\[Theta]z2", ",", "ux", ",", "uy", ",", "uz", ",", "pp"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Rho]", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "-", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"h", "=", RowBox[{"Sqrt", "[", RowBox[{"\[Rho]", ".", "\[Rho]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ix", "=", RowBox[{"\[Rho]", "/", "h"}]}], ";", "\[IndentingNewLine]", RowBox[{"iz", "=", RowBox[{"ix", "\[Cross]", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Rho]", "=", RowBox[{ RowBox[{"x", " ", "ix"}], "+", RowBox[{"y", " ", "iy"}], "+", RowBox[{"z", " ", "iz"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"T", "=", RowBox[{"{", RowBox[{"ix", ",", "iy", ",", "iz"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NL", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ",", RowBox[{"x", "/", "h"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NQ", "=", RowBox[{"{", RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}]}], ",", RowBox[{"h", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "h"}]}], ")"}], "2"], " ", RowBox[{"x", "/", "h"}]}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", " ", RowBox[{"x", "/", "h"}]}]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"]}], ",", RowBox[{"h", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "h"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"x", "/", "h"}], "-", "1"}], ")"}]}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"ux2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"uy2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"uz2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]x1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", " ", RowBox[{"\[Theta]x2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "ix"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]y1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", " ", RowBox[{"\[Theta]y2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iy"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]z1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", " ", RowBox[{"\[Theta]z2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "3"}], "]"}], "]"}], ".", "iz"}]}], ";", "\[IndentingNewLine]", RowBox[{"u", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{"ux1", ",", "ux2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"v", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uy1", ",", "\[Theta]z1", ",", "uy2", ",", "\[Theta]z2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"w", "=", RowBox[{"NQ", ".", RowBox[{"{", RowBox[{"uz1", ",", RowBox[{"-", "\[Theta]y1"}], ",", "uz2", ",", RowBox[{"-", "\[Theta]y2"}]}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{"NL", ".", RowBox[{"{", RowBox[{"\[Theta]x1", ",", "\[Theta]x2"}], "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "w"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Psi]", "=", RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}]}], ";", "\[IndentingNewLine]", RowBox[{"ux", "=", RowBox[{ RowBox[{"(", RowBox[{"u", "+", RowBox[{"\[Theta]", " ", "z"}], "-", RowBox[{"\[Psi]", " ", "y"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"uy", "=", RowBox[{ RowBox[{"(", RowBox[{"v", "-", RowBox[{"\[Phi]", " ", "z"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"uz", "=", RowBox[{ RowBox[{"(", RowBox[{"w", "+", RowBox[{"\[Phi]", " ", "y"}]}], ")"}], "*", "scale"}]}], ";", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", "\[Rho]", "+", RowBox[{ RowBox[{"{", RowBox[{"ux", ",", "uy", ",", "uz"}], "}"}], ".", "T"}]}], ")"}], "/.", RowBox[{"Thread", "[", RowBox[{ RowBox[{"{", RowBox[{"y", ",", "z"}], "}"}], "\[Rule]", "yz"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "h", ",", RowBox[{"h", "/", "10"}]}], "}"}], ",", RowBox[{"{", RowBox[{"yz", ",", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"ly", ",", "lz"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "ly"}], ",", "lz"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "ly"}], ",", RowBox[{"-", "lz"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ly", ",", RowBox[{"-", "lz"}]}], "}"}]}], "}"}], "/", "2"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Join", "[", RowBox[{"BEAMFORM", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "1"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "2"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "2"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "1"}], "]"}], "]"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "2"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "3"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "3"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "2"}], "]"}], "]"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "4"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "3"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "3"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "4"}], "]"}], "]"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "1"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{"ii", ",", "4"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "4"}], "]"}], "]"}], ",", RowBox[{"pp", "[", RowBox[{"[", RowBox[{ RowBox[{"ii", "+", "1"}], ",", "1"}], "]"}], "]"}]}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ii", ",", "1", ",", RowBox[{ RowBox[{"Length", "[", "pp", "]"}], "-", "1"}]}], "}"}]}], "]"}], ",", "POINTFORM", ",", RowBox[{"{", RowBox[{ RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "*", "scale"}]}], "]"}]}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"RIGID", ",", "pro_", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"crd1", ",", "crd2"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"crd1", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}], "*", "scale"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"crd2", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n2", ",", "2"}], "]"}], "]"}], "*", "scale"}]}]}], ";", RowBox[{"{", RowBox[{"Black", ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"crd1", ",", "crd2"}], "}"}], "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{"crd1", ",", "crd2"}], "}"}], "]"}]}], "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"FORCEFORM", "=", RowBox[{"{", RowBox[{"Gray", ",", RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"EdgeForm", "[", "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[Rho]_", "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"HEXAHEDRON", "[", RowBox[{"lx_", ",", "ly_", ",", "lz_"}], "]"}], ",", "ix_", ",", "iy_"}], "}"}], ",", RowBox[{"{", RowBox[{ "FX_", ",", "FY_", ",", "FZ_", ",", "MX_", ",", "MY_", ",", "MZ_"}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n1_", "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"r", ",", "T", ",", "pnt", ",", "crd"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"pnt", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "lx"}], ",", RowBox[{"-", "ly"}], ",", RowBox[{"-", "lz"}]}], "}"}], ",", RowBox[{"{", RowBox[{"lx", ",", RowBox[{"-", "ly"}], ",", RowBox[{"-", "lz"}]}], "}"}], ",", RowBox[{"{", RowBox[{"lx", ",", "ly", ",", RowBox[{"-", "lz"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "lx"}], ",", "ly", ",", RowBox[{"-", "lz"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"-", "lx"}], ",", RowBox[{"-", "ly"}], ",", "lz"}], "}"}], ",", RowBox[{"{", RowBox[{"lx", ",", RowBox[{"-", "ly"}], ",", "lz"}], "}"}], ",", RowBox[{"{", RowBox[{"lx", ",", "ly", ",", "lz"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "lx"}], ",", "ly", ",", "lz"}], "}"}]}], "}"}], "/", "2"}]}], ";", "\[IndentingNewLine]", RowBox[{"crd", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"ix", ",", "iy", ",", RowBox[{"ix", StyleBox["\[Cross]", "OperatorCharacter"], "iy"}]}], "}"}], ".", "#"}], "&"}], ",", "pnt"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"r", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", "#", "+", RowBox[{"scale", "*", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}], "+", RowBox[{"scale", "*", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "3"}], "]"}], "]"}], StyleBox["\[Cross]", "OperatorCharacter"], RowBox[{ StyleBox["(", "OperatorCharacter"], RowBox[{ StyleBox["#", "OperatorCharacter"], StyleBox["-", "OperatorCharacter"], RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}]}], ")"}]}]}]}], "&"}], ",", "crd"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Join", "[", RowBox[{"FORCEFORM", ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"r", "[", RowBox[{"[", "4", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "1", "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"r", "[", RowBox[{"[", "5", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "6", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "7", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "8", "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"r", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "6", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "5", "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"r", "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "4", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "8", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "7", "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"r", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "5", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "8", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "4", "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{ RowBox[{"r", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "7", "]"}], "]"}], ",", RowBox[{"r", "[", RowBox[{"[", "6", "]"}], "]"}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", "POINTFORM", ",", RowBox[{"{", RowBox[{"Point", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "1"}], "]"}], "]"}], "+", RowBox[{"scale", "*", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"n1", ",", "2"}], "]"}], "]"}]}]}], "]"}], "}"}]}], "]"}]}]}], "]"}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.633673923685915*^9, 3.6336739535006204`*^9}, { 3.633674155068149*^9, 3.6336741996717005`*^9}, {3.6336745049841633`*^9, 3.6336745219741354`*^9}, {3.6336919593939404`*^9, 3.6336919775979815`*^9}, 3.633692380551029*^9, {3.6336927116599674`*^9, 3.633692727194856*^9}, { 3.635310826749509*^9, 3.6353108343419433`*^9}, {3.635311461613821*^9, 3.6353114619508405`*^9}, {3.7326759806780663`*^9, 3.7326760008674326`*^9}, {3.7326760331212645`*^9, 3.7326760385677853`*^9}, {3.732684137201784*^9, 3.73268419404665*^9}, { 3.732684306221466*^9, 3.7326843382153635`*^9}, 3.7326844699232764`*^9, { 3.7326845133861027`*^9, 3.73268452322455*^9}, {3.732759973190983*^9, 3.7327599776758347`*^9}, {3.7327613720703106`*^9, 3.7327614888170295`*^9}, {3.732761535853627*^9, 3.7327615404943867`*^9}, { 3.7327615972663317`*^9, 3.7327616122832594`*^9}, {3.7327616693361855`*^9, 3.73276183332095*^9}, {3.732761876700554*^9, 3.7327618790133*^9}, { 3.732761909063363*^9, 3.732761910469795*^9}, {3.73276200508918*^9, 3.732762006042756*^9}, {3.7327620750344048`*^9, 3.732762101490326*^9}, 3.7327688007102947`*^9, {3.7327705695330524`*^9, 3.7327705708254137`*^9}, { 3.732788507552166*^9, 3.7327885085870132`*^9}, {3.732788681344634*^9, 3.7327887090994544`*^9}, {3.732788743287696*^9, 3.73278879848213*^9}, { 3.732788922306119*^9, 3.7327889462731514`*^9}, {3.732789012151597*^9, 3.732789028200858*^9}, {3.7327890791192408`*^9, 3.732789086999034*^9}, { 3.732789135698248*^9, 3.7327891358892384`*^9}, {3.7327891989507074`*^9, 3.7327891993104925`*^9}, {3.733116709198372*^9, 3.733116731638229*^9}, { 3.7334931331412554`*^9, 3.7334932071522064`*^9}, {3.733493353668892*^9, 3.7334934953404007`*^9}, {3.733493581610343*^9, 3.733493589891471*^9}, { 3.7334936319789553`*^9, 3.7334936623392687`*^9}, {3.7334936935401745`*^9, 3.733493716917615*^9}, {3.7334937687375154`*^9, 3.733493799379287*^9}, { 3.7335602963276734`*^9, 3.7335603891038685`*^9}, {3.7337039222525787`*^9, 3.733703929721642*^9}, {3.7337040222462597`*^9, 3.7337040262631474`*^9}, { 3.733710121070121*^9, 3.733710122358057*^9}, 3.7337110885786676`*^9, 3.733711184948838*^9, {3.733711259729956*^9, 3.733711278366322*^9}, 3.7337113240271106`*^9, {3.733711384581702*^9, 3.733711436236964*^9}, 3.7337114809469175`*^9, {3.7337115173918333`*^9, 3.733711518879483*^9}, 3.733711560439453*^9, {3.733711609599924*^9, 3.7337116342722664`*^9}, { 3.733711689751358*^9, 3.7337116969119487`*^9}, {3.7337129879879694`*^9, 3.7337130014112797`*^9}, {3.733713172835663*^9, 3.733713173913886*^9}, { 3.7337132483436465`*^9, 3.7337132496094065`*^9}, {3.733713283003566*^9, 3.7337134200180254`*^9}, {3.733713464428997*^9, 3.7337135191222897`*^9}, { 3.7337135777847366`*^9, 3.73371367154463*^9}, {3.7337140009857264`*^9, 3.7337140458967295`*^9}, {3.733714091198394*^9, 3.7337141070440063`*^9}, { 3.733714143813529*^9, 3.733714146610505*^9}, {3.733721976862414*^9, 3.7337219813629093`*^9}, {3.733722281191476*^9, 3.7337222944429536`*^9}, { 3.733722382186266*^9, 3.7337223828425617`*^9}, {3.7337224624293957`*^9, 3.7337224858690815`*^9}, 3.7337225537825146`*^9, {3.733722654230641*^9, 3.733722661731436*^9}, {3.733722818999301*^9, 3.7337228267499514`*^9}, { 3.733723144924486*^9, 3.733723159691375*^9}, {3.733723196273369*^9, 3.733723198695795*^9}, {3.7337232377777586`*^9, 3.7337232408874655`*^9}, { 3.73372435111442*^9, 3.733724354067712*^9}, {3.7337244099801674`*^9, 3.733724433076069*^9}, {3.7337245236325226`*^9, 3.733724524679802*^9}, { 3.7337873724058084`*^9, 3.7337873841879997`*^9}, {3.7337879154409466`*^9, 3.7337879158316607`*^9}, {3.7340647908247976`*^9, 3.73406479426425*^9}, { 3.7340650184820967`*^9, 3.7340650196896086`*^9}, {3.7340717757289314`*^9, 3.734071783044138*^9}, 3.760607155346615*^9, 3.7606077013285637`*^9, 3.760607753497196*^9, {3.760608088928544*^9, 3.7606081156683984`*^9}, { 3.760608160193988*^9, 3.7606081844316325`*^9}, {3.760608240118147*^9, 3.7606082403257685`*^9}, {3.760608370421237*^9, 3.7606085188738213`*^9}, { 3.7606087505165215`*^9, 3.7606087536075697`*^9}, {3.7606087890680313`*^9, 3.760608797233983*^9}, {3.7606088687210503`*^9, 3.7606088969051304`*^9}, { 3.760608928173344*^9, 3.760608935537922*^9}, 3.760609001847164*^9, 3.760610501819937*^9, {3.7606107473288507`*^9, 3.760610758648224*^9}, 3.760610853832239*^9, {3.7606112396040025`*^9, 3.7606112817332983`*^9}, { 3.760611401222947*^9, 3.76061140197075*^9}, {3.760611673421208*^9, 3.7606117248805995`*^9}, {3.7606118287018495`*^9, 3.7606119921793656`*^9}, {3.760612127470795*^9, 3.760612223396744*^9}, { 3.76061550773096*^9, 3.7606155085119963`*^9}, 3.760615603302456*^9, { 3.760615693062388*^9, 3.760615704512997*^9}, 3.7606158367472205`*^9, { 3.760615988102416*^9, 3.7606160042704983`*^9}, {3.7632524995190973`*^9, 3.7632525737340136`*^9}, {3.763426957870851*^9, 3.763426959053108*^9}, { 3.7634271873253856`*^9, 3.763427188674776*^9}, {3.7634423988211765`*^9, 3.7634424251737814`*^9}, {3.7634426334949675`*^9, 3.7634426560163193`*^9}, {3.763528275706467*^9, 3.7635284013459897`*^9}, { 3.763528705040784*^9, 3.7635287224411435`*^9}, {3.7635289011396055`*^9, 3.763528901842952*^9}, {3.763548522859683*^9, 3.76354854228095*^9}, { 3.7636050270340595`*^9, 3.763605035756063*^9}, {3.763605112705577*^9, 3.763605344908389*^9}, {3.7636054077448673`*^9, 3.7636054326054068`*^9}, { 3.7636054757131557`*^9, 3.7636054979248376`*^9}, {3.763605542706845*^9, 3.763605675311968*^9}, {3.763605884155599*^9, 3.7636058987003956`*^9}, { 3.763606027844756*^9, 3.7636060593519597`*^9}, {3.7636061708042307`*^9, 3.763606210806114*^9}, 3.763606241472248*^9, {3.7636062752072725`*^9, 3.763606340114405*^9}, {3.763606445999727*^9, 3.7636064489171495`*^9}, { 3.763606744287244*^9, 3.7636067648057427`*^9}, 3.7636070601536713`*^9, { 3.763607262857174*^9, 3.763607300007738*^9}, {3.7636074396359158`*^9, 3.7636074830770864`*^9}, {3.7636076263020697`*^9, 3.7636076543842106`*^9}, 3.763607688296667*^9, {3.7636077698636456`*^9, 3.7636077758773165`*^9}, { 3.763607857294286*^9, 3.7636078613443317`*^9}, 3.763608605441226*^9, { 3.7638142471323504`*^9, 3.7638142487803507`*^9}, {3.7638142898908815`*^9, 3.7638143569012723`*^9}, {3.763958140651967*^9, 3.763958153489439*^9}, 3.76395845683808*^9, {3.7639608609270196`*^9, 3.763960872595887*^9}, { 3.764339536191163*^9, 3.7643395373935814`*^9}, {3.764339581142139*^9, 3.7643396307895145`*^9}, {3.7643397270416403`*^9, 3.764339746774886*^9}, { 3.7643759693358665`*^9, 3.764375988525555*^9}, {3.764410286736837*^9, 3.764410291232706*^9}, {3.7649058387052116`*^9, 3.7649058888300486`*^9}, { 3.764905919657881*^9, 3.7649059255708666`*^9}, {3.764906015807353*^9, 3.7649060798935275`*^9}, {3.7649061275007944`*^9, 3.764906182700228*^9}, { 3.7649814310038157`*^9, 3.764981612888131*^9}, {3.764981649845045*^9, 3.764981717214387*^9}, {3.7650095509166293`*^9, 3.7650095663321896`*^9}, { 3.765009596962874*^9, 3.7650096065955095`*^9}, 3.7650098165773335`*^9, { 3.765011173435627*^9, 3.765011180125066*^9}, {3.7650788221318007`*^9, 3.765078823898266*^9}, {3.7650788935676775`*^9, 3.7650789311170053`*^9}, { 3.765085243174881*^9, 3.7650852441096754`*^9}, 3.765085550868559*^9, { 3.7650855978395305`*^9, 3.7650856220925417`*^9}, {3.7650863545547857`*^9, 3.7650863799862742`*^9}, {3.7650865194326468`*^9, 3.765086519785918*^9}, { 3.7650865505251884`*^9, 3.7650865669896946`*^9}, 3.765087372975154*^9, { 3.7650874030551014`*^9, 3.7650874163952713`*^9}, {3.765087536684074*^9, 3.7650876355597906`*^9}, 3.7650877252914543`*^9, {3.765088672041128*^9, 3.7650887019763765`*^9}, {3.765088740411885*^9, 3.765088742455727*^9}, { 3.7650889283353214`*^9, 3.7650889447918415`*^9}, {3.765089035561446*^9, 3.7650890612584443`*^9}, {3.7650891812559137`*^9, 3.765089209061077*^9}, { 3.7650893423167953`*^9, 3.76508943243054*^9}, {3.765090684608432*^9, 3.765090700734714*^9}, 3.7650907477613907`*^9, {3.7650908366428585`*^9, 3.7650908539151096`*^9}, {3.7650908896330676`*^9, 3.765090909940852*^9}, { 3.765091082681374*^9, 3.7650911113055153`*^9}, {3.7650911427516937`*^9, 3.7650911450258894`*^9}, {3.7650912819372005`*^9, 3.765091515369325*^9}, { 3.7650916102443376`*^9, 3.7650917517497134`*^9}, {3.765092443582117*^9, 3.765092498126871*^9}, {3.76509426500305*^9, 3.765094281405676*^9}, 3.765094315674655*^9, {3.7652396904249477`*^9, 3.765239693502611*^9}, 3.765253217258378*^9, {3.7652532852065315`*^9, 3.7652532918614807`*^9}, 3.766189724095389*^9, {3.766190438614527*^9, 3.7661905103848095`*^9}, { 3.76619098699972*^9, 3.766190987925188*^9}, {3.766193820625373*^9, 3.7661938215367756`*^9}, {3.7662041564549007`*^9, 3.7662041841044207`*^9}, {3.766204415112673*^9, 3.766204435514146*^9}, { 3.766204514370674*^9, 3.766204525664904*^9}, 3.766204570014185*^9, { 3.7665714310907745`*^9, 3.76657144559927*^9}, {3.7665725420953245`*^9, 3.7665725423845477`*^9}, {3.7666314737351704`*^9, 3.7666315492489386`*^9}, {3.7740882771256323`*^9, 3.774088312744491*^9}, { 3.774150773834302*^9, 3.774150944718382*^9}, {3.774150975094303*^9, 3.774151054824913*^9}, {3.7741511238761725`*^9, 3.7741512298519745`*^9}, { 3.77415129158794*^9, 3.774151651300989*^9}, {3.774151741892136*^9, 3.774151770064453*^9}, {3.7742415341727543`*^9, 3.7742416306317797`*^9}, { 3.7751898888726125`*^9, 3.775189913786336*^9}, {3.7751899486865563`*^9, 3.7751899522127523`*^9}, {3.7751899989654093`*^9, 3.7751900149868736`*^9}, {3.7751900517928104`*^9, 3.775190066570419*^9}, { 3.7879798676374617`*^9, 3.7879798943206964`*^9}, {3.792287382183713*^9, 3.792287444759338*^9}, {3.792287488992601*^9, 3.7922875432928047`*^9}, { 3.7922886672157793`*^9, 3.7922886764378495`*^9}, {3.792288708660981*^9, 3.7922888810105305`*^9}, {3.792300131730332*^9, 3.7923001501177034`*^9}, { 3.795768609226843*^9, 3.7957686326352005`*^9}, {3.7957686687171*^9, 3.7957686846637707`*^9}, {3.7957688298513894`*^9, 3.795768834915843*^9}, 3.7957688867486525`*^9, {3.795768942098573*^9, 3.795768993537817*^9}, { 3.7957690236098194`*^9, 3.79576902468211*^9}, {3.7957690712421293`*^9, 3.795769275801197*^9}, {3.7957693460703883`*^9, 3.795769349757367*^9}, { 3.79576972202382*^9, 3.7957697714534473`*^9}, {3.795769801653285*^9, 3.795769804711711*^9}, {3.796345941656575*^9, 3.7963459430887594`*^9}, { 3.8298913714361515`*^9, 3.829891372330407*^9}, {3.843728585368825*^9, 3.84372858844851*^9}, {3.8449958679518747`*^9, 3.8449959617306128`*^9}, { 3.845978121229767*^9, 3.845978121586933*^9}, {3.8459781752184176`*^9, 3.845978183704877*^9}, {3.8459783826308093`*^9, 3.8459784254435472`*^9}, { 3.845978956970813*^9, 3.8459791499511595`*^9}, 3.8461289015497713`*^9, 3.846128946122293*^9, {3.846309385225996*^9, 3.846309410347027*^9}, { 3.846309504823522*^9, 3.846309511339752*^9}}, CellLabel-> "In[316]:=",ExpressionUUID->"a5147753-f023-4240-ab92-c832e4ae5a97"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"plate", " ", "graphics"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "hn_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", "hn", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "hn_", "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", "hn", "}"}], ",", "for"}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "hn_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", "hn", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "hn_", "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", "hn", "}"}], ",", "for"}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "hn_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", "hn", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "hn_", "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r0", ",", "r0\[Alpha]", ",", "r0\[Beta]", ",", "h\[Alpha]", ",", "h\[Beta]", ",", "e\[Alpha]", ",", "e\[Beta]", ",", "en", ",", "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "\[Rho]", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "pp", ",", "pn"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "\[Alpha]", "-", "\[Beta]"}], ",", "\[Alpha]", ",", "\[Beta]"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Alpha]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Beta]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{ RowBox[{"(", RowBox[{"r0\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "r0\[Beta]"}], ")"}], "/", RowBox[{"Norm", "[", RowBox[{"r0\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "r0\[Beta]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Rho]", "=", RowBox[{"en", "*", "n"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"r0", "+", "\[Rho]", "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "*", "scale"}], "+", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "\[Cross]", "\[Rho]"}], "*", "scale"}]}], ")"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "n"}], "}"}], "\[Rule]", "#"}], "]"}]}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"-", "hn"}], "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", RowBox[{ RowBox[{"-", "hn"}], "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", RowBox[{ RowBox[{"-", "hn"}], "/", "2"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"hn", "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", RowBox[{"hn", "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", RowBox[{"hn", "/", "2"}]}], "}"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"pn", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"r0", "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "*", "scale"}]}], ")"}], "/.", RowBox[{"Thread", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "n"}], "}"}], "\[Rule]", "#"}], "]"}]}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Gray", ",", RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"EdgeForm", "[", "]"}], ",", RowBox[{"Prism", "[", "pp", "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}], ",", RowBox[{"Point", "[", "pn", "]"}]}], "}"}]}]}], " ", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "hn_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", "hn", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "hn_", "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", "hn", "}"}], ",", "for"}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "hn_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", "hn", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"SHELL", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "hn_", "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", "hn", "}"}], ",", "for"}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "hn_", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat", ",", RowBox[{"{", "hn", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], "]"}]}], "}"}], ",", "fun"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{"mat_", ",", RowBox[{"{", "hn_", "}"}], ",", "for_"}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "nl", ",", "NN", ",", "r0", ",", "r0\[Alpha]", ",", "r0\[Beta]", ",", "h\[Alpha]", ",", "h\[Beta]", ",", "e\[Alpha]", ",", "e\[Beta]", ",", "en", ",", "\[Alpha]", ",", "\[Beta]", ",", "n", ",", "\[Rho]", ",", "u", ",", "v", ",", "w", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Psi]", ",", "pp", ",", "pn"}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nl", "=", RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", RowBox[{"(", RowBox[{"1", "-", "\[Beta]"}], ")"}]}], ",", RowBox[{"\[Alpha]", " ", "\[Beta]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Alpha]"}], ")"}], "\[Beta]"}]}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"r0", "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "1"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Alpha]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Alpha]"], "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"r0\[Beta]", "=", RowBox[{ SubscriptBox["\[PartialD]", "\[Beta]"], "r0"}]}], ";", "\[IndentingNewLine]", RowBox[{"en", "=", RowBox[{ RowBox[{"(", RowBox[{"r0\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "r0\[Beta]"}], ")"}], "/", RowBox[{"Norm", "[", RowBox[{"r0\[Alpha]", StyleBox["\[Cross]", "OperatorCharacter"], "r0\[Beta]"}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "2"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "=", RowBox[{"NN", ".", RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nl", ",", "3"}], "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Rho]", "=", RowBox[{"en", "*", "n"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"pp", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"r0", "+", "\[Rho]", "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "*", "scale"}], "+", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"\[Phi]", ",", "\[Theta]", ",", "\[Psi]"}], "}"}], "\[Cross]", "\[Rho]"}], "*", "scale"}]}], ")"}], " ", "/.", RowBox[{"Thread", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "n"}], "}"}], "\[Rule]", "#"}], "]"}]}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"-", "hn"}], "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", RowBox[{ RowBox[{"-", "hn"}], "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", RowBox[{ RowBox[{"-", "hn"}], "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", RowBox[{ RowBox[{"-", "hn"}], "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"hn", "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", RowBox[{"hn", "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", RowBox[{"hn", "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", RowBox[{"hn", "/", "2"}]}], "}"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"pn", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"r0", "+", RowBox[{ RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "*", "scale"}]}], ")"}], "/.", RowBox[{"Thread", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "n"}], "}"}], "\[Rule]", "#"}], "]"}]}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Gray", ",", RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"EdgeForm", "[", "]"}], ",", RowBox[{"Hexahedron", "[", "pp", "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}], ",", RowBox[{"Point", "[", "pn", "]"}]}], "}"}]}]}], " ", "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.633673923685915*^9, 3.6336739535006204`*^9}, { 3.633674155068149*^9, 3.6336741996717005`*^9}, {3.6336745049841633`*^9, 3.6336745219741354`*^9}, {3.6336919593939404`*^9, 3.6336919775979815`*^9}, 3.633692380551029*^9, {3.6336927116599674`*^9, 3.633692727194856*^9}, { 3.635310826749509*^9, 3.6353108343419433`*^9}, {3.635311461613821*^9, 3.6353114619508405`*^9}, {3.7326759806780663`*^9, 3.7326760008674326`*^9}, {3.7326760331212645`*^9, 3.7326760385677853`*^9}, {3.732684137201784*^9, 3.73268419404665*^9}, { 3.732684306221466*^9, 3.7326843382153635`*^9}, 3.7326844699232764`*^9, { 3.7326845133861027`*^9, 3.73268452322455*^9}, {3.732759973190983*^9, 3.7327599776758347`*^9}, {3.7327613720703106`*^9, 3.7327614888170295`*^9}, {3.732761535853627*^9, 3.7327615404943867`*^9}, { 3.7327615972663317`*^9, 3.7327616122832594`*^9}, {3.7327616693361855`*^9, 3.73276183332095*^9}, {3.732761876700554*^9, 3.7327618790133*^9}, { 3.732761909063363*^9, 3.732761910469795*^9}, {3.73276200508918*^9, 3.732762006042756*^9}, {3.7327620750344048`*^9, 3.732762101490326*^9}, 3.7327688007102947`*^9, {3.7327705695330524`*^9, 3.7327705708254137`*^9}, { 3.732788507552166*^9, 3.7327885085870132`*^9}, {3.732788681344634*^9, 3.7327887090994544`*^9}, {3.732788743287696*^9, 3.73278879848213*^9}, { 3.732788922306119*^9, 3.7327889462731514`*^9}, {3.732789012151597*^9, 3.732789028200858*^9}, {3.7327890791192408`*^9, 3.732789086999034*^9}, { 3.732789135698248*^9, 3.7327891358892384`*^9}, {3.7327891989507074`*^9, 3.7327891993104925`*^9}, {3.733116709198372*^9, 3.733116731638229*^9}, { 3.7334931331412554`*^9, 3.7334932071522064`*^9}, {3.733493353668892*^9, 3.7334934953404007`*^9}, {3.733493581610343*^9, 3.733493589891471*^9}, { 3.7334936319789553`*^9, 3.7334936623392687`*^9}, {3.7334936935401745`*^9, 3.733493716917615*^9}, {3.7334937687375154`*^9, 3.733493799379287*^9}, { 3.7335602963276734`*^9, 3.7335603891038685`*^9}, {3.7337039222525787`*^9, 3.733703929721642*^9}, {3.7337040222462597`*^9, 3.7337040262631474`*^9}, { 3.733710121070121*^9, 3.733710122358057*^9}, 3.7337110885786676`*^9, 3.733711184948838*^9, {3.733711259729956*^9, 3.733711278366322*^9}, 3.7337113240271106`*^9, {3.733711384581702*^9, 3.733711436236964*^9}, 3.7337114809469175`*^9, {3.7337115173918333`*^9, 3.733711518879483*^9}, 3.733711560439453*^9, {3.733711609599924*^9, 3.7337116342722664`*^9}, { 3.733711689751358*^9, 3.7337116969119487`*^9}, {3.7337129879879694`*^9, 3.7337130014112797`*^9}, {3.733713172835663*^9, 3.733713173913886*^9}, { 3.7337132483436465`*^9, 3.7337132496094065`*^9}, {3.733713283003566*^9, 3.7337134200180254`*^9}, {3.733713464428997*^9, 3.7337135191222897`*^9}, { 3.7337135777847366`*^9, 3.73371367154463*^9}, {3.7337140009857264`*^9, 3.7337140458967295`*^9}, {3.733714091198394*^9, 3.7337141070440063`*^9}, { 3.733714143813529*^9, 3.733714146610505*^9}, {3.733721976862414*^9, 3.7337219813629093`*^9}, {3.733722281191476*^9, 3.7337222944429536`*^9}, { 3.733722382186266*^9, 3.7337223828425617`*^9}, {3.7337224624293957`*^9, 3.7337224858690815`*^9}, 3.7337225537825146`*^9, {3.733722654230641*^9, 3.733722661731436*^9}, {3.733722818999301*^9, 3.7337228267499514`*^9}, { 3.733723144924486*^9, 3.733723159691375*^9}, {3.733723196273369*^9, 3.733723198695795*^9}, {3.7337232377777586`*^9, 3.7337232408874655`*^9}, { 3.73372435111442*^9, 3.733724354067712*^9}, {3.7337244099801674`*^9, 3.733724433076069*^9}, {3.7337245236325226`*^9, 3.733724524679802*^9}, { 3.7337873724058084`*^9, 3.7337873841879997`*^9}, {3.7337879154409466`*^9, 3.7337879158316607`*^9}, {3.7340647908247976`*^9, 3.73406479426425*^9}, { 3.7340650184820967`*^9, 3.7340650196896086`*^9}, {3.7340717757289314`*^9, 3.734071783044138*^9}, 3.760607155346615*^9, 3.7606077013285637`*^9, 3.760607753497196*^9, {3.760608088928544*^9, 3.7606081156683984`*^9}, { 3.760608160193988*^9, 3.7606081844316325`*^9}, {3.760608240118147*^9, 3.7606082403257685`*^9}, {3.760608370421237*^9, 3.7606085188738213`*^9}, { 3.7606087505165215`*^9, 3.7606087536075697`*^9}, {3.7606087890680313`*^9, 3.760608797233983*^9}, {3.7606088687210503`*^9, 3.7606088969051304`*^9}, { 3.760608928173344*^9, 3.760608935537922*^9}, 3.760609001847164*^9, 3.760610501819937*^9, {3.7606107473288507`*^9, 3.760610758648224*^9}, 3.760610853832239*^9, {3.7606112396040025`*^9, 3.7606112817332983`*^9}, { 3.760611401222947*^9, 3.76061140197075*^9}, {3.760611673421208*^9, 3.7606117248805995`*^9}, {3.7606118287018495`*^9, 3.7606119921793656`*^9}, {3.760612127470795*^9, 3.760612223396744*^9}, { 3.76061550773096*^9, 3.7606155085119963`*^9}, 3.760615603302456*^9, { 3.760615693062388*^9, 3.760615704512997*^9}, 3.7606158367472205`*^9, { 3.760615988102416*^9, 3.7606160042704983`*^9}, {3.7632524995190973`*^9, 3.7632525737340136`*^9}, {3.763426957870851*^9, 3.763426959053108*^9}, { 3.7634271873253856`*^9, 3.763427188674776*^9}, {3.7634423988211765`*^9, 3.7634424251737814`*^9}, {3.7634426334949675`*^9, 3.7634426560163193`*^9}, {3.763528275706467*^9, 3.7635284013459897`*^9}, { 3.763528705040784*^9, 3.7635287224411435`*^9}, {3.7635289011396055`*^9, 3.763528901842952*^9}, {3.763548522859683*^9, 3.76354854228095*^9}, { 3.7636050270340595`*^9, 3.763605035756063*^9}, {3.763605112705577*^9, 3.763605344908389*^9}, {3.7636054077448673`*^9, 3.7636054326054068`*^9}, { 3.7636054757131557`*^9, 3.7636054979248376`*^9}, {3.763605542706845*^9, 3.763605675311968*^9}, {3.763605884155599*^9, 3.7636058987003956`*^9}, { 3.763606027844756*^9, 3.7636060593519597`*^9}, {3.7636061708042307`*^9, 3.763606210806114*^9}, 3.763606241472248*^9, {3.7636062752072725`*^9, 3.763606340114405*^9}, {3.763606445999727*^9, 3.7636064489171495`*^9}, { 3.763606744287244*^9, 3.7636067648057427`*^9}, 3.7636070601536713`*^9, { 3.763607262857174*^9, 3.763607300007738*^9}, {3.7636074396359158`*^9, 3.7636074830770864`*^9}, {3.7636076263020697`*^9, 3.7636076543842106`*^9}, 3.763607688296667*^9, {3.7636077698636456`*^9, 3.7636077758773165`*^9}, { 3.763607857294286*^9, 3.7636078613443317`*^9}, 3.763608605441226*^9, { 3.7638142471323504`*^9, 3.7638142487803507`*^9}, {3.7638142898908815`*^9, 3.7638143569012723`*^9}, {3.763958140651967*^9, 3.763958153489439*^9}, 3.76395845683808*^9, {3.7639608609270196`*^9, 3.763960872595887*^9}, { 3.764339536191163*^9, 3.7643395373935814`*^9}, {3.764339581142139*^9, 3.7643396307895145`*^9}, {3.7643397270416403`*^9, 3.764339746774886*^9}, { 3.7643759693358665`*^9, 3.764375988525555*^9}, {3.764410286736837*^9, 3.764410291232706*^9}, {3.7649058387052116`*^9, 3.7649058888300486`*^9}, { 3.764905919657881*^9, 3.7649059255708666`*^9}, {3.764906015807353*^9, 3.7649060798935275`*^9}, {3.7649061275007944`*^9, 3.764906182700228*^9}, { 3.7649814310038157`*^9, 3.764981612888131*^9}, {3.764981649845045*^9, 3.764981717214387*^9}, {3.7650095509166293`*^9, 3.7650095663321896`*^9}, { 3.765009596962874*^9, 3.7650096065955095`*^9}, 3.7650098165773335`*^9, { 3.765011173435627*^9, 3.765011180125066*^9}, {3.7650788221318007`*^9, 3.765078823898266*^9}, {3.7650788935676775`*^9, 3.7650789311170053`*^9}, { 3.765085243174881*^9, 3.7650852441096754`*^9}, 3.765085550868559*^9, { 3.7650855978395305`*^9, 3.7650856220925417`*^9}, {3.7650863545547857`*^9, 3.7650863799862742`*^9}, {3.7650865194326468`*^9, 3.765086519785918*^9}, { 3.7650865505251884`*^9, 3.7650865669896946`*^9}, 3.765087372975154*^9, { 3.7650874030551014`*^9, 3.7650874163952713`*^9}, {3.765087536684074*^9, 3.7650876355597906`*^9}, 3.7650877252914543`*^9, {3.765088672041128*^9, 3.7650887019763765`*^9}, {3.765088740411885*^9, 3.765088742455727*^9}, { 3.7650889283353214`*^9, 3.7650889447918415`*^9}, {3.765089035561446*^9, 3.7650890612584443`*^9}, {3.7650891812559137`*^9, 3.765089209061077*^9}, { 3.7650893423167953`*^9, 3.76508943243054*^9}, {3.765090684608432*^9, 3.765090700734714*^9}, 3.7650907477613907`*^9, {3.7650908366428585`*^9, 3.7650908539151096`*^9}, {3.7650908896330676`*^9, 3.765090909940852*^9}, { 3.765091082681374*^9, 3.7650911113055153`*^9}, {3.7650911427516937`*^9, 3.7650911450258894`*^9}, {3.7650912819372005`*^9, 3.765091515369325*^9}, { 3.7650916102443376`*^9, 3.7650917517497134`*^9}, {3.765092443582117*^9, 3.765092498126871*^9}, {3.76509426500305*^9, 3.765094281405676*^9}, 3.765094315674655*^9, {3.7652396904249477`*^9, 3.765239693502611*^9}, 3.765253217258378*^9, {3.7652532852065315`*^9, 3.7652532918614807`*^9}, 3.766189724095389*^9, {3.766190438614527*^9, 3.7661905103848095`*^9}, { 3.76619098699972*^9, 3.766190987925188*^9}, {3.766193820625373*^9, 3.7661938215367756`*^9}, {3.7662041564549007`*^9, 3.7662041841044207`*^9}, {3.766204415112673*^9, 3.766204435514146*^9}, { 3.766204514370674*^9, 3.766204525664904*^9}, 3.766204570014185*^9, { 3.7665714310907745`*^9, 3.76657144559927*^9}, {3.7665725420953245`*^9, 3.7665725423845477`*^9}, {3.7666314737351704`*^9, 3.7666315492489386`*^9}, {3.7740882771256323`*^9, 3.774088312744491*^9}, { 3.774150773834302*^9, 3.774150944718382*^9}, {3.774150975094303*^9, 3.774151054824913*^9}, {3.7741511238761725`*^9, 3.7741512298519745`*^9}, { 3.77415129158794*^9, 3.774151651300989*^9}, {3.774151741892136*^9, 3.774151770064453*^9}, {3.7742415341727543`*^9, 3.7742416306317797`*^9}, { 3.7751898888726125`*^9, 3.775189913786336*^9}, {3.7751899486865563`*^9, 3.7751899522127523`*^9}, {3.7751899989654093`*^9, 3.7751900149868736`*^9}, {3.7751900517928104`*^9, 3.775190066570419*^9}, { 3.7879798676374617`*^9, 3.7879798943206964`*^9}, {3.792287382183713*^9, 3.792287444759338*^9}, {3.792287488992601*^9, 3.7922875432928047`*^9}, { 3.7922886672157793`*^9, 3.7922886764378495`*^9}, {3.792288708660981*^9, 3.7922888810105305`*^9}, {3.792300131730332*^9, 3.7923001501177034`*^9}, { 3.795768609226843*^9, 3.7957686326352005`*^9}, {3.7957686687171*^9, 3.7957686846637707`*^9}, {3.7957688298513894`*^9, 3.795768834915843*^9}, 3.7957688867486525`*^9, {3.795768942098573*^9, 3.795768993537817*^9}, { 3.7957690236098194`*^9, 3.79576902468211*^9}, {3.7957690712421293`*^9, 3.795769275801197*^9}, {3.7957693460703883`*^9, 3.795769349757367*^9}, { 3.79576972202382*^9, 3.7957697714534473`*^9}, {3.795769801653285*^9, 3.795769804711711*^9}, {3.796345941656575*^9, 3.7963459430887594`*^9}, { 3.8298913714361515`*^9, 3.829891372330407*^9}, {3.843728585368825*^9, 3.84372858844851*^9}, {3.8449958679518747`*^9, 3.8449959617306128`*^9}, { 3.845978121229767*^9, 3.845978121586933*^9}, {3.8459781752184176`*^9, 3.845978183704877*^9}, {3.8459783826308093`*^9, 3.8459784254435472`*^9}, { 3.845978956970813*^9, 3.8459791499511595`*^9}, 3.8461289015497713`*^9, { 3.846128946122293*^9, 3.846128968019552*^9}, {3.846129003512868*^9, 3.8461290485155616`*^9}, {3.8461291291837854`*^9, 3.846129173768606*^9}, { 3.8461293216071515`*^9, 3.846129324863345*^9}, {3.846129415192334*^9, 3.846129416208379*^9}, {3.8461294959672627`*^9, 3.8461295654972105`*^9}, { 3.84612986121124*^9, 3.8461298706686964`*^9}}, CellLabel-> "In[345]:=",ExpressionUUID->"8307f05d-cacc-43b0-a667-951101fb4a88"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"solid", " ", "elements"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{"mat_", ",", "for_"}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"n1_", ",", "n2_", ",", "n3_", ",", "n4_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "pn", "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"pn", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{ RowBox[{"{", RowBox[{"n1", ",", "n2", ",", "n3", ",", "n4"}], "}"}], ",", "2"}], "]"}], "]"}], "*", "scale"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Gray", ",", RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"EdgeForm", "[", "]"}], ",", RowBox[{"Tetrahedron", "[", "pn", "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}], ",", RowBox[{"Point", "[", "pn", "]"}]}], "}"}]}]}], " ", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"GRAPHICS", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "scale_"}], "}"}], ",", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{"mat_", ",", "for_"}], "}"}], ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "n1_", ",", "n2_", ",", "n3_", ",", "n4_", ",", "n5_", ",", "n6_", ",", "n7_", ",", "n8_"}], "}"}], "]"}]}], "}"}], ",", "fun_"}], "]"}], ":=", " ", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"pn", ",", "nn"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"nn", "=", RowBox[{"{", RowBox[{ "n1", ",", "n2", ",", "n3", ",", "n4", ",", "n5", ",", "n6", ",", "n7", ",", "n8"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"pn", "=", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nn", ",", "1"}], "]"}], "]"}], "+", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"nn", ",", "2"}], "]"}], "]"}], "*", "scale"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Gray", ",", RowBox[{"Opacity", "[", "0.5", "]"}], ",", RowBox[{"EdgeForm", "[", "]"}], ",", RowBox[{"Hexahedron", "[", "pn", "]"}], ",", "Blue", ",", RowBox[{"PointSize", "[", "Medium", "]"}], ",", RowBox[{"Point", "[", "pn", "]"}]}], "}"}]}]}], " ", "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.633673923685915*^9, 3.6336739535006204`*^9}, { 3.633674155068149*^9, 3.6336741996717005`*^9}, {3.6336745049841633`*^9, 3.6336745219741354`*^9}, {3.6336919593939404`*^9, 3.6336919775979815`*^9}, 3.633692380551029*^9, {3.6336927116599674`*^9, 3.633692727194856*^9}, { 3.635310826749509*^9, 3.6353108343419433`*^9}, {3.635311461613821*^9, 3.6353114619508405`*^9}, {3.7326759806780663`*^9, 3.7326760008674326`*^9}, {3.7326760331212645`*^9, 3.7326760385677853`*^9}, {3.732684137201784*^9, 3.73268419404665*^9}, { 3.732684306221466*^9, 3.7326843382153635`*^9}, 3.7326844699232764`*^9, { 3.7326845133861027`*^9, 3.73268452322455*^9}, {3.732759973190983*^9, 3.7327599776758347`*^9}, {3.7327613720703106`*^9, 3.7327614888170295`*^9}, {3.732761535853627*^9, 3.7327615404943867`*^9}, { 3.7327615972663317`*^9, 3.7327616122832594`*^9}, {3.7327616693361855`*^9, 3.73276183332095*^9}, {3.732761876700554*^9, 3.7327618790133*^9}, { 3.732761909063363*^9, 3.732761910469795*^9}, {3.73276200508918*^9, 3.732762006042756*^9}, {3.7327620750344048`*^9, 3.732762101490326*^9}, 3.7327688007102947`*^9, {3.7327705695330524`*^9, 3.7327705708254137`*^9}, { 3.732788507552166*^9, 3.7327885085870132`*^9}, {3.732788681344634*^9, 3.7327887090994544`*^9}, {3.732788743287696*^9, 3.73278879848213*^9}, { 3.732788922306119*^9, 3.7327889462731514`*^9}, {3.732789012151597*^9, 3.732789028200858*^9}, {3.7327890791192408`*^9, 3.732789086999034*^9}, { 3.732789135698248*^9, 3.7327891358892384`*^9}, {3.7327891989507074`*^9, 3.7327891993104925`*^9}, {3.733116709198372*^9, 3.733116731638229*^9}, { 3.7334931331412554`*^9, 3.7334932071522064`*^9}, {3.733493353668892*^9, 3.7334934953404007`*^9}, {3.733493581610343*^9, 3.733493589891471*^9}, { 3.7334936319789553`*^9, 3.7334936623392687`*^9}, {3.7334936935401745`*^9, 3.733493716917615*^9}, {3.7334937687375154`*^9, 3.733493799379287*^9}, { 3.7335602963276734`*^9, 3.7335603891038685`*^9}, {3.7337039222525787`*^9, 3.733703929721642*^9}, {3.7337040222462597`*^9, 3.7337040262631474`*^9}, { 3.733710121070121*^9, 3.733710122358057*^9}, 3.7337110885786676`*^9, 3.733711184948838*^9, {3.733711259729956*^9, 3.733711278366322*^9}, 3.7337113240271106`*^9, {3.733711384581702*^9, 3.733711436236964*^9}, 3.7337114809469175`*^9, {3.7337115173918333`*^9, 3.733711518879483*^9}, 3.733711560439453*^9, {3.733711609599924*^9, 3.7337116342722664`*^9}, { 3.733711689751358*^9, 3.7337116969119487`*^9}, {3.7337129879879694`*^9, 3.7337130014112797`*^9}, {3.733713172835663*^9, 3.733713173913886*^9}, { 3.7337132483436465`*^9, 3.7337132496094065`*^9}, {3.733713283003566*^9, 3.7337134200180254`*^9}, {3.733713464428997*^9, 3.7337135191222897`*^9}, { 3.7337135777847366`*^9, 3.73371367154463*^9}, {3.7337140009857264`*^9, 3.7337140458967295`*^9}, {3.733714091198394*^9, 3.7337141070440063`*^9}, { 3.733714143813529*^9, 3.733714146610505*^9}, {3.733721976862414*^9, 3.7337219813629093`*^9}, {3.733722281191476*^9, 3.7337222944429536`*^9}, { 3.733722382186266*^9, 3.7337223828425617`*^9}, {3.7337224624293957`*^9, 3.7337224858690815`*^9}, 3.7337225537825146`*^9, {3.733722654230641*^9, 3.733722661731436*^9}, {3.733722818999301*^9, 3.7337228267499514`*^9}, { 3.733723144924486*^9, 3.733723159691375*^9}, {3.733723196273369*^9, 3.733723198695795*^9}, {3.7337232377777586`*^9, 3.7337232408874655`*^9}, { 3.73372435111442*^9, 3.733724354067712*^9}, {3.7337244099801674`*^9, 3.733724433076069*^9}, {3.7337245236325226`*^9, 3.733724524679802*^9}, { 3.7337873724058084`*^9, 3.7337873841879997`*^9}, {3.7337879154409466`*^9, 3.7337879158316607`*^9}, {3.7340647908247976`*^9, 3.73406479426425*^9}, { 3.7340650184820967`*^9, 3.7340650196896086`*^9}, {3.7340717757289314`*^9, 3.734071783044138*^9}, 3.760607155346615*^9, 3.7606077013285637`*^9, 3.760607753497196*^9, {3.760608088928544*^9, 3.7606081156683984`*^9}, { 3.760608160193988*^9, 3.7606081844316325`*^9}, {3.760608240118147*^9, 3.7606082403257685`*^9}, {3.760608370421237*^9, 3.7606085188738213`*^9}, { 3.7606087505165215`*^9, 3.7606087536075697`*^9}, {3.7606087890680313`*^9, 3.760608797233983*^9}, {3.7606088687210503`*^9, 3.7606088969051304`*^9}, { 3.760608928173344*^9, 3.760608935537922*^9}, 3.760609001847164*^9, 3.760610501819937*^9, {3.7606107473288507`*^9, 3.760610758648224*^9}, 3.760610853832239*^9, {3.7606112396040025`*^9, 3.7606112817332983`*^9}, { 3.760611401222947*^9, 3.76061140197075*^9}, {3.760611673421208*^9, 3.7606117248805995`*^9}, {3.7606118287018495`*^9, 3.7606119921793656`*^9}, {3.760612127470795*^9, 3.760612223396744*^9}, { 3.76061550773096*^9, 3.7606155085119963`*^9}, 3.760615603302456*^9, { 3.760615693062388*^9, 3.760615704512997*^9}, 3.7606158367472205`*^9, { 3.760615988102416*^9, 3.7606160042704983`*^9}, {3.7632524995190973`*^9, 3.7632525737340136`*^9}, {3.763426957870851*^9, 3.763426959053108*^9}, { 3.7634271873253856`*^9, 3.763427188674776*^9}, {3.7634423988211765`*^9, 3.7634424251737814`*^9}, {3.7634426334949675`*^9, 3.7634426560163193`*^9}, {3.763528275706467*^9, 3.7635284013459897`*^9}, { 3.763528705040784*^9, 3.7635287224411435`*^9}, {3.7635289011396055`*^9, 3.763528901842952*^9}, {3.763548522859683*^9, 3.76354854228095*^9}, { 3.7636050270340595`*^9, 3.763605035756063*^9}, {3.763605112705577*^9, 3.763605344908389*^9}, {3.7636054077448673`*^9, 3.7636054326054068`*^9}, { 3.7636054757131557`*^9, 3.7636054979248376`*^9}, {3.763605542706845*^9, 3.763605675311968*^9}, {3.763605884155599*^9, 3.7636058987003956`*^9}, { 3.763606027844756*^9, 3.7636060593519597`*^9}, {3.7636061708042307`*^9, 3.763606210806114*^9}, 3.763606241472248*^9, {3.7636062752072725`*^9, 3.763606340114405*^9}, {3.763606445999727*^9, 3.7636064489171495`*^9}, { 3.763606744287244*^9, 3.7636067648057427`*^9}, 3.7636070601536713`*^9, { 3.763607262857174*^9, 3.763607300007738*^9}, {3.7636074396359158`*^9, 3.7636074830770864`*^9}, {3.7636076263020697`*^9, 3.7636076543842106`*^9}, 3.763607688296667*^9, {3.7636077698636456`*^9, 3.7636077758773165`*^9}, { 3.763607857294286*^9, 3.7636078613443317`*^9}, 3.763608605441226*^9, { 3.7638142471323504`*^9, 3.7638142487803507`*^9}, {3.7638142898908815`*^9, 3.7638143569012723`*^9}, {3.763958140651967*^9, 3.763958153489439*^9}, 3.76395845683808*^9, {3.7639608609270196`*^9, 3.763960872595887*^9}, { 3.764339536191163*^9, 3.7643395373935814`*^9}, {3.764339581142139*^9, 3.7643396307895145`*^9}, {3.7643397270416403`*^9, 3.764339746774886*^9}, { 3.7643759693358665`*^9, 3.764375988525555*^9}, {3.764410286736837*^9, 3.764410291232706*^9}, {3.7649058387052116`*^9, 3.7649058888300486`*^9}, { 3.764905919657881*^9, 3.7649059255708666`*^9}, {3.764906015807353*^9, 3.7649060798935275`*^9}, {3.7649061275007944`*^9, 3.764906182700228*^9}, { 3.7649814310038157`*^9, 3.764981612888131*^9}, {3.764981649845045*^9, 3.764981717214387*^9}, {3.7650095509166293`*^9, 3.7650095663321896`*^9}, { 3.765009596962874*^9, 3.7650096065955095`*^9}, 3.7650098165773335`*^9, { 3.765011173435627*^9, 3.765011180125066*^9}, {3.7650788221318007`*^9, 3.765078823898266*^9}, {3.7650788935676775`*^9, 3.7650789311170053`*^9}, { 3.765085243174881*^9, 3.7650852441096754`*^9}, 3.765085550868559*^9, { 3.7650855978395305`*^9, 3.7650856220925417`*^9}, {3.7650863545547857`*^9, 3.7650863799862742`*^9}, {3.7650865194326468`*^9, 3.765086519785918*^9}, { 3.7650865505251884`*^9, 3.7650865669896946`*^9}, 3.765087372975154*^9, { 3.7650874030551014`*^9, 3.7650874163952713`*^9}, {3.765087536684074*^9, 3.7650876355597906`*^9}, 3.7650877252914543`*^9, {3.765088672041128*^9, 3.7650887019763765`*^9}, {3.765088740411885*^9, 3.765088742455727*^9}, { 3.7650889283353214`*^9, 3.7650889447918415`*^9}, {3.765089035561446*^9, 3.7650890612584443`*^9}, {3.7650891812559137`*^9, 3.765089209061077*^9}, { 3.7650893423167953`*^9, 3.76508943243054*^9}, {3.765090684608432*^9, 3.765090700734714*^9}, 3.7650907477613907`*^9, {3.7650908366428585`*^9, 3.7650908539151096`*^9}, {3.7650908896330676`*^9, 3.765090909940852*^9}, { 3.765091082681374*^9, 3.7650911113055153`*^9}, {3.7650911427516937`*^9, 3.7650911450258894`*^9}, {3.7650912819372005`*^9, 3.765091515369325*^9}, { 3.7650916102443376`*^9, 3.7650917517497134`*^9}, {3.765092443582117*^9, 3.765092498126871*^9}, {3.76509426500305*^9, 3.765094281405676*^9}, 3.765094315674655*^9, {3.7652396904249477`*^9, 3.765239693502611*^9}, 3.765253217258378*^9, {3.7652532852065315`*^9, 3.7652532918614807`*^9}, 3.766189724095389*^9, {3.766190438614527*^9, 3.7661905103848095`*^9}, { 3.76619098699972*^9, 3.766190987925188*^9}, {3.766193820625373*^9, 3.7661938215367756`*^9}, {3.7662041564549007`*^9, 3.7662041841044207`*^9}, {3.766204415112673*^9, 3.766204435514146*^9}, { 3.766204514370674*^9, 3.766204525664904*^9}, 3.766204570014185*^9, { 3.7665714310907745`*^9, 3.76657144559927*^9}, {3.7665725420953245`*^9, 3.7665725423845477`*^9}, {3.7666314737351704`*^9, 3.7666315492489386`*^9}, {3.7740882771256323`*^9, 3.774088312744491*^9}, { 3.774150773834302*^9, 3.774150944718382*^9}, {3.774150975094303*^9, 3.774151054824913*^9}, {3.7741511238761725`*^9, 3.7741512298519745`*^9}, { 3.77415129158794*^9, 3.774151651300989*^9}, {3.774151741892136*^9, 3.774151770064453*^9}, {3.7742415341727543`*^9, 3.7742416306317797`*^9}, { 3.7751898888726125`*^9, 3.775189913786336*^9}, {3.7751899486865563`*^9, 3.7751899522127523`*^9}, {3.7751899989654093`*^9, 3.7751900149868736`*^9}, {3.7751900517928104`*^9, 3.775190066570419*^9}, { 3.7879798676374617`*^9, 3.7879798943206964`*^9}, {3.792287382183713*^9, 3.792287444759338*^9}, {3.792287488992601*^9, 3.7922875432928047`*^9}, { 3.7922886672157793`*^9, 3.7922886764378495`*^9}, {3.792288708660981*^9, 3.7922888810105305`*^9}, {3.792300131730332*^9, 3.7923001501177034`*^9}, { 3.795768609226843*^9, 3.7957686326352005`*^9}, {3.7957686687171*^9, 3.7957686846637707`*^9}, {3.7957688298513894`*^9, 3.795768834915843*^9}, 3.7957688867486525`*^9, {3.795768942098573*^9, 3.795768993537817*^9}, { 3.7957690236098194`*^9, 3.79576902468211*^9}, {3.7957690712421293`*^9, 3.795769275801197*^9}, {3.7957693460703883`*^9, 3.795769349757367*^9}, { 3.79576972202382*^9, 3.7957697714534473`*^9}, {3.795769801653285*^9, 3.795769804711711*^9}, {3.796345941656575*^9, 3.7963459430887594`*^9}, { 3.8298913714361515`*^9, 3.829891372330407*^9}, {3.843728585368825*^9, 3.84372858844851*^9}, {3.8449958679518747`*^9, 3.8449959617306128`*^9}, { 3.845978121229767*^9, 3.845978121586933*^9}, {3.8459781752184176`*^9, 3.845978183704877*^9}, {3.8459783826308093`*^9, 3.8459784254435472`*^9}, { 3.845978956970813*^9, 3.8459791499511595`*^9}, 3.8461289015497713`*^9}, CellLabel-> "In[357]:=",ExpressionUUID->"50704ae4-b225-41d4-9b74-1eae9c894d7d"] }, Closed]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Solver operations", "Title", CellChangeTimes->{ 3.4430806364968*^9, {3.4453166713873997`*^9, 3.4453166747414*^9}, { 3.447462264275*^9, 3.4474622644154*^9}, {3.4695731321116*^9, 3.4695731359491997`*^9}, {3.473055192524*^9, 3.473055199133*^9}, { 3.47305542959*^9, 3.4730554407939997`*^9}, {3.4734696797594*^9, 3.4734696967634*^9}, {3.4933064685896*^9, 3.493306471148*^9}, { 3.5568725291398897`*^9, 3.5568725438967333`*^9}, 3.5568726929512587`*^9, { 3.5576544837556367`*^9, 3.5576544886852455`*^9}, {3.6852489036101027`*^9, 3.68524892333013*^9}, {3.688455478402707*^9, 3.688455486552718*^9}, { 3.813031714323161*^9, 3.813031718925788*^9}, {3.813031758195632*^9, 3.8130317648033185`*^9}, {3.813032384726508*^9, 3.813032390240255*^9}, { 3.814583256251114*^9, 3.8145832796753936`*^9}},ExpressionUUID->"ff4fd310-395d-483b-a385-\ 9262eaf541db"], Cell[CellGroupData[{ Cell["PROBLEM DEFINITION ", "Subsection", CellChangeTimes->{{3.473055512584*^9, 3.4730555529630003`*^9}, { 3.4730575328269997`*^9, 3.473057539222*^9}, {3.4734691424642*^9, 3.4734691605758*^9}, {3.5681161575453596`*^9, 3.568116161819767*^9}, { 3.59922265025865*^9, 3.599222653363055*^9}, 3.629777520582675*^9, 3.629791653258878*^9, {3.630370559869874*^9, 3.6303705662970853`*^9}, { 3.6618219022583027`*^9, 3.6618219059243093`*^9}, 3.6852488995100965`*^9, 3.685281849223243*^9, {3.6853234590535126`*^9, 3.685323459673514*^9}, { 3.68587640866364*^9, 3.6858764117036448`*^9}, {3.6862101948897667`*^9, 3.6862101984397717`*^9}, {3.686235632357339*^9, 3.6862356325473394`*^9}, { 3.686290377128008*^9, 3.686290380228012*^9}, {3.6863951313545313`*^9, 3.6863951457345514`*^9}, {3.6883646955890894`*^9, 3.6883646971490917`*^9}, 3.7807552452476177`*^9, {3.811316330506975*^9, 3.81131633668452*^9}, 3.8127824542431855`*^9, 3.8127840219912105`*^9, {3.813031734498083*^9, 3.8130317350874367`*^9}, {3.814581757873322*^9, 3.8145817683796015`*^9}, { 3.8145827110916595`*^9, 3.814582721061996*^9}, 3.8145828979712915`*^9},ExpressionUUID->"1c2ad8e4-55df-4d57-9f3c-\ d5df39881552"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", " ", GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzsnQdYFMf7x+kKYq8I1thj16jYjV1jF7GLPRpFxV7/NmJs2HvBiB0L2MWK ijWigIQmKALSe2/H/5WF/W3mTupxBb6f58k9c7Mzs7OHuc+9s7Mz9aYtGDlL TUVFZXFpehk5dXkvM7OpK0dVoDdGpovnzDadOWOg6ZKZs2eadZqmTpk1qewq +u97OgMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAIIHkwDcXts4f3aNFncplNNXUNHQq1W7R03jxfjufeHl3DQAAAFB+ RCFP/vytvraKZMo0m27tmyrvPgIAAABKTer7Nc3Vv3tVs0rL32av3XXs79OW B/5cMLxFRbUs4ZbtfdAnXd7dBAAAAJSY1DfLm1RsPm7Hvc//HTNO/mQ5ooZq pm412m9xT5NT9wAAAIDigCguMipF0oHUd6uaZka9KhWn3EyWdbcAAACAkkD6 lz3dNL/LVlXv94ewLQAAACB9RKHnR1XMHErW/e1UsEje3QEAAACKHfFuJ0bV yhxH1mgw72GMvLsDAAAAKD/pEV6vnz9/9uzpk/s3zh9cP+PXejqZd2xL1x99 xCVB3r0DAAAAigHJdjOrq/73QVvVsg0HLD7/b5y8uwYAAAAUE1L/WdNcS8La FuoVmo1Yf/MzpkgBAAAAUiQ9OS7M1/nxhR2ze+hn+Ve9xqBD/ybJu2MAAABA MUQU/nRlB11OuDrddnlifQsAAACgCEj5sK6lBrecVKuNLtAtAAAAUASkPPnD gFsuucKkGxhMBgAAAIqA5HszqmXOVVatieWkAAAAgKIg8blZQ26l5NL9jgVi OSkAAACgIKT7Hh76c58Fx576JbKHUr7azmnObXurWnnUOazdCAAAABSMNLct 7TPnQWlUbNJ74qJNe479febMqSM718zs36hc1ga3atWHnvTBFCkAAADFkx07 dpDs/P3909LS0tPTRSKRnZ2durr6/fv36ShlUk5wcDCVoZIFPEeKy/5BtUpJ WNgie0Wpnycdd8GCUgAAAIotr169Mjc3j4mJcXR0XL16dWBg4KdPnzZs2ODl 5RUQELBq1ar379/HxcVt3ryZShbiPEnfXl+yWDJpYKemBpV0NNVU1bR0q9Rp 0X3k3D/PvwmSuPUtAAAAUFxISUlJSPi+JcD58+fLlCnj4uJCOaGhoZRJnqUc yqfwloRL+fLuLAAAAKCUcCPJwcHBqampsbGx6enp9+/f50aSKR0VFUWSpaOq qqoFH0kGAAAASjZv3rzZunVrdHT069evFy5cGBAQ8OXLFxKrt7f3169fTU1N 3759Gx8fv3Pnzn/++UfenQUAAACUkpiYGD8/v4SEhAsXLtSsWdPV1TUpKcnf 35/i3A8fPujp6V2+fJmC3KCgIHKuvDsLAAAAKB+pqanbt29XV1cPDg5OTk4O CwtLSUm5e/euqqqqnZ1dWlpaeHg4iZjkS2UovJV3fwEAAADlg4JWCmCPHj1K Sn3x4sXUqVN9fX2/fv164MCBz5lMmzbt+fPncXFxVOb9+/eKMFFq7969IpEo OjqaOkORePny5R88eEA/DCiHLsfa2ppyvn37Rj8eKIfKb9iwoW7dupSga6SA nRLGxsaDBw+mBF0XN0OsRYsWS5cupQRVodCeilEjlpaW1CDl0G+S169fUw69 Upo7ER2lHCpJ5bkTUQvUDnciapkSdBY6FyWoGHci6gn1hzsR9ZD6SY1Qn7kT 0VXQtVAOXRddHeXQldL1yueDBgAAICU4bZFe6Xv+6tWr5IJ///2XvPDp0yfK d3JyohzKp6NUJiIigswi7y5/JyQkREVF5fTp03zOw4cPKYd+D/A5u3fvphzq OZ8zffr0Jk2aCNvp0KGDkZGRMEdbW3vjxo38W/ocqJFr167xOZSmHMrnc6g8 1RI2Qm1Sy8IcOi+dnX9LvaJGqId8DvWccugq+By6OsqhK83hcwAAAKAscHOS AwICUjOhHDs7O24kmVxMeiU1BAYGqqmpKchI8v379xMTEw8dOuTh4UHdnjNn DkWC/v7+lBMaGvr27VvKiYqKcnZ2phy6BBsbmyVLllDFx48fnz9/nhIHDx60 sLCgxJUrV+gyKbF69eqLFy9S4tixY//88w9dNTXy7Nkz+slBjfj4+Hh7e1MO vVKaciifjlIOlaTyVIvqUgvUTkbmB0gtU4LOQufKyHy6is5OCeoJ9Yd6RY1Q D6mf1Aj1mXpOOXQVdC2UQ9dFV0c5dKXcMiMAAACUGhcXlxMnTsTHxz9//nzy 5MlfM9m/f7+vr++XL1+mTJny9OnTmJgYKysrKikMFeXFkSNH0tPTqZPUZ3d3 99q1az958oSsRzkpKSnkMsoJCgqiPlMOld+6dWvLli0pER4e/u3bN0pMnTp1 zJgxlKBiYWFhlOjcufPatWsp4efnRyaNi4ujRs6ePUs/P6gRCvZJqZRDr5Sm HMqno5RDJak81aK61AK1Qwlqk1qmBJ2FzkUJOi+dnRLUE+oPJagR6iEVo0ao z9RzyqGroGuhHLouujrKoSul65XPBw0AAEB6kBooniKN2traNm7c2M3NLTIy 8sWLFxEREf/++2+TJk0oTKMIy9PTk5tDJe/+fgcjyQAAAJSLvXv3litXjr7V udUtKHa7detWqVKlHjx4QDmBgYGk2uDgYMrZtWuXvDv7nZs3b1IMeO7cuc+f P1P0N378eCcnJwoSKYd+ITg4OFAOJSg8pByRSHThwoVZs2ZRxdevX1NdSmzf vn3Tpk2UuHfvHkX0lDA1NT116lRG5mgwhfB0ydQIuY8+EGqEQlf6sUE59Epp yqF8Oko5VJLKc6PQ1AK1Qwlqk1qmBJ2FzsX1mc5OCeoJ9Yd6RY1QD6mf1Aj1 mRKUQ1dB10I5dF10dZRDV8r1GQAAgFJDsjh58mRMTIy9vf3EiRPpS56EQjn0 +uXLl8mTJ5M7SMGkko8fP8q7s9+xtLSk2JC6TTG4l5dXixYtuFnTnCVv375N OfTzgCJxyqHye/bs6dq1KyX8/f1Jl5SYN28eN8BLISo32ty/f/8///yTEnSN VDc+Pp4asba2Tk5Opkaio6M/fPhAOfRKacqhfDpKOVSSynOfDLVA7WRkjhJz wS+dhc5FCTovnZ0S1BPqT0bmx049pLrUCPWZszZdBV0L5dB10dVxQ/d0vXL5 nAEAAEgRUur9+/fpe55iqM6dO9P3PMVZjx49IhdQulevXhSmUYT19OlTzheK AEaSAQAAKBd79+4tW7YsfauTcMm8KSkppNpy5crRK6Uph/JDQ0OrVavGTa+V O1euXKHQ8tatW2R/6t7gwYPfvXtHvw0ohwLPJ0+eUA69pSCdckQiEUXlY8eO pYrOzs50NCPzCdwVK1ZQwsHBwdHRMSMzCD106BAl7ty5Q78xKJanRihNoSs1 EhQU5ObmRjn0SmnKoXw6SjlUkspTmupSC1zITG1Sy5Sgs3BP19J56eyUoJ5Q f6hX1Aj1kPpJjdBR6jnl0Fu6Fsqh66Kroxy6Um56MwAAAKXGw8PD2tqaold7 e/tRo0a5u7t//fqVvuGDg4N9fHwGDBhgZ2dHwqUcKkmakHd/M86dO0c/A54/ f06/ELy9vbt27fr69euoqChuPJnidMqhnwcBAQHcPdkjR44MGjSIEqRFchkl li1bxg3wfvjwga6XEqNHj+buSr948YKbhEyN2NraJiYmUiPh4eEuLi6UQ6+U phzKp6OUw01RplpUl1qgdihBbVLLGZlD1nQuStB56eyUoJ5wc4ypEeoh9ZMa 4cYWKIeugq6Fcui66Oooh66Urlc+HzQAAADpQRHW3bt3KYZ68OBB//79XV1d yQL37t2jOOvTp0/du3e/ffs2hXKUQyUVwbYZGEkGAACgVJA99+zZo6ury40k UzDLaZf0wS2HSMEXhb10tGrVqgcOHJB3f7+D2BYAAIDSQWEaiYO+7e3s7AYM GEDCJQXcvHmTvu0pTXbgRpIph3yhCKtb4L4tAAAApcPT05O+z8mnFMwOHTqU DBscHGxjY8Pdt6Vvfi7yohwPDw+sboGRZAAAAAVg37595cuXp2/1xMREbi0L CmbLli1L3/zkVoq/SLXcSPLevXsVYVcCPG8LAABAuaAvc29vb26WFL127tyZ vBAaGkrf/+QCOtS3b9979+6RC16+fBkQECASid6+fSvfPmMtKQAAAMoF2dbV 1fX8+fP0rf748eNhw4bRl/y3b99Onz5NsRilJ0yYYG9vn5CQcOPGDZIvVVFR USEpX758WY73cDGSDAAAQImgr/1Dhw7VqlWL4llSKrfv3qNHjypUqEDRGeVQ tEXhGx01MDDgJtOqZFOnTh0LCwtuI3VZgj2AAACg2DN+/HgVBaOQc1a5521J IqTX3r17UwBLXrCzs+NWbuzZs+edO3foKCmYkxdzdl1dXVNTUy7szQvJyckU LO/Zs2fcuHHNMzExMaE+5L3D2N8WAACKPcXPtu/fvz9w4AA3P4fER0ql7/yj R4/SK6UnTZpEcqQozNLSkpt0RJbU19dn+qCqqjp8+PCnT5/mcCKK7+bNm1ep UiXxS1BTU9uwYUNo3sjASDIAABR3ipltKcgi1VarVo0sRnEWBVYUTJFeDQwM 6JUCN8qhUDcwMLBhw4bHjx9PT0/n9ubr0qWLRG+2bdvWyspK/EGhJ0+elClT RirXu3fvXuo2RZd0Fupe+fLluYU4KIe6Z21tTTlkdgqiuVFu8njdunUpQRF6 bGwsJYyNjQcPHkwJ+o1BmZRo0aLF0qVLKUFV6KqpGDVCPzCoQcqh6339+jXl 0CuluRPRUcqhklSeOxG1QO1wJ6KWKUFnoXNRgtvKkBLUE+4JXKpCPaR+UiPU Z+5EdBV0LZRD10VXRzl0pXS9Bf77AgCAkuLg4GClYHADvAWDvt65ebAkkTt3 7nTq1MnDwyMiIuLFixeU7+zsTDm3b98mL1Dcyt2dbNWqlfDTIDVQYMsIUU9P z9zcnLslSlALWlpaUlFtsWTBggWF/GcJAABAkaGQytHR8eDBgxR5vXr1atas WeRuX1/f/fv3e2dCOWReitSozPv37ynUunHjBlXclgkl6O3ly5fNzMzEfVq6 dOmZM2dywRpzSEdHh8LAOnXqyEpoCg1sCwAAxZ7du3dra2sHBwdHR0e7u7tz mwHp6+tzI8lubm7cSHLTpk2PHz9OITA3o2l6JhmZk6y4ib6GhoZDhw6tX79+ zmb56aefbGxs+NupPj4+o0ePFhZQV1c/fPjwnZIEfcjy+/sDAIDSQwqTdxdy Jygo6J9//qHo1dbWtn379p6enjExMZTDrcXUrl27W7dupaSkvH37lnuqRTiS zL2dNGkS/5aCZTLmj5xLhSMjI8X7wNwNr1ixIjcjCwAAAMiZ0NDQRYsWybsX uUNi5R6bffXq1cKFCwMCAr58+bJjx45Pnz75+vpSDhWIj4+nMm/evKGY9NGj RxmZU4+42T70lgpkZD7Eyi3HdO3aNS8vr6dPn9aqVUtNTU2oUScnJ4l9CAkJ YW7+VqlShVvGHwAAAMgBKysr0o2CbAj7I6h7R44c4Va3oJCWAlvueVg9PT16 pTQ5NzY2luJcCle5xz+5NYHnZ5KRubAw97DtgAEDuBWAScqBgYHh4eEdOnSg TF6gTZs2zaEn4oEwhAsAACBXxowZQ8rg4j5FJigo6N27d6mpqba2to0bN3Z3 dye9fvjwgV4p3ahRo8uXL1Nsy81VzshtJDkj05sUGnPp2bNn8/b89ddfc+iG xJHnypUrQ7gAAAB+REpKSrly5cgXq1atkndfcoIk+/Lly61bt5JPyblLlizx 8/Pz8vIyNzeniDUgIIByKFalsHfv3r3cVuzc6vrLM+Heurq6ZmRuyM6tMfjw 4UNfX9/IyMjevXuPGzeOV6e+vn4OPZFoW064Pxp/BgAAUMJ58uQJJwtm8SJF IyEh4dixY82bNw8PD6dglhs3fvDgQZ06dbg5yeRcyqGjrVu3/vvvv9PT0/Nl 2/Xr1wvVye2MIw75XViMWTcDwgUAACCRxYsX87JQ8Oc7KIB1cHCgYPz69etN mzZ1d3enSNbxvSO9UppyKJ/bmC8iIoJsm/eR5H///Xf69OlCb9avX59belGI SCQaNGgQX0ZVVZWqk2EZ/3748KGoPwoAAADKBYW0vCm4bcoVlufPn69ZsyYu Lo50Rolv375RpPl/6/+P4tzAwMDVq1e/e/cuOjr6r7/+evnyZWpqaq6zpKjY yZMnu3fvLnFkuFGjRlSAP3tUVJRwtJkYOHCgkZFRmzZtateuDeECAAD4EdxS 9jzt27eXd49ywsrKinoYHh5OoSvpjNueoHXr1i9evEhISCDVBgUFkYLbtWt3 6tQpbj++jB88AbR//36SctWqVSV6Vgi1P2XKlKFDh5YtW1aYr66u7uLikpbJ 58+fxYUr3HcAAABASYZCPEYuhVnKuKghmb59+5Y0euPGjebNm3t4eERGRpJw 6dXT05NEfPPmzZSUFH9/f25Jf4kjyY6OjiYmJqVKlWIuXFNTM1fzCuE2C+DZ uHEjM6RcsWLFkiXcNLd9A/R1NVVV1Uvr9d3jmppj4UTnAyObVCqtrqqqUaaW ybUoGfURAADkQt++fRmJKPI2Lk+fPl2xYgWZ1NnZedOmTRTGuru7r1q1ysvL Kzg4ePPmzZQfExOzcuXKx48fk3aFKzfSW7o0MrK4N/X09MiV5HE+J9c9gHr1 6tWmTRth37g9dJgIl4RLcpfPhyV7RIHHB+hkXblavQVPk35cMvLRgqbZa1Vr /DT7TrhCP+oNAACFgsQkHtD16NFD3v36IefOnevcuXNERERISAgX0r58+fLX X3/9559/SMGPHj2i4DcsLKxx48aHDx+Oj4/ndiVYu3Yt/aioUaOGuDS7dOly 8eJFCpap2JcvX/j869ev9+7dW6Jnf/755xz2TKdGmP0LSLjc40glAFH4hdEV stbZUtOfZRcvuVj6t8vja2Uv3KXbcePbH5QDAIDiwdWrV8VtoqqqKj4XV0EI DAzktm21sbFp0KCBm5sbSdbJ2Ylb3YIka2trm5aW5uLiwu2gR2XGjh2roaHB XGPp0qWnTZvGDPMKbcvtNW9lZcXU1dfXHz16tLAWxcvr168X5kyZMoW5HVyh QoWSItzYW1NrZOlWteok2xgJRVK9Dg+onF2m+jBLnzSZ9xIAAGQKGUdi+Hbi xAl5d00yjx8/XrRoEbnV1dV1+/btFOGSZBcsXPDvv/+SiHfs2PHx48eoqKj5 8+c/fPgwQ9IyFHXr1t22bVt4eLh44+K2zZC03a2Ojo5wt4Jly5aZmJgI2xk4 cCBF03SiEincpKcL6mWFraoVRl8QGyFOeLepY/YovVaTeXYYQgYAFHPS09Or V68u0bbM/B/F4cKFCz179uRGkh0cHOLi4l69etWpUydKk2SfP39Ozg0ODm7f vj2FpRn/tW2fPn2uX79OV/2jxiXaNkOScNu2bcutDJkDvr6+9erVY4Sr+Gtj Fp7U92ubq2ddsu5vp4KFNhVFPjRtmnXrQrV8t+1OiXLrJgAAyAj65peoWpXM 2bkxMZIGAeUNPyfZ1ta2UaNG3OoW79+/51a3oBwbGxs66uziHBr2fTD8+xe+ ru4ff/xBR3Nt/Ee2Je7cucMIt1atWsOGDROWobMwQ8r0M6BatWolTrhpnts7 ZX9W2r0P+fE/b9K/WY83yIp71fSNL/j98IcPAAAUH5iFChkuXrwo7w5K4OHD h6amphRXuri47NixgyJcDw8PMzMzNzc3Cml37tz58ePH6Ojo1atXP3v2jMrv 27cv7z8bcrAtcffuXeahocqVKwsj3GXLlm3dulVYZejQocePH2ci3PLly9MP hsJ9DApOuv+RftlTk7U6W3zipJrqeah/9u3a0i2XPI3GEDIAoETQrl27HGw7 ZswYeXdQApcvX+7fvz+J1dfXl+LN78s2OjoOGjSIAsaoqKh79+75+fmFh4cb GxvnPGgskZxtS1D7jHDbtGkj8RawkK9fvzIb1hd74YrCzo/Knpqs0Xaza1pG RsI/Gztk3a5VrdR3n1uyvPsIAACyIDAwMAfVqmQ+cJqYqFh31cieAQEBr169 Sk1NvXnzZqtWrbjVLSiMpVcvL68OHTrcvn07JSXlg9MHKhkfn78HS3K1bYYk 4VatWpUZUu7WrZtwAcygoKC6devq6ekxwn3z5k0BPgQlIfamSfbUZPVmq/8J eTi/SdbtWvW6U2yCENYCAEoIJ06cyNm2BBlN3t38DyKRyM7Obvbs2dHR0e7u 7vv27SORubq6LliwgN6Ghobu3bvXzc2NAt65c+dSybS0/D1akhfbZkgSbs2a NYUR7qpVqygG59/SL4E5c+ZQJM5EuOXKlSvGwk16alqPv0Xbtq1eVlqn/dpX sfLuGwAAyIwRI0bkattp06bJu5ssV69e/e233yIiInx9fa9duxYWFvbu3Ttj Y2MnJyeSmrW1NRmTjg4ZMoSO5rfxPNqWIJWXLl1a+FlRoJ3rkLKfn99PP/3E CJfbE7AYkvp+DT81OQvVqoOPfcp5OUcAACheLFq0aEY2bdq04b8Qu3Tpwuev XLlS3t1kIWHZ29snJiZS3N2+fXtPT09y65MnTyiwpfC2c+fO169fp9j2xYsX 3759y2/jebctcf/+fUa4urq6zMIX2trawmUwSaxUxcDAgBHuq1ev8ttVZUA4 Nfk7mg1/vxOKIWQAQMlF+CjQv//+K+/u/JDk5OTbt2/PmjUrOjqaPHvkyBF/ f39HR8fZs2e7urqScA8fPkzO5UZuc1hc8Ufky7bEgwcPGOHWqVOHW8OKw9zc XBi6Um8p5+3btw0aNCgBwo1xWN5KMOCu3nK9E+JaAEBJRllsm5SUZGNjM378 eLLt58+fz58/TwHsmzdvKMfZ2ZmC3DNnznh7e5NtJ0+eTF4WifIXSeXXthmS hNuyZUsfH5+EhAS+DHWD+paSkiI8EXMPt2zZssVLuOnfLk+o/d+BZPVGS19h JjIAoASjLLYlSK8vX74kc926datNmzbMSHLHjh1JxzExMR+cPgQGBQoFlxcK YNsMScLV1NSk4JovQCEtZVpbW/M5lFbJXEOSEa5w53qlJunjrl5ZTwCpVqhc Mcu6ajVn3o2Td9cAAEBuKJFtb968OXbs2PDw8E+fPlEkS2Gsi4vLxIkTKbal zL///pvyZRnbcjx8+FBbW1uozgYNGvA7O8THx586dYoaF56IcqirDRs2ZIT7 4sWLfPVZARFFPl70c9YQsnq9abbvD2cvdaFaUcK6yQAAUFJQFtuSPa9fv25k ZBQWFubt7X3x4kUSq5OTE/mXbEvps2fPfv78OSoqytjYmNtrL18U2LbEo0eP GOG2aNHC3t5euJsSaZf6KXwKmH4qMNvzKb1w076eHV0z63Gf0i2XPY/JEIWe GV4u6/J0+hz6iuUaAQAlFGWxbWpqqp+fn4ODQ0pKyt27dw0NDT09PUln9+7d I/96eXl17tyZ8ukoudLf3z+/7RfGthmShEts3LiRL/Dy5UvKEQ4XW1hYUE6j Ro2EVXR1dZVWuAnv/+pSNiuQLdd9hwu3nXzU1fHZSzZqtvvzX2ywBwAomSiR be/cuTNz5syYmJhPnz6dPHkyODj4w4cPU6dO/fjxY3h4+PHjx11dXUNCQszM zB4+fMjtEZ93CmnbjMwNARnhkkmpP9xRCrrv379Pr3x5X19fyvn27Zu4cOlH RQE6IFdEYXfnNMre4Kf6sFNfeK3G3Zmhl72yVMMlLzFXCgBQIlEW26anp1MY yz0BRJHssWPHyLbOzs7kX5IshbdHjhwh7VK0u2zZMhKf7G2bIUm4zZo1O3/+ fGBgIF+G0vSzISkpic+h09WqVYsR7vPnzwvWB7mQ6n1ySLVspdaffjNEeINW sLKUas0ZdzBXCgBQElEW2xLe3t7Xr18nTz148KB///4+Pj4UOdrY2AQFBZF/ BwwYQCFtcnKynZ2dcFZSHpGKbYknT57o6Oio/BeKu/kC3Jxk4Vg3BeN6enqN GzcWVilTpozSCDfu9fpfsveIL91q+XN236WUtyuaZE1NVq0w6nwY5koBAEoe SmTb27dvT5o0iXve9uzZsxERERTb8nOST58+7enpSUHulClTKHjMb+PSsi1h b2/PCLdJkyYUiXNHY2Ji3NzchKE3HaJfCxTzUjHlE64o+PrU+hpZLi3ffefH JPEyaR83tckqoqLd+yDmSgEASh5KZFsKaefOnUu28vDwOHDgQGhoKHV43rx5 JC9uVwJXV1dS8Pz58ynIzW/jUrRthiThUui6c+dO3rkZmXOSjx07JqxFYS+z tCMJl9urV1FJcT/QL3sSlGr14X9/kTwLKv3Tzs7ZCzlqtjN3xVwpAEBJQ4ls SwHg1atXuZHkvn37ent7UyRLYSy9+vj49OvXj/KTk5Nv3bpFb/PbuHRtmyFJ uAT1jS/AzUkWVjEyMmrXrl3Tpk0Z4UqlP0WAKOb58tbZt6nV68+49eOVkNP9 DvfhSzZc/AJzpQAAJQxlsW1aWhqpysTEhBtJPnfuHEn2/fv348aNc3JyopD2 7Nmznz59Cg8Pnzp16t27d/PbvtRtm5E5/YlcKVRnkyZNgoKCuKP0w4DidGH5 hISE+Ph4KqAUwhUFXplYK3t9xtKtVzjkuJmeKOT00KzHg1RU9WbeS8ipMAAA FDuUxbbp6elPnjxZunRpbGysq6vrjh07yErUYTMzM3d395CQEMr5+PEjuXjl ypUFGH0tCtsS1BNGuPXr11+yZInQs/fu3aM4V1iL3urr6wtrUZhMwbK0eiUN 0r8eG1xFS41C1dKVm4455pZrtBp9z/Tn8pqqKqrqOrXGn8ee8gCAkoWy2DYj c07yjRs3uFnHPXv25CJZStMrHerdu/f9+/dTUlIePnz49evX/DZeRLbNkCRc NTU1isr5AqtWraJgVlilT58+RkZGzZo1U2zhAgAAyCvKYtvU1NRr166NHj06 KirK19f30qVLYWFhjo6O3B5AlEk5Hh4eAQEBlHPz5s38tl90tiWeP3/OCLdx 48bCh3AlEhwcLC5cCvCl2zcAAAAyQFlsm56e/ujRo8WLF/MjyWQrNze3JUuW cCPJFhYWTk5OoaGhlFMAJRWpbTMyhaurqytUZ61atSZMmCAsc/jw4S1btghz 5s2bxyx8AeECAIAyoiy2zRCMJD98+HDgwIE+Pj4U/V2+fJm0S4eGDRtGGkpK Srpy5Yqnp2d+Gy9q2xIODg6McLW0tL59+8YXWLhw4bhx44RVevXqtXbt2p9/ /llYS1tb+/Hjx0XRQwAAAEWEstg2JSXF1tZ27NixUVFRZMaLFy9SgoJZY2Nj eqU0HfXz84uOjp40adLt27fz274MbJshSbiNGjUSClciFLk3b96cES5F+kXU SQAAAFJHWWyblpb2/Pnz9evXx8XFOTs7b9q0iQJbimGXL19O3Q4ICNi+fbur q2tsbOyKFSsKoEvZ2JZ48eJF2bJlheqsXr36qFGjhGXMzMz+/PNPYU7v3r1r 164N4QIAgJKiLLbNyN40hxtJ5tZJDgoKunDhAiXIs9xIcmJiopWVVQEuRGa2 zZAkXHpLPxj4AgsWLKCfE8Iqffv2tbS0bNGiBSPcAqyaBQAAQPYoi21Jsteu XTM2NuZGkkmyoaGh79+/59ZJjoyMvHTp0ufPnykxYcIEW1tbKp+v9mVp24zM 7W4Z4TZs2FAoXInQJTPCLV26NIQLAACKj7LYNi0tzd7eftWqVdxI8saNG799 ++bp6blu3bpPnz4FBwdTjpOTU2xsLEWFDg4OVD5f7cvYthmShFuhQgVmSJlC 2u3bt/NvuWeC6tWrxwj3wYMHMugwAACAAqMstiXc3NzOnj2bmJhINjQyMiI/ BgYGnjt3jl4pTZ4iHSclJdnY2JB/89u47G1LvHr1qly5ckJ1Vq5cmdmM7/z5 8/zbiIgIExOT+/fvt2zZkhEuZcqmzwAAAAqAEtm2SJGLbYnXr18zwv3pp5+E wpVIWFhYq1atIFwAAFAWYFsOedk2Q5JwtbW1x4wZIyxTqVKlgwcP8m/fvn1b oUKFRo0aMcK1s7OTZc8BAADkEdiWQ462zZAk3GrVqvn5+fEFVq9e7eDgwL/9 +vUr5Tg7O7du3VpYq1SpUhAuAAAoILAth3xtS7x586Z8+fJCddavX9/Lyys1 NVVYLDExMT09nX8bGhrKDCmTcO/duyfz7gMAAMgJ2JZD7rbNyBwfZoSrrq4+ c+ZMvoC/vz9lWltb8zmUphxmaUcSbgF2+AUAAFB0wLYcimDbDEnCrVmzJr+B YFxc3KFDh7y9vfnylKYcPz+/Nm3aQLgAAKCwwLYcCmLbjMy/CCPcevXq2dvb R0ZG8mUSExO9vLzolc/5/PmzeIR7584deVwBAAAAFtiWQ3Fsm5H5R6lQoYLK f1m7di1f4OXLl5RDr3yOhYUF5bRt21ZYRUtLC8IFAABFALblUCjbEu/evWOE a2BgQJ3kjkZERFy/fp1e+fLe3t6UQ/GvuHALsCMSAAAA6QLbciiabTMkCbdu 3boXLlwICQnhy1D6yZMnwkWhHR0dmzRpwgj31q1b8rgCAAAAWcC2HApo24xM dVasWJEZUhYuc8HNSWYWe6xZs2b79u0hXAAAUBxgWw7FtG2GJOHWqlXr8+fP 3NHIyEgqkJKSwpcn87q4uERFRYkL9+bNm/K5BgAAKPHAthwKa9sMScI1MDDY vXt3aGgoX4bbskFY686dO40bNxbW0tTUhHABAEAuwLYcimxb4v3795UqVWKG lK9cucIX4OYkC6sYGRn9kgkj3Bs3bsi8+wAAUNKBbTkU3LbEhw8fGOHWrl3b x8eHOxofHx8cHCwsHxUVFRERQa8dOnRghHv9+nV5XAEAAJRcYFsOxbdthiTh 6unpLV++PDY2li/z6NEj4TQq4ujRow0bNoRwAQBAjsC2HEph2wxJwiWE2wMt Xbq0Xr16wirdunUbNWpUx44dGeHa2trKvPsAAFBCgW05lMW2hJOTU+XKlYXq NDAwEC6eLJHo6OhOnTpBuAAAIBdgWw4lsm2GJOFWrVp1ypQpwjInT560sLAQ 5ixfvpzZgF5DQ8PGxkamXS8o9Gth7Nix/AYNAACgXMC2HMplW8LZ2blKlSpC daqrq3/69IkvMHfu3JEjRwqrGBoarl27lolwSbjXrl2TeffzB6mWGwmvX78+ hAsAUEZgWw6ls22GJOHq6+sLhSuRmJgY0q4SCZdXLcdvv/0m7x4BAEC+gW05 lNG2hIuLCyPcihUrjhkzRlhm5cqVO3bsEOYMGTKkadOmjHCvXr0q277nCUa1 zZo1Ey4TDQAAygJsy6Gkts2QJNzSpUt7eXnxBWbPnr1mzRphlS5dulhaWnbu 3JkRrnC5DEUAqgUAFBtgWw7ltS3x8ePHqlWrCtVZs2ZNoXAlEhsbywhXXV1d cYQL1QIAihOwLYdS2zZDknB1dXWNjIyEZYYMGbJ7927+Lcmrffv2zZs3Z4R7 +fJlmXefBaoFABQzYFsOZbct4erqKi5cT09PvsDcuXNPnz7Nvw0PDzc2Nn70 6FHXrl0VSrhQLQCg+AHbchQD22ZkCrdatWpCderp6Xl4eORcKzY2Vly41tbW sukzA1QLACiWwLYcxcO2BP0RGeGWKlWKYlhhGX19/aNHj/Jv3717R1Ju3bo1 I9xLly7JuPNQLQCguALbchQb22ZkCrd69epCdZYvX14Y4ZqZmdnb2/Nv6dop h2p169aNEe7Fixdl1m2oFgBQjIFtOYqTbTMyN5dnhFujRg13d/eca8XFxXXv 3l0uwoVqAQDFG9iWo5jZNkOScNXU1ExMTPgC/v7+lCm8P0tpymGWdpSBcKFa AECxB7blKH62zZAk3EqVKlEmdzQ2NtbCwkI4aZnSlBMcHNyjRw9G0xcuXCii TkK1AICSAGzLUSxtS7i7u9eoUUOoTvLvkydP4uLi+DIpKSkBAQH0yueQ75i1 lEm458+fl3r3oFoAQAkBtuWQjm1FQZcn19FSyTtadWbcjBJJ9UrEEBcusXz5 cr7Ay5cvKYde+RyKcCmnZ8+ejHDPnTsnxY5BtQCAkgNsyyEd20adHa6TD9cS pQedCi9i2xIeHh56enrC81auXJn/c4eFhV28eJFeheUpJz4+vlevXkUkXKgW AFCigG05pGJbUYjViMqlSmnlgoYafyqNVhtd0qR7JT9AXLjVqlW7cOFCeHg4 X4bSr1+/Fg4pU61ffvmFEe7Zs2cL2RmoFgBQ0oBtOWR23zbV++TQ6qrciVSr jzrrn15052IQFy5hYWHBF+DmJPv7+/M5ZmZm+vr6v/76KyPcM2fOFLgbUC0A oAQC23LIxrai6Ocr22SPNWs1mXs3tOhHkf+Dp6dnzZo1heqsUqXKx48fuaNh YWEODg7Jycl8+c+fP799+zYhIUFawoVqAQAlE9iWQxa2TfM9a6SfNYqsWrHX LpekIjlNLnh5eYkLd/fu3cIhZSrDbC5vb2/frl07YS1VVVUrK6t8nRqqBQCU WGBbjqK3bdybjR11s86gUX+qbZCMw1oBJFN9fX2V/yK8G8vNSRZWMTIy6tCh Q58+fQosXKgWAFCSgW05iti26QFXJtVVz3JUuS5bHOOlfYZ8Ii5cinBdXFy4 o2RG+kCE5cmMgYGBiYmJ4sIV7uL3I6BaAEAJB7blKFLbJnzY1q181swo9drj L8lwZlQOfPr0iRFuxYoVV6xYIVz44tmzZydPnhTWOnPmTJs2bRjh/v333zmc CKoFAADYlqPobCsKvjmjgWZW02V+WfcqVoqNFxISroGBgcp/uX//Pl/AzMyM CgirGBoajhw5sm/fvoxwT506JfEUUC0AAGTAttkUlW2TXPf0qZQV1qrVHGX1 RTZP1+Ydb29vRriVK1d2dnbmjqanp6empgrLp2WSmJjYr18/RriWlpZM41At AABwwLYcRWJbUZjdvKbZCzlqt1r2tKgXaSwY4sItX7781KlThWXOnDlz4MAB Yc6GDRvEh5SFwoVqAQCAB7blKALbpngeHVQ1ex2LaoOPeaXkXkdekHBr1arF qNPJyYkvMGPGjMGDBwurkGpXr17dv39/phZ3nxeqBQAAIbAth7RtK4qyX9Kq dFaDpZqZPpDBasiFw8fHhxFupUqVPnz4kHOtpKSkAQMGMMLdv38/VAsAAEJg W47w8PAZ2Xh5eRWytdTPf4/Uy17HonLfff8m515HASDh1q5dW6hOXV3dsWPH CsusX79+7969whwqwCx8IQSqBQCADNi2KIh5uaZ9mazPVLPhrFshih7WCvj8 +TMjXE1Nzffv3/MFTExMli1bJqzStm1bS0vLgQMHQrUAAPAjYFspk+53cWyt 7HUsKvTY7pQo7x7lF3HhVqxYUShciSQlJTGzlIldu3bJps8AAKDgwLZSJf6d eeeyWR+nRt3JV78pxDoW+UZcuNra2mPGjBGWMTIyEs5S9vHxKVu2rIoYx44d k3n3AQBA4YBtpYco0MakvkbWh1m206a3cbnXUVi+fPlSp04doTdLly797t07 vsC0adNOnDjBpaOjo3O4dXv06FE5XQQAACgKsK20SHTe2bNC9joWBmPOf1W0 dSzyDQm3bt26Qm9WqFBBKFyeO3fu8GWaNm3KrDRFHDlyRPb9BwAAxQG2lQqi 0Nu/N8penlGn3aoXMfLukXTw9fVlhKupqcnMUq5fvz6/3jKlHz161KBBg+7d uzPCPXz4sLR6JQq+MKF2GQ1VVXVtvUEHPSX+rEkPsJ3XoYaOOhUq03D+fUlF AABAdsC2UiDZ7UD/ytnrWNQYZumTmnsdpUFcuDo6OvTPhi8gHHBu3bq1m5vb nDlz3N3dhwwZUlTCTXXe0DpryF6tgZmD+D7BiU7bu2ftA6GQ62UCAEocsG1h EUU8WvhzqayPsHQLs8eRSvTAT94g4darV0/ozQoVKvDCZe7w9uvXLzHx+0Ts 5ORkceEeOnRIGj1K9z8+IGuzYNVqE22i/nNQFG73R5OsBTO1Wy21V8z1MgEA JQvYtnCIgi6P189ex6LKwEMeCrw8Y2H4+vUrI1w1NbXJkydzR0m4wpWWOeFe vXq1dOnS4o8FHTx4UAodirk1VS9rOKFM/2OCPQxTfU4Orc4dUa066KhnMf2D AACUDNi2UKS5bm6r8T+RqOUBda2fFj1TRgWQcOvXry/0ZpkyZd68ecMd/fjx IwW8QuF++PDB3Nw8PDx86NChjHCZDQ4KRMq71T9nPdes2c7cNWusOO71ul+y VhbRajrPTmHXy0xJSYmIiPDz84uKikpPV87nxAAA+QG2LQyikOP9S6nkE/XG K94q6Y1dsgMj3PLlyz948CAp6fut0x8NKcfGxg4aNEjqwk33PdhbJ+tXTj1T +8TvAw02U+pyBlat1HuPq/j9XDmRkJDw8OHDv/76a/To0S1atKhcubLwo6Cf YDVq1GjXrt2kSZP27t376tWrtDTcaAaguAHbFgZR1O3Z9Uup5ku22i1Xv1IY DeQfceESCxcu5I6ScEkcjHAtLCwoPXz4cCkLVxRlM7Fa1phxlXGXg1z3Zm8l rPHT9BvB8g9r4+LiTp06RaG9trZ2vv6NVKpUafLkydevX4d2ASg2wLYgv5Bw f/rpJ6EddHV1X79+zR199+5dlSpVhMJ1dHQk6aSkpIwYMYLRyv79+wvTk+TX yxpnjSaX+qnZT9wwg2q5rn85JkjjQguOj4/PggULKPDPl2TFqVWr1p9//hke Hi7fywEAFB7YFhQAf39/RrjlypU7c+ZMVNT36cE/GlL++vVrnz59GKHs27ev 4P1I997TvfR/mlOvPd7aX473QYODg+fOnauhoaEiRpkyZbp27Tpv3rytW7da WVnRx7Vy5crLly+fPHly8+bNM2bMaNu2rcSK9Nlu2bIlIUHOPyEAAIUBtgUF g4TboEEDxgsUiHFHSbhVq1ZlhGtmZqavry8e4TJb+OUHUejfQ8r8ryWtVite xkrrCvPbFZHowIEDFOYzV9ekSZNVq1a9ffs2L7OhkpKS7t+/T77W09Nj2jEw MLh7964MLgQAUBTAtqDABAQEMMIl17x69Yo7Sv+0qlevLhSus7Pz06dPU1NT R44cyahkz549BelBzMu1vwhkq6Iuca0LGeDn5/frr78Kr0hNTW306NF0vQVr kD4lCnu7devGfFAzZ86Mi1PmBbgBKKnAtqAwiAu3bNmyFhYWkZGRGT8eUqZA r1evXoUVbprvuTEGav9tRLXK2MsRsp4f5eDgIAzkicGDB3/8+FEqjVOo27p1 a2HjLVu29PX1lUrjAACZAduCQkLCbdiwIaNOft8fEm7FihUZ4RoZGXXq1IlC P6bW7t2783za72Ft1qBt6RbzzafWy/Kudve9PrK8b3vmzBlNTU3+EvT09G7d uiXdU4hEon379gknNpPc+TEEAIBSANuCwiMuXF1d3RcvXnBHP3z4ULNmTaFw P336RBZOTU0l7TLCzdsG9IKwVrVin71uyWmu5u2ylKfeeNnr5CK93P9haWmp qvq/J8BGjBgRERFRROfy8vJq06YNf66yZcvynzAAQPGBbYFU+PbtW6NGjYTe LFOmzIoVK7ibjD8aUr569WqPHj0Y4VpYWOR8rpiX67LDWvU6k64Gfg9l0/2P 9su6g6tabeI1WSxWbWVlJVTtunXrKAgt0jPGx8cLBwRIuG/fvi3SMwIApAVs C6SFuHAJGxsb7igJt1y5coxwDQ0NR40aJR7h7ty580dnEd6t1Wm76gU/BTnq 2oSqWe7T+fWAbxGPJj9//lw4gHzs2LGiPV82JPQ5c+bw59XT0wsICJDNqQEA hQG2BVJEXLi6urokJu6oh4dH7dq1hcINDw9PSEhIS0sbM2ZMnoQb+2pdh+zN f6oMPPKfPQeSni2sn6Vh9War/inCtai/fv0qnBYlM9XyCIXbrl07bqAAAKDI wLZAugQGBjZu3FjoTW1t7WnTpnFHfzSkvGPHDvEhZcr8T9NpX88bZ4e1Gj/N uBnCjNsKbt6q1phyI7poLpCiS2FX169fXzTnyaUPwt0MzczMZN8HAEC+gG2B 1CHhNmnShFHns2fPuKMk3DJl/veQLCfcpk2brlixwtjYmKm1ffv27FZjX63P DmtVdDtufBsvfmLBzVuVMv2O+BXJaPKePXv47o0aNaqo79X+iNjY2J9//jnr t4WqKv/xAgAUE9gWFAVBQUGMcMmwQuFKjHDT0tLGjh3LCHfbtm10SBR2aULN Umoqqho61dtMP//5B6v1R935o3FZDVUVtVKVWq14Kv2pyfRDQkcna+chfX19 bqVKeeHs7MzfO6ZPG1sYAKDIwLagiBAXbqlSpcaNG8cd/ZFwp0+fLr7wxdat W+V6Kf9j1qxZfK8UYR1Fc3Nzvj+yv30MAMg7sC0oOki4TZs2FXpTXV2dX8zw R0PKJ0+eHD9+vAIK19PTk/rP9WfYsGHy7s53UlJS+A0Q9fT0MF0KAIUFtgVF SnBwMCNcHR0de3t77mgOQ8riwv3rr7/kein/mwlMznV3d5dvZ3guXLjAf0SW lpby7g4AQDKwLShqSLjNmjUTelNTU9PIyIg7KlG4YWFhAwYM6Nu3LyPcLVu2 yOsqoqOj+UicfgnIqxviiEQifhJ4mzZt5N0dAIBkYFsGNzc3+hw8PDzk3ZFi hbhwNTQ0njx5wh0VH1L28/Mj1VKBCRMmMMLlN/WTMUeOHOH78PLlS7n04Ufs 27eP79u7d+/k3R0AgARgW4bSpb/vTl6pUiV5d6S4ERISwghXR0dHKFyJQ8rp 6ekTJ05UBOH279+fO3vLli1lf/aciYmJ4f7dEqtXr5Z3dwAAEoBtGWDbooOE yz8iyqGurm5sbMwdlShcJyenFi1a/Pbbb4xwzc3NZdlz0hn/rM3GjRtleeo8 wi92QZ+wvPsCAJAAbMsA2xYpJNzmzZsLvUkWe/ToEXeUhKurq8sfIuG6urqa mJh4enpOnjyZEe7mzZtl1u1bt27x56UfADI7b945efIk38OgoCB5dwcAwALb MsC2RU1oaCgjXG1t7YcPH3JHcxhSFhfupk2bZNPn9evXc2esWLFioRpKCXa8 YrFoXO92jWtV0dVS19Kt9lO7AdM2nncMK+TKFN7e3vzHcvPmzcI1BgCQPrAt A2wrA0i4LVq0EHpTVVV14sSJ3FESroGBASNcW1tbMp345gWyGdcdPHgwd7q+ ffsWtI30oEebh/ykoyIR9Rq9t7yIKtwakPT5cI3JZelmAEDOwLYMsK1sEBeu lpYWH+G6uLiUL19eKNx3796tXr06MjLSxMRE9sJt2LAhd66lS5cWsImUp6Z1 uB0VNKs06208c8GSJQumD2+vV4r/waE3zjq4ML7l1+AaO3ZsIZoBABQJsC0D bCszxIVLH/7t27e59X5/NKSckpIyadIkRrgbNmwo0q7yDyjt27evgE0kP5qj r1W985zDT/2TBNlxLoeG1sza10iz/Ra3Qgwo8x9L9+7dC94KAKBogG0ZYFtZ EhYW1rJlS0adv//+O3eUhFujRg1GuBYWFpSeOnUqU6vohk9jYmL4s1y5cqWg zST5uXpESNiVSBRoObgs13qpASdCCx7dLl++nGuGIvECNwIAKCJgWwbYVsaQ cFu1aiX0ZqlSpezs7Lijb9++pb8Fl6+lpfXixQsnJ6dDhw6JRCJx4a5bt64o eujv78+fgp8+LUXSP+005J4u0uxs4VPwXQK3bdvGdbJ69epS7B4AQCrAtgyw rewJDw9nhEt/BUtLy9jY2IzsIWVS7bFjx1JTU/laISEh4pOmikK4vr6+fPv8 Cs9S5H+21SpUbLtz506uk1WrVpVi9wAAUgG2ZYBt5YK4cIk1a9ZwR0m4lKYc CjP5KmZmZvr6+tOnTy9q4QYEBPCN8/O4pEji3enVVb83rlZnwbOUgrezdetW rpM1atSQXu8AANIBtmWAbeUFCbd169ZCb5YqVerevXvc0W/fvl2/fl24o9zH jx/t7OxEItGMGTMY4a5du1aKHYuPj+dbvnTpkhRbziTObpZB5jQpNYPfHyQU oqElS5ZwnWzcuLHUegcAkBKwLYOhoWGbNm169eol746URCQKd9u2bdHR0XwZ Pz8/fnVlDtLuyJEjfxQXS4WyZbPmMe3evVuKzRLpnw/24dou3XHrv6m5V/gx /B6F+NcLgAIC2wKFIiIign7tMOrctWsXX4CbkyysYmRk1KlTp5kzZzK1pLg+ f5MmTbg2Fy5cKK02v5Pud3p41cxRZK2flznEFa6xrl27cp3k1wkBACgOsC1Q NEi4bdu2FXpTS0vrzp073NHg4GBHR0dheR8fHw8PD5FINGvWLEa4q1atkkqX RowYwTUo1UdZk9329a2U6Vqd9uvexBeqrfT0dH6JaXltSggAyAHYFiggEoW7 bNmyhIT/3dh89+7dtWvXhLXu3r07bNiwohAu+YtrjYxGXit8g98Xcrw1u0nm QlJqesMsvQs1hpyRuS8zf8n881MAAMUBtgWKibhwidOnT/MFzMzMDAwMhFUM DQ1Hjx79+++/M7VWrlxZyM48ePCAb+3Vq1eFbC0jQxT2aGm7zEhUtUKXza9j Ct1gxv79+/ke0kdX+AYBANKl0LZN/3puys9VdTTUtMo3mn+vcKNhAAiJjIxs 164dE+HeunWLOxobGxsaGiosT5aJiooSiURz5sxhhLtixYrC9CQxMVFHJ2tD geXLlxemKVJthP2qDuW+jyCrlv1l+eOwwu1FkEXv3r257v3yyy/SaA8AIGUK bduYS6Oz7hapNVjyshBPCwIgDgm3ffv2Qm9qamqamJgIy9jY2FhZWQlzDhw4 MHToUEa4hbTk8OHDuXYaNGhAQi9oM6JIh/WdK2Spdtkj6aiWfnVoaGhw3TM3 N5dGkwAAKVNY26a+WdZInateZuT56NwrAJA/xIWr8t8tXMeOHdutWzdhlXr1 6i1dulQ8wl22bFmBu3HmzBm+nYLeGBVFvzbvnjkvSrWc1KLaDMFtZcLNzU1K rQIApEkhbSsKOtpXi6ut0dbctZA7YgMgkaioKPEINy97ps+dO1dawk1MTKxc uTLXyG+//VaAFmL/2f5rFU61HVZIT7Wpqam1atXiOobdfwBQWApp2+QHs/Uy H2FQUa0y9XZS7hUAKBAk3F9++UXoTQ0NDWYjVwsLi5MnTwpzTE1N+RFgngLv UUum5ht58+ZNvuqmB1wYo8ftrKfdbLz5wUMSOXzsimN4PjVM1fheXb58OX+V AQCyonC2Tffa3inrdpFmz/1+UnkyQs5QNDRjxgwpL2IApAEJt0OHDkJvqqqq Xr9+nS8wcuRI+vMJq9StW/f48ePz5s1jhLtkyZICdMDf359b2JPo0aNHvurG XxylrZIHtPocCcyHbuPi4qpXr85VbdCgAbc1MABAASmcbeOujC3H1VWrt/B5 sZgihXWSFZno6GhGuJqamra2trlWFBfu4sWLC9ABYXjLTM3KmdTXq5trq+Yq W7Vqk23z8zzQggUL+LrW1tb5vh4AgKwolG1T361qmjVFSmfYmcii6aGMgW0V HHHhqqurjx49Wlhm5syZlpaW/Nvw8HAKe42MjBi1mZmZ5ffsFF/zd28rVKgQ EBBQ+CsqMPb29vy1dOzYUY49AQDkSmFsKwo9ObAUV1Wj1Qbn4jGGBdsqPiRc kst/QkI1NWGEO2LEiH379vFvQ0JCunTp8ujRI1NT08IL99y5c3z17t27p6TI Z0wnKCjIwMCA64aWltbHjx/l0g0AQB4pjG1THv/BbRWmolpx0vXC7BWmQMC2 SgEJt1OnTkJvamho2NjY5FpROPTKsWjRovyefdSoUXx1iqMLdAWFIikpSXj5 f/31l+z7AADIF4WwbbrPri6aXE3Nbnu+FIcpUhmwrfIQExPDCFdVVZU8KCxD ITCFovxbFxcXypk0aRIj3PxOigsPD69fvz5fXbq7++UKRdPC5aD79euHyVEA KD6FsG2C7cQKXEW1WvPti8UUqQzYVqkg4RoaGgq9qaamdvXqVb6AsbExv9Ij 4enpSTn0SnplhEsxb75O7erqym96K0vhJicnC1XbqFGjqKgo2ZwaAFAYCm7b 1A/rWmRNkSo9+FR+HxJUWGBb5UJcuBoaGkLh/ohFixYVUrh2dnalSpXiq0+e PDkpqWgfOQ8ODu7cuTN/Rj09PS8vryI9IwBAWhTYtqKI00OyHiBUb77mfWE3 DFMYYFulg4QrdJBK5pAyxbB8gcDAQH19feHaU5SmnNmzZzPCNTU1zdep7969 KxRux44dvb29pXZh/+X58+f8mlGcaj08PIroXAAAqVNg26Y8Na3DTZFSqTDe pvjs/QPbKiOxsbGMcNXU1K5cucIdjYqKMjMzc3Jy4stTmnIof/HixYUU7sOH DytUqMBX19HROXDggJT2wM0iISGBeks/IfizNGzYEFEtAMpFQW2b/nVfj+wp Up0tvIvJFKkM2FZpIeF26dJF6E11dfW8rGS4ZMkSRrjz58/P16k9PT0bNWok bKFFixZ37twp6KX8j7S0tGPHjlEYK2y8b9++kZHF4+l2AEoQBbVt4s0plbMW SK4551FyEfZQxsC2ygsJt2vXrow6p0yZwhd4+fIl5dArn2NhYaGSuZAjU2ve vHn5OnV0dLSJiQnTyC+//HL69OmC3cyNiIjYvn17vXr1hA1qamqam5tjBjIA ykgBbZv2cVPrrAWSSw04EVJcpkgRDRs2rFWrVsuWLeXdEVAQxIVLES6/pOG3 b99Ir/TKl3/37h3lUGLp0qWMK//444/8nv3mzZvCW6scFSpUGD9+PPUhJCQk 1xY+f/5MweygQYOEt4M52rVrJxwMBwAoFwW0bdS54TpZX2ZNV/5TbKZIgWKA ROEePnw4MTGRL0PpgIAA4d1VCk5Jr4zgmD0O8gK1TDGp8E6uEHLxkCFD5syZ s3nz5gMHDlCv9u/fv27duhkzZvTt25dfE5KBItzz588XYgt7AID8KZhtU16Y /ZQ1RarsmMuxRdpDAPJLXFxct27dGGcJ14yiSJNy/P39+RwzMzMDA4Ply5cX XrgZmfOydu3a1aBBA4n2zDudOnU6e/asvBaHBABIkQLZVhRw8NfsPeQ7bvPE XSSgcJBwu3fvLjQXRbgXL17kjvr5+VE6IeF/y42+f/+e27xvxYoVjPIoFC1Y XEm1Hj9+bGpqWqdOnXxJtmXLlhTwYtwYgOJEgWybdHd6tawpUjVm3S9GU6RA cUJcuGpqaubm5rGx/xuNCQwMfP36tbCWl5fXjBkzGP39/vvvhRzI/fTp0/nz 5ymCHjJkSLt27WrWrFm2bFkdHZ1y5crVrl2bYthRo0atWbOGjE9dKsyJAACK SUFsm+a2pX3WFCmtvkeDcDcJKCrx8fGMcIlNmzbxBbg5ycIqRkZGhoaGK1eu ZGrNnj0bd04BAAWmILaNuTRaNytWqPfH3cBQyYSFRSVgjBnIGxJujx49mAiX wkzuaEBAgIODg7C8u7u7s7MzJVatWgXhAgCkRQFsm/p6WSN18XtN4mj12Pe1 +Cx7AZQWEm7Pnj0Z4S5atEg4S5kMy6xH8eTJk6lTpzL/pmfNmgXhAgAKQP5t Kwo+3p99FFAyuqMuRBf5BQCQB0i4vXr1Yv6BCnec5+YkC6sYGhoaGRmtXr2a qTVz5kwIFwCQXwpg28hbs38qraqSG5q1Jl0pTsteACVHXLgU4Z49e5Y7GhER 4efnJywfGBjIrUexZs0a5t/2jBkzIFwAQL4oxP62xZN169atXLly8+bN8u4I kD4JCQniwp08ebKwzO3bty9duiTMOXny5JQpUyBcAEBhgG0ZsE5y8YaE++uv vzLqPHPmDF+Am5MsrGJgYGBmZkY/w5ha06dPh3ABAHkEtmWAbYs9JNzevXsL vamqqmplZcUdTctEWD41NZVb4xHCLWHEvvyrXx0dNZXcUK005WZBtp4AJQvY lgG2LQmQcPv06cMIl6JaYZkDBw4IY15i+fLl4hv9TJs2DcItnsRdHVc+V9Nm /uOpPtMOi/yA3IBtGWDbEoK4cInTp0/zBQYPHjxjxgxhlerVqx8+fHj9+vVM ralTp0p3+3igCKT+s7Jp3h51bGj6EIvFg1yBbRlg25JDYmKieIT7999/51px w4YNzBcuxbwQbvFCFHJiQNajjhptNjolpf6AtLR0DG2AvADbMsC2JQoSbt++ fRnhDh8+XFhm/vz5wiHliIiICRMmzJo1C8It1iQ/mlMzazX4yia3EnOvAEDO wLYMsG1Jg4Tbr18/Rp2WlpZ8gYEDB3I7znMEBwe3bdv2/v37mzZtYmpNmTIF wi0mpHvvNNTk/qyaPfb74a8KCg1sywDblkDEhUsR7smTJ3OtKC7cyZMnQ7jF gfhr47OmSKnVXfgcGwyDwgPbMsC2JROJEe6wYcOEZXr27Clc+MLV1ZVyTE1N mVqTJk2CcJWdVMc1P2dNkdIZdiZS3t0BxQHYlgG2LbEkJSX179+fiXBPnDjB Fxg6dKitrS3/1t3dnXLo1dzcHMItXojCTg0uzf0tNVptdMFmZkAKwLYMsG1J hoQ7YMAARp1C4f6IP//8E8ItRqQ8mVeLW9VCtdLkG5giBaQBbMtQsWJFEq6+ vr68OwLkAwl34MCBjDpHjhzJFwgKCmrYsKFwez5KU474bkETJ06EcJWS9M+7 u2ZPkeq+1xd/QyANYFsAGEi4gwYNYtR57Ngx7mhkZOScOXMcHR358pSmHMrf smULU2vChAkQrvKRYDuxIvcHVKtj+hRTpIBUgG0BECdn4ebAX3/9xdQaP348 s/AyUHBSnda1yF5FSr20bjnJlC9f0+gsNhUFeQa2BUAiycnJ4sIdO3YsX+D1 69fa2tr0yufs3buXcrZu3QrhKjOiiNNDtFXyQJmRF6Ll3VmgPMC2APwIEu7g wYOZr9gjR45wR/39/c3NzemVL0/mpRxKbNu2jak1btw4CFdJSHlqWif3jX9U NGtNvorQFuQd2BaAHCDh/vbbb8z3rIWFRUrK/+7mUToiIkK4E1BCQoL4whcU F0O4SkD61309+FWk9n3FXXcgJWBbAHKGhDtkyBBGnTNnzuQLWFtbU44wyDUz MzMwMNi+fTuEq3wk3pxSmVsgWa3OgmeYIgWkBWwLQK5IFO6hQ4e4o1++fDl1 6lR8fDxf/s2bN9yqUzt27GBqGRsbQ7iKTJrLxtYa3N9Ke8jpCAwVA2kB2wKQ FyQKd/Xq1ULJhoaGOjs7C2v5+vquWrWKqTVmzBgIV2GJPDtMh/s7qbdY55Qq 7+6A4gNsC0AeSUlJGTp0KKPOJUuW8AUsLCwoR1jFyMjI0NCQy4dwlYEUh0X1 sqZIVZxomyDv7oBiBGzLsHfvXvpuPHjwoLw7AhQREu6wYcMYdR44cIA7SpHs /fv3heUp1H3z5g0ldu3axdQiEaemInRSMNL9D/TKniLVdddnTJEC0gO2ZcA6 ySBnSLjDhw9n1Dl37tykpCS+jJub2+PHj4W1Xr58SVEwU2v06NEQrmKRdGda 1awpUgZ/PMYUKSBFYFsG2BbkikThbt68mS/AzUkWVjE0NKRgVjzCHTVqFISr OKT9a942a4pU6UGWYZgiBaQIbMsA24K8QMIdMWIEo859+/ZxR4ODg728vITl v3z5wj0itHv3bghXYYm+MLIM91dRb7b6Hf4oQJrAtgywLcgjpEhx4Y4bN05Y 5sGDB8ItcYlz585R5AvhKiQpL5c0yJoiVW7s1Th5dwcUL2BbBtgW5B1S5MiR Ixl17tmzhy/AzUkWVjEwMCDb7t27l6lF7UC4ckYUeLiPFvfn0Oy04xOmSAGp AtsywLYgX0gU7u7du7mjCQkJwgdyidjYWG4+1b59+5haFCkLF4QEsibt484e VbTUVDXK6Pfc5oifPkC6wLYMsC3ILyTcUaNGMeocPny4sMzx48e51aV41q9f v3jxYvFaEC4AxRLYlgG2BQWAhDt69GhGnbt27eIL9OnTZ/LkycIq5cqV258J hAtASQC2ZYBtQcEg4RoZGTHqtLCwyLXigQMHmFrDhg2DcAEoZsC2DLAtKDAS hTto0CBhmWXLlgmHlCMjI2fOnLlixQoIF4DiDWzLANuCwpCWliYu3B07dvAF evXqtXXrVv5tUFBQ06ZN7969e/DgQabW0KFDIVwAig2wLQNsCwoJCXfMmDE5 CPdHHDp0iKk1ZMiQ5ORkGfQZAFDUwLYM8dnIuyNAiSHhGhsbM+ocOHCgsAy9 vXr1Kv/Wzc2NctavXw/hAlAsgW0BKApIuGPHjmXUuW3bNr5A3759r1y5wr+l //soh16PHDnC1Prtt98g3HxRq1Yt/tPLy0Q1AGQAbAtAEUHCHTduHKNO4U3b H3H06FGm1uDBgyHcvAPbAgUEtgWg6JAoXOEs5eDg4JYtW9rZ2fE5lKacnTt3 QrgFBrYFCghsC0CRQsIdP348o86//vqLOxoREWFiYvL27Vu+PKUph/LFI1zS tHAXXfAjYFuggMC2ABQ1EoW7ZcuWXCseO3YMwi0AsC1QQGBbAGRAenr6hAkT GHUOGzaML0AhbaVKlYRB7sGDBynn+PHjTK2BAwdCuDkD2wIFBLYFQDaQcCdO nMio09zcnDv69evX1atX0ytf3sHBgXIoceLECabWgAEDINwcgG2BAgLbAiAz JAp3w4YNlC8sk5iYKKyVmpoq/lgQhJsDsC1QQGBbhnPnzllZWTGbowEgLUim kyZNYtQ5duxYvoC1tTXl+Pv78zlmZmYGBgYnT55UVVUV1urfvz/jZcAB2wIF BLZlwMqNoKgh4U6ePJkR7qZNm7ij3t7ehw4diouL48s7ODicPn2aEpaWloxw +/XrB+GKA9sCBQS2ZYBtgQwg4U6ZMoUR7sKFC4XqjIyM9PLyEtYKDAwkd0C4 uQLbAgUEtmWAbYFsIOGamJgwwp05cyZfgDRBOcIqRkZGhoaGp06dYoTbt29f CFcIbAsUENiWAbYFMkOicDds2MAd9fb2vn79urA8/d/67NkzSvz9998Qbg7A tkABgW0ZYFsgSyQKl3KEizR++vTp5cuXwlqOjo5//vknI9w+ffpAuBywLVBA YFsG2BbIGJFINHXqVEa4ixYt4gtwc5KFVQwNDY2MjE6fPi0u3ISEBJlfgcIB 2wIFBLZlgG2B7CHhTps2jRHuunXruKP+/v4uLi7C8h4eHj4+PpSwsrJihNu7 d28IF7YFCghsywDbArlAwp0+fToj3BEjRgjLPHv27N69e8Kca9eubd68mRHu r7/+WsKFC9sCBQS2ZYBtgbyQKNy1a9fyBbg5ycIqBgYGZmZmZ86cUVNTg3B5 YFuggMC2DLAtkCMk3BkzZjDCXbNmDXc0KioqIiJCWD40NDQ2NpYSZ8+eZYTb q1evEitc2BYoILAtA2wL5AsJd+bMmYxwBwwYICxjZWVlY2MjzNm6devmzZvF hRsfHy/b7isEsC1QQGBbBtgWyB0S7qxZsxjhrlq1ii/QrVs34dLKhKam5u7d u8+dO8cIt2fPniVQuLAtUEBgWwZfX98vX74INz4DQPZIFO7KlStzrXj+/HkI F7YFCghsC4BiQsKdPXs2I9zevXsLy6xbt+7atWv826ioKFNT0y1btjDC7dGj R4kSLmwLFBDYFgCFhYT7+++/M8JdsWIFX8DQ0HDz5s3828DAwLp16966devC hQuMcLt3715yhAvbAgUEtgVAkSHhzpkzhxHu8uXLc6148eJFdXV1RrjCjfyK MbAtUEBgWwAUH3Hh9urVS1hg5MiRwi0MPDw8KGf37t2McLt161YShAvbAgUE tgVAKRAX7tKlS/mjXbp0uXDhAv/248ePlEOvly5dKoHChW2BAgLbAqAszJ07 Nwfh/ghra2tGuF27duXWxCiuwLZAAYFtAVAi/vjjjxyGlENCQjp27Pjw4UM+ h9KUc+LEiRIlXNgWKCCwLQDKxbx58xjhLl68mDsUHh5ubGz86tUrvjClKYfy L1++zAi3S5cuxVW4sC1QQGBbhnv37t25c+fBgwfy7ggAP2T+/PmMcM3MzHKt deXKFQ0NjZIgXNgWKCCwLQNWbgRKgbhw+/Tpwx999+6dvr4+vfI5R48epRxx 4Xbu3DkmJkYeV1CEwLZAAYFtGWBboCyYmpoywl20aBF36MuXLxTt0itf2N7e not/r169ygjX0NCwmAkXtgUKCGzLANsCJWLBggWMcBcuXJhrrWvXrhVv4cK2 QAGBbRlgW6BckF4Z4Q4aNIg/am1tTTn+/v58DkW4BgYGxVu4sC1QQGBbBtgW KB2LFi1ihEsxL3fI09OTdCOcCmVvb3/06FFK2NjYMMLt1KlTdHS0fK5BqsC2 QAGBbRlgW6CMiAt3+vTpKSkpfIG4uLiAgABhlYiICCsrK0a4HTt2LAbChW2B AgLbMsC2So1IJAoJCfnw4cPdu3e3bNmyePHimzdvvnnzxt/fPy0tTd69K1rM zMwY4RoZGfFHSTqUIyxPRw0NDW1tbTU1NYuZcGFboIDAtgywrdIRGxt75cqV BQsWdOnSRUdHR+UHqKurt2zZkiK+48ePf/v2Td69LhLo1wVz1fPnz+cOeXh4 XLx4UVj4xYsX3HPl169fZ4TboUMHpRYubAsUENiWAbZVFlJSUi5cuDBo0CAt La0fGTYHSCi7du2KjIyU93VImSVLljBXSjGscEjZ19f3/fv3wiqurq5HjhwR F25UVJTMuy8dYFuggMC2DLCt4kNh16ZNm/T09AogWQaKhWfNmuXj4yPva5Im S5cuZS7TxMSEP8rNSRaWNzQ0JCPfuHGDEe4vv/yipMKFbYECAtsywLaKDMVo e/bsqVy5srg39fX1R48evW3btps3bzo6OgYFBcXGxpKXw8LCPn78aGdnd/Dg walTpzZr1ky8LllmwYIFVFLe1yc1xIU7d+5c7tDnz5/fvn0rLOzs7Ozu7k4J +uiKh3BhW6CAwLYMsK3C8v79+xYtWjASqVOnztq1a0mveW/H19d37969HTp0 YJqqUqWKtbV10fVfxixbtoy5wAEDBggLvH79+smTJ8KcO3fu7N+/nxmZb9++ vdKNt8O2QAGBbRnGjBkzfPjwSZMmybsj4H+IRKI///xTfIFfW1vb9PT0Ajf7 5s2bsWPHMkqinGKzUP/y5cuZq5szZw59mNxRbk6ysLyBgYGZmdmtW7eUXbiw LVBAYFug4MTHx48aNUr45d+oUSMbGxtptU8hc+/evYXtN2/e/PPnz//f3nnH RXF9bVyaiN0Xu9gLNkSxIhp7rxjRqGBsiS2WEI0hlti7sXeNvXfFigg2VPzZ u6CIKARQERVEXOA92Ys3NwMi7M7u7OLz/YPPzOHOmbO7M/PcM3PnXLn8K8tv v/0mEdxBgwYxwY2IiAgLCxMbh4SEvHr1ihaOHDkiEdyaNWsakeBCbYEBArUF hsyLFy8cHBz4IWpqajp69Oi4uDjZd7Ru3brcuXPzHeXPn1+cQMeoSSm4jRs3 5hkusXPnTpJXcZNFixYtXrzYeAUXagsMEKgtMFhIau3t7fnxWaBAgTNnzuhu d0+fPhWVPW/evJlGcD08PCSC++OPP3LBZWOSxfZMpI4ePSoRXPp+WPJr4EBt gQECtQWGybt372rUqMEPTjs7u+DgYF3vNDY2lnSH7zRfvnz37t3T9U71w++/ //45wVWpERt//PiRPRBPKbj0oxi+4EJtgQECtQUGCKlA586dxZRKb/cwSWX6 9OnDd122bNmXL1/qZ9e6ZuzYsRLBdXJyEm8pT58+3dPTk69GR0ePGTNm+fLl lpaWxiW4UFtggEBtgQEyadIkflja29vr+XEhCa6bmxsPoHnz5qIkGTXjxo2T CO6AAQP4pyMZ/eOPP3jj0NDQQoUKHTx48Pjx4ykF15A7IVBbYIBAbYGh4e/v b2pqyo5JutqHhIToP4b4+PgGDRrwU2PhwoX6j0FHpC24nyOl4FavXt1gBRdq CwwQqC0wKOLi4ipWrMgOSDMzMz8/P6UiiYiIKFasGIvEysrq4cOHSkUiO+PH j5cIrqOjoyi4vXr1EkcpBwQEkGXdunXGIrhQW2CAQG0lXLlyhb4TSdl2oDdm zpzJD0jKwpQN5tixYzyYdu3aKRuMvEyYMEEiuP379+eC6+DgsHnzZt745s2b ZKG/J06cYMXWOPb29gZY8RJqCwwQqK0EVG5UEEqU8uTJw47GqlWrijPXKAVp ED9BJHUOjZ2UgtuvX78v3lL28vIyfMGF2gIDBGorAWqrIGKlQUqjlA7nH8LD w3PmzMlCql+/vtLhyMzEiRMlguvo6MiLYUZGRjZu3FjsY9AyWfbs2SMR3GrV qhmU4EJtgQECtZUAtVWK2NjYfPnysUOxWbNmSofzL+IAaTpflA5HZlIKbp8+ fZjgkoB27Njx/PnzvDEtk4XsJ0+eNGTBhdoCAwRqKwFqqxRr167lhyJdzJUO 519evXplZWXFAvv++++VDkd+xO6ERHDTwNvbWyK4dnZ2lA7rJ2YJ0dHRmwTE qGrUqMHtFLMi4QGQBLVNAdRWKfgbN5UqVVI6FikDBgxgsZHsUg6udDjyM3ny ZIngOjk5ccG9du1a+fLlxaGDf/31F1lIvHg/RFnBValUqc56LEHxcXfgawZq KwFqqwgREREmJibsOJw7d67S4Ui5dOkSP01knH7IoJgyZYpEm3r37s0E9/Hj x4MHD6a/vDHpLFlo4dSpUxLBrVq1qiKC269fvy+qLf2O+g8MAAbUVgLUVhEo V+LHYWBgoNLhSElMTCxatCgLr0+fPkqHoyumTp0qkSc3N7cv3lJOVXCp+6Sf mDmenp5pS22BAgW0mQ0ZAC2B2kowcLX9+PFjjJpMdj/z+++/ZwehAd5GZgwc OJBFWLZsWaVj0SEpBbdRo0ZcpPbu3UvC+vz5c95+zJgx5cqV8/HxkQhulSpV 9Cy479+/56PHUyVTPnMHRgTUVoKBq+2ff/7JfiyDjVAzKleuzD7XgAEDZHGo euG/ckCdgllNTCzyd90SoX2Z440bN/IzxcBr8mvJtGnTJDrl6urKBPfevXv0 3zdv3vDGJ0+eXLRoES0YguB269YtDbXdvXu33iKJjIy8cePG8ePHZ8+ePXLk yEOHDl26dCkkJIR6y3qLARgaUFsJUFv9Q3k6L4y8cuVKbd0lRl1fP7R+QbNP x7VF4yUh2t9ApLODnyleXl5a+zNopk+fLpEqEjKx2EhcXJyky/Hu3bsjR45k z55d3Io6UfoU3O3bt39Oas3NzaOjo3W365iYmP3797u7uzds2DBHjhyfC4OO 86pVq/bt25eO82fPnukuHmCAQG0lQG31D2VM/CDUrjBy4tu7239pXNTi05VN RrWl5I6u2CzI1atXa+3P0JkxY4ZEKVq1asVvKbPjUGzv4uLi6Oh4+vTplIIb Hh6un5gp6bawsEhV5po2baqLPapUKkqZO3bsKHkZKp3UrFlzzpw5hllrGsgO 1FYC1Fb/eHt784PwyZMnmrpJeLbDtTSrmm9Vpt24XcenOlnIp7aEjY0NC3LS pEly+DN0xJrVjJ49e7J55+/cubN+/Xqxsa+v7+HDh2lBWcFt27Ztqro2f/58 eXdEuTx1SPghoQ10zenXr19AQIC8EQJDA2orgfrATk5OdM5q5UUVcWFZ31oF LExMLAr22PlKvslRM6XabtmyhR+EHz580NTNB68fC5lkyWnbZerhx7EkvkEL GsirtnXr1mVBDhw4UA5/RkBKwW3Tps379+95g9DQ0Hv37ombBAYG7tq1SyK4 lSpV+vvvv/UQsFgjRURGLaP+xvLlywsVKpRyL0WKFOnSpQup8KFDh65cuRIW Fvb27VvKuCl7pf6Jl5fXihUr+vfvb2dnl3Jbc3PzIUOG6K1bAvQP1FZuEl5d WTuobn7+1DBri5V/Q23TZPXq1cnfVdasWrhJjDizYZ1vSFzyqvxq26xZMxan m5ubHP6Mg1mzZkl0oXPnzizDJdzd3Sm/E9s7Ojq6uLicOXNG8viyYsWKehBc 8cVtTvny5eXyf/v2bQcHB4n/YsWK/f7775cvX06/n5CQkKVLl9avX1/iKl++ fOLsSyAzAbWVkcToW1tGNizMHu59emoItf0iXG0tLS3l8yq/2rZo0YLF6erq Koc/o2H27NkSUfjuu++Y4D548ICEVWzs7+9/8+ZNWjh79qwigtuoUSNJtD// /LMsnufNm0cdQtFz7dq1d+/ezfseGnD16lXqvPFRggxnZ+fXr1/LEjMwHKC2 cpHwZHP3kuxMzF6u48S9RybWMYfapov169dn+dRD+eKMb+lGfrX95ptvWJx9 +/aVw58xMWfOHImEkaiJKnPt2rULFy6Im/j4+FCallJww8LCdBrqwoULJaGe OnVKS5/v37/v2bOn6LNMmTK7du2SJeAkdcrcpk0b0b+tre3Dhw/l8g8MAait XHw40tfaxCRXJZcZx568T0pSBcypC7VNH4cOHeIHoXwvjMivthUqVGBB/vrr r3L4MzLmzp0rUbHu3btzwWVjksX2NjY27u7u586dkxSdIB3RqeAGBweLu8uV K5eWEyVTmkkfTfQ5fPhwXZSX2bp1K58Gi8ibN6+kAwOMGqitXCSE+axbf+b5 pzE+UNv0c+XKFX4QXr9+XSav8qstVw3KnuTwZ3ykFNxu3boxwX327JlkPHlA QAAb86N/wa1ZsybfV9euXbVxRVJbp04d7o3UUKdvW4eGhtarV0/sKkBwMw1Q Wx0BtU0/dE3mB+HevXtl8iqz2kZGRvIg9VmVyNCYN2+eRHDr1q0r3lI+cOCA ZMLE1atXb9q0SSK4FSpUIGXRUZBiOawNGzZo7Of9+/ei9lWsWFEPRbzj4uLc 3NxEwZWvCwqUBGqrI6C2GaJgwYLsc3l4eMjkUma1PXr0KD9TDPeBWuK7IN91 k3/s6GRXtkg+K3PzbHmLVmrw7YhFxx7FyLcTfhByXFxceE1CNiZZbJ9FPaX7 +fPn9Sa4Yr0UbZ5N9OjRg/vR89xGgwcP5rsuXrw43gzKBEBtdQTUNkPwogTN mjWTyaXMastngM2TJ498Q7nkJPb+1qGOBc2zpEr2ir23BGr8KnMK5s+fL9lB 165dmeCmnDLjzZs37DVqPz8/ytT0I7i2trZZ1Hm3xh7EgWGVKlXS/zSCfCIM okGDBtqMfAaGANRWQnBw8JMnT54+faqlH6hthuBaZmlp+e7dOzlcyqy2/I5i 8+bNZYhOdhIj17VlkwKYZLep3aH3UPfRvwzt1dw2D3+1xLL6uMvvv+wovaQU 3Jo1a4pV9+lYPX78OF8lzZ04ceLWrVslglu+fHlxUiG58PDwIOdTp07VbPMb N27wIpB0rj169Eje8NIDySsdbPyLmjFjhv5jADICtZUgV+VGqG2GEAdK7dmz Rw6XcqptWFgYr5mwYMECOcKTm8Tw1S0ts5frOH7XzVdCDqQKPzm6VvI7OCb5 uu+S9SXOlIL77bffcsGlfPD333/njUlSc+fOvW/fvgsXLuhBcC9fvkyer127 psG29BGqV6+e/KWZmHh7e8sbW/qJiooqXbo0i4TU/9atW0pFArQHaishk6ut KmBp60LZzExMzHOUdtuRemDxD9e7VrXOZmpiYpG75qQr+poijJecpSu2HP7k VFtSWH6aaFHJWackRgXcCk7trZQPlz0qs9JmpsV/8tXqXZiUiN8Mo0uXLl+c Vy6l4JYrV07eOXESExMdHR01u+e/ePFiHphclTE05vTp07yn16RJE2WDAdoA tZWQydU2Kdbnp1LJ9xaz1p55L8WToMTos7/aJ09nYlH+h8MyzAybTtzd3dlu zczMQkJCtPYnm9rSFZuSLxZbnTp1tA5M77AC0v+Qx+1g3JfbZ5CU1SRq1Kgh Cu4PP/wgvjXz6NEjsuzZs4dSXZ0K7o0bNzTY6s2bN/nz52ch0e8uFoVWiuHD h/Nv6ciRI0qHAzQEaishs6ttkurujFrJz6NMy/587r8X34Rn27+zYWJskueb Odf1eaEJDAzkh+KYMWO09ieb2h4+fJgHps3rJIrB1VYHuS1j0aJFEsF1dnbm NSUqVaokThh0/fp1stDfS5cuSQS3bNmyis/6yocQEPv371c2GEZUVBSvelG9 enWlwwEaArWVkOnVNinx7w0dki9xJgVd9wkP8t7fmN0wN0uCzEq67n4uS0mI jMCL11lZWWkwVDXx9YOzx48dTebIhoFV1DdQzasN2XSE2Y4d8737MkO/BiW2 9vb2LCpKeeLi5M8NdU1CyJJGrH+VtcnSZ7r6UcW7r4zOnTt/sYhTqoIrx50N DaGACxcuzCKpX7++UmGkRKwrIilMDYwFqK2EzK+2SUnvTgwsnnw3OUfLVcnX 38QXx4fYJldcz1l3kr8s44IziJ+fHz8aBwwYkMGtVfdm1PrM+y//YlbR438Z eRK9ceNGvu2sWbMyGJIhkBC8rCmb/c7S6c9AXfagUgouJWJccF+8eEG9qbNn z/L2tEwWLy8vieCWKVNGKcHdtm0bD+PgwYOKxJAq796949+SltWxgFJAbSV8 DWqb9PHmpOrJumThMPW2iiyP1nYoyNJa02JdNwcr9mYfJUT8gPT19c3Ipgkh K1v+p3pCalg5zXuY7g8XHh5ubW3NNrSxsTGER3gZJubszxXUKb5JoZ57Xuj6 KfySJUskX3inTp2Y4EZGRrZo0ULMy2iZLGT39/fPkyePRHC1fwtPA1q1asUC KFWqVEKC3m/upAl/emtubo4ZgowRqK2Er0JtkxKerW6VLEympYf5RlwcXyt5 8m+r6mPORitYu+HBgwd8UjO64r19+1a5WP4j/cY562js5QkO6jFvJvlarwrS i3osXbr0c4KbBpcvX1ZccKOjo/k7tpMnT9bnrtPDrVu3+JezdetWpcMBGQZq K0FztU2Mun/m36eGh9f2r8ieGtYYtu3TU8Pjp+9Haadksr1v+8azbxGWy5rk sa1cjL0hYlKw/ZoAfb3x81nE6cvpQq1U4SaxlFD79u0ViUE7El95j6is7rmY FHbeGKy/TG3ZsmUSwa1RowYX3Bs3blSrVk0cMLxx40aypBTc0qVL61Nwt2/f znfNpug1NMqWLcvC69atm9KxgHQxdepUj0+0bNmSH2DUk+f22bNnKx2mMmis tqpbk+2//NTQbsJ1rdRMvuoW8VfGskFEHMvKw09mbAiRbkhISBAnOBMrJOgN T09P/pJjvnz5dD0lqy6Iu7usDXs4kM3uZ+9Xev5hUwpuhw4dWP3GwMDAPn36 iOX9jx8/TpYkdec/b968EsENDg7WT8y8NHHJkiX1s8eM8vPPP7MIixQponQs IF3wmrRp0KtXL6XDVAaN1TYhaEmTHF/6WrM3XvxYqxRDxlpSCYHzHC3+DS13 oz/vyFdHV0tCQkIKFSrEY5s5c6Y+937y5El2GGRRv/yr0xnWdMSHgA3dSqo7 f+Ylum8OUuR+xfLlyyWHf/v27ZngpkFKwS1VqpR+BLdWrVpsjz179tTGT3zE 1T3zRnZvYl8qf46sZqbmVvlsqnzTdcSCww/fatnn2b17N/9adFHuEshOyrMg JfJNfGZkyPXcVkfIpraJkUcHfxqCrCbVWhcKcvHiRf4AN4sWBW8zytGjR7nU EosWLdLPfmUk/vGWnqXVHSmzYp1W3VVwaNeKFSskF5batWtzwT1w4AAdxuKr XuPGjatateqVK1dSCq6uS3h9/PiRH2/z58/X0EviK795XSp8rtedrXyvTYHa vPBMXwJ3Rt+eFp6Annj69GnaUktXm5gYGWfoMibs7e1tbW21mTpEp8iktnF3 FrWwNvnvr/7PcKnUCv8px/79+83N/7077+bmpuvXXekya2rKy/hn+e2333S6 O13wMXhn73JZmdR2XHlH8VHUK1eulFxe2rVrxwT39u3bY8eOjY6O5o2PHDnC nmHpX3Apfeb7kszPm35UD2bWZncU8lVu3X/svJXrN65fPtPdxSH/p4c2Vo5z tevU8lkLDbReN0iBnZ1dGmrbuXNnpQMEqSOH2v6T1lZkvXiT3E4eE78tkDxc Kl+XrZEG8NxWRCK4Dg4Od+7c0cWOXr582b17d/EskG+mXf2heravv60lk1pl s1qRVatWSa4wbdq0ETtOKpVK8nZVfHz8pUuXeAElRsmSJXUnuBcuXOA70ni8 qOr2lBp5bL+d7hnw33vGH5/u6JH8irtZlXFXtbmxX6FCBRbk6NGjtXAD9Aeb jupzbNy4UekAQepor7ZxdxZ/SmtNi7psfaqKOzuyTHI6Z+k4N/0vo+oLb29v 8aqbNWvW6dOny5vk7ty5U3xMTOmt5vcSlSMh9NCgyup74GY2nVffMxCpZaQU 3Pr16/MfkR3VYnsXFxdHR8erV6+mFNygoCBdRLhv3z6+F83fZk2MiYpK9cG0 6u70mqzXaNV1lza3kJo0acKCdHV11cIN0B/nz5//nNSamZm9evVK6QBB6mip tomRxz6ltVksq7r7vP6nB666M62mUDnZoK7SjICAgEqVKolHafHixdevX//F uWa+iI+PT926dUXPefLkOXbsmCxh65UP16bVYc8LTQs0GjF/eaqsWLH+5COF ak+mkeHeuHGDghMbnzhxgg0duXbtmkRwS5QooQvB3bJlC9+FDupaJEasbslO vLxuh7T5BTp06MCClGmqLKBzVCoVXa5TVVsDnSwbqNFKbePu8rTWJG+TBXwI csKzVS0/TYFq3W2nIbwFlILY2FhxJhRG0aJFp0yZokEd++jo6LVr1/ICyJwW LVooWKRXG1R3pjp88QW0f37gIoNOKjb0fPXq1ZJwGjVq9O7dv0VCIyMjJUpK P4eXl5fkYkWC+/jxY3ljE9VWB694vz7gxmaGyNZ02VNttLxTp04syC5dusgW HdAxrq6uqZ6Okk4mMCg0V1tKa4d8SmvNSvTaHSqc8olR+3olP7zNkq3BgkeG VbFOwNfXN9UhBzVr1pw0aRIlRGnclnn//r2fn9/ChQtbtmzJSwZxChYsSFqg z88iL4kRO74rZJbym5FiWWPKDSXrl6xZs0YSUZMmTfgtZXd3dxsbG7G9o6Oj i4vL9evXdS24O3fu5M7lHowXF7jVtYy6L2Raop+ndr3Z1q1bsyC7d+8uV3xA 14iFU0Q0mHsF6A1N1ZbS2pafBiFbVf/t/Bvp//99eGtWYdQFA57oJiEhYcOG DSVLlvycnhQpUsTBwaF9+/Z0OerRo4ezs3O9evXo4mxmlroY5cqVa+LEicqW iPyqWLt2reQnIAVhAnf79m3qMomNz549+7///S9JPU+fRHCLFy8uo+B6e3tz z1qOxUp8/ejyuXNnz57x9fLcvnLKoFblcqpPvawl2i/4n7aHWfXq1VmQQ4cO 1dIV0BtRUVHiyw4M6kkqHRdIC83UVkhrTaxbLXuQyit/wsNbkwI992pZYFLn qFSqffv28REjmlGxYsWlS5dCZ/VPSsGtU6eOOCz5zp07V69eFTe5cOGCp6cn nySCC+6jR49kCenevXvcrZ+fnxae4s+NLCW9sOYo3WzY+htyFCAvWLAgczl9 +nTtvQG90ahRI8lBMWfOHKWDAmmhmdoub53fwiSLiUUuG6dfjoanfsonPN/S vXh2Sv/MrAo3nntT8WrJ6eTZs2ekmC1atODvIaaNubl57dq1J0+ebJiFcL8e /vrrL14bk9GyZUsuuGxMstjexsbG3d39xo0bEsEluyyCS50u7lO7GShUd2bW yZYlJaa5K7T32BugzShECpJ/aRs2bNDCE9A3Yt11hli8FBggMlZuzGQkJCTc vXuXrpNTp04dPHiws7NzmzZtWrdu3bFjx/79+48fP37VqlX+/v7GOB18ZmXd unWfE9zHjx8/ePBAbHzr1i02HC5VwZXlwsUfT4wYMUJ7b0TCh3cvn94+s2v+ T81LJuuviXXTP69r/AbQ6dOn+ae+fv26LEEC/SDePCHs7OyUjkh5Ro0aReea IpXw0wPUFmQm1q9fLxFce3t78Zby8ePHxQnok9SDhw8cOJA/f37ZBbdr167M m/wP1BJfX5raMC/7oJa1pt/S8NbR3LlzWYTZsmXT/vU3oE8SExNLly7Nj9iJ EycqHZHyfC11kgEwDFIKbosWLbjgsjHJYntqQGcBpboSwS1WrJiWgsu1TCc1 B1T3Z9VlIyPMKvx6STOlbNq0KYuwfv36MocHdM+wYcP44SrOOPnVArUFQM9s 2LBBIrjNmzePjf3nhiupnqSyU3h4OKvifvPmTUnhiyJFigQEBGgchnivTwf1 9D5e+rUCGxaf7dsdGtxMjoqK4uPqMUTKGDlx4gT7+cqUKaPUtN0GBdQWAP2T UnCrVKnCBJexbNmyU6dOseXQ0FB3d/dcuXJlSYGFhQUpEZ+5PqPwKsStW7eW 4VP9h/izI0qyscp5e2tSTkosxqVxJWegIHFxcdmzZ6ef75dfflE6FoMAaguA IlA6KRHcZs2accEtXbo0q8O/du3a3Llzp9RZkapVq167dk2DGMaNG8edyDxk NP7qODuWmWZtuCBIgwIy1apV4/0QOQMDeqRz585ZtH3FLPPA1TbGIJk5cyZX W6VjAUBm1qxZIxHcxo0bv3jxgjcgwU1bZzmURJw5cyajp39ISAi/Wzts2LCM bZwYvrFb5caDl3oHxUjvEn4MPe5eM7k6au42a0IyLLY+Pj78o1Gan9HNgYFA R3jhwoV1UIjb+Lh582bKih8AAGMkZ86cGjzG/fbbb9nmWbNmzVhRqYTgRd+o x0GZ5SnXuMfwSfNXrt+8ecOq+RMGtaucN1nCTaxbLLmnwW3uevXqMQeU14uV pYFxERoaOmjQIKWjUJ6rV6/myJFDiasCACDDODg47Nq1iw8eDgoKmj17tmTc VKNGjTS4DvDNe/bsmZFNVQ/WdimdWmGLZLJX6Lb0igYFpXbv3s19TJgwIcPb A0Pi6dOnSoegMHTOFihQQP4rAgBABwwcOFClSmUu5rCwsMqVK4stfX19M3o1 IJHlmx89ejRD234Iv7J34Zg+7etXKWGdw8LUxNQih3WJKk6dfpyy0e+5JpVV 6NJUpEgRFkzBggVRaBQYNX///betra1eLxYAAE2pX79+Gi9QBAYGstEXDA1m XX/y5ImVlRXbvGjRosrO9y1K/6pVqxSMBAAtSUhIcHR0TOdpXqxYsb179+7e vXvLli1HBbZv375jxw7RsmnTJmrJVw8dOkSWgwcPcsu+ffvIIm6ya9eubdu2 iZatW7eSka8ePny4V69eLJJcuXKR5cCBA+TE09OTt9mzZ8/mzZslsRGihRpQ M75Km0ti279/P1mOHDkixkbBiE4oVDE29pHpQ/FVckgW+uBibJKPTF+aJDb6 YsXY6CPTJvQxJbGRnVvo55DERj537twpiU38OVhs4kem/0piIw9f/DloE4qH W9jPIcZGn+WLh4rk5/jcoZL2zyGJjRpLYmMfOe1D5Ys/BztU0v45ZDlUJD/H woULxdPw6JfyzQEDBvDGkin80snixYu5h1atWqWaR+uBpUuX8jCaNm2KlzSB USMez4SpqSl1hleuXDl37lz6ywZsiwwePJhve/HiRW9vb9EbXeXEVw/i4uLo OhMcHMwtz58/J4s4zuHWrVt0tRGd+Pr6njt3TrTQxefevXu0cOnSJR5JnTp1 nD5Rq1atihUrOgnY29tXqVJFtNAqGfkqJQi0CW3ILeSQLPXq1eMWBweHSpUq iU7s1IiWOXPm3L59m4f69u1b+oDivI308cny4cO/k5hfvXqVvijxA548eZI+ Gl+lqwptIg5xiYyMFB/SEQ8ePCCL6OTChQv8lUwGqYNYsyU2NpY2EeeLf/bs GVnE9zqpPV32RSc+Pj6SEfuk7/fv3+erUVFR5IQi5BZKr8gijjz09/f38vIS nZBkiNPc0PdDm4jDcsLCwsjy5s2/syPeuXOH1E10cubMGUlhQ1IxasZXaXNy 8vfff3NLUFAQWcQ3Uq9cuXLs2DHRyYkTJyhgvkofhDYRi/9HRESQhT44t9Dx SbosOjl//rzkLi4d5+JkEDExMeSEzghuefr0KVnEyo3Xr18nKRdnxbWwsPji 67QUiXjOapCc0hEozjA1cuTIjHrQHrq28AHS1LsWLyMAGB10TpUtW5afU9mz Z0/5lIcs4tALOtm5lHz33XekUGLj0qVLiy8OhIeH0yaUIHAL5QVkES9cHh4e BQoUEJ3Qad6hQwfRYmVlNW3aNLbcsmXLVPNupaDrwNixY3moJJFkFAWLkhSy iGI0dOhQ+trFD1izZk1K2/nqx48faRPKL7iFNIUsogRQd4i6RqKTrl27Sira sYlj+CppKzmhpJVb2PgTcdzCqFGjihYtKjpp2LChs7OzaKFjYNasWXyV1Iqc nD59mltYF07sYLi5udWoUUN0Ur58ebHn9vLlyyz/ndiFOiRkEWV9woQJefPm FZ3QwSCpw5A7d26xBOvdu3fJiSimf/31F1nEAk0//vgj9bJEJ9Qr+/777/kq yR9tsnz5cm5hL6SIHcsZM2ZYWlqKTjp16iQZpFSoUKExY8bwVdJ9ckLdA25h k26LXTWSuRIlSpBzfrxJjpxUIU0XD1HJBAfphLoodPxwJ3oenkT9bT5o08TE RNIhBwbF6NGjbTM7Yh9eM6jnLJ6VCxcuTLUZXazEZosWLWL2hw8fUmYqtqRs ha4hfJU64ZRwiUJD3WyyiDPR0KX+8uXLohP6XOI1Nkmd0rIJUJIMT23pSxPV iq7M9AHFbII+PlnEIuqPHz+WzF5Kl0cxk6VeEG1CyR23UI5GFvGeAF2TySI6 oYuqmGUnqXVQzBZJ/miTFy9ecAtpHFlEWaT2bPpyDvmUXK4vXrwoZmQUFTkR k1C6UJNFvO9Hn04yxx9JlTgZOn0/tAnljNxCmSNZxESPsnKxv5GkFlN204ND DcTkndJ2ciJqK+2CLOKtUer7SSaUoQRfrO3Afg4xQY6OjiZLjLqCIoO+EPpa RCd0DEvOUPpixQSNzgLJoUI/DVnE1JV+DvoRqW/Dj7fixYsnfQnakXiIalyn gn4j/gCXoI6xZn4yyqlTp8T3I2bOnKmf/QLNEJ+tZ1YkV0UNYP18hpmZWRrj /Sj54i07duyo4AWZktwBn+jduzcF07dvX27p0aMH5RQDBLqqES3UgJrxVdqc nJArbnF1dWUT1XFL9+7du3TpIjqh1W7dutECEzjFL8iiE+oCUUdItNAmYsZE PzRZxJ+blF2i3Yp0pZLU91fJCX173BIeHk4W8b40yYdEH2lVvGFCYkqb0Ibc QoJLFvGeOe1UvHufpL4bLCkJSMEbQleK5bwc6iMlpYl459nU1FT81BmFetqU s3NvLi4u2nhLDytWrDA3N+d7lGv6P6A7oLbpIf13qAYNGsRbUu8aNxsN7Waj 6KRevXrUExAtWdQTx/BVEv0s/62ftmDBArKInR9FHhMkqfNKciKOB2AFckUx 6tevX9WqVUUnlStXpp4PXyX9ok1IdLiFVUQXc//JkyfnzJlTdNK2bdtmzZqJ Fmtra0N4TMD2y/ncPSgOnY+8seSL0oDjx4+LgksOdTS3LJ1x1OkVPymk1ijY uXOnR2ZHTB41Y86cOfzALly4cBot+WDgLOrpLzGQxtAG0ohOSKokiSptIma7 1G8hi3hLmf4rGXOl/yFwDLrkkhMxLaVskSzivV9KOUkCRCe0KnY+SdFoE/HG CP2+ZBFTZuplid2YJLXqiR3CJHX/wUCGwJUpU4afgP/3f/+Xxrm/detWUbDG jx//uZbph74ZcYI/yj2pvypvkkunbbFixcTIMdEPyEzQ1UY8vMWrkwjpDn/B HACgOJUqVRK7dhzqzmXNmpU3I1mUq3QP9XL5vACMokWLrl69WuP5hjjU+2rQ oIHoOWfOnNTPkSVsAAwE6qWLB/nQoUNTbTZv3jydXjoAABklR44cI0eO9PX1 DQsLCwoKIp1t3769pM24ceNkvFzExcWNGjVKMm9CoUKFKH3W4PWct2/fbtiw QRwQwmjUqJE4PACATEPTpk35cU7n0ebNmyUNtm7dyt96AwAYC/Xq1RNHrMmF n5+fg4NDyt1Vr159woQJx44dE59QSKB4Ll68uHjx4jZt2og5OMPa2nrp0qUo YQEyKydPnpQc8z179qRT5tatW7t3707ZWwYAGD6UM4pjBuSFBJE64eKr+hIo 4a1Ro0a7du26d+/eo0cPZ2dnR0fHkiVLioONRShP9/DwEJ+qA5ApkYwDTAPq vpIE7wEAKARlf7ZpVjU3MTEZPny4OI5ORyQkJBw6dEjL99/Lly+/cOFC6Cz4 SoiLi2vUqNEXzwvqrGJmSQAUh1LLo0ePtm/fPmfOnOIZamNj89NPP2lWOUob QkNDV6xY0bp161y5cqVHYc3MzBwcHCZMmCAOcQfgK4F6wj/88EPa54jkFU4A gLKQ7JK2nj9//uLFi+IrbArGc//+/S1btkybNm3IkCFdunRp06YNqXCHDh36 9es3bty4lStXUqh6yLsBMGTWrl2bUmFz585dpUoV3iPFRMAAAACANvBJqMuU KXP69GnqM/fu3XvgwIEBAQF8zL9Y4h4AAAAAGUKcd6B69eqSkn158+blqa5Y uAkAAAAA6ad58+ZMT62trS9cuMDKMLL6kLSwbNkyrsViuV0AAAAApBNWB54x fvz4u3fvsqrjI9UkqSvxVq1alTUoUaKEWLEWAAAAAOmBv29raWkZHh7u7Ows uZNMq7Vr1+aKvH37dqVCBQAAAIyR0NBQCwsLJqNsprBUc9tbt25RVsuakfIq HDQAAABgVHh4ePCk1cXFJUk9ZZjkuS2tklGcm0Ayhx0AAAAAPkdMTEy+fPmY gPIp11O9k0zG6OhoXiumU6dOSsQLAAAAGB9Llizh6aqrq2uXLl2S1JN3s+Jv A9Ukqee2ZlPflitXjjU2MTERp8MGAAAAQKokJCTwWTyqVatGysue0vr5+Xl7 e9PCZDW0QKvs3nL//v1NTU3ZJkOGDFE2fgBAkvrRz1Q1s2bNUjoWAEAq7Nu3 jye2GzZs4PbP3Ulmy927d2ebWFlZvXz5Uq8RAwBSsHLlSnZKZsuWTelYAACp 4OTkxE7SggULxsfHjx49ulWrVknqUcqsHnJvNbRAq2SkBWrg5ubGNXratGnK fgQAANQWAEPm0qVLXDR79OhBljVr1owdOzZJfd/44MGDtDBHDS3QKru3TA2o WcOGDdmGhQsX/vDhg6KfA4CvHagtAIZMt27d2Blqbm5epEgR8V9p30kmDhw4 wJV6/fr1eooYAJAaUFsADJYnT57wwU4//vhjREQEGYcNG0ZJKy1ERUWxB7Iu amiBVslIC9SAmiUmJpYuXZptbmdnp+hHAeBrB2oLgMEycuRI/iLPli1b1q5d S8ZNmzax57CHDx/esWNHkvr9IIIWaJWMtEANqBktuLq68vT2xIkTSn4YAL5u oLYA6AhPT0/2Yg4pILuRu0YNLdAqk0VqQM1oYfbs2f7+/m/fvv3111+vXr1K aSxZgoKCHj58SJbQ0NA7d+6QJSYm5vTp02ShTXx8fJYuXUoL27dvnz9/Pi3s VEMLtMqKJFMDakYLtAltSJuTE3JFDslCzmkXZKHd0U7JQgFQGGRJf/x6/14B MEqgtgDoiD/++KNy5cq0QBLGbvDyW760SsYk9dTw1IwWXrx4ERsbS6qXP39+ UkyVSkWW+Ph40kqy3L59Oy4ujiyJiYkkoGRJUheYYneShwwZ0rhxY1qIVkML tMpes6UG1IwWaBPakDYnJ+SKHJKFnNMuyEK7o52ShQKgMMiS/vj1/r0CYJRA bQHQNW5ubvb29qKFVskoWugcnDt3Ll9lk+uJ9343bdpElvDwcG4ZNWpUoUKF RCct1YgWakDN+CptTk7YTWYG7YIstDtuoTDIktH4AQBpA7UFQEfs2LGDFX06 ffr0/v37aWGeGlqgVTImqZ/Msmevf/31161btygz7devn5+f36tXr8jy/Plz SkLJEhISEhgYSJb3798fO3aMLLSJv7//tm3baGH16tUsQT6uJkmdlpKRFqgB NaMF2oQ2pM3JCbkih2Qh57QLstDuaKdkoQAoDLKkP369f68AGCVQWwB0xKxZ s5ycnGghLCzsyZMnSWrJY0JJq2RMUleuYGXcHjx4QJL34sULW1vbAwcOxMXF kSUmJubcuXNkuX//PukgWVQqFUkhWWiTiIgI0s0k9TNZNvtAiBpaoFX2bJca sJHMtAltSJuTE3JFDslCzmkXZKHd0U7JQgFQGKz8cjrj1/8XC4AxArUFQNfg TjIAAGoLgI5Yt27d999/TwtXrlxhA4P/UJOkHk5MRlqgBtQsSV2JgvLQ169f U1pK/6X0kyyUll67do0sQUFBlLSynHf//v0sk719+/axY8eS1COQ+TwFbFYC WmWjlKkBNUtSZ7u0IcthyRU5JAs5p12QhXZHOyULBUBhkCX98evvCwXAmIHa AqAjlixZ0qFDB1p4+PDh9evXaeFnNbRAq2SkBWrAXpU9f/788+fPX7165eTk RBIZExNDlqioKH9/f7IEBASQLJIlPj5+27Zt7P4tKSZ7JjtlyhSmenfUJKlF kIxJ6me71CxJfcuXNqTNyQm5Iodkof/SLshCu6OdkoUCoDDIkv749f21AmCc QG0B0DW4kwwAgNoCoCOQ2wIAOFBbAHQEntsCGYm/PKNJqTxZTc2sCjdfcFel dDggw0BtAdA1uJMMtEZ1Z5qDObtYZ22x6u9EpeMBGQZqC4COwPu2QD6it3XJ wa7VZhV+9f+odDgg40BtAdARqCUFZCP+wqhyyXMv5uy6443S4QANgNoCoGtw JxloSWLoimZZ2aXavNaM+3hqa4xAbQHQEZgDCMjFh+M/FDJhUx0X7H8sTulw gCZAbQEAwLBRPZhZ+9MQqabLn2OIlFECtQUAAMPm7S6XXOxCbVr2F794pcMB GgG1BQAAg+bj5d9szdiFOofz1tdKhwM0A2oLAACGTGL4mlaWyUOkaky9jSFS RgrUFgAADJkP3oOLJg+Rsu5z+L3S4QANgdoCAIABkxA419GCXaYtGi1+mqB0 PEBDoLYAAGDAxOzrkSd5iFSpEWcxRMpogdoCAIDh8vHq2CrJQ6SsOm56hbd/ jBaoLQAAGCyJL9a3zZZcILnaxBsYImW8QG0BAMBgiff9qXhygeR8bgdjlQ4H aA7UFgAADJWEJwsafBoi1WBBEIZIGTFQWwAAMFRiD7rlY2//mBb/yRdDpIwZ qC0AABgoqpuTqiUXSM7Wdt0LDJEyZqC2ABgF2T7B5rQFXwVRmzpaJQ+RqjLu KuaQN2qgtgAYBVk+Ic5OCzI38WdHlkoeIpWnx74YpcMBWgG1BcAogNp+fSSE LGn8aYiU47xADJEybqC2ABgFUNuvj7gjffMnF0guOtj7g9LhAO2A2gJgFEBt vzpUd6Y5fJpDvvGfdyMiU+fFy7cfMHzKCIDaAmAUQG2/OqK3dcmRJR2Y5O93 FImv4QO1BcAogNp+bXy8OLq8WXrU1sx2jD+GKxs+UFsAjAKo7deG6sGSlgXM v5zZ5nCY9D+ktkYA1BYAowBqC4BRA7UFwCiA2gJg1EBtATAKoLYAGDVQWwCM AqgtAEYN1BYAowBqC4BRA7UFwCiA2gJg1EBtATAKoLYAGDVQWwCMAnnVNjAw cMGCBW/fvtXeFQCZFU9Pz8OHD8fGxsriDWoLgFGgvdrGx8f7+Pi4u7tXqFCB uYqMjJQ3SAAyEyNGjGDi2K5duxUrVoSEhGjjDWoLgFGgsdqSpG7cuNHFxSV3 7tySMkRQWwDSgKmtSLVq1Tw8PPz8/FQqVUa9QW0BMAoypLaJiYnXr1+fNm1a vXr1snweqC0AaZBSbTnW1tZubm47dux4/fp1Or1BbQEwCtKjtjExMYcOHRo4 cGCxYsXSEFmoLQDpIQ215ZiZmTVu3Hju3Ln379+nXm4a3qC2ABgFaahtcHDw smXL2rZta2lpmR6R5RQvXrwGAOAzZOhsIsqWLTt8+HAvL68PH1KZJwJqC4BR kFJtqSO9c+dOOzu7jF4TAAA6JWfOnL179w4NDRVPYagtAEYBP5Elue2jR4/m zp1bv359ha4rAIB/sba27tu3r6en5/v37yWnMNQWAKOAn86fe24bFha2YsWK Fi1amJmlaw5yolevXiMAAJ8h/SJrY2MzbNgwHx+fjx8/fu4UhtoCYBR8UW05 UVFRmzdvdnZ2trKySvsSgVFSAKTBFwXX1tbWw8Pj8uXLaY+PYkBtATAK0q+2 nJiYmH379rm5ueXJkwdqC0BG+Zza1qxZc9q0aXfv3s2QN6gtAEaBBmrLiY+P 9/LyGjRoUOHChaG2AKQTUW1NTEy++eabhQsXBgcHa+YNaguAUaCN2nISEhIu XLgwatSoMmXKQG0BSBtSWwsLi7Zt265duzYiIkJLb1BbAIwCWdSWk5iYePPm zbi4OO1dAZBZuX//fnR0tFzeoLYAGAXyqi0AQM9AbQEwCqC2ABg1UFsAjAKo LQBGDdQWAKMAaguAUQO1BcAogNoCYNScOnWqp5q+ffsqHQsA4LNAbQEAAABd E/kJvLYDAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAACgIP8PFiY0AQ== "], {{0, 269.}, {317., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->{144., 144.}], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{210.63888888888923`, Automatic}, ImageSizeRaw->{317., 269.}, PlotRange->{{0, 317.}, {0, 269.}}]}]], "Input", CellChangeTimes->{{3.8450171567603574`*^9, 3.845017188908218*^9}},ExpressionUUID->"a0c4ff3a-3e33-4a9d-ac5b-\ 9ef3cb4364e7"], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"value", " ", "rule"}], " ", "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"val", "=", RowBox[{"{", RowBox[{ RowBox[{"EE", "->", "1"}], ",", RowBox[{"A", "->", "1"}], ",", RowBox[{"L", "->", "1"}], ",", RowBox[{"F", "->", "1"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"coordinate", " ", "table"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"element", " ", "table"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ele", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "EE", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["8"], "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "F"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"prb", "=", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}]}], ";"}]}]}]], "Input", CellChangeTimes->{{3.84501736147467*^9, 3.845017369097284*^9}, { 3.8450174078863974`*^9, 3.8450174160376883`*^9}, {3.8450174618303576`*^9, 3.845017481056065*^9}, {3.845017524958643*^9, 3.845017538616188*^9}, { 3.8450175701970463`*^9, 3.845017585712226*^9}, {3.845017674979163*^9, 3.845017722665367*^9}, {3.845017756274063*^9, 3.845017761298525*^9}, { 3.8450178765526295`*^9, 3.8450178816716566`*^9}, 3.845017964620011*^9, { 3.8450180050947204`*^9, 3.8450180162437525`*^9}, {3.8450180630410547`*^9, 3.8450181234534016`*^9}, {3.84501818172927*^9, 3.845018207917223*^9}, { 3.845018278209897*^9, 3.8450182997603617`*^9}, {3.845018348043014*^9, 3.8450183732193117`*^9}, 3.845018467141081*^9, {3.845018515479165*^9, 3.8450185273515177`*^9}, {3.8450185902007155`*^9, 3.845018776286524*^9}, 3.8450188169904385`*^9, {3.8450190375875893`*^9, 3.845019056094249*^9}, { 3.8450193235174904`*^9, 3.845019327296644*^9}, 3.8450296902310524`*^9}, CellLabel-> "In[347]:=",ExpressionUUID->"d8f1317d-d14e-4729-aa68-571e856ce307"] }, Closed]], Cell[CellGroupData[{ Cell["FORMATTED", "Subsection", CellChangeTimes->{{3.473055512584*^9, 3.4730555529630003`*^9}, { 3.4730575328269997`*^9, 3.473057539222*^9}, {3.4734691424642*^9, 3.4734691605758*^9}, {3.5681161575453596`*^9, 3.568116161819767*^9}, { 3.59922265025865*^9, 3.599222653363055*^9}, 3.629777520582675*^9, 3.629791653258878*^9, {3.630370559869874*^9, 3.6303705662970853`*^9}, { 3.6618219022583027`*^9, 3.6618219059243093`*^9}, 3.6852488995100965`*^9, 3.685281849223243*^9, {3.6853234590535126`*^9, 3.685323459673514*^9}, { 3.68587640866364*^9, 3.6858764117036448`*^9}, {3.6862101948897667`*^9, 3.6862101984397717`*^9}, {3.686235632357339*^9, 3.6862356325473394`*^9}, { 3.686290377128008*^9, 3.686290380228012*^9}, {3.6863951313545313`*^9, 3.6863951457345514`*^9}, {3.6883646955890894`*^9, 3.6883646971490917`*^9}, 3.7807552452476177`*^9, {3.811316330506975*^9, 3.81131633668452*^9}, 3.8127824542431855`*^9, 3.8127840219912105`*^9, {3.813031734498083*^9, 3.8130317350874367`*^9}, {3.8145817138547506`*^9, 3.8145817395042872`*^9}, {3.814581776238999*^9, 3.814581799742174*^9}, { 3.814581962677523*^9, 3.8145819647221575`*^9}, {3.81458240606009*^9, 3.8145824075763025`*^9}},ExpressionUUID->"55e4f9da-9f26-4426-b3ca-\ c2eaf1561303"], Cell[BoxData[ RowBox[{"FORMATTED", "[", "prb", "]"}]], "Input", CellChangeTimes->{{3.845019130519556*^9, 3.8450191494524984`*^9}, { 3.8450194078440895`*^9, 3.8450194125268755`*^9}, {3.845019648725907*^9, 3.845019671154731*^9}, {3.845019709649866*^9, 3.8450197113563085`*^9}, { 3.845019949410924*^9, 3.845020041229253*^9}, {3.8450296810689163`*^9, 3.8450296855483675`*^9}}, CellLabel-> "In[351]:=",ExpressionUUID->"351ed351-a109-4211-8056-73a3d14714f0"] }, Closed]], Cell[CellGroupData[{ Cell["SOLVE", "Subsection", CellChangeTimes->{{3.473055512584*^9, 3.4730555529630003`*^9}, { 3.4730575328269997`*^9, 3.473057539222*^9}, {3.4734691424642*^9, 3.4734691605758*^9}, {3.5681161575453596`*^9, 3.568116161819767*^9}, { 3.59922265025865*^9, 3.599222653363055*^9}, 3.629777520582675*^9, 3.629791653258878*^9, {3.630370559869874*^9, 3.6303705662970853`*^9}, { 3.6618219022583027`*^9, 3.6618219059243093`*^9}, 3.6852488995100965`*^9, 3.685281849223243*^9, {3.6853234590535126`*^9, 3.685323459673514*^9}, { 3.68587640866364*^9, 3.6858764117036448`*^9}, {3.6862101948897667`*^9, 3.6862101984397717`*^9}, {3.686235632357339*^9, 3.6862356325473394`*^9}, { 3.686290377128008*^9, 3.686290380228012*^9}, {3.6863951313545313`*^9, 3.6863951457345514`*^9}, {3.6883646955890894`*^9, 3.6883646971490917`*^9}, 3.7807552452476177`*^9, {3.811316330506975*^9, 3.81131633668452*^9}, 3.8127824542431855`*^9, 3.8127840219912105`*^9, {3.813031734498083*^9, 3.8130317350874367`*^9}, {3.8145817138547506`*^9, 3.8145817395042872`*^9}, {3.814581776238999*^9, 3.814581799742174*^9}, { 3.814581962677523*^9, 3.8145819647221575`*^9}, {3.81458240606009*^9, 3.8145824075763025`*^9}, {3.814582654101921*^9, 3.814582654999383*^9}},ExpressionUUID->"91363db0-9e12-41a1-9dc6-\ 4b2a2ed40703"], Cell[BoxData[ RowBox[{"SOLVE", "[", "prb", "]"}]], "Input", CellChangeTimes->{{3.8450192155305047`*^9, 3.845019244206795*^9}, { 3.845019345650971*^9, 3.845019350087867*^9}, {3.8450193807846355`*^9, 3.8450193844472237`*^9}, {3.8450194619910765`*^9, 3.84501953201859*^9}, { 3.8450195668758535`*^9, 3.8450195685851765`*^9}, {3.845020075710778*^9, 3.845020234367403*^9}, {3.8450296648401937`*^9, 3.8450296698602324`*^9}, { 3.845029737175827*^9, 3.845029737765443*^9}}, CellLabel-> "In[352]:=",ExpressionUUID->"fa8ac702-ecb2-46fe-b6dd-abee06bf34d1"] }, Closed]], Cell[CellGroupData[{ Cell["REFINE", "Subsection", CellChangeTimes->{{3.473055512584*^9, 3.4730555529630003`*^9}, { 3.4730575328269997`*^9, 3.473057539222*^9}, {3.4734691424642*^9, 3.4734691605758*^9}, {3.5681161575453596`*^9, 3.568116161819767*^9}, { 3.59922265025865*^9, 3.599222653363055*^9}, 3.629777520582675*^9, 3.629791653258878*^9, {3.630370559869874*^9, 3.6303705662970853`*^9}, { 3.6618219022583027`*^9, 3.6618219059243093`*^9}, 3.6852488995100965`*^9, 3.685281849223243*^9, {3.6853234590535126`*^9, 3.685323459673514*^9}, { 3.68587640866364*^9, 3.6858764117036448`*^9}, {3.6862101948897667`*^9, 3.6862101984397717`*^9}, {3.686235632357339*^9, 3.6862356325473394`*^9}, { 3.686290377128008*^9, 3.686290380228012*^9}, {3.6863951313545313`*^9, 3.6863951457345514`*^9}, {3.6883646955890894`*^9, 3.6883646971490917`*^9}, 3.7807552452476177`*^9, {3.811316330506975*^9, 3.81131633668452*^9}, 3.8127824542431855`*^9, 3.8127840219912105`*^9, {3.813031734498083*^9, 3.8130317350874367`*^9}, {3.8145817138547506`*^9, 3.8145817395042872`*^9}, {3.814581776238999*^9, 3.814581799742174*^9}, { 3.814581962677523*^9, 3.8145819647221575`*^9}, {3.81458240606009*^9, 3.8145824075763025`*^9}, {3.814582654101921*^9, 3.814582654999383*^9}, { 3.8450077640401464`*^9, 3.8450077653876443`*^9}},ExpressionUUID->"5068d9e7-3d74-4f0c-8917-\ 35f620b3d606"], Cell[BoxData[ RowBox[{"FORMATTED", "[", RowBox[{"REFINE", "[", "prb", "]"}], "]"}]], "Input", CellChangeTimes->{{3.845029716768086*^9, 3.845029748386122*^9}, { 3.8450298000517015`*^9, 3.8450298321409492`*^9}},ExpressionUUID->"0a958e5d-178a-4fbb-9bee-\ e75538197c4d"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Building blocks", "Title", CellChangeTimes->{ 3.4430806364968*^9, {3.4453166713873997`*^9, 3.4453166747414*^9}, { 3.447462264275*^9, 3.4474622644154*^9}, {3.4695731321116*^9, 3.4695731359491997`*^9}, {3.473055192524*^9, 3.473055199133*^9}, { 3.47305542959*^9, 3.4730554407939997`*^9}, {3.4734696797594*^9, 3.4734696967634*^9}, {3.4933064685896*^9, 3.493306471148*^9}, { 3.5568725291398897`*^9, 3.5568725438967333`*^9}, 3.5568726929512587`*^9, { 3.5576544837556367`*^9, 3.5576544886852455`*^9}, {3.6852489036101027`*^9, 3.68524892333013*^9}, {3.688455478402707*^9, 3.688455486552718*^9}, { 3.813031714323161*^9, 3.813031718925788*^9}, {3.813031758195632*^9, 3.8130317648033185`*^9}, {3.813032384726508*^9, 3.813032390240255*^9}, { 3.814583256251114*^9, 3.8145832796753936`*^9}, {3.847106497254386*^9, 3.847106504438273*^9}},ExpressionUUID->"a4d07bda-386c-4147-8949-\ 2d16a7e38fc2"], Cell[CellGroupData[{ Cell["SHAPE FUNCTIONS", "Subsection", CellChangeTimes->{{3.473055512584*^9, 3.4730555529630003`*^9}, { 3.4730575328269997`*^9, 3.473057539222*^9}, {3.4734691424642*^9, 3.4734691605758*^9}, {3.5681161575453596`*^9, 3.568116161819767*^9}, { 3.59922265025865*^9, 3.599222653363055*^9}, 3.629777520582675*^9, 3.629791653258878*^9, {3.630370559869874*^9, 3.6303705662970853`*^9}, { 3.6618219022583027`*^9, 3.6618219059243093`*^9}, 3.6852488995100965`*^9, 3.685281849223243*^9, {3.6853234590535126`*^9, 3.685323459673514*^9}, { 3.68587640866364*^9, 3.6858764117036448`*^9}, {3.6862101948897667`*^9, 3.6862101984397717`*^9}, {3.686235632357339*^9, 3.6862356325473394`*^9}, { 3.686290377128008*^9, 3.686290380228012*^9}, {3.6863951313545313`*^9, 3.6863951457345514`*^9}, {3.6883646955890894`*^9, 3.6883646971490917`*^9}, 3.7807552452476177`*^9, {3.811316330506975*^9, 3.81131633668452*^9}, 3.8127824542431855`*^9, 3.8127840219912105`*^9, {3.813031734498083*^9, 3.8130317350874367`*^9}, {3.8145817138547506`*^9, 3.8145817395042872`*^9}, {3.814581776238999*^9, 3.814581799742174*^9}, { 3.814581962677523*^9, 3.8145819647221575`*^9}, {3.8145998190246944`*^9, 3.814599846730754*^9}, {3.8153778767843122`*^9, 3.815377881775329*^9}},ExpressionUUID->"26a0e207-cdc1-4165-8be3-\ adf109f96469"], Cell[CellGroupData[{ Cell["LINE ELEMENT", "Subsubsection", CellChangeTimes->{{3.8153761102345724`*^9, 3.815376150616532*^9}, { 3.8153778585373697`*^9, 3.8153778611644793`*^9}, {3.8153778930697937`*^9, 3.815377926338909*^9}},ExpressionUUID->"beff35e0-db9c-4115-83a5-\ fe3bd9c72370"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"linear", " ", "C0"}], "-", RowBox[{"shape", " ", "functions"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], ",", "\[Xi]"}], "}"}]}], ";"}]}]], "Input", CellChangeTimes->{{3.8122458946247807`*^9, 3.8122459117806697`*^9}, { 3.81224594830929*^9, 3.8122462868421164`*^9}, {3.81224633207593*^9, 3.8122464535289297`*^9}, {3.812246516009039*^9, 3.812246563090599*^9}, { 3.812246638940317*^9, 3.812246876774053*^9}, {3.8123470486670413`*^9, 3.812347051682555*^9}, {3.8123470966072025`*^9, 3.812347323132008*^9}, { 3.81234741007143*^9, 3.812347415966572*^9}, {3.8123475116907806`*^9, 3.812347520634344*^9}, {3.8123475758734417`*^9, 3.812347579567418*^9}, { 3.8123477492891097`*^9, 3.812347762488459*^9}, {3.8123478282231417`*^9, 3.8123478472209744`*^9}, {3.812348071175949*^9, 3.812348072474114*^9}, { 3.8123481259943905`*^9, 3.8123481287065563`*^9}, {3.8123481606590233`*^9, 3.8123481635272818`*^9}, {3.8129373002804165`*^9, 3.8129374795649176`*^9}, {3.8129375608148932`*^9, 3.8129376841051188`*^9}, {3.8129377388246346`*^9, 3.812937751721712*^9}, { 3.8129378361071234`*^9, 3.8129378848425455`*^9}, {3.812937928137231*^9, 3.8129379634791355`*^9}, {3.8129495347076764`*^9, 3.812949648561287*^9}, { 3.8130317918239193`*^9, 3.8130318138107257`*^9}, {3.8130318491063366`*^9, 3.81303188231655*^9}, {3.8130356475942745`*^9, 3.8130356809995785`*^9}, { 3.813035723222085*^9, 3.8130357590144258`*^9}, {3.8130358624005957`*^9, 3.8130359070572233`*^9}, {3.813035937058835*^9, 3.813035954588526*^9}, { 3.814582008240017*^9, 3.8145820248715706`*^9}, {3.814582096515246*^9, 3.8145820976899586`*^9}, {3.814582222644521*^9, 3.8145822694304285`*^9}, 3.8145823659907265`*^9, {3.8145998741008406`*^9, 3.814600136314242*^9}, { 3.8146057637811375`*^9, 3.8146057751470695`*^9}, {3.8146058147992887`*^9, 3.8146059596916857`*^9}, 3.814606033537171*^9, {3.8159720947218275`*^9, 3.8159721193297033`*^9}, {3.815972652030098*^9, 3.815972652669269*^9}, { 3.815972699569892*^9, 3.8159727068500752`*^9}},ExpressionUUID->"82b3efc2-6bb9-4e06-a831-\ a581297e9cd5"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"quadratic", " ", "C0"}], "-", RowBox[{"shape", " ", "functions"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"\[Xi]", "-", "1"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"2", "\[Xi]"}], "-", "1"}], ")"}]}], ",", RowBox[{"4", "\[Xi]", RowBox[{"(", RowBox[{"\[Xi]", "-", "1"}], ")"}]}], ",", RowBox[{"\[Xi]", RowBox[{"(", RowBox[{ RowBox[{"2", "\[Xi]"}], "-", "1"}], ")"}]}]}], "}"}]}]}]], "Input", CellChangeTimes->{{3.8122458946247807`*^9, 3.8122459117806697`*^9}, { 3.81224594830929*^9, 3.8122462868421164`*^9}, {3.81224633207593*^9, 3.8122464535289297`*^9}, {3.812246516009039*^9, 3.812246563090599*^9}, { 3.812246638940317*^9, 3.812246876774053*^9}, {3.8123470486670413`*^9, 3.812347051682555*^9}, {3.8123470966072025`*^9, 3.812347323132008*^9}, { 3.81234741007143*^9, 3.812347415966572*^9}, {3.8123475116907806`*^9, 3.812347520634344*^9}, {3.8123475758734417`*^9, 3.812347579567418*^9}, { 3.8123477492891097`*^9, 3.812347762488459*^9}, {3.8123478282231417`*^9, 3.8123478472209744`*^9}, {3.812348071175949*^9, 3.812348072474114*^9}, { 3.8123481259943905`*^9, 3.8123481287065563`*^9}, {3.8123481606590233`*^9, 3.8123481635272818`*^9}, {3.8129373002804165`*^9, 3.8129374795649176`*^9}, {3.8129375608148932`*^9, 3.8129376841051188`*^9}, {3.8129377388246346`*^9, 3.812937751721712*^9}, { 3.8129378361071234`*^9, 3.8129378848425455`*^9}, {3.812937928137231*^9, 3.8129379634791355`*^9}, {3.8129495347076764`*^9, 3.812949648561287*^9}, { 3.8130317918239193`*^9, 3.8130318138107257`*^9}, {3.8130318491063366`*^9, 3.81303188231655*^9}, {3.8130356475942745`*^9, 3.8130356809995785`*^9}, { 3.813035723222085*^9, 3.8130357590144258`*^9}, {3.8130358624005957`*^9, 3.8130359070572233`*^9}, {3.813035937058835*^9, 3.813035954588526*^9}, { 3.814582008240017*^9, 3.8145820248715706`*^9}, {3.814582096515246*^9, 3.8145820976899586`*^9}, {3.814582222644521*^9, 3.8145822694304285`*^9}, 3.8145823659907265`*^9, {3.8145998741008406`*^9, 3.814600136314242*^9}, { 3.8146057637811375`*^9, 3.8146057751470695`*^9}, {3.8146058147992887`*^9, 3.8146059596916857`*^9}, {3.814606033537171*^9, 3.814606149102341*^9}, { 3.814606180892046*^9, 3.814606298412548*^9}, {3.8146063579039745`*^9, 3.8146063647835994`*^9}, {3.815972100639989*^9, 3.8159721056615915`*^9}, { 3.8159726431906357`*^9, 3.8159726687298455`*^9}, {3.815972794809167*^9, 3.81597291894991*^9}},ExpressionUUID->"220b5cf6-939b-4624-82fc-\ 1d448a11a7d2"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ RowBox[{"cubic", " ", "C1"}], "-", RowBox[{"shape", " ", "functions"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], "^", "2"}], RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", "\[Xi]"}]}], ")"}]}], ",", " ", RowBox[{"h", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Xi]"}], ")"}], "^", "2"}], "\[Xi]"}], ",", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", "\[Xi]"}]}], ")"}], RowBox[{"\[Xi]", "^", "2"}]}], ",", " ", RowBox[{"h", " ", RowBox[{"\[Xi]", "^", "2"}], RowBox[{"(", RowBox[{"\[Xi]", "-", "1"}], ")"}]}]}], "}"}]}], ";"}]}]], "Input", CellChangeTimes->{{3.8122458946247807`*^9, 3.8122459117806697`*^9}, { 3.81224594830929*^9, 3.8122462868421164`*^9}, {3.81224633207593*^9, 3.8122464535289297`*^9}, {3.812246516009039*^9, 3.812246563090599*^9}, { 3.812246638940317*^9, 3.812246876774053*^9}, {3.8123470486670413`*^9, 3.812347051682555*^9}, {3.8123470966072025`*^9, 3.812347323132008*^9}, { 3.81234741007143*^9, 3.812347415966572*^9}, {3.8123475116907806`*^9, 3.812347520634344*^9}, {3.8123475758734417`*^9, 3.812347579567418*^9}, { 3.8123477492891097`*^9, 3.812347762488459*^9}, {3.8123478282231417`*^9, 3.8123478472209744`*^9}, {3.812348071175949*^9, 3.812348072474114*^9}, { 3.8123481259943905`*^9, 3.8123481287065563`*^9}, {3.8123481606590233`*^9, 3.8123481635272818`*^9}, {3.8129373002804165`*^9, 3.8129374795649176`*^9}, {3.8129375608148932`*^9, 3.8129376841051188`*^9}, {3.8129377388246346`*^9, 3.812937751721712*^9}, { 3.8129378361071234`*^9, 3.8129378848425455`*^9}, {3.812937928137231*^9, 3.8129379634791355`*^9}, {3.8129495347076764`*^9, 3.812949648561287*^9}, { 3.8130317918239193`*^9, 3.8130318138107257`*^9}, {3.8130318491063366`*^9, 3.81303188231655*^9}, {3.8130356475942745`*^9, 3.8130356809995785`*^9}, { 3.813035723222085*^9, 3.8130357590144258`*^9}, {3.8130358624005957`*^9, 3.8130359070572233`*^9}, {3.813035937058835*^9, 3.813035954588526*^9}, { 3.814582008240017*^9, 3.8145820248715706`*^9}, {3.814582096515246*^9, 3.8145820976899586`*^9}, {3.814582222644521*^9, 3.8145822694304285`*^9}, 3.8145823659907265`*^9, {3.8145998741008406`*^9, 3.814600136314242*^9}, { 3.8146057637811375`*^9, 3.8146057751470695`*^9}, {3.8146058147992887`*^9, 3.8146059596916857`*^9}, {3.814606033537171*^9, 3.814606149102341*^9}, { 3.814606180892046*^9, 3.814606298412548*^9}, {3.8146063579039745`*^9, 3.8146063647835994`*^9}, {3.815972100639989*^9, 3.815972177149772*^9}, { 3.8159722449999447`*^9, 3.8159723302194176`*^9}, {3.8159723636896453`*^9, 3.8159724672992663`*^9}, 3.815972537989519*^9, {3.8159726362499347`*^9, 3.815972636939266*^9}},ExpressionUUID->"db6e53ee-3185-4c35-a060-\ 4c2c3960cadb"] }, Closed]], Cell[CellGroupData[{ Cell["TRIANGLE ELEMENT", "Subsubsection", CellChangeTimes->{{3.8153761102345724`*^9, 3.815376150616532*^9}, { 3.8153778585373697`*^9, 3.8153778611644793`*^9}, {3.8153778930697937`*^9, 3.815377932666324*^9}},ExpressionUUID->"cdd99db5-8666-4302-8515-\ 913bb1a6313b"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ "shape", " ", "functions", " ", "of", " ", "a", " ", "triangle", " ", "element"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"X1", ",", "X2", ",", "X3"}], "}"}], ",", RowBox[{"{", RowBox[{"Y1", ",", "Y2", ",", "Y3"}], "}"}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"1", ",", "x", ",", "y"}], "}"}]}]}], ";"}]}]], "Input",Expressi\ onUUID->"1725c647-4f9c-49d0-a45b-a8ea26e92db3"] }, Closed]], Cell[CellGroupData[{ Cell["RECTANGLE ELEMENT", "Subsubsection", CellChangeTimes->{{3.8153761102345724`*^9, 3.815376150616532*^9}, { 3.8153778585373697`*^9, 3.8153778611644793`*^9}, {3.8153778930697937`*^9, 3.815377932666324*^9}, {3.847503180118764*^9, 3.847503184782567*^9}},ExpressionUUID->"deaa1804-8901-4753-b24f-\ eefcd2c5135b"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ "shape", " ", "functions", " ", "of", " ", "a", " ", "rectangle", " ", "element"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"X1", ",", "X2", ",", "X3", ",", "X4"}], "}"}], ",", RowBox[{"{", RowBox[{"Y1", ",", "Y2", ",", "Y3", ",", "Y4"}], "}"}], ",", RowBox[{ RowBox[{"{", RowBox[{"X1", ",", "X2", ",", "X3", ",", "X4"}], "}"}], "*", RowBox[{"{", RowBox[{"Y1", ",", "Y2", ",", "Y3", ",", "Y4"}], "}"}]}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"1", ",", "x", ",", "y", ",", RowBox[{"x", " ", "y"}]}], "}"}]}]}], ";"}]}]], "Input", CellChangeTimes->{{3.847503191153941*^9, 3.84750323154117*^9}},ExpressionUUID->"ebd79481-f6b0-43a0-ab31-\ 430e97161f6d"] }, Closed]], Cell[CellGroupData[{ Cell["TETRAHEDRON ELEMENT", "Subsubsection", CellChangeTimes->{{3.8153761102345724`*^9, 3.815376150616532*^9}, { 3.8153778585373697`*^9, 3.8153778611644793`*^9}, {3.8153778930697937`*^9, 3.815377932666324*^9}, {3.8153780438876925`*^9, 3.8153780475063734`*^9}},ExpressionUUID->"b62ccebe-0bd1-47e2-89fb-\ e72a041260aa"], Cell[BoxData[ RowBox[{ RowBox[{"NN", "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"X1", ",", "X2", ",", "X3", ",", "X4"}], "}"}], ",", RowBox[{"{", RowBox[{"Y1", ",", "Y2", ",", "Y3", ",", "Y4"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"Z1", ",", "Z2", ",", "Z3", ",", "Z4"}], "}"}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"1", ",", "x", ",", "y", ",", "z"}], "}"}]}]}], ";"}]], "Input", CellChangeTimes->{{3.815378054358664*^9, 3.8153781050950427`*^9}, { 3.8153787116931453`*^9, 3.815379027185547*^9}, {3.815379059917926*^9, 3.8153790918471317`*^9}, {3.8153791328559084`*^9, 3.815379311525423*^9}, { 3.815972610109193*^9, 3.8159726230695896`*^9}, 3.8159730308794374`*^9},ExpressionUUID->"b131437e-cf1b-4c1f-abed-\ aace00b2891c"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["VIRTUAL WORK DENSITIES", "Subsection", CellChangeTimes->{{3.473055512584*^9, 3.4730555529630003`*^9}, { 3.4730575328269997`*^9, 3.473057539222*^9}, {3.4734691424642*^9, 3.4734691605758*^9}, {3.5681161575453596`*^9, 3.568116161819767*^9}, { 3.59922265025865*^9, 3.599222653363055*^9}, 3.629777520582675*^9, 3.629791653258878*^9, {3.630370559869874*^9, 3.6303705662970853`*^9}, { 3.6618219022583027`*^9, 3.6618219059243093`*^9}, 3.6852488995100965`*^9, 3.685281849223243*^9, {3.6853234590535126`*^9, 3.685323459673514*^9}, { 3.68587640866364*^9, 3.6858764117036448`*^9}, {3.6862101948897667`*^9, 3.6862101984397717`*^9}, {3.686235632357339*^9, 3.6862356325473394`*^9}, { 3.686290377128008*^9, 3.686290380228012*^9}, {3.6863951313545313`*^9, 3.6863951457345514`*^9}, {3.6883646955890894`*^9, 3.6883646971490917`*^9}, 3.7807552452476177`*^9, {3.811316330506975*^9, 3.81131633668452*^9}, 3.8127824542431855`*^9, 3.8127840219912105`*^9, {3.813031734498083*^9, 3.8130317350874367`*^9}, {3.8145817138547506`*^9, 3.8145817395042872`*^9}, {3.814581776238999*^9, 3.814581799742174*^9}, { 3.814581962677523*^9, 3.8145819647221575`*^9}, {3.8145998190246944`*^9, 3.814599846730754*^9}, {3.8146008007283373`*^9, 3.81460080653517*^9}, { 3.8159703504602785`*^9, 3.8159703518851805`*^9}},ExpressionUUID->"efd0b1df-98d3-429f-9f61-\ 0554e5b7fda7"], Cell[CellGroupData[{ Cell["BEAM MODEL BAR MODE", "Subsubsection", CellChangeTimes->{{3.8153761102345724`*^9, 3.815376150616532*^9}, { 3.8155550704278812`*^9, 3.815555097192521*^9}, {3.81597039148044*^9, 3.815970392981469*^9}},ExpressionUUID->"2f6bd55d-333f-45fe-bb20-\ 912ec7ed2edf"], Cell[BoxData[ RowBox[{ RowBox[{"\[Delta]w", ":=", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], "]"}]}], " ", "\[CapitalEpsilon]", " ", "A", " ", RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}]}], " ", "+", RowBox[{ RowBox[{"\[Delta]", "[", "u", "]"}], " ", "fx"}]}]}], ";"}]], "Input", CellChangeTimes->{{3.8122458946247807`*^9, 3.8122459117806697`*^9}, { 3.81224594830929*^9, 3.8122462868421164`*^9}, {3.81224633207593*^9, 3.8122464535289297`*^9}, {3.812246516009039*^9, 3.812246563090599*^9}, { 3.812246638940317*^9, 3.812246876774053*^9}, {3.8123470486670413`*^9, 3.812347051682555*^9}, {3.8123470966072025`*^9, 3.812347323132008*^9}, { 3.81234741007143*^9, 3.812347415966572*^9}, {3.8123475116907806`*^9, 3.812347520634344*^9}, {3.8123475758734417`*^9, 3.812347579567418*^9}, { 3.8123477492891097`*^9, 3.812347762488459*^9}, {3.8123478282231417`*^9, 3.8123478472209744`*^9}, {3.812348071175949*^9, 3.812348072474114*^9}, { 3.8123481259943905`*^9, 3.8123481287065563`*^9}, {3.8123481606590233`*^9, 3.8123481635272818`*^9}, {3.8129373002804165`*^9, 3.8129374795649176`*^9}, {3.8129375608148932`*^9, 3.8129376841051188`*^9}, {3.8129377388246346`*^9, 3.812937751721712*^9}, { 3.8129378361071234`*^9, 3.8129378848425455`*^9}, {3.812937928137231*^9, 3.8129379634791355`*^9}, {3.8129495347076764`*^9, 3.812949648561287*^9}, { 3.8130317918239193`*^9, 3.8130318138107257`*^9}, {3.8130318491063366`*^9, 3.81303188231655*^9}, {3.8130356475942745`*^9, 3.8130356809995785`*^9}, { 3.813035723222085*^9, 3.8130357590144258`*^9}, {3.8130358624005957`*^9, 3.8130359070572233`*^9}, {3.813035937058835*^9, 3.813035954588526*^9}, { 3.814582008240017*^9, 3.8145820248715706`*^9}, {3.814582096515246*^9, 3.8145820976899586`*^9}, {3.814582222644521*^9, 3.8145822694304285`*^9}, 3.8145823659907265`*^9, {3.8145998741008406`*^9, 3.814600136314242*^9}, { 3.8146008155128937`*^9, 3.8146008175253997`*^9}, {3.814600885570817*^9, 3.8146011063818507`*^9}, {3.8146011515994005`*^9, 3.8146013530398593`*^9}, 3.8146014065154305`*^9, {3.814601537078768*^9, 3.814601632104453*^9}, { 3.8146064870264406`*^9, 3.814606490130829*^9}, 3.814606610960127*^9, { 3.814606651276392*^9, 3.8146066606647425`*^9}, {3.8146067115977106`*^9, 3.814606762494011*^9}, {3.8159703281352887`*^9, 3.8159703402311783`*^9}},ExpressionUUID->"1761ef45-e737-40c4-bb87-\ 617517283619"] }, Closed]], Cell[CellGroupData[{ Cell["PLATE MODEL THIN SLAB MODE", "Subsubsection", CellChangeTimes->{{3.8153761102345724`*^9, 3.8153761757169156`*^9}, { 3.8155550612856245`*^9, 3.8155550857667856`*^9}, {3.8159703836711783`*^9, 3.815970385180562*^9}},ExpressionUUID->"8274c0a0-4338-4bbc-97c8-\ b1f410862c2d"], Cell[BoxData[ RowBox[{ RowBox[{"\[Delta]w", ":=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "y"], "v"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}], "+", RowBox[{ SubscriptBox["\[PartialD]", "y"], "u"}]}]}], "}"}], "]"}], ".", RowBox[{"(", " ", RowBox[{ FractionBox[ RowBox[{"t", " ", "\[CapitalEpsilon]"}], RowBox[{"1", "-", SuperscriptBox["\[Nu]", "2"]}]], RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", FractionBox[ RowBox[{"1", "-", "\[Nu]"}], "2"]}], "}"}]}], "}"}]}], " ", ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], ",", RowBox[{ SubscriptBox["\[PartialD]", "y"], "v"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}], "+", RowBox[{ SubscriptBox["\[PartialD]", "y"], "u"}]}]}], "}"}]}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"fx", ",", "fy"}], "}"}]}]}]}], ";"}]], "Input", CellChangeTimes->{{3.815376079275247*^9, 3.815376084074486*^9}, { 3.8153762691761475`*^9, 3.81537637169284*^9}, {3.815376408228937*^9, 3.8153768545545063`*^9}, 3.8153768906625123`*^9, {3.815377226090613*^9, 3.815377243749753*^9}, {3.815377320906008*^9, 3.8153773695372734`*^9}, { 3.815377401490987*^9, 3.8153774339257746`*^9}, 3.815377636067772*^9, { 3.8153777436891727`*^9, 3.8153777579877353`*^9}, {3.815378317503425*^9, 3.8153783297840624`*^9}, {3.815378596102874*^9, 3.8153786641604166`*^9}, { 3.815555236681955*^9, 3.815555256861638*^9}, {3.815970241520693*^9, 3.815970288970612*^9}},ExpressionUUID->"b6aa2776-54a6-460b-a154-\ ed882c8b2d3c"] }, Closed]], Cell[CellGroupData[{ Cell["KIRCHOFF PLATE MODEL BENDING MODE ", "Subsubsection", CellChangeTimes->{{3.8153761102345724`*^9, 3.8153761757169156`*^9}, { 3.8155550467937036`*^9, 3.815555075237017*^9}, {3.8159701001811857`*^9, 3.8159701045708075`*^9}, 3.8159703067500787`*^9, {3.815970387860293*^9, 3.815970397190421*^9}, {3.8159705041305027`*^9, 3.815970508450695*^9}},ExpressionUUID->"38381475-c1e0-49fa-b66e-\ 3a2e159443d8"], Cell[BoxData[ RowBox[{ RowBox[{"\[Delta]w", ":=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["t", "3"], " ", "\[CapitalEpsilon]"}], RowBox[{"12", RowBox[{"(", RowBox[{"1", "-", SuperscriptBox["\[Nu]", "2"]}], ")"}]}]], RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", FractionBox[ RowBox[{"1", "-", "\[Nu]"}], "2"]}], "}"}]}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}]}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], " ", "fz"}]}]}], " ", ";"}]], "Input", CellChangeTimes->{{3.815376079275247*^9, 3.815376084074486*^9}, { 3.8153762691761475`*^9, 3.81537637169284*^9}, {3.815376408228937*^9, 3.8153768545545063`*^9}, 3.8153768906625123`*^9, {3.815377226090613*^9, 3.815377243749753*^9}, {3.815377320906008*^9, 3.8153773695372734`*^9}, { 3.815377401490987*^9, 3.8153774339257746`*^9}, 3.815377636067772*^9, { 3.8153777436891727`*^9, 3.8153777579877353`*^9}, {3.815378317503425*^9, 3.8153783297840624`*^9}, {3.815378596102874*^9, 3.8153786641604166`*^9}, { 3.81555511380053*^9, 3.8155552250620823`*^9}, {3.8156489760003366`*^9, 3.81564898828447*^9}, 3.81573894466789*^9, {3.815970113711381*^9, 3.815970194260604*^9}, 3.815970415830834*^9},ExpressionUUID->"b2d2e567-805d-4daa-b55f-\ 96e2e0f89a05"] }, Closed]], Cell[CellGroupData[{ Cell["BERNOULLI BEAM MODEL", "Subsubsection", CellChangeTimes->{{3.8153761102345724`*^9, 3.815376150616532*^9}, { 3.8155550704278812`*^9, 3.815555097192521*^9}, {3.8159690015114365`*^9, 3.815969008535722*^9}, {3.815970405281172*^9, 3.815970412901128*^9}, { 3.815970487580885*^9, 3.8159704902508726`*^9}},ExpressionUUID->"16d8b5fc-c220-45ce-96b6-\ b5d2a9ae6b97"], Cell[BoxData[ RowBox[{ RowBox[{"\[Delta]w", ":=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "v"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}]}], "}"}], "]"}], ".", RowBox[{"(", " ", RowBox[{"\[CapitalEpsilon]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"A", ",", RowBox[{"-", "Sz"}], ",", RowBox[{"-", "Sy"}]}], "}"}], ",", " ", RowBox[{"{", RowBox[{ RowBox[{"-", "Sz"}], ",", "Izz", ",", "Iyz"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "Sy"}], ",", "Iyz", ",", "Iyy"}], "}"}]}], "}"}]}], ")"}], ".", " ", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "u"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "v"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}]}], "}"}]}]}], "-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Phi]"}], "]"}], " ", "G", " ", "Irr", " ", RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Phi]"}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"u", ",", "v", ",", "w"}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"fx", ",", "fy", ",", "fz"}], "}"}]}], "+", "\[IndentingNewLine]", RowBox[{"+", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{"\[Phi]", ",", RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "w"}]}], ",", RowBox[{ SubscriptBox["\[PartialD]", "x"], "v"}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "Sy"}], " ", "fy"}], "+", RowBox[{"Sz", " ", "fz"}]}], ",", RowBox[{"Sy", " ", "fx"}], ",", RowBox[{ RowBox[{"-", "Sz"}], " ", "fz"}]}], "}"}]}]}]}]}], ";"}]], "Input", CellChangeTimes->{{3.8122458946247807`*^9, 3.8122459117806697`*^9}, { 3.81224594830929*^9, 3.8122462868421164`*^9}, {3.81224633207593*^9, 3.8122464535289297`*^9}, {3.812246516009039*^9, 3.812246563090599*^9}, { 3.812246638940317*^9, 3.812246876774053*^9}, {3.8123470486670413`*^9, 3.812347051682555*^9}, {3.8123470966072025`*^9, 3.812347323132008*^9}, { 3.81234741007143*^9, 3.812347415966572*^9}, {3.8123475116907806`*^9, 3.812347520634344*^9}, {3.8123475758734417`*^9, 3.812347579567418*^9}, { 3.8123477492891097`*^9, 3.812347762488459*^9}, {3.8123478282231417`*^9, 3.8123478472209744`*^9}, {3.812348071175949*^9, 3.812348072474114*^9}, { 3.8123481259943905`*^9, 3.8123481287065563`*^9}, {3.8123481606590233`*^9, 3.8123481635272818`*^9}, {3.8129373002804165`*^9, 3.8129374795649176`*^9}, {3.8129375608148932`*^9, 3.8129376841051188`*^9}, {3.8129377388246346`*^9, 3.812937751721712*^9}, { 3.8129378361071234`*^9, 3.8129378848425455`*^9}, {3.812937928137231*^9, 3.8129379634791355`*^9}, {3.8129495347076764`*^9, 3.812949648561287*^9}, { 3.8130317918239193`*^9, 3.8130318138107257`*^9}, {3.8130318491063366`*^9, 3.81303188231655*^9}, {3.8130356475942745`*^9, 3.8130356809995785`*^9}, { 3.813035723222085*^9, 3.8130357590144258`*^9}, {3.8130358624005957`*^9, 3.8130359070572233`*^9}, {3.813035937058835*^9, 3.813035954588526*^9}, { 3.814582008240017*^9, 3.8145820248715706`*^9}, {3.814582096515246*^9, 3.8145820976899586`*^9}, {3.814582222644521*^9, 3.8145822694304285`*^9}, 3.8145823659907265`*^9, {3.8145998741008406`*^9, 3.814600136314242*^9}, { 3.8146008155128937`*^9, 3.8146008175253997`*^9}, {3.814600885570817*^9, 3.8146011063818507`*^9}, {3.8146011515994005`*^9, 3.8146013530398593`*^9}, 3.8146014065154305`*^9, {3.814601537078768*^9, 3.814601632104453*^9}, { 3.8146064870264406`*^9, 3.814606490130829*^9}, 3.814606610960127*^9, { 3.814606651276392*^9, 3.8146066606647425`*^9}, {3.8146067115977106`*^9, 3.814606762494011*^9}, {3.8159690214478106`*^9, 3.815969041743673*^9}, 3.8159690882628455`*^9, {3.8159691405501328`*^9, 3.8159691579572124`*^9}, { 3.815969367681252*^9, 3.8159694523908916`*^9}, {3.8159694859224463`*^9, 3.815969763899327*^9}, {3.81596984881141*^9, 3.815970016580805*^9}, { 3.8159700491208305`*^9, 3.815970074430769*^9}, 3.8159702091702833`*^9},ExpressionUUID->"b9bf1c07-b634-412f-b557-\ 607cf36ba9b3"] }, Closed]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Problems and solutions", "Title", CellChangeTimes->{ 3.4430806364968*^9, {3.4453166713873997`*^9, 3.4453166747414*^9}, { 3.447462264275*^9, 3.4474622644154*^9}, {3.4695731321116*^9, 3.4695731359491997`*^9}, {3.473055192524*^9, 3.473055199133*^9}, { 3.47305542959*^9, 3.4730554407939997`*^9}, {3.4734696797594*^9, 3.4734696967634*^9}, {3.4933064685896*^9, 3.493306471148*^9}, { 3.5568725291398897`*^9, 3.5568725438967333`*^9}, 3.5568726929512587`*^9, { 3.5576544837556367`*^9, 3.5576544886852455`*^9}, {3.6852489036101027`*^9, 3.68524892333013*^9}, {3.688455478402707*^9, 3.688455486552718*^9}},ExpressionUUID->"662fb6d2-1542-4110-a411-\ 74af252f2ddf"], Cell[CellGroupData[{ Cell["ORIENTATION (week 44)", "Subsection", CellChangeTimes->{{3.473055512584*^9, 3.4730555529630003`*^9}, { 3.4730575328269997`*^9, 3.473057539222*^9}, {3.4734691424642*^9, 3.4734691605758*^9}, {3.5681161575453596`*^9, 3.568116161819767*^9}, { 3.59922265025865*^9, 3.599222653363055*^9}, 3.629777520582675*^9, 3.629791653258878*^9, {3.630370559869874*^9, 3.6303705662970853`*^9}, { 3.6618219022583027`*^9, 3.6618219059243093`*^9}, 3.6852488995100965`*^9, 3.685281849223243*^9, {3.6853234590535126`*^9, 3.685323459673514*^9}, { 3.68587640866364*^9, 3.6858764117036448`*^9}, {3.6862101948897667`*^9, 3.6862101984397717`*^9}, {3.686235632357339*^9, 3.6862356325473394`*^9}, { 3.686290377128008*^9, 3.686290380228012*^9}, {3.6863951313545313`*^9, 3.6863951457345514`*^9}, {3.6883646955890894`*^9, 3.6883646971490917`*^9}, 3.7807552452476177`*^9, {3.811316330506975*^9, 3.81131633668452*^9}, 3.8127824542431855`*^9, 3.8127840219912105`*^9},ExpressionUUID->"44d3756d-7928-4bfe-8691-\ d3a11e8f50ca"], Cell[CellGroupData[{ Cell["Lecture example 1.1 (bar truss)", "Subsubsection", CellChangeTimes->{{3.4734694905626*^9, 3.4734694918886003`*^9}, { 3.5992247695247765`*^9, 3.599224771911581*^9}, 3.6862337070346437`*^9, 3.686290215967782*^9, {3.6863951815146017`*^9, 3.6863951817946024`*^9}, { 3.686463495303398*^9, 3.6864634969434004`*^9}, {3.781589662579389*^9, 3.7815896660189276`*^9}, 3.8114746411244287`*^9, {3.8123469558611236`*^9, 3.812346957023206*^9}, {3.8127827054547806`*^9, 3.812782714125143*^9}, { 3.8431875260732574`*^9, 3.843187528004115*^9}, {3.844139552906103*^9, 3.844139554375275*^9}},ExpressionUUID->"77046139-e971-4f72-9fa0-\ ff643348e08e"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "1", "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "4"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "4", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "4", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4426465840284452`*^9, 3.4426465892856455`*^9}, { 3.442646804859646*^9, 3.442646838774046*^9}, {3.473469518159*^9, 3.473469542105*^9}, {3.567488659560421*^9, 3.567488679996457*^9}, { 3.6293857978759165`*^9, 3.6293858030083256`*^9}, {3.6293859164049253`*^9, 3.629386031689128*^9}, {3.6297796999883165`*^9, 3.629779712249938*^9}, { 3.6297797534184103`*^9, 3.629779757864418*^9}, {3.6297799558131657`*^9, 3.629779994220433*^9}, {3.6297821687834535`*^9, 3.629782179984273*^9}, { 3.6297822711976333`*^9, 3.6297823082320986`*^9}, {3.6297916313252397`*^9, 3.6297916340240445`*^9}, {3.62987105119119*^9, 3.629871103544882*^9}, { 3.630231689415316*^9, 3.6302317303497877`*^9}, {3.6305529893093967`*^9, 3.63055299723485*^9}, {3.6306697846790886`*^9, 3.630669836330779*^9}, { 3.6306698912116756`*^9, 3.6306699292913427`*^9}, 3.6611752627847633`*^9, { 3.68519377703102*^9, 3.6851937863110332`*^9}, 3.685193829331094*^9, { 3.685233503917756*^9, 3.685233516277773*^9}, {3.685233597647887*^9, 3.685233615337912*^9}, {3.6852337344080787`*^9, 3.685233778910141*^9}, { 3.685233822710202*^9, 3.685233869000267*^9}, {3.685234136752804*^9, 3.685234139506961*^9}, 3.685234415812765*^9, {3.685234451830825*^9, 3.6852344677197337`*^9}, 3.6852619909866486`*^9, {3.6852629455979853`*^9, 3.6852629685880175`*^9}, 3.6852672555340195`*^9, {3.685270602011979*^9, 3.685270662762064*^9}, 3.685270775492222*^9, {3.685271434203144*^9, 3.685271439133151*^9}, {3.6853411055772305`*^9, 3.685341119183009*^9}, { 3.6853412984732637`*^9, 3.6853413099869223`*^9}, {3.6853417310800076`*^9, 3.685341741111581*^9}, {3.6853446026382513`*^9, 3.685344638248288*^9}, { 3.685875619502535*^9, 3.685875662152595*^9}, 3.6858757765527554`*^9, { 3.6863576684041834`*^9, 3.6863576792341986`*^9}, {3.7180899126263156`*^9, 3.718089913795903*^9}, {3.7489256462117243`*^9, 3.7489256598803215`*^9}, { 3.7739889020672274`*^9, 3.773989039520363*^9}, {3.7739894819799957`*^9, 3.7739894972205*^9}, {3.773989556461751*^9, 3.7739895852199936`*^9}, { 3.7739896543035803`*^9, 3.7739896567672663`*^9}, 3.773989820725361*^9, { 3.7751892927335873`*^9, 3.7751893327009354`*^9}, {3.775194181779306*^9, 3.7751941952586517`*^9}, {3.775195003917308*^9, 3.7751950171287575`*^9}, { 3.7751951717513275`*^9, 3.775195192837899*^9}, {3.7751952404187474`*^9, 3.775195244147611*^9}, {3.7751952888153787`*^9, 3.7751953694673223`*^9}, { 3.7751954986380005`*^9, 3.775195534685109*^9}, {3.7752693540695815`*^9, 3.775269421669304*^9}, {3.775269453334443*^9, 3.7752695075204906`*^9}, { 3.775271836528426*^9, 3.7752718743181734`*^9}, 3.7815880621975713`*^9, { 3.8113163783757467`*^9, 3.8113164448925743`*^9}, {3.8114308075218377`*^9, 3.811430991247053*^9}, {3.8114828410116625`*^9, 3.811482960391885*^9}, { 3.8114830961578193`*^9, 3.811483098501501*^9}, {3.811483382572585*^9, 3.811483382935086*^9}, {3.8114834832613883`*^9, 3.8114834914024396`*^9}, { 3.8436260969203086`*^9, 3.8436261031043243`*^9}}, CellLabel-> "In[459]:=",ExpressionUUID->"d18f22c0-e634-4475-a194-898b117fce72"], Cell[BoxData[ TagBox[GridBox[{ { TagBox[ TagBox[GridBox[{ { StyleBox["\[Null]", ShowStringCharacters->False], TagBox["\<\"model\"\>", HoldForm], TagBox["\<\"properties\"\>", HoldForm], TagBox["\<\"geometry\"\>", HoldForm]}, { TagBox["1", HoldForm], "RIGID", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], RowBox[{"Point", "[", RowBox[{"{", "1", "}"}], "]"}]}, { TagBox["2", HoldForm], "BAR", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}, { TagBox["3", HoldForm], "RIGID", RowBox[{"{", "}"}], RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}, { TagBox["4", HoldForm], "BAR", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "4"}], "}"}], "]"}]}, { TagBox["5", HoldForm], "RIGID", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], RowBox[{"Point", "[", RowBox[{"{", "4", "}"}], "]"}]} }, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{ "Columns" -> {False, True, {False}, False}, "Rows" -> {False, True, {False}, False}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[2.0999999999999996`]}, Offset[0.27999999999999997`]}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}}], {OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}], Function[BoxForm`e$, TableForm[ BoxForm`e$, TableDepth -> 2, TableHeadings -> {{1, 2, 3, 4, 5}, { "model", "properties", "geometry"}}]]]}, {""}, { TagBox[ TagBox[GridBox[{ { StyleBox["\[Null]", ShowStringCharacters->False], TagBox["\<\"{X,Y,Z}\"\>", HoldForm], TagBox["\<\"{\\!\\(\\*SubscriptBox[\\(u\\), \ \\(X\\)]\\),\\!\\(\\*SubscriptBox[\\(u\\), \\(Y\\)]\\),\\!\\(\\*SubscriptBox[\ \\(u\\), \\(Z\\)]\\)}\"\>", HoldForm], TagBox["\<\"{\\!\\(\\*SubscriptBox[\\(\[Theta]\\), \ \\(X\\)]\\),\\!\\(\\*SubscriptBox[\\(\[Theta]\\), \ \\(Y\\)]\\),\\!\\(\\*SubscriptBox[\\(\[Theta]\\), \\(Z\\)]\\)}\"\>", HoldForm]}, { TagBox["1", HoldForm], RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}], RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}, { TagBox["2", HoldForm], RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}, { TagBox["3", HoldForm], RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", "0", ",", "0"}], "}"}], RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}, { TagBox["4", HoldForm], RowBox[{"{", RowBox[{ RowBox[{"2", " ", "L"}], ",", "0", ",", "0"}], "}"}], RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "4", "]"}], ",", "0", ",", "0"}], "}"}], RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]} }, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{ "Columns" -> {False, True, {False}, False}, "Rows" -> {False, True, {False}, False}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[2.0999999999999996`]}, Offset[0.27999999999999997`]}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}}], {OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}], Function[BoxForm`e$, TableForm[ BoxForm`e$, TableDepth -> 2, TableHeadings -> {{1, 2, 3, 4}, { "{X,Y,Z}", "{\!\(\*SubscriptBox[\(u\), \(X\)]\),\!\(\*SubscriptBox[\(u\), \(Y\ \)]\),\!\(\*SubscriptBox[\(u\), \(Z\)]\)}", "{\!\(\*SubscriptBox[\(\[Theta]\), \(X\)]\),\!\(\*SubscriptBox[\(\ \[Theta]\), \(Y\)]\),\!\(\*SubscriptBox[\(\[Theta]\), \(Z\)]\)}", "\[CurlyTheta]"}}]]]} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]], "Output", CellChangeTimes->{3.8448475358485265`*^9}, CellLabel-> "Out[461]=",ExpressionUUID->"b6077496-bf8b-4bf0-80f9-98aff1e602fe"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"FX", "[", "1", "]"}], "\[Rule]", RowBox[{"-", FractionBox[ RowBox[{"a", " ", "A", " ", "\[CapitalEpsilon]"}], RowBox[{"2", " ", "L"}]]}]}], ",", RowBox[{ RowBox[{"FX", "[", "4", "]"}], "\[Rule]", FractionBox[ RowBox[{"a", " ", "A", " ", "\[CapitalEpsilon]"}], RowBox[{"2", " ", "L"}]]}], ",", RowBox[{ RowBox[{"FX", "[", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}], "]"}], "\[Rule]", RowBox[{"-", FractionBox[ RowBox[{"a", " ", "A", " ", "\[CapitalEpsilon]"}], RowBox[{"2", " ", "L"}]]}]}], ",", RowBox[{ RowBox[{"uX", "[", "1", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"uX", "[", "2", "]"}], "\[Rule]", FractionBox["a", "2"]}], ",", RowBox[{ RowBox[{"uX", "[", "3", "]"}], "\[Rule]", FractionBox["a", "2"]}], ",", RowBox[{ RowBox[{"uX", "[", "4", "]"}], "\[Rule]", "a"}]}], "}"}]], "Output", CellChangeTimes->{3.8448475440374994`*^9}, CellLabel-> "Out[462]=",ExpressionUUID->"bd7bfdce-1932-4254-ae3e-fbcd742bbd4d"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 1.2 (bar truss)", "Subsubsection", CellChangeTimes->{{3.4734694905626*^9, 3.4734694918886003`*^9}, { 3.5992247695247765`*^9, 3.599224771911581*^9}, 3.6862337070346437`*^9, 3.686290215967782*^9, {3.6863951815146017`*^9, 3.6863951817946024`*^9}, { 3.686463495303398*^9, 3.6864634969434004`*^9}, {3.781589662579389*^9, 3.7815896660189276`*^9}, 3.8114746411244287`*^9, {3.8123469558611236`*^9, 3.812346957023206*^9}, {3.8127827054547806`*^9, 3.812782714125143*^9}, { 3.8431875260732574`*^9, 3.843187528004115*^9}, {3.844139552906103*^9, 3.844139554375275*^9}, 3.8441396587945433`*^9},ExpressionUUID->"8d1c9a9e-cf7e-495e-a89b-\ 2f2dfa8e76d9"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4426465840284452`*^9, 3.4426465892856455`*^9}, { 3.442646804859646*^9, 3.442646838774046*^9}, {3.473469518159*^9, 3.473469542105*^9}, {3.567488659560421*^9, 3.567488679996457*^9}, { 3.6293857978759165`*^9, 3.6293858030083256`*^9}, {3.6293859164049253`*^9, 3.629386031689128*^9}, {3.6297796999883165`*^9, 3.629779712249938*^9}, { 3.6297797534184103`*^9, 3.629779757864418*^9}, {3.6297799558131657`*^9, 3.629779994220433*^9}, {3.6297821687834535`*^9, 3.629782179984273*^9}, { 3.6297822711976333`*^9, 3.6297823082320986`*^9}, {3.6297916313252397`*^9, 3.6297916340240445`*^9}, {3.62987105119119*^9, 3.629871103544882*^9}, { 3.630231689415316*^9, 3.6302317303497877`*^9}, {3.6305529893093967`*^9, 3.63055299723485*^9}, {3.6306697846790886`*^9, 3.630669836330779*^9}, { 3.6306698912116756`*^9, 3.6306699292913427`*^9}, 3.6611752627847633`*^9, { 3.68519377703102*^9, 3.6851937863110332`*^9}, 3.685193829331094*^9, { 3.685233503917756*^9, 3.685233516277773*^9}, {3.685233597647887*^9, 3.685233615337912*^9}, {3.6852337344080787`*^9, 3.685233778910141*^9}, { 3.685233822710202*^9, 3.685233869000267*^9}, {3.685234136752804*^9, 3.685234139506961*^9}, 3.685234415812765*^9, {3.685234451830825*^9, 3.6852344677197337`*^9}, 3.6852619909866486`*^9, {3.6852629455979853`*^9, 3.6852629685880175`*^9}, 3.6852672555340195`*^9, {3.685270602011979*^9, 3.685270662762064*^9}, 3.685270775492222*^9, {3.685271434203144*^9, 3.685271439133151*^9}, {3.6853411055772305`*^9, 3.685341119183009*^9}, { 3.6853412984732637`*^9, 3.6853413099869223`*^9}, {3.6853417310800076`*^9, 3.685341741111581*^9}, {3.6853446026382513`*^9, 3.685344638248288*^9}, { 3.685875619502535*^9, 3.685875662152595*^9}, 3.6858757765527554`*^9, { 3.6863576684041834`*^9, 3.6863576792341986`*^9}, {3.7180899126263156`*^9, 3.718089913795903*^9}, {3.7489256462117243`*^9, 3.7489256598803215`*^9}, { 3.7739889020672274`*^9, 3.773989039520363*^9}, {3.7739894819799957`*^9, 3.7739894972205*^9}, {3.773989556461751*^9, 3.7739895852199936`*^9}, { 3.7739896543035803`*^9, 3.7739896567672663`*^9}, 3.773989820725361*^9, { 3.7751892927335873`*^9, 3.7751893327009354`*^9}, {3.775194181779306*^9, 3.7751941952586517`*^9}, {3.775195003917308*^9, 3.7751950171287575`*^9}, { 3.7751951717513275`*^9, 3.775195192837899*^9}, {3.7751952404187474`*^9, 3.775195244147611*^9}, {3.7751952888153787`*^9, 3.7751953694673223`*^9}, { 3.7751954986380005`*^9, 3.775195534685109*^9}, {3.7752693540695815`*^9, 3.775269421669304*^9}, {3.775269453334443*^9, 3.7752695075204906`*^9}, { 3.775271836528426*^9, 3.7752718743181734`*^9}, 3.7815880621975713`*^9, { 3.8113163783757467`*^9, 3.8113164448925743`*^9}, {3.8114308075218377`*^9, 3.811430991247053*^9}, {3.8114828410116625`*^9, 3.811482960391885*^9}, { 3.8114830961578193`*^9, 3.811483098501501*^9}, {3.811483382572585*^9, 3.811483382935086*^9}, {3.8114834832613883`*^9, 3.8114834914024396`*^9}, { 3.8436260969203086`*^9, 3.8436261031043243`*^9}, {3.8441396648523626`*^9, 3.844139698743224*^9}, 3.8441397312638173`*^9, {3.844847752352726*^9, 3.8448478437279005`*^9}, {3.8450083826878877`*^9, 3.845008568686053*^9}, { 3.845008604912586*^9, 3.845008642697112*^9}},ExpressionUUID->"74a282c9-dbdf-42c1-bc90-\ eb641d708739"] }, Closed]], Cell[CellGroupData[{ Cell["Modelling assignment (experimental)", "Subsubsection", CellChangeTimes->{{3.4734694905626*^9, 3.4734694918886003`*^9}, { 3.5992247695247765`*^9, 3.599224771911581*^9}, 3.6862337070346437`*^9, 3.686290215967782*^9, {3.6863951815146017`*^9, 3.6863951817946024`*^9}, { 3.686463495303398*^9, 3.6864634969434004`*^9}, {3.781589662579389*^9, 3.7815896660189276`*^9}, {3.8114746411244287`*^9, 3.811474684590746*^9}, { 3.8114747713265204`*^9, 3.811474773913365*^9}, {3.812346993584053*^9, 3.8123469970522747`*^9}, 3.845079100318619*^9, 3.8450941503596954`*^9},ExpressionUUID->"b43d2788-23c9-4e1c-8556-\ 0e634c7e8537"], Cell[BoxData[ RowBox[{" ", GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzsvWVwXNmartkxMz/m12DMzO07E7fpQvfMvfd0n1NVpw4UnCoXmIS2Zdli ZmZmZmbJAjPIYmY0ywxlu8ws22IL5937y1zazky7qvp0T1VMfG+83rFy5c6d qZQsrSc/WH9j42nk8N/8xV/8he9/j4ORdeCffHysg43/J9zY7uHr7Ohhb7fR w8/e0d7nY5v/FpMH/ru/+IsP8E8ar7FYLBaLxWKxWCwWi8VisVgsFovFYrFY LBaLxWKxWCwWi8VisVgsFovFYrFYLBaLxWKxWCwWi8VisVgsFovFYrFYLBaL xWKxWCwWi8VisVgsFovFYrFYLBaLxWKxWCwWi8VisVgsFovFYrFYLBaLxWKx WCwWi8VisVgsFovFYrFYLBaLxWKxWCwWi8VisVgsFovFYrFYLBaLxWKxWCwW i8VisVgsFovFYrFYLBaLxWKxWCwWi8VisVgsFovFYrFYLBaLxWKxWCwWi8Vi sVgsFovFYrFYLBaLxWKxWCwWi8VisVgsFovFYrFYLBaLxWKxWCwWi8VisVgs FovFYrFYLBaLxWKxWCwWi8VisVgsFovFYrFYLBaLxWKxWCwWi8VisVgsFovF YrFYLBaLxWKxWCwWi8VisVgsFovFYrFYLBaLxWKxWCwWi8VisVgsFovFYrFY LBaLxWKxWCwWi8VisVgsFovFYrFYLBaLxWKxWCwWi8VisVgsFovFYrFYLBaL xWKxWCwWi8VisVgsFovFYrFYLBaLxWKxWCwWi8VisVgsFovFYrFYLBaLxWKx WCwWi8VisVgsFovFYrFYLBaLxWKxWCwWi8VisVgsFovFYrFYLBaLxWKxWCwW i8VisVgsFovFYrFYLBaLxWKxWCwWi8VisVgsFovFYrFYLBaLxWKxWCwWi8Vi sVgsFovFYrFYLBaLxWKxWCwWi8VisVgsFovFYrFYLBaLxWKxWCwWi8VisVgs FovFYrFYLBaLxWKxWCwWi8Vi/f9L+4rTtL23KJVcV5hCri1IritMI9cWpJJr 8jGfKiar85JhDPbkJlXlJJIrsxPgiqx4pcsz4+CyjNjyzBjhsoxo4ZK0yIKk 0Jy4wLQI76QQ94Qg1ygfxwgv+zAP2xA3qwCn3X4Opj52Jl62xp42Rh7Whm6W ei7mm53NNjnt3uhmtdXdRh92tdrqYrnF2WIzBk7mm2CMYUxixs1az9Fso8Pu b8n2u74h25l+rW1HU32HnXq22zdZG39ru32z3Y4t1sYbMYkxBuZ6X1kYfI0T 7E22hHqZJ4Y5Z8X7FKQGZcR6BbjuxDV3bv39Lv0/mht9ZrntTzAGuw0+wdHC +HPctNr+hfWOL2Ebkw2w7c6vYDypeEmu5gaOpltczPSdd+vRgI6Yx4zTrq0Y ww47N2MGNzHACRjgiLHdjo32JptgjOkuGO8D3gFvB+NAN9NwH8uYQLuEUKeU SLe0aI/MOO+cRL/8lMCi9NCSzHB8L+DS9CjlN6gyG9/BGEziLrpZnZdYnhNV mhVenBFalB5CR7wJJZlhZdmRZdkRuKs8J7IiN1q+ue7SLJVLMqLg0szoUvww ZMVVF6QMtx852dt4qq+pp2FvdnxwpK9jXKAbfgbczY3Nt365a9PnNobf+Nua xno7Zkf650R7ZUd54pgX61OcHFSZGVGTG1uVG1OZG13xtivzYsh0Ey8bFpM6 XZUfK1yhdUG4SnKUhvfkRWu7Ji+2Ni8OrsuPV5omlVY+qfCegjhtV+fHwLi4 8tlL0kPg4rRguCg1iIzvbF5yAH1f8LL35MfVFMQ31OS07i/sOlI22Fh9ov3A 2Z6jFwYazvYdO9dff3G46dqJ9ltne+5eGLh/aQjHO+f7b5/rvXmm+8apzusn O66Ot90+03PzVNf18fYro62XR1twPuZvT/Tdmui7frb76unOK6c6yJdPtuPm jXM930303jzfd/viwN0rw7cu9OMmJnEyGedcO9OFASZxGk7Amd9fGiTfuTwE 44Hk+9dGyfeujpAxKQYwnQ/jIrgUGZeF8bwaM8pJnK98XrpJZ+Ices00g4Hy BeP1XzrRdnG8dWKk6exQw6n+Yyf7jp4fbb4w1nJm8PhY96GRzgPwYNvegdY6 HIfa9412HRzvOXyi9whOPj1QD2NAD8QkzeNSMK6AI658brjx/HDDhZGGS6Mt l8baLp/svHy69/KZ/gunB25fOzvz8tHywqvVpbnV5fm11Tdra4vScXl+ZXF2 eW5qcebVm+mXq/PTawszkjGYkz07tTI7LXluirw6/xqef/V0dvLxzIuHU8/u v35679WTuy8f33n56PtXj+9MPb038/zB7IuHc5OPcHx+/7snd649un3l3o0L 3185d+fqxL3rFyYf33n9/ME0Tnj1ZH7q2ZuZF0tzL1cXp9eWZ9dW5yUvzWBm Yfr56yd3Jx/efnbvxsNbl+9eO3/r0pkbF05eOjV88eQQjMHl0yPwlTOj3104 BV+fOHHt3DiON86fxM071ybwvPe/u/jg5iUYA9x8/P3V5/dv4srTz+7j1eJl 40XiKfA6cQJeIb1OPB3OhPFA3Lx58TSujCc6Pz4wMdYPnxvtOzvSC58Z7jk/ OnR+ZGhiuP/MQM/J3s4TPe1j3S2d9Qd6m450HT8w0Hqsp/HgwcqC4oy42CBH P+cdHrYG+KPjaWfoYWPgZrnV3WKrh2xPSz0v2d5W+vjLhV/I+KtRXRh/tCa7 +WARfjzw04KfAXy78cODHyH8GOBHZaht73DbvuH2uqG22v7mPX1Nlf3NlT0N ZZ3HijuPFXbVF/U2lvY1leHY21wG97WUw/2tFeThzurR7tqRrhoMhjr2wIPt VX0tJf0tJcPtlaf69p4bOjgxdOjswMEz/QdkH1L78Jn+IxMDR84PHiVfGDpG vjreBF8ebbg4XI/5c/2Hz/YdOtt/QNtn+vbDP/fCh8Vi/aIlMESnf5BNBJUQ p9D4x7NJWcY6kmChS6bFMFycGkEuSgmnR5WmxxSnStiSnxiSlxCcGeOTFumZ HOaWEOwU428b6WMV7mWBPwS+Ttt9HLfhSAP8wpf+KNgawGAWrMnxZ0IAizCR C6wxDzuaAgH0YRrgCAyho8POrWAWDFzNjZx3G0T6WWOFDzbJTfJPCnfBUwM6 TLb8zlTvD4ARwhDwCKiETLSCeTLd1JgEXFgbf227/Vubbd/QwMroKxwJNwg9 MMCROAWE4mZhSCwjyIVu0gxMNKRhwBoxi5e9Ed5GYEuwx26wYWq4V3qkT1aM P95zvPn4dsDiu0PfoMLksOL0UCBJcUaYfAwtzYrAmh9rYBicAmMAQqGx2qHF 6eElGRFwWVZMRU4cDDYpzYzdk5880HJwtPPYePfx7uN1OQkhUX5OxCYupvq7 N//JdONnVnpf+VqbqNnEG2wC58Z4FyYGlKeH7cmOrsyJrpDR4/0GIukkDgEy SjrQiTbaYPLns4lODNHpmkI4trogRrIMKXB5VngZwFB2Kb4dGaFAldLMcHwL hMsAjFkRRclBRUlBJSnBZWmhlRnhe7Iiq7Oj9xYkHCxNaajO7jxUMtRce7Lr EFDl/GDDxSGsQFqAJGATEIqELRP9wBOZTVoujTTj3itjrddBLqe7aMUOY0DE oQEdMKEEjpjBvUQxGCgRhpBEsAk9hJDkwfUxbTYRFmBCcKHNJgJJlBanEY/Q C1CyiZKk6KsTY9yF1w82wWJSsAkMpsBxuGN/d0NVZ31F1/FKHEElgBSsP4k+ BHcQetBDBJ4IZqHT4AsjjRdHG2U2ab043n7hROf5E93nT/bfvHJaZpPX62Ai +c3aisQmSwvTi7Ov38y8WgWVvJlV48kM4YlgE5CL7Km1hSmwycyLR9PPHwBM QCUvHt5+/uAWwIRMkAJj/f/s3ne0vL97/Tyo5OGtK0/uXH/19N7Ui4eCTcAg wJPl+Verb6ZAJSAUcAqxyezkIxAELvXiwU2wAwgF+ABMIBIBqty+fJZQAvME L5jHCZjE04FNvr96DufQaRjTmbgOrobXBiohg03wOvEQnImHiyvTTcAOCAg0 BDAhIMJRINKFE4MTI4MTw4MAk1N9XePd7aOdLcMdjV3HD/Y1HyU26W44ADYp So+N9LPFr1P8UsWvVvwZ8rQ1dLfS08kmzuabcCbYBL9kwCZtR0rBrTrZZLh9 /1Dr3sHWGvJAyx5ik676EoBJ9/HinoYSlZvewhNhEMpAWyWQBGACQgGnDLSW gU2G2ivHuqpP9tad7t8PKjnVu0/2gdN9B2GwydmBoxMDR7XZ5NLIcQITjAEv xCanuvee7K473bsPMAIqmRg8BOMmJn/uhQ+LxfpFC9ChbW0wEWyiBBPBIzSG KXTyk+ImOtmEPqXHvRVZsZXZcbLj1XgiRVVUy+O0MLgoNbQoNaQoNbgwJQjO Sw7ITvDFb/i0aA9gAgAhPsQRyBDuYxnmbYHFdoDrTsEvYAf8OcCfDGIWWANh KPLiZmHkab0ddrc0djEzlPFkq6u5IYy7cPSw2uZjtxOOC3YAmOSnBOYk+sUE 2uEKQJKdW39vZvipRBmmX1OMBgMlFNiYbKCBbkgx+srScAMdLQy+pKOZnjQP VMERBraAVsApFBzBgMYUPaEwCpkIxd1a+gLx1YG86CXZ7vxKGUgSsSQrow14 FlwNFwH1eFgZe9lsD3DaHehsFuxqEeFlGxfgnBbhnR0bkBknEVlhmkQchWnB ZIqhEJXIcROs5CMJXiSng2hAK4CXsMJULJVjyrNjS/DzkIXFdmp/84GhtsMj HUc7j9VQ3CQ2wCXEzRpssmvT5zu//dRK/6tAu90Jfi45UQF5sb6gEjgv1qco KVCwiYQnb+NGWXaEbClq835m0ckmSkj5V2WT6h/PJgWxMLHJnnzVE+EFVOZE kiuyI2DQingTVF8goCw7sjo3tjonBq5RG2xSlRUJV2ZGVGSE480EtsA1uTH7 ChMOl6eBWdr2F3UfKe87XnWi/cDJjoPwmZ4jF4YaKc5y43QXLJbuFDQRhIIF PK38RUwER+Wan1b7FMIAWRCJEGIo2QRgQmyiE0x+TNxE6XdBijaV4KvAlwMA oUiQMuJDYHJxvFWwCQEF4AKryv6WWqISEEpvUzWFS7D4xDlEJVh/Kh9LD8Q5 dJrAHJAL7r003nwZBpiMYuHacm607exox5nR7msXTrx+fn9x7uXK0tzayoIa T96srS6sLM8tL85IeDI/tbo4u7Y4J+GJTCirspVxEyWbzE4+ngI1PLkLMHl2 /+bTezeIRybBKfdvwi8e3MIYC36wAOHDw5uXgQMgl+kXD2dePlaCyeLsJAwe WQFAvZkCp0hg8urJa3Vc48n31whwcKlr58avnh3D8cb5k4IjgCE4YpLCKKAJ 3EUUg9NwUxVMuXgKYAISwWWBTnJc5tbTu1Jc5t6NC1JcRj6Zwi4UhaGnEyYs otNwE8+FZzw3PHC6v/dkbyfAZKSjZbCtYaC1HmxCcZP+lqMdx/btL8/NT40O 97GmoAl+02LwHjZxtdzq72KCPxz43XKkOqv1cElfcw1+QnTETVr3DjTX9jVV 9TfvUbIJLMVKGksJT6RxU6nAE21CAZ4IQulvKe1rLu5tKulplI4DLeVDbVWj nTVjXbUnuved7NkPNjkL6Bg8NjF4VGfohEyTOAE+06eKkhCbkAEmJ7pqf+6F D4vF+kWrJj9J29pgQmyiASYCT3AXBkASmAY/kk2AHrBGWpeAlLeTiFTXKc+M XceZjMjSjAjZ4aUZYSXpobB65RlRmhWh/nw4AmtjrISxbM5PCcL6GfACgiBy SQh1ig2yj/K3ifC1ArzAoV7mAmGIX1zN9d0tASBGOLpa6LtZYIlu5GW7zdPa 2MMa2GLsY7cjwHlXiJtFYpgzwATPjqcI8TTD2n63wScAEyAGxpRgRryjpAAB AmJAuWSU32W7/RsKmlDchAxCEahCA2ECGbI4kwIuFGEBZYinA4/A2qEiYRF/ odAMvRJMglbM9b8AImEGwAJUwRuFtwt/XoPcd+E9xPuJdxWwhjeZUsXwnsip YiH07VAFWYhN0iQ2Kc0ElcSATcqz46vykjqOVgNPhtuPYJAZGxjmZRfl6xjo bOG229BsyxemGz+zNvg62ME8KcAtNzowP84PVALnx/uBTbCiBptU5cZIaV1v J2gpweRd4ZL3xE0IB/7F2UTbutO3CuN1WBEu0X52uqniFPlrEZeqKUyohRVA VIdjbixcl08zErZI72RWFFClNDUUJk4BsFRkgFwi6uRH7c2PP1CcdLQyo7ku r/1gcfexit4GLHhqh9r30We/WFZhfYV1uwiLUEyEqETQAY4irUucQzwi0reU gRLlWPCIBqq8h03wFGQlnmjQCj2ETibOEvSBI+EJUQnlcdEyEiaCoHgHEAPv w3DHfrwhOFKshN4WJZjQW4TrYExsAirBybBI+iI2ga+ebLt2qu3qifZLY3gx rWdHWk8Pt50YbL98bmTyyR2s9ldAH3LoZHVtcXUNx4WV1fml5bmlpdmlNzOr y3PSveAXWA0pyzPTkmdfL828wnF5FseXIqdLHTe5BTzBal8YVAIDTx58d4my pLDyf3r3Ou6aenpv7vVTvBiiEvAISARIggGNCUwAL6+e3Qc74CGU0wX6oBAG xSxABEAD3BSBEiILIggiF0rNunf9Ap6dfP/GReASLvjiwU1QCajnsUw9UpBF TtwiKrl1+Yz0sq9KoRYKuEhHmbAomIJz8BR4GefHB86N9p3q7znR0zXW1SaB SWtjf0t9X/PR7oZDgk1aD9fWlWRlJYRF+NqIuIn0wZeNgavFFneLLdps4mlr gF+bBalBgk0AsCOdB7TZBGDS31QDMFG7aqClqrexHKZULgqayGyig0qIRzTc 11LS21Tc3VDYfjS35VBW2+HczmOFg62VIx3VY11732KTARV6aOCJBqdIMZTh oxeGj0wMHjo3cBBUcrp3HwVNOG7CYrHeL51sog0mmNQGE6ouEeESGhCh/Eg2 oZgIEYqAFIEeFDeh0Ak9RH6UItSiApOIssyI8ixY+hBYfBhOtQ/0ob1AFbEq FjURhWnB+HOQlxwAZhHYkhHrlRrlTuQSH+KYEOwYF+gQ7WcT5mkR5Goa4Lwz yHWXr8M2L1sjN0s9dyt9bzsjP8cdIe5myRGuuGBFblR6jCfW6kASU70/UMQE 63yKy1AtjE4TtmikljmabiY0IFPxCEyoQsyijK0QkhBEKDmF5ul8UepiY7KB ojkglHUakgteyBRqoawwyhZztzTCEfOUbIarUTqZk/lm8A5Ff0TtjEQ3coEP jgRBeBMoYQwYGBNonxTmlhHjkx3vX5QWLhebRJdkRJVlxQFPmvaXdR6r6Wva 33a4itgk0tvB136Xi6m+hd4G4ImV/ld+NjvjfZ2zI/1zY3yo5CQ3xrsgwR+L Z+mTf91sEqmMjPw5bCLw5F+FTfJ1lJzoZJPaojh4PXqSHyMqUDTwpKYoobY4 kY6SixLrihL3FUreW5AgGU9NhCKDSU2uik0ITxSDqPVjVlRlRkQ5gCU1BMCC mZrcmNL0sJIM6f9dJb7kooT95amHqjKO1mQ3HSjsrK8As2CxjbU3FuECSYhK yMoyExEoefTdCfjhjXHtcIkSTCjOIibfHzehOIgST7SBhV4hnanBJpReRaRA GIKVJMYiL4sqRMgiO4uohJhFXEEnm9AFcT6VqNCn6AJPACbXT3dcO9lxebz9 wljbudG2MyPtJwc7rkyMvnx6983spBQ3kYMmK5LfLEteWAKewCtzq6sLa6sL qyvza7AaUpZnp5dmpgAmi9Mv4TdTL95MPZ97+YTYhNK6NOpNyJTcJWVh3ZDK PZ7cuYabM88fzE0+okCJiJKsLU6vLc1gLIImOGF68tFLXEfGk+f3bz68efn2 lbMgkStnRi+cGISVeAITMlBOF/EFgQzFVqS0ritnKbkLGILX8+j2FbwkqoXB xfE6iVDuXj+PF4xJkJSc66XOSbt2nvK7cEGikomx/tND3eN97aM9rWNd7WNd HaOdrcPtzUNtTQOtx/tbjgFM4J7GQ33NR5oPVtcUZaTHBkf62fo6bcevffwC lH75W0ulke7mOtjEw0Y/xNMMf4zw6wVs0nYEZFGtk00GW+rgobZaOWhSPdCy Z7B1T19TBbGJqtJELjnpay7XKDahWIlGQhc81F4x0Fra11wKPOk4lt9xNB9s Mty+Rztuck4GEw08EWACJCFfGjl+UWaT80OHYSIUmHO6WCzWD0pnTpc2mAg2 0UjfEgUmgk0Elfyz2YSsyOaKq8qJp6eTnytxT24CLE1i/ZYXV5UbW5EdDTwp SZdCJxQoEaXW8vpTd4kBlUKQ6VEKhwuEAWuUZoQVpQYXJAfC+UkBeYn+OGbH +WTGeKWEu6ZGuKVHeWREe+YnSalcVP0NrsEiHKt0c6PPsCanP0wUWfCyN6LM MbKnnSFmYNxLeWUaBhEABwQdCFKgTC0R1KCbIqFrPURisgk3gSrK4IuZwadm hp/itZGp+IVCPBiAL6QOADJK2O34lh5Ll6Ur4wo44jV4Wm/ztt0Be9lsJ56i bgM0BvIQ74BZRHQGnELUIwduNjqZbXE23+pioeewa4uLhYGn7XZ/Z7Nwb/vE UM+DFTlHqwsAJq2HKnMTQ6P9naN8nXzsTF13G9oYfgM8sdL7ysdqR4yXQ3qo d0a4e3qYa0a4W1aUZ16cb0lKcGUmWDUK/sFiEyyhfzybaBeeSCfk/bm18NrW mdP1DjZR40lh7HrhibAipLK3JGlvaXJdSRIRSk1hfE1B/IHi5IMlKTjuB6TI eCIHQZL3FyWBWfBKBKHQAPRRmRlRnh4OACxNDanMCAeYlKYElyQH4SZFrGoL pCsrIa4qHxwn9RyQktCKEupKEveVJR+oSMXgQEVafV1u88GijmPlwBasx6j0 G4sxLNSBA5TcpZGs9S4wEQUmyhp2kZelk00EniirSDQIRWSmwQQmeHlS8n/H fpjKRii0oaQVwSa4SQlalKNF9SOCYsgUbSFTThceSClh9EQ4ijgLzhFxk8vj bRfGWidG28+Odpwa7rp2YfzVs3tSvfnKAhWbLK8tLqnYRMIT8uramxU50Uvy yvwqeX52ZXaG4iZvpibnXz2jYhPZD9/y8wdkqjEHUwBPnt69IVd2SHEKzABM FqeeEZisF5isgJjmpVp4GVKIU4Ans6+e4GoqNrl1GfQBLgCbKAvhRZSEkITK 1UXchGpSvr8qRW0efHcJFyEGAW5MPrxNDCXnjN2kWnggCe6lahRMUn4aTgaY 4FJ4OsKi8+MDZ0d6Tw12AUxGuluGOptGO9tGO6VsLhh4MtzeNNTeMNh2fKC1 HmAy0HqM2CQtJijcx5p+seNXotSkxVr/XWziZrU10M00N8kf/0cO78lsPVzy LjYZat0rWWYTipv0N1cSmxCS9DeXq/w2jJDFmMBktLt2rKdusK0cbDLQWj7Y VgEPAGSay8e7arXrTc7J5STaeKKMmJAFmBCbkE/17OWcLhaL9X6JEIlOq/Ak X0fcpDpvHU+IUAhGCB+qyGCTnAQZT+KlghGyhCcUBInVGTFRTooULwXpxIvz 1UGTyPKsKFqFVuZEY+WD3+205iTEKEgNouQuwhABHXSC8i5YrpIIEdEW+mi9 FOenBhWnBVPevlxZrCoxpvnitJDClECp+liuqgbdJIQ64S8RZWeBPijZCX96 YAxwU6qLlKmEgIWK9ymqIpiFTvC0Nsbi38PKyMPKGCzgZmGIASCFmAVjzMCg A6kBl7rgXcRZBFAoW3Upk8dErEQUvFCdCwELBVw0MsdwQSn4YvCluf4XuBc3 pcIWuZRegAlFTPDlUBkLRU+kMJDZRvoycZr9rm9tdnxtYfSFmcHn9qabgCew rckmmx2bXC2NwSPVBSnH64pbDlYUpkYmhHjEBriATXxtdtpv22S+9Usr/a8D 7HbF+TglBwJM3NLCXIEn2VGe+fF+WCRXZUWWZYaXvV39XSp/j0TrMPGt11l7 8h420WjhpQEgctsuaSBCGOpARsxbbFKQoHC8ymo2qdGZvqXLhCQqKlGTyFuT 6vladdxEZZlNlEAEKpHwpCBeJ0Cpk7vUluMmNaCVzMiy1JDipMCipMBimVAK kwOB83JLhHCRZkmoIhLh6PMBjTdTDkVJRUnVhXFgloZ9+Z31FVQUTBUrog6F oio6W3K9q/uWsnJE2W5LWdUuCvaVeAILHiFwIPoYaK3radyDNSSQCuwA4hCF 6krTJBaZxC8YYAYXpGuKyyqRRFAJmcpVCHyIYvBuXDnRAl8ea6WcLqo3OTXc efX8GNhkEWyiroVfktmErCYUCUxWpEQvKddLCqDIXnszvzY/tzo/Ldhk7uWT qWcP4GmQyIuHs5OP5l4+ht+8fgrPqavXyS8e3KLyk+f3pUqT2RcPl2deUNxE g01UYIIBnn1lDqgi5XfNToJlcM3XT+5QZtf9GxcpRCK6aUlV9jcuKFtpEapQ FhYZ51DsBhfBKwF0UKk+xXeoFZhUGnND6tNFzcQIUignjcCEkITac50e6gab nOjvAJ6M9baNdrXJeNKqclfLaFfzSCcRSv1Q+/GWQzV1JVnpscEhnhYUNMHv Pel3u42+yOkCmHjKVEIGtgS47sxO8MV/kIOV6fjJB6rjh0pH3KS1jupNehsr 5WNF9/FSyunqaSgBmwy0VAy2VuIoMIT6cZGJRzT6dHU1FHTW5/U2SeXwo13V o7i3fQ/ARLtP19n+w4JNlHETHQXyo/WXRo9dHDkKJKGcLoDJeGfNWEf1z73w YbFYv2jVFmfIzqwrgbP2lmbtLcmqLcqogwszagvS4br8tLq8tDp5LDutJh8G pKSqZ9LlGWmyOi/1XY1YdX4u/YM9lJS5N4oPuiPFgkdzVZkdVZ4V+S6rFqsZ YRJcrHeyjdBYvqoXVKorV+So2EdpuhSsTieT5+VutHnJAcEeu7HatzHZgL9H SeEuWfE+mAT4EBblJvmnx3hS2lhcsEOUv024j2WolznwxM95B+CFTK3G/BxV 9nWAd5ApWiEHLGATT+sdMFAF8AJaobQrkX+lDLWAUKSj6TeECYQnAlJE72Ia 4ATrbV9TxT2lb4m4CWWL0QzFZURgRWnRyljU42PsbC7V3VCrZ8pww4vBsxOX gVnwvFQWWpgScWxPwaHynMxo/xg/x7gA50hvOz/HnU67N5vpf2Zu8JmHtX6k j1VCsCPez5RINyBhYphzWrQHbsaHONJ7Ts2QRURM9AorVdeGY15kZxGxEsPK S+Vo+jEQK2csm5XJYHsKYrHI31uSVJ0fVy235MWxKhcgAGCJxbhWrukQ82Rx V52cVQUrT1NdSk0QgkEo4qBtnVEVnWcqr7YedqH8LtniHMIWDdMXpcqUy1G1 GhCdDZRRSI3/ueI3AP23Us7o7H6mvCkuRTGXvaXJh/dkHt+b13q4BIs3rPax jKcScmm5LhezXDrRBlO/YpAIEIbgBQNROUJWFuDTjOgkJspMMEOV76KEhDpo gRTAJqASHCmoIQIihCQUFlFWnWhYSTrKIAulcinBRKMQnlK/zg83TAzWTww2 TAzhiZrPDLecGGgeH2ibONH/6O612ddPVtRssrK6uLzyRsNra8vk1bUlMk5b W1laW3qz9maW8GTh9XNik1dPpFQu4AmldeG4NDO5PPtycfqFulIe8/ef3P3u 6b2bLx/fnXnxCJNyJpjUnmsOFAOWkdtzEZIARkSfLnh54bVUk/LqCQw2oQAK SIcgAgZoPL17nVgD89SmmMgCwIIj+EVK0JK7cuF8ytHCmS8fqcBE3VJMKoqX L/UdGAqXxclU3gJUwTVxHerTNTHWf2a4h3iEjDEZeEIzEqf0tI72to73t8Ej Pc397Ud7Ww83HKysKkqLDfXwsdvmZaVPGOKhLoF3M9sMS0ETK30fG0M/O2N/ +23e9kZB7rvAJvjvUF+X2360DNhLwEvfccEm/S01fc0g4qqexsruhoqu4+Uw xpjBPNzfUi080Foz2A4GqYGHOyUe6Wspl4tQSuGeppKuxsKO43ntR3K7jhb0 NZQMtVSMtu852V0nCtgpFwtWxT4GDgsqWS8tketNqD3Xmd6DUgNhDPoOEJLg aqASaiCMiw+3Vv7cCx8Wi/WLVm1JOrmuNAPeWyK5tiitrmi9K1ddfmpdXkqd Om6i08pcr/c0XP0xbKJxF+GDxslv48kPs4ngCKKSt9nkrToUsbh6i020wERp WqHRgo2WvlgYY2lNxe8YZMZ5CzCh5TFWy/L7EyN32Q3HXfkpgQAW2hMEa/KM WC8q1cdKOz7IIS7QXm6SbB3maRnibh7kujvIxRwOdDYLdDYPcFKZcqtgDHzs TGAMQCswJnGkaIsUf7FTdScTYRoXyy0i5EHhD+riRaUr1PJL9CIWNS/KRC+l dQIL5YZJVuzhIloBYIZiK9QxINDNFG9CZkwAReXSI33jA11SwjyTQtzxDjiY btyx8Xemm//gZrk1wtsSbAIqAeWFeVtIvQvki1BtC75M8B3+6Ef6WYvCfFyZ +jznpwTJ5ELffXzrw0WwTP1DGyU7WpCL+LGRIUW9dYvMp2LRjiNAg2CkIjuS 0BVjghdtE5hoWhebKDlC+P8zNhHcpIQUJUpoVOVovBJltY44TWdbZu1kNq32 aPTOR6i/XxK54LlALgcq0ghbepuqRRdWLOnpw2cKvlAJiTanaBS5YIATqMhd lIEou/ti9djdUEV5aAATStNSBkTIVCOvbREu0c4BIxOPKMtSqCaFrnl++Pi5 wfqz/fVnB3BvI9jk9HDbqeHOi6eHnty/MTf1TBU3WX2zsrqOJEvLC2TdbLK8 uLa4ziZvpp4DPaafPwR3EJLQFicYLLx+BuNewIvcYfgh8OTZ/VsvHn6Pk0El mKe7Zl4+pnJ4Zd9gyvJakwllcXYSJ+A0Oa7xPYDi6V0JSaTakFuXH926Aj++ fVVAypM71+/I9SC3Lp0hU4cuaX+T6xeo4EUiFPkhVKevjubcBJLQziY4jTZA gQE1UrfhG6q+xNfOjV84MQgwoViJ0icHOmHMwzSW4KW/fayvdbCzAe5rOwI2 OX6gorIwNSnK19d+OwBEA0/czbfAGmzi57g92GN3doIffowpaIKfrqH2ffi5 ohQ+fPfBKaCVwTbgcA1MJAIk0aYSOgFnSie37SH3t1b2t1b0NJV2N5Z0Hi+E O+oLOo7ng016G4r7G0sJTMY7a6j3r042OT+k2ZuL9jQRwCJ6CJ8bUFXBi51N CFJw5Z974cNisX7REmxSW5JWU5xWW5QqWx6ouCOlLl8yBnJLLsl7i9LIdIIa TFQlIWIdpawXflckRZtNNO7VKAfQKBP4kWxCLbzIb7OJCkyoroR63oq2t7Ts edc1xefG4sNwGI8FZcQG2WPNjyW3l71RuI8lZii5hTYfVGCXqrCF6vGpwRd9 qk8zMAZ4zXLOWHB+UmBuQkB2nF9WrC+W6InBbuSEIHdyuKdtqLtVsKsFkQtt UklHX/udMGiFUMXHYRtVvoidX5Ql+VjSC2YBy4i9UUQ5vJJTVJs5qndOoSiJ klBoDCShDmNSzcuODSJzjArnASYYUKSGCvOBGDGBdpHe9lkxgTlxwYnB7tG+ DnEBzrCP/XbbHV/v1vvUyvgLdyu9EPfdsQF24I74EMcofxvAIBgHF8TFKRhE LZrpWQgY8dXhy/dz3hHgujPE0wzYkhjmkhzhlhpF2OKbk+hPOCnSvQSVrO+3 KC+tKZKijIaIiAlBhwaA0L0aXo+VKFFFC0x+UtxEd/aXrof/eDZREsr669eF IRpXritJgmmGBuJ8De4QwRTtL0odt4pS/q+hXwKKYJbqvxV9p/AoPN2+shS5 pCWncX8BsKXreCVlYdHWhyLyQj2BlW3E4OtnuzGJe0UNu3I/RDx2tOsgZWpR 0IQycEQ0hICIoEbbIqFLJIkpAy6CU8SkMvVLOn+wfmJIipucG8QJjWeHW8+N dZ4b770yMfr80S2wwCo1EJbYRBU6ISpZXJp/szgHGNEAEw02WZ59vTg9CQAB aAA9KKcLbEJWF6GoLJ8gIQyOAJbF6Rewqo5eZpP1PU3kSpNlRS38/NSzqRcP J+VAydO710EW3189R7XtlK8l+gMLUy9fOoo9GelMqeREnQAmkrXIgB3y7Stn RfdgUagilcbLbHL17BixCWHI6aFuskAS3IWbxCYynkhs0td2rL+9XskmKTH+ /o4m3tYGMBEKQYoGm/jaGgFP/Jx2gE2y4n32FMQe35vXfrSMdsDBzxWRNX4G MMaMijhaa8AgAk/ezyb9rVV9LZV9LRXUtkvGk+KuhiK4u7Gop7loqLViuLVy pK1qrKOawETsS6LBJhcUbCJgRCIRda4XgcnpngPUQxhXoJIT5Q6MP/fCh8Vi /aJVV5oK15akwDXFyTVFcFJtUXItjoVJtQVJNQWJdfmSMcZMXWFyXVHy3qKU vcWS6QTJ+YnV+QmS89Y/nn27ElZHNbHuLbbf3jyCCEIZeVHgyU9gEyzv3wIT +RNyETERdAATEaj3CpRXPlk6rB00gfFALG7xJ4ZiAb5O26MDbEX6kPjSBKRo 0Jm6AiJc3sEwTFUXo0obo8yxaLLYpLI4FY4i05aUOXGBGVG+qeFeyaEeIJf4 QJcoH/twTxtyiJulv+OuAJedWJbDeIWiEp94RAALjpjEyTC4hoIyHlbGlDP2 LoNcqGCfaEUMlMzisHuj6Ogl2IRQAu8bbmKSyM7bbmewq1Wgs4W75TaRmbZr 66fGX39ktOHD7d/81nTL762M/+RivplaDeDLoS+Egj46ewuIzsm0ywy9AIIX 6gBAG1DiIsAcIhfAJqWKAVvALPghUUfBaA1MOX5SvziKj+zJW095ko2fE4qy RYp0L6U1cr1ETpcGmPygf5BNdIZd/nw2eRf7aLAJleFTJf5bZS9aX6kyEKP8 AkVimPg/K8KdEiHKfcy03wd15EWqx9cgKbwYYMvRmuyGffkth4op2kLtsOjD ahEooc5aIqIhNmcniy5blG2lbQIKDSvrTcTVxL1KWlFmgolcr7ODxy4MN1wc ab4wgtfZMjHWTnsvXrsw/uLx9wszLyQ2kb0qp3UJPNFmE7pXYpOlN2uLC8Qm K3NTSzOqrK25l49nJx/BohZejqTcV5eiPCRCAcWAZZZmJlfmXsEYSJGX189o ZxOqOlF161qeXVuaEZubvH7+4NnD20/uXpe2RJR3HhHdscS+h7RFOxWAgA6o GIRu4oh7RSMvatVFhSTAEOppTKbSeAl/5C7E1M4LYwqjiLgJPTWeRTwFPamS UNbLT3pa5GyuehE3aThYWZ6fnBztF+BoAvogPBGEsl4Ib6WPSZwgRU8cpfAu /nxU5kXX1+UCooEnIqeL+raBgkHTA63rYEJBE0roUgZQBKdIkKKOmwy0VYnS +IG2CpXbywfay4bbKsEmMNjkVM9eMAWxiXZm1/nBI2IHE+IR1S7wcjYXkORU 9374ZNe+Uz376FJUb4LBheEjuCzXwrNYrPerrjS5tjSptkRyDSwtGCTXygnw NQXSp7610sZw8bUFItskUZ0knyTOqc4XK5Y45WJD+aHou3avew+bCDzRSAz7 qWzyViqXOr+rTF0KTQhAcQptPJE+ORcPecsCUiJFfhcemxDqhOUxrXKx+I8P cZTZJAJfFH1KjEVUiapAW7x+1ae+lEumyMaXviIR7pFXv1LhP1yVE682dRuQ vCcXbJgIy12XY6gPM23aDmbJivEHs6RFeKeEeSZHuGKxjZdKqVAxgXYw7fCC 1TjYimr2pciC026yn4Opj50J4Qlli2GMAUVklFlklD9GlS9Uqk/RFhqAUyjn SlS7KJO7RCtjOprrf2muv2HHt58YfPGh4ZcfmWz8o+nmT3du/oPRVx/q/+nX hl/+xuir3xh//cH2bz/a8qf/avj1b0z1/gDGAWjgghQ9wYCagxFuKHfVVKax iTSzt/onizbOMsvgZDxWBFxoGxdKFUsOc0mP8siO88lPCsQ3S+rJkBer5laM BY/EiJQtWuS/J4aiDSYaC/X3s4nOE/58NtFO61JSiQaMEI+Q95WlwMroCY3F mcoXoPHF0lPQf3xFC7VodfsvSr1TRVvoxSiQRPXxCM1Q5EUZZ1FGbPEC9pen 4ogXfLAy/Uh1FnyoKuNARaroJAZ4GWrfR2XvFBahyAgxCFWmCIs0MJ05XZT9 JarsRaKXklMEGdEOKaIbmBSgGaq/ONp4Zbztygk8aceFE10Sm5wauH7xxFts sjy/pgiOiOiJRsSE7pLBZJ1NlmclvqD0rYXXT+dfPREmNiE8EWwCA2SITVbn X1NBypuZdVMnYVUhvIwnYJPZV08mn9x9cv/mo9tXVd19b1wAL9CuImLfQ2qc RXgCRlDiCSbBJqIuXqo9uaaqPcHVpAwu2RhL/u4SPQWdQ/OUQoYx1cJT72K6 LO1pIiriQSVSjUlPKxWbDHc1j3Q3j/ZKeIIj2ARuOrwHbJIY6ePnoCOni8bE JsK+jtvwKyUzzpvqTdqOlHbWV1DPOvqpIDaRg3064ibAE7IGpEh4IoOJXHVS TZXvcpOuPeShjkqwyWBL+WBzuSg2ITCh6nXKwhK7KE4MvlUCL4ripc0Wew+C Sk507oXBJqd79ok9TXBZujLwB0/0cy98WCzWL1qVBbFwVWGcygWxtISWLHJR aBe2d3yIqr1c0flBqE7rZBOdJSrakz+JTd52hLJ9k7Jzl8jsUm5oLkVPMsOU dKPBOCKoAeck+mGFTx/O44ilfnqMJ6WH0eoIby/G8se862XCYk2lWD5FUtMw wM7bhS0xZEU3s1jRk1n0Xhb7wpAJWKTOZup9LYFF4mNn4jIqeMmK98ELTov2 oGoXrLqjfR0ive2UqWIwboa4WdJMoLMZyIXCK2RQjLCgFaqCIWxxt9YXhfCq PslWWymvTIADkMFq+xe79b7Yuekzvc8//OZ3/2XLp/9k/NXHsOmWPxpt+HDr Z/9o8OWvTTZ9vGPjbw03/HrTZ/956xe/2rbxo90Gnwg8odoZjYbGeAq6vgAT cAd1RaPCfIq5UNNjyjFTohNeFS6uTBKTIGvn11Lsxlra6cbfaUeI++5wL4uU cNfMGO+8RP/itJDSjLeQFjxbKe2KEqMzjKKCFC0w+alsov1pwJ+Z0yWoSvm/ XhkuUbKJEkkEmGiQizhNiSfvCqngCgAHcR36GgnnqUxeI3yjHTNSMovGu6pk GbnsKJJghzbrpF8F+F+D/5h7CmJxKXoxDfvyASztR8uo6oQ2VaSQitiWkYrr aat3DQt+UXYAU7KJKL0Xu8OLvVGkTl9jTZfHm4lNLp/svHiyW8RNVDldy/PA k9WluTU5RKLM4NIJJhKbAEwW5qVt4qVN4YEnr0EZ4AvgxhLgYurZ4vRzqZvW 9HMqMCEwIVNm19zLJzgfYLK2MIUjHk4bLJJVYEKWq+BBK9OTj54/+v7xve8e UoGJnHYlsAIoQahCWV6qndkV4RJABDUZVvUQvnKOoENVdaKGDpqhopKbl9SB lRsX6By5qZdUioKnw0XwLBpxE0riokAJeAQmPJHq4vvbTgxIaV0YAEwGOo61 HqutKEhJjvbzc9ihZBPCEzFW2tveGGySFe8r2AQ/VNQ1mn5a8B0HqvQ111C+ lka9iTabEJ70t0gJXcq4ibqZMAYUPSnvay0Bm4AagA9jHdVUbwIkoT3cYdow kTjl3MBhnb25cKRULoDJeEfdWHvtiU7psbgmYKSvoaSnvqj7WGHbwZzWA9k/ 98KHxWL9olWQEVyYGVKUGVqcFVqShT++kmukjRLIsdX4Q5wfW5sXQ2Nlk1K5 T2mcvN1brHK7t5pCHe1P15dPKsfD7+ropSQR9f4RkqUxZghPcqJVqebZ6lZa mg21ItVWZV6pdruQ8aSc2CRzvXuwaDek7Dik2vpEUUSvDJ3QTbHtI46Zsd74 +0KLXh/HbdEBtnnJAfQ5rdzTKU4dHIlUltuLnDeCFzlrRfQ3jlBAkJTTRWxS nZ9I+85U5yWpd37BQNr8hXaEIYNQQCLlWRKzUBiFyKU8J1q5SSWxkroGfL3o WxpkSvljxakR+Ykh2bEB6ZHeyaEesf5OMLAl3NMGhAI8CXIxExEWpYlWaABU obG7jQGVqFM7Mj/nHZRaRs2Waf8XYAJQwkzvC5ONn2797IPNn/x699bP3SwM ATuuFnqWRl9ItfBb/uC0e6OPvbGXrSE4wtzos51bfw82EXliFsafiw1cxEaT VOoiblJfMqIP0feYujcLdKIMNxypuJ5eHt2Lb7SELabfOO761s7kK5vtX9ru 2ICjheFnlkafWxn/CTfxIj1tDAKcTcAsiSFOqRFuWbEys6SHUpaXsEgDww/q 2/lI7ww+KlfX72GT9xDND7KJiPVodxWjTUy0uUA7YgIrmYWM5f2PZxPtwhbl +SITjKpyNDoJiECMqFuh3DDxe0bU8lCAhj5JEFcWvRHo/4iofJHRXlVKhv84 9F/4QEXakeosuZy5bKC1TrnjiYYFmyhDJ8qtG0X+GCHJGfWWKAQyV0+CSlou jbZcHG25dKL94kkpbjJxou/q+TGwyTyxCaxgEw3LeEJs8mZ59S02UePJFLHJ 8uxLIAnwZGXu5SoQY+6lKIFXmuImOHltcWZteW5taRZWJXGpW3JRuETqJAwv ToNN5l4/nXxy95G8Nwp1zSIwEZxCYQ7QBG0ET020KM8KbCLqTZSVJqpuw9cv KGdEXy9cCpCCp3vx4NbU03uz8nYtGEw+vC1Vo1w+i2sCTEAiFKChonhgyEh3 C4GJHC5pwQm468xIN0xs0t9+dLCzvv343srC1PT4oCBnU19bI5gStyi/S4NW VPEUG/0Al52Zcd74QTpak02FUbS/Cf20AFIAv3LPaoEkmn26lDld8IC8OSMV m/Q2V/Q2Sx26qG/wQGtFX0uZ7FKwyUh7FZCESITwBAMcheku+EzvAWV1iQia UNUJ2ARgMtyyZ7CpcqCpvL+xtPd4cdfRAlBJ55H85n2Zh8rjD5TE/twLHxaL 9YtWuPu2SM8dsb5mCQGWycE2qaEO6WFOGeHOOdHuOdGe2VEeuTFe+XG+BfF+ BckBxbSXR2pQWQbWVFiQh9Nm05VSLXDUnnzV/m7UoWg9lx4LrazIKrkoY09u rLLmV1o2qIBFvabCzberYivkNXNVtmpPargaK/OcGI0dq2k/OMlZ4XtyIqtz 8RBpjCPGGNCYjHFFZpiaLFSRFGqmpKyaV5bPU8UKBhQlwfk4mWgFXxe+FhxL 0sPSoj2wzKaChWCP3fEhjrlJ/krSEX5Pw2RlG1tYuY+kRjtl7R6tP7IZmujA rLyOzhejRDZhijFpODvBNyPWKzXKPTHMWQq4BNhG+llH+dvAIlsM4BboZooB GTeJTcjUQpkG3g7GUr2JrYmXjYmv/a4QN+v4QJeMKN+cuMCyzMiUcHfgibnB Z1jzUy08HkX9hylPjEAD3wWx0wplkVH4Q3QGo0oTJa0oc7rEyZTTRVEYurK4 Gs2LHgLKlgJ0jniU2ESGTDvI0JPileNLDvUyx/uG91Auww8pTA2i3XPws1eG Hxj80OKHOf/tfRXpkwFdpSXKjCbtBlm0iiaIUCKJsuJD3BSnCS5Qhj+UURsN XqAHiniHkkqUfg+Y/GCTsXflnmnzlM441LtA713W3nZTmX1K1u6tQQVKJZnh OBnvQ31dDn0qLtc178URS1Daw3G06+ClkeYrY63ky6Mt5AtDjfDF4Sbci5s4 0gDnXB2Xtl+8eqLz8njHhbG208PN184PPH90eXnh8dra67XVl8tvnq6szq/K W8Or9zRZJC+vLdBNHGm/eGmLE5EJ9mZ2ZX56afb1ytzU6tzU2uzU6szr5elX i68n37x6IVeXPKI6FGnLeCzvXz6eef10dur5/MzLhbnXi2+mlxfnVpbwFKrd HlfkjVTIEjHJpfqri9KzLExNTj1//OLhbcDCiwc35S3abzy9ex2m/dxpq8Q7 1yZoQ0Yqgae9ETHGJOVxSX261CESZQk8dRV+dk/qKkzbnUw/uz8v79KyoN7z Ec+IeTwQ1weSnBvtA4D0tdY3HqwBlYBBhjqbVP2E+zvGBzqoq7DEJkNdZwY7 T/S2wid7m0/0NA21HW3cW1qaHhPrZ0foQWDismujs+m3GhETSvTystQLd9td nBRYlx9/rDKz7UDRQGP1ye7Dp3qOUMsF/HjQD8xgu9QWWN16q6q/Rdp7caCp or+hnDygNgBBeKCxAu6XJ4eaq2CaxEzf8TKMARSjbTUgC0rKwoAStEZaq3HX WHutVELSvZ+KSqiuBDMwnY/T6GrdR4tb9+c21ma2H8zHGDN4OE7AQwAvGGPm 5174sFisX7TC3Y3D3IxDXY1CXTHYHuFhEuVlGu1lBkd6mEW4747yNI/xtsAx zt86McguOcQhFfAS6ZYd45kd44FjbpxXfoJPQaJvYZJfcUpAaVpQcXJgcUpQ SWpwSYrKpWkhFTI4VGVF7gFl5Mh8IbdXpegDVvtUMowFmIposKCSN7CjOmI8 EPSBx1bnRNfkxtRKG9jJbJIjs0k2bQaHcyIBHdquk6I/MQQsMMGLosB8PWlK Z9m7vDgMJyQhVKFHUTiD0nJKM8JzE/ywGseKmj5px2o8KdylIDXon80mhCdv 77cSqeyirLHXxnuu+R6/n2Le8QojdPmthsy0PMOqDCvtnES/zDhvYAvVuVCF C94r2tUFhBLguhNj4hdR6oLleqCzBbVHDvOwSQpxz08MqcyOqytKKkkPd9q9 2c7kaw9rfT/H7RHelrgC7b9MVSTuNvq4CYtWybSLiigeITwRW08qaUVJKGJj SgEsGmPRDFlsfE/ZYiI3TJlXJpobK8/BmKryabNLoiSpiZnR53YmX7labKEv MCHYMTXCLT3KMzPGKzvONy8xoDAluDgNP42qHw8J4bWIQ4QM6JurzKci1qAi Cw0ioGAKqEE0KKYraCOMRuBGZ8KYMoPrPf7XZpMarUjKuyDlB9lEo8WHsuWg /J/3rW09CefVxBdN6ZSUPym+a/RuA1sOVqZ3Hi7tra8caKgeaq4dbd033n7g ROfBc/31EwPHz/YdO9N79HTPERgDQhUcLww1nR9qmhhunhhpnhhvv3p+4OGd c7Ov76wuvyA8WVqZVSCJvDW8RCvSYGllThgzS2+mlxaml9/MrC7OrOK4MA1w WFuQ6+KnXi68fD734imZKuLBJvOvnixghT/1TConWXi9/GZqZXEW6CFhzuri 2urSinozeiWbqAhIYpM54M/cq+evnz16KW9BAlPjX5lTbhGhEKQ8vHmZdl2k ChTaFB5gQtXuym1QaCcU2u1dabo+5uWtT6TtTl4+whPdfHpXQqG718/jaqAe UMnx/XtKc1LTYsNcbXYHezkXZyU3H67rajyMu8AmJwY7KctLaizc3356oANg Mt7TAjAZ727sbz50dE9BcWpUrK8dFb8r2UTsC6+0t5U+2KQoMaAuL66+Kqv9 YLGSTUCvchV8XV9zTX+rjCTCLZXSvvDHy3rrS3GU6KOxYggAIlubTUAHhBsw EQqsgho8sLkKhAKUIPTAAFSC82mSqERZ8E7GvXgsXgDcdaSo41ABwASXlTO7 pEdNDBy5OFx/aeQ4bRn/cy98WCzWL1pBjluCnfVCXAxCXQzhEBejEGejIEeD YCejECfjUOftoS47gh23+dkYBDgYBjoZBTsbh7hsC3M3CffYSY702hXlvTta dowPEMYy3t8mMdA+OdhRcohjaqhTerhrXrxPfrxPQYJvQaJfYaJ/UVJAUXJA SVpwaXpIWUYouRwckRVemROhcnaEGFOwQ5iIA4hBFsRB0CEGNXnRdBMDYdzE FcrxdOp9T0RDYMoE01miIsIlIpurMkfFJvTYwpSg9CgPrJCx2sRCF8tOrL2x IC/R2pec/B4wEQldGjijhJT1jC9FSKX8rQ04IjXueg+VvD/s8mMCMeXqJmMa 1f3q86UFm7xOC6OUOVHkQnUu2Qm+ys0oQS7RAbaw3BXZBsYgLsA5K8a/JE1K bCtOC7Pf+a3jLlWuVKSPVbD7LuAM5YNRwhgYhzavhClVjNqRKTsni+wsIgUB FFScIrah1AATQhgNflEW9RP+ULG/mKFomih1ocwx7e7N61CzeyOMr9HB9Fv7 nd8AxOScsQ0YYNLNUs/H3tjfySTI1RQ/aXjH4kMcgX7pIJcEP7yleHuLwNRy 2pJ29wmapLQlZR26YJka9Q7y2uUb2gt17biJdgDlXdDx48HkJ7GJNp7oTF37 qWyigSfVim6E5euNzSNFIJI4BZOifk3RGzBE/I9QhiNL00LK0sIqMyP2ZEfV 5MbW5cfvK0w4UJx8uCwVS9bWfYW9xypHWrF0PAw8IZ/tq58YbDw/3Exxkyvn +p4+uPhm9sHayuTa8ovlhScry9PLyzNLS9NLyzMrq3PSVuxrC6tr86vStuzy zuxr85hfAcIsz6ySl6SdR1SWk7hWZl4uTj2fn3w8/ezB68d3p57dn37+YHby 0ZupZ1KiF05bnFbt+S43Ll5bk7Z9fCeb4AQ5OgM2eTP9EmDy4tE92lxeiScw BU0IT6QtF+U0LbGnCY5Sl63vLj6+fVXeZvF7cQW16ToUjpH2N4Eff79+TQl5 bl2WCudvXr52bvziyaHxvnZgSE5yjLeTtd5Xn/7ff/Nv/+nv/8Z821agypHa 8qHOptMjPTDleklthPvbT/a1jXU3j3Q2Akzgnob9B8tyilIidbKJm9lmaiMs LJ1gbRDmuqswwR9scnxPNtikv2GPYBN5W5O9ABM5p6tCTtCS3Acwkdmk93gp sclAQzmQZLi5algdHNFmEyWYiHniGiWegCwwAJjQmRhT6ETbdJqgHhzHO+rO 9B6kvC9pj/iR41fGGq+ON10ebcD45174sFisX7TcTD913/WZh9mfvMy/9LH8 ytfqGz/rbwNtt0q22xpkpxdkZxBkbxBsbxjk+JaD5WOoy7ZQF2PZYgCi2RHq YhLmYhLuujPCzTTCfVek+64oj91RnmbRnmYx3hax3hZxPpZxvlbJwfbp4c6Z kW4ZES5pYc4ZEa45MZ4lKQGyA0tT4aCyNDi4KhtIEkauyAwl003cRd6TAzyJ ENlchCSCTWggEroky4EPRdQm+l3l8zK2RFLoRK5YkSIpVbkxZZnSgLClIDkQ bIKlJi1HMUgMc8b6UODDj0EGjf3uybSSUeKJIBc1DvwwhvwYNtGJJz/idapc IhXvaOKJzvjOu/LERCdnLK1zEv0ALNlxQemRfglB7tG+TmCTjCjfwuSw3PiA 1AgPS6MvnM02e9sZhXtZxPjbhnqZB3vsBhtSDQtljlFJi5ik5loUkQGtkCm8 QsAiakmUPYc1mnqpCkzU2VwEMqLnGJGIRghGO+wigEW0AqMmYGS8AImkbLd5 2WzztDb2sDJytzJ0szRwszDwsDaCcdPVQt/FTM9p9xanXVtsd34t0tjoOrSB C75kvCcRvlZyD2SXlEi3vGTaaidC7M9OS2uN3lYUOtFuZKELTNaL0LUbcFHk RTCITrh4V1fhH8sm7+7RoYknuiBIJ5vozJHTGS1SsgmVidEbK/43icxJ9WcO 9N8kTF2oEiFCjeslbynrEWelS1OJWSKrc6Jr82LrCuKPlKfVV2U21OQ07y1o O1jScbS8s76yt3Xf2bG2R3cnFmbuA0xWVyZXlp5LbAIwWZzCcXVlBsbM6urs msQpsldnV2UwgXHO4sLLN3OTi7Mvludfrrx5vbo4tbbwem3u5dL08/mXj2ee P5iWd2CEZ148BJus4t7lWTWYEJsIAFHmkhGwyF59s7o0t7I4u7wwPffqOcDk yb3bLx5QuERAxA3ahJE4giDizrUJASa0O8mty9LWJMAWOQ5yh66wvnvjzcuq 3lyyqbgeM7iLLiu1FP7u0p2rE2Jnk86GQzUluSHeLls3fPKr//hXf/uX/8vf /Jv/+eNf/T1mynLTuhoPE5us72/S1z7e0zLUfnyg9dhw+7HRzuPdx/cdKMum uInI6fK1NXLdvQlsgiMsCIWq431tDMEmBfEym1Rndxwq6TteBTY53Xt0vOew kk16Giu6G8t6mspVeNJcATbpb1QFPuBB2e+Km4ibxCMU7BBgIjK+BL8IbCFm EbwjzqGML7AM7QgPHjk/eJRCJLQzI8ZAEjJN/twLHxaL9YuWveEH9gYf2Bn8 xt7gQ0fD3zoZ/8552+/dTT5z2/Gp247PZH/uafqln+W3PhbfyP7Wz2oj2d96 U7A94AUIszXEwSDc2QgOczIMdTQKcTCEQx2Nw523hTltwyDITh+YA8aR53Ga Mebl0My2MJftkl23h7vuiHAzSfC3TPS3SgywSgq0Tg6ySQm2TQ22y4xyyYp2 zY5xzY1zz0/wLEj0LkzyKUr2LU7xK0n1K03zL0sPKEsPLM8IkgIisglPlMEU EXyhSXVdvGrPbmW9/LusjqFIj6rOjyNIkatOwsEmGdGetHDF4hDL4PQYT6w6 sG7RGc7Q6bdDDyp8+Elxk/fEYt52hDah/Hio0fniNa6jLhzWfJS8o7fqZOWX TB8aiy+TlmrlmbGFyREynrglBLmmR/rkJQTnJgTEBznZ7vjaw9rA32lHtJ8N TLUt1AxZhF2AJ2AWwhZQiYbBLzDt8yKARVXn4mCsxBZh0ctLhDmUTcZEBhft 0kKpYoQqyvIWYhaqOqFe09RYTERecAXpglLLZSM3C7AJCGWHl80Ob1sTKsDB GDMeVttxl7vlNm97YwoYUVyG8taU/ZkpnYxeOc7E14s3JMzbQt66xSEl0j0r 3gfYotrrE9iuZhaNIneNpTh9K8ViXskmGsljGlsuarTP0gATnblh72KTamXH MIV14Mm/HJuIR2m9IVEiaKKOpKg2gqTQYXGGqhRF+dOu3F8JVF6YGEAuSPAX zo31yYvzzY/3wxhHjHNivDEuTg4Cs5RnhJdnRZXJLs2NrS1PbzhS1td5+OR4 x9XLo/e+n5h9/Whp4eXq0tTa8vTa8tTaCghlem1lBkiytjYrH1WQsro6s7Iy vbz4amlhcnl+cvXNqzV61CLYZHJp+tnCq8dzkw/nJh+8xSbzr9bL21eokGRB BhApbiJKXd5ik5V5gMnSwvSb2dfTL548e3Dn0R1VUIMwRLTqEtUiUhMt9baM orEwNQ3G5P0bF1/ImVogGsKNu9fPY55ARtrKRN7HRLUno9yeC9d8fv872u0R 8zgBlzrR33Ggqjg9LtzKxOAf/9NfA0z+n7/9P//Tv/s/cLTdZVySndLddGSs r32sXyo8Ge1pHeluGelqGu1qApj0NR8ZbD0CPOmq33uwLAdsEu1jQxvBE5uA R0AlLrs2wsQmopmwj8wm2nETYhPK6epvqe1tqu5pqgCYkIlN+poq1ktLZDB5 T72JGAg26TlW0nWkqPtosSg8EcaZuBcWhSriIkqEoTgLBUoAJho8grGGf+6F D4vF+kXLwfADR6MPnYw/gh2NPrLX/9B262+sN/8attP70MHgt/b6H9npYf5j O4OPbPU+tNP/yMHoY3tDyY7Gv3fZ8YnLjj+6mnzqsetzL7MvvM2/9Dbf4GP+ ja8F/K2/1aZAmy1BtlvJwUAYe70Qe/1QB4MwR0M4yEEvwG6Lv+2WQHu9YEeD IAf9ALutvtYbfa03+dlsxl2YxyTuCnY1CnEzCnXfFu65I9LbJMrHNNp3V1KI dUqoTUqYbVqEXUakQ2aUY2a0U26cd168T0Gin5QzlhpUmhYMTilM8i9OCaQx BU0w0OgATPUm70CSCEEugmVkNomkLR1xzI7zSQp1xsoQy0KsErH2y4j1wpoE y6H3Rh90s4lY3mOFI9JC/tn1Ju+FoHUO0llF8lOuGaG2iOyEiw+QxTpN8bwR 8i6TqriJZt9mGU+KUiLzEkLBJonB7vGBLjAIJTPGJ9rPzsF0o6eNoZTR5GMF NgGPJIW7ZOK7nxwAU5JYWrQHpYolhjnTfi6xQfa0gQuxCYVUACaYgZV7u9A+ JkrTmQJeBLAIkBEdxkSoRcALmYIsFDERAyqZFy2LRe2J0y49p136jqZ6Dju3 2ptssduxGXYxM4SJWUAlZG+HbaKyRtTgU26b2M+FIj5kkXKGMe4S9TIi0wxX C/E0j/C1igt2xFuKbw2+fUo0UKZsvavkRAM9iE10FqRogMm/CJvowBNdaWM/ lU008ETJJtphR/V/lkhlGFQJL6JeXr2Vp/w/IiUYxCFclBQIg00EnhChwOAX urcwKTA/KSgvMTA3MbAgI6IgMzI/M7IgO7q4ILGyLL12T07dnryDe0uOH6lu a9rf13X8xEjH+bODjx9cnZq8Oz/9aGn+2eryq7W1adkzkldfryxOLs09xb2z rx8szj5Znnu6Mvt0eebJ4tSj+Zf3Z57fmXomgcn8qyeL089X5l6uyZ24Vhen V6V+XPMSnkgMQts76mCT1eW51aW55Tczb2ZfzUw+ffHoHtjk+X3JqljGzUv3 rl+4c22C9nanhl0AENr3RINNQBb3v7tINSb0cErTom0cNdgEpg1NqDReTvGS nu7x7au4ZuvRfUWZSd5O1l/98cN/+Ou/hH/9D39Lg60bPslOim46VNvf0TDU 3Uw9uwY7Goc7GsEmQ+3HB9vqh9qOwhKblOfkJ4ZFelpSiETaXdHOmAIlIm4i lcCrt4b3sTbQrjc50XUIeEKF8MQmfc01fS20yXuliJuATQbeZpP31JvojJt0 HCqABZ4QdFDQBJMgF4EnFCI51b2fatupYRfdpLgJJXGBUEAlV8YaNfCE601Y LNYPysngN44Gv3bQ+yf7rf/ooIfBb2AXo48dACZ6HzobfOyk/1uHrR/CTka/ A6qQASk2W35ju/UDkAtuOhp+TBRjb/ARxrZbMfk7J6M/uGz7xG3HZ56mX3ib feWx808wxrDXri+9d2/wMftKwhCrb32tNso8orK3xTc+lt9i4GezScaTrUAY gEmwq2GQi0Ggs36Ak16A41Z/x624iUncFeaxLcJzu8wsO8PcTCM8zaJ9LGP9 rOP8bRKD7FNCndIjXGGphD/aA/BC5FKYEiSRRVoIjkWpwdSGqywjvCxDc5tF ETEhKqEgCxY/FdmR1MgLl0qLdI/ytZZ38fsaC7wwbwssj8U+JuW5ulf4UgNk 2SJ9S7CJSLUqVy5pBIkQvNBp6jPfVaJersURGhlidKbOuhidQRmdT6Qd9CmX ehYpn0L1VYgkFvVGk+sxFGWQSPpMPiehODUqMzogKcQDVAI2iQtwjvK1C3A2 td62wcV8a7DbLqoTjw20T4l0wxqPKinwWIwpQENLPnp2apokcsaw8AZCwoQt 0QG2WJCLOAvIhWIrsIi2UG6YKNin/DGRPIYB9R+mChcBLNQemfasV/YlJprA UTT1Iq6R2MFUz9EUbKLvsBN4oiduytajSbKNiSptTMIN880irYueQuSqwaJF M91FfcxEowBCFdFVDIgkQj8OuyWQoSoeEJwccLEH7iVHuBVnKBtQa/YE0yhp 0bayUZiSTd6T5fUWv8jdyFWdyXWBSU2hmk20yuHfVW/yLjjSSSjazbuob4DI llRmdilruxThxUhRbIIfzpLUkBIZTyTokKMngBG6SQGUnBhvmGgFg+xor6xo LwB7ZizsmxTlFR/hER/pkRznn5YcAicnBOZlxORnxuJYmB1fkpdUnJtYkBVX mBNfXphaXZa1rzr/+KHKjub9PW2HT4x1XpgYuvXd2edPvpuberC08Gx5aRJs sjD1cOHVg7nJe/Dsi7vScVICkzfTz5ZmXizPTkppXUszSwuvF+dfSaX0S3Or K/OCTVbVlfhqNlmkPl04gk1mXz57+eTB47u3XsgFJsATuexdZhO58h1kQfEO Ed24cmaU+nRdPDmEsbTf4pWz97+7pMrgUuy3iIcIJBE9hGUwuTH58Nak+hlx E+xzdqT34J6SgvQEG1MjIMl//rv/i4Imf/W//49//1f/5pMP/ktiROCxvZUD HY1gk6HOJtrlZFxyC/BkpLNxpKN+sPUI2ORAWXZ2bFCYu7nLro0gEQCIv/02 ipJQ9ISCJt7WBgATYIu3zCYafbpGOw6MdarAhArhNWrhJUiR2aSvoYxCIYNy sclIy54RGS5ECpZ23EQVNKmXwiIEIGTclOpW5Np2Cql0HCokcsGjqJaE8EQk cQE3ACCEJFRaooqbyGyipBIClp974cNisX7Rstn4T/ZbPoBtN/1aGuh/BOJw NP6dveFv7Qw+ssPR6GNbw99a639op/ehHEP5kKIqsOXGfwSJ0CQGLtv+4Gz8 ewzs9EArv7fXlyAFxk3rzR/giBmatNnyIc07GP7eTv9jR1DM9k+dt33iZPxH HF13fOZm8rk7WAYgs+tLr90bgDaB1t/CQTYbg203hdpvgcMctgZYfSNuhtht pslwh21h9sYwBhGO2+lmjKtptMtOHOFYt13xHmYJnuaJ3taJPtbJfrbpQY7Z Ya65Ee5wfpRnQbRXUaxPaYJ/RXJQVWpIdXpYWXoIuSIzTFl0j5uYLE4JzE/w TQ5x9LE1sDL+wtlsS7C7WXywU0FqEJCkqjCuPC+6LDeqOCeiKCu8MCsMLsoO l1olS53KVFuxUAewt/dhUZXeV2SEy+2RI2HqlgyL/slKV2VGkCszpEepDKrK fidc/CBx4GVruyQ3SttluoIpyv1i1Elo7+Qg7W5mxakRcE5cYFKIe6y/U4SX bZCLeaS3XbCrhcPOzfYmm3ztd4Z5WKeGe8k14L7gETzF+6NI2jvaULxGNBYT 5JIc7pkU5pEQ4hYX5BIb6Bzt7xjl5xDhYxfmZRPiYRXkZhHoah7gYoYjcIa6 IisjMkQuuEkRGTqHkseUBS+wYAdRHS81QLYwdLc0oqOwi5m+066tsPNuPVdz A9zEwNr4W5ttG+1NttibSO+Jo+kWTDqYblRb2n5FZXWRC9XjEyVpJK3Ra1Du REncRLEVkS1mY7KB+omBXzCJk/HFhvtYAljk6FVgfkpQQWpwIcA/PVSu+A4T BfhK+lDWpND6X/StolCLsspeo5Wxsh1ZtXrjErE1ifIuDDTq3N+FGFXv2KHy XQlp4uH04UC5rsZ378rhLFc05RNth4vlT0s0XJAcSM5PCshN8IMxwI9oVrwP 3m2B2HByhGtSuEt8iCPgkdp345sS4Wcd7mcdGWAbF+oUH+aaEO6WHOWZGuOT GuMLp8X6Z8QFZSWG5CaHF2bGZSdHJEcHJEX556REVham7a/KbzhY2dGwb7Cz /vRwx5WzQ99fPf3w1oUXj2+9fPr96+d3514/Wpp7vvrm5crC5NrSaxwXZ59h BuM1KXNsenVpVoqkrKpqTCQqwYBiK8vz87OvXjx98PTRXRwn7998/fDWwosH iy8f4Tj16PbzO9de3L0OY/Dk1uWHNy7cvzZx7+q57y+duQ1mAZJcPH3v6sSj 7y49+/7a8zs3Ju/dnH58d/bpfXjmyb2pR3ee3//uxYObcgWKFE+h6hXq30Wl 9yAUqrK/eGqor7W++XBdVKDXhj988Kv/+Ff/8Nd/+Xf/9n/9d//b/0Djj3/1 99FB3kfrKgY6GymnS0ro6m4Z62kFmAy21fc0HhpoOQw2aT9SAzbJSwgNcdlF G5rQzibEJqASCppQpYlqa3hLvVAX06LEwNq8OMEmJzoPnuyRtt0c7To41L4P Fpwy3LF3tAvj2t6myt7G8sFmCUD6Gkp6jxf3Hy8Zaiofaakc76wZaavCJG19 2HW0AO48kg/TniM4th7IbqhJa96X2bI/C24/lIv5/gZVgQkIpe+45O6jpe0H i9oPFncflcgFhHK65wCRiDJ9S+lLo40XtXxprAn+uRc+LBbrFy2j3//ttj/+ ++2f/AfjP/wdxsaf/Pttn/4Hs2//q/nGX1ls+kfzTf9oJtt88z8BRmy2/Aa2 2qQaE57QGERD8CKHUX5PdjD4nTDRCniEDDaRgEX/YxugimzrLR9abf4AA1uc gDNl2xv8juy6/Y9uOz6B3U0+9dj5Gdl79xc+Zl/6mm/ws/jK3/JrwAtQJcha L9jGINTOMNTOKMzeCGwS6bQ92EY/xNYQN2HMh9gaBFnrh9pvC3c0iXDeGeFk Eu64I9zJJMrFNNHHSgYWmxR/29QA+7RAh4xgx8wot+wYj5xYqWFybpy33DPZ rzQtqCQ1sCQ1COOsaI84fxtPq62Whp847voqxH1nYqhjQWpAqZy6X5YTCTYp y5UIpSQHkBJV/Fb1SkSZem9HRVVLpJJNtPFEwSa0t0uk1KIZ98rGeJ1N6Jq6 2ESj5ET3Sl4XhpTqsk42UUZVFJktP5ZNStIii1LCwSZpEd4JQa7Rvg7AEzjE zRLLbyzCvW13YJwR5ZsW7YEVmvSxsxSOEU/9zgWhxssQ7wnl/9OH2MXpEcXp kUVpEYWp4QUpYfnJoXlJIbmJwTkJQVlxAenRvikRXomh7oAXLAXjgh2wGowJ tMOCMNLPGmtCJapox1/IlEtG52BtT9hCsRgvm+2e1ts8rIzJxCb4emHMKznF zcJYmE4D0Tjt3uy4axMs44mKTSi2QnxBZS80o2ytTKYYCsVfxGaUyhYBIl1N PIqAxcL48136f9xt8AkGuIkrU7wGX1R0gC3IJTXKHUtofLMAgPh+0WbrtKGh CLIIEqHOuvvLUw9UpIkd4WleJIkJQpEZQaIPuawDRCx9W8WmisqcLgEm76oi +ZFWsgnF/n4Sm4hcR2Xb7eJ0VZqocBEQD6Ang4lwXqK/kk0EnqTHeKZEuiWE Oklt7nwsqUFEkKdZ4P/L3nuH1XVe+f5OuSm/OMVx4l5iW5ZsdXrvndPgHA6n 90rvvXckJCEBEgIh1Cuo0IvooN6Lux07dnomk8xkJncyN/fO/e69YOsYsMYz 9/c8yR/s5/u8z7vfvdmnSLbeD2t910pVQflpmvw0bV4qM6ZZ49OssqxELBqK M61lOQkVeUk1JZlVRekVBalQdXEGIGVbdQFEtLK1Mm9HbRHgBdhyqGPX6WP7 +s8dmx7rvX1t6v0H1z55/86vP3sPwPKv//Srv/z5H/76lz8w3pb/+Nf/89c/ //Uvf4JYQmGbm/yViaqwgZW//PXf//Wffv9r6E9/+O2//eOv/vKPvwSV/Pl3 wIqPgSTgkX/87IM/gC8+ff93wIqfvv3rj9761YcPwCYAE+hnb9/+xfv3ASZ/ /MXHRCX/8x9+CWHyT7/85Peffvgbh5Jcv/10vrbwH371yT/95tM//e7n//xb pjgYVn798bs/fevW9HDPkfZmu07uvmH1ulefJzZ55ZknNqx68Y2Xnwlw31RX mnfqYNvUSM+lyaHLE0NzF/qZ6Ak02juvEcYOP9l36vT+5j31JWATrusiUQnZ T8hs4ognOWZJWaqmrT7/2O6a8wd3gk0mzx+YGzw2N3Sc6WnC8giJTudGjl26 AFQ5PjVwYLxn32RPBxPjOLtntLtlrHv35Lm9M737xlkYAZhQZ3ZqgEhIgtsY Kjm6rauj5uju0u7O2vOHt/YcaQCk4NLEeSZEQnW6Lg8fgy4OHpntPzzbj/Gg Y78SwpMVNlk5Vo6V4//HI9brFZHHy0L3l2I8f4KJwOMloefLUW7P8zxeFHi9 zPd6mef1ssDnFZHfa2AWacBqTvGBayBV2Hpt5CYQCkZ1+AZNxEaQiz7aRRfl zMVKuPwujByqUADFGusNEuHABOImNOfIBeyzrAiLbLGewJY0RSBoJUkakCIL TlOEpCtCM5RhWeqIHG3UQ+mi8/S8AqOg0CTMN4kKzDEF5thCCyQusoqLbZIS e1xpgpRUlhhfligrT5IVp8ioVHJ5hroiU12ZxZRK3lZia6pKbW/IgRrLE3GP TR5siPNJVIeUZsi2ldn3bs1ubcht21HANNHDHmMH9t5l7TvL2xrL9zaWL+r8 2NFY+nkwcagSRj0lF6jkc4EStuMkAKRjWxF0gAuabC/ez4l9yBft0hdtpZap 0/WFKl+sR1n+P9fxYVkwWZZN9m0vZwtz5TdWZNcXplRm24AnZRnm4lQDtt/Y nBObMPBSkYZ9GscmnCt5qRyLkjmsl3F6iDY7Kzp2VpL2NVaQOpuqD7bUHmiu wQTr7TvKAS9kZGY7ueRQqhjXzwW7RK4qMkb6PXZxhpbLHHNkFseSYjk2RbaV UY5NySnTLMuyyLGIkZtnmgEysjQDmGUeZ/DlJGtFiRoBlKDmJ6ij2XLEkdRd haskRn0nFxVJ5jz7XD0xrgIYV2mZYxYu1kNzx3IBjtWY6YFUE4DiL+TKB7Pg qwDNAevwLQHx6ksSWW9+VnM904ASfzRchhWVVqC4Bme0d8zLWrB+VHCowqHH om6JrCrI8r80L2vZhoxfhCfcDY5pWv8lNmFt8g+7AlGaqCOVkIhHODZprs0m NlmEJ4B0sAkYkOIm8y2EUlU5yYrsJHl2kiIzQZ5ui4fAJuk2eWaCMidZm5us z0sxMEo15aeb89MtGPPSzAUZlqIsGyt7aW5SeX4KmKWykCWXksya0uzaspy6 8tytVQU76kqaGiqOdDSfO9l5YaDr0uTArSsT929ffHD38rsPrn/03t3PPnn3 97/52V/+5ff/8b/+9L///U9//bc//q8//+E//vefMf/zP/3mX/7w6z/+7ud/ /NXHQJI//foT6I+/+Ag88tuP3+F45Jcf3P/F+/d+/t5diIImxCa/+vCt33/6 wT//6mdAkn/7/a/+/Q+/+cs//vrPv/sFVv7xM2rj+CEhCdc2hWt08vtffPTr T9792XtM5tidy1P9XUd3b6sxyGM9N72xafXL4JHXX/gxRkAKCCXQY/OOmtLu Ix3TIz0XJ+bNJtDcaO/cSA906UIfxyanOnaBTQoSldQXPsMQQ06TRUgC4RLI Jc8WX5Gua9+Sf5xlk6GTreNn90/1HYYm+g5NDRwhMJkePEoBFGITjFP9B8bO t1/obh05vRu4MXhi5/DJXRe6WibOtoIyRrqaKVCCOQsde8EmENYBJifbKg81 FXU25p9srzx7sL7/+A6s456ZfiZ3i1wkNye6bk12Q9RV59YkTk+T7kx33587 tyyYfBGbvH11APpbb3xWjpVj5fi7PnQRmxRBb8oD1qhD1kHy4DdBHHGBqyUB r4v9Vwl9XgGbRHm8GOn+ApiFBH6B+O4vQjw3Zj3G+xWS2Pc1YIvY9/VYn1Vx /msUIeshZegGbSQDLEtF9IHRUTpcWgATCp0wqV9CJqlsKZsYeM4UxyFOwdzI xwSX3FgLP+DIwxoDPvK0xXolSHyS4/1T5YHpymAoVREKpYFftFG5Bn6+SZhn FOToeZhDmGOlwCwqtMTk22PzE8QFiZLCpLjilPiSVBlUk6vbAQDZktnekL29 1JZnjzXF+Rkk7jaFb2FSTG2eZnuJpa7AWF9k3laetL08eXtF+o7KzJ3V2Lvm 7qrLa67N2bMlj9t47G3AnqSYoicLPpf5piqdD9nkYU7XApiUAUwAIAATplzP tiJOHZzwqGVcJKVfkk0OLKdOB6eMo76IShxzqJgODl+aTfY3VnBsUleQXJ5p AZhg5NgE+/OiFD3YZHslwyZs0eaHvWOW/0TLtfNeknXGstuuyv27qiBgCAQe gQAmi3Ro98MGhexjHzqgqavL3u1FbLYYwy+0n6RfbmMDSbk3wBYKtRCzzAdc EtX5iZq8BLWjCpK0ENa5S7l2FbWnzLGpc2wqwhkGWCzSDHNcukmSZhSnGkQp eiFEsQ+u8yMmVMXLsSulY/SEKzLGyfGSYy1lLkmMmIVQhUtU4zRvpWF/BE8D GUGLOsXQq5ARBoxWnmNiCyCnUMBlV202GHChnlg5BwgciTgihiOJOELHo/u8 L9vW5BFg8oj2QP8vbMKFSxwTurigCdRUm7UUT/D3CnwHUfEHiAnqFdmrCm1l uaaiTF1uijorUcHiCSBFnmaVpZrjU0yyJIMUsuskSSZZmk0FpVgUmEOJxvhk szzVqiSl29VZSbrsZGNuqqUgw16UlVicnVSWl1JVlFFXlktqqCporCvdtaUM 2rd728H2pqMH9pw7dejKzOgvP3n33/70u//9P/8IKvmPv/7L//nLP//lT//w p9//8o+//fRfoN/8DHjyBwDFJ+8CScAjoBKI8ITTp+/cAZV88tYtTH75wYPf ffLeH37+UwqaAExAKFzchFrM/+ZnTNCE9dp/iMlvfvYe5Xf94qO3Pn7nNpUO nrvQTxW6dPEiX5f1LmtfW/fq86ue/9HaV57D+JOnfxDh79G0pRJsMjXcMzvG REyITWZZMJnHk1HGDj9y5sjxvTuaawqJTSitCzxCThOywHNUQl54ipuATY6x OV1gk4lznTMDR6f7j0z2H+aQZCFocoKCJjNDRyZ691841zZ4srn/2M6+Y9uh weONo6ebx8/soVQu4MbgyZ0DJxqHTzcBUjABwmARJEJBE+AJJvjBsbN7Zvo7 Lg0fvHrhKMDk9lTX7anuO9Nn786cuzd7/v5c7/05xkhyb/Yse+lRQROGTdgQ ybL6W298Vo6VY+X4uz5sQnczz8XMd7UK3CzY1fPYrC2+s47npI3erMXId4bU 0ZtVYaCMdYqQteAXWdAbXPQkzv91IAnABJACVIl2fV7k9arA4ycQJkLPVzDB iDmABdhC5CLxWw14iQt4Iz5orTxkPaQI3QDRXBm2URW+SRPppFvgF8Zov0SE J1wumXnBoU/5ZjQnftFFbWaxxcWRa1jw8bbG+tjEvnaJX6LUPyk+MFEa4GB4 CUlThqarQjNN0enGqAxTdLaFn2sX5dlFOTZheaZiW4m5dUt6W0PmliIjbjBI vE0ST7vMN9fKK02RVGTIi5IkUFmGsixDVZahKc/UVeSYqvMstYV2Ziyw1RXa 64sSoK0lSQ2lybuqM5tqspqx+1r4BSk2JHvr86hiD9vmoJDEhUU6HDGkobCD I5TtxZTTtX85NnEoQVzK1f5afifftIyWje8sddwvjZssn7j1xeporNi7tQRs sr0sszo3oSTNCCopTTdhf25T8C0y/LlIC5N1uIqNK+V0te0oXiizXPpo7HKM m+CnOHv+w4DLApgQkjAMsrvu8J56jFh0vLpsk3HOGM796n7hdcsXmlFS/ljR noaCZtY+4EguW4pS6wuZ6mSV2TbgGD41PjvQjL4EEriMpRVdYTLmxsJkPWEL vpO8RFVeohLKTZDn2OOzbVJoUUlkLszhWE+MqzDGtYl0dJ0QuZDlhGvdwuV0 cXDBxVwo4MLVW6bYCqWu4c3glOMaTriN6pXRo6ieGBeyoUdRMTE8JD9FWZLJ NHCpxX9EbDFk/B2gslf0d5tCLfgjWBZRucmX6bq4VJ2f71v6RaW6/tOcLi6T kPObAEwgRyShX2U4+k3IFUVswuHJtopU/LfA/P1hjSdUoa4aCMyqssBaWWCH KvJtxVmmwgxjfpo+N0WXk6TLTdZDKWY5kCQjQQNhYtfHWTSxGBMMUgiQgkVg C/AkySBPNoJxtJl2XYZNm27VpFk1mQl6zNMsaoy5yXi+vSQ7sboos7Iwoywv ta4092Bb49xY38fv3v71z977/a8+/tkH9+9dm7k6PXx1euTdO1eIQbhACRcl wYQgha6yxpMHP3/v3mfv3oV+8f793/z0nd9/+gFg5F9+8xn0p18zERMs/py1 z3/yzp1P3r3z2fv3f/nR2/P1vlibPLnmP33vHjWav3Vx4tzxA9uqirVSoZ/r Btd1q5zeeAV4Ar3yzBNrXnpaJozYs7325IG94wNnp0Z6pod7ZkZ6IbDJxdHe Sxf6wCbXJvovX+gZ7j58vI1hk/wEBdCDwISyuRKVUVxPEwqdgFAYsX3h2+oZ v8nZzh2DJ/ZM9Ry8NHzi4vBDHqHMLpZTjoNNZoePTvQdGD3XPty9p+9YY8/h 7ecPb+09sg1sMta9e+p8G0BjdmD/dN++yZ42spb0HG44d2gLbgOYELD0HGno 3l+LEeQClgGYXBs7enPiJNc5EWBCeHJ35vzdmZ5bk13UGp6M8I/Ck+Wo5N7F nrtzK3W6Vo6VY+V41AEwAZWAUMgRP294j2FkErkZRW4GVnqhK2tyn3fE04af 6nRxLEAhDG3kJlnQWig+8E2GPvzXAEPAI2ATKMb7NQIWCHOe+8sCwAsrIW7w fg2TGJ9VsUAYv9USFl6kgW9CwCLAkTp8A2WOQXghzufi+B5MAheSWYi350ay xsyXRzbynR9eivGwir0gc4yHEVyDTxfjYcInwjcw/yV4QLjNEOcJGaVeZpmP VeFnU/hD+YmihhJj+7YMqDpXZVcFaGPdrWLvRFlAtjEqzyIoSojNswpyLPwc i5CRVZRri81PkBQkSwtTZflJ8vwkBVSYoipO05Ska6HyLANTDpfll5p8K8gF aihKhLYVJ0HbS5JJVKiHaopypUT31uXin7b2Lfn7thZ0LOAJxWIWe8wXW9S/ sFX9gZ1fpLJF+gI2WcZv8l8gFNZvAjZpKEkHm2Bnjt049uTkhTfGRYBNsLK1 OA07sR1V6c31OY5xmWU/0VIw6fh89Wbuhn2N5e07yvc1MpldRCIQEQrldHGL jk92/KX90t/SLw3fUCOMhUWGXPDBmYJju6qhjh0VbQ2le+qL8CU0Vee11BZg 3FGehY9M2ILvpDTdQipONeHbAJhARalaUmGKBn/HoIJkZbY9noqMcVZ9zJd2 cnEEFscICFeRmKMVkAVBBOdeAY/M97V3CMRwJhfHPpXkauHiLxzFQFSWmWva wr0i1+mSHo65XhpMr0vvgewzeJ94Aj5jUbqmPMdUU2jHXw/Q356GfOoqQlyA Pw6uQLdjkbFlc7qWZRNyynTOt/Kp4BqdfEk2cbQ4UYsTpsXM1odyjJhwk5a6 HPr1xXx/0iV4wrlOwCYUN6kDp5Qn15UlVRclVBcBFhKBJ+V59rJcW0m2pSjT XJhuzk81QgXploIMa2GmNT/dnJtqzEzUgkRSrcpks5wCKCAU0IpBIbAoY63K WJtSbFdJEjXSZJ0sRS/PsGiyrNpMqybdrE43q3CabdPlpZhyk41ZCbqsBC2e v6Usp31n3cnOlq6DrXt3VFfmpxZlAJpS2xpr+k4emOg7fWV84O6liXduzL17 8yLGD+5c+fDu1Z/ev/7JWzc/fef2Z+/eYYGFARPH0AnhyR9+/hGoBBOc4oaP AR13roI7mEJeb98Gp3z2wX2qTsw0gv8pgyrU3OSnb91659blkfOn2ndtzUo0 xfFCw/3cAz02A1I8Nq4hI3yySb2vqeHUwbbxgTNgE1DJxbEB6NLYwNWJwetT w8w4OXB1vG+858TpDqaGcJ5NThZ4rgU8le1a6jd5WKdrIW7CsMnIyUujJ0El 1NlkvPfgWM8BTEAoTDbXwKGxnv0jZ/b2n2w6d2jb2QNbzx6sB30Mndg5fmbP TC+DJIQnZDYBmwBMgCG9R7cBTC6c2Y0bKL8LI9lSLo8cujFx/Pb0aVAJdSq5 P9dze+oMq7M3J85Q7a+ro8euj50AoXBFur4km9yeOXtjsutvvfFZOVaOlePv +jBEbgaemKKdjVFOTACF3eTreE56vrNR6IrtOsDEiF262JN4BFcZFmDyplwe JlmxHnlOrNPEnS3S5UZ+E4xY1EU5ayI2q8M3QYqQDeAX8AjE9/hJlOuL0W4v YRLN0gomJMALq5d4bi9AfPcXyREj8voJFOP9isRvlTRgtSzoDcCLLmoz3pI6 fL02cqM+ejNk4DmBRIAh3NwRWOb5S+hqALMIXSlaZIn1oBpl3CVILXLRxrrp xO46sYdewqAKICUvQbit1NTekLG7Lrk4VWKK9zZJvVQRTnqem03iY4vzTVYG JymCEuSBKZrQVG1YmiEy0xydaeZBWRZetk2aaZFkWeNy7PH5iQyn5CXKaQWX chNk+YkKbCYLk5VlaVqoHOSSrqvI0JNqcsx1eZb6fNvWwgSgSmNZ6s7ytF0V aU0V6S1VmXtYYKFQC7PD2ZpH2x5O881EqJ8IK7a9QknHztJ5LTBFZ2PJgcaS Bc8Lp7KlWsjs+hykLIWghRhKMSNHawknXF1YbN1a3LqlGLtxbivORQ0SVEKT NDLDFI+VhpK0hnLOC1+0AEGly7kMPpfQ1bm4Rhl5mReKAyygBxc6gSjRi4mV sJACYZHDjUUVaB39CFy9KUf/NRdh4dJ7Otiu4sydu+ugwy11h5proYNNNQeb qjt3VgFYMO7bXg5qw5fDfj/5jRW520oBLOlbiphiy+C40gxDSbqelY7IFypM VXP1xDgt24ySPC9c/xcCGcIWDlVIjotkjQcjLM0HW+pqoTnV+4KoZDG5YLBI PSipwDJFSbiwC+dwma9+rI6m8AoDLKr5BjG6uCCtJIgeS7Yagib8LD5UcYau Ms8MZsHGvmULxywlS83sHEUuW9qLoIb+7DggXTYw5+hs6ljoTOSYysW1X9zt kMTF/JfLTihi4ijgCeV0LWUTR+MJoIwJnZQk1pclg1CqCu1VhQlQeb6tNMdS mmNlZSvJshVlWArSTICR7GQ9wKQ4O6E42w48ofwuiqRA6XZ1ZgJzD+gj1aAg JEkzKtNNKpzSPMOszrRoIFrMTTKkWZSJemmyUZZikmNMMsSnmhUYLaoYg4wP GeUCs1KUalYVZyY015d1H9o7PXgWhPL+rUsf3GbY5GPGWnILYEIBFCDJR/eu f3Dn6od3gC03gCe/eB/rbwFJfvfJexAmWPmMhQ6iEipB/On797gKwzT55J07 79+79vbNS9B4/xmgx8668vw0u1kVp4yNFoT6AVL83TZKokMqCzIPtu7sOrxv ariH+ptcmx69PnPhxszo7bkx6NbshWsT/WCT2aEz3QdawCbZFimlb3FmE1AJ aZHrJMcSx3rh847vruk5tIu88BeHjgNPZoePT/QdGjnbMdjVNnB6LwiFbXRy aKLvANhkuLu151hjd2d9V0fdmQN15w9vBZtMnG2d7eugsl2j3S19x7aTz334 dBM02r17AVs65wY7Lw4duD5+7NrYUYDJ1QtHb0+fenDpHNea5MHF3jvTZ29N dN+c6L524fTkecZ0DzwBm1ArE7Kc4H7S25cXxMIIGUwgmt+c6r4+cfpvvfFZ OVaOlePv+jDz1lr466yCDVbBRgt/o4m30Ri9kdov6qOdDXx3s8jbLPIyCjw0 kW4GvpdNHGAXB5j4Hroo1uWBDX/0ZlP0JlP0BlP0elP0OmPUm7ZYD4AAAIHL pLKI3MkabxYAUtxNfE+ryMce66cVeOjx8FgfY4y3XuipE7jrhe7aKGdtlBOZ 6xUha+MD10gDXsckzv91crXE+rwKMAGkYCRacTS8RDo/i0XiFxqxTvwCkYUf T2Nc/FHOnLeFMseWlgjDCmPPj/WWR7soeK5qoYdK4G6U+GaZBUXJ0voCY0tN KsaSVJldGUL34AbcBmlEnnqxj1nqr2Hn2hgvWtTFehvj/CySQKskyBYXkhAf liSPSFFGpiijMrSCDC2fHQWZOmG2ISaH6dglzJ4Pu8Tk2WPzWPMLXp1UnBJP IhcMVJauqMhUVWVranJ1dfmGhmLL9lLbjjL7zorEpqrk5uoUqKUmc3dt1p66 7Nb6HIyYN1dnYL53S24b02GB6VnZsb1wP4BlW07H9lxo/448TrRCwg2kzl1l XK4XWWb27SjhMr64ZjH7dhTv31UAdezM39eY174jt31HXtv2vH2NBVBHY/F+ 8As2bNsKsQFj6aYYu8ftlWk1hbbyLAMTY0rVANbwD32CPIIalm3Jt20pse2s Tt29JQuP6mwqPtBcsn9XEcZl1FTauetLaaEv53yZAspnowY3i+T4W3eOTRbt Y7lKs4/+VfyyVW0XpYot0rK30Y4X213WoT+f/MP9Lp1MLlRjtizbQJPiDC2w hSz5hDCLQIbr6kIZWcQIjsWQKVmLrjrGXxxTxahCMkVJCCi4IAiXLUYREKIY QhWu08qiWIxdJUhUi5I0MSk6capekm6UAlcdK5sla2NxFTLJogzSCH1cuE4S phWHamJDIHVMMEYsmuXRdrUwSRebYpBkJ8jwYfGdUDfPPQ0FbPbdwxoLRK8A E/rjcOztwjZLfRiAc2SWBQIto2QznLLVlecbjzJUsvA7BJziT625PgcrXHAE E666NYQ5xUeWFdVh4HK6KgsSq4qTmb4npamYVBYlYYTK8xNKcqzYQGOEirLM BRlGKD/dkJdmyEnRZyfroJwUAyAlJ9mUlWjITNCn27RpVg1GmqRa1JySjApS skkJpZhVUJJBnmJSpls1lPplUYmlvGBBiHekv1u4rwsmMkGoRhINGeL4RqnA Io9J0sYDcIpSrfVFWac6ds8NnX//5qVfvHv3D59+8MfPPsTkFw9ufXbvxke3 Lr9/fQ7jz9++/bufvvPbj97+zYfzSV+sX/4G9OH9G1zQBCNQBTDy2fv3gSqY UIv5d29feQePunsNrNF3+kj3kQ7o6L6WXfUVjbVlZblpQJXmrVVnju4fOnti erjn1qWJO1en71yegu5emb5/debt67MgKeAJ2OT65MB4z4njbY1N1QVgEwqX cEjCBU0c4yaMtAKwyb6tBV3tW3sPN4FNKKcLbDIzdGyy//BYzwHgyVB3Owjl wvnO6cHDEPBk5MxesElnY+GBnUXd+2sHjjeCTXoPN5zZX3v+SMOZQ1u6D9b3 HNs+cGrXcPfusfPt0wMHZgYPzg4dmRs+enHk2MWR4xfxKqPHLl84dn3i5K3p rjuzZ+4xxNHz1lz/2xcH7s/03p08f2u0+9rgyct9x+b6jsz2H7k0dPzGePf9 OcDI0LtXh9+7NoIRwinp7cuDDy7Nm9/fuzH8zrVBTN69PoSVexdX+sKvHCvH yvGoAzQBpjDzNloEm2wiJ3uMa4LY3cAmPpmErkaBq47noo12hjRRzkahp03i Z4311mElajNuMOFOvpOZv9nMY8XfZIFi3Ix8J330Jn30ZhZPNrPBFEY6cEek M4MnAk8ADtgEYGKO8zOJfU0MoXiCTVhA8KCWjmzzFFc2HcuVMsqYsE7UZkrr Iuc+hAknid8qCJAChCFhTv59EpliIIn/mvigtbLgdRilgW9iVIRuUIVvUkds 5kSeF8BFfKSTLMpZyXcDelhlgYAC7P+3lVix4a/MUmea+AaxTxx+VugBBgF9 LCuACX4cDwHCKCPcVJHummhPLc9LL/AxivxMMf7sGEDMYpeG2OKCMU9UhUJJ 6jAoWRPOSBuRpo9KN0RnGHl4aYAS4AWiCSgmz8G8D1opTZMTsOCtglmqc7T1 Bda6fEttnhnjlkIbaUdZcmN5ys6K1KYqKpWcxTapzOTUtjWLUIXmUHtDNscm HY3FDg0r53f1C+7++UvgDnAKYARIAjABngBSOpuKQBMsmBQSmCyohLooYreG bRjYpDRTx6TAJTOyyyNssvB0nbAwQV6fZ91SbGusSmmpz9y7LRdUggd27Cz8 f2SThe4zj6KS+V6czZWObQe5+Mij0eOLevn9t9lkEQRxlzhcWnC4ELPkNTOe hRz6HTuVFMOXTOJKIjua9B0Li3ElxRxLInOlkh3buHDZYgQvlKlFzMIlhjnm gAFAHHPGaIVztXD8Mh9/kUZC5vgoiyzaKufZFHxq/rKoCwwjbQzQAyMnnAJJ jPGRELCFyAWSC3wUQh91rD8VMSOMAmfhQ+Gj4XvANwPK21aRxlZgyAJBsC1y ilkDV1nnkoxBCq9wVEJxOtYRU+ZYQJjiJhT4AHoQiZB9BhNiExLIBQJsUjVm EoVOCFjIdcLhSTVLIkCSisJEqLKQYZPygoSyPHtprg3iwCQvTZ+bqoNyUnQE JhAbMdGCSkggFAgkQoSSYdcRpBCJkDgwYYS5SUkmFIxGuUgSFQgwCfHaHOS+ EZO46CBVbCQENoHMMpFdJUlQx0GJGmmWVdtQmtvV2TozcPbB5akPbl1+9/rc u5en37k09fblqXeuTH9w4+In964DWD5969bH965T9hfG929ffvfmxbdvXHzr xsX37lylHo7EJvNOk/fvgVaITd6+eQk3XJ+50N919HBb0+5tNS0N1QATqKGy qG3nlt5Th2dGeq9MDuOeu9dm7t+Ye3B97v612XtXZ+5engSY3Lk4fnNm9PKF nqvjfWPnjx9t3b69LDvbHMc5TThI4ajE0XUCNqGcrjMd2whMLg+fuDJ66vLo Kcrpmug7BCQZPbcfhAJOmRo4NNl/cKxn/1D3HrDJ4eZS6FR71ZnOOlDJyb0V R1tKju0tP7Gv6uzhrUNdzeM9bVP9++eGD18cOXJp9OjlCycgsMn0wOGJnoMz g4ewfo1lk9sz3benmSSut+b6gCfEJnfHz92+cAa6caELVHJ76ty92d4HF/uB IQATRxGkQHdmz9+aPnN37jyoBGwCgU0ogPK33visHCvHyvF3fegjN+gi1+si N+ijNhh5wA1nc4yLQYDRzRTjqhc6afibtILNhhgXWfg6NW8z6z1xUUcz3U+Y rCc2icvMd2EhxdnMc8bcwN8IGfFTfLDJRm0Uk2FlERFZuOqjnZkKXTxXCGyi E3pq+O6qaFedwMMg8tDymerB2ihnrvSWke/MpmAxHeftYi+u2yNllHETzg7P tK0X4FWcgDCclKHryMgPyYLeiPN/nQm+eL9GSWWYxPisgkSsBYbv8RPOBYPF uIA3JGEbBQFvCAPfjAleFxuyXi/2wbYfO/xdlUkNxRYKmoBKxEAbgTvFTUAi Bokv7sSEoi0UNMEINpFH4zv0AJhwAqFAmKijPCCOWQxCX8COowhzgEJ4vhFY F+dnlvpb4gMsskCbItgOKUMSWBHUpGgjUnWRjiwD5dokOVZJtkUM5dri8hPi CxJlxSnKklRVWbqmPENblW2oyTUBXrYUmvAZQWE7yuyN5QlgMRI+Oxt/Sd1T l95an8HUK2NKDBW2bSvYy+TM57Uy6Si5OKX1fdiJscSxn0nZyiOBTVg8KQRN tO/Ib99RQE+AcH8n+wtqbKcpboLdcmmmvihVXZSsKkxUgE0SlVEZelGBXVaX a9lSYttRmUxxE1AJHogRhLKcviybcN5/ApBDLVWkZdhkiZ/6EcTxJcHky7OJ 40tzGLIIWBYVmPp8Rhn5XBirC22V924vYntQ5lI9ZPo9PMVcqPoTVUXmOrlQ VWSuyBi0aIVLHqM8MeIa6uRCVpdFAr9QvpajzcTRks+VQTbHM2DCCYQCgVYI VUjzzSiVfE42lQCiQAmUoBFhjnWgikkWZZLP5545ViejMsi6uCAwC6QRB0DU dxJvDLRFDhcqiVyRa8JXRB4oYgo2s9ExnsJQCccjFCuh6AkFTSjgReESMvg7 xr8IJ7l+ixQrwQotLmWTmtIUipIARjCSCjNNUHG2BeIiJhyb5KZiYiABT7KS dIQknByDJhykYM6xCSeAybxx3qrBRC2OEob6BHtuCnBd7++yLszbGaiikURj XSfh6SU84IlFHgPpxNEKfihWTPFC0EqmRVOdl9a+veb0/t1j3cdmeruujvbd nxsHm/z0ztWf3r320Z2rH96+8tG9a2CTjx/cAJu8fX32vdtXgB7EJozfhHWa gErIYwIweefWZVAGEAMIM95/5sCexqrCrDSrLsWMT4fPqCvMSGzftXXwzPG5 C/0358ZvX5q8d22W2AQ/hdObMxeuTw3fmB4Bm1wZ6wWeDHUdOti8paEkM8sk 4cCEC50s8sKTsoyxlRn6joai8wcaL3Tvm+0/cmXk5LWxrqsXTl+6cIqznIBQ gCdjPZ0AE9JEX+fY+faeIzvOdG7p2l9zel/V6fZ5dXXWEphM9u2bHTpwceTw lbHjYBDoythJsMns0JHx851Dp9vGzu2bHjiAqxQ3uTXVfWP89IPZXmKTe1M9 9yd7Hkz1vjXdd2+GqnUNvH15EHoEm1waPT7Vf3Bu+Oj1ya57F3sobkL6W298 Vo6VY+X4uz6UoWtVUNg6VTi0XhWxXh25QcvbrBM4aYWb1PwNyuh1St56FX+D JGSNirdJH+OqFTorozaoIjdqeU6sJ4UJrxjIih7tZIhyUoWv0fPWm0VOkFGw URfNiDOhL/SXZ2SM9dGLvMAmWr67KdbHFOut4bnYseXmu1FXR7ZbymbKMVvU 5BFSh2+gAsJ0M5lfOHghWiG3vmMVL67aMAhIFb6JYiWYayKdqFCYLHidNPBN if8aohWGUILX8fxWQ3z/NYAU8EWePbYu34CdOfbthUlxAAQFzxXwAjwBvEDS iM2U4sWNEAiF4AIjoAPoQdLxvUkcp2BOlxzZBGjDiSCIBNghLaIYEoMwCxRj kvqbWRklgZb4EKs81CYPtcowhiWqIqAkdWSyJjpVx083CDNNMVnm2BxrTK4t Jj9BjI/JpZBRCAZ0Vpunry8wbi0y43vYWmLfWpqwrTypsSq1qSa9uS5zd31W 69bc1gZGe6FteSRCEgcVEEd07CxyYJNiti0L8+tlbO2w18Jmr4zYJEkJNqFS nPgHPd8WX5tj3lpqJzYB4wBMSMuzyZcNmvwX2OTLu6eXRYYvwpD/kg459E/n xD2cEoqWfW+OGWiOFcYcjDBcsTWmthh21JRrRNjCAYtjtIVE8EItNijsQp1c uFQxLHJ+FrK0OIqCL5xVnyaUSMbFXJI0Ii4yAgAhcTEUjEQrmIM75tFDFkWx EggrFgWP0zy5qKOXliPDaxEWObaGoQoANNdKAglbHMsgcxXGQFv4OPjI+Dbw teC72lKazIVCKIOLoiGYEIDgquMKuUgwci0XaSQY4Wpz4b8UYhPObMKk8BUl VRQkAkxIpbk28EhOihZiQyTarCR1drKGVjBZEJAEl7SZiazZhI2PLErl4pK7 iE1oncMTyu9KNasS9TJQSZpFnaCLV4jC+cFeABNfpzehUC8nsIk2jgcBRvQs ngBGzDIRIEUbG0UrOE3WycjhApWm2Opz05urS4637hw7c/z6xNCDy1Pv37z0 8b3rP3/vLrWPB558cOfKB/euUVgEAqF8eP/GR28xVbkwB5WAR+5fm717ZRqI cevixFhfd0fztrLcNJtWppbwtVIhlJ9mP9zWNDV0HiRC2V/3rs/eZXO68CPX Zy5cmxq5Njl0dWIQeHJ1vO/S6Pn+k52du2q3FmdkGMWUx0VKVEZBiyImpFyr tC7XcmhnWc+hnSOn25jGiwNHr4913Zg4c2W8i/CEinSxZpMjFDdh1Nc52bd/ tGvP0MnmgRONfce2DxzbMXRi58ipprFzrRO97dMD+6GZwc654UOXLxyjnC6A gyObDHfjzg5cBZvcnTt7Z+bsrcnu+yybPJjtezDTByoBm0D3Z8GDfQ8u9hOe cDldjlRCaV0Xh49N9OK9HQCe3JzqfnC5D1Ty3o3hFTZZOVaOlePRh9jvFYn/ q/FBr8tC18jC3iBJgleLg1fHBq0SBb7G83850ueFcM/nJGFv6mLdzPHeGqFz XOib4uA10tC1BqErpBe66AXOBr6znuek422Wh7ymjXrTLNpkidlsEm7SgW7C 1kj8XpEGvKaOWGeNdU+O902S+tjFnuY4P53QUxnloopy0TKE4qaKckrE5lnk QYlb2shNmogN6vD1ZL3nYiVgjQSJN5nfuWLClAZGoRyKpJDI8MIV8uIIhWs6 Ty1UIEy4NivkPTEK3HXRLmo2pwsi0LDJg8rSFTvK7K31GdiZpxuicUNc+KYo n1WAl2jf1yO9X4NwijmIBmgDbAHUiILWAlskYRuh+BAnSBbqrAh3hSjFCyMX NOGARcV3dyQREhEKGVs4PHHkFLxPEscvjj8uj3JTC7x1sX66GF+N0Ecj8mHm sX56sb9BzJCLMS7QJA0yxwcDZEyszPEBVlmgXRHsGIvJMPK4RLKiNFlxurwk Q1mWpa7I0Vbm6qry9NvK7dvKE0jbK6BEqLkuraU+ffeWjNaGrLbtOaCJfY0F B1tKQRP7dhRRhIW6UrLVfRezCeV0kZkUbJJnlVZlGkBGYJOW+kxHNvkCUWrZ f64vzyaHPt8pg7J6HhH1+JKWky9PJY6UQVRCrQkXtUFfWjX34MOWhZWdn68z 5pifRlp4S9S4cD5nie3e8tDKTdtpwpZFv72vyDWVZulJBCzkcHE05nPGFi5P jAqLOfamxCb/YaqYSZpuZDpOUtNJMphgBLBQThcxCyDFrhLaVAKgBxiEIAVs QvYTSuWitC4GWBQPkYTQg+iDWrE42vy5VDSaOBZSxg+CVpQiX4WQyRBjvfmB GnEAxVwwxwpZ/gEvZNshmw8ljEH4AimVC18skSBFSTir+9LaXBQ6cfzOKchV xiZuQRyYFGQYiUoyE1VpNnmyWQqlWOIxh1KtMsyTTPGJRilk0cSa1TFWTZxN K7Xr4hP0skSDnLK2CE8WuU5IXE5XulWTYlKCUDJsWhCKKjZSEOLt77LOa+Nq 701riE00kmh9vMAoFYBKMFJyFxGKXSXBXC2KALlARCtGMc8sESSq4vITjA0l OZ0760917J7u7745PfrOjbmP7l376X0muevDu1ffu8PQBCVfPbg+hznxBekt NuML6xAo48rk8NljnVsrCu06eUxEIJRi1jRvrRroPoar77Elv8A4YJM7V6fn wWR6FGzCUAlbquviyLnZoTNgkwNNdfWFaRkG8SKziWP7RUdCwf/KqrOMBxtL zx9spMaLYBOAyc3Js9cmz1weO31x9CTVEB7vPTh6bv/wmbaRs+2j5/ZN9O6f HTo0dmbvyOndI13NTIPFs60zvfsuDnReHD54ceTQ7NCByb59LKQATw5P9XcC T8AmV8ZOXmHw5Ohk76Gx8/sAOGCT2zPd9y6euzd37u7MObAJAyazfW/NMmxy b4LJ7Lozdf7ONKN7s73EJoQni8wm0J2Zc+R8h27PnH3rSj9ldkF/643PyrFy rBx/10eE+48iPZ6K9nyW7/28wPcFgd9LAr+Xw9yeCXZ+ym/zj3w3Pum78Uc+ m37kvfFJfsAaWbSTku8aG7IuyvuVCM8Xo7xekkesV0SuV0atV0dv0PI36QQb IXnoK7roNSbhBrNoo4G/ThG6SuT9fOimH/Dcn1GGvZEo9cxQBaQq/JJl3iaJ rzzCSeT/Bs/rNSg24A2wSbIsMFURlBzvB/pg5WWNceeKgFGZYggTQg/Oh8KV ESNIcRQXLuHIBaLmKdSYXs9z5Vo9OgoruMEiC6QcLWzOASbYjdflG5qrU3bX plVkqoz4FGxYBAwC6KDQCTAEMEJxFhAKBFQBsER4vQphIvB+Q+jzpsh3LRTj ty7Wfz0UF7RJErhRHLABI+aAF3mYC/nouWwuvdgHWkorHINwVELvynEOyaKc IUW0u5LnqeJ7qQSs+IzUQm8SneIGCDfjp/BYjoNUfDfHt0TvBzJIfU0yP6sy MEETkqQLTzVGpZujM62CLJsw2y7KTYzNTxYXpMQVpkpLM5Xl2erKXG1NgaG+ 2Ly11NZQlgCygHZWpTfVZLbUZVOhVNrrUkc5bLEqso2lGbpytlIZU/eGzenK t8Xj3/T6IuvWUntTbTrZ6kEoHTsLl9WXBBNokd/kEZYTDiUcWzr+p2zy3/PC LxWhB0cQjhGTRSlkyzIRnS6qLeZIKFw4hkMbx8Vlk83mm1fOl1aer3xFWUmc J4K20ItSwrisMG7OQYqjMZ+zt+TalTk2JbWbzLLIM82yDFM8RqAKCAUjyAVi aIX1mFD6FkScQqc057CFC4UAH4gpIMd6YlxmlyO2kH9/UWky4hSIfkQV4wfR BNgSz/OE5AJvwAut44UwB7zgsZTGBmzJskvLc4xsDxc7iIN6UOJrpEAVUyK4 OAHr+DId25oQleCnoOJsM2d4pwwuSuLKTzdQ0CQjQZluV3BgAk5JMEhsOrFZ LTKphBpplDouShcvMMhFJmWsRS0BpFBMBJwCWoFAK5wF/mE2F8smaeAXVpTT BQwBmwS4rvfc8DrwJNzXRcoLxqJRLjLLRVZFLEVMyHiCU/CIJiYSwGJTinGK dbCJVhCh5oUpeaGQRhhhjBPgUn1RVvv2mhMdzb0nOif6uq6MDwAZ7lye4pAE ZEFluz64d51CJxChCogDoHH70uTchf6uw/t21VcUZyUXpCdggtOJgbOXxgdv zI6BR27Ojd+5Mn37ynzQ5OrUyFU2aHJ5rB+vONV/GmLZpL42P2VZNuEyuz7n iGe98B0NhWf3bwebTJ4/cGno+K2pcxDY5Mp4F7HJ9OBRwpOh7r0Dp/dAI2f2 TvR2TJ7fBzxhynCdaho/s2e2r+PqyGGwCcBkemA/wAR4AjYBmEBgmcsXTlwd PwVquDZ2+sroqblhxoRyfeIk2OTu3Nl7c+eZZosLbPJghgma3J/sAZ7cnjx3 e+ocsYlj6GQpnrxzdZCiJG8tFOziJn/rjc/KsXKsHH/XR7Dz40FOjwdsetx/ 4+N+G7/rv+n7kPPr33RZ/W23Nd/1WPtDrw0/9t74FBTg/EKw20+gQJcXA5ye 89/8lM/GH/J9XxEGvCoOWSUNW62IfEPNX6sVrlOEvaLjrTEK10GayDVivxfC Nn8/YO13RN4vmEVO6Sq/dJV/qsI3TeVvjQ9U89zEQeujvV4Ld31J6Pe6QeRR m6lsLrO1ViS0lFpZmXcW6RsL9A056rpMRV2GojZdVpEkLrYKCs28LE1ouioo Ux2cpghMkvqCZUAiXAYX14SFm2B9IVXMyTE+wjWg56p1YTSJPLGSEOdnEPtg W47tN8AkURWabRFSQteuyqTCpDgmWQvPifMzsgYTTCzxAWapP1iGpQkfWRRb v4vvjhFbfTYE4ywN2Qz6AIYATAQ+b/C91vA8V0e6vRblvgoTnHJaFIUB70Dk fAEHxYVvIp8+EcSioAkXN/kctkS7aGN8gSSKaA/QB8cjSj4DI1iUR7nHR7hK w13iwpyJZTg5pqg5ruM9xEVudJQ0ahMk5zsrha7qGHe9xJvIxa4OTtSGJ+ki UgxRqcboNBMvwyLMsIgyrTF5idLiNHVZpq48S099Xjhrdk2BFRut6nxLdZ6l vsBel2dN0wntsoh0rbAoUVGfZ60tNNcXWxurUvZszd67LRci44kDknBaQA+G Pj6v+RXK6Sr5ojpdh1qW6PNswvZtnGeTQ7urHfQ5LviSRvhD86perM+HSxbp +L4tEEVPKIACcY9d5JrnvNvL9iLk2GfZS1zvTkdRZ08CNNyDl8abOdpWy47g pnm0ObRncf1kajgCGnX45X/i/C//WW8LsQwXfylO1XMtXQqStNR6EngCTiFm AadgnpegzrTKMywyjJlWGhmlGuNSDJJkvZhznYBTOKxwTNni8riIRyDcA5Tg VjiKAVkQehBuQJhrxHRnKHcnRrpTIfJVsOEVmcAbqIL7ZXwvAAvGuCh3KCbc RRTmLMZ/ktEeuAHrZNUnhz75XEBtTMm1HMN8KYNCW9VCfl1Frqk4y1SUxSBJ YaYJSIIRkEJ+E7KccHZ4DlVSLLIEQ5xVGws8MSqFBoUQVAKZVWKwCcSFUTBC OHVcpPDKfITFqCBHPCYJunhgCC/IM9hjE8DE1+lNzOXCMJ2Ub1VLACMWRQzh iUXOTMh4QrQCQpHzQiBtbJSaH65i2UTBC1UJwvTiaNysiY00xQsBQeW5Ka3b q7sOtvafOjje3315YujulWnQB5AEYPLJO3c+vH+D8ITSvcjVjnvuXZ0BceD+ qaHzA93HTh1sO3usc6yvG4tgHJAL3Xnr8uTNSwykgE1w89xo3+zw+ZmhcxdH ewEmE70ne47t27+zpiYvOU0fwyEJJXSRlhIK/odWmqJu25JPXvjJnoMXB48B TG5Pn78+dRZsQjldUwNHFkoKt1PoZKKvE1gx23+AwZOzey5076a4yaXBAzMD nTODIJEDGGcGASmdF861EZtQ3ITBk/Gu6+PdNyZP35w6TWaTO7Nn784yjeAf zPYCT+5N99ybmjebvD07cHe65+5Mz/25+cyuRZYTR0i5f7EXGPLBrdH3b46Q C/7B5b6VvvArx8qxcvynhznuCYv0R7b4F42xL4qDngx2+rb3m19zevVrm37y 1bUvfmXjT77j9NqPN7z09JvP/XjTa084rfqh06ofrH/58TXPffON576x9oVv urz6uO+6H4W7vxDt9TKPlcDnFZHPU7F+z0iDXowLfFHg+XSY0xMhm3/g/eZ3 ojyf04tc7DLfBIV/qjbUJvPXy3nymGB+iGuA+2rnN5/xc3pJLwnMMPJaalJa 61L21CS21SXtKje2VJpbyrVNpepdJarmUm1LmR5qKtHuqTC3VlpYWfdW2ffX pxzZkXVwW1Z5siQx3tckcrPEeiTG+9gknkahkz3OI1nukyjzTJJ72uJcU5Te JpGrJdbdHodFP3u8rzXOxyz21sd4GGI9TaxHgyIFwA2qBkzedqs8qDglfk9d OscmJqk/2dvZVCtvbYyPXuxnkPhj1MX6akQgmnCjOEgr8teKAnQxQUZxiE0W aYoLxD24QS30UvDc5dFu8ZEuoiDgxqa4cCdx6GZR0AZBwDpBwNponzcggf86 UeAGnu+b4R6rwtxfi/RaTcKKMGA9SeDzushvjThwbVzw+vjQjbKwTZAy0lkV 5aKOdsXIzblMMAINgguOMpZGWxaRiONPcT9IRhvgkiRsozRiM61TAhtlshHa EEw51lvWxoDgwHH4ev3wtVhloXZFeKIqivmHW8tL0wsyTTF5dmlJqqqhOAHa t62gtT6nMEluk4elG4Rl6ZqaXNOWQjCLGdpemrCnLnPvluymqtS2rTmk9obc ju35+3cU0LhvWx4mnY2FB3cVQwd2FjlODjWVQJgcbi4/uKv0wE7MSw81leEU Orq7cqkO766GjuypwXiopQoIQxWVMWHhpYqTow/90dlfjllk9PxFwsuRlq5A R1trj+2tIx1vqyd9kSt/KRAtzexa1LflYZ7YQlDJUcu+4WXt/0sBioI+S1vA cCYXYAuYBTtwJiiQa6/MtlVkWcszLaXpJq79DU0ALKCSXLsKyrJJycbiWO44 OyE+3SImPwtVPF62hphjt0euSwsQhsv4YqBDGkbSx4WpY4KVwkB1TIhKFCLn B0JSUYA0JjBOFABJhP6YyyUh8bFBMnEwJhgxp1OVJFAtCVSJA5Sx/gqQy4Li Bd5xPE9IEu0hBrBEuEYFrY8MWhcVvIEftlkY4RIT5RYb7a6KC9bKwoyqKKtO mGiUpFpl6XZFVpI2J8WQk2LMTTVBeWlmqDDTBhVkMG0W89JMTJXgFENuijk/ zYqRagVDFPug3K0Muw7CKaCDkGRRxIQgxTH1K4ntHY8fxxwruKoSR4nC/Xxd 1rpvWIUxOshTJgzTxPEMcpFBGWNQxRoVMXqZEKdm0JAixiAT6uMFegmPEro0 okiNMELGDwXRqGIjlTERMkGolBccFx1EhnrMxZEBuGrXSvNTLc1bqw/s2XXm 6IGJgfM3ZiceXL/0zq2rH9y7CX14/xb07u1rty5OzV0YhK5Nj12ZHJ0Z6cfN 0MWxIZxenhi5OnXh5twkfvz6zDjGa7Nj12aZiAnAhGm/eKEfVAI2gaYHuuaG z57a37y3oaI2PyVdH0tsAh5JUETa5RFUxMORTea7nJhj8ZcTf8nPHW3qP9V6 4XznpQunLo+dBpVcmzxDoRNyxM8OHQZcTA8cAGVM9u2f6O0Y79k31LV74FTz yBnGNoJFCDfMDh2BZgYPTw8cmuw7MNHbCWHOFRAGnlxjoyc3p7pvTZ+Bbs+c he7MnoMcV7jF+5f6H1wagN66PEh6+8rQO4CRq8OYQNz6W1cGlvZeBJ5Af+uN z8qxcqwcf9dHvvmFItsrxYlv5FnesMe/FBf8ZLjrt9549rHXn3ps1VNfWfXU /3jtqW+/+uPvvvjEd1784dde+MFXX/g+9JXnv//Y89977PnvPrbh5W95rf1h uMcLQv9XYwJf4/u9HOn5XJTbDyJdfxDl9kSkyxNB67/jtfp/uL/2NbCJ0O8n CXLfdH1osjooSRVkknjHCwNjo3yiAp38XFdtXvOU14bnFHzPFG3krsrEPbXJ LVX2PdX2xlJDc6V5T6V+d4UO454Kw54K44LMzaWGphI92KRzSyrA5Ghj9qHt 2XVZyjxTVI4hosgmqEqLg7J0wRmawGx9SJrKL8cYXJ0R21Jh2FeXvK8upa0m uaXSvq1IX5OlLE+NL06W5FoE6fqoFE1EgiqUqXalDgN9AEmS1GEp2ohME788 Qwkq2VpkrsnV4dQU50f2drZKsLdK4Knieyj52Px7Mj6OGD+tyE8t8NUI/XQx AVpRIGSIDdaL/XFVI/RRC7wVPCZUAWljfDnhKi4xWVWRbopobOCxdfdXC72l 4S7ikM3glJigjZAwcD2wBQKbiPzfEPquBqHwvVdxAq1g0VG4gSCCOAKwQCjh GIKhKAzYYVGGGMcmTBnkz4dpHAGHIxq8BB4OcS8Eca+4MAfguEgjnKH4CNcF ucVHgFx8DGJ/szQYkJJjlVTnGGvzACDWLYU2nAJhsi1igMmOsmSwSVm6Ksca C5WkKiqztFXZuuocfW2eEZcaim1glsbypF2VKaTm6rTdtRmt9VlELtyEwxZw ClEJgQlBSmdjMUQrJNDKkRZsxed9KFyHF7CJY1cXnBJrHGypcmx48YgGJctu 7xehyqPZZCmeLBthWdQOkrTIeLJsma95cFguye2L2GTpiy6ikkVmGUed6NgK cSYaevXOnZUdOyrat5W1biluqS1oqs7bWZmDsbEiu6Ekva4guTo3AdjCoEqG jpLHuJwxx7phXNNJiAz4nAefRK0eiVnAKVxr+wX7SaRFEQWZ5ZFUl5hM9/q4 SK04HKNCHCIDejAKhuLBKcKAOKE/JBEwIwMvLLnIRL5ykS9IRMr34kgEcxLh Ca1LeO5injt4BFQiinQVhDOKDnGKCnaKCnKODHSCIgI2h/tv5oV4CMO9YyJ9 JbyAeGGwPCZUERtmVAotmlibTpJojE+xKNLtaqa14oKxnbO3O1YJ5vzvVDGY eISSu4AeEBdSAZsQsDA5XezNdA8uAUPEUYF+ruvAJj7Ob3JsogOAgEqUMWAT iAnQqMQAE5JRyuAJxyYKYRiQJJ4fgpEmYBNtHA+0gklshD/VJTbKRQl6ZbrN WJyVuq2qpKN5x+lD+3pPHRnoPj7a0zU93Ds7OjA72o/J5GDP9HDfxbHB6zNj IBFQCcbbl6avTV+4ND58aXwIhHJ5Yhi6OjV6fW4MujY9Snhyaaz/0oW+qYEz Yz2nJvtOjfecONbW2FJXXJmdwMVNHNlk2b7wmVYJ/k627Sg6f6x5qLt9ou8Q gcnVie7rU2dvTJ8j1wnwZHYYxHFoZvCgI5v0n2w6f3RH34ldw917LpxrwyJu AIBAjoRChbNAJUxOFwsmNya7FoEJhyFL59C9ub77F/shwhPiEUc2eYgny7EJ 9WH8W298Vo6VY+X4uz7K7M+UJTxbbH8uz/RsmvrHppinZGHfd1v9zTXPPPby E4+9+IOvvvTDb7z05Lef+s7XnvveN57+ztee+v+++szjX33u+1997ntfefo7 j61+9mvOrz8e4PI0P+CVuPDVsSGvRXo/J/T+Mc/jh8CTCOcfhGz8ru+b3/Ja /Q2/9d+Thq7JMoYXJYqyTJGJykCdyD2O7x8d7Bbivc7X5TW39c8Hur6iFHgB AXaU2cAmzZW25krrjhId2KS1yrC32thWY9pbZWqtxGhuq7a0lBkBJtDeKtvB hvTju3JPtRS016ZUpcUDTIAn5cniuix5baasNFGQZw4vsEZm6YOKE6Kay/Un d+f0HageOlJ/4cSO8dO7xrt2jZ3aOXqi8UJX0/mD9Sdayw83Fx1qKjrUXHS4 pbilJpXUXJPSVJWMyd4tmdtLbRWZKtDKQu6WN1tKy5uTNoYxmOtj/Q3iIJZK /DVCf7WAkVaIUz/W1uGN7beS56WIBtEwJKJkF1UCb7XAB5fIqA6BTfA0ysVS 8j059zpoBWhD2VmqKBdFhJMsbFN86EZpyAYIE3Hg2hiWWSDiFAAL5Ylx2WIk vv8aqpNMAr8AHEiEEhx60KljeIWLoSwSxztEIjQnQiEwYR06myhaxCjMeUEu cWGuklAnoBk+r1UWQiGSqmwDsUmeXZqgDE/TC4pTlBWZusoscKLQHB9kkPhj tCtCE9URiarwFF10hlGQZRbl2sQFidLiFHlRsgzwUpGJR+lqcvE089YiPNCy rcRO8NJUlQpsYQMu4JRC4pH9O4oWmlEWQJg4xlOO7OHCJfPZX9ifg01o4rg/ 37/rYVtwrnv4o9lkkQf/y0RSlsUT6OjeukfjCccdi1qiL6oq9rkgy3LFAR7N Jo7EsWiFi6FwouQ0Sgbj7ud0sn3byfbtx/c2HN2z5cju+sMtdYeaazEe2FUN ZmlrKCVm2VWVu73iYUfC+cq6hbaybAOlipG9hSsm5ogqi6qHUWdJqhWGcSHO IkrSMUrUCqlAMethEZhkPGN8tFnO18VHaqThkJaVShKqiAmSxwTJRIFSgX+8 EEgSKBMGYC4TzoMJ6CM20i0mwlUU7oIJAyMsp2A+f8rzFPM8Y6M9RJHuwgg3 fpgLL8Q5NtpHHO0bE+ktDPfih3rif7BRQa5RQW6kyEBXKCLABYoOdgezCMK8 RBE+sVF+wJY4fqBaEgVM0Er5oAPK4AJNkBxd8MANjBQKIcvJoogJByZgGUzo Hi5uIgzz9Xdb77lpNdgkKtBDLsJ3woc0MuCJiJLHiFAAFya8E7nIkU3UgnCw CXhEEhUIAUOkvGBILgzDGBPuB4kjA+iqOCpIyg9ViaNNSnGySZ2fZqvIT99e Xby3se5E557e04dHe09PDp6dGem5NDEI1rjDGEnGL40PAjq4yMjcWD+EyaXx gSuTQ1dnRqErk2CWQebqaN/cSM9EX9dQ91GwyejZo0datzdVF5amW9J0y7PJ IjCBMiwS/FXs2FV69siuwa42sMns8HEKmtycOX9rtgfjPJ4ssMn0wAFiEwhU cu7I9p5jjYOnW0bP7sU67nFkE8ITiKOS6xOnCUyITRaBCXR37jzp86jSc3e2 lwhlEZssxpMVNlk5Vo6V4791FOq/XWT8Tr7h21mab2doHk9VPZ0oeyY28Fnv td969UdMiOSlJ7/+4pNff/q7X3n2+99++rvfeOrxrz/z3a89+72vPvPdrzz1 +GMv/vArq5/7uvPq7wS6PS0MWSWOWC0IfkUW8lJc4PNi/+fEfs+L/V4Qej/H 83yG7/OiMdalJDmmKkueZ+Nb4/3kkZsEYR7BXusC3NcEeb4R6LE62n8dscm2 EgvFTcAmO8sMe6qtYBOASXuteW/1QzZpLjXsLseppb0moXNLKtiku7V4b3US 2CRbHw42qUyNq06PL00UlaeIACbZ+pBUpW+hLWJniQZsAjAZPd4wcXrX1JmW qbMtE13N46ebZnrbx8/sHjnVNNrVMtnTdmn44NULR66MHsZkbrBzqrd9+HTT mc66Iy0ljeUJRcnYHofYFMHZVlFNnn5nZVJjRfL20oT6Qktltq44VZFrk2SZ YzMMMfjHyCwN1cUEaoQBkJrvpxUFqPi+EIAFoyLaG6Ms0ksW6SmP8qJTtcAP V7EzZ4zqAm/ilHnHusCbs65rFhBGHe2mjnbV8Ny0fHedwEMv9IRwyiRxRbsq I51BLpA8fDPn2QeMUG0xMrMsFQcvjm4X/BRJFLSWAxlK3+KCI0QijnEZLp5C QRbOvaLgucmiXNnQiQsFTcAjskgPeZQnIEUexdj2LbKQVB2/MElenqEtSVUV JStAJVjEWJqmrszSl6WrktQRCp67JAzIwwRiMIeUfA+10EsX42NgEsYCgC0Y rbLgBFV4kiYyRRuVbuBnW2Ly7JL8hDhgC55TmaUFs9TlmxqK7dtLk6gf5a7K tObqjNb6nN21WSSQCxEKyKV9e1H79mIS226yBKLoCSV3cczClbdy1LItSxYh ySIz/rKEsohNlhLKF4HJUjZZaj9xrDb8uZyr5eImy76TI59nE0KPRRZ+x0XH FbAJxU0gjlaYGErrFlDJIh1r3QpxtDIPLK21DsXK5u0tbFWxvF212VxVMWAL dW+pyDWV5xg5qz6RC4VauOLGlBjGVgyTpJkkKYZYKNUYt2BjkSTpJIlacYIG m3y+SckjGRXRJL0sEgKqaOLCVOIQ0AqkjGWyuSh0QvGRhzDCzoVhzhCARRDu Ah7hh7pCvBCwBoQ5QxwO8uQFe9IcMAI5Ekq4v3Oo72Yo2HtjkNeGQM/1QZ6b Atw3YAzzdSFFBriLsNuP8I+NDMAojgJDhakl0QbwAhfgWAiXcJYTiPObcJZ5 whmwDz/EO9BjI8DEz3UdL9hLEROhlwnBJup4vo5lEzwcp7p4AQMmLKGATcgU rxaGq/hh8bwQio8AQzCCQSh0wq2ATSBMpPzgeGFIvCCEmQhCFLHgIF6yWZGd bCjPT9leU9TRsvXUodaeUwcGzx6dGOy+NNF/eXLg4njvxfG+q9ND12aGMZKu TA1emRrA1bnx/tmx/pmR3unhnsnBc5MDZyb7u8d7Tw91HZke6BruPgw22fVI NlkaN0k3x+KvHNjk9IHt/adax3sPTg0cAYksYhPGFD8C4jhMbMKFToAkEAVN FhK6DrHZX0cWiVzwHJsQniwLJvcu9kCOeMJo5vydmR5HNgGSvHttBFqEJ2+v sMnKsXKsHP+tI0/31Tzd17LVX02Tfy1N+c0MzY+z9M+bxD8RB/3IffW3Xn/6 sZeffOy57z/2whOPPf39bz39/W8+8/1vPP29rz/FgAnDJk9/77Hnn/jKqme/ 5rT68QC3Z6MDXxWGvB4f/KIs5GV56E+U4a+pI1arItbIw14HmGSbwrfkq7cW aMEmWqGbwG9VoOdar82v+rqsApsEe73BD1wv53kka8Ibis2tdSm7axJ3V9ma K817a+0UN4Faq4xgE8IT8pvsrbLuq0082JB+oikPbLK7wg4eyTVGFtuF9dnK uiw52KQ0SQA2ydAEpih9iuyR2wuVx5oyBw/XgU0mu5pmzu2e7WmdOdc6dWbP dE8b8GS6p32qp212YD+o5Pr4MYDJ5ZFDmGMcP9fa1VGzd0tmQ7El2yIEm2SZ BTvK7GcP1k/37bs4eGi2/8BUT8eF7tahk829R3aeP7Tj/KGdXfu2Hmmpam8o 2lackm2JB57oRMEaYZBGEKjiByiifGUR3vER3jiVR/pIw70wYq6LCcFtygUw YTCEZRPQilbkS/EUfayfURJgigvESF4SAhMSzQ0iLwgT4hQsck1SKCOLIwWK dJAAL4AO0AcVQCaE4TiFyo6RFnENVScjEcIQvHCxGHohCC/Nmno8QRDyaDdG bG4bKw/giSLag3z65vjgRFVkpikmPyEePJKsAesxeXEpOl5ZugZsUpAotStC 8QRx6KbYkI0k1rnDBGUALJQzRtEZTHAnRy7aGB9jXICRJRc8BMCSpuel6qLZ 9i4S6k0JGqKoTW2euTrHWJNr2lpkJ2zBuKMibVd1JlNYrD53z5Y8Utu2Qmhv QwGECfgF2MLFShz1ZdhkKaF8zsayhE0cVwhPoC/ymywNiDhU2argss6WZRnu XTnqy7DJ0jjIoiSuRZGUhzziUBj52N6tx/c2OMIIhAkWKZhCbMJAyp6FN7y7 ilofch+NKywGtTeWUPfJPQ0FwBYqLMa1O6wrTgC2UNMWiOqGMUGWREW2XZ5p jYey7cosmyLDIks1SlON8SkGKfAkURebpI9N1MXYNSKbWogRp5iwEpgVPL00 QhcXrmeiKiGauCCynChi/GRCH0AKRpqAViiYwsRTIj2EER7CcA+WR9woRIIx OgjyYBTMgkmwF4ck4JEwPyfASIjPJkxIhCdYgYhNAA6YQDQJ9XGGgr024xTC BMwS4u0EEbxEB3kCN4RhvsAWlTgK5AKyIHihyAvxC2V/4RLuxGN9XdbitYhN gCFgFo1MADxhJnE85iFxPEroIr8JY4EXRagEjAVeEhlI9AESEYX5YmRCJOwK RyVEKBJeYBw/UCoIkvACxNH+sVF+GGUiQEqYRhplUolSLMqiLFtdWfbu7ZVH 9u08c6y9r+vgSM/x8YHTlyf7b8yN3Lw4Cl2bAZ4MYmX2wvnJ4XMTQ+cmBs6O 9XWP9pwePX9y9NyJC+dPDp85NtV/mtikuaaIZRPRI9jkc00YzbGAYvzNBJsM nN67LJtcnehmigmzbLLIcjJ2vn28Zx/VB2YjJofZ2MphElEJhVGos8kVh9AJ tGzEhNiEw5P5xbn5oMmDSwNcxMSRTRzwZMVvsnKsHCvHf+fINTyWpX0sXflY qvzrqYpvg01yjC9kaFfZpC+Kg58MdPrm5le/uupHj738/ceefuJbz/zwW88+ +c1nf/iNZ574+nM//PrzT3796e99BXjywpNfWfXc19e/+h2P9T8K8ngxxvdp 4Ikq4jVt1Bo9b62Ot04d9Wa6LqgyI66lyrar3JJvF8gjN4W7v+jntsZ1/Ute m17xc13l77Yq2n+dNNI1RRuxpdC4pzZ5T01ia03C7mprW10CSyUGVkZQCcTi iZXYpKMu6ciOrNO7C8/sLdmaqy5PFpPZBGxSmykvT44tSeSDTXJNYZm6oJLE aLDJ4ca03s4q4MnYycbpMy1gk1nAyPk2sMlcf8dM776pnvaZ/g6iEoyki0MH wCan91XvqUuvyzek6iLtiuCiZOm+bTmj3S2gGFDJTF/n5eEj1y4cvzF+8sb4 aejKyMnLwyegi4PH+4/ubihKNogBHSH6mFA1P1AW4SMN85KEeIgCXDAK/Z2j vTcK/JywbpKEJyqFVnmYXRFulYeapEEGSYA2xlfJ86T8LsITMq1gA6/lzyMJ RUwc8YQmYBOKqnBWEce+J3qxD3V45JzyZPDn5pxZnkAD2EKi0MmiOsnhnq9A FGch4SrWcRsXc1nwzjP4EB/5f9l7z/A2zjPf24lPdrNx4l4lWbItWVajqEKK vYNgJ0gQIAmwF4BEIQg2kATBAvbeexF7L2ITKRZRvRdbdmJnN827m80m2XK2 v+d8e/8zNzmCSdnJ2XIlHzjX/3que54ZzAzY8Px4NwDLWdZjwojYBO8U7w6E AgSLF7sopB7aGH+wiSrcC2wCbIkNctZEMSnzQAlZCGZsiHFAH/7Ox4lEACac iFMIWMimXY5ZQrwsJCy2QJy7KjrQEV98pkmlxB23Zm/nmxIrSJcJQS6ZiUx5 sbyUKGN6bEmWvEyfWGFQVuaqynMUGGsKNIQtpJbKTOoD3l6j76jN6ag1YDHc VZ+HpfI27axgbKqvVDD+ejbZNvnMusTbYrS2igDnURNzU+/JTjBhlvrPiun6 ZjYxvcgznTim2fGcPdZTBW3znox31Yx31Y511lBkF8kUVfqbSvsaS6BBE7cR VzkZb4p7j1yUHQdNpp0rmdyWJiPbzD2HmrY3lWcQsDChYrmqUr2yKDOhUCfP T4vPT5MZtLGZqkidMjI9MTxFJslIDIOobhjXkEUdGUii9pEKtoNkvNQzVsKP CXWPDuFFBbtFil2BKqa08hRYBM7B/i4iX0eht0OAp52fOxPE5etm4wOBR1ys vZytPZ0gK3f7TQyhaC5AClDF1fYk4yixMSNhl/GebCEJqMHR8gQnDlhggCls Tx+B7M4che1gcZxOgDBpc+ojzHOHIMCLl7MVHikQpODt4sezA93QIVwTh4L9 eIARBmqCfUOFnkAVApxwjEKviCBviMBECjDx5Um83QL5jkQfxCb+PDsSOU0g TJL8+bYCD9tAL3t8lUAlGGFvCTMO+BpGiD3jwwMSo4PSVJGFek1dmb6npXxy sHV1fvjyxbGNpYmrlyavLE9cW5m6vjqNEWxy5dLslaULlxen1+Yn1+bGwSbr c+MbC5PXLk6uz44Mt9e1VuQb0xJ/p9/EJKZLWJqTiB/Cqf66S9NdYJNrS0N3 L08+uDpDbPLw2gWwye21cY5NTFNOIAITjk1Y38omnlCOCaiEE1dDmPOb7Azl 4tjEVD+8/TTThIMRYpMdePJsNvns9vwfeuGzu+1uu9sf9aaLfy4j7nm9/Af5 qrfzVPtzEg/oE97LTzqeFvO+UnIgWrA3wOFlm8PPH/jBt175wbde/cG33njx 22++9PxbrzzPssl33nnlW2+99K29r37rwJvf3v/Gtw7t/ZPTh1/xt30zlHcg yudIrN/xOH+zGD+zSJ/j2ijX0ozQjjIViCNbIQj1POllc8DJ6ug5swP2Zw65 2hx1sz0KNvFzPgE2KcuKbilRtZaqwCatJQntpYkdJXHEJu3FcR3FMghs0mpk XCdgk55y9VBd+mRbzmxXQWlaaKFGpJf75qsCKzLCytMlxVpxaZqY8CQ53CEz ngc2GazXXhqqWB+vZcBkto3xm8y2X5tpA5jcXuqFbi2dv7s68OjK6OOrYzAo suvm0vmVyab+xhyASa4mJD7YSRbibEwNG2zOBbOAYu6tDt9bHQKb3FkZhP3w 8vijjcnHV2ZuXxq9vjh4Y3Hw0nhnc4lOKfUBm8QK+WG+zkE8a6HrOYCJp/UJ nsUREv/cMRHPWh0uKEyVTXSVzw/WLw43zg3UTXZXDDQVtJVnZCmCsSpOkwVi oa4M80xgO7zHCGw4JCFCwUxsgC1NMrsBtowDxR/08YzeKFx6O5tCcgaCweWY 0FGqrAVxLU44/wsJCEOZ78QvMIhKqCWlm+V+l7P7MFKTF8AL79wBd6v3PW0/ 9LABuRzysv3I1+GYv9OJABfzQNfNZBMx/yx1iowTOQMNgAmbfiJf3N0O4JYY 6q6O8JKzbAK4kPpYUXAXAzteeC+bMWMQuUtCvM5uprewjhWBywl/F+CVWaDb SYzYhQLdzAJczKjmQBDvNFVUFrqdohQYrgUMHgDAGC10jg5yjhG5ykL5inDv pGh/bVygJkaQHBuQKgvSKUL0SWH5qdGFGXFFWbLibDkWIdRcr644pbE0jfoV cmqBKjPbq7LZULEccrhAbE59wbaCxhybDLIYMrSpUgZMMP9VbGEY5GlRYizO GbE5I4VbXSM3S4cxbFK/iScMm7B4sskjrV/xsJi6bzh9DZuUDrZtz7vf9I98 FVgISbY5VkxZ5qlLhcUQ8MhoB5N4Ak6BYA9/JdaLjexqLaEe9/RO6X1xnIIr 0+TOzph0X7Yqci5HavRVYh+mhE3PAc0VdNbmtVcb2qpyO2ryMTaUZNUYM6oL 0ityU4p1CmOaPD8lzpDMVA/TJUpT4oLZfpFCTXQQaIVqHWNURPklRHjLI7xl APAwTyhO6gFIAZ6ATcKDwCmuhCpSIU8SyAsNcAv2dxX7bvoFBHwHf3dGfjwH Xzd7H1c7CMzi42YFHjH1mxCnYJcgxfHcMQfLow4Wx4hKOL4gDCESwTxhC+ZJ BCNWJz88Z3bI8sRBzOA0mrE4/sHpIwfMD797+N3XD+199ciBN08c3HPqo/3Q yQ/34QSciUt5OFoKvZylgQyShAZ6BgfwYQBMgCcSAV8KTgn0DAvwDPPnA0wk vrxQb7dQb1ewCeWVEJ74udl6O1t5Olp6OZ3zdbPdpBKWVjYxxJPYhAETf76N 2M8ZhrerpY/bOWAd8ARfSZGvU4jAVRYRkJwgzUyOLctPba7O78UPWE/9eH/z 9HD70kz/xtI4Qyhrc9fXFq6vzF1hvCfTG4tToJIri1O3VudvLE9fX5oc72nq qi0yrSFMbEJ4woHJJpXEBDCKF5boE3oa8if7aolNri8P378yDSQBmHx8cx4G dTlh2cQ05YTBk8tzTBNGiLwnAJNbK4MU08Ulv5O7BPZmLrxJIryp3+SZbAKg IH1+l8sxYdnkPsDka9nk87uL28T4TXbZZHfb3Xa3b9wy5c/pE58rSH6+OO17 hdoXDMoXc5QvG5T7DIoDWfEH9fKjKREHIzxfczn+7X2vfxsMsufl5/e8/N09 L77w1gsvvP7d7+17+cV9L7+w77Vv73/z2+/tee69vc8d2PucwHZvnL95jK9Z nP+peMGZcM/j8QFn02L5JemS1mJlozFBG833c/iAf26vg/VRyNbyQ1uLg842 H3k5Hfd1OSEPcytIC2ur0LSUqVpKFY1FsibASFkc1F4aC7WVxLSVxLYVx7aX xLcUxtbnRvTVaMZbsybb9RNt2aUZITlK3/Q4d4zlmZLK7LCiVFG+JoAmtVEu mXLP6pyI/rqUmf6i5YmaK3OtV+fbNmZbrs6331zquX2p985KHzCEeOT++hD0 cGMEkHJ1vnN5vOFCf0VPbWaVQZYa5xsTZK9kMvcTZ/srry9245xHV0YebAzf XR+6uz58f2PswdXJR9dnqALkxuLQ5YXB5enzPU2lyTJJmMhXKvJhAhiCfbC0 EPCsfZ0s+NbHPW1O8CwP884e8rM7LhfzqnOUF/qqLo03X5vvubsy9GgDsDMO 9vns5oVPrk09vDz2YH30/toIZm4sMj6dpbH66d6yoZa81jJtaWZ0tjLIkBSc Gu+bIHGl9u5xIgc8doLEIUp4LtTHPMT7pNTvNAQ7iH8s2MsMdrjgLBTmf0bi e0rqa8GRC9dFheMUSoSnXdM6XaapJQAZOkozlIRC8LLlcznh63gUUOBjf8TT 5jDwxMP6Q74VdJhneQjydTjBcoqVPNgdH+gYE0L4EX72Yb52UQLHuCDX9Pig hFD3OJELOZWCPSzAEYAIiDLrQRabaSxeoKfTId6noGAvc7HnSUjkgXd9VuJ7 JtQHXwfmKGYCecfohYQkga5gJXMYVCeNiqTRPPiFbkR3oQQZIBXj2xLYRzNI BZhyiWc9LwBJSB3hrY3xT4kVpMUHUMyYXhVqSJLmayOKM2LLsmQUMNZYpG0u SSW1lqW3V+iApSTK06cM/b5640BjETTYVDzUXDzcUjLSWjrYZGSLHueZari5 YFMtBUMtBcOthcOtmyn8rPvAyKmjWr+FQvk99Xm9jQUAnCHABcBkCz0oT3+A KaG8qf5mI8l0khOlvdBFTKPOuJAzLmf/dwZ6fUPu/LYaX8/Okdmij20xdaa9 LHfqmQ6mneKaxXy14QvTt6WzztBRm9Neo2+rzoYApxV5KoCqUReXmxpFPSWp 671WJkyKDVBFCRLDfRPCfBQRgq0GkUx+fbTIM0bsFS32imIVKfIMC+RLBLwQ P1exj0uwr1uwj7vY2y3I0xUSebkJvRwDPBkPgp+7DSDF09mC4ri4mC7KN8Fo f/Yo+UEgAg1iEBiEIdbmh4EVEBlAEhKRCEbYmAennDn6ntmhvUffe+vgnlfe e+vF/W98HyNByrH338ZRXM3V5pS3i3Wgp5PIxzWYrbhlqlB/dwiEQgbV46Jy wUFbwmtZHLPHSHFlkB/PjjxHLKfslI3A3SrAA/e1gQI8zgV6WgV524QJXEJ8 HIK97SMC3aKC3GODPZWRAXpNdKle3Vyu728pmxloXp7sgVbmBlbmGa0uDK4v Dl1ZGr22PHb14uiNlYmHV+fvrs9cGGjuqMozaGJU4b6EJKbaGdNFkFJjUPXX 5093V1PjxbsrY4+vXnh0ZYbqdGG8tzHFppyMAy6IOIAeVxdBKP3Qxvz5y3M9 VxZ6MXN9aeD26giXCE/RXNtiukyzTjhCMWUT8nSAR0zzTUxphfJHfvxg+Yv7 S5RIwjVYBIN8zmh+m350e+6Ht2b/0Auf3W13293+qDeD8lsG1bfyNM8btX9S kPyn+ZofGFNeLUh+pyB5r0H1bp76gyz5/iTpG1KP71iffvGj9779zivPvf3i 8++++t19L3//re/92Z4Xv//OD7779ovf2vPKc++9/dxH7z934vBz3pZvRnge jfQ6FuN7EmwS4XlcLrQ0qAR1ecAKVV1evCaS52Wz38Nqn5PtccjB+oiD1WEX 2yN8+yMe9h8lhLkZM8LbK5Nby9Vt5armkoSW0oSOsniOTVg8ITaRtRUzeDJY nwI2gUabdWW60Fy1f1aCF3gEYFKlDy9MCTJlExzaxibXFtoxXl/sJDAhNiEw eXB5GCLjylzHxdE6rPy7a3Tl2bEpsT7KMF6WQthRmbYwXHPjYs8n1ydw5j0W TO5dBqSMP7gy+fDa9O218dtrExuLw1eXxtbnh6YGmutKsow5aQX6lPzs5Jx0 hTYxPF7iFynkB/Ksgtyt/J1OedkcEziYJYbwa3PV84O1a1NtQA8KFQOhwAah PL4y8fHVSRI45cn16cdXx/AMn96cgp7cmPz42jhwCe8FVDU7UInHrs6VA1ig cn1UsS4sTyvWKfxS4r00Me5JUTx1lBukinRLDHOKC7aNCLAI9TnFZaaw3VuY Pi8AHI47aJJzoNCZ1MSEAETscWpn8eEdM+dCvCyC3E+xSSLmQt6pANeT/k6M xHxLUInQ7QwnTNoce8fy8BtnD71mdeQte7N9gBc/RzNgAifwArEDlVYmxwdR g8THKtjzlNjTPBjyggApgJHTEl880mlmhpnHMwNSzlABNBL1o6TrYJ46VxK5 YHyqrXT+YE8L7ihFqXEPwBRVYyutgVyiAuxjhE6yYDewFTFLUqQPiQLGCFty NWHAloKUyAp9QnWusiZPVZuvpmwX8Et7eXZnZU5XlaG7Ovd8bV5vXX5ffUFv fS6rHBI1cBlsyh9iNbhJK0yRMXLEbEU0keuksLPWQDkyLJgYKalkZ1MV1htS PNhWBA20FjJiCWXTbi2kQ0PtxdDTcmEsnjwzI+b/lU1+p57JJtv4Ypuj5Otq BfxX2IQgiGw2sSWPDeRjjM66XNAKGyeW2VyhA7BU5qvZxBZZbkpMdlJEpios UxWRniil9pHqaJEiIjAxPEDOBID5xYR4R4o8pAFYvbuF+ruGC8EpHqFMGSue yNtN6OEc4O4Y4GEPNoGITag8l7frOUqHpyivrdT4M262p52tThKbUFwWqAQk wsEIuAMCWUAcm+AQdjEPPMF49tj75offBYMcfvd1ApN3X38B4wfvvIwZYhO8 BDfycLQESlCu/WaGiJczAAQYQmDCVQnmwIRhEy9nohIS8QiBCdmcns0mfCsI eMISihUk9LIWedmKPG2BJ+EBrsCTSCEvRuwBHkyKCcpSRxbqEuuKMrrq8LNd Pnq+bmKgcWakbXGye+VC3/r84JXF4SsLw7dWJm+vTl1bHJnorqstSMtIkCrB lTvYZFsW/KbfJCagLi9psLFwpqeG2OTe6vgn1+c+vjYLMKEawlRS+O76JptA YBCOTQAmqzOd0PpsNwjFtELXNjYBmGzLN3kmm5CjBBiCSZxwf2Nis13jxgRO xgkMgGwhyS6b7G672+7237Xlq79j1PxpceoPyjJeKU1/tSj1tcLU14zaN4tS 387Xvm1M2Zub9HaO8q20uJdChQecbb730YFvvfv6cwde+/Z7r3333Zf+dP/L 39//8gvvvvSdvS99e/9r3z687/mTH/6p0GF/rN/JGF+zWD/zOP/TEV4niE0a jfL2UjWxia/9+0LXj3hOp90czZ3tjjvZHHG2+cjN5kOezSGZxKUgfdNv0lqm BJhwbPIUT7bYpKNUDg01pI61ZIJNRpoywCYGlR/HJhVZ0oLkwG1sUmOIHKhP nekrBJtcnW+7vtgBPLm51HNvbeDuaj8EMIHAIw83RiDa3Zhtnx+qnuwu6axK L86ITI72UkfwC1Kkgy25a9Mtty/1gQXur4FlRh5eGX98jflT//Aq4zR5cHX2 3saFa8vjG4ujy9P9a3OAlIkvPr7z+cd3njy4dufq0sXpgaGOmvbqgoJUea4m Jl0WrA7zTQr3yUsKby/TLQ7XX57puLXUDyqBbi8PXF84/2B9FEjy6Y0ZCFTy 2c0LX9xd+OzW9Od3Z7+4NwcDnEJgBTzBs12aaJzoLh5qyRvvLJobqLp8oe3q fMfGbNvSGGirdLyrcKK7CONYp3GoNbe3IbO1PLkmX16aHZ2bHKpLCEiK8kyQ uMpCnEkgEdM4LnKpmBYWxiTFfXF1hk07yGOSjm65YJiEdK4jDJPs72Md6sXU 6QKbBPGYYsIQIAUMwgfGnnnf4eS7jub7Xc9+gF0v26OeNkc8bT7ysv3Ix/4o ydvuCHb5Voc8rD8kXwwmqRGMn9NRyN/5GCRgQrlOQEHuoJIzod6EThaswYST EZJslQ6z3AQTXxvuUIgX3oIVVzPNVHgXm2jjYxXqfY512ZzjgIXr5MJEiLF1 oZ+ikM9X4CU2CF9zBl6o1ySYJTNRbOpqKdUllGcpKrKVVTnq2ryk+oLkBqO2 qTiluSSVeri0V6RTD8rztfreWn1fXU7fJrMYmDpjm2xCyeAF3fUFXUyLlryt ziwFm51ZvqY+GNHHNjbpayrYdKCweLLFJgx6cFTCXWobngxthX79t+DJzgSZ bYixsybA/xybmIqDFOKULZn4VqqyWyqym8uzmsoyWyr0TWXZ9cW62kImQqwk O6k4S52TGpeVHJWuCk+Wh6hjxcpoEaSICpKFMf0Ko8Q+4BSJgCmrKxV6SIX8 EIGbyNeZ8sEhjlMoU56S5fkOZ7k8d0p+59woEGzyoUDkOiFPCvlNSEQuHJt8 uO81UMm+174HwQCngE2Of/DO6SMHcAVcE7cjBwcjVxs/NiILhAIAIdcJkQiN nDh3CXlMIAZDtgxTSPkaNrEGm/i7n8NIbBLgcU7AsxTyrcEmEj+nMIGL1N85 1Ncx2NseM9gFqiSG+4MQ81LjqwvTmipzzjcVj/XUzo20r0z3Xp4bhG4sj19b GF6f6R9pr6zQJ+nkEtWz2GRnkS6GTaIF9fma4ebiC711xCYP1vEXfv7JjXlK NiE2ubM+cWd9DHxBoVngDgITQAp4ZO1C1+9kE85pYlpD+JlsQnnrwBNik3u4 71YwGE5mck922WR32912t/+BrUD1UoH6pcLkV0rT3ihLfwtskqd5yah9uTj9 9cL014rSX8vTvmRMfcWY9oom8ZAk6FUnqz858cFzB9967v3Xnn//1ecPvf6D g6+9cPC17x1++3unPnjZ6fReb4cP4/zNk0JtFCLLBKFFvOBMpLdZQtC5TLl3 jSG6s1zTaExIjfUI5h+Xepv7uFvxXc662J8AmzhZH3axOuhmfTA22DE/VdJa ntRcomDZJLG5RN5Zvskmm3hSEsdqk00G6rRgk+lOw2S7HjACNtHJPHLV/uCU 8kyJUSsEnmAyI55vyiYX+otWJmtBJTcudkK3L52/vw4GGYDIUUKhXBAlm4BN ZgcqRzuM7RWp+VoJwEQV7l6UHjHRVXx9sRvnAAce4o82U/NkmnWCzz26Nvvg 6szn9y//9MnNP//4xqPrly5O9C9NDtxanbtz9RJbJH/l5uWFtYWxuZGu8Z6G tgpDU3FmXb62Uq+sMajayzIHGwsXhurWp9vBJvfXRqB7q8MglMdXJj65NsWx CUb8wcejgo8AJp/enPrk+gR28RburPTjyS+O1gFJFoZrACkgqRsXe/DMFAO2 OFK7Mtl0baGLcIzeMgy8kPJrLvRXDLfm99RldtVkdFUz6qzOaKtIbSxWVxpk RRmR4Be9SqSJ8lSG8eQhzvFix1iRA/ELuVG4csFcTBcV6SJmkfqeiwywo6pZ WPZTJ0qJt7XUxxZsIvG2CfO1gw1UCfbA2t6SHCigFUxGCRwj/OyZQyw4iPhM KBcXgrXZntKJaU/p63Bsi1kOm8qTlbf9EV/HY35OdNoRX4ej/k7HKbuE84wQ SjAQwRIEgIJqEZAPhX1m5vmxS4WdqQHN006a/jvKPm81ryHYoWLRjOFjTVFh 9KWgtBrqxQlUiQ50iAlyig92lYfyEqV8RZiHJhLLm8CUGGFaXFCGTJSZEJyV GAJsydWEFaSEUxuXsqy4Cr2sLk9Zn69qKFA3FWmaS7QtpWmtZeltlVntVUyI UVsV1sM5JKowxtUZY06ozGZpJW+r5T2Yhe1632LcVPNTnW/I623MhxhIaTEO thK8fKVjy7ZOKKaEshMT/usxXV/XZfJ3Usk3sMkzG9M8sxTbTlqBCENMxYV7 tVZltVRmEZg0lupaKnJaKw3N5fqGkqy6okxKY6kpZlRVmFpRoC3NTSrOURdl q/MzFLlpCXptvE4dk5oYqZWHa+LDEqPF8eEBUSE+EWIvSaC72M8FbBLgaU+j L8+aa3ri4WgBWACVcHhCqfFcdjzHJlQBGIJBXhVKMyEBUk59tP/oe2+BTUAl e1/9M4AJxyYnDu4hvwkuyLM7Q5W+IB9AyhaeUGVgKgvMFd3iFLDlMdkmwAgY h/CEIru+zm8CMPHjWQr450AlDJjwLQVulkEeNoARCFQCQiEwIWEmPMA1Ruwh k/ioY4JSEkJzkmNK9erGkszuWuNAS9l4V81Mb+N0d/1UV11HeU5hSnxarBhs opR6bdP2jvBsQJc2yr8uL4llk9qNC+dvLQ0zbHJz4Ye3L358c55rbnJrdewO 6/UAI3BRW1SJi/CEwroo//0b2OT+78EmpoWFKf0EnMLNEJsAQ764v/TsmK67 C1/s0C6b7G672+72O7cC5WtG9etF2jcrMvZUZ79blvmmMeWlwtQflGW9Uqp/ qVT/YkHanxRl/Vm54ftZae8r4t4Q+X/f1eY7Z48+f2Tvc++/+tzhN1/48I3v HdvzsvXRfd52J0K8zmEFpRCd04bZA09UwdbyQIsYv1PKYJusBJ+KrAiwSWuJ KivRL8znVIjHCX8vO083S1cHM7CJo9WHYBN32w8ZNkmTMmxSqmyvULdXqNrK FZ3lsq/iCcMmBCbEJuOtWfO9xpmu3OqcCFAJ2CQvSQAwAaqUpAdzbJIS7Zqd 6M2wSUPa7GDJ6nQ9qOTWcvfNpa47K30PN4aBJ6ZgAtyAsGjHQn19ppU6mzQV J2UrgxIlrtoY79r8xPnB6lvLvXjVkxuTjzamHl+Z+eT6LD5TPr25+OTWxU9u Lf3iszu//flnv/3yRz/55M763NjCWN/63PjdaysAkztXl6+tzoJNLk70zg61 t5bntJRmt5ToGowpzUWpPdU5fXX5s/3Vl8abb17se7Qxvi2Ii6MS/MGHACZ4 BrDJD2/PwMBbuH2pb3WqmQBkebwBbwGccmWu497q0I3F82tTrcvjTWvTbbeW +gA7t5b771waYFw/6yP31oZvL/ffvNgLZgHCgFAgvPzqfCeABZNAG4y42tpU Cw6tTjYDf2Z6y4fb8s/XZ7VVpNQZFeX6ODBLapxvUqSHMtw9IdQlRogluhXn RiEPi8SHqaxF3hPGg8AuyyP87aMCnEAf4X72GEEoEBgENhQpcMTROJGbjOka w5wWIbCn6soEDsw6n0UGogZyeZDPgsMWgbMZsIXIhfO2sKkuh8jhgpFy8znh TAobY7LjPcBcjDMFlyUwwU3xDNQlM1roSGxCeGLKKThE4oo/0/m0u5npD0Pk gpkYdj6WSbdnLhjDnmzai5O5o8ApSuAcFeASE+gaK3SJC3JlvjKMq4WnkLqr IzyTo32oAWVWQlB2oihHGWxQh+QlSwtSIoypUcWZshI2Pb8iT12Vn1xbmFpf zBRDbipNbyxJg8ioL0qpzFVRtWTYdYVaGDitu87QU5/bw/hfnvLIeabOmAme bDJL0c66x8+sgczV+/2dePKfY5NteLLtXr9/vskz2YTLlP8GbeFJ/lZYl4Fj k6eqZlCxvdoANZdnA0yayrIbS7MaSrKh+uKs+rKMhgpdI6PM+jJdbUlGTXFa RUFKRUFqeX5KiUFjzFQX6FTGTFUOaCU1ITtFnpkcn66O1iaGa+RSZWxwQlQQ mCVG4hcZ7B0W5BEawBN6OWNVD0wAL/AdLMiHYlpD2BRPTFNRCFW4hBSwifnh d48cePPgnlcAJqT9b3z//bdfwqTZob1nj72PM4lNPBwtvZytqJYXsYk/4+/Y LLTFsYmpyF0S4OEYsGWTJ4V4hPAEI2z/Z7GJv7sVwATydweeWBKbBPKtxF52 kMjTFlQCNiEkgaT+zpFCXrSIHxHoFiZwCfN3Dhe4RAe5y0K8kyID02Wh2cqI Kn1SozGjuVDXXqqvylLnqaLTo8XqZ7HJV0oHs06T1NjAlGgB2GSoqWjm/Cab 3F+boB4iT24vfoVN1jbZxDSyi7wnVxf7KN9kW0+T/1xMFzlNKKaLS5PHDOaf lu1i8eSZfpOdYLLLJrvb7ra7/T5bRsSrBtk7RZr9FekHa7MPV2W/V6bbW5Lx eoX+7XLD6+U5rxrT/6xU//3qglfzst9NT35bEftWlPjNAN6rdideOLbn2++/ 9PzxPT9wOnFQ7GYVH8RThLrLg13lgWeSpXbAk2SpvUJkFSc4Q2xSmR3RUZbU XpaUowqUepuL3Y8Rm7g5nnSxO0Z+E7BJjNihIE3KxHSVKjsqkzqrktorlMQm T/GEZZPuCkVnWQI0WJ8y2a5f6CvEWKUPB5tkyj3BI5XZYVBpRsg2NqnNjRps SFsYLlu/0AgquX2pB3hCbPLg8nYwwYL/7uoA6AOL/LHOwp7azJq8hJRYH1mw U2ZiYHeNbm26BUdBAYzHYZNN5n94e+nH99d+8vjaz57c+o/ffvl///GXf/+X P/7s7tWlycG5kd7VC2OXl2aury3cvLx4fW3u8sWJ5am+C4NtzaX6hiKASWpd HiAufbDRONxcPNNbuThcf3WuG2xCjpLPbl4AlRCe4O/853fmN//s37kAKgGb fHJ9Au/ixsUe0AQeDwQBlKCHBGRB1+Z7r8x2X57pxHh9oe/W0uCdS0P3Vkfu rzF1jx9tTD5YH79zafgWPvIWusAywBNcCiNsyvpnnERstBsuS14YXBY2DJyD m16aaAQTTXQVj7QVDLXmDTQbeuuz8eWCmks0VQZZcUZkXnJopkKYHO2NJXSc GKtxp0iBPRb5LEow0VxiviW5SwAmYJCYQOd4kVskm/+ukHhyZTkxyTEItUch 1wOXLfJV2WzJGhdng8esxHwLVgANS5G7hdDttMDZ3Mv2CCXmu587CAFVPG0O E6QAZHAIAs5w2MKktzgz6S0M/riZg1w4PwhTi5h1nTAdW9i+mUxvGpY7gBvy EB5QIl5M+fJM+JZC6sEpUcKngC7KScEMDOYlwcxLGJwR8eJE7nFBvLggt9gg 1xihCyOWaJh2k2JnWTAu6wolglZYKaW4FF8Z5sEkuUT6MiXF4gNTE8QZCkmW OlyviSzJkpdmJ3AlkaHyHAXGmgINqARsAgFYWIRJay4Dy2S0Vujaq7I6qrM7 a/RQV20OJ/ALKyAM43ahBBZCkm2osqlnIcN/C5t8HZ6Y3u5/gk24GDBTNumq Z6iEwIR8JRBBCoymch0gscaYUl2gbSjJBJtAYJPGUkBKDsaqwuTKwqRKo4ZU UaApz8eYDJXlJZfmaor06sJsFZSTKjekJ+bpVLkZSnBKTlqiIV1RlKMtyErC DGyQS2ZyHLBFHsn0IomTBkaH+IcHeYf4u4t8XLHOJ1ohlwoRCldbmGK9gCeU ckIp8+fMDpHf5NDeV/e88t23X/oTaN9r3/vgnZeJTTi/CdgHbIKLQ+Q34fCE CGVbyxIqz8U5R8hdQukqXNYJgQnpmX4TPzdLjk383S0gsInIy3YbmxCe0CRx CnlSJD6OUJiPU7ivc6S/S7TALTaAp40KylVF5auiS1LkhZo4Q0JEZkxwUpjv TjbZlmkCMGHE5puATS6cr70613fn0ijDJjcXiE24mC6wCSWzY+RavROVQBvz 5ymgi3jkmWxCxYS3pcM/k02+0taEdZoQiRCzcNoW2bXLJrvb7ra7/Re3SN73 E/zeSBLvSZHsy4p5L1dx0Jh0uFD7QWnGhyW690t0+/O1b5To9tTkf1CgP2DI 3K9PPZShPpYQftjfea/NsReczPYJnU/JRR7JkYLkSD+VlJ8Y4ipj2SQ9yjk9 2lUdYhsrOCMXWqbG8qtzojrLNcQmEq+TYT6n/DxsPN0s3J1P8RzNXO2OuFof AptECG1zUyQtZeqmEkVbhbq9UtVKfpOKTTxhCKWUUU+lEmACQhlpSp/qNMz3 Gocb08t0oXqFj07uadQKKd+kOE0MG8DCsUkdyyYXxyo35poBJndWzrNs0suC yRAIheKaCEygO5f6sPy+NN6INXZ7RWp5dqwq3B1skqMWDzTncq4ErMwfbUx/ fHX205uLAJMvP735t3/x+O+//NHff/n5f/z2L//xr3/yxcOba7Pjy1Mjl+em bl2+ePfayt1rl26sza0tjM2Pdo911w+1VnRU5dUXpFRkKxoKkrurczorsqa6 y+cHazcudD68PAYqIRGkEKfgTz25Tj6/Ows22QKT8+szbQCElckmPCHXRBKc sjzesDbVcXmmC4QCKrm3Onp3ZeT28hBLKMOEJ2ATmlyb3kQSXITeI5Ea8QhE BoswzAkQ3RdggvHiaN3F0XrcEbvzQzXzQ9XM3adbILos48eZ7by+cP7afA/e 49Jo8/T5quHWop4aQ3NxWqlOVpwep1dK8AmuDPOODnQGoVDMNj7cQSVRAqfo AKdQTyta7TPehAAHLoaK/BSb2upWCSoh50uYr124nz0U4e8AG/MhnlbUjx6C EeZnS3klXCI8uEPkfpYr3kXp9uAUU98KJw5bIIGzGeOscTWnTveMk8XHGk/F 1h92jBO5yAD1ITyCDuAJdoEkwBCmrpcU79eDy5TXRPkmR/tpovzISIkVpMQK GcUEJkcJNJG+VLMUR3GyOsJTFQ7AcU+U4OJuCcGukBxEs+WIYZwvgU5QhBBy jhS6kuS4Y4QPmEUTG8BVQjZoI/VJYdlqaV5KVJEuvjhTZkyPLc0GvyRUGBRV eapao6a+KLmhOIVoZVMVwBbGaK3MpPixzpocllPyKZllM5OFaIWAhavfyzpQ qDHK/1OaybYSxNvYhCOUnU1efp98k/7NVxX2bdVh7v8qm/RS1eWmwqcySUXZ yoXPpewSDk84KtnilGwuxK6lQt9aaWitzGkqY8CkuTyH8Z5UZDSUp9eVptaW pNSwqi1NrSzUluUllRhUxTmqIr3KmKXI1yXkZiTmpMmzU2QAE8BIfqYaApgY szUYwSysY0WO0ZCmhPQpiZkaWZoyBkpXxWJMSYzSyMJVsZLEqGCCF2mgp9jX DVwAbAFcUAY9dTkhB8rZY++fOLjn8Luvg03e+P7/evMH/wvG+2+//NH+Nynf BPyCM11tTvMdLDwcGTbxcjrn7WwFQiE2IQzhckwIT6ihCflEIEozAZtw1brI k0Jgwsy4PyPlxNfVwtfNksK6/Hhn/XibbCLyZMAEJEJhXVJ/ZwiEQkaoj2Ow F8MmwR62wXzbUE/7UC8HZvSwgyR8O0WwT6LISyMVZESKtBJBUrCvSuKNX8Zt wm/ozlz4tDhhfUHyYFPRbG/d9YWBe6vj99mYLlM2of4mNy8NUzQX+Uog8pVQ qa61C10YKXbrmXW6KFGFwxMilIdfkwtPMMIV7NpWoYuDkV022d12t93tv3Fz OvsdN6vvQnyb73nZv+Bh911vx+/5OP1ZgPuLQZ4vCT1fFPu8LA14LSLozQjB h3KJeXKslSbGKi74pNjjPR+Ht8L9j8eKzsiCz8mCreQh1vIQW1mwbWKEszLK VRnlBiNe4hAjtosNtjdoQ0uyY5rKtG1V6cVZsQlh7kL+qQAfG1++pb+HpZer uavdRy62h1xtDwk8TulTpc2VKR11GZ31GS2VmrrixA6WTboq5V2VCZ0V8o5y eXuZrL1M3lQUd75aAzC5OFgy053XUiwv0Ulzk4XZKv88bVBpVli5Pqw4M6Q4 M1if5KONc9HEOGYqParzw/qbtVg2r8+0UkkuLLapMNfDjREqzMWVDoZuXTx/ dbZjebS+v0Ffk5eQlyzBei9B6l6aIxvqKFmZ6Vy90DU30rQ2e/7BtcVH1/FR sv4XH9/61U+e/POvfvZ//uFv/vlXP//nX/3i1z/7/MntK2CTpckhjHfWL969 vHT38sWbK7OrF4Znh9pHu+qayrLrCtNrjSlQXaG2tUzXW5c/0lZ4oa/q8kzH /bURwAiFbxGPQEQo5D0hf8qD9VEs9den21cmWtam2rDgJ12Z7SIDl1qZwHw3 YAQkAoFBwCnQzYsDwBOiFdhX585fnevmBHyAcPGbF/vuXBq8tdR/Y7EXwi7m cf6NRcYjgyuDfXCL5bGWiyNNNM721870Vs8N1GEXD0bPhkfCC28tDbDOmmno 4eWph5enH65PP1ibgm5dGr2zOg7dXB5Zv3B+Yahpsquqv76gKDVGi4/1SP+U SP+MWKEyxEMR4pEgdpcFuUEwEoP5mIkXusYFusSAX/wdo/wcSOFs8WFiE1BJ jNBFJuZFChwBPnFBrjGBzhQ8hkNcLBnNQGTTPAWY4SIEMhzRiPmWwR7nyBC6 nRE4m/s5mvk6nPCxB8Uc97Q54mH9kZftUW87MMsJHA1wOeXvdBJjEO8sA0S+ dngYPAaVSsaz4algAMcwYj2TFOFLaxtuVaON8U2N80+XBWTIA9PiBalxAm2M v04u0snFGTJRhkycHr8pJnQkJoC7CC2TlFIvUB5uF8/eK5YNCYsLdY8JdosS uWCMDeHBCAtwgIF5eZinItIHI5QUK9DK/dMUAenKwAyVUKcOytKIc1JC89LD CnQRRdnRJTmx5XmyKmNidaGitkhLqitOaShNa2RDxfBDDghtKUnvqMjq3NL5 GkNPdQ7UW5vb31DQ32DE2McWCqPFP3CAyIJsIhfqxki947e1j/+68C1CBu7Q Zp0uJuelDBpsLTWpS8ZWSG7JN9VgmxEaaC2A3dec19uUz4axcS0yCzmdb3ya cmLKJs/EE4rposQTzp9CXTubK3SNZekQ8wUsSWPi60pS8fWsKUyuLkyuKmJU nq8uK1CXG5NK8pRFuYrifGWhPrEgUw4VZisKs5UFmYnMqFPmZyjy0pWG1MSc FLleK4OAJDuVoY7TJcVD4JRURTREtEJKlkcQtihjQsEskWJfSYCH0MsZzOJi bQ5IObT39Xdff/G9t14++t47ZofePXFw37H395w9dtDq5Ed2Z447Wp50sz3L dwCbWD+N7Npyi0AUuEX0sS3/nQvrIr8JdxqXCw/5uNv58Gw5N4rflhj2cbML 5NlDQp59EM9B6GYT6GYd5G4r4tsFezqEejtJfJxDvBxhb5eXg8jTPtDdJtDd Wsi3BrBIfZ2iAlyjAxnJRO7446OSeClDGd8u/ZaZ5r/DAJXglxE8AuEXmeGU uICqgiT8+F0Yary2NHRnfQI88umdi5BpvgnY5M7aZrIJZcRzAML5ULh28Ns6 wpM4dwl5TEjbWpxs857QDJ1g6kMxJRcucZ6r7rUzEX43F3532912t99n87Q5 4H5uH89yj+vZtyGe5TtuFm87nXrV5ezrbpZvuFu95WW/B+Jbv2ln9qLjqVeY eYs3Xc684Wj+mp3ZK44nX3c98w7Pch//3H4fu4OBLsdEPLMgzxOhfmdCfE6H +p6V+J0VeZwK9j6bEMbTKUVVeYqm0hSwSWIYX+h+2t/LJsDb1t/jnI/baZ7D Ubuz+63N9wR6nc3TRXXU6cAmrdWpzRWaxlJVd5UCApiASjrKIBiJbSWJrSWJ fbXa6a68xYGyyY68JqM8P0Vs0AiBJ0UZoeX6iPKc8JLM0MIMca5WoFN4psrc MpWe1fnhg21pxCagEopEurPSDx55fHWMMsqpAC/hyf3VQbDJzPmyltLkwrTw LIVIHeGpiPCoMaqn+muuLPZtLPRenGi7sjhwd2MObPLjRzf+9qef/utvfv5/ /vFvwCb/9pu//Lff/NVvfv5jsMnqhbGFsf7lqeFbqwt31hdvry1cX565ND04 3d863FHTXK6vK0qvytNU5qprjclt5Zm9dXkjrU/ZBOjBsQl5T7isE+w+vDxG jU6ADxBW/lj/E6QsjTZeHGlYHmtanWzFpSiOCwwCMAGMACjWpztXJ9svz3SB LzADNsEJbOhXF8SxCS5LMAIwwUg3Iq8HEAN4giuDaIAnuBR3TaDK4nDjhb4a sAmYBc9wabwZwrPhsiCjx1emWCqZ4tiE9PG12U+uz0GPr154sDF9d3X89vLI wkBjS3FaplycKRMXJEXUG9RtRWkzPTWzfXUXemsnOiuGmgp7agxY4lbplWU6 WWFKTK4qLEsenB4nTI0JTJR4YhEeJXCk/Hoijkh/B+IOcqNQPgsQAyIGoXny sJCx6XxhR5xMk+SI4dwxNIOXkF8GVyOcwQgMEblbAElALqai4skQKAYsA3gB 4FBsGyXabKLKVlItVjUKKR+wjJ9JTZQ3OCUllumckh4fBBGb6OQhpLQ4ZhLM AmUmBJNMbYh9iShFJkyODwR6AEMSwr1kUg+IICVa7AoDArYAVeIkLoxCnWND nTHGS11lYW6KKA9VjFdSrHdSnA+UHO+bAoRJFGUoQzLVEn1yuCElMj8t2pge W5GdWKlX1OSqmfJiBclNhSmtJeltpRkQGa2sAC/tlVkd1Xpaq2PpTnFQWNs/ bRDJUsY3B2J9Q30tDlIITFg2KeFCzvqamOJjABBTAUkAJiSWVoxsjbJnsclX M+I5PNkGJqb5JtvYxBRPmsozgCdNUCkDKZt4UpxSXayFKgqSiE1K81XFeQyb FOUojFkJELGJMYsdM5lUlAKdmsMTKOtZbEJ4Qj4Uzo0CJCEqSYoPg2BgV5sQ CcEm4TScr4yRxkmDIsX+ESI/sa87MMTa/AioxMHCzNnqFIGJtwvAwZ7tZW/F JMWb4Mk27tiJJBBQSMgW79oGMtDXsYlgB5sEsmwi5NkAT8Qe9mAQgMnvZJMg D5sQ7002iRG6xQXx5GI+sYla6q2Seu/sZkL/WACV4JeR2ASH0hPF+J6Odlcu jLXeXBm9tzH1+MbcNja5e3ny69iESzkxRZJthEKiQlvb2OTrqOQb4ru2eVV+ fzaB/tALn91td9vd/qg3nSwiNUaSGhOqDguSifzihN4RvrxAFxtfewtP65P8 cyf458x4FseczD90PXvQ6fT7jub7IadTB5xOv+d0ipGD2X6bo3usPnrb+ug7 tsf2Qk5n9jpb7LMzf9vpzD6e9Qc864PeDkd8HI+JvSypcXaEwFHIs/B1NHNz PMl3Pu1md8LV9ri7wwlXmyMu1ofdHY5oZAFVRkVThbatJr29Jr2lQttXr+2t 1fTUJHVVqbsqoaSuSk1HeVJnhaa3Nm201TDTUzTWltdSrGLZJCg3WVSUIa3I iao0RJfrIw3JAdlqv/QED20c2MSrpiBqsDUDbHL5QhtlYVAyO3iEygUDSagG L9l3lvtWJ5pGWvNr8xIMScFp8QIsBbXx/i0VafOjTbdWR+6sj11bGmTKBV9b /OLR1S0w+ev/8w+//Pff/tW//vpL6Nc/+4L8JovjAyszo7fXFu+sXwSbXFua Xp4amOxrHmyrYtkko8KgLtMrwCbtFVlYYw+3GolN7q0OU4IJRXCZRnZ9cm3q 8ZUJohKOHWCQYwKvBQgATwApmMFRcpeATcAFoAlAxPJYCwSIoEAvzAM0YF+e 2fS5mLIJ3YKQBMIhnIDrgGsw4lXAkyuzPSAUjCzg9CyNNoNNZvtrcRewCSgJ zwN0wkXurY5sY5NHl2dID7B7ZQZgAkhhepCtT95bHV8Za++q1GcnhmTKREZN ZLMxZbihcH0ajwdcGrq1NExty+6vTWC8c2kUk1dmey+Ntc/11091V/U3Gjsr sxuM2vLsxOKM+KL0OIzG1Bi9SpohF2O1oI0JAL8AAcg/QgwCxGB8K5R3z8IL 8UtskGu8yI2Ig2aIU0wZJzrQmaLRIlk3TQzZOLR1lGiFfDEUV8Y4ULYCzyRe 1tTYhdwrUKDraSiId5bQKUIAZmEUFWgfG+QoC3FLlPATQz0U7P9skyKwHApI iRGmxgYBPbIVoVBWIlBFjHVRamwg0QpV9yJUAZtgpaRThQIlUhNEgJQUeVC6 IhhYgRnYWpkQ0sQFKKN85WF8KCHcIzHCE2NcqFu02DlK5BQtdsIYGeQYIXSI ENpDsSFuAByQDkkZ4aOO8kuOFuAZcMeshBB8T3OUknxNRFFqTGlGPLgSKsWY KS/PSqjOU9cWMj4Xcr5gQY5lObduZyKgqgEsBnbBTy4JpoEIiy2MvpoPspmK voUM+XQmpZAMtJRA/c3FfU1FRBlsXbL83sa83qbcrxNLK0ziv4nfxARPmr6C Jyyb5G9zneys1mUKJsQmHJgwKt3GJlpik8pCDcBki02UYJNig7IwOxEq0j9l k8IsFZssr87PUOWmKQypCWCTbK08K3lTHJjokuLBJgQm5DeBiErUcVKIwAQk oogOgZQxoapYCYQTMJ8UHwE8gTSySFVsWHiQLzDExfo0xLOz8HSyxq6AD75w ZTva25t6Rjj62MYdO8GE2GQnxXyz34TwhNgESEJOE1MweTabeDuKvRyEfFvg CccmkQIXsIlMzJcH8xOD+cpQz6QwHy6Ia1v+O/3e4ceeY5MMRTC+s2M9VcQm +DTh2OSTWwscmzA1hLfYhMuFp0rCFNZl6ivZySamNYRN8WRbNBfFbnF1uiBy rGA0rdm1jU1MweTr2IT0h1747G672+72R70tj/ZfHO6d6++e7mkf72geaW0Y bqlvLy9qKSmoL8ip0GcUpWlykxR6pVwhDYoO8ArmOwmcrf0cz/k5WPo6nPO1 P+thbe5uaQaE8bA66WZx3Mn8sMOpfbZm71gff9vWbI/Dqf3OZ993sfjA6cwH rpYfulp86HDqfZvj+22Ov2tn9t7pE/tPH3/X/KN3Th5+2+LEu9bmB86Z7bM+ tc/H9WSon3VkkENCuLsy0iM22CkjwStL6ZebHFSskwI36grkjcXKxkJlW7m2 ty5rtK1gsqtkqDmvrTzVkCTOVgkNGlGxLrzSEFuujypMD4XytKJMhU+qjA9I qcmP6WtKnx+qXp9pvbl0ntjk7uoAeUkoF55yvcm4vdS7NFKHG5Vnx2YphNoY X02Ud7Y6uKfBcGm648HVqSe35x9cnX5ye/EvPrnx658/+fe/+xJggvFff/2L f/vNX/7vX/70n3/187/96Y/AJutzE8tTwxgppuvO+iLYZGmyf6K3aaC1sqEk s7YwvTxHBTapK9S2lWdiFQ02memtXJ9u38YmpmFdjzbG764MgRGADFwbFOAJ dOfSICZxCIgBjsDuw8tMRgl5TIASXAgWZaAASYhKiC/ANRBeu41NOHcJgQmx CYley4kFnK7F4cbp81UzvdUwOL8Jrkyg9Ghj8uHlSWKTRyybPN64AIFHwCYP N6ah++uTwA2wydJwS1upLhNL6LigIm10b5Vh/nzdtYWBGxeHoJtLw9Ct5ZGb yyO3tnT70uidlbG7q2DPCQZzNqZxHWALBAM3Bc5cne1bmei4ONw8218/0VU5 3FrSUZndXJJek5cEeMlWSLCEUEq9QCJM4BObb07EwYkjEdAHjlJo1mZyOmvI xDx5sDsEg8RcTeQWz+1uGbJgd9yLYrowCSYKZ7NjcE0qXEYuG/LFBLmfCnA1 83c+7ud0DKPAhelEKXK34KLLQj1tJF442Q63o/AwdYQvt0AiNwrABMySo5Ia 1GG5SeFgELAJwUhaohgiNslKkmLEIRjZmjAczdFG6JPDspIkmM9Uh9L5Wllg Uqy/MsqHxHpe+BQkBkUGOUcIncIDHMMFDsxXLMAphi0vJhfxEsTuCcHuKqlX coRfSpQghS2vmhITgOfMVIbqk8JwO0NKJJSXFm3UxRVlyYrZImPlucrKfHVV QVK1UUNhY1ixM86F8gys57Gqp6q825b37TU5xAVb/hcWUuoLSOcbiEoIT/J6 GnJ7GnJMdb7RACrBuKmGXLZAWYGJjJv6aoWurc4m+TtzT0ydJl8HJuCRzZiu kk0wwVuuLtqM6YIqWDwBm5TkM2xSYlCxGSjKIr2SoRIWT3b4TRg20ackQtna BGITLpQLbEJ4QnFcYBNymmwT0QqBCQgFYmlFIo8IloWLE6NCMYb4e/Adzjmd M3e2OuVub+njahfo6RLsx5cEeIl8XDnQ2KadhLITT7ZRCTGOL9jE/WkrRkqx 33SduNpu4ombndDNnpDElEpCvZ2+mU2E/E02CfNzjvB3jg50jRPht9sdP8aK EA+11PuZ5YIpuwRgoqN/hrBskioPwvd0uLN8bqT5xqWRextT4BFTNnlwdeaZ bELQQbnw29hkW0AXZZqYpplwePJMNqE4LvDIo6tTD69M4jS85JlhXaZOE66E 149u77LJ7ra77W7/ma0gLaE4U12Spa7KT20qzW6tMHTXFfY3l410VE/2Nkz3 N071NV4YbFkc7Vgc6ZvqbR9srTtfX9ldV95TX9HbUNVYnFeRk2FMS8pSydRR oREBXkJ3xwC3M972J3ydzL0dzDztTvg6nva0PeHvbOHreNbTxtz93Ame5XHX s0cdzT90tjW3tThiferg2eP7zxzbZ23+nuXxfZYn9lid3Gd14h3Lo2/Yndrj dHa/9fE3HU695Xx2j7vNAR/HDwVux4TuJ4P45oFuJ6V+1oowj2xVaFFGbLEu DipIkRqSgnOTQ0p0kVWG+HJ9dEFqKFAlN1mUrfJPk3lhrMqN7qlLnRusIr8J qOTOSj8IBVTy6c0pwhNKOaHOJncv9S+P1vfU6Moyo5lGhJFeydE+pdnxE+fL ryz2gU0+vjn7+Mbcjx+t/f1f/ehff/NTxmPCssm//ebLf//tX/3T3/zsX/72 FxybUL7JrdWF22uLN1fmNhYmFsbOj3bVn28srSvKqC5IBZuU5yhrjcktpRnt 5ZlDLQUcm3xybYqS3zk2we7HV7FoH+FIBKdBMIAnEBkEFNTA8cH6KJXhurHY TwACwbi9PMTW5hqEvT7dCaAwZRNynXBsQh4TYhM6ipdTQj0lnhCkUHAXwGd+ sJ7YZGGogSLNcFk2oGvgwTrDSptgwmSdzHBs8vgqo0csnoBNABd3V8bm+urb y3QGlTRLLi5NixtuLFwebL55aQQf6NeXhm8ARlZGoZtAj7WJ26vjbGUbfBZP 4sMd3yZiHBKTcMoaj6/MULbLx1cv/Oj2xS/uLmOETRTDeF4u9K5N4Y10LI+1 XeirG2kr7akxNBamlmUlGFOisdJQhXkTa8hY9AC8RPg70KqbhHmcQ2wCQEgM 9YBgyLdsboaEJQ3lmGDk/vtK59A8LkigJAvGighMZB/BtrCUsq0byQXD1hw7 K3A+7edo7mPPpL1Afo5mAmdzSm+RUgYN20Qm0t8Bj43HU0i91DH+mriAFHkQ RWGRUhNEoBKIUAUG50zBIQjzBDXAFjqNzsQhXA02DPK5QMlxgZoYAe6VwGa7 AEkUW3lDcYEu8UJXKDbQJZrgJdA5LpgXI3KNFrvGS/iU7UIJL/SQuCMBC1SY GQ9gKdEnlBkUFXkqYhbwC4RJMkg1hcmEMAQvhACtFVmtFdntVTmdNVxtsQK2 t4uhu15vqm1swsBLfS71rKReMN11+aSeBi6aK4+DEZPei08dKDvBxPTZIA6s mssymso2UQXvgjLiiU0qi5LBJmUF6tICNdikNE9dlpdUmqsGnhCbFGQmFmQq C3Sq/AyVacqJIVWRk6ogPOE8JkQllBoPKuHSTEyDuIAkIBECFrITo8AjQTGh ArAJUQkIJT5MBAbxdrF1sDCDeHYWvm72Qd5u0kDvSLE/lQWDgrxdICIOU9uU ULZ5T7jJbd3hwSa+vwebBLraiT0cvimO62vYhGkl7+0ANgn3c2LqeFNYl4hH rhPTNBMOTIhN6H8CTPxkTACTfsKyyUhXxexwE/6U4Y8Vsclnd5fAJvjDhRmm KTzwZAtMtgV07WQTUySh/HfTFHhTPCGHyLaYLo5QmD7CLJvcN2ETUzzZCSY4 h8K3tok+s/7QC5/dbXfb3f6oN506IjMpMl0lTVWEJstEimj/xEhfjSxQHS9Q x/snxfur47Drn6YMMqTJ8tLlBbrEouyk8ry0msKs+lJDV315d315b1PVQGtd P9RSO9BW39dU3F1n7Gss62ssxTjSXjvcVtNUYqgzZpVlaXM1CWnx4fIQgcTb 1cvNhu9kyXew4NmdcrM7yXc45el42s32uLv9CXfbj5wt33e1+sDD9rDz2f0u FvsxQk5n3nU8vc/efK/dyT18m8Metkd8HE8E8S1DvGwlPvbxwfwAVzNP2w95 597ztDno73wU8nH40NfxkIhvJvU9EyGwSJA66tUBlYaYwZbc+aHqtekWqq8L Bvnk+gT05MYkOU0oER6Ecnm6dbqntLU0uSQjMkPOBHSBTeqLNQtjjTdXhh9d n/ns7uIXD1d++ed3/r9/+PI//v4X//bbXwBMyG8CMHmm3+Tmyjzw5Mal2cvz 43Mj3UPtNV11RWCTqnxtmV5ZpldU5ambitM6K7OJTbCeB1YQm0Cf35nHH/kn 16fJY0LZH9uQhEQ+DtOEEda3MkIMQmFXQAnMELAQmEAwQBmmqfTcRbhME4IU OkTZK1Tdi2OT1cn2tamOS+OtYBOAyWx/7dJoMzHOVpZKP1UGAx0QIBCbkO4C HMAsLJjcWBpem+5eGmltK82ozVXr8JkeJSjSRg/WFVwaarm5Mnp9ZeTapWGM t9bH716Zun9t5ubqGHRrbRwz0M21sRuro7gFxYaRx+TTG/Of31mC/ck1fGgu PLk+BySBDQN4Av3w1iLmcRoJLwHLEMU8uTaH03D0Ma65FUJ2a2n42lzf+nT3 WEd5f4OxtVRXkZ2Yo5JiBQK+2Mw6FzHFfgEClHhO/1yl5HQqjAxRniytW0jM P1e38meZFPitaKiUWD+I3HnqSC+qM8wU8or0Y+/oKRPzY4Vu0QEulOwf4WcP HqFU/UDX0xjBKZCpqyXY20rsbSXyOifeMoQeFlEiF3BBYoS3MsoXUADQAHck xQRo4oSpcnF6YqhOKclUhWWpw9ISQCvBmEyRQSJtvCg5niEITgzjKEN1ipCs xBAuliwrIRjKiA9KiwnU4i1H+iWxqfqbLBbKjw5ifC7kfIkQOoUFOEj87aQC exjYxSES5e/jUSmEDA+siPQBwtADE22BZfTJ4TnaiNzUqIKM2KIsGbFMGVNw TFOdn1xrTKkvSqX2LqCArZpjaTvVWpneVpXRUZPZWUP1k3O2ZOisySV11T0j fItLNuF6wXNOk205Js/MN8FTNZc9daPUlaQSmzBhXUXJABNGxiSwCcCk0sjU 7zJlE2OmkvwmpjFduelMnS7gCbEJgQklm3DRXNvAhI3a2nSXgEcU0SEUzUWT 7C4T0JUQGQI8iZUIwSbgEVM2EfnwwoQ+0SEBkgAP4EmwH0/s68YRCqdnOlBM Y7p2Ok2+jk02O6dQsom7Q5C7g8gdSOJkCiZij6eelJ1sAgV52AFPwCahPgyb RLI9hhjXSRCP/CZMWNezSnJR3WBiEwqtxCGdMgTf4oneGorpAolQLjzY5Mnt RWoNv41NdmbBb8s3IULZySameEJswtUQNs2I5xLhubAuLqZrm+uE64TCgcku m+xuu9vu9p/e8NmUl56Qn5GYmy43pMXlZ8QZ0qLzM+P0qeFZWkl2ikSnEaco BZoE3xSFKFkuVMUK5BG+snCfhEiBKjYoJsQnXipIjBSrokPVMdLUhJjcVJVB E1eUoazJT28py+2oLuypK+1tKB9tb5jsbpnqaZ3qaZvt714c7lsaHRjr7xgf 6Bw533y+taq2NCc3PTE7OT5TE5WmDNPECqPFPKw6pP74+3/Gz9XM1+WErwtG M3+3kwLe6QB3TJ7ycjzhYX/C2/EkH0Rjc1zIt3a1eM/BfK/tibftzN5xPLXX wfwdW7M37U++7XR6j4P527Zmr9uffNPpzNvOFu/4OH4U5ncuQeKaGu+Xqwkp 0UU1FicNteRNnS+d6Suf7i2bHaxaHKldGKqZ6ik9X5tZnhWjVwYlR3upIzx0 iUGtlRkXx5tvrY48uT3/88+u/uon9/7lb3/0f//pr8Em//Lrn0H/9Kuf/N2X X/zyz5/8+mc/+rsvf/zLP/8UbLKxMLU2O35t6cLttUXymxCbDHfUdtcX1xdn VuYll2YrSrISy/SJDYUp3TU5z2STL+4uYASYAEPIfwFeoDgu8mtA2MVLCEyo PBdEGSi38XG20EtZ6sATMAjIAmwCoFiZaANKYBLnYJKr7kWBWyTTu5DrBOP9 dSaH5Q5LPbjOlTkm34TNLmmHFthceNZp0sFFmtFj318bfXyFWeoTnjy+cgFU 8pBlk09ACtdnwSY3l0dWp7tnBxomOit7a/PO1+bmJYVrI/3y1eG91Yb1sY7r l4YJSaA7G5O3L09AMEg0T/r42izuwjlN2LLPFwgxgB5EJYwN4mAfiVBlU9fn fnzvEvQXD1YhGF/cXSb7F59c+fLJ1Z8+Wv/x3WXM/+Th2s8eX6Zz6DRCmJWJ jrmBhtG2ss5KfbVBVaCNwsocKxMOQDglhHoksZFXlDZLKeqUIUKEwiXSamP8 qE6XLkEIpcsCU+MC6HwdEzcSzIrJhaeEXLo+V62LnDXAJcp8YYLE3M6ARAL5 Z/GLRr9rsCEfZzNvJ/wabv4C4hwwS6ivfXiAc7SIFxfiIZd6KyL8QCta3F0h 0amkOqUUzAI7OymcQsIABRQYlqmS6JPCDOowfBEgfEOhguTIfE0EZFBJc5QS SK+UZCtCGXhRhGQkBrMBY0IqFAboUEX7wQaGgFbCAx2BKqF+tsE+1iG+NjCw C2zBPMhFsrULO1rkQjXHlJG+uII6xp9t7yKiWLX81NiCtDhjenxhRjyVSi7J krPtXRQVuQlbSoRKsuOgshx5Vb6itjCpoVjbVJpGdZJZ6durckgdNTk7y3Bt S3snANkJJpxMo9Go0Bmbb5JeX5LGhHWxufAsm6RUFWvLmIz4pPLCpJICVXmB pqowpTxfQ4WFN0t1ZakKs9TGzCQWT5S56QoQSm66CuLYhAK6TLPgiUeAJ0Ql 23LhiVxgK2NCEyLFEGhFI4tIZjNNwCYAkGA/vpeTtaPlSadz5u72ln48B7CJ NNA7Ktg/TOgtDfQEoYQK+KaQYsopO8O9MEkn7MyFZ2K6+IxMK3dRP0ehh2MQ 31Hk4QSJPZyCPZwlPi5SXxeJj3OotxMbzUUBXaw4w5MN9/JxEnuBTeyBJ2Iv u1Afx3B/FyrSBcWL3MlpQmxCv3GmThNiE/x6EpLjFxkzek14V33e9ED94ngb xXTdv8LECT+LTca2ZcF/gzgHiimhmOIJuU64DoymkMLtcuWFTX0rphnxz/Sb /PD216ac/KEXPrvb7ra7/VFv6nC/tDhRhjxErwrP1UZD+EQuyVYUZyUaMxMK dLJ8nSwvIx4jE5/8VdEHXL4uIS9Dnpsu06fEZqgjUhIlGQnSNLkkRRaSKpek JYRp5VJNfGiyTAqp40NVsUyaJJVwydTE56Yri3JSyvIzqoqy68vzWmoK+zvq oMGuhuGexsGuegjwMtTdONBZ391c2VxdWF2UXZyTmp+ZlJUsS1VGaxMjFTEh sZKA6BB8tHmJvXlQkKdrgLuTgOfo52rvYX/O08HKx9kWhpv1GSeLk7bmRyEH i4OOloecrQ47nTtkd+aA/ekDblYfOlnA2Odwap+H7YcCN7MQb4tECS9HLa7K lZcb5DqlOD7ELTLICYuZuuK0lsrs0Z7ay4sjn9xe+csv7v/mF5/+w9/89B9/ 9bN/+vUv/v6XP/nVz3/0w4c3Lk4Prs6Pf3L3yuePbz25d3VjafrS7Oi1ldnb V5ZvbSzBWJkbvTDaPdJd39da0VCeXWlMYb74uvjSnMT64lSscIZbjdPnK4hN nlyfphR4QMrDy2P3VocBIJT5TgZ1CQE+UAQXNwkqoUgqYhPCDfJf4Jz7ayNc ja9tk1w6CUc3uAiuyYV10Y0YH83Wf/PwgUjtiTfmz6/OdK5MdyxPti1NtF4c byExTpP5HujmYi8bhMb2fNyYfgCxYVcPr83evzLz4OoF7N5Zn9hY6J8fbZno rZnsq50baZ7qr8OHuFEXh8WkISWyrVqPD3R8mjOxW2vjTDz2+gQ+walPGTeJ XXyyQ3dWx+8CTNYnH1yeerSVaE/VwLYJj8Sd8OTG/KcssHwB1ri/Av35g1Xo Lx6uQT97uL5TX358BfrF442fP7r80wdrP7m/Cn12ff6TKxcerk3eXxmHYDy+ PP3DGwvc/N3l0ZsLg9fn+qe7qwYbjR3lmU2FKdU5qpL0OKzYc9VhEK3b9YpQ kqkNZSeGkLISgukoDB2TbL45YoaugBHSsQiDeXpJplyMXSAAlutY/JP3ASCA lTwW+VKBPVb4WPmTMwUCCMAGp7D/LjAHuRDCYMQuiAYngAgig5xxKRABrgYc SIoVJMexbVPY4mAAtByVlN4dHgyQQm8kZwtMGClCMpWhlAUDgiBRya/c1Ki8 tGiMOdoIsA9+MChhXxMXgF9VZZQv+EUm8YgVu0UHuYT520t8bSMCHKV+dhB2 wwVMk5cooTOOMq4ZtuELdmNErnHBvASppyLcWxMj0MYFpsQL0+QiIBKeJEsl gQFlq6WG5AhjeixApjQ7oTo/Caor1EK1xmQaqws01UZNTWEylwsD7QzZYrwh Fbqnlbi2kmVohkYu5aSpNKupJIvtFJ9ZX6yrLdbVFGdAtSW6mlJdVXF6WYG2 OE8DlRs1FYUaJsQrX1WcqyoyKKFCvdKYzaggS5mfqczTKRhlqPIy1IQnXOKJ aQ1hLt+EDM51YppvQqKsE0gRFZwQIYJgxEsDQ/x4no6WtuYfOZ497m53JoDv IBHw/3/23rM5jiTN83xxezc7O6q7urqruqtZgpoECa11aq211gJaa60BaoAC ggRBAIQkARCShKTWLJKlRYuZnZ0xO9v7EvdEPoBXVAJd3Xu3Zt0vEPY3Nw8P j8jIBJnhv3yUUc6zacSmLTABAZigAFIIpxB7CrT0PhxFbNkek6LibQJIkDT8 dJBWwEDphEyDmK0XsaADwg5MQH6BCTgfBOMqbrqaS51lELNMUrZVzrUreW4V 36XiOpQsp5LlVbMRTIKCTUilRbR+0lWRY4S/73BP6+Jkz73F4UfLY0Gx8CTe BGkC68KTKPjt8SZ/Smg9CXLuQkjBMvHAI0Eh8HQwId5cdKPJjvqa0m6ert1t d9vd/pc3JTNKxYqWMyJU7Bi9MNEgSrLI02wqplPD8Rj4fos4wy7NdMgy7TL0 /irPtVXmO6oKXDVF7tpiT3Whu4by9fLALvSrC6nxpmJvI6rE11jqbyzNADWU ZtejY3NRRmW+rzTHVZRhL8l25PvgcWbI8RjyfKY8rwn6MFLgtxRl2kpyHGW5 rop8T2Whr6Eit6WmsKOh9FRzxbm2akCYvq62Kxc6Lne19VNte++5FqrtbO0+ 1XK+vfFMU01HbVlrVXFTeUF9SV5JpjvPbcmyGzxGlV0jtarERhlfJ01VCuJl 3FgFP07GjRExwvgpIQpuhDj9GCd+PzfhgIRxTCeI9uqY1TnaljJ7baE5xy4y ShLk7AhYjEkYEVJWlIKfYNfyizIt7XWFV7paNhZvPr9/B5Dkq08fvXm6sTo/ 0dvZBmD1YGX29ZP1V49W1xdvApvcvT39ZGPp0foCsMnK3Pit8f6xq12D3SfO n6g+1VQEbNhY5iVsMtBZfbO/HfN0vbl3A6gEBOCAcSUY+Y4iJUgIL8Ag8fJC vy908UJCwTIlcJFABMoYcQaDEbg+ih7tTvCEnq0LCYgqdxL4HQ/BZH22f3Xm MoAJdEBrt65A/87NHiSUh/NXH8NL3x56vnwdXuLl2jhV6nF1EkDgzaO5N4/m gUoer0zcXxp5cHtkefoKoMd4/0lob9/sA05ZmOgevNQMnw8sUxvL3P1d9UAu O7IJvY9gQmcTQI8gMKFMKlsRLlRasIA7GewCmHzxeOGrp0sAJkAiv/t0DfX7 1+uoP+6kf3t7FwRs8octNvn+xfLnD2Zfb0wDlTxZHHm8cB3ap0ujrzem3t6b +fzB3FePFr55evu758u/e7kCV4ATofP1k0XAlhcrkzBz/eaVO+M988NdNy+f uH6h6eqZmr4TFRdbioFfztbmnKjIaClxNxTYielhE1hghR/gDkIlFYGVPx6q DhDBJvVsdYjnVXEGZarApT52yIIfyAWZBVMK2zVMABCAF70kEQT8QscWKSsc REwwlNmFE6XmxVilKXZFOuXeBq0inSpPo+VQnjAWcaFdXrKVQwzIpTLbSFV+ zDWhOxZ6ZGFcfCAe34yHQMApdcUOaOEQjGPwfkWOCS0vwBfZNgkIiAPQgy6A FxCdWVCIM3SQQYqByW4dB+AlyyoGeEFyKfZpkFwAWOqLHMAszWWepvJNtVT6 SMxLe03myfocgiqbIe0NuXTBBBB9wmZ1GMCT5tLOplKgkrNNJaDTTcWnmooB TKBtbygAMGmty2sJKGBDocCkpfYHNmmphS/V3Kbq7IbKrPryLACTmpJNGEFB n7AJGk0QSYjpBPuIJIRE6IHwGAvvt2oQTLKdBujopRxuchSyCS8lWslPAzAx KwV2rcSqFpmUAqOCDyKmE8ImKCQUABDEE0QS7JM0wnS/L/UWU9BFRxIkkSDh OM6B+cgyZBDYRMOjzjLLuHaVwK0VefWSTKPErxd5NFyXiuVWMn0aDsabkGAT BBO0eG5XfbGj72zNSF/70o1e+DaDLy40mmxnkycrwUm68FsX2WTHcHi6iAGF bkN5HnDuQjAhVhI6mxA8oVMJSdJFwuH/LJtgBca/9sJnd9vddre/6U3FiFCm h8tSjstSj8vSQjFUVpx6TJR6jPrlM+24hBEKKwoZO0LKiJKzopWcOK0g0SBO McnSLQqmzyjymySZFmmmRZZtVxS4tSUZxmI35UZSlmGoyDRXZVurcx21Be66 Im99sb+hNKupPAdUX5JZXehrrshtLMsOKKcxMFhT6K0p9NcW+avyPRW5rso8 F7QlwCmZ1iK/pcBnKvSZoFOcaS3OsMKh8hwHzKwthsV8dmtVfnNl3rmWqnOt 1Rc66npON10+1zpw4eRIX9dwz7mr509A/0pXe8+Z5u5TTedaqltr8hrKMmoA rCi2gteylWWb8tzKHKfMb+L7jLwcu7jYo6zMMjQVW4BNqvONwCZmWZKCE0n9 RMyIEKWFMxOOMuND+KmRcm6iRcVrrMg711bbc6714unms221zdWF8DQ/3VK1 NH392b3bLx4so93k3p2ZR+uLD9c22WRucmBy8MLI5TPdZ+rOtpa1V2c3l1Ou 78Am3SfKr3XVAJug3eT13clPNyaAI5A7Agt7CisQUojJA4+C0LBCZkKLzlQk Lh6NIyg4BLvwEuRV4HQSq0Jnkx+ZSwLsA/37gYfjxtxVBJPlqV6AEdi9tzUO hII2FACTZ3eGX8JLB27+1foElacLKOA+lVIgkC1z+uGdsdVbA7dGzt+4dgYE 9LE2O3B/6TpocbJnuKcV1nWw7IRPCTiFsAndSkIXARPKKWJ1kgpj2WITQiUI JpT5Zv0mHH2+Ool2Ezj6+aP5r5/d/vbFMlpJCJ4QNvnDTvpXAJO3d//4ZuP3 MBnOernyHbDJwzmMr3+8NPJwYRgEHdh9uXbj9d1pOPrVk0X0Gfvm2W2YD8LA fGjhInAIB9GRDEZAcPTt/VsvVifvzw0uT/bODXdNXT09fL7xWmf9ldPV3W2l F1tLLrQUdzUVnqzKbCvzNhU5gV/q8211edbaXEtlwG8KRK3/EVsy9Lj+x2U/ JhMuzzFi/DsaLGACBmtAC7sk2zCQC/wPAgG/IML4zAK3gUrSFSg9TwWJbJpd +DEUnnCiVewoBTNCnh4mTw0FKdLC4EtJzYzUc2NNwgSzOMkWqOoC7AAggIHw cM0MqwhE2V8C7lj0KBIQ3tKPoktyTcALVbnmmq3q9ogPlQFmKfSo8l0KtIzk 2KVALoAbAC9eAw9eF0nEpkwHKkFO0QnjtYI4aEF6UQIIBlEALzDZIk+F+XDD Hj0XrpNtl2J6AUA8etgLfpL4UdeXOJsrvNCCALoBZKAFNZS6SFw/JiJDnWko OlNfdLphU6cai042Fp1oKOyop8AE8aS5Nre+MlCBsSajqdoPaqzKQNWX++vK NrVpNCnNqC/LbazIbyjPqy3JRs+uygI/5uzCwBN6PmE6rWAECrGb0CElCwjF pgVl2nUekxLYRJgelxR+mLCJScEHKnHqZXad1KoRW7YIBfFkR9HD5BFMCJvQ I1BA2gBQbNeOYGIQs9F6QsiFWEzI/IA9BcaBYTlWhcClFfuMskyzIsskyzCI vVqeW70ZC59lEORuOXQRMKESdO/EJgCw/V31o5c7bt/sQzYBJEE2Capv8oQW C08IhdSIJ35c9ICUIAV5eYGCjCb0YotB4SfEaBJEKLtssrvtbrvb/64t3yLJ M4tyjMJMPc+v4Xg0LLea6VCm2xVpVnmKWZpkECfoRHFaYayWH6flxam5sapA 5h8FMxIkZ0bK0sOlaWHS9HDYVXNjdPx4JSNCw47Wc+MMvHijAJYWqVYZw65k O9U8jx5YRpplU+Y6tXlufZ5TW+gxlGaYyzOtFdn2mnx3Q7GvHiimyAc4U5Pn qiv01BV6K3OAbjxVuU7owBw4CnOq81wwpzrPWZXrqM51BjrOymx7SRbIVp7r pEJXchxlOU6AIOhTYZ5FfsAfIKOWyry26oIzzWWdbZVd7VXnO6ovnKjuOV3X 39l46URV35nay2dqek9VQQtLu96OigstuR1V7tJMtVsPz6MEozTJpmZkWCQ+ k8htErsMYrdR6rMo/Fal36Z1m5TwYIXHJTxA4SFr00qaKgtmJwYerc0DniCb 3L09DWCCbLI6PzF/49rN4Utj/ecudzZ2tVecqM1tqfDDUuRsUwGwyUh3I7DJ 0lgXAAJCB8ENAAqACHTuQo8s9MUCocUEBwEc0DgCM5FQCNTgFQBGMNkX9N/e vwl9GEfTTJDdBPGEhLcQuwzsAnoAkhCtTPdBe3d+AP270MULReUKC4AJYZM3 94ACpt48QDCZerwysTE/ND/eDQwCYHJn6jI+rKFdn7sGkAJPcPh80G5ypbNu 5nrXg9sjj5bHtptOgkSNbzl0IXoQKkFzCQETmAZUghaTL58sIpugHxdx5dpu QKHrjwEwAUgBNoHJcBZcAS4IrwLXf3JnDIR1WF4E7gdugGKTp0sIQV8HzDSA IRiuQvW3YOT7rRb1XcDH7FucGZj8dSAK5g9vNmAa3PxnwF+BAjHAQXdvDazc 6FscvTg71HnjysmxnrbBrobLp6qAXDoqMxqLnLX51upcMwIIVSGx2IGmB3Sg opsqkE0wfoR+CIEFDRmboSUBywUsyEGwOEdsgcU/rPz9Br5Xx3WpWZTpRJ5u k6SYhYkWUZJJkGDgxWk40YAtsvQwqipleqiUEUaML0petIofA5iDMsqS0W0M gAWj9TEzGLw03icASLFPAzwCbAJIUhGwwsAuCPswCCLkQgS7yC9wOiJMrkOG 8OI3CeAtAICgtxiQCzGyAK0AvGj4sSA1LwazCmhF8XpJItwqhsAAr4HsGia0 mGQAPhagLbhzrCmDWc4wCxnxXoO/CMALBSzlma3lWS0VlFors1urclqqc9DV tqbUW1XsrihwluU7SvPtNaWuunI3qLYM5Kkr94IaqzIbKjPryzOATWpK/NXF vqqiTXMJOnSh9QQ6ACYk6oSwCR1J6FEnpE+cu7KBUOw6IBS0mxhkXEFqbELo weSII8RuYtdKgE0cW3hiVv0QeLKjiMUEOvBNixSDIwRYkFl022wiBD224wmA CRAHmQAdpBK0pNBcvzgGMdcs49mUQqdG5NFLfAapXw9gIvBouO5ALDz6dG0H E4wa266GEhd8lY33n4SvO/g2g68y9On67MkCsMmr+zM/1IUPuGDtWHgxiE1+ AkwIm6B/1452kx3TdgXt/oRz11e79U12t91td/v/tFX51NV+bV2WviZDV+nX VGfqQEUuWbFbXuJWFHsURR55oUtW6JLm2SU5VnG2RZRlFmQY+X5qUQHiujUs mzzVIk0ySxON4gS9IE7HidJzokFadqSaFaECZmFFqTkANbEqdqyCFaNgwyM7 yShO1/IT9MIkA5XkJM0iZ9hVbJcW+EXgMwh9RpAo0yLNtskyzZICt7rQoy31 GyqyzFU51qpcG7TQr8kDonGgavMdjSWeqgLAEE91oRdaYBPgFBTQCrTFmVZs K/JchX5LabajPNdVmm0vyrAW+82ghhJfXZGnJh9gx95c5utsLLzYUnr1bPnp Wn9ZlsZv5mWYBbDcaq/JnBw4MzXUtXizf3lmcHlm6M704MxIz7n2WsATZkJ4 fNhBTnKUVsL2WtQnGysWp64Dmzy9u7S2MLlwc2h98eaj9UXQg5XZtYUbi1ND 09d7Jga6CJs0V1A/k55tzL/UUTba3XTjStutwVOAJ2tTPZjbCpkCwQSW93Rg IfYRzCqMibmQWWA+cMdnD6YQQNA+QtgELSYggjDQEjAhebpA6M1FdxWDVyFU ApCyPtsPDAI8gr7QSCjw0MQHIlLJqy1KAjZ5ffcmRn/Aw/fuwtDtm5cBTGau n785eHbpRu+9xWF4UgN63F+6DkeXp68MdbfAnwCWavApXbvYhL80IpvQ8WRH IZu82MITFDpxkV0UrOqBFIK0HUxA33+69t02/f7tBuh3b9a/e7327auVb14u f/1i+fWDWy+31hjP1iahDzj22eOFz58sfPF08ctnS18+v/3V8ztfv7iD7bfw Qm/W//DZ3T98dg/a378FbXz/eh2uD4cC17zz/es11HefruILgaAPJ/7uDXUD eBbMDxzdvBO4/udPFt88nIVX//T+zOPl8Y35wZXpK/DxQgu4B1Q4OXBqvP/E 4KXmvrM1l05WnKjLxh/20WMKmQXXz/CfAhAAnanIBHSpIthCN2pQZhfow7I/ YK+p3oo0oSJlfLpSt7rYqcy3SXPM4qxALmWPlmORp1LL/kC0CyzySbQLEIqM HSFmhGKQPjILHiIzldxoFS9GJ4w3SpKwAiwIyCLPGYh5ydARBkFaKQvkECvx UwH45YGYfQCTIq8aXbZAGGkC03AmHoVLFbiVmRYRenlBB8mFMrgE0othYReT PAWEkTt4/yAgF4QszDyGyccw55hLz8FUYyjALjTBFHn1xV5Dsd9YkmEqzTSX ZltKsi3leXZQaa6tKMuc59Pn+vV5GYZcnzrXpwLl+dV5fm1+hg5UlGWCOQFZ irKsxdk2UGnOpk0EGAQ5BcCEJOmCDsncRQrEkxzCJD1XkPUkx2VE5bpNfqsG 2ISfEhN//EBi2CFucpSClwojDp3UZZAjm9i0Ejqe7Ch07iIeXyAYJCHzBExA evHObEI8u4g1hLAJtHRmoR9Fq4pRwjVJ+cAmVgXfrhI41AKnWuDVCYFN3GoO 5hDG+iYYaUL35qJntKCrttB++VztxNVTKzP9+G1G2IQEwm+yScALiwSbwLcr +b4l37TbS8MT7cgmGHuyHU+CSISuICohxhSir57Mbc/Ttcsmu9vutrv92S1b w8jRMousgmKbENoihyjfKij3Ksq88jKfvNyvqMpS1+bqGgqMtbmweIAlhLE6 y1CVqa+EpzngDLTwgPapS9zwZSvPs0lyzMISu6TQKsozC7INvEwd16dhe9RM t4rlUjJtcoZZkmoUJRtA4mS9IFEfKAlnFCfDoE6QoOHGKZhRSlY0sIyWF6/j JwSOpqjYMVp+PMwxiQFkUq2ydLuSlWEU5dnl+XZFgVNV5NYUezQVmaayXFvg 6eyoyN9Uea69JBtgxIEqy7UXZ5mLsyyV+T5Qea67LMdZkeepKfDV5HsbSjIq cx1lGeYSn7E233muoai3o6rvZHFLmT3fLXVqGS4ts8CrhIVWZ0vJlc6GG4Nd izf6kU1mx/ra60rheRpzbF9c6AEpJxmeyyebKq71nLm/fOvZvdvAJitz4zNj /avzk483lkAPV+c2lm4uTQ/PjPROXjvfd66hs728oyanqZyKNznTmHexvXS0 u3Gir2Xqasfc8JnlyYvABYAMiBJo3SCxJ8S5i7haYWUTjAqBccAQrN5IqsnT kQQOocWELmQTUnURLkUSgtFLw1OZhAOPxSAFuRDgU/U1ABFcHAllHYubTD5d Hr9HUUkfIMnUUOfc2KWVmaurt67CghlduUBoHIEOrJyvnq/HUnoDFxqI3STI dLL1M+MkPRYewATxBI0jlFYmiBmFRKB89nCOsAl0iIKi4JFNvnuz9u02ff/Z xvdvN+DQN69Xv/505atXy1+9vPP68dzLBzPP7958tnHj+b2pVw9vvXk8/+L+ 9Mv7M58+mn37dOGLF7dhMpzy+y/uwRWoc1+tUCMB/f7zu79DwcU/2/ju7Tro 8+dLnz1b/OL50pcv73wF3PFqGV8OLgUjcAMw//ef34MWRqjBF3e+hM7z23Di 58+W4JbgdWHmt0A3b9e/D+h3wDKfrgIovX08j3rzaA5WSrBGgo/0/tLw2uzA 0o2eWyPnh3ta+7vqLnSUAbk0lrmRQeghIeSnfoxYR58limKKHI0lropAzEtN jrkmkKerLtfSkG+rz7NiW5trqcuz1ufb4CiaM7BsSoFXhf5jXhPfY+Shz5hZ kaqXJAKJYHiLhBkGQpdUBTdKygiTsyLEacdFqcck6aHYypjhMKjkRGn4sQZx olWRBuQCzJJhFgJc5Nil+S4FBr/X5FtrC2zoA0Z4BNkkSIg2hG42x2nGIyzy QlINYIYxEqeDGdKIkFyIwQW5BtOR2ZRsh5rr1PJdOoFbL3QbKTOu3ybPdCiz 3ZocjzbLpc5wqvxOZZZbke1R5HiVACnAJognfrvcY5G6TGKHQWTTCa1agVnN M6sEJqUAuAAwwWtRU9EiNi1CB2biwtTBGGxChBEooO2x8JkOfSFM8FpyAgYU jDcRpMUim/BSooFNjHKe26gABeGJRS2CO4H7QdFRhYTJY9Q8xSAyblDaYfTp +lPhJARMyCBQCYIJAkjQ5B9PoNjEJOWaZVyrgmdT8uxKnkvFcym5dgXToWB6 VCyKTUzCoCh4kl5vJzax9Z6pHrtygpiJgUq2s0ng5xeKJjC4D3/8QXs0sgk9 k/Cfyty1o/WE1Isnzl1BgfB0Tgly69plk91td9vd/jduTlGcmRth4UZCa+ZF OsRxNmGMRUTJJomzSeOgtYLEsTZpgkOe7FGnZejZuRZBoUNS7JIVu6TlsFDP 1NZk6Shl62uz9XXQ8WuqfKoqn7rSpyn3qEvdyhK3CviFypro1ZZ6tEVOVZ5N lmeV5Vqk2SZxplEEygrIqWLB17szkO3EIk0DloFdoyhpS8lmSYpNRlXgpThF nKLnJ0BrlzNgskWSZoJxBVMvS9dJ00xwBTUHduGR7dALvBYpPLXzPNqSLDOo LMdVme8FVRX4aosy6osyavO9LRU59UW+hiJ/Y7GvpSzzXH3R+aaS3hPFjUWW bJvQqkixKlKzbOJCr7rIp6vOd1DZAKiyL5l1JRnQuk1Kbkp0+KE9UUc/YSdF wO75E/Xzk4OvH699+njtxf1lYJPpkStrCzcwT9cPbDJKsUnv2frOtvL26uym MqpyHFV+sb0UwAR0s799cbQTSAEABLACIIKEhND9tYi5hIScEDYh4SSAJAE2 ofJ9IY/gpchl0ZKCVhVSxwQD50ncPVpk6CaVoNhMfETiIw8dBp4HcsvAyOuN ScCT11uv8hIOrYytTvfPDHWOXzlx49rZ+fHu9bnBJ6uTyCPwOEa4gFUxPLVf 3J0CZpke7hzvPzl4sWm4uwVWyDCTziZ0PEEqgbNAVP2yAJuAnq5MPFkef3xn DPRiK+wdo0u+fEo5cQGJfBEQRSVAKGg6CXhMfY3eUy9Ay6DAkn4DV/XfbQnZ 4Vsam8D6H3DgzZN5QBKAkVcPZoALKKwIIMMmOABfAMW8WqYAAZjii3t/+PL+ H796AC30CfjANYkAeeAsRBIcQTKCFm8MO3gF5B24DXjpTx/eAiCCG4DTYRBv +9vA3QKYfP9mHdqvXtz5+uUyZfr5dBVWSrgLzIILJ+hgCQbK3PPizlfwFgIe 8rCUIgnWRvrae89UdbYWn2rIBeJurvCCGkpdNQXW6nxrc4kL418aCx0txa7W EndrqaexwA59EAyCmotdoLpCOwirKwLmoEi8BokxQTsO5hnLskt8ZgFG67t0 bK8BlpHpGNJOBbxLk4FNgFA2xUCFcRMPcxMOUUqkWnbcAVbsfoAaBTtSL0qw qxhALsAswB3EmEIZTQJ2E1BxgEfQsAKcUpqpp3zDthKL4Q2jSM4xuOFshxQ5 hVRpARFmISVmMI0AYouGl6DhJ2oESTpRil6cqpemw/eeWpSsFCQqBIlqcYpO lm5QsvQqlkGVblKnmzUMq5Zl03PtBh7IpuODrFqUAGVUAJ4IAQoABNAeAWt+ YAEEFhRQA+ADzAHZdRKXUeGzaqi4EioB44/cunLcFKQUBNgElWHTAptwkiKR TfipMSpBuknB95pVILiUK0AoAf8uKbyK/ceQsoknW25d6DoLQhPJjqm6tH8i 2p3YQdBWAgLWQIcuYj1BMKFbTKCFacAmBjF1CrCJRc4FNnGo+BYJ0yxOpx5Y coZXzQYwKbDDM+6H4iZ/OhAeBpV1RfaeU5XD3a0khzAm6aKzCXytUWyyPEqP NKFnEg6KJSF+XD8BKeSUIDyhEwpJIxxUopFuQNmBTZ5u6QnR7BePduub7G67 2+72ZzYrP8zCCzVzjxNZeMf1zCMoA+uomXsM5tiFEUZ+qIF33MA7ZhaE2UTh IKswHOabOMcsnON2XphTEOGTxuZqUvLt7BxLeq6FUejgFrv4pU5+uVtY4ZGU 2oUVTkl9hqber27K0tV5lXUZhmqvtsKlKnMoQCUORalLWQrPd4csn6ocJ8ow 8rw6tt/AzdSz/VqmT53uUzNAHmW6S57q17Cg41EyHdJUpyzNr+Z6lGy7nO1U cqG1SBg2GQAO16XkUo+MgGxS6vFhFKZ6NHybPM2jYXu1HL+BjyUe8h1UVQgs /VDu17WUuE/XZJ+pzTlbm12fZ8m1iKkELGpOplGSb1dlmhVevdRvUngNcrdO 5jepvQaVmBmbFnMk+uieqCN72IlhXrOio65k4urFJ6vznz5YfXlveWP+5q2R q3cXph6szoOebCw+Xp9fnR+/NXb5xuCFgYut3adrT9blNZRQAbCnG3L7TlcN dtWM9TTNDZ9Zn+59cnsIbR8kXJ14c5GgeHr5RWJGwRGcBud++Xju84e3Xt+9 +WodrnPjzb2pzx7MQAsjICoyPWDLeLk2gaRDLohgQmwlpDQ8sklQeCY+NKGF 5x0+5l5sTMLj77OHVOw5sADQwYPF60AlC2OXhi+1DF5omrhy8vZk7/2F4Ue3 R59Qhd0n4IkMQIE1kZ+sjMP4o6WR9en+gbO1Q50NA2dqrp2tuzVwdn12AAuW AYDAkx1QBY0mQQmE0WebblVBwdM/kCKMErEUwKoAV+C49kbhggFGUDj4u7cb KFjPfx9w4qILVvWob16twC6s7XG98emDW/i6eCms/gyHcP3/h8/vgciV4UQ4 HYVXI9eHySBydPscuCW8CM6E6yNBwJ3jzKBzyenQwfn4NgP0ESy8FNw22lZA 8C5gMpyIN4CfCQgG4Sj8Le4uDC3d6J253jU5cHrsSsfAhcae05VdbcUn63M6 arMAYdoq/a0VPiq9VSlVYaSxxAVqKHbWFzlayr0wUh+wuYAA4YF0GsvcACzo OVZX7ECPMrpfGYIARsdjefoCrwoE5IICeLEo07A2CnqLqfgxJCsytKL045ge mZd8hBV3gBGzjxm7Pzn8w5RA7nE4BCcCSgBQIA1Bi9mS0f8Ko+DRXIKR+xhI Ars4iImO4SzEEwxCgetgDmfMAAC7pPQkVb1FlKITpgCbKLnxMlaMmBElSI8A 8VLDBIxIITMKWhEnVsiJEbIipbwYpShBLUnWStP0coZRyTIqOQYFWy/flE7G 0kqpZLyw+AcEIE5T0CKYBHlYmVR8o5ILJ5pUgDkip1HqMEi8VqXfrkb5bCoU enxhTUZo4WrspMjY4/ujjn7CSY4CjgD08FrUVN1GiyrDrATB96rPKAd5DTKX VgxyakRWBS9gpOADDmgCXltoOoEWkETGTdleR55uN6GTCPBFwOrBA1nkfBQZ px9CbAmSWQYtlT0Y7gT6ZiqNMMcsYVCPGOqhw/GquX4tP0MnyLVJ8h3SAqes 0CUvotyklaAyvwZU6lOjSrwqUFOR4+rp6qkrp5Yneh8vjXz+cO6LR/NfBoLd MN4E2STwC8wPvwKRH4L+VFBJEJsEWVXoiYWDKp68+LEBBQQdLIMC4zhICGVH 16/tJhUCMn/thc/utrvtbn/TW6Y6MUOV4FfGe2QxDlEEgImJE2JkH8XWwAJC OaxNP6hJO6Dnhei4R7WcI1rWYS3zkIZxUJ1+AA7p0g+a2Edt/FB7QE5RhAFm cg5r2Yf1nKMGNiUT77hdGOmVxXukcVnKFL8sKUOWlKVIyTfwi8yiYquk2CIp sUnLXMpKr7rILi20SQrgKx3wxCLMsQjz7ZJipxhU5BAV2UWFNnGhTVRgFeWa hQVWcbFDUWCV5pnFIJ+a7dMJQH69MMMgyjAIPRqeQwEPC7aVqo3Fcqk4sGuX g5huDcuhTLdIU5xKhlvNsspTQTDoBPBRM3MsososQ0uJq6PS31HuKfepvRqm RZJkliSbJWkmUaqWn6zmJmoFaWpeioKdpOQky5iJElasID2KmxzKTQ6TcRJc BmllvufiyYb58YG7Czcfr8zfW5yaH7+2Pnfj7p1bDwMRKE82FjaWbizeHJi+ 3n2lq6mro4Ly6QrYTU435F1oKxntbpy83Hpr8NSdiQsP5q++Wh//4tEMsgkJ DCFZf7cnFsZsXRg8QkJLvng0CzCCbAJCNqGDCVAJiKqlSHMPQ04BBRVkpLNJ 0BMTBINYdxgfbfBcQzZ5vjp5d25wcbx7sv/U9e6WkZ62mwNnAExg8OHSyJPl 8ZfrN5+uUlixae8IsAkc2pi5OtV/+lx93snKDNClluKbl0+uzPQ/uD2CAIIG lO1phP/UCJzyl7MJHUnIcp1QyU+DCQqX6LDYQOaCDlnSQx9eF9nk95/dJXhC LhtEHEEvSl6LaDubwNvBFwIygtdCPPkJEZzBu9quoDkIMuT90ikGEQY/UoJ4 9LuF+Vhp7sX6TYBQgNbZ4a7R3rb+c7W9pyqvnK250Fba2Vx0piH/VF3uqbqc 9qoMjG0hwiBxEvCCthXkFDKCNVAwTh/TjpEa8RjCD8gA2JLjlJE8yYAGAAtU AceAMxUijJIXjUEuIGHaMW7SYUbsvtSoj5PC9wCzALyw4g+w4w8y4/YDvADd wHx6ODy0ABokqARJBITogbtYWQbpiWRsxmL30JplDKM4zSDZlB6gQ5au4CeI WdFidgyACTc1jJMWxkg+xko+ykw6AmIlHWUnH+ekhIJ4aRFCZoyEk4CSchMV ghQpJwlz8EKLuXlhnY8jJI5jc+UvTFWL0zUSBgg6KlEatMApFo3ArOZDB8jF oOAAvDj0UvTUgtaqEcO5jPiw6JC9hE0AfNB/LNOqztzCEyQUkFsnAQGb2FUC ABNkE12AShCj0IYSlLmLSE+zjPwpKrEqBCDo0AdRhFZ+LI5BzEQ8oSRhWWTw iGFZpUxgE4eCDWwCYJJtFOfZpXQ2QTwhVEJXc7Fz4EztrYGzK5O9DxeG396/ BXhCZxMSC0/sJkE/B/1ETZO/hE22V41HSHkeEIUqW2Cy3ekrqD4jcgodSQi/ 7LLJ7ra77W5/drtY7+mqcZwut7QX6ZpzVQ3Z8vpMWbmTV+Hig6BTaucUW1mF ZkaelZFrSc8xp2Xpk/2aeJ8qzquKswpCzdwQC+eohRsChGJgHtIzDloFISbu ET3roJYB8HLAyDpi44WaGEcc3DALI8TBCbOzQ52ccK8gximMc4kSoLUJYh2i eKc43sqP8SpTfer0TB0ry8DJ0LN8WoZXk55lYOaY2LlmTq6ZC8q38gtsQoCU IocEWKYA6MYhL/eogVNKvepit7IoYCWnQmDslDHdb+ABdHh1HOhkGPkZRgHQ h1fPdmuYDmUatD4926VOd6jSnOp0mzzZoUzNsQqrc4ytZe6OSl9DvjnPKrTC moQfo+PHqjnR0rQwSVqEKDVcwoiRseLkrHg5K1GSHifnxWvEyQY5w6hgWdRc n0VRlGFpqykc6jk9O9q/Nju+PjcxN3Z1eXr04drCs/vLLx4sP16fX1+cnJ/s nxjo6j/f3NlW3laV1Vzh66jN6grUmAY2Ge9tnrrasTTWBWyCwSYkHgQJBYPf CYYgpKB/F8noRQ94//zhLeARwiDAI2/vTxNbCSDJ85Ux0LPlUXqWYEw+DKIj CYaiULmLA07L6EhAHKFB8NAkdYfxufb63szLjalHSyNLEz0AJkMXmwcvNAKY AKdszF6DRenjO2NPVyaer91AqwfaO6haissUm9yfGxzvaWsr85YFCnacrs6a 7G1fmb6CthLi+YA+YBgdT1eQixc89EGwXN+OJzuyCd18QNbnQVSynRHIOh+9 oYALsMQz3gwxDMEtwW3Ay8FMQAnEEzSaIF/gCyFowFG6iOFmRzjCG4C3hlUS QHAP6KP101RC1/b3tZ28iNmFbnDBDw0/W6zaQKwqcOd//OL+v375APRvXz2E lmKo53e+DqQmA8Ha7O2DWSpTwd3pZwE3PPg3cG9ucG3mKvz7mRu9MHO9c3Lg 9Ojl9oD9paqrrQR0rqXwZD3lQtZY5sbwFkQPUqiRxOwTwwo5ioSCtAItRrig zxgxu+S5FZhTC93GSHkX4Bdic6HgJT1UmEqVoeQnH+UlHQF+4SQcgpafchQk SAmBllhkgF9k7AgQdS43Gq6jEyVgLXtboJA9sAkGxWM4fLZNkWWR+81Sj0Hk 1PJtaq5FDct1hkacohIly3jxQmYUjxHBBjxJOpIadyApem9i1N6kqP2gxMh9 SVEHUmIOpcQcAaXGHgWlxYWkxR5LjwsFdmAlRvBSY4SMeEF6HF0wIobvOnaS iBUPOCPnJ0MrZMby06MFjBjYBcABQUfGS4JDQD1KQRqp2w7nwpXjww6GH/ow 8sjH7KRIGTcF+MJlVPht2iA2QXn0UmATl1bsUAsRT6wKnj7gbEbiULD2IgmB JzHyVFKvHztuIZ4QHgHZlEKQXSWClkDKn2MTuBrrBzaRUmxiljCATZwKjldD WUwy9cIsgyjvx3YTZJMSrwp5BA0ooPIMbWuJe6izfn6oa/VG34P5odd3pz97 MItsghZVxBMq6iRQFz5IOzpu7QgmO+JJUFw8nVDIIPH1Qjahl5KnAwshlKC8 XvTBv/bCZ3fb3Xa3v+ntfK09SF01NlBntRUEHRy8UGc/U2s9W2c7W2s9VWnq KNW1l2ihbciW1mdJ6jNEtT5BpZNTZErN0cT75ZGZiuhMebRXEu4UHHNwQ5yc Yw7WMRc31Mk+7uaEuZjHvZxwDyvMBUjCi7Kww63cSLc43imKMzBDLbxIEzfC yIuwCKMdkjinNN4hiTcLI6ziKLs0xiaJsYpj7NI4pzzBLklwKZLdyhS3AnCG maFlQ5tl4WdZeNlWQY5VkGHi+I0c7OfZRdDm2oRFbmmxR5bvEAN95NnFMJ5t EWQYuRlGTqaJC7vQzzLzy/zq1jLX6drMk9X+cp8SKMkijtULog2iOL0Q8CRS xoiUpkdKmTEKToJGkKITpWmFaQZ5mk3LdZtEHrMYlOVUF2Wa873GM83l1/vO LE4OLE9fvzVyGTjl3vIs5hBenh2jai/2d17pajnfUXWqsai1MhPzdJ2qzznT kDfW04Sx8MAmAAIAGoAYJI8WEgqQCAkqIaYT2MWswrCLGbpIbi60kgCGIIMg niCMBHgEuGbkyW24wvDDhWsY/04XPQiFeHyRnJYETO7OD6AbM/oAoE8XPOwe 3x69OzcIC8upa2fHL5+YuHISLSar0/335ocQTEBUJEggeGSzZuLaJIw8WLy+ NnXl2rl6ABO3iplp4FdnGa+drVsOsAmyzKPlMSx3QiLo6ZUZ6VRCvKqQTXbE kyA2CaISXIpvpwC6WxR9nY/VCmjpQCcRUog1B+4K3bqIN9d2IYygVYUoCE+w g4yArmhwWQIm0IHdn8ANcs904giiHrpH2Y72lCBaQaevoE8VxpFNoMV3QTFL IN/yV0+Xvni8gNVnMNsz5nPGBAVYBxNd3dC1DC4OHyb+uaG9uzC0Nnv1zlTf wkT33NhF5JfBS82Xz9VePFF+rqUIq7S312Q2lLowjIWYWuglHYmQXPAoBvjD iZhjmWRILsnUYYUX9MIixSixDCUIsEXBjUIGEaUdByRBPzF2wkFW3AFW/IHU yI+J0qI+SY/emx5DiRGzj5t4GGBHygoH6jFQCd5TjeI0k4xhljOtSrZVxbFq uGYV26hg6mTpGkkqEIpcmCgVJAjZkUJWhIAZzmeEUcaUgN2EmxrOTg5jJBxH AZgApCRHHUmMOJwUeSQ15hgSCjMhnJMcxU2JpgtGeGlRyCPc1Eh2cjgrKQxa HCSCoyB+WgxyDZAIXDk6ZG/E4Y+O7fsNtHBxETMBUMKiFlFxKwFDCein2QRk oEXBYGgMScxFYuQ3rSpbcSJ0QgmiEhShFaQStK3s6NMFPEK5cm3JIudYQTJW wGjCcat5fi0fwCTbKN7u04UeXHQ2ATABtZV5rp9vWrx+Ye3m5R/YJBDphmmE sfwihSfr1Lcoxu7tmEN4Rzahg8l2PAkCE6QSfAmCKqgXNEIhkIK2FdzdnuOL Xi0F+3/thc/utrvtbn/T28V628UGO+pCva2r1tJZbeptcXU3OS81OkDQ6Wl2 9ba4uxrt55sclBpsXXWWzlpLV52VmtDo6IHTa61dVabTpdr2AkVLhrAjR3oi V9biF1VbmQWquAxhWI4outLA6PDLzmSrm2zCSi0jkxvhE8d7hDE+SXy+llFu FZSYednqtBxNWoYi2SmJdYhioHVK4uyiaI863qOKdyljbZIokyDcwAsDadnH 9NxQHQf6kSZ+lBFaQbRZFmuURBklVAdllccZRVF2ZYJZGmOSxjhUiU51kluX 4tKkevWMTBMnw8gC5Vh5uTZ+nh34RQDwUpdv6Kh0n671naz25Nl4Xk2qVRJn gZtRJDmUqTZFikGUaJKmGqWUN4VRCssDllMrcJsEmQ5ptkvut0l9Vkm2S1WY YSjwG1uqc7vaK7tP15/vqGmuzKsrySzO9RbneAr8tgyHzmWSWdV8vZSh4CVo xCl2NTvLJi3PMbZW+s425vedLB2+UDdz7eTy5EVgE6zASPfjIhUV6YEhWHME 8AEj5ZFNsKZ8oENZSQBDEECghf7DhcEH88AdcNYgEd0yQvJ0BRWFx1d8RHPl ItVMXmz9mIYOXfBogwl3bvTODHUCkkz2n7o13LU43k1cuYA+niyPg5BNgDKo XLtbvliPbo/eXxieGTh7saU4w8A3iRJdCkaRU9HXUbE02QNrUZJqGJHk3uIw dGCl+mQrbgU9qdBWgmASxCZBePIXssmOGLKjWxQaTUjYC94VsfUgOqHphNhi gDKCYk+C2GRHuwl24HUxkgVeFB3GyHskge1/iR3kJ9hkRyMLhtKT+8EJ6K8V 5KACt0HuljihfftyBS0mnz+aJ/VloEVLymapl0/X/vj27jeBD5a8C+QU/PDp liP0FiNxMfgrNHzygYo5A4uTPdPD50YvU5EvfWdrgFk6arNaKn3AHaSMCyk3 SQcTzDlGLwEDR4FQCryqLLsErSroGAZCvywMKsH0Yk4dG9OLYd5g9BMDeIGW yoqcHipIDeEmHQZsATFj9zNi91FuY5EfJ0d8CMySFrE/PfIAI+YQO/4oL+k4 LyWMnxYOEqRHAICAeGnh7NRQdloYN+04gImIIpRIfnoEjIMEjCgBg8IHAArg C05KBAjwAXgBBB0AEKQSOpuQCQAjSDSo9PhjILS/oAkGdreo5zhgTnpcaEL4 obCDe0L2/jr0wG+RTdJij/PTYlVCBtAEUIZTKwYMARjxGmQYbwKcArsYbwJs gkYTkDEAJkA0mG2YZO6igwmyiVH6I28udOhCu8l2NqFTCSgQ9s7eLow0QWGe LpuCi2xil7NdSo5Pw8vUC3NMkhwL4IkY8QTBBCNNiMWEsMmJCv/IhealkYvr U/0PF4bf3JtBNvnq6Y/+11DfGBs3MK8Illyk5xDG0vAkKH47mNDLx9PxZDuY 0C0mT7eqPaL31zPi9IV+XxuTz7d8wOh4QkTCVYj+2guf3W13293+prcL9dau WjMK+pca7T3NQCWAKjbYPV9nIepuc3e3ui61OLtbnD0ALzCtCciFYpMLNeZz FXpQV5URdKlM31dl7q00ny/SnMgQ15jTC2TR+eLIE17JaL1//nTpWEPmhRxt pTq12i6sc4k7S2zTXdX3Rs/eGz23MnhifeT08mDHdHfdtY6C8zWetgJDrV9W lSmt8IuLXbw8KzPTkOJRJTjlcYq0Q5KkfYK4j8WJ+6TJB0F6brhBHK4VHFdx j4I0/OM6YZhOGKrmHdOLwrSCUDgEu9A3iCMs8jizLAZbkE0Zb5JE2xTxHl1q gUtYV6DvqHKcqHa1VdgyDKkuVYJdBmCS4FKnuNRpNkWyXZXm0XMpF3Ed16Xj ObV8v1ma4RAX+NXFWfoCvybXoyrwa4uzjCAgFLdJrJWkiRhRyZH7o4/+NjH6 WGz4oaijn4Qd2nN8/6+P73svdP97hz/82ZGPfh667xeRh36VEPpbWI0Iko9m WfgNhZb+MxXz188CJmC6LYx8p9dYJDHv6HyFgj6xrWCwCbDJZw+mEEweLQ7d m71691Y/6P7cwNpU3/r05Y2ZK7AL4zAS0GbAO8ETQigk/GQzWfGPn4P4ECQP oxfrE/Bogwfo8lTv9OC5mwNnoAUqWZu5ClSyMXvtweJ19OMiGbQAVdDe8UOS rgCbTPadOFef59PzXEqmV80udat72kpnhjtXb10FHsEaKEAlaD2BliAArslh lU5ERxL67p9lkx0Jhexuj84gpyAmEA8uDDaBXboZBU0nJJCcOHcRPCF+XDi4 oy8ZiVKnL8XRyQoHQRgOvyObbDcDES+sHRVEZz9QBi2gnnxW9LcWFIeCDnJY vPL7V6vfvlimakc+nHtz/xZwyteBJGkAJnAUy03+cYvO6LkC/uO7p6B//+bx v375gH6I/rr4MRJ8g48I/QYDaVqBiMc3ffsDtAtam6UQ5ubg2aHulp7TVWeb C9prMpsrvE3lHsATYBasMgn8gsEpWFQRGARdv/I9Smixj8IQeGiBX4BZSEox OB1aOB3DWzA2n5Q++SGHsDhRzY1XsGJFaRGchJD06IOJYZ/EHvswPvTjpMh9 8eGfxIV9nBCxNybs49iIT+IjP06M+iSgvTAIR0EJEfuSog4mRx9GpcQcAaBg JoQBRyCboNEEIQWRBA6hMQV20+KOwVlJUYcSIw+i4sP3xxz/BBV97ONNhXwc dRT0CQh4ZP8H7+z7zc+PfvI+QAqMpMYcw5ATwBPKehIIdberBEAiri1OIRYT EIAAmiqQTQBM6GxCap2QEo0UntB8sQh07OjTFRRpgkdJVmG6jJJNNgkYTag8 XVY5xyRKt0gYwCYeNS9DJ0BlmgTZFiHgCbAJgklFpg5hBETHk5OVGcAmi9cv rE9debw08vb+LcIm+F8YvzSor4j1Ccr6HCAFTCAMbEKqStErSQWZVOjZ3YPw ZEeHriAqQQ4KKu+4Y4gK3aSC/edbcSs4+Nde+Oxuu9vu9je99QJoNDsDLYAG IIn1Qr0FOrDb2+Lqa6UER0EXm+3nG21djdbzjdaLTbYLDdauOnNPk72vxdXb aL9QYzpfZbhQbTxfZTyXK79UrL1cbuwp0Z/Llteb0vKEYZbYDwtFkY0m5sVs TV++8ZxX3qhnlZs4FWZOV4ltY/Dkt6sjX61cfz7T82r+8uvFq89ne++Onb0z 2L440Dp/tWVxuGXuWuP0lfqbfTUT3ZUjXeXXzhT3teeeq/O0FJkq/XKnPF6U 8Ikw4WOjJNypjnNrExzqOJsS0CPKIAYqOabmHtEJjmn4IQr2ISX7kIx5QMU5 pmSHqLjHoKPmHdeLIqAPIwZxZIaJUZuvPVXrBjWXmn3aZIciziaNdSgSnKpk qzxRF3DuMkkTDZJEm4rh1vEcajbIY+YXZmiqi6zVRbbKAmsVqNBWnGnItMu0 kmQRM1KQFs5KDEmPPZQaHx4fcSQq5JOIwx+GHfwg4vAHcaGfAJsc/fgdYJOI g7+MOvTL6MO/ij3yHiPqIx0/ujJLe62zZm2qJ2AuGcNMv5g0mCTgQlTZYpNB NGcEkncFYuQDUSdYe/HF6viT29cBQFan+lZu9IBWb/bembh0Z7J7GfpTfYRQ EEZIHROMMdl04sJQFBIpv+WxjJ5duIuRJtDCs2xlum9utGtm+OyNq6eXJnoQ RijjyO1REMa/b1YeWbsB4wAsxBfrySqV2P/h7ZF780PjPe0nqzI9WrZXw3Yp 0gvsstPVmWOXO27f6L23MARgsjE/CJDybG3y6VaSrhdbRhM6mOyoP8smOxpQ guwjOIEOJuQUOikgmKAlZbNm/Vb4CYxj5l5iK4EV+B+/uL+jcxe+dJDxIsgY hO8OY/kxSxhWdvtTdhN6fD2Bix3ZhNh36J5g9KQBxIpBLBp0RoA3hVeADgjD T/7t8/v/+tm9P7zZADxBA8oXjxdA37yg4lAASeDQH9/e/fcvH1JlKGl3AucC ksBFyC0R1CJGHHosDPw5MPiFhAKRtGn0oBi6UYZkVMPfseGf6PL0ldnR8yN9 befbS4BWsLpiIIKehwwCwtB7rHKC+Y1BGVYRxq0QMwqmOybCGHnSB9jBwveb jGNXZFnlXqPYoeGZZAytOEUpSBQxo8TsGF5aeMBrKyw98Wha4tGU2ANAJfHh H8WFfQjMEhdGkUtUyJ7Io7+NOLwn8siHABEAFFEhH8Uc2xsdsjf2+P640AMx x/ZBPz7sYHLU0ZTokLTY4xiKgkaQ5KjDiCQJEQfiwvbBFSKPfghXCz/0W/hC O77/1yF73zv6ya+OfPzLg3t+ceC3lD55/18+eOfv97z7Dwf3vBtx+CN4Cbgm JyUKs/4qhenGgK9UYLW/SSgoehQ8RnnoZRyDnEv36dKImQEq+ZGoePkASgTE MUk5WJSEBiABA0pAARhBe8oPwAKTTXDijwX3gIhkklIdymgi5wCYWAIhJw4F 26Pi+HWUW1emiZ9lFiCbFHuU5RkUm1Rm6WiEspmz62QVxSYLw+fXp/qf3B6l Sixt+XThDxpoagx8H/6IF9B7FuveAp5AH9mEBKEEgQkpREW3m5Bv7KDAE7wI MYXj9TcrPAaSg/2oQgqlAKesjlNC+8sW4KDQqvLXXvjsbrvb7vY3vV1p9/a1 ui8BXNRbid0kQCsuNKB0Nzmwc6HBhrrYaKemNTp6Gx3dVebeGmt/veNqveNK ja230nypzDCcpweNFZmvZWk7zfzitBB7yHvKPf9gOviu9ch71sPv+aP2VrCj m2VpNVpOk1l0ucT1ePDs7+6Mfr829na+//ePJr9YG3o4c2FhuPVmf+30tYaF sbaV0ZbVsdb1ifb1iY7V0bal4ab5a/XLYx3ILH0dWV5dopJ50CKNqM4QXWx0 j54vGb9YNnahdOhsAeyeKDO0Fmka8xSVXkGBJT3PlFrsYFXlqMoyZIVuYY6N 4zcxXJokqzwW5Demw6HWciuySUORIdvAdclTdOwINSNUwwzTcyJB2AdpWeFw yMCNMgtiLeL4DD27zKusztYDTVRl6+vyLZkWkVGaJGWFC1OP8ZJCRGlhGkGC iJco5iWJOAl8ZiwzOTwl5nB8+N4jn7wTeuBX4QffP77v3dD978aHfchOOipN DrWKUyv9xssdlXfGul+uTH5+f/bF8tiLFap24cvVUdSn6+Nonni+VUmEkAL0 qQh0Wh5I/NkNni/wrCGV3JeneufHzgM7LIxfgEF8EtF/i6MHTsIjCaMjoY8P PnxOvQj8pkflDd765Q3BZHHi4tTg6emhM7eun3t4Z7NOIqlIsr0oCerV/VuP VybuLgyDqCCCpREAlptXT7aUusySeD0/2qlIgU/7UkvBwLmqlRuX0M8tYEUa DeQiu/Xm3synG1Ov1m6+Wpv6dH2a0v0dkIRgS5BzFx1PyGJ7u92EnuaXnqEX 59BphZ5uF18Xl7gkZxe5B7RokFBxkrBru+j4gC9NbhhfDjmFKkAfME+QTFk4 Z0f3LXLP5ILElPOXsEkQ1xC7CXFRQxJBYQg8IS8kCzpcEI+y7e99u1cbVo3c HjhDv6Wg3MjwHjEnAAEQOkbRYY2OJxg3BH81+GCRMfFPDC1JuUbc2O4tDt++ 2Tc1dG7wUtPFE+WnGvLaazKrC2wlmbpCnzpQTVJNMoPluuRAH9ABYMF0xJhh GARzCrwqzIGcbZNQFVV86my7NNMqzbBK3SahXce3arh6OUMlSlEKUyS8BE56 JC89CgNDWElhzMRQdnI4tGlxIamxR4EsokMoMIEORRmhByKPfBx+6MOwg3uO 7//g6CfvH9v3G+hAG7L319jHXaCPY/veR/oAQQd06MNfEB347c/3f/Czvb/+ 532/fefj3/xsz3v/BPrkg58f3vt+6OE9seEH4yIOJcceY6dG8ZnxYm6SXJiu lzCNUqZJxrIoOFYl16bi2dV8EHRQMAiCowYFG7SVBpmlkzGhxcEgWeRsi4xt kjBBZikLOMKpFri1IpdGCB2Him9Hjyw5B/oo3EXBKXguXUYxAxS4INMiY1rl cFm2U8Oxq1hWBQNar4GXZRXnOmQ5VmGujVKeXZTvAEKRgMoz1KASrwKE/VKf sq3Kf+1i4/z4JUBd+K6Df0Jo2UQrJ7IJmo+fr02QeBCSsD3IX4sedRLEJuht SzevIDU8/nFqYhB6i8HTYWW6D4T48zjgAEzCEjEyEUR28SilHweqoCgX3102 2d12t93tJzdgE8AQZJOLDTYgEUAVgBFoA1EnDuQUmHCpyUE5cTU7uxFempx9 Tc7LdfYr9Y6BRtdAg6u/1g5scrFUfz3fABrM0Z4zcWv40b7IDw37fyb7zX/V fPzPQCjiX/1f0vf/q37vO/aQ3+RxYirl6ZdyLQ+unPhmYej36+PfrY58dmfg 6a1LK6MnZwcaZwbqZ4ebgE3WxtsATO7eOHHvxsmNiRPLo62AJ3dG2+cHm2YH Gi6fyMkwpACbGIWhtVmS3lb/ZHcFCNmku9mLOl/vPFlubC/Rna22Xm7PnLt+ 4vbEufWZi/fne+/O9qxOnV8aPzt9rfVGf9N4X8NAZ1lXc2ZLmaXUL/Wq0m3i BKcs2adm5Jp4GVqWW5FqEcZZxfEWURxQCXCKIjUEpOVEuFVphQ4JsEljkbUm 15hnlxjEiQp2pDDtmCD1mDA1VMKIUHJjZaJ0uZihgFaYKuIk8tKi2MmhcWGf AKHEHf8o8vBvQMlR+3mpYRZJqk/Lq8u1DZ5rWJ/qf7V24+3dmWfwFLh9/flW vZK3926AXm5sxkiiqzApxf4sUPqQnqmeMAXdGQCePsAmwA7AJjCIP5QFxU7S f17DH9bgEYYUQzHLFpvgBPyNDqhkor9jtK8VwATwB66zvbxIkMiE5xtTj5bH 71POXZRr1pOV8QeL1xdGui62FsIj3q9nwaddYBefqckYOl+7erMb2SSQOXnk zb0pikrWb4I+XZ96vTHz9t7sZ/fnXj+Y3ZFNSBAK0Y5ssmONj+12EzojEEiB OfSQBxLcGhSej1Yb/N2evvwOSgVGT0pMXhHXzLiwIamJ8Q0SrzbyvlD0FfhP BMX/dOB8kOjJjckVyCIf3gvAyL9/8/g/vnuKYIJkQYL36S5YRD+RFgBPp/e3 Z1febgbCvxRhTPI3+mk2IYkF6HFJJHiHXJmE2KBxiv7HgvlYrgJ9+e4vXYfl 6PRw50hf21B3c9/Z6vPtVJ6xM035J+tzT9Rlt1RS2cYqck3oBgZUAh2glRy7 NM9FmV08Rr5Ty3XqeU4D3xioPKsSJUs4cQJGNB/EihFz4iWcBCEzFvAEQ0sA UjB6HcPYSSx8WtzxlOiQpMgjCeGH4sMOgoBW0CMr4vBHACxAJQAsoIN73iFC DNn3m3+BDvZR0Iejhz5698BHv9j/4TsHP/rF0X3vhR/ZEw0oFHkwKfpwWvwx dkoEnwF3mCDjJ+slDAATM9CEgkPAhIiOJ1Y136LmmVRcs4oLrRFoRc6GFmiF ahFMgFbkLLOMYhMqx6+cMnDYA3USgUoQTOhsgoN0YAHtyCaEdCyAUQE2ATnU bMImHj030yKCP1CuXZQXEIJJoUta5JaV+VUgAJNijxzxpCpbd6o+Z7inFQB2 fe4afAfiPyr8zqGXXwzgyRihCSJkkKDMwIRN6JxCisgHeWftmJd4e3nHp8sj /3/YBJ9Hf+2Fz+62u+1uf9Pb5TYPogeACbTQhxEAE2xhF0XBCOyiAiN9zS5g k/4GJ4DJYLNnsMk9UO/sq7JQdpNc3UCGqsvMLWce90d+aDrwju6Tf9Z89M/6 vT9T7/lH0S//T8E7/4f0vb9T7fkn3bE9WekR57OMTwbO/G5p5A9r498uDz+e 7FwfPjHX3zjbXz9/rXFxpHVptA2NJhSb3Dx1d/Lk6ljbnZEWwiZXTuZmGlNV rEMG4XFgE+COm71VoIlL5dc7i/raMi42uoFNuuocJ8oMgCcAL6PnS1ZudN6b 632+OvT63tjbBxOozx/dgN2Hi1duXm0GNqnOVefauXZpoled3l7iHDlftz55 aXm06/b1c+OXGkcv1A931lw7Xdl/orS7ueB8fc6Z2owTFZ7O+uye9qJTNf4i t9yhTBOlHmPHHUgO/zAhdA8j5oA4PVwjSJCLmQoJSyVhK8UsmSBNzE4QpMcw Eo6lxR5NijgQe+wjUFrMIUFahFmS6tZw6/MdY91tDxeGYb39+u7046Xrj5c2 XbbQTQv0jGY6J08WYk9/ujL6PFADEdgEKAZG4EGDWIGPKugsTV6ag3d3oxtG 4ChmAKYXHUYkwccZyV0Jk1dnLuMgcVSGc4F0xq+0D15sGO5umhk+C3OQbl4E Qi0w+xb6Mu0IJoHxyXuL19dmr63PDcIj+3YgiH7ycntPR2lLqaM215BvE5W4 5aeqfOM9TRszfZgqORCMMx7IRTb9gzZmNu0mO7lybWeTP2U3oVfxoPt3BRVA wbRRpLQiWZkHxYCQz4H+Czx5UbgsZtnF9TY9Zjzol//tbELAhO7TFeS0htqR Tf5UPuTtGBJEMUGubkFXw7eAbPI/vn3yn98/g/a/f/0IDSgkYTI56ydyJgfZ Sn4iPwCiCr0y5re08ivEXELueUc2oft0kc8ZIQX/eRAwISYejPrBCjI4kw6q dJLFH8bxnwpMRmaEQYSXuwtDQC6Xz9W212Ri9H11gZWqKZ+pL/SogE0ybRKf SeTU8SxqllaSqhImyfkJAc+uSG5apJATx0+PBjARs+Oh5aVFIZug9QSVHn8M MwknRR5GDy5oU2OofMLQJkYcBlRBkwoaU458/B4iCQGTT97/p49+9Q+AJwgp 0MKhIx//MmTve8dA+94LPfDriEMfxBz7OCF8f3LUwfS4ELgHLoBJWpSYFSfn JSl+zCYAIIgkDo0ARScUp07k0AptsBuQRck1wVlKLsqs4MCuUcYCYYJfoAxE EuQOIgQQNJHA0SBjCohYSegCKgmACVLPJptYFUygEnTudWnZfpMgzynPd0ro VAIwAir1KUFAJTAIqsjU1BeYzzbljfS135m6vDE/GMQm9CC1wLfij77nUTva TXbMyoU/OhHPrqB4E3rIyY6x8E93ApMd8eTptkTHRH/thc/utrvtbn/TG7Gb oPsW8AiMECGhbAr6ADJbePIDmzS5h1q8Q83eawHTCeDJFbfsrI5RxQp1hbxn 3v9z495/sez/uXbPP+o/+hfdh/+seP/vxe/+F9mv/k7923+U7XvXHXe406d7 MdT131cm/7Ay9vmty2vX2m73N81dbpjrb1gYbFq63np7pG15pHltvG1jsuNu wG6yOtYObEJ8uoBNMgwpavZhsySc2E2ATW70VAKDAKqcq7Gdr3eerjS3FWuR TYbPFW7MXHq01P9y/fqb++OfPZwEKvni8U3ov1gbXpu+ONJdc7LGVZYhAzbx qtKL7JKBU+UbN7q/eXTrqwfT0H7/dP7bx7OgP768/R+frf/n5xv/4+3a9y8W n90eXrx+rv90RWW2Ti+I5cUf4MQfZMbsSzj+QcyR99Oi9ik4MVYlUyHmKCVc lZirELElvFQhI4GbEpMWdzwtNiQ58lBC2D4QIy5EkBalFyVlmEQna3JuDXU9 DVQkfL46+ShgpHi6fP356uiL9bFXdyde35ukB3rQ3YDxmYI08SKQzhfdujCU kmR3gQfWnZs9ixMXl6d60UcLUQIvRf8NDeeTcEs8F/24MHsMXBPAZKSnpf9c DbDJ7EgnnEIeTGgmCAKTIG8uYje5vzRy++bl2dEL4/0nL5+tCSQuK+9qygf0 O1Xtb8g3NxfZLjbnj3U3LY11YV4y0Kv1ic8f3nq2PP5idRJo7s29W2/vzQKe vFrb9J4KUpBD146puuhsEoQhZBB/5MSFK4EdOB1NCRhzgYtbeuIdEhdPd+RA ByFcyaPRhPx6T19a03/tJz/p4z1s1471JXdkEzp37Gis2Z68Kygcnhg+CDjQ CYLUNKETBMGHILL4X2WT7TVf6Neke4vtyF87sgkdBomz3I6Fb4LsTeTvQvej CwrGQU8wArnk+vh3xJ/N7y9dh/8FN66dmbh6aqSvrb+rvvdU1en6vKZyT0Op uzrfXujTZTrkbpPYrGJrpWlqcapSmKIQpqik6QJGDFCJhAPAEs9NjUyLC0mK OgRIgnm00G6CybUSIw6lxR5nJoQDlUAHBJCSFEklFkYDCs108h6gx+GP3gUG Qd8twBNEEhgEJAk98JuwQx9EHN4TdeS3MSF74kI/TorYlxZziJlwlJ10nJ8a IWbGSNixIDkvQS1KUQmATdLRpwvwhPh0ObVCFJ1QXFqRWydyaoQOtYAKRQ/w BYUbQC5KrlXBoQqOBMAEUYKwCYEOQiWkT4cXAiw72k3QCrMlFsoiZ2yxCcup YfmMfGCTApeUDibox1XmVwGbwAgcgrYyS9tQaDnblI9sQuwmxPcS/T9picd/ cOjanhoRuQO/1YMwBCElaA6pkLtjnq7tjl6IHtvBZDue7Eglu3aT3W13293+ 7Nbf4QPuACrBSBNkk6sn/DCOQkKh2nYv4gmiyuUW95UW9w9s0uIdbHSjW9dZ TXo147g/9Nf6D/+b4aN/suz7ufvIe9oP/sG2/13P0d9Y972r+NXfSd75L6r3 /1594FeeuMNdHu2rwa5/uzP+9a2rjwdPL1yqXeipW+hrmL/SMH+1Yf5a48JQ M7DJ6lgrsAnaTdYnOlbG2oBNgFzmB5v6TmT7dEkq1iGrLBLYpKfFN3ahFMAE NNJVDLunKkxnq61nqizQ6apz9J/IBma5N9fz+PbV56tDn94dfftgAsDkq6fT QCjPVgYXRk9d6yrvqHIUeUQZJkamjtWQa7zR0/xotv/rhzMAJr9/vghU8t2T OSAUYBOgkv/7q/v/z7eP/uf3j79/vjh2qbHIJbMrU4zieFHyEXbcAV7SEV7y EX5KCIKJzyTSKkRauUgrE6rEPCmPIWAkcpJjkqNCUqOPp8JiIOJwcuQRdmKY hBWfZZW1lPvHLp+4uzD8bA0AZPw+lYRq5Mnq6NO10SdrI49Xrj9ZvQ59BBBC E/hkoT8XntM8u17QQkXwVzVkk4XxC3Q2oae+JySyPtuPEwgHwSDWMYHdlem+ qcHTQ5caB7rqJvtPAKTAQxCvAE8lePXtFhMsiUjKfJDBjfmhpRt9U0Od4/2n hntae09XAZucby4415DT1ZTb21HS1ZBzvjG3p63oyunyy6fKrp6tvNZZPXCu 6urZ6iunK4e6GsZ72uaocmZXHs5ff3Zn4sXKjRcbU8SNimjH4iZBJU6CKsKT gA5Ej6BAaWKLIT+G4wqZxInTpxE+CjKawBKXrLrpeajIL/xBkfgEfEi0+/a3 Q68pidpei4RuE6Enttq+jP92WzIxtIBgIUX01yIKKsVCJyA6QRAbCplJt578 JTVfgkhne1wMYQeSBhm5jxg7trNJEKDRrSR0gxH50NA5LWjadnMb/SUwHAkH 8ady/LUcsxbAv1JMQ4dRWlQBl7nBlakrd6b6Vqb770xdWZjomZ/ouT11dXa8 d2Ko61rviTOtFaV5TqdFppUysUgiSMSKAzxBJEHrCSclAjglJeYIAEvCFptA i55dgCQAJvFhB2OO7UPPrtADvw3Z+2tkk0Mf/oIYUKCPSBJ59MOY45/Ehe2L D98PSo85yIw9xIo/zEkMEaSGSphRCm4sSMWLV/EpaYSJOnGyTpRskDJIvAnx 6XLpRCg6oZCYERIegv5adKxAuwY6XyG5BHEHIgmeRYJNgq6AJpIg4VmB0zfZ xCJj2pUsm5JpkafbVUyPnpthFmbbJAVOKd1iQmJMgE3QaAK7wCa1ecYzjbnX e9voPl0Iv8Sni9hNSJgJmrbptm9CHOTnJrrwKOnTw+F3ZBN6CRXi+vV0Odhi 8nhpGBPRB+HJjn5iu2yyu+1uu9uf3QZOZqDpBENLkE1gEKgECAU7MALt5QCe XN4yqVxt9w20+641ewYDYDLU7Lla58B4k3puRG7UR85DvzB8+A9GYJO9P/Mc fd9+4JelSSGtwsTKtHDr3ncVv/w73Qf/pD/8G1/ckXNO1aPu9s9GLz240jF3 uvLmqZKZcxW3LtXM9dbO9dXeulw7e6Xu9nDjymhLwK3rJLDJ2kTH6nj77ZE2 AJNbV+t727O82kQF44BJHFafI+tt9Y9fLAMBgFw9mdNZa+8o1QOVAJsAoZyv d8LgZHfF/fm+R0v9QCLAJoAkACbfPL8FLYzMDnf0ny1pKbPk2DgOVYJbkdpe 6lwYPP3i9jAaTUCf370BnPK7Zwt/eLH0b58u/+fnG//zm4ffPJ1bGumsydar 2WFKdphBGCtLP86K3c+JPwhsImNHmmRpACZ5LpVeKdEpxDq5WCMVyPhsITOF lxqfEn08PTYsPSbs/2XvLaPjutJ873XhnZ7ung460OmAQ504cRInxtiO2bKY mZmZmZlLXGKpVJIKpFKJmZkZDDJTnDjcMNNz5z7nPNL28alKOjNvz+3+oL3+ a6999oEqVZXq7F89dPzj9z775D2F4/u1LpwI97Uty4ntkpaPdAmHu2oH2vm9 LZWjcOPoqR3tqR7p5g93VQ138qAnsEBuAaR4Fsk8T0r3TvWJ0K2LeB3DrQqo pFWYB3CBdyumFYYUVcRbHtMNAL2dMXYSSERYmgxgUpETJSpNgUtRASZ0RPzk dnpJWQzBIia4ibl/cRnWKSlt4OfUFKdU5seVZkfmJwcCm2RGuaeFu2REuuQn +OTGeoI4ka658V6pYY5p4U7ALDAuTAngJgckBztlRLgXpQTXFiS2VucPSCsp PJEBExBx4vqrbMKKNCfLewIdzFB3dPtBrx60ILAMHPhwcr3I0A2MQAGpVMJM HUZKe8j+qi/rnCZLJT8RQUNSVCEUkDW/3GB8wiaEDhBMrq8OM8UKKsEXgWlY IfYUWWMKHMaqNSlrIvk58SYslGDCHWGKH4s3YV5wY7vupCwwEg4lUIM9oVcS ek8saPgekc8DfoTwDcLPEqxLqRzadKUetK9Rb26/ZG5QSkNu43iPeLijdrhT sDbTe/vS9Ff31r/74sr9G8tLM319HaKctKgwPycHCx0DjbOq545gQROgEugV Tx2A/tSRvYc/fPOj3/8OSAR4BGAEPbtOHNwLkIKEgjUTid0EA97Rawt4hLKP vP/akY/eOvoJlZf4xKH34JroMKZ6cp/ayX0qJz6CXuvsAX2lT03UTxipHjdU OQYyVvsMBDOmGidNNR9FwVMAQsOIraEqiIknIBsdJVtdqrfRVrTSumCpqWAJ vAADemwB3AHSoMQwcJwnwSZMWwkJP2F6fDHD4WX1OMVssYmVzjlzrdPwV1ho n8Z4ExdzVU8rNVm7SZCzXoCjDvHvAlQBPEkOd6nIi20RFnQ1lMJ3IP7Pyo03 GW5/ZC4hxhHZtMD4hczCEyanDDASbf2Y8xVyELkFEDZhgYlcPBlpf8zajsJr /r0XPjttp+20f+hWnupMTCcY9l6UYAeTACbIJtCjJaU4ccuSUgK7UhzLU5wq Upx4iSDHqgTHyhi7kjCLfD9DjqdOyPF33T78ncOe56zefMr89SfNdj/p8P5v nT54JVH1eJmNbqbOeae9r+n/9tdmrz1tsfc1x0N74vQuiMLcmxOD6uN8BFEe VdGuNQme4nT/hpzghvxQSUFofX5Ic1l4W0VUV3Vcb21ib21SV01CR3V8Cy9W WhZVXxxekOBkb3BU4+Sbegp7oj00ixKdhfmB1dm+ZanuebF2KYHGQCVAKLnR tiiYry8K65PmA5vM9tcAj6xPSpdH6+YGamGzv5FbXRCRHmkf6Kxpb3jSzuAz Z4NzOdHuXYKc+V7B+oj08mTrxfHmi2NNACaXJ1quTLUCnsAYgKUmL9rTQkX/ /Mcmqof1LnyicPgthcNvnzn41pH3X9r/znPHPnpV89wBe2NlX0dDXXUVHTVl XTUlbZUL6hfOKJ0+rvDZkZOH9p06/PHJgx8e/WgP6Pyx/TpKpyID7KsKk7ob y/taq/paecAmQx3V433CsV6KTUBjPTVIKBSbbHsgY/w7Om7B5kQ3JpYXY6p5 YJPpfjH6X5HfxDBypLO+qLepbKSjmuS3J+YSZp58xB+8f6ETF2CIqCy1JDOs lBPO58bVVaR1NxRjVS/qyfQK5wbqAYuo+yCQSLeIiBkaPwJg0sbvb67sbSzv lpY18LOri5JLOJHctNCC1KCcRD+0m3CiPYBBgE3y4725ib6ZkS7FqQE5cZ6c aLf0COeUUAc4IDfeJzvWOy/erzg1pDovvomXA2wy2SmSdehiJelixmLIsols nivizMP08sJ4E5K7iaSokusaJJcgcPlKQrBxmYokRZIP4ypXbhAKWm1YvMMS yxLEFFlpE3ZgggCTBUicCBIHM0cZBssAawCY3FgbIccQHyd8/rjJ9GhiuoQx sw2j/YWZ44tpYZHrHsaiCZY7HPGdY/69svEyPxaAQ54wuQjhUHwgfOYwZlpJ yCuAfz6+s/geoZUNrSfkI4Tz8L5jCVFiT5noFk12i5D0qbI4g9KFsZbN5ZHP ry98fX/juy8u/+Gr6//2/Z1//+P9h3cvrc+PtDXwuZz4mBDPiACX+HBvfklW az2vt1XU0yJsFJZVcNMzEkLDfF3cbE1MtJVUzx4FMNn/3usfvv3ywb1vYkrh fe+8imCyZ/cL7762673Xn//onZcPffjGsf3vULVR6AxglC2GNscA8ijRcS7a Cod1zh3SOP0JSPv8QaASC60zFtpnYBlPWxnOgmAT1vaWtK3EivbjAhKxM1S1 N1KzAxmq2lGEogJCSLHTo8DEWlsRZAuEorNNKJTO01KwAvTQVGCm3gKaAACx M1BFrCCoYqOnTFthYMAkFLSqKDDjU1AUyNDuZPR1ziGbmGuettA6DX+Ipc4Z G72zjiZKbpbqTDYh1pMARyo3F0bEE8WHOJRmR0qrc9rEhQOtVfjPi/+2LJ8u YtEmX93MH46Y4fAkCIVpMSFGE1aerjFGiD3Tj4tgBT7EaDugBxtMhlsqCZ6M taMoNhmB6z8ujHz8ey98dtpO22n/0A0wBETsIxhggmCCIs5d/HjHqnjH8iTH klSnwnQnboYzqDSNopjqBKeGRLfmaGexp2mphWq54tHE/W+Hfbw7/Ni7McoH Q9QOBWkc9tc+Gm2mkGanFajyqcl7Lxm9/pzRq7tsPnjNft8bnkf3hikejdc8 k6hzLklPIc1EJdNcPddev9zTUhDs3BDl1RTr25Di3Zju25Yb3FMS1VcZ18uL 66qIaSqN6BEk1ZWEpoWbmWvvUz71io7S75MD9fLjrKqy3CvSXbgJNukhhsmB uqnBBlmRpnmxlrCrMNGWx3GrKwrsb8wf6yidHxSsjktAi8Pi2X5gk9quurxy TmhCoE2Iq4GD4TlT9aP+DtoFSb4DjSVLw5K18ab1ieblkYaNyRbYxAHMDDWX FacF2mgfN1c7bKR4QF/hE+2z+9RPfqh87D2FI3sO7Xlpz6tPHXj3d9oKR10t df2dzQ20lPQ0LoB01M6rK566cPrI2c/2Hz+0F/Tp/ncOfvQm6MSne5XPHw72 Mq8uSR7qrBntoewmWAWDWlGDeuuo8JNu0USXcLLrMW8oltAwwayNjpEOVLF1 2j8ESxai+lt4MIM12YFl8JZHblJdkiK8f6FDMuyCmfrKdH5BPL8gQVCc0sjP 6ZaUDjTzQMNt1VjqfaxTAOsoeLbwnMe76ia66ia76ye7YSwa7RCMtFO14Ec7 a0lwfbu4gDLBFMXz86Lg7ShKDYC3IC/BOz/RBxgkO9ZDVjAPyo33ouUDyk/w BxUmB1VmRTeUc3rry8bbBWNdQmKpYUZ5sCIy5GYSZlYtZNY9wfUnWWTispys dYllQS5EwFn4NPCyJH0WKd2OdTdwOUq8vxBemMtmEraAi1t8l5F6WIRFcgLj 38tMI8aKwmCm7SVlVpgsgIl/WaYQQmToo4UvDqvsC3kspiGDPHmSOoDpUUZ8 w5hIIldyX2fiXsW0bSEdrDLKyv+YkMVY4SrEDsLKFy2bZVr2z2RxrqwZi5nt jXwgmU6AuHoc7uCPwHqvu3ZqsH5+rPnK0tD9a3PffL7xw8PNP3x19U/f3vj3 P939jz89+I8/ffkff/nmP/7t6x8e3rx5af7y8sTFxbGra9PXN2avrEzCGGZW ZgYXJwdGe1sqCzM9HcwVTx468tHvD33wFsbCY9GT4/vfO3X4wzOf7lM8fVjp zBE4RuGzAxdOHFQ7+6mO0gmtC8d0FI/rK5/QUzpuoPKZkeoJQ+XPTNVOWWsr 2Okp2epegN7RUMXRQMVeX8lOV9FeT8nBQBlmoIdNZ2M1GMMABANXUw03M03c i4c5GamC4DBbAyVrfcVH0gPEuADXtNW5YK193lrrvK22AsgGBvBAcHFa9oYq RLBpo6cIe3EMA1t9BVuD8yBrPSoh8FZUux6QCCUrnQvEXAJgsm3HUbLSu2Cl q0AdoH3OSvssyFbnnIPeeVdjZXczVQ9LNay66O+gC/Kx1cLNQCf9YBdDVIir UaibcWasF68gHthkqzxTj4gkWyDlWakaT+3w3VtNbBmyld9Z2YOZ9RZZZU0I 3WC1dxLwTqiERCMS514KZLYLWmGdXyynhWWwsA4vFgKmawGzo1HQpDLescMm O22n7bSfaggmaB9BPEEriawAQPiJTpUpzmVpzsWZLoW0ytJdYBdgS328S2Ok o9jLrNJGs07vQu6pj9NO78vVPllmr5Vtp55ocSHS7HyclXKClarH2Y913nhG 9+Wn9F9+Ru91SgZv7jL+/Qsm77xotucly72v2O573WH/Wy5H9nh+9qHf2f3B F46EqxyHKyRZKaY5qnPcdXN8Dcui7Oo5fs1lkd2CpPry8IxoSwu9T1TP7jbU 3JsaZJAfa83P8qrieBYnOaSHGCUH6GWEGudGW2IgP0zCXklxyGAzd7yzfG6g dmWsHthkebRuYUgEbNIuzALKiPO3CnTStdM/Y6Z+LNrHHFbI8JULMLIyKgUY ASS5PNMOYxjA5EQnX1KekhbuFOyk42ur7maqaKdHnaivcFDr9D6FT/cc3fvK h28+d2Tva7qKx10sdLzsjAw0FWXZ5OiB944fev/YwT2HP3770L63Tnz6vuLZ g/5uxlVFiUAlE/11Y72iCZoptn7wp9lkkv75FNiE6SvF5BQmmJAfXQmb4P0O 7oY9jeUAJug3Qq4w3S/G39/ghoWOYdRgO1MxVlRsrs0Rl6cKipMbeFmddcWD LVUjgCR0OUUCJuNATzSYgCa668Y6xaDRDiFQCQ0mAjgGQAbug0A6mC6soSqz lhsLr3xFVlhJehCwCUAHYkhWjDtLctmkIDEABGxSwYmqL83oFpeMtm6ViUcc ILYSuWDC2suMMSerSlxPMrPLkpAB5g/sxOtJbiZbkqSLcATx4iCWHZIEmHj7 MD2vyAXJupcUbWHildwY+RWZkogsWwMR1kZkViH5sfxdrLAO2bRdrBgWpmcU M2qDiUWyVhJm8DvzUqxHZyb1ZTrU4d/OjAEhL4Xc0BvZa8oNb5dFEmZ8CvPh WKczA+p/FpvQvpR9sOCEf88O/kSfeGZYemVpkLAJ6E/fXgc2+T9/pNjk//zx i//416/+/c8Pf/jyBujbz68+vHPp7tVlIBTQ8jRQSVOjsKK8ICMq0MNCXw2g A0NOTh/5COhD/fxxPdWzpjrKsMvSQN3SSMPSWNPaSNPKUAM2LfRUzHWVQFYG KnZGajYGyrBot9A6Z6x6EpjCxUQdQMPDQtvX1iDAwdjf3ggGPjb63tZ6MAm7 iIA7AEOAMvAsd3MtmCGCGZSjibqDiZq9saqtoTKwCdCBlQ7gjyIiDLCPg56S PbAPyGALRhyMVEGOgD/Gak4m6s7wWI/LwVjJ3uiCnSFFKDb6Clt4oqOwrUcx KQw3M4AUJRt9JQpzdM9b65yz1DpjpXXGXvccsImnhbqnpTqpCA9s4mun7W2j CQNSDh7xJMjZICnMuTQ7SlKVBWwy0FoF39jkm4dZ3IQqCPXfwyYk6xcz5wk5 /m/FJpjC6++98NlpO22n/UM3wiaIJ0goZAaEhhVQTaJzdZIzsEl5uguwSRHH FQRsUpbsBGxSF+skjXCo9zavcdQT613IObUv6cQHHM3j5Y46eS7ayTbKocZn IkzPRZooOJ3Yq7n7Ke2Xn9J95WnDd14w+P3z+m/u0n7tKc2Xf6P96pOGb+7S 2/204Ru7TN96wez3L1q885LVey/b7n3N8uOXzfe9ZHHwVatP37A99U6w8cmS cJuOyrg+YWpTVWx2gr2l/gE1hTdN9D5JDTYqSnSUFIeCeJme2ZEWmWGmnHCz /FibokQHUGmKc3W2j7Q0bGibTYBKAE+gXxwWj3VU1Jcn5iV4R3mb+dpp2huc tdM/mxrm2FSVsTBYtzbeBEKLCbDJ6lgjaH2iGfr5ATF8G/dKCnrq8tpqsupK kiqyIopSg2FhnBrh4Wmjq3Z6/+mD7+pcOOZoqulmpffz2OQ9xbMHgE34xUmj PcKpQQngydT2ymSqrw7ZZEvdIhI9QYLNWdXGyUoVwyq3M1JS/AK3PLgnApug xYQEfcANC+9QVBqu7eTAM/3i8a4auGG1iwvqK9MBTKjaJeKiwWYeUNJMXz0S E/RAHFtgsm00QbsJgMlIu3C4rXa4rQbZBCimv6mS1H+EC4KATWoKYqpyI9F0 AtDBiXaTazT5CTYpSgmuzIombDK1HV0iN4EVcxHIdPSSDSdn2k3WHs/oi2tL pv8PqTkot1IhsYmgEQcfHd4aeAtglQI9vIO4i/g+kd/n1xgpcJkJxJh/EetP YzqPyTVSsDJcEVRhZjMmDyo3Mh3/UuLixTQHsCBFlgKYASAk0IOVp4s8PWYg DAk/Z1lkmJOs14rJdD/NJiy4IEY09KwjyYTJu8PCEyZxkDHToU425OevsslW daGmMsATmk1E00MNV5aHPr8+/+2Diz88vAJs8sdvrv3lj3f+9ds7//aHB3/5 /v5ffvj8X7+/D1Tyzf3N7x5ce3Bz/fMba5urU0twuerC1NggdOhSOfMpFn9X OnUYeMTZyjDIyyElJoibmVCam1qSk1KYlZSZGJEcExQX5hMZ6B7s5ejrYulh Z+zrbO7vaunvbO7raOLjYORtZ+hlo+9rZwgMAgIeAQGYBDmZhrpahLlZQg9j oJVAR5NgZzM/+kigFaAPtI+4mWnCJsrTUofIy1bf01bf3VrX1VLbyUzD0USN 4g5DFTiFYhzgFyM1JwMVkKORGuERFGAI9C5mmiAcQ0+NzVSdTJUdTYBQFG0N LiCeWOqct9SmROPJVmQKepoBm9gaAoip2BnSJhg9BWATC83TlpqnkU28LDU8 LNU8rdQBSRBGAFJ8bLVwjJYUrA4Pg/hgh6LM8LrKzJ7Gcvivh39/8uWDCf2Q TWg7+N+eTZg1TZh5ick1H0Wm7LDJTttpO+2/uVWkuYCIZxeLR3BvZboriLBJ GYtNUig2Ecc6NoTbS3wsBM4GAr3zWaf2xR5/L1nlENdWjeOoEW+l6K1z1Efn qK/mMYtDb6q8/C9arz6l/8Zzem88o/v6MwgmGi/9i/bvntB79WmD3c8a7n7W +PVdZm88b/7mCxZvvWj59osGbz+r9foT2m89pf3OM3ofvOipfrgkzG6gJm2k LqujNiU/ycVS/5Da+bdNdPenBpmUp7l31iT2CFMaSsKLk1zyYuw44RYFcfZF ic7FSc5lqW61uf6NZZHo00XYhK5sUjvYVMzPi8iMcg1zN/KwVHEwPAs3l/xE n5567sqoFARscnGqFWAEXbmgh02YREhZH5demmq+BAeMAq3Uzw9IFocaB5qr xGWZ6dG+UX6OCSEeiaGega6WBlpy2OTYwfePH9p79MC7ACa0T9f7SucOBXtb 1JaljvWKJgfqx/u2nLK24g56tzRDixTpwKUL4RRS148EUxC7CYlARzxBzy6A FBB6dk30CDCihAob6aoZpW9YfU1lrcI8YAdRWQqACYzpwovVE11CABPaMiKi fLTaa4BKQOgYTzCKtpjAASLAEwATwJOh1upeaXlnXXGLIFfK58CV6yrSQLWF cYAn1fnRldnhxWmBwIzAJsggPyYmm+TF++Un+AObVOXENlZmD0grp7rE849n 0CUe3bJUwgpCYYEJk01YXLC0XW+dZSNgLqqZi2TisoXvFK5DEA8pF47OWnin 0PlcdvnK9FaS/U2eGErIH0hqBZIf+VlhHbLZd5m2HjImC365YemybMJKI/DT IMAMTme5k7HiSpgzzGqPLMxZe7wcJCtshEUfsrnIWEm3WGl+mUY05qeCiWMs 6wzzzZJ1APuZbDLZS6VsGoIVY2f1RK9werB+Zli6uTL84MbCd19cAjb5/ssr f/j66r/+cOtfv7v7b9/d+8t39/78zZ3vv7j+5e2Ld68u37q8MDHQ2lpfmZsW HRHgYqardPrTD858SplIdJRPWxqou9uZxoR4FXISRTxuaz1/pKdpbqx3cXIA NdTd1C6tEVcVluWn5aRGp0QHxoV4hvs6giJ9HaP9nWICnOICXRKCXOMDnGN9 HWJ87KO97cLdrUJczCM8rFGRnjagKC9b2AUCWgFCAVTxstJ1N9cCHgFUgTHB E5gEAbAAlYDcrHRcLLRoNlF3RCoByjBRBzZxNaZEEco2jyCAoIjpBHq0p8DA 1VzNxVzV2UyFxhMlxBMrnfPEboKRKVRwiqGqHY0ndAiMsq2Bkq2+kg0cqX3W UuuMtfZZ9OnytFB3t1AlbIIMAmPi4gUDopQI19LsKHFFRldDKbIJ8eFkZ1z/ z7CJXMmyCTNcnbAJs7IVOeY/wyb8H9Pfe+Gz03baTvuHbsgdICakkEkQL8MN VQ1skshgE9qnqzzDFdikOsGpPs65MdIR2KTGUa/BXD1X4WDU8T0xFz7JtVbJ ctZKsFFy1TzkrnXES/NTk4O7z/32F8ov/ErjpSd0X3lK79WndF95EgQDg1ef 1nv5SX2Y/N0T+i8/afjq0ya7d5m+vst09y6jd1+kPMHeelbv3eeN9r0coHOi Nt5rVJg9UZ/fLcjgJrpZ6xzWOPt7Y/WPUwJMylM9u2pThyQ53bWpNdkB3Hjn 7EhbbpxTabJ7WYoHL8OnjhvWVpXIZBM6EF4w2V3V18At5wSnRziHuBo4GZ+3 MzgL95SKrDD41gX6WB5pQDYBJEEbCoyvzndtznUiqgCbrI5KlocBSQBMqJJ/ 0z1iYBNQl6SiS1LZ31wr5XM5cUGG2nLiTT47/AHGmxz48A1gk5N0vEm4n7Ww Ip3y5uqvG+0R4vIVrR5bYELXFpzrl7DKCLLCvZkuTKyQE2STbmkZCO6MoI76 4jZxYauIS1JyYYotuEP1SEskvAxBSRIvP6amKKGxOguOoUo69ktQiCdUlC4N JrJCMKHZRABUAi9Or7SiTVjYKqAyGKM3F+JJTUEMPy+KlxNRlhlSmOIP6AHY SEwkf5VNcuN8AU+ATfi58c1VucPN/Pl+KTPUgizUWTUKWS8Xs4q6rE8XCeIm V2baI0hlDRI/zgrQwPUnPAr5XRSd8eDR8VLkqWItEvLbO2vFyxKrRgYrtJ8Z ZCGXTWRdrZhiRYswOYJUYyEIQ4IyZJGEFdLCrM/IBDrM3yWXTeQWPWFlzZKN ZydiPhnyVOWyCRNkmNYT8kkgSMh062L5qrHsJv8/2WSmXzzVJwIqmewTTQ/U zQ5LZ0car62NfnFzkbDJDzSb/PnbO394ePMv398HNgEwubo2DVTCL8kK9LQ1 01M6/9nHp47spQov7n9H+fQRB3O9tLiQ6tJcSU1pe0PNUFfjzEg3wMja3Oil pckrK9ObqzNX12ZXZoeXZoaWpganhzu7m0WC8rzCjLjkSN/YYPfYQFdQfLBr aoQXJ8afE+2XGemTFe2XGxcIfVqYZ3KwW5yfIwILDEAwAEghlhR/eyNQoKMJ gAz0MPazM0Q3MPQEAypxtdQGAZs4m2s6m1HoAfAC2EK5fhmruZlooJxlwMTV XIu5SfYy2ETZwVjZzpC2nugpbovKWrwl2m/N3ljdzkjVWl/RRl/RzkB5y6FL +6yt7jlHfQUXIyV3M1U3cxUPSzXCJrJ4QsaZsV6V+XF1lZnIJmgqZZWC+s+y yY/hyc+0mzDLmjzy/mr7uWwy3iGHSnbsJjttp+20v9qqMt1BgB6IJ8gmOInz RLVJLjXJLrxUikdKOK7FWW4gGJenONUkOmMsfL23Oc9Wq8lKK+/C4dDDbwUd fyfV6EyGk0ayg6q7zhF/41NhZgq2J99XePlXZ57532ee/J9qz/yTxq5/Bmnu +mft53+l9cKv1Hf9AqgEBWxivPtZlPYbz6i/+oTmG0/rvPu86f7dEcYK0vTg MUH2RF1eT3V6YayLnfYR3TPvGil+mOBjWJ7q1VVDsUm/mCMpiqxI8y6IBTAB KvHlc/yFeSEtFfGwa6ilcKKrYn5QAGCyNCKe6auZ6OK11XIKkrxTQh2CXfTt Dc86GV+I87cRFsVPddcgkjDBBFBlrl8EGILOXbDr+kLnpamW1VHp0nADsMlU t2i0rXqwhT/ZXTfWVTfaKR7vbmgVluYkhsplE2I3IbHwSucOhdB2k5FuAbLJ BPHaol2kAARmaDCZH2iYlccmZJM5TxY5JPcLLIn7W3gtwgJ+YWJ2ol90gK2/ i6GHrZaXraa/k36Et0VOgq+oNBmrn5RlR/C5cYAnTTXZgCoYjYIOZtADnswP SheGGqGfoAkFPbsoSwot2lwiHGqtHWjm9zVWdkvKOutKAExaavPh+nBNYBMA E1FZSnV+NAGTvARvjDT5+T5dDDaJI2yyMLIVaY5GBNnK6eSFYq3nkURYRhOy sES+ICfCJstLisRH4NKdxKcg7MAbAQsSYMOexvLhjhp4j1a3q2+QmGuSrJhl bmCl28Lnw6QS8teRp81MESw3DIS1vCdRJMQYQawJTNwgV1hjZNkih5GrMelD rpmGuReRBENdWKXeWVUayek/5jwmCyksLlhhFE9kiWU/wuOZxiBW0Irsqydr 22Lqv+DTNdNfN02zyXiPAO0mwCbX10e/vLX0/ZeX//DVJsUmX23+6bsb//7n L//09e27V5fH+1uqijnx4d6Olrpq5z8FGDn80ZufHdyjceGYs7V+TIhnYVZi o7BidrTn8vLU9Y35m5cW715d3VgYBzC5uDgBkyDcXJ0bvbI2c2dzBQTMMj3Y 3tcslNYUVhWm5adEpEf7pUR4Zcb4FySHFSSF5icEA5jkxAbAoCAxBPosGliA U1JC3BMDXYBTor3tIjysgU0ARgIcjEHBzmawiVYV6GFvuLsV8oufozHlM2Zv 6GVn4Gmr72mj72Wj72mpg1YVyrBiSolmEw1ZNkExN+kxBSa0WxfFJvZGSoAn 9obK27HzIFWUvZE6gAnNJmq2hkAxyjSbnMdYeGI38TBXczOj2AT9uIKcDUCA J2goQTYhsSepUe4VeTGSqiz06cJ4E6bzLSOE8G/PJnLjTWQLL1J5F9sqd9hk p+20nfbf2qo5HnyOB4UhhE1SnGAS5/mZHgRSBClutSlu/HS3So57WbZ7aY4H qDzTFU4BbGlM9miNda3zNi+3UhebKHOVP40+8V7wyT1JBifTHdXTnDWCzM9G 2akkOGq6KR1Qff3J88/94uzT/1vtif+l9cwvtHf9s85zv9R/8Tf6Lz2h++K/ 6L9MGVAMXntG/9Wn9V55Sp8eq7/+jNrup7Xeft7gg1dsjr+f6qg3UJoyWpM9 LszrqkzNj3C01zpqdO4DM8WPo931KtP9ekVZg/W5faKs5vIEYV5YSZInL8Nf kBsqLoiQlsZ112aONhWOd5bN9FVh1UV06AI2EZfGZ0Q6xQdYBznrORqd87LW gCVuuyBnYbCOOHFhPz8gvjTddm2h+/piz+ZcJ7AJFSY/0QQCNpnrE8E383AL b7ilaqJLtDDcPN3fONoJhCLplFQWZ8Ya66oim2irnlO7cJIRb7J3K97k47c/ O/L++dP7/VyNqooSgU0mB+qpeJNtn5/J3i02ARaYG2iYp3/kp5YuuHoZoJ0B toPftwwlcKejuQaXOlMDkgmaTdChq7uxvFmQX1eZ2VibN9lXf39z5o/f3/jz H29dXeqX8DLzUwK5qcHl2VGCkmQ+N75VmE8HofD7Wyqk/CxAlfqKzKaa3C4J oApvqJXf31TZKy2HAaW26uG26q2eCpCnwKSvsapbUt4hLm4XFbUJC9uEXGI3 kVRmAJgIihNrCmKATUozgoFN8hN9trmDLcCWLTCJ29rMS/DJS/DNS2D4dPGy Bxt5Mz31rETB6Ewl1+REmSqYoSW4qpeX0gpm4DA4EXN/YWAIK9sV+fGfskrM 0aeMNZPiJvD6d9YXw+vfXlc00lEDj8tayRMuYC6YMYyFOJIxl7gsFzX8u8gx TJsF04Sx8XiNQlaeLjImBhECUMwaIgQEWMl7WbYMpp2FlcRMLi7JTQvMPJdp 0WAF+LNif8hfxEQGwmusp80Me2HhCTP1MdO7j6VVRqHMFUaeLtlMzj+TTbaS sMG3QZ9otAv+efmg8V7RzHDjjfWxh7eXf3h45Q9fXf32waWv7m98/eDixaWx wU5JTmqUtbH6+c8+Pnn4/VNH9lL94b1nj31kqqsY7G0Pe0W8AqASYJCra7M3 Li7cu7b28M6Vr+5uAn0Ap1xbnwPBAAQHbCxOXFmdvnV5CfbevrJ869LCrY25 S/PDUwPNnfWVorKs8pz44ozosqzY4rTIMhhkRBenRhSnwb9zFIxL0iKLU8Np SPGlCcUtNcQ93t8pyssm2Nk0wMHI396QtpXoA4lEeFiFu1NIEuJiFuRkCvCy zSYUmLjb6Lpb6bhZaLuZU8EpXla6XpY6HmZa7qYagCfOpupOtCjbihlNKOYY ZqJGu3Kpoc2FHlBgAnIwUUI2sTdSdDSmwucdjFVp1y81e0OQqqOJhoOJhj01 r+ZoQgWzOAC80PEmdCz8o3gTtJs8YhMnA2I6AWG8CQJLQohjaXaUtDoHg/7g m2R+pEnWuv2fioVnJRZmSZZNWHm6mKhCHmhEhk1AACZAKD+PTSj9vRc+O22n 7bR/6FbL8azOcAfiqEpz5aW6VKY4VyQ7wQyoJtMDVcvxAgnS3WvT3QFYeNme 5Xne5VyfMq5PRbZHeYZrTbKLJMmtKdpZ7G1WaafVoK1Qq3Yq4+RHoYffjlU6 kGmlzHHQCDc/H2OtnOlmEKJ7SnfPC+ef+6fPfv0/lJ75hcqz/6y665fqz/9a 88XfaP32Ce2XntR9+WmQ3ivPgPRffRaluvtp5VefVN79lP4Hr7ic28/1tx2q SF/rrJ6SFDYXxyV5m1qqHjRR+thG61M/G5XSFJ9eUfZ4a+lYS0lnTUYVJ4iX GcjPChYVRDZXJPUIswYlBcPSwomu8sVhwcKQEONN5geFPZJ8QWFMZpRzlLeZ v4O2g+FZP3vt0oxQ+LKd6xcBegCVXJ5pvzLbgQYUYBO0ocAujDdZG2ukjCZD 9VNd1fQPSvBFzafAYfsneljz97dUcdPCHC0NtVXOaiqf0VA6rXT2mOKZo2dP HDr0yZ6jhz88tP+9gwfe279/z5EjHx46tNfDQbeqKAHtJlODkplhKcaewHh6 qIGp2ZFGEBwAYwQZEIxnaGcP6GESExHDGLN+jfWKhzsFfW383jb+WH/D/ETH /FTn0kzv7asLX39x5cHd9a8fXFue6BNXFuSlRucmRxZnxZXnJTXWFk72SzeX R0ATffUSfk5pTkxZTjQ3PSQrwTc9xjM1yj0j1is/NSg70a8gLbgiL1ZQmtrA z24VcTvqi7skFR11ZW2ikjZRcauosEVQ0FSd111X3FqTJ63MkFZkNFVmSsvT xUVJVbmRldnh5ZxQxBOgj7RwJ5aJhCYR77w4ny3FA5L45if6gQqSA/KTA7jp wbyC2MaabMCoiV4hWd0x03PJZZOFocbF4SbQ0kjz8mjLylgraH2yY2OqE3Vx uguFa05cSxCzFMtpChfDqzOdoOWp9rnRJurtoMEQliJNtXnSqmwAtL7Giuke 8fxAA1lay1ou0EyDdUDW5aXhJbHw6L5F8vquPZ49TNaOILv4l+sKxVrqy0pu YZGN7VIpzFLvzOLvrKgWuddk5TRmnkUYQa4rl9xXiWnaYBEfcb1jsQnhMpav GhF5uBVGvmKWhWVlOzW0bF4FFpvgicyIIUIo8Mmc7Ue3H/jUSaYHpfOjLddW R+9dnf/q3vqDWyuLUz31NYU56ZH25rrq54+fO/bJmU/3qZ49qq10Skf5tLme qputSZCnQ2pscHVpTleTYLy/DcAEbSUAJg9uXvzy9uXPb2zA4Itbl6C/f30d MAQI5crK9OXFyc2lqWsrMzfX529tLNy+CJq/sjR2ZWn08uLI+mz/zFBzf2tN q7ikuYZbX5EjKEqv4aZW5Sfy8xIE3GQhN4mXFVOYFJgb450T5Zkb7QWDlBDn OD/bGB9r7MPdzcLcTENdTSI8zGN9bWASepiP9rYK9TQPcDXyddIHednruFtr uFmqu5ureVpqgFxNlF2MlIAOoHcE0DCl5Gim7GSugnK2UAW5WKq5Wqm722h6 2GqBYOBmrQGTsAsOhlPsTRRReAVyEXuD8w4GCo6GF6B3NlZyNVVxMVG21z9v p3cOepiHSZhxM1OFJ+NtreVrq4Pys9P1t9fzsdEGkc0AB31QdoJvFTehnsfp b+ERhy50K8Wqi5jvnYpBa3vMkPETcSWsRFvMU34i3oQp1imUiXybR5giYEK0 HXLCYwkmJzp32GSn7bSd9lNNkOUNeAIAAnhC2IRBJZ60KDYRZngIMj2qszx5 OV7AJmUF3qUF3hXZnhUZbrUprg00m9T5mAObNOsrC9RPc05/EnLwzYjz+zKt VbIcNUNNz0ZZKnLcDUP1Tmu/89zZZ/+/U0/IZxOD13YZgnY/RwQzii//Rvm1 p7T3vGh68C0P5SMVEa4Tgrzl9qpJSWFTSXyir5mF2kEjxX2WGof8bVWBTboF nNHmYsCTPnFOXWE04EltbpikOLadnzYgyYf5mS7eVE/lypgYwGR1XAJsMtNX 0ybgVGaHJgXbBjjquJop2umfDnM3FhQmAJhgpAmQCPAIIgkKnbuw6AlsApgs DtbN9NTC1y9oqrt2ukcIK9uFYSoP5ERv3UinoLepsjA93NJAQ1/tPOAJSEPx JODJuZOHjh7ce3j/ewc+fufwgfeOHfnw1Gf7T5844OtiWF2SDEwx3idG1oA1 7VBnDSAG5eJFzwB6wFoXiAOFqALwAsJd0MMYrgA8AmcReIHNoY7a3lZ+X3v1 zGgLsMlQb12LpLy9saqvq667Q9gqquAXZuYkRaTHBgOe1JZy2usrVqd7bqxP 3Nucu7I0BGgjqsgszooqygzPSwkEGAEBoUCfmxwAkJIZ5w14Up4bXV2UJCpP r6vMBDABtYtL28QlwCatlMWE2yspBTzpEOa38LPqipP5OdGVHMqbC1WcFpif 6JMV454a5vi479Y2m8RTYJIf75ufwGATytYTVJQZWsWNAzYZaK2c6hfPbBuY iDcX8cVixenMDzfCG7c40rwEC3tY5I+3gtYmO9aBCIBNplFdoDV6iYsUQNfp ppwxYICZoJgL3fmxZnjx0T0P3sHBdj66cjVUZdWVZzRV5/ZKy2f66heHGtFM wypAv7Jdkg9hipR3ZIaZsE5hFs5gLcLlmhJIwIhs2DhrGY975ebpYl4NayZe Wxn6iVokrBgTVqz6T8AUk30IevxEsAkL5ZiGpEf8+Lg7FvP1YbLJ8uOlNglZ rMlLVszMFUySesl1GmT5fbFK0jCzQM8NSmfpKDOaWeAjIZ0dbloYA+xtG+tv aK4rzU4Jd7Ez0FT5TFv5FPCIibaSrYm2n5tNdJBnSnRQblpsYVYir4hTxy/q ahLOjvasz49trs6gK9edzRUgEQQTZJOHd64AqgCz3Li4AGxydWXm2raur87e WJu9tTF3fXXy+trkjfWpmxvTNzdgPH5tdWxzcWRxtGOwpba5plBUmikoSqsr zazJT+Rlx5alhxclB3ETA4pTgkrTQrOivdLD3YBQkoIcEwLsEUaARKBPDHRI DnYC4XyEj2WIp1mQu0mgm7GPo56nrba3nY6XlSYIcMDNVNXNRAUEeOJkxuYR EDAIkAihEk87bRCyCdAKHAbHEzxBJGGyiYPhBRaAgGATJp2MFGESaAXmkZXg KQGeIIwAiYAIpxA2CXQ0yIjxrMiLRTbBPOcYDr9VZ5PJJu3/79iEBSmUMaW1 UpZN0IYChPITVILCO+Pfe+Gz03baTvuHbqIcX2G2D6BHdYZ7VZork02QSgBe UKJMLyEcluUFbFKW61Wa71WS78XL9arkuAtS3aTJ7s0xLvW+Fjx77XYjNZHm 2eyzB0IPvRV+7qMMKyVgkzCzc9FWSjleJhGG54BNTj/9v07+Rj6bAIwYETB5 bZcBLaXXnlR7a5feh69YHt3jp3miOs57uq5wHr4GgU1K4xN8TS3UDxoofmSq fiDQXh3YpKs2c6SpaKKtbKiB21yRLOZGNZTEtVWl9oqyRxqLpjoq5nurZ/v5 axP1WHgRCGWym9dYlVqQ5B3tY+phqWKrd8rR6FxikH1TFYeACTPehLKSbFMJ anWscWFAPN1dM0Z/P8/0CuYHYJHZsDzaskj/7Anr3tEuIbBJMSfS2VLfQk9F V/mUjvIpPbUz6grHzp/Y/9mRvQf3Ud5cB/a9deTAu0cPv3/m5H43W+2yvJjB jmrazEFFxANioDWEJZYZBQXzSCWwGB7pFoCogPqBemST0R6KTfraqvs7aoZ7 6sYGpJ3NVTUVWbySjOrKbF45pyw3mRMfmhIVwE2PbaotnR/tuHN57us7a9/e 2/jy5vLlxUE4vY6XVZEfX5QZBgwCeIIihJKfGlyRFwP33Pa6Ioy1BzDprC8H ddQBnhS1i4s6xMV9DWWgXklxMz+LlxUJoJEV5ZEd4wHcUZAErOGTHeuRGeWa HuEsB0xoNqHAhGYTBBNQXpI/4AmwCa8gtoHP6WsuJ2zCrB5CcpqxInTmYAUI q8Gx5sVxemEJC0VYfE61r8DadRpEr11nKDFTxaJzF6YAxdIn6MqF0Q0AiWi9 ArqE93SgrQqWIp2Sksaa3AZeVqugYLitmgKTkWbmopTYd/B3eJLUCwP2fyx1 GIm1JwtmsjyWG5HBjO9ghm+sy5QvkV2u/xjvIJsAmFxfHSblUViPImsWkX1E FhAxD5Y15cgN95B1yiI+YKzXgbzshFmYf+za4+mafyyenRVdQnYxI+hZ+ahZ 9hfZzAZMQqFOH5TOD6FpDC4LH7yWuZHmuZHWxfGO5Zme+YnO/naRkJfLzY7L SY3OTIzgZiZUFWe1SaoHOhpGeppHe1t6W8VAJd3NosFO6fx438rMMLpsIZ7c urx0+8oyEArwCEAKmk7uXl2FvZeXp5BNri5Pby5NQX99debG2gwgCbAJjSeT dy7PfHFj6Zu769/evfTw5vqdS3Mbs4Pj3ZJ2UWl9RY6wKK06P6kiK7o4Lawo ORhUnBLCTQoE5cX7IaEAiQCkAJVAD5swmRHhnhrqAjNRftbhPpagUC9zwBN/ Z4MAZ0Nc+aMCAAFstD3M1TystwCEKW8HXZSXvQ6KySZoOkFCIZACPZl0pumD JWATpBUCJsSOAwI2ARJBE8mjJ0lvIpukRLiW5URLqrIGWquwwhSQCOZ+ZyYQ pvHkH45NgEpQBFXQuWuHTXbaTttp/4UmzvUDAXoQ0wmwCRpKCJgAvIDEHG8R HJbtzcvxJmxSlefDy/IQprk3pni2xLpJ/Cz5jrrtxuoSnQtZZ/eHf/pO9IX9 KWYKmfbqMTbK8XZqBX4WcebK+u//9vTT//PYL3/UboLSf/VZ9OwCabzzvNHH u82PvOOmdDjeVkuSGTrfWDrXVjEq4UqKYqK9DE3U9usrfWSicTDYURPYpLMm AxhkvLV0WFoISNJSmdxRnd4nzgFUGW+hjCaL/bXzgzXrkxIMhJ8fFIx1lDdU JqdHOIa5G7iaKdobnPGyUc+J8+oQ5i8O1WPJRWI0QVRBJMHNpWHJbJ9wspMP YAKaoNlkcUiyPNKI2bQwB+z0QENfM4+bFmalr2ymrWChq+hkruPnahngbu1u Z+Rso29hqGpmoKyjfkpL9aSGymeGOgq+LkYVBXGwlGUAhRA5BYgDZojXFvHp YqLK4kQrTG57cInQboKAQ427hSNdwsFOwUBn7Uhv/WifpLWhvLI4rTgvsYSb UpifmJMcmRkfWpQZ3yqqWBrvvXtl4dt7lwBMQLDwADaB06U1eTUlqaXZUcWc cG56CIIJJ94HVMVNEFdktIq4sALHCvWDbfwuSUV3QyWoU1LWXlcMYNJZV0Kz SWmXmNtQnl6cEpQc5BDrYxXtY54QaJMW7gRUwol2Q8mCCZDLFphQbLIFJgVJ /jkJvnnJ/oUZIZX5AEcZvU1lk30iYjeBmz6z/gthE5I6eH6sGbQw3gKv4dJk G2h5qp1oZboDhD5aJJoAFopwLmYAhitg0idcgSO2LI63wjUJoeAPocBrnfXw IhT3N1XO9NWvjrUCm6w8vi4ldRLRbsLMJMaqV0L8mkgQOgmZZ/1Qz/RrInhC 0mHJlmJh+aexqo0wRZb6zJB2YhBh2kdk/cRkqYT4s8l17pK9AiulmCybENOJ XBFnLRIXv8ZInvzz2UT2yRNHL/KG/gSYMC/I5FPi1jU30LAw1EgXWIEPSfvC WCuwyfJk1+byyL3rC98+uPT9l1e/un/p81urty4vLk8PzYx0YzjJ5uoMBRdr s2tzoxMD7QAmgCqwF44BGAEqwbgSDDBBQrmzuQJUAj3shRMvLU1eXpi4Qrt1 0WBC2U1urs/C98PtS7PAJtdWJ25dnHpwfZFik/ubf/jy5p+/vv3951dvX5xb GOnsb6mV8gvEZVnV3ORyKiAlojAlFJQbB/+//iBOlCdgCCgtzBUJhbAJDBIC 7KP9bSL9rCN8rZBQwrwswjzNIzzNw9xMg52Ngp0MQ+g+EEDA2cBvW+gD5uOo 5+9iSGZgEyGFsAkRGlmQR9DagpPuFuoeFpQLGSKJk5EiMZeggE1QHvSRIG9r LWQTJpIwlRxOsUkDPxu+ITHyHb4c8KuJleldLpvIjSj5m7AJ68SfYBNEEiSU H7OboFXl773w2Wk7baf9Q7e6PH9gE6bpBPCERSWP2IRDsUlVrjfx6eLn+1Zl e4kzPJtSvdvi3aUB1tVOesAmUn0lzplPoo6/F696OMnkXIadWqKjRrKzVlGg dbylqtGHL5955n8f/ef/ofT0T7EJIRSQxp4XXS8cjDRVLgy0q08P6edlzDaX zbSWD9Xniwqjwj30jFQ/MVDeZ6p5KNRZG9gESGS4sXCirQwIBTilqzazV5Qz JOUCrcx2Vy0NCNZGAEmEG1MNi8OiuYHaqZ6qweYiUUlcQqBVoJO2i+kFwJNw D+NyTlivpHhhsG55pAEY5Mpsx+WZdoSRi1OtxIYCYAIkQn33tlWOt/MATKa6 qmFmYbAe2GR5tAVWETSbtEz01jULCuKCnJSOfaSneNzJTCvQzSo6wCUu2D3c 1zE6yC3E2y7Iy9bfwzrY2y7EzzEqxC01xpNXmCCtzQU1CfPbJcWd0tK+Vl5/ WxUAC8aeAIkwfboIqsAkrJ8xtAGpBE6Bc2GwbUYRjvWIR3vFg12CoW7oRVJR UXFeQm5GVH52XEFufHFWgrS6eHao487lhe/ubf7w4OoPDza/vLn89Z016K8s DY92i4BNqotTKvJiy3NjAE+ATXKS/KHPTw2q53E6JSV4k8WixtD3NfFBvY1V 3Q0VHfUlwCagLnFRl7iwrTa3riQF2CQp0D7M1djXTjPYRR8IJSnYLiPSJSvG nR1mgmACSqDApCDBr2AbTEB5Sf75KQHIJpKqzL7mcmQTVo4yEGETZnH2OWCT 8Zb5idaFybbFqfalaUqLU220cLMDtU7bRHDxD9fBvxRplBlcADOIM9ADodDx JtSRPY3lVEGZpsrxLiEGtlCmE5nfzOEKyBpYKhqfKuvnd1YBESJ8bszsx4Ri mGxykVF7UdZuQnCAWZOdRQqyvCBr5mCOmUmJyaPLtcXIRRi5aPNXfbqIUYMZ AMLKjby6XcAFx8zTCZjIOs79WJ4uNAYRTzD8MLCgconhxcd6SphZjiS1wPXq JJ0Wb9vkJ5kaaJjslyxNdMJ/JbDJ1/cvApt88+DKF3fW//Dw9uc3NgBJVmaG kU1uXFxA0ICZqaHOycEOYJP1+TEqqv3yEuxFNgEMYdpQYAC7YPLKyvTFubFL 8+PAJjfW5uiQE9Dc7YuzN9anrq6Mby6P3dyYBDb59t7G1/c3v//y5p++vvPH h7e/uXf13ubS5vLERG/jcGddf1NNc21RTVFaeXZcGSemMDm4KCWYmxSYHeMN VAJIEudnG+9vBzAC49RQFxAMYCYuyD42yD46wBYUE2gXE2Ab5Wsd7WMd4WEe 4mIMeBJCKxTGbibo+hXgaoRIAjwCY+Ym4gmyCVMwAzACA7S24IynnbaXtZan pQbhDjSRyIqwCUadoAcXKNDRAMS0ocCu1Eg3+ApFNkEkQesJM3swsoksL/w3 sYlssMmPxZuMbRc9YQTCy3fr2rGb7LSdttP+akM2EeX4YuAJxsWzwAT2UuJ4 C7fZpCLfp5zrU17oC2zCz/EWZ3g1p9FsEmhd46zfaaIBbJJ1Zj+wSZzyIWCT LEfNJEeNVBcdrr9ltMkFww9+d/65X/yYT5cBHWxi9LgM9r+RYKMlTvIf5WfN SoqmpSVTjSWjjUV94hwBNzIM2UT1E1Ptw+GuuiXJ3m1VqUAiwCagQUnBUAMX XbwATJYHhQAmG2OSlTHxpZnGpRHxbH/NWEd5pzinMjs0xtfM20bN0eich6VK YpCtqDhxrJ0PYIIpgjfnOpFNMCgeizACuUzTASbwxTvdXTPTUwv9FAxoNlkZ bVoYok0nAxJYhKDdpDA9PMzDOsbPKSHINSXMMzXCOyHEPSbQOS3WPyXaNy7U PTbULTbMLT7CA/rYEMf4MOeoQLsQb4twP+uEcBegFW5mWHF2RHl+LL84SViR Xs/PaqjJAVoZ7Kge7qpFYME4FGJDmRqUYPVGoBI8DDTSJRjvrRvvrx+BW2Gf ZHxA2iatADbhpIRxc+N55ZzOhuq16cGvbl/84cG1b+9d+ebuxW/vXfrq9up3 9y8CnlxdGRnpEjZU5/KLkvmFiVXchMr8OCAUXkG8oDS1rjIT7qcYGw49jOG2 S9WdbxcOttYCnvRIKzslpe3i4lYBt6E8s4mX3cjLFBUllqWHpoY4BTnqu1so +9hqhLkbJQTaAJv8KJjQbEKBCc0mCCag/O1YeGATaXUWsglzjYfOEnDfZ4EJ LhTnJlrmJlrnJ1vnp9oWgEpmOkAwRsEManG6fXW6E3MIw0XQNgQi4fbMMoho Z1mabENgRGSj2KSRYhP4nKzQRhMmmzAhBSkD2YT5VGVjTJg+RYRf5GasZflK ya26iJJbVYQZEk608Xh+LVnzCokuIQiAqcwwMoWZkouVKIxEfDADz5k0wUwC zHLHYoEJvjJY2J3JaD9htWFF07PAhOUvx8QTci5JHM0shcniStl0aiRVFwk9 gI/ZWJdgsltEj2ERC6vZOvhfnhlqWp/tu705+/Du2jefX3547+Ld60tf3rkM JAKssbEwDliBYALQAePV2ZH58b7p4S7Q4uQAcAcACDIICg6DHmaATUAwxlj4 K9ux8Ew2ub42eWVpdGNucH12YHN55O6VWfiu+PL25W8+v/HDwzug77+89c39 aw9uXnx4a+NLytFrfm1qYLBVKOHlVeYll3OiS9JCC5OD0HSCJIKRJhkR7jCT GemRHu5GQUqkW1q0R3KEa3yIY1ywA6BKtB8VmRLlZQl9jLdVpId5mKsJKNTT LMTTLNjDFAiF8AigCuUJ9iNsQuJQUF72OugARlGJvQ4c7GunC6yBQe4+NtoY ToK0wgQTZBNWyAnx7AJhyAmGn2TEeMKXZz2PgwmEyVcT/niyXRH+/ymbyMUT WTAhbILeXEgfO/EmO22n7bT/chPn+YuQTbJ9auig+OpMDwFSSY6vEKkkBw7w E2Z6CjhewCb8PB9egW9loV9lkV9NgV91jnddpndzuk9boqc0yLba1aDLTEui q5h7/lDk0T2RCh+nmCnkuugkOKgDm+T7mIfqndbd84Lii786/+w/yWUT/Vef pSwmdLwJUInx68+bvPmit8Zn5REuAxXpcw0lMw3Fc60V8+2Vg/X5PcLsWppN TNQPGKrtN9E6FOmuV5zs1VKZPNiQP9lRDjAy3VkJ/Ux31WwPf3FAsDosXhut BzxZm6i/PNu8MlYPbDLUUtxEB5tEeZu4mSta6ZwANkmPcG7mc+YH6tA+cmm6 7cpsB/p0wQywCRAKgMlkVzX+WAQ8sjQsWRgQz/YKgFZm+4SLQwA1227h9Cpo dqhxbripp7GiJj+ZE+3rbavvbqkT4Gzq52Qc4GIa6mkdF+QSHeSUEO6eFOmZ mRgIKsgIBRKBPj89mJsRWpARkpMamJ0ckJXsn5HgkxrjkRjhGhfqFBvsCH1C hGtKDJzom5sWxM0MLcqKKMmNripKBH6pq+KAJNXZjcK8rsayflg/d1QPdtQA XIz114MGOoUjvfXAJmXc5NKCpPZm/trS8OfXVv708Oa/fXPn23uXv7ix9tXt je/uX/723sYPX1z55t7GtdXR0W5RA+3TBTAiKE0DYWhJf2vVUHs1hv/DYJSO 65yEB6J+A6wb7hD2N1d3Syvb64qba/Ol/BxeToywKFlcmlLLjS/LCE0LdQ50 0EM2CXE1iA+wzoxy3fbm8t7OEoxg4ktpC0z8KW2zSV6iXy6gSmpgRV60pCqz t6lsrLt24fHEXJiiE8NMqLXiSOMCLBFh3Qv4MNE6tw0mTDaBSeY8tWucduXq FY101cLSorepore5EpMJo+mELJsRTGZHm6bpOKBJeqnZ01TR1VDaKy0HNlmd aAc8WR1rXZvarotB6TF3I5K1CT5Uy7RTFmu1DA/KXIrjzFbUCX2pFUpbbLIh k/xK1tuKtZcpAi+ypxAqQQsLNTn/CDFYcfSkxiJI7gNh2A4+IjFewJPfmOte n33MnLEOF5+jRD3t+R58UOp5zj4WCP8oGGS7X4EXn2FLInAh16FriyAeOV9t 8cg6HE/gSF59eVZsO8IR8elimnIIm6CJBz+3+Is6LFOnesSz/WhGoewmM0ON oNXpnmurY3evzX95Z+3bB1e++2Lzq/uXHty6iECxuTqDKX/RJgJgsjIzDP3S 1CAQytRQ5/r8GOIJJge+e3UVBmg9IaYT9Om6tjp7fXWWxMLfXJ8DNrl/den2 pbnN5fFLC8PAJrcvzXxxY/nzWxe/un+dZpO7339555v71z+/sXH36vKdzaUH 19ce3lqHs64sjs4OtXXXlzaUc6rzE8oyIvLi/dF0AjCSHeMNtMJNCixICMiL 98uN882O982hI9pSIt0AT2ID7WP8bRMCHQBkEoOoPs7XBgglzo+yp1BOX94W SChoQJFlExBGxzMD5IFEYC96fBFPMNgMcDLwB7Kwp5Nu2dIx+NaaCCbAI5i2 C8NPMOQEQQbxhBl1gmCCdMOJ9eYVxIkrMnoay+H9xe8lAiaPswk7r+/flk2Y tRdl3bpGtsXMyrWdQ7hy27+LJBOmNMYQnadrx6drp+20nfZTTVAYVMsNrM73 5+f68rK8KjI9QLW5fgJQzmMCDAHV5vsJQHl+4jwqUKUxP7CO4yNO82zI8JZm +AgTnMvDLDst9QVaClyVz2JPfRR6dl+KmWKOi16Sk3aCvWa6k77XhUPabz+v 8uJvFJ7+hdLT/6RM44na879Sf/FfNH77G82XntB+5Wm913fpv/WCzuu7NF99 GgY2H7+V7GvWyUubbCqZaS0HTbeVz3RUDksLe0XZVZwgbyslM7UDVlpH7PSO R/noZ8c5NVYl9Tfmj3eWTfXwAD2me/kzfTVzA4LFYfHKmGRtQro+2bg8Wg/j pZG6iS5ehyi7piAqJ849xFXPzfyCtc5xfwdNQJVeScH8oHBjshkD4UmACYDJ yqh0fkCMYDLRyQcSATCZH6K0MNywOCIFLY02onAT5mHv3GA9qEtSUswJh5um s4WqnfEFB1Ml6OGGiPdNuI2GepkHuZvALRUHMBPpZx0TaAc34uQI16RwF8zT y4n3yU70o32ogopyIotzowuzI/Mzw/IyQrJTA1PjvLNSAjISfdPifdLivZNj PJKiPWCcnRpawIkqyoktzU+oKkmrreCApMJCIS+7sigF1Cgqmh1ru705+8Wt 5Qe3lj+/uQT9w7trX9/fAH11bx16mLxxaWp6pEVUlQNXqylJF1dmNwuLepv5 o911472SsZ76kS4x6Sf6GqAH9XfV9HVWdzaVS2pzuVnhqbGeaXFeWUn+2Un+ 8IcUZYbnJAWkRLhG+li5mCl5Wqn7O+iGuZskBTtkxXjmxHnThUtkRHtwsZST 4MtNDSrPjqwujK+rSOuo4072CLAoJDrtUwEmA/VbcTqg0abZsea58Rakj7kJ yqFrHk0nk60LACNTbTCAA2bHm2EvNTPZNr8d0TPQzu9uKgfu62mu6G+rmhtt WhhvQS1OtKJW57uX57rgRHisiUHJWJ94pFvQKS1tqM5uExfC2gO4Yx1Wv2Ot 1JKb1tps1+pM56PY9rFWzGkM/dJw0yIdDU20/HiJQ1iTk/gLanW9fbWV6Y7l qXagJOopzXTCJGp9+0Hl0oHcIuxyD2NCyiNqmO1kanWWMiHhwz0imhkqJ/PG dkkXlt2EmW14CxYWekDwqq7MdeFll2Y6oIdNEMwTkRdz6xXYBj0KASba0ZUO BiujLcxIdlL0hMTyoEcWbq6Mg5pXJ1pQMAZdmu28ONOxMd2OWp9qW4PPzLAU 7VYknxtmeEZnLbR/MZMYMNGJ2GLQE2xyuybRZLcIA9nooCGgGMC0PiCCmxuT d67OPbi18uWdddAXd9bRUwvEtIlsLIwDlSxPDy1ODgCYzI72TA93XVycwBgT jH9HbVUwoU8HSNkKV1meJtpcmkKRTehvrM3dubR07woFOPevr39x69KXty9j UmKYIWmKQfgQcP2LM0MLg20DTbVSXkFVXkpRamR+QnBRcmhJSnhpKq3k4MKE gIJY38xoj/Qoj4xoSqkRbkmhTgnBDrEBtvFB9vGUDcU6ytcK+kgqFMUcvkJD GNYT+ILFnuXohdYTyizipI/RKLALT8QjQTCJB0BPIuhdLdVdLbbC3rdMJ3Si MFcTZdhkGU0w3gR6b9oxDPYisHDivCvz4xr42d3SMnh/mc57xKGLTtLFLm7y Y6UVCZsgnvy0mHhC2ETuxYcpAOGBRtuqQKRwCW4yNd7JG++sBI11VOAABHdb 0N974bPTdtpO+4duwuJgQVFQTUFAdZ4fP8cH8KSS4/nz2USaF1Cf5VsPYJLp S7OJS2WEdb+dSZ2ecqHqibjTH4ed+zjFXCnXVT/ZWSfaSiXGXNnm6B6ll3+j 9PyvlXb9SumZX8iyie7uZ3Vf36X7xnPau58FWXyw2+f0gbJEr9EG7nwHb6Gz CvrZTkrjraX99Xn87BB/O1Vr7U9tdY85Gp6M8NLNTXBpqEwANpnsrpjs5s0P CuYGagFMFoZEwCOr4w0AJhtTTUAol2dhNSKFr8rm6vSiVL+kYBtfO3Vnk3P2 BqciPI14uWHwpQrHI5UwcwWDpntqp7prgE0mt0JLqJgU5A4UQgpoeawJ8QTZ ZHagDgQ3ncaa3KwEP7jBWRucs9Q7AwJCwdT6LpZq6EgAN0HMb8mM1gSEIfdW xBa4+QLFBHmZhfhaRgTaxoQ6JkW7Z8L6PCMEaIVmlqiSvJiinKj8zNDc9ODM pKD0hIDEKK/oYJeIAMcwf/sQH9uESM+kaO8UuO8nBeWmh3Oz4MTY4tw4XnGq mJ/bXFfS3cIf6hZPDDZeXBraXB3dWBxcmOzsa68FrgHGqavKba8vG2wXAH0A mKAAUoY7RcAm0INw13CfaKhXCGwi5GUCRoX5Wfm6GHo56oV4mQN/xQU7UCGu XhYh7qZWOqfsDc55WKoFuxjGB9hmRrnLB5ME3xx5yk30K0wLBjapKogFNulu KJ7pFy/DanCgAQPJp+hilKQ0zDT0YxR0AJjMTrQs0v5aBEmAQShsGW+hOGWy DQbAF3gKpgUe7qoFJAEBpAx11mAQEIgE1INw8QxXgHMn6bPG+8RANM2igq6G UliEwPpzfaoTFsnr27yAbmCr29HoG6CpztXxtiXa9WthUMpc3BJvIvxxnumt RGn7an9DNrm6PAgiObiY/ldMVysKrOSxCT46sbNcme/dnO9D6wmG5JPLMmmI 4MnqXDeCCZNN8C1bnKLePkQV0CMqof/2ZWbBxHFK1GtOi+keRhy9ECgABDDR wUArlWBtGNZgHfzxrpqpXiH8U8M/OPynA6QAjxAwgR5QZeXxVF2IJMTTjxl1 wmIT8j6iJxh8aEnWpskeEXySYZ52t+u/tDAAAja5sT4BbPL5zWUEk89vrd7e 3GITgiegS0uTa3OjwCYLE/0gGACqoH0EEwhjfRMQYAXiA4bJU8VNlqeur81d 3zadII9cWZyEweWFCQxFgfnbFxfvb65+vn2ph3euwKUASZB04IIkRzFO3lyb 3VwcXx3vmehq6JbwGnn5ouIMcXFGfSlHWpbVUMYRF6bW5MZXcqLyEgNyEvxA WXE+GdGeKeGuSaHOyWEuOIgPcogLtAdF+VrDVwqJmsefehBVgFNQ8BWKQvrA b1Q4GE6JoiPu8XQ4lxyMhPIou5cVxSaAJCQCxXNbiB6ESkjGYOhhHrEFcwtn xfvyCuKl1Tk9jeVy2QTzZtA+sWyfLhZE/DezySMw+Wk2GeugqISACVLJDpvs tJ220/5qE5WECotDarlBNfkB1Tl+VVk+PI63IC8AJMx9TDVcf5CgwF+Q7y/M 9xfn+dfl+QObSLL9Gji+jRy/xkxfcZIrP9qu28pAoKWQr3Qs6sQHIWc+SrVQ LvAwSnHRDTdTCNI9ZfLJboXf/urCrl8qPvtLZZpNVHf9EtkEwASk9/ouvW02 gd7l072pxmqNxXEIJqi5ripgk5ku3lBDQXV2SJCjhoPBCZCz8elQd62ceCdJ RTywyVRP5VQPb3FYhEJDCcAIgMnF6WYYX5ppQTZp5KXmxLnH+Jq5Wyg6GJ52 ND4LnNJQkQxEAwcjm6yONSKerIxKl4YlWEMKCGWuX7Q4VA9gQllSts0iyCa4 SdgEN2F5PN0n6paW1fM4eSlBcDck5b0wOQwm1cf0lXbGF1B4jK2RAoCMlf5Z RBg4AI6H++PWb31uRj6uhn7uxgGepoFeZoE0qoCCvM2RWaKC7VFUMEu4R2Kk F8BIcowP8AhSCfQ4SIv3h/mECM/UOD+gmIzEQBAMYJPaG+cP/JKVHJKVEgJ9 dmoogEx1SXodL6dJUNhWV9rZUNHTVNXfWtPbzAcBlQCkAKFM9DUAm4z0iwe6 aoFNxPwsfmlKYoQrsImPs0G4nzUsBmIC7aCPC6KWFmYax801jzsZX/B30I32 sUwJdcqK8ZTLJtnxPllx3izBJLJJZV60uDwV2GSiu3Z5tGWG9oTZZhMxVrSk OGKiBekD2GSBASaETQiezI43A5IAX6AwDRqWLKGieOhEzZiLAMEEc3zBqhgu S4WrTLRSRAM0RMcBwSkDbVTiUHhKsBy9ONN9aaZ7bWZr6b61gJ/ZTt77OJss DW8ta5nx7yReHivUEw+llakOkmcMM48hm8jiyYa8CHe5IpVKWJYUknGXOCYt z3bJZZP12UcZjDcX+q8u9F/b5h1mZUbZi1PI8DjvoPDNojIY0GyyZUNhggn8 +dtR55TT3Sh8D7RTeDLetjHZsfZ4ii186ehgMQm8R4AkHfXFsIYUlafzufE1 hQnC0mQJL6NFkNshLuiWFPVKS6glXHvVaGc1wZbpgXrM9sxKBczkDhITxKQS PAwZCu0mj/LLdQln+yXUB2au98ri4OWFgYvz/VeWhq+vjd+6MnP/xtKDW6ug +zdXbl9ZYrEJ1ijZWBhfmhoEMIEexlfXZkk+LjR2AFB8dXfz28+vf33vKnAE 4APaTaiglbU5FMETEOAJgMn6zMjG7CiMb67P3728/AUNJnAFEOAJ2k2YBIRs QplONuYBT64uT12cHV4Y6Zzolg62CIeaa0daBWPtorE2wVAjv0dc2l7DFZem V3MTy7KiuKkhuTSnZMf7cWKBU7xSwt2SQl1AiSHOsQFUyDyIipcPtIsOsI3a TvD1KMeXtwUKTSRALggmkfTXEbG5BLoZk0xfzOxeVNFGa013q0eOW1SNFSAU QBUzNWQTxBMiZBNf2hkM2QQ2cxL9qrgJjTW5vU0VWNmEySbbGbqq6Vg2+UjC ZJD/ApvI4gkTgh7lEG6TAyZy2WS0vWK0vRzZBJFksrsKtMMmO22n7bSfbqLi cGFRWC03pCYvqDonoCrLj8fxFeYFg0SPq7YwQFAYIOQGiEAFAXX5AfX5AY35 gcAmkkyfpmz/luwASapnTaxDn61xvb5Ksfqp2FP7Qs/uS7NUKfYxi7NT99L8 1O7UXvW3nz37/C+UXvi12otPKJN4kxd+jUYTrd89STl0vfGc3pvPA5tAH3D+ SI2fQ091xmIXf7atAgSDeZpN5nurh6TcKk5QsJOWq+lZJ6NTwCYhbpqZ0faE TWb7a5ZH67Dy++p4A4IJsgnaUIBQ4JuzoTIZ2CTcw9DN/IK9wSkXM4XMKOc2 AWeJCkuRElsJDCjjSL8IkGSmVzDbJ5wfECOYoEkFMYTpxMW0m6DRBMAE1Ckp aarNq8yPhdsfIAbghrnOKaAPZrViN2sNTKrPLAGGhIJgQkqJIdQ4WavbminZ W6i42Gq62mmB3Oy1cQwDdwcdD0ddTyc9kI+LKcrX1czPzdzP3dzf3SLM3z70 /7L33lGNpVfa75r5ZsZju+3Oruquruoc3O5ut+12d3WsXFQVVVQRi5xzzknk nHPOOQmBACEEAgkQQgIJEDlX7mj78zd37nfXuvev+xxtOKUCut0z695l/8FZ zzrrPa+OIqDz/tj72TvYhRPsHBPmlsjxTondgZe0+AAMgCoAFlY5KWHYA1Ug cArwpDAzqiA9Mj8tAvtCYEt6ZG5KGAYlWdHlefE1xSlNFZlttXnc+oLOlsLm uszWuuzygpjSvKiESFcfZ0N/N5OoQDuGSiLdmLVEmDPH19pS/yTkcvNcsItR jJ91arhLXrwv275EVweyCcVNIMZyUhzf11qI67VmnK9m8vN3urertJWZqUkl eIHEZHOpBpixkknxYha6qgEKo2BM4RLStIyvHOuixjFs+xgq77wfTLA2pogM QzdatJnVtsVkyEjey2ZkgU22ZkdoIa1bppjqADMZPtoO9bSWhnSTf/Y36WPj KUtaE83irlhIeYg/OniyOnOAH/zAiru6vU50rfT7uzEyoQ0tJrCwwERMNCMb 8w9P29ZIb2kOzhk70J6vyybsI9NPiiImK5rh1fmRtQXJ6tyeuMkAm6DFssmK Qgg2WVPv2GfYwsv4bcHKUCpoEPEqsXrsasxvr8nCSrK1Kq29Oh1sAvLl1Wd3 NeQAUnDIrc3EYU9zvqCtaIBbOsgrF/NrcHfqesM63yl0wlYMI7c73ar7E8Q8 ff6EnCqtaYvxwg+1z4x2EZsQmKzOjGzOj99eUdzfUn9zd/67+8sAk2/uLd3f esTbztYHBmKsaRQrs3LsySMPRgA4kO2dcq5AE//5p3sQIAVYQfYT3d6L2gLC c+SIZ5O7qMIwbvpqc5Ee5D++vQMBTyiti/CH4iZEK0zcZH3h3vr8ndXZrYWp FdX43MTQtLR/WtKnlgrmRhmpR3qUgzy5sEPcVSsAodTmN5WkVeXGl2VEFadG FCSH5ieG5MYHZccGZEb7pXF80iK9U6M8U6M8yDLPcgoV+IoLcWSDKdTJkcSG VCCKs+ha6ffjSYCLUYCzEWtvZwIi9tfBJj7W+gG7RnhdywnldFHchM3pKkoL ZeMm+OECSVjpVA9m2IQYgWBE0lsz0lM9zK+S9tXuwZD/BpscGD3Zo0nRXjBR DrboQspDWhHVywdq97DJYdzkcDvcDre/uXEr4zsqYtvKoltKOM2FEU0FYY35 oR0l0dx9aq8I12WTrjKGTQTlkcQm/UXhopLI3tygtmR3mYddn9WNWsNziad+ G/jxGxyDj5OsLnjpf3DzjyeuvfXMqSP/duaZf9U/+ovrzz8BMGESup79GbEJ wAQCmJi9+qubrx81fvkZ7OMMzojTOeOdJYvDLer+WrDJ0kjrwkirZrgZbDLW XVqXHcLxNPK31/OyOgtF+RrmxDmxOV2a8fZFeae2wSKfbCYsm5DlZGGic0JY 01GVlBPrHuZu6G1z0cPyXKDT1dK0gOGuErAJE2rRdjOhqlyAEdVw69RQ8/Jk D5AEYEJsAjDZVDOJ5RBlnrNIQgM2oYviJpI+pmysoL20KD0M1zgXSz3K7LIx OgVIAargELI2/AKTFCuBnMwvgE0IWNgSl0yfYupZ7HDNzf4q9oAUEAo4xcX2 CoQZ9iZPp+tAFS8nEw8HI1aejsaYgXxczPzczAM8LFmF+ztEBDgyCnRksCXU LT7CE+RC8AJyyUkNY8AkK6qhLL2uJLWqMKksJxZIkp0Ukg6iiQ/MTAhKifaF cJgc5YNBRnJAaoJPUXZEapx3fKRrZKAdwAR4EulvgwVDRiyWEx4JoU4R3pYm F35vqvcHR+PTgU43Yv1tMqM8ipIDD2STopSgwn0qzQgrywwHoeQl+mPfVJbU 21IgEzYrxUzKBKVCzQAupJ07gQ8MxrsZZFAK1ArGDwL0oKyteazntWtdwgpM Aklkw+2jgy2QbKiVNCFuA5tQ3xlAB3VIofYohCd45BmlgIUgghdQzMpuK0AG T6ZEmzPDLJvsEIoWBGilujDRh4X0umoIp22qmUgKLVx1E4R0M4geVpHapRJd 6nkkOrOLJz/Q/mOP9hTvZWt/7emWgvHy3PCyDpsQLDBgMv+QPjZnR8BlB7rv 6fH34tLcsK6phPK78JNiXSdkSAGb6HptGDyhj1rFZFtRQhf2jOVEOcDWHABH YE2ItaKQW05Iwq3LaavObK1iqtIxxeiq04lNWNEh9m1VacQsEFAFf+nAEywv qV4f/aSo0hprgWd7l1D9Ll3pdqihItVYpqokvHlZL17tJkNzDJuszUo2NNq0 rk3VV7c139xdhL66AzDR6CIJ4AKiWsEY3FqZYd3u5AQBOLChE7ADmIJCJ39+ sIlJ3IuxnCxM65bqerA+/+XGAssplO4FWvlmm0ncovgLxU3YtC5dNqGZW6tz W8szm4uqjfmptVnFinoChDI/OTIvH1lSjCwrmf2ifGhBJpqR9imHukZ7W4Rt 1bzawubSrPrC1LKMmOJUQAqnICk8KyYoneOfGR2QFuWlyyYUQIkPdaI0LXLz sa4T8piE+1gCRiiGQuEVCp0Qv7BnPpSHWYi7WbgHUxmYHO5BwBBwhw6Y6IZO dP0mbFtGsAn5TfD7RrXWqYawrtmECgDKBpqITcAjABNxd+VQVwUgZT+J/Hg2 0bXG/3ATRmITXTAhHYQnDfvjJtjj8O+98DncDrfD7R9666xKAJ60l8e2lUa3 FjN40pgfxi2N6YRKHlF7ZXhHZTi3IrwTKg/vhsrC+8oiuouYnC5hccRgKUeQ H8JN8xpzteabX6syOB318VtObx+xef+Y5e+OGbx35OxLPz197CefPPlPp576 l0vP/uzqkV9Q0ITYhIImkPlrRxg8ee2I6au/snzrWKqJnrwweZJfsSxpmxHW aQYbV6Tti9I2sMm8tHW0q6QmMyjKC1/4+r62F3xszoNNcuNd2LjJ3BgTNwGb rE7tsAkJeEJsMjvaJuGXNRRGJYfaBTjqu1uc9bHVi/a9iZmxvkqACaAGSAIB QObHeXOj3BlJOwRaweTiRDfLJkzlLtUjYEJxE10XPMsmyhEu/Y8UhIJ1TkVu dHVBHK6ewA3QB7gD10e6JlLbYsyAX8ApIBcAi+mVj8yvfYKBnckZkAslfQFG iD6wB5I4WV9ytNIjVMGhg+VFHGISpzlaXnGwuOJkddXFxsDRUt/e/LLdzUsQ xq62193tDVlgcba+5mZ3A2NvZ1Nf15tBXtZhfvaBnlb+7hYMvHhahvjYRgW7 RAY6BXlahfrYcgKdYkJc48LcEyI8kzjetCckSY3xo5ms1MDMlIDCrPCMRL+o EIcQH8tADzNXmys+2n7NlM4d7G4a4Gx048x7wBN7oy/8HQziAmxzYr2LQRwH sok2rWuPyHIC5ScF5MT7YqY6L7qvpRh4QmzCJMlM9MiH28EUTKN2cZtilAfu mFEwbAL6gIAn5JHXTAsX1CJK4lJN9ABkxoZapaJmCI+Au4+JmNJnGFPHGd3W jSyeAExmFH070ZldpzzOx2qZFp/Mv/EVQianS8cbwmj3v+v0f34ybpM/gu1g outfYAtn6RaG0o3gsOlb9BR78eSguMmBYstPsa+Bssh0G6aQljUHsAm9hodh l1kmn219Zm9/k9V9Pdx3/PKLUohBjwUJmeJZXzx54Vk2offF5nTptmsnLzzr 35mSdGIpSFESyt0Cj+CPtKUyHQMIA6qYzYZLdAX+hXqa8yF+Ux6EyQFuOf0/ XDXaxXaZIRih1DtWuv002aQv9qdPOV0UN5nXIqrWbMKwyaYWTyit68761Je3 Zr++swAw+fL2PLGJLpiwtYKJWdgqwWynRTa5C2JdJ0AVtoww2GRrfkqn9yIT NwGnsKET8puATXBHIAnYBCIwISwixz1rh8f4m7sbX91eu7uxtL08t74wvTqn WJ2dXJ9T0BPdWVbfWZq+taDc1kzeWVBsz8qWJ8XqkV5Zf8dwV+Mgt661PKc2 P6UqJ7EsI7YgKSIzOjAjKiAl0oOlEsrpgqihvK47nrXvUayEzCY4nxCGjaqQ HZ6cKSTmXpC3ZaSXRYSH+Q6eOBvv4IlWul54iM6hssMUN8FhSUY4aBdsgisC 2ISqchGb6AZNxoRNbDYXoAN4QqETDNjQCQsj/yU22Y8n+xO6ZNqErv1gcjCb fI/f5JBNDrfD7XD74a2rJplXncitTGgvi20rjm4timop5HSWxXaWxvIYxbHq qIyAOisY8cojurXqLY3gF4f1FoX1l0QOlET2FYR2ZflNeNn3Wt+oNToX//m7 zm8fMX79Cb0XfnL17afPnPj3L47+60eP/9Onj//z+ad/on/0F1ee/nd9LZtc P/KY4fO/ND72hMkLT1q+dtTsZYZNzF4/YvPuixmWVxVl6creKrDJrIhJ6AKb LIy0zIobwSZSXjHYJNbHNMzNwN9ez9/uIsfnRn6iG682CWyiljSqJc3Lii4t mPDXpnt2xeAJFenC9+RAe35VdmiMnznYxNnsFPZpEY6d1Sn4UqUcsBVlLwBk ZrcyMAgFSAIYIeOJtvl7j7Z41yALJqy7BDBCxpMdK8pYF3nhp6VM3VqsPQAp Qm55Z30urkq5SQFgEDfry3EhjrhOYTGDixHWSBgMdFbghI66bKyIqvJjMuN9 cMGNDrILw8LezcTb0cDN5oqV8SnI3PBzyMb0jL3FBTvz81Ymp+1unncEvFCu l7Ohu4MBQAP0AehwtTUAoQBJwCCgElfbG1pdxyHkZHUNnOJmZ0i0QndxsWHg BfJxMfNxMcUenAKK8XYyCXC3CPezB55E+DuAX3ycTSHM+7uZk4K9rEO8baJC HSOD7WPCnOIiXEL9rPxcjX2djVysL7tYXXK3vuznbOjtYOBpq+9mecnw7G/N L3/oaHLaz/5ajJ91BsedcrrYKsGsDvTCs9W6chP8UiPd0jjugJT2qkymk8gu m8zIegAUUmHjhBZMpsa7wR1gE41qgPGqa0MnmNmTxIUzscetNFZIuIxnRNQ8 puUU1Xj3nEJAILCoFZtARXGTHU/9LrPg7tizxX6XlMJtjWRdBxxoLf2w84WS KdWl0RYcw1pa12/C0AF4RyGgIrq6vQKZwsi7YLKihYL1eSafigGfGWg3eqK1 jVNt3h092tzwEanFlBz1SNuUXTf3EnMIlBCvMdWDGTZhc7oYatAGMpinVj/s vbilTevCw7JRGLzsBSCbQkBL9B3qmdvxp2wuj20sjUJEKEQiD2MlCxJ2Hm+N NdowtKjsZ9uRLCmY7qgz0i7VCFchau1vL+tuKmivyaLgCKRN38rQVsnOwgBs gn1HbbZuxGRP6IRbm0kCv4BN8Dc+3FOL5eW0lMeaSihbjO3+ybR63w2dsJ1r 6C3rdpPHrWSUBp+uTVOJY2CdlJGWTbYWZcQmX92ehx7c0tzf3EnlepRQZqBb K4zurs+BTb66tUS3EjgQQeAQ1AAqoVJabG4Ymd/Z2lyU37WpUS5Pjy8opNiT 3+SrzUUgCZvQBQyh1ioUqSE7PIAFYlwn9za+urvxYHv13ibOWbyzNn93VbOu mdqYn6boDPZbGsX6jGxzZmJrRr6plq0qpbOjA/KBLmlPW19zVUdVUVNJdm1+ Wml6XG58eGZUcFKEu5ZKXOK1YBK7a2yn+iGMguzxRcp4TLQGk/jQ3X6O4S5J 4TvtHXF3fCdHBzJEEx2wY4p/mPrla83xtY7xs43xteF4WTBekt20Lq1B/pq/ vbZalxNjLQl2Mabei3v8JqWZEeQ3wRc+gQmxyZ6ELrDJgbZ3XTb578VNvg9P Doib7A+aDO4Hk2blEJXqalQONrB1ukh/74XP4Xa4HW7/0FtfU3p3bXJHRVxr SVRLUSTUWsywCa8stqssjtRdHq9VdFd51H7xyjidpZEkbkkEJI306Pa0yL/+ ecTHb3q+c8z+zWfs3/6V8x9fNn3z6TNH/sfnv/rnz57754+P/NNnz/+P80f+ /eKRn1478nPjo7+wOPqE7dGn7J972vK5J21fOmL99nGT3xyz+ezX6YFWg805 cyNMBhcEHmE1M9QobstvKohMCbYOcdL3s7kQ5HA5xt8sI8qxtTxW1l+lLR3c sijv1KGSh7qzMKQZ75gQ1nTVpeUneEV6mbhbnHUzPwM2yUvwFLblzUhbyT4/ N9aulrRMDzepRpoxXpR3ryh6ASZa9a0oBFoxPSnWpoSryn5MLk5g0ditGeua G+WpRzpmJNxZaSfGmIQWZHysNLDAgHCt4dblVBfE1RTGAzewMg/xvIlLZH1J Ei5SuB4pxrisJkc75NJ2kmykdUzcLB1sHBmoH+ip7OEWd9VmcavSm8uSa/Kj c+J9cbUN87YIcDX1tr/hbHXF1eaqq42Bo8UVyMX2qqvdNWcbfUerKy42BlpI uW5toudic8PNztjd3sTR0gCyN7/qYmPoamuEGQ8HU+1Nxt7ON+l8RnYGeBw8 mpM1E4Uh0QOSHCyuYE9QA9ixN79sZXze0uicpeFZvBgP7Qtzs77qannlxoXf 659+V/+Ltw3OvGt66QPLqyetDT4xufB7iysf2V7/LMDxepSPZVa054Fgossm FCiBSrS9FyuyI8uzIgpTgjKiPVMiXEEoDcVJ/W2lwD0qtTTIrxb31mI/1Fsr G24HMjDBEUWfUtat1sZHCECgSWnnxEgHDkEomKd0L4qhjGljLriVssKIZZa1 1u/FmUGyP5ADYn5KyDpQ2Aq6uoEVNoRBRgys3tkV9dyuOQUio/2s1k1PoRn2 MSkYgfviEYhu2AX5/LSQkp2wBx3Qql63mJWuR2NpFyKYt6BiHnynitcumFC9 39WHwZ2hFfXwyuzIypxkTimCpicE6smBWeWQWjG4MCtdXhiZnx1kSiirRSva GMe8amAHJXZ9LnjZ20tj9MpXH61UphvuoRMYaQGEjZuQ6F1gBuQCNsF4ViFY ICTRflD4xDRaeGQ/zKlRHvi0t72kvS6b+odCGGC5SCESEsagkrbqTEAK2ISr Tdmi6AkbQOl8dJLU21o01F2NdSbogygDA3b9SX3AKd3rwD71utZ4trvNmmqQ 6i2zbLI+J729PHlvffr+lvqr23Nf3tLc25q9s6G+uz57Zw0kor61ooK2l6e3 lqZojHncem9j7sEWeGSe8rU2F6e3l9XUEZ5qc0Es3eykgS0/UkB4W5vitaqe mJ+UzMrEcxPDIJS1GTlO+FJreyfAgZj4yJ1VemTdumGM0X5Dc3dzntK9GAfK 5uKD9fmdEMza/FfrC/eWZ2/PT2/PKjbVcuxva6awX5+WLcklC7Jh+QBf2tMh 6mjg11e0lRfU5WdUZafkJodlxAdSfmlqjE9ipEcSxzMx0j0+3DUuzDkuzCku 3Ck2zDE6xD462DkmxDUhwpPivGnRfmlRvolhHlBqhHc6xxf7pBD3+ADn+GCX 2CCnmEDH2CBHxo3iaxXlZxPjZ4PvqDB34yAngwD7q4EO14IcDfwdrkIBjtcC nQyCnK8HORsGuxgFOxsRngQ4GPrZ3QhyMonwsCzJYNikr60EX0oUK8EA3/9M QxMtmJB0vfC6DMKyCYHGHjb5m8Cyp93JHkLZYzk5sEXjfqOKcojIZadNPFtS +JBNDrfD7XD74Q1swq9L4VbGE5sATCBeeRykQyV/g01ILKFMZoZ1+Ftl3Pg0 5PO3Qk+9k25yutz5RorpGecPXr507CcXn/83vRM/Pf/8v1184d8vHP2p3lGm Qpfx0V8ybPLcDpvYvXLU4s3nzd874a73QUGk03hXqS6VLIy2kaZFdUOtuY15 4YkBFsGOVwLs9MJdDcAm6RyH5tLocUEF2GR2tHVZ0XUgm2zPDYA1Rnsr2ioS sqJdo3zMvG0u2hl+AjapzA7BPMiFwATfpQAToApmFiY6l76fTWiMSdKSvBcC oUA7SDLRA2FyeWqA2v/hctPdVIA1DxY8KRx3H8frQe6mcSGOYBNcmxgjpLT9 oSQ7mhhpU4x2KEe5EyOto4NNo6LGsaHmaXEbCIgSyZgyxSMd2rJCTYKO8raa 7Ir8+MIMTkVefGNFprC7RsCr6mjMry5JLsjgpMUFxIV7RAY6c4JcQ3wcAj1t ASNOVtdtza5Ym1yCACk4BK3Y3bxia3YZlAEAAZs4Wes7WF6yt9DD3tFSn0Iw djcv2ZhehChPjE0Yw8DWTA9gYnbtCwh4Ymt6wdb0vI3RWUuDLwAmlz5/W++T N85/9OqFk69d+uQN/c9+TTldgBQv68uRXubpkW6FSQEHs4lOHpcuoZCITSJ9 LH3sr7lbXXY2v2hncsbV6lIIUxzMISXaszgroqoovrUuu5dbJuyu7O+uFPZU Dfc3SAaaRgdbWPSQgzG1nU2AHopRHmYwLxU102kY4wRKAwOeMClbqgHW+EDp Rks6MRTW98GuurHk3lyQbi2OYn1Oh9hjOU3pYYARFcgITCTj04oaN+G+bOYY E4AgB8eClKUSzOOOOF+tjfjglVNyGlNWd34EbKJb4YqFFOoySacxk9pXuIdN 1tVD6yqmUcgOMswOr86MgE2WZ0c0U4NLMyOLsyNLs5Kl2dH5Gcnq4sTKonRW NcAUGZjqZ8BHm3zFMIXmobmG8EQXTPYUENM9ZAhFJ1DCWk6IvAhYqGwX2IS6 XhLQsZ8YPpMJcZuou4rXlN9SndFUmQbVlSQBTPAHyLJJS2U6yyYUNKHkrs66 HfTQJZED2US4m9NF1bqoiyIZClSjXWSK1y0BvcdZo1vugITzqWaCNhdOsodN HmzPfH1HQ0ET4Mn2ClhjGiQCJNlYUKzPT2KPGQjAAjYBlXy5vfDVrcV7Gwx6 bC2pNhammCYm2tQvMr/TJKs7OtWDiU225qc2NUrCE418BFqeHsfknpANpZBR I0g8MhvHYZhoSbW9MkNt6xltL321uXh/TXN/VXN/ZQ5gcndp5t7SzP2lmTsL qruL6vvLsxAG23PKDbUchKIZG5oe7p8Qdo90tw20Nwhaatuq8+pL0yvzE4sz o7MSg1NjfIlQtJDikRzFCN8AqbFeiZFMAmparD+55DLjA7PiAtOj/TJi/LNj A3PjgzOi/JKC3WJ8HRJD3ZLC3RPD3BJCGetKXLBDXJBDbIAtsUkgkMRO38/2 Cvb+9vrfxyYRHubatC7DEBczjpd1SUY4frsE7aVjwiYKl7BgsodN2OrBumBC uLGHUH48m/ywzeRvsonuOZNDLaTvYxPFYP3fe+FzuB1uh9s/9NbfnNlTnwo2 Ib8J1FYSxYBJ+Q6Y8CsSSN0V0fu1h1CITUQZAU2hNvlOV1LMT2fZ6jUG2fTG e9X6Wgad/e3N1540eflxwxOPXT36E6Pjj+k9//PLzzNtTUyee5wJl2jZxPrY 03YvHzV/4znrP7wabHy6OsVvWliriySLY+0ksMlgS059Tmi8381A+0tQtJdx bMDNtEj7xmKOtKd0erhxbqwNGLKu6t3PJhtqwZS4Ucwrri/kpIY7RHqZ+Nlf BpsAUjqqkvAVCiqBQCX4LlUDjmQ7VYiXJvm7YHIwm5BWlf0k4hFWBCzz2no7 6rFuXGs663Nri+LrihOSIly97K8Fe5glR7o1lacQmyhG2iGlBOqYkpK4qrHO 6dFODCaH2+TilsnhVtyqlnAZDtI67lVSrmK4XftPtpbBrmrgiaCjQiJoXp2R fHdn/n//z23o//jTxl++Wv7m7vz9LfWtVcXyjHRRJVHJRJOSPmFXY1NVXkFG LDjFx8UC8ne3CfS083e38na+6et609PRGIRia3bR0viMhdFpyMr4PPEIGMTB 4gohCWboEMKhtckFC8Ozplc/N79+GrIyOmtndsHO5Lyt0VmTyx8a6X1w/ex7 lz97C3hy8aPXrnz61tXP3waeWF372NnsbDg+llCn3DifA9mEpRJdMCnPiqjI jqzM4WCQm+AXE2Dr73TDx97Axfyi1Y3PIXtTvIBzELldgn0sIoPsokMd4yJd k+O8spIDctNCCjLDi7IjS3Kjygtiq4oT2htyOpvzeS0FXa1F/PYSsAw0wK8W C+oBKRRYmZns04AUtEZs9l/6ZIJgYxzEEWxw5GEfk12BLyDCE0rrwh2nARcy PlUAY+uA7XeLsL5v3AsnYDUOqJnSwhS9QizXKT5Cq3eqlrwT31GJNNpiYjNK ARUoYwhLNUDgwDz4rgFkTTW0Nj24on0jDFNoJIwde066MidZVIsX1cNgkxXN 6Oq8bHFudGFuVKUUiIT1/fwqUV/t5BgPj4+nI5rYQxz7kYRpubIg1cWWHTbR CZewbMLCIFOzS8WUVgNOEgniMwSm4aOYBFcOtgzyq/s6SjvqcxorUmtLEqG6 0qQa5o+RCZqQgCRkMCFhzIpiJXuQ5EA2Gegsp9qwFDchuKAmO1S4gPUH7akt QAldFEDZ4/QBmGzNPWST9VnJ2qyE+psQm3ytNZvc357bWp7aXFSCR6A1jZyE GaAK4QkbPaH6wEAPahlPrRgpkrI+r1ydm8Q8hMGGRgkSoXpcuuW51mbkQJIV lQyQQrqtZRB6ZAAOSyXsIREKmAVssrWiBg1RZ8ZvoVsrX28tfbk+T2zCCHiy qL41P31rQXVnSX0P8ytztxfVW3PKVdXE8tT4wqRkdlw8LRlQiAXywd6R3lYR r6GvrbqzobihPLM8LwGQkhLlkxDB4okn2CQl2ovhkYQgsAnhSVZ8ENgkLcoX eJIZ7Q8wSY3wTgnzTAn1SInwTIn0TI7wSAjTJn2FMt3n44PsY/1twj1MgCEA E1+by5DfwWxiTGyCQaCjcZibeYyvXXFaKH7T+jvKwCZsI/iDgiY7XnjWciLp rYGIStgx5olNfqQJ5cDCXP8NNmHB5AfY5DBucrgdbofbD2/9LQybdFYltJfF gEqg9tLorop4iAWTnspEiF8Zs1+6hMIGULpyAzoyfJoSXRtjnVvj3buTffoz AltDHOKvfer9x9fc3jth/fJTpkd+anP8icsv/EL/BcYCb/b8Eyyb2B5/1ual X1n9+gWnj9+OtdVvz4+cGaxneWRpvANalnGhGTGT01WXExrrY+pvexFsAkhJ CLYEm9QXRoh5Rcohpk7X5owAbLJfK0q+aqRZ2JZXlR2aHGoX7GLAdIQ3+Tw9 0qm3KQs8AirBtyjlcbF9G5myw5P8xYluamiyh00IRlg8YaMne/AEwnoDK5Mp SedQd3VDaVJBanBhWkhatKeP4/UQz5uAFCyKpIIGsMm0pGN6pB17lbb4MDQz 2jkn61ZJOibFrcwlYLgNt06NtDPJY1LmfIW4VTGEC1kTHlzQXtbPrRD31Ckl XRuasa+3Z//65cr/+nYN+o/v1oEn//nnrf/zL0CVW3/9BuNb//sv9/6f//zm L19uLKnHBrqbMhJCCzPjGivz+G3Vgs763o7qrpbyltrcuvL0isLEwqyozKTA BI4HJ9gxxNfWz93c3d6QcrcIQ25eZ5iF8ARsYmumB5nuBE0uUtzE1vicxbXP za99YqZ/0ujC7/S/YKIneidfB5vof/br66fftbr6saPJ6TB306QQx5xYb5BI eUbYHrF5XJTKRcIYVFIFrMiKyIn3jQ92CPUwC3YzCXYzpVYFgW4mfi5GoJIA d9NAHHrdDPI2D/Wz4oQ6xEe5xUW6xEW4xIY7x4Q5QWCWqBAHCANMJnDckrCk ifVKjfPJTgnMzwgtzYuqLUtqq88Gs/R3VUoHm8dBjlLulExLK9p8Ko1y5z/2 WCo/rKCrXXWzGMK2HWG7kNAMiyRsS0fSnvjLTtMQcnNoHw3nUDKYXMIFQI2L 29TyXoqJEDExtZGnd+okY8/UIpvqZ2sdz+4+6U58h3XBqwYZv8NDjhjG2hhs sqqRquX90zK85aHtNeU395e/+3r9mwfLW+tysEldZWpZYWxTbSa/o3Sor455 JdpsMd1wjy5kEYNQRIkVfVyMtF54XTs85XTtEd4XJb/h0wCmjYmahbwKbkNu c1V6S3VGa00mhHFDeQrYhM3mglizCYVLWFHchKdN4tJlE9Zjsi9uUoY/Z/y9 g0rYUAjrfMek1tIu2dO9hTXd6JILK7ammfbkESZopR7eXpTdXVVSTtfDuMny NFHJ+vwkhMHKrIyiJ3vwZGsJZ06taRQAkyW1DAwCKoEwCTahgsN009LUGABk fXYS2tDa1dkWJ5u72II9br2jtZZQfIQIhfCEdG9jJ4mL8aFszN/bWiCDPGNC ubfxpztrX20uMk6TRfUdLZJsquWryjFiHzwvZXxRXxVMAovwwhaVo2zsRj02 qBjukwo6BruaBO01vMbStpr88tx4EEphemRealh2UnBmQmBGvH9WIgZB6XEB hCdpMX6pHJ+USG8GTyihK9QjKcQ9OcQ9Kcyd2CQ+hPGwJIQ6xQU54NspIciO 430zxOVGgP1VwpOD2cTFmDowhriYEpvE+tkXpobgt07QXjra30jJfnuCJgQm unETtoYwiSUUNnqiO2Z55EA2ObBc8H+JTfYTimLwUTYZbDzsC3+4HW6H24/Z hK1ZvY1pvOrEjvJYUAmJARMdKtlV7A/giS6hdBQH80rDOoqCuwpDegvCerOD hLmhYJNsi4sJl05GffG+99snHE887fLiM/onHr924gnj40/ePPak1fNPEZvY v3jE6sQzNr854X3291le5v01qTODDSySrEx0spqXtg63F9Rmh0R7GQfY6YU6 X00Jtk4Os0nnONTmh4k68uQDNWCTrdn+DXXffjZZlPPUkpauurTiFL/4QCtf u0te1hecTL/IjfPgN2SM9VVSgZEFPJeSDzChoMkPswn5TYhKACALWA6Nd7M8 Qoc7mhRMS3kQVizcupzaogRcmNJjvHydbmDNjOtdXXECJYEAOkggFPAICWMg CRgE8wyqUKvHsS61hItLA12AxPya/o4yfnORRNCoHu+5szLJUMlXq9Bfv175 y1fLf3qw+Ocvl/785fJfvlr56zdAla3//NOt7+6tYpUiH+ltqyvOSeFwG0tF /OaJ4R6VTKSeGJwaE0wMd8uGO6GxoQ7JQItY0CDqqR3g1/RyK3s6KrrbyrhN Rc01OfUVGTWlqfnpkVnJIalx/nERHsHeNm52N5jACiDF9KKNyQVr43M2Jufs TM5bXT918+onxnofGJx598rnv7706ZuXPnnz8idv7sRNrn7sYnYObEJxk/1g ApXuIklZZriuQCXYF6UGZ8Z4xQXZh3uZh3kyouI8oV7modj7WIb7WYf4WAZ4 mvl7mIJNosOcEqLd4yNdiU0wSIxyh6hzJU0Ss4BTIE6wPZgFhzSJcWSQnVZM 70smEBPhkhjlwYBMrFdGvG9eanBpDqemJKGpKq2tNkvALRN1V40ONCmlnVg/ Y8m9vTQGbS2OUqSALBJUbZiyuQhJaA3/sPaUDsuwtPLQ/T0lnJTiB9cOQiHX DNCDtZ+wjpidjpPYa4Flp5nLRA+W9IRUD60Q6qENtXhFvctQTP+UwSX18DKT 1iVZmZMua6QzStGEtEc6zBse7GhuyM7NCktP8stI9i8tiKmvSG2rz5HgXY/y cHe8U7xferN7IiaEIQQvOIdEeMIa4XUJhVrDE3xRGAVjvH6FhAsqGeqpwQfe 1VyATx5gAiRpqkxrrEhlRYES4hE2iUsXScgUD/Hq97LJ98VNRLyKMWETSISC IFR0izrr4UtgbqIXM1RyeU8blx+okIYPf0PNhrGGASbLKvHWguzOqvLepurL W4zf5P723N3Nmc0l5eYiIwKT1bkJEkVPbq2o7m3Mfbm98PXtJWoWD/qAqO8J 8QgmSZjfadc4NQo6wFcF9hQoIXfJg/V5JtKxsUDWdczc2/WtUFkwpv7wbvQE tEKFi3f6qtxa+urOysN+9Fo2+WZ7GQ+yOClVS0UqyYBmXLw8KQWALKtla2Ci JRXDO0vqTeDJ/NTGvHJzYWpX01uLO63qQSsz40PTUqF8iC8VtPe0VHQ3l/Ea i5srsyvzE0qzY0qzo3OSQ6jgeVyYOyfQiePvGBPoHBvkwuwDnBND3IEnaRHe qWGeKRGeqRwv4ElimBvjmg9j4iYpYc7Akygf81A3o0CHa5TWdSCbhLiYsGwS 4IBDs2gfW2KTvrYSXBEISRgMeTRisqdOF1uka5hfBbHVuvbEUPbgyf8fcZMD e6PsGuQbd6Qt20V48vde+Bxuh9vh9g+9EZt01SSxbNJRFtNdmcCvfAgmvVVJ UE9V7H4diCf1Rf7NpUFtJcGdJWFdRWH8nKCezICGAJtiB4MCs4vJF04Gvveq xytH3F981uClJ6+/9KTJiafMX3iK2MTu6FO2x5+1eOFp67ePh179rCbac7S9 UDPczFLJqpzHCmwibsurzggEmwQ7XonyNMqJck6LtM+MdqrJC+1vzZkQVs+N tW3PCQ9kk7mxdvlAbXNJLJlNACYelue8bS4WJvn0NGaOC6pALprxjtWpHmIT sAzpB3K6wCYEJhQrIRhh4yZ0SPYTLEsonVjEq6wvScxPCcpLDowNdvCw1Q90 M4kLcQStUL+26eF21a6md6UcbMHhjLRzbozx1y9QqhiWkSMduAwJO0r4TXm8 hrzupgKZqHVuom9tVnJvTfnne4uEJwQm2P+vb9f/4zsmdPJ//fX2d/eX/+// ePDt3RVxX1teWnRpbpKgs14m5oNKZuRDoBXpQOeoiCsTdwFM5JKuSSkghTs6 2Eoa7m+WDGDQDklFbSAXnIaZEWELZjDGXtRTD4Rpq8mtyItP4ngHeVq62xk4 mF2wB57c+JziJsCTa6ffuXbqHQOtjM69b3HlI3fLi2ATXP3z4n0PZpNd6YJJ XWFcTX5MZQ6nOC0kJ943OdwlNtAu0scKbEIlQ8EmYb5WId4WEf42GAR63YTC A2xiwCNRbgkcNyIREgsjhCG4FbSSFO2RFu+THOOJAYQBDjOT/HNSg2ge9wKk hPgy4OPrZhzsbY6nC/Yyh4I8b0KBHmYUtQEi4WVEBzvEhTknRLimxXpnJwUA YbBa7mzM6+8sHxHUT450TOP3R+uewEId/HJreZxN/aIQyYyWI9jozPJuzhXO oV4tc1M70RCmUJhuNpeOFmeHlrXGjZ2T8asl41MKGdkimPJQavHmzPDSblhn gSkFJlqYHlpUizVTg8qxHslgW09nVUtdQU1FZlF+QmS4U3iofXKcV3ZaUFkh kyAH9XLLpKJm0BZeIYgDLxIvmGCEZZM9hMKKOVyU7mcT6ghPaV1MHt30gHqy F9wn6W/obS/Bh8ltyMW+u6WQ15TfUZ8DQsGHXF+W3FCeggHla7EW+MayFCwa dZ0mZISHfrzfRNxdjT92lk2osDOb00XBFLDJrcUxFkxIhCq6KV5sE5l1FX4E bBnnEQqdsDldFDe5r/XCby4qWDYBkqzMytg9ZraWpsh1cn9Tsz6vXFLLgB4L 02MYEJUwUZJdYR6a14IJiQ1VUHkusMC3t1bAFN/dXgWk3F/TUCdHprWilk0o v0u3oDFVBiMv/L2tBeqrwrjmKaFrY2FjTjE9IpT0dEh7udPD/SuK0cXp8eU5 +cbS9K3VmVtrs4y0g9vrc9AdraceD3V/e/Hb26t/vrvx3e21B+sLeG14qOXp MZmoC4Qi5rf0tddw64taqnKbKrLL8+Kzk0IiAxzdbK9bGZ2zvHHGzvhCgMvN EA+rCC9b4ElSqEdquBfYJCPaNz3aJy3KOy3KK4XjnhTumhzumhruusMmroZ/ k01CXU21reFN/O0NAx2No7xtitPD8JvG1unCb8tofyPhiS6YMBU8BA/N72zc hMUTFklo8AN48v+t32S/cf5ANiH9vRc+h9vhdrj9Q2+i9py+xnRedRK3Ig5U 0l4awy2P5VclQoQkUF91MtRbHbdfu4TyCKS0VkW0VoR1VXH4FZye0khhUURf Tkilp1mp840ii8sJZz/w+fVx1xPPuL7w9PWXn7zx0lOmWjaxfv4pOyZu8pTN C09bHHvK6tcvRJuc42VFKHsql0bbGSqZYHhkbbJrVd6FPaSRtAw0ZZWn+IJN ItwMEgPMixM9M6OcsqKdq3NDBM1ZMkHVDpuoerXqA6QwwkDVC/QY7iqpzglL DLZhuy5GeplUZoWIOgqmxI3UFH5Z0T0v4y5MdELzMkZLcqYbI7HJioJlE1wx hXtc8DvpW4+iipZNeKvqwdlx/rSkc7intrkitQRr6ezI6EA7N+vLPg4G4d4W 5TlRYBNcjwAgMxIuCeixI0nH7ChPo/XXQ3jMWe1pE8JGcXeVsKMUeDLSW4fF D9MzemHszor89rL87qry29tz0J/uL3x7VwM8+Z9MAGXlTw+Wvr238OUtjaCz NjU2KDs5orOpTCEVqGUigAlRydhgl3K0f3qsXz7Cn5R0T2jjJuMMgDAaF7cP 9TUN9jaK+5pGhK0EJtDECE82zAPIyCXd42Kudp43JxeuqEdmZILB7rqSLI6v k7Gd8TnL65+Z6X9kfPH3YJOrp94GlVw//e61L35jfP535pc/9La5HOpm8gNs siebi9iELCfVedHY5yX6g02i/W0CXYz9HG8AAIPcTZneMW4mvi5G/m4mgR6m fu4mPq5G/h6mQT7mQb4WQeAIX8swf2sSmIWiITTmBNuTwClAmAQtpwBGUmK9 IAyYcYxXapw3cxjtkRDpCk4Bd8SGOsWEOkaHsHLgBNqRIqEAWxLgBS/My/G6 p4OBq80VB/ML9jfPO1npudnqY8bHxTDAwzTU1xL3Asikx/vkp4dUF8e312X3 dZSKuqtkQ60AmalRHtNpRakNssyK2Q6SFCJhcsymhQQs4BTyZews7DXDqwsS rO134EVLPXMKJpGMCtsybDLDpBUtqQYhbbqXeEU9vKgSL6gYNpmW9UkH23mt pTVlGaUFSTmZUTEct+hIl5R476zUoPKiuLrylPqKVH57iVhQD5gCQIFNNhk8 kaxTytb8DqEwnVB2CWVF66Nh0+E2wGW7WpvX5nRpRvBG8NbIgaKZHpiS8eUS 7iC/RsirHMBfB6+yu6UIHxQEMOE25nU1F/CaCjoacpurM+rLUuq1dbpqixKq C+OrC+Kq8mMrcqPrS5KwdGTrdHXUZHFrs/cwyP46XWzTEzG/GotMtZZNqOfL hkbC1DrTxkq2Fka1MyPUYnJPaxjqXLnfh7KuxcM1bZ2u9TnJutYLf2dFcX9D pW1uMv/1nYUH2rgJm9NFsRLsl2fGwSbYQ0vqMVbgDo1Sqp4Qq2RDM/JhHJLB hKiEmGVRhbswUZIVFWV2jVP0BHhC5bmw/n+wrvnLvY2/PtgCpPzp3jqVICY2 ISphTfFsJIXx2i9ObS5N31mdu6/tt3J/fR5og2dZmJRoZMMqqWhquF81IpyV ijQK6dLsBNhke3WG1daKentlhoUUIpT76wtfby1/tbV0Z3mW+kVCwBP1uEg+ xJcNdo2LOod7WwTcmpaqnOykUC9HY4MLH37xxzc//M3x379xVO/Td60NzwY4 34wNdE6N9M6M9suNC8xJCMyIYfAkI9Y3NcojOcItNdI9JdwlMdhBm9PFsMmu F54BE5ZNgl0MQ1x3upyEuTFdGv3tbwBPIr2sSjMjm8rT+lof1uka62/SiZtQ AWEGT6R9dSx3sAld+wlFJ3RCDhRdNqkd6ye/PKnhv1SnS46ZgzQ52DypTehS kHZzunTZRD5QC/29Fz6H2+F2uP1Db6P80u7alE7ASE1KT01Ke0lMVyXAJKmH oZJkqK86RUfJB2onsMLGWSpieEURvPzQnsIIYRFHmBfRmxFUH2BTYHc16eqn kaff9/v9q46vPmPx3M9vHPup8Qs/t3jhMetjv7B77peOzz/h8sJTDi8+Y/Pi M+4n3061v95TFKvsr16S85bHwSZd65N8CIOlsQ6mhrC4sbc2NSfKMdrbMMbH KDkYbOKWzXHKi3apzggU1KerBuuBMxtK/tZ0L/a31IJ7GtHduYFtVd/mVM/0 cJOgOacsPRBsEuxi4G5x1s7wk+RQO15NKr48ASYbagGlci3J+fu1ougFoUDU lpFmsF+c6D5Q1EF+fpxH2lCJ5kZ5kwNNoz013XXZ9QWxrWXJ6ZFuAY7Xw9xN IzxvFiUHjnRVMuGS3Twu9a7fBFqQ9yxO9u70TBnvwgwuGbioDXVX97WVDHRW AEyUI1ysauYnBfRP2lkZ8x9aJhVkbuTrW6p765MPNpXf3Z3765fLX26ppka7 S7JjcpJD60pSh3ubZmRCSC7umhT3PKJh/uRw95SUr5R0K0a65GKubLBtbKBl VNg8LGgb6e+QCLna8AoPLDM+1E2SifkTwz0QMAdSjfUrRvijwtaWquy4MFc3 G32rG5/fvHry2tl3TS//4erpX1/85JVrp98y0XsPeHLz0h/tDD/Hx4LPBGyS G+fDlhHezya6eAJRQldlDgdjsElKhGuwm4mzxQU7k1P2pmcwcLG84GR+HnKz vuTrZBDoZhTgahToZhziaRbqtRPRCPK8GeJtgTFIAcKMj7MhBhTpCPezjgqy jwpz5IQywRSilbhwl5gQR1BDTLBDQphzCscdC5ikcNf4YCa5KzrUMSLQFnRD Yuwt2rwvSgnTZn+5g2jYFLIEDhPBwTxli0G4O+4V6HXT183Y28XQ1U7f2eYy tdqEHCwv2uOt2V6BPBwNAFzBPhZ4CrBSIT6Q/JjqksT6ipTmmoz2hlxeS2Ff Z/kAv3oE6xD8msl7gCcAFqYLyaxWu6ZyKonMpHvtAg7ZVdbmx5j0LW0S19LM yIKWTZRjPYpR/oiwpau1tLEqq7wgITslNDrENSbULTnGNyc1rDArCpP1FRnd bWWinnqcjPvioZjqXurhpdmdtokrOu0aH3Yq2e2oCN1ZlN+el23OjUFbmvFN zdj63OjStHhhamhOKVJNCMDFIwOtot6Gwd4GPFF/V01fZxW/vRwvrLO5uLUu r6OxEGqrz8e4qTq7rjy9ICOsICO0NJeDPZOAlxxYkhlekRsFYGkuS22rzODW ZHfV5fKqs3UjI6xYywnLJt2NuYP8qjFRs1rGB1g9DPo8GgPaAbHdUAgbNNEF k0f6Ue56/1c0TN1m0u01JRnhv723wDSFp9DJmhp4AiRZVI0CQIhKFqal+zUj F0+PDypHByAMZidHmBCJ1gJPbAIw2cn1AhrMybfmFdsLSuzXZmTL06PrsxMY QJi5vTR9b3Xm662FPz/Y/MuXW9/dW//69sqDrUVynewXY43XFvsifCC7CjAH +DM/KQH1QBr5CPYz40NzCgleD2PJX5giOwxeEgbEOLqiqmJ00/q8cnlmAvCF O+KNYIB3hPcoE/cO9rRy68sTwgKsjS5/8PbL77569DcvP/PGC4+/cvRnQBVn qytBnhapsV5JUe7p8T55ycG5iUFZcf6pHM+kCNeUSPf0KM9E/HUH2EZ6mYW5 GQU7XQebBDkaBDndCNxVkDMDJqFuJjQO9zCL8rHE2MdWPynEsSovvrUyW9BW Ie3D8r5TIeZhT5IPcidEHbKB9rH+VohlE10k0bWcsGERLZVUjwpqxvoBI7Xj wjoIhzSDsWygHpoQMWByYB7X/viIQtT0MBSyT2QtmRpq1qqVZZPJgQb5QB0u rJOiOujvvfA53A63w+0fehvrKQOb8KqT+LWPsAmDJ5U7eLILKd8rNsJCbCKo iu0qDucVhPQWR4rKYgaLOILs4OZQ+zx7/djLHwZ9+pbnb4/bv/KUxfM/Mzr+ c+PjP7/5wmM2xx93PP6Uy4mnXY4/bXviabtXjvie+l2+l8VQTcb0YD1TB3gP m4xzwSbTojp+dXJutBPAJM7PJCPCtiLdJzPCIS/GtSYzCGwyNVALNgGGgE3A I3dmhWAT7DHGjGqkmd+QUZTsGx9oRWxib/hJVrTrQHs+blpWdK+r+rBnCnPt 8ohOKlcPNYsnsZMHUgwBC7EJiyfbs+JZaSe+vSf6G/j1OWCT2rzotAhXfwcD XL+wDi9MChjsKGVyt3apZGa0kxUVCqaSXNMj7biy4MJEOWBUFV8x3DEl6QSM YABaKUoPjfSzDvYwiwmyT4/xqsiPqS1J1GYKVfR3VrbWZOckBydH+QBMRvqa ZieEsxMDYBAQxI9kEwhgsodNSPvZZGKoa4BX11GXX5YbhycN9bZys77iYHbW 8OLvrp97T++T1/VPvWmi976p3vtmeh9YXPnIweiUn/21SC9zipv8l9ikIjuy Oi8ahELtFzm+eC49W+NTN69+hKfTP/2bi5++cfajV66cetvg3HuYMbn8gbXh Z3gxTuZM/S4mVGGp52pzxcP+mjdWEc6Gbrb6GPu5GrN5WdiH+FkG+1kCNML8 rUN8GWABtkQG2DJ4EmTPtHULdogJsIvyYyIvZE7BnkIwAAciDhI7z55J2MIy CwVlKIWMBFShk+m+FMrBiwnyNid48XS6Dvm4Gnk532BFk5Cb/VUcBnia4Unx LBmJfvkZYbVlSU3VDLx0tRb18cpFvTXDwgaqrjyEZc9QC0BmUtqpHO/C+h+a VQwASRismBlZ1YzOTAqBG0N9je0NBTWlqSW5seCRuHCPmDC3xChvjMvy46tL UmrL0ngtJaCGaVkf7rW+MI67a6Z2Qh5khGHFgslDg4xKdHdJfndp8tbCBLQ9 L9taYKQa68WvKF7ApJSJ1g0LW8AmYkETXs8Av07Aqwab4Hm5TUUQBuAj7IEn YKXKoqT89FBik6LMsOzkgKKMUIBJVX5sfXFiS3lae1Um2IRXm9NZlXUgm+yJ mwBMoCF+9fhgC8smlIZ3IJs8LNGsEzo52HhyEJvcWlXc31ITm3x7b4kp1XVL Qw1N1jRysAkAhA2aUKyEJuenJJB6Qjw1JpqU9CukQmITLOABI1jVkx2eOIXx nqjHQSJgkFuLoAnlpmaSkIRo5c6yCrq7or6/NvtA28dEV/c3F1hkAJJQThfT SEXbVp7AhEQ9U1ZUMl2fO7SkYvLNqNAxHgGPQ9YYXZFBhgI95KCBCGeoRBie lzLN8FB41x11ZXEhfsaXTr/94pG3Tjz9+rHHX33useNP/+tH775oZXTG18Uk Lsw5ieOeFuedmxSUHR+QHu2THOEONkmOcEvjeMQH2oE1onzMgSfhbsZQqAsA xBQMEuZuCiQBjwQ4XsdXGb7kgSSYwfe8r91Vb5sryaFONfkJbVU5P8Am48I2 gMmooGVUUL/HVEKcsieJS5v3VU1swsIIRJzCHhKekIGdkISc7Bgc3Bf++5GE METH/L6T0wUw0YoJmpDl5O+98DncDrfD7R96G++t6KlPA5701KWCTTpKY8Em 3UxVLlBGEulvsskePOmt5vBKQzoKAruLQgQlYYL84O4M3/pgyxz7i5xL7/ue fNnlN7+yefkxs+f+xfjEYztscuIJ5xefcX3pWcjupWcd3zwWcO6DPC8LUU36 9FDD3Hj7iowHJNlQ9EBr8m6wycJom6K/mlselxVpH+trnBxsWZjgWpcTyLJJ X12aUlizMtEJNgGM3J7pB5jcnx9k2QTfkNzq5JxYd463qZ/9ZS/rCz62eqVp AeOCqkU5D0iyOtVDtbl02YQNl1DEhOUU6hH/A2yyB0/WpoSMf0TcNjnQ1NeU 31gUX53DyYzywKUKly1czsAmA23FcmGjLpuARChQwjadVw634Ro0zK/CJWm4 p5ZtJcw0RhEzNYT5zYX5KcHeDgYmlz+8eua96+ew/P7QRP8kZH79MxuTs06W l32cjUO8rUqzY7qbSySC5rGBNmk/I6WkRz7Ef0Tibrm4C1QCTQ7zJoYYNhkX tYJNiEpIYBMSGz0hPGHjJpNi/qiwY7ineYBX29VQVFvIVCrDGt7X4ZrltY+t rn9sb/SZtcFJq2sfW+qfdDE7h6t5XIBtBscdH8t/lU2g4rSQ/KSAguRAqDA1 uCg9JDfJPzHcOcLXMsjdxM/5upf9VVeri7bGX1gYfGx65UNAytUz71w69c7l 0+9ir/fFbzC4dv53kOnVjy1ufG5jcsbB/IKjxUUiF18PEx93YyzvgQOMod7d NMDd1NfFCOQCJIwCpPjbRPpYRXhbRgTYUmIYRUwAMhDggviCSISs9CynsOiB GfLgk+IjXQEmQBUKrLAi2z74hWI0urXFCGpYOz+5+Hdt+3Ys4LBMBBEo4aVi T0Yb3B2Pkxrnk5UckJceisV8TUkqVvWttUwMAot8rPz7Oqt6uZU4rCtPB4bk Z0RmJgXHhrnHR3qmxvqDTcoLEnATxU1ADaCbtfmxjUUZ2ASYszI3TMERtrE7 FWTWBRaa2daM3VmYuLM0eXtRvqXBalm6OiPBr+W4qH03pbBTOtgOPAGYAILA JhQ6oboNnc3FEF4wDunVVhQmFmdHlOVF1RQnlOdFA1JAKMQmtUUJTaUprRXp HdVZXXW5/Lq8rvqc72MTNstLl01mJnp0q0P/AJuwZhNikx8fN9lemby7Mf3l rdlv7s5T3OTB9hw5TcAjxCAUOmHxBJMa5cicYnh2kknlwiodYAJhMCMfBpuQ 8YTFE4wXmTwuGXgEGEJssjEnB61QJOX20jSDJOtz2EMUKAELUPCCOsKzHU/Y 8sLbyzudHHUrfbFjNpiCPWNv1yIJ2x2SEsPYYmJsrWOCERrQW6DKYIRIX99e YRz3DzbxGuanRttrSzn+nnqff3D86Z+99Kufv3L0MbDJi8/+5PVjv7C4ccrP 1TQ6xCEj3jcryT87gQGTpHD3hFCXBAAL+U0iXNMiXLNjPPLjvYsS/cpSg7Av Sg6E8K2VF++Lr/fUcJekECa8Eu1rFetvE+NnHexiiC98YpOOmrz+9krQB2CE kIRlE9lA+w+zyfcI14UqNnRCMMJKd2Zy6CGbMGUexa3EJmy/eFYHsgkFSlg8 IeHSplXDjkT1k6K6wxrCh9vhdrj9zU3eXy1oyuTXpfbVp/fWphKbHBg3EdSk HKj9eNJVFdpZHtRW5Nua69mc4daU5NgQZ1fhb5TrdCHR8MOws296ffC8/Ru/ MD/+L9eP/8zwxGNmJ35p/eITDi897fLys26vHLF96VmHt17wP/dBtqd5X1WK YrBuVsawCZBkD5tM9FY0FUSASsAm2RyHqky/xvyQnCjn/Fg3iptMi+oopwsw cnduAGACPAGkAEwALCPdpU3FMVnRrmATUImn1flQtxv1BRzVSDNRCfnfWTZh wWRtSgCR5YSd/zFsoosnCzI+yyaC5oL6gliwSXaMF9jEz/4a2KQ4JUjYWjTR 3wD6mNJW6KJ6XGzEBLSiGGoZ668HmABPcA7AZFrKm5J0gkrGhE19bSU1hXEh njftTM5cO/Pb8yff+OL3L3387rGT7zx/8rcvfPr7F099+OrZj9+8cuZ9B3O9 qCDHspzYhrJ0bn1BT2v5YHfDqLAdmhjsfkRDXRNDPFCJXNwJTQx1EJtA+8GE jZ7sCZ0oRwRTEuBJLx5wcrhnaqRncog3Jmzu7yirL0pIDHUKcTdxt7wIMLG6 +rGNwac+tvoRnjcBJgWJ/ro9Tf4mm+CQLdUFVedHN5Ul8ZvzRbzywa6KnpaC rsZcHPa2FgraizHg1mW1VKbWlyRU5UeVZoXnp4XkpQZnJvglcdyh5CgP7EN9 LH2cDQEmNw0+vaH3AQHLlYu/0zv7rv759430PzK7/imgz9LwC5wAhHGx1HO3 uQK5WV12t7rsZqfv4Wjg7WJI8nUz9vcwDfS6GexjgfU/MISiHuSgp9QvQgOW YnTjKRRSYR367CHG8Vp7y6M04Z0W7wOW0fXFUOSFoIZIh0IzmUn+QA9W2SmB EO6ekegHpSf4UvgGJydFeSdGeSdhqRbtkxzjmxLjBwFAUmKZAWaSo32Tophb o0NcEzl4DQHpCYG5aeElubEglKbqbKDB6GC7FkmkIJRVzejW8vjWyvjG0uia 1vPCZnZRQxaqEjyn7FdN9CwpRMvKoYVJ0cxYn3K4a1LciV9OgMn4YAexybiY KxG1ifubiU1EPfXC7lrgiYBXDXrCU3Obilrr8hqrsqqKk0vz4vCqCjPDmSpq xfEN5SlNVWktVTs1uxhffEkypXV11+UKmoq6G3J/gE1YMOE35bFssjorZssg /zCb6PpN9hjkSasP+05KVjVSEvju1qqC8OTLWxqAyb3Nmc1FBYEJGARssqga JacJhDFmACYz8iFtIT7R9Pgg4YlydEA9IcainaiEAg0EFAwXrM4QfdxbnQGe AFWWpqQELHeWVZj/ckNDJ7AliNmwCyEDZWGRL556xN/VlvZiRaiyNiOH1mcn ddup3F6ZwSuh4sPf3Fn96tayblCGbCysq4WtDIYxTqBYCQa4I8AEj4CXJBP3 VuVn+Dhan/v4/ReffezlIwCTX7x85GevHP3Z8af/1ezaZ8FeFinRHiXZkUX4 ZkgJobhJKsczPcYrK84nO843P8GvNC2kKju8oSC6ozy5qzq9szK1tTSpuSSx sSi+Lj+mBoSbHVmZFYGvenx94WQoF4wf7VmSGtxQksqtzR/gVrNsMiHqYAe6 bCLtq2OpRLeA8EEmlEfYZA+esAEUaELUuL9O14FsohA16URGmnSTuHTZRMsj jXIhVM/GTcAmh174w+1wO9z+5qYU1fY3Z/U2pAsaMlg26alO7ql+6DQR1KTu 6kfhSVdNUHdNELfMty7TsSTGrDjUsCTUsCzAoMRbv8DxbLrZyZhLv/E7eczx 7V8YnPiZ4Uu/MH/pceuXnrR78Smnl591ffWI41vHHN4+7n/hj3l+1gN1GQpx vXriIZtsKnvXJ/nLMu7iWPt4d1lNVlCcnwnYpDDerakgtLkwrDDeoyjBsy47 RNiYqR5qWJvsWld0s2yC/S21AGCC+UFuYU1ueFqEY6SXCcCEjPAdlUlzY+1g EyrJRQWE2eAIhUuITYhH2ESvH3CaHIgnZIoHnuDbu6chtyIzHJcnLL/BJlCY uykOH7LJcBtFTwhPSJODzfSvM1xBACagFdUoj+nVONwBMOE3F+YmBXrZX6Nw ycVP3zrz4auf/vY42OSz90989N6xP77z3IfvPn/qw9eunf+DtfFZH2fjrMTg oswo4AmvsVjYWTvS1zLAqxsf4MlEXTrqlA0CSbi7YtiEJB3gsmDCJnSxbKKL J4rh/inJwKS4Tz7UMyURzIwJ5+WDiwqRSsoXcSurcmOSwlxczS/evPShpf5J Z9OzVKELHwgu67i4/3g2AY9UZEeCTSpzOLUFsQATbTXXcjG/aqi7cqCzTMgt xR6aGGyeFLdOSTqmpVzslSPt2E+I2+T4AQ23Y0AFslTj3VJh43Bf3SC/ur+z vLe9hErRFudFpSf5AwQCPM1c7fQtjb4w0T957pM3oYufvEXS+/TXlz97+8rZ 965e+J2B3h8Mr3xofPXkzRufWRqfsr15zt7iAmRnfh57J+tLbvZXfVyNgrzN yYYPKiFyYS35FN0geKF4DeiGnPvELzgfM1R5jA15sAXHsGfrIbM3sZXHWELB HiSSkxqUmxYMFWSGFedEluRyirIjCrPCIczkpIYBNPIzIqGi7Gis7aHi7JiC DE5BJqcwKyovPSI7JRSnAUmykkOgzKRgzOBeEJglLS4gJ4VxoAANKgoTASxV JQmNVWkdjbk9XKYHigwUP8FfX5Rur8rubEzeXpcDWxbVg0zXGFn/3LhgWsJX iHlYwk0MdjwEZ23QBNQzJGgS8uuG+5uHtYRCrhOwCUVP2urza0pT8ex4eUCn hEivJI5HSoxnbkpQS3UGftYybYOJgc6Krsb81or0ptIU4Am3Oqu3sYAtILyH TXSDJgAThk16amRDrbPyXmITqoF8MJvMPhI0AZiQF35jp83iQ60dxCbrC2Ob SxO315T3NtX3t2bvbqhvrzFGeGAIBUcIT8Ap5D3RDZoAT1SyQZVsiKInFDdZ VI2DKahULyVfYVUPFvjT3dW/3Fv7092Vb7YXASBb84pV9fj2gvLuihq0AhG2 gFPWtRlWlMRFnVNYWz3GePCHaV1rwJn5LzcWoAdaI/zdlVnqXUItVNge9NtL aupZTx3k9yMJhWNYKiFIwTkAE3LlU4dHCLeCwnra69Jjw60N9U998M4bx556 /dgTb7zwxCtHf/7qcz8Hm+BLMtTHqigzHLhaXRRflR9XkRtTmskpzYwsz+FU 58fWFsTXF8S1liW3liV2VKT01GVB/NpMzDQVJ9QXxIJNsG8ojAOntFekYo8x sAV73IRzWsozOusKRJ2AiFYgCcVKaMCaTbRBkxZJb90eswnrN9mnHTY5EE90 x7KBBgqasAWBdce6UuwDkwPZRIsnO2yyI63f5NALf7gdbofb39ymBusHWnP6 GjMEjRl9dWncsjiwSS9wo5aBkf7aNB19L5vsxZPGsP6WCH5tUH22YwHHMCfo SkHItcqQG+UB10o99Yqcz2ZbfBxz+S2fk0cMX/ml8auPm7/6pPUrT9m/8ozj K886v/orj9++4vb71yKMztTEeY13lcyMtWqUPDKbAEx22aQTbDLWVVKVEQAw AZ6UJnt1lEW3lUSWJnmXp/g25UeImrOJTcgFf2dWCN2e6ccYM6AbQUtOaVpA fKBVkPM1F7NTPrZ6GRznvuZszXgHFQ1eVnQDT9ame3XzuFg20fWYsNzBWt11 dWD0hCprqUc6JgeauuuyS9NCsqI9E4Md/OyvQSGuxgWJ/oLmAtxKBhO1tqki IIXamlB9e+a/WEMtlOuFPcBEKmjAIqq5IjU1ysPDVp/ptH7+d9fO/lbvs19/ 8YeXmIjJO89//rsXv/jjK6c/eu3zD14+/dHruOw6WlziBDqkxvjlJIeW58W3 VucIOqql/SCOTrDJo+KOi7iywQ4d7bDJfhc8YORA14lM1DMpFkwM9iqGBdPS gWlJ/5xscEszMS8Xibtq6goTE0Nd7Y3OmF8+aXvjM38Hg4Qg+8KkgOocDi7u NblRP55NwCNUpKsmP6a1MpVpz80tHRM2SAV12BOMKIbbACYyXIVFTTQDqfCZ j3cppZ0QIQkroApm5ib75pX9GoUAMyAX5XjXtJzpbDgubhsbapEIG4Ew4t7a 0YEmhbh9Wsowo0zYNNJd01SVXpoXlRzjCaAAhhjpf3Tl3G9PnXzt9Mevn/vs rYunfoNDIpfrlz7AreAXCIc0Njf83MLoCyuT0zZmZ0E0xDKeTtd93XYyyhi3 iw68gEowSYyDecIWisiwovYrBCkgGjyOn7sJ5YARsLBxFio+hkNyvuzGVoLB HWANEAe4gwbYQ2CTnUhEVlRxTkxDZSapqTq7uSYHe3ZQV54OJMGZoBuwTE5q cF56CNgHEFSQCfAJxSHhUlo8k0uWnxmGj7GyKK6uMLm5NINXXzjArcbiTTHM mx7tGRtoG9PmdMklXRQ6kYJQtHETCp3QABob6hjV3tTVWlpblga8So7xjQp2 iAqyT4hwrSyIFfIqxgaaJwZbh7qru5sKWsrT6osSodbyNCan6yA22ZPNRWwi 1mETtj/L97DJ8J6gCcVNfjSbjG8ty8EmdzdUBCbbK0xHeGAIyyAQRU/IaUIi v8ns5Ih6grHDQxhQQhfldJGJg1AC6/zv7qz85f4a9Oe7q8ATip6w4RIQCplN mPkVNfnQ2SYpeBzWqM72eQQEbS0w9EE9HHcYRJvBdWd5BpBCnVO+vbUC3dPW +CLQwB5j3dwwspOQ8Lybi9O4FecQWNH5RFgY41b5iKCzqZLj72lw7vOP3nnt 9WNPvXkcePL4Gy88/vqxX7776rM39D7kBNrXgCC05aabmPrSaY1lqVBLZTq3 Nru7IV/QUtjfUtjXlNvbmNPXkAM2wb6tPAUAAvSAwCMQgyGlSfg2q8qOrM2L hohZWiqYX+MD2eTRoEnzgV54XULZk9O1J3RyoN+E9b9/X91gVsrB5v1scqDf RCHayekiNpkQ1k4Ia0h/74XP4Xa4HW7/0Nv0UIOoLVfQlNnflCmoTyc2AZj0 1zE8IqxLZ6VFlVQilN3BwxlQCUsoIm7UcFesqCW8tdC1OM44P1S/KOxaWZB+ id+lIo9zha5n8u0/S7jxjv/nzxm/8YTx60+Yv/qE9WtPO77xK6c3jjq9fsTl vZf8Pns3z8NcVJEyP9y8IOcuKHircoZNNpRs3KRzgWGT0qr0gDg/U6gs1aer Kp5XFVee4lOZ7t9axBlszVEPMXW6Nqe1fpPZfoDJtlqAMYBlbqS5uSQ2J9Y9 1t8i0Enf2eyLQKerFZnBQ51FYBNtQlf3ipIpILyhEhCMUB4XKyrMRbW5KBSC gWasc78otkJswvriQSX46lYNt08ONHbVZpWkBqeEOXO8Lfzsr/o7XAt0up4b 593XlI9zKIML6AEwwSWD+ioKO0oBJgCWufFujYz//7L3nl9xnXm+7z9wZ627 zr1zz+QOdtuWZdmSlYVAiCQQGaGEAggBApFzzjlThKJyzjnnAoqclHNwaLfb naanZ6Z78pyZ+931SNsYyT0957zofqG9vutZv/3Url0Fu6j9fPglPLrsUczZ pQYpgzPa1Fh2KSP5KMDkfFJISvTHSZG740J3RgBG9nznyId/cXjXn+/b+SdH 9nwHbBITuvNcclhxzqmO+nzmcAuX0cGf6FLyRy0qrkMn9JplAQfwZKu2sYl6 MSgYMw4NFKw2rKdJJOhG+ZpNFrwUm6zPelb9znmnEVr12+4u+754uPmTZ7ee 315YdmuUnMG2yqsZCSHnTx7OOxvZVJwx0FiA+7hovBW39a/ZhFDJYB3RVjCh +5vwRpsg4ImK22dV4r7PmrUKl72KgFMyZxcvuKQLbgpJwCY3Ka+TjnhMljwK 4kYBg0A3l8wEQ7CwpDuzby5QjfzW5vSw7607VwL6W2t26MayhRLVG9EKrln2 a0hzPaqTxZxxc9awOqdfmzfeWrU/uu375NHCZ0+WPn28+PTe7N0N1/Ks1mni q0TD7PGWkZ4KAELOpTgwyMXTxwEjZ5JDQCsQyCVo7AetpCcePp10JCVuPyaJ YJNdPASKyTh1DE/PvnAC/IITkvgxItgEZ0jyC3GyEJCBQeLHmqqzSLoKcawE o8hIu8mrrXW5LbU5DZVZ7Q3XqSCuNiqIi3hGBrsoQulrrxjorAS2gDVIVa7R vjriLgGngFkww2f2YOROdvGmumGLOQMK4ahSNKYQDkl5/WJOL6kzTAwZf0DE 7uVOthPHzeQw5cGZ6mtgdFYPtJT1NhR31OQ3lV+tLcnsbioe6qzCi3ImOkWs fgqIeEMkF8aoYll1PKdJ5A5mx/vs8mALUSVsPIp3gh+htfZFqef+9mLWWJN4 ukslGNSIhmXsXgGjjfyTXDHdaxCMvDbf5LVs4vmv2ITgyXY2CYLJ87tzT4Lz XyebbInpolq63IHmiJ7eW/jk4fLnT9bAJp8/2fj00drzBwCKpfub83fWZm+t AD0AHW5wCmGTextUOjwd4nV3PXBjybcWcG0sULWwwAsQncdBIruIP+JHT259 9ezOTz+9D0j5+WcPvnp+F0gCgU2+eHyTApMnt37yyb2ffXr/i2BPE/ACIZGt MV0Edui8+Ec3qG4pVKuU1dm7K5TurVGZ7w82Fp7fXf/i0a2vnt//xeeP/+ZH z34SxAri+KCCwYKBW6Qo8TYRHwodNkYOxsthpFrPf/kMxvKMXSWaLrxyPvLQ nj3v/OU7f/E/3v/eH4NKdn7v/937/p8nRu3PvXCyp7lINN0lYfco+QNyTj+R gksVlDYATJRMt5YNNrHJGVbZmEEwYBIN2aSjGm5v0JnSrZimIrtIzRMAi3SS cpdAwX+5tOAhJXfIIJl064WETUjyO+UKDIr2mwTZRPxqIrzXyIW2tTjxm3lb w7oInmyr07Xooup0BfNNgB5UHWCSb0JmSF78Fr2eTbZlxL90o0AKzFNgYhct 2AXzNt4bNnmzvdnebP/ltuoSOpUjYBOHbMguGaCcJsJeymmyxW9CswlG7JJ5 MuMUD0AwzNwujC7JILSg67zpGFk1dBunCjmt6YyquOGyqMGisPGKqKnq6PHy 4325+6tPfT8n4v8++/4fnXv/j86893+d3vFH5z/6fy7s/dOMj/80L2JH++Vo dX/FTSPr0zn1ZwHtJ3Oa55tAA9OjFcPTdfOzDcuDZf3NGUXAzJruLWkrO9tS cpozUG6TDTgUWOQXTPVck05We3XDm37h/SXVs03jk3Xj53cc0Cc3bM82rLdm lW71mIzZONRytbYg+dr5Y1dOHS7LPskfqV12iW7Oqmh/x5N1x7NN97NN59MN B4njIiQSTGa30enw2ypxbRMeIscQm7hXYG/4lAs2oUM5Pt1X2VB4pv766dKs +Kvpx/LORhRdih1tK3SqJnDAul+5MaNa9SlwHwn+Ewx3GdGtgOn2vPnGrGHN q13xaJZBBw6FjN3TXJF55Uzk5VPhmenHgSfpcQfAJslRe2KOvAcqObjzT4/u /qvwfd+PPLIz4vD7GBMi92WeOYHl3EB7BXu0TTDZLeMM6qWTdi3Pa5bM2vGi WmjRpSNacuu3ip7HMVjgEc061bNODdGcSxdkE9O8x7zgtRDNefTzXsOCF8BC 9UBZD1jurLh++Gjl84dLAYecOVifcz4mNfrjC0lHawrODrYUcUeatYJhnXBE yennjjSxButf1Wt7L453V7CH6kWTbTJWl3S606IYx+074BYF3EJo0SdZnpGt zCiW/Yolnxzjgkc+75Yt+ajOIIte1aJXueilJjGzNqe9iSu4Znuw6cR4a9m8 uWDA5MqMetmvurGov7lkoHVr2YQDSCNyCmFm9aszlDYCJtKfnXR4x0r1xqKZ 6j8S7GlIRCCImgcHrTse3vY9vUf1Frx/03Njxbq+YFrwqT1WkU4+Lub0sBjN g11ldeWXgRJAj2tZCcAQwEh64hFQybnU0FMJhwmtkBAygi0J0XtORn4EwUiM +RgG5sE4Z1OO4rlZ56OvZMRkX4gpyk2pLAKknA8mwpNyx0GVXKory6otzaq4 fqG6+HJNyZWGitymqmsYa0uz68quwobqy3Pa64taagq6mkoHOqq7m8v62sr7 2stJvgmwZbib8q2M9dUDXkhIGK3xQdBHM/iFxWiHwC+gDMF0LxAGo5Q3BIRR iRla2aRZMqnhDEun+kTj3ayB5rHOakZ3LXe0nTvWwR3v5E92C6d6RMxeiDna itPitTCCj8BQ4Ca8DZwcMzdXnLdWXfg0AmE6mvKry6gIuo7Ga1TqTWcpa7Rp rK+K0V/NHKzjjjVTxYTZVNbJa6mEIMk2OQ1cmk0+fTD/2cMFkAhJPKFFGmjS dQCeBNtKPnsQIKk3mKHrAOAAPEqzSbC9S4Do+YOlTx+tfPZ4FeOz+8tP7y09 vQsWWCCOiTtrcyAOCAZEiuiSfiWkjBWpqUv6m8Cgct5vr5Ae7lv9EeAIkuGO 8atPH/z080dY+QMBiCMDBhCARFj98CWYQHSZX5pHSBIKsSHSd574aEjoF+m3 AlzCs4AhxNOBR0ETC17qK2XJbwNJkVrHOIZklNCBXrSjhOSY4J2QMsI4Hm8e YILD8LM7jfKp4c7MjMTwkA8+ePv/e++7/2PPjj+Lj9xXmnumrTZvoL1serCR O0YVQ5CzevEtJJ7qxGcArKrkDWiEw6TLrUU5BZnkEwYpAzNa0QgeUrC6FNMd kGyqTTzeLGI0YZRMAEZaMYORnlRxh4zSKbAJAIR4SWYsMthbI7sw6TdLCZts dZrQYEJEdiG/STBjFm0p3kWVFH4ZxyVYcAoXXSKi5WAaCGnaDq37ZBt+Oe6G S07K2UHHYsFedopfLc/1LT4U2bpXBUgBmEDLLjHYhKSc/L4XPm+2N9ub7Q96 W3WJSEyXXTYINtFzOswkoEv4dUAXYZPXGiARwiYWXjfZdUuHVs19dzyMNWPP CzappthkuCR8vDJqsipqrPRYX96B5gs7KlL+quT4966H/lXOgT+9/PEfX4D2 /s+L+/6kKmX/VMVZH6/jkUvwWUD1aUD9fFb16S3bs03z0w3T8xsWGPeXNOte kU8/PtFZ0Fqa3lV1XjpR79Ux3JpRZu+1ye5cyUSlRze04ePfW1Q82zQ83aDY 5LPb9qcb5idrppuzco+WwRkq76q5UJWXADaBGgrTlex2fCHfnFPfmtOCHcAd YJPHa45tye+EOLZNEjb5ts4mZCTIEwzoovwpm34V0MOuYIBNaq6lXb8QAzA5 feLjcyf3XzkV1lt31SYfo/7p5JYuuiQv/8clWXJT3naAyZ0FCwgFeLI5Y1j3 6UAoUlb3cEdpc0VWU/nlhtJLZblpWOTnZpw4m3A4JuS9sI+/e2zv9yIP/iDq 8DuRR96PCf0wMWr/hbTI0ryz3U3Fk4NNWL9J2QNq4ZhJMe3UC3wWKdhkG5Is ewxE/ydsMu8zzHv18x6qLeOiX7/koxJYsHSftUkl08CrK8CriymhhZcTeuqv cYabsAi0KqZM0nEQimiigz3U8DuyyWRvFZ0LDxuPDrcVM4er2Ixa0XSzUtBt UAzZtZMuA8tr5szYBQGndN4lW6RgRLXi1wA6QCWLHsUyYZNF091V650Vy81F 48a8Htqc168HdGuzmrU59XpAszmvBaTcWjbiGBy5OqubdynmHNIA1dxZueLX 3ViwkHbt94K91AmhQKSrINal9zdcBF6goAvGemvVTjqzbyyZKYfLmp2kgW+C X1asdzacpA066TZyd8N1m3qidW3BOOOUuS1Ci3ZaJRkRsLqYY02MwdqetiKs t5uqr1QWnS/MScm5dBIYcvls5IX0cIBJeuLhtPiD4BQAS2LMntST+4EzmEk9 efB00tGMU8cvnY7KSMMYk50Rn3MxqeDKqeLcM4VXzxTlnC3JO196LQMjVJx7 riz/QsX1SyAUoAogBdgChGmrK2ivv95WXwCjtTa/uTqvsTKHpMlTiR6NhRBJ qB/sqhroqKQopr0CNklpIZoYaqLyWUZaiPNFMtEtGGmf7m+a7Kkf66gepvri VQnGgaL9Cv6IRsTQSSbwebZpuBYNx6Rmk5JcGI0qFkYADmAEyLMaMK8vWG8s O9bmLSP9VfVVL8o4U/k7ZZd6Wwu7mwowjnaVTw/VCyfbFew+Df/1NYRfyyZu Ex+0C/AEgHxyPwABRojxnGo3SVEJ0b0NF12FDAACMPnk0QIIBTYmyYUmNQEA LC97vlAxXY/vzIFNPnu8EqSSxaf3Fp/cXXxyZ/HxbYDJ1/RBIIVkfGDZT/CE pgAs2gECRMRvQkr1viqs7YkzhfKhBJf9hDUIBeCFQDf4wzco+Ba1yGlUBNzG RZ8Vr0WX8KXxZGu9XxyA5xL3CoEpTOJd4SkkTwQvh/cGmrDppB4LvmoM4BTA FN4tqcRF8IfywgQ72tMZ9yT3hNQZw8GYB8hgF0/XSNgjPU2FueeyLiTmXU6t Ls7Ex5LRV8+f6BJMdYmne4IukqA4fZKpLn6waJtkulvO6VPxB3XiUbCJTT0N WVVM4Al2gSeYV3F6lKxOGk8Ij2xFEmIIxxqVnEGDZNKlExAeCfYxkWMEkpCS wsATMAuJ6XrZvkRIh3K9NutkxiKatYi3NIUXbsk6ERA8ISLuDAIgpAUJtGDn E23Fk2Wn5LVssq1yVzD5XUb7TYIHS3FOnAon/H0vfN5sb7Y32x/0RvJN6Jgu HbvdxO8Ossk3wOTbRNiEOFNgeGTDPsXoTefowxnmuqlXP1HAak5jVMWCTRgV UZPVMYRNhq4f6c3b23V1d8/5g62n9tQn7qyIfbco6q2iqLfLYncMF8Qbh0pu myY/D8i/WFR9vqj6bEH56U3Lsw0j9NlNK/RoWXvTL3EoBoYas1qK0wYbMg38 joB5yqMZ4Q4WTPfmyiYrfbrBTT//4bLys1umZxv6z25ZPtk0P17RPVzWbHiF TsXgZE9hW8XZytx4gMn1ixHtFRl6Qe+tgPpWQAM2AU0EU0uoVu/B5u9f9zEh ySM0m2xtufhtRbpebXFCCGXNI581cXX8vtG2wqbic3lnIzISDl47F1lXkM4Z rPHqpvGtHrDhzsLH3WTZI9ucVd+Y027MaAibYASe3JyjBEJZ8WkWXIpZm2TG KvYY+QYpQzTV2V5ztfr62eLs5PxLJ7PPRGUkHwWqZKRGXD4dk5+ZUluS2d9a Nj3SCjBRCUa14nGjnImFnNso8ltlcw7lvFPzba6TrWDy32KTBZ8xEGSTRZ+B ylZ2qrxmic8isWnYWAOMdJb3NOZ31+eNtJfyRpuxAgSYePQ8m5KpF41Kmd2/ O5tgl9QQZvbXDLYUtpRfzkwLOx2351zivsunjlw9d+zaxaji7PiKvJSG0vMt lZe66nL6mwsGWwuH20sY3ZXs4Xr2cAN3tFE40SpjdWuFQyYZw6GZ9pp4WBgs uuVLwJZg/MPdFfO9VfO9lRe6CzZZttxetKzP4PejCNhlAbt8ya1enzHcCzpN sEalGqyDKTZc0FOsLbEoDdIKiRm7SfdqXw+2aw8SCmzACF2xCmtU0gCddELE CEihGiNuUitbLFmxoMWy9tPHixipmld3ZkgxXpwK8DLvVXmsIqsOq/RJpXhY wusTc3r4zA72RCtrvGWwq7yntailNqei8Fzu5YTsjLj8KylXzp/MPBt3LTO1 8OrpgitQOhZyl8/EnU+NOpsccS4lMiMt+sKpGIzpCccwc/VCUs7FZBwDwQbR 5F1OLryaXpJ3tiz/PHG7VBVdwlhfnt1UldtScw3M0lqXT+AFRnvDdUIrGDsa KHjpbCrqbqaqgfV3VFAp9q0Vo22VI22VQy3lg81lfY3FXXXX+5tLh9oqhruq x/vqmUPN7NE2LqNDwh2U8obkghHCI1rZJKkerFcw+cweAAsOYDHaJ4ebm+uu 5l9NzrkUR/q/FOWkNFQEW9VUZ/c1Xx/vreIxWuTs3v8Wmzh07FmHFJcVEEou 98MbHlqESTHCfhIsm0yggxY4BRcOV3brxSUVzEiZZVAJien65OESwCRY7gya B5g8ugUSmSP+EbLsJyt/utU7kARr9a1UQrMJSVenk0ToKCySdUICscALxG+C XSpn5P4G8AQjjvTbdWO9LW21JX2tNayxHjF7FJACZsFL0wSxFU8IIhGMwki8 PJjBCLIgzeVhrM+7HQY5TgUwWZ1zkqQYPJ2qQhwM3yKVxIjzhfzUhFkgkvZC x5LhiWATYI5SOMWb6uNO9QqnB2S84IdEMg621YqhMY1wBFILhuTsPgGjjTvW zB9vI64TTBK/CagEbEJcJzSbqLm9KjblOgGhEEiRM9slEy2ERyBiCEYbFJwB mk1IEBdxoNBsgpGwyZxNTLorkrAugiG034TuwEjpJZvQ7eBfRnMJt4IJpZcY slUzJpbfOD1rZgesXJpQSNGt13Y2oVuZkCCuFZccePISTHCMlPSFfxPT9WZ7 s73Zfvu27pG41WN2+ZBDTsV0ETaxifps38w3IbFbtEHbbukQYRPswgaYzKrH 7/kmnwTYYBP1aO5UQ/Jo5Ymh0sjxyuiJKopNxsuPjxaHjhQfGSsJGc8LH8k+ OpQV0nfpcEfG/o6Mg71ZYfzG8+7pmruW8eczgs/mpT9cUnyxovxkXf90RfNk WQ3j0w3D42XVnRmxVdzZV3O+tThlsj3HpehfsU27FH3ikSJ2b46UUepW9qw6 p+7OiT7d0D1bU3+2aXi+pnuyosZJNlw8q6hrrONac2l6Rc7JvHNhhZcie+uy TJKBOwvaOws6kjwS5BEbtDXNhNaTdfurYV1bmzNua8i4rYYwwAQEdGNGDa17 FT49C7ewxqKztfmnJrpKQSvzVgEJ+sLdZN4hWvHIbsxpbi/oby9QbU0IlQQF www2wbjq127MGSAYSx4VCMWuYeHWKWV188dbJ/trsLICqnTW5bbWXGuvK+ht KR0P/m9Qzh0CmJgU0xYVG2DiMggBCzM2+awd62o1NO/QEBEMeRVM/jf9Jt5g nrJD6bNIA06Fy8A3K6Yk0z0Kbr8aCz/RqEE8ZldNu7Qcn1EAAzOy6Z7fnU3o Ol2TvVUDzdfBJmfiDsSHvZsY/l7S8feTwnckHHsvMfz9lIhdUGL4zqTwXamR u1MjP0qJ2H0qeh8MKD1mb0bC4ez044UX48qvJpdlJ9fkn24qudBWmdldmzPc WjTZUylkNEkmWxWsDi2/zywZtinGneopn57nN/BnTcIFm2zdq70zj4+K6+Gm G0tQYMiDTTe9LiUrVcIpZJkKQlmbN24smm+u2kgmC8AE61KqM3uwLTtZkZLi ujdWrDgSx5OnEG8LOZ5uof7wlu/+DQ8hHQAOIRrs4uC7my7q4GCkEOn/jpPf 3XBvLFpnXUqNdHxqpJnR38AZ75JyR8xqXsBtuLHsubHqXws45z0mt1lmUnEV AoaA2c8caR/srOloKC4vuAgeuXI+4XRieEpsyMmI/XHH952M2JsYfSAl9nDa yZD0hNBzKccvnIq6mB4NXTodk3k2NutcHPjl6oUEgjDlBRk1JZk1pZmAl8rC i7Dryq6AYhorc0iLeYplyrI7K/PaK/Nay3Og5rLs2sJLLRU5rZW5LdV5HfXX e5qxMC6DBjoqBzorSbY+7Yih8mLayjsbi4a7a1pqr5VfzyjNP3flYmxi3L74 qN2nk6jQuKyzUSW5aaSZZheQubOMPdIkYXb/t2K6tJJRGeiP1S3j9qlFw2bV lNciXPBQ0YMb80YwKanf9emD+SdbkIQWieCiCHTzRUzXN/wmt/0Pbr4QwOT5 AwpPntxdAJg8vBmA7m/Ok2U/cYKQVTrtQ8HaHryABT+J49pc9NJN4WlSIO1C tkIKIQsgAKjk5188ATiQjiHgiBmH3qoVm9VCDqOvqfJ60dWMqsLszobywY56 hWASXwU4hsAC7YUhvEMAirwEDLyfRZ+VigJ1GfFOSIQYnrUy67DrpS6TAl8s eLd4e8QzQsCElOrC2yPN30nvRfptE3cMiRMjApuAodxmlVHNM2v5Vq1AL2dR 9CqdAJuohSMqwbA6KBV/UDrdIxynco7AJlS/G3avVjRikDIIm0BmxSRszABM 8JCa00N4hOAJsWkwIVRCpGD3k1x4UkOY5JtAJKaLdDkhgV4BuwSgsbVo8Law LhpPqICuYEzXS9fJi2STIKHwIeI9gQI2HgAEmrNwaPkMTK9+ahueUKWAX4cn 28AEd65VtwJsQgK6Zk1cr446GznP73vh82Z7s73Z/qC3G365TzfhVI64FCMO 6aCe00HYxC7aDibERUIySmjbIxumH4U9o2LM65iP5ljPF3mrhm754JXx2gSw CfGbjJVHMsqPM8rCx4pDR4tDGKVHmYXHJ/OPjV8LG8sLG8oNHcwNG82PYNem afpzPLzaRVXnpmnonmvqsZ/7+Ybu+Yrq6bLi03XN55v656vqhwGJhd/aV3W6 uyxVOFC4aBy74WK7Zd2SkcLpzix+/zUTr96j6JzVDazZp+74+DgeehSQPl5Q rNvZZn5bb92l2oKksuxYsAnG8c5Cj27y7qLu3qJ+Swt4ynVC1+YCjxA93XAQ Y2sx4W9jE7p+F40kJF0FTyGTMIAhdgWjt+5qZ1Umblg2+VjAwseX/JyZt+iS rPuVNwPaO4sGCGxC1RCm3CVGiIAJYZP1Wf2NeRO0NqMjxYQXXAqPkW9RTil5 AzwGhScQZ7R5crCJOdTMGWsXMXsVvGGteFwvnQSVOHR8p17gNorAJn6rjOrD uIVNaAx5FUzmqUT4/w6bQB59wKOdc6sDLvW8Sz1jk4FNnDquST6BN2xTTVvk k24dF1TiNfD9JqFDzQKqyFm9rMGG6YG6V/QaNiGJ8NyRxomeyv6mArDJ6dh9 ieCRoBLC3o0PfSc+9N2EsB1xIe9EH/h+5L7vRR94K+bg2zEH3zlx6N3Yw++e OPQDKO7Iu4lhO9Mid5+J3Ycx5fiHyeG7ko59gBG76dEfn43de/7k/otJh7PS QnPPHM8/H12QcSL/fGzRpYSKq2kNhRmdlTmDjUUjLaUjXRUTA7XssWbeRJtg qkPM7pbz+7FSdZv4AZd8dVZ3Y9EMNiF5B1h20p0+yH/OMYMFKnaJK4TE+YA1 Npcs6wsmCAYV7hXMVcE8uIN4VYirBbvEhkHFiS2aN5YoUccHmQVQQ/lr1h3B HoiOgEdj0fIMCvaMQ/3g5twPn9z46y+f/P3PP/+nX331b7/5OcZ/+OWX//ir H/7ml5/93c+f/+3Pnv3qJ09+8aMHX31254tPbn3ycO3xvaXNRafLJOVO9IBZ elpKsf6vLrlceu3c9exTuZeSACPAE0AKUCX5xKH4yH1xxz8+cWx3atyRU/FH IcyfSTqWkRaJIzFCAJnLZ06AX3IuJl45f/L6haTSrFMlWacKL6Vcv5icfzEp 59zJvIyE/EvJ16+kFeecLrt2rgpcU3y5tiSztjSLkA6FPCUvDEBQUc7p4twz BVfSQEZ4VxfORCTF7UuM+fhUwqEzySEXToUXZCVWXj9bV3qxozZnqL2EOVgn nGjHR1Enen0W/KtS8Pqnhuvb63LBOFWF5+rLLrXV5vS3FQ+0lwx3lTP6qicH 6yB8NliMZsF0p0I4aFIzSf3k1YABXElYkqLONQeNJ8Sl8ujOzJO7gaf35iHC Jp88XH56D0CBZfnM3XU/Wfk/flnLl/gs6BAvkALd0ARrdVDJkt+GFTvQAGv4 rdkoNKRAhAVIKgoMckKAgE0nEU4PM0e6BjrqACbNVYVl1y5XF11tqS7qqC/D Q7NOA6iHnGpr5S6IoBCJxcI7wXeFx6J2GGQ2nRTvjQSS4YXAI6AVfKXgPZOk mK1lxOjUFcIgEDkt8RPhh8XPhR8QX0rkJCApgAleSK/kmDQ8h0Fs1QksWq5Z zdZJJlSCEeCJVgTQGFVw+8VTXcLxdsFEO2ETOaePBHSRfBOwydaUk2BMVzeJ 5gKSQCSmi7hLxOPNMPgj9RAMOav/1RrCsIEn2/JNZiwvGi9uTTZ5lU0ol4pJ CG3pF0/lm8xYcAB3xsKBZq3cF4JtZs8Fx62aMbEwOW/jAShehnXR/UokK680 YdzmN4Fg+w1sk3hIzenS8Xvcmgkgz+974fNme7O92f6gtzsB9YyB6dEwPKox p2yIam4i6AmyyTfAhHaRkIwSwiYwaDahnSZLRtazRd6nKwKwibQ/k1ETz6iK Ha2Imaw+MVYeMVYWzig9Nkb5TULGSkJYxeHMwrDxayEjuUdGrh0dyT82WhA+ WhLNrEnkt52X913RjFyzTJe7hQ1r1skVy8SabeqOl/coIHkwK7rl5uim6wAm vRWnFIyKTcf0XR/fI++RjRWxujK5vVdVk+UaZqVyokw7XWXkNriknV5F74x6 YF4/gsOU41VtFWcqc+NKr5zIzwivLUjmj9bii5e0NaHbKT5csT5Zd9J1uray CcGTbSknr43pohNMQCKETYh9Y0Z9c1aDZ+EkmHSqJpi9FQONeYLRBoNwwKdn rXsVeO6NOQ3A5Na8jghscnfJTDJNaDa5MUsZQJKNOQPYZDNghEGaMM7ZpXYN C/dQzmgTJJrqVHD7uIwOwWS3hNUPMNGIGAATo5xJwMRlEIJNPCZxMM5K+qrT hGaTrWDy32QTI2GTOZdm1qUKuFQLbg3AxGMSztqkkNvAc2k5ZtkEbqyzFjHw BAaJ6VJy+tlDvyubMPtrpvqqSbLJYEthe9WVc/EH40N+cPLwWyePvJ0Q8oPE 0HeSQnckhu5IDns/Kez9+CPvxh58+8SBt6L3vRX58fdOHqZ2o/d9L2rvd6GY A2/FHfpBUtjOpND3oVSAyfEPU8J3JR7dcTp6z+mo3aciPkw5tjPx6HvxR96J O/xO4tGdyaG7EkLeP3l4R0LIBylhu6HUE/vS4g5AqbH7ofT4Q+eSj2adjbp2 Ob44J7U8/3R10fmG8sutNVT/xO6W68zRJrVk1GURzHtVy7M6rEiBKl88X/3R J2s/fLby+dNlErX19N7c123Tg+4VmlYg4kwhQWIUsGy4sMQlMyQMDKhCeU/W HJjBPEU3S861eVvwGmk3FlxfPr/zL3//k3//zc+hf/ybH//9z7/4h19+9S9/ 9/N/+/Vfg02I/ulvv/iXv//yP/7xp//5r3/9L7/+8b/++sf/8c8/x/xnj9Y9 FrlCQEVSkWAqo4pl0/OdJhEEWy9nYl4uGBGy+tjjHZPDza21+ZWFF4EJZ5PD k2IOJkTtT4w+AHIh8AJhJiX2MJQeffjsiZAzsZTSYw6nRR9KjtwPpcUcOpMY lpEacSk9Ovv8ybxLSdcyU0Af+VmpeZeTIezi/AAc8A7GzLOxIB3ixDmTFpqS cJBUD0iLP3g2+ejVjBOleadwaVqrrgy0FgHw+YxW2XQP3crkv2QTrWQEKNrf XoyLW1tyobEiE2zS1Zjf11Y00lPBHG7AozJun4I/IGb3CFndfGYnd7IdnELV Igv2lIGmx5o4E20idrdCOKSVMXTycfCL2yKc96rXF8y315z3NnH1fQ9uzjy8 NfvoduDx7YUnd6isEzoQi849J9FNJOqJ5L+TlotAACz4sXSHSO9FGk9IzS5a NFyQ7icwQBPgCIVgkjc5wBrr6WqqqCnOaSjPL827BDZprChoqSkSMIdBBKRt Cs07BByIMA98wHvAl4bPpg3Gbskx4u2RBPwvnt7B65IqxzgP3jx2id+EVAAj Pywd0IWzkZwa4ivBz4gfDecn7hiAEl4FYEK9llHqssi8VoXLLHUYhWATtXBM AyoRj+klDJ14DGwimuwAmwBMgCdiZheJ6QKDAEYImxC/CQETrWhEye4mySYA E1CJZKIFopNN6IAumk1IKWy6HTzxm5BdwiYzFpnP9KJQMDDErWdDHgPnW7qc fM0mdC48wMRn4vjNbIgQCkScJmAQgiHERULGrckmhE22tFN8DZ5s8adQdboA KWATm3zMKBowiPpcmnGvfur3vfB5s73Z3mx/0Nu9ec2cieXVjnvVDJd82Mjr sgh7beJ+u7jfQSkIJiCRl0jikg66ZUMYCaTApp0mPuVoQDu1auZ+tiL8fFW0 ZuiR9WeO1yZM1Jwcr45jNyRMVEYzyo+PQ6XHxktDx8tC2aUR08XHGNeOjOQe Grt+dKLk+Hjx8dHiiOHiiJGyE6MVsSPlJ8aqE1jN6ZyObF5XjmyoyMSq90g6 vNIul6hdNVbeVZjYV5amGa+86WTd8/L88l7dVJl4IEc2nK9nlitGizidWeyO zKHq9Om2y7yeHFF/gWKsTDZSwurIbq84W5UXX5YdW3gpsqkkXcZs2fDLqV7w lN/EHAzWsj5atRE2efRSj9fsRE/WX2ETikSM20SAhS7YdWee4hTYtwLaGzNU QTBAEE4CTrHKRodbCtrKL071lOsF/TNGzrpXSTlcFg1Aks1ZzcaMCpxyZ9F0 H4vMeXMQTEy35y0vY7oshE1uLVrurthvL1nXZ/VLHpVDx8FNE3dJ4AmRZLpb MNElYfUp+SPaYLKwYRubGIQek8hrpvBk1qqE5myQCiJulCCbaBdcX4NJwKH2 OxQQYRMsaF+KsIlx3mMidXUo+Qmb4CGqfOsc5FD6rVK/VeI1CT1GgU017TUI gCTQjFmE0aPnAVW0gmEVd+C3sAlBEvZQPZFoso070giD0VXeU5/XUJyRFr0n 4eg7BE/ij/wAdkLIOyePvBNz4PsAioQQYMW7GBNDwCk7YANGiGCDQVKOfQCE SQ7bCWOrEkLwLBzwHhgHeJIWxJbk0A8SQ3bGHngneu/bcQfeSw79KPXYntiw D6JC3oNiQt+PPfYBxojD74Tt/37Ix985vPsvj+797vFDP4g88i7GY4fejgh5 N/b4LlJEC8JSOet8dM6lOFJV+OrF2MKclPLrZ9rq84a6ywXTXUbVlMcqnvep 1hZMt9ed0M0ggxBPCuzNZcvagnE1YFhfNN9+mUEPHoE2l6jDblMBYx7wy7P7 yz/+5PYvvnz4tz97/o9/86N/+buv/ulXX/7qJ59Cv/7Fl9Bv/vrLf/rVT379 ix/95pef/8vf//h//eNP/+Mff/Zvv/nq33/zk//851/857//CoTy7//wE5zh 7rrfqhVqpUyzhuukeiDic6KE5qgWJPo5NxhW5bcrvDaZxyrD6LXJ8UGa92pX 5kybS3YIRsCjcVskIBqlaGx8sLGl5lrptXNgikvJEedPhoJKUqMOpkUdPB17 5GxCaGr0QeBJYtT+5JiDaXFHXirkdGIYdCo+ND2BUtrJkDNJx07FH6XOE0zw x3jhVGRawqGkuP2pcQfSEw6dTQ65iF91xonC7GSQY3NFZm9TwURf9TY2eS2P bJVGNCxmdY/2VDRXXaGcJjVXe5qvU/n1LYUDHSXD3eVjfVVTw/Wc8RYxp1fG H1BLRvSKCYuW5TDyXGbBol8DOAWGAEZU4hEpr1/C7QPC8KY62OMtANipkaaJ oYbxwXqQHemAyZvqkfFGNZIpg4KNPz0So/XSjzB3f3OeRDeRTBNoY8GDFTuW 6zg4yCbWRZ8VeEIcE/c2AsGoMJI+T1X6enpnjdS8ApUAdnA2nMFj0RiVAu54 //hAW1djRV1pXtm1TLBJbUluS3VRZ0O5gj+JV7m7HgyyuvWinjCdnk/eDPBh 3mP223Uuk9KqFTuNCrdZhfdPsto/ebBJUwzJlCH0QZ5OSIp4dmg2ubXih6hw teDPuOi1LPqoLyKMi0FC8Vk1HrPKqhPa9EK3SeoySRwGgU3Lw7ci2ERFRXMN aYQjQTbpDOabtHAZrSImvkV7pOxeKh0+mHJCZZpIx0ElGuEwmAXzYBMlq0vJ 6iRpJqRIFzGEY00vCYVyoMim+yi/iVYQsKteJJgE2QRIAnvFC1TRBPNNZDMW IU0lXiMXYOLSsTCzNcrrpaiYrm258C/rCfMgEtkVCPpESAWtraW6sEtKdW2t 07XoENFssi2si26/SIT717JTNmcB7whWqER4MeWCCfLO73vh82Z7s73Z/qC3 R0v6RTPboxyFHNJBgAlGsAmFJ5IBIsxALiDJKwLCOIMPYfQoRpbMnLszyh+v iH+4wFvVdKgGrrDrU5i1CeOVJyYqoqHxigiwyURZONiEUXqUURrGKNkukMtY SRiOYVZGErFrYpjV6VNVp9h1Z0VtmYq+PP1oiZ1Zoxos7C9O7LwWK+jMcfFb ZiTdPlGHcTxfM3zVyixycMoNE9d57ec5becmW84zGs+Ot1xgdWVz+/Kmu7LH mi9012TWXEspyIgsyYwdaMwxS4YJNdxdAE1QmSaP10Af7qcbnsfrnkdrtFwv tO58tO54uGZ9sGq5t2y6u2SEHqy8ULBDioGwycscE9OdeWOwHbyJ0rzmVkBN xjsL2s0ZlU/PGu8s6am9Ot1X7VIzN3zqW3PAGevtBSPdCz4oE8l/vzFr3PDr N/yGG7Pm2/O2u4sOUgOKZCtszBuXsZ5xK9wmvlExoRIOKQWDGBX8AQm7h8do gcTMLlJkBrdUu4blNvA8Rr7PLPTjjmYVz9oklEyQdNYim7PKKQUbE78IOcC9 0qUGVszaFTM2udss81jkPptyxkGxSTCdBFSi28IpLzTrUs+6VNALP0vwDEE8 kXmNYrde6DGI/Hhdi4ywCXGd2FXTYBMsCOmYLmZ/LdFU39edTUAiJP8dVIIZ 7PLHmrELPKkvOp9+Ym/isfcTwnacPPpuXMg7sUd+gBE2mTlx+O2YQ2/Ritz/ XYyYx1PIs3AwxqTwnSRFJYlKUaGUHLoj+egLJYW8F9SOxCM7Eg5TSgr5IDV0 N5Ry9KMToTvBI9FHd2wVSASEEn7wbUDKsQNvYQSkhB18K/TA9zGGH/4BBFQ5 fuQdKPLoe2AWMoNHQ/Z9NyJkZ9zxj4lPgeR0JMUcJNkcGWmRZ5PDoYvp0ViB V5dc7mgoHO6pYTHaFcJRqxbrXjHpRQgcWPTr1xespJrul89v/+1PP/nnv/vq 337zs3/9zc+AJ7/88dPf/PUPf/2Lz//+559h/IdffkFE7H/+2x//r3/4OfRv v/7pv//zL//pb3+Mg3/y2f2NBZdRyVMIJjD6bGrSoNNv18D2WoEkGo9F+aoI 5xKRfu5QEFuojiTUZ8aloqIBPZplv35t1rQRsKzPmZdBOsHcJVC2QTYlmOoZ 6qhsKM8uzD6VfS7u8pmTmWcTss4lwjibHJkYfTDq6If4jeF3BTw5nRh6Pi38 4unIUwlHkqL2pMcdOH3yIMYz8YcupIRmnY7Iv3Sy4lp6S2UW2ITRU4k/H6xU f3c2kbN7eWMto13lnXW5AJyGsksN5ZfBKa01Vzsar/V3lFCNLHsrGEO1wMyR 3sqx/mpofLB2crh+YqgOwAIeUYqGdfJxEKhNz/FYRTNOmd8h9drEGGddihkn fktS/H5AcDr5lFY2pZNN6+Usk4prUHB1MrZSOCnljgmnh/hTA7zJfjajR8Ac JMK8nD9OpBYzcbEsGqFdL8G1wCVb8JqW/JblGSsEA1qZta3MOG4uzTy8sfzs 7gZ0ZzWw4LF6LVqthCuYGpke6e1rrasvK6gpBp5k1ZXmN1YUttaUCpmjHjOu muPe+sKDzSXo/sYirRuLPtAQyAjgQPwmTqMcu+AO4A/JJSEFuEgJL+INobP4 t9YcI74eKo5rxX9nybs551ifsW3M2ld9lhWvmWjJbVxw6gN27axVPWNRzdoU +PBQX2VGkVMv8JolZiVLJRhV8EfG+xt4452i6T7xdJ+UPSDiDQ8PNFLqb5ga bRVxBiTcQa0YeDJhkk7oRWN6/rCONwSpOX0qdo9iuks21UFawAvHmklnk22S MfuNYqbfKFt0aEAlKx7dqlc/Z5WueDT4nl9wyAM2fA+L8TVoV085NEybahIj kATcsS2g62uZgmFdX3c8EZCyKnSdLjojni7PtbKlmDCxt+nVfBMIVLLuVRA2 +Tqyi+qcItqmFa901Sf7fS983mxvtjfbH/T2eNmwZOF4VWMQYRMaSWgq+S1s AgFJvMpRt3zYr2as2vj359RfrUq/WBSsaTvVg9ncxrTpusSJqtjx8iiI8ptQ YHKMURo6VhLyKphAgJGpigiM01VRxIbBrjs9XXOKVZvOa8oQtl+W9eRohq6L OrI78qKrL4R05sdN1J7jtGYJu3JEnefFXRmWqUInt8I0VSTsvshtPz/VmsFo +gabjDZldFRerMxJBJtU5yVP9ZS61BM3ZtRBNweVZvJo1f47ssn9FTNhkzuL hm+AybLh3tKLbia3A5BhK5vQYHJ3UQct2oVW2ehkd9lgUz5nsM6tmb4xo727 YHmwbH8tm9xfdtzBMnLORNjkzoL9/rLr/rrrwaYbAp7cXLKszuoWvSqvRWhR M9WiYYAJRhAK2ET4sj4/KTIDNrGqmGATgidek4AQCjRrpNhkxvwST4JsQvUp dqoDThUNJpDXqoD8dhXYZNapAZVQGSX/Z2xCMk1oNtEJR+SsXpILT3tMCJ5s dZoQMNnKJrDBJs1ll66khxPKiA99D6ABGCG4QUMKmYQwAzCh53E8nph8/IPU yA8hGEASzBA2SQx5N/HIu4RKgoTyfkrozsQj7yeF7Ew++gHYJOnILig55MOT 4bviwncRjwnxj4BEQCUwKF/JgbeIDeN4EEkIjxASIb3jIcyQXfJQZMgHUMSR nVDU0V3Q8cPvkxmMseF7ACxYhMeEfUTg5WTEPqzMT8WHnk0+DmxJiT0C4+rF xLKCjNbafEIuRiXXaZRiXTrnMwX8lnmfOeDWAzRurfge3lz4/PENcMdff/kE /PI3Xz0DuQBh/h1U8puf/cPf/OhHz27f3wxgQYslMVn0mtUCYEiw+aYp4Dbg tAATt1nhMslfyyYus8RtkXosUi/lScGSG4Si8FiJY0VOPC/BGELVjE0xa1fO uzSLHt2CWxuEZRVRwEnlMQU7hGrx6JxThzNbtSKsvXmTfUNdtW11hfUV2bWl WcW5Z3IvJWaeizmddDQhem9c2AekMVBS5G4QysXUsNyMEwWX4yvzT7dWXelp zB/uKGUNN+DP53dnE/FkB2uoAU8EmzSWXaopOl9VeK6u9GJNcUZN6YXGqqzW upz2xryu1usYQSvtDXmYaavPhQH1thUNdJaCWSaG6qfHmqbHmpmjTcCWqZFG FqOZxWhhMVo5E+28qU4pb1DGH4bkglG1eNKo5Nj1IlCG0ygjMAg2xO8fBn75 DoMUwqMYcTlgmFR8UIxGMo3fkko0BajEFSQsI2IN41JqpSyQCy6oRswyq0Re q3bOaQy4TH6bzmGQ66RcKWecOzE4MdjZ21LTXFXcUl3cWlPSXlfW3VTV31Yv ZjPsOtm827wWcG8seG8tz9xdA0QsPgiKFOZan3cv+qyzTnxO9BgBHQ9vLpFq YD/+5D7w5Pn9DXIkDSMkzIyuikw7gyhsmXcDScAmG3OOVb8VbLLkMQFJXshl oDVjU3rxnWORuY1il1HkMootaq5ZxVHwRoa7azobi7ubS/rbKka6ahhDLT2d Vb1d1b2dVaP99czRVvzJSNl9Su6AmjekCVIJBEIBmwQbL75gE/F4KzAE46uS Tw+YJNMzJvmiQ7vk0kBgkwWHYs2rXfPp5u2yGbPIIp9kD1FfZZyRBo1ggPST 9Rg4xIHyurAugMn2fJPX5sIvvawb/IqXRECCu2i96jTZmg6/tXLXklsSbOz4 Da355Ot+xe974fNme7O92f6gt6erpmUbz6dmQAAQs6BnG5g4ZUNEvyObPAho frwi+eECP+g3yeY0pDJrEwibMEguPMCkJGys5Ojot7AJjSTQZNDJQvlQqlOn qlIwshtO81svSLuvqAaucVsutudG1lw80pob1VecOFieyqg5M1Z5ktWYqh/L s7PLwCainstgE2bbhfHmc4RNOL25zM4rI43nG4vSiy+fAJs0FZ8RjNX5DWyw CckxAZhAT9adYBPo29nE/mDVspVNaCoJgon+3uLXFYPvLpige4vme4uWe4vW +8sUwoBNbswq8YVvEg/KptomukqHWwq4Q/UuNZOwCfRaNrm7aLs9b7kxa9yc Md4K4Gyux+u+hzc8pEUC8OT2im09YFj2a2bsEruOrZOOacQjWskoCEXK6ZVx ekllfhpMHFq2S88loiEFmjGKgSdgE2iOKq0vJ1X3qSbFQaag2WQmSCVEW/JN toMJYZOZl2ASZJMXJ/FhOWoQuXQC4InPKMYrevQ8OqyLZhPOcCNdqmtrWBcd zUWzCW+0CaOA0SIcb+WONjIHakY7SppKzpdlJ15NP3bu5P60qI8AGikRuwhr EO8JeITgCaEPzNBsgiNPn/gYzyLHvwCTY++nHtuZEga9nxz6ftLR9xJD3ks4 8l7S0Q9Swj5MDfswJeyjlFBod9qxj+OO7ToR9sJ1EhXyHvGbAFJexHEdeCt0 3/eO7v1uyMffCT3wfZpNwCMxx3ZGh71PnCYESWBEhe6gdJTCEPAIrWMH3yPA Ak4hLhUgCdgkMfoQFB95IO74vmDhrP1ECVEHMZ8QRc2fOPYxlBB1KO44HjoA IzH6cPKJkFPxx7Izkq5nn6kry+1rq54cahMwB1SiSSxWHUapz6HxWCjWsOnE WMQKmINY2QIEsB7GSthnU2P1S5wmxGNC2AQLZoyvymEQO41YTktcJhDKC+yF QXxz9Azks8j9VoAtSFkDwYCwyMQkEQ6AvGaZyyjDy+FtkFU6UGt1zrq+YA14 NHLBSEdj4ZWM2BPhH4Yffjds7/cSIz5KjtqTcPzD1Ji9Z+IPZaYfB5tUXz/b XnO1t6ngf4NNpMxuEHRHbU7FtfTCrMTrWYnFOalEpfnpVcXna8su1lVcqq24 1FST3VyT3VCZWVd+CZNELbVXCaSQdpB97cUYASwwoO6Wwo7GgvaGfIyDXVWk c+X4QOPEYMv0aAdnvJsz3sud6ANi4NLIeAwQh1JIXTgwiF7OAUJCFo0QxIFL hiuIXxEu07zHSNwlGAlUQpjEiOvotarnXIZFClqNODjYcERiUPCMCp5JJcAJ 1eJpGW9cwh6FBFOD/KlB1lgPm9GDNyPlMnQyjl7OhYxKvlktxHMdBlwgXGWV z6bx2UBPOoBJwG0iKfmfPrxBei/SxYqJiHOE5K3QlZBJ70iSk7I6a1/2Wdbm 7Ksztnm8f5dhzqFb9JqWvOZFjwkzgNZZu9Zvw7eW1m2RW7QCrYypEk/C8NqU sy6NyyzTK1gsRhdjoLm9obimNLuxtqCy7EptVW5zfUFfR8XYQMPEUBN/okM4 2Sme7JJP92o4AwRPVCzKaSJndv4ubGKWsuYsyiWndsGhWnSqV4DbDgVprTtn pZwmetFof9P1ity0tsosfLnhc+XQMMEm3+o3AZiYt+ebBPGEvzWgC1oJOkpW PRK63yLuSqRs19ZUFGjJIXptpgk9s4VNZIuu7VpwSqDf98LnzfZme7P9QW/P 1swrdr5fMw42AYAQvwntK3lBJfJhyP06OaWDGIEngBSfamzFyrs3q/pyWfz5 fDCmqz8Y01UTP155gvE6NgkmnmwXeORVjVfET1QmTFUnsxvShe0Xlf05upGC qfrTzVdCqzIOtOYe7y2O7y9NHKlK7S+KYFSdVA5kmSav6xj5gs4LYBNW+8XJ loyJ1ovTXVfAJlMdWcMN52qupVy/EAV1Vl1SsTsWbMJbc9qHK5ZgiWDiNKHZ xPtSnsfULqWg0+T1bEIS6imHyIJ+S4N4Aibm+0s26PG65fa8Zt0nwy3AoRpT c7okEy2ETTiDdQ7l5IZPTblX5raBCXDGSEoH0+W57i46Hq56nmz4H256CJ4Q NiF9yRc8SreJb1JO6mUMg3wceKIUDCp5AySFk4CJU8eh0s/1XBjb5DeIZgxi v+kFnsxaZIRN5oKejq2ieQSiIeW1bLIVTKgUlSDgAEyoUAot367mOjQ8t07g BadoOcATv0noNfAdahZuzQp2H3ekieAJ0csywtudJgRMIICJjNWl4vXhVu7S sdxaplkyrOa8zFGd7pBOtpIqOpSCu/zRhun+qum+SlyO1rIL5dmJuWeOZyQc PBW9m4RyEY8JCAWibEo7k8M/SI3YlRb50amo3elRe9Ii9qQe3w2lhEMfp4Tv ST62JzFyd0Lk7pPHP4wL3wVCAZ6ASkgcF3Ga0Ao7+BbtMSF4QnYJsABMiA8l qA8IidACkgBPACnRoR/Ghu+BThzbDRu4AdZIijkC3KChA2N85EGCIcknjmAm KeYwdqND90Qc+RA6dnBn2AEgz66j+947vOcHIXvfPbqXMg7v/kHovh04DE8H uVw6HQdyaaoqGO1twhoYC10gAKEVux6UIYcIHdDuEjL5qpxGKZHLJAsKVCKn yQUQFFQw+suinMUq2qlbcOkxwvaZFRihGavKZ1F68VogIIMUbwPnIUyE92PV Cu16kUExLeEOMvobKgsvpJ48FHrg7cMff/fwh38Rc+Q9sElS5O6U6I8vpITm XYgFUIBN2qqz+1sKGT2V3LFvjel6bQ1hAaN1sKWoPO/UxdSw5Mg9J8N34TOQ HLM3NZZqcHk25eiF9PDL56OyLp64diWxIDupMCelKDe1OC+t5NopCEZF4Vkg DKGYxqoswEtT9RWomWKZqy21uVBrXV5rbX5XE/Uf/o6Gos7Gkp6W8t7WCrBk f3vNQEftYGfdUFf9SE8jNNzdMNYHhGll9LcQTQ61Tw13TI92gSCIo0TCGSUs A9JUi5nAGbCMUQn64Ad/gWKHQUKEC+SzASso6FueAdFYVuds0KLPtLnoAgZu LrnW5+0LXgOOmfcaAlSZBcqpCiLw29WY9FqVdr3MqpWY1SIAC7AF/KKVsoEt Vq0YvGPRiOx6KQ6ADeEw7LrNyhmHLpjOZiEFNxZ91uUZOymDDEJZDTjW5h2r AfvSjGXeZwp4jPNe06xLN0OVPdfNuHSzLxXwGd02lc0oFfNGh3oboYHuurHB Fs5Un0TAkIkmrAaxiDs6OtDS0VJ2Pe9ceUlma2PRUE8Nc6yNOdrKpfJQWvlj beKJTuV0r4rVBymYlMcEkk62Ezb5NoFNLDI2zSYQ2GTJpV736Wg2MUoYI+2l dYXn2quusIfr8cEjmSZb9Y3ei9+sIQw2eVlDmL8t32Q1mGBC4rhoNiF1urb1 N1l6XUzX67ucuOSLLsV2OeXQ73vh82Z7s73Z/qA3mk0gAIhV1PcqlfwWNqH9 Jhj9asaanfKbfLUq+WKRv6rtVAf9JtNBvwmVbFIeReWbbInpei2bTJSFEx4h 0Vys6mhosiqeWZM4XZvEaTwl6ryoGgCb5A+VxTVlHam7fLgjP7K7MKbrekxf SVx3fhjwRNB+Vj2coxjMZreeBZuwOy9PtV0gbMLuyZlszxyqP1t/Pa3wYnRJ ZuxwyzW7cnTDr7wd0JEKXcGeJi9iuoLybsGT17AJAROIUMkLMFnU3VnQk9pc Qb2I6bozb75DdSdRk39MQX7jtEc7ZZGOTPWUj7Re5w03vMw3MQajv6iGJltE lQ6+u2i7s2ANiso0ub/sAp6QXn4Pgh00wCabC6bVWd2yX+O3iW1alkXNtGqm ASk66RhdW8asmLRrWGAQ2mlCkMShZRP59EK/QewzvsQTiwyiIrtesknAqYKo WBraLbIFT7YCy9fk4lTRYELY5EWMt45vU3GsSjbkUHOBJ+ARuowwqSGs5PTz RpsJnhC9JJRvOE0AJpAIi4GpdgmzQ87uVvP7rcqJJbd8w6fE3RMoGrDwF+2i da8CTIq7KuZJ/bSbsxrYax6q+iWO8eqmXepJu4JhFA1quD16Qb+O3weD0A2I UjjW2NOQ01Z1uaHkXOW11KKsk3nno7NPR2QkhpyJO3gqZl9q1N6UiL2Jx3af PLqL9pWcCNtJBELZGs31NZ4EPSMktYTACM0mxGNC+1AijlCOkvBDO0AlABAI bEIMIMnLOC5KSTEhSdFHk2NCU2OPpcaGwU6MDkmMComPPBwfcQhKiDySEEUJ uHHi2N7IkI/CD30AMAGVYNyz4y8/eufPP/zBn+16+08/eOtPMO5+9y/IzMGP 3gLyZJ6NLy+4RFa8YvaIQcHFOpasZq1aKrIIgEBQxfnSiwH7VTmNipeiajQ5 DDgShKJwmZRYiwYrvlJFXyGXQe41qebs+gWXcd5pmLVpseszg1DUMDxGhUsv d+qkDq3EphXh5YAzwBO8tEnF00imJgabqosvXzodExu++9Ce7+z/8C+gw7v+ PHTPd+LDdyVGfARlph8vuZoC1RSeA5sMtBZRufDjbf8tNnGoqZrYKv4AoGa4 o6ytNqeu7GJ+ZkLuxbis89Hn08JAKCnxBxLj9sVG7Io9visheg8pFAalJx6G zqWGgl8unYkg9RDyryTmZcZjBLaU5qeXFYBcLtSWXa6vyG6ouEpVSy7Jqiu7 2liZ11CR214PVCltqyturr7eWHmtoQLKg0HmOxvLuprKMYJfQDG9rVUYQTHk OhJNDLYBWwAvMAjCTA23TQwCZ1qZI+0QDGh6tIM/1Sdg9vMmqSaGcv6YQsDQ Spky3qhBwbYbRE4jPgMUFVK5aXYqN40Ef4JZoI2FFwn7t1ZmiPuDJOnDAG6A O5b8VoIhs06D3075bvAhAbyY1ULgjFI4pRBMQnI+NEGkEE5qZCxIr+RaAVMm mdeuJvI5NGCTOY8h4DUCW3wuvQUMa5LLxVPsqQG5mMljDQ/0NEA9HbXc6aH5 Wdus1+y0qo06AfCkoTa/u70CbDIdZBP2SAt7GF9NLYKxNsl4h3Sik9JkOy2w CRHxnmzTa/0m83bFklM5b5fPmMUBm9RvEmr4Q7yxZt5Yk5Lba1NNEh75tpiu IJiIXoLJb+tvskxySbY4TSBSUpiACeZJHsprK3Th25JONqH7mwQxRLFNSy4l 9Pte+LzZ3mxvtj/o7emqiWYTt2LELhkAhnzDXaIY+VqvsAmQxKcaA5UAT2a1 E+sO4cN57WvzTSYrY6CJysiJF2FaYeNloeNlr2cTEtD1ItOkJgbjVHUCYRN2 Q6qw47xyIFsznNdbGNVy9Wh7/vGBspO9xbHt1yI6C6I6ckPac45MN6QoBq5I +zKnm9J5HRlgE2bbxcm2S6yubLDJRNvlwbozdQVpxZdPVOUmTfeX4xsY61JS 0TfY3MS6NRf+ycZr2OThmuPBqm2r0+T2ApDkBZUEwUR7Z15Hs8mtOf1LGQAd ASvPZ2Diy3/NK705p1p1S/0GNnugerStCGzi0bI2/RocSVHM/GvY5N6SHWDy 0nti2ZoLT/fvu7Fo3pg3rgcMc06Zy8hzGrgYHXoOIAVIQjqFQYRNgCEklIvg CXYxD/l0Qp9eBDah8SRYYJ/ynpDmjARPwCaBb7LJbxHYxO/8Ot95xi4nbOII solFwSJs4tLySeNFgAnNJiruAH+sBWxCtIVQtkdzQUKsASbaBIwWCAbwBPdu 6qYZbAc2bxVAuMkCT+j//pFx06+iCz6TFpm48+JIPIuEWwer0CiAMDiSqgUd LPJMwemy6eGa9fGG8+kNNy7Thl+35tWsuFWLDsW8TTZnkcg4vazRpr7Wopri jLxLJzNSw06dPAgkCd33PYg4UF4YB98iSSXERQIYiTm2EyI2ie8iEV/Ht7AJ yTeBYsI+wi4mjx9+H7sk6yQpOjQ+IiQ+4khi1NGEyJC48MOxxw4lRYelxh5P i4tIjQ1PjAo9efwI5uOO7486ujtk77v7Pvju3p3f2b/re4d2v014ZOf3/+eO 7/4xbCAJbBjAk9B9O0jQV1HOudrSnIGOWixieZP9IBQpd0wlmiLp1SAUCAZt v1Y2rdSmldl18lfl0CucBqXLqHKb1B6z2qGVuQ1Kv0U7ZzcEHMZZmx42kc+s gbw4zAhIUVk1IpOKD+GlwUcWjcCo5Jg1XL2CqmAs5Q0xBupqSi9dOhN1Me1Y 2ol9UGrM3qTI3RnJR69nJlQVnCFFuka7yqcGagUT7VQdCdFr6gZ/G5vMWMTr s/q7K/b7a87by1b8ba7N6fFHemPFSrS5Yl1fMvscEqNqSsTuGemtqiu/lHv5 JJAkOXbfyciPwCzkM3Ai/APsxkV8iBEUkxizNzFmX3LsgZS4g2eSjpESZKcT j2WkRWeePZlzMbkkL4Oo9NqFiuuXa0uvgk3AKVBTVUFwzK8vzwWt1JXl4FHY mAHLgFwIvBDBJjgDDXVTbSs7Goo6Ggrb66+31xd2NhU3VeXB7mkp7Wkt7W0r wwHdzSVD3dVdTcVDXdXBlpf1GAc6q1iMds5EJ0Ys7InNnexijXVzxvtFrBEJ Z0zKZRBpJCyDghd0msh8Nu2S3wZgAbzcWZsjveC/fH7vZz98/MsfP//Fj57+ 9PNHXzy98+ze+v3NhWBhZNfSnC3gN7ttKrNerFFwpMIJIXeUOz0I8dnDIu6o hM+QiSblokmJcIrHHuWyRicZvQop+9aNhbu3lz0uvUkv40yPmA3y+3dXH95f v3NryeNUtzQWVZRmdbSWDnZXTwQLo00NNDAHGliDjZyhJv5wk2CkWTjaKh5v o5Fkq17jN2EOGMXMbfkm6z7dmk8XsMm8BiqrHazh1nHtaioR3qVjEQDxGDhO 7fRrywgHC4lsr9M17xAF9SILnqSovzbNhNbSlmT51+bCb22/iG9IgidBGFFu 05xVCs76fS983mxvtjfbH/T2ZIVikxnthF8zQUp1gUFegIkCYEKxiUcZ1FZI 2UIrYBMIbDKjecEmJKZrRd2u7M9i1SWTmK6pqhOTwb7wkxURk2CT8rDJ8jDK h/KKXrBJEGFIUvxk+fGxipiJqriJqnhmXbKw45xq8KpmOLe7ILzh8oGGK4c7 Co53FkS05oW1XwtvuXKw6fK+iZoE5cAVWW/mVGM6t/08pyszyCaXp7uyWd05 462XB2rPVOYklGTGNhSm80dqwQg35zRYZJIorGCdLmuwULDr6YYbbPJS4BQ3 UdBpQifCG+4s6m8v6GinCcDk9rwGbEI3N7kdAJUAf3Q3ZnSbfp1Xz1y0C9a8 MqqdyopxxSVxa6Z4w3XDrdc5Q/UeHXvDr7kxS/q/f80mdEzXxoxhzatdcquX 3Zo1Hw6w3l1y3l4BmzjvvWAT561l6+aCaT1gnHcrvVaRxyKkRrPAoee6gwnv GCkvSdBdAhghCSYETyinCdhEzfLqBMATr0HoM1L56X6zxG+R+swSH9WcUfo1 nrhU3/CbuF7qtWziotiE+E18QTDxW2Uug9Ch3c4mNuXr2YQ32ky8J8CQl2xS B3GG67kjwJMG3ijwBPP14sm2YEBXr0Y4YJKN4n696BAv2CgwCVgEcxb+rJk3 a+Ju+FRgjVWPfN2nvDGruQUqCejI7qZfveZVLLukS7gj40bslmF3w6+6OQv2 NDxYsT7ddN5eMt5cMtxaNt5eNt1ZMd9dtd5dtZFV6IMN94N19/11jJ6Hm17i 23p00/v07uzz+4FPH8x/+nD+88dLz+/NYRJECZZc8KoCboVWxsAClTna2N9R 0lCVVXLtVEF2Utb5aKxUz6WGnkkOSYs/iCVrStz+xOj94I74yL1xx/cAQ4L5 77tJNBdxl5CUk6SYg6APkEhyzLHkmDBgSMqJY+nxUTASIo+CWUArQR3FTHzk QeBJxJEPgSQAEwiEAgbZs+Mvd7/757veBo/8GbTje3+8b+d3Dn70VtiB92PD 92WejQeYNFcXVBdfaakpHO5umB7t4k8NyHgMUirKoOAYlVyIcqmoqNAgs1qw TWAHk1JoVonMKrFVIwGn2HUUp8C2qCVWalfuNCiAJ5CH8pJo/FYtqASasepA JR7KY6ICs7gAMsAZYI5WaqGSGsRus8JrVXksCrseeMIDmJg1HINyWq+YMiin dPIJk3pawR0YaC0uuZqaeer42YQjl9PCS3PSACZ9TdfHe6uYg3XskUYJs0sr GtGLR15NNgGJmGRj2xSwSVe8mo2A8faS9d6q4+6q/faKjVKw2SV0b9P18Lbv wS3vvRtu0jTz0W0/abL5xfPV5w/n8Shpv7g2b5xzK7w2sVXHxodEzOmZHmse 6a3ubLpeX5FVcCU182zs+dSIYHnkMOhsckRK7NGUWAALdo9hJIF8qXHUVU6K OXImKeJcStSFUycy0mIunY7LvpCUl5mWdzktL/NUwZXTgM2iXOh8af6FyqJM wEtjZT6IprYsu6Y0q77ianP1tebq/5+9+/6K48z2hf83vPfcM/eEOZOdZVs5 ZwkhJDJCIoiMQELknHNODR2BzjnnQAdockYgoSznnOM4zIzH9rurNpTaCPvO nHvWsn+g1nfVKooGSdCinw/72c+TVll4qao4HVKWl1yYGZefcbE0NwnuVxSk VhenwxkIgw+rKbkMgTcbq7LAL231+e0NBR2NhZDOprLWmuLGivzmqsL2utLO xvKOhjI4t9YWt9eXEqkr6WqqgPS0VjM66ji0Ji6DsIyMR1cKWToZPLsENp3U ZYYfR8Zpr31uzDk5ahv3WuanXSvXxu6uTL14d/4FyJ35B3fm7q5MryyNXZsb mp10To3ZnXate1Bvt6hl4j6dRjQx5nA7DWMj9kGbpre7sZ/VqZJzjXqpxaRQ K/oAJnHRZzPTo0vykuvKM2gtpT1NRT2NhYzmElZLSV9rCa+zAm2C9Fhnk3WV FLiWc9pX1+ka1FLrdE27NRPwQ9IoBJJ4jIJxu2zKqRwy8kAiXvjxZRMBRgAp kB+pmwixbkLCRDRmh4BHxJNOycQgLpxF9KdP4TwuMkRT/NqSXLNkBwrWU7CY gv0m+PuZR7dc9A1RQHESRZ91gX8C/F/4uQc+m8fmsXn8oo8HM+ZrbtmYoW9I zfCo6C4FbXVCl7zTqeh0Kbvcqm63Cs6duM7wugBhcI0vuAbdzDoEt8Y1r82I XxgdGJVVixovMoqDWcVnmUUB9DxQiR/R3p57hJFziJFzgJlzoDf/aA8ZuOjN Ww0xmyvvGDv/OKfgRF/hSQyxT0ppcHd+AKssVNwUp6Wly1qT6tOOVCbur0jY X5t6pPHyiYb04zUphyuinq++uH2gLFTfdUnWGMcqO8csO9dfn9hTEd1bl8hq ukRvSO2sTmwoispPDbwSc6L0SriAVjps5Cx6FSiLW9OGO7Omu3Pme/OW+wtW Mu77ixDnWgbvLzpwKtfKlP7GpO46SGRCuzyuuTtngNya1t+Y0FwfV8MF9pVc H9MsDqvgJ/aETThq5nt0/TODkpvAllHtCrnFycqEaUg/IOM0t1Zc6ajNtihZ C6PGpQnLtXHz9THD8qj+2qgOQghl3LQ0YR62iL1WydigYsqjnR81X5uwLU85 bi4OrSx4bsy7l2YGF6fsC5O2+QnrlNcwOawf9xA7sI8ACkgOgFBcJj4WUyAO n7oJvAgCBwACgyoOEU3/oJaY8YXLCw9ZRMM2MXy4xyJ0W0W4funwoMzrknsH FQ/b28lluHAlLt/1YFcLJXB/7V3EwrAWqccssaoHrKoBsIldzcWWk0EiAy4d D16aPQaBz5wuIEn5QHcppL+rZC0FfZ35cO7vJjJAK4Tw6SUCRqmQWSbtq1IL GkzydruG5jVyhw1cqoHUbQSa9Q+Z+aN28aRHMTeqhcx41VNDyqUpCzUvbhK8 4JTDvx3ehJvgPqpKBaaAM6ADg8s4w3txzTScYkfdh+ElBvcWgbEohNgwce0+ boNIBR8J41Jy++9hGKPiMHVxykJteMFnN3Q159eWXSrNi8/LiLqaGn45KSQj OQKSexmGlNFZly7kXbmYnxGXmx6fHB0aGx4QGXgi1P9wxJlj54NOnjm29+zx ffhmyKlDcA0JOLYbSycHdz4J9Nj+9H9t+dOvnn3sV1v+9K9w3vbUv29/hsiu 5369Y8tv9m17DB4J496U2ODcyzAoJX4tD4ERbENFbndzBZfRCjzRyZkw/tfK 6GpJr1bGBBcQ+zAqB8xqYt0ncAouAIWFlUfNAu+lHoBLS2FXO2kNJbaiUC0t j84Tgz/FpOLCGUhi0XKtOh4ZrlnTB7Fo+80aDsRu4NqUXNUArbk0Kz2a2D8l +Zx/Xsr5juocRnMxp71c0FsL/0/VvA69iDAIVRmhbAI3zfJejEVBxwzbRBNu JTxz4JmAHWHwDMGnEDUV8841ol/s9tLqFvBrZnHB9x2eCQAWCLwLnjDwBMDc vzlCbr459dKdqQc3x++vjN1fGb97ffTWteHrc+65MduoU+s0SVUilpDTyeio ba8vrivLLsu7lHcl7mrKhcuJ59LiIy7FhSXHBINKQCjnQk9cjApMSQi/lHTu cuqFtOTIuOig+Jig5Pjw5PiwuOjAmPMBkOjI0+fCT0ZfCEiMD01OCE+KC4XH QBJjgpNiQ9JJ1MDnB9eAcTKSz8HzMO9KDJzzM2KLsuIBL3Auzk4AyJTnp1QW XaouSa8tu1JTchWrObWlWXANvIULeBZVFl7GSWj15Tk466yxMh8I01RZAGe0 DPgFzNLdXAlB0fS21fS0VMPTj9ZSyeysozpo5Hy6RsKBZ9HIoG5uzLE07bk+ O7wyP3JreeLOytSrLy6/dP/a7RuTo0Mmg0agUQzw+jrbm8tbGkq62qp6Oms7 Wyury7OzM+Lg65OTEZeXEV+YldhYmdNVX9hamd1YfKW5JINWk8vtqJQyGmXM erQJ1W+CF9iEIuqt5nWVw1nZ16Qc6DLL+0esSnL3KA1k2q0bH1SO2mUjNin8 tB+2iOAnsMckcJN7mqzLRhsvrm7RiDYZs4sxE4NSsiddOu6QYMibImpJYYIq LmL5X+oCgkUWos5C2gTzKEl+GNmjmXUpID/3wGfz2Dw2j1/04WsTiFvZs7ow 1yM2QYOsi69NvFrG3KDw9oT2jTnpi+O8cUWtpDmeVRrKKQ1il5wl6iYFfmRB 5Cgr7wgr99CP2YRB8gRtQvGkp+gMozQIbQLkUXakihrjGtKPViUdqEw8QNmk OvlQRdRzldFbGfkBiqY4cV0MpzwSbcKqiec0X+prvcxovNRWEV+ZHZYV758W dawiM1LMqACbLAzLgSQrkzqKJ2iTB4u2B4ueBz42ubfguLdg97UJqGRpTL1E LAusXJnUAEluTulInmhuTGiXRlXwycetAmxbcGs5YxYhqOQukGRcf5Mo05gA IGCT/s6KmgJikVK9pHfOq0ebrExCTNcnjACTBa9mxqOedCnBJvCChTaZGzEt jluXJu0r826AyfKs89q0A2wCMJkbt0yPGB/lCeDiBzwhe0wom4BHAAIOFceh ZBMXEHIVL2LxLhMfP5D4WLiwCIEnHrtkaBCE8s/YhHzY6qYVD23SbyN5grHD WclxqPuBJxCbkq0Tdiv6W7HJHW3iw5NCzEA3pGiARkRAL+XTSwWMMjGrQjFQ qxM1m+QdLg0HvtT4wk1M1TaAvOBf1+828bx20ZhTOu6SQeACGLIwboTgaswQ QAqA5fqMDYeUOJ68tzxE0QNVgoGHUTvO4PiTqGctrs86leAQFLdrpy5gpIoX KJqVBSdu4A5ZmDQvwx9H/qad2Gxxxn59bvDWNQ9A9d6NsXdevf7pew8+fvfB u6/dfOn27KTX5jQpjAq+nM/s721ldNR3N1U2lOdVFV4tzkrNSo0FuYBWiJ4U /4Ngk6N7t+zd+qftT//mucf/7ek//O/nn/i3rU/++45nfr3n+d/u2fobCNGj 8exvDu9+KvjUvoQLZ7IuRRVlJZblpZbnX4JUFKTVlGQ0VeV2NZUyOqoVgi61 pEcp6pbxO5WiHp2cZVL36+V9enk/uoMKTr5aF1xRCkstFE+oZYcpmPy4Tfgk gnhm0ibIE5OagzCx6ogATEDcBgmL21VflpmYHBmQGOF3NT6sKjeF1QpPtmoB vU7KaVbx2nUi8EjvOpVQNnmUJ/AfZ9yloGwCTxt4MiBGCI+sGZZg7DUXfKPh e3odnjmLTpAI2ASu4VtMYRbuPLg1itf3Vrz3b46CSu4se1cWiH3h8bcTC5P2 +fHVXJ8dgrH3zYVROOPF7WvjcLE46RpzGeCLA2N1GLTzWe0aeb/boZmfdl1f HIUszLgnRqxDLt2gVaFVDoh4tAF2G4NW395c1tZS1txYUludW1Z8pTj/UkFO cs7V+LSkyISowLCAQ/DkOX10J+TM8d3+R7adOb4z9PR+3PUyMujI+eCj0WEn 4iL9k6LPJMcEpl4MSosPBUoTNRqfoG4gAN6CqwmYoqyk0txLZbnppTlpELgo z7sM55Js4mZF/hV4E57PdaU5GNANGAdCTU5rqiIWB+hsLAOs9fU09fcSq4fB Bb+vs4/ZinO9xPxewUD3ALu9n9VG765vayprrC1sqCmorcytKsssL87IunIR bJJ1OTbzEtg/Gp7zLZXZDSVXmkuvtpRd7ajI7G8rF/U8LI5goQRtQlRJ2A0Q tImwp0rBaQSbmGR9XosCbDIxqP5nbUJtYvJo1tkEMAIwweDaWVMuOaADYIIe mXZLcBcSiiTIFmxRwXmt/22bzDjlmzbZPDaPzeOnjxdmLUseOdhkWMMkSyc9 q/0m/5hNXIpuOA+pe+Hs1TLnnaI7kzqwyUsT/AllrbQ5gV0WxikL5pQGsotO g03IDndwx1F23v/FJutKJ90Fp8EmtIKzrLIwYUOsrDWpv+o82qQiYX9NymGA Sd2lo+CUknNPl0c915V5QlAVKayJ4lREssojWdUX++oTB9ouczuuslsut5TG Flw6fTn6eGrk4cqs81JW1ZCBPeuW3J4xEk0iE1qwCVz/0CYehMndecfdefvd eew0MWLRBFSyOKKE3JhQAU+Wx1SQ6+OrO5hMO0UePdHqbpXR3Fo2/HwmOuLH dGCTW5NGsvXeAjYZMfElrIa2yozOumy9pGfao1kcM4FNbk9bb00RKwkvjmin 3YpRu4TceWTVJpNuzazXuDBmIUonszBkhdHpINgEiyZgk9kx88yoCYSCPBlz a0AoHouIKHys8cRpeLh08HqbEFt99WFfPEEYss6yWm0B1wBSLEKXTeS2i6l9 4X15sqFNiGaTtQldbqvUY5GgTSwqogveougjIudArAq2r030Itpq3YRWwaWV /ZAnxXAe6CbCpZViBPQKjIhZJeurU/Ob9eJ2h5Lp1q4ubuMhiyaDOvgHcpyG fo+FDzwZHZRARuDFd0g949XOjxkgIBQsl1D1ERxb4jhzQ5uAYuDxCBnqF+O3 rq0vkaxihAwYBEahy3N2HJoS17N232AZhWAI+V54PDx4fsJEOGWGcMq1advN Rc+9G6OvvzD/7ms3/vzhi998+fa3X7/3zZfvfPnxq19//u7Xn7z91cdv/fmD 1z9995VP3nn5o7defOeVO68/uHHv+szcmNNlUiqF7P6eloqC9NzLcZcTIxMu BIafOXzq0LYje54+vv+Zo3ufIntbnjy67wnI8QNPHdr1+KnDz8OAE4aX+RkX y/KIST7VxZep1JZm1JdnNlZm0zvKuMx6CbdNIexWS+gaKUMrY2qkLK2UWAAK V7IFgOBiUBsGm+upnhGco+ULE9ywY0ObWDQPbWLWDGBseq7dwLPqBkih9Jk1 HL2CoeB2t1Xnp8WGxIQcT74QUHA5prH8Kp9eJ+E0ywfaVPxOrbhbL+s1yul6 yQ/mdFE1lHU8gQxZhfB0gqcEPGFeWBl5cMMLpIUz5P71YbjGYgrxJPGZ1oUl MwhW1nxtQoWwycrI3esj8H0HmS5O2fD//uyoeWbEMjtqXZhwzIzY5scHsUAA WZ4ZgmvItSn3woRzdtQOD5gbcwBVXntx+b237n320at/+eKdv3757lefv/XF p298+flbX//5bQzchHfBzc8+ef3zz9767NM3Pnz/pbffuPPKC0t3VqbnJ50u q5LPaqsry85Oi0mKDkqOCY4/H5AYdRbcClytLr5SWZgOI/mSnGRgbC6M7VMv XEk6l3oxBB5zPvhYZNCxc4FHQ0+Djg9AqNXk4GZU6MkLIScg0WF+0aGnYsJO x507mxITdjnhfEZSFCT70sW8ywmQgoykosyUwqvJ4JTCzEQINRUNkQJ/PUhj ZR6uYNZSU9hUlddQnQ/0AINUlWWVFKSXFl6G6+726q62qvbm8qa6opqKnNLC 9PzsJAjA5FLSuatp0Rkp8PePzM+IqylIq8pLaSi63FyaATbpay0TdNdIGHXr JnHBWcaqB4xAKJuAU5QDnWiTiUGtj00U/+M2QZKAR+DVBDLjUUKmXBJQCZAE YILlkhk3EEZILeSF63qNEH3xwn+YJxvYBPNzD3w2j81j8/hFHy/OWZeHFBOm Aa+WBTzxqHr/KZu4lTSAybCGDtcjOsImd6f0r89KXhzjjslrxE3xzJIQdmkQ q/gM2QtPzukCeuQeZuYc/FGb5MIDjrJ+WDrpyPUDm/QWBXIqIsAmkuYERklo beqhioR9ZXF7q5IO1qYeqU4+BNcFoY+XXXi2/crR/rIwXmUku/wcp/ICozIG bSLozh7oyGwuiclKOJ4edSwp4mBZRoSYXuHWMacGhcTkKzLYA3J3zryubnJv AfdbtPlsuainbLLgVdyc1oJNlkZXM+eRjNt4g+peC3xJVQz4kb40olmZMN6c NN+ZtjyYt4NNbpINKUsj2nGrSCvoojcX0BrzdWLazJD2+pTt5uwgPBgsAzCZ cSvGHRKvVURujEjYZNQhn3SrZ4YNuDX24pQdQ8GECgiFqp4AT4Zs4iHrQ564 jDyqEd6pHXi0bmLXrPKEmP2lX40dhEJWT5xWgifDDvmjPPkxmwyRMPHYZC6L xG0Wu01igIlF2YcwMcs5ZhkbgjZx6/kQu4qz1m9ShTbx5clAd9lAF7xJNJtw yWYTiIBejREza+X9TVphO9GVrGI5VEybionbKwNMsG7iMfHAIxNu+aRHAecx p3R6WD09rAGegErAGhRJECC+yw7gBTWzyxcpvpN2iN+Nk4WPR22yqpI1g+B8 Hgi+SfzanKyb3F7ywIcszdoWp+DbbYEHoGWIKUCzRCXlxrzzzrIXRqrvvb7y 6Xv3v/rklb/9+Y2//fmtv3z2Btjk0/deAZKAR95//f57r9374I0HwBO4/uy9 V7/86E24BqRcnx0ZGdTzWcRe4cABtZhNb6+GkeTlxIiL507hRvPnAg+GBuwJ 9Ntx5sQ2v8PPBvvvjj/vl3XpXEluQlVRanVJWn1FRkMlDAKv1JVdrl0L3Gxv yGPTqsQDwBMaRC7o1khYajGxPq1GwtHJ+tEmG4ZsV+HitC60CS5N/NNTuahY tYI1nnBN6n4MkMSk5ujkDKWoS8Zv57Pre9tLynKSk6MCzwcejT/nX5AR216X z6U3KPmdGhFNK+7RSYi1uI0KBgT7TSierOt/9xUK/HcDm4BVwaeIEapc8rBi gk+eBecNov5lW5y2gDfhOwtPGAAIdqPAGa6BJGgWuH5wa/TBrTH4jt+65oHv /vIs8dsJ+O8/7TVOeAyTQ0YQCtADAAIBgABGgCQAk7vLky/dnn/zxRvvvXbn o7cefP7+K199/MbnH7368fsvgU1AJV9+9uanH77yyQcvA0n+9vX7f//rh9+S +f7vn3z/3Wff/PXDb/720d+/+fjbbz7+7u+fQP7+lw++//unf/viXficHquK 3l4D438Y9jM7a9nd9eL+LrOa77YoPFYlnF1muV0vJotZfHLCHlcjYUsGaFIu Tcjp6OtpZHURa4J1N1d0NpY1VxfUlmaSXr6YEhsSG+EfdvpwyKlDwX4HA0/s P3t835ljeyEBR/fAOTzgaHSoPyY2PCA24nRcZED8+TMJF84ClNITIq6mROWk xwK9C64m4LIAZXlpxdkpRbkpBTnJxflpV9NjkuPDUhMj8rOTQSs1FdmVpVcr SzMhYJbczISsKxcBJvCYyynn05Mi0xMjAFklV+PLMhMqs5PqC9O6q3PAJkIa qKTOVyUYsAkxiauvSUyvoWyi+KFNID9mE4+Rh/NRffOPz+miVOIbsAmWSyad IiyRUM3y1FpeiBS0yT/Gk43rJpCfe+CzeWwem8cv+nhl0bEyop40c9EmbmXP j/abqDboNwGSAEy8WgYIZVTPXnCJwSavTovuj/SPSKsAEfSiIGbRGdx7keo3 oWcfpGfv/wmbMNZsQvGkLfsEozSYURLSXxUpbooD9dAKAquTD5Re3F0Su7s8 fh/ABIQC17lBfyw9v6Ul7RCrKKivNIxREtZfHc2qvjjQmMzryBD35vG6shuK LlyNO5oaeTg+ZG9+SmB/e4FD1QOImB+S4XbtK5M632ld2AK/BhM7wMRnW5PV OV3XRlWQ5TEF2OTGhAYy6xY7NXQNt1HNbbArafCz+taU6R64ZsZ6G8aQZN0E ztfJlaCWR3UTNjEMvHubCJtoRbRpj2ZpwrIwarzm1c4PqaZJmMBLzIhV7CUi GbHLwCYTLvX0kH7WawSewIAE40sSqnqCpZOJIR3wZNguGfbhiZv4XRzf1yYA ATvABG1CLtiFsWmJ2HX9EBsIhSydOC0ET8AaD2dtrfFkY5sATMhOE7dVCjZx mcQuo4iyCQETsmhC1k04azbhwV8J6yZgE7J0UvZDnvxghS5qnS7ceFHMqlMM NOtEnTBKHFSxzFKaRtAOgQEkCAVg4jIMeK1CIMnsiAYyPayCa4QJLqYEykBf gDVWu5jJKVs4d8t3hEkNMqk3ffOwSjI/uFr7IMsfq1njCTE0JfUB3EChENO6 yFk9cMYJXRRP0Ds4oCUndA0BT9586dpHb9/54qOXsG7y1SevffLuA8QIrmgE ZyDJVx8DW96F63vXZ0adRotGbFQSm0cM2dTDdg25p55MJWLBQLG1tqA8P6U4 OyH3cvTlxNDEaP/o8KMRgfsjAvfFnjualhBYkBlVWZRcX5HeWJXRUktsCNhQ ebmuPJ3cNDCdvA93MpprsmitJf30elF/25pNmEohEdxBAwNUWZcNbQJ/PYQJ AgSLKRvGqhWiTUxqrlHVByFb4JkQjbRXymvnseqZXWWdTXmttfl1ZZl1pZlN VTldTcUD9AYZv8ugYJlU7NWo4cwyqlhYN9lw+0VfnkCGrSJ4IsETgKqVwBmL bnAGqkDgJmRlgZjQhbP14AwURZhgzxEKBQNPCRAuWT3x3l6CD3RDlmZW53PO jJoBJrg277TXSqnkxpwXVQIe+eLD1/72+TvffvXBd3/5CPL9Xz4CgPztq/cw f/3yXQgY5Nu/fYQw+e5vH0G+/+bj77/97LtvP/s73Ic3v/0MqPL1F++899a9 29cnzVphT2tVc3U+sELcD99fzqBR7rGqvQ79uNs07jbD0wwybNfh7opwZ9pr I7cjcYKhMPAXhuDFqFMPT0UMuf6zlPyGSqwasUkp0Ej65XymjEuX8RgCViez o57eDqKpbKjIK8tLz750MTkmJCb8VIj/gYBju86e2BPkt883cD8sgFglAHI+ 7GRY0NFzoSfOh/vFRQcmxYWmJIRfTr0A5/iYoLTkyNzMRJy6lp0RB2/CA1IT wlPiwlLjwrIuReWnR5dcjStKj6nKSaLV5IJNxL31UmY9tpZQFZN1NuF3V+Cc LkV/p1HKGTbLJwY14w4V2GTKpf2nbPJoNrQJFk2w5QS7TuAm7nhCAQRhgp0m vv0mxP01m/wDPNnAJpN2CbzS/dwDn81j89g8ftHH68uuW2PaaSt/RMcmbUKz S9r/8boJOZWLQS7zRUeb3Js2vDwpvOftG5FWCupjegvPMkibMPL9fOsmP9EL T1+ziW/ppOXqUWZpMKssjFcbJW1JkDQndOWdqUzcVxK7syh6Z1ncXrRJ6cU9 +SGPFUc8XZuwm5bjzywMpBUGg0366hL4LWmCrkywCas5vexqUFrUgdig3RcC tl+JPdlTl2GWdoBN5jxSsMmNCS12ndyeMWJTPLkR/CA5mwttYvPhiYFqh18m ZnAplkYVi175tFM4ZGBZ5Z06QfOoZWBhWEEuTWwmt8/QATduThheWHDcmTav TBjAJlMOqUHY2VSa1lCcymgtsihZs8O6xTETnOHn+dSgbO0VZNUmI7ZVm4w7 VVMeHfBkZtgAAHk0aBNqWhfaxOuQgk0onnjMAmLZLrCJbrVogjaxK1jknC6O Tc3BBYfNMLBXsawaDsQCTiGrJw4Tz2Hmg0025MnGMCGLJmATp1nsNIp8bYLr dNnI2FX9vr3wD23SU8nrKfflCS4pjOt3wQP4xCZoNUJ6naC3FiJk1Ek5TWpe u07YbZX16gQdUnaDmFmnHGgxgVZ0fWCTIQt/zCmdGlJCsHQyO6KbHzMATHB2 FpZOKJj4htpWxtcmvjyh7lCTtXxV8oM5XWtCQX2gTVYLKHP2uXHj3IQRrnF6 D6pkadYG49j5CROcwSZ3r4+8cm/mvddvfPre/T9/+OKXH7/y5cevfvDmnbde vv7Oq3fAJpCP334JPPL2y7dfvbd8Z2lqathm1YrVYo5BwYMx5PKMFzdwdxik wAQ5ny7n96hEDHpHZUdjYW3ZlYKrsRkpMCQ7mxB1Kjn2dHpiYHZ6RHFObE1p akttJgzvIW312WCT2rJLEIBJU3VGax3cyaivuNJSm9PdUsKm1Qg4LfCZlUI6 2oQSyqMwgeBcL4onuIM5dsRjxYQEiAjvbxQhlk5MqoE1mIAyHtZNhH1NXGYd RNDXJuzvkPC6RQMdooF2tZRhVPebdasxaftMGrYRomYZpDTKJr55tIziNPIm 3Eqc04U8wWldFEmom0RdbIb4hs6OGeDbDc8B+Hbfvznywu0x7DHBNvlrM1aA CYLl9vLQjXnX4pRtbtw07tGMuTXwf3zcQ+xs6LEqBo0S3Od9csgMPAGb3Fma eLAyc//GNJwBKa/dX3rzxRtvv3zznVduvfnqzddeuv7yg2sv3V989cXld9+8 +/nHr33x6RuQv3zxDlEiIVXy3XeQz+HNv379/kcfvHx9cVQl62trKivJS60t y2J11cNzBvzodWinhi1Ok8pj0Yw4jKODxmGbfsiqdVs0Y07zpMc2PeyYGrLD BZxnvMCTQTAUhhIKeAonocF7sfoDAdFgJoesvpstwgXyZ8xlmhyyjLtMFF3h 7wPPHHiC8VntLTWFFQXp2WkxyTHB0WF+OFXs9Indp0/uCQ8+Fhp4hOLJhYhT wWcOBfjtBbYkxAYDVTLSojMvxwJY4AEJMUEJ0UEpF0Oz06ILr8SiTSqyEjoq MtnNJRJ6w4Y2gRANJms2gbOqv1k5sGqTcYePTRz/8zbx7TfBlxWI18IdNvd7 LQMjVi5VMfHthX/YDm8XUsuwUzzZnNO1eWwem8f/4PHGDfedCf2sXTCq54BN nPJum7htbQ3hVZt41N0eVRfugbIuVN0EzmMG9qJbAjZ5ZVJwb5jjlVQI62Po hYFYN3mk3+Qw2uRhKJvkHGHkHKGmdbFJmzRfPUovCWKXh4N35O1J4ub4jhz/ 8vg9YJPimF0VCftqUg5VJx8si9tTFP5kQegT5VFb268c68kL6C4I4lRF9dcn 8lvTBJ2ZvM7M9oqLWQnHE8J3Rfg9B0mJPNxWnmIQtoJNFobl2L1OdcQjT+7M 2O/MEiS5S8CEqJvgnC7CJjPGlWk9wRNSKCuTmvlh6bCRbZa2GSWtHj2L9I5m ZVJ/c8p0a8p8Z4ZoHlkaIfZkvDdngzPAZGlEO+mQanltFdkXO2uzVfwO0MeE k+iCHLaIx63icRu8fMCLiGQUQEG+QnmtUsomk27tlEc/PWwAfUCAIRi0CdVy MuU1IEwgIw6Z1w48kQxZSZ4QL3lCsMngWrOJTcWxKdk2ORPOViUbrGRWMCE4 lcWkZIJQTGo28IRoItYP2AwDHpt0jSdyL9gEeYIXq2+uBmDiXiuakDYROg1C M8BESaqE7Ii3qwcc6tVFukYsEq+Z2CPeKOkFXzy0SU8ZkdXuEqJQQqoEUi3o rYGIGHVCOtgEnFINTpGym4A2YED1QIuIUQufRMSs1Qo77OTMLpeB67EIvHbR CLxekx3x2GNC2WSZKpfMOVYAFDhra85x84f6WNd1QvWh4Huv4xytNY9gL/y6 xpN1NRTfKV5U3wFVQIHA0BQ/w+2lodtLwzcXPbeuDb3+wsJHb9/55N17n7x7 H/LhW3fh/P7r98i6yQvvvHLnpduLMJwbNCoUAqZKxAabwHBuZsSBGfcY3RaF UclVicALDBmPxmO1sGnVzK6qzqaimtL0wiyCJ0kxpy/FBVxNDSnKjq4pTWmq udJan9nemN3TXtjZlAtv1lek1VemwUVbfRbApLHqakdDPq21BGzS1VxMaynh s1okA10KAV0hYMj5vRC4RolsKBSsnmBHPIw2qe4SCiZUK8rD6MlQNlETNgGY oE3Ukl4Jt13Y1wwqGWDU8Fj1QBIpn6aWstRSpkpC1ys5RNu+ps+sJWGi5RjV bL2KqVcyDGQjPFZPdBBRp5bcjfHRAoqS3y7nt2klNLuuH/7HQQaJ5xuxrDdx xtmVZmKJiUETD/5b6RUMjbQHxKQQdkp5bRA+u6Gvt5rRWdbVXNBck1lbllaa F1+UHZuXcSHrUkRaQnDceRhjHz4XeCgs4EDIqb3BfnuCTu49e2J3wNEdwaf2 B57ce+b47rPH95w5vrqr5smD204c2Hp07xbI8f3PEXcObD2w+6kDu58+vO/Z 44e3+R8nxupw9odB+4ndIWcORUWcSroYQq5PFV9ZlllVnlValF6Qm5yXlVhb kdPPajWouE6L3G1VDts1Ex7TqFPvsaqGrAATA3iBOA8ax5wmr8PgtRvIN02A lAm3FXgCmfCYx1zGcbcRRAOyAExNe4lOGSAVaAWcAiqB64UJFzx1gSFgagx4 ZGTQAEGbeKwayJBNSxZoNPA54ROOu01jLgN8cgj+3YZs8BgNvAnweeHm7My4 Y2HGPTVmZ9Dq05Ijw4OOnQs5DiQJ9D8AX4Gzp/ZFhp4klywLS02IuHjh7IVw v5hzp+OjAtMTIgquxpdmJZRmxpdcuVieGd9UnMZsLPqBTYAkrDoZu0FKOoWY xMVpFDNqBbRKwiYDLaRN2MNm2figGmwCmXJpxgcVYw45vBD8v8zpWscTyia+ XSfjDiG2k4xYVzeLhwuyNV6C6wxPDIpWQ9gEzkQm7WIIYROndINspJIJG7yi iX7ugc/msXlsHr/o480VN2hiwSWeNA+M6llAErOgGWxC7WBCtbpvaBPkCbmA MH3SMrA0JLszqXt9UnjXxfDwi0R10X2lIX0lQYx8f2YewOQkM+cYi8hRdvZh dtYhZu7qDC7cdbE3+zAEt1/E3eFxfxNIR75/a85JelmIpDVOS0/nVIVXJe0p uvBcaez2yoTdNUl7axL2VMXtLI/ZVhSxJTfkidKorY2XjvTkB/dVRTNKI/nN lwStl/ntmYy61PIrQSkRe+OCtkf4PXv+9LaEsP2NRfFaXpPX1IcTunBOF1U3 ITJtvDtjuj9nuT9vuTtnhvs3USJT+uUp3bUJzdKkFs7zo8oxu3BQyzJIOiFu Q9+8Vw2WuTVtvzllI2OncmPahlmaMM8Oa8ccMnjdsarY8NIzapdi4CZk1CqB jNgk8PJEvEJZJUMW8bAVZEEUKUacamJX5WHjpNc0PWJCnqwLqASbTSibjA2q Rh1Kr00+RK6R5TKKQAfEDiM6vk3DtaoHQApGOVsnYehlD2fXI0kIlSiZEAvY hNxrHid64cLCMOgatom9dsmIQwqBCwxcjw7KME6LwGUTDdklELdVhDtCrlZk VGwbWaZxaPoIJWkHXAb+kJl4UR7UDRhlvWpBO7e3fKCnbKCniNtbxKUX8RjF RHpKeD2l/N4yAb1cyKgQMqogIma1hF0LDAGwwFne1ww2IbZ05zbL+uoF9Ep+ b4V8oMkk7/WYiBWSiSGiSQBf3gmXan7UiMUICE6dwplUvpOyqDV+13WaoE3W aQVvUkUQXHkJP8NDj/hkXRc81Qvvu87wqmXmnMuzRHCVNsjKgufluzNvv7IM PPn4nbuQD9+6/e5rNz56+8FbL63cWhyD8Rj+JhkG80M2tdehHRnU4cgNhm0Q 76DcZRHCIBlGyHJBB4yNJdxWUX+zgNMII2Rcsjj/6oXUuIDMlNDCq1HVxclt tVm0loKe1kI4dzXldTbmQjoacjDt9dmdDQXtdflttXlw7qgnrltrcntbyzhd 1QJmk7S/XcHrUgloGlGvVgo24ajFLJWICDakgJLgAu7r5QPYDk9iRIyxaEAl IrNaSJqFMAhIxKrl2/SrseqI5bmwBd6k7sfSCVyDUJSiHimvU8LtgIgH2rVk e75OxjEq++ExEOxMseoG7AYe2TvfDzAHPuilND3aRNKtQ56QIcxCvot6k9lZ Cl+xrLTwuPPHQwN2nTnxPCTszO7ws3vgHHJ6Z9Cp7YF+286e3BpyenvQKTjv gMBNeFew/45g/10Bx7cG+e0MOb0nyG938CnyfHp/yJmDYWcORQQeOYc5e+RC 0LGo4OPRwcdj1hIbciIi4GjY6SPRof6JF4Ljzp09H3QSEnTyANwM9T8MFwFH 9xzZ/ezBHU9DDu18Zu/zj+/a8scdT//+ucf+87nH/mPbU79+9rH/s3PLb7Y/ /Z87t/zXnud/Bxdbn/z3Y/uePh98JCc9qr78aj+9XiNl4NcKvtpu+AFF9pS5 LJJBkwjeHHGqxtzE/kfDdpXbIgcykM86A07xwiII+gKrHlgTAXdQXvYNwgSL JpAJjwUCHwIfuC7w2fBd+AfBHfxTQC7Ddh3OLgPIwP23X7n1+Yevfv35219/ 9tZbr9wU9HUCPU4f333q6M4Th7bBOcj/QOiZw3AOPnko8PiBwOP7Qk8dig07 dTkuLO9SdOHlmOKMi4XpF8oyY5tK0+gN+UJajYRZL2bWScAjEHa9lNMAgZ9F cFYMNMMZd4aVshuUvDaDFH4QCSacCsikSwmvC1NuFVyMD8rh5z/YhGyE56+r lfyYRCAe4+pi6fAwvA+hlufyDVVVofyChHn0kVSphVqCGILGgTMGHzlB7g6/ YX7ugc/msXlsHr/o49Ulx61xzZxDOG7sG9Ex/1mbeLUMyiZTloHlYTlpE8Fd F93NKxTWRnFKgjnFZ+l5p8AmrLyTrNzjvjZhrNnk0QBM0CaY7sLg1pyA3tJw cXOipieDVRZRenFP4fltJdG7qhIO1KccqUs8WBG7pzRqZ17IkznBhE0aUg/T 8oL6KqM5ldHchmR+S/pAy5WOsouFKf5gk4SQnWHHn4nwey4mcFd1TpSqv37I wF4YlgNPcFoXtZIwMa2LhMmLi/YXrznuL1hxOS+Ayc1pw/VpPahkbkQx7hS6 jGyLoseq7AWeeC282SHFypTp3sKgj01sK5OruTG1apPrU9Zr46b5Ef26VyLk CTF9y0IEe0zQJmR+zCaPxAs2ITI5bJgY0o97dONuwiaQEbsC9z1EoVA8AZuY FBywiUHGAptgQCgUUiiqUDax6/rx17/4O2HkiZfsasFQQoFg7zzaBAbAgwYu fDh8cmLtIxndJGeYFUyLgmlVsCwKll3TDzxxGwVgE5OcrhF28OgVYBNubzGX XvzTNgGASDl1MBIQ0mtknEYVt03N6zBLuiwyGuBRxWtWcpv0kq5BXR98weF1 n+ij0fa7TcKxQcX0kHbaq50Z1c+NG3G6FE6vojxCTakivPD/YBMkxqM2WdcL T/WbbLAZCtFlQHRAX59zQXC5thduTb7x4uJ7r68ATyDglJfuTC/PeEadehjS w/AexvZuixLehCEi2gSu19nErOH42gR5MsCo7W0vbqnNrC5JKc6JLcuLrylO aa7O6G7Op7cXMzpKICAURAoE7mNozcW05hJId1NxZ0MhpKuxCAJvMtrAm3Vi Tquc26nkd6vFwBCmSsRQCulwhuAdjYRQg17eZ1JxUR8+JBGaVIK1nd8RJgKb TkDZBNcNpmCCNoGzTs5SCGlAEmFfq4DTAmf8U9Am+EhSNMRSw2vrej20ieGH AY/4XlNhdZfXladdSQ6ODN4PAAGYgDuovd2pwLuCTm0DlZAe2RkaAGzZFXJ6 97kgMMi+iLMHw88cCD61NyzgwLnAwxFBRyOCj0UEHz0XfAxXr4oJPxUdehIS E+oXG+Z3MexUXDjEPzbs9IVgv6iQU7HhASCUyMATEIBJeMBR3NHm1KGdoBIg CWTnM39AmGx94jfPP/7rZ//071v+9Ksnf/e/cB3pLX/6121P/QfAZPdzvz19 dFtU6LHLiWF5V2Lqyoj9B/t660B58BV2GIWQtU1kePD1B6F44KeNXeUyy+x6 EdkUr0YgeB16Xy/gm5RQgCGP2oSCCaUShAkChKjRkJ+Q+lR4jW8iSeDPApLg Tbggtmt0GUZcerdN5bIqxVxabkZ82Nkjgaf2+x/bdezA88cPbgWenDy8fd+O Jw7t2HJ01/N++7cHHt97Iej4pZgQsEnRlYslV+PAJqVXYxtLLvXU5/K7qsSM ulWbsP8vNpH1NYNN4Of8NLlKPNoEXw7GHDK0CdZN1jEE8+g8LrxJlVSom1gu WbdO1yx5/umsdc3L1xtkUEq9i7pDTBizCcetgnXBOWA/98Bn89g8No9f9PHy om1lVDVj56NNACMWYQsIBWGC3e5gE1yM69GM6FhwhvfCx87Y+DdGlPemDWCT O066k1vArznPKgpkFgbQsk8wASZok9yHNsFyyY95BN/EdBeEtGaf6S2JEDUl Kbsu9xaFFcfsLojcXhK9uybpcFPaibrEw2VRu4vObc86+6fswMeKzz9Xn3II bdJfHTtQnwQ2YTdcasg7lxN/PDl8T3zwjpBjT4ed2AI8KUoLkTArXVrGtFO0 6FUsjap82+HvzpnvTBvvzZrBJi/52OTWjBGyNKmdHpIOWwcG9Uyrusemog+b BmY98usT+tuzljtz9rvzDsomqyqZsBKZIvYNvznruDU3SOwTPWMHpCyMGoAn +DKEPCGWCzaLvGYRrhvswxPZozaZggz/aLAxFh5MBD7KqcbqCQoFgjaB2DRc rJtAKJusCzoFe098bfJoKK1QcVmFbruYsolDPwCfRCuhacU0nRhGdD3wGm2S 0onImTZ1H9rEoe2nbMLtXbXJKkx+xCYAEzGLgAkEhgHKgVYVtx1s4lDSHRom KBIsadewhi0C+PKCfUhq9YFNRuyycadyyqudHTOASlZXxCJbj1El2JuMu3gT WvHZXZGa0PUoTHxtgv0j63vhf6RuQj3sYcVkbd8TuL8047g2TQSXj8YLkMhb Ly+9+9oNEMrd66NTXgMMDq1aoV0vQZIAQEAi2GhM2WTMZaBs4jQL1tlEPNAi 4DRyeqporYWtdVnNNVebqjOIgkhjLkgESMLqKmN3l0OYnaWIFNAKpretiNFe weyohNDbylEocMYCCjiF3loGPBGxW4gCiqBHKexViehqCUMjYWqkD6OTsQ0K 8EK/WQ08wU0bV2NUErs3GhTcH7PJuqIJBmyiFPWATXisJgif3Qx/LvKE/IP6 4PHwsSY1ZRMu2IRohPexiVHWgzHJeyFwQSEFLrSizr6eStBcVlp4RODeU0ee gYBKQk7vxLIIOIWqmwT6bUeShAbsiQjcH352P8AkMuhw+JmDZA6Fnj5Itm8f Cgs8GhZ0NJwUSmToyajwU7HnTsdE+ENiMeH+F8nEhp8GmEBiwk5D4AKoAjZB mJw+stvv4I4ju589sP2p7U/9bssf/+O5x34N5yd/+6unfverJ37zL0/9/l+e +O3/9+xj/+fpP/wL2OT5J/4NeHJo1+NBfrtjI05mJEfkpEcVZcWX5ibVlWd0 NBSCUOSCbr2CTQEQvoBAFadZAjCBDBolTpPMaVKACNwWNc6/gsA1ZJ1QqOKI b3w9QtVHKI/Ah+MnhM+Mn4q6Q930vQN/qMMgH/OYQCVcVltXS0VJ3qXU+PDk i6HBpw8CSQAmyJPDe7fs3f74vuefPLzj2VMHd4T4HcS6SX5aTGlmQllWAsCk Iju+uSyd0VQgpNUAQyDAEyKs1QIK/jgCm4BW+D1VYBNCLpwm+LkHP/Ypm8wM aajfVuHvqZAng9o+h4ZNrDGo5UBwX3iqPuIrEV/F+NrkIUmGVPPDasjiiBYC F7PkuivUviePKmZuSDU3rKa04vsAqsV+dUGwH+4djwGYTNo353RtHpvH5vFT x4vzFgDFtJU3ZuCALwAjVlEr0WxC8gRtgjzBnvd1GdWz1xrhWbMOATDn/oyR sImLsAmvOpJRcIaRf7orE8ThR4SwyXGwCSf7CCf7cE/WoXXzuIgu+DWb+Aql PS+gNfsUozxc1BwvbUvuLjhbFrer4PzzJTE7apMPNKcfrUvaXxq1rSDi2asB f8g888f88Kfrkg/2FoSgTXhNqYLWdEZtck1WaGbskcTQXdEBz4UefwZ4Enz0 qcx4f25nkU3ePWblzg/JkCdYOkGb3J4y3J0xPZi3Pliw3pu3wE1gy41J3bUx 1aRb7DH3OXQMt4kzNiiYdkmvjWpuzZjvztsgt2eJkCqxkvGZ1jXjuD3vvLvo hsAFTu6CV6Ixhwxfg7yr63GJh01CCLluMMGTn6ibTA2bN4qFjHlyCMacRnK6 tWHCpYGsEwpO7hrUC+xaHk7rIqona1USrGtgwBE6aQ9c4Cwv5ImL3JaRCu7P iDChbILVE7dN5CFt4rGJYQAMrgEUEDaRrMKEqJ5I6WYZw6riDOq4ABOPibAJ zukibVIONuGt2YTPJGCy4ZwuOOOrP/G7SrLfxCztdus4I1Y+xGPshxd0sAl+ eUcc0gm3atarnxsxQHybkVcWnI9u4/5w/8SN9jfZeNOTtc4R3DkR84Pu+LX4 Lue17IuauR80ocCHz09Y18Hk+pzrxjyxDd/Kgmdh0jbqUsPIkBiZq/keq2pm xLYwQayJBBgBp+CcLgjaBEsnww4Z2kQtocn47QgTLrOOTasEmMAwu6HyMtik ozGX013RR6vs76kiU9lHq+DQKgApVCincLqr2V3VrM4qQArwpLe1rKelFFQC PIF0NRYR87u6a7j0BlF/q5TXoRL36OQMvYKpkzO1MgaG3FweBr0cwIJZ009u GS/0sQluLk+VTvj4S3sIqoSCCfabUDYR9bcBTLjMRrCJQtCLNRqdnJrQBR/L QZtALFowC7yXvs4mCBOzgv6oTZhdZeC4zEth54L2nT72LMCEZMi2NY9sQ55A IoMPng85FBl8+FwgSGR/WMCB0NP7SZIcCPIjNvsAmJw7ezQy8HhE8IlzoX6R 4acunDsdff5M7IWzFy8EJseGQZJiQhKjguPPB8adOxMXcSbhfFDcubNIEkQK XGDRBNfgPXVoJ8Bk6xO/efZP/wkBmDzzh3+HgE2e+t2/PvX7/w082frkfzz3 OLH5JsBkxzO/Pnnw2YizBy+e80ObFGbGFWcnYKqK0tobCuCLCUJRS+haGROd AqI0Kgew5mXXi8leIbnTpASh+Aa1QvEEqyfrsmGJBA2C6EDmwGdD6VAqwcAf ivfxMYijQTPwxDjqNnidOr2Sy+iqK8hKOh96Enhy+vjuk4e3A08O7Xlm344n 9m996sjO5wKO7I48eyw5Kigz6XxBemx5dlJFTlJVbmJD8aXOmqz+9jIJvZ5a KhCCToEgRuT9TWgTCPHmQAv86IMfRCARnNMFSIHAiwI1p8tt5Dv1XFCJXc3C JdApobj0/RDc64Sa9LXOJr7TvajGE2rZrsm11nh4zLouFXgYAgQ8gpYBwvja ZG2TlIc2gQ/EVpR1mSCLKT/3wGfz2Dw2j1/0cWtcM+8UIUxAGYARh7TD1yZU 6WRDm/jUTVgzNv51r+LetOGNKeFdN8PFK+TXnAeb0PP8O6+COPzYkLwT7Nzj 7NxjnBzCJrSsQxBKKIiUdTbBtOX6deT799WcE7dcFDbFdOSeqkjcXRT1XHnc jtqUfY2XDtYm7imNeh5IknH698CTnJAnapMO0AtDORVRnMpofvMlfktaT1VC xZXAjOhD8UHbz58iJnQBT84eejwt6hi9IVPHb/aAsNySOY8UeLI8pqZsgnWT +3OWe3Or/SZgk2m3ZMTGdRnZoJIRO29+VHlr3nxj0nBz2kRWTIiFvCibYG5N 22/PDN6Zdd6ZdQFJ7l3zPFgevr80dGtu8Nq4aXZYCy9Jqz0mdimW7+E8BDDB C6J6Ih4is6FNyO7R9aHaRclfNuIru2nSrZt0a5EnaBPIkEXqNonBJg4dH3kC NsHuEl+bgEoom/jO7CL2cFzL6sbxRt7GNrGTW8mTNhk0wRiyDz4JfELIKkzk DLOcYZEzcUIX/MM9JiHYxCDtUfHbePRKsAmPXsJjlCBMftIm1dTwQMpuVHHb 3Vr2pEO8MAKvsMpxB3xJ+WATeNGHL/vcqH552nZjxrE8Zbs2YQGYIE8IPmD3 +vwgkmS1UX1utat95ZEWeNxy8dGbyz4wwUWA0T4btpYgfLCGgh+1WmT5YZu8 L0yWZ504rWt2zExsZEPubuk0w9dZBOdhu5oqkVASwdVZfVtOiJukTUxqtq9N +nqretqKWuuyACb1FelwAW8K2Q2S/maIuK9JyK7nMWoBKRyyeoKhhNJPqwGb MDsqgScoFMAITuuCIFK6m4rhZl9vNR8+LbdNJe7WwlNOziBDR6oY4AlJLOFL rOW7oU1g9LtuC3iy8LEeJqASuIaRs0JIQ5tg3UQp7F2b1sVGm5DhYMvJT9iE EgqcfSd66cRdXGZtY9WVS/Fngv13YMUEkBJ2ZndowC44RwTuhTcjg/dDgCQh /nvDzxyAhPiDSg6CSiKDjsVFBiReCEqJCb2cEJmRFJWZEpObnZqfl15UmFFa nFlRml1Rkl1eklVRnFVelFlScKUoN70wMzU/Izn3SlJWauyVxAvJ0aHxkYGx 4QERZ475H94VGXgCYHJs7/OHdj4D2bf1iece+/WTv/0VwOTp3/8bwOT5x//r 2T/9x/OP/+eWP/3qmT/+67an/hOyc8t/gU3g7H9ka1TosaToM2CTqynnsHQC Qim4ehFSkpNYW3qlu6UEhII8IbfaZOlkHAh8bddWWpPa9TIQyqBRgUGqUDzB dYZ/IpRH1lVGEB1oE4okeBPO8Afhe+GPgzcRQS6LEmwyMWwGngw5NBadqLej JiM16kKYH3ad+B3ZcXjvlh3P/n7vc08c3fV80In94L7M5AvFVxMrclJqCi7V Fl5qLrvSVZvLbCnid1cRNiEW5aimeILZwCasehW/w6xgAkDgBxFgBG2Crwg4 43RQN2CHZ6AKYPKQJFTdBC6QKlQAL+AUqiGF4gncpCBD9a1Qd6jOFF/CYKll lqyYYDa0iW/phIDPRv0muLTXzz3w2Tw2j83jF31MWbiAC2wwQWXABWUT3w0W N7QJiRqWb93kwazprRnxfQ/TIygW1FxgFp4Fm3RkHHlok7yHNundKJRHsAue U3gS0lkQ0FMcJGiMlbQmcOsutFw9Xh6/qyRmW1XinprkfTVJe6vjd5fHbC8I f/ryqd+u2iRxf09+MKvsPLsiituY3FeX1F4SXZzqnxqx52Lg1pgzz0ef3RF2 YsuZg4+lRB5ur0iVMqucGvq0UwQ8WRiWL42qViZ1qzaZIVpOgCd3Zoxw89qI cn5INmTqcxvYXht3Zli2NKldmTWCTVamjGgTrJvcmbPdmiEqJggTUMndOff9 hSHIizdGIC9c9wJSbkzb5kf01NRiPMOLlMvAgzHzkFEAPPGs8cRtEkLAERvY xAP6WJ+pIfvUsB0X6pxwW8fdlnGXZcqjp2xCTeui+uKp0olF1e9rE1SJBoaL azbBmV1YPbHr+h361Y3jKaRQDfK+QiGKJo7VRniHkQeugU+yvm4iW62bOLQD biPYQQCvyzDMQ5vw6Ks2QZj8mE0k7FqwCRZNyLoJYZMhfd+MkyhvLXhVk06y r9NBvPTDlx1ssjRlXZq0LoyZiNLJWqcJzunyXf734WwrH5v4GoSyybqb1Hwt X6FsaJP1y3bNP5zTte5dy3NEgwnuaoHbbuJ60fD0QJXYDQKc9o9ryQI9cDO+ ySEzeMTXJhRYhuxSYOM6m2CnSUdjbntDTldzPrOrjMeqUwo61KIu/PbBNSCF z6wb6F2toWAZBZHST6vt6yZ4ggGegFOwAwWDPGmvy+9pK4ZPDhQCoUh5bfB3 ICCgYBBRMsAmBhXyBMLzUQkfN5c3KAaMSgy1x+LAozCBwIVK3CvldQo4LWgT iFrM1Mv7DIp+g2J1Qhd8OFAIbQJBmwCa9I80m2C5hHIK9S74hzRVZ1xOCgKD BJ3aDiQBhkSHH74YeSwx2g/McjU1NPdKZP7VCzUlVxorszsaipmdNVxGq5Tb oxQyh2yaG3Ojr92//sGbL3z6/hsfvf3K+6+/8OGHb3z8ydufffru55+99/nn 76/ms/c/+/S9zz5597OP3v70gzc/ee/1j9957ZOP3oR8/MHrH7/36ntvPIBP BV+r4uzUC8F+pw7tBJ4c37f1yO5ntz35261P/Gb7U7/D7Hj69zue/u2OZ367 cwuc/2vXs7/d/dxv92//I5z3bfvD2RM748/7pyeEZl06DzyBM8AESAKBi9zL 0XlXYsrykhsqMgcYDUA/AKBOxgI2QuDLSxKSD67EjiGrltiyxK4nKilUMYWa 7kXpwzfrZmqtM4hvKIPAGfmDfwqaiEKQ26pymGQjLr3XqRse1IJTXFalXsnl stqaawsriq7kXomLjwoM8j9wcPvTYJPQU4eSLgTnXIopyUwCmzSXZ3bUgEpK uN3V/J5qMaNe3FvnWzFZndnFrIOfSHAGm4hZdWgTuFALOuFHHPwUwnlccIbg tF74yU8uojiAa7njvrG+pROKKnAB77UqGRYFHQJ3qLleFE8eXeOLapmH94JH sH+EmvTlG1QJwsS3D8X3mmpFmYbPs9Hawps22Tw2j83jpw+HtN0ibDLxG6yi Fpeiy0NssNhNbg3fQdhEvbqJCba9j+iY6zJpHhg39oFQ4GLBJb49oX1pwfr2 nOT+EAtsQtRNCs/Q8/1xThfYhJN/kpN/gpN3HG3CzD1CbMWYAyR5WDph5h1n 5B6DM6vgBKvgJLvQr6/Yn14azqyIFLckSdtS+qqj6tOPFcfuKo3ZXZ10sCbp UFX8/qq4feUxu/PDn0s/9burZ/6UE/JkVcL+rtxAesk5TlUMuyaeXnmxMS8i L/5YUsiOuLNbE0N2xgXvifB79uyhx5PCDzQVJwhopQ4lbdIhmHGJsSn+xqT2 1owB53TdnjbA+ca4FlQybuMNGzkuPWvMzr82ob6zYLm9YLk+pVscV92YBJuY 7y7YX1hyPVhy3pmzX58wrtpkxnFnznlv3vNgcfjFpZFXbo2/fHPswfLw7Xnn 8qRlzqub9qixcI/bl8DrEbEki0lANJuYRCRPhB6j0GUUOA18wiZWmdehGHVq wCaTw8apn7DJ0EObEDxZtYkObDI2qB6xK6mO+CGrDJvibVpitS5iZhfYhIKJ mAajULWQGIjqJD0UT1AoVOMJCsW3gIKzvKj2E6Ju4mMTs5oNnwE+swaGuKLu 1ZYTSY9RAkgheOLU81wG/tqcrg60CZ9RymOUkjCBMwmTnrJHbSKgE2sLC+jV IiaxxQnYZFDNHDHzJp3SCadk3CGecEqn4TXXC98+4/K0dWXWsTI7iKWTZXLX dSQAMgRccG3GurR2f22ZrLUlhUmJXMeQNnkIE+om1fy+bqbWI6He5bsgGBZT 1i01vDBpRZhMDOlGXWrvoHLILrfp+Tgah3E1jK4BKSNOlcemolblgngdMCpT D9lUZD1FMzKoHXXqxlz6cbfBY5PAt4ayCcAEF+li0yroHSUAB3AK3CTqGtIe ovOIXLTNoGCohJ2SgRYuo4ZLrx6AIFJWnVLd31M70FPXR6thd1dD+mk1OL+L 3lbGIGZ5lXY3FbXX5nU253W15NHaCphdpVxWjYzfqpF265W9BiUdsnqhIq6B IYARvXwAo5P3Q2Doq1cQAVxgUwm2tFM2QZhoZUzfogmX2Yg20UpZWHkxqYgv HS7wRZZp+izaVZsYlPDhRN1ELyUX6fJZpwve/EH1hLyGZ/u4RwXOxUYh3FER nwzwbcUd3u/fHHlwa/Tu8ui9GxO3r43cWvTeWhy9Pjt8fW54edb76r2lz957 7du/fPr9d19//+1X3/3ls2+/++rb77/+9ns4f/X9919///1fiMB7v/vq+79/ SeSbL1bz7Rffff3x15+89ecPXn//9fuLkx45nyEZ6OGzOuCskxFfOj6rva40 JzYiIOTUoaCT+/0Po1meO7r3mWP7njm064mDOx87uPPxY/uePrLnyeP7nzkf fCT1YhDY5GrKuczUSPBIRUFqZeElsEl+RiwE7kBAKOX5Kc01OazuavFAu1JI X1vQoJ/crYYHASgBMC0aISIFhYKIgFDi8M2jHvkJmFAVGfi0WKYBB0GwekI9 cnhQZzNIpkask16Lwygza4R2o8xtU1n1YoWI2UdvbqouKMhMvJJyISU6LCMh ujw3vaWqgNZYzmyr4nTUsDvgDD9zmpTcdnlfi4zdJOoFj9SCO8hOkzoJZ7UX XsiogTfRJjy0CbNOxe9w6rkzw1piT6u12VzwWkAW0Pm4N65Lz4WQE7ew6jHg iwsIFlDALDYVw0p01bEGtWzsRhkycYfNRE1kYvDhGsJrWZ2vhfpY8GogiyPa pTH9tVEdXMCb2GNCPmwtQ6RchuFDQCtoE+L+tFuOGbcJxyx8zKiZB4EL7Ij/ uQc+m8fmsXn8og8FPc8wUGYX19pFtRZ+tUVYa5c0WkSNdmmrW9U9pKUP61mQ IR3Lq0WPsEb1bCqgkglTPwpl2sa7MaIEm7wxL7jtoQ3y8vqrwrvz/HryT/Xk +THy/ViF/n1Fp/uK/EEojKyjvRmHmJm72Tl7Gdl7ezL30LMPENsy5h2Dh/Xk nKDl+fUWBHTnB9AKzrDLwxkVEezq8/ymOGlHCqvyXGXygSJi18XtlYn7a5IP 1qUcLo/dXXxhe274lvSgZ1LPPHk5aEthzP6mjLM9JRdYlRd7SqI7CiJr0gNy LuxPC9meHLQ1KfD5+LM7zp/cEnHsqYtnt1dmRnA78q3S9hFz35RTcG1MuTyh XhxVwMWtWcO9RcvKtA6upz1ir7VvUEd3aHvmR+Q3prQ3Z/SQ23NGeMzdBfPN WfvKzPpgwzsYBIIXdxZcABPI3UU3vHdh1DA/ooeMD8pX91UkbYK1klGzdMQk HTKKPQYRxKUTODQ8p04wZJKMOpRTHt3MsAEyPaSfJJeseTRUAyk1v2vMZYCs DVC1MDQdtqtwn0SPTeY0i8jFiMi1iVTE5iYmOcMIIzFJD9iBCiICKx1EfLrj QSjIEzwjT6i6CbFOFwjFKnJZhHYDDALZ8IEb2sTss04XaRO6WtDJ663i0av4 jMq1xhNwSqWgp1LgsyM8r6eSSwYezKXD8LiCx6iWcZv1MtoovC67lZMeFQQv pobUC+PGa5NmaoPFWwvOO9fIFbEWiQV+qX265ydMGzri0QZ2qq/kUX2se9eP xfezrVvUi/r74KyzMbcG3IHrteLiSNh6bDcI8Hf+cAeugSdAj1Gnfu2bDgM8 lcdKfMdx00x4Aow4FWNuFYSoZ5Ed3xppjwK4wW0V9jXx2Q1Akn56NZdZC06R 8trkgg6ifKBgGMn9bnD1KgALPpjHqocMMGr6eqsANezeSghcY/p7q1AuRGGl o5TZVtzbXECrz+2uy+luyqO1FNDbi9nd5QAcAatexGkkpvyREKYmFhIhmlCY VKhqyKOhbELxBB+PzSYAE4iwr1XK68Q+FHz82oSufpwAhtAjqUIs8KWT0XTS 7nXRiDuNil6IQQ5/4R6zCv5TMFxmwZRXCyqh1k+gepcezdrO70N3lr13ro/c vj7y4t3Z115a+uCdB199/va33wBPvvgOuPHtl4CR7777+u/f/Pnbv3+BNvmO tMm3f//ym2/+/Ne/fPrllx99/vn777/54I0Xrt9cGIVvvVHJI5dlZnusKnwa OE1yk4ov59MF7I6u5pLqkvQrSeFAj7MndkJC/PfC2e/Qc+ARyIkDW/yPbA0+ tQeLJqASSHbaBcQI9ptg9QRSmpsEKc6JKy9Iqq+4QmstHmA0SLgdckE3Tu6C vwZEJ+uHvwC5Nw3WUCQUTyDrrIHZECzUrC2sj6BESIzIqCoJhuSJFP4U6vNj 18mjnwQIA38lAJRazJHx6KK+bgG7k0/vEDG7Zf09Cm6vrJ8m6esUc9ql/e1K frdeSjfKCaHDM5bPrBNzasScap/UYqT99dK+RhGrTsCo4dMhcLPVruVNurWj DsW4UwlCmXAqV3sPLQJcccut7/fo+j0ETIAbfS49B+LUgT7Yg1pgCMuhYULs agbGpuqxq3sdGrpTx3Qb2EOm/mEzd9QmGLMLqZlaMx7VrEfjWxkhOkrWeEI0 yHs1vjO4Jl3iKbcIXgohs8PSOa9s3iuDi5khCdyBd026hJAJp2DcJsBJXNhj AjCZWFu56+ce+Gwem8fm8Ys+JN2ZGnaRmV9p5lXq+8oMA5VmQa1JUG+TNLuU Xf89m7y5ILzloTm4uWATWv6p3vxTtNyT9LyTzIJThE0K/dl5JxiZR3quHOxM 307P2svKPcDKO8zOP8YuPAmh5ZwAy9CLAlmlIYySkN6iEHpJGLPsPKvsgqAu QdaSyiw+V5VwsDx2H6Q28Uhd0pGGlGNVsftLz+/KDX42PWhLWuAzGaHbSuIO N2UG0Yqj6OWxjIr4lpzwovhjaaE7kwO3JQdtSwradvHMdoBJ+NEnz/s9m58c wGnJNotbRy39s24xMARgMjcsXSRtAlkaU025hG4jy6amOXX0MTvv5jSoxEC+ 13hn3nx/0frgmm1DmwBGACCUUHBhLrxYHDPOeXU4j4tqhMfgRu1uI39YL4Kg SgY1PDuxLyEXbOIxicEm8FoGKoEAUv5xm2BPAfBkbaSq8TrUML7FX7m7rZJB kwB4YtNzrarVjRfRJgAHCia6tWW1kCfYjbJu8S6qhuK7+4nTIgCeEDubmAVo ExhwasTdGh/yGCS9P7QJn7IJvJpze7HlpIISyoY2AZjw6dWgErSJUtBm07Kn hzWzI7q5UT2V+TED7q6IxQ6ECWRlrWJCwQQssLEj5n4KJv9Nm/gUVnyXHYY/ CP4+8DeBse6YGzQhHzSJUCLUFh64xwS8iddwE20yTHyjUSUwuoPBmNJtkXus sjWeyL2DREAogya+TQ8fywZ6KEVdwBDxQAuIA0gC6ICgTeBd8ACDkmnWcCza PjjDtU5OB87I+O2i/mZ4JJdZB5whPMKohsA1aAWMwyPDpdcQQukmeMJoLaI3 FfQ25nc25nat8YTVVdZHq+jvqVLw24myHRiWnFWI0UgZj+Yftwk8GMbJAk4L jJkhaBO46Wscajmvf9Am4F+AiUkJVO8FlVg1LIua6bGKZkb1SJKVBaJfCVdX +LGgTW4vDd9e9oJN7t+aevXFax+++8LXX7z73beff//9l99/9+V33xHlEhDK N6s2+fo7QiVffPfdl3/76+effvrOKy/fnp8bdbtMRnJ1ZTAI/JefGrYQ67A5 tHANZ4QJ6EAjIaQgF9DAaB2NhRUFqZmXIlMvBiVGBYBTQk/vC/LbHXhyF5zD AvZHhR7D2Vy5l6NRJUVZ8XBBeaQsLxlSnp8CKctPrChMri651FB5ta0+v7e9 nNNTK+f3kAtEs7TS/5+99/6OIz/PfP+Aa3vvaq1sK2tG5CRpAmeGOYIcDocJ OTKAAUQGEYicMzrnnHNO6EZmzjPkJM1ItmTLlmzpOMu+96zv7lp7n2+9jWIR AMfj3XvPzA+o85w61dXVjUJ1o/F++nlDNr+LW1soy4tSvAgfhNbGv6vHwcSJ J+En4NCzEa3wO4UezYpn4BEGh+GsgCchlwGE4rNpIi5T3GNN+e0zYdcswCdk S/pNqYARyoRNMxFzwq8Bnth1IxyJrMEmDt2AXTMINrEC85XQgNswNROx4vP8 8rTnasZzezF0Y5bldLGvqrjidNaDK2pcCBtmQ494hEgk5VNgLaSSZSkITGbD 6vmodjFuWEqYrqVt1zMOoWlyI8MRysJKEZsITRPo7qLn3mX3vSUmApO7i647 C2ATwhOmm3OAFPutmTX6dFFa12cd+Kwv68v68rlerFMXfKrmqLEzauwCm4QN XWCTiKk/YRvOuKfmA/LFsOp/jU2mDQ36nmOy5v2K5v2Shj2MTS7u07bs1zbn qBt3K2q3S6u2yGpel9W+Lq3drGjYrr64R9WyT9G8T3bxgPTiAXHjG+KmN2Ut R+VtudLW48bek4buCsfQOc/YBfnF/O6SbZ1FW7qKt/aV7xoo3z1yal9f2c6u gs3Nb71YdfiFyjefPXf4hday7aP1R6XtJbLOMvGl0oGao01lO88d23TmyCvn jr9Wlbf5zPHXi/e/ULD32cJ9z9VX7JMPVIVMQ/Nh1a0ZK8DkPvv4dT245nv/ Vuj+Zd+1tHUuop0Nay4njLfnXQ+vBT++l/zwduyDW9Ef34l/dDcB/eT+E9mE eETYMZi2H95I3FkMMrM+YqISePqijMZs0f65gHk+aGF2id+Y8uoTHjY8PRM0 z0ft+C/2adhkNZ5Q/1gBngQvZwLEJpx14pxN2IAnEGU4k3XCAITDk7UlqEAB ntBkRrAJ4QlZJ4QnGbBJwjqbsIJNUtzURZ5NeN6JcmyS8Gqo3oRKQXEOAauY sYnsEZtAT2ITCAdb1IiBe62aAcSN8wkzSOT+tSg/8x3CBoEJjXEHm/z47VmI nzxCePL2zQQIZU2OWI0efA+u1cd8SjYRin404IjryhVDlHtt3reYdrLpMLFH 3XGF4sGEOriCTWYTDiotIQFPFlJeCGBCbMLhiYuUjjI2AWuEPUq/Q0pthCmz iwgFa9AH1apHQaMh0BB+qB4PIfeEksFwGM8melU/BCrBHsjMicOTXqOsRyfu BJ6ox9tUY63ZeShjzfKJVpqZohK1k3vi0I+6TRMI/IhQAg6Ff5U+mU2EOV04 2GUWC9kEN7GTGEfoxXx6NiHThPAEYAIcFrIJuOO9exny2j6BTRiePJgnNvnw 4dLHH9z4i58//Ke/+/P//q9/97t/+5f/+TuWpvVv/+Of2QbjFGz/y//4b7/9 b//6D//0j3/1q1/+9L13b15eSk4nfYmYOxH3LnBZfHydEfCEvLO5hDcVskc8 RgAC2ATy2uQO4xTwRDHVNdrXALIAfQBPio/tzju0LffNreCU8vwcMEvThRLA CLEJkAQsA+F42uhuOQv1tJ6DOptPdbdW9rWf6++oGuisHu6pG+tv1EoHrdpJ j0WJHwoyopQ8Su4SEgq0upEX4cOTJGQK/kmITaj0HqKBOPxOYbswIZjgSKIb mqHDVzYlvLakz54JOedj3oW4dy7myoRtLCeWyb6QtM9ETfgwdBrGnsQmEKgE bMJpEGziMYlnozbyTRibLAQ5NnHxbLIYN4NNFiNGIZJACY8Mom2eSshAyQRV BCacaaIjNuF9k2yTrhnPzZk1ppnwle9ko5CTwpkp/rcv++4vee8teu4suPHf 8Nac8+asQygaJX979hGM3Jl1Qbe4rsLY+KwDn/VlfVlfPteLeeI8pXVFDZ1g k6ixJ2kbDBl6Y5ahtGtyzi+dDyoWQqr5oOo/xCY/npeBTXTdx+QtB5QtB8T1 u+WNe5RNezXNOdpm1klYUcOxSd02cfUWUfVWWf0u1cUcBaikIUfS9Kb44qGJ +oOjtQcnGg5PNh0dq3tL33NW03XaNlzjGK2TNBV1lu1tL9nVW5EzcOqNgZNv DFce6i3PaS/Y0XDolTNvPnf64LNVR1+6dHLPWFOupL1M3F4mai/vqzlaX7qr 8ugmqLpwe1NFTuUxxia5uzbk7XmmumTXaFu5Xd4+7RVfSxnvLrnAJiCUe5fd txccSwmAgGExbro973n/Zvzje9M/vpP6+F76g1uJD28ncJMNf7+N7SQByAqB QUhEJTywQG9fjS7ErQ7tsFM3itg72zR4ecbWXJT5BQAT4EkmYCI2SXp0cbc2 HTDNRW1LKff12QCohIHJXPD6fPxJbLICT24sxIVscmWGY5NM1jchNpmJW5l7 EtARnsQ9Kh5PSMQRfIqXcO4JP0GeTTNcdk+AJ1Ryko6bgScUV7Mv570qPJCx iV3CzzeJciNOqIfwPGuhbJsJG3EOOIBZISytq4scE9oAmAjZhMBEL+kEm9h1 QzbtoMs4GvcpL6ftIBGeTR7cTECUzcXjCRHKB1xRwKPKjmUXY82crjWpZE08 +Q8hCUWwD+9Og00Q2d5YDABJrs55lzKubPtlbtZGMpStiRBCCnWmomicbJSZ uH2BqzcRsAluMhpdFmOThWknxyYmnk0CTpnXJiY84dkEnAL0wP6QW4HDcCb0 EJwPlYrzUEN4AjYxqAeYltnEtMwmJgVgk1knWlGHdqpdM3FJuTwVhRfwRCPp 1Mm6Tco+EAqiPg/IyCryO+Q8SvA08SQ2WWGaCNmEik3shkmPVbqCTXh9SjYh x4SyucAm5JvMJrI5XYAOel9RAdFq8YM1P3ww/+E7Cx8+WASb/PTHt371i/d+ +/e/+Nf/+zf//f/5h9/9G3NJ/ue//Zb03/7r3/793/z8Zz995+HbV+Yzoem4 Jx5xQOmEZ3Eucv1q6uZS8vp8jPoecK+7nzZmQC4BK6DAb9f4bGqvVeUwinAR aBIlYE020QGOAH2cLT9cmru36OgugAm2q0/nttZVUGOutvoTgJG+S1UDHdW9 becBI1hD2EPqbz/Pgcl5xiYd1YNdNZBouE0t7rdophwGqcskx08HofDlJ0L3 hC88Wc0ga4qYgoCCZ5NlF8ZFosyx5VwvF2V28QldwpSwuP8RldDphd3GmMeS 8jtmwu75mI/YZDbqmI87uDJAx2LSjo87fBICoh26AYeuT6B+bs8Azyace8LY xG3M+ibXZnxsuNJ84FrGQxWIjEq4nK75sGEeH6f+LJgkvXISzfwV4gmxCaiE wGQ+qiU2WYwbSeCd5ebAnluzPn6UyaOhJ+ARjk348pN3roQgroEwzWqk6hJW YHI9w2r3ON55pJsZByV0UW8u4fZnHfisL+vL+vK5XvQjlQ5JbVDbFta1g01i pt5pxzDHJoPTzolZn3QuIJ8LKGf9fC38p2OTBVna2KjtOipr3k9sImvYreDY RHNxr6phl7xmm+T85qkLWycvbBXX7JQ17AWYqFoPazuOz5o7r/tGbkckN0Pi a/6pRff4jG3IKmrVDtcZRhtVfRe6q45V5W47/eam1oo3OisPd1ce6Tt3vPPU obbS/fW5O84ff+Xc0Zcu5L7acmLPcGO+qv+seaJe3HWqq/rIhaIdJ49sOnX0 VWw0ntwPNinKef7YjqfBJjWluweaikyi5pRHtBTX3ZyzAUmwvpo2LcQ1maAG H+PvXA0DSX5yP8ORSBJrIhTswRrbT2ITckn4AYvv3UrxbPLOtRiQRDneKh9t DljFrCvXMpVgTRsLISvYBGBCSnr1YJNpv3E2wtjk2owf/86o6db1VVMASKvx hHwTqjoR+iYQlZzwbJIO6glP+KoTqi7h87tw2pDfIlpzfLwwuYsvPJmOmYAn CK2zRQ1cA2H2Nfiq2Ysr2ATngAO4TK2V9SZmabdZ0mXkJe0ySLt04g6wiUOP UHbEZ51M4XWccb5zI2uXUB4XRITCi3YyCbnjzhoWyWorZEVz4NV48snwsqLe hIQD7lyNgEqAJKA5XDSAAAQQIBbg2YRrJ5V1B2ibD8txQDpqnY27Z+MIw7wQ 5XSBTcgvI8uM2ATC8wMxyAEBm/jsEmAIpWmRaQJO8VhF2I8DcCSxCT0KqEKK eBHSy3EYDW00aYeY1IMAE0Yoy2ldYBOTnOGJQdqtF3fqRZ0arufw6gGORChG rgLFjnMwjHltUp89iydPqjQRpmYJTRM8BI/l2cSsGXWa8BvJV4DJ/7JvAjYB lUDAE5A42OT9+zMfvbtADEKzO1ezSXZiDsOTObDJB9CDxY8/uP7Xf/kBwOR3 //bb3/3uX8go+Z+/++f/6x//8s//5MHDe0vXFmLpuDsasMwkvfPT/vl0YIFX Jsi3hhZ+I4H3ANhkOuyI+y1Bpw5g4jTKHIYph3EK1wSMhquBa6KV9U8MXgRx NJwvOn/iaNXJY3VnC7BNtgj5IxBgBMQx0FkN+sB6sLOGGGSoq3aoC3uqoKHu mpHeegj7x/ubRcOX5BO9WumwWT0JQuE8FB1XmG8kPOEKTx7rMPxptMLveBKe rNmvmIrrqXyeUsJwJjgfCCcWdOohnCTYZDrg5MDEPx/zgE3mYqwB+2LSdSXt Xko5wCZRri+EUz/4OJsM8GyybJoMWFUDYBOnfmI6aOJ6JzI2uTHru5p2k4FO pe6zYf1MUDvj16S8Cp5E1hTvnsyEGJgQm3DSzUf1PJtcSdk4mnDdyHiupZ38 rBMasMgPZLzPmSZ8h67Hpskv+OhIfiK8cC48zyZUY3I1Yb4cM1JR/Gcd+Kwv 68v68rleVP0VlskLfnVLSNce0XfGLf0Z1yjPJjNeyaxfNuuXz/jkn55N/vKu +aNFecbUBDaRXswBm0ga9jA2adzDTWBkbCKrZmwyUbVj8sJOUe1ucX2OpPGg su2Yqa/khm/s4bTqZ9fdv36Y+O2fLP7Xv7j1r391719++7N//qc//Zd/+tPf /u1Hv/mzu3/24eWfPpj94HbyQ0SMV0LX046oQ+JQ9mtGmzsq32g7lXOp8kBf zdGJ1lJJ92l539nRlrLWM2+ezd9acRhssrmmdG/b+SM1Jbup5CR398ZzBdt6 6vLUI7Uxx/hMUL6U1EPzMfV8THM5ZbicsL9zOfIx67I1+9GdzAc3U+9ei//4 9vTHdzPY+ePbaWxDH95KrckmgBHiEYjfpkSvhzcSl1P4t9wtG7no1I0AAYAq JITi1JtlLmie5UyTaZ+BcrqITWbCVvwrFLLJmmCyJp4Ii034epNr88Grc4Er s/7FtHsuaSc2yYSNhCe8dSLEE2ITgInPPEU5XfwMFBKNPgGe8IUnwBPGJjEz hdnsO/blBsLBZTDh2STh1Qhr4Smni/NNuoVswpK71mITyMK+Zh8EnvhtU+mw 7vqcm7dLhCRC7skK8YghpIwnsQl/gPBRa+LJp2QTPC0ezpW6exemHeQxRX1q mu7BRntwJR5cxbpO2IeKJGQTupkKmzNRF8JRwhOeTXgwWZh2zaccEF59ys6i KR5CNqG0LjJNqLUvzgSngXPj2QSPIkLBXYQneDgIxWYcsxpGqUyeWSdcNhdl diE2Myv6QSgmWa9J2qOXdvOzUXhC4fO7yEAxskqifpdJhCjaa5PxM/54BvkE NiHoAIDggQjFEYH/f8gmMa8CEpom0yHtwrQdLyXQ4yfvLxGSfDKbMDx5e/aD t+fBJu9DDy7/7Cd3/+avf/rP//jLf/qHX/71r376Jz958O79pVtXEgtpXybu TIVtybB1OmrH9mzSPT/tXcwErsyFri1Eri9G51nTA9/idIDaRJOBwo0+ZEoG bRGPkZkmBqlFO27TT+A64LJQ+zK9YhB4opjqGh9oAoxQFUlX85mh7lqI6IN4 hLgDGu1rgMb6G/EQaLindqS3dnygYXKoaXKoGfuHe+omB1smB1unhtpl4z0a yZBROW5STbjNSr9di/g/4jGBTbiuwi6+369Q/25OF8iCz+ZaDSY8lQBGaGgj P7qRJjPSw3EORCUrFHMz3yQTcs1FPbMRVyZknw5aZjkj+2rGs5h04OMu4lZ4 zJNO/cCabMKkHaJaeKo3cejGEz49dXQH4Fyf8YJNqFsjoxKuAVcmoMngj8st i7ul5JXwLgmf4iUUzybLYrXzcxEdlwZgXrZOsmxCWV7CFl63lge+C3V7znd7 3n8HWgjcXQjeW2S6Mx+4Pee/NetjFsyMF8JzUg9hmrcIHlmKGkgglM868Flf 1pf15XO9KHpLLZNVYJOIviNq6EpaB2bco2FjH8cm4xmPKOOTZLxSiJoG80jC C2wCgU1up8zvX/ExNrlj/phnk6Z9VG8CNpE37lFd3Kdq2qOo3wk2EZ/fPHZ+ +3jVDnHdPnnTm7KLb0majsiaj7smqzVd5eLmYklbmaqnUjdUYxprnJponhxv 1qr7XHZRPKJfmvfcuBr66L3FX/zp7V//xTt//+sP/v6v3/+HX3/wd3/9/m9/ /c5vf/32P0F/eefP307OeSXa0dre+vyGEzmnjm85cfT1moqckUsnjJK24Zay xpMHqgp3VOZurqvY199UpBisTnnEc2HlYkK3ENfMhpWXk4b7lz0Prkbfu5EA kgBDPr438+M76YfXYu/jJtDjVurhtTju/fD2NLb59C2WwbVcY/IuxyMPbsRB Ig+ux2mi1t2lEPUNxn8fhGRgE8RmCPtBAQjCCVIAJiCUGb8JbEJV8Am3Nu7W gE1SPvCLZSHhvJLxXgOV0JD3J7PJCjy5MsNXwQe54miW23N9IUR4spRBmJpN 68IJsJlfwUfWCWV2PWITDkx8pqlsbTKXmpWVTZzwqZN+TSqgnQ4+qoufjjI2 mVlmkwjHJlQ+kGUTbr5JzKWMefBwHSsvDZtwAmGn3GuaWlELz9WbcGwizOmS PqqFt6j7gSc8m1BLrnc4GKGSEwYmvLBzWfcFeLIaKNZ0Q/jj+ccKj1xBMcLn WZ3uhWe4uRQElaRCelZg7pIHOdGkj6hXxeNJxPso9uYbTFGxiZBNkiHTTMw1 G3fPJTwclSBY9fH92YhN5pIOet15ssCPA4MATAAXTtMEL7dlCsxCGEKIxLk5 pnhAR6XxUR9+NHt40JWVG89gnnQYWMsvkxrh6IBR0W/VDNk0wzb1kFXFMlss in6LvN+k6DXKe7NT5iVdBCkKjk1UXO0JbmIn7rLqxhzGSZdZ7LVJA04FRxBP 9k1oe9k0Ac64zWI7F4EblENYIyAnzFmd1iVkk0fc5wKPS1co5lPEODABkhCe ZCL6K7NuvKCAkZ9+cJmsk+VmXCvxhM8kfP/+zPv3cXP+gwcLHzxYunsrvTgb mkl500nvdMKbjLozMed80r2YRoztjvtNXGNeXSJgTkcceH2pQTRe60zUeW0u emMhfnU2AiQhSMGfP94MyZAt6sMDtT6bymtVeiwKu36SfBOIZXZpx1kxjgIs OayTD8gmOqaGmicGL04ONjNbpLMG6CEZuyQaacUGeITdNdQ8NdwCYSdJMso0 Ndw8PtAIMMEx4tE28cglTh3SsS75RI9K1K+RDNr1EpdJAUriCuTNiYBNWMC+ LHAH+Hr1NPlHdShC60TQpMvNNxMW9ubiBi8CTLJjU2gyI34uwATnQHYJ1sJk s+mQKx1yz0Q883EupyvK6k1mIjbK6ZqNWpJ+LT7QHLoRLomrz5lVv1M34NQN AkyoT5ddM0h9uvC2d+om4h7tQtyxmHAupZzXwAsZz3LVoSGLJwFtBn/1bmnM JYl7pFRmMh3gMrjIK8FNUIlXnuJyvWaX2YSSu4AqM0F12q/KBNTzEQPYBBgC 1ri3ELw54+bnuT8qb+GmouAmsOXmrJvlei2BRwKsrxcn8AiJv0lUcj3tvjbt upHOTjO5lrQASRYjemjdN1lf1pf15d9dpi4dN45VhnStCUt33NwdNXXHLb1R M9hkIGkfmXZNZHziuYB8PqjgHZMVYII1doJN7s3YPrwW+Nm9xG/u2T5Mi6Z1 9cae47KmfdLGvdSnK6vG3fL6HdLabeKarZMXdjFV75mq3S9pfEvWkqdsL1L3 nGo/ua/99JuDdQWDDcWdVXkd5/P62yoH2s+M9lwY7jo/3lczNVivmrwkHW2W jl6EJCNNJPFIk1V8yTLVappoNkJTLeqR+qmuMy1nD58v2nUqf1tHXb7PNPzh 7ehf/OzGn/3kCta/+vnN3/zizq///PYv/+T6b/7s9t//8u2//8v7f/fnd3/z pzd/8ePLf/Jw9qN70x8/mP3pu/NYf/TOzE8ezmHjg3vTP3478+H99Lu3ExC2 sR83qf0s9AE3jI/NAee+k//4wTxC4psL/rhP3ddW2VSVrxhribkV+L+T9Gk8 xgmtqNMg7fGaJgEC81yVBwhlLmrGzaxjAjDhHJOYWxPllPQbMjHbwrSb5WLN +qErM9HVujobWy0BlVBlNNUdPIpR6cvzOa6oEwJWpBB/BrTUs4vhg0MetklD VknQIg6aREHjFCV3rRCb8O5R4VFsnDH3SzFXaNlAwQaeM1sIT/UmK0Y6ctMl UmFzImiIeNUBu8xrFhkVYJMeEyeGHgo2XdEi61ldC497DdIuKoQP2EWpoGZp 2iYEjRUcsUL3OTzh2WE1WXwym9DTCsHk3bvpFUfSYfTktJO6gd25GrmScc0n rNMhPS4F70NRphyV81C3AVzA+PLEc6FvQpBCYwdpSAdjk7h9NgH6wIvr5EWF 8OSeYAPHTEcsIAsCEzJNACaAEX4II9a4CWYBJVFGGV/wwofuwjMhBd1av1Pt scjtemZVmJRDRvmgTTNi147a1MNW1RDw3Mz5JoCUR1leXB2KevKSaqJNM9WO mzpxJ6tMEXVgw6DoM6kHATs4JQ8rP5EGlyGO5zhSyKEMO1X0t4MNv1XmMYnt iL1VI2blMGRVj1Ib2NXF9VRfv4L+cG0jPmXYK1+tiE8R9SvjQXUipElFdNNR /WWEdlcj795Lf/zeIvAEa74f14oyE943ee9ehvq/0VQdahZ3YzEwn7JTaQ/O BCfmNIkAFG6zLOo1ZKKOZVMsQNMJaXg6SAR4cn0+BmEbWDobd2Vidrxq3PRJ mdsicpnx+k65jSKXYQpy6CZsmjFcE8ikGMIa1wprXC7c1Ih7FZNdQBX5ZKdi qks63g4GYcQx2gZUgbCH7oVk4x2ysXbp6CXJSJt4uFU01AJhG3uwXzHRqZzs Uk11QzoZiHXUqmW/TsChjXpNiYA1Wx3vsyUDjlTQNR1yp8PgCzeUARQIrEB+ TzoCnAHU2yFskHifiD9mhVZUshDRUE7X8gSW7CD76Qju5XsUO9JhezpknY3a ZyLW2YgZwsddyCbxm6ZcwBBtH8ml68dNl27QqcXOAYdm0KEetKsGbMoBqwJ7 xgMWsIZhIWbnSuCdiwk7fT3F2GRZM2F90i9P+mWpAFvHvZKEV8p6BXulaZ+M lPHKZnws22EhrF6IaKD5sHoupJoLqmcDTHNBzWLEeCVuuZ6y357x3Jn13ci4 QCXZbmDLApjQKMabnIFCnbvuLjxySQhDICAJbmLjasq5FLctRC3zEfNcSDcf 0hKSkMg0WfdN1pf1ZX355GWi9ahh9FRA0xwzdUaNnRFjF7FJ3LqaTVhC14qc Lp5NsMGzya9umd5NjMdV1WATRfN+OddGGFSivLhP1ZyjurhX0bCTgUnV65Nc TtdU9W5RbY64/g1x42HxxWODFw6dP/zSmcOv1BXuaCrLqS7cfaFwd92pt6or DtaeOlRz8s2GM0fqTr9VX3m4uSq3pSq3tTq/raagva6os764s6FkvPXEeNvJ qfbTst4q1XCdrP/CaNuJ1nNHLpTuLT3yasnhTRfK9/U1l4oHLkyO1MmnmjWy dqt+wG+fiHll8wnj3Sv+t68F370Zef927L07iXfvJB7eTd5a9JFuLHghbNy+ HLh/LQwqAaf84uNrv/nze3/3q4d/+1fv/vLn9375p3f+4ic3/+zH1372wZU/ eW/pp+8uvncHIDMLQrk+50V42dNyqvrU4daaorHuaslQI8ItyumSDjcZZb0h uxSRfNSlwHqG8qk4MEkuZ3M9YpMAYxOgxBVQyf9vbDIXtxBEZPHE/2jcScQu A5sEzKKAYdKvn/CZpnzmKb9FJFR2yDtHKGyisV8LUfkJPSHCbJonzreHJTzJ VqwgtObiaoS7bNqdQ+aziE2fmk0syj6wiVnVBzYJOsTTIS3Y5J1biU9IwVrN JjxlEF+saaA8CUxW+CYrcrr442knNeBC8Hl1zntl1oMrn+aamFGOnLCWBxdN iCcx/8qELj6Q5mcvEuKtySY8ntCEFBrayPkdcoT6BCagErJLhGwCbPkPsUnY owu5dUGnxmdjFeh23QRiXYdujInhyRDL7JL3AU9AJWAToArVyEMgd/ylEI8Q ntBIFI20SyfvNakHCE9wVl68kRxSP2svLIPwi2QFvljFJgi/Kdim8JvYxGeX r5awpTAPff8umyTDWmKTa/NeICcog9jko3cXeAxZrnzPOilZSHl7FlRC9hke iLfEYtqZ7Wu3nGuHs6KqEKdJ7LMpwSbTYRvPJpStRGxyOROmkhOeTeYS7nTU hhcLvxfPJljjmgBPIFwKwAiuD08o2MAe7Me9uEp2wyRlfOnkAxppn1LUDUhR iXvUkl6scZP2MLGpmh0kwAgJ29zMTQYmPJuoRL0a6YBROWLVTbpMMq7DsJZD AxOHBvbpkCsT8cxEvTNRNyEJ/b5YE63wzEI8ImQTIaHw+4VoI5zVuNyC2ElV 8AQmy42I12aTTNiaDpkzIWY04+MuYBF7DRNCNuHUz1FJP8RRST83OJ55hUZp v001GrTKpwOswg6ai1oorTcd1E4HNFDKr8Y67pUCSRiV+KRQ0idjbLIMJsQm pJmA4jH5lTN+FbHJQtiwFDVdjpmvJmzXko7ZkJ4Gzc+EdIQkV6ftt7jakxW6 NevlWnt5uObD7utQ2nWD3QSnuK5OOy4n7Utx62LcMseqY1QZnzLtVaTcsqRL Ck175NBnHfisL+vL+vK5XsaaD+uGT/hUTVFjR8zUFTV1x8w9MUs/sUnaPTnj l/C+yQo2Efom2Lg/ayc2+eVN03vJiaSmVtd5ZKp252TNDnH9bmn9LuCJumW/ piVH1bQbbDJ+7lVR1TbxhR2SWty7T1yXM1l7YKLmQP+5/dXHXjx7+MXqvNcb indVF2y/ULD9bMHOk8e3VuZth84V7Tp5bEv54dcqjrx+4uhmbJ86vvU07srf cSZ/R1XBztqSvS2nD/XVF460VgxeLO2szr1Qsud03tbit16BThdsb6h8s702 r+tSRUdL2aWLJZ2t5b0dJ/s7Tw91n50aqh3vqxruOjPYfmqg7eTQpVMjHZUj PVXD3efH+qonB+umhuqlYxfVoksu01jIKUG4Oxc3zSXMi2n79UXfO3em37+X +fjB/M8/vPqrP73zt3/58B/+6v2/+YsHEG7+5OHCQtI20n3hdHHOyfzdVeUH z5e90Xj2eGdDWUd9aW/zSeCJXTNM5Rthhyzbv9ej5VK5tDGXBoq6NBGXOubR /u+ziaCd7BPZZD5hFeIJ37aLEYpTEbZJwSZ+w4RPN+41TnhNkyy/iyMU8k34 6ScgFN5AoQoUMmJoIrzbNAE8YW2XBHjChFCQi67jAX3Upwk55X6rxKR8xCYM T+T/UTZJfoLTsULgBRIZKELr5JOJBg9ZXXWyIjdMeC8ecudqBGACKkEUyr4b DxsS3OQXckywAR7hfROI9014NlmBJ1QFT2wC4qARJ09iE64BggPH0JxByuOi 9lwEJoj8+Q0qhKfJJsIuYXyjsDXZJOrDfsSZhrBby+rQrVJEwh7TlBshnH7c oR1haV3MOuGqTuS9NJMOwIL9EPYAScAjyvFWrGlDCUIRd2hl3QZlv1kzZNOP koGCMwdVEaGQgRIUsEnIoQSbIMYmMDHKB4Vs4rev4ZtQWtenZ5NYQEVsAjCB ABdAjPfuZ8AmVHKC7TX7dD28y/j33o0Y3g+3LoeISjIxM5AEvwgBF341rm2a iEtmwx4VrmoyaAGbINLm2WRxOkRsssT1ECY8AZtwuV5uvNb4FfB7eW1Snk3w 6xOeuAxThCdEKGQtOXQTuDdoVyR8es5wYQ2Hrbpxs2bUoBwCpFArZmxoZf0A FnAKQxXijselEfVoxL1qUQ/E71SKutSSHjwc1GPT4c0m4QwUNpyRUrzSERdl ZPFUQiIeoZ20TQzCwwjPJmSmJALWZNCGDXrUfNLHtS8L8n26lrnD+Xg1/XJ2 WcTDxB3AMCdkA5sATNJBcAQ+JLlJTGaRRz/Os4lD08upj1GJus+u7l8Gkz4L 4/E+g6TfqhwJ2RR4koW4bSnpwBpswn1DpQWVJH0qUsIni3nEEPAk6ZeBTRIe ybRXmhW23Vml3OIUd1eWWXwKkALAZD6kBZssRowcnliuxG1gk9mwXlCEwryS u8vF71T2TiNOKO+L4IXXtbSDzwfju4plfCoeSbDBb0OfdeCzvqwv68vnehlv OaIZLPcqG2OmzoSlJ27phYhNUo5RYpP5oHwhpBQmdF2L6khUBc8gJc7Y5MfX g2CTv7ptfn96KqWt03YcHjm3ebDy1bGqraKa7bKG3armHG3rfvXFPdK67ZNV r0uqt8hqtyvqdsnr90jq9kzV7Bm/sLv75LbaY8+fP/zChWMv1ea/dvboy+eO vXLqyKunjr56Ln/r2dwtZ/O2nDqyCXtOH2U7mY6QNp08suls7raa4j2Xzh4Z bi6f7KwEnnTX5p8r3Fly6JVj+57LO/DD0iOvVhzfDJUUbi/K3wqVFe88Vb73 ZNne8qKdleX7TpftPV26p7J077mynKoTB6pPHaw+fejCqTfrzh5trilorSu6 1FDSebG8vbG0u+UEmGW09wKRi2y8mdoHIdJGgB3xKBA6MmvAp6II3GOexAGX 6ksr8ncf3fdiyZGtxYe3lB/fUVm072zJ/ovn88a6Lxik3QjSIET4ZE9EHSoo sizEVxRiJR7P6Vqa8XFVJJ+KTR4HE/8nsAlgCgKe0JB3qotnaxCKh+EJS+sy TQUMk17jJLEJgYlwRCObV7LsngBPKKJmGWJ+DQAEVOI0jOGi4fqQgUK1J6x5 FwJCLsDmwm8crAjaZUZFr0HeQ+UkHJv0gE2ssh7IvCy6iyahgE1s2kFik8tp O/kma+ZWrQYTYWoWQc2aj1pBJaQ1sWV1OhmfxIVA9Nq8j2cTSngDiZBvwrOJ 0DShyxhfnl0uxBNh+TbNhU9HrZ/MJrgXR1KmEBWY8KlcfI0JpXUJ2YSnEmEH 4zXZJB4wxQImxiYeKiRXcf6FxIsozjjp0o8BzK3KAYu8n+riwSZAEqdulGRT DxllvWwGyuQlEvCEVceLsnhCA+tN6kGcHs6T2og9YhO7AkgCroew4bNIiU0A JsQmiMCxB8yy5jxHqj2hS8qzSdSvBIasFvaDTRIhDbFJOma4igDvSvjdu+mP 3l0AnhCbUDk8s0jupolH+JGaSxnXwrSD7xTNVRWpyMmiwh+rboSmseDEYn5D CrFxxA5xLoCXqrz5tC78meNPHlRCHTAopysZMuMXwcM9VknWNLGKvZbH2AQw QmxC7EbXB69aKmCM+w3UEACEAkrCyQAojKphwhPyU7KQIu7lpYUkfZBBNgDp pf06ab+WhxQx2KRbJ+8zqgbNGuDJuN0w5bUqAg512K2P+82ACw6+fIQkPImQ /l02ITABlZDIPeGtE76HMOEJJXclg44VpfRseErYnQy5uJ0O9jxBaypgTocs mbBlJmwCm7CuHRaRWzfGGSVZMLGre+xqrPue5JuATZhv4qeJTiw9jFyYTAgf uVpyTwApqYCCsrmy1olHEnOJEi5R0i3GOuGcSjiY4vbJODa4/SAUYpMZv4oD Ex3AhDNNrNdTjhvTritJ240ZF/UNBoBQwy7aEFbHg0EWYsa5iH4+asDGYty0 lADOsIEpV1JWbGMP7qVp9XGnJGqbijvEAKLFiP5qwkwNu9bnwq8v68v68snL WPNh9UCZW14PNklaexPWLJskbIMCNlGATVZQCZXA82yCDWKTn99Pgk0exEZj ygtgk/EL24AnWINNpPW7lBf3aVpywCby+h3imq2ymtfkdZvldVvl9duldTtE zGTZOVazt+f01q5TO7ord3ed2dtavqOzcl975Rvd59/qrT7SVLb7/PHXTh16 8dyxV5mObjp7lI1ThCoPv8x0bMuFwl1gk5GW8vH2U30NRS1n3jqTvx1skv/G jwAmlYU7zhTtPF2wPS93c2HB1rLS3RXle06W7ztVsa+8ZHdx3tai3C3FuVtK creW5m0ty99Wlr+9omBnWR5bnyzaA9HN8ycOni7Ze6Jw16niPWfL99eeOXKx Or/h3PGmqvy2upLOpoqe1lN9bZX9l86MdF+QjF6Uj7fKxlrG+2rPlB44uv/l 4/tfBpUAT4re2lx46HXoXOmBvpZTirEWI/elMfCEwvuASRowSwMWGYT/XAGb HFEWwoO4V4eAEyElA4qMFxI2nOG1nNTxmHg2oWEHbABfkh9ysZJNHrNOODZh VTAs2UybcIOb5BGrJGwWC3O6eDbhCUWY3MVPP4lx3YOBJA79qMs4Dq0wUPxO RTAbDSK4VYecioBNythkebQisYmZAxMhm5g5NrGq+pl7wtXCh5ySdFjH5pvc jK+GCx4ohEKgSIghTMda7Y/wCMPfxAOhNXmHfxLK1UG8Snlc1xf8AJPLM24+ KMUFTy8PpqQkN6FvQheQ901W15sIy7dTYTPABCT7pHoTIZvQ9+FEJQQjvHhO 4SebcE26VoIJP1dlhQAmMb8x4tGH3czWiXq0eA+HnYw3fWaR2zCB97xNOWhV DJhkvcATgAl4BMCC/W7DOIRtAAv4nepQINbFi2MTtaRTI+0CoWjxTtCN2A1j BFM8ngTt8hVsgvCb2ASBN5kCXrMEf1yfzCZC6yTqVz2JTYTFJsQmwM+Hd6bJ HAGYvHM7+eBO6u1bCeIRMCle9zn8ueGlT1ip6Rm1iWYzgPwaatGG3wW/l0U7 zIZXco3FcFaJoInAhHwTzlDw8yUnXPupLJtA2JhPIvB2xgNG4lC3RfyITQS+ CYEJn9mFPfjwyZq2/izwUgYgZ77I3BaJRTsGQiFI4TmFMCQLIxyPQGTEkGnF CAXAAkJhbNJFmGlQDpjUQ2a8+sYpj0Xqw4eeGxhuSoVs6YiDcrd46KAqEj6n SwgjKxwTYhN+W5juNZ98zDpZZhM7P2mFbxpGbLLcBMyWCljAJjMR63zcwXUU ZFNig1Yx2IQzSngw6bGpeiGOTQaITTg8YWxiUQy5dJNRp3omZF6I2zjTxLLc s1FPlSZkoIBNgCQAE3JPoi5RxDEZtU9kZZuIWsdJMcdk3MnwJMsmfsYm5JsQ m1xP2W+mXbdnvNemHVTwTs24ACNUaSIskF+Mm+ejxtmwRjDMUb+UMCwljNfS lmtp69VpcIoJO+ejOlaAH8zWtixFDQATGm5yd859b97zWQc+68v6sr58rpeh hoPKvlKPoiFiaI+ZumLmnqSNmSZgk2nnWMYzNRuQ/kfZ5Fe3TG9HhqOKKkP3 MWnj3qnanZKGPfLGPVRyomzao2jYKa3dJqreoqjeJK9+RXphk+TCa5LqzeKa 7eLaHbLmg5P1OZMNb042HZ5oPDJS/5ayu3SqpUDZXa7uPdlf9WZT8Zb6wte7 KnO6z+7HuuPUnraKXc2l25uKtzYWbakq2FlfltNdnTfVWSnqPttbX3jx9Jul h17JzXnh2L7nCg6+WPzWK1gfz3k+N/f1/PwtxcU7Cgq2YruoYFt+7uZTFTng lBOle8qLdpYV7ijndKZs/9nyA1hXluZw2gcewU1wCiCl5PjWoqObjx98+c09 zxUANA5vKTqytfT4Dqgsd2d53q7TxTngkXPlB7FRWbIfx4BNDu/5IXgk741N UP7BV7E+U5zTWl043lMNPFGOtwJPPMYJJt0Uk0EEeY1in1mCsAoRVMStoepm FlhOu+dZvUCQWs2s0GpgWWRH8mCCMOaJbDK/zCZUET/NsQmTX5vyasAmrNmv XR6zySiba3XJCY8qfHIXPwAFITcYBEhC876dhjHCEzJQuMl6j9iENX3icrqE bMJsEdknsol8JZvcux5dzRFPEnGHMBdLCCOrqWTFEwpTwoSlJZTBdetyiJCE JioCTMgxQWg6w13w6ZCe2IRME5AIn+0mLDzhO1Px3W4hiqWxM9s9mAOTT/BN sMYxywUIcgKTFWzC2ygU84dxAstsIgSTJ7FJ1GeI+AxRL8QOiPv0CZ8+6laF HPKgTeo1TTl1o3b1ENgE6IH3P2vbxQmQAirB3wLwhFK/lo2VfsSxQBKACQmQ AhmUzD3hB0SSgeK3yXg2wZ8PzyYEJlb1KG76rTLc61+r3oRvJiys5Yn6nuib 8GwCMIGuIOq7HCI4xRrbgBFwKP+KU3l7IqjDBrXXXh5eo6d+zjRrBr8Ifilq wmzRjrrMIER1kmOTTNSx7Jtk2YS3ToRsgu3ZOAJsOyXv0YQXp2mS2GQFmBCV QE79JK4YLiCBSSpgnA5b8IYB81I5GOsM4NUCT/j+w+AU1vFAPYKLTCIYIR6h snoeT8hDwUupkTE20cl79IBQ5YBRNWhSD1t1o4xQrFK8q7PzeoJWni94xCBC 4Qvhhf7ImlpRisJ9KvI9hF3UQ5ifU085XctNjPmcLq6whcvpmos5FpMuMAWx ScAicmpGbCrwSPcymHSTb8Ksk8dzusAmDvWY3yxNevWLccfVtBu6nHJSny6e SuIeRdQlCzumws7JiIutQ46JsGMCbBK2jYetY1BkGUyY7BPAE7JOpr1S8k3S XpbZNRvQzof0S1ET1ZssxrKdiimzi/p0UeKWMFOLKa5bTOiWkvorKePVtOla xszJwsmcVdrMRoNFdAth3ZW46VrScjNtvz3jBJVQ567POvBZX9aX9eVzvfTV 5Cj7SrzKRrBJxNARMXYts8kQYxMvxyYhxWJYffkTc7qw8fac46MbIfJNHsbH 4upqU2+urGmfuH63smW/pvWAumW/8uJeReMuad12gMlk1esMTKpeFp1/eer8 K6ILr4prt0nrd07W7R6v2TlRu3e8fv9Y/YGx+oOGgXJd30nbWJVxsLL//IG6 vFegrtN7hqsPDVS90VO571LFjotFr9flvlJz7MVzuVtrS/b0VOdOXjo10Xai s+pYXem+k8c2lx159UTBtqpTB2rOvXm+8sDZ0/srq986ef5gxZn9RWW7Ckt2 lFbsKS7blcdoZeeJipzTpw5AJyr2lZXsLivceaJkT0XR7pL87aUFoJVdWJfk bceeEyV7T5bsrQS5VBw4VbqvvGB3GZS/C8L2icK9J4v2leXtKj667WTB3vLc nSfydxcf3npk34tH9v4IbAIqyT+46di+F9/YvvF4zks1J9/qbT452VsjGWrU iTsdmmGnbsShGnOoEZKNu3STbsOUx8jih4ANAaoaMSHCg0cRZtK/WgupAKeg UI+Die9JbDKbAJjY5uLW2ZhlJoJQGTGJLuXXcfUmABN13KWMOZUxB8MTUImX l2nSw4mvQCE8oRQvLsBmCtolXs40oVw4h27EyRkoHtOEl/K7sl1htVGvNox/ 93ZWC2+QZ3O6smldHInY5L1WltzFZJY/YhOW2cXYZCjklGbC+isZp5AdAAik 1ViBnfwBPKQAK4TMsjoHbMXT8gYKTzdUscKXvVMSF/kmlM01lwREIOozTyNS RUQK9PAoIXJJsoNgHNJHkOJSBB99t0/FEdlwmgvk1NxQeIS71tlEFkxWsAm/ E3EmgkxccK9NJmwXLPRNiE2oIxZCZa6J8Uowifl1Ah7hpQt7dGCTmA/Hc/Up AUPCb4h51GGXkqwTl4HSulhpiYFr0mWU95o4DMFNk6IP9wJPXPoxm3rIJOvV idigEx3zSjhC4cBEkN81YCU84QwUv1VKJScQsYnbOEURslU9YtOyhK6gHdDH fn2EwSu0gkqyv+BabEIJXSt8k8W0A68vXmW81oBQwAiRCC8ACFkk0xH8UT+a TEpTLGkOZsitoEGWNCOGOh7jNFJhy0zMORt3Yc21iX7EJuScUr0JzyY4Zjps I3ON8zuyvonXJnGbRC6jyCno02XhLhH2sK9EwCZeXSpoApvg3UJgknjUTM+I S4Tn5NhWQsPlgSc27bhdN44rnH1C1bBZxWDQqnkMT4zAE0WPXslkUPYCMEl6 BdYDZs2wXT/uMou8VingMeIxxH3mRMCSWkYPMAhXlu6cDgEWHKmgPclKRaxJ Ki0JcjAS4hBG0MJLaLjQ9za4dGk2Dt4acRuDTj2rxPeY+CZdNAhyJubLxHzL s1ScmYhjJmJfYL1/3cQmXL3JlANUpey2KrsggImQTWyqXo5KelkCqpTJKO13 aMbDdkU6aORyujjFwSZGVv/ukUeckpADn6Iin3nEZxkJ2MZIIfs4zyYhy2gY Mo9GLGNgE3BKxDZOeMIVnsjSXjmVfqQ8irRXmfGrZwLa2QAbnjLtVyc8Cijp VaYDmrmIAQKMgFNIVIpyleMOAMj1GcuNWevNORuEm9gPJKH9N2dtt+bsN9I2 QhLiEQgbuAl91oHP+rK+rC+f66W3eh/YhHK6EpaekL6DtREWsMlcULYQVi1F NDybrOmb8PUmYJNf3jK+l5oIy84Zu4+r294Emyiac9QtB1TN+xUcm3A9hLeL a7aJazeLa1/ntFlUu4UkbdypaN6jaN4rbtw11bBT3ppj6D1iGKxwTp2XXspt Ln21+vjzzcWb+s/tgfrO7u49taOrYmt76ettRZtaC185d/zVloq9Ew2F8tYT kzUF3eUHWgp2lR16qfzYa2Vn9pXVH3qzeu/Wc1u31uzAxlu1+944t3N3+Ws7 Sl7ZXfravvItR87tLW/Orek72TJW1SdvHtV0DivbB+Ut/dKLfaLGvqmGrvHa 1oGz9R0VDR0V9R3lNa3F55vyzzXmna0/fqr6SMmZgyWVbxSfOlByYn9pGbhm X1nx3srSAycL957K211xdPvp47vKDm4u2PNS0Zuv5h94+c3tG4/sfj5v/0tH 97xQ8MYrZ4v2NlYe7W8+KRmo105eMkm78c+Lck64CIq18UTM4NRPUtZ30m+g RAKWSxCzU6slTp6FlHdZ/tVssowkvBibzKfc9P05P+QiE7PgaWejNvyUTNiS DpkRk0D4uXGvLubRRlxqivTASh672MMVKVAE67FMZb2P5X7CjE0gqyTqkkWc Uu6f7IRLP2LXDAIiHNohpw4sNow9kNswCuHJY1zmT8yjCSPwtko8pimzaoCb J94rlJ2px6rssSi6IZO8m6s3QVjba1T0WjXDAZt0JmK+NuPl7YwsU9zM9uDC mieLW5dDiCF5xBDiidBMIfsDlEF7hIDDI8+KVl3UFRbPf3MpiB9BhIKboBLE ovSdOeLS+ZQ9EdZH/NlJi6wFLueVMB5xsvYCWcrj2jgHuLZUNB7RK3gJsB10 yfFwRLx4WlAP98oykYcCUTsFvO5kmiC2pImEfM27kE1o6iKZJvTMXNish+IB HRTza0kRr5oU9Wlwk+6N+41xv4kp8Kh2nhyxgFOOwJhmOyLwNqgHTNohbFi0 wwZln5bjDo2kUy9j2VysdTDreNBjEHfR+PjsuBNpFztA3qPjNoyI/ZbHxzPg NU/6cUGAVFz9DtV/8YYdRAf4WJWNhOY5EuLRrBPwCAXhfEzOCGUtNgGVrBZx B++DEI/w3EE7eTDJLE8m5dO6qDcXrjleU7wieCFwZXCeODdAU8ynT4WsXANh ml/zqE8XFZ3xYIIN/L2nI45k0OJ3sBd6GcTwthEDT8AUnI0CAprkvQ+swUH4 WfxFoISu1VpuqZelHnoqK85WP0KvJpDKAqkH2Vwb7cq5Nmb2d93PmoQzsa8g 2LcQij7stKgH6CF4QSGvWRqwKUMOddStT3jNKb81HbRnQq5MyC1UOuiaDtin A+AFO3eAgzQTdq7WfMy7EPfjSRJeS9RlDNl1PrMq7NDH3CbswfPMhN1zUXbM bNw/E/dzbMLyx9JheyZMw02YbzITNlKfLrdujDEIxyaQRdFpUXSZ5V3EJgQm kFHSjXeyUdrj1I2GHdmPx4RXMRPRpgLKmEcadk4KRUgStI9jDUgBqvgh45DP MOjVDXi0/R5Nn083EDQOu7GhHwyaRoLmEeBJxi9PusVpruFw3DkVtU9EOKLB vXG3DEjCiwgFSvlU4BQI8EKuSiaoygSVEGV20cT5y0njjRnbUsLAj1NZjOuv JB45JndmXfwahPJZBz7ry/qyvnyul0uV2yWd+XZxdcTQHjd3h/Udj803ca+c b/IkNhHmdP3ypv1hTBwUXdB3FqhajojrcuRNbygvHlRefEPeuE9Wv1tat1Nc s11UTWxCIjDZylS3Tdq4S9a0R9Swa6p+p7wlx9BzVN1TbB45NdV8pKn4lZrc F1pKXxs4v3dNNrmQ+3rXmYPS1gpV++mJmvzO8gPNhbtL3nqpJO+1wtO7D5/b /WrZy9/L+8F3Cn7wnXzo6e8cf+q7uU89lb/hqeMbvv3W918q3/RS+Ssvlby8 qezVned2HWp861hbbmlb/onO4rN9FTXDZ5omq9vljT3q1j5N27Cxa9zcC01Y +kS2AZFtcMLcP2roGVS194gvdozWtPedb+s+09FR2dJcXl155Fz5G7WnjpzK 3V12aAvYBEhycNsGohKsj+/7UcWxbRfK3uioLR7vqlKNtehFHWzEuWwAeEJp JzbN2Ao2ATIQPkDzfO1A0s1YIyuij8Dj8n1KNiEw4dlkmvvKFD834dODGqgd K9gE8jokTMvhsdcq8nFazSYRB+Jq7JnyGMeAJAATi7IPhEJ4ImSToE1Ohf9g E0r+AZ6YVYOfwCaEJ2YF803smmELA5k+q3rIZxFPBw2Xp11ZTLjzaObIw7vT a7YOXmF/EHrwU0iwH3xB6VhAjBWHEZUIzRSehvCj+WwuHm1mE1YavI4QlPAk FtCGfSpQCc0ZCXJGSXbQCYEJYxN2PQlMiE14MPn0bEIduhBvE5twhfBZNuHx hAiFr4In04QmwgvZhMcTHkyEbJIImElgE4HVwlUSuZUcnoipnoWFsoZRmkFv Ug/q5T2gD0gv7aJxJwxPJF16Uad6GUzYsHgOSSBACrfNwlqQLMW0RB9UyoS1 G78gZ9jhXuIXujfALqOMwITv0AUh3qZ2Z7hQCMKxzaWufVo2iQVwHVaKwIQ3 TbjhlUaWzscZZzyb4F7iU7yaeJWJ4HBlfHYZ5TjxtfCcb5It6+ZNEw5Pwnyx CchlOmyP+Yz0Qq9gE/DOCjyx6tik+OWiez2BCRklQvF4QgYKzf2kGZcOwJRx jM6ZSTfCIwb+QplTphq0cnVGZiV97cATCvtigV5TDlLwl844Ba8p90k45TFJ QChRlz7pM08HrJmQk5NLAClZNlkhnkcIVYAt3E72wJTfBjCJOA1Bm/ZxNnHM RjzzMd9iIgAwycT4VsPZHsL4HGZfE8VwGiyny2+eopyu1WwCMGHuiWoAeGKS Akw6wSYOzbDPPIUPxqBNhM/GkEMEKkn45FDMIyYk8VtHsfaahz2mIZLbiI9N kE63Wdpukbbb5J0udS/ABAKhgFNAK8CTgHEYGELuCdYAk5igRAXb0z7ghnYu YhDONLmStM5HjUASslQiDkkQJ2abCNtZFhkp5hIlvVLACAgFwILthEfCfBz7 xIxfxZfAX09ZgSR359wQCOWzDnzWl/VlfflcLxcrXp+6dNw8cS6kawObhPQd CWtf2NjDjTgZSjrH0l7RjE8KPBHOXlyTTd6ec2TZ5IbnQVTmn6zRdxSrW3LF dQekDYxNFE0H5I17ZfUsp0tcs1VUvQXrrIhKareJardP1myTNOySNu6ZrN05 XrNDenG/tvOIprdE1182UvdGY9HL9QUvtp/Y+iTfpK5oe3/NMWXXGVVn5Uh1 bmt5TkPhrsIjLxUXbj56eufuk5s3Fjzz1WPf+VLud/5z7re/kP+dLxV9/+ul G75Z8dwflz7zlfyn/7joma/lP/313Kf/OG/Dt/I3frvgue8UvrCx4IVnC194 puCFDbnPbsh97oXCH20qf/X1U1u2nN62rXI7EGZvzb6DDQffajxU1FVc0l1a 1l12oqe8sufEhd6T1T2nmnoqhyWtUmW3Qtkjmmg5d/LQWzkvgkfyD7x8aMcz x/b+sPDgJqxzc14sPbz5bNHe1qr80Y5zytFmsAn7t8WxCVknNGIAeEJFqcQm vK/BJ+fMJpzcN6gkDyff4/I8LnYkcQ2X5GNnE+E5NsHTkliHTI5NeDyJe3Wg BqosZkkyiJAdEv7be98jNhHxoxiDVhZLB20MTLymcZCITT1gRgQi6wahQLjJ EwrYxGuWBDg84coEWObPp2EThifKXvCOTc0VU+tGPKZJoM1czHptxsu321qz nh0QAXAgAR9AHzx0ACJwk1gD23SMkEpW5HpRXckKNsEGfi75MmATrJcyLuyf T9kRvKklnRbtEE3lAJiEvMtzA92KEJfBxcDEkQUT1meAm325Akx4mwN7aHQ7 glvEusCf1WACYQ/Wy2NN1DQ1g+aY0CgToYFCpgnOhybCc5EzOSDEGoAUPVd6 oKFUrpgfVAJ4MUCpkAUhdDJoifuNgpoUGh/P2IQfQO8wTzgEQGTVDiFSBaEY 5b008YSVw3PfNms5u4RghGcTfpsCWu6L9z7CE6pmohInzoDrI3uFjBW8XYMO qV9glwiHwuPXpHZnuFbZkv+1+nStySYATMJMEq4eXUChY0LGGVUbsaQ+DkzI XqFxM/wcTCI4qifi2kQbiU0yUQef0yVkk6uzERLYBPCSCFjCbp3PrhBkr5Fp IqKbPJ5Q8QiEPfhxQjYh24vnFCGb0L18jp/PKfXYxY9md+pHWQKnfpRJy/AE f6Q21aBNOWhRDZg5CfCkj15TejWXnZReM1hGPYJPQrdR7LfKQw58PmhTfkYo gJF0ELjhIE4BayR9FijhNfMSckrKbyWBPqCkz0qmScCqAZtgA5wS95jxPHg2 8k0op+sRm2TrTexMXC181KXwmZ7IJviAYkXxgCy8mUUd2sl2yG0Y5/oZyuhL G59lPOqWAE84MTYBmIBKIJdhwK7ttaq7Laouk6LDIG3TTjXrJi7qJ5vNkksO RReoxK3udSq7rbIOo6jVJG4Ds2DbImt3aXoBIyCUmYBiLqSaD6sXo9rLcT3X a4u1Dr4167676H/7cvDB1fB9NmnRB0i5kXFeTzuupmxLrOqE1b9fThqxBo/Q xHlsLMb1CzEd7QGwBCyjLk2/WzMQMo9Pe+RLUcPNtJ18k/WcrvVlfVlfPnkB m4jac3k2CeouxS29PJuknONgk1k/sYkKWmGd3EwYsWaFJ4lH9Sa/uul+GJMG RBcMXYWatmOS+v2yRpbQpWzOUTTtljdul9VvkdS9Lq59FUjCMrtYCfx2EdMO Uc1OUd1ONkq+Yd9Eza7RC9tFDXuVbYf0A+XAk+HaA03Fr0Bdp7f3ntm1Jps0 ntzb35An6Totaq/ou3CkoWzP+fxtecdfLijdcvD09tfKX/le4cavFT391bIN v5f7zT/I//YXir//xdKnv1z6gy8X/+BLRT/4WvHGrxZu+OPiZ79V+vw3i579 o7yN3yh47tvFz0PfKnruG4XPfKPgme8UPfdU6Q+/kbfhG7kbvpW38XtFzz9d 8sMflPzo6aIXvpv33Pfynv9+7vNP5z6/8fjzzx99/oUjz2/J31TcePzSWM2I on1I3Hy6+tih3C0AE8rpOrzrOWyATUArZUe2nC3aBzYZ76pSj7dy36d1rumb CNmE9zX4mHMm7uC+QSW5Z2IefuTxcv8Z1+NyQMumSZZNGJjELOmwmaiEB5MV 1gmldQFPnuSbMDxZHncStIpZDpJ1ymeeAHoAQ6jNr17SyaYoKvuAJ3bNIM8m rEbATmMp8FNYky6vWYRIkgtg+oSyK3og+qfPUibU/Rz19COaNbCcLuabpAL6 hYRdWJnOi0++IkOEcIMHEJ5BKE2LHBOQC8EL7l3R3WvNanoSYAQ3CXPAJtSn 6+Gd6SuzHkSb4tGLsolWm36UzTf3KCB+dGCYq4jP1ptQAzdcUosYbMJfc0IS niOwB9EsN4JET0HvajAhkRGA8JsSuhCI2vTZb7mJUPh5i8JKEzwt4udkyJwI cmJuCCe/kRtlgtDUiO0Ey+AyJ4Pm6bCNZxOu/ETDFXEwMAm6srE3eUBOyyRE P4sF5NwEHNAEXno2n5HNZOw1SrohPnB9kviA1qIeoAwuCO8HBL3ELzppN8Jg 7KQecSzdy5F1TIRsQl0FhJlL/yE2IcAk0uQJha7hJ7AJZX/xk01opiSfv0dN 2DhAYNeW2IRa6fJ9upbZJErdgxenAzgg5jMFHGqvTb7MJhICE/JNiE2EAqFQ xQ3PJoQeK/K7iNqElgrdGwtoI34aFslMHwfeTsQmupGVbKIeXP7rXkEovXyK F8mEt4Fy0KYBnoy7DJMek9hnkQJPYh593GtM+EyU5QVCAYnEPSYo5jZCUZch 4tTjJvYDWJaphEEK2S54CEiETBNikxVpXbMRz0o2yc6FZ+b1bATgA5yRe40T DvWwTbm2bwIBTPDxrptqV4+3KUdbrKpBr2kSn4346MPHoFM3FLRPhp2iEFf5 HrSPg0ocuj7wiE7Sqp66qBhvkI3WQaqJRrCJarRBNVKvHm3QjDboxpsMk83G qRbNWKNiqBY7QSggF+14E+AlbBmb9kqBJNdSppsZ6+1Z+505x+15D40voWkm 2TGLy5NN7i0FQCvvXAk9vBZ5+4r//pLn3qI7qyXPfU53F1y35xy35hw3ZmxX UiZwSsoti1gnA8ZRrNNexUJYtz4Xfn1ZX9aXT7M0n9gs6cwnNklYegLaNrBJ xERthIeFc+GXgkpiEyGe3Exm2QSQQmzyZ2+n/uq2492EKCQ9b+zO0146LG3Y K7+4X92ao2rZq2zeqWjaJm/YLK1/TVIHNtnOwISJoxJO4ro9ssb90ob9EzW7 R6p2TNXvVbQe0vWXqbqLwCaNRS83FL7UfXoHqGRtNjl/oLs5b7i9rL+5sO3c m1Vlu07mbT5asCm3Yuvuk5ufL3zuGwVPf6XkB1+u2PjFsh/8YenTXyp9+itl G6CvlT7z9bJnv3vqxW+WPw82+XrBhq8c+/5Xjz0NNvl66XNfK332qyXPfK3k 2a9Dxc9+tWjjH5c8942S575V+sK3y174Zslz3yx+7lslz3+z7EffKP3ht4pf +Fbh89/Of+47x5/97rFnnjn2/CvFm3ae2J5zevebZ3P2lm07ULEz78DLhQc3 AUxAJSVvvV56ePPp/N0nc3dWlx/sqC2e6L4ANtGLOiDqbEOmCYEJ38wTjAAq of+JjFA+NZsIZyhzYlW0fGX0TDyb0JWOmnk2EYLJausE+MDAxC7m52J4uXoT VnIi7NZlZbG03zLpNY0DPYAhQBIDS9TJsgn5JswxMY2DX8IOJZfQpeUgSPkJ bGJT9DCplscHaFmGGIt5NEOIgnAOMY96Nmq5knZ/9HD+4/cWP3q48OGDufff nnnvfua9exlK8eLHcBOG8LXqEHkcZKOQwBR8k2G+xoRwBodROQkdL+zrRTiD yBNBmkbahfXCtAOPvTzjRsyplnRKxpqxNmuGcD39Lhk/3Jy6dQXsEjb8hcCE sYkoYBZ5WEj52Oh2PvlKyCaIeDnqfAxM+OoJ3jRBLMoN1BshZfNwlitNyIuh uBoRNWsnFWKtkBIBKydwBxOi35jPHPezauVk0ErtklawyfIEFoYny4SSnS0I MHFZpwiCmMXgZROCKAuLUoBM8l69mOV0MSdF0UfxKu+YCINYQTTbT/ldeP/g IRpJp3LqkobLB0PcS2OJ8HYNssj/kW8ibB1MHc94NnlSn65P8E2EYAItJ8Wt kdNFCV08m5BvwotwNebPVn+kHmcTbgLIox7CHJ4w0+RyJrSQ8qcjzojH4Ler eNOEAxDR8vhF8QowgXAMrgY5Rzyb8AYKDybUp1oo2jkdM6WiRvot2NRIzrdy cO4J5XTxbGJVZ/GEJ5RlPMmyicAXw0YPpWvataMuw4TbyKr1/VYZ922GOuYx cIRiFlIJLypRoToUKj+Zjbi45C4HAAQkErBqPEYF2CTiNOAmaCXpY8ZKJuQC nmSi3nSUFcJPh100e3E6aKH5JumgIenThOxSt37Mqhjga+GFbIIPKBs+tQRs ohhptioHPGx87TiV4IFNfJaxgG0Ca49pyKnvB5VoxS2AEelILTTZf360u3Kk 6/Rk7znZcK2kr2qq++zopZP9jcVdNXlQT12BqOecfLAGSGKVdTiU3U5Vj08/ GLaOxZ1TMwHFQkTDHBNOV1NW4SxFfsDitbSDJptAt2bd4JR3rvjfvuwlHnlw 1Q+9c8X37nWQi4/2A1ho/eBK4O1F362M40rcBDDhhqroKb/rsw581pf1ZX35 XC9N5a+JOx5jk6Stn6s36Wf1JqvYZIV1siab/PKmlWcTdethcd0+xcUDquYD yov7FU175Y27ZHXbJbXbuGyunbxENbtENbuhqZo9kvocaLJmz3j1HnHjG+pL x9Q9xZK2433n9wBMLpZs6ju3+0lsUl9/qK0tv7OtsKXuSO3pfadLd5QVbD5a /Nrxk9t3nHhtQ/7GP8r7/pdLnv5C8ff/U+lT/0fRd36v8Dt/UPTd/1T03f+z 8HtfKHr6vxQ+9V8KnvpiwdNfKvzBlws3fLXwmT8qfv5LRRugLxdv/GrJs8CT rxY/w+4q2PDlvKe/nPsU9MVj38P6j4qe+WLhxj8s3PjFgo1fzt/4lfyNX8/d +EfHN36v4IWnC3/43SMbv/fWho3Hnn8+70cHGw4Nd5wT99f1NJbXnjgEJCk+ 9NqJ49vPl+Q0nTnWd/GEqK9WNdaCf1tgE6FjAipxG0U0mhlBOxiBlZlwtfCs HP6JOV3e1Tldn8wmWdMkas5ELCsqTSChdcKzic8p5X0TYU6Xz/Koq3DQ8kQ2 oaZbVHiC/87EJtT0lWOTR7Xwa7KJVd7Ns4lTO4D/7E7dsJENYeylcgOzclAr 6VFOdgx2nR/oPIf1cM+F0b6asf7a8YE6xdQlnbwHIT0iYcACEIMGT2T9lNtJ iHLAFtPOpYwLqALE4HtwCYGF15pJX+/eSwOFQCIO41hXy8mGqrzO5hMKvNCK XioWVok75ZNtOnmv0zzpsWcvJqL0EJfQxdjElk2QY5fUzNjEbZ7iHRM+F2tN NlkTTPjKbgThXDYXNYAdJgkJhdiE900onObYxM7hSZZQ4n4rEQrED+Dm2iJh bWX1JgI2CXuy1gnPJnh+p3nCbRNRsQwU40bhgBrADtRG2KLsJzbhv1rn2YSv iF8hPsULa/CIfKJVMnoReILjuW4JQwiYqRrFa1tZCE/1JsA3SuuinK4n9el6 EpsI8YQ22K+2XHXCGyjknvCVJsQmdDyPNnRZuJQ5PedfmGgoPDflhEpOfI+X nPCTTXzTYUfEo/fZlF6rTGCRMDDhxGbNrwATqmoh24jKbfgkLv4tRBJ2fuPf aYxNIiw5DedMlVN4G+NqO/VjTl02rcsOxFCxbxKsnFbgyYrXlysv6tBKO6nj gRlcg2fQ4kNyhOOUKWp3zAbU+vQJr4lckhU5XVQdL6yRT3gtIJGQXRe0af0W NdgEirqMABPcBTZJ+W2UMJYKuVKMShzZ97zfnPSbMmHOvw4Zkz5t2CHzGMbx G1nX8k2oVRfrcyLp0k5eUo62yIcvAtC4foZ4h4+yBoOKbouqx6ruNSu79dI2 1WSTfKxePFQ9NVDV1VTUXp/f2VjYfbG4r7VsoK186NIJ9RgzR0hmcZtFcskm 63BregMmVmmSdIvnw+qrSeO1lGkupMr45VQRn/JISOmAmkrd56NG6iF8OWkl POE7CdPG5aTpSsp0c8Z2d9ENHiE8wfbNWftdzkm5Nee4s+C6Pe+8Ps1qTIAn Dy4H3lnyQ9jATeizDnzWl/VlfflcL/UlmybbjhtGz4S0YJPekL4jZR+ImFgt fMI2TDldM1xO16LAOuHYRHstBjYxZNkkaXxn3vnxzfDP7yd/cd38ID4VlFTp uvKVLUdE9fulTQflTYdkjW9K6w+Ka/eLqvdNXtg7cWGP6MLerKr3imr2kcar 9uAYSf2BqZqciZr9sqa3jN2Fmp6Sica3Ok5uq89/sa1889CFHC6na2/f2T29 p3d2Vmy9VPp6a/GrUEPTkbZLBW2tBfU1h86d3lNRtr24aPORss1HTm3feuLV DQXPfKtow9fLNv5h0ff/oPzp3y976vdLv//7pU/9Xsn3/qDkqT+seOYLZRv+ sGzjl8qf/XL5c18qffYLRRv+IPf7QBXoywU/+Erhhq9wVPK1gg1fzd/w5dyn v5L7NNvO+8GXjn3/i8e+/58LNnyhYMMfQvkbvpi/4St5G7+W/8xXjjz1naIX vp377Hfznnu25OVXTm87LbmQ8KmupZ1Rp2yqt6a64mDp4c2VBXsaK4921pWM dpyTDTVqxlv1U+0GUYdVNWxT49/3mFM/4TFOec1in0VCgwbSIdN83L6YdLH+ MAnhxArXXMK9LC83RtkvFAcjQiGecQiCChsHJoxN2H/bCMvsEvIIGSjMN6G0 Lrcm7FL7XTL6nj+becImSoiFvgmzTjg8oWITl54Vm4BHACY6cQdEhGJR9to1 A079sNswgl82wMZSKEJsQp8UT+U2TvJsYlH387IJ2UTD2ASA49SNuLgSAwRC VvWQRtwlGrooHW+RTbQKBRYAm2C/aKRparhxYrB+pLca/II14IXnF5IYAa2o 3awZCrpkmZgJlHFj0b+YdoBoCFsg7Lwy6ybDhdvO2i5Uw4KbswkrgrSp4aam 6oKzFQfrz+eCUPDMOA38OPxonIlZO+QAwXElHl7EzP8ve2/9Fdea7vv2siS4 Q4AQQrC4u7tAEhJcY0Rwdy03yt0VytDCIbqSLGvZu/fep/c9954zzv1X7jPn AzO1SLK6+5y7R/cPzPEd73hr1qxZRRnvpx75ks8nIaQSs5CwkiE1QoIJRSXI EVTROmndrl2JmwCbTIFINpm0gOYniCXlLMkmXrt8xCSyrXRnYqHMAAIajKHA OQVOCxE3AZr4FZtg6GTUMk0GUHxeyyqYoMHEiq02STGw30gYnbg0WCuNCV1k sYmUKpwBNnHZiEL+lTX5iHyCNMQh6Izw4BDAIpZI65L0m8hoCP60Ti1fCQz5 BE80WCwPi1tRj0LQAWAyxGiQ8dpgp1EB7yW6Q89FmnaaRU6LeJVQiBQvr0NO 1c6QOUtGmEy41H8Hm7iVH0uHVoWUgXhC1cWT0RNkE8PMmJ6UbtKtJnsLYN8z NTYcIHoaO9EFUg/EB88t6UuIbOJCJ8HX82NvFoj2XG8Wx17Ne5emnXDM+IjW Y1M4LVIKQEgkIfAEa0wATyhCATbBShPKJQeTAEnusK1o0oqCb56VmjWfnXyP Efw7O2GYmYDnTUv0xPao0JTHbRlyAoEaiI7QDrLwxK5mWYGFQcgmq4SCn3ck lBU8Ea++xGs1YJTTgVCG9QKPRUJ2+VPPuI0zbhNo1mMmq1GsZNW8DUvgZz2W GbcZk77G7TqXUTGsk8LoNildRmATGVlsQsRNUAAphLx2n5cAE8TwabgLj5Hy NwE8IWvhhZ+vN5HDpA+YxSTr1wq75ZwW+LaXMJu1oh6rkoj2wtegiF7P7XvG 638uZtaJWXVD9Ofc/ifs3se8/idCRhV/4OkQ7bmUXacUNKmAWdh1QlqVitOo E7SYJZ0OZb9HRzTp8ugZU3Y+YMiiVw5649P9uGgF/fLC8cOC5dWEBq6ac0lR 8x7lwqgG2MS/bzDptPhxD9AK2UbYDHo7C/yixwKTVz7du3nYSbicwAj74eKH JetPi3bszQX6Yd72/bTpzZTh/axl3d9kfVvf1rff3prKznCacw2c52Oa7gld n89EmzINThhpkyb6lJnls3JmHPw55xAQykuv9NWo7PWY/M244vtJ1bspNeq9 T/NhWvvzvPFfXzn+84P3f/wy+T/em36aEngV9arBMllvsbiziFV/Z7Dmdn/V re7KW20PbrSUX2uuuN5y/0Z/+Z3+MtDtgYo7tPs5tId3aA9u0R5ms5/e5dfk cp/nMCqz+DV3dT0PtJ0V0saC/vuXm3KPtRadHqi8xqq+zajOHnx2s+vxldaK 801lZ5vvn299eJFRXcBqKOlrKWltyHv+PLvo/vmsvCM3Hp45X35sd+m+tOJd KWW7U0qJ6Ens3bTo2ylBVzYHX00Iz9oacmNL6M2kaNh5Ny3y7vaInO0Rd7dH 5qZG5qYlAYzkZcTnpifmZ8IkMX9HcvGezXcz4+/tSMzblZi3e/PdnaCkgn3R hbsIMMnfEZmbEZWbsTlv55bCPYm5O7fm7d6Wuzsld3dm0cGjlWfLBU+mPZof X3jnR/UyTlvjk3uPCi7VP7zD6Xoq6H0uHqxRspv0/HbjUCfIKhsgpKSN6Nhe s2DMRriE+JyqOa9uadL8ctqOYELGTQhHElJ+ThYEnjhJQnFh5TsRKPHZ/RLA bP6ufNRP6/gD6aclrv55HWi4tuL65yJqt2HFtYInZPYRuZb+FZt4TcJRGxAW x6oe1Eu71cJ21VAbSCfpgotG+N+t6LOoBmwaGmjECMtFwahdNOYQwwhzp4lH xUr82cQmH7SRRmZotWxV0gF8SDxh4cFaaa9C0N7f/vBJxc3HZdcry28AFDx7 kP384a2qR7frnt4DQABSaG8o7WwqB8FkoLNysOsJkAKrvxqoBJgFBJxC637a 3/EYr2X0PgeaAIrBKAwcBgdwafXAOGJuq5TfASCjlfVbtCynZYg0KJe6iIgA 4VRu1bHhVg9LCFucR6XX4CHBY4MH01ZfAncq5bXBettpEqzEC4x8WDYDZKHg IpZ1O8lwCcAI+vGh5yBcpGrh/eMmyz4b1RSa6r0Ge4A0J4ZVLpPYoROg4x5a e6PHt0nNQdn0AqyJ9nn1VFnBzNjKEposeKd8GI0+j4mKnqAwaEL5wsN7Bk5F FncA0sqooAkRdFut+Kby06gafDgM5mRvYRr8vQbSyGaNViGXSBFEjxsiaVDS ZxL3kik07TJWs5jRMESrEzMblfx2PVCthjFs4MC7y2VeKfn/GAEkneX9ohUf NeaUosZdMkqAJ1NeJYjyOoHRH0moIMinJyQbF3xMl6KErQPWaNypn3AaJl1G jE+tMewgOwm70cPo7ZL39YILkAE+yBggw+Q9ZBB/+WV5UdhC2DtiPhsGR7AT 12oK2a9EpZJSe8juYabFScPChG5+XDs3ppkdVc94gVDkEyMy+Fx7rAApPIee bdOyzPBp1RJ9holWwySn2LTsld8iSJsbg7QfgJQoNZIQ3aTXCJskmBV0IB2n gQ8YC1+VUyPKSVLAKdOk3Sdo1ktEOvxLUbAIZXJY77WogEpAbpMC5nAVHvOr 4IvXNjNGGC8uTBJfra9m3W/m3O8WvT+9mviw5F6agNMqRy1im5IJJGKUd/sJ LgIgd5mVRIxYPdQJ70ARo1HCajaIe20quk01qBa08fqe0dvvMzru9zeX9DUV D7aWsLruMzsr6B2ljM5SVmc5t/uBcOCJnFWjYNequPW6oWaYoGCnht9okrRb ZJ1u/aDPwVsalYHm3eKlUfnbaT2wyc/L9ncz5rc+I2nXbv1h3vFu3v79nA1G nKAQRtYIHRhf+Qyvp4nx5RRRAj8HmOORLU0oXvo0r2d0r2e0r6bV72YJL/g1 gnsE/aMXPuvb+ra+/VNvzeVnea35Zn7NqLprVN09aeifNA78VTZ5O6Gk8ORT NvlfHxy/90k9smZ5d7m0u0LWW8lvrXh0+0zZtWN55w/fOrU/6+SBrBMHs44f vHPiCCjn5NG7p2A8dOfUwdyzhwsuHCm+fLzi5un7Wacqbp6oKbrKaCiXtlRy qko6S7Pqci7U5JyvuXeh5u6FppIbdQVXnuddfJ5/sbb4atP97JZHd9gNJczG ku7Gwqaau5WV1wvKz94qPH790Zkz5Ud3Fu9JLdoJbJJcuis+Ly326pbQM9Hf HArceDQk5EzUphPh3x4NDjwdGXQmKvhcTBCpgHNRm85GhVyLD766OehKHIwh 1wFkkqJubQu/mRyZlRJ1KzUyOzUiC0YgnQxAkoh76RE5aZE5aTH3MoBciHKV O5lbcnZsvbNjW87OzPz9B++fyKeVeW2S7+dH4P8mt6+mqiLrSfG13oZyMa1e zmxScZrVnBY1uxmk5baaJX1W+aBdxXDqOcAm4zbJhEM27foHswnVhweLmgm5 ldjzdqVqwC75EpuM24VuMxfQA9lEKWgFIZsYZD3IJkAuFJt4bUIAExh/i00U BJ6sgImCKIRHNgHBtXCwStTFp9e11BTk3zpx9+bRe1nHUDDHi/m3TxbmnAYV 3DkFY/G9s2X5F1Y8NIuvAEEAPoCAaIAgYASoqX58B6Cmpbaou+V+V3NFT+sD ABZMGGP2VQuYRAiGM1iH8ReYA7Bg5AXW1bD0kgk6gYDybp24fe0QPoCiu2fg 7mqf3IUTCugNKlE31mjDaNWwMEsfhZYcyCnoCQJUQvmhr2ET/DWeYJPVdtMU mIBgPus1jDuUTqPIruUTpngqjlHJMpBCPEFCser4/v2aVtkEwQSbca36MKKP ya/ZZKWBsMc46dKhgyGcB9hkdFiOVSfwzsHid1jAw4OHv0InH1SJe5WiHhhh vYqEAn8azEnfcJpJPoD6EptQjeAATAzCbjW/Q85uEdMbBAM13L4qEaNBBp81 URe8SWB5DO83IBSqIxlRNkXmsGH46VP97WxC8chn5X/Oz7IJ9cSuuluSIot6 qKw5BBOKTchOwits8mreRVnYUFVFn2UTShhAQVG1NlTnBLLMxOqPJ34FbmvZ ZGnKsuwzLxGEYgQtTACnGObGdLOjWp9bhR0e3GSFmlXPwd7RK+E/stswETpR 0skeCING2YBRik6FX2QTQBgLEYCAzz53RM9zmYQei3jUJh2zy8bsitWe5Fqf S4+ggRXxc14rYMi4Xesxr0RMkE2AVigwoWrnp732uQnnq7mxd8tTH176fng5 9WF5HMDk59eTwCYvpizAJm7jkFXB+BKbwLccvC1Vgg4RychCegO8M01SIvKr F3eJ6LWMjgcAJr2NRQMtpby+xwpuvXqoSS1oVAkatIImYBAx7RlINPgUIAVG nA/1V4KkjCo1r8EgarUpur1G+pxLtOCRzDqFPodgyi5YGlW8ntJi3Qcp64c5 ogcX8giwyfsFx4fFYaI912qlib+QWQBMXk7pX0zqXkxqgU3Q1uTFlBrY5NU0 gAkQisafTT7MWdF+ESbr9Sbr2/q2vv32BmzCac41cquATca1vQSYGPq/xCYU niCbUHiCbPIvL+1/ee/5f36e+F/v3T+Ny4cFLbKux1panYbexml6mn3iyOWD +0/u3Hs4ddfB7bsPpuw7kLJvf+rOvdsz96Vl7k/P3L09dVfKtn3pqYd3ph/I TDm0c/uhXdsP70q5ceF4zeMScVsDo+pxY9Hdiqvnbh3Ze37X9lMZW8/s3n5m T+rFQztunTtSeudyVdndxspiTksFrbGksz6/vur2w4dX7pWevlVy4urjsydL D2cW7tpeuAPYJKlkZ0zu9i2XtkSdjA48GBx8OCT8eETw0bBNh4JIBQccCQk4 GrrpaMjGw8EbDgd9ezb8m7PhvzsR9Ltjm746EfjNmfBvz0Z8czry2xVFfXcu bsP5zd+djt5wafN3F+M2XIwLuBwfcnVL2LWk8GtbI69sibqSFHs5afOV5K03 0zLv7c1qvWPRsOdH9SN6Pru7qq26sKehXM5us8oGgEQMwk4dvw3ARMlsVDAa 9ENdJsATBc2hYboMXK8F1vbS/1I2+VjE+gU2oX4e9+sES7TiQa9ADJ1gRylM Q/rYQ5isNxl3fGQT1VCbgt8C0oo74V82solZ2b/KJhyXme/PJrB6/CKbrIKJ TUm3kYtStHS0aZl2HUsr7RUw6tvri3Ozj+fcOELhCVwEARcAI8BF6irYCXv8 99+5fhiEE6AJFFyEA+BgCnCAL1BAGaV552ECmHO/6DLgDIBM/bPcxqr85ppC QBuAoCtndx7bn3j22PZLpzOvnd9989I+OA+gEBxG63wiYjXr4S1B/G5MI8p+ 1QzMxidM60ihSYSVdAknHbQHDbCKI83QcV29pm59DZhgbh5MfC6t1yob1g9Z 1Vx0+TQo4ISE/AnlUzYhV84IJrrVNsLk+tltIGXyFwIL7J9wEsUmXoeCLOiQ UiIKpc1DgAZAWGpJn4TXTsIdkVMHE4WwizQcFGLcBP5S4td10hznS2xiUzPQ 2ZPotABrWlGPRtAJbCKi1fP6qljdT/kDNSJmg1ywEjqB9wnxbvl1sAajOf+H cZNJt9K/5ARFFbb7F5J8lk2onlf+vXnJPgPWNWDizybwkUc2eTnnXJ5xwOca bku5In5W2DGYohLcSRWbYE4XFijNjlnmxq1UDf6XwGSFTQg8IfQCNG19OW2F ES4uThhnR3U+t3pyBKhBNgyvvnmlcorAE4pNVvuzEXgiHSDYRPoZIaFglRkc bFaA4EvgY7E8tvMivWIJ38YJhw7DIliBMmpVA5U4tGK7RgTjiF4KeAIHUFRC Fc7PjY8sTXvfv5j+5fvFP7xf/OXt7E+vpn58OfFhefT7+ZHlSfPUiAJr4b/E JsRE1q/ktwOY8PqrBYN12DTeKO1RC9qEtBpm50NaWzmz8wGn57GYUaUZajZI 203yDrOi0yhp1w01q7j1QCiAIcAm/N5HACaCvsfc7ge8nocwkdCfwwF6YbNd 2T1mZk3auBNWzoSVC2wyZuJMkuYjryf1b33Gtz7TW5+ZKjBZgyef6sdlJ4zv FwBk4Hgiuev7OdObGcMrn255UrU0oQS9mFK+9KmWx9TLo+oXYxrQqwkdCO4R 9Y9e+Kxv69v69k+9NZScYjbkaJlPgE0m9f3TFrrPTPssm7zwSECAJ/6hE8ST 9z7NT3MGik3+x7uxD6Nqx1CPhtZs4vZJetobSosu7j92dveRY5nHDqQe2bvt 6J6U43tTTh7ceWhv+r496Xv3pu/Zlbojc1vqjpS0vZnpO9NS9u5I3b8rff+u tKsXTtU8fcBsqu58UvE0/1bupVPn9mUcTEs8kJZwbM/2wzu3HtiRdHRf6qUz B/LuXHpYlsNqvz/QWNxem1v7LLui4uKtkpPXS45fqjxztORgWl5mSkHmttJd 8cWZkbkpmy8kRJ6MDjoSCgo+FhZ8PDzwaCiMxOR4eAA5Bp4IDzwZHnYjMeR6 wobzkV+fDPr2TOjGi9EBl2I3nIv5+mT4744Gf3MyIuBiwsYL8V8dC/vdsZCv jod+fSpiw9nojWeivz0e/s2h4I1HwwKPAfsQijoVl3x1+5XqayYlg+g26dE5 DQLiJz4NZ8ImnbSJPfAfWdanF3RoOC3AJjJanZrTSuCJtB+W3MNa9Of6r8rp +lLQZA2b+P+E+zHJxKsm5F5pl4ougVRfKdQY6W/yKZvIec0aUceatC7Ak2HD r9gE5l9iE7uC0AqYkGyChfZEty5yzWlUDOikvSphp4DZxB6oHeisbKsvqanM qSy/AeAA+ACIAaABuIEAAgLWgJ15ZJwF9t+6ehBGAAogEZgDR4CyLu/PvnIA wQTGNeQCh8G1eAyCDOyBA2DPxVMZJw4mHT+w5czRlFOHk88dT4U9QCg3Lu6F u3hcdr29roTZ+1zGb6eMBUnvORr2mwJR2fiwUCcMCuWDWlk/EUoAeNFxYA1P JSNR/X4XJswIJlTLNdC0WzcxrII1m13LBzAxKVgw6uQMlN4PUj7rwefnvfjx J/1Jl56U0V9jw5oJpw7wZHp0xT0cCGXSrRkdljuMAvgrdPIBhbBbzG0TMBuB R1j91fSeZyBmXxUbIILTYlDS0FbSQuIYETBS0YFBEE+ARwyEcXyvVtT9KZsg +CObCAfrOL3PmV1PYITFoYzfppH0wDtkhXNXXV2wmQDGAbEwZI3GnLLPsgkB I2R7YZyQbEKwDLIJ1XSLasKGbILn9G+BtcbocE28cmaMajJg92cTxBNkk5XQ Cckm8CmGG2LHA4o7PhsuwWITOAzNGbFDF3wn4PcDpnWhW41ff7C1CV0IJkRO 16RlaRLwxPrCZyO/rxyvZ4ffzjvfzDnhuwv2L06YyXejfnRETrTUIC047au9 vAgeX7WPJ/BENmiSDhplnxFRguQHKRhJ0UkG9HC8nG5RsR06AfYScZmAO1Yi I2M2zbhdCxrWSayqIbOCD7IoBYAnToMM2IQKrFBsMj9BsMnbxckfXs388Gr6 /fLE23nP61nn8pRtcdw4P6qDr2i7ikU43X+OTfBbDtlEMFjL6a3i9ddIGI1E 33hxl4rfOjRYzemp5PZWCgaeiRk1Cm49sIlO1KoRNquHGnXCFr2wBfBEw28E AFFy6gBSZMxqhBQMncAc9ig5tUZxq0s3OGpigoBNsPJ9ziUBagBGeDdj/jBn +zBnp8re/QWE8qlWmwyPoH5chj32d/Nmom+wT7M8CWyiWJ5UAJu8nNAij7yZ MmD+GJacrLPJ+ra+rW+/vVXnH6XX3QY28ao6J3R9M1bGnJ31WTZZdouRTT7N 7FrDJn9563s3bhmRs5X0TmFPa8ujB7fPnD6x69DxnYePAJukHdu7/dje1JP7 00/vy9i7e/vOzK0Z6Vu2b4/fujV2c2JUzNa42C3RkSkJMZkpibvTki+fOVb9 uGyw7VnDk8KSu5eunz948lDqgd1b9u9OPHwwZd+eLbt2bt6zb8upc3vuFlx6 XFXA7CRC4W0196oe3ygtPZdVcuJKybGzj08dKN4PbLItPzOpKDO6KC00f1vk pYSgU5Ebj4cFnAwPORsTdjEu+Gx0+MXNoTC5EBt0Pib4fGzwxbiQy5tj7qRE ZG8NuhK34UJUwOXYsBtbIrOTQ64lfXM68nfHQzecj4u4uT3kWvLXJyO/PRm+ CU51KSHySlLYxYSA4xHf7A/ceCA44FBo4IGQwH3B4YfCk84nXXl+Vc7rnPVo 4R/ZtEs941ZP2GXAJrNOxZRN7NIyzeIeYBMFowGk4rRq+R0GcS+WnHjM/1Vs 4g8ma7rxrGGTj0tQMi1nRaMaNL9e+XEYVlywALNLRv3ZxLqWTTCnC/AEJmtC J4AnyCYe6xCAyV9hEyXBJitgoqTjohQWqBg3gfMAnrgtgtlRNRanv14YfjVv fzFrI10/LFRnJFjG4yp0elRj0RJFDUpRj5DdAutkwJme1ge1T+4CzpTkngMY wUgKcAcIuAOYBXEG4KLo7hlkEyQaOAz5Bajk+oU950+kAZgc2Rt/eM9mAJOz x7bDngsn02EEPIHj4fw1j+70NN/n0eok3FYgFJWoG/EERdlnm8jwgUFJ18oG gE1geY9pXVgIj+Xk2KuWqDoZNyGYIJVg17XJEbXXKoM1G5HKRTasBmlldJQ/ pFi0PGQTeN2pJbSfI7yWYlVgEFIGfznNMq9dBcwy7tR67HLsgqWRDkj5nUOs Fkx+49HrhexmwBAYMWgCzzwK9mAvNayvATwh+pIRnaKJABmQCCz2kE1AMMd+ 1HgAYZ0jGzCRbZFkrOahgVp291N6x2NW91NkE5Woi+z7BM9wv4VMisOeych3 8DRSFev++iybUKYnvyYUFYXtlI0LZoth6ATZhKyIN3yqNWyCeDI3bkMSQTah tKbkBLQ8MwwfbTgDUAY85xgf+Y2ELqQSqkcZyUFGtOlEp07iC4FkEwpP1pSf UGAC1y5MWJcmbctT9hc+x8vpkVczztezrneLo++XRr9f8L6Zc8Oel9PDcO30 mG7crYTnB969xIsLkEhmMxKxwlU8MctpxJr/c2xilK2wCYEkYkDUHpBK2KMc ghGIgAbvcABwkMskATwZ0UuxrgQEGGJTC4FKjDKuSc4DSPGPm6zRlNs6PQrP PFFvAk/1/LiNLGAx+Fxa+GaeGlG6TUNWJcMkHTDJez5lkxXJ+lWCDv5ADbwJ uX3VYnoD0Tde1KngNgsGqnh9T0X0agmzVsauV/IaUApunYxTo+Y1AJXACNIK mkBAKHJWjYT+XEx7BiNIyqiCPVpBo1Xe6THQvUaGW08bM7MBTN5O60EYyCCp gYibvPMrNqHYBAMoa4SH/bAESDIM+mGJMDQBvV+wfD9vfDOrfzWtfT2DOV1m KpvrxwU7iCqN/0cvfNa39W19+6feqvKOAJvoWE+BTca1vdNm+qyN+Vk2WXKL EU/WsAkI2eRPL2zAJv/3T+N/+fHF0qhVNNheXZ5XdufG3asXLx8/enzPviM7 9x5M3793+9492/ftTT24P/3I0T2HQfsz9mYmp6clbkuJT0yMik6Kid4cEZYY Hb49MW5vRkr2lbMttZX9PdU1zwvz7p6/cHbPkcPb9x/YeuBg8oFj23cf2rrj 4JZ9x1PP3zxS8CDrSVMpq/fxQFtZ8/M7jysuFRWdvll64nLZ8ZOPTuwr3key SUZiQXpE4fbg/G3R15MCz0ZvOhMZcmlzzM3k+Jz06OxtUVnJIECPiKytMKIi spJCrycEXd0ceCUOBJPQ64lhN5KBTb46ERZwMT4yKzX46tavT0cHnImJuJS4 +eb2xOy0uKvJ4adjAw6HhR2NjDgWFXEkEsAk5mh08vmtVyovaUR9y0AWPuuM WzM/qpv3aAm5VXNO+ZRN6NYyLeIeLbeVyOxit6jJfsIW+SCyCSzy/6vZhOKR z7IJFStBKlkpMRgj8cSjxt+HJ5yKCYyerPqYg8ZBVsmYXehfC4/1JjBZEzoB PHHo2U4TD9kERqJO2cD5IpusgoldzbCTbAJrVIeOBSfB244PS17OmLGvLyXs /Uu5KKKnyffLLhjRXRH7a1FHon0JHPBmcRhGNDEB3gHMgYUlrJzVkj5YRcNa uqOxrOF5HoBM8b2zGHkBleVfAHK5fGbHsf2J+3dEH9wVe+Zoyjl4A59IA8Ec OAXgBQDnQeHlpuf5tM4n3MFaIasJ8cTP6xztzkk8WWGTfo20D6SHVbqKgQld yCbwimAbqE/dM0FjdgUGTUwKlkHGAAGbaKQ0lD+hAJs4jEJ/NiGXylpsGwX6 WKY9gtL7C8DEY1MCodh0Q0YVG8MxcxNGuKHdwFcIu5FK5EOdUn47TJBNsFoH mEUm6ABUBGrAjmQY1xjRc4d1bIJA1QwquYvqRD2i5+C1ROGJfPBXcZOeZ4zO Sm5flZBeL+W1KoWd2JYWRnwCgX3QbhLx5H+bTXAP5nQhmGAvshUbILKehULI 32YTKrMLtehb6QGODqpr4iZUWheyCXyu/dnEphd8CUxGzGJsoQwvNBq7YJgM zoBtAPErAsGEyuxCfQomoMUJ29KkfXkKvqOGKTYBKgG9nfcAm8BF2AmahTfD qAaeKHhOiOy+1dAJkcH4kU3owCZmIr9rrfSSfoyVIJVohN0gGa9Dyu2Q87vU oj69lA7vbXifO3TCYb14WCeh5NCK1wRNAEzGbBrM+EJ7lHG7FvaMWtUem9br MIwN6yecRoK7R3QTw5rJEcKGaXJYMeGQAZvYVEwT0TfsM2xikPUQkvYpeG3w DoT3IbaUV3BaVfxWCbOe0/OE1fWI21s5NPhczKiRMKtF9OdC2jMR/ZlgsJLf 90g48AQBRMasBlFVJzjCHsAW3VCzTdHtMdAwoWvUxBy3cGZGREujCtC8Sz7n lIHmXTBXvvaZ366WnFD6bL0JEsqHRcAWGylAGDOACejDEqH3i+Z3C8bv5/Xv Zkx+VS0reuszrnsvrm/r2/r221tDySlgEw290qvsIHK6zHSyT9cgsInPzJom 2IQ3NyKYdw0tuUTLbtGa0Mn3E5jWpflploib/Ld3nv/+w9jPr2bcJmVXw9Oc q+cuHN1/9sj+kwf2nD548OiePQcyduxL37EvY/f+zL2gg7sOHjtw7MCufalJ 25PiEhNj4uIiIhNiIuIiQxNjwlOT4vbv2p597XxD9aPGhoonT3Lv5V+6fP3I hauHLt8+cT3v7JnsI4cv7d57Jv3wxV1Xck+XVd2r637M7n/a31Ze//RWWcm5 vKJT1ytOXag4fvjB0d3F+1LzdyQTjbbSI/O2h+WlBF/avOF0xKazUaGX42Oy tiXcy4jLSd18N52wXMzLjM/PjMvPjMlLj8lNj7uXFp2TEnV7W+Tt5LCbiUHX 4oOuJUTfTg24FP/d+djQ68nRtzMisrYHXt6y8WRk2MWE2JspcTdSoi9tCT0d G3g8MvZ8Yuy5hLgz8XGn4xPOJW67lHLh0QWNuB/IYnnKMuPRLIwbFsb0i2OG Ja9m3q2cHZFOWYc8WpZV0qvjtcmZTXJWs5LbZhD3OtRMl5EP//imXeoVNpkh 2OQFMAiRlOUvfzZBPHGSbAJgMuJf9r4GTL7AJrAuguUQuVIiXOc0ky7NlFvj 82h9RN47SD89pgX5vCSeuJSTq01fQeN2QmMw2kCSz/bpQjbRijv92WSYaCNM sMkoySbAKR/ZRPXFuIldtcImoBEyYgI3HDFyxxziF9Omn78f9zdJBLigBBcR WGAO3AG4sTxjhRHQA5sA436cIM6gB8q//X5hxcbxDwv/8ael//YvyzAh9vx+ gTA0+cMC7Pnv//76f/7l3b/9cfHtklMnH6x9cvfquV1YbAIi8OR46pkj284c SblyZkfO9cMlOWdqHt7uaapgdj8T0Oql3FaFoAONBYnmVAgm5GhWszBuAlgE wqqTVTaRjzuVq/lImtlfg4nPrSUqTWxyp1Fk1fBg2QaLN5BBzlBLBlH+hLIm brKaX6QlqURNvCvI4iOiB9ewZtSh9to1KI9N7baq9HK2WkzXSBhW3dC4UzM/ QfjUT7rUNj1PPtTDozeSHQMaRZxW9kAts6+a3vOc1v0URs5g3RCrWSPtN2tY DqOAbHWLrvcyt1ngJLxyuHb4vJDpWwSYaIgO0k4Dz2XkOYkutQSeALpaZANa YTesAIl6k/5qdu9zAa1WxGwQc1sUwg6NpBvARAGQAp87+SAQH+AJFT3BtKsV v5Uv5HRRbYRxz0oVPNLKags7bEEG50RLGsrO0i90okfLdX/5Z1dSZiIvZlbC IpRdESAJGTcBQHAsTg3Dhx0+9XDYy9kRqkkXvHxOi+TLQRMhFTdBWxMioctr IAvhbYRx0rRj0Wefn0QnTUIIIDiH+yVFPAbU3DiAyfDy5MiLKecLn+vltBv+ P7ya8cDkJVz0uWAncRWpuUnTDBG71MKblsATk4BgE8QTNctCFsUThSTyL7FJ H0Ul6qEulITdKmG3yXmdCn63cqhXIxrQS2mkaRTXph4iJQDZNUKLkm+Wc80K nlUlGNaJPWbFuF2zEigBABnWj9m1XgATC/C1ymXVegFVhgnonhjRTgCYuDTw aZpyKsftMpcRzskkSmNka9ikh2ITvaRHzm3l9D6jtT8i0gt7novo9QpuM7AJ q+txX1NJV13+YEspu/uRoB945DG35yGzo6y/Ob+/sYDeWsJsK6W1FNNbSjhd 94f6Kvk9D/k9j3jE+BCYRT/UbJa02xRdWAu/NCojy+FFwCY+xxCM8F8G8GTB rVj0qJZHtS8mDGT3LZN/1cln2eSXl+5fXnp+XB75YQkghSCUD4sEnpB9gy0/ vrD9sGx9t2D6fk7/fs6Mle+E5gh9mLOQMZT1HsLr2/q2vv3W1lZ+gVZ1S9n3 0CVpnTEMzlkY02QbYZ+ZNm2hT1sZMzbmrJ0152AvOgVLrqGPmV1eOYj0OtG+ Hdf8MG38t9fu/3w//udXrj+8XtQMsZ+XF106fvj0gT1njhw8snf33szMHalp makZOzN2gdJTM9NSMvbv23Xq5NETxw9npqdsjgnfHBuanBSTGBccHxOYEL0p JTH00N6tubfPNdfdb6x/8ODhvezCK+funj5TeO7M/cuHik5l3N637Wpm2uXM g1n7rhScflB9r4tWzW6v7KwpevTgRm75hZsPL5x6fGZf+ZGkot3JJXuTy/fD uCVvR8KdtM3ZKQSYnIsOuRIffWsb8Ehcbnr03dTYvIyYvIyo/IyoAkKRpMJz t4fkJAdkJ268Eb/x+uaAmwlB2UkhWclBN5I2XU0Iur414lYaKPBq0ncXYkNu bI28nRqRnRJyLSnk6pbwG8lxd9JjslNjb6Um3t2RlLsLdLzuikIx6JswzM1Y 5nymxRmLj/y1cM6rmXUrfSOScavAo2ePqOkO5aCS1SJnNstYLSpeh1Ey4NBy gE1mPZq5Ud3SlOnVrO3FtGVx0gjzpS+EQv7GllzUmsc/VjI3rseOOqAZr2ba rZ52qUAzIOeK5kjNeNTTn2iKhJQJMr9rnHQPHLVLxuxDmNMF/6CBR/zBhOrW hXIaOB4T32sZGrUKPWYBggbRd0s1aPCTXjVogxXpr+tNrCq600D8qG7VMBx6 ttcmnPGqKDah8AQJxX8PcgcI/UrQnQSjKv4m7/7615/nPqt/+Wn2Tz/OoOM8 TP74w/TvP0x9/9IN667ulge3rx26cCLtyukdF46nnT+Weu30jisnMwidyLhz cX/JrZNPiq60Pc9ndlSK6Q1ydgvwqZrfoRN2m2UDWPVvkRPu0mY1x6BkATsg TcBEr2COmMUeu5ws6NBiq2eY+zcxoJo/w0LUquPDGXRyBpII3Fwh7AMpRf0q 8QCeFiYUm6ARIZ4EwAQXk6SLohqTtUZMUptOaFTyNRKWUkiXCwalvH67Hlab chBMLBq4lmdUcuHM8qFeMbdTwGzh0ho4g/UgRm8tl9bEZ7Qw++oGO6vg4hCr DR4YPE60RMRWt3BfTqto2DKEpdMWsjbBrGKsdDDTcbFTkxOk41kVdKB7Jb9d zGwcotXxabU8Wq2Q1SjmNIt5LVJBm0LUqRR3qaQ9KkmPRtqH2XGIJ3D+NQEO zJEbd8n9gyYIJt5hMewEHpkeU/tGVYgnaImOjxODPjDHhmBUZRAWnoyNrNjQ 45OMqIIlJxSb4G8IRAOuOS/FJiQIWKlrF31ECHV5Bvja9mKWyOmC82CTLqwi WdOMC0WZMI6YRZQX/GpAZJgSeXcjc+NEH12YLEzCA3DhiBN/kd6vTn+/V6oc hso6w7oY7CdGpp8R0TR4KgA/nRZ4nHzsGq2V9+sU/fCRJ3xtPmETrDTRiXuR TVSCTiW/Q8lpU7LbFDBy2wnBHn6HgtcOB+hJY1YAH4zOmGQ0kxTYlmFTc4a1 AqcBC+eVY3YVRdleh8YDIubAJgDgBIOPDavJDxrhQQOv44hZYNExDaoBrbxH J+3UkzLIukBIKCZFj0XVB6OC38Tpq6R33md0PeD1V0lYTWJmPbPrcXdDcUdt fkdNbn9j0UBj8UBTIfDIQEPBYGMBramg6/mdzqe3QV3P7oC6n+eABusL6I1F jKZiTlu5sOexglalYdUBnoxo+sYt7FmncNErXRqVL48p0Qieqkx/NaF/Maab 96jmPIT94otJA9bFU4YmiCpUQtePS64fl9yrFfEEnrybtwKhwAiQ8tOLlfKT 7+dM7z+nd7NG0D964bO+rW/r2z/11lJ6DtnEKW7x6fpnTHR/NpmxMhBMvsQm r0cVpEG87qdZ87+/8fzl3diflofHLNqmyoorJw/vSk7ISIxNTYzbEhOxdXPc lrjYxLjNCXHxm2M3x8cmbIlP2rUz/cjh/YcP7UtPTY6PjYiPC9+2NQ7YJIFk k22JIUf2b8vPudhcW9HU8LC84s6VnDMns4+eKjh9ovTszjsHUrN2pVzLyLiW efTOwezyi08aCjsHqxjND9qf5z+4fy2n5OzlstNHK47vLjmYWLgzqWTPlpI9 CQU74++lx2Zvi7ia+N2ZiIALMWHXE6Nvp8TeS4vNTSeUnxlbkIlgEpGfDgrP Tw+7lxJ8Z+umrIQN1zdvuBa36UZCYNaW0Oxtgde3EGxyw49NLpJscmeFTYKv bQlDNrmVGns7LfHezq35u7fm7T5ef1Um7ZuENb/PDGyyNGudGYdFiGZhTDvv Vc+4ZFN20biZD3ji0jJVnDY5s0XCaJKzW/WiXmATr0UEdDBPsgmACWjZZyb6 c/5Tsok/nmAYZWJY5LHw7Fq6Ud4LPAJUgmDyKZuM6NhuIw+oBPCEZBPu38Um +IO5RU3HYpNpj3JpyvAjGRxBKkEwoUQFUJBNvl92gTA+Qtm7I2is0WfB5M+/ zKMLPEyowz68GZ0a1Yg4rQ3P88oLLhbcPlmcc+bSyQxgk0vH0wBMbp7bffPs rqKsEw9yzz0tvtL4OKevsZzXWwVsoh3qAjbRi3qATSykmYuJ6KfaZ1Kz/dkE EAMuIptgQg7V6nkl+46IfGkpNoEjATrWnAGoBPEECQWRx6yBRfUQGoXDzfHn fViPjY0oyFGJP8gTpKPg6OVsABPFEE3C7ROyukFwUS1mAqoAp4jYPUJWl5DV KeJ0EgzSCwzyfLDrGaO3mj1QBzDCHmgA0btrBjqes/rrAV4+zyY20YhVSFlP YmenFRcYkk0IabkjWi48XXqSTWAFKKTXDzHqBYx6CbdFwmsFMJELO1bABCTu UUt6/RsLwJkpiPDPvwI2WRMx8WeTVddFgl+Aa+DmcB5YY2NEBk8LDxvPjM2T yRp5BWlJSeAJciWyiT+Y4Cf35SxZSzLtWo2Y2IgMq9UPMnmYBZM84WDYjwld QCX47PkjCRU3cdskLqsYcMBlXXmV4SVenHIs+X7lmULeL4xARt4lnxsABAkF RpQ/m8yN2z8t2Pe3XwHCQn2/NPp2yQuEsjTtgD+BLG3Teuyw2hfC0wWoSDr4 0E2ala7Ca2SUDVA5XYAnwCaEOG0qfzbhEWwi47QCnhBJkkSG5CBAilbapxZ0 q/ndOlG/UUa3KjkOLVE477XKAU88NjXKDbKrKTYhBTyiJPPfCBdRkkB5Zi1D r+wHNtHLuigwWcMmMJHzGtm9jwfby2kdFcAmxNuSVsPofNTTWNJVV9ALrNFW zmq/z+6s4HTe53RUsNvL2e2lwCBAIgN1+X01uT1VdwFPgFMAT2DeW30PruK2 V0gHnmnZ9VZZ57C612OgT9l5827xoleGDYSJkhOiQ5eR6tO14FXPupWAJzDi ZGFUM+NSTDvl8C8JmQWjKu/nR0BUZcqbGTMancD4dtaIyV3owPjDguWnJduP i9YP82akku9nDFjt8o9e+Kxv69v69k+9NZecpVffVvU/cklap7R9ACYzZqJV 1wqbrAZNvsQmoDdjqjdj6g8+w59fuf7jrRcghdvTfOP04cwt0VsiAhPCAmND AyICv40KCYwODYoKC40IDQkNDgkPDY+JitmekrRzRxpo29aEzTHh8XFhyUkx CbFBCbGB8VEbkxOCjx3cXpR7pammvK62tLj0xoXsY8ezDp3MP3mo4HjK9cxt N9JTrqfvuLHjVN6R/Kc36jrLu2jP6C0PWp/nVVRcyS46daHkxOHyY7vLDicU 7kos3r25aGdsXnpMTmrkja2B52O+Ph2+6WJM6I0tkbdTou+mRuemx+RlxBTt iCncEVWYSYRLCtJD89NA/myy8frmNWwSTLJJeHYqsMk3l2KDbm6NuJMadisl 6HpS0LUtoTeTY+9mxOSkx+VkECaMBXtAJxqvicU9Y7B6nzQCmyzP2eYmjbPj emSTWbd8elgyZRMCnowauYahHjWnXcpsBmkEXTYV02MWTo0o5kZ1wCNAJYgn /3ts4l/5/imY+LMJASbwgP9ONvG5VaA10ZOJYbHXyh/WM02KPoARxJPPssmw luUycD+yiZHr0LP/djZxkHk+hGu8huEy831uxeKkHnO3/Hnk08wuFMILRSW/ fz8F+lKI5DNs8vv5f//jIggmFK386efZn99PvlpwzE8Zp7zqESPfrGI0Pssr u3fu7tVDty7uu3ftcN71o5WFV6rKrleX36x/eLu9qoDe9khEqwcwATwhGo1K +tBlEiDFIO41qT6yCUY9TGoORRC4uPVnEwpVCMfMERWsSAE64FZwW4ySwKmQ TeRDvSCYwH64Fr0XMRyDru5kPbts2DRk1cEZiEwwvHerbshplrmtqmGjzKDg IaHI+ANiTq+A0ckdbGP3A48AetQBgDD76oBBaF1V9J4qVn8tl9YAMALCoAmy iZDdjmyCpRDYRYpiE0yRIjo7+dm+EIbjWjQcZ5NNkwYA65BNRIwGIbNByGqU 8dvkgnYAE4WoUyXpRjZRiroRT3TygZVOxRoW1p5g/hUVOgHuoMCEask1OiJB NsFOwnAA7HGSwR1cYOsVK62ekVAoPMHqeK9jpQIdnmTKBQaDJn7QgWziQUxY 8jkpNln52BIHmxemzIAnoLkJEwZNKDCBCT6HOMe+BGTx+0pXZ1hpw/3C3S3P ON4set8seF/Pj75ZGHu7SLjMwxyoBPAEoyQAI7NjjplR28yoHQRzKp4Cmh2z r+knBo/2UzABvVmAuxh9NQd/lHPJB4cBUlknXGrqPQZPGj5vK7Unn7DJp6ET Nbcdvj+BShBPFCBeu5TdApILOhRDnSApr03EahbRm6TMVgW3UyvsN8mYNjVv WD/kNss8FrnLokQ5QVZAFQ0poBWV26pwW+XkcygFrIOX0qrnmDR0ik3WgAmF J8AsEnYdo+tBXwthFszoJDozsHue0NofdNUXddbm9zeXMFrLmW0VrI5yAk8I NiljtZWw28o4beXs1jJWSymjqRiEtNJfmweiNRTCtZL+p2pmrUXa7lD1uPU0 YJMFj2R5TLE8pnw1qSHwhKz7IAV4Yn5LxkcAPQBAAEPQCB594QFSgFaAUzCw 8tpneTPtb8tofjNjQjZBp/hXPh3oxaQGGAR5BIVUss4m69v6tr791a2l9Byj 5o5msNItbfPp+mfN9DkrkwqaUGwyP8z5DTZ56VEAnvxpeRjw5IdpY8Oj4iOZ SUlRAYnhmxLCNkUHb4gM+jY88NuIkI0RoYHhoYFhoUHhoSERYWGb46KStmwG xcdFxUSGxEaHJGwO3xwdEB8dsDlyw9bNQccOphbnXQU2efY0L7/w8vnsI2fu HjtXcvZQwZHkq9u33UjbfiN9d/aOCyUn7zfmtg487qI/hVVc49N7hcXnr+cf P1t8/GDFsd0VR+KLd8eX7I4t2hGVmx6Zsz3s+paN56K+Oh224WJMCMkmUXdT o3LTovMJNoku2hFZlBlemBFamB6SnxaSnxqelxqSkxx4a8umm/GbbsQH3EwM yk4C+gi4lkiySTKySdC1rV9fig3M2hqekxp6OyXgRhLAS0hWcgywyd0MIJT4 vJ1bC/cmF+073nhNJOwadauQTV7M2xd8pvlJ4/yoZs6rIthkROKziyatQ4An DgXTKOqDf6zAJvC/1Sgl0romHLJZj2ZhwoChk5cz1r+XTT6tfP8UTIhFjn/Q xLMCJit4ssoms8gmXs2nogiFwhNCJJs4dIy/yiZ2FVHR7CJDJ24T/+9lEyyC NikHkU2mXPKFCR1VOUJhCBU98ScREOZr/fGHaX99CUM+FZafENGTX+apFK8/ /jQD+pefZ1cO+3n2Tx98QCgt1YXFt08BmJTmnAEwqX94p/VZXvOTe02Vd2HS 21DG7noKeKLitQOeAI8Am8CfuRI6UbKQLLAwBDgFWAPWnLC+paIbmH/lb0mD tuwgu2EIjtfJGQAgmMQF5/EPmuBOkFHFhoMxHAM3xIALrBgtWo4ZEMAggJ3w Lnq75PE6VBaNQC1mYjbXELOLM9AKE4yhIJ4wextpXUR8BNCD0VvL6K0BMOEz moTsVs5gI4iKm8DIGWiEB4BsgutqpKQR60c2IWTkI5gQ3pQkmNjULMB5m5IJ zxU8bypBh5TdTJhxsxpF7CYAE6WwcyWb6xM2ITO7CI4AAUSg4wngA8Uma8re KRjBYhPfqAoveoeJ39IxaEIkJhERmUHK/fwTPJFRDbIwswvbZH0aN3nhFzch u3VZgU38ew7PTRjnJ01AKOgsjyxJ9eBahREFhUKkiSphgjnhUk15tHBfr+ad 3y97378Yf7c8/v3SBFAJZpGBSOhAHgHuACSxTbnNACZz4w7/RC8yqvKrOn0k lM/mdC354G/5mPq15BsGzY5bptx6QLZhk9CmB77jEm85sjR+DaGgOaN/6ATw RMPr1HA7MGgC36JyELdNwmqWAJ7w2ggqYTfzafWsvipub42gv17MaFHxe4xS BrIJ0W3YLHOaFagRkEXhsgKSqElagZ1AyhLyDSkCgIKX0qJlGdU0naLPn038 qQQnOkmHmFVL66jobiwE9TaV9TVXAJgMtFZ01hW21+T1kgld/Q1F/Y0FmNM1 0JA/2Jg/UJc3UJcPMAIYgnlcTKAYElJAACy8jvvivicKerV+qBn7dE0PCxa9 0hfjypcTamCTNz4dtvMlu3Xp30yZKONFSlgL/8MSESIBTlme0M971dNO+ZxH Q7Rt8aqBWWCc96rmvcrFMfWLSd3SuGraKZ5xSRbHlMAmL0kIAsHdAY8goQCt vJ9b94Vf39a39e23trbyC8zaHGATj6ydqDexMtewCYLJb7DJ+yn923HN61HV L/PWf33p/HnO8rTk9sH0+OSYTVsiN8SHfRsV/HVE0FfhQcAmGyJCAyLCgiIj QiLCg0NDAmACiooMjYoIjgwLjAjbFBUREBO+ARQb/m1SXOCR/SmF9y6RbHIv N//CxdtHr5acvfbo0qHCI9uupW69ti3lxvb9ObuzKi9W95R1s551DD7ubSp/ 9iDrdt6Ji7mHTxYe2Vd2eEfZwfjS3XElu2KKd0blpYff3hZ0LWHDheivzkZs uBwbkpUUkbMdwCQqPyO6IAPAJArApCgzrIhgk2BCaRF5qaF3t5FskkAWm2wJ vrWVYpOQmwSbhGVtRzYJyNoalpMaAmxyM2nTjS1B2cnRd9Oj72WA4nJ3bCnc k1S090jjVeEqm8xOIZuYiTa2XvWsRzXjkk0Pr7DJhEXg1QsAT3TCHvzdTyfq NclpYzYJYb84RoROMG5C2C7/zWzyV9sFU02BZv2DJkAZLpXPqQRNg0ZWNIv6 HJtQhIJ4skIow2KPhUexyW/kdKHjpNPABTBBNhk2cP5eNqHiJitsQqZpIZhQ MOIfHAEeoYpEPtVnMeSzoiImmNyFmV1/+deXf/iRYBzY859/fvn//l/v/+d/ vIXnp/ZxTs6VgwVZx6vvZ3fUFHXWFANl9zdVdNUWd1QXdteVDLY8YHU+QTzB uAlmdsFfalAyqVIRmABBADLA+hO7v1I1JlRfNSqbCw6AdalNLzCpOVSsBDEE wQTneFEm6AGEATqAk4NgjjKqmG6bhCi0HzfCmeEB8OktPForj9YGPMLqa2b3 twCbyPgDyCZiTi/gCZ/ewepronfXsfpX2ITZVwtswqM3CpjNACY8ejOI3lPT 1/a0v/0ZTLDgxZ9NYKU9bBEOW1bBxCQAyhtZxRNM6AJCcajZIHhvwPMGbCLj tBChE5JNFEMdShJMViTpJiT+yCZkW2bCgB47M6OpJYZOiLr41VgJUglluQjj 9Jh6ZlwDeIJsAgCC/pjYTg3OCSdEPKFKWtCJ3m1biWJQbbIwserTkpPFqZX2 XLNjtmmvxecxTbkNPs9KHf3MmGF23AB4AiLLN3RwNqp182rMay2eUG41M2N6 otx+dvjNovv1vOf1PBE3AaCAu0O3x2mvlaQSB4IJhkuokhNAEirpCx8kIgnc EG4Ojxb2+DEItulwAtfA2QBtVrnGRZLXMDDXhFPrtspXveyFDh2XiIhp2FZ/ 6xM5jXQ56ffHEy2/S8vrVPE6VtmkVcZplbJbgE0k3FYCTOj1rN6qwY5KRvtT dleVYKBBzunUi2kWJYf0QxE7jZJhowzlAJlkIyYFKfkIMZcOm/BRES0ayLqn j2xikHWvAROUWdmrl3YCmwy2l3c1FIA6agu7G0oBTPqayzpqC9qqc7vrC3rq Crpr8jqrczqr7nRV5XRX5/TW3u2uyqEyuPpqcjFcAhMQAAuwCb/zgaT/qYpR o+U3WmQdXiPD5+CT7vDSRa8cSIEAhFnLuxkz6TkCI1Fd8spnghGR5P2CAybo tIiCOeyBY15OmV9OEqiyOKadI/5byaedUhD825qwCzwmttfMmXVLXwH+rMKI vz7Mm0H/6IXP+ra+rW//1Ft7xUVGzR31wGO3tG3WSJu3MmctDKIKHotN/hqb vB5VfPDpsRz+D4t2YJMfZ0xPirIOZyYAm2wO/Tou5OvokG+ATSJDvosM3RAe siEsZEN4WAAoJHhDWGhgcNBGUFhIQFjwxtCgb0ODv40M+SYSbhX69Za4gIN7 kvLuXGiurXj8KPte3pkrd49dLz17vuzkzls7Uq5vT7y8Zdv1bUcLDxY13W7n POnlPGvuKWt6eu9B8eWse8fO3zt8NP9gZtG+lMI9CCag6MLMkFvJmy7HbbwY 892lmE3X4uFiZF56bPHOWPKAiMJVMCnKCCnKCCaU/pFNshI23YgPzPrIJhuv xIfc3IZsEnw9+avLsRuzt4beTQ2+nbJplU3C76ZF3kuPJAklvnB3QtGegw2X xeJu/5yueTKna25UQ2b8yqdHpBSbjBmFTjXHJB3UDnVrBF3wDxf+8wKbTAzL YdmPcZNlnxn0t9fC/0a74DXdSv3ZhEjQ+jvZxD/m8hFPRiSjNvinzzIr+4FE gEcwevIpm5jlA1ToBNjEaeT9XWzi0LII6z013aZlui0CzOl698JFgQnFIxSV ADUgmHw+U+uXOYyGfKrPsgnVvGvlgF/m4Qw/vZtYCda8GX0974Anx6gYrCy9 Xnz7VP3jHHbPcxGtQdBfK2U28fuqaa0PexvKQMAmzI5Kbs9zMb1BTfrdYEW8 Xc3wZxNMqQLcgJUnFsLjstbfKxPZBMEEBLiBbOIfKJEP9Ur53SAJr0vM7RSy 24dYbZjiBdfCwXATWI+Ri1up3cBXS/pFnDY4Bo4kbsjrlXB7AEaUQjpWnYjY PUAlyCaraV3NrL5GDJGQSVzAKbXsgTrOYD17oB7AhEtronVV97RUAp4w++rg fpFNqDZT8Dc6TAI7WVSOQjZxmgQukHFVBr5Lz7ermPCMaYRdn7KJYlVyUggm fmwyAKIaCwMBuW3isRE5ySZKCkywugQFVDI7oQUBoQCqjI5IgEHgVEpRNwiz xZB3PmUTl1VCtfClwhmYmLeGUObGiSwpWOr7POZJl3HCqR8f0VIlKtOjeuAL wBNSBJtQnQqQR5DysH6H0movaKLrGtwd9g1+Oed6OevySx7DHC0HlbWFRfFU gQniCSXkEUQSSlRyF1bWo+bHR+bGYAQCIrR6QmATG/yBow6Nx6b02lWjDrXH IoJX1mngD5OQQsVQEE/82UQnIPCEYhPM5iLiJqxmAJMhZiOnv4bW+aSv9WFf 0wNaayW7u1pEb1Hxew1SukXFsWkEdu2QVStCWUA6kV0vdRhkDoN02AgCchGR NTtEG4FP2eRTMMG5TtIhZFT3t5Z21OWBWqvzu+pLeptKAUyan91teZbTXn2v 9emd1ie3Wp5ktVRmtRK62fbkZvuTbKoWHgkFhHXxgCeMpmJB10Mlo8bIb7bK OobVvcAmkzbu9LBgenjI5xhaSesiTeHJHr/W97O2tzNEQhfWvFNIQnosuig7 +J9fun//yvP7V6O/fzmK+8nqeMIgfnlCC2wCYOLUM2D0jYiWxlVU0MQ/YoL6 Ry981rf1bX37p97aKy7Rq28TfbqkbTMG2pyFOWNmzFgYRNAEOMVGJHQtDHMX Rnhf6NOlAip55VXC+C8vRv78ygXzx4U3D6bHb4ncEBP0VVzoN5sjNsSGfxcV uiEqDBjku+DAb0MAQ0I3kWNgYOCGwIDviHnQhuDAb4ICvgoP/ios8HdRwCab Aw7s2ZJ751xTbVlF+bWc3NOX845fLD65/+6eLZeTkm9sjz8fv/3atrMlRx53 FvTyqnrZz+raC58+uFlSeP5m3vFzeUcO5x9My9+zNX9nTNHOyIKMqKId0QWZ wVlJGy/EBFyM3XA9ftPNxJA722Dn5tLdcWV7Ykt2hRdmENlcwCbFGSGkgouJ Pl2rcRPs05WIbLLpasKGy5uDbySHZ6cim3xzJW5T1tYQYJM7KQE3twKeBGYl h97ZHnEvHQgl6l7G5oJdgCf76y6KxD3joxqiFn7avDRnQ+O/+VEiVj7nVsz4 sYlHL3BquFYFwygd0IsJs2OjbIDwCnFIfR71aocu84uZX9maUPq0zIQQ+ptM WReQTVZz1CkwmSWoxDgzSrCJf+xjepVNfJ9jEz9pkUo+sgmFJ0QFimzMIXQa 2Vb1INVRUyvuQkhBNjHKekFmWT+ABrIJ6DdyuqwEmxAlGNbP1cIjm0x7lMtT hg+rViYIJsgjVPoWFTH5WM/ul5T1MVPrb4ibYBvh//jjEnU8sedPS3/+wwLc +6t5B7ziHqto2MBTCDo760u7G8phvUSsr6QDRkm/XtSj4LTyeqsATwaa79Pb HrG7noK4BLzUawSdGDSxKmnIJloZsgnDrAE24XvsBJuQzhTET+irbKLFShOM m8ACFZajJrLNF5XHhdETEadDwGwFOgBwgBFIgc9oAUhRiQfMGi62eMJMMKWo VyboglEhJMgFa14UQ/0qEU0tZmKlCRabAKpI+f1i7gqbcAaJ2IqY2z3EbmcP NjJ665h9tVxa4xCrFVCFM9jE7m8Y6Hje3fy4v/0Zj9aMcRMyJQnYRDhiBjaR ApvYjLyPba9ghQ/sYBHCE+u1ignfT7T+tIgBVM3yQY2oS8ZtFbOasN7En03k wg4ZKZXkM2xCVmEzsKUwlda1hkqARDBcApqb1IEAT+AAYBODEp7eLgmvTSaA e+ymssWw1h5zutDy3mkhykDgT4NXkMITP+JAy0sTiCwwsSGbTLlNky7D+Ihu 0gX4qVttRKyfgeNXPYmouAniCbIJVYGC8jpkqLERJdabwNcFWWxC1IO8nh9F vZz1LE97sAqeatKFVSeUgFYwqgIPDwVIgpACD5vyYfm1XAsTLgJMxp0AKcTN yUjKtNcKbEK65OgmXPopt3HcIR+1SrwkoSCeEE2GSTwxymik/WKfVtSrATwR dGuATfidCm6HnGCTVgmrBSVkNQvoDaze6sH2yp6mB9315X2N9+kdTwUDDTJO p3qoTycZNClYJiXbqOSSbeV4RhXPqOYBoVh1YhsBKWK7AT4LomGjcIRkE7uB YBOTmmZQwDun1yD/DJsYpF16SYd6qJU/8Ky3qajleU7zs9tNT3Paa/I7avIa HmdXV1yve3ijsTK7ruJabfnVuvtX6h9cbbh/tb7icl35xdrSi3Wll+rLLjeU X2l+cL310c32ymzs1oVsIuqtJArhRe0e3eCokTFuYfsc/NkR4cyIcKWBMOEO L13wKF6MAz4Y35BF7tibC4XREwCQX155/vDaCyPMkVZ+fuEl9NKNqPKH1yD3 j0sOwJNxGx/jJjABPJkhNeeSLHrlL8ZVK3Uu6/Um69v6tr79ta3j8XV6fa58 oNIhaZvQD85a2XM2zoKDB+OMhQWCyeIw/4VLCGyy6ESXEwJPXnikLz2y91O6 N2Mq4JF3k7o/Ljn+9aVz3iF6WJCTGh8ZE/xdRMA3sWGbYsIDokI3hgVvDA/d FBqyMSh4Q1BoACggeGNAMIwBm4I2BAZ9FxT4bWDgV4GBvwsL/WrTxt9FRnyb khxy8lhqWfGVqqd3Hzy6cavg5OnS40cfntxWsjcqOzk6e9uWU3H7rqXfKTjV 2Fra0/O4a/Dpk/rckvLLuUVnLxccO553cG/evu0Fu5OATQoyo3LT4vIyEvMy Y28mh5+LDT8Ts+lW0qbbWwPvbgvNT4ss3hFdvhsUWbozonRnWOmO0JJMAkyK 0oOK0gFMEE8CshK+uxq76UZCWE5K+O3tG6/Ef3MhZuPlBAATwBNgk4CriUE3 kkKzt8G1AC8hWcmB14mq+ZjczKi76bF5OxKK9sB8d9VZjqBtbFy7tDi8uGBf nLfNThqoepM5p2zaLp6yDE0YuON6jlPLdep4I3reSgKDimnVsAi/dbKxD6yR pke1i9PmlwsOfyRBlzTQZ9nkBchnX56yLU1aF8bN82MmEGUX7q+5MT3CxQqh uNVAJVMjiqlhhY/URzZxqWfdmlkPoTmvds4PTD7a1Y1qpkY1Po9yfFjiMvOt GoZRQZjloaO3QdJrBPIiZZH2g8yyAQANWFWO6Dkgh44FN/ksm5gVK7IoaSAr VQtPeoLDCGgz7VK8mDJi+hYVJaEa/H4qIoPrl3msGUFa+QybrGLLp8KmwWv0 +w9Tv//BB4/hxaxtwqX0kq8jLKQ9sJw2C92mIUJGgdsgGNGyid/5BZ0SRiOn +xmj/TGr8wkQCkwwegJXmaT9gCcmsn+RXjFI+cLDcnd0WIZ+HNSTD+8TWKzi 7+dYIw+LVbthCMEEkEQm6MEQCVAJrbt6sLOK2VsHc7iKCsdgkIUqnIerNNIB taSf1AC2GiYjL4NKIU0ppAOboOSCQaASCb9fyOnhMzt5jA4Qe7D1s2L1AZg0 sfoaBzqqeloqgVAAkeAurDquyyp228S4jAdGQBNDvEhldsEe7KaFwv69Fh1T rxxQirsk/FYhp2mI3QgjduhS+IVOiMwuMrqBAQ7s1kUFONDwET536EUy5f0V laCAR7DSBNhkwWeAPd5hMdxcyG7mDNaKua2AJ/KhTmATeLFgPzYoBsEjR/ah PBmBEUaH5WMjCvSOIfDEo5/2mmZGzaDVVK6VNT+MQCgTTgMs42GO2IJ7PHYF pm9hA2FgEEyKQ/2aTdAQRz09qpubMOOXxut5D9bCUwJOQTZBrfYNHsH8LrL4 fQVPQD6PxR9PUBSP+Kd7ET2+gHHgVHDCKdcinNnnngE2GbX5vFbQlMcy6TZP EIYjmskRJRCK1ypxAagaBMN6vkPHs2k4JgXDIKPppYNacb9a1IeBP0oSEKdT yu2CUUhr4fbWMzqqBpqf9DU86m2o6G+6z+55LmE1y7ltcl67XNChFvdoViuP iHeCmmHUMI1qtlHNATa3aLk2Pc+h58O9E2mERJUTEauFLxwLtvgmzBb98AQk 63Yo+w3Cdi2/RTTwnNFS1lp5q6b0csPDay1PsmB8Unjm/r3jD3NPwKS67GJV 6QUYaysu15RfwgmwSXXR+ecFZ5/ln4EJcErT/Wttj7MAUjqe3KI3FgGbaNj1 FmGbW903YWTM2QUv3NLXE6o3k1rQokcGyDDpEI3bhibsQt+IdNatfOUzgZbG dcsTeiyExxSvt7PWH5ZGAEMAT2AENvnDq7E/vh6naOWHpeEflhygNzOmaacY 2MRlYI5auD7SSMVnH5q08sdMnHELF+Q1sOCuFzyyf/TCZ31b39a3f+rtUzaZ t3MRTHwmxrSZCXuQTZYI+8WPbAJgAiJ6CE/pMG7y+wUbyGfmFd26npYQHR34 beiGr8IDvo0O3RQZDGyyiayC3xQcvCkoNBAUELxpU1AAqY2BQRuCAgFPvg4K +jos9JsN3/4uIvzb9NTIC2d3V5TeePLoTknZpey8E2fKThx5cGJLwc6wa4kR N5K2no7fdy3jXvHZhpYSYJOWrvsVT7PvFZy5nX/yErBJ/qG9+SSbFOwkCuEL dsTmZcTmpEZdT4q4sDniXNzG7C0BJJuE5KWGF2YAlUSV7QJFlu2i2CSoMC2w MC0kJznsXgqMm27Gf3slZuP1+NA7BH0EXEv87lLcpisJoTdTAE9CbmzbdDUB 69+BRygDFJhH5qSBgE02F+wCSAE2YXCbvV7V/JxtftY6P2uZGdcROV1kI8fZ Eem0XTRpFkwYecAmbj3fZeA7SQGhDJNtiAgwIbv6wBoMlp3zU0Ri2BoA+VvY ZHHCgmxC2YV/wiY6LIef9qgJO8VhOer/FzaxaZmEiyKs0OQDBJtICSqB9baJ BBMQUW+iZgKVkCZ6XIeODTf5LJsgklBUgsaLK4bgJKR4LUMzbuXShP4nv1Su T0vdP1P2/ssnnYF/+etg8iX9QrIJPICXc3bCvA8IYkSOPpXwrE44ZIRPpVUC mrCLvWbBsJZoMKXitQsH6/h91cyOSsQTXm+VlNkEeGIQ9xqIKoYB/J0flk9Y Xo1gAiMKHQOp38+xBxQWmxhVbGAKQBKiX1ZPDVCAiNPBp7fAiGEU+VAvYAvV s4sqjV8tk+9bZZOV/QShfI5NhOweABMBqwuohEtvB7EGWj7LJoyeBmATEL27 FmvhefRmgCBYB7ptEhDCCGWwjhcpPMG4Bvokohs7HGnVs+CtopJ0A4+IeS0i LmFrQsRKhtqpHsIgmAA4IJigywmpwf9zNuEzGmjdT3n0esQTeMmoJDH0iMfH j2Cy2rOLYBPQhIvqJ2wANkFDdipLCuMmZOjECIKLGJtANhkf0busRGczh1EI KAqCFx1GtIDH0niqVRdZBa8hwcREltsPv5p3viX6dK0gCVbfk2YlLiqhC5Fk GtjBDY/ETMIIPDArigITfzZZUxqPjbxmgWUmRlAIKSDYOTPmIAWQYvd5bYQ8 uik3fCMpx4blXrvUbRW7zCKHgQ+YYNNxzSqWTjYIYKIc6qHYBN7PhNgdYlIi VrtgoIndXUtre9bf+Lin7kEPETepYHQ+EQzWEUlfnBYZv32ll5ewSyUmXG+0 8gGtYlCvhPcSGyAd2AR42U58LfNHDCSekLHa32aTYfWgRdoNeCIeeE5rKml6 eLOq+GLd/SvAJk2PbwCSlN4+XHbnyKO8k0+LzsJF0LPiczj//9i776e48ixB 9LFd3SUJELIli4RHICHvvRcSSAgBAiHvDQjvvUlI0nvvSe8z8R6ZUrmu7p7Z 3ZndmJ2JNzO7Gy9ebMTbeO8/eOd7T3KVBahK/WY3qn7g1okbN5MEpchE9f1w zvkeOL8sPP2y4NSzvONPc48BT4pvnSm9cx54UvXwcsPzbLAJr+mxqqfUImpw KVtDNnGJ3wSU7/o17we07wa0b/o1kwH1mJfsCRm0kn9qRj1KwAi2w4NHqL4S HdoEEygIE3DKD1Nu4MmPM+7ZfIr92wkrxLthw6hHGrBwIbAdHqu5ZoIqMobe KRqyC0ArAxYexK+98Fk8Fo/F4zd9LGgThElQ1wnnOTaZTZqEbDLpFH0Y0AJM 3ngV3w8bIZzy9qwzx5M3rfsqcunqZX9YsRRsEhm99A/LI5Ysj1waFbF0WcSS pZFEJUuWLV0aEUkiMiIichnVePKH5VF/WL1yCdhk5YrfpyR9dfHsvkf3rz59 lFNYdOZK7uHDhQd2FOxeczUu8vyGNZmx8ae3HLy28+6Ty1W1dxsbH5VUFt55 ciUr93Bm/pHzhUeOFhxIz98Ve3P7ppupG2+nr7+VtjonMfpyTPSFjSvPrF9x 8qslmcQmkTfio3ITovOTVt3aBjBZe3cHnFfeSQObRBUmA0yW3UyMyt4anRMH 5yWXN3xxfu2XlzYsvxa7KjsR6PHl+Q1LL2wGlQBP0CZwJ9ok6spWwAs8AK4x k/JV7jbgCSBl+4sT7YxSh0M6NGgcGjAMDej7qVFug6S1UDpoFfb3hWzi1/Y6 tRyHhsDEoeOQX60buHY9h8CE+l0rLGBgmQS0GR0wjPWb5tZuzW4UPIcnaJPx gOkXbULXZQUdMjKghJrwTtlE0j/Lk0ErbRMF2oSE+9M2cUppm5Cp7pQpCExE IZiQLm9xm4lKmsDiHFQya5NP5k3QIOEqgcDfYZLp8Bqmx8Qbcskng7of3v9k fiIyZMG8Ce6sFd57Qs9S/GtJQgdphP92AGQ0PWIhAzJmbRK0S0mZnEM+6FTg TjjDLvmAXQLLBpeeDd8HYAhghNn4vKfhWXf9UwjkCdlVWNIGqyZcO2nhm0n1 L+Accwx6VmC/O9RvAuGxyowqFqCjp7Wsq7kEVNLdWsphVIvYjeALXNHBWg47 TeCM98AZPoXexYuKJuSJXNBKb/Ml5wNM2sNhAgEqwYwJs6MGguRHPmGTzsZS gAmzrZLRXNrR+AqeGDwHlbjDrGW7YCFK2QT7PtAmc3gCPxShfpAwmxhUDLW0 FfQBEgGYoE3gGmwCQUhCBSnuomyC30860BG0TWZruj7XJjp5Z3frq8aq+8AT QArYRCvrJHvhUtsIW3Rs2iYIE7QJ/GWxwipsFKN20GMgMxb9QI9QiRQmR8iA cuqMPME0Ctx0m5V2I5m0CB4xqdkQYBMI7NlBntBNKJg06YcfXp9uttnENj3s mB7+yZ5gEBQ6MD5KJOCAZ6KDgAsIpAoV+jk8obcUDqlk1iY0T2ib0FoJj0Gv niQB3XT/lNxrlzv6RHaT0GrgG9UstYTs7SDmNglYDfxZmMDbmAdvZgYJTmcV q6WMUf+qreppU+mDhuJ7aJPOuies1mJ+V7mgp1LYWy1gkpZ5EbsWXjIQikzQ KBM2KcUdKkmXRsrQybv1im6jsqdPyQSY2D7TJnL4x61JL6jnt71oKyssu5/x vOD0s8JTr+6cLb577vHN4wAT4Mm9nEOP8o+BUB7mHYWLB7lHMJ7fPAEkeXLj 6KPrh+GM2RMIEErtk6y21/msuvtyRolZWA828Wk7KZuIZvyKt0E18OTrYT0Z ODJK+kSmgqHdt8a8KsQIBFxMBrSYQCEDTUYtWM0FMAGnfDvh/GGSqOSP064f CFiITb6fsn8YM88MaMZ9coipoOot1fb+7Zjpm1Hj+yHd2wENznxcnL24eCwe i8cvHvVPLneV5Unbn4JNAtqO4T4m2GTAwACVwE3gCThl1MKatQmP7jeZcoux 5eQD/FtHbdUFMPlhxKTn1p4/fDBxw1drI5asWvrlyqVffrVi+cqIpSujIldE RUZHLo+KWh65fHlEFImlEVFURMJ/UZHLlkctWR71ZXTUH5b8/t99tXbZrh1b My8deXw/5/GDnJuFpzJyDuzL3Z2UkxadsXnZ2XVgk20XE07fOvy8NK+u8WF9 /YNnJbm3H1++evNYVuHxC7ePHb11cMfNXVvyU9fnpay/veOrwtTo62CHDcvO rVt+Zl3UiTVLs2IirscCTCCW5yWuKCSpk0/ZZDk8MnvrlxkfbQLEAH0ARpZd JDZZkZkAPIm4FAN3IkZAKNgsj05Bm0AAatKeH2/tLLHZRP1B3UC/brBfBzYZ 8mkGHLBAFQ9YBEETz69nz7GJU88llfN9pASItgm25QbdikG/BudB0xJBhsy5 E++nC7rCbbIATNzaOTNK8Hf7odSJRTJrE+mQlbKJQzFI8ySsEX6OTYKzNjFT 1jBRfNBLSHEXwoR0eUva+yTtZsomIAt6wjuBiaxdJ/sJTD5lE/hEXCcAUtAm 0wOG+TChK7vmT1TEuiy8RpiEc4Yu9Pp8m/z5+6G//DAMz2Fm1AqLWw81jBKF ErRJ8bs36lGPeTTDLrJmCFiEHiPXoe01STs0/CZ+Rym3rQRUwiDbCj1mt7yS 9FQpBKQ5gh7JgcM44F2BKoFvO6gE3l0QsJBzmEQ4aREEAdCAZf/H3ydTv14G BfR2VGCnCQS7qwruIb0n7RV09oTOoVBplGYMSijtGBRM2sNhQmzCCGVMaJh8 Mm/SXIY26Woq7WwshicDT1Uj7bQAz8n0jZ/kTebzBEcZ0qkTuPBYxQZVl0rS gjVdCBO4gKBhghfhNV3wLaWFgnkTrL/Cejnqe/tX2ITR8rK27HZD5b32hqes zlIFGZrZFT48Bf8WCBPaJhi0TQZ+YhMTbRMwiNeqhrPHooILrOxCmDiMMpsh tHsApk6wNg+zJ9QseEHYlBORx0rKuoIueNvoQlPmA33wx2GOAxEBfygAxGfT IkMwVwI2QZiE84T6aCjmNJ7MGXpCImCjC7romi64oJ1Cf2jQbxrwG2fD0O8j EfBoPQ6V3SwxankaBVMu7hLz24QcwhOENryTuYxqblc1gUlbOSZNmssfNZTc q3t5p/H1nbbKB92NzzntrwWMCkF3Ja+7gt9DWuYFvdXYKyTm1ot59TJhm5zq q1KJO+FtqZN1GWQMMxjz82q6+iTNBmGDllfLbXnWWloANnl289STmydAJUCP oqv7Cq7svpW1l1R2UTBBksBN0ArEk9xjQJKH2YceXDsIZ7h+lncc4mXBqfJ7 FxueZzMqi8Rtz3XsSrqma8IpmvbJgCczfuU7auwIDnMHnrwZJOVbIJFxnxqE Mhraj4UMNIF74ENgEzpvQpAy4fp+0o1t8lTLvO27SduPM84fpgEvfTgRHs4f KJV8N973/YQZxy9CwD04h/HXXvgsHovH4vGbPmibWEW1aBOQCHgEeDI/bzLh 5C04F/7bQf07Pzl/N2SQdBQfSU/funr1mmVLVy1dumpZxNrly1eDSiJIMVfU sqjICCDJ8iXLgCRwsWJZJER0JJgFrEJ4sjRq2RfLlvwuZtOq/XuSszKOPb5/ 48mDXLDJhWv70q+mbbkSH3lhQ+S59Wuz4nZmpWU8PP2yLL+u6VFNzd3HL68X Prh4vejktaKT54qOHrp1IO3mrph8qpTrbvraW2lR2bFfXli/FGxydj3wJCI7 NupGPKiETFe8mQw2WVWUurBNrsdG58QBT5Zc3gg2WZJBbLImJxltAh7BfhM4 A0aw3wRtgsMZ0SZAErQJfGLqs2NNbS/NFkHAr+kPaMEmsGKHBWTQJoa1aLCP FzRxaZu49TyXjusy8AAmpOCHGl8IActaXMOQ3+LCSgn+nxIIbS4aLhHaJuF3 TkDM2uTnkiaUTVAlcCZIsctCPLEQmyBPwCaDFimZdULZJMSTsN265trEIfFa BGATi4bUaGGCg1R2USrBied9aBNFl5VuNlF1G+WdWkkraVGRtWnCQi1rM8rn VnPRNjHKOuAel4GDNgkfpEgL5VM7BqNN6AZ5uAgvBgu3yWfuNgwwQZtMj1hg 2eymavNCqRObFHt5+m0yUixnlwStIl8f323guPRs4Al8K5ScenF3JfCkp+EZ 8ARb4wXMUAuDlNeAK15Y6+LKnPxu36WAC6AKrKhBJdhagrsNAyKwXgtWbqyO Skbz646GV5hAYbS8hoALcAHAhPzCuacWbQJnvMB58XJBq5TXBCHjh2xCar14 bWgTGiZidhu3pxHbTLDTBG2yYDCa6Zqu1x2Nr1idlfAnwiLQrGXjcEAaIOGp k3CeoCDQJvB3hzDO5k2wiAslIuXX03kTbDaBs0LYhCoJm8DYgR3r+IcCTFB8 c7rgf8YmRlU3eKS+4m5d+R2I5pqHzPYSeL000nb8yvTwlDk2wbwJ1nRR7e06 Mvydsgmdd6BtAgEYQZtgDgVtYtbykCFoE4AJ1SvBotMoOBqeQgr80ULqT5TT 8+gHPfoBtz58ly0qKUMSInSiBJyCMQcmn+IJbRPsiA9t1UVhZHzABTEx6MYI twkdgwHLQMA8GLQM9VuH+20jAxB2iH6fyWVTmQ0SvZqvkrFkom4xr1XEaRKx G0PbzTEomLRXMFvLuhuK26ufNZU9rC++W/O8CGzSUf2ot+UVv6uc7OXFrKJt wmdWAU9IsGsgJLxmGVW7qBS1q8TtGkmHTtJJRq4oQkWkpL700zbBgi4Vu4rV +Li5JL/03qUneSce3CAAuXv9YP6lnVdPJ18/mwo8AYkgTFAlGI9uHHl0/fD9 qwfuZe0HnjzOOQIweZ5/AmyCqRNsOZF1FVsljT5t51Afe9whnPJKp30KCNwy 6+2QAQJs8n6E1HEhTwAmmKuFgH984OZUEBRj/n7S8eOM+09vPD++8fzpje/H aS9ShTKLA1QCNoH447Tthynrd5OWbyfM4JQPo0aaJz9MWiD+NGMHm8AT+LUX PovH4rF4/KaPBW0yYu4FkgBPwvtNJkjShDebNAnZZNIp+jqoBpK8D6g/9JPi Ll7T010JSRuWR2+MXrkuKvqr5dGrlkV9Fb06OoKwI2oZMGQFZZPopctWRESu pmJVZMSKKHBJBMmeREd+uTzi97Fb1h7Yuy3z0vFH9248fZhfWHT2bObu5IsJ 68/HRFzYsPzipvXZiXuz0689vwg2qW18WFZW8PD5tVsPL2XfOXXl1rGTBQf3 3dybenPn5oK0dQWpG+7vWlW4bUnm5t+dXfv702uANisvbo7OTVyeG4IJfHTV rW1gk9W301aH9cJHUjwBmKy4EQ/npVc2/f7CV9gLD8TAmq6IS1tWXU1ak50C NllyYSPwBCQCMAm3CQQ8Hmu64Aw2qWt+ZjRxvR6l36cK+tV+l5yMcrOK4H8K ARM3YOSATQI6FoRbx3Ub+AATb5+Q2p6L+h27QwZnN8UT0nVik/icMnpyNC0U eoLJHJ58ZtKECtVP5ifaZlMnFnFwlicEJiGbyNEmJD5tk0CYTczqbkCHVd1D OtklIZiQrXGpsFK+sGt7MW9iVHzSJgbZ3EZ4er4J2sSpZw86ZRMB7fx+EwQI nUwJz6rQ9V10rgQ+l26l/3mbLJg3+eM3/XQvPCybPWah1yIK7a48+73195GW E38fWSF4TTyAiRPeBpRQ4Duj5jUCT3jtr1nNL7vrn3ZUP+xqftHd+qq34zWs oGA5je3V9LodVrxws0/TC2tgWI7q5D2wLsU1qkrcCQs2UIaQ1QDrf6zsCvWb dFXh1r4glJ62Mm53jZha4EEgTMIaT+jUSWj/YWqnL2KTcJhA8Hub2Yx6DGZH DaO18lM2IXNPWsrBJl1NxCbwTOAZ0jVdENiUge//8NRJOE/gQ8AT+D7AnVY9 R6/sDLdJOEbwQiFqgoALensueqwJTjbByitsNvlrbQLffF5PZWvd47b6JwCT hsp7LbWP4CUTsWuRJ/Qewgv2mwRdqtAmXbM2gcDyKuyIR554LCqnSe7qU2AO BakCNsFECU6l0SuY8B7At0E4T7AVxWaAP11AzYWXUZu8kS2LsfV+Tm8LDRPw iMcCf5DK1aekbTKPJ7o5PKF360KY4BzGiVmSTA556ECbDPttVMUX6TohjScB 80DQOjRgGx60jw47x0Zc46NuOA8N2P1ek8OmMhnEWjVPIeuVCduls3tik9QJ o4bbVU1s0vLRJnWviE2ay+511T4Bm3A7SrHfhLYJbza4PRWcngo+q17IbqR+ Csg7X8FvUQpaNeJ2nTTUPUf9a9b+KZuYxE1gE0VvRXft/YaXN14Vnbt39VDB 5d2FV/aAR/IupmeeSLxyPCHnfBrcvJN9AEu84AxygfOD7EMPsw8BTMJt8qrw dEnR2bK7F6ofXcGyLuCJll1hEdf7NF1DZs64SzTtk8/4lbiX75tB/SxPTKAP HGgCEkGe9NvEGENOGdz5Ycz6w5TzTwQmxCZ/mvEBVWZ5Qmq6PowBRiw/TNt+ nLFDoFD+8tYJAR6B+CPcM96HJV4Qv/bCZ/FYPBaP3/TR8OQKoyxf1v7MJqoL ajtBJaMWNtmni3Sd9Awau4f6mGM2DsJkwsmfTZqIpz3SGY903C4Em3wzoHsf 0EBMOCTsukc7E5I2rVgds2rtuuUr169cs2HVV8lbE2M3J8Ss37p5Q+zmTfEb NsatW791/YbYFSs3rVixMXrF+ujla1dErY6OWh4dGbWCNM4vSYzfcPRQ+vWs M4/u5Ty8ez335omTl3YkXYjfnBG38sqWlRkxqy9v2Xd9Z15xZmnlrfqGhyWv ch89u3rnUcbVohMXbx4+nLd3R97O+Js7Nt4ik03W3UuPzktccmnDFydXfnFi VcTZdfAVVt5MBphE30wijfBFqauK0lbC+XYqnAEmoX26KJ6ASlblJq68ER+R ufnLi+uWgU2y49ZcT4rMIDaJvLRl9dWktdkpq7IS/3BuPfAESAI8gYALrOla eS0Bxy+CTdbnp6U8OVLd8FijY3ncSsITrxJkQWrjLaQtMdDH8xtJ3iRApU6c WliU8txGPgasZn1WMaYzcOlF1jBWsccuGfLphv16KjCBYqRsYpjlCZ1SMU30 943DRQBtohv2gEE0C9pk2KOGIL3w8PRsoYKuUFkX2sQq6QeeUE3xwJMBmicu xefaRN0DAMFdtkyzM0rMsk6LrNOm7iHNJno22UBYwzQpu0hBF9hE2qaVhQJ5 QtYDJD4KhUaKEZCiYjgN7H6HhPTCv/XNn2aCaZQ5Ec4T+pq2Cd7E7vhP7dM1 P75/74f4MA0LMFOoFx4b4SFsJPzIE1iUmnheM5iUS+2f3OvUkwkvVk0P/I00 gmYJs5rdVsxoeNpR86i19hEsdNsbnjLbS8ScOlhRUwyBxWe3jtrCC7eZonrk 2bjFFqgEzrBaI1Uu3TUAE5zPjmMQOxpekXGHjcVwJ13TBY8RUeuxMIC0UDdb 5AKySRfVNd8iheC1SrltEk5bOEzE7FYBq4Xb08jpboBYsBGetklHQwmjuQz7 TfBpwKqStgno4OdtAhLBpT7cDxf4fdBI25TiZmAIwETIJnkTVIlc2AgkkVMj F6np8E1K8cctBYAkGHRjyE9quj5hEzjDnbRNPDahUd0j6K0ihOx8DS9Te+NT QAqgsqetWNBbDTyx6FhWPRiBSZelYf4C9+kK20A41AgPNqGmjdhwi12Qgh+M YFbZ9VLACDABsEDBRG7VSUxqDqpEK+uG0IX6uFkYyBMMi46LmzODTQJOLCHT IYWozYqN2HHvt2u9Vk14AE8g4GJOAoWEQxtwkgg6KaG4SAz6+ob85mGwSdA2 PuAYH3RMDDnHB10QE0CSYS/GxJB7tN8xHLANgkp8ZEvhAa+532MaCFgH++1D A47RYdfYiGd81AsB1yNDrqF+u99jtJkVeq1Qo+QqJQy5oB3emSJ2k5DVyO+p Q5v0tJSSZpPqp41lD+tL7ta+vN1ScZ9R9xRsgjVd4TbhdldwGOWcLvhxKGN1 lXIYVSSZ2F0rYNYJe+tEvXUSdoOS36QWUht6iFupf44om0ibfzLWBGu6pM06 fp2cWd5Vfbfu+fUXBWduZezNv7jzxvnt2We2XT2VDDABnsBNLO4qurqvMJOw BYQC1/evHbh/9cDdzH0QcAE2oTfsKr1zvvJBRtPLHJzAKOl8oe4tNQvrvZrO ISt3Ev6vHVCRgq5hApM3VIBNqJkm4AvL+9E+iLdkXol6wC72wf+JLPxhl2yq X/v1qBkY8v204/sp1x+n3D9MO7+fcnw7YYP734+YZgZIIubbCfMfwSZvHD/O OP44TZDy/aTleypd8ue3jj+9ccDFt1Q+5dde+Cwei8fi8Zs+mp5mMStuydtf OMSNQU3XqBlgwhkyswb7egdMzH6Ivt4hG2eE6jSZcAonnWTrYKqaSzbjkb/x KmY8EMpvBgwQE3ZZ04uCXSk7tiduS9oSnxATvy0x9cCuQ2ePn9+78+iObfvT kvelbTuYknIgMXFvQsKeuNj9sVv3bd2ya8vm7TEbkjetj924LiZ+6+Ytm77a lrzpxNGdRTczHt67eu92xrX8o4fOpyRciIu5Ev9VdsK6zLjos+vP3DqS/yyj vupuc/X96pf5zx5m3i44nVV4/NzNQ+mFe2IKdywv2hZxOyXizjaQxers+LUX Y0inydn1ERmbll7eFFWYjBNMUCIQK26nYtAbCJM9hAuSVmbHrs1NhFhxdcuy i+uXXdiw/HLM6sz4FRlboy5sjroQs+Ji7OrLCWszk8JtEnl5C/abYLPJmpxk 3K0LbBJTtKu05oFCw/QHdF6v2u2S+1xyF1Wp5YcwC/x9fL+R59NzfTqOW8cF nmC/ibdPGLRL6YEjdC29yypyWoSzezGRrudhP9mUeDSoXzBCsxrhGh7m0+BO XOF7BX/cNHh2oAnZN5gKequuOUF6T2yzo08c8gGqSwVzLkE63IqAW7FgTRdx BDWaxCzvsigZNmW3XdkND7DpeuGREHY9CyBjVHQSmEha5wTu60W3q9BIISVe KgagxqplBuziyQE92gQjnCELBt2QMieBMufOBbMk8OnzvQOPhD/37bgdXgXS C0/tcItlV7DcxZvwgpJVt5nvNPMcfVwIu4lDh0Xfq1d2wiqazSjtanne3vgE oq3hcUvdQwi47mkvhnWUStymEpOCE7WkE5ajsATt03BwRCM95x2L8Hs7KmDx z2h5TVRCbR1MtsZqKqZmtZOkCagEeAKPDN+tiw4Zr31+SDitGGJ2C4aI1cxn NoFNkCf0NsL0nl1oE0ZrJQTu00X1m5Ays57WkE0s8ONAapxEyJA5NqH36QrP QcBNYAXYRC1pV4rgCTdIuPX0TlzhIRc04UfpHbRQJUASCKBKeC88tvOEz1uc M3sRYDIS1MAZbvqdEquBBYIGEPF7KzndZcyO4o6mp/BidTY/Y3W9lvDqtPJ2 s44JD7ObPjbFU3NGSH962OBFA0qBagChhoB4rAMuc8Bu9Fn1XovOaVS5TGqP GZyihWubTt6nEutkTJokgBSMcJLQQaVOBG6LNOBQ9bt0EMFZU9BZEsRIeCkX LRQaJj8p7nKp/C4lFSq/U+Vzqb0udTBgHBww9wfMg/3WoSF7MGiBM1gDxAHK mJoIgDhGh91UcsThdRvNJpnVrPR7TfAAuLO/3zIwYB0ctI1QSROIkSHHyKCD 1HfBp/jNPofWZpSadSK9gqsQMHDCjozXCUZmd9Yw28vhvQ0Ab6x8VF9xH6Kh 8kFrzaPOhmes9td8qgsep8YDT7iMcgywCeFJZymvs5LdWs5pqxD31Im6a4SM amlvvYxdp+A2aITN+C+PgcqhGGQtBlnzHJsYxY1ok87K27XPsl8UEpvcvro/ 71I6qOTSkdiLh7dmHI0DpORe3AE8gbh5eRfwBGACQrmbte/25T1FGbvvXNl7 L2v/w+xDdN6k/N7FuqdX20tvMmvukgmMjGJZd7GUUazmVNhVbcMOwdsBzXvS CG98P9b3ZtgwM6SfGQShmN4O69+N6N6P6r8eM3wYN2K8GVKP+6VDLsGwWzjV r4QPfTvZ992k9btJ2zfjltl2FT3AZMKvmgpqgCdwJ3zo+0nbH6cdP8zYv5u2 fjtlgTMGXH+Y6Pt63PRrL3wWj8Vj8fhNH60vstnVt5Wdr1zS5n4tY9TMGTGz R6wcsEm/sSdg6A6amMN27phLQHYPdggmHKEduqbdUhxrMuGQTLsV3w2Zfhgx Dxh45Xczc65kQ5w+curArgP7dkIcOrz3+PaUfWnJe9OS96ck7QOVxMfvTkjY mxB/MD4OYn9C7J7E2J0JsakJsSmpyQCbuP17tl08d+jurayH967dLbqceePQ gXPJYJMtmQmrs2JXZ8SsurDp+ovLDyrymmofNFbeLX+a8/jupaKbp7JuHT+L NinYHnUrZVlRyrLbKatzk1Zlx686tzHy1NrIM+siL5PhiVEFSagPGikQ4TYJ zTcpSFqRHbsmNxEi+uqWpZfWL724IepyzIrLW6PBJhdjIs9vjjq/ZWVGHNhk 6YWPewjTW3XBTbAJqATOEOvyUmPv7i2veyRVMtwelden9nqUPpfCiT3Rv2wT GZABTDHs05AyMOSJjfDENzvPAm0Cq9+xfsOCNsFR8miT4dnJ7wvG/xabUL3w TiMHvIB5E9LnjlVY8i6zgtjEriI2sc7aBB4MNgGq4EiUBWwiDs1DCYX052yC NV2fY5P5PFnQJgtuQbxg3uRvfxiBP+7dhANeGnj50CO4mxYNE8yFoUoQJvQ1 wARWsLgdrpRfD6tcRusLhElr/SO4gOUuo+UF1WrdCjBRitqUonYcGY+dJh+L W6h0CcAEVQIYAZgABNAmcMbGk/n9Jp9pE5okwt4mCAGzkU6a0JVdn7JJZ1Pp x5ousElbGTBKIWwzqXudfaQLg94F4hdtAtdoEw3ZabkVAUI15pDZJRDY6h5W xNWJWSfMNNHpJ7qsC/M1s9syy3D84pwY8Cpom8B1wCV1Wfjw2sGrphQ3Yz9+ b2cJqATPPGYFvJqAF3hlbUa6sgtrq+DtIQeYzM5FDbeJbdhnG/KCTfqCDqPP pvNagQlanxVQoIezy6Sy6qQmpVAn70WYhNskvAOFLvqCa7tR6LGSpAnaJODQ UEMPNbRBMEUyp81kjk3CK7v8TjWQZDbUPpfG69L4vXq/z+DzGIJ+cyBg9noM cPZ7+7wuY8Br9nv6vG7TUL8DnPL+7fC7N0PgFI/LADzRa0VKOUerFRiNYotV 4XLClzICcIhNBuxDQSvYZDhgCbj0TrMCeNKnFmilLOAJhoTTxu9pIG/75rk2 6Wh41tPyCuhBmt+p7bkEVOpkQZtw20kIGQQmgq4qEIqYWS1l1ar4jTpxK/77 Q+q7pB9hQkLcoBM1GKmaLpI3oYabPM07WXhpT+GVPQCQa6dTQCUXDm0BoWSe SMw6mZR9Ztv1c6k559LAKfAAiKLLuwEmty7tAqHcv3rgyY2jL26efFlw6vXt c7VPsgAmrLr7gpankvYXRkGtQVCjYpUressMojq/qXfKr5juV88MaEAlYBMS Q8aZQSNlE/37Ef3Xo4YPYwATE8S3E33vRw1TQeWoRwIBPIGbtE0+jJGMCcm/ DOonYSVA8QSuASx459sREm+GdRBw8W7U8H7MiPFrL3wWj8Vj8fhNHx3FN3h1 99WMErQJwGS4jzVq4w6ZWWiT/r5esMm4Wwg2oXginOWJFOLroGbMJgSbvA9o IZwyRtWD7NLnr58/eJZ5PuvQniP70g/uSjuwc9v+pLj0lITdKQl7E+P2bN26 c+uWXXFx+7bGHNi65UDs1n0JsXuT4/amJO7clpSenpa6fVvy4QPpVy4df3An +/GDnAd3rl7I2rP3VHz8+dgtmYlgk3VZcfH523NfZT6uLmiuewg2KXty/eHt C4V5J67cPHom70Ba/s6N+akRBUlLChOX3EoCm6y4GrvizPplJ1ZHnP5qeeaW lTkJywsXTprMT50svx5LMi+5icuvblmCNrlCVW1dJjZZdn5zxIWY6Iy41Vc/ 2mTF1Xi0CdyEayzoQptsuLk96dGhivrHIlmH06Xw+zU+r+oXbeLQcUI2cciA EsCKsYBuyKcBiZBuX7vUbRPjvDm4OUDt+jUS0MECmIx0nBdoE/gKIz4Nzi6h HTE3KJv8IkxmbSKlp8b3Oz7LJiQzoiUdJaEedgomZN9gVY9D1QMPAJLAI10m LuZZfs4mszAhTSuftkk4TH6GJAvyBOPnwfILNvnjCHz6+0nn+ICRpiU9IhBh Eurvnk2UoEqcZh5En7YHbAKrXDp7wu0p72x+hjbBHEpH07OetmIJt5FUwlNj R2iS0J3vdB0XwAQYEh4AEwxAAdiETprAZ/21eROwCaoEVoMQNEnCY0GbdDS+ ZjSXAU/QJsw20m+ilTFsBh6s1SFcs4NHP9MmWlknhFrSDiTBPbhwmh54hFYJ PaIdvxR8ImZMsLKLzptgxzrmTfxOqd8pmRMgkX6PfMivwtHwYBPQCvLEamAh LdXSVuCJgFUFLx/YhNlRzGaUirm1cD/uBoZN95g3AZsM+XS0TbCmC2LEb4Wg arqM9DbClAsIDUAKTpPcrBEZFFy9nIkwoZtNINAm9MST2ZouMBGASB6kbBJ0 asNtMj8t8jk88TvUvo+h9Tq1HhI6j0sf8PUNDjiCAavTobPbtWaTUqeVqFVC lVIAZ6NBbu5TeT3m/qBzeMg7PhYcHfZazRp2b3tHZw2ju47NaZFKmXqtwNIn c9hUfo8x6DUN+voGvCawicuitJtkFh35DqjFTJWoRynshjcnvCGR5LRNACaN VQ8ZTS9620rAIGgTiE/lTbgdlfzOagheRxW/E64reR0VvI4yUU+VgluvETZj ywnZe1BCVKIVN2BohPVaYX2fhNR0Yb8J2OTRjWO3MvaiTa6fTQWVnD8Yg6kT uL58LB5LvIAtiJT88zsKL+4suJAO53tZ+5/mHgObvCo8XXb3Qv2za53lhSRj 0vlKy6qwSBtt8mabvMWuaHXrugas3AmvbAzDr5zsJ0KZGTJMD9B98cavR00f xvrAHVQLCQm4cyqoHvXIIMZ9SnjY16N9tEpmBnTT/VqACdoEruEMVIGYIgLS Ik+mBtQTQSUEXANSfu2Fz+KxeCwev+mj63Uev/6Bpvs12CSo6Ro2sQaNzBEr KevCmq4BCwvzJmNgEzuxyaRTRFV2EZtMu2Vgk3d+DcAEhGKXdnaU3m2obHj5 6FX2pZzDe47v3n5o57YDSVt3xG3eHh+THh+zc8um9E0bd2zamL55086N6/dA bN60JzZmT+LWPcnxu1ISdqYlb0tNSjp8YNe1K2cf3csFnhTkXjx7eefuE7Fb z8Rsvhy3KnPr5pzkvU+P3Sy99qS2sKH6Xm1Z0etH1x7cPn+n8ExG/uFTuftT 89I35m2jbbLyRiJoYvmpr5YeJzaJztq6Ji95vkpW3kmDWNgmeYkQUde2/CFj /ZeXNkRkxiy/GhcJ9Li0ednFmMiM2BWZCavAJhcXsAm9QxfaZGPBjpQnR8pq Hwql7WATn0/j9Si9TrnbJvHBgme+Tah9unC4ic8s6qdsglmPYb8W17deh9Rj J63xWAkPYCGTHKnUyYI2CU+aDLqVuBPXgjb5TJgEZsedBGmeUPt6ka8QZpOA 62NNF4jDpusl+tCRTgqys9YsTGzqHoe6x6lmYtIEYAKBlgFoLGgTEzUPhd7m yzjbdfI5NV0LFl/NaTyhPfI5+ZSfm+f4wzDaZGLQRHZmmy3M+1jK9XGxvYBN MG9iM7KxuEun6MDiLiBJU8395toHpLKr9lFb/RMOo1LQWyvmNEh5zdgYAjZB TcA6n9dTC8sz7C6BFVpLzTM4Q6BKECkdja9g/QYPA5sATOgu+M+xiZTbRrWc tGLeBHlCJ0p+0SbtVL8J2KSzsQRtAk/AqGLCWj3oAowr8NsFb3UcDT/fJjjE EIkBrJi1SZtc0BQ2850MVdTKQg3vaBDQx+y+AT1Utw4xC9yDaRSc245d9uT3 AK4FwucQwxnLutAm2JDisQnhVYMXEZACxlSImnA3Y3j5etpfAU/AKRJeHTxD eKq4mwFu5wt/30EvKegi4dFRW2aRGPGbIYZgNe4xBJ2gAHCBymNReq0qCI9F 4TBKzBqBQcHRykBn3RopIzw+0QsvcPaRcSpBlwZt4rer4Sujd8KnluD1HJ4s 2AsPHvEBcEKh9Tq0HofWZddBeF1Gr7vPatVqNGK5nCeR8YRiDl/IEkm4UrlA LOVy+UwOr4fJ7mxtb2hsqWnvbGKyOlkcRntHdWtbRXtHVU9Pg5DfoVZyTAax E/7WDi2oBAL+ILSJTS8xKnkAEwiNpFch6II3JKujEt788FZvqnqCMGmqfoQ2 AYwgTOCC3VFKw2SOTQRdNRCctnJueznAhA2Kp6aiSFk1akETtpygTUIqEdWT ENZpBHVmaQvapKfuQdXjrAfZRzBvkp+xEwxydv8mCLAJwASD5knWySSInNPb 8s6m5Z/bDufbl/fQvfAV9y81vrjOqCziNT2WM0r0nCqTsM4saXAo27x6RhD+ n27lDlh5Qw7hoFM06JKMeOXAk+kBPWUTIzV4se/rUVCJ5cOYlRq5aIeAC/jo hF894iZ7C6NBMFECVIEY8yqGXdIhpwRixE0eAEKh8iYGYAjYZHpQMx5QjPnl YBO4BrD82gufxWPxWDx+08ccmwyZesEmwxY2tpwMwtnKBpuMOvmhifCz/Sag Eog3XsWUSwY2+Tqoe+NVBfVcaUc5o7nn9dPyohv3L5y8cnD38T3bjybH7o7d lA6xZUP6pvU7Nm5Ih1j3VdrG9fs2bdgXs2lf7OZ9iVv3JsXtBp6kJW/flphy +MCe7CvnH9zJvZV/JSvjxJmM9D0n4zaf3Lj23KbIixs3ZicdenXmbk3+q+Z7 TbUPaktvlTy8eq/wbNHNU5dyD528sS8tf+em/NSoWykRRaTfZPm12GWXNkad XBtxck3U2fVgk7X5KQs2m9A8+dgOX5gcmRO7Ij9xZX5iRPaWLy6v/0PGhmVZ MdHZCZGZsUszNi8jM03iVlxNXHk1id5DGAwCPMHR8DgXfk1OMtwDsT4/LeHB geKqe2ATl1vp9ao9boXPpfA6ZAvaxDPHJk452AQTH6AMaqCe0k/xBG2CU+Ew dQI8Ges3zA9Mu9BJE7QJzjGZG7M2oQ2Cndrzg+qLDykGbRLadpjaxzUULrkf wiZy9/EAHeAFCIeO5TJwSNfJLEzsGqYTQk2xxciBB0OgZczq7oVtIiE2CcFE 8rEdfr5NvpnxfPvGCwFIwfouCLyeE3P88ov5lM/Jm2C/ybsJx/iAEV87eLHC bRKWN+HOtwmoxGpgoU3gwqTpBp6IODWwsgWVNFTdra+4A1Fbdruz6UVP22t2 VwWfWRu+sxbuygXcYLaXY9s7wCTcJnQCBT4ED8BNutA1cyabzEYbSmR+0DVd YBOI8B6T8FggbxJmE3gmPa2kpksr67LBj4BdBgHfK+zT+RmbYFM5WANMoZF2 0HkTMkGPsglQBXcJoHfxhYALLOgK20DgJ/0m4XmTgHMBm3jtIr9TgmVdEIAU tInbKoAXDmACeIGX0qDqkgsbxdxaEAqohNNdxmNWkJErrGp4evBHU0MkQzVd /W7SC0+CIgMGVdbVR3WpG+AmIIKyicJrBZ4oZ23CNyjYakmXSgx//a7wCG+K p7cRdphE1HR4Jf5BVNJE5bOpqcGOH0eZUE3xHzcQpnkSPheeHsjos2u9do3X FgqPTeemYOJzm8eGfVPjA2OjgcEBj9tl4fB7mRxGL6+bJ+FIlEIxhELIl3C4 Yjbc2dLRWFlX/rqyuLSqpKOrtpfVxGI3w5nDahYLu4AnZoPEbobvswrD0Se3 6MVWvdig4CqF3WoxUydjayQ9QGYOg7z/Qd8ttc9AJc01j1tqn3Q1vWC2FgNJ sJoLMAJUAYx8Km/C6yDTG0ElEL3NJb0txdyOUklvdbhN9D/Nm2hFJG9ikjSr OdXS7tLOqjvlDy7fyTqQe3ZH3qX062dTzx+MObl73em9Gy4c2pJxNA5Ugmew CQYI5fqplNwzqTdOb4Nz4cWd968eeHT9cEnR2aqHl5te5oBNBC1P1cwyE7/W o+n06rpc6g6XptNn7Ama2SGbOIQDTvGQWzrmV0716yibmHAo/NejIZhAwD0Q 1LxF+zfjNtzIa9ynAoxgjHrkGEGrwG1g2TXdHiMbeAIw+Zr01IcKugAjQBJU CV782gufxWPxWDx+0wejNF/Y+EjbU+qRt5Karj428GTEygGekHZ44ImFPeLg jbmosSYuuhFe+sZLGuE/9Gvf+dXTbgXw5K1PPelQ9PFbuptZVcX1rx6V3bpx /8zRjH3pJ3alHkmJ358SfyBp64G4Lfuo/vf9mzbujt1yFCJu6+GErYeSYg8k x+9Jjt+9I2VXWtL2owf3Z2devF+UV5B75dqVU6cubEebrDmzAWwSk5NyrPTC w4ZbpW0PwSY1rwtf3c8syjtZkHv83PV9x7J3pdzYviGP2gGY6oVfemXTl+fX gU2iTq+LPr9xxdXYOTaZkzqheYKPiciJjc5PhFhG2eSLjA1LsmIir8Yty9y6 JGPzkksxyy7HRmUlRF/7Sd4EAvMm2AsPPFmVnQixLi91y+3dz8tvo008HiXY JOBR/bxNnHoubZNhrxpsAoFpEWovU1UQvo41VNaFqRNsil+4HT6szYSeqxik NDE37LLPgcmsTSR0kiX4aZt4LQKXiQvQsGh66LyJRUVtJvzRJr0uTa9DH7KJ x8zHT/k5m8zChGz29WmbfPvGQ+sDYfIzMb9rfg5VkCELZlsWBAt8CrDozZgN hIg2IbT8abPJ7IQLHt0LTzeeUL3SBCywyrXoe8EmRjUDWxjYjNLWukcAk5rS osrigobKB7Diaqt/xmguZndVgUfQFFjTBfd0t5Tiflx0fMyYNLzCa8yb8Jl1 f61NUCXhzSYQdLMJPYERAmEyt9+E2kMYbQLPhNH8GnykFLXjPl3wXcItdn+m pmu+TbDlRClqwcElKnErgoVOmiBP8NPhGmJO8mWBmi6HBKAxJzw2IZzpsi6w CZZ1gU3gRQSbYOkX3IRXEISikbXh3sU4/1HMqZVw6zF7An9fZx/JngScKtyq q9+tHXCHNvUdDZBt98j8Ea8OPoQT0r02OYbLLLUZBAYlC3dmw83ZUCWYNwnf Rtis5eJwRmcf/Bsio22C3sGJ8yAR5Magp2/Iawk6jeGpE+RJuE0QJpRNdB4g iVVLhc5t07tseo+zb2I0+O//8v0//cPf/eu//MN/+9d/+s//6W//8u//9N2f vhscG+yz9yl0CrFCLFPLBFK+RCmRqaUMVtfrypJXZS8b2xr4QoZUxlQo2RBy KVMiYogEnSo5y6CB76rYrBNB9GmFeiUXYKKR9Mr5XSpRD2UTppzfwWeSHwGq oPFFa91TCPhJ6W55Fd4ID0gJh8kcm2C/CdiE1fIaAm3C6yybYxODtBl74Wf7 TUJ7CKvYVaLO4taywtK7l4ou77t2IuXqqWRgyJl9G8EmEGf3bwq3CWZMIK6d Tsk9m4Y2yTubVnAh/fblPQ+uHSy+dQYb4TvLC0Wtz/ScKpukacDcO2TlDJjZ /X2soJnVb+H0W7jDTtGIWzLqUwBMxgMqsAnpNxkyvxuyvB+2fj1i+zBq/zBG Aq6/GXP8OO39y7vAjzNe+Oi4VzsV1M4M6ObEOLzJ7SKXvtepYwYsfLj5fsT0 boQkTd6PGb8eN2ELPKZRIH7thc/isXgsHr/po7u8QNT8WM+q8Ks6hk29Y1bu sJk17uCDTUhNl7EHeDJi5024hVNu4XRo92DJjFf2xqd461fNeBXvApppr+rD gOF9UD/lVmnZ9Q3lrbWvm+rLWoofVWSeu7F/x4k9acf3pJ3enXY6PeVkauLx ZIiEY4lxR5PiTiTFHacuDqfEHkiJ35uSsDs5NiUtKe3UsSMFN649uV9YmHcl 89LxQ6eTdp7YGnNq07qzm1Zf2brt1q5zlVeeN90pbb5f9brg1aOrj26dK8g7 UVBw8vi1XfuzdsRdT1l7g4xNXFaYtLQwacmF9V+eWRt96qsV5zauvBSzIjtu VX5ydFFqNPEIMAQ9sj0sZm1C8STiRhzZbTg/aVn21i8ub0CbRGTFEptcjvny 0uYvL8VEXImLvpb4h/MbllzcFHlly/KsWNIInxGz9NLmSLBJdsKaG8kQq3OS wSabbqW/qLgtkLU73AqXW+H1KgNeldtO13RRsy1+WtMFNnEb+XTeZGrQBDFO 8WTYrx30ayBwxhzaBPfsgnUvbtgF5/AY8WrIzsDUZl+h4RpYhTUbH20yDybw HBa0ScBMeBKgeUJhB2u6aJv4KZu4zXxMglg0JG9io3YJRptQMCHTTJxalkvL woIugMkv2sQoCbWZkJFnoBI5CYOsw4Q2UXVZtD1+u4jqN/HNt8aCMUcoeGd4 JoXOj/xiVVj41/x6yjU9YoEXjrYJvUkXnTqhgu+ituoCpBCbkDQKl7IJcQrY xKxjGtWwYGboFZ0gFIWoubejpLn2YV35naqSwrryu3Xl90AoLTVPukI8qUeb 4N5cXc0kJRFeyoUeAZigWeC6u7UUPhFtMn8ifCgWypjQHqGbTSDCN+mip8PT qRPaJl0tFZ2NpZg36WgoQSJxGNW4Txcs1N0WMZKBhkm4TTD9gTaBM7aKIEOw HX62870dMynhc0yw252mCgRmTGbb4RkmeMfq2Q4TbtWFGBHNCY9NMGsT5XBA hTYJOKUemwg8AnIBmABV+j0KuCA98rpevbJLLSVCkfJJnz6ZP86pk/GBJ13A E4dJ4HcoqBEnamrEiX7Iaxj2GefbxGdXgEoAFy6zBGCCW0bjQEyaJ3AP7iRM b9VFD4iHgE+Er0DNoNdgQZfXqgw4dNQw95BKhn3WEb8N9BFwzi3rwsyIL6wA DMJr13qodAkGZROj32MbHfa/mR6bGB8cGgr4fS6TSafQKox2o9llMbvMBptR qpHyZXwIjpjDFrGZfGZTZ9Pr6pKX5S8NJqnDobbZVU6nhppmIlEpODJRt1La q5Gy1FKWRsZSA0kE8NfvBphIuZ1yPkMp7FEKGaTlpLcB3lHI8/b65+0Nzzsb X7I6QCIV/J4qAbMagk/6TbAXHqMcYQLBaa9gt5WzW8tZrWUhmDSXsFpLwCYy Vo2a36gTtYZ2NZe1GOUft+oKzTeRNGt5tcKOVy2lBWX3Mm5f2Q82uXIs4eLh recObAaenN67Ac6XjsQCTLDxBFQCeAGY5JxLu3lhRx7Fk/xz28Emty7tupe1 /8mNo68KT9c+yequui3rKjbyaiyiBqus2aPtGrRwRxyCQRvXZ2A6VJ0+E2vI KZoIqqcHdTNDuqkBCP2bQdM74Mmw5esR69ejhCffjNnfD4NWLMCT7yddP0y6 v5twwvU3Y9Zvx0l8Q8W3ExhkM+EJvypoFfr6uIMOyZtB/TeTlm8mzagSOEOA U+AMd/7aC5/FY/FYPH7TB7P2jqjtqVlUBxiZ8UomXUIgCZzH7DxMnQyZWSNW Dmhl2iPEmHQLJzyiKa/0TUAx6VVO+lQTfs2bARP82zXp10t6qrtqe3oa2MxG TsXj2pxzhaf2Xj6SfuHg9ou7k8+mx5/dHncmZcuplC2nt8ef3x53JC32UGrs gW1b92zbumtb7I7UuO3bE5P3bN9++ujBwhtZD+/kXbty+tC+banHYhKObow7 t3Xj6U2bLsUev38suzSruvZeVcXtiic5T+9m3L51Nqvw2NncA7sL9ibnbl+X l7LqZgrIIjIv4curMctOrI469dXaMxvXZmxdk50QVZAcUZQSVZS6vCgNIvr2 9vmBH4KIupUalZe84ua26PyUZdfjf58Z88XlTV9mbom6Fg88ITbJ2Lz0ckxk Vuzya/FfXNjw+4sb4X74KMoFzkuvbIm+nrg6b9uq3JQVOUkQa/JTS+rv8hQt Vq/M5pU5/SAUmcNGNib12XD6ntBvEPj0fJ+OR+ab6EIwIeVSVBNHqJmd2oYL 6DEU0EKE1v9hmz5BzLHJkE9D2uS9mhGPetitGnJ93IkrPMLruGiSYIRGQM7e /MiTPpGfuhniyaxNBmZtAs/Kayd9MS4T2ITnMHAh7LCGhJUkrAPVTIumFy7g JtwJH4LHgEcwaeKhOAOQ+VQvPJl1Im+H0Ck66NArOw2qLgyTphvWgaP9WpxO 8lfZJDzocq/wAShoFgz6kQt+Tfjc95POqWEzJrwGPCoIrOyid4QO48ncwJQK bo2LK2ecu4Ht3hJuPbO9pLnmYU1pUUPlvcaq+xitdY+7W19xGOUidgMoA1Zl sNrvbCqGgJV/S80zhAle4FZdZJ+uxtA+XdzuGiGrAcfBz48FtwumbULDhNdd z2M28ahthMMTKHgTJ8WTaq6msnYKJl1NpRRMivFpsDor5YKWPg2Lag+XAEZQ H3NmmiAo6N2DcS4JDnmRC8guwQgTxIhewUCwYDcK3IN3GlXMsOjBgLeQUd3V p2XYjL2OPrbbyvPawSDC+eF3igIucdAtGfDKBn0gFAUE/jzipgf4E4oTUrBl Bp45/LkaKdnlWMiqEbFrwSbwaiqEzThpBWfc428b6J0uhv16HKsKZ+AJ2ARU AuHsE4M1gB70NBNqRCbOMe/AvAncT484wbwJ2sRtgXegjMq8KKiMCYkBt3HQ Y6LzIJgW8Tt1ED4HuEPttqpcFqXTrMCAa7jHayfdJfAYj1PrtKtdDo0bLpxa h13ncpqCg57hsX5f0GNzWnV9erFCIlXJ5Dq5zqI12PRw1po1Mq1UIOezhL1c CYcv48G5k9VR1VhZWvNab5aPTwem3w29eT88MGB32DWWPrlKxhbxOnk9zXxm i4TTIeV0iHvbBOw2uFPK65LxGXAWUwN3OF11zLbK7qayroaSrsbinpZSVnsF vEVDb1pmA879obazq+Z2V3EYleyuClYn/DiQ8TSs9nJ4fG9bObO1jNn6mtlS gnkTfle5nFWr5jVq+E06QbNB2GKctUkoeyIGtjQYRA19kmZO89Om4ryy+xkF F3fnnt2RczYN6AEGwW2ELxzaAk7BrhPMm5Be+LPUhl1Us8lNqiMed+u6c2Xv 09xjxbfO1DzO7CwvFM7mTayyFo+2e9gmGHdJxtySIbvAq2caxI1WVcewR/J2 RA9qeDOsmwgqp/q1M2GVXXQdF1x8PWqBgJs/TDl/fOP5yzsfxp/fesmk+Bk3 joz/btIBnwhfAdYDI27FsEs+6pNP9qtmhrTYEY+NJ4u98IvH4rF4/OLRXV0k bHtqlTSM2rjvAvIptwg8MuEUoE0AJnCGa7hnxiuCoG0y6RFPeiRTPtXbfj38 mzbdb/hu3Pn1iM1j4AkZsDZh9zSyal823rx858yBy8f3XDyUfmHvtjO7Ek/v iD+VGncyLe50euK57VtPbY89uT3uxPa4o2lxB1NjiVB2bdu1b8eeC6dOFuZm 3ym4np155vjhdGKTIxu2nN688cymLVcSTjw4DjapqLpdWVFU9Sz32b3LRYWn L+cfPnV9786buxNzUtfeSFqZnxRZmLzsBmhiU8SptctPfbXm9IbVF2NWX4tf XpAcdSeVtsmCPPkIk1upkblJYBMIsAnA5IsMYpPl2QmRV+PAHQQgV7aATaKz EwAmf7i0CTwCNsGPQsCdcL3yRjKoBD4LhLKhaOfTigK2pBFsYvfJ0SYuB6EE GcYHEDD9gk1wQAkWaJFVSpAEvcSlfwkPAQtg9AgGnTdBmww6P+7E9W+1iZmK jzaR/VU2AZiE2wQesKBNPtUL//k2+ZxSrp8JulclPJ8SrpJfLBj7MO2eHrGA K5GKuKEBZk9C02o+lnUtEJgjoG2Cv+HHZm2FsIXPrGK0vASMgE3qK+5iNFU/ aKt/0tn0nMOo4vXUsruqcIcutAmdN0Gb4D10swk8GD6Fzpv8G20yf74JnUbp bqvqaqkItwnApL3+FW0TGb/ZpO7FcYSfsgnyhC7EwqQJ2gSHmIQnTWbzJu10 cdf/Wpv0e6S0TQJOGZ3QpANfd7gTJ7Zgqwu8iDJ+I73RsVrSBs8Nh6rgLnzw Mw4/1JRtycbCOFkVLvrdGr9D6bMrwBegDLQJSiS8pgthggVd4UkTq56Pk03m 24RKmhhpmGDhFmkhsWvCYeLok8MFwgTuR5iQtnS33uPSQXg9Bo/H4HIZPW7z yHj/6MRg/1DA5rIqtEqemM8V8SQqsVQjUZtUeqsOhKLpU4uUQlQJnDliNtik uauprrW2h93yX//Pf/jn//af/o9/+bsff3zTH7S6HDqjTiQRMHraajobK5it NeyOenZ7HZfZzGO1ClltYk6HhNspYrcJmM297VU9rRUMeKc1lgJMOJ1V/O5a Easp9NbtJZtsQ1BbZxObUDypIIMXKZ5wuirhU8hw+day7ubi7sZX3Q0ve5tf 8TrLpMxqsIlO2GKgJi4tbBNhg0ncxG560licV3rvEtjkxpntqBIs4sIWeIAJ bZPME4mYN8k+sw1tUnAhvShjN45ffJh9CGBS+SADe+FFrc907EqSN5G2eHU9 ow7RtF8xE1RNeGWEJ8ZeXx97yC3GznSIqQH1zAD5/zjyBFtOkCR4DUgBm4A+ vp9yAkkWtMkP0y7sSRn3qQfskoBF2G8XgIDwT8FthOECtALxay98Fo/FY/H4 TR/M2juSjucOefOkS/jNoPqtXzZi5cD1uIOPXSdgFoAJmQXvEU65BXCe8Yln ArJpnyxkE+rftDcDph9nfH/7vv/9sLVPYRB189ltrNbK1ns37p09dPH43rPH 9144lH5mT8qpHQnHUmIPp2w9si322PYtF3ZsvZAedy49/syOeEDK4e1xB9OT du/fsT/r4sUHRYUPbufnXD138uiuHSdjk45vBpvEnN+adCPt3NOzeVU5ZZVF FWWFlU9vPL2bUZB/4kLOgeNXd6Xn70q4vm1NTmJ0XmJEQdLSnNgvrpCxJj+x SWHy8rshesy3yU8yJlRE3EgEmKwsSAWb/C5j4+8ubVyStTX6eiImRwAmEYCR q3ErrieiTcAj8CH86JcZm+EeuEaYwMWa/NQt9/c9Ls/vFdfTNnG75W5S9UE6 Dsia3xSCyadsMh7Uj8/ChJz7ScBCF8uEwn8DT/+uFZGCaRS0yZBL+Zk2mQOT hXlC2eRjTZdDFl7TFUrl/NQmCJM5NqGTJmgTUInXIvjFmq4FbQJB28SoZoBN RoIarOmaE0AJRMcvxjczHgz6nvD2+fDHLPjpaJOZUev4bLsQFnfBC4RN8fRW XfSg8/AIr1+i0wRoE9yNSi5oAp5g9gRUUlt2u678DjgFeALR2Ui2BaYnLbY3 fEyaQNCNJ3BnuE3Ca7o+ZZNwmITvzfURJt31c2CCZV10QRdpM2kuR5t0NZd1 Nr4Gm7TVveqgnnNvR4WE22hQ9mC/CdokfBZ8eOpkvk2w0yTMJqSOC+J/t00G YDVI2STokiMr8OcRA7Nm+NLDDwiyFJ4zSgqEgn0x8AzpncfgMfR8VarKS0MN ZNQPeLQAE2AF2MRlltA2oSUSPngRcyV4xi54UIndKMTdg+HrQAQcqoBDAxF0 avtdeuAJrRKs1PJYQyoJz5hgE3o4TIJug99j8Lr1ED6v0es1ejwmr8cyOOwf GR8YGh2wOa0iuZgt4HCEXL6UBwaR62SgEghAikQtFqtEYBOMXgGzm8toYTTX NZf9j//5r//3//vf/+f/89//5V/+bnoq6PMYLUaZVNjd0VjeUPmipbq4vfZ1 W01JZ0tld0cttxt+LkDuLRxGA6ujtrulAvALMOluLmN3VAqZ9VJOs4wX1irF bhSyGiie0DappG3S214+mzQB2pT0NBczm4pZ2AvfU6XiNuhFraT9LcwmoZYT yiZ6QT3whNX4uP7ljZI7F25e2HX9VCoAhN6YC3iCMX+fLhBK3rm0OUkTEMqL myfL711sepnTW3tP1lVs4tfapc1ebfeAmTvpkb3t17wb1AJPxj3SIYcwCO9e M9tn4QTt/EGXCAQxGdBMBrQQ0/36N6T9xARniPcj5m/HbeCOP864SUy7FrQJ PADYAn6hNvUyTQV1JHvikY4HFKASnGkyM6SFmxi/9sJn8Vg8Fo/f9MFteijv LnYqWkAf3w1rPwyo4AICUycAEzjDzTc+KcAEYsYreheUv+1XgE3GXaJxt3yG +tfs/bAFYPL3342AUGwanbCb2dPc1lbd8Kjg3vmj50/sP3lw5/H924/uSTmy M/nwzpRje1JP7Nt+em9y5p6kK7sSL6QngE2Ob48/uD1+/77t+47tP5J16dz9 otx7t65fuXjk8P7knWfit53cEnNqU1xG/M7b+zJeXbpVf7O8sqjsdUHZo+yH t87n5hw5d20vbZPV1xOic0M2+d3lDctOkpousMnajC1rshOWFyRH3t5G0yOc J3NUElm4DWJZTgLaZGl23Kdsshz0EWaTyKtxWPQFNoHHgErg8XCGAJtsvrvn RfUttrTR4pHavDJXQOnxKjwusjjxWKj1v1Hg1fG8Wi7EgjYZC+jGZjcEJtkT yiZ0azyuctEm+Nva8J27yGfNFnT9ok0+BZMFeGImLSdok5/sITybNPFRMIGY nzRBm8wr6OJj0sRnFQJP4BpHw3++TeAmwgSuaZt899Y7P5dBiyM8ABHzI/wB PyOXOY8M/5T3k07Mm2Ct3Qg1p2ZBm+CSOzzo1Tjd9I0rcGyLwLogKQ/WVFXd ra/a6p+ASsAmgBS4gGiufoo5kc7GYmx4n2MT3LMLIrymi9dT+7M1XS1zYAIx HyYQdCkX3WyC8bHNZNYmnVRBF8CktZZqyW9+zWwvF3MadHKGwyTALAOu1WnE hadO8HuFA0qQbD/tNAnBhK7momGC8W+0Cc0TtAmmTvrdH1VCk4SGSXg1JvzY wjOH54aSwhQP8hMC/r64ER/1YOVsg7wGC7pwly04Y00XvQ1X+OR3wAgGPR0e tw6Gz3L2iYlKqL577DeZHQ2vx7nw4Z3vNEzm2ARgQldzoU18FEwwPB6Dx23y uM1Ot8Xf7wkM+PpsJrAJV8QTKyTAEPCIyWHsc5r0Vh3WdwFSZFopT8rliNkQ bBGLye/p7Gl4/+3YP/7zf/jn//r3//iPfzM1GXTatQaNUMTr7GyqAJs0lD9v LH/eUPasvupla2NZb0cd8ITd1dDTWt3VVN4J77HG110Nr5kt5dyuagm7SSlo Vwo75fwO3PsaGU7tth2q6QrPmzDbyiiYYLzubSXt8KzWErSJmtdoELf1STvI zoFzbUJmL+r4dRBgk7rn118VnQObXDuRghmTObHgHsJzarqKMsgoxofZh14W nGp4ns2qu6/qKbWIGlyKtv4+DhZ0TXnl0wHllF8BMQZvS7vAZWQ69N1wBqEE bLxRrxI0gTzBAF9AzAwYgBs/hJFkwZquH6acaBMsA8O0y/tRIz1vMTxpMjWg /rUXPovH4rF4/KYPYdtTdW+pW9U27RF/P6L7dkgz45VAgEfGHXys5oIPgU1I xsQreuuXvA3IZgKySY941CGY9qs/kB3RLd+OO/7yNgA8+fMb/7DX2aeUSjlM PqOz/nXpndyb+Vk5Z46eOXEQhHJ0Z8r+tMS9EKkJe9ITTuyIO54Wezh16/60 uH3b43ftSNh5cPeuM8eOXL186nbBlduFGRkX9h85mAg2STm5ZePx9fGXE/Y/ PJJZeuV2Y2FZxa2SV7nF9zLv3Txz/drB01m7wSY78nbGZ4dssuxm4tLrxCZL j6+KOrV27ZmNX13euuY6sUlEUUrkrW3hNllQJRARBSkROQnR+SnAE9omdE0X tpNg3iQ6O+GLCxsQI9hygjaBc7hNVuWmrCvcUVx3hyNtMrslaBOvTwk2cYMm zEKPSeAx8MEmHi3Xo+F8Vt6ESp1g+wkOZCQFVLbQxBMsdP8JT8JsQkvk521C e4Q8PZNgPk8ITGZ74ckXCduIGGFCza+XuG3in0ma0AVdABMITJqATSDQJhZN z/8Pm+AF2GQ4oAYafD3lmhNw5/yY/zCIcJXMz5jQPAGbfCrt8m7CMTnUh4rE ZNan8ibzbYJr7/CMCRYC0YG/chdz6oAnsIhqb3jaWHUfbUJ6TyofNVY+BqGE S2ROxgQ+SjeezJlvsmDMh0l40oSGCZcRGmtCwwRIEq4ShEnIJo2koKu19iXa BDM4gt46razLbuS7zCGbzG+Epwcv0jVvdFOJStwGAXbDgSb0FsF0wE3cOvjz bbJgzG85gVjQJliESf90YMUXnOENAM8c0UQa8GcHr+BMRvj7zo6eBNSo0CaY NAFfQAA0aHrgqHcaJthggkHLhbYJ3QhPxce8CTXcRDtnzOKCeRO6oAt4QtuE TFqkarrcTq3brXe7TS6nydinsTpMVodZZ9LKNQqpSqbUqSRqCWDE4bc7Aw6L 26w1a4x2g9Vjcfe77D4bgkVpUEBwhQyeqGt8Ojjzbmh6ut/jNmhUPImAwepu bKsvbax6CTapL3tWW/K4tuJ5Y20xgIXZXsvqrO9urWqvfw3yhQCb9LSU8xg1 Uk6zWtihFjEUAsITMqOH3zq7cQRd1gU8KUeecLuqQDSzZV2vmc0lJG/SWow1 XRp+E9jEJGlHm4Tv06UVNWiF9RperYZb09vwqOZZ9vOC02CTq8eTrxwjBV1z hBJuE7od/vqplJxTKbhJ150re7Gm69H1w2CT+mfXemvvKbtf9wnqHLKWgLE3 aGJDDFr5I07RhFc2E1TNDGgm/IpBlwhIErTzB5zCIbd4MqDBgi6qQluPKgGt kGbSQeOCPAm3yZ+pm9hyAo8PfYVBHe4hjNtzYeMJxq+98Fk8Fo/F4zd9yBmv DLyqoKH7w4DqL1PmH0b17wLyt34Z9sUDT+BM2+SNT0zCL30TlL8fUH89qP27 b4L/5ceR//jtwF/e+cEmf5rxgU2+nRkeDzp9Vr3XoncaNQaFzKCQywUSEUfQ 09bTUNVU9bqu7GVVybPyu/mPim7cL8guys3Mzc64mnXx/JULp8+fPnD96umC vHM3807lZB/KuJh+6kTi7rMJqae2bji2LjEz6ejzU9kV1+633ikpvfn8WfaL 2xn3bp6GR57O3HU0M317bnrcteSV1+KicuKX5id8mb3l311aF3FyzfJQL/zH vAnYBOgxhydzVUJF5I1EsMnyvOQl12LRJn+4EoP0IP0mgBGq32T5tfjfnV+/ 5DLZwgsC5ILN8kCVFTlJa2+mrc7btvJG8pr81PW30p9WFPSK69Em7qDK51f5 PApYb9A2QZh8yibYb0L3wg9TvfDjA0bsYqAHjmPqJHxj4VBll2du0oQMT/y0 TebAZEGeoE0+GmcWJkG6oMsmmW8TOmnyCZsQmPhtIghwCo6G/3ybaGRtc2wy 5Fe9HbeBDubE23H7/PgUWDAnEt51Et5p8otVYfBF0Ca4Op3fC49t7/TCOzxo m9C7UUHQcwMpm3TgCA8Jt17IqkGeNFU/QJvUlz+oLrlb8/peXdkDiPryh01V T9AjmFKhZ53QeRNWZyXmTXD24qdsEg4T2ibhMIGg67h+sl3wLElomEB0UAVd LTUvWmpIL0xnE3kmfGaNRtppM/CcfULESLhNwlMntE1wUglVu9VGpUva6U2D cQ8BuiIO9xNAofwvtAmdOqHHj4YXdIU3iIVvYQE/s1i0Rm9lTE+6R59izsjZ J3JbpJjpwN2D4Sb4wm4UAjcAHXRHCQ0TBAs9Ix4fgGNN6E4TIA8VSmrqopqe C49j34lKLGoILN+iO03IlEOjdD5PINyzNnE5tS4QCmUTnVGpNSgNfTqNXqXQ KtVgC72aK+GIVSIwiG/I6wo6NX1qgZzP5Pd0sTvr2+qKK189e/30ZfmL0prX 1fUlJeWPNAaR2aa0WpQGvVgq7mEyGloaSmvLnla/fkzyJhUvGoAn5c8IT6pe tta97mgs72goa6sr+WiT5jIghoTdpBK0q4RdKhFDKexSCDtx9wAIMadByKoT 9NYKemvA+7we+HGoFPTU8rtrATUUT8p6W8lWXey2EuyFB5vosdmEqumibULN N0Gb1KjYVWCT6qfXnuWfyj+/M/NoYsaROLqmiy7rom2C/SbZZ7ZdP5uafTL5 +slksMmtS7vuZu4DlTy5cfR5/omSorO1T7IYlUWSjpdgE5eiLWhiBYwsv6G3 38wdtPFHXeIpv+LtkO4t2Z5LPR5QjPpkcIZrauTibL5jxAyB00wgABpgFsKT KeefPt0LDzf/OO2CT0ebjPvUQ24JqRbrV9E1XdODGkDKYi/84rF4LB4/f6iY pRZJw5id/+OE6T++d/1lyvJhUP0uqHjjl025xRMu4YRLNO2RwM1pj2jGJ3nj k8z4pV8Paf4yY//P3wX/xz99+3/9l2/+6W8m//774f/wzeDfvAv+zfvg334/ 9f274elhz9SQe2bENz0ceDs2MOT3QPR7PAGXu9/jHwrAPQMjgcD/x95bBjeS Znm/O9PcXVVNU13QxeRiZjMzg8zMzCwzSiZJlsVomS2TzOwql4saq2mmZ3po 353d2Xd2971x48a9H+/JPPZT2bKrphciZj74iX9kPEqlbTkzZT8/nfM/Z3JI PzHUb9D3jvR36nsVA90SpaxRLqlv4uQkJXh6uF21tT5levfQBdvjp62PfGy6 94zbaesEG79Mz5jS0IQk7+ho1+gQ++BAK3fvW6ZuF687nz3mfWa/+4n3PI7u 9Dr6lteRN5w/fsVm9w6L3cAmH1jte9/x4Puex3awTr0T8jw4wsQTIypZZxOf 4wAmO3xOvOFx5OfOHwOevOr08YvqdCGMMNkE+AX97x+xzgGhwPbj0MvByR6V LbmaAX7PUMfAsHh4UDTc3zGobaOW/armAUVTv4zbJ+P0Sht7pI29P2YTQ79o SzaZ3agqjKETXPMwm54Q7wkWEKaCJj3CYfSVdG1ikx+bTZh4Ai9mM57QbMLb gk2Yi64uXp+ubR1MiAv+x2xCErr6NJTNZBDYpHudTbqBTWR1csAQARGbEp8N GCKl8WQzm6gk1cgmvdqmscGOxWkdosdPJBTmASSY8hI2MXKdbJnTNT+hZdYQ ZlYSZjaIZ/rfUbjqNsrvIp+r44ftaFUAAZ5gcldpXhTmdOWkhmQksNLiA9IT WDDJSgrKSwsryYkpzo6GLTsPqCSuLD++opACk+pSKpOKU51D/CYvYRNigd/M JggmnKq8hirjPibE/G4kYBM6oYuKm2ASWm1ZOrCJhF9Bs0kLnoEt2YRUD0Y2 QbMJ1uYitYLJGSMWFSM2UUvqadWhNtikGtmkV8sZ6GqmMYTwyHMw2cQmQoN+ 3W/CrLWFYEKEZApXv5ci0zYslUxRGPULttA4Rl39Tur3alRTMFWPVhHAig33 +nr1YMImxGCilsAviOGSenpPHS1qv1YGp6ulT8ujvSpwB3ZsCHhHgqETPYCG TrKOJFoxikRMgEq6VYIupUCn5Peo23tpR/zARp0uqj97N1WhC0SV6qJcJ1pg E4VKLJa1q7QKmVIqlHZIVTKRXMzlc5vbm4BNDLNjIN1AZxOfk5aTEhEX5hvs 7ezp4OBq4+RuZ+9ibeNwx9ndEvCksDitrCy7ojynMD8ZwCQ/Kz49ISwjISwv JRpzurJSIrNSo3LTYvLSY/IzYouyAMCT4O4C+KXjJpncqty2hqJ2LrujpRLY RMKrgW1HKzB+haitsr25VEDd+UU0pCCh5HCrc+CruFU5VPSkKosL/F6ZxSlP a6nOEnEKZC0l8jY27YUvUwpKsXrwBptQvRclTbkSbm5NfkR2jFu0r5mv7Xnn O8dtbxxAof8d25rgBIMmaIQHNmHGTYKdLmPvRWSTnCjn8jT/NnYcsIleWjWh ax7XNY3rmid7Wid724BNZgfbl8akSwbABNnsiGh6SDgzLJofkz6YpQoC0x3h O6niwLPUfHlctWRQUhpX3pvUrM12PV6gvPAUlaBoNnmy2P9orgfIBdjk4VzP 2mw3CCBldpj6/gA+pEjXNptsj+2xPX7K4FWlaAWl80MdX94f+Hpt6NOlnocz mnvj8qVRCeyEv2OgebrEx/KIZHVcsTIqXRjqeDCl+tWT8T9//+Avv3v8x2+W v/tk+uvHE6AvHow9WdI/WBoG3V/Q35sfXJ7tX5rpW5zunZvoAs2O62YMndNj WtDUqGZhRD2rV8wMyqcH5eN94pFe+B8tGugWdGtaWriFsdGezk7X7945CTpi c+iE7ZEzVkcAQHzDbKJiXNLS/COjXYIj7L0irB3DzO6wrl/wvXDW5/w7Aad2 BJz6MODMHt/THzod2WX20ds334ftLsu97zoeet/r5C5/kzdZp94Mfh4fYcqI StbZxP/U234n3/I6BmzyquvBV5w+/rnDvvWcLueDbzp+jP0W33M/hklcr9rv Ax5B5zuW6nrP+yRQCRAKTHYHnN0XfNEj1a24PU+hp9hkZEA02d0xpmw1KFoM 8pYRefOgoglW7xplo0rZ2A1sIltvCg8r/7HeDmCTqSHZ1Ca/ycJkJyx658Y1 pO8JQMowI2xBup+M6SWAQti6DtZmvepmyhXSLQBCed5gUUuXBWZ0MCGQAmxC RMIodA1hYy886nljQVhyd7YapSSRz64xawXXnNhcr6+zeaCrdbC7DQTzLlWj RlYLoIEkApII2CAxvxS2BE+IYKdCVKmW1mD0BL58qJe/OKV7EXqQnUvTXSBy AMZKSLjEqKe8UVt5o8wukFHaGHxDuFJwjQhCEjxhllmjgmiMNvGkPJdR6ISE CYgdXswrQ983CPCEU51RWRwPeFKSG5mTGpie4Jsc45kQ6ZYY5Z4S6wUPi3Mi 4CkQHFNRFAcsU1+RWluWBmCCRbowoWtLIzxFKw0lhE2wNhfxm6ynclXm1pdn 15Vl1dPNFpkGExCQSFlhKopdkAIqzU+uLEotzU2gjPCFyUVZ0cXZMQ0VWa0N +Rg3gbU6k9GQR5hiGuHxhMCpkAsrMYkLQIPcbMgjKIyP0NjSQETYRCWuhhtJ K6/pVjf0dXI3MKRloIsL0vcAqjRhMAXAZKiXN9wnoJuYCEcHKBIhYRGSXYkX +nnrn423SV+noB8Qo1PQqwVO4Q90CYf7JEO9YpjrlC1aeZNS3CBtr5HSRYAx awsIBXikV8MDMNEpmgFMAFuQTeTCWrqVSQ0JABHgIl1g8O2GAdahHuGGOjaS u9a7zPdrRX2ajl61ENSjasfJlnM4ElgGOzaCenSi3m4JhSd9coOhe2ZmuL9P o9RI5CqJTClRaOTqLo1Cq2yXCJv4TSKlaGCsH8BkenlqfG5M3S1PzogLjWR5 +jq5uNu4udk4OJjZ2d21tr7p7GweHu6TlBiakxVXkJtYnJ+SnxkPDJKbHJWT FJkZH5YRG5IRHZwWG5QWF5QeH5yREJKZGJqVFAbKTY0syoqrKExrqMhrrgWa hruX3d5U1dFSA6LboKBqMJJC+1DY8C6A9wJVvKuukBKF3vkA7xw6v6uxIqOp Oru9oVDawlbwK5QgXoWcV0yawkvbCkCS1nzgFGV7SXleaGa8e5jvXXfbsw5m x21uHLC+th+EHeGxZhcKzSbEC49xEwydBDleinC/EedrCmySFmILbFKa7MMt jJQ3ZgGbYOvk2X7e0rBoxSCF/+z3JxQYN1mZUi9NKOfHZLPD0pkhYBPN6ozq /rQStTanAS1PyJbGpbAF3ZtS4FMP57rRVwIwghZ42D6lbfJP6IcgJJQHs9oH c9q1earLyb1pFTaIB1TZ9ptsj+2xPV4++NWpOmEZkMhXD/TfPhoBNlmdVIJW DLKFYdGcXghgAhM4YGlYDAJCeTithiP/9N29//OHT/73bx/94eulb59OffVo /NlDw+erFJusLujvzw/emxsAMAEqmZ/sBgGSzACSjGqoZmHDqvEh5bheMTek BDCZ1ctnhxQzQ4rJIWqZPdgj6FRx62szoyJc3d1uWVmetTA/fdzuCLDJZUcT O/9bIXEuKen+WVlB0bFuoVFOnuFWtkF3bvpdOe9z/rTX2R0sk50skw/8T+/2 PvWB4+GdphSbfGC1/0PbAx+4HP3Q5xSwyRsBJ18P3IJBKAxhEMpb/idROwJM AE/e8TnxpufR19wOvep8YD1u4nLoTSequ+JbDh/vcD70rhsVSXnNYT+TTTCw gjld2N8E2GR/yCX3VLe8tixRT5O2j6fvbR/XtQOSAJggmwzIqciCRtGoVDT8 dDaZNahBxGSNLgZiPMG1B1Yu1ffA+mfdcgsrt05ZPQUmW7HJZiM8xk1ewibr ePI/wSb9uhagEmy3DfNuNadTUf/T2QQeApuoJNWwBQGbwHJxaVoH3AGEAhwH AkwAbRlG2dKQQkzuzDpdW3rhCZUY+VngZ8HPZbIJfpy+uT0N6XVCQgNbsgmG DLABuqydihFg7Vlkk5b6nMaq9NqyZCCUgszQzCT/pGiPmFAnEBAKcEpeejBl k8+NLC+MrS5NrCtPoY9PRzbBLg8v8cIzKwZvjphwqvKATRoqcgBP0GCCIi54 wiYIJsgm5QUpJTnx+OH2OptUApsUyNqrkE0wLLKZSoiQTUjcBM4GMZhsAEg9 HsBcsePOrdlEQrFJp6L2x2zSjGwCYAIa6Fpnk+G+52wyRrMJXk00f5FGJ3QD R74RoQCM6AEHujuQTQBMJkfU8AcTJsAsXapWYBMZEIewltnendmjBA0myCbY 4kTRsQWekDwxAib0i3kRm4DETDyBCRNViMizgCd0N3l5j0482K8YHdaOjnRO Tw8uLo6Pjfb1D3bpetQKtUymkgKYgDpkoraONnWPenZl5uFna598/XT54YKu Xx2bGOET4O7oauXgbOHubuviYuXoaH7nzgUrq+sBAS7hYd5xMayUxLDczLis 5MiMxHBAmfTYkNTooJRIVkp4QHJUQFKUPygx0g+2KTGs1NjA7OTwgoyY8oLU +vJcYBMAE15jmbB5CzYRtdJZXi2V7U1lgOdYv6u1sYRSfXEzEAqgSk0ubT/J aq7JETYWSVvKXs4mACYqYWllQXhWggdhE6tr+62u7sOeJsgmACOwNQIT4jfB 0Emgw8Vwt+vY3CQ91K4gzp2d4tuQH65qyh1TUX2Tp/taFvTty6OSe+MyABPQ 4pgUtDypAgGezI3KpvUSoJUHM2rEk9Vp1b1JBW5XJuSwvT8FVKJapQ5Q35/S 3p/qBDZBAIHteuiESSUzXVQ94SkqlQvxBHsvwhzwZLuG8PbYHtvj5UNYl9Er qbo3Lv/m4fB3j0eBTeBvF7DJ8pgU2QSEbIJBE9g+uz/wj98s/PvvHv/H75/+ 6w8Pf/fVwtePJwBMvlwb++z+yOPFwdW5gfuz/fdmepenuhcnuubHO+cNnbOj mplR9fSwanJIMT4oM/RLxvolU7SmB6QzevnMkHx6hHJzw0JdLa+vKEsMC3Vw d7tpYW5ievfEUTpuctvzkne0XWI2K78oMi8vLDLaJTTK0SPM0pp1E9jkgs8F E88zu4LO7go8/Z7vqffdj79rd2CH6W5gk1/YHNhtf+gXbsc/9DFBNnmNdXJL NiFGeGSTN/1OgDBu8rb3cWbc5G26fcnrDvtft9v3pv3+d5wO7nI9gmzyit1e IzaBOZpNMG5Cs4lrbkuGsIuj7V1nk1E6aDImbxmWNf0kNsGKW6iR52xCitOS uAmsOvCzd1iBwEPY2d/FA8HiBNexWkndEFBJt2Coi8/oV9IGuDHIMJggjMAr QRnhCbKJUX+T/zabUEGToV7+f41NYKdSXKWR1SKeaOV18E3wg2s4CXCzzY1r EE/IBLCF5G4Z8QWTMsjDzYW8yGHM45mhGcAi+HHw05lsYtT5gtmkhrAJsxQV U/gssgkWyxW2FGOhJ2ATHie/rTGvuS67oTKtNC8qJzUwMco9Msg+nGUbFewQ F+6SGuedlRwA2MLOj0Y2gSMBTOorMgmbtNQXoOVkswBGSOIW4REUUAmCCbIJ 5nGBmJBixCYAJiCgkuLsOAydEDbhcYpgjd2raUUvPLP5+5ZsYuSFR6s7c4n+ AjB5EZvUaGRbsAlSyQabNBM2ATAxYhOy/kfexHcE4RTyHhnqFQObYPRkdECG IWbAE4NeAXgCtKKRcRWiepCYV4l93omQU9BRIt+AFwn/ueuf+VuTtxuyyUZQ dQs20XchnlBsQvCEOQck6VYKQExCgeP1XVJgk4FemZ4uIzw0qJ6dHVpamjCM 9Y+MDQwO93b1dmq61OoujUqnlqnlAmm7TCvvHe4ZmRqeuzc7MT+m1EmjE8I9 fZ1tHc3sHM0ATJycLOzs7pqaXrK2vuHn5xQc5B4e4hUd4ZsUF5wSF5wcE5QS FZgcyUqKCEgM80sK9YsP844P90mI8AU2gS3M48K80+ODc1Mj2XnJdWU5wCYA JnxOubC5+iVs0tFS0d7MRo+8oLmM34TVhovhrdFcS3lPmqqzW+vyOjjFstby v8omCkFxRX5YZrx7sNctV+vTtneOmF/eY3llL7CJ3c2DgCfYbxHxhAkmVGt4 SxNvWoRNYrzvpAbbAJvkRDnnRruUJHnzyxN62ktHVLUTXdy5AcHKqOT+hBxE JUUYZBg3uT+jBTyZGZYYetsn+9sXRqVLBvnKhGp1WnN/Sv1gGhhEfW9SBVvY szqtfTCjXZulkr5IN0YgEWx6YgQm6FtZnlSix2QJfvSMGnvEY/Tkb73w2R7b Y3v8XQ9ZU96QquHBlArZ5POVvrVpNRX23cQmj+Cv07ji8Yz2+6eGf/3N6n/8 /sn//s3DP/9m7XfPFuhsrtHPV0c+WRlam+u7P9tzf6ZnZbp7eUq3ONG5MK5d MGjoPubwZ1AxpZdNDEhgdT3WJ5rs65jsF1EaAInH9eLxIYm+ly8XV5UURQcH Wjs7Xbl968itm4cvep43DbkdkOaeVRVb3pheXBqbmuoXFGLDCrVxCzG3Crh5 y//qRd+LwCbvhZzfFXRmp/eJHc6Hdljv22m6e8ftDz+w2v8Lu0Mfuh77wPsU 5nQBm2yZ07WZTd7wPU4ldPmeeMvr2Ovuh19xOfBzx/3AJm/RQRNgk9eAROz3 v+14AH4i7CRsgu0XgU1AMHnX6wSAyfs+pzCnyyXRKac5XdTTpBsQIJtQOV3A JrJmwibqv8YmEwRPRuSETRBPpjfcKIZBCfaexgU/LD+oklADouE+oU7RCItY QVOhRlJHuUIATHTP07co1tC0MaMkhEq2xBOqX6TGuC/8fz9uYpTTBXzx09kE BFQCQvsJcA18ny09yEb9X6ZoTAaIwMwuJq0wM8G2rOhl5J03yhaD7wkEBNeI 2IKYpgMjAwKJeTFbLm7Wj9mkHNlE1MZG4wn64gFPWupzAD0Ks8KSYzyBTUL9 rRFPYkKdgFYyk/yLssMxdFLDTqorT0c24VTnNNXmIZ5sKabhnUklyCOourIs qg33hseElAsGbQYTEDsvsSgrlmaTxMLMKGQTPrdYKaoFNiE1hF+U08WMm2Ba F1rgjQpzbQ4l/BQ2IUZ4YBAmmND6EZtQYDLYMTZI3VqkFyqVtUW/GUlQDC1F WHqLPkDYrW7rVDT3aHhjg3IAE9hiHixGTwBb4FmluAEbKWJrRWFLGSybYYvA YiS5sJqg2Y+z1+ox7gY//SVxE3031YGRtpw8x5PNbNKl4IOQUPAAOB6+qkcn GhnSTBi6xw3dwCYLC4bJCf2IYaB3QId+E6ASuUYhVckm5icXHyxNLkxgYS6Z RlzLrYyMDfH0dbFzMgc2ATBxcDCzsrppbn7F3v5OQIALsElokEdooHt4sGdC VEBiFGsdTML9N9iEgpHYUK+YEE8QTOBhSgwrOzm8JCehlp3919ikap1NWkHl qPaWckFzOd3Wp4Rqg1Kb31yT11Kby2soEDeVynkVwCYK2LaVb8kmACbwsDwv NCPOLdDjhouVifWtQ3fPf2h64ReAJ9bX9tveOOBw+zCJmBixiTeDTVj2F4BN or1uJwdaAZgUxnsUJXgWJ3pVZwXxyhM6+YWD8qqpnpalETGyyQqAiUG2MqG4 BwCywSajVKvElhFd69RAx8KonG6/uG6Hhy1tk6dNKFQHxvVwCRrnUXAMCaOQ oAno3pR6fkwyOShA1wlSybbfZHtsj+3xV4dWUDre3fJkXvfLJ2PffzL+bHXw 4YwG8AQtJ0AliyNimMAftLVJ1b0x2ZPZzh8+m/zLb9f+zx8++bffPgY2+e2z +a8ejQOYfHZ/+NHCwP3p7hX4mzYJf/S0yxOapXH1Iq35UcXciHxmiAofUxjS 3zHe1wF/CacHYSuc6G8f74f1oWC4jz/Q0yJuL83LCWYFmDs7X7KwOOnmdjWg wC++LqZcVCDQ1QtVNZU1KWlp/n4B5j4sc5cgU2vWrdsB14BNTnud/SDswq7A M297HH3Tbv/blnsop8nd3cAmu+2RTU6+G3D67aDTwCakXLCRSFoXJnQBnmBO 19vex0lO1yuO+7FIF2GTd5wO7nQ5DGzyqv0+dMQjm7zu+DG643d5Hse4yYd+ p/cGXbCLscloTO7o5ur6qa4fo1reqIIKmqyziYzbJW9UyxtexCaTeukkzSbr eEL3hQckQSGYEDyhkrjoBBL8tJbKIBoQwQ+FVQouWeXtFYOdbYRN1vO4NG2A G8gmBEZ6FVzUZjyBg/Ub/hQqs4tOEvuf8pvAtlfbpFM2/Kf8JrAfc7pIX/jx ITFxiGCMAwkCTTqYDofdRoAaYA57gCPmJ7QYT4HjtzSqbHaUGHlY0MACIoYg 5g/aUkxrPHGdbLkUZ+Z0kbgJEbAJhk5AjVXpQB+AIXHhLgAmoIhAOxDgCQBL dgoL8aSyOL6GvR46QTbBuAk2yzZSU20BZnM11xZi9AQmCCaIJLXsTBSziQkz iYuZzQUqyUsqpdmkJCceIKUgIxLwpL48s62xAGsIw6nAnC5Sqeyn5HQRPGGu 0o3W6huEsgWbqKW1WnmtTlmHbIKGd0bEBNO6KDs8uuAJmxhoNiF5lQgmeJPj HhBcaHgjw+2xtjT4eNWwPNs/OiADQulStep7RJMjaiAU1MSwCp4CPFHTVYIx awvYhKQbYTk1eAioQnrBw3kjv7vRLw5nCUMnGxUztmCToW5sEC9l4gmCiVHc BNmEmfEFT3VphFRT+H7F8JBmbm54YX4Mc7q0XUqlRq7t1uj6uhRaJV8kkGoo PHn8xaOHn63NrExL1B15JVnB4f5uXg4YNwE2Adna3rl167yl5TU/Pyd/P2d/ H0c/L3uWr1NsuF9CZMA6mIT7J9FsEh3kERnoRhQV5A5Kjg7ISgorzo6vKc1q qilqa2DTbLJlThcGTbZgE7oTSil12usLW+sKWuvy+Y2Fkma2gl+pFFTSbFL2 orgJTDBuAmziZnPG5vbhW2ffv332fcQTzOwiZhNm6ATktYEnzLhJgr95Xoxr RXpAfV5YU3F0W1m8tD5D2ZzbKSgaVtXNDvCXRsUrBunymHR+WDQP/9YnlCtT atDCmAL+KferuDpxjV7TPNnfMT8iJ9BBs8nz1vCkO7xRuWCqRSP9LBEccH+a ipLMjYqBTab07bTvvgPx5G+98Nke22N7/F2PbnHF7GD75yt9v/ls8rdfTH+9 NvRoVgtsgmldVC30ETFMAFWATVZGpY+mNb/5dPLffvfw//ojxSaY0wVsAmDy dHlwba53aVwLf6xAi2NKFLaXnRumKqXP6CXTg+KpARH8AZzsF072C6YH2yf7 +YbeNkNf22hf21BvS383V9CWl5XpF8gy8/G5GRhoVlYe0z7B75gUqKdEqhEB T1ZRWh4fG+sWEGjpHWDmxLpj6X/jus+lc17nCJu86Xb4Ves9b5rv3mW+533z vbttD+5zPvaRx8kPfU4Bm7wVaPJqwImf7oXf7DcBNsHmJm84fvy6/X70m+xy PYJsgpWESX8TEByMYAI7YYtsklKbwNPUaXpa+7t4I+o2ik1kzaOypiEpt1/G QTZRyOtfyCb0h/zrotlkiu54gp/5E+EaGDuekOwRABOtvAEWrpzqDJCkjT2g bdXD4kT3vNOiXtOKbLI5oWtLPEE2wT6MdOGv/wE2wbiJvof3X4ubiHgl8o4K wBkAE9j2aLiUC6APlosSOEvACBgZAQGnoBME9hDPDoZREE+IJ2VLH71RAhjx lRAqgW+LYkIQGoJIwwumHZ5pjsYP2HFZ+yLrN67VmV54uLgdrSWwxaBJa0Mu CDi0tiy5MCssNc47Nsw5MsieBFAAT5KiPbKSA+BZOrkrBS0nWKcLF71bsgnp scgsGkz874AkNaUZ1SXpVcVpVYxywaQkl1HQBMAExM5L2mCTBKx1jDWEJfwK nYILeILo8RLLCUnoIh3hmf3fmcYTo4SujbvxJ7EJccFvOOLhdm3eqNCFQZN1 NiHFgUnhNQx4oeMDrjXcG18+nfr992v/z//57f/97z/86Q9ffPJwslfLb6zO Kc6N5XFLVBL4ue0j/dKxQTkAC2BLp6JZLWkENoHVMvAIICSwZHVpKpyrxqps uDRAKBhJYTaXJHRGVySjMrswbkKcL1uwSY9kqBvLCEsInhCzyWZhWhfSCkgu aerq7OjrkQ4OKKemBubnx+bnDJPTo/36bm2XWtfTCWyi7tJIVbJabq1MKx+f M8zfn5tempKoOnKLM1khPs7udhg3cXAwc3a2tLO7e/v2eTOzy+7u1h4gVytX J3MPF8uIIM+YUJ+4EErxob4Job6JIb5hfs6hfk7hAS4RLFdgE9iG+TsnRfln JoYWZcVVl2Ryqwtb60t5jWVbeuGfs0lLBZzn9drCrRVCyoFSLqBNKHxOCb+x mNdQ2M5Bs8k6m8hbgU2KtoybiFvy0AuPbGJ75wiAyc3T794594HF5T22Nw5g nS6sJMy0w4PQC0/8JhHuN2J97mZHOpWl+jUWRLSUxvIrEkU1qQpOtqQxQ96U rWsv0StqDF3c6X6qThf8z50d6ligmo8oKY2rFg2qWb3seYr1oGxuSDE/rLw3 oVud6n4w3bM20/twtu/RHKj/8fy6852UCwY2WR5XI8UgwmCu171pNfZexI7w k4MC0OyIaNtvsj22x/Z4+eiX1S4Mi5+t6v/w1dwfv1749tHIwxnNgykVHTcR LwyLMKFrxSB9PNt5f1z+aEb7608n/vLbNTqnaw3Y5PdfLXz9yPDZvaGnSwMP YGk3ppofloAWRqSLozLQ0pgcNKsXoWYGO6b6hVP97ZN9gsnetsm+tvGeltGu prHu5pHelqGe5j4dh9ecnZHuGxBgymKZpWf4dXY16pZVmgX5wKK6c7S9RVhS UhobG+MWFGrrzTKzD7hl6nftkteFU55nTvqc/UXw+feAPpwPvmb10ZsWu3eY f/Suxd6PnI7u8zj1kY/JB74muwJM3mKdetX/BNP8viWbPE/08j/1ls/x9Tpd VE4X1eIEm8IDm7zhsJ944d90PvjKBpu8A2zitsEmgCSARd4nYLLL6/ieoPOO 8fbJtXEtympVd0tfV9uotm1M1UqxiZTJJvUKeV23pKFng01gzT9G1xA2iptM DP+ITZh4QkzxP8pi6hNq5A08Tn59RWpDZZqMX04RRBd/sLNN39k2qAXRzveX sokRngxuYhOS0zXEZBOtMZuQ5uYv8pvoe9Bv0kr7TRrkQlhhloNoNimj2YS9 JZsAmJC+8PAQ8KRX24RZcGjGGd/gO6N0ODTsYHIXgglJ7jJiE2KQZ/pNCJsw qQRN90xDELkuTDDZsuEFwRNmpVwCJsySuTSbsLFIF7IJxk0Im8DlBvTITmEB iQCeRAU7BPtaghBPkmM80XtSUZTErCH8EjZpqi3k1hRwqvLpoEkBhy7MRcVN KnLoPK5MBJPKotSK4jRmKxPst7g5oYtSbiL6TUpz45FN4MUw2eRFcRPm2QCm gKU4IAmeB7rxYgWzvwlGDQiPkFtRK1sXjSfrlYQ1sjqtvJ4UEAY2AQYZ6AJI aaEd8VRCF+wc6GoxZhO9eFwvGeoVDnTx++AtoOMN94nGBqWD3e1qaUMbp7Cx mrLSdMq5MwbN6pL+k4dTnz+d+/bZvWefLU4bdK2ckrzMyJz0iCp2WgevUqdq HewR6XslvVpBt4rq/y4X1olaK4BN4EoBlZTmxpbkxpYXJtaWpXGqs+HCtTeX YtxkI3pSoxTVYvcWOqcLEKmFrtDVPtInGu7t2BDVNmVdwCY9gFdYTFg80Cnq 1wKYtDPVpxGietdLCvO7FDyUTtPerRP1dInHDd2ffrry1VePnzxemZ41AJvo erTAJspOlVghoep0CZoUOqV+fJCq07U4qevXlFQWsIK9nd3sHF2s7B2pCl2A JzY2ty0trtlY33B2Nnd2MnNxNHO0vQ0K9nOh8CTIKzbYGxQXRCkiwDXUzznY xxEEnAJ4Eh3sQbFJArBJPLAJp6qgpa4E63RhWhdQibitDoV+k420LkASwBO4 o6o6sBNKC5VNJ2yGr2XzOUXtTSXS1jIFgAmIXy5vY8t5JXJ+MSUqgFIkayuS thXCXNSUV54blhHnznIHNjlre+fonfMfAp7cPf+h5ZW9WKrrOZvcOeKMeELL 3ewEs05XpMfNOF/TjDD7/Fi32pyQVnZce1WyvDFL1ZQr42aBFM25Gn5Rj6R8 SN1g6Gqe0QsXRiWL4woQEMoiVSJYvTCqWhrTzA8raDCRw2TZoF2d6gI2WZvp eTjbC2DyeL7/yfwAdmB8vND33FcyrgZIYeIJEsoKoy884AlQCbAJQApM/tYL n+2xPbbH3/WY6RetTem+WRv9p29X/vmX9795OII5XbTlRLI4IgItj4nujUvQ yPZ4qfuXn4z/8/f3/vK7h6B//c3qH7+e/+Xj0a/uD3650v90Trc8IlkekTG1 NCwFzQ+IFvTixSHJwqB4tk841c2f0LUt9rfO9TRNdNaPaerGtA1j3U2GvpZu dUMLJzsrK8jT67aPn3lRWVzfsGh0QTOxrJte1PUNCDgNWZmpAUmxHn4hVh5B ZpaBt676Xz7ld/5I4PlDwRcOeZ054Gmyy/bjt6z2vmm99xXzD1+z2fO2x9Ed Xsd3+J58x49K03o70OSd4DPUhAaQzb3gjfQ+68xbnkdBO3xOvOZ68B/s9rzu fOA975MYJXnVbu9r9vvedjn0nteJ110O/tx+78/s9rzmfOAt9yNU+MbpY9jC /B3PY/Aa3vU5+b6fCcgx0T6hOpqrrFD2NnfrmvXqpjENsAl3VMoZljYOSBu6 ZfVqea1SXtslqadanCi4AAtUh8QeqvciM24ySYMJJRJGYdjkcRGOa2DMEQLB qhgWyZMj8qEeAbZ7wHR3Imz/R+3cZIEnYMJkE9AA4AxwDZ0bxkzoAsFcr+PB U3BMv6ZF++PPqF/GJhuNIzFdHz9tRnczGpwl/DJYioMIm0gZTRjxIUzozhS1 nYp6nbKBrGmxQhH+FKrnCx0iYWZ2wVmCydy4Bvswbm6AQiImm+MmGIIxAhNM 6MK4DLbIxIuyZU4X03JC2ARbe+DCG6MGpMsJ2sPh5IjaSvncAhI3Qb8JpnU1 VqXXladUFscXZYcDnqTGeQOhhAXYoPEkOsQxLtwF9qTF+5TkxACeAJtg40UQ Vk/l1uQaq7YIxKkpBDVWF2CDxdryHNLBxKi7IjNuYlSeixIdNynMjCnJiQc2 KcyMBjYpyYkFNmmpz5MKKoFNupRNCGLMYAexxuN5IAldhE2MLCfEcMG8CTc6 WjaRglcEUtbL7Wq4mGcIsDzUy8dsQyPB/pH+dgQTmk1EE8OSgT6RStmkUbcM D8kfrI7/8ruHX3y+9OTRXDO3LDLMx9/HMTzUKz0lMiEuKC8nvqw0g9daqVUL 9ANKpbwVjinIS4D91ZW5/LZqlaIN1vkaFb9T3topa9FImuTtde3NbLg6tWXp 7PzY4pwoEDs/prwwtrYsubkuW9ZejcWEYYs1h7uUcCO1YOXh/k4Btpgf6ZO8 SLTrpANbqGCHRyxZbDTvUQM+t6LwR1A1jVV8+C3gBQ/0K54+XfrjH375v/7x 19//8M3UrEGjU8nVVGcTkFDa0SZs6x/uX31yb2VtcWJ6tLtPk5Gd5O5u7+Js 4+lp7+pq7Whn6mB719rihoXpFUe7O3bWN0E2Ftesza862NwK8HII9XeNCvSM DfEBRQd5RbI84GGor0uAu52/m22wtxPsiQv1TYkOykqMKM5KrC7O4lQVttSV tjWUCbiVGDoBNpHw6mWCRnk7BwQTKb8B9tCoUgsHbGALHFlDt5LHPvIl7c3U BwLi9XZLbJmQrRRUqPiVICWvAqVoK4eH0uaSmoK47DjfMC8LT5vLjndPm1/e a3ppt8XVvVbX99veOuhAs4mr6bHnunMUBVSCOV0+VqdZ9hci3G9Ee93OinAs jPeozGA1FUeL69K1rQW9QnafpLxXXNYjKusVlw8oqke0jcAms3rh4ph0PWgy oVyeUC9PaBZGFZjYgFkNMMHkB4AOzNd6tFEx+AkdNHk410N8JfAsmlNI90ZM A8O4iZHQHf+3Xvhsj+2xPf6ux2dLg98+HP/t57N//v4BsMm3j0Yxp2szm2AJ wacrPd9/NvGn71f+9YfVP//6/l9+ePCHZ7Nfr+o/ne96Mq15MC5fHhYtj0gX h8RLwxKc4Hx+sAO0oBfBQ5hMdrWNqDmz3dyZLs6krmG8s2FcxzH0UGyikVVz 69KTkryATQKDbeu4OWPT6pkHfXMP+ifntWptYzk7PiXBG9gkIMzWPdDMPODG Fb9LJv4XDrPOfcw6e9Dz9F4XqkLXGxYfvWr+i9cBTBwPABTs9D7xjs8JYBMq OBJo8lagydus54WCCaSQusFMvfcCNiFVuYBN3nI++K7n8TdcD/3cYd/P7PcC mwAQAZLAhMkmu3xOUjXE/Exsoi1jKyKATdR9rT1dLXp1M7CJQd4EeAJs0i9t 6JLWqaQ1ClnNlmwyPiAep73b6xqiei+Ob8UmKCaewDofDvj609k//f6T33+/ BgtpfAq9uv91NqFaJbYioVDWFVoIJkZs0vnjPK6X5XS9gE3oD4GRTcoRT5gR E2b7RawejAVgAU+oml3iGqYRGNecQAFwTgiYwBy96sgmGDSBLfAFpoExjfDE C0/gBRO9EEmwUjEiCYnLYNCEJNphiIQUE96yJR9pyIi2d3z9L2ETEjfBJozA JiBOdQYsViuK4krzogoyQwFPMhL9MHqCxhOs3JUY5V6QEcHOiwciwLjJuu29 Nm+zCJsgmPwUNjFK6CLZXMU5CUXZwE3x+RnRxdlxgCcAKQUZkaW5cTXsNGST TjlnM5sw8QSDJtjcBNkEc7qYqVxGXLOJTZo3BKeUg6LvE063mvMT2YTubCJE NhkfEg/0deg6eT3d7YsLgz/85pP/+Pff/vu//fD//b9//uTJQjO3PCbKPyTI PS6GBWwSFwNz1+hIn7ycuCYOWyZpaufX1tcWlrMzKsqyGuuL4SEs9UFaWQuy iUJY39FaDheooTKLnR9XlB0JKs2LLiuIAQ6FK87jFIvaKrCKl0YKvwu8v+Dd 1IZMAcQB6AEAMtov3RJMsO88YRP4EhR+E/w+sEUS2UIaAbxaQKounWhhYeTz z1a/evbk088fLSzP9Ot7gU0kSqmur2tsyjBsGBocHRydGh6bHNbC27KlNjw6 yMXF1tnJ2s3NhirSZW8GbGJlft3C9LK9zS1roBKLa+Z3LprdvmBndcPf0z6E ZpOYYG8QTCIC3EHAJiwPe2CTIC9HYJP4ML+02JDspMjSnOTa0pym6uLWerYR mwB6AI+AAEyM2ATJhX4Ih9U8j560lNKiPhMQ8UokglJgE9U6myCYlIOATRRt ZWJuUUVOZFqkO8vllqvFObtbJ822YhMXBpu43V0XOk1QmNMFbJIabJMd6cRO 8eUURgKb6HhFg5LKXlEZeuEX9O0Lw8I5ffvMgGBhRLwwKpkblYIwbrJIRz1Q ACOAJPMjckCVuWEZNoUHAEE2eUj3WIQ503vyeANViD8FgeX+tGabTbbH9tge /4Xx5b3h7x5RbAJgAvrVU8Mni91bx02mlWszyk+WdN89Gf7h84lfPRn58l7v vTHxqKZBwyuQNKQLa5KFVUkdVUmi2nRBVYqwJlVUBztTYd5Rm86rSGyvThXX Z0gaMjtq0+BhCztOUpssqkkS1iQKa5I66lKEnIyOpixubVoVOy462sXd42ZQ iF2LoGR2uXd2rX/h0SCwiVReXZgfER/tBmLRbGLmf/2y76VTfucP+p/Z53/6 kNeZj5yP7bL9+DWzX/zc9IM37fbvdDn8rs9JJpu8xaJKdTGrBMPkP8sm7/uc esftCMUmtntetdv7ptOBXR7HAENecdwPbPK6y0GAEcATYBMAFtiPsRt4Ge/S bHKTdS20kNUgY6t6myk20TQbtG0GRTOwyYiM0w/LTkmtUlItk1RtySaGfpGB /nQdrQpjg+IxvYSZpETwBDOUMLOLOKxhCwvsB0sD9+Z7YT9aMDCkYlQ+qF/9 QjAxYhOqkzscTBMKlRtGu1cQTIbobDEEE5BuPXNmHUmYq0TSDI7AEbIJ5uqT 5TeyCTN0wgyXGIEJdvQmbGIEPqSOK3Z+QSrBdDh4iGyCiIFwAROCJ8TtjlEV YnhHPCEREwQTZrYYcQCRQrKkLaYRoRiFTuBl40n4L7AJxk1q2EmwXoVVK+BJ UXZ4fkZIWrxPfIRrZJA9CaDEhDplJwcXZkaVFyTWlWdgGeGNDK7NbFJoFDTB Bot/lU1Iha51MMlNBCopyIwF5aVFot8E2QQoqa4sA9hEwq9gssmL3SL1jOrB 5Zjktrm5yebEwpewyXqsTc3p1TZh250XsclwnwAFbAJgAgJC0XW2AZsMD8kf rk389odP//lP3/7LP3/3b3/53R9//9X05EBdTWFKUlh8bCBASlJ8UHioR1iI e0yUb2Z6lLijsVPTrlHxhYI6QJWWpnKYyKXNCgATeauODp2oRI0SfhWfWwKX o6okmZ0fW5IbjWxSXhgLKNpYRSV3wfoZ8EQr42LEBJmiv1NgxCbPU7k2ZBQx QR7BEAmeqPX4CN3zEUWHnDb6raj4QFjwmgFPhvSahQXDk8crDx4uzy5MdvV2 SuRiZaeqe6Cnb6h/ZmFm7ena0oOF/uEeXntzQXG2u7eTg4MFyMnJwtnJkrCJ pdkVO+ubsAVIuXXt9J0bZ4FN/DztqbSuAPfoIC8MmoT7u4GATQI9HQLc7ZBN EiMCMuLD8lJj2Lkpdezcppp1NiE5Xcy0LiSUDRipY+6U8mFnLdWcsa0S0E/U VtbRup5OiWwibS9VCcpVfECSMpSijY0ScQrKssJTwl1ZLjddzM/Y3jxmdnnP FmyyIVeaStxNj4O8LE75WJ3GvvBhrtdife4msSwzwx3yYlzL0/ybiqIkNJsM iCuGFNUj6rpxHXemnzc/JIT/5kujVCuTJYMMwGR+TEaxyfg6mwBWkBwtYBN0 hs5QrU/UWIYLAeQ5ktBU8nijgDAp3oW5XhSn0DldW+pvvfDZHttje/xdj9UJ 7ZO53u8eGf7x66U/fXfv159MfLrUsyWbPJyVP5lXfbak/Wy58/GsYkHPM2jr utqLWtjRxfFumWE2qUEWqYHmaUEWKSyLRH/TJH+zZJY5TBJ87yYFmMEWHqYF W6UFWeH+RD9TOD4pwDTe/068/91EmIfbpkY75qb7F+eHA5t4+9yNiHIRSqsX VweRTcamlfz2kuzMoPhoV8zpwrjJJZ+Lx73PfOxrstfP5LDP2T0ux9+x2vua 6Yevmv8C2eQ931O7fE7u8D25w5/qYPJ2IN0ankYSDJow9dPjJsgmP7f5CNlk h9uRN10PvYhNMHQCbAKvBPDkis+lwDzfWnGxorupq7NpUEXldCGbUHETSX2n uOYlbAIa3Vi+Uvk/wCmDYhJGYeIJ0xFPyufCWhcWWlQqFL8cVmuw7oWdJDxB qgn1vBRMjNlE1YRsQvAEhGCCQRPYj/xC2k8QNmFGMZipVrjFpTthE/w83Ch0 sjmhCz0mIMQTzOkCGWWvMVtSAkGsLvY/vj+8tjQIWIFxE9iJBnbECqajB3bi s6Q9Cik7TMoFk8JcTDDBQBUpnkb4aEs2YcZN0D3NzOkiLeON2ASQhBQQRr8J GuGBTapKEmC9ys6H5WtUcU5EXnow4ElsmDOGTgBSAE/S4gJyUkJLcmKrilOY xYQ3i1NTAFTCzOZCvYhNmGDCxBNkk8KsuK3ZpJzJJlxM2SJswujevi68SeAO gdsD7nM4J2j9/mls0gQrbXpdzSXeE3p/Y5eqsUfDJSUaNoMJsglgC4jJJoP9 Yv2gdHam5+mTma+/uv/tNw9A33z14PtfPn20NqdS8MrZWTlZcWkpEYnxQdGR PlER3qHBbsGBLrXV+TqtcMLQPTSoguU9r7VKwKuRirlMNtFIuAAd6IjnVGfV sFPKCuKATeASI54AsNSWpQNaIp6oxEB2cPM0Y04XQAfQB7IJhkiMRJAEM7Xw 5BCCQyRRSxqx4SMI5wRS1Io2iYgDrxm2KiV/aEi3en/u088frT2+b5gcVWmV YoVEqpJ1yER8EX90cmR8dkylUzRwazJyUjx8nO3tLeztze3tTZ0czYFNbK1u WZpds7G8bm9zC8DE7PaF65dPAps42Nzy87AL8nUGGIkK9MSgSZifK4BJsLcT YRPYnxTJykwIBzYpy0utLc3hVhe11JUCnmDcxKiSMFIJggmZbwALcEot7Uah SniJeZTgb5FEgMU62MAmSgFbxWcrQbxSBaqtBNTByS3LCk2LcgvxvONudc72 5lGzSx9tZhPnO0dAyCZAJR5mJ4i8LU2wgDB2hAcwKUnyrs4KaimNldZndLYV 9nWUGTobx7QNQ8raYSCU7qY5fTvVRpnub0JyuhZpLzyzcA1M5oZlwCZj3XzA E6AMJBFSHxgmjze6wGO4BJO4YIuhE9xzb1qNZhOmsAPj33rhsz22x/b4ux6z A+J7BvXXD0b++NXiP327AmzydKFrSzaZH+KtTUmfzqvWJiRzfc0GTe2oqnpY ViGsjC+Jc00D3PC5Hed1I8bjeqznzRj369Fu16LcrkW6XIlwvhzufCnS9SrM QVEwcb0a7nQpxP58lPvVcJdLQU7ng5wuhLpdCfe9HR1onp7oVZAdDGwSGGSd mR2i6W5ZXhuaWOmaud+rN0iaWwuyMgJjo1xjI118gizcWKZm/tcvep8/6mmy 3+fUPv/TB71Of+R87G3LPa+Z/eINqz0kbvJjNqFKdb1JUwmzevCWYPIiNtnl eRzZ5GfWu4FN3nI+CGzyhstBo5yuV50+Bk4xCp3Ai7kddDOsOKheWirv5nZq OH3yxiEFd0zeNCqj/CZ9f41NRmH5ylzE9neMDIgMjCwvgifMPoxwAPqv4Qth oUs+eyeFTJnVhHC5SxHHj8GkR84BbcUmP4qbEO8JM5sLDuill9Cb4yYkoetF bIIhA6xGxUzrWscTwRaWE9yDfhOtvE6nbIC1JdqliTALCE4FrPDhzGDxLiCO dSPPBt8BXMDcqG87bR/uwN4oaFfBIAtGTIySuMgVQTaBb0Xa8DHZxKgJI7ki GEXCvh7kjGGFpS3ZBKiEVA9GMGmuywYwqS5NBBE2gW1RdnhOamBKrFdcuAsQ Cio11i8riQqdlOUnVJWk1LDTQIAnm/0mjdX5RmCCTRU3swlJ5drcC57ETZBN 8tOjmDldwCb00prywgMm6BRcTNlC0CAwwqxARVouIpuAjGpzvYRNAEk2zCbc DUf8hk1J2UDSujBoApxiJAQT7AuPOV2w7e1u7+8TAZt88nT2q2f3AE++/GL5 268f/vpXn3zz1aPF+ZFOjZDXWt1YX9JQV1TOziwqSC7IS8zOjGlpKp+dHlhb nXq0NmMY1ckkTSJhA4AJcIpa0qSVNoOQTURtFYKmUiC4xqrMyuJEYBO4vsAm IHZeXEXhunuorRGglQ1raYAIzO8C6AA8wdAJxkeMRKiENJ1H9CCuHCaSbMYT YBMAE5CAX8vn1ymV7RPjgwtL09Nz40Ojg5outUqn7tX3DY7qRyfHBkcHW4XN FXCnpsZ5+Lg4utrY2Znb21Fs4uhg5mhnamV+3fwuFTQBNjG/e+nW9TNXLhwD QnGyu+PrYRvo4wQ8EsnywKAJgAnwCFCJn6uNr4s1y8MegCUh3B/YJD8tdp1N qoqaa0sAT/icCiaeIJuQWMmPqWQ9pwv9JpjTJebB36KNkmiU2Q3+IpUoBCVK PqhYwQMVgeRtRdKWfEF9RmlmYHq0S6jXHQ+bs7Y3D5tuxSZOtw+DAE+QTdAC D/Kg7fD+tudCnK9Ee91ODLDIiXLGtiatpbGyhswufvGgpHJUXWfQNU52N0/1 tEz3t80OCuaHOqgCwoAndF94yhFP53QBj8wOSYFEAEkATJBNRrt4hE2wbjAI gyOY0wWTZcpHr5jRS+DLgWuwJQoesDqj2cwm92fUgCd/64XP9tge2+Pvekz3 dayMKb9ZG/1f3yz/6bt7P3w+9aKcrlVD+9NZ+ZMZ6cJg84iyYkjGHtdUD0vZ kpoEdqJrasDdRK/r8R7XYlwvxXveAE6J9bge6XIZFepw3t/yZIDVqWC7s+FO F2EPbEPsz4U4ng+0P+tvd9rf/kyg04Ugj2uhPrdy0wNy0gNCQ239AyzKKpL6 hjoW7g+MLmgMi9ruQX4DNzsjLSAqzDE4wMqLZebsd/uOz5ULXuePeZ3e70PF TT5yOvquzcc7rPe9abnnTeu9uwBM3I7u9Dqx0+fkTr9TO/xpe3vQ6XeCzzBd 8DuDzuwKPgvbLWsIb+mF3+lx7G3Xw6/a7/sHmk3edjm0052KkgCY/Mz2o1cc 9wOMoP1ky9CJWdgdYJMaUZGks0GrbuxXcEZUzSNSzoikcUjS0Ceu00lqVdIa ubT6hXGTDTChrNMDImSTzXhCkAQn+BSGCXDBj90NYH1L6tbi5/NYEmpLMNmS Tfo3JXSh5YSwCYJJL80Xm4sjMb3M2KgaEYnJJqSLB7IJM3QiFZRttpwYxU0A TzoV9biMZ4IJghL1yzIcLiOMsBQJNmGQArPdjBLDMCsMqxNjMAUDJaTk12Y2 YcZNiPCXJWKm2KHdhlSOwo7waMPZkk1IKhdhk/qK1NqyZGCTyuL48sJYxJOS 3MjCrLDctKCMRD8glOQYT1BqrH9mYlB+ekRpbhzgSXlBIqi+IrOhMstYGx4T TOUiDd9fwiZMMCFUQsCEUkY00wtP+U1K05pqc8W8ciM2YYIJuR9wfWjkSGI2 +NhMKC+Km3TKOcQOTwWqaDbBtC6MkmxmE30PD8HkeWv4wY7xMfXS4uDTJ9Pf fbv66++ffPP16rMvVwBM/vEPX//uh2dffr46NKipqyksZ2cVF6akp0YkxLHS U8OzMqJKi1PnZgYfPpj+7ptHD+5PqpU8YBMglI72eqmgTiFsUHbARW+QCqph eczjFLc25AOeNFRmVBYnkJwugDu4fBVFSYiZcNUAUoBlZO01GEDB6AmGSGBu JBIrQTAh9EEyuNYZhLEH2WRdijZ4wcAm/Laa1tZqoZCr65RNTo8++XTtq2+/ fPzpo+mFmbEpw9zy/OzS7OTcpEghLK9hh0YEmlresnOyJGwCsrO+bXbnMsjG 8jro9o2zF88fvXDmkPmdi462t33cbFhejsAjaDMBSAnxcUY28XG2AjaBeXSQ F7BJdlJkUWZCRUF6fVleU3UxgAna4XmN5UauE0IoCCZoP1EIuSB5O8xhZ62E X41NZGgBnlTQJQRLaTYpUgoKFXxQgYJXIKcl4mbxalPZWazUSIdgj+vu1iaO pkfNr2yR0+V46xCIySZeFqdASCjAJsFOlyM9bib4myOb1GQH88rildycvo6y EUXtkKJmVFMPYDI7wJ/TC+b07RSbDIsWRiULBjmd0KVYHKfqdAGeoMcEKQPN JoYeAQj2AHRgI3i0vWNsBZsFoGUeQAYEc2ATjKFQYZTpLdgEtJ3TtT22x/Z4 +ZjpFy2NKLBO17/8avX3z2Y/W+59AZsI1yZE90YFMz2cMVWVQV09093Y117Q URlbGu+S6n8nyes6KNET8ORKgueNGNerYQ4Xwh0pBdqcdri02/X6fu+7R1lW JqGw3+kSKML1SoTb1TC3K6GuV8I8rkf43okMMCvICspM8WUFWHh536msShkY kcwu944v68bmNcpOTllFYlKCV0SofXCApSfL1N7nxg2vi+e8zh31ObPP7/Ru v1Pv2378jvlHu2z2v2299y3rve+7H3vfgw5V+FId4alOJRSbnNkRQpEI1uba wTLZGXga2OTdkHM7A8/A3EjAJm97HQO9430c2ATDIu+4HUEv/M/onC5kE2CW n9nt+Qeb3a847HvT9dAbdIoXHPy680F4+Lb7kR3AJl4Um1wPvuGf51shyJNo 6mG1M6xuHte0AZXoJQ0DkvpeCcUmGkmNWkJ54akWJ0rugKZ1SMcb6Wln5nRR lhOaTUZ/HDcheIJgQoT78VN6WI0jEeBn8sy4CWnz16ts6lHSVLIBJt2wJFb8 iE36UYxsLiaYgJhBkx46IWezDdkobsJkE1y0E6vF5rgJtRz9celgpuXEyG+i U8APqsctSCOrU0upnV0qTrea2wPSNPVpYc1PN+/uAuiAE9LapYJzhatTTrcK KKZlQAcvrK0f1EmdvV4thSpw8NiACPFkZkw5NQpsguUIZEQTQwCJ4pE+ob5H gL8X/cvyiAikGIEJ/PrPS9rSAS9smUeehZcHp6WjtQRzuowSuoBNGqvSkU2q ShIIngCbgIpzIvIzQrKSA4BQ0hN8MxJYWUnBeWnhRVmACbFAB2hIryvPQAGn oBqqchsqc+srAUyyQTVlWaBawBOaTaoZXeAZYILhkmQQjSSxBSgKTGJAhZkx GDcpyIiC1wAvANgEltzAJrQtHVbIdVhfDuMmJINr/WbY8CIx2WRznS5mDeEf lyNez1ai8YSzgSdwzE9iE7SiEDZZD52MKldWhh89mvz00/kvv1z5/POlb755 8Pjx3OefrTx6OD8/NyKTtuTmJGRlxmZnxyYkBIWGuEdEeIeFeYJUKp5hVPf4 4dzM9ACvtaqupqCJw26sLxY0V4jaqiT8GgmvuqO1nM+lepS3NhbwuEVAKI1V GTWEQwsS2HlwPukASlFidSlFKIKmEjGPwhPAh24VvNEoUzw63InQV0LOBknf wpgLTp7HRzaxCVKMUtYsFXFkYo5QUCfg13UIOQo5Xyrj9w92Lq3MfvbFk2ff fPHks8eg+ZW52eWZDnl7Rm5qQLCPvbO1g4s1somt7R0b69vWFjfu3rpoevuy xd1LlqaXb1w5ec7kwHmTA+a3L9hb3fBxtWZ5OdBs4gYK9XMJ8XEK9nZkedj5 uVoHuNuG+bnEhvokR7Hy02JKshMpNinPa64taa1no+UE2ITPqUA2QR4hYIJI ohI1q8UtWmkbSCNp0UjgIexspPtg1gKboAOODuNSfhNgE4WABhN+gRzFyxc1 ZbXWJLOzA1Mi7ANcLnvYnnGzOmV5fR/gicW1vZbX99vcOuBw5zDFJrcPr7MJ VTr4uKcFxSawdTM97m52ws/2bIjL1Vjfu6khtoXxHmVp/o2FEcLqFFVzXp+o bERZN6yqG1LWwHaskzPZ2zJHOeJFi2NSYJPZEcn8mHRxXL48oVqeUC+OKZYM ypUJNWznhqXzI7LlcdXUgGgM/qB184E7AEDuT3ben9KtTGiXxlRALsAsICAa eAoOhu8AX7gwKqe/j4bqLL/R3+T+zPPkruVJxXbvxe2xPbbHyweACejbh2N/ +u7eP//y/u+fzSGbrE4q6P4mHaDFkQ7Ak9UJ6dqU/P64ZLa/dVRVOyyrGFVU jcjKRJVx5XEuGf53Ejwux7lciHe9GOF0MdrlcpTzlQjHSzSDXAmxv+h07YDN xT2W53bbXTngbXkmyPFKoMPlMKdrEa43Q5yv+dtfCnC6Eu5jFhtkW5QTkpXm HxZmzwq0amjKmZjVTi50TS7pRqYVEllVYUFkYox7VLhjSJCNk/9tU49L5zzP nvI/fzDo/AcAGgEn3rXev8ty7w6LPe9Y7tlp9/Eul8PvuR/7MODM+wGnd7Ko EMlbdJGuNwNN3gk49Y4/1VcRBc+CdgWe2awPAs/u8ju10/cksMkb7lRZYKoy sPNBgic/t/nodYf9O+lG8MAp/2C9+xXbPXDAeu/4jdbwO9yPYnf4D3xNTodc cSvyqZOUaLuahpVNE/LmCSm3T1rfI63TyOs6ZRSb9Ilq+4U1XbKGbliFqqjF P7rLR3uFICQUNMWjjMCEiIAJ6fHHLMaFK1v8BN5oJ5VBpOLCapzEF3Qg+vX0 MCwnFJgonvtNSLUuEkBBswmCSTfjk3+mmFWziBeelA5jvs6NnnpU/SV6zVlB oUrHj/AEhZEUwBMEE628jnKdKKs08nKdqqpTWdmlrlbLypSSUq2iAgR7ujU1 vZ11IJigs6CvsxmWoyDsSo/fB56iG6/wiMUAjoRjYD/shOXoxLBkxqCYGpWN D4lJLVkQ7JkckcIEVq10Q8lW+peFXxDxhCrEiok0zNpcJIzFPFfIcXjh4PzA qYPFNqyLgEqAR3CLcROgEm5NZlMtIEMyUAkKlqwo8uk6bLF+V25aUEFGJEBB TkpodnJIbmoYPCzOjqksSsYP3oFNGiqzGquyqZyuqkxQQyXQCsUstWXpVNNG qutiVk0ppVp2Nqi6JLO8KKWsEHgkqTQ/sSQvoTg3HlSYHbuFsmKBTYqyYnNT w+GnAxYBBPG5RbD2Q1JAssCaACRu8mMeKSf1peE+AcGzmxujkxgKqcNAZ82t 1xAmfhONtIF+iouXGNgEtRlMkE3w3oBLDFcfLjfcDFPTXSuro59+sfDsm3tf fEXp2Ternz+79+XXaw8ezs3Oj3T1SDlN5anpUbFJISFRviygkhj/oHCv4Ajv /OLU6uoCCSyD1e0tzZXskoyighRQTXkWpya/ub6opaG4ub6AS9UlyGuqz23j FgpaSvjNxc0NOXWVqVXsRGDPouxwEBAozNGHArgKNwlmu5H8QLgDSQ0uZJNu VSuTSphC9PirUojqlUAo4gaZsE7MrxG310pFDeIOUKNc2iLu4EilzXq9Zn5+ RD/W2z2obRNyw2OCbR0tLG3ugGys75qZXr95/cK1K2evXjp9/crZOzcv3bh4 /M6VkzcuHL14cv/1c0es71xwsLjq62oZ6GWHnRZBMAnytg/wsPR3t4BtkLdt BMslPtw7JSagJCexLD+lPD+tjp3bUlcKSIJ1ujCbC2AESETZ0QQYAluQRtKq k/N7VMJ+rXhQJ+1SCDplPK20FaSRwGHw1muQtVdjThcl6hMSUJlcUCQnVLIh SWtuXWlUUYZfTJCFl8M5b8fzbjYm9qZH7O4etr51wBzw5MZ+uzuH7O8cdtjo vUi1NTE/4WFxkpKViYvZcYfbFLx4252N8LmdHGZbkORZnsVqKosV1qfJmnM6 hSVDakCSRgNQSXczldbV1zozwKOqdY10zI0IZ0c6QPNj4gWDZHFcOj8qnqfr dy2Py+9PqdZmOx/Odd2bVC+PK7F+F5WpNdX1YLoHuzHen+rcKOclmR7smBuW gNazxWiv/b3J9a6LQCIwWTBIZ4Y7pvTtc7Cu2K7TtT22x/Z46QAwuWdQ/erJ BNbp+sNX81/c6zdik6VRik2ASh5Myp6zibxyTFmtF5eIK+Mq4l0zAu4keV1N cLsEeAJsEul8KdzxYqj9hTDHi2FOl0MdL9tc2mNq8t7NE7tMz3xof/2Qp7mJ j/W5IPvLIU5XgVP8HS6xXK5FsazSYt2L8kJzMgOjol3Cohy5vALDnHZ8XmeY 1/YMtbfyCvNyw4BNIkLtAwMsHHxumLpfvOB93oR18XDIxQ+CTr/ld+xdq33I Jjus973rcPB9t2Mfep38q2yCYAJ6N+jsZgGbvOtv8pxNnA8w2QTQA73w79IO FMzyesVuL8AIk01gDmzyrteJ931Ofeh3GtjEvdiXYhNd05CCa5BxxyWcPskW bEKBgJILy360b5C4yX+HTbZc85PSWKR1NZVE9J9nE6blhBk3+atssrlO15al w/5TbCIRsGECbIJgAupS13QqqnTKapWErZaWKcSlClFpt2Z9v1Ze2amo1Kmq 4aFWXovmAsQT+FrSzxE4BfeTNSo+xIUrLE1HB4SwKMV1KSxQiScaHsIEnkWu 6dU003wBv1crTSg8wibkV2b2W8RzxTxRGDrZzCZ8bgEJmiCbgNAIb8QmoOrS RHgKyQVWrbB8Lc2NLcqi8qkAT0DAKej7KC9IrCxOrilNQ4M8sAmnOgtE40km hlQoPGFnApsglSChvIhNinLiNgvjJrAFNkFLPnxbZBOEBWQTrAlgFDchBhNE EiwgDIKnNvdG/+lsQvd8fM4meLm3ZBMsLwy4SqVy0WwCQDo717v6cPzzZ0tf fn3vsy+XP/l8EbYPHs08fDL3+OnSvdVp/bC2kVuWkBQaHhsQHOkDeBIVHxga 5Qt4kpwemZkZW1GR29jILi/Lzs6MzUiLykyPzsuMhhMIZ7W2PLOxOocD16Im t5VTCFQibGN38NjtrcVt3PyWxtxqdiKCJ7AJCCbwEFgVuLW9uRjOGJwHTGvs UbeSGlykR4kRm7wEQ5SAIZsk76gDyYS18g6YN0iF9aL22raWSn5btVTcBBIK G/n8Oi63vLG5qqy6KDYx3Nre9MatC9eun7t798rNGxcuXzx17szRM6cOnzl5 6PyZY9cun75+/ui1c4cvntp/4eS+W5eO25lddrW9FeBhE+zjEObvzAATG6AS UKCXdYivfXSwe1KUX0ZCcGluYlVxRkN5PppNAEyASqT8BoWQi2ERoI9uZTsI QyR0lKSVCGgFc7rk7Q0yQZ2UXyPhV0n4FbTKpQL8VITqb7Ilm4C4lfH5qd6R AaY+TheQTZwtTzhZHAc8sbr5Mcj2NsUm9rcOgRzp3otuZseRTdwtT7man8C2 jMApwe7XEoKt8hM9kE06GtLlLbldIvaItgHZZKKrCf0mwCag6UHetJ6PYAJU sjQhAy2MUWQxO9QxoxfOUA1QZKvT2vtTGsCT563eZ3vXZnrpboy9xGkyPyID KpnRi4BQ4AvhmyyOSUEU49DWEmATgJGJAX6vslYrLh/uahrv5/2tFz7bY3ts j7/rsTyqfDCp/c2n03/+/sG//Gr1H79ZfLY6+HBGA2yyPCZhssk9g3h1Qgrb 2b7WMXXdiLzKoKoBNpHWJFQlumcG3E3xuZ7kcSXWmXK4R7ldiXC5Eg6E4nI5 3OVqmMs1xxsHzc5+cOP4zlun3jM7t9vqyn67G4e9LM/42pz3s7/k73g50O16 bKhdXnpAUX5YVgYrKsY1JtGDJymbWNBNLHaNzCjlnY3VtWlZmUFxUa7BLCsf r9t23teBTc57nTMJuHAo+MIHgaff9D2603LPTgATmk3eczz0oceJj3xPv4hN jMAE9F7wuc16n3WGySav0WyCuEHY5C3ng+/TlbuYbAIPqd7xTgcwhrLT4xgG TZBNPIqpOl3qTo5ezhkRN4yJGrZkkx46aIJsgkGTF7GJUfrWZhE2MSrJRUgE 17pk/lI24Tyv1qWg2ARfpJEd3shsAl/YRffFexGbGPU3wRwzJp6AfjqbAEQg Tagk1dggHvhCKQZUAQCpVYjggAqFqEzeAZBSqZEBmFSrpVUqCRxfAXvgqzoV 9bAWBQGMwJeL+aUgWHjgU7ATtkA9XapGjK2g0CuNVWSJG3qkvx1rN+EEDqCR B50vTd0qONstdPRknU2AVki4hJQOYEIcJr+9iE1A6IXHbC4QpzrjJWxSV57S WJVeX5G6cUwKYEhxdgxQSW5qGAjxBIClNDcOnsKu8Q2VACbZhE0AWNbxhJ1Z V5ZVX55L2AQm5UWpPzFuUpARTbvgo7OTw7KTQ+BlAO/wOP8JNmFSibClGEQV c2NkfKEInjBDUS9gE5pcaDZBKnm534R0XQQwmTEogE0ePJr44qvlr75d/fLr +58/W4Hts28ePP1s+bMvVu8/mBke1XGaytMyoiNiAwBMwmL8I+MDQyJ9AsM8 AVJi4wJTUiKys+MzM2KSEkIS4oKSE0NT4gNT4wOzUsKKc+OqSlMbqrKBTfhN xYKWkvbWUmATsaBMxGcL20rgHmioTIMLjfYidn40zOFyw11B8ATrmDELcDH7 lTCzuej8pbqtMQQAZCtJ22skAniT1inFHJmoAdikujKnuDC5uDC1rDSzojyn uDg9LS3Kz9/Z2cXS2vbWjZtnr107ffXKqatXTK5cPHHx3NFzpw+dMzl48fTh K+eO3bh06urZw+eP7z1zZPelUx+bXjNxsLjq4XCXBE0iWK6wBU5hedr6uVn4 uZmzPK1C/RziwrzS44NyUyMqCtPg5kQqEXArxW11wBo6OR95pEclhC087JTx NjDkeRNGIgmvji7VtV5DeMs6XS9ik5aapMJ03yiWGYCJp/1Zd9vTLlYnkU2s bx0ANrG5ddDu9iHbGwdAiCeuG6ETTysTYBOH24dBHtYmIR7X4wMtcuPdyjID uOyY9rpUWXMOsolBxx3XcSk26W1BMJnqa50aaAM2mRkWYtAENTcimhoQjHW3 jHY1T/Tx5obFQCXAJkAopGjwo7m+h7PrAjZZoTs2zg1LAUxmh8QkbrIyobg/ pVqdVmPEBNlkekg4pOMCngxqG/WdnL/1wmd7bI/t8Xc9VsZUD6e7fvv57L/+ eg30T98tf702RLOJEv0myCYrBrExmygoNhmSlMrrkqqTPDJZd5O9ryW6X452 PBvscC7I/lygw/lA+3MBdmf9bM/62p71tDhpdXnvTZP3bp1+//bZD2+d+QDk cOOwq+lJb9vz/s5Xgr1uJUQ6FeWEFOSHJiV7B0XYx6X6iDR1U/d6QcPTCqGi il2ekJ7mHx3m6Odz1931mr03FTc563HmuM/Zj1ln32OdesPnyDvmu98x2/22 2e4dVjSbeJ7Y43dmSzbZMpvrRWzyHny578m3vf5/9u4zqq3FTBR2TnM3vSME iN57NV0gECCJInrvzZjee+8gmiRELwaDjXE3uNfjY/vUZDIpk9xMZpLJvcnM JPf77l33/vh+fO/er9jeBuyck8la5/xgr3dpCSFEkWz2w9tYYJMjoXrE9K1g XXAHBK44AZsoRRif4hl+S5uYJdrz6qM7xLXzS32Xpvu2xD1XxT3/xbzJt7cJ NZwWT2upqiG6St5vE+KrojriZwcIm8zJeUIv66LbBJMmaJMD46/aBHny7W2y IOsEUMxK2vC9cAU0QfahtJDQaCCneBG3L04TWRIIQMesBMBCJEfgwzHhAgG3 46J5uIQb4XHw7+dwCTDB+6BWsB+B2tBHtUWjR+ASbiSruYbIj8WWfDlPyOyJ vKwLqEJlTA4caEb9lN6VN8HNJnBeivEum7TW5cCboBK4AwScxIJTAB2dTcXN 1Xm1pUTHBwYKBXnSWleAPMGart2yLrlNACa9rRV9bdXIEwi40nqQTWrKsg4I 0ibV5zLKC5PlNmkCm9Tu2qQXy7Fwy8me/qM9pVyUUMiJ2c2UUDDgo/anTg60 CTm7uJ/+5B643ASfdHi6ceUi2uTOjTnMm4BN/uFnz3/8U4InP/nH5z/9+Wdf fvPkJz99+fL1w2s3LvQNNBcVpyelRyemRwFMMvMTkzOi45L5iWmRGZmxGRkx mZmx2dnxmenCrPQYEEp+VkxuelRuRnRxXkJNWUZrfWF3a+noYN3YUD2ZOmkE myBP4NsHgyBP8Onuai4Emwx0lsILA14tYDdiSdB4y8JUL301yYE2AZi8xybT E517ApMmwJPpye5ZSd8s8ETaNz7a0dxYkpUREysMiYri8PkBISFeXK6Xp6e1 na0hhLOTiY0V09aKaW3BsDLTsTLVsbXQc7AyAJXYm+vZmugATCwNNZytDHxc LYN9nSK53mCTpOhgUEl6fDjwJCWGCzxJiAxIjGKnxgbnpAhK8+G1lNNeXzzS 0zA+0Coe7gRizEuGlmQikMj52XG4hOtwC3gE297p7fBU7C5k7JGNAU86paJ2 sMmbvAnZCz89SaROZifIfpO3A2zS35pTXxqTk+QHMOEHWoT5m3K8DNkeTFCJ j7O2rwvRchLkoR/gwghw1g101Qt21w/1NKTbBMESFWSVHuVemBxQkRPWVBLT 35g51lkoGyxfETduLfYASbYvjBBJk3XR3c3xe5eJ9Yt3iLKuSbDJztYExB2y vmvn8iSQ5MrKIATa5OH1WeQJ9raT2ZM1UMmrexfhEscFA0/INhOirAviDjkE DJMmT27NAUkgKKE8vDlz79oUxvd94nN4HB6Hxw/6QJv8+ssdgMmffvXi337+ +CfPN8Emz2/P0XvhwSZPb0zJbbKBeROipuuSpF7Wmd9VFFGV5FssdAWbZHAs YgPNY9gQFhCR/qZ8H2P4HzXUy8jbXtPZXMnVQsXDRt3dWs3FQtnHXjvIzYDn bxHNdUiK9izIDiMKuqoSM3PDopP8cktjZteHtp9v3Hq2fummbFTaXNeQVVQY nZHMiY7wCOM6BEW5ePJszcPNmHwTLaHZaaHRRzwGqOTEGTXSJlp/xSZxB7SZ vN8mxwWGe2wC6PgkSBtscjRYV1FgBDaRd8cHaQNGqKIvqt8Ea7qAJybxtry6 6LaJ6rmFXrDJ5kTXO20y00d0o88Pwhk+2uRd/SbyPYxvx4E2wUtqjC1lk/1x oE3AF6u0gV1gk/WZgQvkF0lPnSBPqEZ4+C7gA8+TKYB38YRacYIn3hRM/ra8 CfbCoykgsBZrcboLbxkfqpkcqYPAd4E+ECBT401iUT3cTnWsUOVhENKxRnhM zJVgQRecr1IwwRUqgA78izqeweJQWSQJBtaAwd1WaTYheTJMbeuW//zJHzu9 BZ5KmmDlG84KONAm9LzJYFfZe2zS0ZgPJ65wH+qeQ93V/R0V7Q1FwBDACAgF kVJ9Lg2uNFRkA1va6guBJ13N8uhuoXXKt5T3tVWCTXpbq7qbK8AmcHmgTd7R b/KmpgtABJ+up6V0tL9ONt6GE33RJrjlhLKJvA151yZ7sid4C3mHFrLwRp5D wdQJ2mS3I/4Am5Dzwd7sXvyre+GxoAtssn1thsib3JPXdP34p0+pmq7XXz78 6sfPfvuvP/vnf/nH5y/ujo735BUkx6UIINJy4tJz4uJTBDGJ4cCTtLToxER+ bGxoQnx4UjwvLTkyNzs+L1OYkcxPiQ9NSwwvyIquKklrqskb7K4c6a/Bsi7p eMvURCvwBP6xwE9gpLcS7QmX8CxjmR+8POB2lCwIZWYSfrA9VIc75RRqQhcm Td4V77LJbhA1XXOygYXZYZm0f7C/qbw0OzUlMiIikMv1Dg31OeNpbWaq5e5q 7upkam6iZWfFdLQ1tDVn2FnoOVkbuNqyIBwtmEASc301sImDuZ63i0WQt0N4 oHssPyBOwMaaLrAJBFZ2JUYBWALT47l5aZHlhSlNVfmdjSWi3kawCfa80xfB Y/M73oi3UztN6LsXKZtg3oRuE+J1NYH/F6FN6g+0SWd9Wk1xFNgkgmMFPOH6 GgNMgCTeTloQwBN/V12wCZu0CTIklCzrInjiaxruY8I9w4LfqtFB1plCz5KM 4Ko8HtZ0TXSfBZuclzSBTYjxXBfH7myM3r00fn9LDL/THwMWbsjuX5OCR7Yv j9/eHIOAK3e2xFjQdWtjDGL70uS9K7LHN+eBJwAQ+WTg2+c/3bnw2d2N59tr bwYFby/D3ah+k/vk/hSi2eTW3KObM2AT7IUHm+DlgxvTEN/3ic/hcXgcHj/o 48n1BbAJ1nT9+68/+8Mvnnzz9CJpk3n4T4xuk7298DNtV2fb18aqpjryBsvj Ogp49Rnskhj3vHC7xFDbuGCrWI6VMNAiws8k3NsY/iMNdGeesdNwMlN0NFN0 t1U/46DlYavh7aAd6G4Q6mcWGWKXGutdXBhZX5tWVpmQnhMqTA44W520sDkK MLn+ZG3poqh7uOJcaXx2VnhqYmB0hHsIx5Yd4eQRbmMWZqoXbqwWYXQ8Qv+D YI2T3vI47a+tHKKvJjDRirFUe4dN3tP/Tg+wCYSC0JSyCTEimNYLjzZR4LP2 2ATexDsAT+ipE+AJK9Y6vDaqdbxqdqEHbfL+mi44vf+rNV3XyGm3e+JAm+B1 av0fvY5r73xdgMnBNumj5gkDTCib7E+dUM0mmDRZ2bcOnr5+kX7ijdVKe5pN vlMvPFZzASWQFRATw7USUROcknW3FGEtU1dzIZyekWfydRND9eIROJVthCtj A9WS0QaQCDwOPggCZ7C7dHSgCm6HG4En2HJCdI4sDYJN5GOKF/qpDhT8M/ue s1nKJmsLg7vJEXnqBOv8yeFI8uHG9DNw6vyZvgXmQJuI+qro1VxwRgrxV21C QQYgADzpaS1trStoqsrFwOIu5El9eRawBW5srYOHyu9oLOxsOkt0wbdg9qSs q6kUq7ne329ycE1XaWZdGVHZVVGUUlGUDJ+ru7lE1Fd7oE3elTRBklA1Xbhp lOgFeLusi0qd0AZ2HWgTgGcfghQBsrU+/i6bUMtNMG9CxM75J8+vffH1/a9/ 8viLrx++/vI+XH75zeNv/uH51z/+9PMvn1y7caF/sAVsIkwIi4zjYstJVBw3 MjYEbBIXHw4n8Dyef4SAHRMVDDzJTBdmpkSkJoQlCDnx0UFpiaGFOTGV51Jb G/J7O0pFA7Xi0WaACWkT4luGbx9+CNiFhAEkgYDXCQQWAUJIRC3S0TZyIm4n JkeoZSWUTTBQInviYLDAJTwOPIKsf0E2uDgzvDQvmp8VzciGBvqaystyYmK4 3t4Obm5W3p5Wfl42Xu4WcMnnngnwtvN0MXOzNzzjZOLjag6XbjaGDmY6lgaq xrpKYBM3O6MQP+dIrjeoBCSCnSYZCbysJEFmIh94ArckC4Mg0uJCspP5xTnx 1ecygCeAZYBzf1vtYEc9LjcR9TbjhK49+03oMMFbIGg1XV0H1nSRm5WImq4D 8yYyURXYpKKAnxHnhQVdYBOOl2GAux7wBMPPRRd+aWK/Cba9h51hoU0iAiwE /uZh5C9WIccmY9cmreXxYJPxriK0yeWF7htkp8nOuujOxdG7m+NkFYT0wfUp iHvXpHevSrAjHuLBdRmY4sE1Gfji7pbk3pWpB9dmAB2Pby7gIkUye0L0wr+4 sw5CweXvmDeBe+4mWcAyc893Fl/cXYZ4dHMWSYJzgx/enLl7VQqXhzOED4/D 4/B4//Hs5tKL7RXshQeb/PdfPv3xs0sv7y6DTZ7cmCb+H9u1yfOb02ATrOkC m1yebr0sazkvqpB15k82pI9UJ3Sd5Vcmeufz7EmSmPK8jUI9DYLcGIEuDI4b M9BVz8dBy9VC2clU0d1aDVTiZa/l5aAd5Mni+psLwCYJfmXnYpqbss+WxqRl cxOygqvbcla2xq8/Or91b1G22N3cUZBXEJGaykmM9+MLXNkca2+enWuYtSnY JMxIjcc6Hqr3MZtIl5z01Tzpp3U6UFc51EA9ykwr1kqFsAmhjFMJ5icSzI8n mFM1XQfa5PTboRRrjjY5EcE6xjcgbMLRxjwIsW8xWPdjttYxsAmPRYwR5uh8 6K/xSZD2yV2bfBSoBTxBy4BNFCOMgSfGsdahVfz6kTLZQs/6bP9FcfcVae/G VM8FInfQswI2kXWvSbsuSLqIIV0LQ/KkCQkTYMhVcoYwwZO/ySbYIA82ubw2 saesi4IJnhivkDY5vzteFRMfGHKewJcHPCGGDPev7aZO3m+TZdrOOyrk46eo ToqFoXVigDAxU5dsEqfP6SJOR2UTcBoAZ5tgEzBIG80jb2J+qn15FsuxWuBU YXyourM5P0no7+1i5GKr62il5WrH8HJhcQPsIkJdBVwXfohLZJh7jMArIdov KSagIJN3NkdQViisLkmoKI4ryY8+lxdVeS6hoTKttS4bUAPGwfO68aHa4Z7y oZ5yuAJfA/Dk/DzxB3ayD6VvbVHepHDx/DDVoYD1YKsL8tTJbsDPf4iMwUUZ OSB3qmte2jkr6cAzcLK4CNsiiAIwasAyXIEfGpxgS0ebqZWLqAwILNOCIG2S j9FWn0dEXV5LbQ682d1ytr+jdLCrnIwyclNGbV97eWdTcVtdYWttAQTABFvj USgQRIN8dU5LLQgFHrMQR3iBTbqaSzsazrXXn+toKIGAK23EAOGi5poCuU0A JmTbO1nElQkYgaiWR0ZlcWp1SXrVubTywqSygoTa0vT2hiJRXzWcYy9MAWN7 sJOdmCQsPaCgSywiSTJST6qkDgN+MvttQqVO6DbZhclbe+HlpXR7bXJwTdfm GpEsA5vcuiLbvjazfW32xq2l+482X3959+ufPPr6J0+++vFjMp7++KcvXn3+ 6Mmz2+sX57p66jOyYnlRgWGR7NhkPthEGB8miOZExgQLBOywUB9uiBc/3D82 OgRskpockZbIS4kPTYjmxEWxk+OC8zIiywoT6yoy2hryB7srJ4YbJGNE6oTI nozLp5ZRdW4QOGIaBybgCwZifBAo10xmAQieoDgO7HZHm+xJmuyp9ZJ/CFxO 9S5ODywT5WEjy3MjS3Mji7Oi5YXx+WmRdLJveLC1q6Omu7Ouo7W8uCApNTE8 LjIwmu/HC/EMDXT1dDRxtzfysDdysWLamWiZM5VZWqcMtU5bG2n5ulkBTJKF ISCRnJSI7OSInJTI/PRoiNzUyKwk4ElYdgovN1WQnx5ZnBNbUZTaUJHTWlvY 20ok9QY76oAk4uEOzIZgroRKjtATKHuCrObCgq4uMm/SJgWbiJrJaJwabZwa a5SNQzTMTtTPETyhgrCJdLgCbFKez0uJdg/zNwv1Mw0PMA/zNw32ZrE9mP5u DCJciZquIPc3NpEnTXxMojnWkWxLgAlETLBtRrQH1nRhv8lYZ6G0v3Rpov7S XOfmbOeVhZ5bq0PAk+0NEbl+cezu1uS9qxJ6swnEQ/h1T9oE4vFNgMY8DukC nuwWdK1+urMGNnl5d+Ozexu4hPH+1dntS5KdTaLZBHjy6Mbsw+sz+OGPb87d uyp7dGvuyW2AyfzT7YWHN8AmU/evye5fP8ybHB6Hx+HxvuPF9nmwyTdPNn/3 00dgkz/+6vnPXl59ff/8Z3cWn96cwbKuh1cJnrzanvvs1syTK+I7a0M3Fno2 p1pWx2qWhkqlHbmSlqzByrjW/ND8SKdoL2aYh1GoOyvYRT/AXsfXRtPfTjvI Sc/PVgvCx1rD20rdy1LtjIWqp7mKs40628eUG2QTJXDNyQqtrk7u6irKzAlN TgvMORsxLK7buC7e2p6+cHViWtLc1pxTUCBISmPz4zz9I528BPb24dbWoZZG XFMGx0iDbaDsr6fozzjip3nEX/NYoPaJED1FgZFarIVmog3gQglwkWBxOsHi ZIIFwZN4s5NCk1MxZqdjzXc9QmRVFBItFZIsT70dCjFmivAIcM9o0xN8wyMh uh+SiZJTYcRix1MhesfY2scDdRS4+kphhnDlEz8N+AJO49rHUP0PA+RUwQHC EMAT+0SnoCJOUXfO+Er3/Hk4Ke1dm4afKhEbZPYEeLIw0z03Q5wywbkonHxu XZik9gAeGPthcpVW6EXdgvfED6H2LUJgBRH1l3ksJcIsCSERsscE4y2h0G4/ 0CbUAGHKJvRHgDcxlnc/FzUweWPXJsgTyibYQjIrIUZ0Tk8Sf5zEkA/GETdT MTXesDhNtLfD5Zy0dXKkpr0xOz2ea2uqaWemZW+uDZeWxuq2FtqWZhoWpuoY Zqbq5mYaEDYmStZGCjbGijbGSlYsRQhbE1UIK0NlU8YpA81jTLUjBhrHjLRP muormOid8nQ0FPI8z+VFD/dUwLku0GNxuuvCUv+lVZBI//n5nuXZLiqZsroA t/RhGRixrZ68TjXXY+EZtaKFDDwb78Hlg6vzwxcW5UO9cFsNvELgXB3OxuEM E044ceUiVaMFPOlpPdvRWAQn+Rht9YWIDmoyMJiiv6NisKtquAc+vA5sMtRd PdBZ2dtW1tV8rqPxbH15Vm1pBngEJwxjGgW3nzRX58FD4ePAneES7k99IqRN ez3RXw/3hICPgoeqK8vEwIcF7GBjS3lRfHVJUm1ZStW5xMrihPqKtI7GfPh2 4OwaU0goC6IFXtxG7dnEujvpWCOW5O0JzLLt6YjH4i5MnVAlhSRJqKBsAu/q w5ouBAiZBQNvDtBiiAp4743LUoDJnevz928t79xZu3N/47PX2+QYYaLf5OXn d19+fu/Tl3e271xeW5+RTA02Npclp0ZGx4UKhJxQgX+kMDieTJeEhfmGBnuF BHkGB3oIwv2T4sLTkyPhMiWWmxITkhAZGCfwT4nhwBl4UZawpjStuSanu6V4 pBegUQtGI7/x5l2atVLZImAa4biRBky04RKc4R5wSj255byNKsra02CC4qAS JXSq4HWqHgw7VsjOqSEIQPfu1pjBRWKp/fDytGhBOjQ12j3W3zLc3QBeaK8v qSnJzk8XRof5BnjannE0c7E2tDPTxTouIx0lpvpJhuoxUz0VbxeLWH4AqKQw M7Y4J74wMwa+/bPZxGVhZnRBZkReOj83jQeXcP1cXkxlMZGAa6nN72g4299e NdhZA59R1NtEFne1weWedfD0Oi50CtwBYmKwXQIeGe0gMyZENZd0pEU63DQl apKJGqdFjTOjjTNjDbPELvi6uYkGiNnxeoiZsbrp0VqZqAaitTqlPF+QGOHG 9TUVBFnzA624vibhAWYcL0OASaCnfpCnQYgXi+2qJ+838TAgMiZ+ZhAAEwiB vzkE2CQtyr0gOaA8O7ShOLqvIWOi+yzYZGGs9uJsx8Xp9q35boDJgy2iBOLe 5ck7l8a3L41tYx3XlUkc1fXo1gzVJAKygABl3L86jQkRLOiiZgh/urPbGk9u igezgFxw6yKZRiFmDsMlBN7yEF7/xDivmbtb03cuy3BX4/d94nN4HB6Hxw/6 AJt8tnOebpOfv7p2oE1e3p5Fm+ysDl2Z6Vgbr53rL5F15Y82pPaWCqtS/M4K XdNDLMEmET5mwBOOMzPQkQEqgSsQ4BRACgRoBUKOFBc9LtsqLNguJsqzuCiq qSmrtTU3t4CfksHJKuSPiOsv3ZRevi27eEMyMVLdUJOamRESHefFjXT2i3D0 jXS05Vpacy2MuaZ6YJMAfUUf3VNeWh97qhzxUjsRoK0Yoq/GJ5pNtOOs1eIs iZaTGNIXceaK8RZKCZbK8ZYAFghF8kYUimKiJcTpJCIom5wWEnsb0SYnBayj XMZHgVrf1SYnQpl0m9jGObDz2QWdWaPLXXMr/SuzPauy7k1pzyVpz7q0e9cm XWgTOF+CM09ABAWK/6JN8EEQJhhokz3N18TycZIMGHSSfEubHNgLv4ck9Pj7 2gRuBJjszuNqGR+qaqpJS40NtgaPkDyBsDJRt7PUsTLTQJ6YkzaBMDVRswab AExMVOxMVW1MVK2NVayNVW2M1ayMVC0MlM31lcz1lS0NVa1YcE9VsIkx46St qVqQj2VxbhQYATvogSQbK4Nri6CPnpW5bizx2k2a9KNQKJsgTN5jE/Jv+3Kb UF3z77IJFmgNdJbiAK7uliLKJgRM9tmEbGwnxgIDT4gtfr21gBS4DmABnmB9 F+CiqSoXkYKUQGIgT+ChyA6Ut2xCRD3xGeEKfDpcMQ8PgqiBh9pvk7LCOFAJ blqpOBtfV57aVp9Ltwn6gkDK5FsqgZCMNrzfJvRTdHpHPNUOT4NJ/99gk801 eO/IlY2J3SFdhE3uP7z0+NnVl5/vvP7yHtjki68fkja5/8XXj19/8fjeg2sL S+La+uIoYXBYREB4JBtsEiHkCIUh4eF+HI4nJ9A9KMANghfqmxATmpYUkZoo SInhJkVz4gQBMTy/xCh2VlJ4fnpk1bmUxqqsruazQ91EpSK8HrCqjUQK0e1O fbPYoYO1XqAYxCzYBGU6NgBmgXc1Q4hHDij02lPTRS8Ao2CCNsE8IMTK7OCb pZbTw2CTxanhOfEA2ARoMNLTONBRizwpK0iJE7ABJmZMVUOt00Y6iiYMZQPN U9pKR3RVjhvrKvu4Wsbw/M9mx1eezag8m15WkFySl1iSF38uN07Ok6zIouwo iLM50QCT8qKE2rK0pupcgAm8zkmY1MFnBJtAgIwmh9qRHvQOFHodF74pB8to 53/FJlMj1WCTysLIlGjP8AALsAmPbRnqJ7dJgLse2iT4jGHAbr9JCDmni+9j AjYR+JnxyJaTiACL+DCH7Djvc+mcipwwsElPXdpoRwHYZHG8bmOmfWO67fJc 163VofuXJ+G3Of5Cv3dFfO+qBNeaUPHwxvSuSqjEx/yjG3NgE8AF7jd5emvl yc2Vp7eJNArA5OX9dYxX99ex7gsZglvjESkY9D3ygBSI7/vE5/A4PA6PH/Tx 2c7qyztrYJPf/+Pj//hvL//4T89+8fr6gTZ5dk36/PrU463JndXBzanWxaFy aWfBbG+RqD61JS+sINI5T+CQGWYT62Mg8DbjuhkCTCAQJiAUfBOC7aALTsHw dtMPD7aLCHdOjPOpLE/o7Chsbs7OzAkVxnunZIeMSOo3b00BTJYuDg90FleX xqclswWRbhyeg7/AwT/SyTbY3CrYzDjYRC+QpeHHVPTSPumpccpDTdFbS42t p8Vl6fJMdQVmOhHmWtEWmlHmGpFmalFmakJztVhL9XgrlQSyyZ20CYGUeEvl BCulBCvkCSZQMNAmihBCwibHQvU+4ei83yZH2YRNFMIMTnGZH/iry21CFnRh WMfY+ef653VkihY7Z5f7lme6wSaXpESATVYJFHTNT3fNThNnEbi6HQSBKvkb bLIHJhRJ6IH9C8RsLnKPhnxxtrRrCc7ZSKRQsYcq3zJvgr3wdI/gIy/ufhZ8 5NXdmcl/L5tQ10X95XUVScnCICsjNRsTjbdsYq4pt4mJGqjExFjV2EjFwljZ nKVkYaRkZaJiZaJqYaxizlK2NFY3M1Qx0lMwYkAoGjGU4NKUqYA2MdM/7WSt FR3u3lyTBWfLM+KWpZnO1YVegAkGtbYPRxOjUKikCQWTd9ukl24TakvjfptQ u+DRJljT9ZZNdiu10CZoCtxaAhihbAIx1F0NQgGzwB1wtjBmPXA5Iw7vohrk wS/4aHSbUG/iZ4SAe2IPy3tsUl2SBDApL4qrLUsBm8C387ZNWsjSvjczCt6l ErpNqNQJvaaLOl3Hsi4gCbXfHNtb5P0muzVdtO6hg21y+YKIWry4fXX2zvWF +w8uvvrizs//6bNf/OrVL371+stvHr364h7A5Iuvn7z6/NHd+1dn5kbLKnIF kYFcvh+GIDooOjqYx/MHm3ifsfc5Y8/2c6HbhFzhEQgwEYb7JEQGZCSE5qYK qs4lg006m4oGu+Q2gcA+d/gJwPeLtXDwnWIHE50nJGnl+TIIRMpoP7yrEZFC dlW0kbs82jGlIhvvwNIvOkwwKOLBy3U33gz+Im0yNC8ZnJ3sl431AA3ACL2t VTg/oaWmCNwREeLlasMCmDDVT+goH4FgaSu42RqFB7qnxYUV5yQ0Vua31hbX leVUnoVXTjq8GssKEkvzE0ry4kryYyFKC+LKCuMrzoJzUxsrs+Blj8lBgImo t2G0r5luE8mIvGSLyo9g7wmVTwGVyMZ6ieFdY12S0Q7JSPuuTZr/qk0QJmgT 6XBVW00q2gRUsmsTU+BJ0BkDsAnbgxnkqQ82wRnCRE3Xbi+8wNeU52OCzSZR gVZJfOfsWK9CMm/SXBrb35gpas8X956T13TNdW3Nd99YGbhzcezhVSnRCH9t 6v416X36ZhMs67pKBG394sLznWWIZ9tLVE0X7jf5dGcVm03g8uW9C68ebIBN cGwX0oMyCKJmTyBSvu8Tn8Pj8Dg8ftAHwOT1vQs/fnr533725D9/8+qPv3r2 y89vHGiTFzenX+/Mv9qee3x54tpc14WJuuWRysXBkonmTLRJUbRLfoRjjI9B mAdR0IUGgUvMnlAJFHp4uTLBJjGRHlnpwc2NWf19pY2NmakZHEG0W3pe2NhU 09qV8cWNoRFpQ0ddZmWRMD2JHRXpxuU5BvDsfcJszXwNjLyZOl666h5aim7q J1xUjzkrKzopq7iqaXhp6/jp6bL1tQP1NdlMzRBDoIpWmJEWz1iTb6IpMIVQ iDJRjDZVjjFXibMAp6iSobIbyrQ5XXSbnIowOkbODT7QJoqhBnD9Y1/1o2wt UMkem5zetYmCwMhKaOuX45fbnoE2WZklarouSbovSrqJHhPiXL1zTtYJNsH9 13BmDuefVLLjO9lkD0zQJljHRbcJDumFT4Q2kc9WJeFACQVjfyblXTbZ02xC eYSuEogFSSdcUmVdfy+bTI03AA3mpHCG3ywdqx/uLa0tT0yKDrQwVKFSJ2AN uk3MdmECYWasbGqkZGKoZMJSNjNWNTNSNWWpmBurs5iKDK2T2urHtNWOaqke g2CofcRQ+5ilc9yIccKEecLHzSg7hTvUUwbnzIvTHfA1QCzPdgFSLiwN0GGC NtmTMcHZxe+yCTnMdnBtYQRtcun85IE2oY/nwn4TcrXim6QJxQSsxQI70Be+ o0r2BLwX7gb6AIYAJUAleCqIu+NBFvQECpKHbhP4QMybUDB5V94EPLI/bwLf EZxdYxc8ZRMqXQIqeQ9MIHarm/aWddG3nOBJ+6KMOsHuo2xC/uTBmH3wlOHy d3Lw2uCBNtlaJ8YIX704SUwS3py6eXkabPLy853f/u6bf/3DP/z6n7/68U+f ff7Vg69+/PTVFw8eP729dfX80Eh7Tl5iON+fy/MN4fkGh/uE8v3Cw/24XG82 283DzdrdxdLb044b5BkbFQw2yUyNTonhxkewwSYxPN/EKDbYJD89sroktbkm h8ybVAI30CZUZRd9Lhn+/QHeJGvbmnF6ADAEMALPNblVkyjwA6SgUMYGiPdS yRR6Twq91osKqoMeXrEYJE/kNiHXqQ+ATSBmJvqABpg36W+v6W6uaKs711hZ UF6YlpMSyfV3cbRkglDszHT5QZ55qdGl+cmttWe7muQLdOrL86qKM8ih02k4 Sq76XCoYDaKyOAkuASb1FRkttXnwCoeXN5kWrBf1NoJNQCUTg21UTRcyBK9g 0KcHU33xktFOiYi0yUibeKRFMtIseZdNxuvpNsGCrqmRarAJ1nSF+ZsDTPiB VgATHCOM/SaBHkyOp0Eg2aqJM4SxF57giZ8ZwIToQPExieXaZcacKUphV+Xx 2isTB5uzR9rywCYr4sary33XV/qvLRHrF29fGL67OUH+NpfeuyIhVsNfldwl u07kq+GvyUAlZBc8MQT4ya15gMmLu+c/u7eKyREiUXIPGHLp1f0NcMqb4V0k UnAP492taUyL3Lks274kxdQJdU9sqMc3v+8Tn8Pj8Dg8ftAH2OTz+xtgkz/8 /Olffvv5H//p2T99cfNAmzy9SrScAE8ebY5vTbevjddtiBsWBs5NtmS1F/IL Il0KIp2ywmwiPHRDXA3AHaASLOICm+AtABYIuA7BdTOE8PNkhQXZJMX5lp+L HegrHR6urK1NTU3nCOO9C0qiB8arx2daRFONLb1FDaWJZfmRGUlsYZQ7j+/s x7Vx8jPSsFFUtT590urEEYtjH0JYHvvA6tgx1kcnTI6ctjihbKug5qSi5qqm 7qaudkZLw0dHw5+hFaivFWSgyYGQd3+oCM3U4yzVE6zUdnkiF0rim6D6TYAn f4tN/NRwOSPdJpbR1j7Zvjlt6SOLHXMrcLbZe2Gm96K4a0NM9L+fl3SSNumY kXVQNoFTUKr+CpGyJ94PFuoWeo8JPaiJWOfnBvDPqsQ5DBmLbwvlwEKvA22y J2OCHtnPE/wUqJ7zuzOTicf5L9tkZa4bUydgk5G+MtImbLSJjYkG8MTCSM3G XAs7TYikibEq2sSIpQxvEreAUwyVTVmqoBIzIzVzY00WU5mhdVpb/QSEruYp PW0FPfVPtJQ+YGp8oq91RE/jQydrrYQon46mPDhnhs+OFWVwZW2xj/IIVc1F TR6mwwSnGe+3ydJ037e3Cc6JxYIugAnZCF9Ir+ZCKVA2oedNDrQJ3A53gHu2 1OYjT+BUEGwCQkGe4H5GgAZukKcnZYiPIqu5sNkE4939JnHVJUl0m7Q35FE2 IUhCzAFunpls358xmRiuPTAom+wO7GqlkiZ4uo48IYVCnVf3Yus9BNmN0ot7 bb6NTbbWx3Fa19UN4h/d9s7q/UebP/vli9/8y9e/+s2XYJMXr3YAJhBPn+9c 3Fxoba9KSOIHBXt6+Tn6BroGhXqxOR5+fs7+/i4BAa4uTuaO9ibAk2C2O9gk NVGQkRKVHBOCNokT+CcLg7KSwouyhHXl6a11eT2t54Z75JOBIejNJtT3S/GE /JHKhwmIR5oBIIARei0fuWGzAiv9QCgIE7yUjXfQW1Govng6VSibLM8MUHMG 5iV985L+BekQBNhEPNwh6m0Cngx3N/S2VrXWFjdXF4FQgB6Y0cCukOnx3uVp 0dr8xIJ0ELMtg511LTVn68pyGivz6suzgbpkrWA2YAR+FKCS2rI0uNJUnd1W nw+vcPk30lOPeRN4TPjU8Djw+OMDbThVGOcJz0z0z04O7F+8uGsT+KraxaRN xMNN4qHGKVHjfpvQq7mogi7pcFV7bVppLi+O5xwK0AiwAJsEexsBSag5XWx3 PbAJx12fskkoOaqLyJ54G3PPsOBdoV5GwmCbTKFncVpQXVEk2GSgKWu0o0A2 WL4qbb62QpDk5vlBsMn1lYFbF4bvXBq7vyUGmNwhl5tQLSdgExyxhTVdZFP8 9KMbc09uLeDuRWwqeb6z+uLOOnaaIE+weQQzJoARIAkFk1sbYqzv2mMT3Iry fZ/4HB6Hx+Hxgz7AJl88uIg2+Z//8gXY5Fdf3jrQJvcvjj6/PvXpDdntlf7l keq5/tK18drl4bKpzrzuc1FF0a55Aoe0EEuBuw5WcAXY6/jZau2xCaok1J0F EeZhxPY2AZtkpnJaGrNGhip7e8+VlsbGJfoK47zScrhldcmVTen1Hbm1bdk1 RTEl2fy0OL9ogWtYmINngKmZo8Zx5gdHmR98YEjEj1gf/sj4wx+ZfHSK+eEp /Y9OG36saHJM1fKUup2SpoOKppuGlrum1hltbW9dIp8SwNRl66vFWECox1rK I85SDeJtpGAoxcnHCCuRNjnK1fs4SPtdNjkaoAU2ORKgdTJE73SoPly+sQnP EFSCYRZh6ZXhldWSOjzfPrNEnJ2uTfdsEDbpXBN3rkg6FqUds1OETXDHHJyT 4ykoxne1CR0mVKBQqB0iuOsEPhHYBAdnEeUf7yjr2s+T99sE3kslTfBj91d2 4bv+7jaZn2qD28Emov7ymrKEZGGgJUsVbIJhzlKxMtVAg5gZq5ruJk1InqiY GKtBGLFUjVhwRcPYSN3IUMNQX43JUNbVVtDRUmToKDMZqiydEyyd48aMkyZ6 Jw11jthbqMdHejdWp8Np8+J0B352+ILRJvQuePQIPWOCa1beYxOcNgw22Vge J2FysE2wmoueNHljExpMKJvQe+GxnocKrPDBG+G9gBc4x4PHAWU0Vubg8C7s i6eCapCXC4VsNqHbBM4hIXDR/EE1XbH7a7rgO9pvE6rTBHnyHqHgPOE9qRN4 BDxXp3hCCoX+9/9uDHIKQQ/aZH156D02AZhcvUhs25TzZJ34h7Zz98K9h5c+ /+rez3752a//+auf/fIl8ARg8unLOzt3t6ZnReWVeVHC4GCuFzvEM1TgLxBy 2MEeLi4Wjo6mEHY2LGtLfWdHs+BAj7joELAJRGI0B2ASHeaDNslJ4RfnxNZX ZMJJONhkqLuCGg6MSRP6PhdMEtEDXTY11o7uAIPAM47PNY6GhtcG3DLaXz8x 1ESckI+0UKkTwAgmSg7sPcFXLFxSQwbgxjlxL9pkXjII4gAgYMvJUFc9pk46 GkoBJgMdtcAHqagLR2OBYmYngQm9cAkfOCceAFb0tVW31RW31Z1trS18k5ir zm6symqozISA6y21uR2NRfAKH+ishO+CtEnjWH8LmS4Bj3QAf+Bh0SNzYqDT 0OLUCARlE+QJBthELIKPavtONqGSJpKhyo669LI8fmKEG49tiXmTQE+DMw4a Xo6a3k5acCmf0+X2Zoww18OAS1Z24WaTMG9johc+hOiFz0v0w/0mYBNx77nZ kSrcb3JrdQhscnWxd2uh5+py3+31kQfEuGD5DGEcI4yThLHNBFe6w+XD6zPY CE+O6pLLQj5D+O7aq/vrrx9sgFCeba+gNYAkgBFQCbyWb1+UgE12NqfQJvTU CQRWdn3fJz6Hx+FxePygj1f3Lnzx8OI3Ty///mdP/vzbz//0609/883O5w9W X+yATWYfXZM9vCJ9eEXy+NrUk6uSl9tzEHcuDK9NNCyNVG2IGzcm62Z7z/aW xZyL9SyIdMoMtYk+wwxw1PWz1/a11fSx1fSz0wpw0Al0YgS7MEPcDLjuABPK Jiy2l1F4kHVBdlh3W97IQFlHW15hAT8qyo0vcI6M8UjN5GTlh5+riKtpSq8o iCrKDEuO8Y4Icwrh2Lh6GbKslI7pfHBU90efMD/4xPDDj40+/sTkkyOmR9RM T6hjmJ3UtFLQsVdhOKobeOjouWkz3LWYZ3QNfJmGfvqmQca6Cbba8bYasVaq 0eZqQkCKFfahaCRYqyVaq0MkWZM2sVSNsYBQi7VQiTY7zWcdC9H7JFD7KIe0 Cc8Q9HGUrX0sSOdUqP5prj5c/9hP/ZMAzRMhjFOhzBOETdQ/YmsegzfDDUAl mDoxEZh7pp/JaE4enGuVLRLnqKuy7o3JTmKhyWTHirhjUdIxByeoU0TeBG0C fPjbbLIHJti3QrcJZkzgyvrSCLbD45AuYngRpjaoTAdQgoxlnPcLQS49Ob/b cvJtarpWwCaUcWgJFMImOKoLbLIwuL5It8mbKcf7bQIG2W8TuAPcCDTAe8J9 xgYr0SYWhio2JhqUTSxN1AEmVFA2MdRXNDZSJW2iwjJUNTJUZRmoGDCJYDJU dLUVtTVO62gqwBV97RPGTAUW46SR3kkW45iVibKQ71lflTo10bQga5NNNEjH 6mbETasLPasLffTuEsQINphg4C3wPdJtAm/OSVCpcpuQA4QJm2yuivElgTaB 0288HaVsgkmTjsZ8iLZ6YEIBWVuV30IE2CGvjegQIbaT9LTC+Wf5YBc2RFdT JMF+EzQLNbkLLAOPAyeBmD3BsV04Ybi8MAkXoIBBMIFC2QQ7TSibYB89LnZ8 yyYFsZXFCcATyiatdTnfxibvSZ0gTHZt0kJN6KLzBIM8qUaY9FA2mZ/qWpTh 8po+0iYj77LJ5QuiqxfHr10SA0/IICdObE1fuiy7cm1u5+7a889uvni1/fmX 915/ef/Rs+vrl2Y7u2vSs2MEUWxeREBIuDcvii2M5/IE/n5+jm5ulg4OxnY2 BnY2ho52Rmxfp5jIwJT48IzkiAS4W7hPdJhXnMAvJSYoN5V/Li+2oSKjtS63 q7mov6MM9ypC4OIerOnazZj00MvVdkM+bks23gGn3MATeNLhucYyP3qJF2ZP sE0eeIJzhkEc9KQJ1RR/sE3IvAn2m0yNdoMOIMb6Wwc763qaK3taKntbq/rb aoAqcAUuR3qawCDdzZVwnUxztEhHO2cn+ySizpGehr42uH850ANelsQ4uNr8 5pqcpuoc8jIbLtsbCsBr8NLFJhoyafLGJmAfMiMzujIzBpdAkgXpMPAEkIK5 Eirky+IJm7SRBV1EpumNTUZJmIw2zo4TNpkbI2q6kCdU0oRuk+QoD1AJ2CQ8 wMLPVdfdRtXTTt3bUZO0CbHfJNBNL8hdn+NhEAxBdp1wPQ2BJLjiBCI6yDqJ 75wV61WaGdJ4Tjjcmjs1UDYzXIm98FjQhTa5stR7c23o7ub4g2vSh/IWeKLT BGyyszW5vTmxszl5/+oUCgVsgjBBmwBMcC/8pzsXXpJ5EwjgyecPL8IVtAmQ hLIJHSYYyBMIbI3/vk98Do/D4/D4QR+fP7n48uGFr55f/s1PH/yP33z2l3/9 4nc/e/zVo4uf3l56emMe4uGW7P6m9On1uSc3pp/dmoUArdxeG96caT8/Xrc6 VjPbd66nPO5cnFdWmF1qkGWUu56nrRrEGfg/1l7D10HLz0ELLnHGiMDXlO9t HOZhyHXThwjzNYkMsirNCe1tzhJ1F/U0Z+WnB8VFOAtCrIV8x/goV4jc9MDq MmFxLj83LSRR6CUIdQwKsHBxYZiaKahqf6Ck+aNTEFofKOp+pGZ4TNPklBKL 4ImG+SlNi9MMWxUDRw19B3VjVx0jF224burBsPU3NvdkOgSa6cc46Mc5MmLs NSMsdYQ2OrG2uvH2gBSteBvNBGutRBuNBCvlWFP1JCutcGMInQhz3Uhz9XCj 00GMk4G6gBGi2z3c8DhX7+NArY85OsfD9AEgRzg6xJuBWp+QuRV474cBGh+T c71OgmUERipRpmpCc+MIC/eMM+nNyf1zLdLF7oXpLmLZ4mTn+kTHhYmOVXHH kqRjYYrgCe6zWCOSCCJUCe5M3NMw8h6n7B/JRV2h24Q6/0ebUKO68A+qWPsh L/Ta7Roml0H0yVef0FpOqAXx9KXw8F55ukTctSTuXKSCLBsjkinkQ5HLOwZX F4cgyM0mIjgPh6DWr+yet7+BCQTChLIJeARJMidtBZ7MT7XBfcSi2oaqFDiL M9FTILrgjdSIMFEHm5gbqyFMTMhqLgzMpBDJFJaKiaGKsYEyXBowFMlQpgdT T9HQQEWfqaCvdxo+ytZKM5Lv0VyfMSMFH9XLJmpnpfVzUw0L002L051AEoAJ CAWuUAaBKwATzKQAT+BN+mp7wiZS4ie/W9A1vL40enEFnkHx5TWwpwSeR3ju 4EmBU26cuUQVdJEt8Pn0ZYu4bxGipTYbAt7V2VQAfgHFwP3ho8gF8XthAud1 OMILr3e3lLTVFQI9qIFdYBNyHQnRgUKtaJQ3yJOpE6rTpLEyB3myP2mCaZd3 9ZsAKyibkGs32+gwAYCMD9WMDVbDJcQem9B74dEmEFjjtIcncN5OkYR6zc9K 2snnqIMcaEDMhQaDgE3eDjDL8MbK4ObayNWLk8ATuNxaJ/6trV8QbW5O7uws Pv9088uvbn/9zZ0vv9p59uLavUcbyxfGSqvTeUI/dqhrMN+TJ/AWxrDjE4IT EkMi+N4ebqZWltp21rrBgU5BfvZ8rkdiTFBSLCcnTRAf6RPD94RIiPJJTwjK z+CV5AsbKtPxOYXnHZ5KgAlAdWygHudugSMADrtkeDPRl+pbxwFcYBOJqBXu j2tuqOIuKoGCoxKwTR54QlV2HZg32R0mAP9XDJBju4YhyGaTfoDJzASxYB10 IBnpnBhsF/U2D7TXdTdVdjVWQPQ0V/W2VPe11gx21A93N472gSbaJoc6pKNE P750lEhbAJHgS4WvBPN6OPIaO6pIDue11OaSwwEq3/T1D7WKh+XpGPgC5sRE 58uSTAQBKgGSzEz0U2vi6VOFUSjw2SWjbfDZJaIWiahZMtIoGWkAmEyPNc6M 1UEARubGASa185MN85ONcxMNcCNV0AVXmioSC9ODEyPcsKaL42XkaqXsaqkE vzd9nbT9XXQh/Jx12GATD30IDjm2K8SLxfU24vmZgU1AJRDCYJtEnlOm0PNs amBDcTTYZLKnWDZYPj9aszzZcHG6/cpCz83zg7cvDN9YHby20g9CubE+fPvS 6O3dMcLYdXLjgggCeILb4Xc2xXcuS3fLulbIgq7zz7dXn2+vYSM8BvbIw+WD a3PYbIITuuidJhRJ6AO7vu8Tn8Pj8Dg8ftDHq0frn947//rxxq9/cg9s8mfS Jl8+3NhvE1DJp9vzEE9vzNy9OHZtsefiVMtFSeOKqGqoNqUs0ZewSaBFtAfT w1rF00b1jI0ahLeteoCjNsdVL8LXLMrfQhhgKfS3iPY1j/A2EZwxjuYQ/7UW pgbWFEW2ViV11KXmpQREhdoGeRv6eeixvQz4IdZgk/rKuIKM0OzkoIToM7wQ +wAfUwd7LX39o6qaH6ho/khB60eKgBTGx6r6R9VZJwAmmuantCwVdKwU9WxV ACb69moQJq46IBRTd4ZTkIVLsCWEZbSzeZSTSaSDUaS9SYyTXoQ1K9ZBV2jD BKFEmytFmKjFWWoQCRQrFa6BWhhLK9JMO9JcNdzoFIdxIlBXXsQVbngihPFJ oNaRIJ2TocwToUxiFWOg1kdsTbAJ5krQKXCdWHHCZylFGANPjATm7umeYJM+ tImsc1naeaBNqFXplE2ubkj2NIzsF8rfyyZ0ktBO3rBlmNqj/ZZNqIosTKDA JeZNECZEluRvsckw3SZwuk4v6KJsQk+aoE1AJWgTuBtlE2PG6b02MTnAJoRK 4BaWsglLxZSlijwx1FMiQ+WtIGCiZKCvaKCvYGyoBDYRhLs11aVPS5qnxuuk YzUzkjo5T2QdaBAIuILr5sEgf4NNMGlC2YTcStmNNoEz0gNtQl8KjzzBpfAA E7hbb1txf0cJCZPyA21C/eUczwCJ9vbaAuxnR6FQPIGoKErG9hNqgzyShFIJ pkv2JE3ebxNa3oTYJEjMmBprojImABCACdoEPfKmEV5U/+1tMifpIlXSRcau x2Wd8AStzHWvLfahPrbWRzfXht62yTAGzhAGm1zfhGeHKLqbm+laXhq4eWPm xaeXvwKbfL3z5Zfb9x+sb1wU9w3VpGbxQ/ieaJPQcE8e3ys0zCM42MXXx8bB Xt/GWtfJXj86whdIkpEcnpnCS44LzkrhxQq8hDyPuAiv5Bj/rOSQwiwB2KSx KgOfU5AmPJXwSiC7ThpxDvD0RCfaBKf7UjaheAKaQGLAmT98CLbGU4V82DeE AxOoWdPIEyzuAqRQk7uoPhTM0WCr1O5U4WGyF34Q67JQKNPjvUAAoAcYBHgC Hulvqx3oqBP1NFNL26npvjOTByygR6qAU0R9dfDl9bSUdjYW97SW9LUDtytE ffIvlfghiPvIGHg7iFKu2cmB6fG+PYvg93TEEwOESZtIR1slxL7FJkya7LfJ wmTjgriJaofHsi7JUGVDWXx+alCCwDXExyTY29jXheFoetrR9JS7tYq3gybw BGCCSAGeBLoTffEIk1Af4zByNXxMiC389oRI4jvnJ/qVZAQ3lcSMtOVJ+kpm R6pWxI3r021bCz3Xl/uJ3Ysbop2LY2SMbl8a3d4c29mauHNFLG+EvyG7fXH8 5vooXG5fmgCe3Lsydf/qNLnqXV6LRe03eXoLd8SvYPMIlnthZRdmWPBNqtzr 0CaHx+FxeHzX48X91ac7S589WPvVj+/+6bev/vK7t/Imz24uoE2egVNuzjy/ PQc2eXZz5v7mxI3lvssz7ZekTauj1aONGdVpgYVRrrk8x+QAsyBXPX8HLS9r VU8rFR9b9UAnnRA3/Ti2VXygTVKwXQrXISXEIYFtLfQ1Twh3jA91yIw5k5vg W5XPb6lIyE7wDfMz9XdjeDtrc3xYSVGuxTncyuLI/NSQjHj/GL5rWJAN28fU 0U5Tj/GxlvZHGtofqup8qKL7kareEXWD41qskzoWp3UtFRkAE2tlpq2KgZ0a hL6tiomzNoSlh54Pz5GX4p92Lqpd1iG9MlXaX+Gd4Oce7+0Q62ET42abesY8 0ZURba0VZakda6Mdb6sZa60VY6kptFCPNlOJMFHgGZ7g6h0PZhwN0gaMnA43 gOufBGgeDdQ+xWWeDtMHqhwBjLA1j4JWuEyFcMOjHJ1jHN0TIXqnyDyLEt9I WWDM4pu6prqnNib2zjSJ5zvBIIvi9vXJjm9vEzpPsGfkXTzZAxO6TRAm77EJ dcKG528414g20ehN9mT/tC4Mqt/kTS/8d7cJub5tcI9N6KmT/TDZbxPJaF1j dWpqLIeyiSVL1dJY7V02IfriWcpgDRNDZYSJkb4SiwkwUd5jEyOWGlMPYKJo qK9oZKBobaEBNmmoTZNNwietEY9WySZrpsW1IJT5qfYDbQJXqMaT+akOePNA m+w2m8htAjAhbSKm2aSZsgnVbEJWc+XiKSs6hRIKBMIETmUpmOAOvgNtguX6 WNklH9tFlmmBO3CqMNqkJC+ePr+LvmaRnivBxvlvaROs6cK5UhIRsTRQNt4i GZVP6EKYjA5UQaBN5CQZbYAgZnmNHmyTg3gC/OmkbIJJQ3heyIKu3gtL/VTD +76aLnhziG4TiK31Cfj3dX5xQDrRJBO33rw2/frV9c9f33z0cGNzUzoy0nD2 XAI/wisoxAWCw3VlBzr6B9h7+1h7eJg5O7HsbPUgLMw0ggIcIsO9QCUp8SGx kf4JwkAhzxNsEh/pnRrHzkkNPZsTWVYYe6BNxCPN9JlaABAqb7KHJ8AW5Anc GXkyOdyMp/o4QZoKaiEOvQkFz9jhA1Eou0jpQu7NS3uoIcML0v55ST8FE7QJ nPaDPoAhwJOhrga4BJXsGeSLQJiXEMMKqFX19N30mPQBhoCbSD3VjPbXTgw1 4A8B7kN+9gEI/Ozk5wVxdMMVbHjHdAkO7KK2Mb4VInneBG1C1Api3mRUbhOS J4RN5iYOmNM13ldaXxoHNonjOXO8jNgeBu626jasY7asYy4Wip62asATH0ct uAShBLgywCbBZwxBJeF+pjx/M9xsgjaBy2SBC9ikMjcc+03GOgtlg+VrUy1k L/zIzrrozsbo/c3JB1ckRCP85vjO5fE7NJg8vDn96NbM41uzD69P37sixTHC WNNFtwn2m3y6c4HoOiHTJcgTdMr+6++yyWG/yeFxeBwef/V4fnflyfbip/fO g03+/V9e/+V3X/7bL55+/fgS2ARg8vzWItrk+c2Fx9dlyJOnNwib3FzuB5tg 3mS0IaMuM7gswbskxjOLaxsXbMvzNg5w0PayUvW2Vg2w0+Q46sSzrZM4dhlh zjkC92y+W1qIQ7y/VVK4UzLPOYXvkhHpXpkT3lQSkx3nHeLFIvLXXoYxYfZF GZzKQkFpblh+Mic9xlcY6hwWYB3oZeJsp2Wkf8zA4IQe86gW4xMNxiea+sd1 jE7pmSkxLBQZlop6Vkr6NiqGdmose3UjBw0zFx2bMwaOfib+AufItMCssljx St/v/+PXf/p//3X58kxqUXx8gTCpLLF8oKJ3fahqqjG4LIIVYasfYWOW6GIg tNNOsNGIs1IVmitHmSpFmpwKNzgWwsD29pNh+keDdT8K0JR3u4cwTwYzjgfq EIvpg3RPhTAVQw1OcBhwI1wn8ixhBkrhhso8I0MeYZOUhoSe6abJuY5ZaTvY BPtN1ic71yREGoVoPZB17qnpwgHC9FlbVDP7gdmT/TDBB9mTNHmPTegqwWE+ bw9c3c2evN0RTzWe/BfzJrsFXcMIEwg8dd/TC78fJjgdC22yIGun2STYSPcU 2MTaWB1tQvXC77GJMTk9mOCJgRKoBONAm7AMVQ0NVKi8iaWZGtikvjpFOgGn zdWTosqpiWq0yYKsA2u6ICibQMAVeLqxI/79NlmdHyKbTcbQJlsXpFsXxPA8 ok2ko8243IRqhMdmk7+LTXAzI3Uj/i2dGEpMFnfVlxNDXHHHBNqEPr+LGuF1 YHwbm8DXNjncgBsDcZ8gsdZ8FybgEVCJqL8SApBCt4l8Acpo07ts8m6evBne tThN2OT8fA/mTRAg77IJsEWeNNmY2Fwj/omtLQ4sTHdNTTSPDdV0thZUV6SU FseXFiemJoUIBGeCOU7cEDcOxwVgcsbL0sPTHMLd3czd1cTV2cjRwcDGUtvP 2zo4wDEmwi8plhMfzQakxEf6AEwSo33BJrlpYSX5wuqSpKbqzD02IXvh5WVX GNgbgrVV+3mC5/xwN+QJJiOAJ/B0Uys1qRnR8ALYncpbC/fBDhRcg0LjSQcG iRT5/K45cd/sZB+VMYHAbnc48weMjPa1YK5kfKANd45QKxExqLwJYITK15BF Vq3YCAM2wZgcBjTB8w7PdTtVbDYz0TM93g2fDkiC5WTi4Q7yC+jFjAm16IT+ 2amYHGmdJKcBgHcmh+FTNEwO1U2JkCe1cpuM1YJN8Do1pIuySWN5AtgkNtwp 6AzL14XhZKFsyfzExvCok9lpDxtVL3sNgAkKBXkCvxO53kZgE36AOd/fLCrQ isqbJPKc4PdmWRa3oTi6uzZ1uDUX95tcXui+vTYMNrl3afzRFWK5CfDkzqWx O5cn7mzJS7kwaQI8ebpNtMADTO5cFt/dktzdkt7dmnp8cx5sIl9ucnftxd0L L+6sv7y3Tm2Ex4IuqsSLCvpIrj02Qel83yc+h8fhcXj8oI+nO0tgExAK5k3+ /K9f/OGXz755sok2+fTW4qMr05RNnt2aBZs8uznz4PLkrfMDV+Y6L8tazpN5 k/qskPJEn3MxnpkhNhkCt8QQe76XcaC9tq+Vmp+VGttWM4FtnRJsnxPumi/w yOO7Z3KdkgNtk0Md03guqeHOOUKv2nxBfWFkVrRnmI9JOLlbKi7M4Ww6p7ow AiI3MTAt2js21Dk8wMrXzcDRSs3C6LSZsSLL8CSDeVRb76gOOMVEwdBChWGu AKFvpcyyUzdx0DR10rJw0XX2M/UKseVEu8dmhcRlc9OKo1auiP/jj7+BWD0/ lZOfWF5TMHdB8k9/+Omf/s8f/vC/f/+TP/yD7PZMREmUZbidTYSjVqS5Ot9E JYylHGqgxDU4xWEc8dM86q8FV05z9Y8H6Xzsp3EkQPMkh3EqiHEySPcEWwfi ZKDuaY6eYggTbiSuBDOVQvSVuQYqoYaqYSwjvplbmkdaU1LfbLNkoWuerOna EL9lk0XSJniufoFY9iHCiUz7MyZIjHe1n+xPstBhQiVN3m8Tiie4vm132iq1 rk4+sGv17a4TyiY4Rvi72oQGkyFqZz22ilM2QZ7shwk1uXdpBpTXDneT2ySO sImtqaaNiQbYxMJI9V02MTJQRJsYGYBHFCDAJgfWdOkzlYyN1Mh+k1Nwfytz dbBJbWWSeKxucqQKbCKbJMq6yJquTsom2G+CBvmWNjk/N/gum8DPB54ROPfG AcJY0IU2oYq44AplE6r3pLOpAG1CazYpP9Am9EFeVGE/0X28u5ARiIG98FjW tSdw9wQ9XfKdbAJf28RQHbmMowX3CUpEjViyhW0moJKRvgoI5AncSKxcJG0C +jvQJvQtJ9TrnDyL7qTzhBDKVCeZ8CKW1KwvD6BNLl8YfjuIrYtks8k4wARi ax3+lRH/xOAZhKcVnmL4ejqb888VCNOSOAmx7OgI75go36gIb374mUC2o6+P tauribOLkZu7qYeHmae7mYebKdjEylzTw9XEx8MijOMaxfMGoaQmcFPi2Mkx /imxARmJnIJMPvzQ6ivSWmqz8TmFZxOeR1Ff1fhgLVZz7WlUp9uE4gnmTTAZ QZ32g1DgbH+4pwY1Cs84BNqEyp4gWqmGDvr2k5nJTvyRkqkT+Xzm+bfzJrs8 6QUXgE1AJVQRF1VMRQ+J6K0EDX5r1FdL32K/NN1PLX+E7xe+R/jWpkY7pkY7 ASYIIgh60gRtQq1fpBI3VEwMtUyQApoYapoYapgYrJuAHzKROmlAhqBNZsdq ZnfTKFjohTE5UN5SlQw2iebasz0MvJ10HMwULJgfWxscQZugSiAQKb5O2mw3 vTepEz+zaI51XKg9wASQQqyGj/UqyQiuLYzorE7GMcLTQxWr0ubL893Xl/uB J8RAG1y8uAX0mLxzRXzn7RUnj24Sc7oeXJNhPLw+g43wT24t4Bb4V8T+942X 9y6+frDx8v46wgSzJ/KKL1rGBONdeZPDGcKHx+FxeLz/eHRrHmzy7M7yL7/e +R+/+ezf//nVv/3iKdjk+a1FsMmL20sPt2T3LkkAKdgLT9Z0zVI2uTbXsT5Z P9ma05gTCjbBvElOhEcmzzU5xD7G15znZhDiqBvsoJPEtknl2ANJskOds7jO WSFOEBnhLhDZUZ7FSezaXH5VTnga34XnbRzuZRTqZZTMd67ICastiqwqEBQk BiXx3aODHXj+Vt6ODEvWKZbuERPWaZbBST29o7qMI7rM4wzDk0xjBT0zBT1z BZaNqrmTtrWbnp2ngZOPsRfHOiTKnRfnLUwLTMoJq27Nffz62v/6zz/8zz// 9+U5cWIsb2lh8i9//v2f/5/f/5//7z//9//99z/+5V8efb7TPdGaXpLISw7m loSHlIT75wU6JbqZCawZHJaqj7aSt6ZaAEM9kKnkp3PKS/2Ut6ZyAEMhiAEq OeavddRP83iANqgESAKXCvtsYhhusps3aXyTNznIJoAFhAMIAilBmYKCyft7 T/Zb5sCkyYE22dNpQv1tmfqTMpU92T9MGFMne2DynWq66DbBpAndJvTUyX6Y YOyxSVNNGtiEpXPyW9nEUAl4AsHSV2QxiQCe6OsqMHUgFN8KBjBZ1UBfUU/3 JNjE3kYbbFJTkTg5Wgs2EYuqiGouWePCdNM8rd8EFyziX/XhCjWwCwcIv8sm 8NNAm2yuikmYQExSNpGIDrYJdr4f2AsPWkGeYL/Je3rhcfsJ/U08NUWeNFfn 4Vhg3BdP9cWfy40rzok9mx0Dt1B75Pcg5dvYBL42OM0GTQAucG0H2ITqfx8d qAKVDPeWY1DZE7Go/j15kz1LGHdf3kRB1y5P5K95eArInFcn3SZb66Kt9RFa jGJQNrmyMQE2gX9ZV9bG1hcGFqUdy9OETMcGa+AbTIxhC0LdovleUTyvsBA3 Lw9zF0dDBwd9G1sGhKWltoW5ppWltrmZhqebaTjXHVQSH82OjfSP5vskxgSl J3BAJZlJwblpYcW5UfCADZXpONkAnkp4EhEm4DhSB/IGEGpjO9pkD0/gvVSV FNoET/jBGuAOHNGGG08wh4IvAHxhYH0XEAZLvHD7CQkEeY0cOYq5Tz6/Sza4 ODWEM4TpPMGyLuQAtYr9gElZ5EJ2tAm1lR6wAJ8aV9vj7Gt4oY4PNkhEzeIR QEQjpnWI9ZFDLWQ7fIdU1LVbzSV/ZCzogs8+PtCGRML0DW4/kfNkWJ6dkdtk qH5yqE4qapCJ5DaBQJvMjO2+uQuTuYkGyVBlW01qbjKbH2jl68LwtNO0NzmN eRNncwWqHT7AlYFC8XPWeausy88sKsgqlmuHqZMkvnNuvE9lLlF4ADCZ7CkW 956TDZYvjtddnG6/uth7e2343qVxUMmDK2K4vLM1gctNIG5vjmHgOvgnt+Z2 t5wQQ7oeXCMmCYMmQBzAkM/urr8Cm9wnbPLZXXlTPAIE7kM1nuBQr8OarsPj 8Dg8/ubj4c25x7cXnt9d+fmXt//tV8//+N8++8Mvn/3k2Rb2m8Al5k0Im1yX Pb85++ntuWc3Zu5fmri13L81035ttv2SuHG6s7C9MKI6NaAsziuf75Qf6Zkr 8MjmuWWEOicH2cX4mAncDVOD7NI5DpkchwwyACY5oS5AmCy+W3G8f0V6SE0O rywtOCXMiYtjEv3M8hP9mktjG4qjSzNDCpM4caEufH/rUB+LM/Y6ZszjTPWP jQ1OsOCK3lEG4yhD7zhD/wTwxMBCSd9C0dRew9ad6eRt7Blo6R/mIEwlSBKX GRydys4oihRNt/3jbz/7z7/8/tOn2+1t1akpkb09DU+f3Pzqq8fffPP45s3z 80ujvf11RcVJWXnC4vK0jvHq3qnGTkldeXd+crkwKMPfKdKe6cdk+usz2AYa vroKnuoKXhqq/rpKHOapAJ2jPhpHvdVP+mspcfRUQvQV2DoQyhyGaghTjauv HmqgGc4yDGO5JDkl18V0SmvGZ1pkcFI90bJGLje5IO5aE3etSrrPS4kAL+yx CRXvgQnFkwOTLPRKMKqaC4OaIfx+m+zZkrC4O1J4z6KTPQVduGZxabITbbIk 6YJYlHRRS+Gxs56wyQJpE+QSfFULWNDVvzLbt2sTOGlvnRHDCTzBk1lJM6kS DDlMpicbF6fRJm24frGhKiU1PthY77StmaaNqYYFS8WMpWxJbF1UNTVSNjMm eEJUc5EwMd61iZGBEpE6YSrqM07rMxSYuqf1dBQY2grE1kWAia4Sk6nI1Fc0 MFBkMk8Zs5Qc7HR5YS6V5QkTohrxWI0ETlGk9fMAk+mmOUnrIlGnBz8xOFeE 82FiBK5svHlmEr7gjgVZF8T8FDEVanqyFW4kLsVtc5L2eSnx0yZtsidvItlj E2qAMDbCk2tN8qjOd3p8pzldENRmRqzvQpXAaSpxpZEYKYyVXdh4QhV3gUqK soQFGVFwHau8sE2e3N+dRjWeUDYhXPOOvAmZAgBfNGPeRDzSQNkEkyagkqGe MriE69h4gqkTst/k2+ZNyDaT7lkxwRMqYwhPATw1K3Pd1JCuKxtj+2wiIjfC g03Grl2ahLh6ceLSqujC4tDiVOf52Z7zs72LINCpzuVpYgLexEhjd9u5zpaz rQ0FlaVp8UK2t4e5jbWOqakqi6XIYBzX0T5qqH/axEjZzdkoLMQ1JsI3JT44 OS4IUANXMpNCslO4+Rm8szmROGm5sSoDnkp4HuFnBT4lO00a4MdFZUzILe3y Lvg9NsG8CdXEQbcJNp6MDTTg/k3MksCTTq0+QZ7QF3eCEeDUfbeyCwu64H+S N3mTRdnA4tTAgnRwTtw/Owko6Jka7aL3elA7EKmtInSbTI93UX33VIBWsEGG ajYhd7JUjfbXjg3UQQAl8EsCm4wPEBvhqeUmJFJ69sBktK8FguLJm86XEbBJ i3i4hRz51Tg51DA5WCcdrifKukS106LamdG6GYInNdO7dVzyZArJE/FgRWt1 SlaCX6ifmbeTjrutur2pgpX+EaLfxFLRy14DW+AhcGBXoJtesKdBKDGhy5Tv b4YzhKM51sCTRJ5ThtATfleWZ4e2lscDTIAky5MNcAlxea7rxsrA9oWRnQ3R 9obozqWxe5cnibwJuXsRSHLr0ujNiyKI7Uvjd7ckIBQs67p9ceLWxsTOpuTu 1hRO3wJfPN8mdi++ur/x+sHGq/vrL+6uUeVbe8YFUzVdBE8QLzg9+Aa5ivHW Yd7k8Dg8Do/3HQAT4MmL+6s/++LW73759E+/efmfv339i1c3X2wvP7o68/T6 3OOrMw+3ZM/AKdemX96cg3hxbfrRxsT2Uv+1mc4r0ub10ZrFnnPDlYnN2dyS GM/CCJezEWcwCvkeeWGuWcGO6YF2uaEuOVzn7BAnDLgRIpXrWCD0Lk0KrMvh 1+dHFMT5JobYC3xNI/3Nk8IcK7JD2yoSagoEZ1MDM2N9Y0Odwv0s2G6GLpZq VqxTVkanzVgnjfWPG+odM2AeMzQ4YWh4ytDwtKWDlqm1mqO7gU+QNTvMkR/n nZDJjUkLSsjiJufzUgsj8isTJpd6H315Y+fxxbbeipgkTkxSUFlNRu9AVW9/ ZX9veU9nSW/nufbmvPqK1NrypLqKlL7ajMnukiVxy6KsbUrS1D9eU92ZG5oT 6Cp0NOZbqAfqHfFUOeKjfjJIV5Gtd9JX+4in2vEzasoBOuocPbUgXVV/TVU/ dZ0gbf1Qhl6wNiNI0yCUYRXGOJNglVUf0SUuGZ9rkM21yGTNs9K2eWnHymTX hcnezfH+62MDN0cH14ganmHKJpQv9idN9hRx7WlIoQdVyoUwwZ2GVNEUxIE2 oRW9tFM2oXiyvJs6ObAX/q298G/bZElKW55CDf6aHzi/MHhhSR7UykKIBVkn 2QtPLSVsI+dcQTTvianxuqWZ9sXptvmplhlx48RwZV1FQnyMv4mhgo2lhrWF upmxkglLwdjw/2fvvt/autOE4e/OJJkUO44TJ3E3xrjSe+9gem+m997UC0KA RAdRhHoD0YsN7t3gGqdNJpPpZXfazuzu826ded4/4L3PueHrY4GdzJZ35gfO dV+6hJBtIQl8Ptxt56nju+HGUw67z5x8Dy5PHNt1wn4XnBYeO7rr+LF3T9L7 4u3t3jl8cAdc2h16++D+t/bvffPAPqDKO/ZH9hw9tnvfwTcPHdlx7PhuB4dd zi4fRkc7sZqylKMC67jcbJCaDJIJcxsIxapun4GX2NA9qZVbxtrMY+3j8HyO dZhVMizIp07ejP1W0wA+7WRFIK65wc4jmwI/CKrbenwQ/gici2IjPESfrLGz tYZkTGzGczHndBGbkLwJ8Qgz8LwUF17AiSielOKv0PG36DJxHe5bJNkTVk0u 2KSuLKOmJK2xMrupKmdLoZCMycaGlK3ndIFNdKOtRhWYoh1OubGmi3TBE5sg TGyb4ke34MmWNmE0VsMZr9yogrNZamXhpKkX3ofL80pq2/t5DVzSRVzrBV1M pFw+r7xyAXgydmmJmjO8ON0/ZX62woaeeNBHV0LCWXovXWs0BHDoENWmxvqf Ob770L5X9n/wrX3vf2v/B98+ffydkIDj6cn+hblRFSUJ1WVJtRUpEDXlyfWV qU3VGey6bEFzPo4OhmcJX0TAKRCVbslpM6k7sNEDExYAEPDI3MQIqsSmC36j 4OpZTRcE5hrAJjhSGFMS6FN8G+CrjwFagdvhPjgUizSeEBxh4gb/CRLYw073 pPfazMgCiZC9h88SKKr1HhMM0BMEThUb7RfjMGGcJDbUwxvu5Y/0CZQDYrgD lTQZbqPWJg7LcakKCSziwhQJwmS0r418iLOL8T7aIZl2qANCo2jXKKTawVbt QItO0aIfajEOtZiGW8yjLeOj4vERyinPqrzopAmEsrdJ1JRVkO4fHWgf4nXA 13mPx8ldZ+xec7T/jteZXYHuH4T5HIj0O4z7TaJ8Dp31OxJLL4VPCnZIDjme BBF6Ij2aquYqTPUpywqsK4hoLI6WNGYMtVfqB1izOunl6f7r88M354dv0e3w t5eUt5aUd5ep7MnqFT3uXrxzSXtzWXWDnid896IWu+Dpgi4T1nStXjbdu2Qk m0oeXZ9+fGP203uLn9E2wS0n2HhClioy4+GNmUc3Zx/SPKFscsP64MYExl/6 xGf72D62j7/qg9jkJ9+9jjb5t9989ovPb2y2yUeXjZ9ct3x6Y+Jj+Kl1Xn17 ZvDaRM9Vs3xFJ50d4g7x81rLY5uzA+rTfRAm9RApAbXAk0TfqgQfiHWbwCV9 BWxSEONWmerflBshqkwSV6dUZQZlhJ/OjHJMjzgNNuGUx7Wzc8Am8FO3OD0g O84jMfRUhPdhX8c9rsffdj62w+HQa0cPvHLkwKuH97965OB3jh55w/7oW2e8 9jn5HAyKdozP8Es5F5JeEJ5RGJFeEHGuLKawKrG8Ib1JVDhmkV+6Y51fUHV3 s6ur0utrM9taa3rkjV3tdZ2SKpm4opVbKGHnS5rzWhrPtXMKu1h5CnGZrrfZ PCowqcVag3RYI2qQlSRXRbumOe8L2/+W7ztvBb63K2zvO6H7doftfyfkw11B e94N3rM37IP9ER++57PzQ7+dR0PfORX1/pmoPacjdkP4xh6Kz3dvbMnoUzWq LWLzRIfF0jGhk03q5LOa7nlN75Km/4JmYFk9ME83m/zP2oRZx0VgsqVNcL8J nieT3yFvLuti2oRsYHyhTeiarnWY6NaXzjNtQqVI4MG8wCYbvfAyFMrGfpAt bDJt6TRpJBadFK6AU0b6m2WS0oKciGOH33A6+a7zqffw8oTdDsfju884vHMS kHLs7dMOu07Zv+14Yjctl10ORwEvuzCHYndox5EDOw7vf+vg3jcO7n3z8P6d dgd32R/ebX/47cP73jh2eOcp+90n7HY6n3wvIuhkfXniSC9ryigb10gMSr5J KdAPc/qkVb2SSoWsQasQTKjbJ7Qys6rdNNZupgGCNflWeNpNffCUwtOLDT70 L/O74OX45jbBrYvgEThlbROWk4Ku/w2bYA8C9sV3iKlVJiR7AgwBj2DeBIQC V4AqcAvplMc2eWKTl+RN6B2CYlxrgl0ncN2m2QRgouhhwXWAiU1HPFm8yOTJ N7cJ3Bne89OW3sXpIeDJysIYHcP/VZvgW30AhxVPGqlsgmqwVcwuA4kcPfT6 +7v/Zs+uv7U/tCMqzLEk/yyrPpvPyuc158GVptpMiIbqdFYdtaESniWACbyO WJgHrx0gDmCy8Vx10N+qPWTbyJ9rE9zDiPVLyBMsmkKe4OoT5AkKhXTHk+Fd pPKKtOFjxz35h0iHvoXKoQzaLGEna9mZN5rUz+rNiE3gX0SVkJYoOolDwWS0 Xzg2+F+xCbOmC1MntE0ITCibaAYlL7fJs8HCtE1GuhsEDRn5aX6R/nYBbh96 nn7H1WHHadomnqffDnB7P9R7f4TvQSp14n0QbBLtexhskhh0DHeEJQY7xAcd Sww5nhHtlJvoUZoZUJsfDv9LiuvT+lpKRuU1RgVnySynxgUvjoBN7iwp6Zou DQWTi9r7Vw33rxlxKTzwBOu7mDChd8SPP7w+gYG9JFRH/O35j+8sfnx3gdkL j+3wD69Pgl9s49rk/Wu0SqhcydTDm5OPbk3C+cbate0ZwtvH9rF9vOx4cGMC bfLjz68Rm/zyuzc/vTP78Irl8bUJtAkg5fFl41Owyc2Jj69bHi5rb04PXDJ3 XoaTfFPH7Ai/n5sjKIlsyg5ozglsSA+qTfGvTPAuj/Msj/eqTvKFD6uT/Ojw rUr0rUz0qQSqJHiXJHjVZgbzimPFVcm8sviyVL+00JMxvocTAu2Lkr2FNSly Xh78vG0ujTkX554WcRp+UPuc3u3msAN+krsc23HS7vXjh187evCVw/u+dWjf t48e+s5x+x1O/gd9Ik+cTfdOKwzPLjubVRKVkhucUxJdWJlQVJVY0ZDeyMuT 9TUOjAkHutjtokpOXY6wOb9HWqvs4eqHxJPqdnUPu4NdIK7NlNRlSmoy2uqy uxuzOuszejjnBltKhmRVit76wf6Gak5qSmGgV9zxI3573nPf8a7nzvd9dx+O PLgv+IPdXjt3e7xhF/p+6Dmnc80RdZKUCk5UQYVnVv7p3PxTxaVOZeWu5SUB zY2xcnmhUtVkMIvHzVKjTjypbZvWdcxqumZ13XP63hlD/4yxf+4FNtncb7Il TF5uE2wwIUkTtAnCBG3C5Alph9+yrItpE8DIiwYIUzVdABPtOkym9T24Gh7X xOPAZOqRWF9oE7r5Qs5sGKc7MrawyaQJbm8DnuCH+jFRm6iooiDO4cAbLif2 +Loecjv5/onDOyDs972OV04e2XnK7m24dHJ4l6rmOrrLHkhyZOeRQzuo+cD2 u48eecfu8K7DB3ceOgCx68jB3UcPv3vyyLsOB94+dWS387H3z9jtdj2+J8zb oSA1uJVVoGiv6xKWiuozG0viSjOCy7ND64pjxM05Q531JmWLRS01KFtMY1KT Ch4nnEZS+ZEJ2ia4XAbHUqFN4En+s2wCZ6poE6mgDC63LOsiNmHuN3m5TWx4 gqemWN5Dfn8u5VeR1ngs68LUCQoFeYKzvAhJmPGi/SYqBbXenTYFBRNmvwl4 ZLiPAzCBwLwJWXSCPNGO2vIEN6Rs1W+yhU3QRMAKeDdemBslNlmeH9rMky1t ghtS1nliwrf6IGiUnh/VjZN14R9tFZaHBZ388N2/dbB7Ozs9WCat6etsUvRy emQNrcIyAbsAkMJtygWkCJrz4ZnBocHYYwIvHw7mIk8UvnPoBfd9ODqYbBgh NkGY2NiEOQKL1ErhikMIQAomUPBdgWsZiU3gQ9zADljADfJkchcahFSO4T/0 LKViGMad7LiWHQO0QsBCeGLW9DBb9bH/HR8VsxaRXhNJwWSjrEuyzhOQBRVy m0CbkGousAkZF0baT6jKLgWBSZt6sFUzINH0i3UK8WabmJ9PmkxoWiGGOuv4 9elgkwi/I75Oe9yO73Syf/P0kVfBJh6ndvq77gnx2hfmvZ+a0OV1AP7Xo2zi b4c2SQ07mRDsAFSJ8bdLCj2RHedakuFfkxcGNhHVpSraKtQ9DRD6AZZ1TLRo 6Lhg7rw40XNtdhCocndZfXdZBTZZo9fBkwCe0HODTQgTuutkgp4ebKUDBwgD T+ae3l5gkoQE6Shhxv2rk2tXgSdWpk3wlOMvfeKzfWwf28df9YE/KJ7em/3R Z1f/4eeP/vU3n/7rrz/9++/d/uzu3CPwCG2TtRXDoyuWR1eMT66ZP7k5AfHg ku7aVP+itnVJK7lo6oDLkZailsrYptwgVl5wfWZwbXpgdap/ZbJfZbJvZYpf VYp/CTgl0bs80ac03rM41r041qM0wQtsUp8dKipPBJs0FUQVJXqBTdLCTxUk erJLY2WcXBk3l1eVCD94z8U4Z0ScivE7FOj0nvepXZ4ndroce+Pk4dccDrxy 5MO/3b+HCrsDr5ywf9MjzD40yTUu2z+1MDSzNCqrJDI1LySrKCKvPCanJCq/ PKawIq60JqmwIjYnNaDkXGR1cXxNcTy7Kn2wvW5aJ7+1NGYdbenmFvHLEzkl caKK5Nbq1K765LaqOGllfFttkrQhWdKYKuVk1lfH1tXEVlSfLSgLS8/3i8lw DU08HZh8IiDJISjx2NnM0wVVQVJ5ptZQOzfJNqnLB9vipU3+sia/fn6IQhQ2 wM8YayvU9lWaRpusBuGkocWkEkxrWmconsim9Z1Tpp4Jc++4pW9Lm9i0nOBp 6jeEyUvGc9kkTWxsgqkTJk+YZV1TtE0gmP0mOLYLYQIqmYA/opFPa7untRsw oW2CMJneKOhCm9D9JkObbQISAZjY2GTC0L45dErh7ET3tKUTy7rgw05pOacq K9z7eLDbUc+THzrb7XY8sivA5bDH8Q9cj73nZPfOqQNvOXz4+vF9b5zY/+bh g2/Y2+867vCew7F3j1JC2WV/dDfV8H5w5/59b+398M39e986dACo8p7DgXcO v//m0Q/fOnHwHYf9O08efNvr9P6EUNeagoSWxjxhXQ63Mr25LKkm/6ygLk3G z1fIq7UKDpyuWHVtU4YO01irSdVKd75TRX0Txm4rnMH+t23CzJvA6euL8iaY NAGbMOd0Kbp5L7EJ4QnpjGbyBAKXnuBUYU5dPkgEPAIwITYh9V3wWQys5nr5 fpONOiUpwgSuMxvhMWky2N2M/Sa22ZORFnhyIJhC2bId/kU2gU+RvMnFRRXE 8jxlk8082WyTSRM1EpzBk3WbTOh70CZwlg5MWJpWLc0oraZepUI01M/Tq9rh zWDRd5m08rEhUXdHPfBExC0CoQBPxNxigAnZAo8v32g/n162KMb9L/AV0ctS +0gxFSZKbJbCb06aMG2Cs3npkbntGw3gUlLfhdOkyRsA8yY4zw0+i8sZyeQu smCF2IT571r1Q0yVjGsVGC+xCZlyjJsiQR9Y04U5Hbq6jLIJ8gQeM8bYgJSO dmaQ5AhJmkCM9EpxGT3euF7cRcNEPQgwkaoGJOr+lhfZxMLImCBMrFrpcFe9 oCGjIN0fbOLj+J6Lww7Ho2+ctnvV6djrnqffBpsEe+4N8dxHdcR7UjwhNkkJ PYE2AZic9TsCV7JjXUtpm+D6RTkvT9lZq+tvxl74JaMMbLIy3n11ZuD2+bG1 S9r7l+mCLjpjQkZ13b6oWbti2MiYWMAmj2/iZhPrw+tWst/k8Y2ZxzfWMUKE gsFse38WN6YfXJ/GvAkI5f516mRju6Zr+9g+to+vPfBnBdMm//KrT3715Z3P 781Tuxc3bAKXj66aHl83P7018fEt68PLhuszg4v6totm2aVx+QWDVCWrkNYl NueHsAvDagAmaQG4x6Q8yacs0RuiKtUfbq/NCIIrFTRY4D5gk8Zz4e31GbKm bFbR2fw493g/u6xop6rs4Ja6NDk3t7UpE37elmT458Y65Zw9kxp6LNp7X4jL Ht/Tu9yPvel1apfb8R1njr5x6sjrZ4696XZmt4/bB/5nT0SmusVleiVk+6Tm B2UUhmQUhWQWheZVRueUhOeVR+WWRmYXhSXn+OfnRmSm+Wem+uUBpsoS2oVF fbLq7pZSQX16TX5EfrJXfpJnfX44rzxOUhHZWhnVWhktqTwrKo8SlEe1NSS2 1idJ6hJ5lTHcyhgxgKU5DaKjJZXfFFlf7tNU4dvOizYr8q9ONl8z1y6MFOha ovpqPfqrXZWN3ppmvxF2qqG1cLyzYrK/bnaMO6cVzeklM9rWGZ100kBNvh03 d1vGe8zjPXPWl9mEyZMXwcSmg54ZzEb4zUkTbHJ/SVkXkydTm1pOsAueVHM9 ZxMCE/0GTBg2eTanayubYN5kYwNjBw6zmjB0bLbJzHgX2MSobjGoxAATOIf8 u5/c+7c/fO8ff/bokzvTys5GhbRa08M2DwlNCoGqq2movVbOLeJWplTlhGed dfN0ev+0/Vt2e799YM+3j3z47ZNH3nQ99e6JIzvs979+5MNXD3/wit3e148f 2nn66G5H+3ePH9xx/OBbpw4DTN50tNvp57wvxP1QUXqQqCGjg5vXIy4ekdeo expUfQ06Bcs4SpV4waV+VKBXCo1jYpNKTK+PpBr5KXkZu4hN8Nn+c/tN4DSV 9Jt8E5vYzBAGm8DZ3ebYzBO0Cc7swqD2X7TUtQtrpPwqMbsMK7tIUzyWdYFN MEgChTShvKimi5E3aaM2wtM8YSZNwCYAk4GuJhCKDU/oBIoYLMPkCQSxCZMn 3zxvgjCx4QnES2yywZMeukJPMWnsI4s/IOYmRuanRi4uac/PjV2YV11ZNiwv qJdmldPjAyAUzahkoJvVJq4Angg5ha2CMnhlcWIwqcfDpAl+pfhEwcMmGw9x QhfZZmKTNCFeQJswK6YIT4hNSH0XyZ6QtwQZmICkhXuSsV1k8yP+o2RDPXag mNXPOkqw8QSClHUxm+KxpgseGC40QZVgmgYe0lCPAL0MQWq66KCq0ahVLH0t o32S0T4pM5gwQZsATCDgCrllgydtNEzaVANoE7G6T6Qb3NomBCagEgzsNynM CIj0s/N12uPqsOOM3etnjn7H2eENrzO7Atzep21CTegK35Q3AZ4k0HMsIVLC T51LcC/PCqzND+dXJ7U0pINNhjuqwCYTSuGiSQYkuT6ruDo9cG1WcWNh+PZ5 5Z0LY3eBJFQpl4bYBK4wqrme2eTJramPbk8jRuixwLNPbs7ZqASDdL4/HzMP b8ysw+Sade3a+OpV89o1y3beZPvYPraPlx/wgwJt8sNPrxCb/Pr7d7+7uoB7 4UElq8t6SihXDY9uUDb56Ob4gyuGuxeUN+YVqyvKWwuDt+YHL0/IzxskcxrB skk6r5LMjbWQgA/nVa2G7kZ9V4Ous14rr9PKqUuNrFYhKhluKVO1V3dz8hrz I0uSfXJjXJuKogEmndw8aVMW/LxtLI4uSPFOCTySEeqQHXEyM+JESsjRsz4H wtzeD3J739/5PW/HdzzO7PI4A5e7IUJiTpxNcYGIS3dPOeebmueXVhCQWRxS WHM2rzISLvOronIqI7IrwmNTveLTvOOTPaPjnGMSXHLOBVZXx/PZmUJuFrcp pbYiurwwtKwgpLwghF8eKq6OFJaHicrCRKWhgsKgltIwSXFER3lMS36oMCdY WhDZURAFIS3xEBU4SYqce2t9tcLo+e70a8qiayO5l/ozlzriJwWhpmY/Q4OX ocFzqD5OL8ye7Chd7K9bUXKWVPzzWvGUTjKpbx03tltMMoulc9zSDbFl3gSL smx48qKMyYtUYlPWxbQJyZhgoE1IbNkRP7WprAt5wmw2seK4YICJbh0mM4be GRom1JCub2YTzJgwe+Fpm2yRNwGbwKV+TIQfXr+o+c0vH/7br27/4rOZu+e7 +8WZPYI0ZUe+tqdkfKjG2F+hlOX3iTK6eCkydmJrY4ysIa4h2ystcF/wydd9 7F7zPfpagMNrfvaveR1+zX3/qy4fvur8wSuue19x2/eKi90rZw69cubgK6f2 f9vhw285H/52iMvbxcnOMlayvrfM1F+h7yk19JYa+0qtagG8ylOG1km9xKIW aoc5yoEmAzhFJQJDmbVSqjjNKJswya3GHlJHRzViw7O0sYXzf7amy2a/CcDk 5Tax4QlOZ4JL0g3dIaJaTjB1gpVd2EWCk4SJUCCwAwUCkUKE8pJeeDzlxmYT uM6c0AUkAZj0dzaSUV2bbYKBQsGqp808eUG/SRvmTdAmy/NKuLwwNwT02MyT LW2C+03WeWKkbDI3MYRlXfAPYZ6CmuJr7puy9I8busEjoJL5qeFZqwJusZp6 4Ua9ql3Ry5FLazokVbitBlwJCMUXDp8i/AJpea3bhKiEGZuTJkyYbK6YQptg WRdygzShkLG9W75n4FNkbBf8ndhywqwiI33x9DLE3vUNJhu98Ju1Ap81jHUS mDAfAKnmIo7GThPlgGi0X0RsMtIrHultGeltZQbmRGySJjZCwc+qBlAl0rH+ 1rH+FlWf6EU2GX8+YzKpa4NQ9bPAJqSmy/X4zlOHX3O0f93txFs+TrsD3T8I 8doX6kXlTSLofhObXvgEuKTHCONS+MpzIXUFEW2s7IHWMm1fk2mIaxnhT6rE C8YOgMmtBarl5Mb80LU5xdXZQYjbyyqy1gSD2sC4vtZknScPr+Nmk+mnd2ZI +RbY5PGN2ae3n1u5uHnNImNu8NR9KqwbMYHNJtv9JtvH9rF9vPyAnxW4F/6r jy+BTf7tt5//668//c1X975YW6T2wl+3PrpiwbzJ2hWwieXJrYnHNyz0rhPz p3cnf/H5xR99tPjTTy78/LPln31y/oePZ3/80fzDi7onV4yfXB//7Jb1s5vW j6+Pf3TV9Piy8cGK9v6yBi7hDg+WtatLY3cXRy9P9IwruJLa1MrMoKqsYFF1 yoxaYh0VqjrrpHTSpDo3ND/JsyDepTYnUFydJGNlSxvT2WUx1eeCK88Flmb5 F2b45qV6ZSe4pcY4JkWfiog/dTbZOTrJKTbNNSnbKznHOzXXNznPN6s0JL00 OLM8NK0kKKU4MK0sODrTJz4vMPacb2Sae0iCU3DsyfBER7+gg9Fxp9PS3QsK AivKIyrLI6oqIoWVYcKKUE6RP6fAn53rW5viVBF3sjjkSGXUqYrwk1XhJ5pi HAXJHu3ZgcM1vlp2yFxb4o2R/Pv6ikfGiscQ+tKbiqx5SYSh0VNd46yrczU1 eirZMcaW9ClZ4bKi/uoY//yoYFEpnNa0TenaLcaOcZNs3NJptXROWuQvsYkN T745TJgZE+aELjj7ZXbBo0o2h41NMCYN3VPGnmlT74y57zmbTAzOjQ/gfhO4 DzUumK7pIjaZ3rDJzEYjPMMmz/WbIE/g1A6TJrj4A20ybsDUyXpYDe0QUybZ jEU+YZBaDW3jOolRJQQIDIoTmgucBeWewgpvUaU3u8iVX+YprvJtbwxpqw+W 1AS01gRKa4M6GkNllUEd5QHSEt+WQm9xvpcwz0OQ6y7K8xKe8+BkOjelnq5P PFkbf7w2zqE4waEwzr4w5mhu1KGssH0FZw/XZzk157nJGyKULSlqaZqmLU3X ka6Xpfe1ZA5Kc0e7yrUD9aYRzrhKbNW0mpQtEEZVq5kehgw4HTd1TOifMRAb 4W1swty2iTaBl0Y70go2AZgANOCsFU7pASZS+hfstESqIGTialnLs+huq+9p b6BtgnvhuRBbnmRuaRNsOUGbkIwJ2gSutPIqxewyEatU0FRMFp2gSmpK0kgH CuHJeg6l7hy/KV/IKuQ15nEbcmmbVA90UkkB7QhV06VTttJjhEXKQTI6mKXo aV63SQ97pI+rHKBVohCqhkQQuBIFgpy6Y2XXZp4wbNJNbGJUPeuFR5vQPFFg 2PBks02sxk4sRIQrNE+6MW+CNqFnIPRCUI3q8C0zOYQkmbYMgEoAKQAWi77L rOs0aeXa0dbhfl5/Z1NvR2OfrAmeFkU3qAQIwB/th68XvkAJ/aUhTKhVki+y CV5h7lskTGDahKROmDah9623wSWEeqhVpZBADPcK6GrA9RjsgjfSenEXtsaT LZD4r5Dt89gsjzYhPMHAFSc2txuU648HZ3MhTMgAMeyFxw+BJBRM6BghNulr 2dImGJttMtzTysye0PVgrTRMJMp+8Vi/SNUn1NJjhI1DYtMIZROLUjw++swm CBPMm2AvfF6qb7jvYe8z77o47ACbOB173f3kDl/nd4M994b5HAjz3k/ZxOsA 6YVHm1A8CT2RHuWYE++Wl+SJzSYNRVHcygQZN1fX3zytkYBKlie6KYYsja4u q9dWtKsrmtvnlTcXR6hJwiuae5d1q1eNdBjgcu2aee2qidgEe+HBJk9uTUGg PiiAXIegu042bEJIsrnZBGLtqpXuNwGSWB9A3LA+vEnx5P71bZtsH9vH9vGy 48md6U/vL8DlF48vgE3+8/ff+9MfvgSbfO/+0kc3Jj++OYVlXfReePDIOMan d6d/+unl3/9k7e+/vPmbH9z53Y/u/fqr2z/77MpXj89/d23uo5sTeLfH10Ex ZviDEHAFr9+/bFi7pF+9qLu3ooWfljcWhieUQk5FPPyALc8O6hUXn7d0moa4 cEVYmwI2qcgJri+MPJfgWZMf2dKYJecXSlk5nMqEmoKIytzg8pzAsmz/4kyf 3GS3nATn3CTXuBSn2BTnmBSnsymOZ1Od4rPcU/J9kgt8U4v8U0sCkor8YvO9 os65R+a4uaW6emV4+GS6+6a7+ae7BaW7BqU6e0fb+8YcC4o5FhbncDbxVFK6 S0aOJzvHl53lzcryakx3KzvrkOm7J8HlzeiT3w469Dchdq+kuu+uiTvaWeFv aEm5pSm+b6q4pyu5qy1aM5as6gru6wsfmgqvDqVMtQTqWW56tpuJ46Zvchrl uulbgyzypLnB4gtK1tKY5LxaPqvqn1X3T2n7pvQ9kyaAScfkePucFVdarPPE Jpjc+OYwsbEJdsFvmS7ZMjZvPIEzOvy1MI4hmhnvwxwHPZKI2nUOn8K9JBCT cLKkYc4Qfm6/CdMm85OUSghMiE3wNI/8hesJlPUeeQjZpKF9Ekiil0wZW2dM EJIpg2hCwzOPsafkqcrmwJFGfxU7WMMNHWkMVLNDR5uCFfUBw43BQ/WBgzUB ww0hQ3XBvTXBfXUhAw1hw80RI6zI4aawwYbgkSYqRpsC4G+gosFvpMFX0RAE nxqoD+qrC+it8eup9u2u8u2t8e+t9e+rDYAb++sC++sD4Q6d9V59nEBlS7Kx q8g6yJoeaZ1VdpqHu0wQyi6TSm7StZkMLUajyKKVM6cN4EtDbIJvBuaUNnjS 4BWEk9LhXi7mQbqktVjQhXkTcEq7kBrwi3kNcATuzsPNFLjdmww42lIi+KGN TUiPCcJEJqZUgjCBaBNUS/lVIBQITl0+0AN7T9AmVUUpyBMIZq0X9sgDZ3gN BZz6XBG7WNZSA4YCmxjVbRCaETFmQ2iSNEEMdjfS0UTVdHWDTXh0BgFOoeG0 uYVuhRbCLdiIseXALhLjuvWsgUVL2USvhM/K4I8wa7o2bDL0DW0ySSXC1oP6 1jZ1Ud8aG8WTOE8YYz1vuDGbAgNfXPhGo9r/N5AFZ93rFUr9YtJJgekMZnMH cGMzTJhhYxMmT5jrF20qu+jntsWmTA6e5NF+Pjz58Caks284V4FaGQ+Pk/TF I0aYBWPrMdq9eQX880mTZ3vhCZRsbIJZPHhnYj++opeHMdTHH4I7wN36REO9 YghFTwvGUK8EguiDGZg0QaSQO4z0twBzRumg3loDwjFQ87BYP9LybJXJGMBE ZFGJwSagkil9O1zCdfhsh6CQXZ0MNokKOOp2fKerww7nY2852n/H5fibYJMQ r30RfofCfQ6CTUI99oZ77geexPgdAZskBh0Dm6RHncmMcSbLTeoKIlhlseL6 tA7OuRFZNfx/Cja5MN61Yu25uTB0e2nk7nnV6or2zoWxGwsjNxeVd5Y1dy/q 7l42QqxeNa9etaxeGX9wzUKnSyxY04Vd8I9vTtIxvb7t/ebsR7fmn96ZZ9rk +eb39Qlda1fGqZUouNzkJpDESne2Wu5fN2P8pU98to/tY/v4qz4e3576eHUO Lr/76PzvfvYQbPLH33/vtz9YBZs8vTlFbEJdXjUBOj65MwXxxf15kAjYBEjy Dz9e/cefPYDLX3z32vcfLX12bwbu8PHtSbAJYuTBFSMEOIVQBW8BpNxbUV+e 7jcqOPCjtYpOTCvaKi5N9RkG2V2CArAJuzwObFKZE1ydGy6sSe3iF3YLCyWN Gezy2IaiyLqC0OrcoIrsgNJM34JU99xEl3OJzompLrFJjtEJp88mnYlLd0nM 9kjK8UzK807M9Yo95xGV5RqW5hiYfNIvwcE54YxbirNXmivYJDDTIzjTPTDN xTv2mHvUYbewfR7h+3wiD/hFHfKLPnQuyj438mgeRMSR7OD9Gb7vpnnvKgk7 0JB4Ql7ibeDHLXaduzFadl9fd0dXsmYsB5vc0wNSSu8bih4Yih6Zi8Am05Ig I8fDwHE3sl0Nzc5KnjvTJotKyZJKNqf+/8kmNl3weCL0P2iTaUsv8gQ7fwlM EBEvssnmmq7/DZtMd8cq2R4jze4qrpeG5zPS7KHm+qi5viPNnkqWt5LlM9pM xUCdh6LKQ1nnq2kK0DUH6pvh0k/X5Gtk+ZrYviaWj4nlbWZ5mdlUGPgBeh6E v5bjq2b5qJq9IcaavMaaveAK3KJh+0JoOX7DgmClJErXkWnpLQObWBViq6LN NNS5YROZUSs10jYZ13WSOQMbp699m2GyMq/GK/Ckwd20I7Y2aeWXQmDqpE1Q hftHmDxhblTEkhgyiJUplC1hgstN4O9BmBCSMIWCPIEgG0/IVOHq4lQMFAry BAIIg9tPOHV57LpzQlZRu6iqp71BOSjA6QfaUaoLnrZJMwMmjQNdjV9rEzid frlNGEmTTrqaC86lO9Am8GZm2gQwQlInRChb2mTK3EmThIopM8Dk2ZaTjW+6 9cDcJRkKQXKacB94AGgTRIFKIYGzfZuAM3w882emJ2x6TJjNJszWj83t8DbF XZttQqrj0CbwDMPzDISEIEghWQw4kyeTsuAvgb/KNkaoNYi4CZGEcQxrvXow 8EZiE4QJczAXDg1Da1Pv3m7uQDdnsIc72MNTwH3WQ6joETFhArEZJiSBwlzC CDHS1zJMk5AO+Hopm+io3YsMm4BKXmATmbAIbRIXesLXaY/HqXdAKI72r4NN vB3fYfabRHgfIGOE4/ztMHWSGn4qPYoq6MpN9CjJ8K/ND4f/KOG/RRk3d1Ba ru1rsozwpzWSJbP88lTv1en+m/PDqyuatUu6u8vq2+dVd1a0xCb3rphWr1jW qPUlNjaZoBvhcYzw5Eb/CLXf5PHN5+q4mNvebYSCE7roRAkGZZO1ayaIv/SJ z/axfWwff9XHkzvTYBO4RJv88Q9fgk1+98O1Lx+cJzZ5cMnEtMmnd6eJTSD+ 8NP7//Tzh8ATcMqPnq6ATeBuEE9vWSHgCpDkIdVHv24TkkmBWL2oXZ7oHpXX NJWcBYDAD1h1TwPYRNVd38bK5lUlwu3ws7cozZdVEtPWnD0gKe0VFUoa0niV cdyKWHb52cai8Lp8kEtAeZZPcZp7QYpLcqpLQrJTbOIZEEpCqktipntytmds hmtk8pnA+ON+sfZUxB2DcIk94ZnkGJDhHpTlGZDh6pN82j32mFvUIaewvacC d5/033XKf9eZgHccA3cHOb8Z4vxmpOvORL/38qOPNGU4tZb4WSQps/Lsy/0F d5XlT/Q1nxhrn+qr7+pKV43lq/rSNUPpA3PZQ1PJI1PJk/GSq4pksImZ54U2 MbFdx/geYJPxzuTZgaKlkaZFZcviWMccnTeZ1vVT43bhNGZc9l+wyTdJmpAt 8MzlJsxSrpfA5EU2wbm+zNQJhE3GBOuvvtYm1CmZ9ZlNmDD5H7BJT6SS4zTK dlTzXTUC91G2k5rvpuF7qHkQnmMc9+EmF0WjU3/dGWWlo6bGRV/vYWr0NDd7 TrC9p7g+Eyw3K8ttku0KMcV2meFQYeG4meFlZbmAOvWNjtqGMxD6Jidjswu8 1maOm4XrPs7zmOB7jolDNW1njZ051v6KSQV7ckgyOdRO2WSoyzjaaRyTGTSt Br3YYBBO6LvwhcCdL/jMkHcCVvFtZRMJ2qRP1tjdVgc2AZVIeCXrPNkEE9xL goOVUCJYgcPcCP+iRnhMuNi0wKNKtrQJLn9HnjRWZmPqpKIgCaKyMJnkUOB2 +Cy7No+6Z+255ppsflOBVFAB2hqjbQJvIaZNGDBpAJv0dzZ+rU2YqZPNNgGS bNQaUTChkybUnkezhsqbMPeb4JwuYpPzs4MQL7cJDZMuzCcyJnX3kWCOyGPW WML3HTw2eOSMmrT2DSa0kRZ1EAQ8ckx5IEwAGswt8CSYeZMtG0AQJi+xiQ1M 0E3IExQK8IQWihAHdpEgSEGnPAtFu2YIN4/IwSn6UUBKl3EMeAIq6aajC28k LfDMqVwEJvjGRp70d7EhgCcUUuBtDO9nIEyXYLBbONgtRpsM97VCjPZvkTch QWBC20Q8vP6FiCib9AuU/XzdsBhsQjYtjtM2wSFdpKALrsNn5aLi5srE7ETP +LCTge57vc+863Fyl+vxt9xP7fR1fhdsEuj+QbDH3jCv/UCSs35HqEvaJvG4 5SSMWg2fHk2VdaFNWGWxorpU0nIyPiqYVImn1C3nTbKLE93XZxX3ltX3L1Pl CneXNfcu6u5d0oNKIOjuj3EKEdcsG50myBPKJg/gU1ctz3YpXpt6eA14sp5G WU+m0GFT3LWePaGD2OTBDYh1nvylT3y2j+1j+/irPj5Zm//0/gLw5HtPlv/h 54/+7z999ac/fPn7Hz/46tHyx7emP7k1DSrB/SZgCiKOz1dnwSbgkf/zy8cA k3/+xSMIcMovvnvtq8fnAS9AGLwnCRuVYOrk9vmx85bOLkFBfWFk1bkQQU2y UcGBWxRtFS0N6UAV+KlbkOJdmOrDLYuVs3MUrWV9okJpQ6qwKl5YHS+oiuWW RTUXhzQUBNXm+ldmeZWmuaWnu6emuiYmO8UnOcbDZZor8CQs/kRwzDH/aDu/ 6KP+sfYBscf8Y+y9E075Jp4OSHIMTHb0iz/hEXnYOXivY8B7jv7vnvHddcrr LQf379g7v2Ln+Kq/46sJAe+XpZ4WVQQNcOP10vQJec5iT87NsbL7moq1sZK1 0cInquKPNaX3DGUQa4ay+6YysMkjc9ljcynY5ArDJgYWbROBp1YSgDZZHG5c GG1ZULZTNtEMgE2mDb3UCcy4bGqi48+yyTeBCdoEVUJggme23wQmL7EJ4QlJ ndjkTdARW9qEaqWnT9WYM4Q3w+S/b5OZnugxjsso21nNc9cKPEfZrmq+p4rr qeF5qXneKo6XkuUxxvaE62aen7HZW9/goW9wNzZ7THC9pwV+Fpa7heU2znKd YLtAWDnOkxxnK9d9ggPhZmG5mpudTaCSRghHuGJudoEb4bNWrsckz2NUFKJq jaZsMlAxPcydGZFOj8hMik6jotMwIqd+RQ820dE2MXTjCerUBtnQJpt5gq84 PGnEJqASZr/JM5sIqxEOBCZoEzijI2kRtAnyxMYmNirBOUikpov0m2yGCdZ0 YdcJr6GQ2AQkUp6fWJaXAJcQIBRESn15JvbFN1fnNFVn8RrzW/nlAC7lIFXT hXkTrOnCpAmtkob+zvr+zoYX2UQ5QNmE2Sr+IptgNRS916MdVKJXAgHgnm3w boe39NLMMKjk0pL64qIK95swYbI0M/CCmq5ORkFX5/oGRtN6OmzaPEBvh1fQ HSi2y08x4F+Hx4k22eiUkZGCKMw7gBpIxgRbznEKFjX+yzpqEyRvwsykkIIu kjF5UU2XdqTVBiY4nQBzOkykjA22MJc24rtr9FlNVAvO16K0MtiqVgBSAD7w lcJXJNOPygxKOQb9r9Nf6UgHacOHvxDTJehrksiDdyO8OSlNd7LXedLFAZts BPLkOZuQ8q0XBcmhDPeKhnoRXEJ6CBixieTZNhOVeEIt3mwT46gQbNJQFpcS 7RQVcDTQba/X6d1uJ952P7nD68wuf9c9AJMgjw9DvfZF+ByM9qNsEuNvFxtw FGACPIFIDj0BPEmNOJ0d54o1XU0lZzFv0i8p1fQ2WsdEC8aOJbN8ZbzrynTf zfnhu+fH7q2o761o7q1o0SbrSZOr5rWr45g32eg0QZ6s24QOK7oD+03QJhsb T9bnCdu0w68LBYOeBUpXdsElxROIv/SJz/axfWwff9XH5w+XID57sPjlRytg k//3n3/wx99/7w8/efiDxyuf3J6BQJs8umJ5cmP849uTEGiTn39+FUny//zd k3/91VNACrafgFm+fLj4xf35z+7NYGUX5k2YpVzYcgJxdXZw3tAurk+ryQur zg2Fn66WEf6sTtojKoIbsdALYFKWFdhWl9LPzxtpLR0Q5LXVJwkrzgrKo4WV 0YLySE5xaFN+QP0535osz8p0t9xs38w0j6Qkp4QEx4REx7gkx9ikM+FxJ0Ji HILO2geATaLsfCKPeEUc8gk/6hl8yCvkkF/4Eb/ww15+77t4vO3t+94Zx9ft 7b51zO5bro7fCQvakxhnJyzzlzdEKgSJWmm6pTN7qjt7ujvr8lD+ZUXu1YHs WyO5j3UlT43lj9RF982VYJMHpoqH5gqwyWNL2RML8KQYbDLVEmjketI2oX67 Psb30Ij9wSYz/UULQw1LSgllE/XAHNMmE/I/yyabYWJzh802ITDBM1sbmJAZ XN/EJtiZblPZxWw2IWVdL7LJc3vh6d2Lc9ZBG5jAyeF/1ybd8WNsAIi3huen 5fuPUlf8lSwfFcdXxfY3CMMm22NnO5MWe9MuDmbOyuKNghA1y1fD8jHw/MxC eBF9jFxvE9fTzHsWVp43xATXa5zjYWa5m5rdTE2uxiZXuGJmuVnYHuMcT/is leulpPImMWCTif6KqSHOFJ03MQ7KDAo5ZRNlu14t0etEer1gwtC12SY2/Sb4 ouMlfApeOzgbH+rh4L4SuaS6TVjewi0Wc4pa6F0Y0hfXdDE7iJlFMkyb2KiE wISoBEmyJUwk3Aoxu0zYXEJXauWTkcIVBUkIEwjMoUAAW+AO1E756pzGqkxu Q56EVwZf1Gg/36CSAk/UwyLlIB/ieZjU98kbemX1L7KJTcvJxhm+rU2MqvXu b7QJxJY2gSD9JgiTl9gEVAJvS0bLSRdjywnWbsH3I3xXDsMVMtN7Qy79OIAC Hi2e+W88crlNYKc5mAJhAioBgyxMwve7crNNcDU8bmAkwdy6SGYIbzlJGG3C hAm9y7IdZwvghGfEC1nayByohW8zIhQMUIxKIVEPUa8aBDzt2pE2fAnwVaBb 71vp1/S5VSbYY4J5PZI3Wb/l62zyrKyrRzLc02oTiq6WoW4JxrMbqZIwAf1V CMAm1BSCPp5uuMWofGaTCXXLi2wiExbVl8bGhhwP9T4Y4Poh2MTl2FvODm96 0HkTKmniuRdsEua1P4rOm8QF2scH2icE2gNMYv2OpISfggCb5MS7EZvA/5id /HxFWwW2w69Ye67PD12bHbi5MAQwgbhzAUJ1d1lze1lzZ0V7+6L+ziUDJZTL 5nuXLfevmtEmZE4X2QtParpwv8nDa5OoFbL3BHMoZHTwM57Qm002YLJuE4y/ 9InP9rF9bB9/1ccXjy9899F54AnY5Lc/ffCnf/z+v//283/86aMfPrn46Z1Z tAnuXsSaLmbeBKu5ACb/8dtP/+XvP/qHH6/+8ovrP/nkEsDku2tzcJ9P7kwB TEAi8PMQbcJshIe4MN41qRKzy+PAIBByXp5piGse5kmbqenB8PO2PDsIbAJs GRQBTIog+gXnOhpTWqpihBVRABO45JWGNhcENOT61ud41WS555/zz87wSkl0 jos5FR3lEBl1DCIk8mhQhJ1fxGHP4H0uAR84+e2BcHbeBeHh9q6Pxx5v13c8 zrzpduI7bsde8Tn1nUiPd3Kijjbl+sga4odF2aPcGK0owSJNmZJnzPfmLPbm zHVmzMlTrgznrRnKH1uqH5kq1vQl9zQFD8erVwEplqrH45XEJg+MBWCTSXGA rtlNz3IDm+gaHZU8d5XQ1yJPmukvBJucH2sFm8zTNpnRD8wY+/7LNmGOCH6R Tbac0EVWmTAnBn9zm5i1z3iy/mvh57vgybzfr7UJdR4+MUhsQlSC8d+2SfIY 21cJ3OAFannBSpa/hhukbA7Q8kINwqhpWfIKkFNZdEtbfl1bckGRbW2L0/JC VOwAHS/QJA4xigKNwgCjwM8o8DUIvE0QfG8D11PP9dRxPLRsN02zq7rJRdXo rOd4wI0GHoSXke8Fd4NQtoRp22NNXeesA89sYhiU6QdlumGZfpS2iVak0/HH 9Z02zSbwzODQNjKnC/Mmz9ukBW3S2VqDSROmTbbsNyF97mRZHv4umtlpgvdh 5kpIuoTsgrexiU1BF/CkhVNOUifAE2w8qS1NrylJqy5OrSpKwbwJ2gTzJsQm rfxy+IqGe7k6pUQ/Rq01GR3gQdBFXECSOoheWW1PRx3E19qEmTrZbBNGvgBO yDv0AEZlO91v0mHTC48YITBBp7wkb8JoOcG6xwFsdZ+xPAtmC/z6XIgJBbyy xCZoK6ZNCB8QJiRpMmUaxGouYMjmICphbjmxmSHM5Mlmm9jABFfAYNDppza8 kR7n9WzaMKbkECb4ZkOqQMArxQxACglyI73eXawcEJPNj0ybYN6EaZMeWXOP rKlX3twnZ/XJORikposZgI7NuZLBTjEGIOVZdAsR8nTwRnohuLoRyiaIkWc2 oamC47kmNK1w3TAi6BAUNpTFgU2CPfdD+Di9d8bu9dN2rzk7vOHt+A6VNPHe H+a9P8RjbzQ9PRgijs6bYKSEnUyPcsyMcT6X4F6c7odbFwU1yW2s7G5h4XBH Ffw3umSWX50dvD6vuHN+lJ7TpV29CP/nam4tjd2me+HXYUJVdplXr4yDTche eJzThTDBvfDruxdvzjD7TT6i8ya434Q5TPg5odA2wRXP2G+ybZPtY/vYPr72 AJt8D3jy8PyXT1Z++5P7f/z998Am//yLpz/66PInt2c/vgU2mbx/yfzgsgVk 8eiaGawBQvns3sxPPr742x/e/eefP/yXv3vy77/++N9+9dHvf7z6s08vff/B /Ber05/fsX503fToiv7RZf2DyzqIx1fhQ+MDgMmK5t6yZhViRbNkkpkUHFZp TFVOcE1uaK+oyDDAUnXViWpT2GWxDYWRZZkBxWm+dfnhSmnxmLRE2VqsEOb2 sNM66hPaauLEFREtFZGisjBeURC7wJ+V79uc652X45OT5ZWW4hIT7RASfCAo aH9I6CEv3z1efns8/d93833PyWvXSde3HJxfdz/+BoTH8Tc8j3/H+/hrQWfe jPZ4t/Ds8foMj9bS0L6GuGFWspKTquKlGwRnLeK4qbbk+c6MC/3nVgbPne/L AphAXFPm39GV3DdV3DdXrhnLH45XrZnKH49XPZmoomu6Sh+Zitf0eVeHkqck gbpmV22zi77ZWVN/aoTjqhR4m2UJM/0Fi8MN51Wti2MdtE0GaZv0T1t6pic6 p61yhImNTbCTffMYYZv1Jd/cJqSAhGkToMeWNiEwITahQisjc31J9sSm0wQb ma2UTTrBJpM0TKYQJrgd3tQ3Y+6ftYBHBmmUwYkZnJ7Bh3AWBzwBtjBtwoSJ zGKQjdMwmTDKrMb2SSPYpHXKKJ01QbROG8RWDd8yxpnuTFOxg8dYgWpOkJYf pGT7qbgBY2w/U0vEpCxxsS/r0kjR1bHKO/qGlZH8ud50qyxOJwxTc4N0gmCz JMwkCqJswvc18L2NAi864Io3OEXP99LxPLVcDw3HXc1yhSs6CJ4nBHwKY0QY pJJGGbuyJ6maLs7MSOv0SIdhQKYfkOmGOqjfD6tadFqhXi+wsQm2HmxOmmy2 CZyZd0lrydZFZi98O9Z0tTxX00W62kkvPARTJWQFPBMmTJswa7o2l3Vttgk2 xQM9sLgLRwojUlAoz/ImVdkNlRmc+lwJr0wuqQZ2aUdbgCdjCgFuMMG8CYMn VOpksIsFisEthHhaS5/NCl7ccrI+RhjPq8d1PQgTi7ab3rpIzemCP6Ufk1qN nfOTgJHh5XngyejSDGUTG54szw8BSQAmV5dVgBS4ZWEKaNk1iflEiu0o916S sqR/OTBAz+nqYw7vIvVd8I0GDw8eMBmNRT/4DizoYvIEO0SwCx63rmMCZXMw l5sQkmBB1+ZmE6ZNNnbEtzLTTxt5E/TdeuqEzp5I6fTTensImamFiRKmTeBd RxNSNDYoQoCoFGK8Qgd1O96BXlbyzCZIErJnh9gE+00om3Q0QfTKmnvxnUzZ hD/YDTwRUdElxBimJglL4RKv4HUKJnKaJ13i520iHOrGwRF8YhODUmIaE5lV You6ZVwD8WwpPMmbgE3a+QX1pbFxoSfCfQ9D+Lm870jvXnQ5/qaP0+5gz73h vgfDfQ5QNvE9jCvgY/yOYL9JQqA9LjcBmOQnexWl+dbkh3Mq4qXNWe3snNam zA7OuVF5zaxOCja5sTB06/zI3QsqUMnaZd3qJd3NDZvgkC7Sb7JG2cRMZ09I 0sT64BryZGOM8A0ACIWRj+/Of3Jv4VM6Pltd/HxtCXliu+7kBhVokwc3KJus XTNt13RtH9vH9vG1x2drCz98eunLRxe+erLyux/f//fffvF///EH//qrL37y yc0nN+ceXpt5cnP+0fXZ1UvWj29P4gTgJ9ctn9+d+cnTld9+dfuffrwK8X9+ uvqHH9z+6eOlj6/q15ZGPloefnJh6M5U5y2r7N5sz725vrWFwftLw2uLw7dn B65P9tyY6rszp7i7MDyvkQy3ljUXRVZm+Nfnhnayc3Q9DT38fGFVAtwIt1Sk +8Gn2CXRSmmRuqNUJy/XdJSMSHL7OGldjYmdDfFtVVGS8tCWshBhcSC/wE9Q 4F9WHFCY752V4RwXYx8S9KGfz25vz52e7m+5OH3H8fS3HU+/4uz4qrPja05n Xg1zeDXs2OtRJ3ekuL9bHHakOdVZnOfTWx02WB812hyj5sZr+QkaXryaG2cW Ro2LoydbY2c7Ehe7Ui/0Zqz0Z10cyL6sOHdtJP+Wqviervy+seqRuWbVWPZw vPKptfoja9Wj8bKHpqKHpsJV3bkboykLsjAj113deAZgoq47oWA5KgVehraY qd7chaG6hVHxuk20YBPFDPULz4EZa++MtRvPRZkYYS5zZ8bmrArTJjZ/1iZp whzSxcyMMHMlBCzPkYRhE9DHiwJVAmFUt41r5BAT2k6rrmtyI2nCXNpIdqMs bFS50KX4g3h+vpGI6YCw6NrN2jYqTO0YFlP7uLF9wtg2YZRO6aUzhrY5U/u8 qX1OL51SiyaUvKn2fB0nUcUKVzYHavn+Kr7HKNdZJfTQt/pPyGPn+jKXhsou jjZeUXEXBs5Z5ckz3Skm6VmdKEwvDNYLAk3CAAPfl8qJsN2MXDeLwGNC5G0R UGHmexm51Cg2+JSO5QqXVAkfxx1uxDDxPBV8H2VrqKk7fUpROj3cPDkkGh9o 0fa1afvbNQopVTtE5U1aDHrxON0Lz6zpgmeAvNY27wd4fbHyB8694cwcYNIu qqAGc9EDhDFAKLh5BAVBeMIcDkza4TeThKkSmx6TzYE2wbwJFnQhTLCmC2GC 84QxUCjMyV0NFVnUOK+KjNqyVFZtjphTAl/UUA9bPSxSDQlxp8noAA9VApcb lV0NYBO4Gy4iHOnjw3ks/gYem01IvwljO2G7Sd1h0crJuOYJPdhETm8GkdO/ /2+HK5oRMbx1p8xdi9MAkOGVhVEIrOZCnixO92PALRcXR66tqK9f1IBQ4D5z 1h5ctkhSYFMbrVWbA9Ml1Pvc0IPfbsAlTJeQCV0bTehttBGeDbzCmi7MnjBt YjOYa/NsLpvmd5vYYtgvtVukdXMv/JbTz+gVlhRw4E+R+i7SfkJ2JtIZEAAy i16ygy8fD7vpIXD210YDC9XDgn8c36vYAo95PfIWhesIls1B3tvMN/8QXd+F ORSs9RroEmH0dwox8ENFl3ioG0I01IOw4tMZvRaDqkU/JjKoREaN0KSlLsc1 1HIT46gQR3UBUnRDvDZefkVeeGzI8bNBxyibOL/venyn2wmq38TP5b0gjw+f 7V70Wp/TBTZBmCQGHUsMOQ48AZsUpHiDTRqKojBp0iUoGGqv1PQ2Wkb4c/q2 FWvP1QXF1aWhq4vD18+P3lpR3VrRQNy4oLq5rL61QqVOcE7X6pXxVXrqL07c Wu8uuTGFt8AVUrVFLolEsOuEqISZPXl4Y72I69GtCQjSbLI9Q3j72D62j5cf nz9vk//4HWWTf//Nlz/99BbY5NH1Zzb56OYErin5+NbkF6tzP/5o+e++e+03 37vxy08vf3V/9v4F1ZJWauiuV3dUWroqpvpr4dIoKxvvrrL2184MNc4Ms6aG mscHGi39DROK5qlhtnWIpeyokrGyG/LC0CCi6sQBcVE3L5dbFlObE1yVGVCW 6gOfAqf0cjIG+NlDgnNDwpwBXkYvK6W7MVFeG9tRHd1WGS4pCxEXB4kLAyE4 VZF1hQElGW458SeTwg9H+rwX4Pymx4lvux//ltuxv3G1/xuP49/2c3w92G1n XvCBsqhj9YmO7HQ3YY53W5F/V0VIX03oYH3EaHO0mhur5cVquDFqzlmzMBJt MidLWupOW+7LRJhcGcq9PlpAbPKQtskDS+Ujc+VDc/lDS/ljS+ljS8l9Q/6N 0bRFeYSF76VtctbQQ5wGm8+M8j310rOTPefmFbXzI6L50baNvIlixvicTTbz 5H/DJuQXtsxF8P9LNgGYEJtg0oTYhLm3cWFyZMMmg+RBbuRiKJhgvMgmk7rW aUPbrLFtztg+q2udVAnHR7kzHQUGbqKGHaFiBeoE/hqB5xjPRSPy1LX4mtui Z7rTFgeKLgzVLA83XFWXLg1mz/elj7fFGMThBsomASZMmlAGoWwyLvCYFHtN iHzGhT42PNnSJkMC3zFpmLknY3qobHaUPTUsnhiU6LayyQTDJuSU9UVvBgi4 G7wucP7WJ2vEjAmBCaZO0CbYCw9CwUIsLH3ZcoPJS2zCzJVglmRzkKQJ0yak povkTUAouJCxriyDVHbBJXxI35gONmmuyRaxizvEVQOdzbgFfrC7WdHDomu6 1jtN4Mpgd6Oip3mol41VT3SnA1UOhGvBmRkTcjoNp9A0TDrJPDR4qpfn1BcX tJcWdZcWtRcXNLjSFGsUZyd6l2YUy/MjABO4ZNqE8OS/aRMM6n1OJyixPor+ QjbvtX9OJcwcCmmHR5vYkAQ9Qq6/qP+dGUybbPyjz3mExgjGs12WmIeyaLvx b0aeoKdslrlvDFugdobCq0yEAoFCQZsQnigHxMQmmDch70+yDBQ/RIDYBN4Z 39XYQgUx2L0+VRh5YqMSApMX2UQzItSPAU/EYBO9im9QC15kkw5BIdgkOtA+ wu9IqNdBX6c9bifexn4Tf9c9AJNw34Nh3geITajsCW0T3G+SSO+Fx92LhSne tfnhvKrEdnYO2ETRVqEfYE1rJOctncsT3VcWBsEm15ZGblxQ3lweu7Wivn1R uxF6iLuXjWtX6bzJhk2YA4HxQ5I3wW0mNhhBhqwP8mI0oUA8pNIlVK4Ed5og UrZtsn1sH9vH1x7fvb8INvn+42W0yX/+w/fAJv/x2+///PM7T28vUEtgb8Hl 7L2LE1jQ9fSW9bO702CT7z9Y+MGjpe+vzT1c0Z43duh7GgaFhV2s7M7mzPbK iM66s7LqaGlFBNhBVhvTURPTBZSoj++oi+uoi5c3JXex0iA6OTnimqSa7CAw SHmaL7c0pr0pQ87OZhVHAVXgxqJEj5Jkr/rcUF5hKL8oTFgcLiqBCBOVhAqL QoSFwZLSMGlpSEsRBZOWwkBRvj8n14+V7VOf7lEedzo76GCM89tB9q8meryX 7LUnxfv9FO8P0v325YXblcWeYqU5czJceFkAEw9JvndHiV9XeaCiLmy0MVLN idbzYw38GD0vWsuJNAkiLKIoqyRmtiMRbLLSn3VpMAdtcm0k/+ZY0V1t2aq+ AniyZqp4YK58AJem8ifjVU+tVY/N5Q+MRTdG0hdlEeNCX22Tq7reUdfoNEDb RNcabe3OmRusmRsWzo1I59T9xCbUadJED9iEWdPFjD/LJjbFYFvahJz8M4u7 toTJn2sTJkyITZhJE2ITkjqxscmMZZBMUl0v4tqAyXpsZROrrnVKL6Vt0kbb REDbJN/ITdCyw9SsAL3AT8t3V3GdtSJ3vdjLJI2Y7ko5P1h8RVl/XcW+baxc GTm30Js23hplEoUaBIEGgb9Z6GcS+Bi57kaOq5nrahW4T4s8rWK/CZEvkyco lJfbZGaE9TKbGNZtQpImaJPNSTR8lYlNejsa2kUVzHSJhFeC0Sasxn4TsAOp 6SJnaDZncV9rE9Jm8qKw4YmYXUZ2xPMbi1AohCdoE+w3gUucJ1xTmgY2aarO EjQXArXgS6NXwLMHupqAJ4CUMQVPNcRXDwsg4AquicfkCB0SUtOFBV02eRPG CTaFFHiH0895H07NovN08H0BZ/jwXUCVKc6M9yxODwJMLi2NXVxUMsdzEZ5g O/zVZRXaBD7759oEvxNtbLIJJhKslWKqhPABi7uAG0ybbN5jsuU2kxelTmz6 TeAZ20iOPCuHY8xhpj7Enwz0yvs+m13zJHVCbEKLmLIJ8oQEyaEw0yg4lxj/ IL5X4f2JQ+cIN/CNSt7GzCBvaXzbYwx0rU8VhkuCkV4Zv08ugMAP17MqEF20 TbqFWNZF20T0DW3Szi+ozI/ApEmA24feZ96lR3Xt8Dz9doDb+6He+5/ZxHt9 L3zMxnITiHh6jHBWrAvypDInmFUWK23O6uTnD7VXgk1mtK1gk4uTvZfnB8Am 18+PYtxcVoFK7lzSQRCb4H6T+y9YoYg2wXlccGX1sgUNApd4O9nDaJM0ocBC F3HRe+dN2zbZPraP7eObH2CTH3x0EWwCl7/90doff/8l2OQ/f/fVL7+498md RVAJ2uTuyviDK0Yc1fXZ3ZnP7kx/csv69Mb42gX1slFOwURU1MvN7eHkdLGy pKWBbWVBrSUBoiJfYbGfqMifn+8rKgkWFgfxCwN4hYGCkhBJRWR7bUwXN1dY mVCR7lea4l2dHSiojJc2pAFPmosiqzID4Ma8WJf8OFe43pzjz1oPoIcvK8un Ocu7OcODf85XmOfHy/biZHqw0t0akp346V7sZNea6JOFAQezPd/P9thzzntv aYhdeejRivBjVREOtWdPNSe68NI8eZnOvEwnYbaLtMBTXurbVe7bWeo92gin rBFAEpMwxiSINvKi9NwItAnmTc73pINNACZXh/MgbigLb6mK0SZrhspHE3X3 TVV3NKV3NMUPTZVPxqsfGssfGIquDaUvdESOC/w0jS6qWkdtvfMgy3Fz3mRO RdlkWjeINplet4mCTI5lnpp+c5vYwOQb2mRzX/zWbSZfZxMbmNjY5FmnCb0X 3qasi8AEW/XxwdB/LZUrQZWsF3eZOsxb2WR6k01m23KM7FhNc4iqyVfP99bw XFSc01qBi17oYRAHTUjPzndlXxysuKFsujZWuNiXOtUeaxAEGwRBBp6vie8H wAR9mDkuJraTheM8yXedEblPiv0IT+CzYJAX2UTB9xmVhBi70rCmy6oQvqim C+d0MQu64PXaDBOSF6O7EuRw2tbTXk9yJUiSFm4xBrZ+QHSIa/FEjvyqmZzR veREbjNMXlTTxZzcRTriWzjlaBMs7gKh4LoTHNtFNp5UFaWQXSfVJak1pSmN VZn0GOFS+NI22kyaIeA62GR0gKPoacJe+P7OBur2Z6eyArp/QUzz5LleeDzJ p0+w2+mzaBmZ6oBzg+GSHhjVstHlsV7TtTSjAJVcPq+6Aj/96AHCNjwhNrm2 or58Xvnn2oQ5m4LUdJHZvM+XUX29TRAmWy5bRJXYVHOhUGzCxia4ToVhk2cY ITzZ0ibMfwiAg7O2cCicjU2YQUq8yMsKMdTDJ8sWyVxrGzvjdZIWYQazpouR Lly3CRiEeKSngwdha5MuDCHaZKiHt1HTJQGbGNVik1aEgTYxjAisWinaRKvg dggKqwoiY0OOR/rbgU0AJj6O73k7voNDuqiCLu/9oV77Qjz2YkHXWbojHpMm ySHHE4IdUsJPgU2w5aRiwyZyXh7uXrSOiRZNsktTfVcWBq+dH8akCVzeWlGD Su5eBpKs7zdZvWpen9PFsAkJtAm445N7CxDgjnuXzLeXDRB3VozgFCz3wiBC IY3wa9TSeSNIBDxCKru2bbJ9bB/bx9ceYJOvnqxAgE1+88PVP/7++3/6w1d/ +v0P//7LtU/vLqFNHt+Yu7NMjdtCm3xye+qTW5NPrpkfXNJfnxpY1Lbpuuv7 BAXd7JxudjaEvDKwvcwPoqXIW5DnISz0Epf4CIp8eAVenDxvTp4XN99HXBrY URuJ5VtFiR7AEPAIqETGypLUpTQVRlRnBZal+gBMIOA6JyeAey4Qgp3t15zp 3ZjmUZ/sWnn2RG3Cmfokx7qEM3Vxp2piTlREHcv3+bDAd29RwIHSoEPlIXZV 4fY1kccbYk7Vnz1Zf/ZUU5wjJ8mVn+ouTPfsKPZuK/RozXeT5rvJij17Knz6 q/017HA9L5Iu4ooaF0eaBOFGXui4OHpKGofNJgQmoJKbY0W31SUkaQLxxNr0 0FJH1XeZqh+aa+7ry+6qC+/rwSaZCx3RFr6/ptFNXeesqXMZpPtNNttkVj0A Npk2DKBNpie66Gbw53jyotjSJlvC5CU2YXad2PTFv1Al38AmBCYGlRRhQmyC MCE2YfKEfoQKuk24j1Sa0RsuIKTIE4DJhEG2pU0m9dIZI7PfRDih5M22ZRlZ 0dqmQHWjl5FqXXdScU7qBc5Gkbu5JXCiNXJWlnahr+jKcM1cZ9KEJNIkDFaz fHRcXx3b08zzHud7WrjuJpaTiXXGwj5t5TlNCVwmn8+bvMQmgzzvUUmwoTPV OlgyNdRkVQgs/eItbWKl95sQm2Df9JYqwRvhznBOCCdyckk1DuYiKoEPMSTc ilZeJWUT0dY2YZ6wbWkTm9lcyJAtg9iEjOoieRO0CQYp8WL2xQNM4BKu15Sm VZckN1RmcBvy4AvpktYO9bKBJP2djX3yhoGupo6WMpmkvKutqqejpru9ulNa 1dFSgSexeDY73MunN3evN5uQci9Ml5Az6o3RUu10Q7cMW+CxpQJLlVRDInjj zU70XpgbBptcWhoDnizPD2+eIYw2uXJhjNhkdqL7m9sEvysJxvE7bsvmDnq+ 7tY1XTbTujbvgofYDBMy5ssmSLcIY/Fim83jIVMFNtuEtNgzUzNY3IWL3UlL O9qkT9bY29EADoXobqsb7GJhcdfGC8pFm5Dp1qQKkSxexCBv7BcFccp6rrBT QOq40CYQABNMnTDLugapsi4IuiOetgk8PP2YxKhuNapbTJoWi54Ks04MNgGP oE0mdW0WVQvYRC4qxrxJVMDRUG+qpgt4gjbB/SbBnnuDPfYGu3+4XtDlbxdH d5oATFJCTySHnsAhXQAT3L3Ir06ScXO7BAX9klJ1T8OkSrxkll+c7L1+fvjm ipIu5dLcuaQFkgAW7l0x0LkMC65EXL1iuXvJTJpNbGwCl0/vzH2+tvTZ6iLQ A+4DKrl1QY8B1zE296pA3L9mxuZ3VAlpOdm2yfaxfWwfLz++eLCEBV0QYJM/ /YGyyf/9w49+/dWDz+6dZ9rk3ooWxwh/fGvy09tTT2+MP7pifHxJf/+C+tpU 35KubUEtOa+TrhjbNaLEvvrQntrgzqoASZGXpMS7ozJAUuYnKvYSFnmJSnzF pf7SymB5XYSoOhHckR11BmwiqIjv4efJ2VSVV11uSHmaL9Z0waeaCiLAJrxz QcLcYGFuECfLpzHZrTbeqSb2dHmUQ1m4XWnYkaLgg/mB+wsC91dFHq2MsIOo jrKvPetQF3O8LvZ4U+KZhviT9bEnGuNPsVOcBRnuoizP7nIfeYlnR6GbvMh9 sMpPz42aaku2iKImWs5Ot8XOdcTNtcdOt0ZPtkTMyZIWOlMwY4I9JqASYpM7 mtJ7unLMmzyd4txWV5zvzpySJlglMYvypJsjeff1pTdHc5dkcRZeoK7p/2Pv vqPiOs/E8X9tNUBy2SRu6hJN9N57R1RRhApF9M4Uhs7M0HtnGlPoXRLqEupd suUey0V2YseJnWw2uym72fP7+/fc+zCvLncGJHl3T/IH9zxnzsyAAMPg8354 mrO82EFeZEfXdDmyarqmGTahTi8jLWCT6dGno0RXR8ozYcJ852f2wqNHntFj 8nw2ISrB0Js0YaVOkCdTS8OL4Jz21Cb0hgsR2gRhspJNJlXiaXX93HDDvKZh VimeklePDZbPig9q+CFDHE85x1ld7qwss1EIzJUVVsoKm6EyV3mpp4Tr118U 2JsfqBB4KgQe8lJ3KddpqNRZzrXXlDkPlzmq+bZqjoWyxFzNNR8rtZwssx5j 9JuwYMK2SbkL5k1eyCbkBfAsm9TBQa6+OqeKn0o8AgEPISp5KUAD4Algob66 AOyA1fh4QmO1nKxik9UzJs/shWcG6Y5nThXGBAr2yBdkxuekRRVmxYFN4D8B /tNwg0mjMBeiWZzfLM5rFGYDTyCaRDmt9QXAFuYf2OnVeJUQem2CGGFkJfCM vbTWZGhATPawy/tq4FWnkzd5tk3g4QvZhJU3wVQOgQDTJrJeape6Vgp1GNhp QhrhyXZF3S74VcYFs0JnQhfGMxrhGZOZl+Yb6/awIE/6O6oxddJWX4IegcBZ cwBtoAqzygte4RDMvJ7uGlBmMAc46AYTKZ3NlUQleIfAhBVdTVV0VHQ3V9DD hCmbKAbgFVKLNsGkCdiEGti13CayrtKGyrTMw34AEyzrcrX+ub3pK7YmRg6M /Sa+EI5vk6RJBF3QRWxyMNyWajY54Jqd5F2cFlxdFIcwGWgqUHWXTsmFVLPJ VOelE32XFvoXFwavnJZeO6u4fg4zJko61NfOqq6eUV49rbpySnXttBri+hkN xI2zw9h+Ata4tziJU7nglowLpvIjQI/zo/DOAJMrC0ombZ7ahB4arDf+0Qef tWvtWrv+qa+P7y58ev/0Lx+c+ezBmd88vvm3Hz/9rz989vc/fP7947sf3Fy4 d2kae+GvnRq5flp565zm7sWRB4vjj65OvX9t8tGV8cd35z+/O//4zsznd2ae 3J//5t3jTx7OnZfmKWuiB8vC+0vDukoCO4qp6OQEtxUHNhcGtBQFtnNDOnnh 3aURJalBqdHOcQHmGQfcqvNjWsqO1nETK3Ii8pO8gSQZMc7p0U6ZsS6Fh7wF ia5lB90qD3lWHvYsS3LhxTmUxNgW7rfIDjbJDjHOCzMt2r+PE21VGmdXluhQ ecip+ohrzVE3Olyrj7o2ZvrWpXuLUj3qjnk2Zvm25gZ0FAT3c3wHuH4yfqCy InSkZv+YMHJcFDlVFzXbGHOi+cCJFojY483R842RJ9oST3UdPtebcmEgbVGS cVmauSjJPN+XdqH/GMTZnpTjrQcnxNGaqv3ysjBxim2W3+vxti8dctpQGbdj ojbshuLYFUnyQkukpsxdwXFQlNjLimy6uFa9AgdpddBIU9JMVwHaZGqwfVra ManonKQOFW2TI81TY0t5k5VswuxA0TsuWDdjomsTVh0X8Qici1bKmLCepO4v tYEsC715kxF5I8RSv4lSu9lE2caYIdw1M9w1S+3I7kKbjCnbyBdGfxwRyZto bVKHMaKuH1XVj6nEEJOqOrDJrIbiyZy6fmqodkxSPtd0UFUaOMTzUvDcVOWu ynI7hcBKVWGnrnTQVLmNVPkMVwQoSwNlnAAJx1nGc5bznWVch6FSJznXDnAx LLAHm6i4VqoSCzVn3wjfakxgM1q5ZBOECTbC6++FL3cbqPVTNcWPdz2d07XU b9IjksMZT1ozRO2FrxpTtZAT7Oo2wZ8y/AThNNjdwm+oyWWphEQ1PwOkQNmk 6qlNWG3CaBO9B79nFnSRThPm4kWECS5exEQJkycAE5zchTbB4V1F2Ym8/MMQ hVnxucfQJkfg6xdXZjUK8xpqc+uqssRVWQ01OQ212WATOnIgmkS5TaK8pSaF dgHdm0Ct7aYHdlXo1nThiXr54kXqUI1lXfAQeQIh7a1WDNSChWfHO07N9QNM zi/ITs31nJylbTKzzCYLsz3nTlI1XWeOg026pkaWbEL21GCwVpkw+01I0gQT OoRITAXIeoXSnqWglxJSgaOPR4fg1xl+qeF3hzTCI0ngVwnM0q4tssLMSAs9 SquJ3ufSQI8m1hN0CVkdPRyMCiIRbYjpYPOEjgYSKkkj3oHPBffhw8LXPNhV 09tW0dNaDgxBmxCYwIsZ7kMgWEg0CYt0o7GWer5ZVNwiBpLACxVeokW6EmHN 8iIZQ7AJs5oLbaILEwiq+qu5squpvKu5HG0CCpb3VyslVN5EJa1WSatUMsom 1Dxhet8i2mRUJpR28kWCoxmHfMN8TCD8nLc7mL1qY7zZas8mWxNDV+t/Ye43 YdkEYMLMm6TEumQf8sE5XVjQpejgjg5UTitEYJOLsz2XTvRfONGHnSZXz8jo NhM51nRdOa1YXJAvLsjoW8WVhSGIq6eU106rrp9R3zhLZVLuLU48uDKFHSUQ 716dff/G8Y9un/zk7qmP7ixglRcmSpaN56K7UaiOlQvD2AtPWk4wabJmk7Vr 7Vq7Vr8+uX/ulw8vfPrg/GfvXvz2s9v//v3H//1vX/0n2OSLex/dPXPv8syd S1N3F6fh9t6VuRvnxm+cG3twZQb+v/T44emvHp396r2FT25Nfnht+PGdiV8/ mof48v7kNRV3qDJKUhomKQ2XlkXKyqMkgoi+0v3SytgubnhbUXA3b39vaSRE QWpIygH3uBCbjETvmqIEMedgZV4MNyWw6LBvTpxbWrhtkr/ZAY9dUS5bkz3e SvfZVrTfrPKgozDZvS7NqynTb0AQO1B2YKCcij5BTH9ZLNxpKwqFaC0MaSkI hmgvDunkhA1WxPaXRXVyQrq4oT388C5e6EBF5JgIMBI11RA735J4oj1pvjVx ujFugVpfcuRkx+ETbUmnu44CQC4OpC90py7K82+N8u9NlN8ZK7uqLDnTlz3b mjIsjO8uCqo+7JQbsueg05aIfRsDTF8Kt9qw32rdfquXktyM+HG7JxtirsiS r8qTz3ZFKvl20kIzSaGJpNC4r9Sut9RxoCJA03CQ2gs/WDvbL54abJuStE/I 2yfhoD7cMjnWNDXeODPWzbQJyynMVRfM/SZ6eaJrE93NJmSA8NJGxRWyJJhS WW6Txue0CV2UVQdvWtqHQosD9AExroLD29LI06nhHpwejI3wpL5Fm5ERL2s5 UdZBjCrrxiiY1E+o6iZU4ilN/bhSNKEUzgzXz402TimFmgHBbOfBPp67pMxT Vu4lFbhLBa7SUpehMtchgYuq1Eld6qjmO6j5diqerZxDhYK7bBowMyFCgtkF Tw0Q5tpR/5AeI0z+Lf7zgUpvSU2gsj5+rD1jqps32VM91i0c6hApOsXUIuwB oUJeM6SsVKorxtWtrGYTiJVaiuCnCd8fOL7CsRyOc7Vl6bowgUCY4CRh7IJf acgqa/m73m0m+m2i3WyiaxPkCbEJWXSCATaB4BccpVcuJvAKDkIU58QVZMaU 5MaXlRzB9ZH11TlwZIXAWWR11dl11VmiygyI+prsZnE+NUO4jd/XISCB7fO6 NsFeEt3AZYva7AlWT9VKeirBJqDguYlOsMlS3mSu6+Rsx4kZKo5Ptx+f7mDk TaQXTsnPHB+cn+yZGoFX9dOMCbEJ+UVmwoT8PpKkCd0LX8Ns4dfuNKwls4XJ hGQAArw/Tv/GQQrMPjLdxCgrcJ87MwlCgnwr8JNiq87y/e81K0zuErM+CAQy ELdJwpcNPx043nc18+AFzCzrIk5Bqqwe8MqHgDv4/oga3dpFXZtg4JwunNCF NmlrKGfmTcjAru6WCpxd3NHI726hRlXDS2toQEjnhatpnmD2pFo1UKkZrAaS 4H6TSWX9QBtHWHokPclnv58Z2MTL4R2rPYYWuzZZGxvYmRq5WL3u5fCmv+u2 ANft/s5bQ+i98KSmC1MncUEWCSHWhyLs0+Lccg/7FqUGcdJDcYZwb30uyZuA TS4eH7h4YpCeGCwjE7qwFx6dggFvvX526OY5FcSNs0q4vXVeg4sX719mDhCe enCZ5smdBYj3b8xTfSjXZrHThDmtC+vBbl5Y2rRI+k3IGOF/9MFn7Vq71q5/ 6gtsgvH5o8XffH4XbPJf//rF3//4Jdz/4PYpsMmDq3Pv3TgB8f7tM/evzN+/ MvfRndNfvnfp6w8ufv3+hc/vn/j09synNye+uDf9zbtzXz+c+fzO+FUlR1kV LSvbLxFARABPIMAmsqoD/WXRBCZ9gqjsw35HY1wSwmyzDoJN4oTF8fyMsMIk 7/xEz2P77eK998S67zgSYJoVad+c6d/PiRyvSznVXbDQXTDdnDEqTp5qzZxs zRhvSR9tShtpTB1uSNHUJytFhxW1SfKag3AL95WiQ0pR0lgzvPWorBoUEyWp jFHVJc71ZJ7qSlnoTD7RfmS+9dDxNiBJyrm+9EuS7AsDmWd60k53p57vz4CH FwezTnalnRvIuSDJO9F5TFUV25ThyYuxzw8zP+azNd7eKNxsffDel0OMXwo3 2xhg8lK45cYI6w0R1uuS3LZwYnaOiqKuSFOuylLOdkUp+fbSQnNJoSnwpF9g 3yugbDLcmDTfW3Kc3gv//DYh2RNik1VCb+pEr02YGRNmxbguTFgJFOrOc+dN iE2QJ8QmABNiE1wPNz2CjfCd8DxBk7a5flm/yfPbZLo9vofjMlDqLi3zlJS6 SUtdJXxneSkVSr6jio82sQeeAC4wSB4EArVCBeP557dJf4UX2ETdmDjWljHZ xZ3orhrvEem1yZiqhTlAGH/oq9gEvjlwYoRzHRzan9MmeDZb3SZ6Ny3qzZss JU1WtgmrzQSjrDgVY5lQCpMExYchACmFWbFoE/gvosYgV2XD+ZOslQSSCCvS a8rSasuPiasyG4W5LXUFhCQYcL+/s+x/bpOhwdoxVSPTJidnO0/MtNMqoWJ+ sp3M6WLZhFXQhWRgzeYipZVLMx+o38Gl7erMIV2MvEkNUyXY7E+WttBN6FTq jVW3ierRO9oCft/pNAcbFHptwvyOEZswgxR9LU+mLAVZHE9s0t9BTbvqaS3t buGjUJAnz28TeFVAEJ5obVJMeKJ3U49em7C6TlaxSVdz6ZJNBoX0/9xqlmwi p2yCeROSNIHbvpZisEnGIV+wSai3sZ/zdnuzV6m98Ls2AE+cLV8Dm1Cjuly3 B7puxyFdwJP9dC881nTFBuyLC7IEm1A1XYd8wCbcjLCa4vj60sNdoiywybRC dGqs9cJMN9rkwvEBDNxswhgj/NQpty9o7l4auXNxGG/BJjfOqm9fGAGePF2n eGHi9vmJOxeXWt3BI+9em31E8wRtsmwjPDjl0gjahJAEkbK2F37tWrvWrtWv 7x7f+dWnN598dA1uf//Ne3/54Zf//W9fAU9+99WDLz+4AgFI+cOvHv3x2w/+ 8uMXv//Vh99//uC3n9///rM7X7+/+OmdhU9vz396a/bxnZmv7s89eTD/5b3p z26NX1NxwSZU3kQQLiuPkldEg1D6ASmVsQPlMUASCLBJFzc8I9EzOcY5Ocqx 8Ki/qCReVHSAk+xflOSVF+eWsd82O9K+JiNkSJx5YrD8qrLihrrq1nDNzeGa RbngdG/RfHvOTHv2VFsm2GSs+RjwBGyiEh8BpMD9idaM6Y7smc6cidZjI43J 0x2ZU+0ZE61p462pk+3HZrrST/TnnOvPhjjTm7nQdexkZyrcuSjJuyTNvzJU fF1VclleeLo3Y6opSV0T3ZLjLUp15sSYpvq+Hefwapj5usA96/x3vRRs/FKY 2Tp4GGr6cojJuhCTjf7GL4VabNxvtTHccl28k2Hh/m3qqv1XpGlXZalnu6Lh 6CsttJQUmEkKTPvAJv+DvIneHXyr2GSlXvj/iU3wrXi2obYYrGwTJkyITUjq ZETRRGwyoYYT2lOb4LJsbDYhpyntR/iJNploOdBZ5NTHcx0sdR/kA0xcwCZS nqOM7zTEc1BSMFmyyRCDJ1Rw7ZgqIcVa6jKn57dJX7mntBZtkj7eUTLeVUnb RKxrEzKnC21CKKob8MOFHyV8G+GMt7pNasuywQssm+gdsqq3lOv5kyZ6bQIS IY3wWMqFqRPsN2EKpazkaAU3uZxzlJufyLQJPQY5C/4DQSgAE6rfvzwdVFIt SIUApNTXZDeJ8pAkPW18bJynYNJVPtD1YjbBlhNy8Jb2VsHhE22yMNuH7fB0 uqRtfoqKucnWuYm2uYn2FWyip9+EJFCYqY2nBqelgChgLV7ErxNhot33sbT+ Q4sXMb3gvhltwuxhYW5WJTAhowBIbRsihWUTAhDmphgSqAzS10O+ZsQUc6gX GTuAM9DwvwJ5gkMMkCeYPWGVeKFM4QWgN9Amy3lSzGo8IZ0pLJtgTRdrrQlm T1g8AZvg7GKWTVRSkTZpUos2wX4TsAkE3AGedDcWoE3CfU1xxYmb9S+s9xrZ GBvifhOq2YTevejvvBVnCLNt4m8eH2x1JMrxWLx77mHf4rTg0uwIgElb9bHB 5sKR/oo5Vf2ZifZLc72LJyXgEeQJ3GIOhZBEO7CLaj+5dR4kooFAnty+MHzz nOb6GRUEzg2m3TEJNsE2E2ZzCnqEZRPq/uUx4hEs7iJC+UcffNautWvt+qe+ wCDff3Hvt1/eB5j8+/cf//XHz/72+8dwBx7Cm/711+/DM3//45cAlv/+07f/ +Yev//bjk//88cs//frDr967dP/ixMc35z65Nf/4ztxX9088uX/8i7szj29P XlfztDbZDzBRVMagTQbLoxAmgxWxYJOGHN+0WOfUGKfsBA9BJrXZRJgfXXzI OyfGMSvSrjDOuTE/cqK18KJSuKipezBZD3FvXAw8uTJUfkHCO9tfQtmklbIJ BggFYAIB9yfbMjHAJuMtacCT0aYUsMlsV9aJ/rzjfTmz3RmnenPO9Oee6cs9 1Zt9sjsLAu5ckhWf6c+baj7aywkpS7RM830zzvH1/ZaG+y03hVtuCLfcGGax MdR8Q4jZ+mDT9aHmG8P3GYTt2xRiBs9sCDXfFAS3FpvCLOD+S7H2m/JC36Ft kn5VduxsZ4yS5yQtsJIU7JMUmPfybbt59n1lfqq6hJkuai/8dK9wauAn2mSV fpPVZwizmk1IZdfqze9MszydxqPPJrowYfJEW9bFskmXNmnSi5mU0SGASQv5 erQfQfjTbDLeHNNR6NjDcR7gu/XzXAZ5zoM8JwnPUcpzUHDtlTx7FY+CyTKb 0CTBEi+iDKr3hF4HP1Lp+vw26S3zQJuM0jYZew6bYPHP6jaBwyd8f+CMB8c5 OKHhbC49NhFQNsFeeDLISO+Q1Z8Ck5qnMFndJiRdgqkTXZtUclPg66/kpfAK DhZlHwCbCIoPE5vg9hb4b4R3qClLg6gqTYEApNRVZ1H9JvT2E1LZBTZ5wbyJ WGsTETl4S3ur4VUHNpkd78C98MATKldCYDLZOjvRNjveptcm5PeLKRRWxgSD uQ6eHODJgZ/JExZMcPEHZjRUkjpcKElqAvE3nXxwZsaTKZGVbMJKmjC/h8zQ tQl+PSRpQj4+qyyNyRO0SVczj6RO6AaTJZugQcj6Hmbga4OkTrTFXUVklQ/x COvhEk/qBTgxmFnKRZ5h8qSrmRoRRiueBzbpbSuDL145KKL/R0fDhLaJRlED NgGPoE2GJTUQnfV5NbxDxCah3sY+jlsdzF61N9uCzSYAEyqc3mbuXgz32P10 Tpe/eVywJdgkPcEj74gfJz20LDeqqTy5U5gpaSnS9JaBTc5OdqBNACNY04V3 gCqoEiQJdoJQarhIqYQRI/cWx2+dH6Z5ogGP0Cvgp+8vzty+ME7a3kEoiycU l08OEb+ASvCtujbBecL46f7RB5+1a+1au/6prycfXfvqw6tff3z9u8d3fvz6 3T/95iPAyH/+4fP/+O0nAJM//OrRD08ewpvg3X731Ue//+aTf//N47//4ev/ 74/f/Pm7j7//5e0vHpz57O7Jx7ePf3Xv5NcPTn55d/6zm9PXVFxVdYy8PEIq 2C8tiwSeyMqjBsoiB8qisJpLVh3fw48QHLI/ut8mNcq+ONlPWBhdX3KgKiu0 INEtP9YBoirNX12XeXW4/t5M+42xxtsjtfcn6h5ONQBPrqurzg9yj3fkTrdl gU0mWjMYEskAoZBn4M5EazqdMaGEMtWePtOZebwv97S08LS04Jy05IKce0HB OzNYPN2WIa+K7ywOzY8wSfF9O87plf1Wm4LN1gWavBRk+lKw2YZA03UBJi9D +Bu/5Lf3pQDjl713vOS/d12IuWGYxeYwiy0h5kZBpob0QyPQSqj5+lg7o7yQ bZrqKNom6Wc7Dyh5LrRNLCUFFj08my6uXa/AVymOn+4smOmtmuqp/Wk20dsc vbpQ9NpkpXJ0XZvA0YJkT3Be6EpzunSHdGkrHxipE/qzIEyITQAmENoueMom JJVDbMJMnbxA3qQ5FmzSy3VBmwzwnJZswqVsMsSlbKLi2UIouLZEJSRpQmAC ARghPHnevEmZp6QmQNWQMAqvSTpvslK/id6arpXGR8M7wPcHDkhwloMTml6Y 6NqEpE70ht5Ni6xqrmXLFrVJk7rKfL298MxOE5QIJk2ITUjvCTVSTMcm1H6W ikxyNEWbVAtSQSWVvORKfjIghZR1dTSV4AIUUt/1/DbRZkzE8j7R02qlvhp4 1Y2rm8AmJ6Z7cDU85k0YQmlfKW+C5GfyhGzVZNmEUdDVQHflU18SaznLEpe0 BV1MoWhtQu2RZKVpmOphrSNBBGFL+0odIsykCUsfzNIyVtKE5E1YZV262Fml sgtTJ6TJiCwVZYVenjTWFpJJ16tP8WoS8ZrFpRAtdQIIVAkJJk+ITajpXk18 sAl85WATerY5BRONXKhR1DJtArfqgSrNYHVHXW5FccKxg97YbwJC8Xfd4WH7 JtiElTdh2SRSO6orCoQSsO9QhP2xeHe0iSAnUsxLaiw72lqVBjyZkgvPTLSf n+66MN9H+k0QJvCQCRNikwdXxt+7PvXw6sS9xVHaJqP3L088vDr14MpSQRe1 weTyzIPLsw+vLI3qwpldwBCACRkgTFY3Yk0XSZSgStZssnatXWvX81wAk8/e vfjJ/XNw+80nN8Ajf//jl//1r1+ATcApf/nhl+AUzKQ8+ejBF4/uPH73xjcf 3v3XJx/95+8+//sPX/z4+M6v3l/86v6pJw9O/erdM0/un/j0OtULr66JlZUB TCKITQYhKmKwmktRmwg2KYwxPxxmkRZlW5EV0lp6sLEktjI9sDjRNSfKJjvS uirVV1OfcXW47uFc+3vzHZflglvDNcATiDtjomuqSuDJRHP6REs6emS0KQ2C CZOp9iw6MiCGG46ONaeATcZbUocbjqjrk2Q1sdKK+Nb8kNJE+zT/7dF2m/33 vuy+7aUoW4DGhmCzlwEmECHm6+BhmKVhCHDDwiDMcnPoPqNgMwO4jbB+PXTf lgBjA7+9m/z3GgSawPNbAk02BptuCjHbCDaJsTXMCdqqLI+8Ism8Ks0825mg 5LlJC2wk+VaSfEuWTWZ7q14ob8L8Q/oze+Gf0yasfYurpE6YZxsSq9iEqASD lTrRyBuJTSY1nVPD3cQm2kZ4SihPW4PpOV1oE+QJJRSl+DltMtUa11XsjDVd A2ATrlM/x4Gq6eI5gk0UHLshju0Qx2aIYy0rtpaV2EAwoUFgwowX6Dcp9xqs DhiqiwObTHRyxrsrqb3wz90Lj31GrICfJrwPfGfggNpaVwTHM70wQZsszeli 2GSV0G0wYWZMWCvgmTBZaU4XKeJirobX7YWv4CbDVwu3YJPCrNjinDiwCavZ BG0CKqngHi0rOVzOOVLFTxFWpNdVZzWL84EnbQ1Fnc2c7lYeVna9qE1omAgZ 3RM18MJDmxyf6j4500tHx7Je+KkVe+Hxd4qMm8DfNaIGohVmCzzCBE/vqA/d r1+3Fx7/o+DwjzVd+LlYAy60aZE6BkmWFW7pzgdmOoIJEJaMWDxhfpNZBWDM /hRiGVZlF641weFdxCaoElwqygpiE2ZxF74+yUpQZrCEAjZpEvHRJgQjcIc8 JDwBm+Asu7Z67uo20dA1XQATYpN2cY6g4EBKvEeEvzkECCXQfZefy3YXq9ed LF51t/052ITevUjN6SI1XWEeuyPosi6qI562ycFw27Q4t4LkAF5meFluVE1x fIPgSKcwU9ZWMiGtOTXWCjY5P9d3fr4fm01AJZfoEi9SzYWB9V23LqgxY4KV XbfOQwwDTN67PoPTg+lRXTMPrywNE8YGeWp4l/YhqeYiQrl5Xo1TucheeIKU f/TBZ+1au9auf+rr649vfP7oMsTj9xaffHTthycP//y7X8Ltt5/d+dWnt373 1cM//eZjcArY5Mdvfvn9Fx998/H9bz6697svHv35u0//63ef//nb93//+Z1f v3/xV++d/fV7lE0+vjZxTclRVUcr6LyJpHRJKNLKWEVNgrQqXladoBQldXLD c6NMUyJsMmKdxEUxXVVHGzkHKjOCChNcCuPsOYlOHcVRJ3pLro+Kbo3X3x6v vzNa82BS9HC67sFU3b1J0Q1N5QUJZ6Y9c7Yze7oze6I1nYYJxZPJVgDLsbHm 1NHm1InWY5O0Tbp44d38/X1lUR2cUGGGB++gdUbYjgOO/xJt92qENWDEAOgR bL4x2GxjoMn6QNMNwfs2hewzCDDZ4Ltnnd/edUHmRv4mBr7GG/1MNkEEmBmF WL7qRz1j4GdsGGC6OdDslQDTV/xNNnvtXOdnvAmEEmS6PtLaMMP/bQk35Io0 85os81xnnLrUVVZgJckzH8w1G+Da9HLs+kt91XUJ092FMwPVk/2icUnbuLR9 XNExoYRDaev0aPPMWBPZC88Mkj1h2kQvSVhmQZ6gTXQHCOseY+h92XpCJaXG 7Kil9XBfLaNOOyQPwgxWxgRCMVA7NAgPxfpsQmq6kCdLc7pIL7z2q6rD3YsE JtSiEyW91mS5TSbVcCuaVInAJhATQzVUL3xrXC/HtZ/nKil1H+S5DnAcB7lU s4mc7zhElXXZDXGXbCItoW3CWWYTXZioy51Hq5YGCANAlirBcLoXn2pgUZY6 YqgEToMCT2mF/5DowEjrsfEu7mhvlaanVtYllnXXSfuEcvgWyWrUQ5UaZQU1 RFrbMY0tA8x8Gev1AO8GPwKyFH5lm2Th7sW6qvzGmqLnyZus1P++LGNSU8iC CdMmABOy3AQ9QmxCSEJUAsHLP1LBSanipVVwU7j5YJMDYJPSokNam+TU1zy1 CZAEYELHEXBKTdkxUWVmkyiP4om4oK2+qLOJ4gnahDo299DHZjoPwjp769iE 4omst5aOGnl/jbamq/3EdPeJmZ6TELNddDs8HdMdJ6Y7cZKw1iYy2iZdk8NP h+DpJlCYfxOAIEVWWPLEPP/rtQnreE8ggAVa2BFP/qRAhiQTlTCTGtj9odvM rjfHgd8ZaQ+4qWqgs1I7qBm+SPhqgSfwbjV01LKa5VklYczkC7M+DdfTgFA6 m7ht9cVoE0yZYasRa68ojkqAFwZJnWh5UsDkCSWU2mU2IWVdzWJ+s6i0RSxY ZhMqh4JaEbQ1wJNl7Q1lnU1lWpvwOhp5Pa2CQbCJRET9Dw1gIqsdlguH5bXD YJPBarQJ3IJNIDrqcsEmqQmeaJNwX9MAt53+rjs87d8EmHjav+Hr/I6/6zY/ 53fI7kVqjDBtk0h6WtcBuhc+ab/dsXj3otQgQU5kRX5MbUlCS2WqpKVI3SOY kgtJLzzCBIUCMLl8Skb635nTui4vSC+flF5ZkF07rbhxVnnjrOraaeXNc5q7 l6jdiwAQKq7OvXft+N1Lk3R91xQahJ7fNYlUITbByq6nNqHv3Lk0chseglPW bLJ2rV1r16rXF+9fBZXQNrn81YfXPn905dvP7n7zyc0nH92ANwFPvnt8D575 4cl7337x4e+//fyHJ5/+8OTj7z5/9/vH93788sFfv//gb99/8Icvb37/ycVf PVp48u78R9eHF6V5Y6IDk/UJEn5IY4ZrR4GfojJmsjVtpjNzpjPnlKRkuClN lO2fHbUvPcEjO8m7SXCktSJZXBJXmRWSGW2bE2VZdtR9qPbIJVX5jbHqGyNV 96fEd8fLb48Kbg7zb4+V3Zuquj1evqgonu1MP96TPdcDNgGVJINH1HWH1OLE kcZD6vqDsprYPsH+Dk5IU4E/N8kmL8YsJXh7gtfPo5xfCbMzCLLaEGyyPthk Q7DpxhCzTSFmBsFmhhBBZkaBZkYBpoARQ3AH6MN3LwBkCwnfvZshfPYYMZ+B hxguOzb6AFLMNvsabwi3Mjzm91Z3UcA1RdbNocyLndHjFa6KQnNpzq7+jHeU BZbyfGsp10sjjpvqLRiT18ABW6loVw11DKuo/Wgz6o7jmtaF4dY5fX8qZyZN mNVcukOc0CbIE/Kk7tZFPCkxW87pM1KdSvq0YWT1YPaSMJ8k6RJQCQSc8bC0 g7U8mvzpePkaiE6ECfl7MvVVScWsXngqVPWjtE0wxpXicaVobEgIPAGVTGvq JpTCUVnliKR8ujlWwvMYLHGR8dxkfLeBIgc511nBdx6ie+GH+A5UcgRnCPNs ZVy4tcNQ8O0hlAJHVZkTBqgEY6wabOKkEtgreDZyrjXwhGqTB4/wMZyUfGcM RYmHutRPI4obbUvX9HCUgzVyaV3vIES9ZFCskIg00ppxWeWktHxS3cqCCe43 Yaa9yM+RXm4i7mktbRLmw+GtgpsMQacVUpbP6VraCy+upFMntcU4Sfj5C7pW 6nwnmxZxBTymS5gTukibCdXqzug0QYywAjtT4Jabf7goO744J6G06Ahd05VR V51VX5MtrsqsKUur5CcLiimVlHOOYhlYbVk6HFDhRIp90CA1XNvX1czr6ywf BJj01Uh6qyHgjnyASlTJ+mtZIe8n6wWpZBZ9Aq+W9VXTM4TrZsfbQB8nZ7pO zS/busiM0/N95xdwv0n/3ET75HDTmKqV8J/Ve4IwITlKMlyXdJczYaLXJsxk BP5DMh0Le09Y/SNk0i9js+RSkZguGeAz6k1z4OZHSbdwoLOmr70Kd7vDnf6O anhmsKsWAt5Kb4fUM+tYb96HlTfB1Ak2nrSIC4lNSGAChSAFf/qk92TJKZV5 iGV8lcKLFgJzKMQmS1tO6sra6yog2sTlraKyVpGgRVTaLOQ1C7ktIl6L+OlU 7VYgydIaIF5bPae7mS/pqtRIxCPSOjAIxqi0ZlRareqvwIegkmFJjbKvAmu6 sN8E1y/6OG31tH/Lw+4NsAnuhad44rLN33lrkHa/yX6vvZHa1fAJIdaJYTaY NylMCQSbVBfFCTmJDYIjPXU5YJNZZR3Y5Oxkx4Xj/aTfhDmViyRNnnadnFOR GcIQ189AwEPN7Qsj4I73rs2+f2P+/Rsn3r9+gkYKlUbBocG6C+WxposOzS1Q yfLA7Mw/+uCzdq1da9c/9fXZu5c+e2/xs/cuw+3D6ydunBt/dPPUnUvTELcv Tt2/Mv/ujZPwzMf3z3/88MavH3/w1Yf3v3v86Ldfvf/rT2799vHdv/32w//6 4aM/f/vg357c/M1HZ796OAc2uSzLn2pInGlK6isJqEtzkgj2n+7LvTpcfkVT flFZdkEpGBIfqUjzyIwwA5vA/1qbBIcb+EmVuRG8FN/cOMf8WBthZsBIw7FF Vfn10arrw5W3x2puj5bdHC69oQGblN+frrk9Xrk4xJnvzjremzPVkQEqGWk8 qhQdpKrFeGHtRYE1x1yLD+xLD96e5P2LWJdXw2w3BVtt8Ddf72u2zs9sXYDF +iCrjaH7DELNIQxDaJUEmhoEQCBMTI38TAx9jCEMvPca+AJAiEpoiXjvMfLa beitDS9tuOw08DZ91c98i5/pphALg8MeP2/N8b6myL6pzL7QFTte6aYo2ifN 29OfuW0o3wJsIuF4qsFxPfmjsmo4bANM1MrOEXX3hKZrVtN5crj91Ejb6jZh zRBeZTU8c8uJXpuQai6iAOpvrbL/Q5s87VWh/7pLDmyklonM6RodaiWpHL17 4Uf12QQCbAIwgZhUicbkVcODZT/NJggTCKZKNBUuGGgTZakdwARtQhdx6bHJ EMdTIwgYFsejTYYGqmQSUQ/LJtJlNlmppotpE/i+DQ0s2QSOZ0ybMHlSK8gi c7oIN/TaRI9HalYcF6zbY6LXJszuEnJfr03gSXw3Tm5SfkYs8ERQfBT/Kt5Q mwMBQhFWpFcLUgEmTJtQk7vK0nEHCnwr4EDbVl+M+8T7Osr7uyoGuisRJpRB XtAmQ4MMm8y+mE3InC7dYPanM/vfmQOssCCNlTdhtXUwBQF3SHJE2z8iZvWP rJANYcNkpScl3bVgEAjACMCkp5Uaqwt3gCc6QlnWjaL7McmTrKQJBmmKh58m qBPcgQZhwmRptSidPcHXwNNCr3KqiBFHZ1M2YSZQWDwRC2iSUNEiFLQIASb8 plpuUy0HeNIs4jI6U0raGvhgk7Z6MEtxVxNP2l2l1yaagSq4DypR03dU/ZXt 4pzS/NiUeI8wH5MQr73AEy+Ht91t3nC1/pmr9b8AT3AvvJ/z1gCXbWATsn6R 7Dc5ELAvPtgKZwjnHfHjZ+2vKY7H3YtDnbyxwaqZIfGJ4aYzE+0Xjw8ATAAj 1CQuevXhncURkIh2NfxSywllEwZPaERQNV30AOFx7C7B3YvvXp3/4OYJcAou i8f1i7hEHj2C9zFunF2SDjNwINg/+uCzdq1da9c/9fW7bx798bef3rky39Uk yE2NSTsYmhwflH4oPCs5MiclOv9YbEl2YllxSl1Fbqu4XNLZIOtqPDWl/ODO BbDJH568+9fvP/jvHz/5+w8f/O03D377yfknD+c+uzNxVVEENpluPNjPCWzN 8ZxqOnpnourhXP3N8ZpFdcVZGa+/4gDvsFNWpDnYhJMe2lJ+VFQSz00LLExy z09wLoy3bymKmO7IvaSkbHJ3UvjubMOtkbJrKv6VIe41del1TdklOXehJ2e+ K2e6PUMlPjRQHtucH1ia5FAUa5nqt/Ww5xsHnF+NstscaWu039YozMYwwGw9 hK/pOh+Tdb6mGwIsNoXYbMZESbAppRJ/EwM/qkALbLLF33Szn+lmHxMjb+PN XsZGXnup8NxjiOGx2wDDfdcmCI9dSw/xrc67DD2MX/E23eJtYhBgvine5bWG LM9L0swbqpyLPfFjFe6yQrDJ3oHsnfK8fdJcq8FiD5UwdqI7b0RSRTVQLLfJ ieG21W2iu99kFZKwpgfr2gTXKZJWXOx2/7+zCQ4UJTYhtfG6NsGl8KSHFz8L scmYqnFc3TSq1mOTCZWY6jpRi8EmcDsur6Zqul7EJiyYsGxCeDJa5cK0iYK3 ok2UXE9NWQCVN2k9pu4uUfRXSgZqe4AVA3WDAyK5RAg2GaNtMqFqZdZ0rbR/ E94E7wPfH0W/CG0C5zG0iW7qBKRA9ZtU5jFtorfTRE9fSXXh8ydN9NqEkISU csEdvTbh5B7CdyjOTsxLjwGblJUkC8sz66qzG4W5EPU12aLKjJqyNFAJsQme TuFoim0pwBNMnbQ3lMDhtrejDKKvsxx4gjZZKfTaRNoLNhEybUItXpzRAxP9 eRNlC6usC3cj6rOJmJCBtIdDsHgCgWd41pvwrbRNxKymElbfB3NPCiKI1eFO chmsFSraecXVCBMI9Agz4EmSOqGrvJ5+EL2fAgP/S5k2gfu4kBG7TuBnCj4l 7iDz6Fivc4IU2ilL8x8om1QXMF/AzB55iie0TWiVUNGsYxNSANZQW9RSB+AV tNbBb0phZyNXRtmkTo9N6MWLuBoenlT2VbSJsrk5UYeinXFIF9x62b/tYvkz J4tXXaxex7IuKnXi9A5tk+1BLtSWkzCP3QgTKsgM4Tg3sIkgJ1LEPYhzuuTt HLDJnKoe8yaXTg5i3gRTJ4gUXZhQoc2YaHmyZJM7F0dxaDA1LvjMyM2zY2S/ CVZzYSxPlxCkqIl3SGA/yz/64LN2rV1r1z/19d1Xj2bHJUW5h44khkSFuvu6 Wzpa73Cx2+3msNfd0djLxSzQ2zZ2v9fRxNDEyMDEiIDkuHBBwTHNYOsnd8/9 /quH//Hte3/9/v2//ubdv3x77/uPzz15d/6L+9M31RywyWzzIXlZeG9J4HxH +q2xituTtZc1ZReVZWdk3O7S6JKD9hn7TTMSPXkZYe1VaTWFsXlJnjlxTjkH HPiHXQerDp2R8q9oKq9oyq9pKq5rKm5qyi/LuRclxZdkHIDJmf7C+Y4stehw W0FI2WHH7DDjg+5vxjiAR16JsDIKMd8YaLouyGw91UKyzyDIwjDE0ijIwsjf 3MDHZKOP8QZ/M8Mgy1f8jDf6GW+iSGJiCOFrYgQkoVIe5lt8TV/xNtniZbLZ 02SLp/EWj71G7nsN3fcYuEHs3oThuosK6v4eA3gTvIPHXkOn3Vtc9rzibrzF c6+Bn5lBguvPmnL9zvSk3lDlLfYnDZe79+WYDuQaS/KM5blgE0vaJjHjXbkj kkqwiWpIW9OlfnZNl25Z1/NkTDBWsQlzks//kU0UA0Ldsi4iI6ZNSNKEuSOb 2GRYAQxpeJZNRE9tongxmyiWV3MNlTpAKAWOGMzKLrCJptwRbSLjWCl4tnSz yWo2GaFtIu+rAJt0E5sMMm3SwuyFR57gHVbA+8D3B46aYBM4vMF5DM7qenmC /SZL7fBVBcw/Ha8+KJhZsa87Llg3abKSTci+RWwtAX3owgRtArfcvMNFWQkF mQdKchPRJlRChLZJQ20O2oTuhU8mMMEgHQeEJ231xT1tgp52Kvq7KtAmKwll BZtUKSXCMVX9zFgr6GNhrhtsohcmem2CS3xYobfDi7lsnVnmpMsTHGYFt71t AjzGQzBnedEtJ9RfAMCtuhsSmfvlWTZhkYE1plhrh6cpEhLMZzBvQtuEXZOm d8IYrobXDSzrApuQdnj44RKYEJuQlwHzlUAVepEeK0behNR3MRMopKZLmz1Z saaLqocUAXhLacUXdjbx5D3VwwATWT22vVOzuWS1Y7IazWAVDukCm4BTFD1l rcIsXm50YoRDoPsusAmEt8M7TvtedzB/xdnyNYZN3qZs4rI90HkbRKj7Lizo AqHEBuyLD7E6HOlwLN69IDmgLDcKbIJDugaaCkb6K04MNwFMzk93XToxyNwI D/dRKMyCriWkaPMazLzJvUUACDWG6/LJoUvH5ZfmFYvHlednJRfnZVdPqXC5 CY4XXrZy8alT1mq61q61a+36KVe1IHewu/7ejbOzE7KYcG9H613+njZeLhZu Diau9iYeTuaB3vbRYV6x+30ORgVFB3sdjAxMT4qsKy94dP3k3373yz9/9+jf vrn/+y9u/OGLa999eOarB7Of3hpblOaPi+PmW48oKyP7ucFzbWmLCg7YBGu6 Tg4UtZWEFSfaZ0aY5Rzy4Wftb6tMrcyNzDjgnBFtlxVjJzjqIak+tNDPOS8v PS/jXpByzg0Wn+rOPddfeFnOv6zgT7cca8n2L4owP+z5ZqzDKzEOrwFJwiwN wq2MwiwNo2xeDbegpmmFmBsFmhj47t3gvWd9qOVrQfte8TM18t67yWvPJu+9 Bv5mW3yMN/kYG/gCTEyN4CGlkn2v+Ji94m36ipfpq54mFDEwPIyNMCih7DV0 o5HiCjzBQLPQPHHa/YrL3tfcjV9122PoY2aU4P6Lpjz/+fYj11QFiwNHVQL3 zkzj3hxjWeE+Rb6FLM9KUuKpFlF5k1FpFRy2lYo2sIlG2Un6TU5qWla3CWuM sN7lF89pE3JkWjZldAWbMJeVsOLZNlm+i404SDd1QmYID8ubtfOF4GOK1TIx Nps80yaTNEywputF8yYKRsYEYcIMplBGKp3BJkN8W4AJsQn1oXgYjkM8p6Xg eKgF/sQmmDcBm0CgTdSS6lFJxYSkjNiEyRPmJnHm+Fn47sEJE05xDTW5cDbD VAKrsgsCvUCmdTGzJ3pD70gu3XHBCJNn2oQE8ISkTtAgrCjJSQKewG2h1ial RUdEFUs2aRLlgU3EVZn01sU05h/JMbD6C7Mn2HjSIi7sbuWjTbDxhHSd6IYW Jstt0lNF98LXT4+2HJ/q1NqkEwdzMUOvTUaH2DBh2YSMv8PdH0gJ0h5Okghk 2hgEtmMgTIhNECZ4/sfKLviA8j4hqxUd30o+i25Xiy5JSHM6RncLqKECo7et EqO7pZw8w0BKJeuD6/34OD2YtJmQwGHCAEzmanis7GLxRDdpQuVNtDZBj1P9 JjWFpAOF2X5CbLLEE3EZlUkR8ymYiHitWpu01fPq4RdHVNLewG+t47SIi7tb ShV9tTRM9NhkXCEGnoBNIGRdpc01GaX5sQn77f1ddwR77gny2O1p95aj+WtO Fq+RvIm341t+zlTeBGECQgl12xmhLevCmq6D4bapB1zBJthv0iA40l6TLm0t HhusOq5pxBnC52Z7sQueDOmCwMYTFk9uXVjavYjrF+9cHMExwsATEAddoDV8 /czw9dMjVxdUVxaUYBPkCTabkHZ4bEIhNiEfc/kHX7PJ2rV2rV2rXXdunj19 clRUXRIZ5ulsb7zP5C1byx12VrtsLLbbW+9ystvr6WoR4GPv62njZmvqbmvq 52wd7uOUcShyTtP9m1/e/uv3H/zHt+/94cubP3x2+VePFj6/N/3hNc21oaLZ 5kOnu4+pqqK6Cv3G6w8t9GTfmRJeHa44rygda0kXZvoUxdvmxVrB/1fL86Kb BEf4GSFp0Q4p4RaZ0bbCrMCByqTp9tyFvqLTg0ULPXnTzcekpdHCo645gTsP Or8eY7s5ytow0sow2HQ9tfSQHrEVaLqejg1BxgYQwWbAk1eCTDf703O0fPca ee828Nxl4L3HyN/0tRDLn4fbvOlrYoThY7LZ22QLhgclkS1ueze77oHY4rzb yHmXketeAxIuezY5797ICqddGzBsthk67X3Vac9m+x3r3fZuiHB8rTLVfabt 8FV14aI0RVnu0ZFl0pdnJi+2HCqwIr3wkz35Y7JqOGyrhtrVyk7Mm2BN10p5 E9YYYZZBmKE72YnZp8C0CbPfnJSXPDNL8tNsQnhCuk7IhFXWDgiyeBG/HvhX 9HSvOrJ1EXmySr/J0pCuF++FVyzPmLDyJszUCcsmco7NSjaRF7sp+b5q4YGR ljS0iXRQ2NUv6u4XD/QLZQO1xCbjqmUpJCZPmGvE8X3g5wXHTjjFMW2imz0B KTwdI8yovWfTY4XhwCuNC9btNNFrE7xDRgfzC47qqgSjKCuxOPsg2KQgIy73 WHRhVhy/8DBwg8qDiPMhgCfYciKqyFhl1QVOakKedLbwACaksgt7T36aTahJ XPM9/ys20Tfd92lNF7M3nMUTCKYUiFCYrev4W4atK6zODmQCM2eBn4iVyCAq IV6A15g2yohECE/gGXwSH2qLu5ZlYXQ/OFEP+fhYx4X7TdobSrCgC5cw0qve C3DLCbOyi+z0IRmTJajSNV2krItJ6acN8vQLu01cpu2Cpyu76LwJqIQq6KJS J1zSNd8AlhGV4IrS9gZuf3u5sl+k1yYjkhqwCTxU9lWgTZqq0/l5MWiTALed Xg5UQRfYxNX6Z8t74bf6O28NcN66NKrLbWe4+6799JaTA4EWCaHWSfvt0Cal 2RFVhQfAJh21GVjTNa9uOD3eRudNKJUAT87O9p7TzhMGm7CTJudVt5ctXhy+ fQFiBAPE8fDqDN1dMv/eteNwCw+RIUgSerzwND6JE7poyIBEqBXzrFizydq1 dq1dz7z6ehramqtHNQMj6r7igjQvN2tby122FjvsrXa5OZi5O5p7uVoG+zqG +DnFhPrEhvnEhHgnRPhlJ8eo++s/uXfuT79+96+//fBP397/8cvrTx4tfHZv +v1rwxcHsyfq4k52HFVWRfQU+8+2py4OcS6rBZfUgrNyvroxtTLNMzfWOjva siQtqLowVlh8oCTFPy3K7mjovqwYO3FuSEtxZFtRRH2Wf+URl8Io8xTvt6Os DfZbbIi0NIi1eyXadkvYvk3+e18ONFkfbrU53HpLuNWWkH2GfnvX++5eH2i8 OdBkc6DplkCTLX57DL13b/LZYxho9pqv8Rav3YbAE6/dRt57NkNQvSTGRp57 DT32UOFGhYHrbkOX3YbgEaddhk47DR12GtjvNHDctRHDYecGKnasB3o47tzg yHiIse+tjXY7t9jtNLB552WnHeuCrQxL4m1n249eVRUuSpI1FV5d2aYD+fsU JdZKHZtQvfCKdtJvMjfcdXK4nbLJeM9KvmCmTlYKVo8JM1axCfn77XMWdOnW dLF2mjBtIu/HWnchbZOl1AkYRDu/qI0V9OLFp2uytdvkl9lkREXPEKYCkFI/ rhJDjGEv/HA9VdA1VDsqrxyRVsy0HJDyPfqLnaW0TQaLHeQ8gAllEyXPgQqw CU/bb8IHntgNldoPCRwglHSoyhypKHdS06GpcB6pdNHaxFrO0fabUNVc9Axh viMFHyoc5cWuqlKwSeySTQZom/SJaZuIZFTepGZMUjkprRhXtpB5ZQQmpIiL OcEA7sA3B06ecKKD0zgYhNiEKRS6WzwTvEBg8kySMPXBsgkLJsxtJnptQm9d BJgsZUz4hcnc/CMlOYdojByh46lNCjLigSeFmQk5adGZyfvz0mN4BYfQJi11 Ba31hcAT7Ign45jISj6kCrEJNsWjTbrbSpEneAs80Zs9oacHUzaR9aJN6KUe PZUqqYjUdGlt8oyaLrgDNpnQNMIrll4ARKIRgrnklKxBZE3oYs6tIjbBYMIE 4QB3yB52skuRlTFh8gRTFfhh8VPQvSHVA51LY4ExetvKelrhUwi6WyBKu5rB DnxmuoQEoQpph6cru1ZMlLByMcQmRCW4Fx4D78OPEn6gdVXZujxZySZIZiIU 0hj1tEGeTqa0ikvb6gAmpdgF31zLw2aTJiGnGULEIdOGqS6tOk5bPbetntPZ yB3oKFcPikflDaPyemoFvIyKcZlwXFY7CkKhN8KDTTSD1fJuQUNlWklWRFyY bbDnHuCJm80vnPa9DuFmQ8HE0/4NH6e3/V23Bbhux7zJ0n4T911gE0ydxAVZ JobZkJoutEkd/1Bb9TFJS9FwX/m0QrQw2nJuqvPyggQZgntMcPci0yZk9yI1 2vf80u3NpfYT1bUz1DDh2xfHHlyZev/m/Ee3T350e+ERNbBr7oObxz+8dRxu H12f0w4ZnoF3u7c4cfvC6M1zwzfOau4twj8cf3B5DOM+HRR8zq/NEF671q61 a7VLPTzw+ItHH318r7u7If5AaKCfk4PNHncnUyebXS7Wu50sdzhZbvdxMg32 sA7wsvdxs/b3tAn2sT8UG9DVVHrj4uTj9y98/+XtH76+/duvbnzx4ZkP787c vqS6OJg+2xS30HVYURHSlOU0XJd4TlZ0US1YHKlYkPH7aw5xj3qkR1oDQ0oz goRF0YLM4MLDHmmR1ilh+45FWKXvtzgauDfG6ReBZpsCTTaEWRpF2b0aYmkI EWxhGLTPINDcIMAMw5CM1fI3ocLP2NCPnqnlsxf0sTRNCzzCfIgBT7ruXBYu dDju2IjhsGOj/c6lsNuxCcJ2+0YMm20bMKy3rmeF2VsbLbcZWr6z3nbbetc9 G4MtDYpjreY7jlxR5F4eODxe7d2TvVdeaKbmWKBNJBxPlTB2vCt3eLBiaLBm SN6K/SZoE8ybzDPWfzNhoncbo26wNi2SGiFmRRBzHTw5JmGS4pmZEb1CQYnQ DFkxni6Ip5akNDIw0j6m7MCgpwezarqAJI10aCd00TbRqOo0yBN1PcSYum5M LYYYV1MtJ+NK4RjYZKh6dKhqrj1BJvDuKnIY4LpIeK6DHCd5qauy1EXJc1Jx Hajg2Kk4tiqOjYxrLeNZy/k2ilLbIYEdhLLMXlXuoK5whNBUOpEYqXTVlINu 7HETCsAEHuK6EwzcjUIF11VT5jMsjhltS9X0FA+hTXrFXX11A/1i+aB4WCqa kAqnZbUTqlbdpAlJeJE13xjwzYHjH5zo4DQOpzKwiaD4MAaZZAVRU5pJ6ltI +f1KNmHBhPyRWW8pl24LPKngwl3w1OJFXmY5N6OMky4oOcYvSuUVpnALkkvy jmAU5x4mASoBnuSkxqQfDk87FJKTFsXJOwhHUDiRNokonkBgZReeUVlBdvCR fhNqmHAzF3jS1coHoSBSsPdkoLsSAqu8lnjSI9KGUNpTSy/peNpvMjvednKm G2xy+njPSnO6zp4YOHdy8OJpGcMmdWQXDx30AqClicHUHeVgvaJfDLfagq6l fA2e6olNmMF8hjSkaHORddo9JuKVeMLsZCFMGOyimkSYTe5EHJgT6Wouw9D1 CL6V5E2ITZifhVm+xUrEgKyZdVyYOgGhMNMlWNZF9m8yxwiz6vqeRmkmbtjB pCGB87JfhOqCxhqwD48u01oaUoeFi6QbhbkJqE1c3NkIKilpqytsry8a7BCM ysQTQw0TivoJuXicggn8FosmJMJRKdUIj73wozIh2EQkOJqbEhQbYh0VaBHk sdvD7k036184mL3qbPk6Ll4McNse5LEzyH1nkBs1pGtpvwljThf2mxyJcsyg B13ys/aX50XXlx7uEmUNNhdqesvGBqtmlXUnR5oXJjrOz/fjanggCVnCiK3x EMATgAkIRXfpCbyVyqdot7rfuzL26NbMh3fnH92YwX3xEO9em4b79y9PPLo+ 8+jGLL2ocRqex2Kwh5chxh4sjt6/NAJx7+Lw3QuaO+fVd9ZssnatXWvXqld7 T+Opc3M37ly6eWdxYkrZ0S7q7W5oFJfWVhRWcLIKMpOSE0LjI3yigtxC/Bx9 3S2DvG38PSxjQl2rOCkLk30f3z3x5fvnvvng/HefXHzyaOGTW5N3zkjP9aZM 1EWf6j4yVBnamOmoEScs9OdeUJWeV5ZOduU1cyLzExwBJpwjnmVZobWF0bxj gXkH3VPCrY6GmCeH7ov32hHp9EawxeZA003BZgZhFkYR1q+EWBgFayNo32aI QHOjALPNAJMA080IE9omRr4MmxCGeOzcpBsu2zc6Lw+n7Rsdtm+w37aeiu3r bbWhixGrd9bpwmTJJlsNLd5eZ7N1vcvuDUEWmwpjLGZaD4FNrgwemazx6cs1 AZuoSvapCq0VBTZSrpdadICe01WplNSqlR1Y0zWm6phRd+Ccrv+hTZiL4Emu RK9NyGYTpk2eP2/y/Dah1y9qYUIVaFGN8CvYZIknWNa1VG8mbxhW1JO8CcDk RW0iL/PpKXEaAJhwXQZKHGV8l59gEyZPwCYgEaZNcC2jXpuo0SatKc9pE1be BH9wTE6ybFLFTyUkYTaeQOCcLj02qWbH89gEYUJ6WJixkk2QJ2CT0uI05AlL JcQmEHnHDoBNUpOCs1IiSnIT0SaNwlyWTfQGqeaCYy3+yZ3YBHlCek90eSLr FdEZEzF9R4jrOSQ9lUODtWiThVmASe+ZE70vYhPxcpvQW0dlDeqlHaZwB5zS QO98xKb1JZswBcHKMhCSMJMpzFWJuhsPmXkTphTIh9VqoobABCu1CElYNmHC hLwb8oSkTujky3PZhJU9QZ4Qm8BPk9iE5E2Yk4RJDoW5k7GGzhUSleDrXxcm YBCy2QckwprlxVzRSE8bLu5oKOloKG4VFwBP0CbjinoqaJhQIRWiTXD3onqg Cm4lHbwqzsG81OADoTaRAfvAJj5OW70c3nbc95qzxWtuNj9j2STQZTvWdIXR 1VxPbULP6cpI9CQ2EfOSWipTO4WZ6h7BnKr+zET72cmOc7O92GOCLfCgknNz ffgQu+NxtjAYBBMr8DxZhoJtKfgOOH8YePLeTaAH5Q5sk8e4c3EUhIJBYEIN H6ZVgiS5fU5166zy5pkhuIX7/+iDz9q1dq1d/9SXoKrkvQ/v/OkvP/zHX378 8MO7szPqE/Mjw8reIWm7tLeps6mqkpudcTgqNtTT38PC1W6nj7OJp/3OcF+r koyoWWXzL2/PfXn/5DcPT/7uw3PfP1r45u70RxcUF/rTxoQRsy3xUkFgS47L ZOvRRRXvvJJ/fKBQUZcsyg0Gm2TH2hckupRlhVXmRnBSA/MSPZLDrJICzOK9 90Q4vRVi8zpFD1ODAOONAcabQsyN/E0NSFDpElNcj0hhhPLI3qXABYgslbjv 2Oi6bT2E2/YNEPAQw3HremY4YGzfgGG/Y4OdNpjpEqZEQCisAJtYbDXY99bL 1u+sc9pJDS7OjzSfaEy4TNtkWug3mG8GNlEWm6uLbIYKbWU8b6zpGpVSM4Q1 qi4NwyY4p+t/xSYQzNHBxCakZ4E5yJSspf5pNllevvUMntCblBtWzpss2WT5 ORwX0It/mk3mOxIVFb59XBd6KbxzX7H9i+ZNdFMnw5UuT23CfbZNNKLoZ9pk XNmqW9NFOk2YbdQQ8COD02ZHIwfObJW8FFa65Bk2WT4NWG87CbEJK2MCQf4o Tf4u/UI2AYkU5RyCYNqkIDOhKCsxPz0ObJKcGJhxNLw4JwGHA6NNmsX5OEkY 13/rBs4QJo3wlE2aOGATkjohNkGeoFCQJ3ptMthdQXYvgk3OnOg7e7Lv5Ozz 2gRermqZiBHUaxgzhvC7Ju2pkXRTK9ThloCC2bG+VFemL9/BhAmE3gm9eqdv MfMvRAr9HVVMmKA7Ouk9g0QlpKlEFybkPcmuEzr/Ut6nM32LaRBkCMmbMJMm mDdhJU0gCEzQJhjMpSekxIvYhExpIDk+1vAuAhAyBQKfXzZnGG0iKmqvA54U t4jygScD7aUjUhEFE3kdwmRMKhyXCMcHa0fp5Sa42QRuB9u5lSWJOcmB0UGW +/3Mgj33BLrvgnC3fcPZkrKJt+Nb/q7bAt13BLnvCHTdHuC0FQJ4Eua+C20S 62cW428eF2R5KMI+na7p4maEleVGoU3aqo9JW4tH+iuOaxrBJhfp3YtkNhfc Pz/fDw/J7kVS3IWVXaTQCzECgf8KbuGZu5dH718dv39lAgCCDFkyyOUJDJZZ 7l8aZaZLkCdw/95av8natXatXateKUeiLpyb+uDRtYf3Llw8M97ZVJ6dGnss MSQ1ITg1Lig9ITgjMTj1gP/hSK/4UOf9vlbxoU4HAu2So9wEGZFTA9Vf3537 1b35b+/O/O7d49/dnfr6muaTMwOUTUQR43VRklJ/sImiOnqm45im8aikJqGp KIx31C071hZskp/gXJUbLcgIzzvolRHjfCjIItHXJNpte6jdLwIsXqXWsu/d 5L1zvdeOl/32ULO2vOF290Yq9sDtJhJeuwwwPHcaeO4wxJwI0AMYAh5x2boO wvmdlyHwPkGKwzvrmGFPx1ObbH+GTXRhwrSJ5VvrHLa97Gv8cna4sUYYfVme c1VydLYuQFZkoSgyVxSa6tqEOrEoO4An2G8CNplXt5xQN/8v5k2YNmElTXCG sLbTpI5sQ3ihmq7nL+haljqRrmKTdq1N2shpnD7XiZk2GVc3adQvYJOhCr8B nquE7wY26S92+Ak2YfFkuIK2CY+yCYSS/2ybjLSmqLuLFP0VK9tETy888+dF dmXCDw5+XnDabG8ogdO7bt6E8ERvTddzwkRXJVjKhRJhHf/02oQUdAFMsKAL gtgEojA7CQP7TXRtQrWcCHOxHR5tgidVvYE2ITxpb+LolnWR1niSQAGe4GIO OmoGu6pxPcdg1zKbnKVtAndOznTrhq5NlsMEgsoYjqta8ZeUToQtlS/iPG0c W0d+JcnkLiZSWAVdiBTmfkPS4qF3YC8rSYHR116JMGGiA8VBeMK0CavQq6Ox FALfk0zrWmkyMDM/gsFMl5B+E91qLgjmAIRVbEL1WPEzWHBmdkURnlBjgbXz tJkT6phDhp+mTkRFbeKi9voirU34wxLhmLyOCqkQYlRSOzZYCzYZHqwGlagH qhQ9ZYAUSQevhnco+2gA2CQyYB/aJMhjN7XixOp1tImfy9YAt+0BrtReeH+n d8Am1H4T2iZU0sTPLJa2yeFIB7QJLzMcbAIw6W/MH2gqUHWXjg5UzqnqT4+3 nZvrvXhiENMfzMwIlnhdOikBqpyb67twfADzI3cWRwAg966MgUGwiAuegXfG VAsKBfSB1VyYIoEApxCS3Lk4SuLuxWG0CQl4+GBx9OHlsX/0wWftWrvWrn/q K8TDpJZ7dKSveri3sjQzKtLTOMx1p7/1GyH27wTZvBFo9fNguG/7ZoTTtlDn PUH2O2I8TZMCrLJi3MrTQlRNBZ9fGfniyvCXV9Tf35n47sbIV5fkH57oPNme NFq7f7IhRl4eJEyx5ifsKzlglrl/D+egLf+IS16cbUaUVeFB16qs4Mqc6JLk oMwD7seinJMCLOO8jMMc3vIx3eyxe5PnzvXeuzb47NpA82Sd1671dGygY6Pn zg10bPTYsdFj+yb3bUvhtvUpSQAjTm+/BOH41ktoE8ITDPu3X2aGHcbWdRi2 W9fZbFsKIhHLt19ePfa9Y2C5zRBsYvHGy7Zvv+S566X04N1DVeFgk2vS5PmG 4CGONdhEXmCCNV1oE5whrJIKlYo27IWf1HTPajqPa1pXsYnungu9YNGFCaqE lTQhyw1J0gTPQtQukkF2rDKki5k0kfVV6w38INqCrvphevWDXpssb4pfapan G+HrmTD5CTbp47qATbCm64VswkqdLAmlwlklcFTw7GQlNmATatKXwBFC1yYK jotK4K0WRo20JKNNJAO1q9uEyRPd5iAIekhsLRxN4SCHNiEweU6brG4Q3UCV MJvfn8cmBCb8olRQCSf/KATWdCFMCrIO5mcm5mUk5GfEA09y02KPHQpDmxRl x6NNGmpzmDYhQ2X1BtoEo72RsonerhPW8K7+DrKzA+4sLQRk502Ov6hNhNQC o6dBqRw3tmOHyLC8eUTRopYum0RB1i/qTXwwx3MRnpABXCyJsKZjQbByFiiC 3rYKsuSdoIPYhJk9IUhhvk9bPQ8CecIY2CXQDV2YwGdn5U1QKOBKFkxIQRep 6WLyhDW5C2xSzc/UzesxZ9YxsycIE9YYbeYGeSqEha2iwra6wmZhHvCkr5Wn GawdlYkhECa0TWrGBmo0A1XKvgoIaScfhDLYzq3lH85JDjwQahMTbBXitRen dXnYvelqRS2FR5v4u27zc97q4/AWmdMV7rEb95uATeICLRLDbI5GO2Ue9CpK DSrNjqjIj2mtSuupy+kSZYFNZobEZybaL8x04wxhIAmzo4TMECbd8SSxcvOC +valYeAJBDoFMALvc3KiY0rVMK1uXJjsvHpq6OY5avsJGeRFEiVoE/L87XNU rgQbTCDuXtBgrOVN1q61a+1a/QqwMIrz2JbgtT3e450Y559HO/5sv80r8Y7/ csjtzXj716OtjCLMN4buXQex32ZruM07MY47UvwtC2PcqlICe/mHVKK04br0 Ez0lHy50fntD+evrQx+f6pxvSdBUh001xsrKAkvj96b5/yLWcVOSzxsFByxK j7rmx9ulR1rmJzhXZASWZUblJ/mnx7gfi3QB8sR67PW3/Lnz9vVuuzZ57zb0 3W3ot9vAZ+dGz23riEc8dkBsdN++wW3begZJDDBc39nkupUFk//n8Ob/IwkU kkOBoDzy1kvMsH3rJZt3Xsawhti6FCyYWLz10kphuc3IersR2GTfGy9bw+fd /v+S/bZLBMGL8uzrspQTTaFqvh3YRJZvrNsLr5TU4n4Tqhde/XQv/P/QJuSf MOc7MYfQkr/A651iOvQiNiHzuFaBCdqENJsANEZWtgmc1jCY44VHlU0QWMqF MHlRm8jLfXpLnMAmUr6bhOusELi9kE30ZE9YNuH979iEueoFecLsNGH+UR0O rnDeQ5vAkUzvkC6cIaxrk9UZolclzLZ3ctIjAUdB5k4TVt6EVHMhT/CW6jHJ TgKV5KbHZ6cdyE+Pg8hOiQabYL8J2ASXKoJNmkR52GwCNmHqgwT+pZ0V7Y0l zNQJ4YluAqWvnTl7qry3jSpAovtNnvbCnz7ee/p4z/PbhPrLA/yCPw16f6i0 Aeu16B4TkaJfPDRA1XdhUoOc2+l0Rhlr4q7epMlKDNHdtw4fn5z/SfUURE9r OatGi+RBCE8wOcJiCz6JJU/tDXxS2UULZdm+ElbDO/PLYHWaYOoEVy6yYKLb b7J6L7yundnt8NppXcw6LmYChZk6aa4tAJu0iguaanOBJ8QmI1LRyGANxuhA 9Wh/taa/ikwPBpv0t5ZUFCekJ/lEBVpABHvuAZjArY/jVhwg7OP0NtgEwsfx LS+7NwJdtlNDujx2R2gLug74mx8I2JcQas3qN+kWZ8vbObK2kpH+iim58Lim cWG05Tw9NxjzJthCghkQLPQCjOAAYQAImgVLvFAoYBMs9IIn4YOcmurCuHRC emVBAUK5dlpJhIKVXfQyFMom8DzlF22PyY3Tiuun5NcWZFdPSi8fH1ycH/hH H3zWrrVr7fqnvrKCdqf7bz/muzU3eHdO0K6CkN0l4caC6H38SNP8gK3Z3m/m eL+Z7fnzHM+fZ/iYQKT7GOcHWxaEWheGWfGiHQrCLUqirJuyAxeHyr+6JPnm qvzDk+0n25KGq8LGxVGDPH9e7O70wLcOe/1LethubpId/6hrQYJDXoIjP9W3 JjesPCsq76BvSoTz0TCHRD+LWA/jQOs3nLat99q72d/kVb+9m313GXjv2OS1 nahkgzsEDRPKJts3UbHNwI3iCagEYqPLkk2QJy87vkXlTVy3baCfp4K8yf7t dcyww9i6HsN223pm3oRdxPX2Osu3ACnMWEfFViPgifmbL+9782Wbt1922fZS ktfbfbyAS7Lsa9KUhZZwjcCBtomJvGCfvNBayvVUC2MmOrLH+ss1AzXD8rZh ecfIUOe4qmNa0zE/2n5irH2OYRPCE70wWaXcizUxmNm2wOyn1iZNxKSX9jnT Jbo2WYUnz9kLP67qpFvgm4lNlniiaqbjKUyWbKIW0zapIzYZVYnG1KJJtWhC DTypHVOCTSrnuw6CTXrAJqXuslJ3Kc9lqNwdbDLEd1LxHGmeUDZRcpZgQmzC JAkRClXQVeXM7IXX5k2cIJSljnTgJGFqeYqM76oo81LURKibjmi6CuHcAt/k 3m5xb0/dYB9lE7VUOCYXTihqx4aayaoXwhPm4AJiSTjZ4iY+tAmcxwAjLJho a++f7oUn57EXtQlruyJlE0EWBOURPo0RXjrcqeRpA5tNGHkTJk9YNsk5FpeV diDvWBxEVnJ0WlJYysHgzOSIoqz4Kn6aqCKL6nAX5dM2ya2rzmYmR5gSaREX MoOa1tVQDDbRrexiZk/QJj1tFYy1HVqbdC/ZZH6yA0iyNKdrVuuR2aVYoJ7p Onuin7aJ9PR879xE24SmgZoQrk2a0DaBW7hfp5JQu0SVg2IkCT25d9kKeLIw nZkl0bWJXpIQhqxiE6ISXCOCGxVZ2RDmfTSIVh/wDMgFnuFjtNZxWunhunAf nod3oD+gHpswkybEJhjkC4PXMyZNMG9CZnP9/+zdd1cb59YwfDDVvdO7sQ2Y 3nsRvfdieu+oC0TvvUgIJASig3F33JM4cXpOuc9ZT3nb83XePbPF5fFIEOck uZM/mLXXrEEWAlnjta6f997Xpndjq+/vhKjrk9T2imt7RTU9ouqPQ/tIr6iO qRJmsGGCcTj0Z7S3nTn6h5k9GetrGYeA+7C3Ec7ySQHYhILJoU02ACa0Teia LsomK/NiOM+PtohasktzgpMibyRH3YgPc4RIjbnJCXWM8LPAqYvRgdYglAjf 6+He1+Jpm6SEOzNtkh3nlhvvUZTqU5kb0lwaCzbpbM6a6qlWz/D3lL1Akmfb E1Szyf35z58svX60iB55+2QZ+01ePpA92597ujcL1zRSVO+eqyGY3fEAE4i/ fb339/f7VI/Ju51/fnvwX9/d//HL7a9frH3+RPX2sZKyyeuN795obfIDXdb1 /dtteORbAAs8TveYgE0AJmgTiNcHCy/35/7shc/JcXKcHH/poyPRqZVj3xJn 1xZv357gwE92kqTfFKU4CZMdhUkOgiR7QaItP94GQsSxoyLeXhTvIExwEiQ6 8xOdO7M9u3J9Jus57zXd/+et8v/7fOVfT+YejORvdadvStNUwkRRjmtF1LWa BNvqJGfh3SBReXhLQUD73bDO+iRpUyq/MrG5KKoyI6AkwbMg9nZmiGPcnWsh juahjubh9uaRDqej6Ih2PEMa2LGdJNyRGqRImkowDtMiRgFW7AiyMSERaA08 MYYH/a1M/JhhbeJrbeJjY+JtbQzhZa2/o4QO4ztWxh4gEQsI48Mwhbhpae4K ZwujOzbG/g7GwQ6GWcFXp1sjXyzWvF0s/Ww6a10cpGxzU7XdlrW6KPl31JKI jd60e+NVD2ZFD+Z7DhYnDpYmd1XUXPjtzemdnYmd3fGD7Q/pDyIU1pgSbEZg 2kQXL3o7TZj//Y4wwcBGeKrlZFGPTUjhFjNYc0yOEQp5PtMmW+oJDKZNsAL/ MIhQRrdWR0gXPMaGZmBD07+5po0tKvo21NKttZ79jf57mwP7G707a9ItdeeD uaIVaYyMH7wsDlsWhS4Lg1e7wtXi4BVhIDWRhO+3yvNRc73UXG3GhAkTbDCB C0yjwAXAZLs3ZKcnfLMzRCMKVPP9Vni+8DpwvSYMoEecfBSK7ghZV4RMmrgy VLg93bo927kx3a2aGlBNU9M0VKBCZd/qau/qWs8mvE31Rwkj3THi+JHBx8TK m4BHyAbCh5NNcM+ij/67GBdmzBotZuhdy+mBibi+G2AiqpMKa7sENZ38aggJ r0rMrYQzM9AjGEQlrJou4AkVVXkQdWVZ5QXJd3M5VcUpzdW5XfyqPkndUDdg pIUsVnXb3nGAOOEJ7vJExWDr+FAbCoXwBFXCjgmJrk3kM2K4dXc0wyCR54/k gA7aJjOPD6Yh4ALi6YNZjOePF15/poCA59zfHd9Z124gjEIBm1Abhit6MIcC Fyq5VCnrWl7oXJqXLM9/1PDOGv9B5pjobiCMQmEBBL9Lr00ITFAlOD2EVbVF ukgAI6yYHvngGhLwIhhwTaDxiUkTLN+C3wRTRbhDF3yy2AvP7DGhLsQf7bvF ummZGb2jVMIcd8Ic38PcHYK5PR3JqkCATUZ7moaBxj0NU0NtSzNizWKPXpvs qPrW5BII9YJoVSaeHqwXNGXczQ5MjnJJCHeEiA9zSIm+wQm1B4+ATSAQKWHe VyN8rscF2OAmXVjTRcEEeMJxz0u8Azapygttr0yQtuYMCUtm+mqXxtu2FdLH G6Mv92cAJm8fLHz+ZPn1o6XP7i083QOMzD3bn4d493z1y8/Ub58oMb54tvL1 Sw3YBPMpWNmFffHAk5+/2v3hi633r9aQKvDlN6/X4VvgG+F16G+kXg3PEF+9 WMN4/2r968/UmDSB+PbFKjbCA1K+fLz0Zy98To6T4+T4Sx/cRMc2jn0bx66N Y9vOseXG2wmTnfiJdgIqbPkJoBJrPsdawLESxQFPbEXwhHh7YYIjP9GJn+RM ZVgy3MZrY9+tdv4/r+T/5wvVPx9N3x/O25SmbnSmrogSJXm3qmItaxPtGjNu 8YsDeCVBTXl+bSWhkrpEsAmvMr6pMKI8zbc4wSM/5mZ6sF2sx+VgB9MQupEk wt4sko4oB/2bAKNNCE8ObWKsGyyY/KE2uWlpdtvKBGzia3cq0N4wO+TaZHP4 c1n1a1nJs8lMWLIut7opW2/JW28s8zzQJvtjlfdnhWCTe/Lx/cWJHSW1Mt/a mNraGtveGdNtdWduCIwqQXHo9Yhem7DaFnBv3t/FJiyY6LUJaYcnvfA4e/Ew wCNTh/GbbLK52r2t6aVt0o822VyRPJgtVHV9sMmSMEjdGabXJkeNNdFjk27K JoARgAnaBK712mS5J1IujZR3J6mHi9Am61NSlk3U6iNtQpJcTJuoZL2wlIX1 HiztYNmGsxeFbcUQaBMcSEeXuPy32gRD1FEBIWwvF7R9BBOSMSGN8NhvQrWc /Ec2QYmwBojjJl2w4kWYTNKVXcy8CdZ3MYNhE7jQ/re/fFprk8f3Zlk2QZgQ mzx7OPfiiYxpk23NwNpyLyEJxMpiNwaoBAJVopgTL86KFmc+2tdXd1XPGgR/ VIkXkye6MDnKJnT6Q6gbujZhJTswECbwamgTZoc7K3RhAqHdtYD+dkyaEGzC jY297b3ianqfLnbrE+um1XtLH/U0fCnW4FGWTZg8Ge1tHuluHOyqHZLWTQ62 Lk4J1+TdTJuQmi60CagEbAIxNVAHNinJCkiMcKI24wpziAuxS4p0hjOVK/Gz gIj0t6R44nM90tcilm6Ex7nwOHiREkqcW0GyV3l2UENxFLc6qbstd0RcOt5V MT/YsL4gfqgZfrE3/ereLAjl1YNFQMSbx8vPD2SPtqcfbE5CoEfg/PlTFVwA KIAYWM2FmwljcRfONAGM/PRuh+wzTHemUCT59s3md2+36G9c++b1BrwIIOjF fTkE/CzQEJzfPFj8/OEi7hv81VMlkOTNfRk88sUjxZ+98Dk5To6T4y999OS4 i1NdgCQdcTZw5ifYCRPteeCRePAIhKWAYyGMt4QQxVmJONZCiHgbATwz0Z6f 5NCR7Nya6DRYHvpmmf+/ns/9v28UP98fBZusd6ZoJMlqcVJXoVttvHV9skNH nhevyL+twK8p17ejNBxs0tWY0lYaXZsTVJJ8Jz/2ZnaEU7KfZeStc8EOJiF0 a0mEg2mkvWmUA9hEmyghJCGBNvmYJ79sE0ym/EE2uWVlTmwSYEflTUYbQp4t VL5aKH4yngbrVa1N2m4s8dxXxOEbfemUTWZom8jG9uXjlE3UU5vrk5tbY1vb o/c2P8zdYwqFtRswWIM5pI/ZfqJrE2YLPLOlWq9NmDmRY2zCjONrunT3ECY1 XcQmmyuTEL/RJltrPTvrffc2B8Ame+s926tdGyox2mSBF7Qkom0iONomAm9W NddRNtnuDmPaRM33O8omSz2RMimVN1ENFmxONm9MiVbHJcrJfuX0wPJ8vwr+ zhk2gY+GxROd+ZiDdDkQtU0rLPBgiQ4rNwm3FFQiaC2Cs6i9BG2inf7w32sT JAmtkjJ+a6lu0gSCbM8FMPklm1SiTUZ6KZuQBgS0CUmaQMDiljlMHNfJBCbT YzwmTHBjYWZ8vDUuTkLnL0wJ4dbdXht6tD/z2UMZ2AQMQlTCTJqAR4hN4DkH O2NwN6oV3cQjTJhgugRVIp8RQrB22cUgK3y0CZMhLHHobgsMwdq8F/+INHQw x69PDfN1GaI3ZkbZtVjEJggNYhO9eRNdmFB+PMQIwgQ+U9xybVBaz+x5p3aT 7mpizdlh3b0kG6L39tbdVRhCS4+PkyZ6UyejPZRNBjpriE1WZVKAyRbEUu+h TXrAJrsrfQATEmiT4kz/hHBHsAkE2iQ22DY60JoEOCXK35L0wiNPcC48RG68 e2GKd2lmQH1RJK8mGWwyJCwZ6yzHRvgHa0Nok+e7U68eyAEgmMgAhrx8sIip E4ine3PAh5c0XkAW719pcI4JGgSzJ9gLj13zZNwJSARgAgEX71+tw/mHL3bg AswCPwKFAq/86qHizQP5q3vzIBGECTabvH0gB6H82Qufk+PkODn+0sdose9A /p3uLFdxiiOoBEjCjbMAkgg5liJtWIjiqRDGXRfGWQg5VgKOFTyNl2DHS7Rv TbBvjreTFvm+UnT87xdz/9frhR8Phg6G8wAmGjHYJLm72KM+0a4x1UlYEsAv DmjJ82nO9+NXRHU1JEvqk5qLw6uyfAsTbuVEO2eE2sZ7Xw6/aR7iZBLqRO3H FeloEu1kihHhxLYJmVTCtAnNE5OjggmT32QTKyO0iYclnE0OwwzCzebsbavT tyyNwSZ+9kZgk4yAyyN1QU/nyl/OFz0aS9WIAlXt7mgTBddNJQpDmxxMC/Tl Tca3d8b2N6aPQgeOesfOEb0zxI+xCWsT2qNtwi7ZAlD8xyo5wiYjH9tkAmGy oZrQB5NfYZNtTe8RNommbRK6JAw5xiYqvpduWddRNtmQBKNNVFwfsAlJnbBi qTtioTN8vjNeOZC/Pt64PilUj4mVE33KKcomSnm/arlXre5Rr3bj9mUsnjD3 lSUfE86qgNUdrOJg2SbuuMtvKYQgNsGkyVE2+USY/Cqb6MKE13KX31rGggkE Uckv24RX2SuuHZSCRD4M4NMt6MKVNvmvexJ6m010kybUH33oBxfPjsEqmh5Z PilQyqTYb/LswQLYBBiiCxPAyPPHC6+eLb55voQ2ubc9urnat6LQpkiYNiF1 XGATSiXTAoiFyQ+ZERIkAXGUTYg4mCohSQr8FhZYiAgITI7Km+DuW6yYHtGT N0HpsJImevfpYna74O+AvwZJeMHHCh4BaLfV58DNjLu0YRc8BZZuPWNAdcu0 jtpxTu/mcqiPY4b7kLaUsd4WZt5EMU3lTXCfLtyki7IJvU/Xnrof8yZ4BpsI mzNJ3oRlk5ggG2KTaAh/q7hAW6ZNUsOcILLjqD2EgSfV+WFgkz5uAcBkYahR OdmxrZA+2RwDmLy5Pw/nL5+pSKkVUgIEARgBOIBKIIASNEwolWApFynowk55 zJW8fbL02b25B5vj9zfG3jxehheBF/z6pQa+kardeqnBH/Hd2y1MpgCI4Ee8 e0qVbz3bnnq4NvpgdeSeanBvuX+XHvvyZy98To6T4+T4Sx/jd33HS3wG89wl yQ68WAtuzHVezHUkiZiK61TEXYMQxF4VwDnuOp9jwY+35IJiEmxa4m1aE8Em 3q+W2v7vV2CT+Z8fDB8M5a53pkCsSlK6izzqk+ya013EpUHCksC2Ar+WggBR day0KUVYE99cElqZ6VWY4Job45gRZh3vfTH8plmos3EYNc3EOMrZJIYKUwhm 3oSVOtHJnpjqBquai4KJ5alPt4nOXsFGNEz02MTD7vxta4ZNbA3T/C8N1QQ8 YdhkpcND1XYbbLLYcRttsjdacW+KT/WbyMfvLU5Q/SZok23KJrvrH7ZpYhZx EW5gEoT5BCZkPqWm6zibyPV3lBwzuwQBsrwgPSqIUA474odgpU03vCNMtDah Y4Js1YULdSp+Td4EeMK0yeaK5P5MgbLzg00UgsAVSahemzD36SI80W8TaSjY BL4dYHK8TRS0TRa6ElSD+R/yJhP9YJOluT60ycoK2mSEvGXCk4+ruQbwM8Lt ZNEmwBDwCKzlMG9CarqOt4leiehOe/+1Njks5So7zJuUMau5sNmEVc2Fewh/ ik1wyyamTRAmGLDuZZcPMTIjeknyIcbJ7riwhBZigmBugg+37tbq4IPdKWou /MMFXZVgYNLk7YtltMn+1siGupeUbyFPdEu5KJVM8SHmxrUGYfaVMG2iW9bF XPOzHmE9n2kWFgrQBVPDfL020c4cZMTUMJf8bTODmTRh5npYoRcmpLUEVdJa l11VknA3Lzot3icu/FZeegi3KR/b4TFvwrIJ8oRcHzOjB29gVvWX7nwf5usw /xRsMtoDj9cOd9dPDbUppkXEJow9hHvBJrsr/VjQhXmTyf7ao2xCeYSGSaS/ JUSUvxVd00XNN+EE2lJdJ4epk9QIl4zomwXJXpW5IR1Vif28wpm+WvUMf1Pe iUmTzx/Kvny8COcv6KotkAKp4ILAxAdoApSBWRXaFx8mMAJJ0CavHy0CTH56 t/O3r/fg4mB9dGOp5/HO9Iv7cvxeQAqmTvBHYIUY8ufp3tzLe/OvDxYeb4zf Vw8frAxtyqSrM6ID9dCj9bE/e+FzcpwcJ8df+hgv8Rot9OhNdxZyLHmgj9hr wrjrDJJcFcVcFkVfghDEXuFDxF3lc67x4q9zEyw7Eiwb4643xVv1lPi8XGz5 H88m//fLmZ/uD4JNNqWpm9K0tc4UaZF7faJtS8YNQbG/6G4Q2KS1MEBSywGb dJRHN5eEVGR4FsTfAJukh1pxvC6E3zQNcT4V5mwU4WQU5WQcfRh6e+GZSPkU m3zImABM/jCbuNucdbM29bQx9rE95WdjgDZ5Ol8BNnk8lkatYHle6g53yibt t5XCULDJ7kj5/iQPbLIvG9uTj28vU60WVE3XJlXTtaOZZGZGjgkmQEjP+1G9 8Lpb0eq1CXNaIrOp5CiVEIAszXdBHG8TbcvJ0iD89A3VGG7JhTY57Df5TTbZ XO3W7YVHm8xzAxVC2ib842zC2qfrE23CbDlhxWJX2LwkFPMmGxNNm7Cqmehc nuhbnuwHmyzL+pg2ITP4CE9052Nis4lu3gSTJp/SC/+H2oQZZN9gAhO0CQSZ bNJYnddQnddI7dPFtkknrwJsMtDVMNzTxLQJ7uNEkibYTM3sdNCuz+mduJh1 XDjuRE+MagcI0nE4gGOchzbB+SbPHsxjp4muTV4+lb95vvT2hRJsAo+DTdZX 4FaXYgUXyZVAUN0ldCkXwGR+EvjDnR3vmB7Vru2ZEtHbsnFU+4lu7zwrjYLv CF3A7NCh/w65ugw5ItpYm6GRVhFWpwn5OJjBStmQ7dTwHgaDVN9NBIykcryj Q26E+Nr5ul/3cbsG10AVuLf7xPVMhuhO3iH3ql6b6O2FZ2VMmC/Lyp6M9jQP SxtYNV0UTHRssq3sVc7yIVbmhao5wWh3Ja8hrSjDLz7MATxCzTEJskkId8SM CTiFFHfFBtrEBFhH+1lG+VjE+FlRG3YF20OkhjmlR7lmxd4Gm1TkBDeXxuJQ ePlI8/qCGGzycn+G6oJ/KIN4+3gJVYJdJ68fLWHWAzMdxBfwJZAEZ8HjWBOc wPjqIRhEARf/+v7Bf313H/7oy89U37yGp21hjwlpfseCrpcPFrHj/vmBDM73 V0f2lQM7it7dpb4HayMv9+dwt66TXviT4+Q4OY4/BrNv9GU4dSXZiuMtxQmW Is51XvRlCee6hHNNFHsFYCIElURd5Ede4MdcofImHCpvwuNYdsRbtXEsayOv 1EZf6yryejbf8M+Hw//js6nv9wcOhvM2ulI3u9M10vSeEs/6JLuWDFd+kZ/w blB7YUBrUZC4ltPZkNx6N6KxMLA8zaOA45wdaZcadD32ztkwVxPaJqcinE5F UjzRRri9Sbi9abgDBtiECsop9sATbIrHPbtAKGZsmKBNbEwCgCfWxv5UNRcV ftamH4WNqa+NKdMmntZGnljBxa7pMmaE6WGY3bEyR5u425h5wIvYnvK3NUz0 OtdX4fN4ppTqN5lI3+wMoRoZ2t2WW12W22+phCHrvak7o2W7M7x78p5t+ei2 YnxTSbdarE1sr4/ubIwSmLB4ovvlJ9qEyROy3AWYkMAuBvUi9d/ytCAwSPYE ziyVADS6mekShAmJo2Ci3aqLngvPtAmjF16vTUYgmIMXITbWByC2NCSo3YM3 1NJt2iYHWwP3Nvt2Nd1okxVprIwfvCgIoWq6hEFam+DOWrRNKD/q7NN1TE3X Tnc42ETN91N2eEOATeClNKJA3ZBJQmaEwbOiuKW+XKzpWh2XLI/rt8nmyiie qd4TNbzxsY9n0PTTczF6cUQ49pugTQStRax9unAP4V5RHXP3VN1tgY8P/TaR 1PWI67rFtVJRTZewpksANqnStYmwvYI0m7BsQvImFEyqcusrcxr15U3QJoPS RrQJ3RBdx2qEx2ouZv/1hyKoackCxJR4flI0OyGcHQehCGbGBNOwTmYGlSUR 0oEb5B6mXca4cCdvqsEmU0/vL9B5k49U8tmjeQywCZ030dpkb3OYaRMCEypd MiOST4sWpuCXhF8Y1vOwqu+YGPogLDQF0ym41D98ayI6xPROYhg4TITqkaHb ZAQYcK076xD7zZk0oKNDN3BnYLI/MMb4wKfaRG/XPFNGjJ73lkFpg6jtbm1Z Sm5aSGL0negQ13B/p4gA5zB/xyAv22Afu4Qoj9K8WFFbebegltBDt3OK3KjH zxX9gI5ubb0W8uSY5Atd2dU41AU4qh7sqsU9hLX9Jjo22VRItTaZEy5Pc4c7 yzpqkwtSvcEj9IBFqnyLQzfCA084IfZwHRtkExtkGxdsFxdoCyqJ8r4OPInz s04IsEkKsksNdcrhuOcneRan+YJN6ouj2isThPVp0701K9O8eyv9OHXxzf15 iHefUYkMtAnmNTCpQXIo8CWmUcAdAJP3r9YAKbg919/f74NH/vb1Hv4RzkAB rXz9cu3wW7Z/erf381f7P3yxA7rBUi7cE+zFffmrh4ovnypfHSwcrA6vL3St zUkero+9e6r8/vX6DyezF0+Ok+PkOPYQxlwRxV6FwMItCBomVMA1PC6IvsyP ugTBjbwujLUWcmz4cTbcWJvWGOuGiOsVIZcrw64JsjwfTzf+18OJfz+d+X5v +GA4Xy1KXO/O2OjNHq4Oakxxas64KSwNFpSGtBeHtt8NF1RzhLWJLaVRNVme Fam3iznOWWFWib4XYzxOR94yiXA1irhhFHnDKMLlVASFFEOIaEeTaO2YeJNI yinGYVSYgk0AIxgoEaZNKJLYmgTYmgTamUL425pA+NkY+9pimOoGsQmEp5UR ht5eeDpMGDYxp8L+wi0rc7DJbUsjXzvjUKdToY4GwvxbuyN5L+eLnk5kbHWF Klvdlppd11uc1ltdV3j+q1LO+mjx+kLHlqpbvTIOoaEawCf31BP31WMP1WN7 H9uEFVjQhUkQZk3XLwaxCVnu4n5ZDJ5QodvAy9xfCP8fGFdcywsfMKKY64RY nJVgwDURCvqFmTfR0DVdhzD5ZZtQ4xrVw8Qmu+tjEJvrg5sMm9CDF/txn657 mwMHW4NgEyzrAptsDCQuCkPl/OBlUahKHKoUBYNN1KIgKrUh8F/j+67yvIEn KwybkA279Npkvy9qXRyk4vostXlCwAV8CVrBgGsMsIm8M3RWFII20Yw1aCYE K6MinbxJt5rK+MDbHNpYGYQzfTG8rhpaVw6TThOVrH95vhcCbIK98My8CfIE 58ITnnyiQX4xPpq6KKnpkVR3i6ukoqouYVWnoBKCUdNVwdw6WHf34I8yJvRw E3q+CWWT+vJstEllUXJTVU4ntwJ74dEmEIPS+qHuBla/Cay3yWIeVXLYl8Gc qKgN5mRzMsWD7n+nAlb1ZBU9PdoBdzJ8HA92Zz57uPj8kQLis4dajzx/vECC WdPFyJuw/snQhKdnvh+OWRTS9WMCuumD2rGKasCn0x9wDY9g4wYS4/CtdeEM dzItkfV2yEQSvX3rummL44PsLYAAZHapMNpVPuwnTPYQ1p1ggl3zJFdCdlQb 628HcTRUZOWnR6ZxAuIjPCMCXMP8XIK9HQM97eEMEeLjFBvqXnM3jddUAncg Dg9Fg+hte9c7pofog/S/j/ZqJy0iT8hLsTijrf7qahiQgIyqBjprJgZayD5d W0pGLzzdb6JZkKjnhGsysUYmUUy0D4rutlUl5iR4pEbdSAh1iPKzjPS1iPa3 YkVMgHUshL81J8Am1tcy2vt6tNf1OB/LxADb1BDHrJhbhSnelbkhdUWRLWVx kqbMUUmZcrJDMy8Cm5Carq+eLn1FDS5ZxQ1+SXEXqOH1oyW4xkCkfPFM9frR 4v2NsY2lHoidlYGHWxPY/I79Jm8eKzAwRfLVizXcqguEgr3waBNQCfaw0NVi auyj//zp8ov7C092p5/tz8KXwJ8/e+FzcpwcJ8df+tCrEmITkAvahBd5sT38 KjfKgh9rxY2xaouybIq0qA29wrTJPx+Og02+2x3aG8hRCuI10nSwyWhtSEuG a3uOu6gsRFQWyiuN4JVHC2vi+dXxzXcjq9Lcy5JuFsY6ZoZagk1i3c2jbhpH uRpH3TCiwsUo0vlUFITTqRhHU7RJFG2TCO2MeFM6b2L+izbxtzEOOIQJFbbG fnYmfna/v0087M6DTTxszcEmPrZGIY6nwpwMBHk3twayP5vJfzKeTtmkzW2x 0UXT5LDW4qLi+q10xmmGizTz7RvLXSuq0RXV2NrKxKZ6AmzyQD3+aHX8GJiw bKK30OsomODgRexfQIzoJk3ovIn0mPgUm+A18oSZRmFsIzz0q2q6fnebLAuD fqNN9nojj7IJUQmGXptQ+3TR/SZgE+VSj0olXVFLN9VEJYN0DKFNDmea9CsX +miY9GDehNlvwmsu+G+wiXYKPKWSSoguYQWoRMKvgBBzKw574SvImEVm3gST Jp9gk6SSnDimTUjeBGKgq+432oS1jD8cNahlwvTIhwX8p9uEVdO1tzmsUXWr Fln/Xuh/BfPUHBP43ebGqR9H52iEZKsrWNLDLw/vAmvVyKwQ0gjPtAmTJ59o E91Nuo5Cit6JlrowIXIhexEwkcIK3AWaTMzEL/s7GwUtpRWFSdnJoSmxfpzw O+H+N4An4BEIQEqorzMEXBdmRjdX50r5NeAFvCf17tZ1vE2omSZk6y16riKL J6z+etLPMthZ3y+uITZRTIs0iz2kF167jbCc2kN4dU4ENlldEGnkkuUp7rCk rKMmOTvePTnCmRNsd5RNqPCzivGzivaxiPK6BgE8AZsk+NskB9lnRLkWJntX 5YU23Y0R1qeNiEsXhhrVM3ywCc5efH0wR/NE8fUL7QiSQ4CsYCEWXGCJFwRQ BeL5wfxn9+ZAJfOjraPd1V0dBZ3t+ZvLvQgK+CN4wssHMvALfPs3rzewsx6u P7sH6JiF18EUDJgFfwTEd2+1CRcsEgPmgHHAJgCWP3vhc3KcHCfHX/oAfZDU CXEKK2kCMIFoDb3cHnG1I+p6e5RFa6QFNSk+5FJ58KXykCv8rDuPphr+8WDs 309nv90Z3O3PWeLFrXambvblTDZGcHPc0CaC0hB+WaS4hiOpTwKbNBaHV6a6 lSW6FsU6ZodapfpdTrhzNs7NPPqGcfQNoxgXo2hniFPRTlSATSieOJlGOZpG OZhGUJVdwBOtTZg80WsTP2sjf1QJBgWTP8Qm7rbnblufRpt425wKsjcMdzbg ZjtretOfTOY8Gk1FmyiaboBNNC03Vnj+6q44zUjR+kLHplKqUo6ATVZV1Pp8 f3Xy4erE47WJ3UN9MEMXJjhAXDeOak4hNsH/hwePYDC64Kkgqylm6IOJfpsQ mDADeYJDGOl+kyG6rGuUwZPjeuF/L5vIeEFLwhClOOS322S3J4KaqtnhrWi9 gzYBhjDTJaTfRK9NcL4JtU8XbRMl3AkrXesrA/AeIWA9rFH2r6uAJ9rEFsgR bULDpAf7TWA1CAt1sImwrZjblP+rbKLbWqI32BkTOlAlNExolfDKIURcPTNN SNKEwOQomzBquiibwGK1sTJbwv2o3wRrun6NTaS6wVLJ4WIeVMKfGuZNDnWQ naM+3Sa4SRfa5Mn9mZ31wTX4QOVdeiA/p02dzE+IiE3gN6dnIFJ2wG24yJZW +L50tcXiyafbRJcnTImQwI4e4ghdpxyTYSFbCrMCP0H87PCaunsFNa21+UVZ MenxgckxvmiTyMCbeMYAqgR62oNc4K4AyGBlFxZx6d1x7iibaOctdn80811r EzoXg89k7TOsfUFJHdikV1QJNpkcbF2aEa8rerdVg9sqrU02Frs35NKNhS6A CWWTedGaTLw02TEkLm2vTsriuCWFO4FNwCDAEzjHBtowYUI9COFrSRV00TaJ 8bbg+FolBdqlhjhmRt/EwYt1RZHc6qR+XuFkd9XSeNvanHB3ueehZhh48nx3 ip4Lv0yGmMAFCAI3DcbsyYv7ctxMmO4QWQB6PNya2Fsd2lL2LU3z50ZadtWD T/dmXj2U42R5nHvy/pXmxy93f/5q/6d3e9++2YTXxAYTwA58CQ9+//k2zj35 6d3uj19uv3+1BoEbFONuYPDln73wOTlOjpPjL32APiBQKMz6Ljhj0gRhwo24 ADZpC7+CNmmJuF4fdgVtUhZ0iZ955+FUw98PRv/9dOab7YHd/mzMm2htkuve keshuBvEKw4Em3TVJ3U3p/GqOXUFIZVJt8rjbxRFO+SGWmX4XUn2PJ/gcSbG xRhgEuNsFAMkoSPa0TDWyQyC3k/YLNrRLNLRNMKRbjxxMGfahJlAYdkEwhfO 2rzJ72UTdr8J7iFM13Sd8rI2DLA1jHAxaEmzW+1OfTyR/XAkZUMSDDZRtt7S NDuCTZh5E61NlAybrFE20SsOXZgcFcckXLDZhLaJliRMmKhkvRAMenwIfTD5 ZZswS7xIWRfTJhgbKvityFZdOs0mR9hka2Noa2Nwe10bO1QM6LXJwUzBen/C B5uIfgeb7PRQ/SZAksUWD+AJs9+ENejkF2wi19pEqeoEm5C8CdhEoxyAN04G watk2qSJYpYabgLrcBwKDwABmxyVN2HumPprYaKrElgWQkhFVYdJkwpt0gRs 8mED4Y+GLbJmwbO74A9t0lCZ21iZW1uaWZb/Ud6kR1SDNsENhH+VTeTT3bqB 63lW6uQQJtzxgXayVp8e+dU2gYvHB9NwK64uf/SPhe43oYSOw9/p5Aj1Q+HH jfS2CNtKWuuy4YPrk9RgrgQLulhb8tIJFDCpVJcn+myiJ3OhN3WiCxNik09R id6sCkEKM3CXYBxfgnNqIDq5lQ0VWXlpEalx/knRPrGh7mF+LgCTmBA3iKig W3AGmwR5OQBSclPD2+oKunjVR6mEVZR1ROeIFiYkRnramDVdrK2GD1+2tp/a 9e44m6zLusAmawtitIl6XigbbenhFjSWxmbE3koIdQCPRPpaRNAzFtEjcAEB F8QmcX5WEDE+FrG+VEFXWqhTdtTNnDi3uxn+tYURDcVRbRXx3W25410V8pHm 1VnBnrL3yeYYaYf/+sUqNpgASUAicMaCLmbSBB4EWTzYHN9fG360PQlC+fzp MkgESAIY+frlKg5h/OndDpzp3hOqlOtvX9/7xzf3SbMJSAQrxHBvYdxkGJ4M ARKB10HXAEyAOfDKf/bC5+Q4OU6Ov/ShN29CYIJJE4BJR/h5yiZhlE06oi3R JrWhl8EmdwMvgk0eTNb/fG/4309nv97s2+xOXxElbvZmgU0mGsJ5ue6CQm+w CbcoUFAe1dOUKm1KbS2LrsjyK4t1vhvtWBhumxNkke57OdXzfLL7Wc4NkzgI FwjjOGcIozgnozhn81hn8xhnMwiwSZSTWaSTWYQjZZMwh9PIE1Zx1zE28bX5 ffpN9M43wdmLbpanvKl9uiibNCbbrHQlE5uo2j3UHe6rDXbqJqfldh+lOEY9 mL8627q+1Lmi/FDTBTZ5sErVdOkVhy5MmNPD9T6TFaSgC5sXYLl72GOiLejS CoXBEN0gMKGXW0f2m7CKuzB1wthGeJDmyQjGunIMbHIY45hMoWNUG7+HTeSC EBkvEG2yJAj8jTbB+SZgE3mzO7EJUyVqvh+GTK9N6JousIm2puswb4LVXOuq AQhqEIxqiGzPpVzQwmRxRorTImBBiDYhewjrtcnx3PjE0KqEX0PFxzbR5k06 yhm7B5ez9g3WnQXPskldeXZ9eXbN3Yyy/ESwCemF7xZW93fW/2c2WZyBv6se VgBPcHmPS3pcyaNNJgY7/jObYL8J8IRpk4//pWj/LZDh77NjgtG+VqmgittU mJHoH+bv4OdhEeRtk5HoB06B34E0wuObwmu0CeEJCkWvTaZHeLqZC9bmvSRp QrIkusGyia5imDYhDNFb/QXPwQGaOLUEg9dcAg7NTAwGmMRHeIJNwCChvs6c 8DsQ8CVqBWzifcsyMcq7sTK7k1uFu88dVdN1HEzoThOmTeB6qLuFtK4ARvCG Z/17wbwJ1nTR800+1HRpYSKXbtA20cgkFEzmhCuzgrmhxq623NqiyLRo17gg W2BImNfVUM8rEOHe1+AazkgVsEmMn1Wsv3VSsH1ikF18gE1CIAWTnOhbRQme JWl+1flhoBJeTbK4MWNIWCIbblqZ5q0viA/UAwCT95+pfnit+faF+t1nK7gN 1/tX68gHqkX9sOYKHgRZfP/5Nlw83Zu9pxl5tj/7+tEi8AFMARjBofA4HR4C Lr57u4GFW8AT/N4fv9zF14EzkAcDyQPAAdrAS8E3/vDFFsAEHnl+MA8/5c9e +JwcJ8fJ8Zc+dDMm2GZCkiYIk/awc2ATqqwr8hrYpDn8Wl3oZcyblPifp2wy UffT/tC/n86ATTSdKct8jkaavtWfM90cJS7yltz1F9G98J01nL6WdFFtQk1u YFGSR2m0Y0mkfVGoTV6gRZbvlXTPC6ke5xJvmSfeNE90NaPihmkCHRwX8zgX 81gX4Il5jJN5lJM50yaEJ0fZBAu6fGmeQPhYn/K2PvVH2MTd9twtS/ObFkZu loa+dqf8rKmaLrCJSpL4aDzr0WjqtjQMFr2rXA+0yVKbt1IUDTZRz7ZoFBL1 yph6ZXyNagb/0Au//dHYQW0wYcJ6UNcgut9OJpugTTBLgvkLZtcJtRnUEY3w H/8nsOQom8imRfIZMQTpiMc/xbIurU20rS7wo4dpnoxqluEXG4f4Q2wyna/p o2yywA1UCIKXhcG/g03oPYSZNmGRBOfFwxNknSF6+k10euFX1NINtVYlELRQ BoEn9PZc1IelXKCquQAm8ukugAmsM2GlB6u7bmEl7tP16TYh1vj0QJV08aoh gCSdgnIJv0zCx2quMmFHqbCDTF1kDzRhwUSvTWpKM2tLM6uK00rzEu7mcqpL Ultr81k2wdXsr7EJGyYQ8HcOAUJBnhyu5AUMnmgX4Z9uE2w5AZ6ATZ7cn9nd GFpTfhhlgoFaP2wbEU8OdXTxK+sr0guzImPDbkYFuwBMAr2sIwKdSvNj+iQ1 2H7C3HmMflPS32IT5s69zPwI9vKwAuuv8K/6mGCqhLScHFUnRgrz4A32iKrg 1m2uzgGKZiQEJcf4Ak8SIr0gYkLc4JweH5jGCYCLcP8b/h62txwuglnK8hPE 7R/u6l+VNyFd8OARrOb6kDdh8ORDXxXj/h/orNPthd9Y6qNisVtrE7l0UybF vAmxibQ9r644Kj3mJtgEAAIYAZiE3LkMF3CGAKEAT+CPcLIJzjSBc1oYlTEp jL9TmuJbnOpTmhnQWBItqEvFpIlqiquZF20tdoFNSL/Jm/vzZL4JBGCE3itY O8wdcfHzV/t/f3/wj2/uv3msAJUAQP79w8N/fHMPSELSJcAKzIBg28h3bzeR JHDGgBfEC3hZsjsx8AQk8v7VGn4jvA4EXOPklD974XNynBwnx1/6EERfOowP xV3avEkUbZPwC+1hYJPzLaGXW8Iut0Vea4u63hhGNZtUBl0oDbpY5H+On3Xn Pm2Tfz2Z/nK9Z12aKm+PVgoT13uy5js4XaX+YBNxeaikMqK3Mbm3OZVbHl2e 7pMb61oe7VIa6VQcZpcfZJ3jfz3L50qG16WU22dTbp+BSL11JvXm6RRX8xRX M46zabyLGQeQcsMs1tks2sks0hFsQk85cTQPcTALtjcNBqQ4nw+2N8dduYLo CLQz8bcz9rc1DrA1pi/AJgATQy8rQwZJTDB8bE2YNvGyNqICeGLz8Yx4q0+1 ib+NYaijQV2ipZK2yePxtL3eSJxvstZov9bkrGr3VWnzJlqbrIJN1JOb6old 9cSBeuy+elSvTUhNF5Mnem2i+73EJocFXcQmg4wdugYO9+nq0Q16lyHs5+2i q1MwDm0yR9tklrLJwhQ1V0I2DTyBxRiAhfpTeByeT9sEpAM8oUacrCq0OxjT PBn7GCaokhFtrAzRNhnaXhve0YwwbUKRZGMIYndjcBeQstazAzbZoGYv7m/0 7mq66X6TwvW+RDk/ZKEjYJEfhDZZEQVBrAoBFH6rfB8130vN80SbqD/eQ3iD tskq2kTst3loE+yFx5ouHL/IVAmJRVHwvCB4Thir6M1Wj9WtTPKWxoTyyR75 dJ9irndZ3ruy1LOm6l5Xd2M1F9Mma8sD2uEysh5tGzVVEQRrUT4sBVk2IfNN iE0gdP8H+KikyS/C5INN+JWd/AoJr1zMpULUUSZsL9MmTVrL+C2lPFBJ010u 1WNSAtHeWNwONqkvgmitB5sUNNfkN2ttklMPNqmgMiZgk+qS9NK8RLQJXb1T CTaht+pqxOEmeufCH5s3YcQsFUvzfYr5XrhYmO6am5TMjIumx6i8CbEJWcBP j3Yo5iTwoTzcmwWbvHi8BPH80QKByYsnMgxS1gVCwbwJyyb0TBMK7POT2sb2 8YE2XnMRwIQT4Q4kCfG1C/C08nG75uZ8Hq6LsiNg9Q7vixR0wbcsznQCS+nU CaikE2N+gpplj3E4OBKppccmelWilydYeUV4cgxSSFqEOY1Rb56FvDJ8iL3i arg54V6tLU0rzIzOTAwGiaTG+afE+sEZnALnnJQwCLiODLzp62Z90/6Cn7tN QUYUt7EY72psPGE3huhsAkyGmGALPNMmY/1UjPa1jvS0DHU3D0rh28Em8M+h FqJbUAMhFVRD9ItrIfrE1YNddWiT1QXpuqIXgraJdF3etSHv2pR1rc1rbaKa 4c8PN3W15YJNMmJvxYfYxwRYI0/QI6FgE4/LQJUI7+vRfpZxgTYJwfZJOHIx zCkj8kZO7O3CBM+SZO/yzMCq3JCG4qiOqkTgibQ1Z6yzXDXN21nuub82BHFP PQDnh+sjz/ZmX9yXvX6k+Pyp8t1ztMn6+1eab99s/PAFpQkQCigDbAKPfAPE gC+/2P7xi52fvtyF+PndHgRc0E+GP9r521f7P32594/39//+/v7PX93729f3 4Eswzg+f7/z4xS4EvOD7V/BS9CbDb7cgvqXAsgZneKl/fnMfXuT7t5t/9sLn 5Dg5To6/9CGIvvhxUEI5tMkVXsSljrAL7aEX2kIuNIVfbgy71Bp1rTnyWl3Y 5eqQS3f9zhQHnM/3PcPP9rw/Wf/zwcjfH02+We3c7M2QdUTLeRxVZ9o8lyMp 8eksDRCWBndVRw20pEnrk1oKQ8vTvXNibtwNdykOcyoMscsPsM7xtcz2uZbj czXb+0q6x4U0tzOptwEmZsmuJmm3zRIcT1HhYph8y4hz41S865k4lzORzufC nE4HOxkHOBj72hr52Z8NvnHV3+m0n6OZr4OZv6N5gKNZgKOpvwPwxCjA3jjI 0TjQ3gi84Gdt4GcDNjH2sTHC8KYzKV70WTeYNjl+9uItq9NY0+VhbeRjaxhg Zxhsb1AWdQls8mw67+lkxsFAjKrdneo3aXTQNLmstPooBVHKvlzlVOPKgmBF OapeGV9VT2yoJ3bU4/vq0X31yJaa0WpBr9LXlSPMXniszmINEGfWejGbNZgv dbhD1wCz+R3bTCB0HyGxPN+NbbysgNUyltBjYB+ETtm/doUGqzVsq8dBJ/CD 4NeAXwZ5gq3x1P7GymGNcvAwBuiu8IFN9eDWKtBjaEczvLsOPBkh6ZJdCiZD +xDrg/sbA/vrffuavr21nt1V6a66C+LRTPFGb6K8I3iuxU/WHrAEPOEHKgWB KkHAisB3ReBDz1v0VPI9VDxPiBW+16rQZ03kqxH7rUv8NzoD4AIeUQu84WKz K3CnB2wSRuabLLV5Lrd74RBGMorxQ3ADFG3+87woeXeGYqxaNtUxPckfn+ma nO2eh79DWfeaQrq9LN1b7tpibNJF13T1ry33qRXUbrTw9wYLXZzZtzDFJ3mT /s5aWONhTRfCBG2CPKEGxB+yghlH2UTvk9kw4VaxvpR0VIrbK0Rt5cLWMkFL Kb/5LqweOxqK2usL9UZrbX5LTV5zdW5TVU5jZXZ9eWZdGQWTurIstAnWdMFz pPyqXnEtRH8nlTHRaxPkyRE26fwoZjvls52yuc6Fuc75WcncjHhmWjQ9JYTA ZhOMD7vjUjbp3FodfrQ/9/yR4uWTZTrkhCQkcJ8utMmje1PbmoEVhWRpQcIc AT8/ScXchAA/O3gjTdVZKXE+AZ42gV42/ncs/TwsfN2ve968DDyJj3TjNuXD c+BN4T+rw36TI4ctkv4UVs87iwy6NvnFBIreYOVNjmpC0W1ggTMwE2wCtyiv uaAsPz4/PTI3NTw7ORTb4SEyEoJAJfAgPBIf4Rnm5+Jz28rN6bL3LUuADNwz mDrBzind6aJ6hyeSIPt00UJpZSZ04BeD26xHVIWzgZjRLajqEVT3iWqHuhqn BtsXp8Tq+W7NYs86FZ0QGrl4XSZep7fnWpOJV+dFy1Pc2cEGUVNmZV5oSqQL 2IQTbIct8NquE5/rEV7Xwj2vwjna1zI+yC45zCkxxIGaCB/mlBZ5Iyv2dm68 R17inZJU3/qCiNbSOEFtqqghvY9bMN5VAfzZXx14sjv5dG/q8c4EnF8+mH9x H2IBm9lJ88h3bzcwMBuizYm83fnh7e6Pn++R+OmL/b9/dR/j5y/vQcAjEH97 d0Cu8QKeDN+rG+S74AzfBQHX37/Z+e719p+98Dk5To6T4y996LUJZk/4kZfR JgATYpOWyKtNEVdrQy9VBV+kbOJ/DmzCy7pzMFkHNvnbw4nXaslmb6acG6MQ JKx0pcv4CdKyAGl5ELfIH2wy2JourUtsyg8uS/XK59wqDLEtCbO7G25fHGKT 73892/tSxp3z6e5n091PZ3qcybpzNtPdPO22afpt0wQn41h7g3iXU0m3TOJc jBJunY9yOh1ifzrU8UyIs3mw85lApzN+jhd8HS76OZ7xd6LCz/E0CMXXHmxi RsnF1sjf7hREABWG/nZ/iE1cLcxuWppRc+FtTXzhB9kaBtqCTS4qhJwnkzlP JzLuD8aqO+78dpswkybkj/TyRK9NPp4F/5FN9GLkE22CPMHlExar6LUJTsSG dRqssWGxTQ9zBJ5oMzWkvosu8Rr+rTbZ6P9gE5onBxP56s64+daA6UbvhTb/ JR7AJIjYRKW1yR2wiZJ7BwJ4AgwBjIBEIJg2gTNoZUsatNMdttkZgnPhASYg FKZNPuIJN3CpLWCBH73Ynbk0XiOb/sgmigWperFrU9G5u9S5SU82ITA51iY8 pk2wFx7zJhDEJlRZ17Hc+PRAibBsgjBBmxCegE14TSXIk7a6ApAIK/TBJL22 VJs3uZsbX5wdW1GYBE/o4lf1iGr+UJsgT3DLLDp78mEP4ZlRLtZ0PdybRZtQ qZNPsMnWWj9lk3kxToE/HAHPh4DfE14Z1sDwYZUVcDgR7n4eVv53rBAmEF63 rrjYmsFFVUkCfILwm5AWFTIIXi9M0CYEJqwtufAdMVtLSBaDmQRhpjZ0g5lJ OaohhbU1sV74wEvhxtfgr4qiJPi4CzKi8tIispJC0jgBqXH+mYnBmDSBLznh d0J8nLxuWrg7X/FwuQrPgRsGbjyQCGiapAWZCRTdye9H2WS0jw0T+AeFxWas 6BVW9wpr+sV1I91N08MdS9MAkF7NYq+uTSiYLIiITcTNWdUF4ekxN5MjnBPD HBNCHVAoMQHWMf5W1MZcPhaR3te1g+BDHQEmcE4Jd06Pcs2MuZXDcc9LuFOS 4gM26ahIkLZk9/MKp3trlifaNxRdDzZGwCNvHstfP5K9ebz41QtqsAgE9qFD YD0VnHHvLDILHgJsAmqAAGigKViBuECYMKlCLKNrE3wCK/CZf/bC5+Q4OU6O v/RxlE0E0VqbtIeebws53xp8viH0ItikOeJKY8QVsElF0IUS39P5PqfzfM50 ZHrcG6/9cX/ox4NRsMlWX+YiL3ZZlKSWZsgFiX1VIT2VIbzigJ66WLCJpJpT l+1fkuQBNikOsSwKsSgKvl4QeDXf/3Ku7/kc77PZd05nuptmuhvn3DHNvWOW 7WGc6XYq9fbZJNfTCa5m8a7mUY5GcTfPR7mc87Mxi759jeNlHXbriq/DOYBJ oMs1X+dz/i7n/Z3P+zqe8bE3g/B1MPexM/Ghmt+N/O2NAxyN/R2MfP9gm3ih Tewom5RGXljgRj8cy0SbrPK8VG23fy+bEHrgH7F4gnGMTUgjPKYt8BrbGSDA IHjBiuNtQpZPZLHEssnirJ68yceTH7Xxe9lkX9O7t9aNNrk/WbDWxVloC5xp 8pW1BygFwSohBLGJN9hEyadsstyh5ckK3wslsibyRZvAl/ggPrLVRdV0AT0A JorWO8gTDJZN1Lyg5Y5AsImih7KJfJo7MyUAmEzP9y7A36qse1Uh3dLaRNsL T2CCNoG/MSwQApsATGChi5PsYE3VJ6mBFaygtQiWefyWQlLWRWq6jofGL4Zu 0gRtgl+yYKJrE2CI3tBnE23eBGxSlBVTXpAIf9rFr0Sb9EmAJ7XIk9/NJrOS 2cPUyew4DjehyrrI7PKZsQ82AZUcbxPshYeLh/uTaBPFnIgu5RIe2oQ3Ow6/ JLWDgVRQ0VCZnpMaEhXsGuBpE+xjG+StTZ34uF0Dm7g5ny/IDOtozIN3SvRB SMKECaoEYcJseGdeMzcKZhqBFG6RjbMIQ3CVzgp4AqvQi1kVRkrsWPsSE8WQ n4WFiHCvwhusuZsKn/XdXA586MiTjISg7OTQ3NRwtElsqHugpz2o5LbjJQhg C9wwcL/1SRrAJnq3oTsGJsfYhLzrXnE18IQVvaKaPlEtbZPmmWHucTZZ0M43 UU7z5oYaJS3ZNYURWRw34Elq1A0ilPgQe8BIXIANNQjexwLOnEBbhElymFNq hAvaJDvODXhSkurbUBjJrUzsbs0dFBTP9NWqprjwQ++tDb64P/f5U8UXz5Yg vvxMSTbIwhmIcI1awQ2BcdQIOuX9y433L6j49tUWJlDwTPIjLJLABT4HOKM3 acIUCjwTn0YI82cvfE6Ok+Pk+EsfOja5dGiTy2ATbvhFYpP6kAtgk6bwyw3h l2tCLpYFnAOb5Hmb5/ue5Wbd2R+v+W534Pv9YazpUvDilOJksIlClDxUF9Fb FSqtjuhvjO9pSOKWRlalexdwboFNKqMti0Mv5/ufy/M7UxhwtijwXHHguVxv k1wv49w7Rjkep7LcDdNvGqY4G6a4XUh1vxTncobjej72xoXYW5djbl8uiLpT kx5emRqRHHjbz/mal/3lgBsWvi4XfJzO+zie83Y86+V42tve3MvWNOgGUMXc k8KFobedkb+DaaCjuZ/d72+Tm5bmtyyxpsvYx9YwkK7pKgk/N9MS/mA04+lE OthEA8vadrffq6aLmRwh3eJMoegt6GImTUiihGUTAMhRNjkKJjisgdScHG0T ESytyWZfK4vUTsLwKzF+qyH14uCKfOA32uTe5sC9jf576/1ok71VKcSj2eLN 3iSs6ZJ3BIJN6LwJIMVfxfdR8b2VfE9iE+QJsQkEsQnmU8Am6xL/zc4QjSgQ Zy9iy8lRPEGbyAQxS71ZyxO18hke2ARgMrPQJ5f1Lst71mib7CgkG9rtubQw WV3qhcCNCMAmgDuGTajSI1hQYW0MsQl2nXzUDs+v1msTVAYzjrEJEybkmcxq LmZBF8CEFHQhQ1jB5ElDRRbyBGBSX55N13QlYN6E2pGJ9wfYZL5r4ZAns4ep k8PBi2ATLtm6anqUuzTftb028vjePKjk1VMlxMuniwAQ3QCbQIBT0CaqRfHS vJgUdNGfGpU3gd8QXhw+prKCuORY74hAl2Af+0Ava+AJBFyAUFztT7u7XMhN C26ty4Y3i/RgvkFdlSBMmDsDY1s6Cya6XoC/SaZKmDto6QY8gfBEtxWFaRPd n8KkENoE8yb15Rk1d9Pg4waeFGZGY3EXnMEpWNMFNgm4Y+fufMXV7vwth4sA Frhb4E7Dai69O2OzqrkQI79Y04V/CdinD/+s2CGsgQCeDEubpoc6FNOS1YWe I20y/8Emna05tUWR2fHuYJO0aNeUSJekcCfkSUKIPXiEmrfoa4k2SQi2B5ik hDunRd7IiL6ZFXsbbJIb70FsIm3J6eMWTHZXKcZaNxVdB5qhp3tTwBOIN4/l 756r3j6hOtxfPZS/fCCDgAuIN48VZF4J8oTKpzxf+/r5Otjkm5eb373eRkoQ jJDMCOZWUBlYnQWWgQs4wzeyAh6EJ8CT8Wn4TLz+sxc+J8fJcXL8pQ9+1IWP 4xIEZk94EZfQJgATiNqgcw2hFyHqwy5VB1+gCrp8zPN9Thf6n+dlex5M1P24 P/TDvZEv1rs10lQ5NwZsstKVDjYZbYzuqQzpb4gbaEqQVMe1FIZUpHrmx93M i7tZEnq+JOTc3ZDzZWEXykLPFQWYAUwy3UwLfc2qws60JlzrKbi50By+0ZX6 TCZZ4BWXhruneNik+zgVRLhVJPpnh7nnRXqnh/pE3bnh62jt6XDV2+lasLtl 4O3r/jevBdy6Fngbzlf8b1z0czrnbX/6Dk0ML1sTH3szquLLzuR3t8ntw34T dysjbxutTQpDzkw0Bt8fSX8ykX4wELMOS1yux+9iE8ITZAgu7yGYQmGahcQh AQaZGMEeE+1Yk0Ob6A3SWsIKhAkraaK3pgtbTmiYdGNN18dlZr+XTWieEJvQ PHk8W7LZlww2mW32XWjzV3ADlngBy/wAJZ9pE49lnvsy1wNrukjLCStvgoVe m12BW12hrH4TAhNWfdcqP1jJDaJs0petnKxbnOXNTgvBJpg3UcikK/LOdbl4 Sy5aV/aRNhNQCV38pi3oQpsc/g+8tq+Z1O2DSjoa8zBvgqmTD2Vdn5wi0dUK Cyz4CHiEXJA6LiZMuI3FoJK2ugIIvUkTVlnXIU9Iv0kCqenqpHvhD8u6anGF /BttIp/vQp6gTZAns+MUT8AmuE8XrqWnRzuWF6S762Nok9fPVG8+W3n1TKHX Jq+eLRKbbK72MW1yKErKJvBLwgK4pTYrLz2EE+EeHuAc4usQ5G0T4msHMPFx u+Z168pNhzN+Hhb5GaHwNHgyuAPfFPxzY8GE2WDCTJEcVVulW2dFsgZ6syd6 A5/DEgqrvotVx8VM0LDyJg0VlEyrS1LL8hNKcuKAJ6CSgoyo/PRIuMhMDI4L 8wCbYN4EbAJygbsFbjbAyFF5E2bGhEhEr03GB9pY/SbwBuFOA56w4tNtopGJ 1yAWxNgLDzapKYxAm2DeBGyizZsEf7AJNdkkwAbLurDZBG2C/SZ3aZvwqpJ6 6LzJbH+daoq7eVjTBfH8YPb1I9n7V6tfv1QDQIAhjMmJa5hDwcouLOuiKrve bDGrsIAk2GmCRVwEJoQt5EsMcM1Xn2lYQXiCMMFAtvzZC5+T4+Q4Of7Sx1E2 oSabaJtNzrUGn2sJOlcTeJaCSciFupCLYJMSH/MibzPMm7Sm3d4fq/npYOT7 /eHXaslaV4qsg7KJqjMVbDLWFAM26amN7mvgiCpjmvOD0CYF8bd5mQ5NiRbV 0Zfr46535d9Y7Ii6P5r/g6b1Hzu8f+0L/7nD+/tW20/rzd+u1D+el/RUJIfa XrI9ZWBlaGB9ysDC0MDilME1Q4MrhgZXjQyuGhtcNTO4ftrgqrnBFTMq4Mtr dFw1NXC6YnDTwtDT1tTb3tzb3szLztSLGrz4x+RNrMzdrE3BQdgLH2RnkBdo NlYXiDbZ74sCm6wLvNZ/s010y7pwbc8Sit5g2oRI5FeVb+nCBFVCCuB/0SaY OiE2+WPyJlqb3KM64nvQJg+mCjXdCVjThf0my/xAtImSBzChbLLMo2yi4mlh gvkR3V54eBBgst0dTGq6ACY4Gh5Vops9QZvIhbHLfTmqqfrFWT7YZGahb1bW J1vooWwik2hkok2ZEGyiCxO9NpkapibZwVKqR1Ql7rjLay6AZR4mTUhZF8bx lVrMIM0jzGCxhflHrIwJnkk1F/JEt9nkCJhk1NxNr7mbUVmUijVdOjah1ofI k9/LJhCkrGt+UjI/IZ4ZFWDeBBerM2NU3mRrdRhs8vLJMtiETp3oz5ugTZ4/ XniwN4E2UcxRKiGpLqzpmh3jwbuor0jNTAqIDbsdEegS6ucYFXwjMgiQYof9 Ju4uF6KCXeA5oEt4j0yGMK9RJQQmrGIqvbv4Ht/2/ilCIV0/ZHjiUW3yzNck TyaL/y5+Odyu7Q259eUZ9KefhpVdyBMI5AlIJD7CM8jLwdP1OvIEwAL3DLEJ mUXCbDZhZUyOsclYfysLJuhf3Xo2UMlHNV0znWsygIkem6zLJRoImQRtImnJ ri4Iz+K4pUW7smq6OEF2sf7W2G/CKutKjXABm2THueUl3MlP8rybdmiTtrwh YcncQP3KNG91QbS/OoAZE4jPnyoAJkAPDGYLPLlm9sL//KW2Yx1J8o+vH0Cg TZhtJsz+d2YyBbiBJWHMIHJB0ZCkyUne5OQ4OU6O4w9u5CVe1GUIfswVfvQV 6iKaajaBC+6hTVqCzjYHnqkOPFcferEu+EJtyMWqoPPF3mZFXqa5d0xyPc3a UlzvjVb+fX/o++3+l4vcdXGcoj1sWRCnkqQsd6aPNHO6qsI7a2Kl9Qn88miw SU2a512Oa32m92i1l0aa+Gax8ued9v+6x/t5u/X79cZ3yvIvFHffyoreygq/ WCz6XF74ai53b7y6uzwi9sZlF3MDW1MD2zOnrpsaXTU3vGxmeMnM4KKJwYVT EEZXTIzhkaunDa+dMbx22hCoYnHGwPKsgf0FA5erhm7WRp52pt52pj4Q9pRN fG2MfJEn1NATSih44UNdHG0TSyN3i1M6NjGl+03MXS3MbltRvfA+ttQewgE2 Btl+JsM1/gfDaY/H0/d6ozbF/uuwrG1xWm1xUbb5LAuiVnpz1BONmnnhqmJ4 bXlMs0LZZIuaujgKayFWnwgGcxsupk0+BSYQukmTo4IkSo6HCYRsSoKxMIl5 EwxYH+ISUSSfFpOaLtJvgjVdakXfunL40CbD2GwCPDlshx86DOTJwLpqcFM9 sLWKNhnd2xg9tMkQBNhkb522yQbFk4MNiAGKJ2s9e6vdlE2k8QttAbPNPvKO gGW6EV4p8FcK/FR8bxVf22yi5LuDSlb43mqBz6rQd03kp4EPjrJJIFzAIxBw sSUN3u0N2+wMXhMGAEAAJjjihJU9IWVda4JgFS8YbELlTSbqFDO8uWnRnKx/ Xj6gkPUp5T1r8q5NuXgb1jYUTKigS7l6yGQZet9m6u9wYUpAL3G5WDYDCyqw CdbGwDKPbCP8B9mE9UdMm+imTrARXi9PdGFSW5peVZwGUVGYUpLDYdikgmkT vTVduIcwmQaCm1mxbKLN8UHMUTBh2WSW2tpXDDaZHRMybYL7dG2qh8AmoBKw CdV1clxN1xLJmyjlIrJxAcBkdrxjZqwDXhAoAW+koTItOyUoPtIDeBITeosT cTs+0i0u/FZEoFOgl7X37avwSF15SievDH4ZeF9oLjKBURcmaBPdnAhLJXo7 TZgkYRqEWcrFfJCVQDlmMAoLO/DG4RobOsAmAOq2+pyGiky4ByqLkkvz4sEm yBPsjgeb5KSEJUR6BXs7et+ydHe+AkKBx+HOgduMIom4nmUTVhc8bheM8aHl pLtFa5OeNmr34N7m4Z7moe7GQWnDQFc9vetCvZ7orAeYDEjqR3ua58b4yrmu NXkvvU9XN8MmIrQJfLkmo/Imc0ON4uasqvwwVr8J7tkFEgGbRPtagk2wHV6v TQqSvErT/LT9Ji05g4Li6d6apfE2+EF76v4nu5MvH8y/fiQDm3z1YgUzJu+e rzADqKK7VdePX2itQTImfz90CuEJ0ynH7NOFDGFiBFvsmX/6Zy98To6T4+T4 Sx9tUddbI6+1RFyFi7aoa22RV/ixFh2Rl7URcbEt9GxToFm9r0lt6JXq4IuV gefLA86W+Z2562MONslwMcy9bdKZ4fp0tOxfu93/2Oz6arH1oTR0XxK81Rm9 O5S9NVY62JEubkiStueJmzJbSqKacvyb0twb4h2GK0KeTmZ8qSh+t1zybqno 3XLhF4q89yvF75S5Xy7nfLGU+bki43NF+ltF6ht58t5IzFiDe7LXJcezVB7E 3NTE7PQZo/OGxlQYmJ0xOGtqcMnI/IrRuQtmhhfNDS+dPnX1zCmLc4aW5w2t zhs4XTZwvWYIsvC1N/F3MPa3P+VvZ+hnY0SmMbLCx+oUhrelIcRhuoQKd0tD d8tTaBN3CwhjCLfrRm7XTSBuWp65cd3sFjjF2sTTytDHygBskuph3F/hs9OX 9GAkda83ek8aquHBGvjGEtdV3u6t4EesSrO3Rhv3Z0QbswObC8Oby+Ob6knN 2viKZnh5bWBjRQ8udPcK3lmbxJQKiye44GcFsYlenjBrt5g2IVVb7P+C1kY3 TtmmBy5Q//M8N07xhLIJNeUE1mYiDPmMCPMmh+3wPRDYBc/cpIsgBYM8YXWJ WrFrlP0bK4Pba9R8k72N8e314W3N0PaaNnbXBnfXBvY0wJPhB1sjD7dH728O 39P076l7HlP9JgmydrCJt6zdX8HzV3B9lwW+ysPdg1UCdwxQiVrgC7Eq9INY E/lDrEsC4YyPaMQBW9KQvb6IDUnwKuiGtgnpNyE2Ye7WtcoPUnbQNV09Wctj NYtTHbMT/Pn5/oWFgaWFXrWsZ2Oha2dBsicTayiYDMCbpQaayHuUsu7lBSlO rpTPiOHvk9roaYw7NdKOe7fCuVtYiWs8pk2Y2wh/egWXLkywfIuJEd1g8oQJ E2behDSYYCBMmDaB0LUJmQsPNumTaKcukjoilk2wvQKzJ7qpE62m52ibzGlh gjZBnsxNiODWJXkTXN5PDLUq5iQ7mtFnD+QAk+Nt8vaF8vOXSrTJtmZAtShe mMZ0CRdgMj3aNjXSNjncBr8krMybqjOKsiPSE/zT4v1y00LT4n2zUwIzEv2S Yz0jg5yDvG1SOd61Zcnw4TInMOI1SyVHDXnXCxAWK5jVWSRrgGkC+CUxUQVB nq+rFbJ5l17psPIvUkEF/MLwynABdybcsa112U1V1G1QXkBtHF2WnwBRVZwC NinMjEahJMf4hvo6+9y28nC5GuLjBPcGPB/uNLiHASCsPYRZExhBIjgCfqy/ A0ecsBrkkS2YVcHZi7rjUTBGupuo2Yui6rHeJtmkcGVBuiqTaha7aJgARiQa uXBdJlxfEGhk4s0lKfabzAzUg00qckOy490z426nRbuCTRJCHeKCbGMDqQou rOmK8rGAAKdgywnu00VquvITPcsyAsAm7eXx3a05I+LS+cEG5WTHrqrv0dYY wOTtk8VXDxcgvvxsmdkLjwVdABNt8/vH+3R993oLsxvIEwDIP+jsCSnrIi3t pEGeGSySEJVgWRdpUSEJlz974XNynBwnx1/64HGut8Vc7oi71hF7pSXqQlvU hdaI87zoi9zoC20RZ1pCzdpCTVtCTBoDTtWFXq4OulAZcLbC/0y5/+lSH9Ni L+MiT9P68EsT5T4vp0r/vSf+nwdd/9wW/LCY840s+/OFoleL1fdmqoa46d2t aUPiUklzZlNReH2md0PKbbDJaHXYo9EE8Mg3KyXvVUVfLRe8W8r9Vl30tQqE kg/ndyAURdYXiswvlzLvj8fPtHpn+l91OW9wzcTA3MTk9Jmzp84anjprYHzW 4PRpg/NmBpeMzS8ZnrlgemiTs6csz5+yvmBoc/GU4yXDX2UTwpNfaxNXi9Ou FuZgE3dLY7CJr7Whv7VBsptxb6nnVk/C/aHkne7Inc6QNa6Xku+yxL1B2YQX oe7K2hz51TYhJCHBtAkxiC5M/jObkMElf7xNhv5QmzyaKdzsS1zkBs02+8y3 +i5y/ZZ4fnptsir0RZsQnqBQ4EsVz3uF5wNfbnQGbXdTzSZrwgDshWfWdOna ZE0QrN2nqztTOV6rmOLOjPNmZ3vn5voU8z0rC90fbLLUv0oH0ya6MIE1M46l gDMs87hN+bDGA57otYneLpJfFcfYBGHyn9kEVph68ybF2VRVD2ufrv7Ojxqx j7IJSTGw7thftAnWdGHLCbwaLvJ/pU2WgSdgE9xDmGmTmbF2YhN4cRBHY1V6 cU5UTmoIRFF2VG5acF56SGaSP/AkIco9KtgFrvkthVRd2Si1bxic4X3plnKx YEJsclRmRLdtRHd7LgzSZ0G2IDgqmXJMTwoTO9hgjhsIw20JNyqVNKlMqy1N w7zJ3VxOaV482ARYCk7BL+FOSI3zjwhw9XWz9nO3iQq6BY/D/QM3G9iETBFl 7SHMrOw63I+rfVDKnsb4q2wyLG3sF9fQNmmWT4nUsu41ebdem6zJRBuKLvW8 UK9NUiJdMG8CPGHaRLffBDfpyku8U5DsVZEVCDZpLY3rbqGmLi4MNS5PtG8t SbHfBGzy+pEMbPL506WvXlCJEmw2wfj86TJpNmHy5NtX2t4QpiOYWRKECflT VsA3MrvgyZZfzNdkdtD/2Qufk+PkODn+0geXc7U1+mJ77OW2mIstUefagSSR 51rDzTuizrZHmreFm7aHm7aFmTQFnWoMu9gSeYXLsRCn2A3kuU5XeC81hW6L OY+HMr+YL/leVf3Tau13qsqvF+/+U134ozL/vbLs7XLNzkTpYEfqkCBnSFLC r0+uzQ2sSfNoSL3ZnnZD1hb/bILzTpH1/Wrhd+qCr5dzvl7K/g5UspT7jTLv /XLeV4qcd4tZX8qz4Px8NlXBDcgNuH7jnME1I4MzxiZnT58zOX/K+JyByRmD 0+YGF0wNrhiZXzE8S9vk1OUzRtfPGVldMLK9ZGR32QhscuOqIcjCx+5TbcLk yafb5MZ1gMmZ21Zmty2MwCbUnEcrg8RbxtJi9/WuuIPBpG1pxLYkiLIJz0XR 4SJr81rkhq90Zm4MN+xNCz/dJiyYYF+87uySY20yQGDCtAkTJqwNuMjgkuNt Qs+nFhObzB/ahPBEr00O59EPMj2ClV2H14N/kE2W+f5H2ITCCOEJxArfZ1Xg BypRdnhBwJcaccBmV/BmZwjZQ5jMXtRrk1XaJvO8KLTJ4lTH9Bh3erp7ZqZn ca5bOSddn+/cZthEregjMIFYnJXIqIYIwew4D2EyPgjrzyZs2YaFLtrkqLxJ J1d/NuQT9+kiGwUfYxNS0/VrbUKSJmCT6hJtv0lxNrVfE6xR4Qlkn65ftAkm TdAmOEL9V9lENt25oOWJANf81Cv/GpvQ802Wmft0sWwyOdxKf3at8KFU303M SQ1OifOBSE/w50TcTo71TIz2gIgJdQ0PcMxOCYRPE94gvB3yvph5k09JmjD1 wcQCyyZ6t+Ri2oQVegu9dHf0Ym3JCzcqOBou4HfDXXnhLm2q/v/Zu+u3tvJu AfSDO9QL1HAJnhDc3V1KseLu7u7EE1zrM5WpUKAuI+85594/6q69V/iyuxMo 887MnfmB/awnz24IKSn7vGd/ZllSYXY0wATzJugReIRnIOCZtDh/sEmIjyPP 5aqvh1VkoCvIBa4luNhwljXZHMpKnbC7TnpqkR7/tU2GuyoAJn2txWiTZXHv qqRXvU2EbfDk4lwL2GRmoKy1MglsgjVdmDchNV3EJmROF25dPFxuEumcGeOa HedelOpTlRtSlx/RW5s+0VUoGqlSTDVsSLseHtgEW072n8lxbjBphCdd8MQm ykb43fXPr78RBFmzyLTJMRODmYmS98/X3j5bgSA8IUg57Tc5PU6P0+MkR7mv QVWgSU2QGZ09OVcfYtYQYlYXaNgYYtIQbNwYbNwdfX4i02r+ltOTodSdyZx3 gvz3ooK3grw387nvhDf35tI/SnM/y3M/SrM/yXO+LOR8kmd9mI99Nx//Vpq9 Ky/amsgZqIsebk3ta86oLw4vTnEvjLWriLdpz+Ss96TuC+I+ylJ+Wcr4spD+ QZr0Xpr0SZH6UZb2QZr6XpIM8U4MkfRGmLgvSVtq9cvgXrI1oFrgjbV1jfQM Dc/o6Blr6Or/YKDzg4n2D+c09c8r8yZoE20LM22GTX6gbaJN2eSqptcVsIn2 UcGq7HL9QzYxJzbRRJtE2Wt15jitdoY9GFbaZLXJXd5kDTYR1rqKG/1pm5Qf ZZO1BTXNI2ptwlp3oraaCwNhopo0UQsTZsYEu93V2kQ8000nTZQ2AZjQNqHb 4adamDw5wiaDBzHEhAkGkctfUdOVs86o6ZIdXdPFtAkwBEiCuRI4B5gsNLov NXuudXhvdvtudn1jE/SIWpssNXnjDGFq9+LYbfFU/dxk89R01wz86812yee6 Vuc7NgVtd4RtK9J+gAkmTbCaC4Jpk5mxhgObHNZ0gU2Oqek6eX7kj9qEBZOT 24RV0EUvN6FgUnoruTg3gfTCUzOEGwu7W+C29jaZ04U31ao2wRt4LOhCSpNr +A/ZZJ5adNKkvOcfrjuhTbARHnjC7DcRTisLupg2gR8bfkH5WWFx4W4hvvZB fNtgHwojkUFOaJNgH5tAb6vMJL/mmmxqjvFoI+bIkCdq+99ZNsFeD1WYqBZl kSeJOEionVWllieqeCEvwDchMKG2q7cWYXEXQgku17L8xOLcOJAI/MZv34yH KwHO4aqA335JXkJualhKjC+QxM/TOoBrGxfmBS+ASwsuNrgge1pKMVipE1Vi AD1Y++L/jE0kM+3H2GRV1L4qphrhwSbT/aXN5Qn5qfykMAcyQBjXL4bzrwBG cL8J2CSMa0GSJsQm6ZGcrFg3sElxqk/1zdCm4pj+BmojvHi0emm2eUvR+9Pm +KsfhYxe+MW3z7+p6SIkYWZMlHvh9w7TJWTZIrMjntlXwirfYtZxkQQKEyZk pDARyj9943N6nB6nx7/6yLDXvOmile+uU+lv3BF/ZTTLQVDkcb8j+kl/0svR 9L3JrHfTOZ8E+b9Ki98JM/fn0nZnUnZnkvfmUt4IUiHei9PfClN2pmNfTUW/ FSV+lKUCJb5KE79Ikz8ocl7L8ldH0rqrQvoa4jrrEqsLgopSXPKjrSoTbPvy Pe+NZMHrP8vTfl3O/LKQ9l6SCPFRlvyZ4knyB2niBxkV76UJb8Vx7+SZqx2B Wd6X7Q01LHQ0zHR0jXQMjMy0dQ009PU0zhhqXTbWNdcxOqehhzY5Y6B5wYjK m1iaaV45Q9V02RzYxOualtdVDa8rPxxjE8ITFMrJbWJ3Sd/+soHDZV2ny1Te xIuu6Yqw1WrPsl9uD7l/kDdZa/aQNVpJ6q3BJqIGv4WOpLXhsjvTLUfZhNlF goHrS5jNJsxhwqyhXkfZhLVmURUmaocD4/2eukCYdAkmOxAmc+OtcHcnmGyB e2kmT9TaZFGiXP5Ix5BqHLBl6E/a5Ml87gltQqmkmQ60Cc0TZU1X4zc1Xbjf hJk3Oaqma7GRp7RJd5J0tFg0WUfZZKprerpLONNJDSOlSvtaNueal+nxZWo7 TVh5E1znDY9dzQWgkprSlNqyVPU2afrrbUJKuZgDhFmN8MfbBGGiahMyQxhu UOGVHY0FXc1FBy0nyvqio2zCbISHC5gk/v67vMl/YROcIfzo7uT6Uh/LJtOj ABOqSGykrxJtEh3iEuhtE8CzhkfACNgEO+Lh3M/rWkosr+RWTF/7bdxsgvKC D4vpIVbShDUZmNhE7ZQt1Yospke+mUzFWPOBmQ7CE7UZFmawbEJ4gt8LFy38 ePDzw3ljZQ6Q5FZGJNgELga4JOAEVAJXCPzxZlo45k3AJmF+zqmxfnBVwGUG Fx5ckEASYhMmTwhD1MY3XSQnt0l3Baum6yib0H/sRJtM9ZU0lsblJfPQJiRp AjCh98JbkGYTshcebEJqutIinDOjXYEnRan8mrwwsMkAwyZ3F/uf3pna+UmE sf9M9v7lEllfgpVduCOeBZOv+5sQX15/U82FNvnf94/+78OPyBPWohNWYEIE t5mQd2Bxhjmw65++8Tk9To/T4199DGVazxa5LjcEPuqP353L+Swr/iq//W4+ d3cq4/Vk+v5Uxu54ys5Y8t5E6s5U5OvpqL3Z2PeipE/SlI+S5HeixK/ydDjZ m4t+PR35VhD3QZL4ThT/QRD9CU5kWS/EuSvDKX21YaPtyQ2l4aU5/FsJDrei rjekO01W+j2eznsvSv0kTf+fldzfl7I/ipM/SpO+yFO+KiCSv8gTP8vjP8lj P8piPkij30nSt7pCCgOuup3VvKavdUZHz0hLX99IQ0fvBzMTTdurZ9ytr9qf NT+rqXvYb0L3wpubaFiY/nDd7Ae0ifuVk9qEmT05uU3sD/pNsBfe0/wHsEmY tVZLms1ia9DdgaiNTv+NNt5qk7uswUpcZyWocRHV+ynaE8Em21PNJ7cJc32J 6v53ZoblKJvgLnjVVSaqk7hYMIFbvqNsAjAhNgGY0DZpmZ9sodbMMXii3ib0 z0MHoGmQFUsSClN/iU0wbyJu8J6r9hDWeUmbuEf1myw0uaNBECaYQFFrE+w3 weUmkhqO2iFdJG8iq+cJm0PE3Umy0WLxZP3sRBPaRDDdIZlpX5xuWZ1uWp9p XKJmcyltgjCRzHWwYDI+WD02UHVym3ScuKbr5L3wquO5/jubMGCSQGq68tIj wSbFuXFok4O8ScnxeRPmkC7EyB+yiXBa2S01O9ZMZl6dvKYLbIKBNllb7KVq uqabSNIEbQKoHO2rhF9KUW5kTKgrsYk/93qon12Iry0EwMTbzSIu3K2yOBE+ Mvww8EnhA2JNl9qhwaxOE+aWc9VgyoIlFJIrwUZ4YhMiC7XZk2MyLIfLQej3 gTfBb4GLFr6K/ys0NdQEVwv8uuGSwIU4eI57OYGoaXH+4f4csElCBA+oAlcX jo/Dmi61qRP0BTxifRezFYUllL+jF35D1rUu7Vqca5FPN0723q4rjs5J8ASb 4JyumAArsEmYtyXYBCd0BbieD3S7AOdkSBdzTld6FCczxrUwhV+ZE1xfENlb lzHeWSAaqVqYbtxW9IJNsKALbAInb35WkM0mzJYToAoOFmaO6vq0803Tumre hGmTk/TCs1Y3MtejnNrk9Dg9To/jjw+S7DeC9P25tJ2pxJ2phN3ppBdjsUvV rotVnLttPrsTce9mkt5MJexPxL+Zj9mfi96bjd6fi3krAKEkfBAnAkwg3osS 3wri3wrgmeTP0tT3YBNp8ntF7nNR7tJgUk91SE9dVGW+X36qS3bU9VuRV9pz XaXNYS8EBW8F8O2pv6/k/LaURb9V0mcZqCQZbPLLAs0TWcJnWfwXefy+NH+j J7YswoZvoWNtqH1RR/estq6RroaJ3g8W53Q87M0D3exdLS0v6uqc1dU4r6dx 0UDjspGGhfEPlnTYntNyuKDlYq4FNvG8qu11RdPTUtPLUosO+KM2lwodDC9L DLCJNm0TLWqhvLkmFZeBJBqcS5rOF7+1ySUtp0u0TSz0bS/pOJjrcCx1XS5r uV/S4FlohlzXakiylTUG3OkL3+jgr7e5Lzc6yhqui2uvC2qcRfU+C+0Ja0Nl d8AmswMbgmHaJpOUTVZG5Mtgk0NlHLVdEW3CJAlzBTwrVPMmpO1dTcZkDm7n OsTUf0xuo2QxBffG6m0imu4UTh0Ww0CgTai8CZ06oYcJg02omi7JXDvc6ckE YJNu2iZ9J7EJ8mRJSjVinNAm99aGQSXAE7TJveW+H2ez1/ujxU0+c7Wegjov SaOXlGo58ZSDTZrdFppdF5o5C83OEIpGV0Wj2wJEk/tiszslFOAJVeXlRdd3 eS63ctc6+Btdvqvt3rh4kcwQRpswty6iTRQtfEmjtwBs0pUkGy6WjtcJ4A5z omtuqkcw1SGebpfPtCzONC3NNi6Ke1gwgQDlYTXX1EgdwmS0v3JsoBr3m+Cc rmN64dsbCjA6qCjE6GqCu7vizqYiKhqVQb2snh1Uu0pjoTLo74WXqWZMjrIJ kyek2YSVNAGYQMAd6e28eKrLID08NzWkKCemuiSts6mgp7W4t+027oUnLSfH 2IRZ0yWmLmO6VQovbKVNOjFw/aJgtmN+VtkqRW+HP84mL5/IaZuwA5Mm9Axh 8cM7k6sLvXLRYd6E2ARruuBWv+RWDNgEYOLPtYJH8EiYv314gAM8BnrDMzcS ozyrbifB/TxzPDKek6HBZNMiEQprVYcqT1gVWayN8GptwqzIYrWfnNwm+Fb4 LXAC1ye8Lfzv0qNt4fbKzFh/PVwtWKkFAVcLXj8QcAIXCfAk1NcpMzEILhK4 zAAmgBHCExQK2gR5QgCiahNWxRfZdUIMchKbUP0mdC/8mrQLYl3auS4FnrSt i1vXRa0b1B+pXniwyXh3UW1RFNgkJcIJUydMmwR7Xgp0v+Dvej7A7Tych4NN /L6xSXKYA80Tl4IU7/KcoNr8iK7q1JH2W4LhSrTJ462JnR+Fu4/FEHtPJHtP pbsQT6jAjAnOEKYzKSsfXgFP1j69Bp5sQDB74Unig7l+kRBDrU3IVzGB8uHF +vvna7jMUW0l2D9943N6nB6nx7/6+CCK3p8N250KfTMb8XY2Ymc85HEvX1xo ISm02K5zfjsR8XEm9sNU9JvxiE/ixA/C+PeC+Pfzce8g5uLezMZ9FCa/m0t4 N5f4QZDyUZj6UZj2RZLxWZL0UZKyJ8l6KshZHkoZbYntqokozeFmx9pkhFwu iDTvK3Bb7Y56Jcx7J02EeC9N+iBL/iRP+bKQ/nUx49eF7K/yzE/i9HdzSbsT sS+GI34eCFV0Z49WRFbEOyV6ng+wMuFeocLFwszr+hm+/Xkfx4s+juZOV4yv ndVyPKvHuWDgdtnQw9LI09LI3cLQ9bKB11VDr6vwqO95BULPw1LXw1LH01ID A6jCvarFvXpoE08LZXiYa0O4X9Zyu6TpelEDg3NBw/mChtNFDFCJliPERW1H sMk1TVtLDQcLLY6lnou5vvsFbe4lnZBr2rWxTsJq/zu9YXe6vDbb7ZcaLaV1 FuIaS2GNvbieu9geuzFUcm+qaW26Z2NuYF0ytrEwsbo8vrQ8rFgaIL3wTFwc nzdhPan67fSQrkG0idoGE5IxAUTgMuuDBQ2ojLaDaAeMYJD91KxgbmAkQYpt 4K/GZny18S1P0CaDS9L+ZVk/sQnA5Cib0DwZvLc6eH9tCOLB2uCD1YGHszmr /TGiZr+5ep6w0VvUyBXWe0gbPWWNnlSHe73rQj1nod5JUecoa+RgyJtcqGXx TW4KQEqL11IrF2K5zXul3We1wxdipZVHbIJ5E5QIyyYQwla+oM1P1BEp7kqW 9uTLB2oUQ82ykR7pWK9osks80ymebxMLW0TCJrmom5RyYZsJxOx4I8CEmTSB gPtSuAsl+7UBJjWlKczdi6wtJ0QrGF3NBRB0xVc+eRJeQ76RBPO7SLTWfuMR JAmByTF5E+yCZ7bA0xmTeDqiS/Njb+dF52WE5KQGFuZEVJckw48HHxCricjt NNncQWDC7DchVx3VJzXTLprtgBDj1kWVgC8JZ9ohcIYwsYlqL/zrnxeVNnki e/lEyorXPyt2ny9AvHgsebA1uarok8y1kAHCWNNF+k3gFr2iKCE2jLJJsI9d iK+9P/c6qAQi2McmiG+NJV5gE/j4AA30CO6XxLFdZDQZ/pwEKZhKYza8s4q1 CByY691VX8Cs44J/f2ITta0lamu6mPVgJHC5CbwPXGnwR/gFba9M3lufF051 waWCjfBwSeAAN7gwAKpwYRRmx2QlBSdH+2ALEk4PBokASTCBwuIJc0E80yMs mzB5QrpR4I/MFzAD53Rhv4lsrnNN2r8m7VuX9azLug9tImnbELetCNtW6fWL sqmG4fZbNYWRuYleyeGOJG8S4XMVbBLCNQ/2uhzkecnf7XyA+wU4gSej/K7j 4nh4JfbOQ8D35iXzSnOC6m/HtFenDLTkzg9Xroo67i0P/rgx9vz+7OufRG+e yd7+LId481wGsf9Mvv9Mtqd0iuyAJ6sfXq193Fn/uLP56aBJhPSDMBMfrNzH UZ0mrO4S4AmzcZ5M9Dqd03V6nB6nx3ePd/NRe9OUTd7ORr6bjXo1Gvyw02sq 6+z8zUtbtc5vxyM/Tse9n4x5NxH9QRj9Xkg9vhNEvZ2PfC+I+SCK/SgCrcRR YKHMEv9BmPhVmvpRlPxRkrYryXk8n7s8nDHentRdG12Y7p4ZbZMZZlkcc22k zGd7MHlXWrwnStkTJr8WJL6cjXs2EfV4OPzRYOiddv+1Jp6sgjNzy2oo9XJn zNnWCNNM/vls3/O5AZdzAszTfS8nci/GeZyP8TJP8rVKCXaM97OP5Fnx7M5z rhr5WBn725oFO54Ldb4Y4nQxyOF8gN1ZPxszPxtTX2tT/g1j3jVD7lV9LiCF UgkFE1WbeFnqqtqE8ARt4qgMTQeIi/Co5XBB2+6qBtrE2ZJaxQg28bqoHXJd uybGUVDld68/4m43d6PdbqX5KthEVGMhqLYT1XkpWqPXBorvTDSsTnavz/av iUEQYytLYwtLQ/LF/qNsosoTshcev8RMprBmCzPHcx0HE4ZNACZ/lU3Iwm54 f/gbseFFrU0Uwn6IBdEABEmsLEm+sckxeZM/ZBNpIz19q94FbKKoo2wibXAm NqHKvZrd6bwJqIQHsdLOB5Wsdfqtd/mvtfNxvwmoBHvhqdYSdTaZb+bNt/qC TaTdKbLeAll/tWygUTbSLR3tAZuIpjuITWSCTlAJ9phg0gr+5REmUyN1E0M1 JG8CN6J4p4c2aajMIHmTo2zC4gmTJBiqMDkqiE0QJsQmeKIKE1YLvNq8CdgE YFKUG3kzPRhsUpAdXlmcqNYmZPk42oRMDybXnhImR9gEsydMnkDg7kWaJ2r6 TX7+UQI2gfjvbMLMmwCpcPdifISHP9fKz+tGoLeNr+dV4AkJP69ruBce/qmx HR4/JsIELcYs6CKN8MxqLrU2IVtLyD8m0yYsVrBgopo3OSZUYQKBfxFecvBu 8Az8DOMDDd0tJXABpMcHpMT4AkNyU8NwAyOcw5OgEniEZ+Cygeuqra4Ax3OR 1AnyhFnZpXaksFqb4JBhZqf8Ue0qw13KfpOJ/mrpbMeqtH9dBjzpplInVE1X O9hkTUTlTZYFrSt0O7x0sn6oLa+6ICI73oPZC0/6TYAnaBOIQI+L8AywBV4Q 7X8DHuHFGOAUeIeS7MCmsviuunTwjnC0ekPa/WB1+KfN8RcP5nYfi2mYKCDe v1r4sLP4/iVIZOndi0U6lFtOaJWsf3q98ek12yaspngWTJjb3kkQkjAXxLMm dDEh80/f+Jwep8fp8a8+3s5F701H7E2Hv52NfjsT/XIk+FEXbyrr3PzNy1u1 nLfjUR+m4t9Pxr6biNmZDtybC3krDH8vjoT4IIn+KI19J4p5L4r5II77II7/ IE74LE36ZSH114WcXxbzdqX5D6Zz5P3pw82JrRURRRm89Ci7lGCL/Khr/cV8 eWvkek/8Wmegosl7vtxlJM+qO+1Sa9zZpmjTykDDMl/9Yp5OoadmgYcGPBZx tRI52kkuOsnuBskexoluxrEuxlHORhEuZxK8LW9Gupam+JekBsT72nnbmPnc 0PWz0Q+0Nw52NA12MAmwM/azMQywNQmwNfWzNvW1MuZfN+RdhTDgXtXgXqVU ouTJQVkX2oTJE2IT5AnnotImDufpuKBhT4WW/XktuysHNrE4tEnwVa3yCJvZ cv7dvojtTs+1FmulTaot5qtsBbWe8paolb7CrbE6sMnabP+qaGRNPra8OLqw OEjZRB0uVMu6IHBiMLEJtsmrXXqidioXq8dEucqEYRPhdDPaRDDVeiCONhwX TId6m6jyhGUT+AGOsolcQAUtlD7ymkVJ35K0f0Xe/xfaRAI2afCQ17vK610U dc4AE8om9U7IE0WzK9hkscVjqdVrpd0bY63TB1QCsdEdADZZavaS17uRai7V gi6MuSbufKsPyybS4UObiOZaRYJmsAncCUvmOpgwmZ9sxmoukjQBmFA1Xf3V cGOJNoE72KbqLODJUTYhJ0d5hPVd3zCE/hI7atlJE2ITshEeScLKmBCbsAYI UzVdNymY5GeFAUyyUwLAJnBzjjbBO2rsgmfWdGHKgEwPZidN/pBNDiZg0+sX leVS0yP14ES42Jg2efVUphontAnoEn5a+CA1pSlp8fwAnjXP1dLH45oX57IX 5xLP1ZzvbgkBNokIdCzNj4XfFH5GcAd+TJIxgRNsflftN2FNDGbZhPDkKJuw +t+ZQiG1Xt8N5rez3gevQ3g3uLoaqzIbKrLhSgCPZCQEQgBDkqL4cAIwyUkJ zU4OgROAye2b8XBp4XguIhE4wXENrLKuk9sEa7rQJlj9Bd+rvoOe2gtfAgE2 EU+3rYh7N+QDAJNVeiP8qrhtRdSyKmwhM4SJTaryw7Pi3DFpwlxugqkTtImf 67kA9wvBXpfhSXgBBrwYvgsbVXISPEtzgprLE7rrM0Y68sXjtZvynkfro0/v TL18OL/3RIIwoWzycoHiyatl5AlODz7Yt7gJQdtki9gEYUJ64U+YNGEOEGba hDmeiwjldE7X6XF6nB7fPd7OxbyZjd6fiXozE/1mOnpnLOzZQMBIitl42tnF EpudwbD3k/EfphLgcU8Qvjsf9noOHsP3BZFvRDFvxbF0xL0TJ7yHkCS8EyW8 EcTvziTvzKQ+HEtd6EmYao7trI6pLQrNindPCLFO8LfMDLGsSLStjrtaGnou z9sw30e/wFe3wEfnJk8zy00j3VkDHnPctW956hZwDSDyPfXyPXQz3LQz3HUy vfSzeMbZPLNM3rl0CF/LVB/L/ChOU15Ye3FcZoiz51U9fxudQDu9EEeDUCfj EEejQDsDf2s9f2t9PwgrA1+IG4Y+1w0geNc0ede0eNe0lTyhe09onugybQIB NmGmTlwuanIuaqq1CcAEeAI2cTLXAZt4XNT2vKAVYKlVEnpjupR3ty98q8Nj pdlqteWajMqbWFI2qfGQNUcu9xZsjNSsTnWvzw2siUfXFeMrS2OLdN6E2QtP mtnVNp6wYILDu1gqwfhuuoR0kXxb0NUsmKK72ifV2OQomKjlCbOm6yiYEJsc CEU56HhBDDbpA5usLQxuLo9sr47BHeOftIm4wUNS7y6rc5HVccAm8lpHea0D 2gQLusAmS62eaJPVDj7AZK3TF2FCbIKLF4lNMHXCivkW7/lWX2F7hLgzSdqT DzZRDDWjTYQTnd+1CcKEmTQZ6asY7atEm8A9HtzpgUqAJ2ptwnKKavkWfgt8 r1qbwPNqoiaPBROmTerLs2tLMzFXoramS20vfPHNqMKciFuZoQATCEAK2KSr uQDuabFVQXW/yVE2QZhQ/VAzHWpruvBJrOZS1nQpC7oAJk0kHzE9Wi8TfGOT V08VO8/kqqHWJswBwsQm8KPiGGH4pEF8WzeHC57Ol90dz3s4XQCewCOc+3Ov J0Z5VhQlwGdHjGCWBD4pKWPDCi5S23bUnK5jbEK6TtTCRK1Q8HdxklCFCQRW czFLCptrsntaSuDiKcyOyUwMSovzT4nxBZvAI5zDMzfTwotz4+DigUuLObGB pEuOKeg6kU16D1efwJfQNSexyTJtk1VJF12+1b4iQps0rwqa18QdG1ShV5d8 upFlE5zTRfbCA0YCPS4CTHxdzoJQwCmYOgG8wGvg9amRzhkxrhAFaT4VeaEk byIaq4G/4seNsWd3p189Euw/lSJMqMquF/J3LxWYMSE8oW2ygTahY+vz6221 NiH7TVhDt47ab8Kq7DrNm5wep8fp8d8db2fj9qdj9qYAJjEQu+PRL4fDpzIv TmdeWi512B2K+jSd8nkm5eNU8r4oYXc+7tVMLMTObNzL6bjnkzGPRyKejkU+ GY36aSj8Xk/gSpOXuMJxqsB2+rbzZLn3SGVgf1VEW2VsQ1lMdrJ3ShQnLcwu NfBKuu+FeGfdSGuNFDetJBeNBCcIzWSOZrqbXpanUbqLTqabfra7UQ4dWS5G Gc4GaZRZNHO99PO8jXJ4hqnuBgnOugkuRomupgVhDp0FEYPlibcinPnXdPxu aAZaawfb6kIE2ej4Xdf0uaoRaA3nuvDIDJ8b2vwb2t7XdYAndHc8NZULbcK9 ooc8QaFg6oTwxOUSZRPSb+J48bDfxObAJg6XtWib6Hic1wywAJtYzZSBTSLu dHmtt9mut92QN1yR1F4RVNsJajylTRFLPfmUTSbZNlEsDRCbMDcnspBCciuk movYhKmSgy0hg8yCLoIUpkqU/6kZbupm2xgwaQKbwB3yt+5oO4gWsquaGWp5 gh3KWNBF95X0kzKz7+ZNFsS9YJNlWd9faZN6d3GdG2WTWoCJk6zGQVZjL6Nh gjZZbHVfpG1CV3MhT3xJ3mS90xf3wiNMkCGgFVWbCGibCNrCRR2Jku5bxCaS kW7KJlNKmwgFjRKGTRAmcxNNrGougMlwbzneohObAC5OaBNWHJccOTCLWpsw q7mwzYR0wWM1F9qEVdkFNsFeeNV+k+LcKJI3yUr2Z9qE/Hd+AhPVmi5ysREF H2UTpkoE020YCBN6KXwDuc9Hm9xdn3j+k3T3+RIEbRMFSEQ1jrEJDZPqiSEI pSMABZXFiZFBHHfHi8ATd0cQykWuy2U3h3MQYf728C9QX5EOHxnxBY/weVWn cqmNY2yC/5LH5ztQFqp5k78kECagErjqsNept7UUrAHXCRgkIyEwPpwbG+oZ EeACJ7mpYXCFwBWFq0ywx6S9vhBb5oEnZEgXyZUwm99PWNNFxnN9xyZd5Qc1 XTWSmfYVSZ+ypks5p6sd53StQ0g7N+U9YAewCTgCbJIZ64bNI8yaLrAJJk18 OGcgQChoEwALCgUgkxLhBN8LtCnO9If3aSyN66xNA+8IR6vXJV3EJntPJKAS EAqVQDmwydvnC3RQvfA4QPjT6w21NjmmF57M6VINJk+IUFgkYSrmn77xOT1O j9PjX30ATHbGIyDezsR9mEvam4j9eSBkOuvyXI7lajlnZyByfyR2dyj6VX/k VkfQRlvgcpOPrMZzvtR54pbtcPaNrqTLwznW04XOs8WuUwWcoSzrjoTLfemW gznWw7c9hyuCusrCaosiym+F38oITI1xTwmzT/SziPc0DbfTirD9IdpeI85J O8nVIM3DJNPTLMODiiyPsxjZHufyvC4WeFsU+ly56amVz9W97WN828+00Nf0 prdplqdxlve5bJ+LFbHO3fkh3YURuUE2AVZ6EY6GUU7G0RwTiChn4zB7vWAb rVA77RAIWy04D7LWDLTSCLT6wddKh39D59AmFtSaRWITwhOmTZAnaBMOpQ8I HWcIc3jUdb6sZ2NxYJNLhzbxu6x1O+TGdCn3Tm/Ydqcn2GSt9fpC0zVp/TVh jb2w1kvWHIk2WZnoYtV0yRb60CasxAdr57vaNAr2mxxsgVeq5LCjnJ7TxeQJ c7vi4SqT2baDThNcbI02IfRowVnBdKi3CVMoLJ7gcNdj8iaMfpP+Q8JQy1B6 /1qbiOoom0hrOdIaZ1mNo7TaXlptp2yBp5MmWNO12OJ50GwCPPFZ6/Qj/SZg E9xvgkvhl1u4am1C95v4YN4EbCLtq5INNEqGu9AmVP/ObItwvglsIqL+5Q8z JtgFz0yaIEyGesrwLh1uO9EmWNZ1lE1Uq7xYxV3HV3AdZROSMWH1v6NHECOs pAnmTb5tM4nH1XtFOZG386ILcyJy04Lgzhz7TeA+llmDRDImrF544Ilq0uQY m7DyJmATzJuATaZHGkn7xsxog0zQxbKJWpgcZRNG0oSyCfwSJ4YoWcCnaK27 mZ0SFOhtAzwheROIQG8r+PjoMvi8uHIRRx8gx4hKVIu4SF6JjOo6fnEJukNt KRezzYSkOcgzzMB8imr5luor4R3gffCEJFB6Wkpw3BagoKvpNlwn+ZlRBVnR ZQVJOLkL6QEvAGsAT8AmcO2hTch+E3wN8cgf6oUnz6BNjuo3+aYXfrZjje43 oRrhmb3wYqoXfoNhk8HWmxV5oRkxrliaRWyCc7oC3C/4upzlO5tBEJvgI7wG bALfBd8LNslP5ZflBjP7TdallE2wpks5pOuJ5PVPorfP5cATegOj4s3P8v1n 8r2nctzAeNBssvH59aFNyKgudIRqZddRqRNVmKB0iE1Yr/ynb3xOj9Pj9PhX H6/HY6hBWIPhr0ajdsZinvaF3Wv1m866OpV5ZT7XWnGbI863n822mky/2hJ3 sTnuQmP0ueowk/Igg/Igw8pg4+Z484Ech9kynrDSb67cZ6bUeyTPtT+fM1Ts MVYVPFYf3VsVVVcUVnYzKCveE/6nONbnSrTXhUiOYZC1drCVZpiNRoStZpS9 dqyjXgLHMMXNOM3dNNPzHB3Ak3MYmR7nbnnpgE0KvA0KvI1u8YyyvYyyPA1z fc5n8s5k8y/lBV7NDbgW42wccE0r0t4wytEo2gmEYhjhoB9mqxNsrRVurxtG 8UQryAZgoul/Q9P/uqavlS4E/4au9zUd3lUtLj1SmHdFh6fkiS6XniTsZaHt QU8ShqB5oumKPDHX4phrg0045rRNzHWdzfVsLTXsiU0u6YJN3M+BTbTz/S3H Cj02u0K2Or02OxxWW64vNFrL6q2FNQ7CWk95a/hK/82N0bLlyZbVmY5lIdhh eFExqlgYkS8MqxZlkQ3pTJWwciikCYV847c2UZ4z2+FV8ya0TVq/tQkVc2CT w2jBALBgHH6J3ltNFIODhZn/QZv0mxw9qmuAEcfZZHN1ZJNpk9WhuwfBssmP 8zfXB2OFTb5gE0EDT8yo6QKbyGopm8hqKJsomgAmbvRgYffFFvcDm3BJ6oTm ie8avXiR2ATLugAmam0y2+g128wHm0i6kmW9BWATaX+DZKiTZRORsEk000oy JmQ8F8IEgiRNiE3gPhPu7uA2DwTRWJXZXJNNQKGaN1Fb2fXf2YSVMWHaBAu6 CElY1VzYacLYaULBBG1SfDOq5FYMPN5MD8a8CdMmqptNWHO6iIK/axPVsi5i Ezp10kRmCMM/vlzYfX9z6sVjGdZ07TxbOMomey8WIV4+kT7cnlqR94pnQfRk I3wN2GR8sAp+idgnAr+73rbbNaVpKbF8vvtVF7uzrvZngSd+XteSY7jwweGf HT4vfFjcKQnfhQxRaxPVHYtqNyoyO9mZre6qMIETQhIyzw1toooOteVbam0C Vxp5Twi0SXdzcVs9QKNwfKBeOtcjF/TTG1275ic64Jn+9vLe1pLettLu5tvY DNLRUIQjrNEmzLIuZqfJyfMm5Jy85ju98AM18vkuMqcLDLIh69qQAU/aN6Tt m5J2+CPaRDJR112fUZIdmB7tkhzuCNAgc7owP+LDOePtZAoBJ/5u5+EZ7JGH x2j/G2AT4Ax8b3a8x80kLvab9DRkjnTkg03WxJ0P10aebE++eDAHJAGYgFB2 fhTuP5O9fU7Xd1ElXvL9p2ATxbvnuCB+/eOr9U87YBOww51Pr8AUW58hdra/ 7FDPfH1959d9VMn9X/bufd29C8/A8192t1TjE7wVHR9frn14sfr++QrEQeoE 35B+T7DJDtjkdIbw6XF6nB7HHavVnksVbrISZ2GB3XSO1VjGteFUy/aoc83h ZnVBxlV+BhU++uVUGJQGGpUGGZcEGhf5Gxb6GRQHGJcGmZWHn29IuDZSzJO2 RK30Jt8fv7XSnTLSkgwx3Jw02BDfWR5Wm8svSXG9Fe2QHnQtgXcxyu1MiKNR gK2ev41umK1muJ1WpIN2tJNenItBgqthkptRspshRKqHYYaXcRbXJJtnmuNt dsvbGCKPZwJxk2uc42WS7WWS6WUMkeFhkupmlORqkOiiD5HgbAgR72QQ66gf 7aAbZa8HEWGnH26nH2qnF2yjG2SlG3hDJ+C6tt8NPV86fK7rQvCv6UB4X9Xm XQGhAFU0IbwsqN3uuA8F9zC6X9ZwvUwvOjGneXIZhKLlTAUlFMcrGo6WGo4W 1B85F3XdL+h4nNcOuaaT5na2P5uz1hG61eNzt899tdVaUecsq3USVjsJat0V bUGrw+kbE3krMxUrs7WLgk7qDlw2vqCYXliYXWPsT6SJoUx5wAkuiAeJ4MoS Zr8Ja3jXAWqU34tCwVt90hfP7DcheRP6Dhm74JtJP6/agC9hHDzTCHfUs2PK DXGzY80kwyKYPGm/CcsmBzVdfWCTJWkvsQkEwGRzZYjY5O7q8AFMKJtg3F8d uL/S/0SYvzWSIGj0mavjzddzJc3e4kYvWZOXrNGT6oWv45CaLvijosEN1yzi 4sXlVq+VNu5qOw9ircObxHqHD9kLzyzrUo2ZBs+ZJt58a5ioMwlsIh+oWRhu kQx3iUe6BePUuDPSb4J5E9y0CP+SquO5iE2wTQBuAuGOEQu6Gioz4BF4AkEQ cVSH+/F1XEfZBN8c/pam6m9IgoEwIRO61MKE1f/OGCAcX3IrtjQ/tig3EvMm tzJDsRceb5VVeaJ2Ttc3Q7qOnSGMMJmfap2bbKGCvkqZNqGjViHqeXRnlm6B V9BJExCK+pYTgMn+y6VXT2Vgk0VJ19xEHcCEUdBVNTZADTGAnx9/bPj5+zvK 6isyc9NCQnypxYvhAQ4AE/hHgH9k+LzMPndmoMuIUMhCk6OWlRw12pcgArci 4gl2hRyFC+bYLkKMkxd0MbGDNMaUH7kacV88/q8HDkyDj4Y/Hq2YwwYTbIHH DhRWL/wfrekiQfabMIMUiWG/yVBn2cxwg0LQDTZZlfQybALRsQUh7diUd6NN QBCNpXGF6b5pUZyUCCdsOQF0AD2wC57rYOxlbwQ28XM9h43wkb7XILDlBBQD 35IR45qT4Jmfyq+8FdZenTLYenOip1g0VrMsaHuwOow2AZXsP5XuP5VRNV3P FO+fL314sQzx8eXKhxcrBA6MLAkw5B6JX3bvY/y69wADzuH5Lzt3P7+6A/Fl d+PL7horPu2sfHy1/OHl0vsXi+8oDVGDwqh2+BdbEJ9ebkPgt0PA+T9943N6 nB6nx7/66Iwy7Yg0aQs3ag41bAjSrwvUr/HXqws0hqgJAJsYlfENirm6BR5a BXyTm16GWW56ma66mW56GW76EOnuhjk8s/Z09/W+m3sLbR/Xe++NlUx2pE92 Zoy1pYJN2kqCKjO9ChOcbkbaHdjELNjBEGwCEWqtGWajRfNEJ8ZZL45jkOBi mMABZRhQPHE3yvAAfZhkcU1pmBgd2oRL2QTYkuVlAjZJ9zRJ9zJN8zRJcTdC mMQ56sc66NE20Y200420N4igbRJio4c2gfCz0vf9licQxCaEJ5RQ/pxNgq9o pbiY9WY6rbaHbHbz7/S6rbRYKeqcZLXOohpnYa27vDVwZTAVbLI6U7kyd2gT BdrkIC3CzH0cbxPmDGG130tgwuw6IXkT5gr4b5Mmjd+1Cfnj7HjDX2oTRjcK I2+ysTR8kDcZxrzJ9ipoZeQYm/wkyNsaSaTyJnXcuTovcRNP0sSVUhsY6Tld dS7YC/9dmzB5wrIJLjdRG7ONXjNN3mgTst9EPNQpHu6ibdLOtAnZAk/GczFt ooTJP2ETfOfv2oRV08WECel8J3mTb20Sgza5mR6MvfAVRQlkhjDZ3Mdcvwj3 53/GJlS6hLbJLJX7O8ybYKc5FX/QJpg3ub85oRB1TI9Wz4zVkYKu8cFKsAn8 EuGHx00lk0P1Y/0Ajbqp4UY4nx5pxHwKvAAnkqmFCbPnXdUmrCXvaneRqO1w RzuQjvWjbMKq8sICraMKvY7iCaZgiFAwgYIXKoIFrjG4mPF6xi2N8AMzbYIw YQ0QJjD5ozVdzK2L+DIWTPANBzvKiE0WwCaygW/zJoc2IXkT0XhNS0Ui2ARg ona/Cd/ZDHgCjzikC54BtsBXVW1yOyugpjASbNLfnDPeXSSdrN9S9DJ64WXv ni9A0DqgYAI8QaF8fLlKEhyHe0xe36VUsgsqufvL3j06V/Lg97cPqXjzEM5/ 2wengFZALnfpvAnYZJ0Vv+xRT35+vfZ5ZxUeP+2sfny5TE/r2vgI8XLz08st TM1g/NM3PqfH6XF6/KuPhmB9IElDsGFDsFFDsHF9sAlEha9hlb9xdYBpZYBZ qY9xkZfBLXedZCfDWGvtiKsa4Vc0oq9rxljrRFvrxNoZpLicaU31vjNc+Wlt /Ov29L3xWoDJVFfmREd6f11sU6FfaaprXoxdVqhVWuBVsEmEi2mgnT7ABB5D rDRDrbXCbLTD7XQiHfRiHKmId9KPd9YHnqS4GqW5UfTI9DS9yTWkwxgjl2ua w6XyKcCWLC+zTK5ZJu9MBtcMhJLIUW8TiDB7/VBb/WBrJU/8rfT96GAKBVMn LKH8SZsEWGgmOhl3pdmvtAVvdHlvd7vQNnGW1zmLazlgE2mz/1J/MmWT2Sq0 yYK4XyEdk8un5PLpVTkbF1iLtSQZJBKBr8KTzLIutTYh6RJmm8nhKhN1NhFO nwgmrKD/K3ED3FHPjDXi6CSwCdzs/XGb9GPLCR3KOV1wi7goUc7pIusXt1ap fhOEyZ210XtrI/fWhjGwoIvUdBGbzNZxZ2s9D2xyMEO4DmcIU/tNFEfYRDV1 skGXdVFr3xvcj7fJXBN3tplP9cIfzOmSDzaJBztFQ53zY+3Mmi4c14wFXbhs keqeVmk2Gewu/adsQsPkOzZh9piorlw8yia382KAJ8QmpN+E7DchNsGAG3JM nfwlNiF74YlNqLTFUM0fzZugTeTC9qmRqqmRGoyJoSqwyfggtTRzfEBpCvo3 WA48EU13YisWXAnwQVAo+NG+axNse2fZBEu51A7dUk2asGyCJGGtNWE1jKjC hPnkMckUkivBccTIJbQYmgj7UOAyY9Yc4l9Kfde3NiFJE+QJmdP1X9iEhRG1 a+XBJv1tt5U2EfasywfpfhM1NlmXdNJPUjVdoAmwSVKYA9Z0JYTYxQZaR/ld B30AQ/xcz/EcTXw4ZwI9LgZ5XsL1i2ptUpzpX10QgTaZ6CmWTzduL/T9tDkO Ntn5Ufjm2aFN3h/Y5N3Pi/CINvm8s0HHQSeI0iZ3mBO6/uf9IwjVpfB0bKnG b2/ge7fp8018/Lyjfobw6V740+P0OD2+e5TztSt8dOjQq/TVr/A1KPc1LPc1 rfAzq/A7W+53poRvVsQzzvc0THU2i7M1DL+mE2KhGXZVK9JKP8bWONbeNNXt UktawNZQzZvl8Q/rU3dG68faUgEm8NhbE11/y6c4yTk3yiYj+Hqq/5V47oUw Z2NQib+NLm0TrVBr7VBrnTAb3XBbvUiq/koXWAG4SHA2THahbJLubprhYZrr ZUCHkZInPLNcnhlV8cU1zeaeyaRVAgE8SeQYkZoukE60A1XTFeVgGOlgEO5g EAp/qY2SJ/7WBhB+3wqFVHYxhfInbeJ3SSPewbAz1W65NQhsstXtstpqvVDP kddx0CaSJj9Fb8LaWO7aXPXqfN2SsAvuyeWSUZl0QiabWlHJemC+AzGC47nQ Jqz9JsgTZpcK+XaWSrAgn9R0kZYTSijfwgRLU76nknr6vxLXUzah11gf8KQF eYKNACexCQMmfcfbZHttdGuNUgnGvfXR++sjGA/WhzEerg89XBt8Iry1OYw1 XVxS0yVp8JBQrHA92AvvTK2GbzjSJiyegE1wjDDZbHJUv8l8M2+uxQdtIum+ JemtlPY3iAY70CbUTOaZZuEc1QuPI9FICzy2magWdP15m/w5mBxpE9Wkidqa riNsEk1sQvbCk50aJGNC7sCZNlE7Q/gYm2BB119oE+w3efNqmWkTIAlWcx3Y hPpVzk80Tw7V0Q3slYNd8FkqJwbhrzvc6k5G+6qt6VKFCemFZ7WZqG0DYQ7g +m4JllqbkKzHMUkT5iuZgVcmdp3AD4DpIbIvEn7LJLGCFxtmUvAvovBC24QJ ExJMnjBbTk5e03WUUxjdK6V9rcWDHaUzIw2Lot5NxdCmYnBD3rsh76GLuCA6 t+Sd27JOsAmVN5FSNumsTQObkDUlmDchM4T93c7znc18Xc4Sm+CELlWbFKT5 VN4Kg3cb6cifGShTzDRtKXrBJj/fm0GbvH+xSNdWLbz7eYEkTeigaroOeEIm aN39snOXblff+mVv+9f9O7+/vfefd8ATgAk4BbRy99f9u/AlZMgve3fUjuqi X4MDu8gek80vrzG2Dr4X3oSKf/rG5/Q4PU6Pf/VRE2BcHWBcFWBSFWBa6W9a EXAGosz3TKmPWTHftMjbtJBrWsA1g8j0uJDMMYu21gu+ouFvrhFoqRl6TSfe +UyCy7n6FJ/NkZoPm1Oft+fujDWASkZbU4aaErurIutuehcmOGaGXU8NuJLs ax7reS7UyQjzJhAhVnqh1lSE2eiBTSKAJ7Z6MfYGcY6AC6NEZ6MUF+M0N1OI bA+9bA/9HE9D4AlV1uVtdtP7DNgkh2eWwzub6WWW6mEMATxJdjVJcjGmhMIx jHM2iHUyiHE0iHY0inI0BJuE2RuE2hogTwJsDCFYQmH1nmD8eZvE2ul3pNgq 8yY9rmttNkuNrvI6rOnyEDf5ybriVkay1+eq1wT1aBOZeEQiHpdIJpal38iC 3LczbYJfJZO7mDxhJk1U67jIZhMgCXPFCWmHp+cGNzG3M0AgQNQGqV3B/gj8 79h0KG0CcXKbMPabHG6KpG3CrunaXh+FAJXcXR+DuL8x+kAZIw9JrA89Wh96 IsoHm8w38GfruIIGnrSFDzYR1btL6mmbNLguNrgsNXIg1NqElTrBYNkEBwgf NUNY0EbtN0GbiHsqxL11gv424WDH3GgbNStgplkw1yiYb5ifbEKYYJsJkgQe iU0QJn+JTVQ73I+yybfVXFmNVZmsFnimTVi74FkqQY+otUlxbhSuOAGb5KYF wXlNaQp2amPGhDmEisDkmP0mJ7EJwuTP13ShTTBv8mBrckHcOT1aTXtEGbRQ qBnCk8N1aJDRPnisHu4BXFD73EmvOnxM/FDM1hJmsGYFk5FcrEXwRy0ZUd2o yEqUHFPNxbIJmbulGmQQHDOITUhCBP4uvIxJWReyBd+BvPJgJcptZjUX2XVC 1p38F3vhcb+JKk+Y1VzYg9/fVoI2mR1pWBL3bS2ObC0AT/o2GTbZPrDJ9kLf urRLOFrdXp0CrEiJcMIBwtH+N0gjPHgEVIKbTQLcLwBMsKxLrU2w36S7PmO8 u0gwUrU43wJ/xeOtief3Z3cfi4EkH14uYRykS1Y+vQKSrH58ucqyCZ0HuUs3 mAAcNn/d3/rtzfbvb+/8593d/3l/D04g4Bl4Hr4K8XV3A2zy6949VtCr5Kkh w3BCV23hfvnNr3sb+I2/7FNv/uubLXyTf/rG5/Q4PU6Pf/VR7msMUUaFSZmv KagEosT37G2fM0W8swXcM/kQvHMFvPMp7iaJLoYx9jqhNzQCLDR8L//gc/mH GGfDBFfTxnTvO5M1H++Mf9ie2BitnOzMGG9PG25OQpvkx9mnBlmm+Fsm+lym m00MguwNMHUSZm1AhY1+mA31GG6jF2GjH2WrH21nEGOvH+9omORknMIxBqFk uesCT4hN8rzP5PHP5vLP5HifIXmTNE8TSijuZilutFBcjRNcjOI5RnHORjFO RsCTCOCJvSHaBCKQtgnhCQqF1RqPQvmrbEL6TTY67Faa3bEXXlTnIWnyk3bG LQ9nrc/XHNikTyoaFovGRKIxsAkLJpg+gD8COrCIC16Af2SmTpAndCvKkNp3 YJV1MdMoh2VdKjABdxwDE1oltfQwoloIsAkG3ObNjDb/FzaRzfcehHJNJPab sHrht9fH7tAqgbi3Mf5gYwxt8pAKpU0ebQyDTR4Lb22NJAoafWbpfhMJXdMl ovebgE0WGlyBjctNLhBH2UQ1e7LZ5Qc2WW7hLjR6HG8TYStf0OZ3aJPuclFP raCvTTDQDjahpplNN83PNszP1eMwAZI0ITbBXfAkaTLQVfL/s01IxgRg8l2b MGFCFpqATYhH1NqkKDcSPAKPeRkhwJPbedG1Zamk+IfZacIcIIxJkz9qE1bS ZGa86U/2wgNJcIzwi8cS0m8yNlCBcWATKhGDSRO65qp0oBMoUQE8AYnAhyJT f/HTqYUJc7siwoQ1Lph0mhxjE9XMCGkGOd4mrLFdKA7Vgi4swVINvMxwWBz8 EWmDGRN4Ei7g+op0uMbgqiMOIj8elVVpKWFmTFgwUbuB8YR5E9UueGbG5GDX fElvSxFtk8ZlSf/20sj24rBam2xIO+8uDYBN5ocrWyuTgBVpURwcIIw2wUZ4 8AiuNQGb4OJFbELBlhO1eZOOmtShtryZgbLFuZZ7y4NPtifBJtTc4J/lJG/y 8RWlks87axBfXq9/eb3x5fUm1nQhTOh8x/3f9h/+9ubOb2+3fn+3DfGf93cg /ufDXQg8hy9B/Ppmk4r9wzZ5EtQ77D9k9s5TAQzZW/9lfwMDvx2e+bK79k/f +Jwep8fp8a8+KnxNKvxMy/3MqACY+J0r8z9Xwj97m3+2iH+20PtcIcCEe+6W 19k0D9NUD9MkV6MYR90wG82gaxoBV34Is9NJ8TrXeSvw7kzt3sbw69XBlZGy qc5MiNGW5M7y8MpMz5tRNmlBV9L8LZO8L0a7moY5GITY64fY6QXa6IRZ6yvD hk6dQFjrRVjrRtroRtvpxdrrJzoaAU+SnU3o1nuDLA+jbE+q2SSXd+amN9jk bA4PbGKWxTXL5JqmexmneRileZilupvSPDFOdDVK4BgDT2KdjWOcjaOcDCMd DMPtDMJs9UNt9IJsDQMhKJ4YBFgrheJ7A3ii73NDn39dj39Nz/uarvdVHa8r 2l7UZkZteoywputlLbCJi5oZwrqOVzWAJ06W2nDucknPndpvou1/WSPaRrct yXqlNXiri3+v132zw36l0XWhjiOp4Yhq3SWNvrLOuJWhrI35mnXaJgpRH503 GROLx5ckg6RPhLCCmTfBRni0iWreZEU+vCwbWpYNLkvhTfoXJX2LYhomQoAJ vRF+vks61ymZ66QeKZt0wF0crZJWwWQLPTG4kW5sR57UT4+qz5vQRVxgEyqm RmrpUO6boIJOndDZk2Z4W+F0q3imHf5GmaBLIewh84Hpz3gYDJgcbrGHW0Sa Jz2rigGGTai8CbHJ/QObQDzaPIj14Ydrgz8JKJuImv3n6rwF9Txps4+shS+u 95DUU5sTFxrclhrdlpsoniw2USoBm1A8aaZ4QkhChEI1wnfywSarbd6YN8F+ E7SJKk8kLd6SVl9RW4S4M1HUnSfoLZ/vq50ZaJ0ZbJsZpRbECKYahdP14pk6 kjdh2gSDWdAFMdxD3YtijzDc12H78MltonajIgGLatKEUc1Fh4pNVJMmBCas aq6jbRJFVsOjTeBOlZk3OcommDc5cvciPUZYzOQJXu1UfrB1frJlbqJ5dhwT fK3w65geaZoaVs4Qht/Cgrjnwdb0i8fSnWeKnZ8XqEd1zSavnsowe/LzjyK4 GuXCdrTJaH85BPIEa7rmxqm8DF27VY41XSO91QgW0jZyjE1YGZOjYAKhtkyL 1f+Ot/3YHkLoQZByQpuoLd9ivoA0j+AVBY9Y1sXKsJBFPPBVfBlOacOfjU6m sJtNjocJiydMmJAUCbEJEy8q1VxU9LYUo03mxppom4wqbaLo3VIgTzo3lb3w 3XcW++FxZrC8pSIxP42PM4QBGrFBNlF+18P4lsHcy4GelzBpEuhxEXvhsdAL XgBB9ptkxrqBTYoy/MAmIJ2Bltzp/lKwCfAHbPLzvRmyFx77TSib7Kx+fLUK j5RQaJ582lmH+Kwstdqma7Tu/fZ2+5c3mwAQxMjvlE3u/e9HKv7z/u7v7+5A /PZuG+IXagkjWOYRHQ/hHDDyn7c/Qvx6wBNKKHsPwCZfdte/7m98pWyyiTb5 srf++dQmp8fpcXoce1T5mlVRrSUAE7NynzNlPnQ1F8/ktrdZic85iGLvM7c8 jXNc9dM9z6d5nEt2NYt1MAyz0gm6rhl4TcPHUjPR82JPSfT2bNOrjbGX66Nb c80TrWnTHZljzSkthYGFcY5Zoddzwm5k+Jqn8C4kuJpGO+hH2OqE22jDY5iN dqi1FokwOsKttCKstaNsdWPt9OPtDZAnqa4mENh+kul5JsvLLJtLZUyywSY8 0yyuCR1GmV6G6e7Uy1JdjZNdjBJdDBM51EjhBBeTeBeTWCqBYhjlYEiNFLbV C7E1CMawMQyyNjzgiRGEr5UR/4ah9zUD7lV9r6t6XlconnhaKrecYN7EBWBC 2USXQ6sEw/66hsM1DacrOs4Wui7m+u4XdT0v6ASYa0RaaddHWy42+t/t8rkP Nmm3W6p2Wqt3W6p3F1e7iWq9FZ1xGyO5m3M16/PMmi7KJgvfJjsw30FLZAgN QudNqFXvK7KRb5ImS+MQK/LBZdnAsqz/IPqWZb1wbw93+HJhNwTogIR0vhN3 keOEKLKOnJq4Nd5IhtkeFRRGvg3MnkBQ9V0HL5ufhNvvZtFMi2SuTSbogJ+B KtP6xibUbC6FkLKJdK7nIJQlZzIBvL4bbUJquujdi8pGeGYvPNjkx62xn7bH wSYP1gbvLfc9ERZsDiVJWkLm632pTp+2gIW2AFkTT9bIpVpFGtwXG9wW6cqu VTBIixfAhMqnNLqDTbDBBEiCaRQ4AZhs9fhtHOyFl9W54n4TeCumTeBLGEuN vKUmH2lruLgjYb4nd2qgbHyoZmSkZXS0dXKseWa8UTRRL5+oXRivFlAqbGLV dKFKDid00TzBDmKmTXC/iWp8t1KLBDyJ9GA+yVaJ0iZHjg5m2YRV0IULTY6y CcAEbZKXEQI2AW0xu+BJTRdZcaK6F54JE+bWHrWBkx9wQygNk9bpkZbJocaJ wfrxAar7Y3qkHlwP1nj+k5iq2nq5+PKpGBiiGnsvFjFv8uTBPFyQ0vlWtMlI XxkG7RTqV0naQ0hNF/1YQYaPHbXtnTmVS3W1oupid7UdJd8dyaU2CcKMYySi 1iZk+yczVcdawUM27JDrk5lYOaw0U9dvgjBRtclBsuMwVGGiahOWR5jR1ViA NV2CiZYV6cCdpdFNxeDWQv/2Yv/2Qi/YZEPWsS5uWxe1wh+pJhRF72R/SUtV UmGmX2o0JynCMTHcIS7ENjrQKtz3aoi3RTDPHFSCnSYhXHNQCdgESBIfbIsr GuEkNdI5K84d53SBTRpL43oaMqf6SuTTjWuSTsybgE12H4vfPJO9eSaHx90n 0tePqdh7Kt9/poDH3ScyOHnzs3JHPMS7F7juZAVO4PGXN1sQX/c3f39/9/8+ P/zfTw/+8+EenEP8RvHkzte9u7++efjb20cQv7/7EeKX/QfwDAScfN27/2X3 HjzCV7/ub33eXf+yBzbZhPf89e02BJzDM//0jc/pcXqcHv/qA2xS6cu0iRnY pIhrXMI/U+p7HmxSyDXN8zDKdTMAmKS4nUnkmIBNImz0Qqy0gSe8yxrhDiYd heF351teb03sbI5vzjYBTCbb0vtrYutyffJj7LNpm6TxLyV7nYvjGFPbRmx1 ICLtdMEmzAinI+yGJvIk2lY3juZJgoNhkrNhMscwxcUI0IHd8RkeJjRPzBAm 9K4Tw29s4mqU5Gp0aBOOMW0TI6ovnh7bFWKnDORJoI0BlUCxAZsY+lob+tww 8L6mz7umx72my72q6XVFA8LTUsPDXMPNXMPV/AcXcw0OFZocC01nKqjKLvtr GhAOFlpO5jrOl5Q1Xb4XqbxJbaT5Qr3vvW7f7U4O2mSl1kVR4yKqdAWbyDti 14ayN2ar1+eUeROpaPh4m+AMYdJvQmlFPrgqB7AMry2MrC+ObixRQdtkkE6d DCkTKLJBpk2YPEGbMNeRY8BNMt4n4wbAv88mOJsLYfK32aSQ2EQMNmkNULT6 q7XJcivIwkPR4PZdm2DehNgEHoEnaud0sWwy2V86Nlg9PNI8MtpC2WSsUThe JxuvAZvMM5pNyLJFlk0O8iZ/vU1QJcwiriN5crRNWDtNMJg1XYfN78o2E+Xu xcLsiILs8PysMKzpKr4ZVVeeRvb9YWUXa/0i6Tf5W20Cl9aLxxLaJgsvn0r+ iE2USRPMnoz2V1AzhHuZC9yr6WaTGqZNjucJayoXSZQctbvkGJuQvAmr9+QY ofwhmKja5KhgwQRb4JmNLcpoKib9JqxAmzD7TY6xyTF5k2Ns0t1U2N92G2wi nGxdlQ5sw//Syge2Fvq2F/swbwI22ZC0b4jbwCbrsm6wydRAaXNlYn66T1qM S3Kkkxqb0P3vwV6Xcd8ilnLFBlqDTQAmCSF2KRFOmbFueck8sEn5zZC64mhs hxeMVClmmu4tDT7emnjxYA54AvHy4TycP7kz83h7+qetKQg4eXp39uf7869+ FO/8JIFAp2DsUWsZ5WAWemX86qfXawgKEvBHgAZ86cOrjY+vNj+83Hz/gtrb +HXv3pfdu59f34H4tLMNj/DMr28e/P7u0dc9yiYY4BFECp780zc+p8fpcXr8 qw/aJqblED5mZXwKJmiT23BObOJuCDZJdT+b5GIa72QENomyMwiz0Q2+oQU2 CbI2bMkLBpvsbk++2hhbn26Y684ZaUxqLQ4uS3XLi7IFm0Ck8C4kepwBHaBN ACbRDvrhdOpE1SbIk0hr7Rgb3VhbPYhEJwOIJGcDEAq4I80NhGKc5WWW5WWq 3MDoaZThaQCBNoFIcTWmbOJiRPfFG6NNqOIuJ2OqNd7BMNTegA5DFEqQrUGg LfLEwM/GwNdan39Dz/u60ibcq9QGRrrxRMPNQsPVQkPFJprO5ppU3uQ6nTex pPImHnTexOcCZZPq8EvyWv7dLp+tDuf1VpvFKsfFamdZlbOwwkVYw5O2Ra8M ZK7PVq/N1S0KOhVC7DcZFYnGcLUHEya4SH1JMog1XQczhAdX5H2riv5VxeDa wtD64vDG0ghlEyQJ1XIyTAJtosoTsIl4tp1lE0yggE2U7e1/j01U5wZjs8lf bpOnoqKt4WRxc/B8na+o0VfW4idv8VNrk6VmJUxkdS5wAhjBqVyqNtnqpvpN gB6gEkkNVaoHJziwi8wTVlZ5NfCWGlVsMtwMPJkYpfQnGKuVjlUrxqpmx+qZ MEGPsDImf9Qmasu3jreJsuH9v7UJM2lCbEIKuohHkCS0SmIgACZoE9ILDzbB dga0CUmdEJvgUvi/0Saj9fB/NWgTcMfuiz9mE1LNdcATyiYTgzXYaz/SW4U2 Ge6pGuquOGHqhNn8ziziUk2anHASl+ouRTUo+HZnIitObhOmQY5qdMLXqH/D xiLW3GCSRmHmTY6xyXdruo6xSU9zEc4QFk21gU22FkfWZf2bij7gyaFN6L3w 2wt9a9IueH56sKypIiEv1Ts91vUIm1wkLfA4PRhsEu1/A2wCMEkMtU8Od8yK c89P5SNMuurSx7oKRWM1i3Mtq+KOTXnP/ZUhrOx6dncanPJoffTR+vijjQmA yY+bkxBAFbQJBsmhQOAJPL59vggAQYZgSgVOQBMk8fFlb/vLLjBk6/2L9XfP 197+vAqx/3T59U8Lz+9LXj6UwTmY5be3D77sboJxSMD7QODf8k/f+Jwep8fp 8a8+Kn1MK3xMy3xMyvimYJMSvikE2IQq6+KfBZsU8cxueRhlu+glu5olckzi HA3BJtH2huHU5kQdvoWG3zW90kSP5dEqsMnO5jjYRNiXN1AbV5vLL4x3uhlp kxN2A2ySzD2f4K60CQTAJMbRAGzCDMynHNrESjvKSjuaXqSS4Kif6ETFQfbE KM3NKNPTNNPThFaJUbqHYbqHPhXupmpsQudN4iieUDZBnoQ5GGDQQtEPtqeb 9IEntgb+tvq+1no+VnreN3R5ENf0eFf1uFd0vSx1PC11PCx03C10XCy0Xcwh dF0sdDlU6HHM9Rwom2iCTTiWepRNLlE28T5P1XSBTaTVvK12HthktdlKUWG/ UOUINhFUcOYqPcXNkZRNZqpWZ2sX5jvkgl6JcAhtolCBCcaiuJ/YhB7GNbQi 612R98IdOw7XXV+kbLIqH8Ye+RXZCIkFcR/ahMkTUtCF68jRJvAIToFAm1Dt 7X+nTeiPeTie6++wyTNx8fZIiqQlZK7OR9TgI23ylTbBoxqbLDZR1VzSWg4E nByTN1G1ibTW5QibcBcb+ZKWMFF7PCgebTI03AQ8GRtumB6lbCIZq5aPVU2P 1JJOE5zKpaqSga4SCLU2YZVjHWMTtYo5HMOlto7rezZRmzRRLehiquQQJlnR BVnhhTlU6gRsgv0mmDdhJk1UC7rInK6jbKI2TmyThm9s8lzx6tkfskkZ9sID TOjKLqBKFfzM8APDj00rgyrrGuyCX2U5c6fkMTxhFXT9UZj8HR3uf8YmzEv0 GJsc/F1qbKK2oEttqG05OblN+lpvD7SXDHeVi6fbwSabC8Ngkw1576ail242 ofabYL8JscnMUDnY5GYK7yibBNCdJoEeFzF1gmVdMQFWmDcBm6RGOuckeBam +5blBqNNJnqKpZP1a2JqFNi95cGHayOgkpcP5189EoBQftocf7I9DRh5+UiE GMFcCdZ3Mau5AA74CHZAjMA5nMA3Pn8ggEf4LkypwPNf9rZ+2b8DQvm8uwnx 27t7/+/Xx7+/v//p9eb+s6XdJwp4fP8SGLJBkiZMocCbQPzTNz6nx+lxevyr jwq+STnfpJRvXOptUsIzKfE2ue1tAjYp4pmASoAnxd5n8jyMsji6SS6mYBOS NwGbhNnoBlzX4ZlrJnAvDVYlPV7ow5ousEl/TWxVFjc/1iEvyvZmhDXwJJnK m5wFHQBJIGKdDOOcjSLsdFkRCY/W2hhoE4w4e914B90ER70DnkAYpLsbp3sY 0yoxTHM3SHXTS3XTBZsgT1LdTJLdjJNomyS5mSW6msa7mMRxTGKdTdAmEU4G EU764RCO+lSHPoQjzRN7fX87PT9bPV9rXb6VjreVtvc1AwjeVQPuFX0vSz1P S30PCz1XqqOEAoiLhT7nILCmy9FS28lch3NZz/2CDtiEd1Yj4oZWZegFUaXX Zht3q915ufG6osIObCKv5ggrXGYrPETNEWtD2WvTlWATxVy7bL5HLBgUCkeE wlGy2oOoRDmuimowGcae94MFi/0rcoihVcXQGvy/y8URCDiHZ1ZAKIxYlFDb 1Un2BIXCsgkzaUKWAGJZ11GVXX/GJozP2Mtogf/rbfKz5DaxiaCeL270kTTy pY3qbaJocCM2WWhyX271OqqmC2xCarqwrEvtBkaWTSb6SkYHqgYHG4eGmsAm UyP186M14tEq2WilWpuwVNLfeRviKJuohlqGHNVIAm/SUJmBKRgylUtdHGkT VtKE2QJPSKI+b5IVXpQbCTzJTQsCm5TciiE2wa4TkjdRO6fr77DJzGgDXKVw gb18IgV3vP6DNiHNJsO9pXSUUeV59EfALAk2m0Dg+F9WZZfaYE4MZtpEbTXX MfvcmZmRk+dNmHN9maOA/0xNFyt7gidH2EdNTReWcpG5wUd1sjN5wpzHdXKb DLSXDnaUgk0kMx1gkw3431t6LzxVvkXbhJ7T1XUHYpGyCZhlerCsuTLxVhr/ qJouf/cL2AuPLSfIk9hAawwc0pWXzAOblGQHVhdEdNam4eLFDVk3wARU8uLB 3O5jMbUO/uUSPML568cSkAgyhARJhZA6q1/fAjTWf3mz9du7O3BCyrqAJACT Fw+FIBQIOAHgvH4shefhEc4BPj/fn0P7wFef3p2FgBOwD7wJKeXCvwUD+fNP 3/icHqfH6fGvPsq9jcsBJnzjEm9jsMltnnExz7jQy6iYZ4owKeSa3nQ3zHbR S3IxAZskOBuDTSJtqXm/YJNIRxP+FQ24ny+IcZnvKvhJ0Ys1Xd0VkWVp7jej bHPCrbJDr2cGX6X6TbjnE1xNqcIqGiYJLiaR9nosmFBho6MMayVMIm9oxdhq x9qBUHRAKMCTJGc9iDQ3ozR3CAMaJvoAkxRXHbQJxIFNqEjxOAM8SaB5QmwS 6awfQUc4LZRQJ4MQJ4NgB/0ge/0Aiie6vjY6fGttCO/r1MAu3lUdCO4Vbc8r 2h5XdFwttF2UocNRpk6oXnilTSxom1ykbOJpqhFppVMefE5Y4Qk2WW9xAJss VjmgTUSVrvNVXuLmyNXBLLDJykwNbZNu0fyAUDAsEIygTZgqUY6rEvauyIbQ JgddJ8O4DEW5IJ7uOqFtMsiIAfDLUTZhFXTNTTSREwjSF//32IR8wJ5vSfLX 2+TOaCplk1rKJqIGvrjBW71N6JougImkxhkeSVmX2l54tf0mqr3wiw3chQZv VZtAjA7VTw7XoU2kIxWzo/XMLnjm0GCikr6OYoiT2+TkcbRE/rBNSNKE1WmC HoFHVrMJxK3MUMyb5KQGAk9u50XXlKZgszZrjDDZmU6SJn+XTca+tcnPsj9o ExDlbYihnhI6kJllB639lUPdVNA1XeWEJye0iWrS5JgRwaqL3UmnOZnTy8qe qLUJaVpnxp/shWd9CeFMeuTJz0kZSl0vPOk0Ye00OWH25OQ2GewoG+osG+4u l85SNlmXD65Ketek3ev0UnilTRRddxSUTbDfBHvhCzJ8wSZqe+ED3C+ozZug TXBI160U7+JM/8pbYQ0lsd31GZO9txWzTXcW+3/aHH/5cP71T6L9p7L3LxY+ vlr6+GoZ4sOrZYAAJkeQG1ivxfQC6SgBoYBNfqUGdinLt/7v88P/58uj//l4 H56H12OVF42LpT241H8U/rQ1AR9tWdQunW6QTNUr5ppXxB13lgYeb0/CV7G5 Hv9e0nWCP8M/feNzepwep8e/+ijzNoEo5ZuW8s1KeKZFXJNCrnGBp3ER17TI +2wh98wtT5Ncd6NsV4MkjkkSx5TYBGASZqsXxTELstUPdjSK416uyw2SDZdL h8om2jJbikOLk92yI2wyQ65nhVxP9bfI8DVP9jqX4GIcR1VYGSe6GCdwDCPt dCLsdCKpoFQSZU9FpC0FkwgIOnUSAXFDO8JOCyLSXivGUSfWUTcewkk3xcUw 1cUwzcUg3cUww8UwkwqDZA+zFM8z6R5n093N0l1NMjjG6Y6G6fDoapziZhTn YhjJMfj/2LvPoLbyrH/w5CSJZINNBgEii5xzzjmDiQJEUAIRhSRyzjlHx3bO brvboaPd6Zmeme6e+c/z7P7rH1/sVv239s1W7b7ac+8PLtdXAtPdzzwzL7j1 LUoImeCmq+7H53fOiXLViXbXjnOhxTrrQWKcsEQ56UY562Enuxx00XbIIKZ2 IFMrwE7L10bTx0bD21rD20rdy1KNDbFQczM/iqu5+kEsVd0sVd3NNTzMNNkX tLxNNHzOa3gyVONstTjhJpM1vlutQasil2WBA9ZvwnVe5LrM1LpN1/vMt8Rv YjapBZssjovnJ3CbTPaATchrB8lCAZvg7fAH6xfxScLIJgfTulCn/KFNpIfp Xl+UYJOEcZ6Qj3URRZMP2uQ0KkHBF8wp2gTb5wg8mR1vmZ9sXZjCJgmTfrSu D9VNOuC7BZvAj4P2wpNtgnhyGYcJ5OpWHxogfH277+BM11zFXn/GLF43mcRt MsMDmPguCkANnivYKC32msBjTeAONkFDuhaa3FDLyYrQE80QJnbEYwOEOwO3 2gIoc7oUV8MjmyzwvReEfrMtmE0mOwpGJVXD0vp+qaBfJhiQ84Z7Gsf6uJP9 ddMDtfi4Zh65ER54QtiE4Amkp5OD78iogrtKuJEDWaDdEL8naAoxuXpyLFvq ChRtQl5rQqiEMj0YeUSxER5SnBOJhnTlZ4RAygtjle6FP3mGMFrQ80GeEDZB MJkYFJ1gE/jVQutLwCaP780THiHPEFa0yUgft1dyYJNDnsC7VXjppAZPrRxf UkOM/yXz5DihkIsmSmdzKV2tqGgTAiBKT0+hasjJNvlg3YT4VEr36SjWTSgD HIiv8kGboJDPdFGmAZPRQcCEONNF3rd4sGbxGJvIWqv6Dm2yOS/dnO/eWZJu L2JrFiEglN3Fzv3Fzt0lbE4X8GSgs6y5LvUSuRc+3D4+xDYm0CrSzywMGyN8 1G+C2uEh8cE2qB2esEllXkhjeZygOqmtIbO3tWR2sHF3UUJ0waMhXWjFCdjk Nda6vv4pqpVg84Q3Xz3aePNkC8/2m6cglJ3Pnu1+9nTny+f7X3y8//nHu199 cvmbV9e/eX39m1fXUN69xCYMf/Z0Gz7DJ/dXcddgc4DRg9dP4EusPbsz//T2 /Md3F57cmrt/bfLW3shHO4Pw4MH16Yc3Zp7cmkenyJ7fW4bHj2/O/aNvfM6u s+vs+qe+wCOVvgAT45rA85W+hiWejCI2/ZK3QamXQbGXYZGnQSFbv4DNyGcz 0l0Yac70ZGdaAuqFd9COhDjTYz2M0oMtU4IscqIdhZWxcmEOpKk0oiLNOz/a MTvMpiDSLjvYIj/EPM3bMMlFJ8VVN4NNz3DXS3ECkqgTiXPUiHPUhKAJw/g8 YY0oW81IGw1IuIt6KEs1zEkt2kUz1kUr3kkrwUk71UknzUk3i0XLdWIUOBsU uRgVuxjHehomeBtnep/P9zxX7GpY6kgrZerm26iWOGsXeOumemqGu6v6e6oE +qskuRjHswziHPUhMfb0aHtarKN+lAMdEulAj3CghTvQwuz1IN52Ol622hBP Gy22taaHlYaHlbq7JUSNEh9zVV9zFV8zFb+Lqn6mqgEmahBvfdVIC3VOlMVo bfBya8SS2G9J7L1U47hW77LEdZ2pcZ3h+iyJE7ZkeZsjteuj9YujLfNjHTNj 3VPj8slx+cEN+WG55GA3OmnLydp8D+ooIXe7E3sYUbkEHx3cvTovOcyRTVAL PHGgi8wTxVFdhE2IggjaIoduoRVDfBTxBGVyWICCeIK+Iqkk1KUMJp2ETeBb he95ebaTWA0PPAGY7G7Ag4Psr/fsr8svb/RcwSJHubohu7ouvTVXsd2fPtMc Pg424fvPCrEzXYsC3yW+zyrfc03guS7w3BCwNwQeK/hmE0rQohMEE7R4EW+Q P1i8CDZBRROlB7ogkyLvCWw1fNR0a/JMe8F0Z/V0V/14l2BMIhyWYTYZ7ucO D9YODXFGcZugY11KbXKEFHyyLraQrqUc7t+AEg3VGUprHIqVEXgxkQ+WSCh/ EATUVJOFZgVTQi6aII8QIYYGk1tOKMe6SnCbFGWHA0xyUgNL86Jqy1PQhgui bkLphSfzBC03oeSDjfC4SoR4N/1JNgGJ4DZZVGoT+NDHD1fxFyzdujqxs9Yz MyYclNeATQ4rJkdB57vgAYBF1lEhbS+HEEIhCigQSrmEUjEh10rIB7rIj4/r cz+50kEc3FI8VUWudxA8UfyD5CjChHKkUPEXFXWgELtOjr6Hw34Tcsg2OXLE +1sUKTahjBEmLzch75RHj+HTooBNukRlPR3VC7hN1ue6txakl9f6d5d7NmY6 1qba1qfbt2Y7d+ckW3MdO4td6zOtsuZCISe5KM0nJ8E9M9YFrJEMNiGtX0Qq IU5zoZBtAn8Q2YRbGs2vSkT9JgujfODPja1+NEAYL53MI5tgq+FBJffJWYe8 erj5+tHW60c7aHv7m8f7bx7tf/b4MuSLZ5e/en717SfX3316/duX199+cvXr F1fQangUbEH84UBgNLyLPMsLAmABDYFEACB3Lo+jHnx4AEKBZ4gjYf/oG5+z 6+w6u/6prwpveoUPo8rPiBNwDrOJF6PYk6HUJhmu+mkuDNwmumCTSHutcKZm rLthso9pTZZvY2FoSbJHdW5AZ0NaV31qY3FYWbJHfrRDXqRdcTSzKNK2MMw8 y9c41Z2W5qaX6UHLdNdNc9bEPULOkU1wnhzZJIylHuqoFs5Sj3TSiGSpRzlq xLC0kl1oKS70VGdGmotBuothpqtRpqtxIts42et8to9pgc+FQvdzhU76RU76 Bc6MAjf9LE9Ggod2qKtaEAglkJbobBjvyIhzoMeCR+xpUfZ6MQ70aBY9yhGH CaYS3VCmTghTx9tGC+JlrQnxtNJAcTdXVYyrhaqbhYqbuYq7mRr7grqXqbq3 qbqXoWqwmWpZqNFAlcdis+9Si9tau9tKHWuVi9lktsZtus57QRR3nE3Qrna0 t51ACrFOHQ0TJmyyOtcDwadyySGrc2i5iQzBBAkFf3xgEzShC8FEsd8E1Ur+ vWxC8GR8kDcxxAeboOrJ9CjWbn96m6C6CWGTrZWenbW+nVPb5OZs+VZfGmYT XsCUIGBOhPXCH9mE/1tsQqmboCFdJ9hksiWSapMuAbLJUF/dkDKboNHBSm1C zGiCW1C4c4Nbu0ZO5sk2IZ4h2+SDPCFXUgAmyCaoPqI0ige6yEUTik3IHfGl uVFoKTxhk5qy5A/ahJjTRRRNyDmhboKKJkptMihrGpBiWw7h1x5sAr9a6EzX 0/tLx83pgo8ip9y8Mr69Kp8eFQzIOEptgoKKKWCTw1CrJ2SbIJicYJMPHus6 pU3IexLJPCHbRHGy1gk2IU5tIZL8Tpu08cuIXfBEUMsJUTShtJMorZsc1wuv dB08YRNZa3Wn8FJvJ2dhoh1ssjHXvb0o21/tA5tszXUBTyA785IrS/KdhS6y TQpTvYEYAI2UCAewSVyQNUgkDJ8ejDpNyAe6gC3oTBelboLOdKHlJktjQvj8 1zZ6wSYPr08+/mj6sHSyhG+HP41N9sg2+fLjK8CTr1+AUK4qtQnROULuIiHm DBOnxeBddKALNbCgognRaP+PvvE5u86us+uf+ir3olV4Yzap9jcGm1zy1j/B JunIJo66sfY6EUzNMLCDCyPF70Jbddx4Z2lbTRK/LBps0s5JqMvxL01wLohm FsfaVyayyuPsL4Vb5geYZHoyACY5bL0cD50sV80ErPyBJZ6lCaHYJNpOE2yC eBJmrx5urx7hqBHuoBHGVA9lwgOtKGdalDM90pke4UwPP3wbwzaNcTdJ9LyY 6mWe5G4SxzKIZRnEONKjHekgqVjvc+GehoFu9AA3ehTLCIuTMSTC0TDUQR+L o36IAyPQnu7PpPnZ6vra6EBczXVc8Lhi0UVxuqjldIEaOwtNiL2ZjsNFXccL NBdTXTcTHX9zrRArzUthxoMczyWxz2Kz04rYcZXrtFLntFjnMlvrNlXrNSuI 3pTmKrXJ7Hg73EGReQIh24RUOsFmcOF1kx5ilfzqPMoBTNDJLmQTdJpL0Sao aIIYogiTX2UT1CsBb8lPjg00IZugwNc6rm5CDOx6/2DbQb8J/FAbSzKwyfZq 7w7A5LQ2Kds8tMm0EJshvCAKJGyy+ptsQu43QUO6jttvMtXsM9niP90aPdOW MttRONvFmZE0IJsMSZuG5A2YTQZqcJs0Kc4QVmoT4g4Wbkrhtg3u6IAMp7EJ QRJQxiltgh4QMIGgeVyUKI4OhhBFE0WYKPbCVxTFgU0KMkPBJiW5kZxLSSfb hDxDGB3louTkY12o2QTxBJ3pGukVDckPbAJfZXxAsDx70G/y7MHK0wdgk9nH dxfQIngU+BA68QVv4d0b+6NbK7KpEX6/tLpXcqxKqOmoViydKBZNTmMT8nDg 32YTii/I1RPKFhLizNUJNiGP5Pq9NhFQYYL2wneKqsgw6etqJFtDsYuEXDqB F/dJGik8IQ53UWzSISiVt1fNj7dtLsg3sQHCcrDJ/krv3pJsZ6F7e16ytyi9 utyzi22KlyCbCKqTClK8suPdsKXwoXaoaAISAY+gZhMIaoRHixdBLqjZBBRD DBCuyg/llkYfLV4ce68XniidHPDkvnKbvHp4YBOMJ48wm3z+5AqEbBNcJVjI MMHrJge7TgibwAO0lhEeoOe/fLGH1jVC3r68gm1sPCTM2e7Fs+vsOrs+eJV5 6hE2gZT7GpZ6G3zQJtjuRTvMJsFMrYxAi15e5vakcGWoYbSzVMrPaq2ILk92 LYmzL4q2KY+3b8pi1yQ6VkVZlwSb5vnq53nRCrz08j11c9y1kl11k1x0IGSe oEnCOE8ObAIJt9GIhC/K1A610wqy1QxgagU4aHvaaXrYarjaaTjbqbNs1R3t 1B3s1JkWOjYXNZmW2iw7uoMdzcZSy8pM3d5ay8FayxmUYaPrbKHldFHd1VzD 86KGt4WWr7UuxMtS291Mw8VU3cNcAx64mqk7X1BzMlVjmag5nldjGmgcRpNp qGmPh6ksFqYalqaa1ue1bc/pMo1pjkY6LENtZz01toFqno/BQCV7oyN4q9Nr u9Njrd4Z2WSmxm2Cw57mRa5LsjeGa9ZGuGCTudF2zCZjMrxu0kFWCbluAiHb ZGOxHwVHSi9ePenBYdJNsQlxoAu1wCvaBE3lQjahwORX2QRuqlGAJ0TAJqho AsFPdjXDF52f7PjNNsFKJ8psgvWbYOlBubYpv7YhU7TJIoTvs8j3XuGxV/ns NT57XeABNlkVea4oZFXkpdQmxJwuZJPj5nRNtfhOiQNm2mJmO1LnOovmumvm ZbzxzvdsMjjAGRysHu47+OtFc7pObxO4nQMyKIXGcTBBOeXJrqPTXJxMLMrO dCGYUGxCOc1FntNFhgm+3ySmsjgeSFKYFXZy3UTpDGGlNlEaRH6ieoKEMtbf jBdNhENyPmETtN/k8tYA0gfY5NHdOVQfIcPkwS3sScImm8vSyWFeX3fVcTZB tRKyTWTtVaixncwTpDAyTE5pE2KR+q+yCQUXlKYS9FEKTE5vE/Ks4N9+pktI PdBFHOsi0AHE6Jc0kY9pUeoglNIJwOSUNpG3cdoFJdLWirmx1u2l3u1F+fai DB8jLNtdlAJMNmc7N2c6tmc6dxcxm2zMtMlbigAU4IvMWJeUCAcEEzBIlJ85 skmQuzGa0wU2gQ8BTNA6eDRAOCPGmbBJQ1mskJPcycsZ7CyfH+ZtzXdQbPLs 9twJNnn5YAPnyfYhTw5s8sXTq4cwuYbqJmSbIJhgNjncw0iUSwiboOcJtqCG ehT0Anw9ytnuxbPr7Dq7PnCVeuiUe9ErfQ2BJ5AKP6NLx9gEYJLqTE9y0otH NsHrJgE26nkRdqNthTeWOq8vdS2PNIJNWkpDimOZkJIY26pEx5YCv4Y017p4 2/KwC0V++oU+tGJfWqGXTp67Zpo7LcVNDwkF8QRsgjXIH/BEM9pOCwI2ibDW irTVibTVC7XFFiP6OdB8HenWF1UtL6qamKsamasyzFXpFqo0c1Wt86rapqo6 Fmp0ppY+S5fB0ta1VzdiapxnapiZq5obq9oZqHld0Ay304+11Yq310pw1Ipz 0Iq114qy0wq31gy1whJkqRlorhlgpul/UdPvombQRc3AC9QEXVQSf2uNAGvN ICvNYAutUHPtiIvakRe1U2y0Muy1eBHGs9Xu+60++2Kn3Wa7Na7TKtcZbDLN ccFs0hS50pGxjttkYaQZbDI9Kpkck02Mycg2Ic/pIkonyCYQwiZ4+lDwA11S 4jQXCsUmQBIUotmEaHtXhAka0qXUJmSAoJBPdhHHusYHeYRN8IFdWMvJUTsJ dnzr4CjX3HgnKQdn2xamOsAm5DNdeN1EyZkupTa5NVe+1Z8+2xIxwQ8kbLIA NuGRbML3WOe7K7dJsxKbbLUFKM7pImZzkXNkk3bMJrOSmtnuxrFO/mgnH9lk sLd2sJ8zMFA1fMwM4dPbRDEUYpBhQtjkgyFg0lCdAamvOvY0FzrHRfSbUGCC GEIc5aLsNwGbFOdEgE1y04Iu5Ucf129y3AxhxSg96EW2CVE6IdtkQNrY341t OYT/FvB/zZXtQaQPZBPkEUoodROwyXF1E0r15OBM1/s2QSGOcpGLJsf1m5BP c/0Gm1BOcymtj0AoS3NOONNFPs3172UTpXvh0Zwuwh1IHIqnuYgNjJSTXac/ 09XTXtMpLAWbzI+3gU22FuX47kX57nIP2ATVTXbnu/fmu/eXpXvL3cgm/KrE nAR3UAagA+gBAZuARMAmEIAJ8ISwCeAFXgYqSYtiQUA0yCYVucFNFfEtdWkS QR7abwI2ubrec+/KGHGmC285Wfrk/rLSM12ETQ55svv64R5hE4AJ6jd59+k1 HCaX34PJs50vDs9xHXeUCz1DtgnyCwrCyz/6xufsOrvOrn/qq8BZvdRDt8yL Ue6tX+FjUOZjUHxML3yqEy3FiZbI0o130AGbRDKxfpNgplZOmO1Ye9GddRnY ZLa3pqM+lV/gVxJrdynWrjTapirBXlzg25zr2ZTsUBVhVupvUOJLL/NnlPro 5btrpLMZaR50xBNFm8QwtQibRFroRVrphVvrhdjohdgzApwMfVj6F8xUz5up 0C1VdK1UNK1V1KxVVK1V9FhaRp4MIz8DwwADg2BDoxAD/UCaQ+R5Kx9de6a6 nxOtJJIpKwidqIi/ygu+zg+53BS4w/XdbfDfawrYafTfxbPd6L/V4LfZ4LfR 4Lve4LtTz97memzVuW/VuW3WuG3UuEK2ue7wJCXrDa7rDW4bXO+NOr/N2qDt mtAdTti1hrArdQE3ed4PW70etrJuCi5cbzJcrWPBi5e4rpNVzuPVHmCTpba0 9WGOok1mx47OdJGRouxY19F2RcImaG4wpRd+ZU5COdCFVEIZ0kWBCXm5ySlt QlEJmtMFNkFB7fDoKyq1yexYx2HaiRM48A0vTp+qF16pTe4sVG4PZBA2mRdh Z7qObILF49faZLPNn+g3QTAhFi9SMqGsFx7ZZLC7cVBWT7LJ0d8qUTQ5od8E jRGGOze4owM4nGATxYoJWOOUQiFXTHCYpNdXKmk5IW9aJDeYkCsmiCHUigkG k/jSvCh0pgtskpceXFYQU1eRepxNFGcIK+2FV4QJUV5R6DdpHukVgU0GZTxk E/hC8NsLNtnf7L9/c/bp/eVnD5cf3pkFp0AIlRD9Jqg7/qPLY9ur8qkRPt5v okQllF74w3b4g+EGZKEoVkyOs8nJm99PaROlrKBUSRQXep7GJgRG/h51E6W9 8EorJmSeULpOKOWSY/tNRFi/yfxhLzyqm6zNdC6Pt0DWptp25iSXF2WXV2Rg k/WZVmST7Hi39GgnwiboTBdqgQebKNZN4MVgGQjYJDfRozjdtzwnCD5PW0Mm fMIxGWdpXIg2whO98HjRZBGHyYrSXniwCZ6tA548xGxC7oUHnpBtcqQSPJ89 PWAIcYILTQamnPJCC1OIlnlCJWc2ObvOrrPrg1eOk2ahu14xmwHBKyaGhR70 Um9DsEmJl0GRp34hm1HApud70FJZesksvSOb2GtFQJxomcGWI+KC2+uyqwsd 45Ky1tqkukx2KX6gqzTGtjbFqa3Ir63Il5/qwIm6WBbIKA+kVwbRy/10i9ka mZ70DDYtzV0vxVUn0VkrgaUVj7WcaMU6aENi7LWxLSp2WEUjxlI32ko3zBZg Qg9yNvR0NWQ56hnbqulbq+haq2hZq6hbqqhbqWgzNUz89G2jzc2izc5FmjDC jYwiDA1DGawQhrO/Tmrk+e7qgD1JxsO+3LtdKY+anJ8J3J7wXO7V2T/gOjwT uL5oYX/W4fumw/dVu8+rdm/Iy1avT1s9X4nsXwmZLwUQu08hfNtPeLbwjGKe ieyeiZjPBaznfOcXTW6fNLI/bfB8JfD+uNH1SZPjYyHzvsjitvDcTaHhGtdh vcF5ud51muMyznGfagpbbE1eH+KsDYNNRHOjbYc2kc8cjjlFd+aEUIiBXagd Hu98R0O6KDzBdi+uLaAeE8nybBcEHx3cCXf4OExaZ8dBJS14TzqWqRHU/y6E TAwJDismfDTVdrQfiNE00gfWAHEgmNQrwoToNyHeJZwyjgGHB4FPDl/rBJvM jXeSeKLcJjtrfXsbAzsbWMvJzloPyu6afG9NdnmjB285kRM2ub4pv71QtT2Q OSuOnOAHTQkD50RB85hNvBf4Xss8jxW+xyrffU3gvi5wW2lmrzR7Kma1xQuy LvbeaPXZaPPdbPfbbMXmdIFHjpvTRdhkGiL0mWqOmGpNmmrPn+iqGu/mDkn4 gxL+gLQJKwH01A33ckb6qtHfLaXZ5Jhw0G0q0QsPalCqDMX+d3Ld5P0aSp5i eLU5vJqcpprsRk5WQzUks74qU2kXPGXTouIWeEIiChWT+NLcuFK83wSd6crP CAGbcCvTkE3QfbvSfhOibnLcma73YDKKZQoCMBluGR8SjQ4IRvr5Q728kf7m 4T7RYI9wQM7vlzb2dXN7u+tG+nnLcxLCJk8fLN+/Nf3wNmYTeAaCbIJGdaFZ XreuTiCb9EsVG+HhGWwDIwTNEz4YCt12cCiLUjohVEKGiaJNyIOCj9sCT54D fLJNFNeXkOsmlDnAKEqXxZMXlxASIQ8KVgoT8gxhsk0OJh4LyxXT1VzV2VwJ 6Wqp6hZXd4vh/4hq5Yvd37cJuesEOYV87ot4MYJJVzN8zuoO4SX43VuY6Fid la7OSrYX5ZP9vGFpnay5pEtQIG0unuptXJ9s28HPdK1Ni+XioqbKhMw4l9Qo VlIYEzvTFWgZjR/rivQ7ajnB+k18L0Yd9pukRbIygCfRzlmxrvlJ7NIMv8qc YEFVQmdTVn9byXQfd22yZX+5+yN8ThdWN8FsMo/bBG+Ef7D26YN1yEvIQ8jG y4ebn97f+PT+5ssH2y8f7rx6tPv60d7rR/tvHu9/9nj/86f7hzy5+vYT7GTX V8+vfPnxPuSLZ3t4djGbPN35/Nku5M3Tw0HET4/y5sn2q8eb8LWwd59h7773 +idY/tE3PmfX2XV2/VNfaU66OR4G+WyDPA/9Im/jUt9zhWz9Yi/DEixYX3wR m17ooVfooZsCNnHUTXDUAZtg+03stcEmse6G2aHWg825+zMtm+OCobYisElZ mkdhvGNWuEVpogMv37u7MqTzkr8og1UXa1YVwuCE0GtC9Kr9tSp9NHK8aGil e7q7TqqrdrKLdpKzdgJLBxLnoBtrrxvN1Imy0460046z0Ymx1Ql11AtyN/D1 NrZjMwyYanpOmuo2KmpWquqWamomqjoX1S+yjGzDLzolMs9FmhtGWWiHXTQK uXAuyMTLgxYXYjJQ4X2nL/V2R9CNFuePWhzuV5u+aLIBcbxosH7Fs3vX5vpD F/v7dpfvWp2+a2F92+zwrdDuHd/mbZP123rLt1yL4/J1nTmRLxutvmqwesu1 /LbO8nuO5Q8cqx+qrb6rZ76pNn9Sa/FIYHu3lXm11XanxWq9gbnCZa40uiw2 ekzWuo83BC22Ja4NVa8O180PC2ZH4Japa2JENj4inxlto/TzHhxtwksnaEH8 6pwcr570rc33o5BrKFjvyYKM3PyOrxSBm3xQScvMGHhERHR/UDIxxEc1jjGs NRtkUQ8Z7W+EoHeHesAddRBKawmySV93LQq5Ix79+/bEoGhyqJm4jSTZ5Chz 4x1KbUKeIQw22V3v31qTb63KtlZkm8tSyNayZHtZsrPSvbvavb8mvQx23uy5 jkV+c75qqz9ruiVqjBc8JQyeaw6ebw6cF3jNCzwXBWAK91WB66rQZVXovNLs sayQlRb2qtgTstbqtd7mvdHug0XsuyryBpKgpfAnzBBe4bGX+d5zzRGzbUmT koIRedVgL1cu58vkgl4Zb0DWOCKtm5DWTEmrh3uOhgkQZ7qUCgXdsqK6CZoh XF+VjhrViYIIYRPiXfK4LXJvOyqL8Gvzia0lRJo4eeQpwcQSE8XUlmWgc1zk Q1yIHpSQayigkpKc2OLsGMAI2ORSfjTYpCAzVNEmEPiRUQsGvKXY5FR1Exwm k2PiiTHx+GjLyLBoaFAw0M/r72saGmwe6Bf19wn7evg90gZZd52suxZssjQr IfabPL67cO/mFILJvY9m7t6YhgfkGgr4BWwCv5ATQ009XRXyzgrK7kU8BDFq ZO010jYOpLv1YFMJARPK+S5yFGGidE/icTmlTRSnAVO2KBK+gCeVThtWZIjS 1idFmBD7TSiDwhRXSaLVnMrCIZ/gOm79IupPoew3oVRM0GJHLOIqsaC0v7th cUqC1axnpWtzsnZBsaAuuzgjKCPWIzOOLahOG5NxV6bE24tdK1MtMnFRfXls eqxzSpRjQphdXIhNbLB1VIBFBFpu4m0a7HkeAg/CfS9G+h/M6UoOZaaGO6RF OGbFuBQleVZkBtTmhwkr46T8rKG2kvn++rUJ0ZVl6d3d4ftXxjCe4KN6n91Z fH5vGV99uPHy0Sbk1eMtyOvHO68f7376YPvFva1PH+y8fLj76tH+68eX3zy5 8vnTywgmpHZ4sMk1eADvQtCHUOCVivnsyR4KPvtr93AImJLAh/7RNz5n19l1 dv1TX4lMjQwXGsCkwNOwxPc8YRMsnoxDm+gWuOscbxObPkHW+mjTfG+NjJ8t rIytzvIqTmBlh1uUJ7FExf6yqtCuUv/mTKfGBKvacMOaEDo3lF4XpFvtq5nv Q8/3pueCUNh6me666W56aa66SU46iU46+KRirEATDQGb2IFTdEOdaEEeBt4+ xjZsuoG9Gs1FW4Oppmmvqeugo2WloW+nx/S1ck6yt09iMqLNdKPNNWMtDMMv GgWdiwgwrs/3ui1JeySNv8Z1ut5geZNn8az64id1li+51l/y7X/sYP8k8f6u 2elbPvM7gf0PfPvveXbfNlp/22D1faPNO67lO67VN1yrd3WWX9daQN7WWb6t s3iLP/66xvwrCMfsS0i92Zfci29rL37DMfuuyuL7SovvKiy+qbF9XWH+hGPx mMd80Or0URvritges0md3XKD86FNAo+zydTw0fkTBBNy4wmx6AQ/3NULwYWC 6iZEXzzWEY9sgsOkA8FkbkL8e2yCHiObDMhqyQwhhEJ5RtEmxP5upTZReqZr Zkw8N9EKPwKxGh54srEixbLUDVlflGwsdm0udpJtcmVDjuomtxaqtweyZ8TR 44KQaVHIfEvwQkvQvMB7QeC1JGQvCz3WhG5rItc1kcsJNgGYfNAmR7vgcZWg VYyr2HpHqk16egQ9PcI+OR/ZZLybM9ldNSQ/KDkRy02Oq54Q/4QOd2JwC4fq JhB08ooQB3IKpWhCrp4QMMH+FCdPacgwQTZROqeLfKCLbBOsJvJ+yEUTZBPI pfyY8sJYsk1AW3AvTZzpIvYSIpUQMIFfKsivtcnYSDPZJgP9QgwmvYIeWZO8 u14qqe3u4owM8BdnOvc2+g6mBN9buH9r+va1SVQ0gQd3rk8hpKCDXsQMYbCJ rKOM3PBOscmhMmpwmFQT3CAvmiReRg7lKJdiWeTfyybkKcGU3hPKSS3yDnfC EYRNyGe3TrbJB+smx9mEWOlylEObfJAn5LoJuQVe0SbtovL25vI+Sf3SNPbv QgCT6eGWhqrU4uzQKH+bADeTcB/LghQ/MTd7eqBhc75jdVrc3VxQdykabYQH mwBMogMtwSAgEfBIiJdJEPscBB4c2CTAMjbQKjHEDniSEmafGe1M2ERQEdPN ywSbzPVxV8YE+4sSsMm9Q5ugRYeHO9lxkjzZRnnzZPfNk71Xj3Zxley9fnwA E8wmJJWgFScQBJMTPHJmk7Pr7Dq7/h5XjJVqsoNmrjsDK5r4mZT6nCvyNMBt YnAIE9oJNol21c8Ntx0Q5ayNNE52V7TVJtUWBFemexTEMrPDLKpTnFtLAnuq wiQlfuIMJ0GiTX24UV0IozFMvyGEzvHVLPajF/nSC0EoXrQcT70sD1qWOy3V RTfFGRNKAgv7WnH2WGId9KId9cJcGYFeRmwfQws2jcFS0/dmaLtq67rRGW76 OkxtQ0cGK5jpkOJgnmCtHWemFmOqlmBuEHnBNOJCZqT5SFPcm97cW7Ueu9kG +4V618r0nlWavqyx+Lze9juR889dPj+1s7+ut/kK0MG1+rbe5rt66++4Vv/S YP1jk933XJsf6m1/4Np+V2f9bY3lNzWW39ZYfVdr/W2tFTz4hmP5rtribZX5 2yqzL2rOf8E5/3WVybsK0+/KLnxXavZdidm31czPy62fVds8bXR81Ox6U+xy RcRab7BfJtlkjBtwnE3IN/CETRanupBQACbocBfYZGlavjzTg/Okl2wTNK3r /U2LpyqanGATStEEbIJunilCUSyaQIj93WSeEA015ABJZkaJHJ7MGW2ZHReT bbK3MbC5KiNsAtnEbYJKJ3tE6WRDhvXCz1dvDWRPt0SN80OmhMHIJgtC7wUh ZpOVU9vkCCbH2GSJz0ZdJwgma80+ENwmPvMtkbPtyZhNeqqH+up7e4W9vSJk k+Hu2jFJ9YSkckD63t/hCTZB/66O9psQNsE6QarSyUhBTiHuA5FEiBYSMkyO m76ltGjyQZsQpRPi1JbSIKoc2CQvGjxC2AScAj8F8Q/jhE0ghE1GennE79Wv ssn4aAtmkyHh4AAfYNLX29jfJ8BgIufJpY0yCbe7q0bSWT06wF+Y7txd7wV3 YFO57sw9vDOLbAIeubE/Co/hQyAUNK0LXgM22VnrIWxC8OTwTNeRTWTtnMOi CdUm6D+uUpsoLnw/5VLFD04PpthE6fEtomGEvPWG0i+PhELpKzlhZJzSM11E vwmZJ0qppbTLRtJysPGEYhPFxfHHFU0UbSLml3a1VoFNlmfwOSRz8iFpfUlO eFKUa4inmZ/LObBJVrynkJM+IuOsz7atTLV08HMqC0KTIx0g8aG2MUFWBEyC Pc+DSuAtwCTM5wIGk0DLOLwXPimUiUonGVFOhYns8gz/mrxQfnmMlJ810nFp fqAe2eTe3sj9K+NYy8lHs09vL7y4vwIwef1kEztbRRRNgCd43eTNk/03Ty6j fPb0KsoXz64QMEHt8BAgCUUckDObnF1n19n1974izFTjbdSyXPQObWJ8WDQ5 skmB+7E2SfA8VxTDGhbnrwxyR9pLRJWxldl+xXGOuRE2OWEWtWmubcWBvVVh 0ksB7RnOwkSbhghjbjCDF6rPC2HU+mhe8qeX+tOxsV3etHwvvVxPvWwPvQxX XUgaJhSdZCedRPwrRjvSop0ZYWwjfx9jFx99U7Yu3VWD4auv7aGr66lPZxtq O+oauhiywh0skiyN4i6oJ11QiTuvknThXLyZTZJVeRJzozP76+70jwpsrqXo Xk3XuJ6l+viS8ctay7dC1o/t7D93eP3Q7PIl1/qbBhssXOtvuVbfc62+q7P8 ttbi+yrLbyvNv6kwe1cOufj20oWvS02/wR+/Kzt498sSky9Lzn9Vdf6ryvPv yk2+vWT6Q8mFH4rNvi8y+6rY4lXBxccl5o84dg/5rrdFblf5ThsN9ku1tkv1 TmCTiRq3UWSTweqVoVqwycwwsokUbDJxOGXoBJscFlBkBE/w1fB9uE16CZsQ ze/koslxKjnBJsQDomhC2IQiFEWbDPU0kG8jKfJSWDxBwOToYNvUCLarEX6E 5dnO9UUp6oXHYLLcTaqbdIJNtpa6gCe7KxLgCWaTdcwmN+eqNvsyp5ojx3hB k4KgWVHQnChgXuCFbLIsdMdsInQBmyw3uyvaRPFA12aH72+zyVR34SiySZ+I YpPxror+9/8OT7YJuqFVtAnBEwIp5JZ2ZBOKStArP1g0IY5vKbWJ0n4Tcs87 EcVKCuo3AZgQNqkoijvOJkQvPJknp7HJ1AhmkwllNunr5ff28OWyJpm0QdpV J+nkgE3Gh0Ur89K9jb57H81A7t+aeXR37sb+yK2rE2CQa7vDwBOACbyLDnqB UJBNJod58k584ft7PMFtctgohGwCMIGgf/wnt8MTQqFEaRfJ74SJUpuQT1hR QqgE/VJRWubJE72UNpUoNkCdzBOCPMfxRLGY0tVchWShuOedwhPyXC9K1zzF Ji38ErBJf3fDyixmk42Fnv6uuoqC6KggpqejAdtBH2xSlBYg5maP99ZtzLUv TzaLGzIu5QQmhjOTIuzjQmzIRROyTVDRBOQSj29dBJWgM12ZUU4FCR6X0nyr soN4ZdG4TcrmBxqWR/lKbYJWHCKbUM504SS5ggdTyefPrkHAJuS6CeIJKpdQ 0HFmk7Pr7Dq7/t5X+EWVaAvVNAetfLYB8KTY2+iSL1468TQ4LJqATXSOs0mS 1/nyJLfJrtKVofr+5vz64rCiJPf8CNv8cJuCcCtOkhM/i91dEtBTFtSR6SJK sGkMN24MNeCHGfCDGfW+2hWB+uUBjDIQii+t2Fuv0EuvwEsv210XkulKS3fR S3XWSXGCL60TztKLcjeI8DfxCzjH9KIZeWgz2Npa3npqHtoannQdTwMdN8Y5 b1NWjLNx8nlavIFaspFmmqlWhrlthrVLhq20OuTBeNU7SdqjEvsXuec/yae9 KtJ7Xm7ypsYSSPKLxOfPbZ7f8Rzecq1/FLK+b7J7V2v1VdXFL8rOvy42gBd/ mkF/kUb7OEX3eZoe9iBV92mSNjyAPE/Rg+efJeugPEnXhjxP1fkkWedlou6r RL1X8XqP43Tvx+neTGXcKbr4gMu6K3T9SOAMNlmssSFsMlLnv9SetDpYBTaZ G+LPDLdMDneOD0vHhmXkCahknhBLGImmeJJN0Hb43oM9jPMyYgv84cTg905z IYOc3iZkmBA2UXqmi3Ka66AdvudoqhK5dKIsrdMjbXiOGpnRtnr45lHpBHiy sSRbXexaXehcnceyMtexOte2OtuKl066kE3216RX1qVX16UfzVZu9GVOiiJG mgIn+IEzWDt8wCzfc47HXuC7L/HdVvguKwLnFYHTssh9SSGKMDnOJuQzXQcH uiACr1WhL9hkjmSTnl7h+2e6qie7qwYOiyaESo5thz9sPYCbVbh/Q/0mx9VN KK0lCgOBD/5gEydXqU3Ip7nQrODjeuGJ0gkxpEupTYqzYyCoXAIqQTWUsvwY xboJOtNFtgk600VZbnLcmS5qRlomR1omcJiMDouGcZvgMIEoqZtMjbZsrvSC QZBN7t2cvvvR5OaydHG6FfQx1FM73Fu3MCXe3+wHoUBAKGhOF7KJrKP8/VUm B0MMDntGqgmbYP/UT2qrQTUUwinkKJ7mogwB/s05vU0oPFGcKowOdCku/TyN TchCoVRPlKpK6UEvik0U53QRoYwOPsEm6EzXoKxpeQabkbi11D/RL6y5lBgd bO/poB8f4sCrSp0bEm7PS7cXJVfWe1amWlrq00uzAxLC7FKiHIm6SYSfGWET FKLfJCYQG9WVGuGYHsnKiHLKinEpTGSXpftV5wSDTSRNGYOtxTO9tUsjvN35 ztvbg+QzXaQN7PhRrqc7KJ893fvs6T6qmyCbYCr5+DqWQ5sQzSZgE9Rvothy cmaTs+vsOrv+rlekuQokmamR684o8MQqJuX+JmCTokObFLjrAUzy3bSV2iTO w6gqlT0rq1jsr+2qT6vK9s+Pd8kPsy4Em4RaloRblUVYidJd5SUB0hx3caKt IOK8MMJYFG4oCNHnBejVhBhygg2qAg0qAhiX/OklPvRib3qeh16uu16Om16W q166sy4kzUknlKUb7WkcFWzmG3jemq2j767J8NLR8Wdo+tA1fQy0vQx02Ybn /c3sY5z0kmg6SXoaKQx6tikt3ZSVZe2WZrUoyX6+wH0nSf6s1vPbCvsfqyx+ rDB5W2fzjmv3c4vHv3b6/qGJ9XmZ6eeXTN5Vmn9dduGLYuNXOfSP0zQfJ6o+ iFO5F6F6P0L1XoQKlnAV9OB+pOpRDj96AxKucidE5W6wyv1AlQcBKg/9Ve4E q9wKU70ar30z99yDWuYDofMdAQtsssCxXuSywCbjHNfhWr/jbEL5h1+ifEAM E0b9JrhN5MgmyzPyldmDoB3xRLPJ4cTg94omCCC/zSYIJv3SGqW98GSbENOG h3qObiaRTRBPlKWVlIMnCZvMT7YuzXSszkuwbZILnSsLBzDBMtu2gttka6lz B+cJZhMs3YRNRpsCibrJTJPHbJPHXJPrQpPLUpPTEo+1zGd90CYIJsfZRGkv PLLJgjhqrgOzyVgvZ7i/Qd4jkL/XC8+ZklYPyuooWxdPmNNFtglwo64iFcGE 0nJCSISMFApMuJVpEKXVEErFRHG7IjmKx7qII1vkFGVFQxBPkE0wsxTEntwL T8zpQjYh/y6dCiaKNsGbTQAmvT0N6EwXXjrBbIL6TSaGRZsrfVd3hu7emAab 3L42vrshHx9s4HPTC7MDc9J8inKC4PH4YOOV7UFQCbwMILOx1A3P9HSBSo5K J7hQqig2OSyaVBFN3Kh6Qh7bRQmxZpHogqdMAD45p7cJeabWcTBBv05kSlDO fVEW6xxnE/IWHsokYTJPlH7bx9kENEGM/yVzgyIUxU4T4jUUm0haq8WC0uEe /tI01ui3vTywOiPlVqSkx3sFupvmp/jB/8X3r06/uLt67+rErb3hpQmRqC61 ONMvLsQGnekiN8KHeJlQjnXB8we98GHYgS7gSU6sa0mKd1V2ELcwQlARCzbp byma6aldHuXvLXRhNrn8Xi/8i/srOE+2CJ589mz3s2eYTV4/3kPNJsATwiZf fnyVUjR59+mNM5ucXWfX2fUPuaIsVSPMVRLtNLLdGXmehsCTUr/zRV6GhRhP GIVseoEHLd9dL9/9YE4XOmEVBzZxwOsm3ib12f4TXaWjHcXCitiyDJ+CRLe8 MKvCCOu8EPMsP+MML0Z1lEVXobcs312cYtsce0EUfU4YaSAMY/CD9epCDWtD DDjB+lWBjAp/xiU/RqkfPY+tl+uhl+NOy3TTS3elpbnoQSJdGGCTsFAzdsh5 Uy9tXbaGrq+OXqA+LdCI7m+s66VP9zG+EG5lG8/SiWfoJRloxtMM0s8bpRq7 Zlzwy7bYHc59Pl/+jST+Lc/nX2pYf6y1+Zeqi9/znb9tYv21y/eXVs+XJRce peo8Tdf7JFX3RbLOi3it5zHqTyNUHodguRehcTdc7W6Y6u1QldshqndCVe+F 4wlToeSjSJWPIlRuw+NQlYfBKo+CVB4FqtwOVr0drn4tUfdW3vkHNXZgk7si 580mB/xMF2uhwXWy1m2U6z8vjlsdqFwe5MwN8Wbgdn24Y3xYMjYsnRoWKx5K IVZao4FdABN8bJcML51gWZ6RogBMVufQIviuxekOAiYn2wR1oEDQhwAmqPkd eYRcMcFVglKLB55Ewesm3WAT7oAUXo+RBE8T0SBAKZ0oO3tDwERMvABgMjXS TLHJ+pJsdQGA1o7vi+9am+/cXOjaWeneWuraOSidSAAmkBszFRsHZ7qCcZsE zgr9pxs9ZhrdZxtd5hudFxtZi02Oi/Af6BQ22er0g6x/yCZEDWVR6Lko8pkT R4JNZiSFE3LOeG/DgEzQj4U/KGscltWNyDhjsir4OyTqJsTWRaU2wdoWumrk HXBnWy7mYzbBcIFxA5VLspo4YJAcLLU5jRxsAnBTTTY8hmfgXWwUMJoGjCWD i+eEI1tkmBA7FpWGYhMACJKIYig2Kc2LRr3wRdnhwBPCJkQFAdmEGCCMeEIc ETy9TcZHDg50DZFs0tfLx4918XpkjfJusEkN2GR0gLexLL+6O3TvJthk+uru wNykoE2UnxLnGuRzERIZbJOb7itqzAKPXN8buX1t8vLWwNpC10gfV9ZRJm0r x+YDt0MqZR2VBExINqnCYVJF3lFCFgr5WBcZJoo2UVTG77EJecrWyTAB51JG bCnahACIok3IgxoUSydkm5C/eXLdROnhLmQTgidka1COdeEHuuplbVxpa123 uJaIpKUGpauZgwKKbBeVjfbyF6e6Vma7d5b7d5b6RuQNbbyC3ETv4vTAtsbc hRHRzrz0xtbgzd3hxXGRoCYlP9U7OtAqMdw+LgSrm6BjXWE+F0O8TIPZ58kw AbbE4DOEk0LtUsLs0yIcs3GbVOcE1xdFCirju5oy+8XFcwMN61Mtl5e7b271 39weuLU7dGd/7MH1qSe35p5juxdXXj3aeI3xZAtN7sWrJ7uvHmMBobx+sv/Z sytfPL/+5fMbXwJAgCEvrn39yfW3n94AmHzz8qOvn1/76uOrXwFMnl3+8unl L57sQwiMHDe5ixAKoRVyEE/+0Tc+Z9fZdXb9U1/RtuoRVipx9ppZbIM8b+Mc TwNIgbdxIcTLAFLgqZ/PZuR50FNZeimOuhhPHHTjHXSjHXQiHbTTA8xby6NH 2otk/MzG0ohLmT65CS75UVYFUZb54WbpvowEV/W8AIYoy0mS79SaYSNOMefH GjVG0vhRtKZwnbpQRi0+Vbg6iF4ZQC8LYFwKYOR50XI9adlseiabkeHBSHdn pLnRkz1NwCa+YRfsw8/pBeqo+WuqBGhqeesYBhubBJyjsWlGQSZW6U6WWc76 cZaMOAvNUIZxwjnLtPO+WefSqpj3ZzJfzmR91x70BZf1Ncf6C67F13zrr1pc vhA5/SwP/JrHupqofTVK5Vas2sNI1Qehqs9C1F6GabwKUX8ZoPqpn8r9aK27 keq3w1Vvh6neiVC7H6n+MErjcQyeaPUnUeqPIyFqkJsJEPV7ceoPYzSeRGk8 jdJ8Gql5L0Lzfqzu7XTDO0UX73Ls7vKc7jW77QhYaw3M5QbWbC1rtoE90Rgw JYhY7r+0NFA5M9Awhe0TaR0d6hgZ6jzuvp08VfhguO5E18IkIEWyOCUhznot z2CbFtHKRbiTn5sQT4+KlNoE3hInuyg2QTAhMEImSV8355igI17EBorGQVnT kJwHodhEce4r8QMSNpkcEqPyCrYgD99WD98b/AgLU23Ls51YU/xy/9pi7/xE J0BsdV66NidZm+3aXZVuL3VtY6WTzr3Vrivr0ssglInSNXka2AT1wk8LA6b4 vjNNHjN43eR9m7gp2oTohX/PJi2+AJCFJve5BldkEwpJiEw2syfF3tOtkTPt yXOdhXOS6jlpw1S3aKJbNCwTwN9Sv7y2V17VI6/o7T7q3znpQFdnNfqrhhfA fW+bkOg3ycRXkGQ1VmcftbFzchsUwq3KRqmrzCIecxVsgj4DZe37CSHDBG02 QfOBlYZypqswK7w0LwpsUpwTATwBp4BN4IaTqCD0dNaQBwj/ltIJbpPRYRHA ZHhQQDSbgE16e5p65I1yWYNMypV110olnO6u6uH+xo0V+UdXRh7dnb13c3Jz pau3+xKnLNbbzcjTxQDeBniZJkY7VZZETY8Kru4MgU2ubA9uLkuHe+vAJsBG SiMJoQzK8kTKghLi4BYxoAxN6KLsLqF0mija5Lg1JceFvMldsftDsSZCPtN1 nGIU296VLtk5ziZKG+0pNlHc7YJ64ZWGshq+p6MRIm9vkLZyu8V1KJKW2q7m Gko6BGWy1qqxPt7SVOfmgnxnqWdnSb6/2rc23Tkmqx3oqIC3S6Oi3TnJ5lzn lfW++VEhn5OSk+QZFWCVEGYfHWgd4WcR5mMW6nUxxPNCsCfYxDTY00Sx3yQ5 jIlskoXP6arMCqwrCBdWJ3fxc+UtRVN93JWJZrR7EWBye28Ycmd/5MG1iae3 Zl/cW3z9cO0z4MmjjTePN7EAUg7Pd71+uvfm2f5nH1/+/PnVL15c/4Jkk6/x ognY5JsX1989vwZ5+/HVt0+vfP3kMuTzJ0psQhaKUpJQ8o++8Tm7zq6z65/6 irPXirRWjbFTz3BngE1yvQyz2fpgkwJvIwImyCZpTrQUll6ivXY8UzvOXifG USeapVsSw5LUJIFNOutT6wpDitM8c+KdC6Ks8iLMCyLMswONE900Mjy1OLHm XXkscYZNS7IZYRN+pB43nFEXRq8JpXOC6VVB9PJAfbBJgQ+9wIeR56Of62OQ 7W2Y5WmQ6WmQ5G0a53fBL9LMLtxYN0hHLVhbNURX249mEGxs7G9E82aYRJhb Z7mYptnrx1vqRpvqRhuaJp23yzCJyDat4nm+mM59OZzyNd/781qHd3U2nzda vGq8+I3I5Xux+587fF5WWOxFqV+JwGxyL0L1Xpjq4zC15xHqL8LVnwerPg9S eRCr9ThR7+NU+osMg08zDV9lGb7JMfo899wXuee+zDXCkmP0VS6WlyXGkM+K zn1ZcO5t3vl3uSbf5Jp+kXfx80LzF+VWzzh2jxoc7wud7rW4bAtYq/V2mE3q MJtMNgVOCyNX+suWSTYZGWwfHuxAY1HJLSfk/AaboLt61GxCPrWFbEJuPIFX kk9zESe4foVN8LtHnCcNJ9uE+DHfv7dUYpPRfviWsG+SKJ1gTfFLfRtLfQuT nfCpBqTcsb7GQWnt/LhwZVa8NiveWmzfX5PsA0/Wuq9OXlrrSZ9uiZoQhE6L QmZEgdMCv1me5+yhTRYaHBcaHeYbmIsC10WhGyWUOV3IJmstPmgpPGETpUvh MZu0sKfEPmCT2fbk+a6ieWnNgrxpWtYy0d2MbNInq+mRVcqkZYRNTthscrDf BH8ZPJC0lrfyiX6TA5s0kG1Sk6eY+uocwiYotRWZRCPJb7MJBSao00TpmS5K FzyyCXgEbFJWEFOSGwk8qSiKQzYhigioboKEomgTpfmdNhnsq99YkV3fH7p/ a/rOjfGN5c7u9sLMZLY7i8521ndzpMHbiCDrkrwQwMj+Zj8a3rW1IhuU10ha S06wCVEBIVdMyPfYxIBc4k/BiykfVSyanLA88YM2UZwPTG76IPJ7bKI0ZJsc tx2eYhMyT94rlxz+TZJnCCttNiGWwsvbIQ0osrZ6gImiSlDa+aVSceXEgGBl RrK91Luz3Lu9KLu81n9lfWB/Wb4117Ux07G70H1jrX93Sbq3Ip/sb+BVJxdl +MeHMiFgE4BJkIeJv6sxBGAC74Z4mRJzunCbYHO6UiMc0/CWk+wYl+JkL7BJ bX4YryKhvTGrt7VkbqhpeUK0MdO2s9B17/LYk5szQJInN2fh7bPb8y/uLb28 v/Ly3son91YO9sI/WP/04QY66IVggufKG6x6cmATgifYsa7fZJOTefL60c6r h2e7F8+us+vsOulKZOlG2ahBUpx1c72M8ryNDmziZUSGCSTDhQE2SWBqxdhq xDK1Y5304l0ZjTkB/bzModaC5qq4ymy/wmR3sEl+pGVuuHlJjHVxpHmqp06S q1phkH5nrmNrhi3YRBBnzItmCKLpgihafQSDG06vDWNgPAmhVQQzyoP1iwMY Rf76hf6G+X6Gub5GOT5Ykv0uJoZa+saYW4YZaAfrqIfpqUcytAP1GaHGBn4G dH9D80Q7yxxXRqIVI8lSM+qcQZKpeaqpY7pJSo5Zd0fE56NZn8vjv2lkf1HD /LrO6nWj2SdNpv8idP2l3fuPIvenuUZ7YapXwlVux6nfjVa9G6V2P1LtQYTq o0i1Z7FaL5NoX5aafVNl/Qeuw58bnX6CNLAgf+ba/5nL/InL/Lme+QukgfmX Bvsfhcw/Cu1/4jv8hef4t0bWvzU4/Vu981+b3H7muX0ncvuyxe2TVtdHba73 21y3+I4rBzZxmmv0nOIFzYiiVgbAJlVgk8kB/mh/y3B/22B/m9JNhae3ydJM l6JNyF3wSB8QJBQKUpSOC/5VNjnkSf2AlCidKLEJWSgkpBAwaUEwQTYZHxSg n4Kom0yNiod6mxo5mekJPolRriU5YZVF0RJx4Whf7cI4f3OhbW+1a2+5E2xy bapsvSd9Rhw9KcRsMtcchNmE7znLY4NN5hqd5+sd5uuZc/V2C3yXBYErJeQx wkTpZK35tDaZEntOtfrMtEXNdaSATRaktWCTGbl4UnpkE7m0Qtp9iWKTE/pN 0AtkHVVdLWViXmFTTRbcyaMzWqexSQMnF/EEqaSmIpNTnvE7bQIqocBE6XKT 41KUHUGxCWgL9ZugU0zEZN3/OJv0crfWej+6MnLv5hTYZGtVIusszkrx9HI1 9HYzgoQFWGYksTllsSN93N313ptXxq9sD64tdPVLq7vbSk+2CXlNCWUsMDGD C55EKENd8GSbkLvgFX1B3NL/KpsQRRNyoUTpZpPfZhNylYTAyHGlE6U2USyd kE9zEX+T0lYla00UKib1hwe66hFMUOnkOJt0CC7JWqsmB4WrM5Kd5b7dlb6d JTnwZG+l98pq7+WVnt1F6c6cZHdOsjUvAZtMDTQKa9NKsgLjQuxig23hbVSA VRDbxNfZEBLofj7U+yLARHGGMNELnxPnRvSb8Crixdx0qahgdrBxbUq8Nd+x t9R9eVV2Y6v/wbUJrFzyeB3y6YOVl/dXX91ffflg7SAPsVWMB93xuE3g7eun +6+e7H95SBLIV/jWRci7F9d+lU1OwxOAycsHW//oG5+z6+w6u/6prxQXeoyd ZoSVary9ZpaHPrJJvpdRPtZ7cnCaK9edBslyM0hl6cXZakRbq4NNEt3007zP i0sjh4Q5g+J8UWVsRZZvXoJLaoQt2CQv3Lw8gVmT4lgQci6NrZnto9OebQ82 aU66CDYRxBoIYxjNsfoNkXQIN5JeF06vCaVVhTIqQhglgQzgSaG/fr6ffq6v Qa6vYY6PYVKQRVKkrVeM+YVQhkaojloUXTPeSCvUUC/MmOZvoB9mYpXhZJ7r oh1nppdqoRF37lymhUWqiXOycXGe9UJv6vf96e86on9ocP+qxu6zWvNPmi68 EF34ReD+nzv8/1jPepRKuxKmcj1S5X6C5uNUvedZhi/zz7/KP/+m0PRdufWP day/tLpD/tbq8bc2j/8Ej5udfxY4/rHRBvJTk+3PPNuf+Ta/8G1/Edj+odn2 x2bbPwvtfhEw/8qz/1uTw782Ov5V4PqTwOWdyOm1yPFxs/3tZruPmm0Jm8zV Oc03eU3zg2ebo4kzXZP9mE0G+8QDfa2jfQLyACIKT05jk+VZDCZwA7843T47 DndlQgpMQB8QJBQKUoi2d8ImlDaT422CTRJGg15xnmA2OeTJsTahCGVqWIzD BLMJ8eT4gGBi6MAm85Ot8EMBT8AmnS3lSdEeznZ0FyY9KsguPZ5dVRIp5mVN 9tetzYq3l9r3Vjovr0quTl5ax+smYJOZ5tBZEWETD9wmTmCTOdwm83wXxaBj XRBy1wnZJpCTbNJykk0GpA29Uo68G7NJj4RzGpgQkbZXgk1amgqaajLrKlK5 lRkHPKnKJmTRyPmATRBM/l1sorjWRClDKGUUdMQLbAIwKS+MBaEATyqL49Gc LvIMqxNs8nc60wU2ub4/dPejyXs3Jy9v9w7IK9IS3N1ZdF+Pcz7uxglRLGFD 5uy46PLWwN0b2FpGEMrSTFtfd5W8s7y7tULRJpQDXZRjWpRFisgmxLBodBOu 2GlCUQkShFKenMYmSudunWATSr/Jr7UJeUMoZZiwUpuchidKbUJevEjYpKfj qGKCTnOhKOGJqKKnnUPUTfZW+kAl+6vYW4AJZH9Zvrcg3Znt2pzrApvMDvNF den5qT4hXheC2aYAkwg/iyCPA5ug0gnaC3/QCH9oE+JMV06sa2mqT01eaGNJ tKA6qa0hE7PJUOP6TOvukuTKmvzu5VGACTZG+MbU01uzH9+Zf3Z7/tWD1TcP 118Tx7qebBFju14/3Xv1ZBfP3uunl78i2QQVTX5V3YTcLK+0QZ7cb3LWC392 nV1n18lXurtBvIN2uKVKlLVauisNbJLjaZDnaZjHNiBgkuOGTc3K8TACm8Ta qEdZqcU76KZ5ncsLtpTVJg+LcqVN6fVFoZfSvHLjncEmBVHWeRHmVcmOwnyv hnRWadi5gkBGWxazLRPZ5JwwzhBs0hJnwIthNEbT66NoOE8YnHBGVRi9JJBW HEAr9KcX+NPz/Bm5vlhSwm0SYpguUabGwTS1EG3VaLpmiolWhLFOuLFesJFx nIV1rtu5bJZ67AXN1IsaKSbncsyt0s55pBg3l7vdGs77RZrygzD0x1qXtzW2 r2pNP+aZPG++8F9E3v+9xe/bEotHsZq3w1VuRak+TaN9WnD+83KLt3XM73hO f2r3+re+0P82Fvs/R0L/a3/A/ybz/pvE/S/tzn9ucfiDEACCR2QD+Ulo85PI 5meR7Q9iq39psYJnfhbY/JVn+5+a7P7WxPxF5PgnoePbZodXzXaPm21uia2v i6238X6TlUanOa4zXjcJnhFFLfWVLvZVTPVxJ/p4I33NijYh7rtO32+C26QL YELYhDKDiyiLELtL0Np35BTCI6gFnkCKok16JdXvB/83f3ylNc4Tbn93AwR4 8sG6Cemfuw9sMjHYcggT4dgAfNtYWQchC36iuQmxpK2yIDvMyZZhfk7V1kzD lUljswxSY53LC0Jk4oK50ab1uZb9Vcn+SteVidJVvN9kQkDuN2GjXvi5hiOb LCg70wVR3MC4KvJe4rPnG91m6+EzuAJS0GYTtOKEHKzfpMV7Shxx0G/SzZmX NU5Jmye6RUNS/oFNpAc2oZzmOr4X/qBTHtVNeLVZ+KwtwiZZR23s1UpCPs31 G2xScyldMcToYErd5IQ5Xe8lJxJsgkZ1AU+qShLAJkRvOFF0QO3w/zE2GR/m ry9Ldzfkt66NPbwzc/PqyMw4T9SYFR5oFeJnnp7oAQB5eHv+i5eXv3pz9ctX V549WAGkLEyJsWaTY850KS2aECShbC2Bd9EfR83vxMhcpaODFXtMFBe7n7Jo QmkzOflMF7lJhJLTnOkibELhyQdtQghFccuJ0jNd5H4T0nITrNmErJLj+k0k zZW9HTWTg8Ll6S6wyf5qP8DkIKCSJdnuohRscnlRtr0g2V2WTfTV15fHp0Q5 e9jTXG11wCN+LkY+TgYQeBDofh5rOcFtEuptemCTIOv4YJskfC98arhDdoxL SYo3JzekoTiqrT5D3lLU11Y60VO7OCrYWey6sdV/e28YYPL4o+lnt+cAJp/c X3r5cPX1w7XXD9ZePVx/hYTyGFt0gsHkyfanj7C8fAxI2UdnutCBroNjXb+y boJsojjL66zf5Ow6u86u33CBTRJZumCTCEuVFCcdsEmul2Eu2wBsQlRMACbZ rrq5bONUJxpmE2v1RBYtx9+sNMp+iJ89JMgRV8dVZPpgm00SXTOiHfIiLIpi rBuyPTrKgsSFXvXJdpxY89ZMzCaixAtgE1G8kTBGvzXBiB9Lb4qhN2A8waon NRGM6nBGaRCtOJBWFEgvCKDnBzCAJ5C0aPu4GDvHiHMGwboqYdoq0TStNFON SGPgCS3snEmyrXW+u0GWg1rcBdVkE41UU4PsC2CTgEzTMX7IJ5Olf2tL/LE+ 8E8c57cc6+fVRo95xk/FJv+nOPC/87w+Tzd8gI8FvhOt+jLX+E2FxdcAk2a3 v/QE/Y+ZxP+1kfN/bef/H1Ph/3Ms+L8M+PyrzP2XTqc/t9n/qdXu51Ym5Kc2 eGD7s9gG5cd2qx/brH9qtfmlxeZvzbZ/EzL/Vcj8S4vjTy0O37Q5vGmzf9Zu d7fD5maH9a7Iab3JYbXJ+dAmQdPCyAV58XxP2WRv3XhfE9hkqL8Vneki7uGJ 2sHpbbI43aloE3Rki9xLgtBB4QmEaDD5nTbp7arrk9QjnlAWUihVyeE9JAGT 5qNXDgnxMcIHDfvAE0ibqCQ+2p1poW1nrulgpY1sEhVsnZ3C5lXHj8gqN+bF l9ckl1cll8dLVmSpk6KIMV7QBD9wSuA/yfOZanCfbnCbaXBGNpmvZ2L9JkIl vfAoiCfIJhClNlGaCZHHeLPnZEv4dFvSTHv+TFfVbHf9RJdwTCIc7Ob1d9cj m8ikZcgmRwsWO6pOsAl6JdwAtx7O6QKbHPIkiyAGt/KIIeTuEnJq8Px+myjy RGkvPNkmRPtJSW5keWEs2SaNnExisi6qmED+I3vhcZvI9jZ7bl8fR+3wO+vS XkllbrpvarxbVopXCy9nY6n7wa25x3cXnz9ae3Rn4cr24MpcR7+0Gj/WVXmy TSgHtCjzptAzxJE29Ixipwmx+EOxEf432IS8M1HpcODfaRPFXnjysOsP2uS4 w12UvzqlvfDENOD3R3Vx0WkuiPJyCaluAjaZGhKtzXbvrvTvrw2ASnaXsY54 UAkK2GR/AX+wIh+V11YXRcYE2bAsNVxstL1Z+ggmRzZhmwaxj2wSFWARi9sk Jcwe7V7MinEpSvKsyAyozQ9rLIuVCPJGuquWx0XbC537K9LdJcnWfAc8uLkz +PD6JNjk1aPVz55uAkxeok4TdLLrIdZvgrYxgkogr57sgk1eP738BhwBmgBT gCxAGfjoYASTM5ucXWfX2fUffGV6GKQ460VaqYZbqCQ6aGVj07qMwCZYPBg5 7vRsd1q2Gy0LeOJ5LsWZHmOrEW2nlejMyAmy4KR4DAvz5A3pvEuR5Rk+xSns vETX9GiH3BDT0hhrQa5Hd0VQV6mfOMelOdOxK8ehPdO2OeGCMM5YGGsgjNZv SzBujGM0xtEbY+iNUfTGCEZ9uD43TL8qWL88kFEcqJ8fqJ8bZJgdYpQZbBST xAqMtbEKNdIP1NUM1dOKMqAlX9SJOQ820Ys4b5LGNMtzoaXZaiSaaaaY6qZd OJdm7JhsGJ9zcbMr+rPJ/D83h/yB5/MD1/ENx+JhheHdOuPnbTb/d3fU/851 fx6ndztY5V6k2r14zdcFpl/W2P0gcPu3/vD/tZL9/14t//9uVP0/V8v+x2To fx0L/LcBn1+krn9qd/iD2O4PYtsfW2x+bLH+scXqj82Wf2y2+GOzOeR7sdkP YjN48GehxV/4ln/lWf+1yfpnod2fhHZvm+1eNds8brG6Lbb6SGy5J3LabHJc bXSa5zrPH9pkTlo4Jyud7KkFm4z2NQ/3tw31tys99URepI4mCeO7TrqwTGFZ nOqELMDbQ5vgM4TbZ8ZayEUTYgAXhFhcgo54kW3ywboJYKSnq+o4m+A8ObIJ eYX3yf0mhzB5zyaTwyJ8jDCmkpmxZjRzTCwojgh2sDJVtzPXYFpouNrT/D1M 4sKYOSme9eUxA12XNuZaL692X12XXZkEm6RMCMNGmgLG+QFTfD+STUAWzgsN LKwdvkH5nC5Fm2B1k2ZsgDDABIL6TSBKbTIudB8XeU40h021JmI26ayckXDH O/mjXYITbIJgcpxNiCHDqBce2aS+KuNwLDDZJlmQugoimZCa8owaIEZ5Bv4u phXsZaSlioRNKAOEFY91UWxCaTmheOS4GcIQpTZBs6rgZp5YCn84ZqEeaRd+ o8i/QpTgY6gPRitg89/wjA41jwyJhgeEg/38vl5eb09jj7yhV97UK2vskTXI pVx5d61MUiPt4owO8sAm1/aH792cfnB7FnL7+sSVncGRvroucVGbMG+op2Z1 vuPqzuCtq+P3bs7cvzlzZXtgebatXwr/1cokh2e6CJ6gcVvkIcAEQ7CIIPg9 Nujj0Cad4BdxBbyFx23Co4NMZIYoHc9FnOwiR+mxLkIx5KKJ4iZEhAXF81qn tAlBD6U2oRz0+v/Zu+vwuO4rf/x22qBtMTMzMzMzs0asYWYeMTPLkgwykyyz YzucppQYA22SJt0tbbfb7m6Xnt/+9rffc+cjXd/MjBQn6e/b/qH7vJ95RqOx XVu2el8553wODiIcJvpnI+tUT/C5+J3O6ZJwWiDoYGHCBsZOLUw60RnCUm6b mN0q4bTiRwdvp13CblSLWsf7OctTimOLPevLPetLXZDj2LCJCnJiUX1iXrUO MJlXnVju6pO3NlclJobbuds+F+D6MqqboIYuzCaBFtpeLxCKeXyIVVK4bWqU Q0ask3bexAOCbFKVE9xQFNFaEcduzZExy7v4deMa8uEJwenDmnNrPadXuk4s qYAnp1a6Lp3A5uJvX5q5szF/VzsLf+cyZPHO5aU7m8uvah/vXlnDThK+jp0k jAU7VfjoG9ePYejYtsl7oBJtfnDr5A9unnj3xvq719ff/uoZwug5bhMiUnba IA/5a9/47F171971N32VBBoV+R9Mc34u2WFflvv3C/0OVIaZg1BQ4LPFAYfg DZDCYPMcP6N0z5fTvQ9kBZhWJLhwaxP7edXC1uz2itjGovDqvKDSTN+idK+a OIuGJBtGgYeiIVxNilTWBimq/btr/WUlroIcW066GSvlECfVWJhpTs46RMk8 RE89xEo24iaYcONMuXFm9FjL9iizuiizihjz4kTr/DS73Az7gFJf50xHsziT Q9GHjONNTFKsTNNsDqZZvZRs/nK6tXmxm1mJ+0vZdi/nOBrn2Znn2bhmm0Rn H2qusd3sSXmzP/VdltdPBP5vMV1vkR0uNltdbLJ5WxTyr905D5o9LyY9fyp2 /4W05zdzD96rsv0hxeeJMPIfxgr++1jT/5xq+89jpP842vi7mYy/H0v8tDfy iTzgvtDzfb7r+zyXD7jO9zGb2D/k2T/iOTzm2T/m2X3Ah4BNbJ+w7T5mOPyM 5vgzquMnLPcPWe4/4Xq+xXW/xXXZ5Ltc4rscZ3uvMbyWqN6zZN9pavAEI3aC nTwtr5pS1o2q2ke66EPdvMEe4UCPeLiHs5NNEE/wJYzAEAhasIgyNSLU2kSG Ap+aGOJr6w5PbYIPkhBtgtdNdu/pwlUC2V543Yw+hLvlnWyCVEKsB2GdWt0s eF0nwz1clKFuwh8CdoYwxivU0DU9KpgZE/JZNYkxbnbm+9zsn/dxeyXYxzg6 2Kogw7++LJZPLRrWdKxMi9eXlCeWlKcnGpY1eSOc+H5axBAjfIwVMQ6hB0/Q giZpftM0vxmq7wwmFG+DDV04TIg9Xcu88Bl6wFiH1wTZB3Vz7VQ6AZuMcENQ 3WRSXDWpPUN4CGwiYfbI6F0yslreqpSTUE+XTtHk623CJ6FZeO3uxWKiTYgh riaBIE2ALOA5ThL0HEV/7bvOz6CzbBGphDhygtdNvjJUQoAJfozwdgzYBG9q QnUTwhFwFHw7PPqrZdAmo33CsX4RyviAeEybwV5Bfw+vt4vTrUbLFulKBa0L C1UDTpST1bIOlIFu5sK04syJkcsXZiCXzk3B45n1gTPr/WdPDJw+3nfyaA8E HeR16ewoZH2ta2Fa2N/VLhfVSvmNeN0HF4p+xUSLjnohZysibgMx6EUBu24r O5zERey5MtiXpbPH8GsbunYRh8Ft77urZPforF+E6Kw10eeYDsTw5q5vZBPU 2QVBHV/wKXiDmN0sYjXBIwT9EPSjxOx6pbB5tJe5OCk9uqA5sdwNANnKkmp9 UQlGOD4nOz4rXV9Un17tVfBqmyoTkiIcPO2/H+D6CqqYhHoZQcAmsUFWwJa4 YMu4IIuEEKvkcNv0aMfMWGfsDOFE95wEt7wkj5IMv6q8kIaSqLbqREFHvoxW 2sOvm+qmrowLTi4oLx7pO7vafeqw5vRq94XjA5unR6+dm4Dc3ph79fICIYsI JphNNldfu3pE6xFsCeMb17BJEKQMTCXaeRN86yJxlkRn4B3tK9G3iU4ZRWde /q9947N37V1719/0BQABj6S7YDbJdPt+ge8rFaFmOExwm8B7ikMtc/2NtTY5 WBBm3ZwdoOzI7eVUClqy2spj6gpCKrL9i9O98lPcK6NNG5NtWEVeysYITVOU uj5EUx/c3xisrvSSFDjyMi04aca8dBNRlgU58xA54yDYhJ1szEs05SWY8xMs 6LFWHVHmDTEWVfFWJUk2BRn2RbkuPqXedhl2RnHGh+KMjZPMjFMsjVOsXkw0 BZ4YZzvYlnmZ5Du9nGF7MNvRPNvOOss6IM8iq9BSRg14azT/bU3iezS3HzM9 36U43W2zvUqyvNHqcF8R9Qd5yntV9mfinjsd99xGxovXCg69Xmv3kBvyqSL+ 9+MF/7FS+1/HGv/9SN2/rlT/cSHnd5OpXw7EfKwKfij2vs93+wBswnG6z3F8 wLV/xLV/zLV/wrN7soNNPma6PWG5/Yjt/hbHbXebzCirZ9QN45rOsW7GcA9/ qFc81Ccd7jVgE+ISELx0QrQJqES7ZhHu28VoHB63yWg/B82SEM/gguAeQXUT lN3rJs9oE52erme3CZAEBQFta+Sk9+ks/NQIH2AyNyHWyDtyMwK9XF7xcHzB z+NAiK9JYqRDVVEkn1460Uc7eVhzZq3n9GrX8QX5mcnGw135uE1GmeGjjLDv aJMVQcQsI3C803uS4osqJjvZZIQbiM+b6NikW0rbsomMJJfVP7tNiD1dyCYd pDyDNjG4MNGgTYgq2Wnxog5MiEcHE22CYILOECbOv++05QTZRGfe5Flsgtq6 IDuc0/XUJpBRbQZ6eH3dXNwmahUDeNKlNGCTwR7m4ozy7MlRZJON89PwePHM 6IXTw+dPDUEunhmBaKdRJjfOjYFQThzp/lqb6PMEhwnRJkSS8Fm1EB6zhs80 fDgwESb6K931bULkybewCXHhu8FBeJ1mLeJQyU42IfJEByZbgvvL2YQIk29k k+Fu+vy4eG1OdXRBfXReub6kwbKoJNrk5DJ4oVfOrWmuSsxO8EDdXJF+ZvAY 7HkoRGuTmEDLuBBrsEl8sGViqDXYJC0KmzfJinNBMMlP9ixO9wWbNJZGg01E 5CIls6Jf1DjTS1+dEIJNLqz1bu1eXB+8dGLo8qmRK2fGrp+fxG1yZ3Px7pWl u4SeLgQTbR/XibdvnULQwG2CVsMbtIl+gxYCy55N9q69a+/6S13lIabgjgzX 76U47oNHsAm8YqBo4negMNg82/dQmsdLGVhDlyOjImaAXd7FLOOS0ptLIqtz AkszfApSPLITnEsjjJpS7bilvsgmPU3hvU3hwy3hPbX+siJnQbYVN92En26K 1U0ysboJI82Ik2LCTzITJFoIEi1ZCTbkGEtSnFVNgnVxonVeqi3YxL3YwyLV 6kCckVGiqWmKhVGyxcFE8+djjcyy7K3yXZ0r/UAoBzPsD2Y52OTZO+fbRxZa V1Q5TsuSfjheeE8U/mOa+w/Jzm83Wd6pM71Vb/Y23f2z/uQvuWH3CkxOxew7 l/TclZwXb5WavNvk9Jgf8rkq7jcjWX+aK/631ar/OFr757Xqf17I/cep9F8O xH6iCn4k9n7Ad7vPdbnPdnrAdnzItnvMsYc84dg94doCTD7g2T7g2DxmPbXJ h3SXRwyXH7Lc3mC7gk2u8F03BK4GbTKnqp3TkCa7KeM9cH8lHO6TDPfLDNoE H8ogNneBQSDAE2QTgAlIBJ4jnkCQTcYGuDhDiNEBCwpx3gQXyrewCT4Lj2yi zxODNhnQsCDIJnivF24TtHsRYLIwJR0d4JJq05NiXHzdXwGbJEY6kqoS58YE r91YefDehYfvXbh2buL0iubonPTsVOPh7oJRbsJf0CarwihwxwTZB7fJNM1/ p3mTEZ62biLIHhdWjEuax6WdYJMBMQNsAoJTyVoUssZvZxO4AUbndO1kE31K IJWgoE/hftFv69qpYmKwaKJ/hrDOaV24UPRLJ2gWHq2Gx2fh8f0mBm2CTzDt bJNtlfQJISPw76tX0IedOMHp0bCRTRBPdrAJa3EWs8nmxVkI2AQeASDIJpfO jm5emEAVk6uXptBzZJM+TZtMWGPQJsTNJkgocDuNG4QoFOQRRBIIl1EN2Wlx icGiif7ACPHQre9uk13mTcCV8OWDRwgRKc9YOtGBCep8+0vZRKdo8ow2kXAa VKKWkR7G/JhoZUaxNqtYncHOCj6+qN6CCWRevo6doKU5ebgbbNJSnVSQ5hsf agMSiQ6wAJKAU8Am4T4mUf7m8CLAJCHEKinMJiXCDtkEm4VPcAOYFKR4FaX5 gE2aymPBJmJKsYZTPSRtnutjHJkSn1nWXDraf/FYP3ZU1+lRgMnGyWF4hO94 Ny/O3ro0d3tjfpsnhm3y1s2Tb23XRJBNEE8M2gRXDHHkxGDjlkGY7Nlk79q7 9q6vvSpCzcAdmW6YTdJdnsv3ebks2ES/aAJBDV2p7i9m+xvXp3qJSGlD3Eo5 uYBZl1yfH1KW4VOU6pmb5JoR61ASfqgt00lUFaQmRYFN+lqihtpjRlojeusD 5cUuyCa8dBNBhhkl6xA1y4iZbsxNNRUkmwuTrYRJVsx4G0qsVVO8dW2iTWmy bUGGQ0m+m1Oes2mS+YF4Y5Nkc7NUS7DJy3Em348+YJHjaFPo7ljucyjD9lCm /ctptla5Nh7FTnGFNm1N3scH8t4azLrJC3y3w+HdNtv3SOb3ao3vNpr/hO// 5XDa/WaXa+kvgk3OJz93OfuFOxVm75M9nwhCPlPF/rI/5bfj2X9cKPnzauW/ rFT8YSr9NyNJn3dHfiT1fyjwuM9x+YDtdJ/leJ/l8Ihl+xh4wrb7kG0LeZ8H sdHaxPYjuv0nVAewyWOq0wOq0w8YLm+wXHa3ybymbq7rqU1G+qWYTXY4ZVf/ zK75SRluE4DJ+CAPGAJP4EN4EdkEPoQXh3oY6Kxg4qZFdG4w4gleTEEG0REK fobw19tEauCcLriHxOdNcJ7sYBPmLjaZGuHPjosAJksz8plxiZjX0FidHBfh EBZgUZAZoBQ1fHz/+r/94dE//epHP7t/fePkyNE52cqUUMcmIwzMJmO0oHFa INhkCoMJxPu728TgyMkId8smY/ysMUH5qLBxVNw+KGbo2aROLW19dpvg53R9 rU30B0N0lKETolN0VIKLZpeiydfaxGBnV01pIqgEeIKfIUxpKTRoE2JDF366 wg5bToRPYdIrGNYGh8nX2mSol7U0qzp3auzKpTlMJRdmtDaZQO1bIBHwCCLJ tY1peLJxbmx9rWt+StCrbpXwq+BLo28T4hnCeAEFVUaIJRKiSnCYcOhVPEM8 2QkmBufZ9XnyTW1icMJdJwATFCJPnr2zC3HjL2sTNAhPbOhCGxif0SZSLkkj aRvtZc6Pi8Emq1qbHJ1XYjxBMFlQrC8oTszLj2nrKbhNkiMdEkJtowMtIv3M QCV4Wxe24oRgk9RIe7AJxKBNROQisMmwrGV+gHl8VnZhrffqyZErp0exnBlD uXp2HHLz4oy+TTCeXFnZbug69uYNzCZv3zxBnGpHPDFoE9TEhVdMkEHQizrZ ZQfKX/vGZ+/au/auv+mrOsIS3JHl/v1Up/1pzvvzvF9CKtEtmvgdyPB6BWyS 6X2gONy6syBU1ZHbyygRtmRRKuOqswOKkj3yk9xyElzSou1Kww9R8twVDRGa pmg1KbKvJXK4IxZs0lcfqChx5WdZIpvw002pOca0bGN2pikv3UyYYiFKsRYl W1OjLTqjLRpjLWsSrCvSHMryXMuLPG3SbMwSzY3iTUAo5mlWYJMXog89F/Wy ea6jTbGHeb7LS2lWr2TaP59iZZ5u6lvqlFZkJ+VEXx4ve7076Y4g8K1Wq3da LH/caP5mtdE7JKsPZaFfDqfcKzp0PmH/6dh955L3X8p47l6V2SOGz89k4b/Q xHzRm/DLweRfjWf8Zir715NZv+yL+VwT/rE04CHP8wOWy/sMx/cZDvcZ9g+Z 9o+YNo+Ztk+Yth8ybSAAEx2bfEJxeNhp/wHZ4V268+ss56+pm6hriTYZ7pNg PV3a+3ad6MAE1U0WpuTAE2QTVB8Z7eeAUKZGhKh0gmwCrxC3K+JHXaEBeWQT VBwBg+DHcOkg5RltopG2b+83ISOYQNBtpA5PdujpYu/Q04X9b54eBY5JACaH 55RrSz2H5zWgFQmvrrM5h9lZOKDpnB7hHp6RHp4SHQGVYOfYyNcXFWe0NtHp 6cJsQg3UzsL7TlN8pine0xSvb2GTKaofPm+CJuJ1gnYvjguSUd1kVEQaEbUN ijCbdEmo2zZp+C42gdu/9sbcXXq6iLKA6Dd67VRM0a+54O/UnzTZZb/JLlMn 2/tNdtsLv5NN9I+z+2oExGA9kz38fm1PF1432aWna7iPvTynPn96/OrGPARg Aki5cnHq6qUpwAg8osDz65dnEVKOr2rmJvndymYRt8KgTfD1i0ShYJPv2iYu IkkMCgVson/6ln43l8FJduKSd33dPKNNiN1cu8ySIJLo5FlsgoL+F+qcEvzs NpHyWvFTuXSCbILD5NltIuc3dUnbx/vZixOS1VnlEfj+MyuHHJkDjGABm5xY UJxcUByZlR9fVCv5da01yTlJnglhthCQCG6TYM9DaP1iXJBuT1dmrHNuonte kkdhqndxum91fijYpL0mSdhZoGZXDUmbZ/vox2akF4/0gU2unx2/pvXI9fOT Ny9OQ25cmHr18vx2N9fSvavL965uH9J1dWUbJls9Xe8Ykoh+dxawAi12h0di drLJ3iz83rV37V3f4qqJtCrwfQXZJNVpn75NEEyw9/gcBJgUBJnVJbnxahJ7 6cWqzjxOQ2p7aVR5uk9+omteomt2gnNqpG1ZpDGzyEfTHKNpjlY1RvQ2b9mk vyEI2YSXYSrIMIPQ80wZuaacLDN+urko1RLVTcAm5BjL+mjzsmizkiSbwkzH vEwHy3gzywRz8wQz80Rzi1Qr42TL56MOfC/mgHWhq32l78Ec++fTLA/kOL6Q YWudbhZS5lpe5Tatyb05Xn5PFn2P6/dei/W79abvVxn9uNr4I6rr32lifiYP u5H9/XPx+84l7ruQum8z5/tvN1h9xPX/uTz8c1XU592xn/fGfdYf/9lA/M/7 434mD/pQ7PeA5/k+0+UndMcP6A4PGI4P6PYPaHaP6NZPGDZP6DYfMmw+Ylgj m9xnWz8CrdDskE0edNi932n/Ds3pdabzTY4z2OSy0M2gTWZVNbPqxoku8lg3 E26f0LzJkCGb6MNkaliE2wQwAgABmGj3p3PR1AkaRYFPacfhv2ITnW2MOjYB fRB5goTyzDbR3b2IbIIf1UXkiaFZeM4Os/BbS+EXpqQAk9UF9eKM8thK3/GV 3rVFDdboNS4AlRxdVEGOLSiOLyqPYfcJksOTgtMT9cuEeRM0C/8dbbIiiMRt AjBZYIcYhAk2k8IPAZuM8ZPGBNljgvIRYeOwsHVQRO/X2kQt6VBKm+XSBpm0 9tltgr9Hwmvg0ippbUU72cTgtIjOscBIGbhKiKUTHZggjOgXTXCY4MMmOstN dFRSXZyiI5TqkgSwSUNlKsAEnEKqTt/FJgATfNiE2PGok+Ee3lA3D0iyFW3d ZKCX/4yz8MN9HH2bXLs8c2Nz9sbm3PXLM6ASLUxmbl6ZR21d62tdu9sEdTzq LmEUNksFTRI+CYSCSifIJjrDJlgMnQy80xFbOmvWd9qo+E1torNL0eDWEp1j uHa3CbGkgn74d5yF390mxKLJt7HJpHRtTnVkXgUwWZ2RwePRORnRJkfnsTOE VYL6ttqUrAT3mCBstCQm0BLtNwnRjpygtq7YQPO4IAvcJploL3yyJ9ikIMWr NNMfbEIqi+moTRZ0FKhYlQNi0lQ3dXVCePZw16Wj/ZunsNLJ5ulRxBOACeTO 5gKCyXa26iba0snadlvX+ls3v1IlwRli0Cb4/DvaoojbxOAcyp5N9q69a+/6 FldVuGWR/6EczxfTnJ5LcdyX6/kifFgSaFwcYFTsf6jI72ChL8DkQIHPgQyf g9n+xiURtm25QfLW7H52hawtm1Gb1FwYVpbmXZTsnp/kmhFjnxJhXR1twi31 xabgSREaUsRAa9RgW9RIa/ggKUhZ5sLPtuBnmoqyzQWZppx8c26eGT/LTJhh Lk6xECZZYjaJteyMt6qNtyqMMcuOt0hKNA+PPGgebWwZZ2YeZ2YGj4kWJkmW L8cYHUqxdK8OcKkJOJhh82Kq5cFsh0M5ji7pZtGljq1NnidGCu6MZL0q8LvD dH2DZPlWo9U7leY/rrP9lSD8nzSJDztdr6U9dzF+38WkfRvp+28WvvTjVvtP BQE/lwV9qgj9TBP+WU/Ez3vCP+kJ/ag75COx1xOB+0OOywdMh/fpdvfpdg8Y dg/ptpDHYBMsYBNrsMkHXOv32ZYPWFbw+kcUm4/Jdh932H3Qavt+h/27dOc3 WK63Oa5XeG6XBe7HWZ5HGB5LVM85ivcMNWiSGTfJSZmWV02r6sfBJth6QcFg r3igV7KLTRBP0FFdM6OSxWkFsW6CbAJIAZug0gne64UO6cJ5goSCwwSdKowM YnDnu85ak93nTfDjXvG98MgmxJOEd7YJfk7X0z+EwW7GcC8T1U1wmyzD46Lm 8JxiZV61NCNbnVccWVCszsnW5uXrS0qwyfqSan1JcWJJcWayYUl7TtcAPWKY GYHbZGzbJmjeZJbmM8cOnGMHzLL8Z5hYZlkB6JV5TuACN3iRF7IsCD0sDF8R RSzzwsAmaLMJsonBYROwySgvaJQfOspLHOVljvLLhgUNQ4KWARG9T0Qn2KQe bKKS7CYR/XkTgk2wni5896K+TXSQgk+44zbBR+N1erqIbyDaBP9Qv2hCbOjS OUMYSEJUyVdtgtVNIAATSFNNBrW1CJ+Fh9t49PeKeIDw19oEYIKiYxM0C9+l ZqGiidYmVBTcJipp+0g/5/C8BmyCerogIBSQyPXL0zhMUEArVy5OXr00vb7W PTvB71Y0S3hVcuAGt1GyLRSEEfhya6SdWLFM3K4Qtsn5LV0yikZBlYvbZaI2 Mb+Zy6wTchp5LCAJwKReyK4XsOq2VMI0AJOdKibEDqvdO7t2bwkzCJOd6h36 PEEwQc1daNMi/jp6D5tcyWgvw9IBny1ldVZAuNRqHq2GT68VMOqEzHosrAYB 07BNdCZTdpk30bGJWkyBJ/Chjk30urm0W1F4TRpx20gPc2FCa5M51dF5EIry 6AIgRXZkTn4EE4riBPafRLBPybm1pMrEjDi3+FDbuFDbSH+LUG+TIM9DQR4H Q72NI/zMowIsYgMtkE1SIuzSox3RIDxuk7KsgJqCMLBJe00Sv7NAxa3ul2AV 9pVJ4fqC4szhrgvH+i8eH7h0Yggd0gU8eToLv4kHO6Tr9uWlV7Gs3L2yeu/q kdeuYccIv33TwAC7/jw7cZaEOBdvECA7OWVvv8netXftXbtfJQEmZdqliqmO 30u235fl9kKBz8Fif+MiPyNIoe8h+BA+C0nxOpgTbFkc40gti1FTi7uZZYLm THJVXF1uYGmqZ0Wmb2GKW3KYRVKoOSneXFDqq6wLUdYG9zVHjHbGDLSEjbQE j7QEqSuc+NkmwhxTaYG5INtIlGsGEWeaitNMRcmm/ERzXoIFJcm6M8WuPsu5 KMM+Nd06LMXMOex5i1gz0ygT40gjkygTs1jgiaV5kpV7iXdES4xbmY9RsuWh ZEvTdFvbfBffdJPYPHMhw+vSVPqrAyGvCp1uMiyvtNjcobhfqXV+rcH91/K0 f5YmPqyyvpKwfyN+36WEfVfTn3u97NCDTsdfCP0+lfl+rvT/RVfA593+P+/2 /kjj+Vjl9onY+WOh44d8+8cc24dMqw9o5u9TzR7RLR/TrZ58NQ+YZvcZpo9o Zk/I5h+1W3zUavVRq/UHTTb32x1+yHB7h+15h+N5let5mee5znI9ynBZprnN UzznaAHT7LhpXuqEtHxSWTfWRR7vZY/0CQd6xb3dIuJtObGnCy1Jh8eJQQHA ZGFSsTSjXJiSz01I8Z6ukT42YAQNxUNAJSjE5SZ4iQQeETfwsggSis52RbTH ZBsgT0li0CboP3Hj8ybIJqgJB7+lxHmib5PBLjYhWy/2qakDXXSQ1NQIf35S sjyLeeTwvGJ5TrY8K1uZV6wuKNcWFGvzsiML8qOL8mPaHF9SrC/J1xdlZ6dJ 6AzhQUYU2GSUGTHBjgSYjFEDkE1maX5zdIgvIgbaqIjmR9ArSB9L3LDD/IgV QeSqMMrgCnh4Dwp8Fn/DKDdohBdKnDcZEbVhNhHSNGIKdo8qaZJJ6qWSGoW4 WadWQtwRb9AmxHkTcnPh1vrF5mLiWVv6QiGevqXf1kWsnhjcYIKeGJw00bcJ TpKqomQU/V0nWEqT6sqTIdUlCZDm2ky4ccX3m6DlIOjv1dfaZKsPEHudh/ME ZbD7aUNXlwpr6AKY4HUT3CYAE8jYIO/wgubsydGN89NoEP7a5YVrl6eubUxe 25jaDmYTgMnl8+PXN+aOr3RPjXA1smYpv1YualKIWmSCJiGnTsSpV4rbFKLW HiVNJYF/dDQJr0XGb+tRMLrkdJWCqVGxe7p4ElEnpaOCxybxOU08Zj2fVS+A R0YdERT6GNH5EHmEuGkdL53obFHUjz5MiMUXpAliKYRYDSEOjBAXvgNMyM0F aPwE/pYilaBH+OGszioyqZjWUkZvLac0lcAjhEup5dPqBfQGIaMRImKSIGAT g+cA6BznhS2s3NUmqKcLYKKRUBFMiDYheoT4XClo1YjbR3pYC+PS5SnF8pT8 yLwakHJype/IgvLoomplVnYYkALfiOZUq7NKAaOysjAqMdIJEhtqF+JjGuhp 5O9+MMDjULC3SUSAZXSwDTqnKynMJjXSHk3Bo4Yu4ElRmg/YpLYwvKUyvrMu hUcp7JY0DihbZ4ZYqCiMjg6+oLXJlTNjNy5M3bo0A7l5afbmxtyty/O3Nxdu a23yqtYmGE82V+5cWb17de2168dev7H+5lcH2PXXlOgUTYjPdcolxJLKa1fW UAOYzqf+2jc+e9fetXf9TV9gE0ie1ytgkyS7fRkuz+9ik4Jwm/IEV3ZNUhe9 VEEpZNUld1TEVGf5FSe7l6Z55SW6gE1Swi2bkyyFZX6q+lCwSW9T+FBbZC8p eLg5aLg5UFXuyM82BY/ICi2EOcb8HFP4UJhhIkwzEWptwo03p6bYdaTa12U5 l+Y4FxS7p5a6h2Za2cZZmkcYG4cdNIkwMo8xs0y0sk2zD6gPDWmKtC90P5hi aZRubZ7raF/iGZVtlZ5vNaWOvzaRdkvlc4/vcJtidqPV7nqz/ZVapx9Rg37f nf1bQeTbBQc2E/ZfTth3JWX/7dwX3q0xf0x1+VzgS7CJH9jkQ7XHI6XrJyIn ok3u0y2AJw9pFpBH1K/kfbrJBzSTh1TTx51mmE3aMJs8aLF70OH4I6b7D3g+ rwt8rwu8wSYnvmqTKVbsFDdlUlpBtEl/j6inS/i1Nhkf4INN5ifki9MK3Cao PjLaz0EqQTDBn8ON/VAPHegBiJAJGkScGgGrSsKrk/LhrqkJ8QRtPCFuV9S3 CUgE3q8QkSDw5NltQhwTQGspdohBm9AM2GRBAQGVoBxZhDsEBQqoBOUEFvm5 adLhLmwWfpARiWyC1U20NsFm4Wl+BJsE69gEEeMZbbLICUXBkQL5v2iTp3UT /eWJ39EmRI/o2AQVTYh1E7yhC6lEJ9/OJng97jvapBcfhFdtDZtg8yZf7ekC mCglbYZtgsFkgmCTqW2bTNy4PA82mR7ldcnhn1idAr6O0jYRt4FNq1TAPwr4 56CkqWUUlYTcrWAMdHHXV8c3z68sTvf29QgmxlSQ4UGJQkoR8lokwnYBu4GP 3Y1DanVUolPgMHhu8Lewif4BXwYHTPRtojMUjysGBbcJpaUQHhFY4AfCh/A6 va2c0V7JJtcARjiUWnjO6qx+ChNQyXaH1dfaBOeJlNuyS08XPgsPPMGLJsS6 CfFDFOxFLrYXfrSXPY9sMq1YmVFMDfEWJ6XLM9IVrUqWpyXYsNu0HD4lYlVX FUWDSoAh4f4W4BFDNrFCy01QQxeyCQrwpCTDD2zSVp1II2WI6KV98ubRbvLC GO/USheCyeVTI+jo4GvnJrSTJnN3ryyCSpBNUG5fXtyGyfI2TLC98G9gR3Wt E0fXDS55J3qEOGOCP8dbvBBJ8LEUnQ/3bLJ37V171+5XaaApBOiR7ozVTTJd XwCP7GST0mjHpuxASUt2N6NM1pHPqElsLg4vT/cuSnIrTvHIiXcEm6RGWLWn 2oor/NUNYcq64O7G0P7msK76gKGmwKGmAK1NTMAm8iJLUa4JP88MeCLKMhOl m4lSzYUpVoJka3qaQ2eaQ122S1WxZ0VNQFa1T1i2jWW4sUnwK0bBrxiHYjyx SrRyzXUDmHhVBVhkO7ySbHEw3dosz8m+3Csp1bwkz+bcSN7NgYSbAqfXmdZ3 241uNFtv1lm82uL5sST+t92ZH5G9rqc/fzl+/2bCvmtpz71WfOAnJNuPGe5g k89kfsgmn3X5/qzL64nK7YHc+SOBA+QJz+4xxwZs8oBhCTZ5QMXykPKV/JRm /D7V+AHF5FGn6Ydt5sgmj9ocHnY6/Yjp8R7f902R/02h7ybf6yTb7RjT9TDd fYHqOUv1n2TGTHKSsbqJohZsMtbLGsa2wj2rTaZHxESb4HMlYwNcvFaCVILK KAZtAo9ibq1c2Ij0gQ+Y6BRNcJvgMIGfAfKNbILPCBBHTp7RJv0a2lAPg2gT rKdrXr6yqFxbVG3ZZEFxbEl5fFkFWV9Wnjisgpw8rDx1WHl+pmmlp3CMlzhA RzYJH4NQA8epgegM4Tm6P7IJiAM8MkX1A5vA4ze1yTIvHAJvg+BO+b9mEwQT amsJtbUUVILyl7UJwohOxcSgTdCMCV4r2U0lz2AT/C/Vd7cJqphANCrGU5ts z8KDIFDRZBebXL00cfXS5Ha2JuI3L0zc3FxYX+2ZGeODTeTCepWsU8glycRt Khl5oIejkJK71cyRQUmXkrU8P3Dr2slPP/rRn/7w5e9/+/NffvHgjdc2BvvF PRruYJ9AKuoQ8VuFnEawCY9eCzZBN+E7FTj+sjYhzqcY7OPSsYmOSvBqC/H9 xGO7gCQQ9DPAI4tSzaYCvuqF7CYBi8Sl1cEjn9nIZzQKmCQhiwSvizjNYs5u NtEpnUg4T5uyiN1ZCB3EM4R1Grr0bYJYBD6Sckhdko6JAd7ihGxlRrUwLhnr Y6lETWAQAaNczK4a6qbMjPIAKUtTgBeZmF1TUxIbE2Ib6muGYAIq8XM7ADwJ 8jIGrUQFWSeEWKOGLmST7HhX4Al6BJ4UpflU54c2V8RRGtIE1KJuSeOQun1+ lHvysAZ4gmyChk0g2tODp+9sLtzW2gRF65T5m5cWdrKJDkyIE/HwSGzNwj2C V0NwfUDuba5C7l5eQRhBb0Yv4jz5a9/47F171971N32VBZmBTQAg6c7fRzYB khi0SYafSVmME6U0Wk0p6qKXyjrzqZVx9XlBpSkeJZBUz6xYe7BJWqQ1OcNB UhmoaQxX1QVr6oN7GoNVNb4GbcLLM+PlmgnBJpnm4nQLQZq1IM2Gme3SmelY m+daXe5TVOMXmWtrH/a8TZSZVYSJebgx2ORgyMtGkUZWSdaBDWEOBW4m6TYH U620NnG0K/cqTbVmVfvcmyi9q4q6y7B9vdPk9dYDt0gWV2vN3mYEftmX8YUq 4Z06y3OJz23E79tM3Hcj43tvlhp90OLwM7bXFyL/z+SYTT7X+INNPlZ7PFK4 fiB1fMLHVis+5to+4tg8YlmDTe7TLe6DTShmD8hfyU+oRj+hGN0nGz/sMAGb fNhqCTZ50u74iOz8Y5bHDwV+b4kDbov9rwi8T3Hcj7PctDbxwmzCiBlnJY6L yybkNaOazrEezCYDO9sE3W6hmzHcJmgWHtkErTgh9nHp2GS4l9GnJgM6wBQg C1Q0gSdgE+AGEAMfgdeBiY5N4P3wo1DB5RltYrCha4fsZBPm2AD7K/Mm8/LD Cwpkk5V5xdoCVjE5saKBnFxRn1rVQE6vqs+sqi/MNq/1Fo/zk8Am6JyuEXro GDVIxybzDD/cJmjIHc2SfFOb6PDkO9pk93mT/79tog8TfZWgEXjiIV2oaPLd bSLjN+k0dHXJOp/dJkPdXB2YYDYBlSgZELXyqU00Ww1dYJNOBJPvbhNKZ1l/ H/e1e+fv3T13/tzi3EzPQJ9oerJLo2JPjncdWZ3c3Dj+6ME7v/vNz//9z7/6 8ov78CkWvUEibJdLyDJxp4TfDDwRMOvRnAXRJrsfxvXtbGLw5GHcJjqj619r E1Q6wQsr8H7wSGdTPgTZBNVQ4LMCDgnrYWOTBNxmHquRw6iHcJkNXGYjj0XC ou1ww7KDTfRLJzvVTYg2QdFp6EIS0bEJwAQiYTeCTSYHeACTowvdU0N8KbeO 0pxbkhOaneyVk+LdWpfaq2wDmyxOShbGxUJmFdgkLsw+IsASeIKKJr6uL/u6 vgJIgVciA60SQm2Sw21TI+3xpfC4TVDdBM3Ct9cksdpzVYLaXlnT9CDz2IJi fUl19kjvxfXBjZPDuE1Q9QT1dD3NpfkbF+dvbSzq9HS9dv34W3oweff2SXzd CTwihuCdXQgdOFVwkiCV4IHXiZ/dq5vsXXvX3vUsV0mACUgkz+uVNCespwuE slNPV0GYTWWCG6sqoZteqqIUiVqyWgrDqrP8SlM9KzN9S9O80qNskkLNM6Jt KZmO0qotm6jrgjR1Acpqb4M9XWxItjEny4SXaSrIsOCnW/PTbWnZzq0ZDjW5 LlXlPtml7j5JRpbB37OKMrOJtXBIsnVJd3LPdnXNcXPOdvGtCbLKtAebmGXZ m2bb2xS7O1b4CCqDD/Nz3x0sfI0X+GaH5ZukA283vnyHZH6bZPmBJOrvh7Mf 8EOuFL1yLHb/hZh9VxL3v5rzwrtVZo86XD7j+fxSEvi5wh/Z5FON70cq9wcy 55+K7R9xbTCVQNiYTR4yrbDQLB5SdXu6kE0+6DR62G7yuMX0SYvFk2bLx20O j8guP+V4g03eFPnfFvuBTU7zPNfZ7isMj3mq5wzFb5weNcZMGBEWj0qqhlXt oz3MkT7hYJ+4f4dZeKJNxvp5YJO5cdn8xNZ+E2QTnCf6GeljDnbTelWdQAlg hZBdzWdWoroJIAWsAa/jEyjEbi5EEp26CQSE8o3qJijPIBQDNhnoou9kk6c9 Xds2Obmi2YLJWteZNQ3Y5OJcy5H+Eq1NIgbpYSOMsGFaCGYTWuAU3X8Gg4n/ PMMfs4l2vTuyySTFF1/1/uw2QSr5C9ZNiGd24dmpp4s4b0Lcn/hdbLJLBxc+ YwIhDsLjNvmOPV1EmyCYfFObDHZ9JQNdXFQ30dqEjgbhIRo5XjT5GptcuTi+ eWF088L4dia2tpycG8d7urbmTeSUjcur//D7T/7zv37zv//7z//0T7+4cGF1 eEQxPt41Oqrp65NOTvYeXh4/cWLxnbev/fOfvvjhezf53JaSwoS25mIhr0Um apMK4OvbLOZgqz3w07R0xtVxEehsGDFok68N8eckdnPtYpNd1rujt6HPAkbw d6JuLvjl4Osr5rcCx5QyKnxFujVYr51CSgGnYBM3EDaJC2BhNUD426dy7V46 gRi0CSqLIJvgpRP9oglEp5sL2URAr5VxSSM9rLU5zfpy32gvi9aan5vqB8SI CDCPDbUpzAzg0UpH++iz8D1qXMyllpXlhceG2kUH24T5mSOb+LkdgMBzeAV+ YGIYBpO0KAdkk6w4F4AJWm5SnO5bkRNUVxTRXBHXUZsMNlHwqpFNji8qTyyr zx3tu3RiCNkEwQTl+sXp6xdnIDcuzWqD1U22SydbNrkHdtDahKgSg8tNUFAd RL9lS98mr15ahtzZOAzPiUUTePLXvvHZu/auvetv+ioLMkM2AZUgm+xUNymP dW7JDhI3ZfaxKiStOcyaxOaCULBJRbp3TU5ASaoHGoTPiXekZjnhdROwibrO X1HlZXAWnpljzMox5mSb8LLMBJmWggxbfoYdt8iLnOdaX+RRXeWbWeIWlGER mG3lkuHkV+wbURsW3xKXQklJ6EwKa4z0rQo0S7EySbGyzHKwznN2KfNxq/Ab akq4oqm5w0+43uT4et2Bdxte+kH9i6/Wm7zV4fDz3tRfDmW+0elyKvP5Y4n7 zkXtu5b83BtFB3/SYPMR1eNzvt/fSYOQTT5T+/1c7fOh0u2+1PEnIruHHJuH bGvII8i2TR7RLbFxeNpX8lOq8U+1NnnQbgw2edxs/ohk/rDV/hHZGWzyHt/3 dYHvTaHPVaHPGb7XCY4H0SajjPghXuGwqGJI2TbajdlkqF862C/bxSbolh5s MjUsApvMEWyCggZP9Gfh0SnB4A5gBXgEYMKll/MYFcATZBPABdpjQjyJC598 /+6z8Cg7LTp5Fpvg53StzKvWFjUri0rIFkyW1EeXsHkTrKHrsBrr5lpRY9WT FdXpFRXY5OhA6YQguX/bJoOUIKJN5hkBRJuASsY7vdHIyTeyCVElf6l5k2e3 SQepANLZVNjZVETW2/P+XWyyU60EH37Hg58ejHhCPJ7rW8zCE463av9L2aQH DZuATRQYTBRyqkKOJk2QTToQTBTiVoM22Tg3cuns0KWzI9vZ2sN46ezYtUuz R5c1k8MclYQk4dWoVIzr109++eWDP/zh8//6r9//z//86Y9//PLa1dPd3aLh YTWku1syNtYzNKSenuq+eGHljdc3jq6NNzcWlJck0ynVCjEQqUMpapfxm+F+ Gy+d7HQYl848CBrreHab7LJaUef0LR2b7LRdEf1seO8WqrDAK/ApQAR8ddYW ejfPLRw/Or62OjIyLJFJyRCshqVmikXtQkGrgN/C4zZx2I1sVgN7V5volE4M 9nThB3ARV5zoF03w8RadyLhNalHbeD/3yHzX6pxGLW6pK4uPC7MHZYT4GINN 8tP9WJ2FQ92UqWEe2IRNLinICAz3twCDBHubBHkZo7Yu4rxJsnblIsAEbTYB m0DQIV1FaT7l2YH1xZFo3oTTma8S1PYrWmaH2ScPa86s9aDjudDICersAphg NZTzU9cuTEMQT25qbXJrY/HVzWWwiRYmR9AsvEGboNXwxPETtN9EZ66EOFFC 5MmNc/PXzsxePzt368IiqqHg+Wvf+Oxde9fe9Td9lWt7ugp9Dma6Pp9svx/V TYr8jSCFfkYFfoew+B7K8zlQnuhGKYvRMEq6WeW8xvSO0qiG3KDqTN+KNO+6 7IDSFI+UEPPUUIuCBBd2gQfYRHtOV5CqNlBTF6Cq8R1oDBhtDdZUOoNNBNkm 4jwzYY4xL8eIn2MszDYRZZmJMy2EmbaCTLvOTMfWbOfaEq+ahpDyjuh8amwx JyWPXVAprapV1JQKSjIo6RGkaJ/KANcaP+Nsm4MZFhY5tnZ5jr5lXkGVvmud CTelBReavc5XWtyqNnq7yeLtRtNXa80/YPn8Zijjc1XsjSqzk8nPnU7edyZ2 /9X0771ZbvJBq9PHDK9PBX5/pwj5hTLgc1UA2ORnKq8nCtf7EsefiuywcolW JY9AJQyrR9o80eZDOpatc7qQTahbNnnUbILb5GGn0085Xj8S+r/G97nG89rk e53he69jNvFcoHqBTSboUePMhCFe/oiobFjZOtbDGOsXjPSLh/q36iY6e+HR dAaxp2t2TIoauhBP8OoJcRaeYBN6n5qikWE2kfDg/8FrBKxqIbtGzK2T8htk gkaVpKVL3q6NgVOC9Ssp2hpKs/bYWwST1i2bSLQ2kYFxOrsVlB6MJLSv7eki /DZxmBCmUbAzhFlgk5kx4eK0DNlkbUm1uqRcXVTCkyPL6mNLqmNLSmzkZEm5 DllWnVhWnQSkLKsuzHQc6a2c4KUMYPtNQkeZwSN0+PP3naT7TdN9Z8Em9KAF evACPWSeGby7TZZ54cCTLZuwgrQJxrPIDUVZAJtwQubZkGB8L/woP2uUXzai tUm/kKZjE5m0ViFq+kY9XfAEt4m2YWbbJqRCXBw7HSasDxMdmyDa6Dd0EW2i LxTi1kXiWhPcJpWFSYYLKFqb1JYlVRXHE+dNdOomz3KGML57ccsjGg5KvzZP D+lSMnCbqGUUtRRCVgEHxBhMFKLW4V72ykLX+VNjmxdmrlyc2bwwffXS7MbZ kQunBi6fHb14evjSGXg+fOH0yOVzmE02z08fX+mZHOYqJU1ifp1azerpEw6P yE+fWXrr7euffvb+7//xF59+dn9hcUQqZSmUXIhaLRgYVIyNq5RKJjzOz/d1 tpdnZYRXlqVymXVgk24FTSXukHAbRaw6AaOWR6vGeYIjQgcmxHLGN7WJjnR2 ORlYRyg6NqG3l7MoNRA2rVYpgT9VipBDErBJEn6rkNuslFKmJ1SnT8xc2zz6 xhsbr7++sbo2plIx+bxWFquRD+8RtIqEbXxeM4TNqueyG7mcRgELO0wYa3Jj bB0RwKdj4WkfsdOGWdhRwyJ2o5it6wtU+8Btghq68LoJ4onOm3UiZNYqBE3j A9zlacXStEIjbW2sSk6IdIwItAzyMkqLcyNVJUm4NSO9dPgeNTsmZHQUZaf4 hmJywU7owhPsZRLuax4daB0XYgc2SYm0T4t2SAebxDlnxbtkJ7jmJnnkJXsW pHqVZvnXFkUgm/DIBSpBzaCqDc2bnD3at3Fq5Oq5iStnxjdOj10+M37l7MSV c5OQTXg8P4WEcv3S7I2N+Zsbi7cuL90Gm1xZuXN17e71I/euH3sNs8nTM4Tf wW0Cj/Ah2OTmiXe1eefGus7Uif4eRhwgQBLgyc3zC7cvLuE22evp2rv2rr3r a6+yQFPgSbGfUZbbCykO+1Mdn8t2fzHf71BhgDGkIMCoMMgEkut3sDjZnVKb 0COoltOLWY2pTUVhJcluFSmelale9Zn+5YnuWSGW2aFWJXEuABNpFSRAXh2A 2aQ+oKs+QFPlMdYW0lPjJsgxFWAjJ6biPFNZ9kF51kF5xiF5uok8zUyUbi1I t2lJt28rdK+tDaqjJLRqytrHmxpG6lv6ydQRJmeM3dbVUsIsjCcnh7bGGFe5 HKxw/H6BqWmBpVOudWSBc0aFz5vixFdZYadrrM/V2lxvcb7b7nWL5PZWk9sv 5PF/Gkh9QvO4mv3C+fh9FxP2nU7Zfzn3+Tdqze9T3T7k+Hwi8vu7rvAvNcG/ UAd+qvL9WOHxWOr8QOJ4X+yAWrkeM6wgWLlEezzXE/oWTCCPqRYoYBP9nq6P yC4PO53f53qDTe7xvK9yPcEmp3nex9meqwyvRaq3dt4kaoqdMMrPGxeXjqla Jnpo4/1wZ4WtYCCSBL/RQg1RcKMOd18TgwK03wRsQuQJsgmRJHhG+zkDXfQu eYdc2CTmgk3qIDIBScpvlPAa4FEhaobP9qooO9VNcJugzi5tDM9ug1Dgp+pW gE06e5RkSK9qx24und8mgsmAhjWgYaIKC3YLijW8be1eJNgEVKLAc3QJ6+na tokKcmJZfVKb8xOMVXXtBCdtiBY1wgweZ/tMsN2nmK5TTLdZmtcczW+eGrJA iVykxOxuk0VOKM6TWVYQyhw7GM8CqGQ782ATTgi8OMIJHOaGjHATRrT7TUYE DcPC1j4+pXfbJnIxSSapk8vq5EISfHXgC4H/ke40C4+zBb5wWpuUaPtkirRF k8IO0tMhEYMq0VkTr7PwnbjiZKeeLqJNcKEgmxhcvIh4AjDBQ5xDwVKSCDAh 2gR+U/h+k6/dvWhwLzzmETUb0qdiQXqVzB6Itm6C2rrwni61hKqGr4WIrBR1 KkXtCmEr/Lrwb2F1oevi6bEroJKLMxvnxjfOwX3gyPn1/qvnJy6cGLx4cujc +uCFU6MbZycunZ24eHbyxNGByVG+QtoqFpIUSqZYSuMLO1mcFqGYMjM3cPHy sTuvbUxO95KpdaTm0qaWsvrG4qqa3NLKjJLK9KLy1Kra7Jra7Py82OzMiNrq DA6zrltJ08jI8Ccg5ZJEzDo+/alNcIwYbLjaqc9K3yn6/WA6PNHfkKhjEx2Y YD+K2tDeXElpr50a6/7BO7d+9N7dm9fPzc0N9fZKFAqOUsUVyRgKDU/dI+SJ yBxhB19CkSqYMjmDy2ul0euZjHoOu5EB4uA1M2nV8OfAxdzRhOAgZJIEjEY+ vQEPfCj46qFeRGXA6xAEE/yoLtTWpX9IF9Em6Aein5zPrIZvfdOjAmzN64S4 W9HeUp8eF+EQEWSVmezNY1QszcgPzynhDYsz8okRHrUtPzvVFz7r73EQdXPB Y7CHUbiPWZS/ZWygTXyQbWKYbVKEbWq0Q1qMYybAJNEtJ8k9N9kjL8WzMN2n LCewtjiipTqB3JjGpxYoeJVgk4UxHnxnO3ds4NKpUVQcuXJhFmXzwtzmhfmN c1Pwt3Hz/BT8pb12afb6xvyNy4u3rixDbl9dhbx6be3O9aN3rx9/69aJtwnZ KqCAR26sQ34Aub6Vd7WfwqdOiGPvz56/9o3P3rV37V1/05dBm+T5HiwKNIEU BBgXBZtCwCbV2f789mw1p1xMzqPVJjYWhJQku1eleddl+TdmB5bGu2YGW+SG 25QluIkrMJvIa4KUtUFYT1etv7rWt6vac7Q1uLfWXZRnge000dZNZNmHZFmH 5JnGsgxTabq5IMOGl2HbluvaXuLdSIpo4WaSB+oocx3t8x2dszzKLF+wJOHM 8DoHO0vV1dHUpBcLrQ+U2L2Ua2KdZ+WVa5dW7Elqif2pOv1VeuDFBturzY53 yR6vNrveanC+zwz+x8HcPw5k/KjF6ULa984m7Dsbt+9U8v4r+S+812z3mOn9 Cd//C0UI2OSLHWzy+DvY5Od0j4edTu9SnW+22Vxotb7MdtvJJmP8/HFxGbLJ WB/cUPGHsD1xbP3gNkH7TaaGRUSbEOsmqKcLb+vaPkPYgE0wmHAbxJx6eITX wRSgCZ1BeKJNdI4R3sUmOE+2bGJo0kTfX5B+NRMFbPJUMd/IJstbMNGxyTg7 dZAaOUQPHGN6jTFdJ+jOk3TXGezMNN85SvA8OWK+MwrZZKd5E4M2IfJEByYE mwRjNuFmjPBK0e7FfgG1V0BVi8jEni7ZN7EJ6vUCXQpYNSxymfak1me1Ca4S POAR4gZGvB/sWeomOjYh9nQRbYJXT/RnT7A3lCbq1012sgn66/S1Nhns0uOJ imXQJhopZhMtT7ZsAr8osgmix+Vzk5fOjF04PXzx5CDYBFRy5mjv6SM9Z471 XzozDu+BR7DJ8bW+sSGOXNKstQmLzW2l0Opb2ioUKo5SzVFpeKPjGk23gEpv qKnLzytITEoJhSSkBIdFewaFu0bH+6alh2ZmhKUmB+VmhTfWZXMZtWIeCdvh yGkAm/AIRZPdyUDs7CIuH9Efn9/dJga3t+9eNMGm4DtqACYqGee1O5f//C+/ +e//50//+Z9/+Pu//2Rz86RGI9B0CQEmfDFVKKULJNSWzqpaUlEHtVYoIktl dB6/jcVqoFGr6bQaPreJzahl0WuAJyJ2k0E4oCd4WYQ4XYJzA2/oMmgT/Ifo 9HQRfyERu7ZX1Qn0mJ+UwLegwW4a6CMx2jk61LasIAI+denM5O2rh+HxyHI3 /B0gt+SCWcIDLf3cD/i4vOTr+jI2aeJ+KMzbNNLPIibAOi7QxqBNACb5qV5g k/LcoPrSqLbaJFpzppBWpOJXDanbt23SDza5en4KbHL14tx25q9cXNg8P41g Apq+vjF34/IC2AT+h0G0Kjly98bRezeO37ux/q1tAipB4yT6IZ4zTMyeTfau vWvv2v0yaJNsr5dR3STP71BBoHFhkEme/6HW8igVu0zJKuU0p7eURDTkB5em eIBNSHnBYJOiGMeMIPP8SLvKZE9pVZCsOgjZRFUbqKr1U9X49NR6j7QEgU3E +ZbiPHNJvjnYRJxjJMkxkmaZSjLNJRmWvExbTqZ9e75nS4kvqTWOLCthTLZR l2nkFXrTAq9lgUddFNDnebQpZkVPXXhn/PfiXno+w+RgprFLjk1kvgupIXpA Xvsjadxmk9NGve2rHe5v0nxuk5zuNrt8Kov/18nS33Sn3qu2OpPy3Nnk507G 7T+Tuv/VcuMHVPdPeP4/FwZ+oQz9pSZsF5s8YW7x5DHN8hvZ5BOq209b7G7W m54qf+lkvcklpssG18OgTcYFBRMSZBMq2GS4BztKaLiHg/dx4Wft4vdj6Axh sAl2VBfBJvi8CT4UD8GRgmwCZIC7WcAIsomE14Ceg1bgrhhug8ERO83C6xRN drGJPk+Iuxd3r5v0qRgQZBP8DcgmqKcLn4Vf/SY2WdPUgU0GqBGDtIARhscI 3XmM5jRBc56meMyQfWbJQbMdYXMdkfPMkF3O6dKxyQwzcHeboBcxm3CChznx Wzbh12ttQuvhU1RCuBNuQ3vhJeLqb2QTeA+8U8YnCVm1bEr5t7OJ/nHBu9tE Z96EGLxoog8T3CYGN8Jvv83AvMnuNsH/Lu1kE3zeZIsnavYuNtFIEE9Aix3w RYFfdKibeWSp++LpMfQfosEmp471HltWLkzyR3spI72UqSHm4TnZ6WMDZ9eH 4G0XzkwcW+0dHWQrpC1gEw6vFdVHikpS6UySXMken+ru6hGKJLTW9sryyqyC ouScvPjs3Lis/LjEtJCIWO/waM+4eN+U5KDEeL+URL+i/JiWhjwmuQLbb0Kr YneWE1u5cCPsRAZ9NRgsnTyLTfCfR7+by7BNOmvp5IaZid4vP3v0//73v4BN /r//+fP//u+//e53n50/f6SrWwgwkau5XX1ikYxOYTQAT8i0eg63VSyhisRk qZTMwfq4SAJeM5dVDzARC1rEHMPdVjruwKODFOJJwvo2IRZNdFCDfhU+s7pP TZ4c5qHlSnMTYvh+2FyXVl4YWVMWx2NUAFtOHR08sda/tqQZGWB1NudkJHmF +JkBTLycXvBxwWwS5GEU6mVCsInNLnUTsElDWXRHfQq9JUvMKFYLqoc1HYvj fGSTiydHkE2uXZqHXN9YuLaxeG1j6erF2avYi7NamMzjNnn12grA5NvZ5J2b J4h7GA22daHo7GTEDxzes8netXftXbtfBm2S5flSgb8R2CTX92Cu38GiYNOy cEtyTXwXrxLCIqXV5QbWZPsXxDuBTZryQuoy/PIi7NIDzQqjHesz/eU1IbLq YFl1oLw6QFkToK2b+A00+oNNemrcxPkW6JwucZ6pMM9EmGcqyjYTZlkKM605 2Q7sbKfWQi9SqS+Jkszqr+cvMWmrrLZlet0Kv+WYtGNFSFni0+Y41YNN6aL8 yilS/Vxr63QTua+aLiwcldcfH6S/xvQ/U2l+ucHhHtnrdbLXrUaHNzs8ft2X +afxoo/5kZv5RqeS9p9O2n8sev9G9vffa3b4hBvwqTD4U1HQZ7KgnWzymLNl E8QTbNJEO2DyjDb5mOL6sNPpTpPljVabezzv2xL/HW0iLJiUlo+rW8e7qaO9 2PRuvwbuqZ7CBO9rMtzTNaHb0AXBnxNtAvf2/RoaZhM+CTACN7RbdRMtT+AR bnThs+AItN/E4BnCOkd1obtog/MReGcX4kmvkqJfOsF/a0St7GQTNG9CPKdr dUmxSrDJkcUtmxzb7unC27ouTDLBJhOcNLDJED1whOGJbDJOdZoiu0+TvWc6 A8Ems+0Rz24TgAkKkSfgER2YQIY5AUNamwx/xSZUsIlS0PHtbAJvgHeiL5+A WQN3g+Tmgm9tEyQRvMuL2NNlECYGbaLTzbULSfRhgr2/7KlNakoTW+qynsUm u5dO0H4TfOoE8aRHzda3SZcMi5YnmE1U4nalqHW0n3tkqef8yZFLZ8bBJudP DS/Niod6OmltmYVZfiW5ga31yQpR/ey44OSRvgunRs+fHj+60jM5ytcoOyWi JgazsamlrLI6BxjSQCpmspuRULj89vrGIoAJqCQzOyYhKTgqzhdgEhjm4h/s GBnlkRDvBzZJjPPOSAksL0pobcjF7vyBAy1FDEMdXF9by9i9s8ugTQxOl+j8 EvjKEoM2GeqTrS1PbFw4+u7bt37765//+59/94d//OIf/uHzW7cu9PQCSRg9 A1J45Ik62fy2Dlpdc1tFa1tFW3slmVKjVNBlUrJU0ikVd4BKeOwGAZck4eqO txsUB34ssEGe6NjE8HHBhmzCpVf2ayjw/Qe++awtao4udy9OyyaGuIPdNPiW CN8wp0b4SzNy+O60PKcY6mOgukmQj7Gn0wuejs/7ur6C9XR5Gm/3dFl/bU8X bhNGa7aEWdolqh3roSxNCPRtAjABgNzYXL55ZeXG5qKWJHgWb24uaRu6tuom Wp4cA5u8eXP9bX2eaGGC5fpTm7x9Y11nR/xO9RGDNkE/6q9947N37V1719/0 tUtPV3GQaZ7fwWyfV0rDLNoyvDgtGQATJau0ozK2MsOnPM2rKNG1IsWzPjug IskjO9QqI8i8JM65JT8U2URaFSCr8gebaOoC0O5FsElfnYc431KYYyovspQW mPPzzQV55oJcS36ONT/blpnjRM9xaSnzb6kJ7eDliSY7xceEtGP8phVW5Rq/ 4bik+TC/Y5lPnmM3jLWTpjo715idh2mMuQ7BcHN3N+nUCOvSMOceO/Aiyf56 q8c9qv+tVs9Xm11+zA78p9G8X3WlvNPocib5+ydi951J2Hc6bv/dStNHdO/P RaFfSMO/kIX9QhH8990RBudNHnNsn7BtPmTZIJ48YVh/U5t80ObwKsniTabb j9URd+VBO9lkQlQ4KatANhnpgdt17D/tPj2fSsPAD7ZCT9ABwpNDQoCJzjld eLkE7+/C152MDXD1bQLRt0mvyvBeeCJMkE20W1EM2AR/hVg9we8n8f/cjW17 3/4QZfu3aaCnC5+FRzbZ2gs/Lzs8L8WzCpmTrs3LjizIj87Ljy0oIMe1wW0y RIsaZgSNsbzHmK7j23WTaWLdhIXZZKe98Do2mWYEEHkCIbZyQdCLw+yAIXYQ ZhNO+jC3ZIhfP8hv7uNT8LoJNm8irvtGNoH3YEUTAUnMrUfzJp1N+d9o3gT3 CM4TNB2vMyD/tWMmRJvgFRNcJcTpEv35d8QTJBSwSX1FCgS3CdziGrSJfluX /sER2+EN9/Dx/SYDXVziLDzRJt1yOgTjiZSqlnTCrwW/IvyrWV3oOndiGLVs HV/t6lG10NqyUuMc/NxfDPUzykxya6pN6pK3HFlSw9vOnhxdW+6aGhP0dtPk 0la+sB0w0kGuaWmrKKvIbOuootIbIGRqXWt7JZglNz8BeJKSFp6aFZmYFhoW 7RkS4RYT6x0f5xsb7RUd4RYd4Zqa4FdRFN/WkENpLgCb0LQW0AGIjhoQGQza ZKddJAZtslMtBv38+JoSgzbp1fCVUpZEQFUrOF1qvlrJ5bBaW1urOJx2uZyt UvOEUrpEwZKruapuvrKLJ5BQ+WKySEyhUOvq6vO7utizM11Tk6rRYclAL7dL RVcrqHJBO7EsgrJ7NUSnucugTXSKJmgyRb+nS8CsHuqhw3cerJt0UXPscA/w BJwCr8B3JHDKkaUueGV1QX14QdXfTQWbZKX4BHobgU28nV/cmjfR2iQ6wCou yCYh2C4xfLeeroq8YLBJe10yvSVLxi7rFteP91KXJ4XYAcLHBi6cGEY2QTDR 6mPl9rW121fhyRLk1pVFbZaINtlu69qyyVuEbO06ubH+zvXjkHch17by1vXj O1VDdGIQLCh/7RufvWvv2rv+pi+DNinwN0I2yfU9mOH5YnmEFbskTEor1HAr BB05DQUhWzBJ9y5Pxtq6imKcMoMtIKXxrp0lUWgWXlYdqKgJROd0gU36G/xH mgMHG71lRTZgE1mhpazQgpdvzsu34Oda8XJtuDl2jFxnWq5ra0VQZ1MsVVom mqEJj4mox4XNa5zq4+LqI4LGZW7rErdpklo/3k5d4bJPi3gnhYIlmnKic2aC cXtZ9daS5geKuNvMgNu04NfoobfafH7ACvxEHf/HsZyP+CHXC01Oxu07m7D/ asZzrxW9/ONWpydM3y8k4b9SRf9aE/Pb3ph/GIj9susvb5NPqG4/bLS8UWdy j+r0psj/Gt/rItvNoE0mRUW4TYa74Z6c1aNk6t+xI6eg7fCoaAIwWZhUgE2I kyaoj4s4eILDBO7t+9RUuNEFj+A2edrTxamHG134rHaAvX2nDYw6+012twmR J+hmUqd0ov971BZT8DCJZwjr22RpTro0J1nezuFZycqsBHiCCWVWemROBsGQ Mi+/MMk40lU/yU0fZkSPskImOL6THI8JuvMEzWUGO88ZmzeZ6wyf74xaYIeC RIg2AZJ8rU1wnuhUTHCbDLKDhthxWzbh1YFNenhkZBOFsFUmapSKa7/RvAl6 AzzCV5BLq4T7w29kE/ycLiJP0DIU3CbwM+x0dLDBGDybqzw/oSwvHh6JPNEf NsFSloxsAjB5dpsQ27oMhY+C717EzhDe1SZdUqpGSlZLOpBN1haxni40UbIy LxdxKkpyA4K8XwnyPhAZZJYYZVeYFcBnli9OS04fGzhzYmRlUT0xwuvrpilk bWxuM6m5tLGppLm1HHgCz9s7q8EmFFo9vFhUkpqVE5ueGZWaHpGZGxMV7xsQ 6uwX5BAc4hQV6REe5hoZ5hIcYBsR7JiTHlJXntxal9XZmEfcWqjDE/1yBv4G nRUkOtWTXWyy00+O/mdoS3UFBm1Cba9m0ZrkYgaX1SYSUAb6pCAUlYrHZrc1 NZXz+GRQiUjGAJ6ATWQqFk/UyRN2iCU0kZjMZJGkEvKxo+NnTs+trQ6Pj0iG +vkgFIXwKSWIsyE6O98NrizZad5Ev2iCRlcMzsL3qjoRTMAgiCE4T1Dg+fyk ZHle2ddF6WjKzk71DfY18XF9Gc2bYBvhPYzQvMkudZOCNG+ASUmWf2V+SGN5 DOrpknPKe6WNE320bZv0E20C+tDSY/VVrCyycuc6PF/e5snS9mcJPV03j792 88Sb2tXw39Qm6MAudLAw8Yhg4pFcBsHy177x2bv2rr3rb/oq8TWqCDQrCzDJ cXsx2W5/qgPY5KVCf5MCP+M8P6Ns7wMZni9XRtuLahKUrFIZvYjVlEYqwlYu FsQ7FSe5liQ4lya65EfaZgabZYdZViS7kcsiVdUBqmpQSXAXKVJeG6qoC1c2 RKjqgnubwkfawpRlzuIcM3meqbrATJBnLsyzEOZZCXJtBDn2jDwXSp5rQ21w Kzmxs6+Wf5jNPi6krgnIq/yOU+qmI5K2VVHbYX7dBKV+qpOxLmYc5fDXBdJl Rs8sbWGOe3VVdW+t+4cDufdkiXeFCW9Jkl7nRT9QJf5yLO+3w5nvkd0vZr5w Jmnftezn36k89LjN9gOa22O29+fSkF93x/zjYOKfxlP+OJb0f9i77+A20ixB 8Du9M93lJVGiFUXvSYDee+8BEgQJ0IAA4b0HSIAW9N57b0R5700ZlbyqSq58 T8/szk7c3ext7MTM3e1u3N3eH/cSH5lKgZRa1d0T3X8w40VGEgVSAphkfT+9 9773nyyh/7GN9HctQb9t9P2h3uNbo9tLw5EfVC4QPyqdf1BYQ+5kDccfZFvx vRTtIezwXAQw+fi54JOXgv3f8Q9+y3d4wXP4TuZ1t/bQNZbdZ1L3z7UBV1U+ l5TeJ3UBR1V+S1LfGTE232TLJvWUUVPZYDNnsE3Ya5F1tSo6sKbd12yCL9FR 0gR1wWNJk2HbLnhkE9R4gpImsL4a7FaDTfo6FMgmKG+iVzB1cgbqOsHru2C5 u20TVNYFC2Mu2iUYwtpdgmyyFbv2m9iABfEE1XTh60m0pETJIJvXiGBi3arr 1T5dVptgsxfHBnRTI/Wz42ZYCUyPN8xNNc5NmiHmp8zLs83zEw1L043z4w0L 4/VLE6alSeBJ48p04+kR5Uo7a0yXM6hMGFJHjmiCRlQ+owqPUYXnuNR3QhIw KSJNCiMmBVHTCmwu/IQsBGCC503gDDzBbYJGnKB+E5u8CSrrwoUCj4BfepVB vSoSbhNU09WhEbZv28RkqGkwMm3yJnju6S02QXsIg01gZWhT04VnPd5iE6JQ IPBBjbhN3pQ0IRZ34Y8TbYLvGAwqQUEvSsb35sJ36HqTTSppKdzqXFghm7S1 uE2IewijIOZNCHVctnkTZBM03KS7TY1ggvYQflXThdvEvGUToBD8+KzOd4JN IE5u9M2O16ullOQY50CvvwkN+DCKdCAu3D43zU/IyR3pUx9b7Tm1OTw/3TrS r+vtUjU3CusbJDxBhVBcCSoBnlTVFEvlrN7+JkuHQaHi0OjZ2blxGVnRyalh mTkxMQkBoRGewWTXkJDDABOIqHB3sEkE6XBGclBpYSzwhM3MQnPVifrYNWki eT29smtrPLKJWlK+a7PJrtVcNhkTEQcLCa9EKS4X80pkgjKpoEwmpCvE5So5 W6cRGHRiPreCySiqZBYxKgpYtaUMRiGFmsmpo6u0fK1BbGiQKXV8hZar0vPl 6jqJnCUQV7LY1BpW0fRU56lTs6srQ0P9DZ0WVWuzrF5Th2/ShfbpgjNxc2Dc HTYw2fU5aA9hPPOCJ0122mRrWzAFo6NZCPoAj1iTJharTSwLU03Lc61rCxY4 r8y3Yb+I5lo7WoU8VlZ2ql9o4IFgn4+sNnkvyPMDkvdHEf77rTbBUifJkc6p 0S64TXKSPJFNKFmBpbkhjOKIWnq8sCYdbGJS0sAmYz3yxfF6sMnJ1S5kk2tY X8nMVuHW5cUbl5duXlm0SmQB9b/fuAQxD2y5fXXZqpI1a4BNbPtNUE0XKujC eHJl7f7lNWSTe1fX8ZouYtIEDTexsQle9IXjZc8me8fesXf83oPq+wEz9FBl uEOR3wdgk7TDv8r3/ZBKOlQQuC/L58Nsv48LQw7WpPk3cfLaNHQtL0fETKwr jazMC6Iku+fGOBXFOxfFORdEO+RG2BXG2FdmeYto4R10v/bywBZGaGddirEy 3sBKr+dkaysTOiV5vaKU1nL/pkKHtvx9nQWfNBYAUg425h8y5TnW5zjLCj2E RZ6lvIhKfSZ7lqc62SA71qCY12kX6hVLzfLlZslKI3tWWzosYE6JFKca1es6 3aqmZUHRO6+cmteuLRpPrJgfTlR/2kO53ZF3pyPvXkfOi57cf5gs+9mScp3l cib/318p/vX9yn0/CA//rdT9K7nrS533bxuD/rEz8r8Op/xfU5n/bSrzHy2h /9BG+g8tQb8z+f5s8PxB6/a95shPKteflIchflS4oPhB7ozie5kTCvThd7yP v+V+9IL38UvhgZdi+2dS56+lzk+1PndEzpfZB2+KXD9V+tyS+3ymDjhnCD6u 8l8Se0/xvcYE/sPSqFFl4kgDZbiB1mdm9TbzwA6dbcpOi7prGybEdTtc45NN wCZwBqTgMCE2mOBd8LhNUCN8Z4sYmACrX6O6SiurUEvoIBSUQEE2gWUw/B2A JyjZgTdcowXzzsBHAdrYZOd/JRZ0/b6QE2u6CLMX5QNdCrRV1/Row8yYaWzE NDXRPDvRPDfZAuflWQs8uDzbNjPaMDdWjwllwrQ83QRxakS10s4ZN+QPqZOH NdHDmuBBpc+oymNU5Tkm9xmT+o2LgscE5FF+2IQ0BGCyM1DqBGyCkiZEmxD7 TeBDvCMeLgAmI5LAHkVgr9JqE2u/CZpv0qkVtWuxfhM8b4LbhPhuE99bG5ug bw2abwLLSKJNhOxXG3ARi7XePpCR+DQ8mWLTZrJrywmab4KaTdC8RaAHYASR ZGfgORRiWRfRJrAO59XkwcoZnwuPZi/iGRNkE7hbttqRrPlENNnk9ZFAr6Yu 4u3wW0Phm2Ro9uJWLzyWMcGizSSxmMUWswgcNDnUADY5sd4LcXytZ2pULxPm J0U7RgR/HBrwQUzogfQEN05lmlZOhx+3E+uDp4+NL891zU60Lcx0To239g82 A0zYdTSUPQGn8IUMgElbu97UqGBUFmTlxAJPEpPJyamhiUnB0TG+4eEeoeQj KMJIhyNCXWMjPFITA/Kzw0qL4ypoyTxWHnyjifTAy7febhMUeM4Fno8mISKb vGXGoo1NttMl2IbVAnYxn10s4tFU8mp+XYlEWCEWMiQiplxaLRBVNjarIRQq bh2vgsWmVTALGZVFJbRsGj23mlUiEFWpNHwIibJOquZCiBRsvqSaI6ioYlMp JWkNJsnISOvwcEtnh6beyNdpORpptVpciUIjqdJKq4En6IyQgs9V3NktQrQJ DhMIfKwJUT14f/1rWxCra+C3EPzmAZiszFlW5tpW57diZR7blGNptnFp1rw4 Y1pfarc0c7k1GemJnuSAT0h+YJPfYDbxep/sAzbZFxN8MIHskBjqmEKwSVaC O9gE8aQw3Q9swqREcioSRawMsIlRRgWbTParlidNG3MtJ1Y6zx0bRNMVUS88 xOVzM5fPzV67MH/9InhkEd8xGM4oXWIT925uPrh17P7NTRT3rJMW719bv3dl 7ctLKxB3L27Fl1fWEExQxgTxBN9MGOcJXKCWE5wne/NN9o69Y+94x6PU/0MG 2Y4ZdqjY/4M0l1+lHv6rfN8PSkIPFQbty/b9IC/gE1qUiyA/rF1U3KQoUddl cctiqgpIFdn+YJOcaMfCOCcIG5u00vxaywIM1MB6RrSxKtnIyW4WU8abaq8u No1rC5orAoy5h1oLDrTkfGSm2JuL7RsLHc35zg15h2XFnkKKF00cw2oqqFsQ KU7US4+ZFEtG7VKDbLFRtd4m32hhz2nLxkQ18wr1uVbNpkG3rm1eVHTNKcZm VUtzuo0F4+Pp2jtDZTc7cm80p99py/xuoPA/zZQ/NUReq3G+WvbhnWq7lyLX 3ym8/lbm8bX88Eud148N/n/XQvpfe6L/eTjpX8dS/qEt5O+bA/7W7PvbBu/f Gj1/1IFNXH9SHX6TTXCefCd1xIL7EcYTwb5vRXZgk+dyl2cK128bgh4pPW4K nG6IDt+QelyXeoJNzuqCjil9F0VekzzPUb7fkCRyRJEwZCwaqi8Fm/Q0YS7o sqi6O7TEZTxe74RWYvgOXTY2wZtNiDZBBV0ob/Imm+jkDJRAMetrt/tNhJZG gY1N8MUw+hBfQv9SmxB5gj/yehBbTrZd1ibtbZfhNpkaqcc64mc7gCegkqXZ 9pnxprEBPZo+MDGonx01Ak8glqYawSYnh5XLFvaYPg/ZZEQTMqTyHVa4Q4xI vUYlVpsIQ8cE4eOSYJQxIcauNsFruojpkt9jE3UmZpPt+Sav9Zs0VOE1Xe9i E7zrZHv24mv9JkSbELvd36KSN9mEuHswscQL3zQY3zcYv0B5EwAIMIRWkIhq uohOIdqEwJOUnXkTZBM8aYLDBOXgiL3wQ91a3Cb41nbEifBvt0lrg7itAduq C7cJOGhqxAQ2AZWcOtoPMTNuVIqLMhKPkPzeA5hkJrlXlcW2mtij/dpjq/1g k7XFXrDJwnTH4mzXqeOTU9M9MkUtmmNSx6Ojyi5QibFBKleyS2iZyCbpmVEp qWHIJmHhHmSSKynkMJxDghzDSC5xkZ4p8X6ZqUHAE0pBdC0zi8/KByOgvAbi xq42wbMbNoHbBGVPUEHX22cs4rRBRVwQcLMJaov4tUW82iIhjyYVVWBnMUMq rgSewFmhqlOqeRqdEAJgQq/IB5jAmVKSCTyBa3YdXSxlSWS1InmtRFUHIZTX IptUc0qoJWmsWopOz29uURgNPD6vVCSky/h0GY+uFDJUIiYSClwoBBXwCFAF hAKOQPT4vXkTG5vgBkHpGDx1gmsFgmiT1fn2VzZZgGgh8mRjpaO1kcOvzUpL 8AgN3Efy+xhgAhHs/UG43ydRgQeQTVIiXFKisJqutJjDyCYodQJn4AklK5BR HAE2EddmKnh59YoSsMlEn3JxvH59tvnkatfFkyNo/js+3+SSdb4J2AQPEAre /44XdOHZk/u3jj28fRzxBGBy15oZuXt5dQsml1buXVr98sLyF+cWwSYob2Jj Ezw5YrOHsM1Axr258HvH3rF3/N6jNOADevDHdNK+Yv/3011/leb67/J8fk0L ty8K2Z/r/1ERya462UtbEd+nLG2QFClq01mUcHqWf1mGDzXFIzfGqSDWsTDW MT/KHmxSFOtQle0jLotoKQtuppM0lGBdebSJk2VR0o9PN//nnz/9+cuNTmE6 P9VekWHXWeZqKT7UUOLYQHFsLHQ2FRyuz3eTUL15pT5lisS6ztK6ZZnoqF6w YZQu1yuWGqRLTYq1VslaU+2chjmj4K7rlOdadMfr9Rv6pkVFx6x8cFo+O61c mlHf6KHc7qPe7i74rCP3cV/RjyPU345S7imCbtUd+Zxl/4QPrPD8rdLrJ6nb c437S73ntwav74zeP5n9/kNr8D92hP6uye+3Ju+f6j1/Mnr8ZHD7Ue/6vdYF 2cQGJvg1wORbiQMEYARs8oNg3/eiA9+JDiKbvFC5PVF53pW43uA7Xhe4XBO7 XZN43JB5n9YEHJX7LAg9J7geIzzfQXHEkDx+UF84aCzpNdX0NHFhBd7d/som O7tOYN2F79AFYWMTnCToAu+Cf4tNQCUaaTmEQVkJj2NN69g+XVs2QdVEiCTE fWvhmQAZiF9kk52pE7hGjxMD36eru/XVLl7wzsDfH2wy3KtGZV2wSBgaMAyC v/p0GnlFaXFMYQ6Zx8o2qpmWRt5Ir3JmxLA4aQaYLEyYjg8qltpqR3W5gyrM JqNazCYDMtdBqeuwxHNE7As2GReFTYgiwSZjkiCb2NUm4A4bm4BHdreJPLBH GdKrjEc26bfapPNPYRNiv4mgtmBXm9hMVPylNtkJE6JQiDNN8A2EiTYpzU+A sOEJcfAibhNm6Wv7dCGbNOo5xKQJukPQBbE4EEhiYxNk+Xe3SUu9CM03aWsA mIjbGyFE06PmtYUutD/wuRPDy7PNjcZKRklERPDHyTFOlbToXovg6rnJu58e /er+uU+vrZ3aHAOeTI+1jAwCnLss7fqaWiqzqhBUwhNUwBmcAjDRG0UqDbeC mZ+bn5CZHZOcGpacQopPCIyM8g4NdQsJdoEAngQHOCCbJMf5piX5A0+y00Pg neFUZoMOkCzQzM032QSnBB7ESrCdPfI2/fI2s+bhc4EkKOBmA5vwWIVcVqGQ WyrglkqE5TIJE1Qi4NGF/HKJjFXLKaupLRWKqyurKShdUs4ooJZmFVMzAClg E/hPAlEVX1ojUrDFSg6yCZtfDjapYOZVMHJl8hqDUaDX1YFNhIIyIWer8hCE IueX4wE8AaRopdWojZ3YAk/Mnuxa04XbhFgqRizlwoc81mtqetvlM2Om9cVO a7+JZW1hK5BNrDzBbHJ0tbPFxBZz88Am4cEHwgL3hfh8CDCBc4T/vuggu9iQ Q4mhjqmRh1OsvfAodZIZ74Z4ghpPcJuIWBlybq5JWYpqumaHdcuTpuPLHRdO DF+2zn+/eHoCxYXTkxdOT106Mw1x+ewMxNXzc9cvLqDsyavhJlaYfH5j/d4t LG+C2wTlTcAmEPcAIxCXVrGkyYXlO5de63Mn2gRJ5NMLi7fPL8B51774vbzJ 3rF37B2/9ygP+ZgZtp8RdoAa+EHGEcwmuT6/Lgr+KNf/vRz/90vCDwrygpq5 mYMaml6QJ6lKriwglab7lKZ54TbBItohL/IgJd6JlecvZ8SYSoPN9FBDRVQT N6tZQhlvl/39sxv/77/+/OjKXLcsnxFjzwz7tTrtI3OenabEUUd1NBW61Be4 GgvchaW+nDK/cmMWf6CKt6rir+u4awbxqlmyYhYumiWrzdyl+qoZVdWChn+s XnqmSXuiXrepb1pWWubkfdOyyUn5/JTyhDntoiXnmiX7dnv2g77Cp725j1qT L3Ncb/HdH4rcnsu9flB6fS9zeyl0eaFze6Fzf651e6Zxfa49/K3B7SeT149G NxQ/YCpxRrFrxsTGJiARiO/5n/wo3I/b5JnM+bnyyFdqr4cK93sq7we6gPvG kC/1wTflPmCTDZn3vMBjvM59mOszIAoflMUN6goHjNSehuruRm5XqwTZhLiS Jy7mbWwCF5NDtgVdyCaooAuNg3+LTdAZJVDQ7MV/I5sQe+HxV/SmvMk2T17t UYa9M23Svg4ZajmZHDZiPJls7WqX89h5kaFO3u7vBft+khzrzqQlqKW0Xoto ZtS4MtMMMT/ecHxQvtjKsrFJn9ilX+wyKHJHNpkQhWM2kYa8Y97k3W3SDTZR YDbpI9ikA6vpEuE1XQ3GX1bThedNGjSYTWDdyGflv8kmxKklv9Qmu1ZzoWQK yp7gNkH9JqgLHtyx0yY4TIg7dxFnL6K58MR9usw6NtgE5U3wgi5kE/yHYqdN 8G0Wei3qd7RJs1HUYhQRbILlTSaHTUeXe05vDpw/OXLpzPjx9e6JYY24LjM1 ziUt/jDYpKeND3K5fHYKFnuwDjy2NjQz3jo2aJoaa5mb7pia6RVJqiqriyCq aopRZZelQ99glqs0vBJaJqgkIys6PTMqMSk4JtYvPMKTRHINDnKGAJ6Qg53C yYdjIzySrDZJTw6AM60orpqexqvJQ5PfUS7j3fMmNjZ5C092DlJB+y1sw+Q1 m/A4VMwmYqZExASb8LmgkhJmVTGlJBMYUsEshHNpWQ7YBJBSREmHDznccgwm wkqwCagEeAIhkNZwBBUsLo1ekUMvzxaJmWIxQyphCPg0Nvxx1jsZ3cwIKVJu GcqboCovYnHXrvsAI7kQbULsNMEZsmsvfIOW1dehAJtsLHWtLXSsLbSDStYX 2yHWFlu3edIEPNlc62o21Up4+RlJXtGh9lGkg2EB+8h+H5N8Pwr3+wRsEk92 SApzSg53To5wSo50ApsQUycAk4I035KcYLAJuzxBUJ0m5WSbVWXdjWywycyQ Fms5WbCc3RwAnkCcOzGK4uyJsbMnxs8eHzt3YvzCqcmLp6eQUBBSUK0XXt8F d+wXV9fugDKurUPcRfsJg02uYDC5f3X97qXVO+eXACZY9uT1/YHxXngEEDSK EdmE2A6P22Qvb7J37B17x+89SgPeqyB9TCd9VOD7N2muv0o9/KsM97/K9f91 tt/f5AW+XxHnqKJFdEsL+1Ulitp0XllsRU4Q2KQk1bMo8UhOtGNetENBjGMh Fg60ZFcehaRlJbVUxZqZ0aaa5GZBQZuScW596H/86+/+y98/nu3XSmgRBaR9 5WEfytL26bLt5CWOKqqTsdDVWOheX+QlKAtkM0JY7aXiSZ5gQ8vbMNStNwjX m0XrLby5esGiiTWnq5hWVC5q+CcaJGeb1CfrNZt687KybU7ePyOfmlbMz6gv dhVeaM8925hy2hh3sT7uuiHysir4dJX9DYH7fYn7N3LP79XePyo9f1R4PNO4 PFU7w/mFzvWF7vC3+sM/1Lt9pzv8vf7w94bD32mdvlXbv1Qd+k7j8KNy9x4T FHjSBAJggmzyrcjuhejQN2LHr6XOPzSSvm8k/2CJ/rk78ef+tG87k77Uh7wp b7JtkzrUb9LVrsG7fQnZBOmu/SY7YQIkwS+QTdAmXbvaBJa1yCY6OcOkZW3v 0yW0KevC4w+u6SK+nDeQBA9ZZ7Nsmydb60/4m8Obg2wy2q9FZV1tzSIhnxIb 6Xbg43/nYPerEP99idFHctICOFUZTfrq0V4V3nVyfFCx2IryJklD6qhhNdZv 0ity7hM5g02GRd5jwqBxYdgvssmE/F1rusAm3YrgHkVcnyrjVS+8VmTRCMEm jfo6ZJN6Y8Uf0G9Sr6m25k0ob8mb4Cs6vMTr3W2y65ZceL8JnjeBQJ0m+PB3 xBObdAkxbDrigSTIJsS58KgX3qbfZNf5JjZJE7TNwrvnTZrrt2yCFXeZRG0m ocUshB8rsMnZ40MXTo1ePjtx9sTg5mrH0cXW4R5pu5nVbKzsauFODusXp1uO r/WfPjZ6anNsea5rbtKyNNe9MNs1Mmrh8ssRTGpqqew6GqOyQKmukyvZqBce bJKWERmXgMEkMsqbHOoWHOwSFOiE8iYRoa6RYUdiwt0TY7xBJRkpgcATan40 vD+sigwrRYuQOH5RTZfNrr9vSZ3srOzCC7pQTRfPGnwOVcAtFfHLpCKs2UQh q5FJqli1JaAP8AjKkoBTEE9Q3qSsPK+WUwYwEUlqBFKWQMYCmEiUHJG8liti sPl0Gj2rgpHL49PruKXcOiqPW8KsyOZUFuA5O9Axuo3l/HK8yksrrUbtJ7vi YmfLCQR8aJM0ga+w66fDrdjfqZibaDy63L2+2Ak2QTDZWOpYX2pDPFldwHiy tmQBmwg5OZnJ3jFhDrFhDlEhWzwJ9f04KvBALOlQAtkBazkJd0iKcERlXXjq BLXDl+aGVFKjOBWJwpp0sEmjmt7Xwp0e1CxNNKzNNB1f7jwPt+XrNjlntcmZ bZug7AlKo6BrJBSURsF4cnnlc2t8AYLANwe2FnRBfHF+6bMz85+fXbh7ceXR zWOPbh9/eOvY/RtH8eIuXCs7W0tsarpQudefe+Gzd+wde8df9FEe8kE56QNa 8Hs00geMyAOMKLtS8keV8Y6MWIeqRBd+jm9jbfKAmtolKxAxE2uKw+hZAWAT aopHXqxzZsShvGh7sElRrFNxnFNFuoeIFl7PTW+rTWpgxjbUpjcKisba5L97 8cX//L//aWm8xSQvpyW7FYZ9VB23z1DoaqYckZQ6ykucjEWu9cWeDRQ/IYPE qQ7l9DPFM0Leho67jtmEv9HM32jhLTRw5gyMKSXYhLVmEJ4yi880qk7Wq4/p TSvKtgVF/5xyela9OK/7dKz81mDp9Z78y61pZ3RRp2UBp8U+59kun0l9Hso8 v1F4/aD1/UHl+b3c7ZnG+RuVI9jkpcH1hd7ludbpucbxO73Ltzrnl1qHlxoM Ji+UB18o7YgZExuS2MTPogNgk28F+14KDzwXHvxKaP9QcOhrjffXWt9nZvLL tqjvu5O+7Uq6ZySf0QVuKrB+kwnuVr/JsCJhyFA0WI/VdIFNYAXe0Spvb1W2 N4mJyzAUsOga6tai3YOnRxrhPDlksuk0AY8gm9gUdL3FJnABATapV1fDWheN Stw1dfLH9MLvpNauBV3WeGUTPMPS2Qw2Efe2Swe7lcgmk8PGDou0vCzZ88h7 DnZ/5eH66wDvD/0934+LcMnPDGYzUszayqFu+cSgdnas/sTQVk3XgBKzyZAq qF/u1StyApsMCN2GhFs2GRdGjL1zTde798J3ywO65a9s0rdtk3atCK/p+qW9 8DgSt23ytpoum4AH/8i8ic3ewggsu05aJDIEacWGJ7hNYMmNdg8upyQQ58Kb dWycJ+AF1HWC7iWUNEEe2W5+xztNULPSu9d0iVFNF9jEOt9ka5+ujaVusMnF 02OXzsCqb+DERvfpje4zR3sunhy8cGLw2HL7yfVeWKmeOjp05tjoyaOjS7Od vR1qcz2/sUGg0wuYVYUQ1SwKwIQvZMBZIqsRiJhwkZEVHRMXCDxJSCJFRftg SRPykaBtm5BJrhFhR6LC3cAm8dFeKQm+YJPs9BBKXlRZURwIjm1tPEE82dUm OCJsAn0KSrvg+wnvVMnOgSY2Wwdj28FZe+HraosBJsATmQSDSYNRBCFXcngC JhikhJYNASqhlGRCgE1Q3qSOVwEwkcrZ4BGhvFas5MjUXOAJX1IJPGFU5tPL s2vZVKGogl1bVFOdT6el1zLy0L2HNsdGNzPctKjKC2VPkE2IfSIoFYLAsrOs i2gT9DRUG7azpsukA5socZusL3aASlAgm1h5gtlkaa65sb6GU5WG8iaxYY7R pEOh/p9ARPjviwzYj7WcBNnFBh9MDMNsglInqCMeeIJ64Wl5pKqSaC4zWcLO UvDymrTlgxbB4nj9sUXL6bXuiyeGrp+fgiD2wl+x9sLjuZIr52YBI8RA7SdY xuTmxp1bR+/detUFf3dbHF9a+02+uLAEgVVznV/64tzirbNzt87No1Z3sMmD m5tAFXAK3oGC96HAeeeUxr2arr1j79g7fu9RE/FJFWAh4hNBqoueEmSkkRUF ftJ8H2VxoKYsrKE6tluaM6ilWESZPHpsVQG5LNO/NM0bS5pEOaaH2uXHOORH 2RfFOFLjnWtyfOXlUQZWsoWX3sxJaxEV9OirTy/1/Mv//sPf/Xivu1HAKolL 8P11Afk9XtrBxlI3fZ6dqthZR3Wtp3roS33UdH82K7SKG8kdqpHMiXkrav6q kbvSwFtp4q80i5cbWVOakhFRxYyCf6xRdbpFcdykPlmvOq7XHFWZlpWdC8q5 Gc36jO6zscrPRyvujlXcHSq5acm4qo+8oiHfVvjf1QQ9Ufk80/h8r/f5Vnnk qcjhqdrxa5XDN2rgiRNcf6U4+Fh64KXW+YXG6bna4YXK4aXK4YXy0DO53fam wUgljiisGLGH83fSV/GzyO4Hwf6X/H0vBAeeCQ89Edk/FNp/znf8FEJy5AuV z/160n1T+C2V/xldwDGl75LYy7pPF9gkYkgeN2QEm2B5ky4zp6NZaGmRWlrk qOEXFZa0N1mr61thWa4Z6dNPDptmxppmx5rhDEKxGQGPSEKECW6T7jZpR7MI 7IDZRFUFC1qVuIxoE3gQjV98k02Iy+Ztd+B5k61oNXGt2wuj3YZfPWiTCcJt gj9OeIJ8O4AkWBoFortV2tUq6bEgm+jGBw3jg/pmk4BOTfJyfd/N+a+9j7zv 5/FhsO++yBCHtATv8uIYpZDa1SIc6VVPjRiPDYoWW5kjuuwBLG8SO6QKHZAH 9ou9BiCEnoMCrxGB/7goZFxEHpMGj0oCh0UBECPiALiGQHsITwM60HwTXeSC PmpyxwbCNtsIw/WYLHjLJgpbmxD7TZoa2OaGalMDs3E3mxDjlU0MHAizng2i JNoEbeuK8aQW7SRcJKyl4LMUcaq8qbjLxibw/DepZOekeLR78Ks579ZrPIdC tIlNRzziSQU1CXgCAWtvenF8LSMT1ts7bUI0O75Pl03gPCHapKdNjY2G395D GOPJ9h7CTY0SjCRbPNmaC99Szxvt068vYgPfL5wahQCbnNrsPbXRfXK9C86n j/ZsLrefPtp/fK337PHR8yfHTx0dWZnvGujWmA11bU3ivn5zg1mq1nL5gvKq msIaVjGHW8oT0Ou4tApmbkZWVHIKOSmZFB3jFxXlFRnpQQ51DQp0DApwIIe4 hIcdiQh1jQpzjQ13T4jyTI7zzkgOyLHahFYYC+9SNT0N+Gb9phfhdiDGm2CC N57Y1HThH+Jd9jZfECsJq6NCiDkUa1BFYAc2lVNdIBWUC7k0EZ8uE1d2tGmG +htbWrUyBQe1mQBGCovT8gtT4KKgKBWEUsEslMhq4QkKFVesYENIVXVyNRce EUqqeSJGVVVhSUlaVVUBl1vKrMguK02jUVOq6dlwm6EbGL/34BpPoIBN3gQT JI6dPMFtQuQJ/unELwI34WC3anbcjHrh1xbajy53QoBNUNLEypMWsMnibLPZ WM2uTE2OPWK1iYONTSCiAw+ATRJC7RPDHZIjHFOjXNJjDmfEHsmMc8tN8ipM 86XlkqpLonnMFBknWyUoaFLTB1r5C2PGE0vt5472XT41cvvS7KeX5z69PH/7 yuKtyxAL1vMy2pgL36QLVXChRnjUZgIw+fL25t1Pjz3+/NSTz089/uzko09P YI0n4JQbRx9c37h3Ze3u5dUHV9cfX998eHXj7sWV2+cWwCaoagttzIXa3lGA ROATH1q/ApgFxcPtL4h9zZubD29u/rkXPnvH3rF3/EUflaRfV5Hf48Tsl2ce qacGNpSRDKXB0jwvY0WYhZ/cp8gd1lN6VfmNvKRaagTYhJ4VQE3xzI9zyY6w zyAfKIp1yg49UBRpX5ZwWEQhaypipdQwEzvJUJOgqEoYaeN///TK//kvP5/Y GNJLqakR9tnkD2rTDipyD7XSnFoodi35h1so7ka6t6zCp67av1wYUa5MqBth yRakgkW1dN0kXm0ULTWJFpslCw3VY/KCgbqKKZnseHP9sRbDSr3uZIPyhIF7 Sq04qmxcUS1MqE+Oam8PVt4eYHw5zHg0xngyQvuqL/+r7uxnbfGP6skPlO5P lG7P1W4vlC5PpfZPZIceE+KJNZ4pnVA8Vzq9UGzFdzJwh/27xA/8fd/z930r OPBCcPCZ0P4rseNjidMd0eHbfKdrQpdbCq/PtIE3NYGXZN6ntX7HVD4rUp8Z oc+40H9IEj4gjR405A8Yi7vrmV3m2vYmPixp2pql4IjOFjHSAZzhusciA2uA PgAjM2ONENOjtlMXbdIlSCUo0OBF+FKwrIWlr0FZCTBRimioER4Cz5vY2IRY PrTbmnlrTDwx0GRGuGhp4KCJjW1m7k6D2ASCmPVfxeUo2htlHU1SFLDgxPpT WiXwWlCnP7zGJgOfCWx2/cjd6b0Q34MhvnYQSdGesHiTcIvN+lp400Axs+ON GwOsuWbKkCZtQJk0rE4aUcUPyaOHZeHD0tBBoV8/z2tY4D0u9puQ+KNMx4DA F2JI5A/Xo9IgYkfJrDYCYk4XifpNiOMXUdIEjTVBu3iBTeDTexRBPUoS1m+y m01gGQw2aTTVmE2VjUY2Xi+3M4hvfpMBC1gv1atr1JKtfhPC4IkivC8AFpBE axD74nfu3IWnS/Bn4mkRok2Im3ThNV3ErhN8AuPOXMlbbAIkge8dNS+qJD8a 1t5gk13nm+C98KigC59sgs83wcu6iDbZEopF02lR28xeBJu01ItbrC0nLUbQ Ih8Do6EOfqxW5zuRTc5hxTOD508NndjoOrbWSYjuY6vd8JzLZydObw4tTDX3 dchM2hqjuqq7W9dmUTU1y1Tq2hoW2KSQx6cJhHQ2h1JMScrKjoRITgmJjfOL j/NOiPeOjHANDrIPCTwUEeoSG+UeFXYYIj7CDW7ptHjfjET/rORASm4kvEXl lISqslTgG7c6F32XbegB98BbbELcrQtVdqG0C55/weVCfAS7tTglErhP4J7Z Drh/4H6Q8ehSPp3HKhbzyno7dSuLAyOj7a0WPcCkrDwPMIJ4UkzNyM5NKC3L YVYVq7UClYYPZ5GMJVVyACZSBVsiYQlFlVwevZZFKaWmsaqLqhh59NI0alEi 2IRRkg53HbqZ0T4McB+iNAo8CH8HlYj5Jpvg6LDhCXGsiQ1JbKLVxIdfrdOj Ddtz4S3IJhCgkuW5JjivL7WtLjSvLlqQTbCCrnDHKNKhiKADABOy38fhfp9s 5U2CD8ZhHfH2SWEOyeGOqZHO6dGHM2OPZIFNEj0LU31pOSFVlCgeI1lam6Xi 5Zvlpd0NNZO9ytUp8/FFy5n13mtnJm5dmLl9cfb2pQUUn15e+vzq6mfbO3Eh hty5dRQC739HsbVP1+2tfbpQO/wDazwEZVzHppw8urH59a0TEE9uHLtnzYOg Mi3UWgJUuXl2DgL1v+M82TUef3riyacn/twLn71j79g7/qIPJuk31WEf1MUe AJsYqIG6kiB5vo8kz1tHJ7fyUgbUBcN6ars0S82MYOaFlGcHlqb7FiW65UQ7 ZoYdTCftL4h2yAj5pDDiECPFXV4WCTYRFZEMlbFaZkyjKO/yRs+//G/Pvrp7 ZnGylZ5HTiLtr0hxUlK99cUubTSnNupBsEkr1aO+3EfG9OXWBlYr42sbs3nT XNGSjLeq4a0ZhUeb+WstvNUW/rSuakSW389hTMmkm42a1Qb9slF7ol5xXF93 UiXfUJqXlcgmN/sZnw0x749VPR5nfjNe/mKY8mKw8Hl7wuMG8kOVB9jkmerI c4Xz1+KDu9rkqcIRxTOF43P5Vry7TX4U7P9BsB/Z5Kng0BORwyOx4z2Z+x2p 2+dKr3vG4Afm8C/qQ6+rA3a1yYAur99Q1GVkdJpY2NDDZswmsAjvaBYhHQAT rK0WCnAHrMmnRkzIJnCBmk12tQmxmgs+Fw1ehC8F1oBFO9hELaGjvAle2QWr KRub2BR07Uia/MlsspUhstrEYt4a0o3bpLMZa7TpsqZO4BWhGjZ4mW0mIa+m IDzQydP5PStMDsSEHs5NCxayC9qbBEASa5hhOYHZpIU6rE1HNhkl2AQAMsD3 HnllE0wT8CCYBc6AC2IqBNkEYEK0CZEnRJsgmOxiE+tc+D/eJrBoN+vYuE14 NXmvl9xgNgGw4MrAkyaoVp+4t/BbbIIkYtNmgs80IdoEb4rHO+LRbl1viddS KhQsY1JaEAPLb+AJrL1hSYzbBHXEE7tOcJvAvfEntEnzlk248IfCz9TKXAfq hT97fOjM8YFzJwfBJsfXO4+vd21H9/G1HpDLpTPjp44Ozk829Vgk9daaSaOR pzfwACYicQV4BEIsYcB1Lbu4qDgxIzMcIjWNnJgUlJjoCzaJinILD3OJCneN i/ZIiPWKDneFSIh0T47xAptkJgUQbVJJS0E2wb7Fu9lku2P9tSCObkQ8QSmS nYMad4EJ3Fq1FFEt9ZVNtu8ZCZcmqisVc2lyYUVHq3JmsmN6pq+jq6GcUQA8 KaFlA0+QTfIKkuGiglmIGuGxs7hKJK8FnkjkVpsIMZtw2CXU4hRmRS6jPBtU UpgXW1wQX1aUDDcY+kPhHsZvS7hF4UaV1NEUggq8rGvX+GNs0mYWwC9YYt4E 64K3CmVj2bIy37y60HJ0xbKx3La62GYyVDFpcVgjPPlQeNB+gAnJ9yOIMN+P saRJkB3AJJ4EMHFMiXAiwiQ73h1sUpDig2zCrUgCmyi5eSZ5iUXHGO+WL43X A09OLnddPD589fQ4COXa2enr52ZuXpi7dXHh1sXFG5e2At89GOVNiFt1QcD1 F9uN8HesTfF3UOfIxeU7F5fRbl33L689unYUePLQmgFBxVp4dwkSCkqjoM53 4tT4nfHnXvjsHXvH3vEXfdCDf10Z9iEnzk6W7WGkkRvKwzTUIHlxoK48vIWf OqAtHtSXNPJS+cWBtAw/gAkFS5oczow4lE4+ADbJizyUHvxxQfjB6gxvNSMW 2URXEdXITplq4fzu8dn//p9fXD011W4WJIc6pIUeFBUHtLAiWiq8O8pcOksd mvOcLVSPRoa/ujpQxCVz9KnCjmLpslS0Iueua2uWNJwNM2vFVL3YwJ3UVI5I KSOCmnm15KhZs1JvWKlXHzPIj+k4J5TydQWyyakx3e3BynvjrEeTrCcTlZhN RqjPBwpeYDYJBZs8Vrg+Vbo+lTl+JbLb1SbfyB1QPJU7PJNtxbvb5CfhgR+F B74T2iGbPBbaPxQ53Jd73IPQ+T9pDPuqNeauOeKmNmhXm/Rpc/p0hZ2Gio4G lqWRh2zSuW0T1P1hnYquRAPfp0fNKGkC1/D/yrfbBMGkt13e3bblHWwuvNUm eE0X6oXHllKqKlgAo3Z4m/kmb4DJn9gmqJugrUGCpuC1N27BBKLXouxskXS2 iJFN4CXDK4UnqyUV+RnkYJ/9ZP8DZH+79ARfHit7fEB/7sTozcvzq/OWqREj xNEB1vzrNhlWxIzIIoYlZDDI4LZNJqUBYzJMEyOSwGFxAAS4AzxChAnRJqCP XW1CTJoQ9xD+t7CJUVW90yZ40gQWrvyaIpwk+LASm9b4nW0mRJsQxyziKsED 54mNTVA1F54lsZm9uEtQEunF8cgmJfnRNeXpu9oEAt+wC6/p+pPbpMnwRpuc 2uw5ebT75NGerdjoPbnRd+HU6MXTYyc3BuYmGrtaRQYlE0tKqlgGPRdCp6tT q1hyWaVSUS2RMFg1BQX5celpoRnpoXBOTSElJfrFx3nFRLvHxXgmJ/imJQek JPrFRrpBJEZ5pMR64zYpzomAtwjeKLAJqyKjrioHvu9vypu8i03QLsTomggW G5igLytgFQvhnmFtC2W7DlDKLUMwkfLpJgN/ZLBxeqa/pU0HBimipANJkE0y s+Ny8hLhoqqGWs0qqakt5XDLuaJKnrhKIKkWy2plMrZYUs3jl9exSwrzE0oo qSWUFGpRYm5WZEFuDDUvvoqWCX8i/HFod2t0N8IZcRtt26USMdFkxp1I+aPy Jg18+AW7ON2yvti5NNO6PNsKNlmdb8NaTpYty3NNYBO4WF9qXVlobdBX0ooi wCaRpIOhARhMgrzeD/b+INRqEzTfJCnMKSXCOS3KBcEEqQQiP9m7KM0Pz5vI 2NkqXn6TqqyroWa6X70yaVqfaTq12g02wWByZuLK6UmIq2emrp6ZvnxqCt9A GPWboEEnCCbXLy4QxzJ+dgXrgof4/PLKZ5eWP7P2rX96dv6zcwvAkzvWZpN7 l1YfX998fOs4yoDgZVrgFJvJJqjci7g9l038uRc+e8fesXf8RR+0wN8wQj+q iT7ATXKR5vjICvzFuT7iwkBFaaiZm9KvpfbrSgycZHahPyXFC6Iw0T0nxik9 zC6NtD8tZB/YJJP0CSXakZ3jr2HGqctjpNQwTVm4iha+1Cn6P/7u7vcPzq1N tbHpqfFBB4oS3AyVUV28WAvDt6vscC/duafQrbfEu6XcT8v0l7BDBPo0ZTdN NCMQzIqE63reqkGw0cSar6+Y0LDHlIwhccWMgrtqFG+YdGsm/bJReVQnPaph H1fI1uRgk8VJDbLJ/Ynax1O1T8aZX4/RwSbP+vNxmzySb9nkifDAY+lrNnls YxPZH2QTkd1PQjsbmzyQe9xXej0wBH7VHPF1W+y9xsg32aRHndWjye/Ql7fX 1yCbWFpkHdsDENHAEcAFQAPW5MSkCXwI6/M32QRPmiCYIJvA2t7GJggmNjYh dprsChPCblG2MPkDbEKEidUmYsQTok26W+UdzWL4+8Mrghc7OdyAtkqGv2c1 PTU0wC7Q66OkaDd2ZfqVc1P/9I+P/8d//7v/+l9efHZjcWm2cWxQtbFtE2wP Ydwm8oghgk3GRL5gk3FZMDIFwARYAcoAjCBx2ORNxqzPtOEJajmxsQnaQ7hH EderyuhTU3utNiH2wqN+E8wm2/0mv8gmKjEdVo+wRn19NJ4VJlabIJUQpyji rcQ2Qnm7TXCP2DiFWNyFj4ZHNnnTXPidJV6o36SsKI6aFwXLb9Rvgu8hjCdN iEMYu1qkqBf+TTbpa9f0tWuJ0duu3dUmaA9h6zw+QZOBt22T12q6zlpruk4f 6wWeYI0nW4GNZUQNKcgmnS1CsIlCWKpR1ihlVdjUD1GFTMKAawixgM4sz8rP ic5IJaenkjNBKKnk+DhvgElsjEdyom9mWnBWekh6SmBCjGdCtEdyjFdqnE96 gh9uE4AbvEvM0mTgG6cy+0022bUX3mbQCQIIAgvOEDRoHp8jT/xSgpoiQU2x jU1ABDIeXcSlAUyEdaUqWXVXu2Z6pq+t3cDlM1CPCS4UtFtXLaeMUVkEAXip rC2p5tDY/Aq+qEosrhGKKvmCCgGPTi1OKS5MKipIAJWkJYdkZ4QXZkXDTQX3 JG4TYmUX2uEB/WXQtl347HgiMd7FJngvPDHMejb8Xl2YasZtglVzLVg2V7D0 2dGVdtRvgrXDW21SWhhOtAk+Fz4q8EAcyT4Ry5i44DDJinPLSfDIS/KCKEz1 pWQE0PPIrNJYYVWaoi5XIyhs1VaMWIQLowaAyYml9jPrvVdOjd08P33j3BRu kyunpy6emLho3T0YCQVvhyfOYQSVoMTK59btuXCebG2uhbrgrbMX8bnwD29s Emu0UPUX8ATfpAvZ5Pb5hV1tgrbz+nMvfPaOvWPv+Is+SoM/oId+XB6+r4T0 YUHAb3L8f5Mb8B4zxZWb52dkJfVoqF0aqpaVxCkMoqZ6Fyd7FiQcyY1xxvMm +VH2OWF2ZQmugiKSvjpRRY+Wl0aoKaRJQ/mlWfPTG0sPr62cWRnIiPFKC3Os zgtp4iR2cqJbaJ4dVKcBustQvscIxbebHmiqCFBWBwuk8VJjDqejnN3N5I6L BFMq4bReMGXkjumY/eKKAVH1ohZsIlg1alcb1PNa+bpGvK5ibcqkazLcJjf7 GZ8PV94fq3oyUfl0ouLlCPXlUNEzS/yjetIDpTtuk69Edo+lBx8R4rE1vpbZ o/hGZv9UuhXvCBOspkt44EfBAZuarsdqnwdKr/v6gCeN4V+1xtxvirqtD9nV Jt3KzC51bruO3l5fbbWJBLPJdkEXajbp61DA/xZtbIKmK+5qE7zHBD6xxyIj 2gS+JtgEGKKTM5BN4IwSKGj8IpBkZws8cZSJjU2QRHbGO9rktYyJdeWJ28Ra 3CWBAKHAKhT71/JmEbwueL3o5Q90KSeGjMO9aoOKwWNl81hZWjltqEexPAcr hJbFGfNQr2xsUDk3adwcYs+3Ukd0GWCTEU3ymDoB2WRQTML6SgQ+w3yvUaEP 2GTCagoABWo2AWLgNVpEoUAgehB5AkG0CZ5/wfcQ7lWmYzbRVPZo2fh8k+3Z i9Vo9iIaHEOMXW2CYGLS1uI24VbnEmGCbAILV3x7rl2FgiMFNcjv2m9ikyjZ aRPiBEbUbEK0CdpGmBi7OgVsAuttenE81druzWZmyQWl+Fx4BBMcsDYtJ0Se /ME2QYPCm6w2adRj7zD8WK0tdKF9urB+k5NDF04Pnznef+Z4n/VsjWMDOF5Q TRfYpF5dBT9ZcmG5mEvj1VIg4EIqKIcLLquYVpyckx6ekUxKTwrJTCHDOSba IzrKLSHeOy0lEFSSkuiXFO+TGOuVFOcNMEHNJsgmRdnhyCaMkiSwCbxLqOVk p012nb2IP4gAgu8MTOxUQjyxVQmqD7TaBPFEuE1aNP2wrqaIz6aK6kplogq9 hjMx2d3ZbdIZxDR6LtgEYFJCy2ZWFYNKWGyaQFTN4ZZX1VDzC1PozMKaujKe uEokZQmFVQIhUyypApuUlWaUUFILcuNAJbFR3olx/rlp4XDzwA0Jfyhqh0eV XWzr/l34rsKouIuYQEHc+CNtYtLVovkmawsdy7Nt85Pwe7geftuMD2qX55qQ TazZk+bl+ZZ6HbOcGg0wiQixe5U38Xof7SEMNkkKdyLaJDveHdkEJU2omYGM wnB2WbyoOl3Fy9eJitu0jLEOMbLJyeWOs+t9YJOrp8fhjGBy/dzMjfNzN87P 4xhBA00QQ/AJjDhM4OLOta2aLlTWtTW7BE1dvLJ2H+Ly2pcXlrFthK9ic+FR xgRvb0c5FFTlhRIoaL7Jztizyd6xd+wdv/coDvgNjfxxRcSBoqD3Ew//VbTD v0ty+yt6glNdnp+Jm96nL2tXFsmZsdV5frQMP+BJYaJbXqxLdpQD6jcBm+RH HmKmesrLokycNCU9WlYSbqqIGZAUPDk7+q8/f/H//fPPAy3S2CCH4kRvQUlM a11yNyemi+HXQzvcT3OeyPOcLPYbogW10YO0FYH82nAeP65CkUVXZpfX02pa WZVNtRyLiGuRlHVxmcOSmiUdsol62aia08jW1KI1JdEmp8f1n41UfzFSBTb5 erIabPJsqPj5QMHT1tiHxpD7Cjdkk2dyp6/FB3e1yVfSQyi+lh76RrIV726T H/j7fuDvx3vhn1h74Z9ofO4rPO+ofe4bQx41Rd5rjPjUQDqt9d9pk05Feqcq x6ItsxitNmmRtLfK2wk2AVOAMkAc7543QQ0mqJoLtwniCWYT3RttAithtA8w njRBMDHpWDuTJn8qm7zKmKB/FTdt1XSBTSxmMQpYhWIr0iYhsgkqaRsf1KNF wuSwoa9D0t0mGOlTTQxrpsf0U6NaUMlIv3xiWD0zrtscql1oKyHaZEQZOyqP tLHJlCxw0tonAjBBNoFr1DlCHGWChEK0Cc4TfGNhPGlitcnWHsL/FjYxKKt2 tQlKmmD/qM4qtmk22ckTFLvaBLljp0p2pk6IXfD4oBNYTNIKEncGjhS866Sc go01AZuglgpYdaN9uvBeeHwPYXy3rj+5TbCZFwSbwM8UnjcBoZw9juVNzp7o t8bAVhwfRFPj4Yx64cEmJl2NXsHUSCtVYmZddWEtM0/ApsIFsyyzuiKnGNbb aWGZyeSMpBAQSmp8YEyUe1ysZ0qyf1pqYGKcd1S4a0SoC9gkOR6DSXqCH7IJ BNgE2Q3eq2p6GrxLdVU5vyhvsnMII7FqC//E10eZbN1OCCavhTWLARBgVxUA u4BgYj5dxC9r7zAa6qVqrQBUkpufVFicVlqWI1fWjU10Hz+5NDBkQdNPIGgV +WXMAkYNpZpdWl1NZcA1M7+MllmYn0ApSs7JikpLDokMc4+O8MxOIZfmJwCB USIPzvheDehORjMZgScyHh2fyfinsgnchEM9GrDnypxlYsjQ0cwzqitqmSkQ ehVtdEC5MG1anDFbR8M3GzQVlWXx4cEHcJsEe3+Aarp22iQjxtUmbwI2qSgI q6XFgU2U3DywSYumfKiVPz+iX50yb863nlnvvXRi5PLJUUwoZ6aunZ22dp3M 3rywACTBJy3i5VtIJaimC3fKrja5d3UdG7yIpsPjc+G3syF4RwmiCr5dsE19 l02gT/xzL3z2jr1j7/iLPgr8P6aSDpZFOhYG70tw/eto51+l+v6mPPmIqCSs TVrQZyhrkuaJK6IZ2T7lmf6lqV6F8Udyoxyzwg9mhdplkQ/kRx7Mj7CrTPXQ Vye2CrJV9CgZNVRLjx0zMP7p6cX/53958j//+QcVKyst5GBtTqCqPKa9LrGP F99XG9rL8Ommu4/k+Y4UBvRSAttKgw2lQcKyEB4jlFEby5Zm1qgK6eKcfE4a VZhXIszPbaVVTQg5yxrBqkG2blYvm1RzRtmKXryi4W/ItSsyy4J0ZVx6bkJ5 Z6z6y7GqR5M1z2Zqnk2WfzNQ8HVv9lfNUQ+NwQ+U7g9lh7+WuzyVOYI4Hkvt H23FoUfwoQQ7fyV1wONryVZ8K7X/9hVAXu0Y/P3O4O/7jrfvJX//c4Ednjd5 qPL6Uu7+qcLzC13AvcbwLxsjbteTT2v9jqt81mS+82K/STGsWsMHJdFdioxu VW6Hvryzoaa9id/eLGm35k1QTRdqhIcFOaAD1TLBshwCNcKjDhR0QSzowtMl 8Lloojp8iPpNiDZB1Vz4hl3IJrDuxWFCXB7vTJpYbcJ5PWD9DKvoWus2wrhN uG1mHt7tTgwiT7aSJliIIawksT5ujc5mrMito1nQ3ykfHzRMj8L70AAkmZsw jQ9pJofhzdGMD6pnJ4zTY7q5SeP8FFxop8c00+OamXHN5hBrwUId0aUPqhKH 1Qmj6rhhRfSIPHxQHAI2GeSDTbxHhVhNF+AC9cLjm3QBNHCDEKeZ4K3uxLIu Yr/JK5vIXs03AZugfpMua79Jq17YbLDapL7KZJ1vsqtNdo6VIdpEKSqDZSS+ ZRMRJlabvGqEJ8Kk7vVJdsQGedwm8Cm72oS4dTAuFBuboLwJ0SZoRjw+KR4J BW+KLyuKL6ckoJouOOM2QakTfPwi0Sb4iBPiTsKvz17E5sLb2KTLouloUwFP wCYIJo1mcZNRiAUGE0Hjq5ourN/kzObAeaDHscEzx/rPnRg4d2Lw7InBc1gM WWMYj9ObgyDlrlahWV9jVFeaNOwGNVvEodbQMytp6fQieL2JDGpKYWZEQUZ4 VlJwekJgaqxfSqxfTIRbYpxXekpgaqJfTLhraJBDaLBDUqx3asJrMEF5E9wm KG+C2wTtJ2yzV5uNWYg8wcu33m4T4k0lqEFlXdvBKuKzisQcqpxfhg1hZINN SoRcKpddpJCz5QqOVisUi2s4nDIKJSM7O14orFKpeSJRdW1tKZtdVllZXFiY ml+ckl2YmJEXl5UXn50bl5EVnZ4ZlZoampYalpUZmZpCTkoIDA91iwhzz0kL gzsH7jFiHRe+fRw+Lx6v7EKpE5uJJ7vahDhp8U1haRTCb9rZ8caZMXNXq1gu oDBp8anxnglRrsW5JJmwaKhHsTgNcmmdmzIjm4QFHQgPtgsL3B/i82Gw94dw DvX9JCrQLjbEPiHUMTkcbHKYaBO82QRsUp4fWlMSw2emyDk5WmFRm4450MKd HdQim5zb6Lt4bPjKybHrZyauA0zOQExdPzNz49zctXNzV8/NXgOenJ+/fmH+ BggFMHJxETtfWrx1een2leXbl5dvXlq6Yx0HD7ElFKtN7l/bQDb50lrTBTy5 f3ntzqXXRr3j0+F3zl4kBtEme/0me8fesXe8/SgKOVxMPlIcdiQr4FC0y6+j Xf86M8SOkeGrrknp0tIsKoqOlyZkRJZne8GDtCSPgkjHzJB96UEfZZP2FYQf zA/bnx+6ryrVrYmb3inN15RHqWjhiqrUbh3j7x+f/m//8e5PX27ISkKLwz5R FQeYGeE9dXED/MReTnRHFbmtIsiSF9iaF9BOJTdRyNr8QGlRkKg4SFaXZNIW c7jJafneYWlO5IzDybSglLYM1lKdeF0lXdFpVs3yWZNkqkG2bJItGZXLyuYF yeAMb3Occ2WK/+lw2Rej5Y+nq5/P1zyfoj8dyvumL/OROeyhMeihyuOB1OWR 2OErMZYNeSxxhGsUD0X2KODBnfFcYv9CbP9SggU20GQ7vhdj8QMhvufvB5u8 4B14xjvwNc/ukdD+vtDhS4X7F3L3GwrP27qAL5sjvmyNumUOO63xO6nyPaoM WJYHzUpDxiQRw+LoHkVmr6agt76yt5HT1QzLb4mlSUK0CcgC2QT+z4g2DcbD JmOCbx3c2y5Hu3LhuoFHUJ0YgMKkYwFD0OxFBBOFsBSu9Qomyo+g+YlwXa+u btDWEGHypnEbNlsN4yPj8YGMBHq8ChuboE5na/BQ7gYkBa5pM3M7WzCYdLbw +zoko/3q6VHj/KR5alQ/NaojhBYC84g1gCQzE+rZSQ3E5nDVvKVwWJfSr4rD 5psoowbQBsLiYLBJP897iO8DNpmQ+E9aJQIwQb3wcA3WIBoEz54geqD/hNtk Wh2GasCQTdAX6ZEG9MiDe9F8EzW1X1vdr6vr1kk6deI2sIme22hgmQzMBkO5 2cDaaZNdp17a2ATWkKgtemcQMyY2E0lwniCb7Lqj165z4XcOXoSwKehCjSS4 Skry4qm5cRCUnFi4RjwhjowvLYhFk03QPlT4XHibTbpsbIIG5SCh4CMX0bxO 6+OqnjY16oLHbdINPGnXgE1arTYBmJhNIlO90GwElQga4WyE+x+zyWi/YWW2 /ezmwAWwyebAmaN95471WxMoQyhXAnH+5AjExdNjF06NnljvnRmr72oVmPVV 9RpGo56Nvk16RSWs84ESlbQUeI156aTSgpj8DHJ2SlBavG9qnE9StCecIRIi 3SNDnCKCHaPJLqjNBK/mgidDUHIj4XPxfhPcJlv7RW/POnlTTRfRHTaQ2fm0 XXb6qslHIWQVYGF9cKszhUcRcYsFdUU8TgGXU8BhUUUCpl4raGtRN5rkSjmn hJLOqS3VqnnwoEErhODV0UupGfnUlOyihJSsiPiUkNikoISUkOS00LiEQGz4 S2JwfFxATJRPKNktLNS9IDMKbhi4wVDzO7pF0U2IPsQ3x7YZyIhaTlA7vM2U E6JNiLHTJh3NYvQbGH7fwg9gLSM9I9E3LvxwZIhDTKhzQSapzcSfn2xZmrFM jNTr1Qw6JSYi5FAkyT486GCw90dBXh9CkH3AJgdjgu3jQhyTQrdssmtNFz2P XEWJqitPBJvoxZROE2u4QwQ2WZ9pOr3adeHowKVjw1dPjl07NX7t1OT101M3 zkzfODN78+zc9XNbceP8PMTNCwsQty8tfXp5+bMrKxCfX1394tranevrd29s bE1dRGFNiCCboLIugAmKO5dXiQPfiU7ZGbhTcJugD//cC5+9Y+/YO/6ij0KS axH5CCXSIyfIMdrlb6Jc/yYn1KG2gNwgyOvWV5gl+ZKquFoqiZrmVp7mTYl3 zQ07lBH8SUbwxzlWmxSEHyiMOMDJ8bGIcrpkBdqKaA09Ulad2qqifX5m+Ps7 axPN7ILQ/ZVJh7UlwWCTbnbMIC9hgB3TyQhpKfG15Ad1FpMacnzUmV6qXD85 NaShNlHNT6suI2dle4TG7Hcn/Too4WBmOTmrK6d2iSNelcuXNarFesm0QQY8 WWmQLOllC9KGWX7fbN3mVN3FKd6nI/Q7YxWPpqqezlQ+naCBTZ72Zz1sIN/X B95XuN2XOANAnogOYjVd72yTp5JDzySHXoBQMJ5sjYDfEop4SygovuMf+Ja3 H7MJ/+BX/EMPhA53hY5fKj0+k3vcUHjd1gfeaYm80xp9szHcahO/TVXgijx4 TkYal0WNSGKsNsnvMTJ7zJhN2pvFu9pkuFc7NWJC6RK0ia5NNRexBR6NgCd2 rKDBi/AheAG4AQwBjCCVoIBr0Eq9pnqnTWyaTXa1Cf7IL7IJ3myCYIJanrHY YZP2Jj7YBFZ9ve3ioR7F1IhhYaoRPDI5on09cJhoZyZe2eToUOVcW8GQNrlP ETOgjB5URPZJQoel5J02AVOAJlDeBALPm+A2wcu6kDtQyzxRLjZJE/giPVL/ LZso0602qerTcjo1wnaNsEXLb9bVmfU1ZiPTZKzYNW/yjjZBbdHvaBM8/bGz L544Sh7+k80mXW+p6QKY2DSbYOLYTpSAR4jxb2cTBJO32wSVdb2DTfRgkzNH +88DRqw2ObvZdwZLoGBBFArqhUc2AUGbdJVgk5Z6LnyPUFkavIR6dQ28IpUY fu7KgA/wGuHFVtPTinMiCjJDASlRJGey/8GwQHuACSAF9b/jMMlJDc5NCyHu IWzTC29TrEXMhuClWTZTTn6xTVivYCKqLRRZvxrqWwGbCOuK+OyCutp8Niu3 pqqgurJQJGA0NyrBJqCSSkZ+bQ1FwCvXaYAnfImoklVNoRan5hYmZuXHpWZF JqaSE5KCExKDEpOCExODUpLJyYnBsVG+YSQ3UtDh6Aivwqzod7QJgomcX46a 4lFZl0ZSRWw/QUJ5d5vALTfSp5sdb4JfwkZVZVlRTDTZCWASG+YCNinKDm02 YjfM8mz7+LBBJaOVFkZGkR0gwgLtwCaBnu9DkLw/jgywA5vEkzCbpEZiZV0Z Ma74Pl2orIuSEVCeH1pZHMkui5fWZhmlJd2N7JFO8fyw/uhcy5m17ovHBq+c GL1+euLGmUlQyc2zM9bAbHJz2yO3Li5CgEogEElwlXx5Y+PuTYJKrHEPxVVr s8nV9QdXNx5cWUdlXXcIJMHdsTONQtxhmMiTPZvsHXvH3vF7j0Kyez7pSHGE Zz7ZNc79w2i397JDnfilsa1KWpeBqeZm1paGV+T7F6YeKUvxLIxxzibbgU0y Qz7JCz0ANimMsCuKtBMVB/coirrlhTpGjLosgkuPbZAWTXYJlwbkysqEvNBP KhKddaUhpvLQrurI4br4UU5cL5PcQvHpKAnVZXhoszzVuT5GWpiFn1HPSmCX kAqSXWIi9oWFfRwU+mFMyuEKTlJxV271aDlvhCWbFGumNJJRtRpssmyULulk 8+L6aW7/LPfoTN2ZafbtobIvrDb5ZpqJbPJ1b8aDbZvckzg9EB56LLTDeuHf 2SbfSA49tcYzif0zXChSLL4jpFHAKd/y7V7yDjznHfyGf+gJ3/6+0Omu0OlL lfencs/rSp/bhpA7zdFftMbebIw8pfI9ofQ9qghYkQeBTSZkUaPS2G5FxrZN 2J1NgBFbm+D9JngpF/IIEgoaRGizPReyCXyujU3gGrOJpgY1m8gFJXig1Ak2 Gt7AQQVdWzbR/AKb4Jt6vaNN8DYTBBNYv6Gw8mSr7cVaEsa1NPI6mvmw6uux iMAmk8P6+Umzta9EZ5M6mR7TYjDBbKJFMNmySWs+bpOBt9hkuxEezTch2sSm 5QT3C84TPIFC3KQL20MYbCIL6pHHIpv0aTCbdKgFFrXVJnou1qHTUN1k3afr l9pEr6hUCGm/1CaoKoZok12TJniv8ZuCON8EHwePbIJ4QlQJsabr38gmxKQJ sgniyZZQtm2CarqQTTCYNAjfZJPlbZvA+fRGL9jk1FFsY67TmwMokFNQ9uT4 Ws/0qBHZxKiugJ8d+PuDTUAlcAGhkzPBJnCGLw4XYA3wSHyEW2yYa3iQA8nP Ds7wYUqsd3KMFxq2CIFUApGXTkIFb4ySpKqyVLSHMJpvQpwOj08twXmCQ2NX mLy7TbbSJVaYiNlFYuszEYVE3GLMJpxCLvCEDQwpopWk8+rK6tilMklVb3f9 QF9jo0mqVrIVMpaQX86syKUUpeRkRWflxGRmR6dlhCenkAEm8fEB8XH+qUmk tGRyUnxQVJhnsL8TKcA5MSagKDvmHW2CarrAJihvgkgCF8TNu5A4doXJrjaB uwt+38IvYbgrVGJacU4Y2ARUkhB5JCPRl83MgN+38Ot3crhhuE8jERQV54ZG kuwjQg6R/fYR8ya4TRLJzikRzmi4CbGsC87UzECACbMoglEYXleeqBEUdjSw htqFMwOatenGUyud5zf6L24OgU1unp0Cldw6N3v7/Nzt89i0kVsXFpFKcJjg NsFhgmxy7wYW929uYoMXrRtwYfPcrbMXH93YxOLaUeDJ/ctrd1+v3SL2ksCH xOEm6Dk2PNmzyd6xd+wdv/egRPvmkt3yyG6ZQc4x7h/Fe39CifeRVaZ3aCvb tAxJdQqzkEzL8S/O8KIlexRGO2eRDqQHfZJF2pcffrAo0r4oEs4HFWXhg9pS 4ImeGasoCWXTohW16UZRXoMwV12dVJF8uCTmoNUmYbhNehiklmJvVa6XmUbS F/s3V0Z38tIUpeS6XJ908kdJwe+H+fx1uP9vkqMPFeb41VYlFqnj6IbUKk2O 0ExXtXIkHXzDhEE6p5HPA1KEzdPc0Tnu5hzn1AzrxkDJF6PlVptgeZNvBnMf d6U+bAh9YAh6oHS/L/1D8ibwZAi8Nf6pVSgvpf8/e/fZ1Ga27Yu+V69OzhgT bbBNziCByDnnHESQQKCcAyAyIgghRA4mZxxwzhHn3O4V9tlV+55za1edN+eL 3PFowvRjSdB2r7PuWi946l8qWci0QcI9fx5zzGH3P0TbQsFI+U+OzX+wbf7G sf3EsfvAtX/DP/mKf/Klwn1L4nJf5rmlDnzRGfoMbNJO25S5XZS4rYs9l8U+ xj1dIaPCMMImii9s0tUGrLDQCw//1wOboN1cuFxC7jTBs+DRni6EEbhFe7rQ I8SeLhWTbBNcN1GKStFo+G2bqAibQFrrf8cmZJjsZhPcxWwShBQTmxBr0R31 oG56YiplG7unvU7XxRvRy8AmsxPNMxONwJMvU49gMjtZP2u0ydw5FeTCCK6b hA/Jw4akNIOIYnFPF2IFqnegc7oAI7jbHdtkWkHBfiFXTzBMyDbRCb10Rpvo STbpUXB7lLyuBl6XmkN8jW01mnZmu6X5JrvZBK17yTapq0r/x21icqjXbjYx HwqPZ8Gb2GS3/N+1CajEBCbGyDBPtkecGDd0gU26O6WadnF7m3DHJtxdbNJt YpPL68RAExTkFAiqnlxc1Z0bJbqkm1XlYJNGWQX8yeGPCn94dKIaqASdXQBf y+qcblCrzEoOOnni0InDP9od+8Hd+QDABB6BJEZ5IpUgmIBKMpMCIfDNgW9R WX40aoRHrziowXyiIj4HmCwUMkzw8/EeMBOtWGilhyCV1OQIWblC8vPrtsNj 5/I4eayanIrytAp6Wl1tvlhUwajKqqstGBvt6Nc18HklpcVJOVmR6am07MyI lBRaYlJwQlxQbLRfdKRPZLhXZKhnQkxgQnRAdJgX1d/Zx92W6ueUFBWQlxb+ TXu6QCiIJ6h6goJPFf4mmEAMvXJ0Dgn8ldsoK8/PCAaY+LodiY9wBYQuTnct nNPMTXbA7dhgvYCTnZXiT/U7QfG19vc46u9+JMDjaJCXVbDXcbSnC2wSFeAQ R7VgE0hBim9lHg3bRMHJ6m1iDHVzpw0KsMnl5d4bGwO3zhOlkwdXJh5eJXgC Nnl2mzgm6wmpaIJ5gjZ0IZ5goWCboNHw77cugU0+PrkEKgGevH+w8f4+ERDK 252ed3OhmNgEP8FEKPs22b/2r/1r7ysn2COT4pYe5BLv7UA7fSTG27Y0Kaie na1tqGqTFrLpUaVZ/oXpPgXp3oUxZ8AmqYHWib5Hkv2PZlKsc2l22cHWeaE2 jVWRk810bBNBRQy7OEzKiGvipDWyEsuiTxaFnlDm+zaXBvUyQgys8AFmSE+J b1uOi6osQEUP0LCj6umU6uTTpdH2yT4/Rbn9OdL155TA4+lU29J4D2FJVE0m JSXrVH6RR1VhILciRsRMZQvy1N18dl8dr79WPlilGakan2JemGFcn2U+GMjb sUk5sskHbdz75kCwyXv52T+2p+uDwPqjMZ8AKUIiIJS/i+1Q/kNs9z9QRHZ/ 59r9jWP3F47dJ679e67DK/6pF3ynlyrvx1K3+3KvJ02UZ50RW5rIRx3h2CZL Iu9pge8YnzrMp+kkSf2KDF0jXddS3dsGK3C+0SY8E5ugM4RxywnqfweSwPKJ bBN8dDAulOCx8qiYAkxANgGPiDn55LoJsgnqLoHbZhVDLa+ER1rqmXu0nJhX TL7eJuQueLynC9aE7epakobASiywSVdrXVcrq0/DRXWTmfGmmQk18OTLNMxM 1BthUj87VY9gQraJQfb7NoGQzxA2sQmeEW+xbkI+ngvhBT6/TuipE/noxGF6 acKAPG9AUaFX1vQqeb0qfncjv7uJS3xp7azuzpqvtwkqmmCbwOoUrVTN8/V7 ukxOGzY/yMscLGShoD1d5EZ4EAf5bK5/qk3IW7kg8CHjR2VknvR/OXux8/ds Aj9WSzPdVzcGblwcAptcWe+/dl5/aa0fDAK3kM11PQra3HVhpQ/emSDoJiW9 QVYCDIEXCL4E9GI1KRhgE5WYjm5nJzr/+/95/X/+96cnd1fnJzXwnIqiONTq XpAZCgzBHgGqZKdQ4EMQUAm9IAZv6Np+ic32dOHzgfFERXN9/AGbCFhGkrBy RbV5ROryPx9BzM4TcvJF3AIRv1AkKGLVZNHLkkpLEmpZOY0NrCZ1nVhUxq7L 43ELqyrT8vOiUlMocbE+6WnByYnB8cYSSWQYoRIIkCQu0jcmzDuC4hro6eDn ahse5JISE/T1NkHBO7swT5TCSjJMyId0mcR89iL8zTw91ro827O20DfUp2Az 0lJivSCAlO5W7o3NibvXZ+7fnLuwMjA5opbw83LSAgEmQT7HsU0o3sdDvK3B JuH+dlGBDtGBjvHG2Yt4TxeyCTqnqzQzCM2Fl7DSdtvTdefiCOTeJtFyYtzZ Nbt1c+HRzXncbPKItL+LLBSUVzu98Nt7uoyHA4NK3j3YeHNv7bWx0+Tt3TWi dPJguxsF88R8fAl+Au46MeHJv3rhs3/tX/vXv/WVHeKVQXVPCTgT7WFHO3Ms IfBURQatXVqmVVc3CvNZpVElWQH5aT5FGX75Uc5ZoQ5gkwSfwwk+h9ICrXJC bLOoxwsj7Ds5yXOdTJ0ku7EiQlkSwi+J5JdECEvDO/iZamZ8VcKZXMpRTpKz Iterszyoj0nrq6J20/06S7waWDRVTQg7z600wT4z+HC81w/pQYcKaLblMacr o11q4r24KYHGBJUlO9ZmuQlSfYRpQbyk4NJ0Wi0zo1SSRZdl1qnTGzuzDbr8 tdHSm7PMh4Z8sMn7qYpPU2V/mShEdZN3TQFv6r2JPV2CP7Kn64PQ+oPgOMET ofWvwhOfjDz5245NUBBP/sa1/ythE/tfuQ7vuI6v+E7PCZv4PpJ63FN4P2kJ ftYV9UQT9agz6orC45LMfUPiBTaZEfqNCQib9EkSd7MJGoNInm9iHvMNXWje IuqFx3u60LFdqG7SrGQAQ8AjgtocuBXBoqIuF+7Ag4ARkMu32sSkYvL1NkG9 8OSdXRBiqmDj5wOp0PFfxm1dkFqwyWCfeGJIBTaZHrdYN7Fgk/ND5bOazCFl jF4aZpDSBiXBu+3pQgwBWQAr0Fx4fIYwbjZBNjHpN8EtJ3h0I4KJgeMONukj 2URPsglRN9mxSVdH9R+wCSx0YQ3/rTax2AtvcQzKbjYxn71osRcezzfBHfH/ pH4Tk4qJuU0InliyCcCkuYn7uzaBW2QTgAkYBAJ3MFJQ74mZTSpQoQRt6wJF wi/hVikqg1/Cg8M61YVlw+unm//196171+fhDwzr/6qSBPjy89JDEEZy04Lh PgILpLwwtrI4HmDCLEuCVxy+SxZ74U2yN0y+3iafVVKbJ67LF++cQkw4iFsg 5hUS4ReBTSRiOoTJyCgrTaysSGXVZINTGFXpRYWx2VlhKJkZNOBJQkxAXJQf kCSM6hoe7BYV6hkb4RMd4gEeCfZ18jl7ws/FJprqnhwZkPvVe7rIXSd4W5fF fpOvtwm89+Dv25W53ktrg4vTXf1dYrmwmFudIeMXaZrZ50ZbZifaN5b6V+e1 Y0MNEn4+2ARgEuB1zMf1oOfpn7zPHgChUD2tgCdgk1jKKQjuhcdnCGfGuuUm ehWm+pXnBDMLwznlcXJ2Zou0WNdaM9LLnxuu35jtIHrhLwzevTR6//K4sR1+ CuXh1emHV2fMG+HJNiHzxKTfZPtw4Pvb801wLzxxjPC9NYsqMRfKvk32r/1r //pjV2Z4YArVO87PJczdMcTVJjnEta4oQdtQ3VvPULEz64ojyrMCClI88lPc s8McMkJsUwOPJ/kdSfI7nBZwNItqnR9mWxJ9spOTBDbpE2fW00Mb6KHC4gh5 RaygiNZUk9RUncDP9c+hHCukHmPEOIoyXRuK/FrplDZ6oLrIR0wPqs5yLYy2 SaeAd35KCzgM2GEmeJRGnq6K8aiO96mO8+UkUyAVCXbMpJPseBdOgldtrG9p nH95Gi0/j1ZaEl5BD+Iwgtql0cv9+TemKp8MFrwEm0yWfZwo/jSW99ehtE/9 CW/Vfm9Unu+kzm8F9u94Jz5wrT5yj2GY7ISgikWbfBQCTKzg9lfh8U/G6gnk 7yI7lP8Q2eP8levwF47DJ67jr7xT73mnXvCctjinnit9Hkrc78q9HjdTn2ki t7rAJhHXVF6X5WATjyWh54zAZ5xPGeHTdOJEvTxd11jW38LUtrF72ogjc/Fk drgFUCCboNYSE5vgognmCfmcLuO5u3ywCQr8EqQA4kA2QSqBAFJQLzyspsAm 6PTgJmUVPBP1m+zWWmJiE/Mh8iSbcNGY+x4iPJQvz+niaZqBJ9yORjYRNbuj CQKLUgghFGNHPLGny2gT5cy4mtxpsg2TsfpZo03miKjmp5TzU3CrWjfQ5zTZ I6p4vSR8QEwbFIcMiqjEUHiB/xDPa4jjMcr1HOd7Tgq9x43KGBV4D/M84XZc 5IcmxU+I/SclAedkgdNy43R4JXVMuL1lC8EE2YQ8eBHVTQibCDz6RT56cdiA JH5AlqtXlOuV1VrCJjxNA1ejZnc213S0MtrbqjQtn+ddWiSJSb8JLHFVsAg0 2gSf02ViEw7TQjXEYr7yaZBvsgkWCm6KJ58hjHlSlE3ABB0jXJYfvYdN8OnT yCZIJRb3dGk7pIgnSCh9IJQuRV+3Au3pApu0tQoAJk1qTmsjt7XRaJNGDmGT xm2brMz1XD1vuH5x6MrGwOZa36VV7fxUKwQMgoC8MqdBNrmxObK+2INsQmzo kpc2ysoJ7APtG2rg5wh+uMAp8JIhm8D9FhW8gkxACnx18AjqkYdXEACCMQJ3 IOhsLvj+YJhU05MhiCef+0F2qicYIObiMGmZx4UVc62YN6GI4Heh1OYJjYGn wcsk5RVJiBQSt/wi4ImAUyQV0fmcIhYzu6w4sSg/NjszLD0lODkxMDOdlpZM jY/1hV/C/YRo/9hw7yiaRxjFJSzoLNyJCfWk+p4KcLfzd7P1Om0Ft7E0z9SY wPy0CHi3VBQmwZsNewQLGp/ngEsn2CZoCCMEl06+tdkEom0XTA42rsx2X1zW ry9oV2a6Z0ZbJgwN50aaJgYbFiY74EPnF3Wrsz0j/Ur4qzUj3i/Iy9rP7Yin 8y9uJ3/0dP7Z1+VQkPvRYK/jYJMYyslYqhPYBBdNACZZce6oaFKU5k/PplYX RYBNZHUZzZIibTNzuJs3O6zaqZsM3rk0/ODq+KNrqB1+6tH1c4+uTxsz+/D6 3CPgyY35x6RzuoiATe6tPL2/8uz+KuT1zrauL21CzDd592AD9cK/vbtmPKdr xaJBzAHy8t6aMasvtrPy4t7y87tE/tULn/1r/9q//q2veBolLjgwjuIX4etG 83DKjPJXsAr71XXt4jJxRXxdPo2Z6V8cfyYv2jGNak0k6HhakFUa5Vh60NH0 wKNlsacqEk6318bNtFdoRemyIkp9GU1ZGaMoj5aWhivKI5trEpT0CEaSazbF KjPwSKrfoaxAq9IIh/Jox0KaNT3CsTDYJtXrYKr3oXS/o/khDkVhTtXJfqVR brk056JIt/I439JYb0hhvFVu9JHMcKuMkBOZIY55NJf8ELfyaJ/yaM/SMPuq WPvGcp+l7qyro6XPhgtfj5d8nCr9NFn0G2GT1L8Zkt42+LxTeXyQOn8QOXzg n/jAOfqBffg93w7FqBJiSCKEGEey8zjOJ8FxlN8gfGsiPOu/8+1w/oNnj/Ib l4DJJ+6pX3lO73hOz7lOT9gnn8m9kE0eNQU910Q874p60hF+s97rCthE5LLI d53meU7wg8aFNL04YUCWpm8s1bcw+trqelqNfeI7k9nhFtsEVkpgE9x1gism 5jFoZeSRi6AS1HUCnxY+J5psAjyBAEzEnHywCTwi5RXKBcWwmiKGLaqYcAeV UWAlbDwvy/Kw+D1CbktB/ezGnhGOMTxj8ER4gAmvs4lLRM3fThPf+Aix18vY BVMLqz59j2BEL5sYVoJHJkdVk8bjubZ5MlY/M6qam1DNQ8ZRFAvGrOnpC125 443JBmmUXgQ2oY1Iw4YEgUP8gBG+7yjfZ5znPSEgMi7wGTPLhMhvUuw/JQmY lgXNyClzymAInm9CDpp+gneFDXI9BthueoHHgMjHIA41SOIM0my9vKxfwehT cbX1vM5GToe6tq2J0dJc3tRc1tPORa/R3t9YIo3EiBNsE1iUGhmSiW0CVEGx WPjYmx4mW7/26IUnt8ODTUyGm5B5gksnEPNJ8URyiDYKCOqngD85rHjxcBNk ExRy0QTDxPyQLkhvu7i3XQIBpGynU6bFNmkjGuHBJmpi2CKnrd4YuNNQh2Yv jg40rM5rUcM7AGR1QTM7qe5uYwE9+LXpbGaySlI0pJOcX9aifpPV+S6wSXdb 7bZN5PQvU2HkSUWDFKWyQVqFIuEWwRcLLyU8Dq8miINeEIOYBioBoaBaEjxI VgkK2AS1w5tMMzHZ0GUyHR53pqCtX19rE7MGFgj6JPDHRkjZDr9MJiiHCDkl rKrsssLEvMzI7LSwrNTQjOQQYvRkXGBKfFB6UnBcuHd8uHdSlF9sqGck1TWC 4kLxdnQ7dfiswwG49TpjFeTlEBfmlZ1Mg/cPvJHgrQVvM8QTkwE9mCe43wQP YYSAStDOLjyKER/VZR5zsOg7hNNDjetgk8W+8/O9cAduN+Z64I5JRnqUouq8 pDDPYE873zNHPE8dgPicOeh7luiFB5sQ/SaBDtGUk3HBjsgmKRGn0W4uSEGK L6QkIxBsImAkKbnZLdJibXP1SI9gcVy9udQDMLl3eQTy4OrYo+sTj29MPrk5 tXVr+tmdWciTG3PEaV0AkxvzT24uoPaTp0aVbN0n8vTBKpGHa68fbzfCI6G8 Mc5SfGu0idkZwhZsYnGmyfO7a8asbAdgcm/pxf1lyL964bN/7V/717/1lRBK jQsJjKf6h3mdDfc+Q8+I6pBWa+tr1Nx8dlE4IzOwMs2nKO50bpRDSpAVJDXQ KjXoWCrAxGiTkmjHukwvnThjtrOqR5AqLQxSFFNVpeEo9WURzVXR6sooeXFI eczJXMqxeLfvo898l+j5Q7r/L6m+PxWHHM8JOJTi8WOW/+HSMAd2mrcgJ5Cd 5sdK9qHHuFUleDGT/Eqj3cuiPXJjrXJij6eFWqWF2OSEnSmN9mGl0gRZYXXJ AYqCoGFJykpH7q0x+tZCzYvR4tdjJR8mS7ZtMpj6F33Cm3qvN0r39xInsk3I DEE8MVcJykeiRcUG5RMK78RfeDaQv3KJ/I13AgVs8hv3JNjkA+fkG87JFzzn F4IzL1S+j2We95U+Wy3Ul91RL3tjnmoibzV4X1N4nBe7LgncZvhek0LKhCh0 QJJokKeDTQZambp2dm+bcb8TqW4CskC98GjSIsBkeqz1d22Cuk70PRI8gREe IRa9jSzEEDTfhFudyavJ4jDTQSgQeBDt4EKHdBF1ExUDdcfjYfEmBwV/q012 ePLNNoHPg2wy3C+dGFJMGWEyOaLEmYIMK2bHjTwhYKLENlnVl81v2yTS3CZj fN8Jvs8EGGQXmyCYnJMGIpvMKqhgE9zqjosmuG4ybjzsCxVN9HWuu9mkV0XY BF4RbJPOllrMQPR9RvvrzAOLdvMzhNEOH2wT+CWsXdlVFvZlmezsIu/vIu/7 +l2bkPtN9rCJybYu8+nwxHN+zyaYJyazF9FoePLIxb1t0mvc0KVpF3fsNJs0 qTkWbQI/YmsLWtTtvrHUOz3WqNXUcWtSs1P94iPPJMW4luTRmpT06TE1PAH8 As8Bm3Q2VzerynezyQ5MvrCJlFcsF5TAg2p5lVJUBst++PKrShLKC2PRUcMQ 1GaCMIJfa/RyA0i357bvVE+I/VeWtmyRbUKeC28eCwcIkzruyXIhd7ggoUBk fDrARMqni7mlgroidnVebVV2RUlKaUFCflYU8ARggmySGOWXHO2fHk8BnkSH uNP8nX1crJ1tf3Ky+RECNgkLPJMY6Ys2dME7Ct5d8DaD9xues0M+zwFNDiX3 wiOb4HZ4tKcLdZ2QDYJI0qyohVi2SadwZlgNGLm0pEMqubCgtWiT4W6FgJGT GOpB9bD9HZsYG+Hxnq7MWDcIuW4CNqnn57bJS/taakZ7hcgmN88PAE8gD6+N G2Fy7untGVDJ87tzkGe3F5/eWnx6ewny7M7yM+M+LmQTpJJnD9eeP1p//njj 7RbR/w5BvfDvHl+AvH1AwATNhX99ewXlhbHh3WSmieV5i3dWnt5eQf91IncW n95Z2LfJ/rV/7V+/e8UGBybQKGATmueZmAD3uqKUvkYe2KS+LoeVR6OneJcm uhfEOmVH2CUHHksOOJYScCw1cNsmGUHHwCbiwqDh+oJ5DaNPnKEsDZEVBqmL aU0loU2lYeqS0IaikIbi4CZ6aE2iU2WMfWm4dWmEdXmsLaQ08nh1jF0R9VBh 0CFZrs+gKG26sWRQnDWqKBqS5vdy07vZaV3s9PaalM7aNBEjWFxN49Np3CIa OzesNj2UkxEpSKepS+LmG8uezsi3prkPxumPJktfjha/Gi16N17063jhp9Hc 3wzJv/bFvlJ6vJK7vhOfei+0B5t85B77yDli7pF3PFuLNvnAd/jAI/KRZ/+R Z/crzxbyiUcI5TcuyvGdOIJNPrId39U5vGY7vuSffi12fVnvt6Xwfljv96yN 9kYb+6Yv/kVPzO1Gn2tKjwsSt2Wh+6zAe0pEnRSHGaRJg4pMQxPd0Fbd38HR dhhHfpjZBPWbAEnQWTEgFFg4WYQJsslgnxwf2IVGw8N9hA6kEgm3AGBSV5XG YWZU0xNR74lcUKwUlaKayLZNlNuzFy0eyfVNNvmydPJtNjH+GVhgE3SGsIlN JoYVRIbkk0PymTHlzLhybgyimBuTQ+bH5Kv9ZXOanLGGpAGjTQyikGFJ6Nfb BGBCtgniCWp4Jw83QQ0peOridtFkF5toCZtwOxrYYJNWdVVzEx1s0qaugRcd dxuh7575qcLGwlY14kmTgqEQlsJalPwP6WjVumOTvRpGzCcqmg9V/MozhPe2 CS6a4MOEcb8JGg1fnBMB63BsE7SnC9nEpHSCd3aR58Ijm5jwxKJNujokAJPO NlF7q2B7uEkzr62Ba26TyeGm9cW+yxsDm+v61fkuQ59Qys9OS/AMCThB9Tse RrFLiDrLqkwwaEVrC93wNLDJ5HA92KSlvmI3m9RLykmpRAGYwIuImlPAJrDI hzU/oANePiQU3GZC5qfJgWxknqDeE4tBSBGRWkXMm00gqAZnEvJJX2TIkD8b EopcWC4XViCbCNnF/NpCHqugjpnLqsqursisKksDpGSnhSXFBkRQXWNoHsCT +HDv0IDT/u62bqcOn7T+s4PVn0AoQV4OAJPMxOD89Ah4q8CbCtvE/Kw5k0O6 cNEEYIJibhO8uQtPY9xtIONApwhsAioBmyCV7GqTHsImCTT3YE9bv7NHASZe Tgd9zhwyt0kCbRsmaLgJsklOgifYpDwnmFEQxqtMUPFyjP0mrDGtaGmiCdnk 1gUD3N6/Mgo8eXR98vGNqa1b20J5dmfxGVIJUcVYeW6ct4h4goomCCaQd0aY mNjk3YPPpZO3d9fwni4Tm+xWN3l6e3nrFmRxO7cXtm7PP7u7+Pze0r964bN/ 7V/717/1FUMNSImggU0ifFzTwgMF5Vn9TQJkk9r80LJkr8LYs7lRjlnhtkkB RyHIJmmUY8REeIpVcZSDqiJsqpW+0MXUy7KbKiNUpSGtxcFtJSGd9NAOOq2x MKA+37elNEhZ4CPJduOlOdcmOjBiT1TEWFVEW5VRf6mNtpZlnO2tCR+VpEzX 50zIM5bb6QstZSudzNWumoXWyhFZXiczjlsWwC7255cEC4rCBPmRwtwYXkYU NzFIU5W22ES/O8x9OM56PFnxaKLk5VjJq7FisMnH8YJfR3I+6ZPe90S9kLu9 kJ59Kzr5bhebgEpQLJdOeI7GOBhj/55n9wGEwifyiYjtJ77NbxCezV/5pz5x HN7X2r+BcE6+5BN1k2cK78cyzwcqX7DJ2764d/2Jr/vizWwSjGwypPxsk74O 4h+E0cYevKcLWDGkUyCbTI+14rrJbjYZ6JWi0gk6mwsCPEHDTWCR36QkTgYG iaBOE8BIbWWKmJPfICsHtqBCCbbJ7/bCf5NNSDwhDhBDnSZfb5Putlpkk3Fs EzJPjDY5NyqfHlXMEpHPjsogc6OyFV3pbGf2aH2iXhLRLwwZEIYMiWlDwqBh QeCowG9M4DsJEfpAJoS+42YBlSCYoCCemA9eRI3z2CaobrLbnq5eJadHyWmv h2VwDdikSU1XN5W2qYnWHnQGAgS+b8iJFm0Ci2dIs5IJy1pYLmKbkIVCrGC/ 2iZomffHYLKHTX63F55sE7SRidwLD1/jHqUTAAi2iTlPLNqks1XU0SpsbxG0 tRAwQTZprd+pm9SzjTZhIZtsLOnQwVzLs529HXUMelSw//Egn2PB/taQcKp9 YTZV01IzPaa+sNK3MqeZGFKBoPeum+zApALbRCUmTu6CAExk/GJkEwgAAb4P zLIk3PyOSYIkQg65aAIxfwL5OeTGE4uEgadZ/O3495I7Vsg22a6bCOhgE5mg XMIrQzbhVOexq/OAJ3CHcAojh16UlJsB/xc6cdbhAMT15CEXx4MnrX+wOfy9 4/E/O9n8CE6JDfVMj6fkpYXDewbeJPC+gjdYVXEKvNngvYd5Am9pLjMP9ZiA SvB8E5OiCZ5vgjZ04daSr7KJRjQ70gQ22VzuR9u64HYPmySGetC87QNcrbyd D/meOQIwMbdJYqgTLpqgwYvmNqnn57bKSgY62JP90pWplsvLvdgmdzeHgScP ro4ZhYI2d51DU04QDZ7eXtq6TXSaEOcJw+29L3jyxnh6MHlb11vIjk3ekmzy yuw8LojlPV13Vp8RWd7O3SUEk32b7F/71/619xUXEpQaGQo2iaP4FKdEK1jF Ay2iTmmFjJnOyqOVJnnmR5/OiXRIp1ljm6RRrDKCj2cbJ5uUxpxsq0tY7K4G m+jEGc2MqOaqyJZC/45SipYR3lcd3llOaSsN7KoI7igLaCn2aSjwkGeflWQ4 KXNdOipg5RYzwKZ1lfvpWbRxUdxcfcaMKn21tWhamTnXmLfSVrrRWbncVj7A T86gHYz2/C7E+bsAm+/8j39Hs/0h5MSfqYe+T3c9Qqdaq3I8p+QJtwaKHowC TEpej5W8nygGm3wYyvrYnwA2eSZ1eS4+81rg8JaAhjWyCZkke+ctz56cdxCu /Uf+dn7lO3zibYdsk1d1Dlt1Do9qHR6JXO8LXe7IPLdagt9oY9/rk972JxI2 2dnTBTaZFFInRLBeTRpUZAyoy9CeLq1xxY52TyGbwBoe2WTM0AA8wdPh8Sx4 8yCboHODUd0EgpwCy9p6CR3te4cHATgz421yQTGvJkvEzgOhEL3nxiUx6t7F 7fAWO9y/3iaaFmJSCYknqC/+G2zSrq5BNhnSScYH5YRHjME2mYQMyadGZOdG ZNPDKJIZY5b7SmY7skdUCXpxuE4QPCAMJttkXOhntInvbjZBHkEwQU6BoA1d Jnu6yFMX8THCeoGnBZsoON0KdpuqtrW+urmhQq0ua1SXoLnw5EKVyelnn9Ow 3Q6vllfJBSVoFxDZJqg1nlhSMizYxOKert22cuGNW+bBKkHZzSbkokl+esQu vfDhe9jEhCdkm5BLJyY8sWiTjhZhWzMfhTg92BiwSauKTaQeAi8K8b3FNjm/ rAWb9HTU0otCPc/+7O95GGASRrFLjnWrLIlSK8qQTRbOtY0PKtE5XfCgWmGx 36RyJ1WNMsZO4D4IhQ4wQaNJ0Mof1S9Q/QufGGxiE8QNc5vgwxBw5xEqpX1G 687nsbh9a7eY2MRkKxfuNxFzS0AlwBNUPQGecGvycd2EQU+HwH14EN6NoA/X k4dtj/xgd/TPjse/d7b9yd3pSKCnfVKUX1ZSSE5KKOpRgjcVvLXINoGQbSJg FSKVoJBhgs/pQgGPkIsmX7Ony9AlBptcWNBeXtGDSuAO2txlsd+EX5UNNgn1 cQxyt/Y5fdjf5Zjf2cOW9nSdRPNNUOkEHdWVn+xTnB4ANqkpjhQykxsEee2K MkMnZ0ovWz3XSgxeNLPJZ5jcmn5yY+4JbjbZ6TdB53Rhmzx9uAZ5ZWyBf/Vg fTtGeqBzukz2dKFzurBK0AR50Iq5TV7cXXtxb/0FuRf+/vLLByuQf/XCZ//a v/avf+srnkaJDwmKDvBOCParyEpsFlSBTRo5BdySuKrMoOIEd2STZAoBk+TA Y2lBxzOo1pkh1rmhNnmhtswU125B2oq2dl7DAJu0IJsU+2kqgvtrI/W1kT1V wZryIC0zpLXIq7PMV8eg6JiU3gp/AytkXpF8Thw9xgvVVvr2VvoOsKgL9amX uoruDNbc1DNvDtRc1lYtNxcO8hMaCnxLYuwLIxxygh2yAhxzA08WUc6W0Tzz vE9VhLjURDk15PkauBGLTckXujKfDRW8HCl8O1b4djjnjT7tTU/0G034luTs M9HpV3z7t3xbZJNfuUffcm0g5hUTc5u85tm8MuY1z/YN1w7lHXFKsMN7Io7v OSdRiEZ4juNHtuPbOofnNbYPmCfuVFnf4Trf4jrfFLs9bgp63RuDbHKz3usq uRdegHvh0z/3wrd90QtPPqcLgniCRsOPDtRbhAk6rQvZBAUJRdclgs8Gy9oG Wbnx32/LNc3stYW+zfUhYIJKUqYUlcr4RW0NNWSbQFDpBPNkxxrsP2wTI0++ zSbGvnvCJrouHrbJ2JAcMr6TSZRh2dSw9NwQinjaGLDJdHsm2KRfFN7Hp+oF 1EFRCGETIRDj922CCiWIJwgmU5IA80Z4LBQ8exFFL7Rgkx4F+wubNJY2NBa3 1DPgW40CLwSqoVj83gIhYbmO5sLDghaWi7DOxBUT3INArFot2WSPFnjzisne MPl6m6CKCdgEq4QcNFUQ2wS+EFj04vIQ2SbwAwLvHJNjhP+ATVqNKmlu4kJ+ 1yar8126Lm5lSQTAhOJrRQu0iQ13Bpi01FfAe3JjqReetjjdPmZQdDZXg02M PNnbJpUkm1TC66gQlpos9VHfB/LFbpu4yJuvyNDAh7aRN/iZ1NTIvSoWKyy/ axM05xF5BN6HKIBlsAmQRCGqVIqriI54djGnJr+WkQMxsYmMXw6OqKanw3sg JSYgxM+J6nMyKtgtLS4IvVXgjQRvKgwTeI8hm6D3Hrw/kU141fnC2iJUK4Fb XDTBMEGndalEVeS6yW7t8BZtMjfaDCoBm4BK4M5uNhnuVnArMhNo7oRN3I7v ZZNgx7hghwTaSVw6yYpzL0rzh5RlUVglUaLqFLBJm7x0oIM9oZMsTzYbBy/q zesmuCP+CTEgfgHBZGtnTDw6OpjcCA8hJjAaVfLy/tp27q1+PkP4LukM4btf WzcxwoRkk/v7Ntm/9q/966uuuBD/uGC/cF/X2CBPZn5Kp4w12CaWwsImN6Is xa8k0bMg5mwGzS4p8GhiwLGkgGOpQdbpwSeyaDY5obZ5YXbsTC+9LGdFy1rs YvQTNomAtNODuhm0vtrwvpqw7ipqV2VgL5PSUeLRW+E7yKIYagK15V56hu85 QdiUMGScRzFUew/V+k8KQhZVcWtNyVd68m/2l9wdrLw3VHVnqPKGnn65t3hJ U7SkKZ5pKZxqLBxXFY5KIUWDwrxBYa6elzzAT9Rxovo4oQZRxI2ezMdDRS9G ix/1pd9tj95qD3vZGfZEcuap2OmN0P690OZXgdUn/uFfuQfe8qze8Y5/5J34 yLf5CGYR2L0T2L3lE2WR7U1cXMc3XMfXXIeX3BMvuTaQV2ATInZvePZvuDgO bzjbgd/ygXfqA9/5Lc/pOdvxfo3draoT12tPXq9zui323GoOed0d+64v8X1/ 8u1G36sKj3WxywLf9RzXY5QXMMKnDogTiXO6GkoGmhn9bWxtG6+bWHrBcp3Y 1gV86GnnD/RIR/qJ0Yoj+vpxA9ERPzlkrJv0W66bmPAE2QSJA5a1sO5Vyyvl gmIpr5BXkwV3OMwMPisLYKIQEkMZjK3W1c0qBpoLD3fINkEwQZNTcGs8uaRi YpOdIss2Z7pajb+XOFLYZE8XcYAwSETTzCdCwISHYAKLUuM5xizjfBPeYJ9k 1CCfGFIOD8hHh5QTw6qxQcXYkGIS7gxIierJsHzCIJkclJ4bliGkLGmLwSbD yvh+UdhnmwgCh1DdRPDZJtgjEyI/HCDJrIIKQTwBmEyK/cdFfiYYMQm2yYDQ C9lk8Iu6CdiEY2qTBuL7DI+0qJjo6GZcQTM5haBD/YVN8D+w43IJ/ud0DiOb bZ6qLPOYd8EjoXxl0QSfIYxWksgmmB64aAK35HIJTlFWZEludGleTHFOFNzW lKdJOEXNyhqjFGrbGuqMJ0tzOtVfnCSMT+uyaBNtB0klHdJetKerRdjeLGgH njTxWtXcFiJEmwmhElVdC/GKIA0RvfDrsARd011Y0W4s9xj6BNUV0WEU25AA 64Tos1Vl0X0azuZ6/7WLg/duTF2/NLQ0AzaRdzQxmlRgkzKjR8o/Z/uQLrSh i76ziYsIqATW87C8x1PdcfWEvDsL77NCLzFmhblWyI/jgxHI2dsme8DEZD8Y hFwuwTaRCcrkAvi6yuFWzC3msfLZzGxIHbplZNdWZVZXpDPL05hlaSAIeHVG 9c39GgWoAaiC3kjwLoLAewzebOgRFGQTFBOboHIJggmEXDRBNqkXM9BoeLyV azeb4Ft0Z6BLNDvadHFJe3m1/8Ki9vxC76WlvvXZrvPzPeszXefnes7Pda9P a9bOdQ52SHjlmTGUs2E+jhR3a7+zRyGo3yQAbOJ9PNTfNjLIMZp6CmwSH0Ic 1YX7TXISPAtT/SBgE1Q3UfFymiVF+vY6sMnSRNPFhS6wye2Lg8CTe5dHvtzT NWXc0wU2mX9yc37r1gIRY8WEGGjyYO3pg7VnD9afPVx/9mgD8op0gPCrHXG8 fbCBW07Qni7Iy7uruNmEfE6X+RnCL+6BcdaN5ZKVl/dXXxI2WUL5Vy989q/9 a//6t75So4Kig9wo7g5xVHdueWaXktWlqBHQkxlZoaWJPvRk3/wolyT/45AE /2OJAVbJQdZp1BMZITbZobY5YbbcbJ9hVcFKb/VKD3NAnN7KCNfURncxQ7ur w7qraT3VIT1Mai8zSFsd1FPuqavyMdT4DDC9+ivdDEz3SV7AjDAQMlrrOcBw GWN7r9ZH3OxJv9adCrnRm35Dm3FDl4lyoadwtTN3viVjujFlUpU4pkgYlScY pHE6QWQPN1xTF9rMpDSU+zdW+J+TRV3SZN3pL7zUHLcuo95tCn3RFf1E5rIl cX4ttH1HTCoBmPzyse6Ht9yD77iHfmMf/Y1j9RvX+j3f5i3f9i3f8R3/5Aeu 0weu83uO8yvu6RcQjg3kJdcW8opnB3nNt0e/NMkrnhMR4em3Urc3Ms+XUs+n Yvf7QvdHUp/natr7rrj3PYlvuxPfdCfeUvtdUXqsS1zn+S5gk2Gu/yCPsm2T +pLBFuZgO7e/ja9tIQZ/wAIMLcvhDiy0hvqUg1rFsA6W342TQ82QcYN6VN+A Z5qYB/XCo3O6tJ0C1GwCi15YIKF2eMCIUlSKkCLhFuARJ81KBngEkQSpBMXc JmjljOdxkDd6kYsmCFm4kRkFj1zEc+F3nsCHGMsoHPjy0SIcbXPqaq3TdvIG esXD/fLRAeXIUOPggGpsqB4yOghCURq0oqmRBoSUcYNscojY5TUxKFvoLTrX ljGkiNMJQ7U8Sj+fYhAGD/IDBvn+qBeeZBMfc5uckwbio4PhDtgEnkDex0UO Vgne1mUQeRnEvoOSsEFp/KAsZ7sXXslF/SZkm7Q2VpMPQEPfQPLJXaj9hHhR ds7pQnu6YIlo8V+/94h5pzO76htsYl40QXPhTUonJHp8Lp2YdJrA0yDoFCb0 W+AW/tOwwmxW1KJyRls9p6ORBzEW1LZ5go/qQh7BIZ0kLNPupNdok552iaYF nA4/Dvx2Nc840ITb2sBpbyTKJUAhNHAEFa1GB1Sr890X17SQzY2+6fF6pSQ3 M9kziuaQk+bbpCxdW9Q8uT+79WD+4Z1zt66OrMx3jA3K2psqGxXFTSpivglI xDwAEwj86KGfQQgxH8SIETzMnXxULwrerEXuBNmt92Q3m5BLJzi77RMzj8XO FIs7u5C2UO8Mamkhw+rLP1IGahsBXMArjrpCgBj8mgLAMnyI/E5D7zFyzG1C LprgThPy7EXUCI9OEt7NJvBReO+hJ2yf09UlnB5tvLDUe2mlb2Ohe31Oc2Gh Z3W64+Ji78aM5uJ8z4W57rXJ9tXxVn0zX1CeGeF7KtznJM3LlmLc1uVz+qCv yyE0HZ7mbxse5BAVfCqG6hAX7AA2wed0Zcd75CV5F6X5V+SG1JZGi2tS6/m5 TeJCXStrvE+8MNq4PtN+dbXPON9kCPXCk5pNpojcmHkMuTkLeXJr7sktYsTJ s3urz++vPzXm2YPzzx6ef/bowutHF8znm7x7uD0ansi9dRSLNjGfb/Ls9hIq l6Bzg18+IGDy/N7Ci/uLkH/1wmf/2r/2r3/rK9zvTFKYD83rZGq4TwO3rEte 3cAu5BTF0lODimI9S+O9csOdE32PJfoeBZgkBR5PoZxANsmiAU9sJEUUsMli VxXYZFCa2V4d0VUX08uKQDbpraH1sWh9NVSwSW+Fl47hM1DtrWd49JW7DDDc xjl+K3LavChoiuMzXO06Vue5Vh9+XZN8qS3uYlvsxba4Sx3xl7uSrvWm3tCm Xewmcl6TttqWvNCUMNMYP92YMNEQP6qMNchidOJIDSekuTpAzfAz1FKmJVHr jYlr8sg1cfDthtCn7TEPRW6PRWdfCBxf823f8Y5/4Bz9yDn8gXv0E//4X7hW YJO/ck/8Zhyz+J5v/55n/47j8Jbt8Jbj+Ibn9IbvbJEhz9knLKTO4Tnb8SXv 1GuRy3u596+NQb+1hHxsC/t7b9x/DWf/z7H8/xzO+dCb8qw1+prK85LMdVV0 dp5H2GSUHzgiDOkXxuulqWATQxND31Kna+WBTfCcdLR9BVZZhl65iU3gzt42 QQPi0XwTCEIEKpqAQRBJMEzEnPzP4xd3thWRQ+aJydRFi33xZJh8k01AJSjG DV1sFPQJsU2GdLIRvWLIUN+t4Q/2yyZH1XqtuLsNPsoZ0kmGdGKACYQoowzJ xw1SizYxgE14/vicLtQLP26pdGJuE3iQDJNJaQAO4gm53+TrbdJSzyBLEIV8 evPn1vj66q+0icVF5j/bJggmKLgdHguF3GmCbYJIgu7Ag/DfhXUmrA9Ri3p7 A3cbJn/IJggm5jZBPGk1ns3VomKp5SB3RpOCAd9eeMuNGepX5rrOr/RcWO29 cqH/wmrP+JBMrSipYySwKuPqZYXDevH6Utel9b7NDd3ViwNAlYlhRZu6Aj6k VpZYtAmCCf7HAfjpQ9nNJpgnZJuQ1/l728TkQGmT0xL+eTaB9ySqBGGbwJ+c PBgUt8AwS1PhbYamKCKk4PmJYA24gx7H51SbBP0WeA7uN/nHbQISgecgoeDZ i/pu4bmRBlDJxWUtssn5+W5sk0sLvYRNpgib6NQ8bmlamLdjuI8j2ITqccL3 zBE/lyMBbkcDPY9RfaxD/GzCAu0jKI4xFPtYqn0C7WRyuDOySVacO5oLDzZh 02OltelqUUG7ooxcN0GzF8kwQTbZyTS2CRGjTbburDy9u/qEyNrWvfWt++tb DzZe4k4TvK3r3urbB+vvdkonCCZv7669+lIlSDGWbQK/JLZyLe9kCcFk3yb7 1/61f+19xVHdA8+eCPW0L0kNbRGW9zXU1rNy6/LCS+K986NcimJcc0IdASYJ PkeSg6wBJqlUm7RgG2yT+orw0cZisMlyN8MgyWhlhGlqoy3apKvMHWyC6ib6 KvehGq9zgqAlcdCiKHBeGDBZ5wlZlgdvtsZeAZK0x22idMRf6Uy4qkm8DLfd hFMud6de6EheaU1aakmabUqaVidONCaPqhL00pheQUQ3L3yMEz7Ji5gTRS4K wxZ51PP8oGvS4Csslxts1wfcM094p5/znIEb74WnX9VZv+PavufYvq078Q5u uXYv4RG+wzue/VuO3Zs62zds29ccO8hLjt0Ljt1ztu3zOptntSeesqy3WNZw xzxbNbZEWHZPWA5POc4vxR7vVP7/0R37Pw1p/z2a9/+O5v3XSN5/DuX+fSD7 mtLzotRlRXhmjncWbDJmtEkfPxbZZEBdpWtiaZs5YBO8eicflAo8GepTAkkm BpsgcGekv343mwz2yZFNUNGkt2O7vx6WtcgmeF0EKhGx8yBwXykqBZtsnwRl JAlRQFEy0EnCFqZsGMcvonIJsg96xAQm32ST7a4TY/CDHWr4bNs20feIBvuk w/3ywQGVXic36KRtTTWM8vjCnODaqkSZIK9JWabTsId1olG9hOiOH1bsYZNh ns8o34ewiWDbJmMC09IJmrqIxprALVBlUuw/QaqYmNgEFU3Q7EUDx/3rbdKk rIJvtUm5Cn0nyRu6dvZ9VaP5Jsgm39Q48M+ziUm/icmAeNx7Ys4TNFYPgh6B /wSsM1HdBNvkD9dNMEywTUxLJ8aiCWpLB+6hkaNTI+q1hd6La1rgycW13kvr 2rXFzoXplunxhskRYvon3AebwBMAL5fP96/Md4BNOpqrGuRFRGR0c5vAjx4E 1SvRz6CEW4A3cVm0iQlPyC8ieWfXbjYxKZrguY3/VJugzV1wn1wAMmnMR6ku 255UAu86BA10IDDYBN4AwBNAB/rQ79oE/RaLJ3R9a90E2wSf5QU2mRquX5vT XFjqPb/Ysz7XtTHXBTa5sNCDbbI+1QE26Wvk1BWn0DztsU38XY75k2xC87fd tgnVAWwSF+wANsFnCKO6SVV+KBoK3yQuRL3w433ixXH1lRUtwOTB1bGtW+ee 3JwikWQ7T27MPLmBKiZzW7fnt24TjfBPbi89ub386Pby4zsrj++sPr67+vje 2gvcZnJ/bbs95O7Kdhc85M52L/yrW8to9uLX2OQ5PBOe83D15YMVY/Vk6eUD Ivs22b/2r/1r70vCyO2U1VRmRVdmRbaLK1r5pY11ebXZtKIY94LI08XRZ3ND HFJ8jyb5HMY2SSfZpLEqcrK5bLmHuaip1AlS1OXBbcxw454uCK2bGYz3dHXT PfoqvfRML0O11yARz6Eaz0VRwJo8eFkSNMvzOcf2XBAHXGmNudoed6097mpH PMqVzvjLHfBI/PWOxOualBvd6de70zc708+3p620pi21pM2qUyfrk0cVScOy hCFp/BQ/YpwTOlZHHWMFDVd6D5acHSlzmal0mSk/O1t6aq7EcZl+8iLzzHW2 x+26M/d5bo8EHo+FHk/FHi+Ers+4p1/xnF7znd7wT77lO77hAkxOvGZbv2Q7 vGA7PK+zf8qyfVJ94jHT+hHjONzZqjHNkyrrJ4wTjxjW9yut71ScuMOwu1dz 8naN00tFwN97k/7XcO5/TxT/r9HCv+uzsE1muWemOO4jvIAhPlXLj9nbJvgk Ios22WNDFzpDGNsEnUtMnCGsqMI2QRWTr7EJueWBfHgU6okgbzr6ss2EvZ3P W7Z+t27CxaWTz2Axdqx0t7HBJv3dQoNWAjzp7Rb19YglgvzYSBdnx59cnX8K p9pnJvtUl8c1SAuBJ2CTcYPs3Ihy0aJNeP7bNuH5oPkmk8LPM03IPAGJgEew TVDLicmGLmwTtKcLnyH8B2yCeYKEgqxn8m1HRZNmJRPNXoS13x5r1H9kT9fX N8Kbb+jCNRHz3hPyGcIIIxZtAuvDFmUd3ta1XT35aptoO6UmMIF0tYoslE5I NoFvabPRJpPDjRtL2isX9EaedG8sd60vaTaWuzc3dCCRS+t9QBIIKppcu2RY nmtHe7oAJippQYPUsk3Qbq6vsQl5cqLJ5i4yT75mQxeGCXms/B42wWUacr7e JniXmolN8PCdz0eHlW+ft4BVgjZooUklELgD7sDVE5PgPV2obvKte7p2azmB D8EbD+OF2NNltMnqbCfAhKibzGogK+faiTvTnRfnCaEgm2gb2KzCpBAPO2yT AFcr37OH/VwOB3gcDfY9ATCJpJ6MDnFC53ShXnh0gDAEDYUHm7DpseKaVBUv B3jS1VDZo2YMdfNWplpQ3eTe5ZGd5vdz5GzdnCVaTgiVzD+9s/D0DtFv8vTu KqqbbN37XDexeE4XgsmrOyuvjCpBwbMXzccvmu/pApu8fkTwxLita/nVw+X9 usn+tX/tX797XZjs00irFdW5GmnlgLqunV/EL4ypzaYWRbsURTiXRJ3OCbFN 8zuc7HWAbJNMmm12qG1uuJ2SHjrVWr6uq13UVIFNGunBLVWhGgYN26SbQelh BIJN+qp8eis8tRVuhmrvkVpfLf10Y8axcebpBZ7XksBnge89x/Wc53tdrKdd aKBdVIddbom81hFzrTN2O23xV1vjrrYlXOtIvqZJvdKZvtmetqnJutiZudKc NlufeE6ZMKWIG5fFTEsjpsRhozzqCJdiqA3QVhF7ybrL3DQlLu0FZ1rznFpy TrXmOrXlnx4o9hgodjOUuI7SXWeq3NaZ7pdZXreqne/WOD+sddyqA4zYvWad eFNj/YLt+LzO4Vmt/VaN7WMmQY+HVcctp+zoI/qxh+XH7pcfv1tufYtufbP8 xBW6zWW67ZWqU3e4ns8bQj90JvzanXyVGG7isiw4DTaZZLsNc/3BJjph3LZN 0J6uFi7YBDWJowUYrL76uySDWgWyyai+AWCCmk2QTdCYRZOQzxAGmPS081Bp A9mkXkJHW0rQni40FH7vPV2464E8gdHEIPhDn8sl324T1G9ijIlNiMEovR1c XZdA3yMCnrS11Cnl5Rkpfqfsf7Q++p2L049BPsfCKHY5aX4cZmJ7Y8WgVjDS LxobkFium/D8DVw/ZJNxnveEgMiYwHuU703mCQpghLytC6iCiiMmx3PhTpPt 3VzfbhOTTXQm+7vwljkEEwjuhYeF39caZLfsYhPMEJzftQl58CIui2CSmIw4 QUKBW/M9XbAmRFMnyDz5JpuQYdLdJoZgm3xROvm8p6uqSQE2JEg4olesLfSC Oy6f111cA4b0IJucX+kBhizNtqENXaCSG5eHbl0dWV3oHBmQtDaWg03qZYUW 6yYmzSZ77+myONXdYvXka4omSCXMsiQyTyzOTPnHbYK/EPKXQD407HN2bIKU gd57aEwJ5gkSCvmsBhw8eBEVTXAX/NfbxDyo0wTedeg+4km/RjA5pEI2WZvT rM50rM10Lk+1rU53rJ3rOD/btTrVvjrRtjTS1K2sZebFU1xPhHrZh3jaBLkd R73wZJtEBZ+KDT2dGOqUFLY94gTNN4GATUozgyrzaLWl0UJmspydCTxpV5QB TwY13IWxxsvLvbcuGNBceBOYYJugogm2yfP76y8enn9O5MKLRxdfPL74/PHF 16TJJkSMJwO/QV3w99ff7Aw3gbz4fETwisWY2AQdzIX2dKGiyfN7C//qhc/+ tX/tX//WFyMzUlqVJShNbuWVDDTUqhhp/MKouixKYeTpwnCn4shTOVTrNJ+D yZ4/JwUeB54gm2SF2uWE2eVF2IsLg6Za6Bv9dajfpI0Z0cYMN27oCkW98L3V wdpqCtELX+HVS7TDewzX+oJNuopPSuJ/Ukb/qSX5Z12B1WjVyek6lxWx7xV1 6CU1jUhT6GZz2JXWiKttkdfaoy63Rm+2RF1sNqYlerMt/kpH4tWu1KvdqZc6 UzZaE9Za4leb4xYboqcUoedU4aNSGmRYQtPxQ/TCsHYWpa2G0lIToq4OUVVR xaX+3AIvVsLZklCbnMAD+QE/lVN/kkcc7E61m8q0msm2Ws49fLHw0M2SQ49L Dz+nH92qtn1SbfOIcQL0cb/C6h796F1I2RHz3Cs8eK/o0L3iQ3dLjt4ptbpR cuxq0dFLRVZreYcXc44s5h1bLrLZqDh1ucblouTsutB5kec0wzk9xXFH/SZ6 3AvfzDS0cVAvPKy4iCknxmU53IHl1rBONdAjQzYBmGw3wutUQ3172QQ1myCb IDgQQxWVVbBGQrtK0K3xX25JvfAqC73wZJvgAorFc7oswORbbNLTJuhuJYJs sjPSgjjgC9mkT8Pv7xYCT7o6eDx2TniIk4PNn+ysv3N1+sHf83CA15GY0FNl +SFKUV5fZx3YBLKHTYa43iNcb4s2wTyBO5Ni/2lZELYJ3EezF9H4RTzoBLeZ IJt8656u5noGubXn8w6uL5t9vskm/3jd5OttAjAhH9JF3sqFyyXk8YtknsAd 8154VDdBNvljdRNyxYRsE5PSCeqFb1JUk3vhh/sJm6C6CdrTtbHcdX6F6I5f me+AwJ3L5/sBL8gm8MhQvwhs0qgo3m1PF5knqHSyRy+8xdKJxcaTvW1CLppg m2Ce/DNsYvHPb/GPVFO+TRJEDNRsAjaBADfgPq6hwIfgCSbBE+HRAcLII/+g Tci98PjBvk4e2ARUAjYBoaxMExUTsMnSZOvKZNvGjGZ5onV5vGVhqFEjr67M jgk4YxXiYRvkauV35oi3sxEmxj1d5LpJQugp1AiPkxZ1FtVNkE0EjCRZXQbY RFNfYejkzAwqV8+1gk1Q3QSd0IV74VE7/OPr04+vzzzCLSfbvfBrLx5sPHuw gXjy/BFhkzePL5rb5O2Xc+GxTb6ybvL87opx5OLizshFuDMPMNm3yf61f+1f e1/laVRmdpi8Or2vntErL5eWx9flhFSn+xVGOReEO+aF2mUEHkv1OZDs9XOK sW6SRrXJpNllh9rlhtkVRDiI8gOnWyvWdbVrvTWjipyu2hgNK0rLCuuF1NC0 NSE6Fq2fFayrpnTTPcEm+iqvEZbfULW3pvCkIumQJPzPorA/yaO+b0j4pSPr 2GjVmQWB32ZTJMoliDoCbi+3RF9sDrvYHHqhicillrDL7ZFXOqIvt0dd7Yy5 qiFyrSsWcqUz+lxD5HRj1Ig8VC+kaHmBGnaQhkNtqQ1uYgU31NBUzBBZZbCg NJBd4FOV5JYTfCLO48d4l+8z3f/E9P9BGX28O/aoNv7oYPyBsYRf5lMPXcqy up534g79xN1yiPXtMqubxUduFh++VXJk+07x4ZtFhz4nH3LwRv7B6/mHr+Uf vZx/5GLuoc3C4+s5RxbSD0wl/jAa9/1Ywg/n0g6ucU6u851WBWcXeK4zHM9x ftC4iGYQJxpkaQMNxDldhnZOfzuvt5VrYpP+LomhV462dY3015Ntgua/I4+Q u+Bx0QRsAjAxnqlFdG2gXnhjN26pUlSiEBUrhMUyQaFcUKgQFqkkpbCgalEx YelLdFsTS+KaNmOMNiE+Can3gWXSB4E7I77eJjj48Z424Y5N+MgsyCa4bgI2 QaUTTRunsiwhwPu4w4nv7I9/d9rh+wCvo4HeR6NojqV5wTJBTk87a7hfNErU TYrPtWYOKeJ1wjAtj9rPp4JNBrh+A1zfQY7nMNdzjOc5DuF7jYI1iPiMCX3G Rb7jIr8JsR/wZFISMC2nzCqDZ5XEni74JbaJSRBMkE0QTwbFPgax34AwdEAc OyDJMtqE2ask5pu0EwfkMpsbytWNJQ2NRS0NjJYvD0YjjlbbOcCZPJOxWUUs oZsUDLCJXFCyx54ukzaTvZBS9cWgEyQUizYxhwm2iclwk5K8+OLcuCJifElM YVZMQWZ0XkZkXnok3OZnRBUAT7KijR8Fv8SW5gJM4oqyiDJKDT0DlpfNClar CvhW19bAbm/kdEDUXPL4RWQT+AEhnyG802wiIvZ0oS54sIkRJt2t4q4WUZfR JppmQWcTv0MNIQ5eaFGxmpU1LSpisxx8w+H9NmZQrc73gD6MHSVEy4lxZ1c3 2s1lPLxLB/fhzrVLhuubg0uzbcN6cZu6AtmkUbZ9bjA6OphsE5OdXeQ9XWSh kNf2JiLYjSf41TQpUpjs6dqtbkIeYmJ+RBj5cVzNwYNOEE9Qs4nFuonFeSus ikxU+wBfoGZ2VDFBgQeBJAgsOOgRzBPcaYJsAhKBW5SvswlrJzU7w+LhQ8wm eU29uLJRyqiXVDUpavq7BDNj6pWZjo2FbrDJ4mTr/HgLZGmybWmibWWqA25X pzrnhptapQx6VpTP6aOBbtb+LscAJh6nDvi7Hgl0P0bxPo4b4aOCTyXs1E3g Fgf1m4BN6spiJKw0gEmjMF/bXD2ply5NNm/MdlxZ7bt5wXD70tCdzeG7m8P3 jMcIPzAixZgpItfPPbox/fjmzONbc8AT47au5a27REf803trz4jTuogNXZgk r1HRxFg3eX1vzZhV3HtiPKdr1QQmL++tvLq/+uo+2GQJ5fmdxWd3Fp/eXti6 Pff0zvyzuwuQp3fm9m2yf+1f+9fvXpXZgcxcagM3Q9tQ1iLIEpZFVGcFlCW6 FsU454XaZwRZpfofTvE9lOp7KD3YFmCSEQIwccgJtc+j2RVHOMqLqPPtVeta 1nlt7bgit6cuRsuJ6wOP1IXpakN1rJB+VoiBFTJQTe2v8tfSvforPIeYvoYq T03BKXWatSrhgCTqB07wd7VB3/Fo3zckHdLk2Y0yPRdEwZfUcVdbky43J1xs jIWcbww+30C90Bi82RJ6rSPihibqhibyUjN1syXkSlvItY7QG5rwW90Rt3si z/dkrHWlzzbHD0tDdbyg7trAdoavsthdXugmyXcX5LhwMk/XpjrVJJ2qirEp Cj6U5vZd2tnv8t2/Y/j9WRJxrDPBvjPerivyeHf40cHYE7Ppp5dz3K4WW98s s7lFt7lWfOxS3sHLeQevFR6+WnDwGiT/wLX8X67m/Xwt7+eruT9t5hyGXMoG 1By+mHn4Qtbh80SOrmccXk49MJ/400zcDxPRfxqN/G6p2vY8z/mi2GtN6D3H 8R7nBI7zQwyihEGwSWPxYGvVQFttXxunt804/sO4YsdDHNAaDJZe6Kiu7UZ4 nUrfI0FT4JFN0HAT8tHBqGhCzDps5XWo65qVDPRvtkpxiUpSIhcWQhSiAqW4 UCUBmxTVS4vRtDuTYEEQp2Y11qKh5PiELov5ooDyezbBwTbpbuV/rqq0bNuk p52j7eSBTSDwpbEqUqh+NqdsvnO2+97j9E8UX6vYcOeUOHd6YahCnNffwx0Z EA/qBPPdJVMtWWCTPsImwWCTQVGInuOr5/gYOO5DHPdRrtsYzx0yulMHQTu1 cDvJlCxwWkGZAZgoKJPSAFwi+V2bEJH4D4j8dbwQHT+6X5TRL6P3K6p7FLVd clarsrpFVdVUX6ZuLG5QFyKbWDwkzeQAZ3LdZG+bmCxi0frQ/Bxa4+lJv2MT cs+7xViom+QnFuclFOXGF+bEFWTH5mfF5GVG56RHQnIzouA+PAKBD5Xkwu9K LM6OK8gghoDDfxoWls1KFhpu0t5Yh8YvouAj7PBoeBOboIGMfZ0yoh0e26RV 1A0waRZCNE0CCB70CRA2HiBcbdzcVQ30gx+ZiaGG5dkusMmVC/pL61pjxaQX MGIesMnViwNgk1GDFJ3TBTZRyyvU8krIzlgTOlYJGSbIJmSYmPAELezNqxjm B3ZZHGVCjnmziUm/Ca6Y7FGpMRlxgu8gm+AueJNmEzQelHxI1/aklR2bIIDg HVzYJhgj5mDBdRZ8QhfyCNkmKFgoZJsYAxJhQcg2AZKgN4NCWFYvKVeKyuDv uqE+yfxE8+JU69qcZm68aVgn1TSx4O9qQ494RKecGWlZmtKszWrH9A0qIb0k O8rT+bCvi5Wf6zHvM4c9nA74uR4J2LFJeJADqpskhTljmMAddD830Ss/2QfZ RM7ObBIXtspK+ttrpwzylXOtFxa6rm/oEUxQ7l4egcAdeBDMcmdz9N6V8QfX Jh/dOPfk1oyRCQvb7Se3l57dWX5OHKVFTG9/eW8Nt7fjDnd0OLBJXtxZI/K5 dAJZBpVAXt5bfHF3AW5f3QeeLDy9Pbd1exY88uzuvEn+1Quf/Wv/2r/+ra+6 4jBBRUyLKLdLUdTISeOXhDEz/UvizxZEncoJsU0PPAY2SfU7lOZ3mGQTe2ST wjB7RXHwXHvVRl/t+b7aMXlOT21MLzsWVAI2IXjCoulraYO1NENNMNikr9xb X+k1XOM3yPDqLnJuzrBpSj2miPtFEPY9N+Q7EAo3BO78IAz/uTPHboodsCqL WFNEbSijN9UJ5xuCLzSGQC410S63hF1rJ3iy2UK70hZ6tR20Ena9Mwx4ArnS l3FZm3GxO22tI2WxJWlKFTMkDu1g+rVUeqtKPSUFroLcM9ys05wMZ2acXVn4 sTy/H3K9/lTs+z2L8rM81qYp+rg64mhzyMF22sGBWOvpdOeFbJcrRcdv0m1v 0W0vFxzdyPrpfOaPmzkHNnMPbOb8cjnn583snzazf9zM+nEz88cLmQfOZ/xC JP3ARtqB9fQDa0QOraYdXEz+eS7hx+nYP0/E/Gks6rsFxol1rtMFkecK32uW 7TVW5z/KpVq0CV56IZVAYA1m0SZouiK5dAI2AZiY2AQCnxBWd2pFJTq/VCEq VoqLLduE+Cd6lkm6WsEIHKJu0oQGmrDQvpd/0Cb4l+Z1ExObGCeqbNukT8M3 7uwSK8Wl8REuDse/c7T+k4/bQbBJaJBtQRZFKsge0PLHh+QTw/JhvWiuq3iy OXNQHqflh/ZyqToeZUBARTYZJAbNmNoEd5H8X7HJoNgPbNLPp4FNdML0fmmZ XlnzrTZBPEHfVWJYvJGH+Jwu1Gi8t03IK9jd+k3IMDGxicl5XBZjod/kq21S nAO/JQFsUphJbO6CxSosI40qgS+W3aFmY5jsYRM8dXEn/5BNxgcJm2xu6LBN jNUTrXmwTVC/CdiEOEbYaBPSyEU6PqSL3Asv5uTj3VDkYKGQSycWz+ki6dLy ccEWx5ogIJhMYCQPWDTPbjZBpRNy3cSiTThfHmu8nR2bYGiQu+AxT9DjJlrB YMGTTb7SJiSebNvEyBNTm8gF8HoRkzGRTaZHG8EmEJ2GqxIVVRZFF2WFlOWF C1hZfR2C2bG2lemeYa1SzistzAj3cDqEbOJz9ojXabh/2N/taJCXFbIJMdyE 5hxPO5UYegr1m6RFnUX9JmCTghRfRkEYmx4rq8tolhR1N1b1tbGGewXLUy2X lnqurunuXh59eH3i/tWxe1dAIqMAk1sXB2+cH7i23n/7EoBl9P7ViYfXp8Am xvrFoolNnt9dg4BNLDDEYjvJ7VWIiU1eP4DnLyOYoLwwVkn2bbJ/7V/71x+4 2CXhitqUdmlBhzRfVZvMLgihJ3sWxjjnhjtmUU+kBRwFmxAw8T8CNgGYZNLs s2j22TS7PJptQahdfVko2OS8ru6Crm5Ult3Niu6pi+lj0YAnxtODQ3Q1wQOQ aqqu0k+LbFLtO8T07i0505Jp25RqpUo4JI3+URTxPT/0T2zqd0y/76r9/yQI +6E+8XB7lq2u5Mw5duCGMuZyS+Rmc8SFxtB1FXVdRSEKKM1hV9rCrraHQ651 QMJQrmjQacMp1/syrvdlXdZmne9OB6GMSCN6eSEtTF9Fiasw35mXfaou1ak6 wb484lhZ8IEK6oE62kFxlJUs5ICU8pMy4Icmyk894YeH4mzGkxw2C61ultne pttdzj+2nvHzRsZPl3MPbeYcJJL9izE/b2b9hGyyzROSTZZTfllK+WUh6Sew yUzcD5Ox3wNP5qus1zinNgTuyzzP6VqPkVq/EQ7Fok26jFtWcMUE2QTWYMgm o/qG7UO6+pTYJpgnEFAJggmyCQqwAha06JCur7CJacjd7vjMqP/f6iawUARe 9XZwASbYJvBFwX+FXhjp43rEye47P49DEcEOZQVhWg1nfanrxuWh+XPNowaJ vpc7qymcaMowyGLBJj0cSh83SM+ngE0Gtm3igWBCtonJUMV/xCYGka9BHKAX hIJN+gRpOmnpt9qEvK0L9fWgYhayCSwFYeEHy7zdbGICE7QyxIvS3Wxi0m9i AhM8pNskptu6vt4m2WCZeBObdP5/7N3nUxvp1ih64xzIYDA4kiUhkXM22ASJ nHNQQImMhBJZQoicc87BYIyzx3n27L3Pec/5dD/dOlWn7n9wv9x/4K7uB9pt STCe13u/M/cWXau6Wo3AMEKe5+e11rOaiE3bvg27QTVdejYBkhBBajz5SZs0 Lk636dlkfclIwBNOsQk5aULYBE+XHO2SZ9QmhFAMeWLYDm/Y+W40b0KIwPDV P6nNhFzBZdQmKAibIJ6clDcxtAn81hGlWQRA9PImCCPksi4igDCocZ7Ym4sc hjYxSJ2UHfPkW79Jg7gA7zzSt8nUkHRuTDE5KGmqyclLCw73vxNAvxnIsGPG 0uuF2f2a2rmxtiFtYw0vO/VxgOvt68gmKHVCfWDq6Wzm5W5Btkmk361ofwey TVjRbsgmJRnBaL6JTJwBNhnSiEa6q2aGJOuzbftrOlAJSpcQGZOjEq+dQVAJ kTTB66nmP79axJvi5z7g/SBE3uTrcaKEnCs5wSZ4fOs6gYsFlDf59fXi11cL Hw9n3h9MfXo+e2aTs+PsODv+c0ch06uBE9/RkAM2qSmJLmEy0iPup4Y6sgLt k3ys4+nmj1DShG4GMEE2SfK3Y/rfTPG3TfW3leYHg002ujmb3ZzBamZ7eXhH Rbgab4HHu+D9NCU+2mLv7mJvTT5Vjdd09ZVQSTaxksSa10Vdrwq7LAq5iCdQ TMoYJhXeJmwfiPOCoEvwHG32g1kRfbHGZ6Xef60xAISyLQ9+ogp/0hyKhQoi BJyyowyEgIe7EK3he21R+x2xB9qE572sna6k9Y74OeXDobpgTaWXssRdmuck SHbhJt7nxDlWRNuxI2wqQy14gTeq/K8KGReFFBOxu0kjzaTV76ouzHI9xXwv y/YgB2xitZp4fSPp+pM0C+DJTvKNHdb1HdY1jCfMq9tJVzaZ1xFPNhKvrydc X0u8Ds8Hm8zHXp59eAlsMh19aSLq4njUhdkiq2WOI24TN9wmtJNsgvbpgjN5 9QVnWG6hdvjjRvj6Pk0tggkRQBWjNsFqumRsecPv13Q1N5UaRousvFUOq2Lw CCyPj+InbYJ+QIMwYhP0IxAqIWq6YAEprc3LTQ8J9b8dFnA7Lcl7ebb9f/+f H/+f//v/+L/+16e1xU6AiaatYqrVmE1QvwnYpBKzyQjfDWL4+6QJMbLkX2uT noZyozaRNxadZBO9nbtkddiIwKbaosaqfFgKorzJ6dsIk6v9ja5R2YVMPZhA /DhMjO4hnPPDNslJiUF5E3JNF54xQSNvuKfnTf5NNlmYatta7drd6EbNJsgm a4sdeoHqvsAmqBce7dNF9JuQkyZ6NjnevjvTaJxiE8NRNXpJk1NsYoSlJJvo 1XH9rk2IZhO9jvjTbUL8KnJLUogkyClNJYRf9AiDYKI30+QkmxhLnZQe86SM 6HxvEGE2aaotqRXkgE1qBdlgkz6NGGCCV3NVidhJ8VHuAA1QRoiPQ2IMTcRO 0TTzx/pkahVfzE5PjvNzcbxGc8JgQnexpDmZg01ozqZELzyySZS/I9pAGOJx 6P2EcCdmlGtqLAXZBM03kQrTlDXZfR2VQ10iiOnBxo259p0lDcSzzT6UMUHt JwCWdwdYrgQFMgKQBHWmf3g+/wkNRsS20lr98gprNvmN6DfBnXJSTRfKm3w6 3q3r4+H8p+fzhE2+vJx/tz/xenf0l6eTHw6nz2xydpwdZ8d/4siNp8kELK2s sLkqTZAXmhfnnhp2Nzn4FjPgZqKX1SNP0zja9cc0jCdYxiTwFpwT/WyT/GyT /WxYPlbyorDZ5qKtHt6WjovbJAxs0lni217k3VHsoy7x7Szy0hQytEVenbke nbnu2nw3sMlAKbUr1wlsokywkz++KY21qos0rQq9Kgq+LA65Us4w4fmd5/qe L6ady3M7V0I7xw+4WBN5qSXZeqTcdbUB9BG51xy5owgDnuwqw3aVoTuKkG15 EIqnbUF7LYG7qoAtZcCG0n+rJXSvM3pfG/+k6/FWZ/xKS+ysLGKiIWS4JkBS 5FuXS6/JpIhYToLHt8UP7SpDzUUB1wTel0RUE6H7uWq3cxJPkxa/K2tMi930 m3uZdlsplrhNbuymWG6zTLFg3thKur6VdG0r8epWwpVNIm+SaCRvMvvw8kzM 5amYSxPRF0l5E7fT8yaw4iLW6qiaCxZasAaDdZe+TUi7ckHoOqu6O8SooIuo 6TpqOTm2ydEAuKqcxuqcE2xS3CzTD1VTEXYf/1ALFiUtcoj/IpugsjSUN0Ew 0XWK4IeFH61HLW5XsnllCaX50dX8lDZFmaaV29Fc1qPh69SVcNZ2cKbbMsfk RzYharpQLzzYYdDAJnoD3/+1NV3ak2u6wCbEJml6u6V9d7O+WFpTiALWTsgm J+0MbLQZgSj4/54q323SVZaXSB54R1YJ6ivRC6Nz4f+QTVC/SVoCtnnXUS88 1pyOtZzgUYayRUZtAm+Qf3lN13DvkU3wdng12qQLtcPrBdqwa35KCTZRNRVg Q+HrsqS1+YadJuSaLmLAEDGskBxGYXJSKZfhdsEn1XSReWK008RoNdcpNV3I I3qbjJEL0sg1XYZdTtziZLJBOEXJqL6LuIZA6TzDui+0nReyCfy2IIOAPk63 CZknjeJSiGOeHI2Arz+2SQ0/p16UCzaBX4meTuH8uHJySNrdVllREBMdfN+H YsVwMw9k2KU89haUM9vlnKkhVU97dRUng/nQB2xCfYAVdIFN4EzkTb7fp+sO 2qcrPuwBmr1I2ATNN6nlJIFN5FWZGkXZsFY82V+/OK5ANgGMvNwderEziGxC dMe/eoI1m7zZH4d4+3QCa4c/mD7aT5jUbwI2+fX1cf/779nkywus3wTtxPXh 2fz7g9lfnk6j5vcPz6bfH0yBSt48GcN4cjBl1CZw589e+JwdZ8fZ8Zc+KjIC m6vTwSYqcQrYJDfODdkkCWs2sYyj3YilXntExXhC2CTh2CZMb0tFcQSyybaO N1CV1F4WBjxRl+JjTbCpi77qYm+wSXexN9hEfdQLTx0so3Xnu6hY9qpEBxSy Rzcboi1rI8yqw27wAy4JAi9zfS+ATXJdzxW4nytnnCuinWP7mtRGXWtPsxsu c5kTM1bq/XGYhKFyr215MMBkSxb0tCPwSavfLkRb4HZzwLrCb13hv9MasdUS sdEStd4cuaqKXFVGrSqi+hoT1eKYFnZwfRZFlHi3Ks6+MtyiOsRU6HdZTDep op2rpZ2TMkxUfpe30m7uZTnsZ93aTrVZSzLbSASVmONhBjZBPNlOvLadeHWT eR2lTsAm6wlY0gRiOf76Uvx1nCdXZh9emX54eTLmEuo3WRe6LfHdp9juQyf3 mxAqQQVdaPVFDDoZ7G5ENoFrvWkmqNOE4Am5Fx71m6DhJr+TNwG3GgSsuFDA dYu86Dh+yiakeYvfwqhNjnvA2US/CfAE3QSb9Gqq4ENtivKuNl53B1/TygGb aNrYYBOdmgc2me3I0uuFJ/bpwm3ijmCiZxPyqPf/ml74k2xCkARePtRejY9o xPbpQnkTWC5i5TEnzy7R2x/p2+S7439Rx24aTIQnbKKXMUHJEb3Qazk5Sp38 eC/8cb9JemJ4dnIkfCewkkQ2wXmCqQR+gVFH/O/2wh+3w/+sTeYnWw1sYrys C542OyHv0wrhPSJryIFoqjXSaWLYCw9CMYQJsdUVeQNho/3vJ81YPKUj3miz id72XD/eC6+XKEHfs1GbGN1krLI0lZwlIWxCgIUQCvEhPZugZhNkE+QOInVi aBO91AnZJmjnLtwm+YY26dNUzY0pIHQd/JKciNgw5xAfB4jc1ODWpoqejqre zurZkZa+ztpqbiayCc0Jq+ZCNkH9JmguPHAG7dNFnr1oaBPUCw8waanP625h D3WJACagkv01HXjk5e5RWRfRcgI8gQ8dbPQ92xwgdcRPos2EsUnxB3Pvn82D UD4cLn58vvzp+bcyLSMeIcXXl6tfXqzC08Am7w/m3u1Pv93DdiqGAJJAvNuf QDwh8jVnNjk7zo6z4w8dteVxHfXZnQ05Um4CLyswJ8YlNfROSqA909c2kW7x mHLjEeVaPOV6IvVGkp8dK+AW098+0deWeWwTeXH4XGvJdh9/o5vTV5XYVham xvbp8teU+UF0QZT6dpd495T6qPM9tIUUsElvscdQuWdfsXtLqkMry6GN5djK cmxOuqWIvymNtW6IthCHXhcGX+X5Xy7zOl9EMwGVlNDPFdPP5bqfy3E7V8I4 Jwq7okq26St2Wqj1X5OEbCvCd1QR24qwLUXYtjJsvy14vxXvPWkO2lUFbsn9 NmW+m3K/DZnfusx/vckPYkMWsCkPWmxJmZTGD1dHdpX5KDKcJQkONdFW9REW Ir/LQk8TMf1CDeOixOeKKshsN9fxSa7Dbs6tnSy7zQzrjRSLVabZZrL5BtN0 E2DCMsOCabbDMt9i3thMur6RCHFjM9EUFLOeaLoaf2Pl8Y2luGsLD6/ORV+Z ibo8HXlxtsB+hfNgQ0hZEVCmua5DHI9BHq1HFNpXE9MjzQCb9Kq4WpVIoxTr wYTcDo9sghrhkU0QTIiMCQRxTc6bEDY56jcRZur1mxA8AXS0Ko70gasEC6Wk AEIlLWxuKsJSJ1jSpLRFxjYSTRXoAocJ2v6Xe5JNyE0EKE63CeKJuoUHAddw 1nUKte3wM3I1bcAWjk4t0LRxACbaDi4sFPu0/B4Nb6Y9E2wyUB/TLQ7RCgJ0 Aj+wSZ/Aq49PBzugfhOAyZjQgxikeJJNJmq94SFmEwH1eMNhclAH+ZQB8AgP i4FKj0G+R58YXmVat8C/WxihEyd11+Rqa0s6ayvaaiuU2Nq7WNaYJ5VmN0p/ yCaIJ7BYgvgRm+jlTQzTJd/2aypMgqiAKEgsz08ow6M451FxdlwRiqxYFEbz JsbLutJjs9MeIpsgmABJWPEhBE/I/SZgExBKJhObbwKrUFhGok269PbpapPD r0Ql/Hp0qgTqZnh3AEPEveq6XnU9nHs663Qdtd3tNXjUQWjbak/iCYJJi7Sy pYlLIAibvYjbZGJItjjdjrYLxqu5sJouNAueGAoPgaq84GJmXNbbJVBK85vq s7HUSc13mwaTa7rIPMHP2YY2+ZE2E8M2IqNt7+QwzJ6QUyfkzYHJJiL/uXqF XkQpl17eBIGFvA3yCdMkjXSXGC3rMsybiNhZRN4E7R4M7gBxwAWhEjJPiMQK 2OS466T0W1QXS/DdgxvFgMoiSTW2ywQ+hiYb/k4b6K6ZGZUvTrUM99QKKhKY cbRw/9tpCT5NNblrM+r99YG1Oc3yVIdGyeOXJcdF0CgPzDxdLChYusTc4z44 5QbdxczL3dyXYhXoaRviZR/mcyvCxz7Cxy7K71Zs0B3UbwI8yXjsmZ3oVZDi X54dhnrh2yWFvW3cQbVwdki6Nd/xdL0HazPZ6n+9N/Jqd+hgvQfuPMdbTsAs zzb7cZ7AR0ffHUyCTYj9hN8/m/v4AlSyAEL55WAeHn44nPv0YkE/8K2AUcDD zy8XP71Y/PwS3yv45eKXVyAUMM706ydjr3GYvH4y+nZ/AsuewB+BVZHh8QLn ycu5T6/mPr6c/XBW03V2nB1nx6mHqipNLclrqUqvKY4uZTIyw++nh95N9bdj edskUc0TPG4kuF9jetxIppgyfW4m+9mzfO2SfGxZfrYp/rYsH6um4vCFzvKd AcFKV7muKqG5NFQriO1mB6DQYeHfW+HXV+HbVejeU0LVFbrpClyHymkDpZS2 dEd1umNnmkN78q0Wpp0y0Vb+2Eb2yKY60qwqwkwUasoNuFrmc6GYfh6i0NMk x/1cttu5XI9zuZRzxYxzlSGXZUm2ndn3hti0uZrA1aaILVXMbkvsU1UkxBN5 6LY0cFcWtKcI2pUHbEq8NqVeW1LGptRzQ0KF2JTS1iQRS3Wh89VBMwK/kTKa LttZk35P+ciuPsysxv9ajd+1Kp+rtX43ZKHWO8X3tovubOU7bubdWs+xW023 XgSYpNusJluusiw2Uqw2U6w3k62302y3meY7LIvdZKu9VJv9NNsnKbY7LKtt pvVmouX6Y/OV2BsL0VfnIi7PhF2azL6zVOa+IfTE9hCufDDEvd/Pe9At8uqt DdZJU/oUYBNBt6qhS9mkacYkohcAFnBKr7oWVIICHxb/rZoLwQTlTcipEyQU fA/hCln9kU1qhZl1okxkk1phGvAEBQilTVkM0aooRjZRSgEmhYrGAkUjXBSr pCV4Bwo+bJHUAmAYRNsyOcg2IY9cPD1vgiY/IpsQ0aECp2ChbuFg0cpWt1Z0 tXO0HVh0d3J1ap5ODWfOVGs62GSoMba3OrxHHNwj9AebDIl9B4ReWF6D6zLE cwGbjIsoI6Qh70QjPPBEzybYPsP4lEa9GBHS4DzAc+/juPZz3dCdHqG7Tkjp EQWg+Sba6uyumsKOGnZbTYWirgzE0dSQJ5VkN0oyf8cmDUc2weNbvwmsAH/E Joal/kZ7T/T+Bb4452FRdoxeFGYa5wkKlEYBm0Do2QQwAiQh24RIneAkeQiR kxINn8guZMFqk9inC48KFO1yAfgCU4ZSBNxA0dPZ0KtuNAy4r+uoRzwhnox4 gmyCwURaKa8vR3+WvB7bXkDZWAqcn5toWZ7tXF1oB31srqhRwMPluVa4A2dU 0AV3IOBialQKNpE35mLDTeqyJDX5el3wEEdZSzyBYtQmRKfJKW0mp5d1nbRJ F9ks6OUmfzpcIHecYhOjAxmJlhNy1wlcox+EuE8e10I8H7tZkWG4K5dhIzyx YzABGWIYCrFDF+EOVLiFsiR6PNHLmxB1XKASSTW8mwoh4BdAUl2A8AjnGn4m QHWor35ipGlxunVuQtXVxgOeZDJ9S3Mjq3nJPW2VK1OtO0va9Zl2tayMXZwQ HuzsTbFmuFt6upp7uph63L9CdbpGc77h5Wrq52ERSLMOYdwM9waY2Ef62kf7 O4BNUL8J8CQrgZHH8s1P9ivNDBGVPpIK01rq87TK8oEO/uygZGVStb3QiebC v3sKLhh+uqbbW9ES0xgPNnv217ufbw98eD795fX8+8OpV09GUQfKUfbk2cyb vak3e9P4Fl7YYMQPx6CAh2iG+/vjthG4/vJ6AbXVw0fh+u/vV7++WYSnoWwI /mUnUboEC7jzfPr9ixkUH17Ofnw1B2eIP3vhc3acHWfHX/oAmKgb8xSCZHF+ RFECLSPsHtgkxe8my9sa2STR4zqLYppCNSNswvTFbYL3myjLo1e03L1h8aq2 olscrywOVvOidZxAFD1YBPSx/fvZftoij55Sak+Re0+R23CF52AZtT3jtiYD eOLQkXqrLdm+mXkTeKJIsG2Ms6mPsaqOsBCGmvKCrrH9Lpf7XCxiXMmjXMx0 PZfujEUWIIViUsQwKfW9KIwwbU67P1YZsNb06Elr8r4q+okiYlMSvCkBlYTt q8L3lGFrDV4bEu8NKZwZ6xLPdQl9s4mx0hCyWBc0I/Yd53qOlFNHy2jjFfSB XDddupM68Y4q5qYk1FISZN4UYrFR6L5V5LGR77qUeXcu2X4hxX414/ZG5p0N OGc4bKTf2kxz2E532Mlw2E61fpJx81mu4/P8u4d5dw9ybu9nOjzNhrPjTor9 epL1UpzZbPS16cgrE1mOi6Wua3zqitCDZBNGT01QtyS5V1GI2UT5B21y3P9O 7jQhkIK6TlDo7SFcL8oiarr0bNKqKGpVFBI2UTUVqaRElBx3x59oE8NUCFko /w6bHPHke5sc8wSzyXRb5oSSOSyJ66uNAJv0igL6RP6DYBPBdzZBeRNy6gQF XANPCJsc1XQJqIY2GRV5Dguog5UeABMQCrrTKwKYUHvF2OxFnThJW5WtqS7o qKn4a9qEXPpVmhf34zYhiruIZhNU06WXN0EkQQEPURi1CSwmjdqkTcYHVgAu kE3UzVUQKEWiF4RN4Pq74i4DmygaytGfAjaB/6pKSRnYZGaseWGqDdyxvdYF sbHcubaIjTvZWoWHWpQrgfPKfBthkx4N/3dtQi7rgnUv8AQv7voGE7JNDAu6 Ttk9mPzCnWIT4uUm7ylNLuv6Pq/xLWWjdwd9M0Y74iGInwI91IPJt655bjbg AogB1kAMAYMYnW9CnhFPdJroNZsgdCCeGLWJXr8JadBJMYJJw1HSpOD470nc Jkre6IBkakwONlmd74TzaF+9upndriiDAJtM9jfODstmh5o6m0q5pUkRIS6+ NFvgiZeHlZe7JdXpOs35OiDF283Mn2IZ5GkTSrJJTIAjYZOkSJf0R7SMx54o b8IriK7nsRTVWWpZia6FPT/ctDXfsbOofr418Gp36MX2wPOtfrgAmABPDtZ7 4M7usmZ3RQM2AZV8fbMAmgAyIG683pt4uTuGxc74q10AxTShEqIKCz3zzf74 y90RQM3bpxPw8HhUyjTiCTwZPAJCQUhBoxWPqHI4BfHhBYaaj8c33+PxZy98 zo6z4+z4Sx89ypKO+hwJJ4GXFZQb65YachtswvKxYTKsyDZJpZmDSlAwfW+y 8JquZF/r9srHm73Cg7GatW62VvRYXhjYzo4gbKLjBOA28QObdBdT+so8e4s9 eovdRzmMoXJaR+YdTYYDBPCkPdW+NflmM9MOQpZwszHOujbasirCXBB6gxt4 tcLvYqGnRY77tZR755Mcz6XcM8lwPp/peiHb/XyGy7lMV5Mir6viKDtVqpu2 wHulLmS9MXRDgsVWU9iuMmKvOWpDGrAu8V+X+K5LfNalEF5rEsZKY9BSfcC0 iDFS4T5S7j7O9pxg0yfL6VPljLECai8IJel2W9xNVZRVS+C15oBrKr+rCu/L cq9LKp9Lrf5XppMcltLvr2c+2Mh8sJ3j8iTf9Um+y07Wraf5d1+UOL8qc31Z 6vq82BniSc7d7UzH9VT7pUTrmTiziehrYxFXxjJuzRe7gE2WBR7TvPtgk4FK J62QrqsO1DayeuQFPUq+VlmvUUh/3Cb92qOyLmLeol4QTsFtUo6GwmP/bEvq hdezSbOsoEVegGBC2ARvhC8h7dx1ok0QMRBJyGD5d9ikQ1VhaBNy6qS7k4Pb JANsMtQY21dDsonIt1/AwOa2c5wHuM7HNqGSeYKEAg/hDCoBniCbwP1hYzYZ E9NHhDSwCcAEzvAcuIPPhacRNtGIM9VV+X9lm5DbFv6QTVCu5EglKVH4HsIx hv0mRiOLFQUwyUuLzUmJgS/FKUo+ySYtUh6YAuOJQkjYBOihbavVC1AJ2ASV dRG9J0ZtomysQHuCKRrK4L+qSlKmbuFPjSjmJlqAHvj8dw3ABAIYAnc2VzQo aQLXhE0mRyR/yCaG/SYETMg2Mbo31+mTTX7XJqfs03VKO7xRKxHFWuTsCbHJ GFHupZcu+bavFxfLeoAvwBoETwy3ESZuEpMWkWjIY01QQReEUZiQC7qOm02O bIJfF4FKUIBN8F0mMJvAGV4mrPmov2F6XLE007Yy1wE8WZ1tn59QLU42z4zI pgYkC2PKxXHV4piqp4XHK2NGhrr60+2AJ2ATbw8rhpsZwITuaubrbh5AtQqm 24Z52UX43Ir0vRXldwuNOCFqutDsxTyWb0lGMDs3QlT6qJaT1CRKB6H0tnKX xhRPlrte7gy93R/9cDj5y8HE+2cTwBOwydM1HZZP2e57toW1xr96MvL51Rzw AVgBUgBEfHg+9+4AE8qLnfEX2+Ovn2D98qAM4AMiBlz8+nYJPgWHzBgakgJP QGeEFDDL0/W+vdWe59tD8Bz06ejrY8mU57Ofns8SQ08+o6Enh9Pvn03/2Quf s+PsODv+0sdgG7utLqu2NLY81Tczyik15A7YhOltnUS3TKSYgU2SKDeSqWZp nhaETVh+mE1YvtZgE40oaWew6nCibl3HAZvICvxby8O0xzVd3Wx/vKbLt6/C 9wSb2EGo0+070uyBJ20pIBR7RdLNpnjr+oeWNdHm4ghTfshVTsDFEm+7XIoF 887FOLtzzDsXMt2u5lJMcyjXsj2uZHtczHQ7D5FNuZBLu6hg3tTmOU0JfNck kduKh1uKqC1F5LYyYr0peFXivyr1X2/yX5H4LtZ7LdR5L9R6T4moYzy3MY7b aIXrYPGDiTKPiVKP4Tznvox7fRn3BzIe9CTfmcigjKa69Sfe73po1xJyQ+p9 oY5qUk+5oPK72BlyqSvssi7iSl/Utd6Iq/2RF8YfX5tPsVpKt11IsZ5OMp+I N11IsZtPtp1Jsp58bDEaazYUfX0g8upYhsNCCZY3WUZ5E96D72wiK9ApKrsU dWq5RP3DNkGD4IEnqBceFXGRSfK9TbCarh+wST7whNQFb9QmZT9vkx+fvdiu AJhw9GzSrqwAm5B4UgE20bSxcZ6wj3nChphoTh2TJw42POypCusWBuoEfj0C 30GRD7JJL26T4UpXsMmQ8NtceAIpyCaorIvIm/z/0iZ6//Z+kk2Ksk6cbKIn FIAJYRPEEyQUwwCbAEwgclN/xybNUh5oAvEElIF4AuhA+jgp4AkoTrIJ2qwY 9ZuA4uF9NDmsWJhqQ9twrS91rC60bSx3gkQWZ5rXl7DGEzALnFFNFwRhEzQX XlKTZ9Qm6CG5Fx7t00WGCerUMJo0MWoTwxfuRwq6yBtnkb++3nwTIo1itMbM 6KwTctKEsInh6BM8MlHbCKrsQsVd5GuCJ8RDYtIieetgImkC1gCAEB4h9uw6 eTT8MU/wpAluk0Iib4LO6mb+6KBkdlIFMAGeLEy1LEw2z40plqdb58eVM0NN YBOMJ7hNuKVJUWFuQd4OwBNvirUv1Rrt6AXxraALg4lDlJ9DtL8D2ARt1YV6 4dF8k8x4en6yX3l2GDc/SlAcK6/KbGss6FKUTfXVb813AE9AIi93Bt8/m/z0 Yubzy9kPh1Ovnww/3+p/sTMAPAGbvNgZxMu6Foh8x9c3yx9fzL99OvVmb+rt /gw4AnEDuQNlTxBS4A4Y5HBr8NnmwMFGPzHMER6uz3bATzo3Il+ebNle7IIP kYHzBVQCNjmc+fx8Fi6+vpj7FXhyOPPxzCZnx9lxdpx6DLRWqKrSxIVRJUyv 7BiXzIj7qcG3k7ysEj0tCJuk0MzT6ZbJvnZMn5tgk2Q/O2STFD8bbRXryVD1 88n6jR5utzheVhjQVhGurfA/Dr/uCr+ecp/ech9tkUdvKQ3VdI2w6aimS51h 05lu05lm25Fm255m25ZqB9GcbKdg2gJPGuIsamLMROHXgSfc4LvFPnZpblcT 7powH1zI9Lia43kjh349h34th341h34lm3Yxg2qS5nGuwPNchf+FxsdW3QWu 43zf2erAhbrgFUnYUkPwYkPgsiRotSl4RRq41Og3LXafErlNilynhG6TfNcx tvNg8f2hwnuD+Xf7s+70Zd4Zyn0wmucykuO0JghYEwSu8vwWyuiTuc5DqY69 Sba9CVYDTNuRZLtRLGxHmDZDiVbjTLPpVKv5TLvFbIfFrFtzGfYzaXZTyTYT LJtxps1YotVIvMXQI/PBOHO8psttQ+i5KqLM8p2GeQ8G+c5dAs/uqoCuBqau KR9sopHXdcoaf9wmQz2Ng7qGfi1W3AU2Qa0lqN+E6DpBgfebsH/EJnjSpIDY mwv1m+BRhPpN8MDmAP54TddP2gTrpseGP1aQA2zSriz/xpOWis6WcrAJzhP2 MU/gXAE2GZUlDtTHIJt08311fJ8BoU8fn35kE44T2GRU4D4o8EDbbSGhEEhB eRMIEApo5aR+E72aLrg2rOnqqsr6a9Z0kde3aIlbkhv7kzYhVIICHkIgniCn EB/KSo4m24RbnAIryZPyJoRNsMouvPcE8UQvUEpF70NGbQJ/ED5FBWxSIa8v aWmqAOBPjShW5rC2d4i1xfaFaeX0mHR2Qt7fLerXiiaGGtH2XERZ18Rwo05d KWvIOcUmxFZdCCaETcgwIYqg9BRACMKoTfReuB9JmpBnwZO/Mvk+ogcSB9km 5OIucms8ejL8LIY98rWCo84aclZFUG5k2KKeTYh0CTFpEakEwYS8Qxfaa4vI mxCpE3I3CjljotdvctxyAjDJQ0V36LWDX4bJEdncVDPYZG1BDefFqZbZUfnM iGx6RDY/qoCF+spU69K4Cu83iUc2CWDY+9Js/T1v+nvaentYYkPhUUGXl10E BpOjTbrQNsJouAkr2i0tjgowQTZh50YATKorEprrcrXKcrBJTwtnUC3obeX2 t1cujMo259rXZ1o3Ztt2lzQAlmcbvU9WunaW1TtLmu1F9e5y14udIVADAATP iaz87d3qb7+s/f2Xjd/ebfzHl+3/8XX7v33a+Pv71b+9WyYKtNDzASMvdoYh 0JZfaNcvsMnGXOfSRPPssGx1um13uRvuHG8IhtV9gUE+Hkx9eDr5YX8Czp+e TX85xKny7Kym6+w4O86O044eZYmEl8jOCMyPp+bGumVHOiX42CYyLBM8LRI8 TMEmTKppqqdFppd1sp99krctZhN/e7AJ08eKsMmLqYbNXp6uKkFRFNTOjug2 ljf51gtf+K0XviPNCkV7mnVbKgTwxLY5xU6VbCdPsm18ZFkTYyqOvC6KuFYR 4lAaaFfgY55Fu5pBuZTleSnX62qKu0mqh0k69XwG7Xw6wIRyLpWCdcrneJzL 9zRhB16ujrGUJ9t35t6fFPnOVAfM1wUu1INKglakwevysNka95lq15lqt5kq tymByzjHCWKs1Gm0+MFw3t2B7NuDOXdH8x5MFDiPFN4dK74/Weo0W+G6yKWs 8mkbQvoaj7pY7jpf9GCu8P5M3t2ZnNuzuXdmsuymM+1msuxnsx3mcm5DzGY7 TmXcmkyzn0i1H0+xG2WBYmyHk2ymc++tVFA2RfQ1MQ1sMlLpBDbR8GlasT/Y pLspv1vO08hr/5BNhnslwJOB7nqwCdqYq7O50uisE/h0AAKab6K3h7CBTQpb FUf7Biul+QpJgbwhH4WiEeMJLpTSk2zy473w/0KbYDwxsAnOE2STtDF5kl7e BNmkl+vaw3bq5zgN8VyQTQb4+jxB/SaETYAqg8ZgcnIvvMf/J3rhDf/t/Q/Z xGhNV2bKdypBQezNRXwoKzUmOwU+F3QTl5v6EJhzqk0qkU0QT5BQDGFC2ARd E0Vfp9ikTQ4XFYqGUmST8cGm5blOvKCra2W+dXSgtk1ZzCuLTY6nsR5Tywuj 4DcNqIKqvCB+xCaohQF1MaBmE5wn32VMDG1CwOF3bUK8cL9rE8Ig5B3AyF+Z vHMXYRMilaPXLK/HE/RTEMVpaDsvZJM6Iaz5sb15URD9Jih1QvS5G6ZOyJMW 9QbBEzt0IW7AGe3ERfTFE6GXNGmqKZPVluMjF0ulNcUo4D0F3xi+mWE2egXh L9KJEdnUmHxppm1jqWt9UbM807YwoZobUyxONoNKYKG+NtO+PNHSIS0pL3wc GvjAm2IN4UO18aNhMPFyt4DzUUGXt30kBpPb0fjsRdRskhjhjGyS8dgTYJLL 9ClOD6osjGmoTFbV5gBGpvrq54ak88NNi6NyOM+PNM0MNI50ibtVFWpZCbAF tDKqrVocl2/Mta3Pts0OS4e14vHeOtAE+vZ2l3sOt4Y/PJ/727s1sMmvb5eB JEglH1/Moq72L6+xFhXUJ4KyLb/9sgJPQA9RNwow5HBrEMkFLoisCtacAiTZ m/i4Pwnx6ekUii/PZr4envXCnx1nx9lx2qFuzK4tjS5K8syMdsqOccqKvPfY yzLJC2xinkgxTaTcYNLMUhmWmT42yf52LD+7FH97pq9Nko8Vy8cyPeCmroq5 N1R9OFazqeP0VSe0loaoOZHdnEA8ArBg+/dU+PZUYHkT4Im2wAWiv5QyUEZt z7zdmWbTmWrTkWrdkWrTnmIL0ZZi24pVdtmp8KnxDTGmtVE3aiKvs4MtK4It ygLNiv1u5HtfzfO+kudzJYt+MdvrYrb3JThnMi5kMOB8Kc/zYjblQqY7xPls ikmhl0l54BVJomNLxoO+cvpUVfBiY+RKU/S64uGq1He+znOmygPlTSYrXaf5 7rN8j4kK56HC23059v25DkCSWbbbVIXzeOm90aLbEOPFd6fL7s+znXdqvLfE 9A0+db2SsimgbQlom5WUlTKn5VKnlVLnlTIXiOUS54WiBzN5d2Zy78zm3YOY zrkzmXV7Kvv2XLHbMpu6JvRcFdMWxO6jQte+ygcagWeX2F9Tn6iV5nTLuV3y Go1c3yZo3Ams5DUtwp7OGlAJ2kO4v6t+pE9KtgnaLhjZRG9jYXUzrPDZSklJ Uy383xZskgmBbyCsv4dwq6K4VVHSgs1bxLYOljfmy+rzmupyIWT1aLeuowTK 78LE0CbETYInetGpEnUohVgoBO0KwEtlmxzZBIKNB2GTo8ouvLiL3dmM8aSr jdvVzsVhghpPMJ6ATUblSf1gk+pwnSi4RxjQK8T7TfiMPq57L9tlgOM8zHMb O1YJAROUNEE8AZUQeZNBtGMw7pHBb+ExLKQOVHoATHo5rn1cN6ysC7dJj4jW IwrsEUfpxEy8Fx7ZhK2sx1bCssYCqSQHs0lDEXne4repi/Xfpi6iMzaDo75E WlOIre5wm2Bj7L6feXGKTU7iCXl4HwojMDnVJgRMspMjITJIkYlTBSKNGQ6R zoogbmalRmcnR+EZk9i8NMwmnKJkWEmqJEAS7nEcIaVVVtmGQn58IYO3hljT UmUQ1QRMvtlEKSbvIQwwaZbw4A/6ziYyzCaj/dLl2Q6wyfpS5+yETN1azi6J ehh+n+5uGuxrl/DQnVMaq23nLUypVubalufaJocl3Z1gk9yG6gxJTRa+rP3O JscrXmxxjlrg9XboIg8xJC/+yaVWeuPgIYy+cL/bCG+0mkvvJkIH0SpC3v5X r19ebzAKeUY8MfGESA/BD4uQgk8Pgcir5YMycqq4WSJOprAinRwCiPI0PL7Z RG8QvKFNUHKEEAqEXkEXSpegQfAQ0mObSKqLjt2EvUbo5YO/RSeHZdP4HsKr cx0rs+1LUy2gEjhjFxMqLMZVC2PK9qaSsoK4AB9HhrslCm8PK7orVtDl7W7p T7EK8rQN9baP8AWb3InC8yZxIXfjwx8kRrowo90gMuLpWQkMrBc+J4xf/LBR kNramN/TwhnX1SxPKFFB18F6z+Fm34vtgf3V7u2FTri5NdexvaDenGvfWujc W+3eX9WtzbRN9TeM6WqnB5tGtDV97YKeFkF/u3iyr2llomNjRrs5pwGzLE+2 rM92bM6r4QzIgjNYZmtBs7OkfbKie7reBwBBaRTU//6PD2v//LiOelKAM/BR eA7iCbYh2N74+73xTwdTnw+m3+9NwPWH/YkvhzNfn5/Z5Ow4O86O0462KmZ1 YUjeI+e0cIesqLuZEbfjfSyY3paJDPNEmikEi26e6m2V4WfL9L+ZEnQrLehW gpdFgpd5so9ldrBdXzVrf1B8MCTc0pYPVSdo2OFabmQ3LwhCyw3s5mI26Wb7 dlf46Mo8O/KcNWCTQpeeYrfBClpnzr3OlJsQHcm2HclwtkPRmeLQkXyrLcm+ Od5WEWfVFGMujTbjh5lVhppygq5XBFwr9b9a5Hut0Odqns/VbK/L6Z6XUqgX U2iXUulX072u51AuQ2R7XMrCeGICkeF2LsvDJJ9+gR9upUxz7S3znxBFztXH bcjClxsCZ6u9poSe00LajMhzTkyfEVImea4j5fcGih2HSu5MsO/PVrpMlruO lziNFt0bKbwzlOc4nO8wXnRnudJjq5rxpNb7aYPfG1X4x46YD22Rr5pCnjcG Pa312xV7bQk8Nyqp6zzKJp8GAQ/hvMJ2Wyh1WixzXuYwFtm0OY77gpC6VOc5 UUvVVd7vEjG6qvzVdfGaxiytjN2tqNapGtWqb3PhyfkFcIquoxpUMqSTIJ6A TYZ7JXo2QdVcABNyqFs47cryFhksdwuktTlgEIIk5MGLEK3y0lZsdkmJSloE T5Y3YDaBT0E8wbMnBajKq1laTuoCOAqjBV296lpsir2mrru9Cn4KcurEII7G T7TLBdjiEw+iIx7PnnC+jXRUcPRa47vaeF3tPAST42CPqdKGZEm9DbHaqgit KKRHGNgnChwS+Q3wvfu5Hv1styGO2yjPY7wSE4dhQdcA3wOu0U7CEEfzTYAh BmMW4WYfz62H49LLdYWAOwCZXqzfxLMXTCSK1olZGnF2p7igo4bTXstV1rMV DWWyxkKpJLdRkiWr17eJUlIKN1GuBMHk6H5jGdhEUl0ACzxY9RFDt40yxGic YhNydZBxm2Q/IpdyGfbCEzZJZwFDwvQCbkJkJINNIjJTIlFksSLgs9AXQf0m sIwENRgGPt9EP9AkIIMwkkzRS5qgr6lq/JY3IWq6JoflSzMdO+vda4sdY4N1 DdVpUaF33O5fhggPvB0W4JgUR4X3S69GND/ZvDjdOjEkhV8/eLPAGwp/K2E2 aRDn4QVCueQ45kk2kUogFzsR1VOECIhlPznBcVIX/Ck2Oamsi5xGITuIsMa3 LX9JqZNTwuhARnIvPBGIKoY0I7pXvk1FKU8n13Qhnhh2uOslTcg2IfekEDBB lsE4g+/TBQEvEKrpApsgVMIvw+yYYgFvfkceWZlpg4ALuAmxPN0K59lReaus pKwwzpeBdZrQ3SxoLmYAE0/no9mLPm7AE5tgun249+0o37uRfg7RgY6xYJMI p6RoVwhmjFtGAj2b6Z2f6l+eG84via2rZClqs3XNbCwnMibfmG3bWVSDTV7t DkG8fjL8Zm/k7f7ou6fjqC8ejUF8fzD1dm/89e7oi62RZ+uDy+OtU33Soc7a vlYxxEB7zVBn3XBXTYesVCLKaGks7OsQDGur+zuFA2oRXEz0NWDbjuEB5pof VSxNNINfDjb6X++NoS2FD7cGASNwBsLAGe5DvH86+eHpJCrrevdkDAKuv+C9 J3/2wufsODvOjr/0oRLEV2b5ZsXcS49wBJukhd6KY5gmeVkk0s0Im6T5WGf6 38RsEmiPbJLobZHia5kTYo9s8mxYtKNjj9YldfOiegUPe/ghR1EZ3MsL6uUF 9EFUMNT5rtoit+4it94Sd2STNqY1RDvLpp1li6vEHo8jm7Qk3FQ9tlE+spbH WlZFWoojLYTh5pUhIJQb5YE3ygJuFPrfAJ5kMS6l0S4CT9I8r6QzrmVSLmR6 nD8OE4gMPNLcTNLdz+fSL7NDLBoS73fkMaZFAQu1wcsNYUv1IXNV/tNCr0kB HXgyK/Kc4rtP8LAqr0mu0xTPaYrtDjyZLHeeKAOh3B3MvTWQYzecd2uq9P5y pdtODeOlIuRLV9w/+5n/7GX91p34uTPujTL8oMF/W0xfq/TYr/N9UuO9U8WA 2BTS1vmUDQF1Q+C3zKXPst3m+O4LNVSwSZ/QGdmks/axpjGzq6lCzybEih2b P4jNJeQTNkE8MWoToheeLBR1C7ezGZb0pWAKIAasnRBJ9HiC7SGM26S5qRjZ BNZayCaIJ2SbqCRlKkm5Xhi1CSwd0bRuuDBaykWq9TrBJsqj3boInpBt0qHi nGKTYWXKgDRBVxfTJQ7TCIK6BQG9woABoW9/pRfZJhN8KjY8UaDfDg934Izy Jt9mLxqzCTwT2QTxBO7AM8EmPaIjm3SLmH/UJt+VeNUfhbIRG7wINoE1LSzk YBl5UorklLHgp5R1EWtdVNalHz9uEwOYQCCVIJhkpUYdBSsCPhF9haKsR5Wl abCMVDVyDW3SKvuuPhC9QdB0eL34SZvMjKkWplpxm7QP6IRC7mMGxdKLYsnw MPOmWgT52CU89BDzWMgmEOODEk0rF94moH5M+lV/wCYET/TW83rzCslJEzIw /1U2IedQ9MYs6n0np9uE6DQhD2Q8Kcg9LOQ/6D9tE70iLvShH7cJ0W8CIamG VzAX/i6dG1cimABDQCWrs+0QcA03IZBNZkZkLdLi8iLMJgx3S6qzKdiE5mzm ce+a+92rlPvXvV0tAqi2IYxb4d6OEcCTAMeYoNsPg+88CrufEOkMMGE9dE+P 98xK8spL8SvLCROVP26qAjsc5U1WJlVoD+GnazoCJijgGoTy/tnku6cYT7CR iLuj2KD2p1PvD2be7k2+2hl7vjl6sDa0t9z/ZKl/b2lgZ6l7sr8RYNLeVAIX Wwua3eXutZl2bMOxcRXKoaAAm8AdlFKB2Fvtebk7gvpQUHEX2uDrt19Wfn21 8Pc3SxD/fLcC5/fwneyM/Ppy/h9vl//shc/ZcXacHX/po6EssjzFMyPqDtgk PdyRGWATS7+RyDBP8DRNoN4AmyQzLNJ9bbIC7JL8bFn+N1MD7Qmb5IU59Nck 7w9VgU2e9HLH6lm6yuh+UVyvILRPGAbRLwwbEIYOCoKx4PpoCt26i911xe6n 2wRg0sG61c7EeNKaaNccbwtRH2NTG21dHWUpirDgh5lxQ804IablwWbF/tdz va9mel5Mp13I8LyUSb+SQTmfQTE5Cup5FMmuJqnuJumUC+keF9I8zmfRLuX7 XAfsNCU5dhVQxysD52tAKOEQC7UB00LGOMd9jO06wcUKvSBmuJRpjscM1w1i otx5qMCxN9t2MNd+ON9huuL+qpCyW+f9XB70viPqsybuq/bR33TxEF+6Hn3s jPmlLfJpo+9uDX2rirpVRdup9oTr3VrGk5qQdYHPHMd9muc6I3IbEbv1Cpw0 IjrZJlpFdbeyQc8mR7PRZRy47m6vApsM90ghgCdGbYLmLRJCQTbRtPLULbCY LwN0gC8kNdkII2SeQMCyqkVWAoFsgpImQBLCJvCQxJMyZaN+GC3xgu8fzvBR hBdYWBI7eunFyXkTLpExIfImaPMuHCa/Y5PBJswmmmOb9Aj8+wU+/ZWMPo47 sslYJWVSgE8t+R4m5F548j5dJ9kEzvo2EVGxmi5hkE4UZWgTeX3p6Tb5VtlF 6jeB9TMaCg+rWVi2wTLyJJucsl+TUbDopU7AJobx4zYhGEKOo0TJsUqy06Ih MpnhRD1YcfZjWILCGtK4TZq+KwtE75Sftcn3NV2tMjZuk2awydZq18K0StvB 5rPjAn1sqC7XQv0dwCYRQXeKcsLhjTDUU7sw1YLyJtr2SniDoBSk5IfzJogn 5NwBOWOClusoaUJQgkiXGKa6/hM2Oam4yyhPfsQmerNOyDMZ9QJ9Nb1twX7S JkQjPPn+j9tEWlOIvxyZoBJpDbZhl7ZNND+u0oPJ2lzHKl7chfIm2H7Co/Jm SVFRbjTYxMvDiuJ0A4IK8eCG250rIBSGs5mfh3Uw3T7MC7NJTOAdgAlEbMjd x+EPwCYpcRQibwI2qWInKGqzWyUFWmU52GRjtg3tFfxiewDPkoBExoi8CTzE 7uAwebE1dLgx8Hxz8NUOCGUCbAJC+Xi48On54ucXS19eAiLWf/tl7eOL2YON frDGm/1xtAkw2qQL9Y+g/AgEkgg888mKDmJ/rRdIgmCys6TdnFeDa7YXu+BD LzYHftkb//pi7r+/X/sfHzc+H8683Bw8XOuD+LMXPmfH2XF2/KWPyizfokR3 LG8SeTs52C7exyKOYZpANzO0SaKvDfAkBS68LcEmqX5W+eGOQ/VpT4ern49W 7fdXjjdgNhkQPyJsMiAKGxSFDWMROsTzBZvoSjx6Sjz6Sj0Gyqnq3Pt6NV3t rJsQYJP2Y5sgnkBIY20kD63rH1rVRFmII8wFeIkXL8yyIsisyPdaLuNSlufF LPrFLMaldNrFdOpF7Ey7mHEcqaASuPC8lE69lOJ+geVqkuhkkuJkkuVxvszv Sk3szbYst8EK32lx6Fx1yLQoYKLSa4zrOc6jTfE9ZwT0KS5lguM+wXGdYLtM sl1GS+8NFjoMFzoOFThMlt9bErivV9E2az13G71fqoJeNQe/aQ193xn5VRf3 z0Hm/xxL/e/DrF97Hr1rDz+UB+w1em3V0NbF7k9qgjeEvvNcj2kQEN95SOQy IHYFm2jEfh01j9QNGZhN5FVgE0OY/CGbQMAF4gkSCr6FFw+VdZ1kE6IdnrAJ 6IOwCTzf0CaGSRMIrFvZmE1QAgV1zaDGfMNulJNsctxy8p1NUBoFwaSzmdvZ DGe2ppWLt5x8g8mxTRJ76h92VYV3CYN1eN6kj+/dx6Mjmwxz3cf51Cmh57CQ RsCEGHGCmk0AJsgmaC48MMTQJugaVKJjO8MZHg5jnSaUI5sIcZuIMJu0V7Pb ajiKugps2F9DgaQx5ySbIJ7o2QTrUsFtAstaWLadkjchr1fJC1ejPCFWsMQz f9ImWcclW4ahZ5OMpDD4LLJNUE0X6lUnh1Gb/GxNl4SDE5jfLGUjm8C7ZnJY MT+JDX8Hm/Rp+SJefFigHc31WnjgbRDK42g3eEf0a6tmxhQAE+AJqumC98gf rekiCrr0ypnIG2GRYfLvsIne7sE/aRMjMxZJ5iKHXhM9+so/bxPy/T+aN0Hp yOrKDJQ3gTP8XWrUJhBwc25MgQq9ZkflqsbCnIxQL5oNzcXM7d5VjCcPMJu4 370KNvF0MvV2swyk3QSbRPnefRh0F9kEgrBJZiIjh+VD2ERek9XcgM2FH+uu XplUbc61by90Hqz3/HKAYQTOEB8Opz4+n4YzgOXzizmIj4cz7w+mfnk6+cvT qQ/PZsEm7/an3h/MfXg2Dzz59dXaP95tf3m9RJ6fCAYBkqBB8GicImqE//v7 1X9+XP/bu2WADNpqGMwCcoEnP13vA5UsT7ZM9jcOasQQ49rakU4xxHhXzZSu frqnAS7gPNsn+bMXPmfH2XF2/KWP4iSPgnjX3DinjMg7SQE2AJOTaroSfKwT fazBJkk+Vkk+lmCTwsg7Y9KsZ6O1L8aqwSajdcwuTkSv4KGuMhiihx/SLwwl bDLI9enMd9EWuYFNekvcwSaavAea9FuaNHt1ql1nih2eMbHDhWJPtgniieyR dVOcNcaTaMuaSPOqCHNRuLkg3JIbYlbqdy3f61IO/WIO42Ku1+UM2rX0o7ia Tr2CItXjIgSoJNndJJV6Po16IcXDJM3lXIbbuUwPkxzq+UKvy5zgG+Jo67ZM 5/5SBiBloTZiVhwyUek7wvYah8Uq132U7Txc9mCk7MFo+f3hsruDRY5DRY6T FfeWRB4bdYytBq8difczZcAzpf8zVcDz5sCXrSFvOsLfqSP/YzzlP8ZS/jGc 9Gv/46+9jz73xH7QRj9rjACbYHkTrsuUwGW0yn2klkK2iUZa3iWv0irqO5Xf wYToIv/Bmi6CJ0goCClETZdKWgS+QDVdZJLo2QSehmyCkiZgE4InyCYQJ9nE MFDGBF3DBWqW/8maLhwmRmyiaeOi3bqOo2JUlfqdTYSBYJPeSq9ermcv262f 7Qo2mRDQpkV0cq6EPH6RsAnapwvt5WXUJhCETVB5WI+QohMim0RqhUlqUVaH KN/QJg2NmcbzJg0lxmq6ylAv/O/2m5y0RjUahiQxUtD1R2q6Mo3lTYxmT8Am 8Hz0ifDVeCWpsJI0apM2YzVd6mYB8MQgftQmzdJvNoH/tsgmUyOK2fHm1YX2 jWX13KS8qT7rYcRdf4Z1qL9DBst3bKDx7583IH79sLo63zk3oYI7wH94m9QK 0zCeYG3UP2QTcsbk9LEm6EJvrMnP13QZTjb5yZouYmsvZBPUVHKKTYivjP7o f5VNyIPgf9wmDeJ8YrMCtON6V6twbsxITRcE3JwfVx7ZZEzRLCnKSQ9lUK3d 719zcryI2+Q6SpqAUJBNAqi2YV4OYJPogNt6NV3JsR7IJgVpARV5EWATWXUm ypuMdIkXRmXAk9Wp5o3ZtifLXS+2B97sjbx/NoEjZQJlUj4CH55Ng02+4HMP Pz2HmP/tzcrf3qx8frEENsF5svT15drnlwugEsQTCLQ9F9IHmvMOZ7iPNvJC +3cRz4QPAVvg09GUxr3Vnt3lbjgfrvcdLPdA7C1qt2c6IdbGW+b6pTO9jX/2 wufsODvOjr/0ASrJe+QMgWzyyMssln7DaC98vLdVgrcVySbWRVF3J2Q5h2N1 yCbDNQkdZSFabmQXJwBrhOcF9fJDBoShQ8IQiAGOd3uuU1ehK2GTrnwngMlx AFIcILrSHcEmbUx7ctKkJeGmMt5G8dhahvHEqgHjiUVVuLkowqIy1LQs4Gqh 98U8xsU8r0v53pcz6ObpnhBmaTTTVOr1FOpViGTKxVTapRTqhWSqSRr9Qhr9 PItikuIKcS7V7VyGx7ksyrls6rkcqkmp31VxlE1zmnNfie8YN3icFwLnST51 WkibqHQfYTuPVDiNsh+MVtwfKb83VnF/mus0L3BbqaZt1NO3Jd5bjbQdKX1P 7n2g8jtsCUDxqiPkfXfU577YrwOPfhtO+OcYE+KzOnm/PnSe6zHFObLJcI2H WuipPsEm33bQPV6J/WAvPDmQUPD7sIav0OuFh0WU3gbC2B7CxwVdqNnE0Cbf UicGBV3IIIaBlo5gK1TNhWDyk73whE1wmJxmk2FFyoA0/ltNF9+/R+Dfw2P0 cI5sMsLzmBTQZsQMQ5ggmxB7CMM1aio53SbdFU7f24SqEwR2C76zSWsNR15b /rs2AYkY9sKrpOWKhtKm2iK0TxfRifCD/SZGkymG69uf74U3mjEx2gufnhia yQxHnwWfXp6fBMtL4zb5N/TCN0vh/cX/ZhM5B95NM2PNs+MqfPaiGu0hXCtK TkvyehTlWl4Yo+sUPN8b/e3z+vtXcytzHfOTzWATot8Et8l/Pm+CVunEDBEC Jv+mXnjDkYt6vfCGW3WdbhOCJ79rE+Im+Wv+fL8JUdalFz/WC5+Hv2q5yCaG vfCIJ6gX/rt+E7wXviA7wt/7Fs3FzOXOZbCJx/1rrrcvg01oTqZerhZ+HtZB nnZgkwjv20Z74VG/SWF6ILcwuoabpKjN1iix/YEnempRv8n2QufukmZ/tftw sw8btrg98HJnELWfvN0ffbs39ubJ2Lv9CRAKBOo3+ce7tb+/W/vycvnT80U4 /+31+t/fbn19g+VNfn27RGwjjHYSRlsHE6PeUUoF3USB7oNN0JbC7w4miQHx v+xPfHk++4+3y39/s/S3Vwtw/fFg6pe9cYg/e+FzdpwdZ8df+siPfZD38H5O 9N30UPskP6vHDNPHKG/CMEukmybRTZkM82Rvi1RfK5avTaKXZYqfLcvHiulj keZnVfbwwbQi53C05sVY1U4Pe0Ac11ke2sUJ72L7Y6PhuYG9lcEDgpBhYeio KBRsos530eQ764rc+krc+8so3QXO6jR79bFNQCVdaQ7aNMdOln0H0649ya4t 8SZEO35uTrBVJdhKH1o0RJs1xlqi4i5RhDnYpCLoWqn/lWLfK4W+lwv9Lud4 m2V5mWYxbmR4YqmTVOrlFMqlNM/L6fQrEKmel1I9L6bQzjMp59OpF1I9zifj Q1LSPExS3UySXc6luWKZlEKvK4IIGznLWZPH6C3xnxIxZqq8JkW0sUr3Ma7b ONdljOOMd8o7z/CcZyudFwSuqzXUrUbGjsTnicxvXx4A8VQBZ78nTeAU/+et Qa87Q9+ow95qwt51hb/rCvusYT6VhC0JqdOVLuOVDwYED/qETmATjdi3syZO XZ+ukZR1NYm75HWGSRO82KkSzTcBlRB5k9H+JuDJoK6hr6tW11mF50f4aALj MUkIpHBRs4lSUgjKwDGSUStMxyOjDoUIwJKpbDwasKiUwGK4sKk2X1KdK6kG ngBSgCr533YSJpEElsoojNqEqPUyHHFisIfw0QbCHdha8XgPYZQ5koNKOC0y Nh4V8EOBUDSt8KPxIFDRWlcbdu5oLlO3VnS1c/BJ8RUD8uQ+Sby2NkYtClPz g7T8AJ0gQMdl6DCbuPdz3Id5lHE+berUvImeTQiYGAYq60LtJ0P4rsIDldRe fqBOEKkRJbVVZbVUF6hq2cpajqyuXFYH+iiQ1+fI67NkdYXEdsHf9uk6hgl6 qJLCi4glnuA/qayuGBZRsPBDNiHqc8irVr3KH3LhluGq1TCBcsJ8k9hCIjIf oijIiMlLj4bITQNcRGRDJIdnpURmp0ZhkRIF1+hhJpCE9V1kQDDBJqFZrLBM Vhh8YllefK0gT9XIbpFysYntTdhgRLRdcLucjxyBxfF1V2uVQYiN500Av4qj PYQRdjCbNHEhWuW8FhlXKSmDXzB4N82MqeYnWzeX1RtLnavzreuL7fOT8pG+ engTadsrxwcl4BE0jG91vnNhqmW0vwF+9wDvR7veVaEl7jebEHM9TrIJeWY6 scIn9hA2tIlecRd5volRnpD3ECbvMm2UJ3rKII9fNLqZMDnQE+D5qJoLbR1s 1Cbkci/DvbzIfxy/LI2wCXkcPLnnHdFDb6wJ2SaG2wgfzzopRrMX8SjAUXk0 jEZSkw+/DFMjTbPj8sWp5uWZ1pXZNjgv4tPhIRanWpen2xYnW6aG5S1NpQVZ kaH+9wLot+iuFlQnU/d719zuXPW4d53mZObtZuVPvRlMvxXqfTvc506E763o AIe4kHuYTaIwmLBi3NMe0zIT6EXpQfzihzWcRHl1lq6FM6arnu5vAJuASoAk IBFgCJxBJYgnyCYQvzydwEu5sK268N6T8TdPJj49n4c4Kuh6vfqPd1v//GXn NwDL+7V/ftz4b582f/tl9fMrQMfCxxdzn16CR+bhAt15f4i1nHx6MUvExxdw Z/ozmAVLsmB5lvdYZ8r0RyDM85m/vVn6DdTzch7iy4u5r6/mv8DFy7k/e+Fz dpwdZ8df+igBm4Q7ZgbZpvhaJjFME+k3mF5mcAHBhPAyY3mbo8jwv8mkm6d4 WyV7WcCH0nwsOI9cZpXZhyNisMmmtrRXGNPFDYfQVvh3swN0nMBeXtAAP2RE EDImDB3ieHcXe6hzHmjznftLPCB6Cl3V6Q4QmjQHdeotCE2yPYSaZadm3oTo TLIlQpVg05xo2/jQtD7mhizeWhpvUx9nKYw054eb8cJMOaGm5cHXSwEpQdcK /K7l+17N9b6cgzehZNDOp1FN0umX0zxBKFdSaJeTaZdY1ItYUC6xPCAuJrtf SHY7n+xmwoJwMUl2PZfmbpJNu1jkc70i2LIy4mZrlqOm4H5/hdtYJW1C4DlR SRnnuU/y3Ca4LhMgFM6Deb7rWi1tV+qzJKJt1vvuyYIPlKGHzWHPmkP2FQEH qoA9hS+WSWkNPGwNeN7m/7Ij8Jk8fLveb6WaNiN0GeHd6eXd6eHf04jAJj7q mlh1XZq6oVQtEWqkNScUO1Vq28REswmKsQEZ8IRInXR3iFGPCSrlQjbpUPEg YNEONkHFWnjZCdgk82j2Il69gA+DwzbzxNoZsH+Zx9bAsBhuqiuEVZakOl9a U9BUW4itkxuO18mS8h+0ieEoRrJNyBkiozeJwSgQqIEFpAM/LHwP7UpOh4qL 84Tbrqzo1Yi6O/jtyrKOZmwOY2dLOQhlQJHaK03U1j1UiyPUgtAuQVC3MFDL oWvBJhzKAJc6zKOOVkJQho93Dya3w6OkCarpgmv4ELgDeAKBciXESBRyMoWI Ubb7KAc+BbNJpzhJVZsFuJPUs/Eol9WXKmsLWmpzW2uyZPh/XiJFQvSYoP/g 2LBLWcVRzkiBpZ/gvzaavQgLSHLvALngx6g4frC4S6+si7BJYVa0YRRkRuWl R0DkpoXnpIZlp4RCZLHCiUqtLFYE2ij4qBUFf5jJDEeRlRyayQrOYAalJwVm JYfAtw2rd/i9Ijam/qZa+dG8RRRgDQg0wQSF3lB4vcBmLyr1UycqGVcmqWiW cVsVlUppuaqpHN5NaA/h7WUNxPp8G8QWIGWuY31RAyRZnm0HkizNtMHFxlIX 2GRQV9OuLEe98NjGd9+rhDxzUM8m5NmLeltXkSus9Oa2G7UJ8ZIhnui91mSb EHHKJl1GhWIko2FgE8IdRD7opA27jLbMk3cSJvIplaWpaDq8mJNNwMTogEWU QNFDimF3PDGBUc8msroSeI3g70OwCfzFKK0twH4ZRqRTo5KFadXqQvvaYsfK fPvchApedIi5iRYw7PJs5+SwQtFQkpcaHuZ7L8T7ToDnLU9nC8p9U9fbV+FM czJnuFr5Ue2CGI6hPnfD/e5H4bMX44Lvxoc9SIp0SY5xT3nokf6IBlGUFsgv eigue9zIT+lSlI10ice6q2cHJeszrU/XdECSt/tjHw4nIfAW+IlfDsbfPR3D t+qa+vBsGjWbvN0DmIy/3h1/fzDz4dksssnXVyu/vl779dX619fLX998i1/f rkB8eb30+dXip5eAlHm4gIf4xdyXV3OfXwJMACkzqLflI4aRaXSN2vDhAmVY UKCmFZR2eX84/WcvfM6Os+Ps+EsfRVF388IcMgJskr3NQRxJ9BsomLhNWF5m KT4WEKm+lul+tkmeZsleliwvc3hCqrd5RazTnCrn+WjVy/HqHV15vzi2uzIS grBJDzewjxc0yAscggCbFH2zyUAppa/YXZPhCNGV7nhU0JVyC6ITYMKy0+CB hNKRaKOMtwabyB9Zyh9bKRJsZAm2soSb1dFW4ihLYYRFZbg5N8yMHWpaEXKj CNtb+DrOkys5jMuZ9IsZnhdSaRfxuJxCu5RMBOUyCwUIxf0iy/0Cyx2Ecj7V /UI65UIG9Xw65Xyax4VU94sFPhcrQq7UPrZqzrijLXIZKPcY5lDnqrymBNRx jssY22ma77pcTdtq8F6qoqzV0Xdlfk9VwfvKwD2FPx5+uzLffaXfs5ZACBDK i/bgPUnwZo3Poshjiu+EbNIruN8lpndV+RI26WwUqCXVHUq+0ZyCpkXYp6kb 0klG+2QjvU3IJuTxi8QgeEObaFrhXIH6TfB23SyIan5aNT8djajGp1RjKyWs nUFSiv3jvKwC1sOy+iJQyX+BTfQMotcpT4YJsommRSDDv1X4SQe663o1VX1d 1fBjatv5mlbQCkfTyulsrtC0cYdU6f0ypq4hTlMVqRGGIZt0gU3YmE36uZQh LmWERwGbDP01bIL+I5NHw6OMCWETtJmAvB5bRMESjtin66Ql6x+yiV7Xyc/Z JOJHIznEqE2MZNxINulQiPRsojcU/nSbfOuFl3GbGsuRTRSSMpX0ZJvMY4kS ZBM4I5uAVuYnmwmbNFZn4amTP2ATcu5Ar+XEqE3IxXvkgi7i9SJsQn65ydtH G9pEjyc/YxOUAQGYoB+WmNvyMzbhlaQgm6C8CZq6qLdXMApCHAAQvdSJnk3I qRPSPl1F+Pecgf7FBmzSo66eGZdPDDfMTymX51rhPDepnBxumhlTwC/A9Khy agQuOsYGmuBvyNyUsEC6AxjEn2YPGKE+MHO7c42wiS/lJnwU5AJ+iQ64/TDw 9qOQe8gmrGg34ElmPD3jsWdBij+vIFpU+qiex+qQFg108Ee1VbNDkpVJFfAE ZU/QDl34BsLYHsIojfJufwJgAoFquj4ezn48xFpOPr9YwHfoWob4+nL168s1 sAnQQy9AIh+ez6HzL89m3h1Mvz+c/fxy7uurhV/fgGsW8CTI/NfXCxBfgB7P sUwKPAHvbZlBAxlR0wo5zmxydpwdZ8fpR2HEnYIwx6wA22QvcxbDLAU7myZ5 3mB63mDRTeFhqrdFmo9luq+Vft7E15LzyGWhJe/leM3rydrdXvZg9aMeQTQE qARFDyewlxvYz/Ef4PgPsr2QTbrzXQAmg2VUEEpX5m0s0h1RaNMctKkOYBNQ SVeyPQTiCdikjWnXknRT+dhKFmvRGG3aGGOuSLCre2hTE2NdFWMtirLiR1jy ws15YeYlQWYQIJQCv+t53ldzvK9ke11OxQegpFAvpQBPPI+CRbsGkUy9xqJc ORIKFhdSqZcyaVcyPS+nw2e5mTCdz2XRL2TQTNIo53MYgJTr9Qk3mzPvDVZQ hyqoIxyPST5tTkyfr6LPiz3XJfS1Bs8NCWNb5rMhZazW01braJtSbwi4s6vw f6II2FMF7jcHb9f5r4kZ8wK3Cd79Ye7tvsq7YJPuKoa22k9TGwc26fx/2buv tzbOtWH0y4njQu/dYNNEExK9G0xHEqKa3lSQREcIIaoAIUTvHQPGLb05bnGS lZW18n7v0Xe0j/bJ/l/2PXOLx+ORIDhOVnLAXPc112hA2EjgPL/c5VE3GvqU Bk2nwZpNSL/J8oxmY3EQeAI2wX6T5dm+RRMszrvhv6GYOrG0CazVcYYwdrhr e6r7Ois7FWII+K8w0yawMEabYN4EHgJM/iSbsJIjEMxuetYW88ykCX4U7sxM dMLXgWWMuCCm8E5kY1VWj6p8RNs4OSKjy73kIDKwydKg2SZ03iTBpIqflkZO SyPmpJwFGQdsstrKWWvlMKFByrosbYIw+TNsMmCROmEO7MJkFgS8YvAK6Hob YBFlaRNWNdfvs4llO/zvsYmIyoyUFaVSmZG3EyXkjrkzRWi2SUlhPFzAXxt+ FPHHibzXZp4MsmFiaZPTYGK2yVD7W0kTjXx4gLLJyIBMP9QKNhnWNsOv0ik2 MaBNMAAmEHDn3tbI0kwX/H6hTaj4823C6jdhchIvLG1imTqx2hT/njbB1Al8 p9puauwVXJDEECuH8q55kzZJOeZNSKcJcxgXioN0kWDqBFVitTOF2XJCd8HX QsBfmN5oppTYBP5p3d0Y2F7r398ahPOMoXVipBnea9OEYmtFu785Cjw52NYv z6rV7XfLBYm8UFdkCNok9IYNx98WLqKCnPgct/hIr6Ro3xT+DbRJTtKNvJSA grRbyJOKAi4E5k06W/I1ymLjYNPKVNvOgvrJ/vhXD2e+fGD69NAAQsHGE3gI N79+NPvtk3kAy8vP1159sfH9l5uIlJ++3QObAEz+/eL+r68eQfzn5cNfXz7+ n1cf//r9w/98/wCTJsQmIBEgCZwhXn659fzzje+/3jkZ80UlXwA7IJ1fnh/9 +ur4P/CU50cQ8MX//QIuzAO+sCEFAvtT8OZfvfC5OC6Oi+NvfdSl+NQme1fE uhZH2UOIuQ5wFkbYiiLt8GEpz6mM71we41wa62ZZ03U8Ufdiq+fVTu8XCzJi k/nWJIg5eeI8FZRNFqWxSxKuqS4UbQIwWZVEwtlU4WdpEyp7QqsEYYIXBoHn ZJHHWJ5Ld9JVSeQlZezlgRwXTbZ7X7Z77x23rkzX9gyXtnRnVZqTJMWpOdmx KcmhMcG+Ps6uBoQSc7006god10oguOYQgb8i7eCbFUbYCMAp4deo4FD5FHHE tdLIa2URV0vDr5SEfQTXIs7lwsBL+TcvCYMvVUZ9UB97RXXbvjffdazcb7El fLcj9qAn/l533LE6/F5XyGEP57GW++lQzGfDcV+MJj4Z4H2s4388GPPJYMyn Q7Fw89PhuCdd/AftUfuKoE25/9k2sZo3wcU8LMWpNhM6b0J1ncxpACZLM2pi k1lDp2mi3dImhlEp1YgxIsEBXEOaeuBJt6oUAmu6IHrbqH0WYHmMqRNYCQ/1 NeKEf1hondMmVtvhrdqESRKiD+bTmUhhwYRemTfBcqKztUKQExN209Hf83JU iHNavH+5MKFdJh7SNABPpseVU2OtyyMliwNFVE1Xe7pBmWxUxk8r44ySiGlJ xKwkdEHKWZZxVuWUTRZbzS3txCakEZ4MEMZ+kz/HJtQr/BZPWAGvPD22a0jT hHO6mL3wpw2YfSebWI4Ofs+aLoAJBsIEr63ZJAltIi6IQ5vA+hC+R2s2OYHJ UDtAAwM8ch6YQFj2woNNhrQybR+QRDqqkw9qmob6m+D3yKpNHh1SPIEgMMHi LrSJfrAJNzZ9p7wJaTZhCuUMm7DGHZzWcvKePHlPm8D3oumsAT7jJqGWG7jg c89vE+w3IUkTVAaxCavDHcVByrpOy5tYtYmms5b+e5r/YYTfxIXpnt0N3eHu MMBkSi/pUBTVVqRANNdmwnu9PNu7tzFyb2tsaaYXLFOcGwMGiQx0BKEgTEL8 riNP8GZchGci1yeZ54c1XdmJfpg6KUwPBJ6U5kaATRrLktoac8Am2rYS3BT+ 3qoWpwcDQ4AknxxMfnE8DddwB0jypuXk87WXn6/jxos0UraAFT98vUsLhcqb /PvFA+yF/z8/UFuc/Pr6IQQWdEH868XRT9/dw9QJIAVgQp2/3H35+TbE91/C l9r74et9iJOtUo7hDNfmzVOeHzJhQuZ6wcO/euFzcVwcF8ff+qhN9KyKcyuL dhQDRiJs4VwCJKHPEHAfopznVMF3FvNdqLFdXICJfWGkTXG0fcudmw8NDa92 1N/vqr+Yly515lAFXa3paBMqGDZZaImarg2hbFIbvNISsSaNgjNV0MWs6RJT NV3IE+NJ1wnmUMbzXKeKKJ50J15rCLkk532gy3YezPPS5Xpqsj3UWe49me5d Ga6d6S7yDDdZuqsk1bk52akp0bE+wb4u3q48+lp59PXyaJsyCB4VpdHXRVxH +HaEUQ7CSHsUChXh1wVhVwUccxoFnAKRH3y5MPQjYdhVUfhVUdhlQcilwqB/ lIb/ozzyUh3/sjLDcbg0YEnK3+9OezjAP+7nQjzS8R7p+A+00fc1kY8H+R8P x308zH88yHsyxKcvoh938cAm95TBG7IbYJNFpT/YxNQRZepi13RZ7TeBhRmZ IYybm1CjumbUCBP4ryfYBHli1SYTwxLgycRwC44IHtM1j2gbB3prILBki7Tu wkNMneCQKNwZ+Z1sYnVDRkubWHaRYIu3VdowYYI3YUU6ommVNxQncP29nT/0 dv6AE+DAC3PPTuPAGgzW7RPDrfAiTAzL3/SbnNjEpIqfgp/GlnCwybwkdEka uiILXZWHzsuCSRs7gQmEZS/8n2GTge5afJEHGMVdJPA+BP058LCe/B9ppk1Y nSbvZBPLUq73tEmZIJXYhARRCTNAJWiT4vxYOBObkLIu8sNDYDI5/JZNmDAh 9y2DaRNz0qRPNqSF9wJIIhnVyXR9jUC/mcmOU2wyhRjBgi48Y95k0dSJNnnX fhNctLM2XjzNJqyMCSEGiyeW2RPyvjN5Qp5uud2JpU3OH7g1PHyPwBOSOsFv mdR3oTvObxNVSynpgicTt4hNEBq6npbBXgmc4RortUhDyvlruohN6P9XUznU 17g823dve+jBgX5ptqNLJSwX8TOS/NISfDOSbpQU8bQ91euL/Ue7E6vzmi5F meBONNiEG+wMAR4BmAT7XkOekJaThCjvpGhqThexCcmbgE3K86MaShOV9XeA J71ygXGwaWlSib3wRxuDB2sDj/f02BGP8fyzZbAJxHefLL6g8yaYOqGDssmL zzZefg7Xu6+/2vvxm3v/fHr/X989+M+rhwgTpk1IywmmUbD3BDgDBvnnUwog EPAVvv9yj94tBR4e/fTtwQ9f34P48RvgjLmmC4NZ1vVXL3wujovj4vhbH3VJ XndjXQEgIBGwCUQp14EEsQlESYzrWzah+00eTTV+v9sHNvl8XrrQfscoS52S pszJEyGwpmtOFj8viV2QxBCbzNZRNlmXcVclkexe+GKqFx67Tkx0kMqu8VwX Y5HnTLHvaI5zb/LV/gz7kTz3kXyf4XwfXZ63NsdLk+2lzvIAoSgyPVpvu9M8 cWlJdm5McmxIdKiKtbsbA2Ffybcr59tCAE+o3hmuk5knlFDshJF0DoXiybUi zhVKKGFXiyOu5YVeKQy7Bh8VRQFerhaGfJAf+A9x2CVRKLXjfEnopZroq/JU l+4c38Vm/01lyL3uqMNe7pE66lAdsd8d+kgXDSR5PMh9oI14OAARdr8/FGyC NV2bMv+1Vr8lVQDYxNgeOd3J7oXX695quyAxNaqaM3QvTquBJydBweQ8Nhkf agGYjA81nwRcSyD0gxKs3QKGwHIXFhJU3qSvwbzr3+/Km7yrTVgJESZA8I9g fQLe1/VIuhW1RXfi/D2uezp+GOB5NSrYlR/umRIbAKtcWNvAEydHFGCTxbd7 4U3UFu2JYJOp5rCZlpA5ScgibZMVWQjZz53YBFRiaRP4HIg/1SaW2RPCE/gc si88LPZwkwiWTcgy9V1twkqXvKdNSguTCUlKC+FhCu5jYtkLX1qUAO8anEV5 MVZt8iZ1clLNxRQHK2Nytk0AJqTZBG0y2G+2ycgAZZNBTeNpNnl8xLYJ6TfB vIm25y5uGwS/Ne9U02VZ1nWaTZjpEsQFU6OWlV2s7AlJqFnahJk9eR+bwBPh W8AJXfCd4uuA3zVdLlVG8PVONmEWdLF2LUGbAEyG1NK3JgOf9MWfvxe+v6uO ngpSTr+DVSP9zavz/ftbQ0d7I6ZJeWN1WnqiT3SYPS/cMT7aLS8zRCkpWpju gh+V5Vl1R2uJMIfH57hhWRfYBEgS5HMVeRJ+0x5rvbCs63acD9Z0kV54cXZY ZWE01nS11mYq6rI6W/LH1NWGgYZ1U+fx1vD+Sv/GTNfesuaTg0mc1oX9JkQo L+i8CY4Rpqd17f707T7Y5Nkna88+2Xjx2darL3ZAFt9/sf/P7w5+ptIcR0Qi RCVIEjj/+9UxdX7x6NeXT/7z4jHVQf/80S/PHkKAbn5+evzPb++T+Ombox++ oUYKQ4BQMLADBe781Qufi+PiuDj+1kd9vEcV36Uy2qki2rE00q4k0g5IIo6y K+Hal/IcS6lOEycx3xEkUhrrBot5ej3vIIy2F/McpDmBn85KX+2oX2x1f2Jq WuzInpanAU+mJfHT0niTNMHcDi+PX4SQ8kz1YYa7t0xUTRfYJHpVEkUVdJX5 gEomRdTei0ZaJVZtYih0Mwo8TMXeU0LPiUK38SIPfZHHSL7ncL7nUJ6nLtdD m+Pen+OmyXZVZbkrM93kGS7SNOeWFKfGZMeGJIeaBIfqBIeqeIeKWPuyGLtS vm0Jz7Y4yo4OW2ZQ7Sd0wEVxuI04wraEqvuyoeu+gC3XCjlXCkIu5wddFnGu FlNxRRj8UVHgR4W3Lhfdutyc8EFXtt1omdd8U/BWW/ShOva+Ju6hNvbRQNwj Lf+BhvtQG/VQG3lfHXq/N/awm7en4uwog3faAtdaA+YlPnPKiLk2/nTXHWOv 2NDfMKlTGYa6xt+2Ca7MYVWG/SbzUz0Lxl4UyuI0XFAwWTBCdC9MUTE30TE7 3j6jbzONqaZHlMYRhXEYICCBmBjCkEJMDssMo62GEWAC/BGw4KcquKg1sLoe exxwSBTJm5CWkzfzbBk2IUI5I/HB4olleztLJSRYhMGbParqDllFbjrXx+Vy gOeV4Bs2If620RyXRJ5PSVFsa3OhtrsavsdpvXJ5ULzQX2jqyZ5qzzCqUmdU SXNtScaWSGNz+GwLZ76FsyThrEhDV2UctAmOCF5tj8C8CZkhDGe4xh1MTrMJ 3CS6MU8blgcvtXLmFDEzqtSp9vyxzrKRruqhHslgj2RATc8Q7q0b6q0a6q0c 6HkLJkgS8l4weUL2hYdFFO4Lj0tKyyKfc9rkjI3gWTaxCpNT8yZFKZgogXNJ QTIE8ATruFh5k3IhfGZSmSBZnB9fIUyR1hX2KKt0PUDm5uE+eLvhfZfpB+T0 DGEViyeAEeaUYOtCGe4wN6dY5E2wpqtf3TwEf8qAXNfXNNjXNDMBNhmibTIN Nnl0b+LRvfGPjyYfHRqwC560w6NNcE4X2gR3DlK332XBBG2CiRI440PsGMKR VlieR0YH/2ZNF8l9WIUJ0eUZxV1nJFBY2y++E0/wWaRqC/GF3zJ+m0gPbEth kYSZPGK23qhaStokpe3Ssk55RZcCZAcvXU1vW7W6rYZqEumsH+hupCdyt2i7 wB2glXpNZ31fB2AE8AIqqcGAa01HnYb+BPpz6uiHVLoE4yTLQyVN4J++UW3L 8qxmd33o3tbI5Ki0ojguNtIlPMgmKtQ+Oca7pJDfrSxbmO7e2xiFc4+qQpwX m8j1AZ4AQyJuOQBPwCaYNyE2SYjyhs/JjPMlSRNhZkjxHU5JTjjYpFoYAzaR VWdgv4m+r8Y03AI2ebA98mBrZG9Jg03xXz4wfftk4dmny8CT119vYIBKXnwG Ntl8/dU2bm7y07f3Xn629fyTjeefbr38bOf7L/Zef3Xvx68Pf352/1/Pj35+ dvTPZ4cQP1NxBGD56em9H5/eo87f7v/47T2KMN/d/9ez41+ePaDi+YN/v3j4 nxeP4OJf3x3//PQ+9dHvjiGoHAr1RFAPCXg6fJ1dMMtfvfC5OC6Oi+NvfdRG O9dwnaq4jpVRDuWUTWzFkbaCiOsirp04xrEk3lkc7yyMdSzk25XEuEKgTYr5 jqJoe1lu0FdLylc7vd+tdzyaqseaLghDS9wU8ESWONuatKBIXlalrLSlLsvj ZxqjJu7eAp4sNIatSrnLLZGzd/1nK28YS7zRJqYSn5kSn+kTkpCuE6q+S+hm ELpOClwmBa6TRWATV32R61Ce82AuFbpc54FcJ4yOOy5tWc7K207ydEdJqkNT ikNDskNdsmNtkuPdRIeKePvSWDsx37aYZ0NPFb5SEnkVojTqWmmUDYQo7Epx +NXisOsQYrBJuC1EcYQN3TJ/TcC5WhR6pSgUzleFHFsIQahNUYhNYbBNQdB1 iMKbl4pDLlVHfyRPs1MXeI6W3ZiqDtxSRR/1Jn4ymPbFSPqXI6mf6hIe9Ebv a5O2e2M3VeG77eGHnWGbLTcWqt1WZRErCv5sx53pXtHkQJ1+uFU/1mF1bhW9 94fSONY2M9E5Z+gGnlA2AZJMdZNYgjB0L052LUx0Lug75kbbZkdUs8PK2SHF uE5KYmJQhjE5JIeAO/oByWh/84imabiP3oucXgwP9Nad1HpVWR8jfO69F0nz CJEIM5gqsfp1mJAhNoElBCxjCu9wb3h8GOJ/jctx4ty6Fh/tkZlyq1Ic3wX/ TR9sMozCarNhSVu80Fdo6sqeUmVMKVJNrUmzikRjc9R0c+RcS/hCS/iyBH4+ w9ZkYVjThTZhtsPjvvC4KTwZ0mXVJqAb3HiRPDQpA2faQkxKrkmVON2WO6kS T7Tdnehq0Xe1DPZQNtHC69xX3ad5YxNmxoRlk5No0HbX9XVUE5uwehAsdwxn lmxZxQhrNUs+apkuAYZYDav9JpgWwbwJ8oRZ1oU5FAxxfhLchzNcy+pFvapa bVcTVukM98lAEGNaBYACAud0kX4Tlk1I4Egu4hEkCbl4u9+ktV/dMqSRjQ60 Dqgpm5jGO7ZWhu/vTX16bPrk/vSje5MP9/VPDieZbSYkPj42He3qwSbjQ83E Jj1tlcwdTDDIu4YzrOAhvJVwTdiCWTDWHohWBwhb7l9j1SassKzysppGIfO7 rO7JyIzT9jex3KURv01mARtzeNdpNmF+KbLXPG7mSF43QDr8a0DnfM2/Gid7 lFSTlA06kew4gztjWt0fE78a7hwED+HfnMVp9e7a6MH2hFGvqipJiY1059y0 CbtlW5AV0SYVTY0qV+Y0q/P9cNHZWirM5iXz/KJDXIAhUUFOOEOYaRNS05UZ 78sq6AKelOVF1ohi68Tx0qr0PoVotLdqSte4MdO1Pd8LHvnsaAoCVPLN47kn ++OPdsc+vjfx+X0jPMSWE1AJVnC9/moHgu4Q2X/x2c6LT0El+z9+ffTzUyDG o38/f/x/Xn/8f14/we540jYCge0kdKXW/qsvqKdjLwnuKf/jN/cg8CY8hRXY Gs8KekTY4V+98Lk4Lo6L4299VEc5VkU6VEbaV0TaE5sIqXYSu5JYp9J4l5IE F1GcU1GMvZjvAkFVQFG7MTqATeR5wd+stH2/2/dsoxNtYmpNB5uASkzypJnW 5HlFypIqFWCy2p4GNjE1RI5X3py8exNssiKJApvMVQUAT6ZLfQAmU2KvmVLf 2VLfM2xC8+SNTYbzXYAnQ3kug3kuujxnjK4c145siieK206ydMeWVEeKJymO wJOaJIe7CfblcXalMbYlfBu6Ox5Vco3YRBxxTRyBKrEhPBHRaRQMEArApDDk CqiEhsl1tAlGwa1LRYH/EAb9ozjkH6VhH1RFXW6IuaIVuJvqg/c6Yx8PpH46 lPZkIPlYHXswmLLbF7/VFrGt4uypgteb/ZZqPVal4SutvJn2LNomtWCTsdF2 qwOssBd+alQ1rW8n2RMmTCAWDWabUDHeybTJBA0QDBZS4M6YtoXYZHSgZUTb TFV5AU/oCiIUyh9iE6s8YaZLrH4pqzaBFQisVUoKY4NvXAvwuhwWaBseZMvl OBYX8NpkRTOTSlgrzhpUsFxc1IrAJtOdd5g2mW7hmpqjiE1WJJxVKWdBbu43 QXGQScIbXVymTU7Lm0DA/VlpINyHz8SHM21BYJMZVfRMWxLYxNBWcppNdL11 rIIuZgLlrfHC6ne2CRMjp9kEDcL6/+3vbxNS0wUwAXpgZRezKR6jOC+RnHFf +D/KJmQzFJZNSN5ksF8ONhnsk45o5dreRl1vI/yWnd8mZH+T37QJrHthnYz5 EbJzOryJuB4mH4K3kgUTq0O6LLNjzDHC57eJ1dZ4VvbknWxidZcWpAQWsxGh WLUJGefFnOhF9n8kG82T3BPLJlibijxBehB3WMLE0iZwzbLJkqlve3Xk3tb4 wnRPS21OEt8nIsg+Lsqjt71yf1P/yYOFR4czextjhhGFskWYlxGOO5tE3HKA M2mHx154MAsZI3w71twLz5zTBTapEvDBJrLqjF65YKirAmyyOdu9s6AGiYBB nn+2TNdxrQJGnn68AHeAKhhfPZx5/tka2ATi1RdbEC8/p4q4Xn2x9+rzPdom h2CTf333EM7/8+rx//7wMQYi5d8vHkAAMRAjcEae4MYoEKASeIh98XTfyiF+ JsZpNqGneN3/qxc+F8fFcXH8rQ+ASVWUw90oh8ooh4oo+zKufSnXXhRlK462 L41zLktwpWwS7ySIxQlddHdGtDlv0loQ8nSt44d9zfPNrsfGBrQJxKwiZU6Z Oq9KW2pLX2lPX21PX+tIX25NAJtQeZOqW0ybzFTeeGOTEp/ftIlB4EbbxA1s MlJAxXC+63CB61CB62C+C0Rvrnt3jlunmSeOsnQHSapDS5pjU6pjPfAk0b4q 3rY81rY0xuZNgzz3OgTaBKIk0qYkwvaEJ1RQ9V0RNhiYPQGb0CrBAKHYnsSH 1GaOYZdFnA+EIf8QhVBIqY7+sDH+Slum7WCx52xDyJaKf68rYUsdt9nD326P 3Gnj7CqDtiT+a40+YJNl2ibGHuGEtmZsSE7ZZERpdeMP3JrQONaGPJkzdM9P dc8bukgsGrrMMKFtMj/WDjyZG1HNDSsNdIoEMYIwIVQBmLxlExom1P+rpzpQ 6nCA8PvbxGrqxGp3CWlaOdsmcAGf0yYrzki8CTzh3LJJ4HlWihONesX9vfFv PluB5eLKXM/0eOuitnheXQA2MajSDa0paJMZSfRMCxdtstTCWZaErkhCF61l Q7Csi/TFw03Qh1WbgEfg5pwsCG6udUTiwxkV2CQYbGKibTJJ22Tcqk3Ub/W8 n7S9v9UXb9705PfaBJemZ+RNmAvXPypvwkyagE3wAuu7SBMKPASVwIUoNwHu NFUV/GE2YSRNiE3eGiBM9cLLtWrJkEYGNhlQN+nUje+UN0Gb4AzhNzaxgAkE LLZhrQ7vC7xQxfmxhXe4+ZmRpUUJsP7HqWvwbiJD/oykiVWbWO06YfHkd9sE YYJ/f+w9YfX+W7UJM7HCQgpJmuDradUmVnliNWNi1SbIE5yAB18fbXK4A2/9 9NbKkKarWpgbnRbvn58ZDr+JB9sTHx/PPzwwwcXcVFeXoiw3PSwuwhNggnua MG0SFeTEC3Ul2y9mxHhnxnkzW04Et4PBJneLeNhv0i0tHOwsNw42bcx0gU2O t4ZBHy8+X6Fqt+jNTeDih2+2IOjtF6kdGL//cgtVwrTJy893X3y68+zjreef bL/6fP/1lwcQP31LJT4AI//z/WOwCSLlPy8fQsBNtAbQ4/VXe5giwdQJPKSx Yw7sr8dUC90dv28ZuCv9X73wuTgujovjb30wbGJPbFLMtSvhOYBNShNcqJqu OMeiGHuqCz7KoSjSHm1SHG2vKAz9br3zx3v9L7a6nxgblrtyZxQZs8rbC20Z i+1ULLdnrNAwgVhVJM00Rk1WBRprghabwlel3DVZ9Oxdf1O5H/abQBiLvU6t 6RK5YRgAKQL3CYHbuMBtrMgdYrTQfaTQfbjQDUOT767Oc+vJcenKdm7PclLe dlRkOMjSnaVpTs0pTnTviR3w5G6czd0YW4hKvl0Fz5bmic0JT2yp1psIWwxx uG1JlJ040hZhQsd1CKs2yQ+5lht0JTfocl7Q5cKQj4pCPigKuSQIvpTv/4/8 G5fEIZea4q/25LmNlt/U1/lNN99aV3B2VJwdReC2LGCz5caKJGxJDqvWzKlu wXh/9eigbGRYhTOErU7ZhTuGESXYBNZOFE+o6CSxADHRuWToXrKwydRw6+QJ TxAm6BFmgE0g3tMmrJZ2Fj2YPGGRhNlQz+LJaXkTam90TWNTdXZeZnh6gn9+ VtiYrvmnl0f/3//7z//n/34Hy0XThGJyRLKoFZltoqRsMt2aONOacJpNgBuW NiEbnUDAh7Bq6zw2gU8wKQOnlUEmJdeoTJhSZk8oi/XKitNswlQJCdbkrney idXJwKfZhLVwfX+blAtSWUkTCDAIXhCnwEfxIXymMCceHjZU5r2/TXCcFxMm JFg2GR5oHdBIR7StYzqFrq95SNM8M9G5vfrONtEPNvV3VwJMulViegIt2yaw 1oX3C15MQQ4vIzEwkeebEO3DC3MDpMDqHdfqONngDJj87qTJGTZh8YRV1nUG T6zahNXMjtkT+PbJtK6z8yb4IUuekI+SFAyzCus8NsGHcJ+EpU0QPnCGvxVc oE0OtuCNNkJsLg/CP4/tMmpbqNGBFvDIxpIOzLK+ODAz2dEmLQabJER5447w KJRg32vAE7jAGcLxkV7JPD+wCZkhjHkTgAnmTSoKuHXieHnN7S5JAdhkSte4 NddztD74eE//xfH0s0+XECa43yKcQSg/Pd3++dneLy9AByCFXUZQanj52c6r z/d++Orgh68OESbff3Hv9Vf7pHwL3PHL82NQCWoFAm4SkpCKL1K7BdckgfK2 UHZPi7964XNxXBwXx9/6oAq6IuwrIuzKI2zLYB2O2YETm5TEO4tiHQt5dnnc 62CTwgg7alTXiU2URZynax1mm0w3rnTn4f4mSx0QtyGWO25j3mS1PW1NmTTT EAk2ma4NBpsATNblvLmqgOly3zc2EXmebhP3t23iDjbRCzzo8BwTeIzSMVLk rit01xa4aXLdeoEnd5w6spzabju13naSZzhJ0p2aUh3qk+xrE+1qEmxr4h2q 4+zNw7uo7MlbNmEE5TXgCbEJXdxlY7WmKyfYPjvILjfYPj/UoZBjVxByNTfw Q0HohxRSgi4VBl4S0MOHa/gfybMu94udFltubilCNmUBW1L/jWa/ZQlnUcad Vt02dBfpNVVoE6sbf5D9HbCsC9ZOYJPZiQ5mzEOMdyzRlV1LE13YcgI2mR9R GaiNIWTM1pIhdQPVXUIHqsRsE0ZNF6yE37Wm6zSbEGhY7S4hJBlUg4kaWSO/ rNoEXgrjGDWObHxIBn9hTVdVf3eVYVQ+Pa6cHm+dm2oDleA+3Qv9wnl1vrEj y2wTOWUTk/WarhDLmi44r3dGbfXwyMaLpGX+PDVd04pb08ATRZRREW9Q3Bk/ 3SYDPbVMkmjfHtv1drnXO9jEcjLwf62mC23CTJoATDBYPCFIAZuUC9Ia7+a/ k03O2MqEwIQ8l9jEnDRRS4eBJP0yyiaDykFNy5CmBX65zm8TnNOFM4SJTbAh ghWw3IV3B14iwEha/M3YSE+ASXigAz/cPe92BLzauPY+rf+d1QXPaiZivY+W cZ5+E6v7npzBk9PyJpbWQBowZ3Zhf8058yYYrGouqzaxWtPFzJic0ybwx8FD +GdnZbZ/b33sYHviwb3phwemw53J3fXR/U09/HjAzaNdA1zAnXljt1IizE4J BX1gF3z4TXsgSZDPVTjDNdiEz3EDuQBMqL0X43yZSRPcFx5sgvvCYy/8UFeF YaBh1dh+b1V7vDX8ZH8ctzX59sk8qAS74H/4ZhPOOLPr9VfbmK042SqRahL5 +en9X57Re8FTU7aoZpNfX3787+fm8i1sIaGzHtQnIz2QLaRkCy4IYXCkMPae 4FNIcRf8cf98eo8V+Jf5qxc+F8fFcXH8rQ/Sb1IeYYc2gYW3ONoebFIS6ySO dRLw7QEm2RFXBFEOBeG2EMQmKkEYXdPV/3K752NT02pP/nxb1kL7HQubpKFN TPURxCYrkijgyXz1TbAJzhA2FHtOi73myvzOtsmU0J3YZFzoSYeXXug5JvRE ngxRPHEDnvTlufZkA0+cO+44qzKdlOb2E4emFPuGRLv6BNvaBMeaeMeqWAfg CbFJSeT10kgbIElZlD0dDuVcR4AJBmZPACZU6sRaL3xOqFsuxz2f45bPcckL dcgLts0Nul4YerUg+KOC4A+Kgi9BCEM+KAn/sCb+Ukf+1fkm/01FyIbUf0tK 5U2WWyibGJUZhi7KJiM66fCQ0uo26KSmC2xiTpoYusEjM+PtJOYg9O3EJpg6 mR9tA5tMDbcahluxuwRsAh4Bm2AweUKxpf8tmIBKMP4omxCesNIlqBKmTQhP rNoEHlIvy6BUr5NODMunxhQTw3Ah1Q+2wBIRYGLUyw2j0vGhZrDJXC9lk0ll 2qQ8GW1y/l54tAkOEz7bJqQXHj5EHoJNTCo4R02f5E3GVZVWbdLfXYMvsmW6 hJVPeVebsAq3/mu98EybkKSJVZhgcRdcgE0qRRnvWtN19jaLLJvgxZuCLrDJ gGKgTzLcL38rb3Lumq7z2wRW+PCSlgkSczPCU+MCYiI8IoOd4qK84Aw8EeTw 4L3DUiirPSaWSROWTVjTns9jk9PGC58zdXLa/iY414uMIIPVPssmpMjNar+J 1R3kmUkTZgnWeXrhrSZNrNoE4QMBfxZ8FP7JXV/QAUAeHc48PpoFnsBPBeZQ 4Pre1jioBIQCVAGbdMhLMhODACAAk2Dfa0gSLOjCzU1Is0labEBmvB/YBDde JDapKOBWFkY3lCbKa273yIr0fTVTusalSeXekub+5hCmTrC1BHjy3SeLzz9b ppGyDjah4sstzFPgTu5ok1+ePSCzfxEmENgL/z/fP8ZeeAQIGgTdATZ5/RW1 8SJJixDC4GeSYLScHFqNi5qui+PiuDjOPqqjHKoi7Ssj7SoibcsibDBvQtmE 7yiOcRLFOBZF2+VF2UBgQVdhhF1RlJ2I5yDmObQJw79b7wSbYL/JWm8B2GSp M4fABGu6VtrSIJZg+VcfOVEVbKzlzDdHLUl5EIs1gbN0vwnyZLrEe678hrHY a0pEbXQyRYUHxqTQfarYY6rY0yDyMAg9J4QeehBKsTcVIm+9yGtM5DkKIfQY FLjrity1hW59+a5U6iTbpRMnd2VSqRNpmpknlFCSnGrj7atiIOwgKqJtSyKv lfNsy6Ptyrj2ZdFUlFJnB2ITzJ6gTURhdsgTkjcBm+RxnHM5zjkhjtnBdtlB NrnBNvmhtvkhV3MCL+fc+iAv6IPC4A+EnMvi8CuV/EuqHJu5psBNZfiWPGi3 NWRLcmupmbMo5U6DTToL9eq7IwOS4UGF5QBhnCGMBV3GsTZiEyZMIGYh9O2L dOPJ/EQnOGUGIDOiNFEzviBaJ4bga8LyvoVqLdEAARpOwpxAGdbQKqGLi8iQ LnX7XeaoLuzOpuZHUXYgYbYJvTkLFWMDsjEt8IEKq10nrGoupk1OhGJGyphO SgXABGAFf3k6zOPLqG9KPj4kmxprnRyRGUblcAaYgEqmxmSwVhwdaKDzJgXU nK42qhfeKE+YlsUZm6JMtE0WJbRNZGHr8vA5aci8LGShlbOkCF9RRay2R611 cOG83sHd6ORtdEavtkUutobNSs0wYdkEHgJGsBsF7mPXvIkq6IJztEmVbFTl TrDndDVq1bX9mrt9mnJtj5WMCWv7xZMPUf9nmOxvAutGXEZa7Tdh1mid3Qtv WdNlua3JaTCpKcs4bYYwaScR5SZYLeg6iVRxfrIoN7FCmN5cXditqNZ2g02a B3tbhvokIxpqjPDYQCvJfVA8ORkjbHWGMKsL/tSCrj7ZoFaOeZMRuOgDm7dQ /SbLQ7D4BJg8OZyibTL+6N74Q3p6MMThzhjub/LwYOrBPcPB9tjybO+Yrrmv E5bcZRC9bebKJVzrYv0SrPPhtRIXxGWnccAmsZGe0RzXeK53VIgz8CQjMRBe PeSA1Zou5q6LpxV0nQETy5HC5AeA1Rd/HpucMVuYfAI2+5ONTshQZbLpJKGH 5TBhy9nCmE9hJU2Y6ECeMMXBanJnfiYGs+uEKR1EClzAP7mbS0OH2+MP9+HH wPhgb/J4d/LBngHO8PBoZ/xwa+z+zsTRtn7e0NEhE8E7yw11DfS+GuJnExFI 9ZvQNV3U5ibRwU6xYW6JUZ6pPN+MuIAs2iaYNylMD8Q5XThDuKk8WVGX1acQ TfTXmYZb1qY7jjYGPzmYxJFcoBIkCe5pAkKBO2aqfLr68vMNOjbRKa+/2v3x 63s/fUM1mNAJlAf07iQPf335CDtN4AxBBnaRLAkwBEhCbwdP2QSDUAWFwpzc RZWHPaWGBv/8DOIA4l/PIQ5/eXH075dHf/XC5+K4OC6Ov/VRGW4DUR5+vTzi elnEdZZNhDyHomj7QjjznYp5zhAUTyJtRdR2J84dxZEvtnp+OtA+2+h8aKhb VxeCTVa68yibtGcst2FQMFlRpc1K4wz1URPVHBDKvCRmURYH5+WawIW7AaYy c+oEkDJT7mcAgFjEpMjLWAKf5gsXVBR7jws9J0t8MMbF3mNiLwydyGNA5N4v dOsrcu3Nd+nOc+vKdWuneOKiyHSRZzhTvSfpVH1XS6prfYJ9dYxtbZx9fYIj IKUk8mplrD1EBd+hjG9fwrODEEfblnLNZV2YN0GegE2QJ4JQc7MJ8CQv1Cb3 TVzLoyM/9Gp+yJW8kMv5IZcLgi/nB30IUcG7pLjjMNMUuqnk7igiDlRRm81B yy3hSzLejPK2sbNooq9qTCcZHVLoB63svYhzuixtYtK3sQJ7T+BD02OqKSAJ 3WkyMUwt4PWDUlKyhcNp34yoZUypZY7nQptAWKZOqPlR9BNPvg4llIkhxfgg FXqdAleA1CLwlGldzP53M0n6GiwD/sKWQSeSZPBNQcB3NzEMZ+n4kATOWM2F u0zC9UI/Nadrtid3uiPTqEybksVPSWKMzVGmlqh5ScSiJGJFGr4mCwebzEs5 87KwBXn4kiJyRcVdbYtea+fBeb2Dv9EZAwE3F1sjZiWhC62hxCYYuCcjplTI IC8IgImxNXhawTepUo3KvAmleLK96sQmTVRySl3Vr6no05Tp1HXWUiTsreHx Pv5fX1hBwbIN1o2wqiQwsVrz85sbmpxmk99Ml5zTJgATYU48nK3apKQAAmyS Isqluk7QJgM9uGMF/Hg0v9kgfkDBTJ0gTyxtgo3wljbBpAmxCfJEp5EODbSO DiiGNNIBNXhWOq1v31wefHRoApg82Bt/fGB4fAAr0rH7u3rwCA4NpmP8/t7k 0e7E4c746nz/2ICEJol5HY57eeBaGt4meF/ghSrOj827HZEccwNgwg11iQhy BJigTRKifcqFSfhWogUsK7usdsFb2oS8ayybWKbGyAAEhMlp/SbMvwaLKqcJ hUzWwiD5CNJ9Q/Y6sWx4Z+VQMJgFXayxwMx6LVbzO1Mo+Jn4u4M2YWZP0E0I HPwbwk34V3d7ZeTB7sSjPSoe7o5jPNjRw8P7W6Pk4dy4okNSWFwQH8v1DfS5 HupvD+8pJ8A20PtKiN+1sAAbbpB9XJhLMtczI8Y3K87/ToIfc4awKCuU2KSx LElZf0ejLB7X1M6MSNZNnYfrOoDJ149mIcAg2AVvzpV8tQ5IwRzK889WgScv PjPvwPjqCxDKNmZSUBNUduO7YyqH8pwqzcIaLQjSBY/dJcQdIA7SaUJyK6xa L2IT5r7wzE3hL/aFvzgujovj7IOySYRNRYQN0yalfEewSTHfEWwiAJjwHAt5 jqWxbmK+iyDKQch1KI1zqUxw6y6Nfrnd+/OR7uV2z6Op+rXegjlV5mk2mZHE TtZFjleFgk0WpLFL8ng4W7UJplHIZvFok3GBx5TYB1QyVugG12gTQ6kvBNhk otRnnA59ifeQ2Guw2HOg2KNf4N5X6Nab796d596R7dqR49aW7a66467IdJNm OLekOUrT3RuTHBEmjUnONXGO5dE2FExi7Mt59mU8e4QJyyakrEsU/sYmglC7 37BJ6JX80I+YNimPBpvYmxpD1hVRYJPDNi7YZEUauSLnz7VlmbqFhv4a/aBM P6J6f5vMTnTABdoEW+BBJRR8GDABWTCFwuTJ+9hEr2s1xwBlE4zz24QpJhKn 2UT/lk2kGPR+981gEwys6TqvTaiyrjDQB9oEYPK7bUL2QDEp3rLJpJKZN7Fi E5ZBWDA5j01YSRPmHCfy8AybMHnyrjYBmBCbVIiSmUO6ACOEJ5ZdJ6CSs21C fnjO7oVnbrxo2WxC4o2aaZsM9EkGtfIRbauuT6LthZ83CfyWba0MPTygqrnu 74zBGWxyf2dkc0mzsaQ52B7FvMn9vYnjfQPEwbZ+ZU6j10l7VBUd8hJc1uLa G5fTsFaHl720KCE/MzIrJSSe6x3NcQWYhAc6QMAiFq754e5gExDBaf3vLHi+ q02YlV2kjos1TJiZgGNuEw/BvE8+ZDWBwnxI9ihh2YTUubG6S8iUYOb997fJ ae3wzKQJ+bJwB/90uJgaVe2sjlm1yeP9yaPNEbiGi+PtsVl9a5dMUC5KSUsM DrvlGOpvF3bLPtTf5pbXR2CT8ACb6GAHpk2yE2/kJN3ISwkgQ7qwpqtKwG8o TQSb9KvEE/11s6NS7Df57Gjqm8dzTz9eAIOgTbDNhDSbUD3yX258/+Umxuuv tl5/tf36qx2ACd1+Ym5vN6dOnh0ztyYhc4CJQUhxF7MLnrGVyTHziebP/27/ n8/2QSJkO3gSf/XC5+K4OC6Ov/XBsIkNsUlZjFMJj97EBHjCdxTwncAm5fEe aJNinlN5gltVsmdvOR9t8v2u+pGhDnvhT7OJqSVmojaCaZNFWZxVm8BDCFLo hTZBksB5JN+FsonISw/nEh+0yeSJTSDAJrpiD63IHW3Sk+/ek+/RnUdFR65n W7YH2ESW4SxJd5Lf9mxKdkaYNCW71CU4V/BsK2Ls0CalJ0mTYq4N2oSROqEC bULzxA5tAnG2TQpCPgKbIE9Koy61ZtlNNwSvt0Zut4aDTbZagpclEUsy3qwq c7pLMKmp/qPyJngfbGJOmgzKcD1PMIJbZgxr3raJ+g+wCVXKNSCno/VPtYl5 o/lBKfJkfIjYhOo3ITyB63eyyYI8/H1swoIJ2mRaEQI2mVamUDZRlfymTZg8 sZo0OY9NyMKVZRO8c8YM4fe0yZsBwqLkCmE62REey7rAJhgglLeRcqpNhvrg J+TND8+4TsnMmKBELJMmVN7EWr8JiyeYOtH2SYZomwz2SQbUTWiT7dXhB/eM D/cnjrZHj3f1B5uDS6Z2TVdFa3Nem6xIp65enu0+3Bn/+Hj24YHx3tYYZZNB abeyHBbkuGUJrKJxRQ1nWMPDiynI4WWnce6khibx/TBvAkIheRO4A68zrs+Z PSbMjNj72AQfMm0CT7fcOP60fhP8o1nThk9LnTAfEpswMyYYzI4SEmRrRRZP 3scmlqODiVCYBV1IJ/y1wl542iajaBMmTNAmhxvDcP/JPQPYxDQq65YLiwvi 0xKCIoNdQm7Ycm7ahb2p6bIFm8SHu6ZEe92O8bsTH4B5E+AJtpwUpgeCUHB/ E5I3mdTWL4y3bsJP2pru00PDVw9nCE/QIziqC3c8oW5+uUGThMQO0ybmXUho m/zy7M1+i8yECJKEFGuRxhNmywkEkydv4sXhv14cQPz8/B4gBZ0CZ3j4Vy98 Lo6L4+L4Wx93I2whKiNtKyJtyiNtcO9FyiZ03gRsIopxEsRQNimLcxdFOxVF 2hfznSoS3cEmfZWxL7Z6frxH9cI/nKxd7MieUWQsdeZQA4TNMEkHmyyr/gCb GEt8p8Q+E0IqgQLn0UK3gWwHvchzQuxNRQmlkokyX4jhEu+hEi+d2FMr9NAU uasLPXsLILy68z3bczyUWW6tt11lt10gWjO9mlOcGxKdwCbNKa71ic6VfDuq piuGXdNVFu0A8XbqxLY43B6C2AR5ks+xzXsT1/PpKAi9VhB6tYBzpSD0o8IT npREXpJm2Bjrg9Zbo7bkYfeUkZvNQUstYYsSrkmRMdVROK6+SzVTDLae3yaW MIHA3hO4MI4qiU3o9hA2Q0jRFHMB/J42wQYTyiZa+e+wyWCfFZuMDrRYC/qL 6CQQVEf8oAQLurAXHuJ32GSBDtDHsjIKC7pAJee3CUiEwAQ/CjGtCDIpQ0zK GLSJoa2Usb/JWzYZ7KtnVdaxeuGZ3SiWNsF1I2vhSlRynpouqwU/57SJZdKE jlNtQnhy0oRixSYnSZM3NqEar0iziUXehAkTcwyfbHEy1MZKozBTJwMa6fBJ TZeur3l0QDatb99ZHTmmWgwmwSZ7a7rZSUVna1FmSgA/wik13qe4gNulLJ6Z VO1twKcZ9jdHl2f74EexS1EGy3L8X+649sZ0ACzj4VXKz4zMSAxMjQvghbkB TCBiIjwg8GEizxeeC28rPAVTJ1Z58ifZhPm+M3MoJHXC3PTEsriLxROSLiFl WsyZAAQdzJwL2fbdKkz+DJuQrhPms7BxHuc5wzX8k7u1PHy8PU5sgjAhNoE7 YJOjzRHjsKRDUlh4JzotMTgmwivslmPYLfvIIEeOvy3H3+Ytm8RSNsk+sQnO EEablOZGgE2aK1JUDdlgk4n+usUJxc6i+v7m0CcHk6QLHm3CnCQM5+8+WXxF 24SROnmTNzEXdFGmeEDP7DLXdDFTJ8zmESZJLBvhmXmWN/GcUgnY5JeXhxj/ fnWETvmrFz4Xx8VxcfytD8omkVZsUhrjJI5xKo5xwrxJEd+pJMZVyHVEm5TF u1YleWjuxoFNvt/te7HV/WCiBmwyp8qEM22T9CUVRuoyhDLVsqbrNJtYrekC m4BKRvJdBnMc1enXVfEfyHj/GBN6jBd7UVHiDSqZLPczVNzQl/uNlvsOl/kM lngPiLz6hT4agY+60Bttorrjrsxyb81yU9xxV2R5S9LcECaSNPeGJNeqWIeq eMeqOMe7sU4VMY5lMQ6lfHuIMp7ZJm+nTsw2EYXZCzn2Z9mEc62A88YmyJMy 7qWWtGtTdYEbSu6mjLMrD6PzJuEkb/I7+k0wOcIKtAlcoE1wdDDBCFnwD/c3 WVYK4f+o/0PyJqNaOa793qnfxGrexLpN8EsNtCBPxnTAkBbgCbEJ9pv8Dpss KSLRJkCSd7UJiTc2aQWbhIJNjIrkc9nkbSpalHLV0GHdJqyMCTNFQhIozOlM ljOEWR3T72oTZtKkXJhUIUxnlnVhOzxLJWfkTRg2YezaqbXSb8Is5SLbwROh MHdgJJvCM1MnOg21xcmYTok2GdPJ4FdsZ23k/p7h8YHhcGtkfUGt660U5YWH BV6LCLZJT/QT5Ea01GXp1DVLMz0H23qwydKMelTbAjaBZTaOzIUzrrfhDO9L TVlGUXZ0VkoIRHLMjSS+H2AELiD44e7RHNeUWH9Ye+t6G+CJTAv8UXkTqzVd Vn8YLFMnrGA2obB4gi3wrGaT08RBMiwEJqweE8udTf7Amq6BnnoycJg8Eb4y 1nTB3wfzJpRNdt5SyfH2GATWdOGdg/Uhw2CzoiFHkBuTnRGZEnuTG0pNhw6n hwmHBdhE3LLjhTgmRLjRNrkBNslJ8seMCW5ugv0mFQXcamEM2KStMYfYhNrf hO6FxyFdOEAYYILTg7GaC1Mnr77ANpMNpk1O5gmbbfLv5w+ZNmEGs72d9L+z NlvEwI1RmFSBr/zTd+ZECeZKECmYSfmrFz4Xx8VxcfytD4ZNbIlNSvmOYJOS WGdiE2GsCxZ0QYj5zpRNkj0HahJfbve+2lE/3+x6OFm70p0HMDnJm7Bt8p69 8GCTsUK34TzngTv27QmXpdH/aI35UC/yBJhMiL0nSymYTFX6G+8GjJX7QaBN dMXeWtomvQVePQVeXfnenXne7TleqmxPZbZHW46vLMMDYSLL8GxKda+Jd6pJ dK5OcKqKc66McyqPdYQAoaBNGKkTKtAmNE/MNoE42yaFoVeITSr5l5pTr4JN tlTRG9LQzZZgqheeXdMl/UNswmw2YdqEqATLonAwFNldEeO9+03gL9+KNiG9 xiOa89oE/m6WcYpNqGldeI02GdPBqhI80oIkGdM1olDeySbMgi4kye+wCYEJ bZNAlk0YM4St24SVOnm7lOs3bMJasr5TLzyzY/p9bIJJE7AJwAR5grsrIkOY Kjm73wQLuiBG+hlbdvabawWZ+7yzMiZokzdhbQdGZupkoE86BJQeUGBN1+iA FH7LdlZHjqhZTJMHm8PLps7OVkFKrEd40PWoULvkWK+s1Ju1FSn93XfnjZ17 GyMQYJNhTVNnaylWJcESF9feuP8gvCPwEpUUxhdkRUFkp3GwuAucAue4KC/g SVr8TXgW2ATeVlj/W0rkPW1y2g6M5CeBjCBm7hd/fptYLe4iQjljR0XkGwbZ Vt7qvid/bC88woSVN4E/BTeFhz8dbprGO/fWQSUTxCYIE2ITuIDz/qpuUtck rckU5sXmZUWnJwSBTUIDbDn0GOHwm7bEJqk878y4G9kJN4lNyJAucXbY3SJe jSi2qTxZ1ZCtbSuZ1NbPjcmwF/7TQ8Pn941wZjaevPh8Bc8nGzKuYxc86Tc5 Kegy24Rqfqdt8gvDJtgOb7URnszmgiBCweFdzNnC5pKwE5swu+ARKX/1wufi uDgujr/1URllQwXXtoJrW041VtiVcO1KYxzLYp1K42ibxDgK4BzrXMpzEUbY i6IcS/nO5XGuVYnuI/Wpr3f7Xm33Pl1tPx6vAZtQm5tQNklbak9fac9Y6UiH WKXHCM/BCrCBO1EdNlUHNoldlMXPtcQs1wXPV90yld+Yom1iLPWeLvOdEnvS 44Ix3DGMpT4TIBGhx1iR20C2vSbTRpfrMF7sOSH2mizxNpT6TJX7TVfemL7r ry/zGyvzHSn1GRZ7D4q8BgQ+WoGPusAborfApyffpyvXpyPHqz3bsy3buzXT Q5bhJstwl2d4gFAak53rkp1rk5xqE5yr453uxjtWxjlUxDqU8+0r+PblfOAJ vD424ihKcCUglAg7UbitKMy80UlhyPWCMNuTsCkIu45RGHYNoiDsaiHnKvCk gI5y/qX6lCtjVf4bbfx1KWddErzWdGuhibMg4c6obk93Cwyaar2uZXRQbu6k OI9Nxtum9SRUjKAeGseovMn4IKzoYIFH9Zjo1PUQsPpFnpCd3wEgGGgT3cl6 mPDEPEO4s1rbVUPZpKduUF1vzSZNNKzkY9T0Y9moFvQhxYXlGfueMG3CnDY8 Qm+2AoFd/HQ0vwktfAuwjMRoRpjoB9/qgseuk3lt8ZymaKY319iZaVClGmRx kxK+sSXSJIGfzLBFadiKlLMmC12Xc+alnAVZ2KI8YlkRtQYkaedvdMSsI1I6 +PBwVcVdao2kPkcRtqQIp0L5JublofOy0AU5Z6GVQz5hWh5uao2aVsQZlSlG VfZUu2CyXTzeXa3vrhmCl7G3dkBdrVVX96ur4CU1bzoD9IPogaBeaiq6ayEG usxhaROrSRPmphWsnSzOqOlibbxIVrmWSKkpyyABC2+ACQaDJ+nlwowyIazJ U0X5ScLcRGFeoiAnQZBLBVzDzWIqkgEmEAATQXZCSUEy2KRHWaPrNSdNrNqE ZE8gMHVCUiTmYF4PsSu7mHmToX75oEY20i8f7pfp1PAjJ8E5Xcd7U48Ppw63 R+en2pQteckx7tFhDpEhtlyOfUqcd3VZ0mBf7cqc+mh3Amwyb+yG37JuZTnJ EcDiFlfacIbXHF6Z4vzY/MxIwAgwhBlok/SEW/AsHGyLNiFvK3Ou72k2+c3t F5nvL3OLE1ZZF3wCmZnAsollQdcZQmG1wyM0CE/ML460tE1S0i4ta5OWqlrE qpYSZXOxshkuxHAfbrbLyjpk5Z1yeEpFl6KyW3G3R1XV2wbWqOlrr+2Dc0ct hAaiE163uv7O+r6Os2zyFk+66vshOuvp59bST6wB9dBDDEBDpfDv3swE2ET/ gKrm0j+kbAIqGYW4vzXyaFd/vDUCF0ebw/sr2smBBkkVlRrLzYiEt5If5sYJ sAm9QU3oCr9pExFoxwt1iI9wTeF5ZcT5ZSX430m8kZ10Iy81oCA9UJAZIgKb 5IRVFvFqxfEtd9PamnL6wSYD9QsTdL8JbZMvH5i+OJ7G7RdJ7wnEd58sYmXX yXiut/ImAJOfvztpNqEwQtd0nXgEJ3RhWE4SZiZHWEODmeVe5haVp/s/Pt1j xC49uYuKv3rhc3FcHBfH3/ooj75WHn29PNqmnGdTxrPBBvDSWIfSWEfce1EU 6yiMBZ44VvLdYAUujnAo4zpVxrjUJnpMS7N/2td+v63+Zkl5X18FNplvy1ru yl3pyljrvr3efXujJxPOa53U9otgE2Mjb7Im3FALK8C4RVnCbHPMUn3ofE3Q dIU/4MJQ4jVV6m0s8zGWeBrFHtNUuBuLXTEmRO7jFjFR7DEp9iRPnC73NVX4 TZbfmCjzGy/1HRP7jBT7DAv9hgR+/YU+mgIfdb5Pb55Pd453V7YXRFu2p+qO hzLLXZEJNnGTpbtK010bU50bUpzrk5xrE52qExyq4u0h7sbZVcbaVcTYlfNt S6OvA09KoqgQR9rQe8RfF4ZdKwq9WhhypTD8+mlRQPGEinzOVYiSmEs1KVd0 5X7r7THrrRHrstDlppuzjaFzEq6pLWOmV2jU1uhhya2TspILSBVQydQocKON bApP2WSiHWIahDLeZtSrMKbGlHDG+4ZRhX5QCgwBO5BN3gEXsIjC1AnIAu5g ZgT+QwzXg/TCmOJJN/y3uwYCSKIBm8BH0SawSIalMsWTNzYhOQ4cCIZBchzk GyFbSaI+WNvB0zaRMsKMlJMvRTFkRNt4Eg0j2vrRgQaMMV0jBIEJM+Z04pl+ gUmdN9WVOaFKnpDHTUj5Rmm4SRo+L+EsSkNXZMGrsqA1edC8JJS6Iwtfbo1c VXLX23gb7fzNjhgIuICHa6roFUUUxJIi0jLmpJy5kynEmH+BmJbGGGVxxtaE aWXKdHumsTNnqit/vLtY310y3F051FOl66mhMVg/BNFdZxmDXbWsIP+XGIfT ok3OmSthLUQt4zdtgjxhDebCM7GJubKrOLNMdLtEkF5cmCrMTy7KTSzMSSjI joeAC3goyEuCENI2EeenCHMSC7NixflJYBN1Wx0p6CK8pWu6WlkwQZtY1m4x i76YKRWmTTC1B0IZ7JVQ2zsOKHAsGPyKbSwNPjqceXQ4dW9rxDShkDflpCf6 cDl2cVzXopxweVMu/LytLWj2N0ef3J/Z2xidNXTCL0KPilrW9qgqYQWOGQE4 w8ocXvlyYVJuRnhmcnBKrD9ihBfmBhHNcYVzVIgzIAX7r+Ftxd5zy7CKUFYG hJkEYWVSmDVdpLWEdCSxupOs2sSy68QyrA7vgu8IHmIGBF4WuKY/GSRS2im/ 2y6tgAtFUwlEa6MYzvBQ1VLWJimHD3XIKuFzulqruhXVgFb42ehrr2eGpqMB or+zEYLYhGCEtcsJI9XSgE+kLmjaULrpqqUNVQYB7+a0vm1nbQRI8nBnFOLB 9sjx1vD9zSEIcg3nvWXNpLZeVp1ReDs8J5WTmXQrPtIDVBLseznkxkfht65H BtnxOA5xkS5JPI+0OJ+MBL+sJL/s5Bu5YJOMwKLMYFE2pzgnrLyQW1ea0Fqf 1SHJ71MVTwzUr0y37yz2wR8BJEGMPPt06dWXa7izCT03eBlTJ8yarpPYfPXF Fp00ufdm/O/T+z8/Pf756RHRChEKsQlzYjATIMzpwZbxw7f7P3y7ZzX+6oXP xXFxXBx/6+O3bOJIbFIe7QI2KY1yKuc53411rU/2mlPk/3yg+2FX83Sl7eFE 7UZfEcBkrbdgvSdzgxHrQJWO9Hl5wnQT2CRiqi5qriV2QRo/08RfrAudqw5E m6AvABe/zyYIEwgDfLUKfxDKeKnfWInfSPGNEZG/tsgXeNJX4KvO9+3N80We dORS9V0gFGWWhyLTQ37bXZbh1pzu1pzm1pTq1pDsUpvkVJPoCAFIAZ7QI7wo npRF2wJMiiOu0TyxBZsIOFcFnGvCsOtF4Ta/yRO0SWnMpdqUq2CTjfZYYpP5 5rBFGW+2I3NWLQKbjOtaTrMJqARhYhrvIDaB5RCxCZAEAjAC13ATPjQz2QF3 LG0CZ7QJtpygTRAmwBbcMh54gjYhMLG0CW7CiDZB6YAgzrYJM2PyB9oEYXKa TWYHTmzS+Rs2WQBZMGwCEgGPsGwC98EmQA+ij2VlFMSKirtwMoWY9NRDGP8e NrFMlFg2QbMSKKzqIKs2IaVcf4lNmDVd7IIuGikkgXIGTwAm1PaLaBNtKz0c rBF+xTaXBx8emI73Jw62R5dnu3vbS/KzgiNDbLJSb+rU1Z8/nv/PPx/+7y+f vPhm59OH8yAUyiZ9aJMynEaFPIGHaJMyQSKBCXgkMtgJAid04UP4EKzYcaNG UtN1zmaTMwq0rNqElTphzRNmZmpYDGF1wZxR8YVCIXkTvEM2Z8Rmf2mdAOkB BoGQNxRL64RwZvIEA3mCNulV1RKeMFUCoe1q6u98a/QWczjweWwC9+Fdg/ex W1kOYdSrdtepLAnogKgE4mhjEB7C+XBdBw+JTfIzwnLTwu6kBCVwPcEmQb6X Q/2vRATaRgXb88Mc0Sapsd7p8b6ZCT5Zib7Ak/z0W8QmFUXRYBN5XSbYRNMm ntQ1LBvbdpc1j3bHvn40++2Tedzf5IdvNrEX/vXXm2SXE/rmJmmEp2Pr+y/N 7fBv+tm/OfzpmyPS547zu1AojB3eqcou0hfPrN2iOlZePGDO+HoTzyEOIX76 7h7Ej08pqtDJlIte+Ivj4rg4zjrOtkkx2oQq63IElYjC7EAod2PcwCZ1SZ4z 8lywyU/72mdrHY8m67b6has9+ZsawTqdLqEyJl0ZcN7sydruvbOoSGLaZF4S Z2rkLdSGoE2mynzRFzOVN85vE8ukCcRUZYDZJmU39KU3xsQBo8UBAwI/bZFf f9GNvgI/db4f8KQn16czz+eEJ16qO16KLE/gieS2B0RLukdTmltDqmsdXeUF PKmKB5444M6M5fAScW3Fkdfp7AnuFH9dFA5asS2KOMsmTJ6I+Zeqkz8aKPNd U/FXZWFrkuDFBv+FlrAl+Rub6AeaRwYkVm2CSRMiFAwECEgE0yUAk8mRVrAJ 3MQPwR1Y2OPQYCAJFmiBQYAVWIgFGMGbcDbnUzRNyBNYMP+mTbDxBCvEsO/j PDYh6HhPm7BgcrpNiolNxpVJE/LYcQnPKLFik0VghRTekQiwCQAEeQIqQZjA Q7gPH4VYlJttgirBjRrhzsJJQz2JP88m2LdL+k3eM2nCXNOeoRJmWRczdfJf tgkrdWK1F57Jk7eGd53whFnWZWmT1bl+aobwgQF5smjq6GgtEuRGQCha8kEr 33y28q/Xxz88P6BtMga/cfC7gDbpVlbg3otYwkTyJhmJgYk835gIDyBJRJAj BJAk7JY9PIRzPNcb3kccsXsem1jC8zSbsNpPmKkTZl88/iSgTcifyMqSsPZ/ ZM4TZmVVCEZIIwkZL4xZIepPv5vXVFVQX5ELZ5QIsQkGZlIggDCs1AkEEyag Eoz+rjrWliXMreTPYxN4B3EPTYhpfRvY5HCDwggrgCQHawP3VrVwsbvUBzaR 19wuzIwouB2ZfzssPd4/OtQpLOB62E0qaQI24XEcYiOcE6PdU2K8qNRJnBfw 5E6SX17aTbSJODe8UsADm8hqb4NN+ttL0CY7C+qHO6OgkqcfL8D52adLPz3d xkZ4AhMzT77e+uHrbUagSqiWE0bi4/6/vntgZXeSbw+YI7mwHf77L3fxiegU 0lpiBSa0Tf71guLJP58dQKBQUCt/9cLn4rg4Lo6/9XGaTUpiHcQxjsUxABMH AW2TuzHudEGXcynXsSzasSbBHWwCMPlxr//pStuD8ZqNviKwybq6cFuTs9Gb BTBZ7UyHM9hkR50NNjHSNjHWc2ebY4AndN7kjU0waXKaTSaLPSYswtIm1NNP bDLBsMmgyF8n9NcK/PuL/PsKQCg3QChdeb4sm1DtJ1le0kwvSYYnxZN090Za KFQHCpVDca6Kd6SyJ3x6yHC0nTiSypsATzDAJoIIm6LTg8kTUfSlqsTL/SXe qyoeZRNpyFJjwHwzZ1EWPdN+e6ZXaNBUjfY3DlMt3u9gE8ybgE0QJhBY0IX3 4SGs6klfCandgofYc402gSDJlJH+ZpI6OU/eBAu6yLwsqzbBeb8smGCbCcsm 9ELU3KVytk2YMMHBXGRusBWbaIqme3MNHbfBJuOys2yyKAtn2YSZLkGbwOeA TUjSBGHy37QJWV/Bogv3wjhP0uTsUi5Wt8IZMLGaOvmv2WS0X44tJ8zUiRWY MDaFZ6VOLPMmcB5SS7Gmi/4TqZqulTkN2ARhcrgz9vBwcn9rEEhimlCMDzXP TbXtbw4f7xse3Jt6cn/m3tbY3FQX/DqATbBlm9gEJwnDSh5eEJzQRfImxCZw Dr5xnRvqAp8DC2N4rtWartNaiixtckbmi5U6ITYhPwCsvAkzP0IyJuSvweqI YWVbsI6LdMQjTAAs8AnwNykTJIpy4/Nv8/IyoguzYsoFaS01RbJ6EQTwhCkU iDZJOSt1AmGWxds8YdkEc1jntwk8nc58wXtHCWVmkprYRmxyuK6DIDwBmOyv 9MPFzqJ6XFMrq84Q3uEWZXEF2VHZqcGJXC9usENEoC0E8CQ61D4m3CmB65bM 90yN9c6I87Zqk/qyRMybaDtKDYONYJPt+d7jreGvHs5898kiwOTlF6s/fkvZ hOxvgjCBa7DJj9/sMMLcCE+3nJiTI7++fPzryyf/+8Mn//vDx//z/eP/vHxI siTY8P7y8+0Xn21hYNs7yyxkSBc7nlK5EvAI2gQCVAJagfirFz4Xx8Vxcfyt D6s2KYmxL4lBmzhQNuE7FPEdwCbF4fZgk3KecwXfuTre3Si588Ou5vVO3zdL yqPRuwCTpc6c5a7crb5ssMl6922wCcR6Z8Zmd+ZCa+JUYzTaBGACQfebcOZr gkyVAUbaJmfkTazaBGDCLOiC51JPv3sTUycT5f5okzHxzWHxzUFRwIAwQCsI 6C8K0BRSQuku8OvK9+3M82nP8W7L9lZi6iTLi+LJba+WDE+mTegEimt1ghOV PYlxoIYMY2t8lN3JbGF72ia2v2kT5ImQCzb5UFvqs9bGX2+N2GwNW5MEzTaG zkupfhNTjwBsMqZtApucv6aLWdAFNkGewDXefGMTeiwt9rzjxC2zTfrMZjE3 odDTeknexLKsy7LfhDn464y8CauUC/vfT7MJI8yfdppNSLrkbJvMaEWmt2wS c5pNrNZ0saq5zKmTk1IuZt7kv1bTZWmTc8KE2fDOitP+T7vlSK7TUif/ZZsw eWLex8Si34QkVsyt8SdmYfXCw/Vgr2S4T6Y326QFfsWWTOr7e0CPSYAJMARs 8uR46uPj6cdHxt31wZ013f298eP9yY+PZyHQJjp1/UktUAXWdEGQPAi8VrkZ 4Zg64Ye7Y+okPNABhRLoexWuC7KiYFWPM4St2uTsUi6mTZjvI/O9Y6ZOLGXK Gi9M9HFaUZnVYNqEObwLruEmPB3+AqVFCfDNZiZxUmICU2ODkvm34CzMia8r z5HUCpAnzNQJaTwhqROwCavfBJHS11HDLOX6HTah3zWqb6i3vXLW0Ak2Odoc JqVcTKEATPaWNHC9vdA72lsluZsmyo4W3AFqRWQlByZwPbkhDggTzJvERbok Rruba7oSfQEmOSn+BRmBgqyQ4pwwYpPW+qxOaUF/ewnYhO43UWO/Cba9I0/I 3otwfv31Bg4Tfv3V5tt7L761LzyWY4FN/ucVqOQJwOTXV4/IeC7AC6ADJII2 ef7pJvLk2ScbcA03X3+1R3hiNbDfhMkTkkP5qxc+F8fFcXH8rY8zbFLMdxAx bFLBcxWF2YFNKmNcASb1yV4mWQ7ABG1yMFyBc7ogpmVxs62JS20pmDdZh+jM mJcnGOg5XWiTeUkcxEpj2GJdyMzdm8ZyP0KMd7IJPItlE1N14HTVLRCKoTJg ojxgvPSWvuTWiPjmkPimTnRzQHhTK7iJPOkpvAEBQumkEii+bTk+qmxv+R1i kzd5k/oUlzqq/cTlZMKwE9oEopznyBwsLIg8yybM1ElR5KWK+A80Yq9VFQ9s sqUIJzah8iZqId1v8m698Mz+d7QJBNoE2UL6TQhDcBQwUAX3iGc2yA9rqPQH wgRtgh3xEFZtQvrfSbPJaf0mlhmTP9AmBCa/aZPJjtt6RaJeFqNvibZqE6u9 8HAmXfDmpIksfOWEJMQmEKASZi88Fn39Gb3wpJb+nDaxOoyLFVYnO51hE6td J/81m1imTlhTgi0/ZAkTHHCNGRNS00VvqtIEv2KLpt7DnclHh1MPDwzAk+N9 /cPDiaNdPZAEHoJZPj42PT6afnQIWjEdbOspm/SiTcwbeWCzCa6NYXFO9oVP jQvATeFJWRdEkN81zk279IRb8EqS0imrNjkjXcKyiSUwT0udsKq8mOO8LLfO YYXljxyzDIz0npCSMPiy8LMhyosBm+SmR6XHhyRGByRw/eOjboBT8m/zmqoK iE2sNsWjTUj2BOu7iFPUbWaVsOL8NV102usu1QvfVgE2wX4T0vlObALXxCZb cz3w69xckSLO5Yty+GCT9Hh/fpgLkCQ61BGEAsEPc0zgulEZkwS/zCT/7OQb AJO8tJuFt4OEd0LRJhVF0Q3lScrG7C5ZIfabrJo6dhb7cH+Tz46m4PzpoQGc QoSClV1w/vHbrddfb1naBFtOwA6YOvnPi0e/vnyCbe8QxCasEi8yQBhgAjxB p+AWJ4gUK3mT796UcpG4sMnFcXFcHL95UCqhwracZ1fGt6O3GnQQ88EmuC+8 AxUxTkKeYyXfVRxhXxrlWM6DZblzY6rXYnvBj3v9P+z2fTEv3dWJV7pzFzvu zCozRmsjJ5p4s7KE5fa09e7MrZ47273Zc7L4k/1NsBcebBK70hw+VxtkrPSf KvcFXxjLfafKfIylnsATsIkRbCJ2hZiCKPWeFHuCR5idJnjGhAvyZK4qYKbq lqnq1jR4p/KmoSJgsvzWRNmtUfFNiifFN3Vgk6KA/kJ/iD7BDXWRX2+hX0+B b3c+3X6S59Oa5SnP9JDddpdk0E3xaS6NqVQ0pDjXJVOVXbVUa7xjVRzAxI4K nn0Z164k8ro4ggphpI0QzichoALumAOuBeHXi8KoKI66dDfuQ3WR+4qcuyGP 2JKHrTUHzjaEzLdwZ9puz/SKprQ1el3LiE5maRMIHCCMPCGpE6O+zTgGMFFN jSoNI4pJiGE6b6IHm3SYxtvhQ+ND8lGtOXVCthofVFNNIqTWi9iEak7pbRhW N4wAE+hhttTo2s6a/vaq/g4qtJ3Vui5qnu1gN9smJHXCsgl1/22bWJZ1sfpN aJi8Icz/z959fbV1ro2i/5K1VuIGxr3Te+/F9F6EAAk1kECdporoHUl0TDMd 424nK05xTeI0O+X79t435/5cnb/lPO98pJeJJDBOVnZywRzP0JhMhDGW7DF/ fhqufccpwVQog90AEzkugh/pcyyFtw6o8cQ2qLEPaeFkqLtxsrNmwlI5ZgKb ZA03Jw6rI4eUIXZVwLg6YFoZNKsMnlOGLijDF5UR0/IQsAkABGFCVYJJEwAL qASeMK0InW+KXmiOWXCmTjCmFCFTitAZZgoxExGz6nC7Mt6uSrRrkskM4dYc O9rEtMsm3Q6bSPqM7KjD2CtvglVDraoquN9z+b9ul6Xw+4wL/uM2cansYm9g 5FVmI0wqSzOQIeARtk1AJfApiOrSjKqS9Aq4zraJWdFnUfZb4P1A3hWDEF1q ChO0CTWIS7CvO3jSR7InLhvhnTZRw/ca6NQMdYNNGnotjVNW/fJcz+310fvb ow9v2+5uDd+7ReLRHfu9WyPbawPb6wN3N+HK6L2t0cd3x7fXh2bGdL2WOlNr jaG52thcY2x2DMulC9Dh5eBz0gqzwlNiL6fGXYkNOxMe4BUR6I02gXOI9IRr VaVJ8GK9c+viO2u6PCZN2HkT9hYbd5vQD9nZk4PAhN2u4tIpjwsl4RevrUwH m5QXxJbmxWWnhmYkBWalhGQmh6QnBqbE+VWVZijqOSopVyUFm/BaVYJWpaNZ nj2zC4L2xe+yCZktXNehI9Cw6OrMrQAZIY4dxnCOHa73aJP2NjGT9iL5L4te NGnVrS323yVzgwfurvbfWem7vdy7fbNne6mb2GSxa3O+A85Xpo39htpGXhq3 ILqqKLY8LyIn1Tc+zCcq8HhM8InYEK+4UO/EiFNpMecyEy/lkCFdrjYBmFQX R4JNpLzUJlm+XlUKNhntloJNtha6gEWoEownd8ew/cRZ0LVMbfL6S0YoX61B fP90/funm98/3YBg9byDSh79Cjb59uEv1CYMT35+ee/XV/d//ZqJV/d/eXnv 5xd3f3TuYaQrTmgTikswiRKs5rrFDrj4V9/4HB6Hx+Hxtz5qYo7zYk+QiPNi YHISghsLNvEBm3BiveCxKuF0ZSzxCC+WwASiJsarIfPCgqHszXb395uWz6bk q50VS+biRVPRVHPWmDJlQp06o82Ya8lc0uesGPPQJsx+kzB7feSMMmFWlTit iF9URk1KAsk+d5CF8Np47VUrSYVcIFF13l59zl591lZ1hkT1RYDJMOcsBNsm EC42mRD4jdf6QowxA7tstf42vj92nfRx/Xo5ft3lvl1l1yA6Kq5AWMrJ1nhz 6UVj6SVDySWcKqzNO6vOISOFFVmnGzNPQTRc95FlnJSme9eneUtSTkAIE44L 4o/Vxh3nxRytiT5SHfVxVeRHVZFHuExURnwMwQk/AoGd8hic8KOcsGMVoccE cR/WJf3TVHxmXhm9qoleVYYtyQKm6oKnG6Mnm3MmjBxrh5gkOLrgBmwndUKD nTehlV1wAlfgOnwW8DLapx3p1eAOFHwanA/3qEEBjlXjzHKTPoujEIsuN3H0 m3Q0EJuYpANm2ZClEWIQvGCo6wKYtArhEaJbJ+7RS/AOmY4OZtuEHXiRPMFN JezNJmyeuNgEPzXSB+JQMwvfFcgTsMnYcPNovwaHJOMTsKQNTuA6DlLGUQBT naJJC2/cVGLVZQ63xAxrAoZUV+zqi2Pqi1NK3xlF4A15+FxjzFxD3LQ8dFYV vtAUjRkTJAmt6dplE22Ue0w0BE3JQ7CbHp8JH9rksTZlAtjE3pRObKIjNhk1 VTlsYhR1G8Wkds5Y32sU9RqFrBD3GjDIHzj8sWN06yQdrJouahP26FfaC0D3 wh8ke+Iy08l9jwkahO0U9nV2AgVtUl2eiTABgyBM2DbBjAk8AaKqNB1IUlGQ VJaXwLKJEuAAAYLAwHm/bJjswxOPQeu4ECaOX7ZT1WNuhHfdULca3oR9HY3M /5YP3F4nHnlwe/TB7ZF7t4Zub/Tf2Ry8uzUEF+9vjzDXSXz6AGzSPzPe0tcp NrVx9U0VxpZKc6sAq7lwhjD2WcCfVVl+TELk+aToi+CRMP8ToX7Hg68dhUd0 SlZKALck0cUm79xvcnCbuC86cV9qw/512OB9J5FcwmUEMQ7mgi+E7wXvDfgx S/Oi87MiM1ODc6+HF+bE5GdFZ6eHx0ddyUgOEdYUNIg5jZJKdQOvRSkkoeBT ntCgTfEu84S7DI09JkW3Ud6pbwC8gGLYGRaXGV8uNsG/VjpNNbyC8K8lvBNW 5ntvrw3cWeu/vdq3vdJ7a7nn1s3uW0vddxibbC10bs13Lk8Z+vT8hprUijxQ RlR5bmhhhn9y5OmogKPhvh/FBZ9IDDuZEnk6HWyScDE76XIu8CT1an7aVZwh zLYJe04X2GR+rBXs82B9EEiCHnnx6Q2Ip4+mIXCMMC5eZKq8lr/5YvnbL1de A0+ern0HNnFOyvrx+e03L++CQX7++sEv3zz65RsCk58BJl/ff0uXMIJNmPjt 1f3/efXgf3398H/DM5l1JzSf4hj25bnfZGcvPK6Gh8BVjH/1jc/hcXgcHn/r g2WTE7tsEs/kTeK8iU3iT1GbwKMg4RQ/7mRj1sUlUwXY5IfNjifTio0e7rKl 9GZ7yWxb7pwuB2KhDSJ7UZe92Ja11JbNtgmohNpkqi5oxyYCh00wdWKvPk9t gjBBlUAgUjCZwq7p2tsm/rTrpKfCwZPOiqvUJhBok1ayk5FsjdfmnSNju7LP KLLPUJ5I00+CTepSvcAmokQSwgQv4Ak/9hgKpSrqKHcXT446wwkTp0140R9I Ev9hKDwFNlnTxqypwm82BE5KgqYboyaastEmcD/f160e7PZgEwAIbYenvfBs myBMIHBLIz4fTnD9umMvvGWnNwQCC7p2euGZfpN+xibDHXIItAl4hMLk4Dah F5nnyGkSxL2giwZcpEO6sKaLZRMVhQnaBC4OdMqBIaAPMJexhQ/3EnACVMFp AMgW+J1Md4mnOvgT5lK7IWukNXakKWhEcw1sMq65RGyidNhkvjF+RkEKutAm OJgLznGAMK3pAnoAOv7v2kRMbQIwgehkzRCmNV3/KZt47DTxaBMXs7AbT3D9 YlX59aryzCpGKFjTBSopyU9ysQk8gcmbpHEKk8Em3OLURlEp3EnubxM2T/6g Tfo7HDYZ7GJsYmmYtOo2lwdub4w4DUJscmdzwKNNPrk/BjaZHmvu7RCZWolN DM0ceDdiswNddAJCgT/8qtKk1Lgr0SGnQCIQIb7H/C7+M+jqERBKXPjZgsww PicNXou/v03YPHF5g7GzLS6pExebFOVEF2RHQRTnxZXkJ2SlhSVEX40KPZ97 PVpYXSgTVaik8PbmNclrqU3YPKE2YfMEu04AJmgT+JSxSeyx+sujTTr0ddQm 8C/M7LjJk016wCa3l3sxb0JsMmno1fFk1SkVeWFgE3gszgxMjT4bE3QceBIf 6p0U7pMadSYj9jzYJCf5Sl7qtf1tQvtNFid0txYdeZMvH0zifhMI3LqIVKGr 4b/54ibaxBmr334JQtkAofxI9rbfAYaASn799jEmTdAmP3/t3BH/4u4vTABP /vsl4cn/kCXyjoovGnvtN3H2wrM3MG7hQsa/+sbn8Dg8Do+/9QE2QZ7UsGxS FeddxbIJN/4UN+4Uky7xRpvUxvsosi8vt1cyNrGATda7K1c6yoAnN3R5aJNF Xe6iLmdJn3NTR4LWdKFNZpQJU/I4ahM7yELkCzaxkf6Ri2iTMcYmyBMwCMIE JAJOGao4Ax+iTWzVF8EmU0JfCNJv4skmw9VM10l1QB/Xv5fjjzxBm1CemEov G0svOzaeFJxvyjuvzT2vIlOFz8qzTsuZBIosY4cn4iQvUaIX2ERAKrscPKmO Pgo8YQnFg00qGJtUR34gTvhQX+Azp4heb4pdU4evyIMnxIFTskjGJhW2Tgnc Zvf3aPaxCXtaF4ZL0gSXyGP2BMECNoGbfI8zteAejDah7Cw9MUmBJNQmfcZ6 tk0oTA5oE8cTPOVN2CTBYK7TAcJKShimpkvFhgkETjy2Dmjb2wS8iuS0+Msp sRfhRNNQCkIBmGDeBGKmp266UzBlKR8z5lh18dbm4FGt75jm0rjm8rTKb1YZ NKeImJfHMjYJZxd0YR0Xe+viX2KTHr3YCRMxE55t4l7T9Uds4l7KRRlywKQJ 2KSmIqu6IovaBJtNPNqkpux6dWk62KQ0N76yKKVBWAK3nXvZxD118gdtwpCE uHi4R0PekJ3yabthc3nwDmOTh3febZNba31gkx6L0NhSiTYxtdRipwmdJKzX 8gApvIrU7NTAlNjL8RHnwCZh/idwhjCcpydcK8uPgT9YvKX/u9lkn3SJy/Rp tk1o6gSXLcJF+J2QnFpZMqcovqI4qbwosbQgHh7LCpOy08MTY65du3A0LPBs eWGahA9/DjUqWY22kQ82wa4TF5u4iwPRgTbpMjTCh/s8zVPehPSbtKmr4BWE f2HgnUCq+1YdNnHwhLHJ9s2ezYXOjRuWzbmOpQldT1uNlJtcnhNSXRzNLYws yQpKjT4TG3wCkybJEafSos9mxJ3HpEl+mi/AxN0mgoo47DcxaSt6DPyJQeXq rPnuSt+jzeHP7tgxbwKBi04gcBsj2MTRHf8lyZuwYhXi9VfrwJMfnm2DTYAh v3776LfXnzgKunbz5O3zO2+f3f75+R3gyW8v7kGAUH5+ucsmqBgXrWDAr//j 8+0fIJ5tf//s1vdPIbZef7X5+stDmxweh8fhsd+BNiERy0wPjvdGm3AdKmEi zgdsAjCpijrBpE58+HEnwSYrFu4Pmx3frZs/nWhY7ay42V6yZC6eac2Zbc26 0Za90JaDNlnW564Y8qZUSWCTEVGorS6C2mRJFT1dH2yrvYY2mRBes5GBwBch xolQzo/VnEOeYNIEB3NhIzx4BNtP4BGQAirZxyajvMARXtBgTeBAVWBfZQDw BKKTcxVixyZlxCa6oouthYxN8ndsAqHIPsPmCYQk2YNNapwr45m1jICUY87t J0edMDlSEXoUbFIZ9oEo/oO2PO85RdRGc9y6OmJNGXpwm6A1MKhTMFxsAk+G R+xPgYvsmi6XXSSk5cQiowsZ8bPUJiOdiiGwg9Mm7KQJ9mj3720TNkz2sQk7 jYIXSUMBEzhDmPbCM90rDpj0dwKypFiTptNUl+ZFBl09dvr4B1fOfpgcc7Es P0pRV9hhEI/0qYEnUzb9bG/dTBexybiJsUlLiLXJb1x7eUJ7ZUbtf0MVPK+M XFDELZKJDR5sQod0wTnC5E+q6eoziftMIlaQrpMePfzJiygPmfo60Z+RN9lr rJPLVC6IfWDCTppA8CtzajjZQA/sN8GaLlAJbYTf3W9CarqoTYxN4n1scpCW k4PbZKhbg0mTkV4teSt2KXbbxAo82ccmj+/Zt1Z7p+xNYBNDC0enLQee6JtI I7xLtLeJ4PWCP73c9OCEyPORQSfBJhCxYWcSoy4UZUeAXOAla1VVsdvh97fJ O3vh/1M2ce8xoU9wsQm7iZ5tEziB3wOfk1ZVmgQ2qSlP4XHg1U/hlCRXFCcX 58VfTwmJDrtw3uefF079IyMprJabr27gaRr5EM1yxxJGNk88JkTwBFSCPAF6 uDxhhyQ7IaU2MbeKmEq8arAJ/Js5adWtzPfeWR+8u76TOtlmWk6AJxvzHeuz 7es32hfH27pbq+srkypyQ2tKYsAmpdnB6bHn4kO8Yt/HJkJOfENtektjIdik zySYHFKBTe6vDXxya/SL+xNAEkya4LQuUAnYhDaefP8UGLLKSppArEF4tMlv rx9RnmDXCdmo6LQJxK/PHTz5+YWHNYsebfLm5T2In15A3P3xOYkfnt357qtt iL/6xufwODwOj7/1gXfRjE2Okwldcd4kiEeYai6m66Qyzqcq/jTOyGVSJ8Qm ytwraJNv10yfjMuWLWULxkKIyabMeX3ugj53SZ+3RB5zbupzgSdgE6s0Cm0C KgGe7GOTcYdNLoBNkCe9xd7AE2oTOB8sPzNQdgoTKNaqCzR14tEmVn7wKC9o CHhSHdTPJTyB6Kq8hjZBnjhtcqmt6FIL8CSfWXeSe07FBOVJw3XCEwhJsjeE KNGblnVBUOs5eXIcF8fvwCTsSHno0fKQo5xQYpPWXO85ObHJqjIMbMKu6QKb 7FPTBdbAcBcKLegChuAaEbQJfgquw0VHTVfHrpou8u06HKkTsElPO7nhHzDL wCYAE2oT+j/2O9Vc+9qEDRPHkGG3gi62R9gfsmyiop+lc7ooTCDgCtw/VJcl RgR6Xzr9X1fPfRAV7B0fcSYnLUDATWtVcfssDdh7MtMjcc+bjDddnmy6MqsJ uKEOWVBFOWziqabLJWkCMAFx/N+0SVeb0KkSIYFJq8iyu98E19j9cZu4M8S9 vovWcbm3wLskTeAWlFeZDTbBpAn2wqNQ6Dmd0wUw4RanlucnluTE7Z83wWDz BOKP95vsypsw/SZbK4N3Nwk9Ht0lNrm/PXx3a9CjTR7dtW2u9EzatN1mgaGZ 06YpA57otNU6TY1LwP15b3sDiBL+cDKT/dPir2LjCTyW5kXDHy+8XjjY6r1s 4r6t5s/Om3hsxqffml3WRZczwg8FV3BCF6coHmxC3idVWVXl8B5IKi1IyMuM Sor1DfY7efbkh6dPfBgdermy5LqijquV16JN6Jp4WtzF3nVCi7vwnNoEy7o8 l3LpZI6LOik2yEO0t4mZSjyApBDzJqQXnmUTwhOnTdbnLGsz5rVZ88JYa1dL VR0nsTI/vLo4ujw3tDgzECSSEOpNarpCvA5Y00XzJkZNeY+BPz6gWJ423lnu fbgx9OTuGBgEa7dI+dbni3D+6rN5dnzz+U13m+xR08Vqh3fyxCVv8t8v70O8 dXpkp3aLaav3EC/vM/HAeULi7asHb189/KtvfA6Pw+Pw+Fsf1CbVscerCE8c Nql0dMFjR/xJsAmoBHjCj/MRJJwWJJxS511b76oBm7x22mTeUDCnz5/QXl80 5EHcNORDLBvzVo35EMQm9btsMtkYu6SO8WSTS2iTcZZN+kpOIkDsNZfAI+bs I4qYD7oKTiBPsPcEUyd72oQfTGxSEzRQ5eAJ2oSmTsxlwJMrjo0nxZdaCy82 51/U5l9Q552nPJFnnWEmdxGe1Kf61KWclCT7iJNO0uwJL3aXTaqjqU2OIEzY NhEnfNia63VDHgk2WVGEgk2m6g/aC4+NJNhL4gKTfWwCgakTj9O0SHdJZyOu PiE2YZbFYyM8tUm/SepiEzrbdh+b0IwJ2sRj3sTjxhNqE/hDoJ9y/rIEJmiT XgvZz6JpKC3IDPG7+K8rZz8MvPKvEN8j0SEnU+MuleVHNYrzLToR9p7MdINN aifby+yG7NG2OOw3mWi6gjaZY2yyqIwHm+zVCw/hOqfr/5ZNunVCtAkDE2FH C4l2ZiAq3OIamvgtSi7cMbLXUvwRm7gYxOMueI89Jh6SJpy06opMWtNFO+Lh EYNmUiAAJkAStk326jdh24Ty5D9V0zXSqwWbDDA1XWybQBzQJvqmilZ1KUmd aGuwiIsdcIsOj5Oj+sd3ZiZGdPAhvF7whw9/jHDeJOewJ+7+nW2yTws8pYp7 WRdchDcGtyQReAJvD3gXiXg5gupsTklySX482CQ24pLf5WPniE0+CLp2qjg3 qa62FPMmTfIaahPKE7ZNKE/wCrvlhCZT3JMm7jZh98KDUuGdwM6bOFInTpus 3WhfnTatzpgW7MQmkooEzJtUFkQw/SZnYoKOR/ofOXgvPOZN0Cbdep69r/Hm lOEOU9OF+02wtQTi5b/naBc8Ljphriy+erL09ee064T0mzh2juzuhfdok59f 3EWY/OqEyf+8eoA1Xez18TiO2D2YjAnahASQBOLXbz/57fWnf/WNz+FxeBwe f+ujOuZITezRmthjTpuQGcLcOK/K2BOVccz6RVLW5VNF+t99eLFkI7wwkdhE W+i31Vv7062u12vmx2PSm+2lYBOIqeas+dbsRV3usqFg1VS4Zi5cNxeumcic Lqs0algcapNGTirippXx8Likip6RhoyL/McEBCY4qmuc72oTiGHOOXvN5Qn+ NVv1pYHS0/r0j2QRH/QV+wyVnx2tvGCtujjGuzJZ6zspQJtA+I/V+ttJBEBY +UGj/KBhPqZOAgeqSXFXL9evh+vbxbnWCTYpu2wuvWQqvWQsvWwsuaQvudhW dKGl4HxTwTlt/jl1HglV7lmmL57YhIztSj8lTQOe+EiST4qTvIUJJwTxx3dq 5OiQAVAe6To5wszs+rgi7OOK0I/LQz+ujPhAGP9hS67XTEP4qjZmRRm2qgqd kYXOyKMmmzLHDaVWi2Cou3Gwh9yT404ThAaes21Csycea7rwmS6fHXTCYYgE s8C9B1zQ2GdpwNnCZJci2MQiGzTJhs0NI+2NEEPtDYMmab+hvqtV1N1GeII2 AbBA0H4TNk9cqrlcarrY2sLZyFQojvKtbo0zdmYpD3YrqU0QJj3tde1twkZx wfWka74X/hFw+aMw/2Ngk7jw02nxl8sLomXCPLi1GOxSkH6TzrrpdsGkqXxM n2NtTbA2hVg1fuOay5Paqze0gfPasEV1NGOTBLCJ+wzhVX0i2gTFAfRg9BEx r41caI5abI6mCxlBItMk8xI5p4mGx2lF+GRjiE0ZblNF2tQJdm2avTnX1lpq a6scNQqGjcJ+o5jYxCTsNtV2mfg9RmGvScQKca9J0q0XdekdA5w720QdEK2i 9laRu008lt+41/y43JG6503eWdO1V+qELjdBmKBNsBeetpy42ITypLIoFRvh i7Nj98mbEEc4VfLOyi6Pg7zoAGEqFLJ7sUfLJE3g71czeZd2K2bGjFsrQ06b 2Fg2GYDHe7d28QRtMmEFmwj1TZw2TblOW6Fz2oRd0wV36c2KSvj7+PSz1bff Pf7m6a37WxNTVgPIFF5NeCnRI9QmHrtOPNZ0uavTZeoaXWvClkijc4O8C09c qELfV+4A8bj9hJZ7sZkMARfhPYNvEnjbkPdVbX69sLC6Ip1JnSQmxfr6Xzl+ /tQ/gCdXzh3NSo0UVBVomFFdzQre/jZBfTAVXJL2VkmHrr5TL+00yOARzpnp wWS2sGN6MDNhuENHe0/qnUkTsrcR/lq1qrik36SjAd4J7ja5zUwS3lrsApts 3LBAzNmaLVqOlJtUkRtSWRBeVRRZmh2UEnUqOuhoVOCR+BCwiXdK5Kn02LOZ CRdyki8jTArSr7FnCNeURIkqExoFGa3yovbmyl5j7Vi/fGlSf3e1//HWyJO7 Y88ez6BNECY0h0Lj1ZPFl5+RAKEwcfPVk2VS0MXY5CeS2gCe3P/564e/vX78 3989ppVdjnZ4xiZvn91++3T7l2d3fntx79fnd+Giexc8mRj8/DbtQHF89vmd N8/hOXff0nh579evH/z2zWHe5PA4PA6P/Q5e3BFe3FF+/HEe3FfDY4IXL8G7 MvZYZezxyjgvbjzhSVUC2ISkS7AdHmAC0VwccHtABDb5ds30yF6/aCqe0+cv GAtnWnPmmjIXW3NWjaCSoo32IoDJqjF/RpNilUYPS8LsDdGTyvgpVQLEojJq rjF8qi5oXOg7VntlXHCV8MSTTezVV2xVlyFGOBcGy872Fvl0F3hZuZfgCnxq nHdtgu8LMVnrNyHwnxAETNQGjgsCx0gEQ9gEQdbaoJHa4GFGKEwED1QH9JOF jL5dFVc7iE0umkouYOhLzuuKz7UVnW0pON1ccFqTf1add1aVe0aZszO2qzHz DFl6wmRPIMRJXoL4Y2yV8OO8IGrhz5BpjWdGCn8EURH2r/LQf3KjP+CDTfK8 JmWhN9VRK+rwVXXYTEPojCJqQps+piu0WXijPbLRfg82AW7Qmi52sPXBniHs HkNdCvcAjLjHiFHmCECKM7rBJq0izJvgIK9BZpwR3Qv/jthVteW6vYVtk+Ee cqPoYhPGO41UJd1mSZdJ3GkQaxvL8jKCgCRBVz8KDzgeE+qTGHUuO9WfWxLf rKiAO8zRfs1In3q2vX7GKJoycsZ1+WOtyfamMLsmYEx1aVJzda4paLE54qY2 dlEZtyCPQ5u47F5cMyTBIwAEYQKPpLhLHTqnDV9siVpqjaGtKICRWRXABBQT M6uKmpKHj8tCrEp/qyrQqo6xaVJsTfnWJu5oc+2oXjZikA0YpX1GcbeJ12Wu 7DSXdxn4XQYBRLdRyISYrD4xirsM4k69Izp04o42saXNsXvR2FwLN7Rw48q2 iUtf/F6FN3vdwbqEe6JkL5vsquaqSIWgNqF5E3ZxFzsqi3dsAicyQTG734Qd LjbxiBQMWvHlEu5fO9ILeFfDG8/av6dNHtweYWzSf3ern7HJEGhlV97E2txt FhmauW0agAlHp3HUdLFtAuiA10vbWAHX5yYsD25NTtuM8LaHlxJnecGnaKLB o03cN4ywl5LQl9Lji+uy1oTaxONeG/cVjR7fYPhbddeTYt/l9TspHnGxVFRU W5VVXZHBLUvPSgsLvOZ1zufDcyc/OOv9z4Qov5qKHJW0uk0tBolQmNBw2RHP 3gu/e8eiY1O863Wdoz+FVIK1ijFMLYT82Avf39E4O25i13ShTe5ArPRt3+wB m2zOdWwtdM5Zm83qcllVMrcgrDw3mFsYXpodmBZzOj70eGzIsfiwE4nhXqnR pzLizmYnXcxLvQIqwf0mJVkBYJPKgrDq4kiwiaAirqE2HQcI95uF4wMKsAl8 r4cbQ5/dsYNNwCNYzeWiEkeh1xc3v/7cEdQmjnb4r7a+f3qLEcrdNy/v03QJ e04XUcmz2z98sfn632vff7b+5stbED89u40L5X91tqXAM5EnCJOd7Y3Pt98+ u+USPz/fhvirb3wOj8Pj8PhbH7UJx8AmvLhj/IQTtUne/MSTYBNOzFEO8ISx CcMTh01wjDDbJj9udX6zYnxglTCLF/PQJvPNWUttuWCTjfZitMmKIc+RN5GE 2WRRoJJpdSLEkiqa2gRgsr9NQCKjlRfBJvAIJBmruQoB1zHgHG0yKQyYFAZO CoImhPDLQoRA2IXAk2CwCQbAhNqkl+vXzbnWWU5SJ7joBMJQesFhk8IzjE3O aUj25CzaBJviFdnn5FlnG6+flaWfRpuIEk84cyUOmGDQsV3IE7AJBLFJ3Ads m6yoQsEm0/LIcU3aWFuhtb1mpFs20qekt+uoEkSKS/+7ey/8/jYZ6VENdysh gCSDnXKIgY7GHiZd4hJAEneb9OokJFgwYduEzRN6hR24u8Q5JVixV94EngAk AZhgLzxegS/saZcy4VAJgYlR1GUiqZM6fvb1pGuhfkeDr32cEHkWeFLHz+pt l96YME9adSQ91KuaNVOb5NlbkuxatMnlSe01YpOm8CVNzIIidq4hxqNNMG/i 0SYLzZFLLTGYUkGbzCgjXGwyqvADm4yqoh02aeZaWwSjBg826dzbJl0Gye+z Cf7PNt4osit2/iM2cSnrcrcJtywD15dgw7tLxuSdNukxAZ+VLtkTmuxgh8fB wmyh7CUaapNdeZMuYpNbq0N3t6wP71ipTcAjd7cGIJwwISO88An72ITNE7jp RZjAvTGcNysqsUMc2zFALi4ZE/b6xb1swsYmfTU9jjj4M2ziUmmGH3q0CTuB skOY+rJ6YaGIl8vngmEz8rOiQ/x9znh9eNb7v3yO/SMy+CKnOENex21RCttU jvWLqJJmpsRLpxaweeIo3GLZpMM5NeJ9beKo6er0YBMSjE0g1udI0oTYxNZs UpXVcRKriyIAGpz8UHBHSpQPqCQh3AtiH5uAZVxs0qYoBpsMtIsmh1Q3pwx3 V/oeb418fm8ce+GxtcSjTbDN5PVXq84gjfCk6+SLtddfbgJPfiBbSO4wjeq3 MZPiSKYw8cvLe//99YPfXt1/83T7hycbwJPXn67+8NUWSIQslP/mwW/fPoT4 79ePfmYtPcEgDfKebPLm6RbEX33jc3gcHofH3/rgxR2piWXKuuKO8RJO8BLI Bka0CYeUde2kTqhNsKarpSQQbPL9huXrZcP9UfG8oRBtMtuWu9ias6zPXzMV oU1Wjflgk0ll4mh91JA4FG0yo0lCm8zLI6brg8dFfu+0CXgEeEJtgukSyhM4 wezJlChwShQ0JQyeFAVPkAiFsNYGjtYGsvMmQ7wgapOeSt9uprKro+KKY9dJ 2UVMnbQyPNEWnIcAnqhyd2Z2KXPOK3MuKLLOg00kyd5ok9p4bwg2TCBwZpcL T9AmzbknJqShS6pItMm0LGSqMWJMnWpvLRg1Vw931Q/1yHGyFlPgpEJuwN27 y+hglzHC7MoujzYZ7dOM9qpBKGATUEm/pQECJNJtrHOJYWfeBE6oTfoN9X2G eqzmYtuEbHI8gE16zDJqE5d99+ykCTyBNsL3WeREJWZZtwnX2e+CCQQ2y+i1 NdVliUnR55NjLlQWx+mbaj5/vPB/fv3if/385M6GbWy4hfTCm+tmjMJJQ8V4 m8MmNrX/uPrKFMsm8/KYG7LofWxCh3RhO8mMKuSGJgxsstgSjW3yTHdJGNjk hjqa2mRMGjwi9x1VBoBNrJoUe3OBraXK1ir0mDfZ3yYOnry/TegJvS/9z9qE Npu426Sy1DGGiw2Tg9uk2yhHniBMPKrEvTXepY6LLoJ3aVRhx3APsQmgGJDC 8Jn0m4BN7jE2eXxvxyb3bg1CUJgwbLHtZZM2tWvqBCQCrxfWeuHGEyAJblrE 5Yy4OZ3OEHZPSbjbZK+J0O48+TNs4sIN+rt1twm74JA+v0FSXCcoEFRnY97E YRPvD8/7/OPk0Q9D/c9WFKUr6ritKpFOLcTZXMgTtAl8iDvi2TxpbxO7wOR9 bYJzuqhN1pcG7q4PgU12eMIsiIfYmO+4tdgFMTOi0TUWSSoSqgrDARplOUE5 yZcSwk7EBB9NYJImB7EJrzS6tjxWxk9DmwxaxGCT5WnjvdX+T26NfvVwCsdz 0U4TTzZZ3s2TdRzSRdrhHUmTO29fkf50ZqAWIOU2XAezvGbWvn/z79XvP9/4 +fmd314y1VxPb7/58tYPX27hRvjvv9rCBArmUDB7QlcxkhIvTzZBnvzVNz6H x+FxePytj5rYj4En/PjjYJNqEicceZOYHZtgU7ww8Qy1CQTY5M6g+Lv19lc3 9WiTOX3+oolkT27q8lYMBetmgEnJurkQbLKszwWbWKXEJlZpJNhkVpvMtskE YxOACdly4skmk7W+oA9QyXDFeeAJVnNRj5B0Sa0fnMCHHm1Ca7pYPMHW+MD+ 6oA+zJ5U+nZVkmXxlorLpnIHT9qKz0E0F11oKrzA8OQ8NsUz4WoTCGEi/EGB 405CUKRga7wLT8AmPIdNQsAmy6owsMmUNHhSFmZXpVhb8kZMVUOddWRSLqvq CfeVQLD3LboHXXSyZ/RrrX0aapO+dlmvWeoxbzJslLrbBO6i+41SbDOh0UvE IXPhiUvjCQZrtaKCts+4J02YvIkG8yb9HQpH0oT5Lj1mUs2FqRMnUurg2wE9 etulcklBVWkCtyQervz4zb3/7//99f/538+XZrqwPR9sMs3YZIyxiU0TCjZh 500W1dH72wRO2DYhfe772gRiRhk52RjmtIm/i01GdNJhPWnkAZv0mPnd7dxu C6fLUOtuE4YnEtIs7+CJpFMngTurA9qEfZfI3oXxR2yCPHFvhHe3CackbZ86 rt9nE3aKxL1My7395CA2GerWMkvhNdgL398pn7LpWTaxA0/QJve3hx7cHmLS JaRHHj71yf0xeHS3SZu6CvThwhP4ECc/w6tmaOKbWgRYE4XPRJhA0PFW74TJ XjZxmXvgkk/5D9rEnRt72YTdxkIvSmrz6oWFfG4mtyy1qjwj93pksN9JsMmF U/8Em4T4nQGbyCWVaBOdWkBtgjyBD+Ei8mQndcL8BUGSdBrqMA5uEzpDGHcv 3pgwg03ubQzd2xhEnpBY67+72n9vbQBtsr3UPT2sbpEViMrjuAVhWNB1Pf5c fOjx6KAje9kEYIKN8FgDVlMShTahNV1gk6lh9cqMCRcvPn00TZMmWNnlsaaL 7l6keRNmH+ItHNL1M8iCbIR/9NtrEvDhm5d3f3i2/R1jkxePFp/em3v+YOGb T5a/+/faD082IL75bPXlp8vPHy9BvPr3CjwNMIL1XW9AN0xr/D55k0ObHB6H x+HxzgNgUptwrDbhBD/hBNNv4l2b5FMRfaSCpE5OOHlCOuLBJthyAie7bLKs f2CVLJqKF4yFN9tL4HFZn88UdJVsWohNVgyglRywiU0WMywJozaBxyVVDLUJ 9sLvZRNsNsH8iOdSLidPPNZ0jZGyrhCrMHRUEIIxUktiuDZkkBeEPOnm+tKp wmaGJ6Syq+Q8REvxpeaiiwxPdsZ2qXIvAE/kmecaMs44Z3Z5i5NPQyBP0CZk r6VzchebJ5VRH/Bid9lkWRkyWR84IQ21KZNHm3OHjdzBDslAV8Ngl4KdVsCb +YPAxGXI8G6bNFmZ1AnbJp77TUwNo84YMTti0ER65AfMst02keJKR8oTMpLL k03YzSYUXO5JE5AItQmt6WLuFRv7OmTMbK56yhOmVExmHdDOjBnh/mF+yjI3 2Q5UgbAPNY+PtIJKhntVPe3SaaNk2iCc0JePteXamhPRJnblpQn1lRvawAWm F34fm6zoEqhNphWhbJvMN0UsNEfR+V1gk2lFuItNmJquAJearqHWuqG2+j59 Hdikt722x1LV28k9iE263tMm+J/w7JtGdg7ld9vEvQXedXowyybsnnf3AcLv W9O1VwuJ+2Dhg9d0wVuuz6JgWk7IDOG+jsZJq257bfj+LZIT+eQ+sQmOEWZg MoyTu+AiwOTTB+N72aRVtYsnEPBiwUXMj8A55lDgCgSuJsR5VrSOy+OmRZfw aBD3mWx/3CYew91Ke/Wb4DdyMZSEn4f9JlXlabzKrILsmLDA06dOfHju5Ide H38YFnCOU5whFZY3yWvZNqHFXR7zJmATmi75fTYBM+q1Ne1tQvi3C/5t2bg5 iDbZ4cnaANjkwcYQ1nQBT2ZHtK2yAmFpbFUhaWkvyQpIjz0TF3o8JvhocuTJ pAjvfWxSkRdCbSLkxDcKMsAmnW3VaJPlaSP2wtM5XdQm7vF6V0EXyybPb2Ht Fssmj9krTrDl5M2z7e8/3/juyfoPn2+CSl5/uvrN4+VXnyx//dnqN0/WXnxy 89mjRXj89vN1XHHiuvTksKbr8Dg8Do/fdbB74ZmaLm8ItElFzHGPNhElEZu0 lgSBTbCm66GtbslMFi+udpbD44qhgCno2rHJUlv2lCrZ3hALNhmtj8CarglF 3E210yZi//1tgokSzJLAI9Z3UarAFYDJlMB/WhjgsRee9JsIg6lNECZWYdio IHSIHzxQE7jLJpyr7ZwrjtQJw5PW4kvIE7CJxjlVWJN/CfMmwBPsOgGhSFLO QIiSTgFP3G1CeUJt0pRzfLw+eFEZgTaZqAsYl4ZaFUkjTTlDhsoBi9jFJhhw J3+Qaq6RXs1e/SYe8yZY2eUStna5IyxyqzOG2xshhiyNg+1kyDAihW0T9+Ku 3b3wje698O5JE7AJa7nJzl545hdpoL3wWNmFmyJH+tRkiWRHI65ihD86OHHu kSfNJiCUaRPYRAA2sbc6bGJV+dkUF8dVl2c1AWiTBUXMXv0maBPMjFCbTCuD Z9WhbJvApyYbQ5l2eFBMFNrEXh/ksRd+oFk80CqhNunrrOnvru4y7mcTB0/e P2/icq/4n7IJe27wXjapLN01Kxj3wv9JvfDug4UP3gs/2EVsgmVdTPFhg4tN IJw2AZiMOGFi//TBgWxCeQKvF67LBJ5gERcEfIgN8qASDFrN5XEElseBvS69 8C7zhP9Um7j/9tjn9Jnug+DI+4rJmzA1Xek1nMzivPiI4LM+x/5xxuu/wCaR wRe5pZlkjHADj+6CZ++Fx6SJe7+JC0z+EzYZdrfJvbUBYpM5C9Z0kbxJWVxN cSS/LAbQARiJCvw4OuhISvSpA9oEvlBUmSAXXterStEmWNN1e7n3wfrgp9vW rx5OYerkxac3PPLku69Wv3u6Rm2CM4Rp3oTa5NdvHzNCeUDjVyZ+e3Uf53T9 8vwOFnTB44/Oqi14JHVfT9ZefroMJ98zfSjs+V2HvfCHx+FxePy+ozr2aFXs keq4YzXxJ3iJXjymF57YhMRRDpnWdYIb51UV7y1MPMWP9eLHeYuTTouTTrWV Bj4YqftuzfRyqfWRrW61o/ymqXjFUrrSXrpiLFozl2xYyjYtpevtRcvEJjnE JrKYEUm4TRo1rUqc1SRPKRKWNbELisgZacik0yZ79ZsAQGjqBGGCH+IV7D0B nsyIAieEfuMQAv9xYcAYiUAImzDQKgwcEQQxEThcS2JUGAIxVBs0yAvoqybz hLsrr3WRjSdXLEzjibn0orGEhK74UhvZF3++peBCS/6Fprzzmtxz2rwL6pzz yqxzisyz8utnGzJOy9JPSVJOi1NOiZJ8hIknaxO8+PEn+HEnyNITspbxWHXM 0aroI1VRR7hRH1fH/KM6+gNN1vExSdBNVeSKKmxNFTZVFzApDbUrkq1NuSMG zpBFPNgpG+ikS9KV1CYuiRIMqhI6QBiC7kChY4TJM1k2AYCATRxDg9tlGNQm Yx1KDHuH0tahwBjtUIx0yIc75MATFMogaW+X7QTyxOLaaeJoQrE00rIul8WL 7LwJ9sKjTXC/ieOZzFBisAkmTTqNog6DsNtcD9dH+lRkhJdFNthFNjMO9cgH u8EmcoiRfuVIHzxBjjVdJG/SmmttSrCqQ0aVvlbFBbTJvCZ0QRU1Lyc2oe0k aJOlllhQCdgETuAi6AMCn+OSN4ErU/IQzJuASiCm5OGYNwEHWdUBVnW0VZNs a8qzNlWONPEHmiUDLXVOmwj6Onh9XTU9RkGPUcgKh00Ynjhsghvh2TaBO1u4 j3X5H2z3fhO5c3m3y7gk945pl50mHucGu8OEnlOb1JSnUJsgT+hGeHb2BIu+ KuFKQXJpbkJJTjy3OBVsAredve3KfosKos8CSFH0kpB77Ij3WNPlESbulV3k ercWfmUmdaLqMRNlM/0mw+yaLrTJwzsAk1GECSZNPn0w8fje2OZy75SttcsE Nqlq01TqtFwdeARUonLahERNs7xSr4Hb7Co4gQ/JNkY5B5Mm1CZIEpdGeAyP L7F891p2fOE8tpy4zxCGcIfJPgVg7vVdHpeeeGQUfi988+AjeS/x8yCw34TP zeaUpIJNznh96HPsAxBKdOhlsIlUCFiraVUK2lQ0qE1q9VqhqVnc3ko3J0rY zSbUJi5ju5yxs+WEmR4sAZvAc+CvFe5eHOxSgE02l4fubw7f34RHZ/aEsQmQ YWO+Y5Mp65roVzTV54kr4quZNSX5aVfjQ49HBnwEPEmO8sHUCbVJbspleALa pCQrgG0TIScebGJQl3XreUMdErTJraVubIf/4v7E809mIQApzKbFRdx1gkF4 8uXNb0ksO4OsOPnh+eaPL7Z+enH77dd3f/mGTOhidi8+RI9g/wjGb3DlFdly 8vb57Z++ugVBtjGSvfB3aaIEhPLt52uvv1j/7suNH55u/vhs68dnIJctOP/p 6eabZ1tvnm/B40/P4Hzz7bOtX1/e/u3Vnb/6xufwODwOj7/1wYwLPlYVf6I6 wasm0Zuf7ANRHvUxBPCEfgpClOhdE32kNu64OOlkXcqptpKAx1bp6xX9sxua R6OSza7KFXPJMvCEeVxtL93oKN/oKFtrL142FCy15U4pk6310aPi8DFpzKwq eV6bdkOdsqKNW1RGzcpCwSbYC09i7zldbJvQK7TWyzFDWOQ3LvIlIfYbE/tj 2CWBNnGgVRw0KgqkMSIMGhYEDtUGDPD8+mt8e6t8e7hgkyudFZc7yi5bSi9B tJdcMhdfMhZfNBRd0Bee1xWc1+VfaM2/0Jx3rgl4knNOnX1WmXlGcf10QwZZ yChJPQUhTvERJZ8UJnkLEr0g+PHHSWYq7hgEs02GBD/hI07EfynSjoKbVtRR a6rwdVXYbH3gjCx0XJFsb8od1VcMtwuHO6UuWQbkibtN3Cd0oU1wvwld0QjP hC+xDzShTQY75S5d8GykEJt0qpw2UVCbjFjkEO+0CQ13m2AvvAtP3GOkVws2 oTOEHYRhsiFoE+yFB5t0GiQ9Zil6BGKgC75pXX9n/UC3dKC7brCnnom6od66 2XZHLzzaZFQdPKK4ZpVfGFNdnlH7zzlsEn1DFn1DRWZwQSw0RaNNIMAmcO7M jAQ7eeKY0wU2wZQK86nwaQU8LQJhMtEQCmFT+do0/lZNlE2bZGvKtTZzRpt5 Q63SoTZZv0FKNr+bBT0Wfk9HTZ9RCNHrjB6yk9HBky4j3F/BrZTYohe368X0 P4FNLQK474UbWvnutSb7jG9114r7fpN32sQlVwJBqYI2AZi424SmTiAoUpw2 SSvPTy7JSSjLS+JXZMrFZYxN4C2hBDL0WRwlfyT2XXri0g7vbhOXNY7OXnht j7kRAr5dN1nc0wh3pGRO1+Yo9sKzbLLTZkJscn/i0/uTn9ybWF/qmbbr4M1p aAaJcPXaGoOGpwd9qKox2pRVe0WLswue7ltk98Kzwz1D4cLMffJfdPHiXlkS duzVw4IndHfJXjbxGMgreJOAW+ENg56V1JKarjpBgbAmVyYuFfPyk2J9L5/9 6MRHYJN/xoZfrSrLapRUKqXVjE2Ezqh1Bk+vrQVQdOjr0OxmZi2pC0OQJ7tV wlzXk5nDEIQnjuUm8ItIjM18Uwv8soLhHtXcZDuxydbIg60dnqBNgAybC52b cx3bi932noamulxReRwnLwSskZd6JTHCG2AS4f+vxHAvsAlEWsxpsElW4gWw CU2dFGf6s3vhsaZLryrt0tWATbCma5uxycONoX/ftgFPvnwwCY8vPr3hshSe xOfzX3++8A1piidIef0VKfH64fnG989IZdfbr+/8/M1dRiiOiVu/7RYK3WPC jjfP7/5E4rYztn96fgskwsS6x/j+q7Xvvlz9HuKLlR++WP3xi9W/+sbn8Dg8 Do+/9QH64MYdpzbhJZ0Em2DeBD+F1yHAJryYo9QmutJAsMl3qwawycMRMbXJ TWORR5tMKpJs9TGj4ohxWSyoZKEpHXjyB23CVgkGqe9CmOy2yZgk0C4JAptg oE0AJmiTQb4/wxM/4Aljkyud5VeQJ+0llyFMDE8g9IUX0CatBReacs+jTVRZ hCeN18lOxrq00xCUJyiU2oQTpKOHEQpFCi/+o/Kw/2pIOWoV+K9qosEmq4qQ mbqAGSnaJAdsMmQWDnXUo01cUifuSRP2Xnh2Tdf+NsG8CTbCe7SJHVRiUUDY LApa0zXCqunCGDDLepiaLveWEw/Du9zyJi7r4Fk2aaK7F/EJjE3ke9mkv1Pm tIn0vWwyKj8/przkbhMcEUzzJhA4QNiZGQnBsq5ZdSj2wrvZBJ4WTm0yLgux q/3s2gB7U4y9OcXenGdrqbS11o7oGoZ1DcQmpjrGJrxuS7VHmzBzukTww1p0 gBGhWScywWOrEO++aE3XXkmTfWzisRbod9vEZfEi5k24zgld7LxJSX4SBPIE hcLUdKWBSoqz4ysKkoXcHI2MS3rhTQ3gBRBKb7sTJiR2Cr322he/T0GXu2vg q4a6tfiNqE1mx0372wR5gjZ5fHccbDJla0Ob6DRVhiYe2oTyZB+btCq5zW48 8RjuCngvmxw89hr55b6N8eA20WlqAAjwY+KbxJE64efJxMUQwBNFfUWDpKwg Oybomvfxf4FN/pUSF1TLzW8Qc/5UmzCpEynaBH4p+HK9lse2ydYKqMRhE0dZ F2MTgMnGPFlucvtmz1hvo1aSIyiJKc8JKssJAnoARtAm8aHHkyK83W3ivnsR 98KDTdgzhFdmTNs3e+6vDXxya/Tze+MAE4xnj2eQJ3TjCdsmyBO0CcAEbfLT y+03r26/eXXnZ2bQFlsljv0mrBaSnR2LzzzYxBmb7HjzYuvHZxugEozXny9/ +9nSl7cnnmzZ/+obn8Pj8Dg8/tYHwoTaBHkCMOHEHHWxiTDBix97TBB/Am2i LwsCm3y7rHs6q340Ktno5CwZChcNhQATjzaZkCeO1kWNiEje5PfZhJZv0XMc 2EVtgi0nHvMmNnEABDtvMiIMoDBx2sQforvyKuFJOeUJY5OSS+bSyxCGootg k7aCC22FF5vzCE80hCfnlJln5ZlkZTzChJ062csmNXH/qiA2OTJS67eijlpV hq3Ig6cl/tPSEGITbc6IrnzILBi01FGbsMftuidN9tpvsodNSMsJ9sLvbxNH 0gR4wmRMHDZhWk7YMBkg033ryUJ5xiY7KRK3jSfMRVeV7GMT9u5FxzM9503E 1CaD3fBdpL0WyfvZROVqk1mWTWjqhDbCo01ca7qaItEmEw1B1CY0aQI2GdP4 jzUFjjXHjrekjrXk21u59jaB1dA4YmgcMMr6GZt0t+9pEwITvYhkTBibmDCY GzB2vwk7b7I/TNg2+d01Xe42QZ6wl8IDT6rKHctN0CaYMSnOS4Rw4UllkcMm 5flJgspstbTSoBV1GeE91sAIhYxrw0nUYBOPqZMDCgWe5t7DAu83Z95EATaB N9teeRNmdDBZaMK2yaM7Y2uL3WgTY0uNTltlbOZTm7yTJy0sm+y1Bd6l8cT9 JT6ITbDLwyUObhNssWe/izz+rvYK+DHJoqVeDfwiVaVJ8D4hqZOaHKmoqF5Y KObnAUzk9RU1nMzEGN8zXh+eO/lRdlqUhF8iE1WoZDWtOzD5nTbxFDRpslPT Bb8CMAp0CTwZ6lHOT1lurY6ATXZg4pzTtbXYBTzBOV32nga1OLu2OLoiN6Q8 N7gwwzc1+lR00BHgyV55EyzrorsXcS+8oCIObWJp4fabhRODSuw3ebQ5TAu6 nj6a/urhFNgEzl/+e47ahPDkc+TJortNSMsJY5O3r+5Sm9BqLheboEpwPvBP z+642+TNi20mttjx86ttCDhBqvz4dP2HL1ef358BnvzVNz6Hx+FxePytD6zX cgnMmwBP2CkVsElt3HGwiSjRuz71tKGc2OTrpdavZlQPR8TrHRUAE+DJXjVd dlncsChiSBBir4f7uuTfYROX8VzwiIkS7IXHRngI0roi9iMh8R+XBGDQmi42 T1zyJgM8YpMe7jXSdVJx1ckTiKugkvayKxCm4sv6gou6wou6okst+Reb8i5o c8+DTVRZZA+jPOtMfToJl9QJVnahUChSqmP/WRnxgSLtyAjfd0kRvqIIRZtM 1QfbGxOtmuzhtrJBUy3YZGB30gQrtZAYHmFykLzJ2OBBbTLeqZroUsMjKe7q Utk7lRC034SWdUF4tAnyxHWeMKuDho5H3qEHK+AukdqENazMg006DGL47mAT MnX5/W2C/SZgk3lN6Lwycq4xalYaNasMd7cJa0SwwybsOV3zTZFY7gU2mZKH uSRNiE20AWPNQeMtceMtaeOtBWNtVWiTUaMcbdLbLnxX3kRMbWJmbGJuE8Ed lKlFYGjit6qq4IYWe+EPAhO8qzxI0uS9bAK3mu6Be+HRJpgxQZi424RTlIo1 XaW5iTVlGY2i0lYlv9PgySZmD8O7Dm4T+Cw+Gb4Wf50ek2KoS8NkZ0jLCdgE 3q575U3oWhNn6mQcbPLwtn11oWvS2gpvTlMrT99UDbe1Ri3hiUv2xGOwkyY0 OeIxb7KPPX+3TTzy5A/axOOsY3i7rsz131kf67M0YnsU/ET1woIGSUmdoEDE IzVdSlllY115SX5ieNDZUP9zJXnJdbWlYBOmF/4P2aTLWO8enbv7TZy98GRY AbUJ5k2wF35nNfxKH3gBYvtmzyaTOrF2SVWiLLAJtyAcbFKQfi0lyicy4COc 0+XRJljQ5dILT2cI0174m1OG++uD/75t+/LBJKiEkgQDN55g9uTbL5bYNmF4 sow1XT++2HTA5Os7v3x7/1dnQRe7rAvCo01+fHqHSZ1Qm9zaK28CMPnl69u/ fnMHHolTXt769dX2bxAvD3vhD4/D4/DY78CcCJIEEygQe9kEYCJkGk/AJsaK YLDJq8WWJxONd/r5a5ZyVMleeRNrfcygMGywNthW9/ttgh3xdIwwSARndsGj Aya1fpMIk902Ga8LGqsLtteF2CTBGAxSgkeEQe426am81s2hPLkKNkGYQJhL rhiLLuuLSbQWXGzOv6glqRPgyXkFw5OGzPOy6+ekGWcpUiAoUmgmBYKf8FF1 zAeq68dGav1uKiPAJjcbAqfEflN1jE3UWcOtZQPG2oF2ycDupAm1iXspl3u/ Ca6S92gTLOsa7lbSOV2ebdKlnmBivOsdNtmrposihWWTHZi4bF10CxWt6cK+ fnjENYuuNtETm8BFtElfR/172WRMdWlScxV74cEms7LI6bqIGWU43fyONoFg jeEKBpvQ3Ys4p8vNJmG7kibS4HfkTcz1fRZRb0ftXv0m7nkTY6sAO02Yjt1d NnEp1tpnvJLHThOPN64HtAnmSiBQJXixhpNVXZHFLbvOtonHmi5ucTqnMLUs L6k8P4lXfh1sAneenmu6zAqX2cIQB6/pogOHgSfUJoOdalDJjk26FPvbZCd1 cm/8k3sTD7ZtK/OdE6Mt8M4Emxiaa8ytAheb7MMTl6TJ/jbZ6yV2scnBUyQe n/wHa7o82gSugy7h3yKdpgbeJ1WlSRCVJcnVFemckuTyokRuWTqvMktQnQvv h8zU8OvJ4ZziDAm/pEHMaZLX/nk2YWBSjzYxtYjYeRP4lwd74dm7F2+v9t1e 6aU22ZrvBJ6MdNQphZn8oigus3gxP+1qUoR3uN8/o4OOYEHXXjahBV280mjs hW8UZGAv/HBn3dSw2mUvPKZOkCdAEsoTzJ4QmzyBWHCmTkg7PJM02bHJr98+ eKdN2DVdPz67w8S2M24x/e8YG+zA1AnC5O3LWw6bvDy0yeFxeBwe7zjQJsgT hAl4hNm9eJQ2wvOSTkKwbSJNO2OsCHk0Wv/shuaz8Qa0CVXJ/jax10ffUKcs NmdAvJdNcAs8XbkIV3qLfAZKz4xwLuDFKYH/jCjQY95kjNgkiNrE2XgSAjxh tcP79VX7YUc82MTJE2KTjoprlnIme1J61Vxy1VhyhbEJTZ1cAJsos88pss+h TShP3HtPdiL5GD/uH+rrx0YF/suqSLDJotR/SuQ7KQmyNcANc9ZQa+mAkd9v Fg+4rQKhNnFJl9AJXRQm8FXsUV2/xyadKoyxTgdMaC88uxF+r174PZYw7sqY 7GMTXDOBNsF5yPCz7GETEdpkoKsBAmzS0y4+uE3GNVemm3znmoLAJnOKiBlp +KQ4bEYRRm1CUydwjgVd2AjPtsmcNnxOG4E2GZcFsm3iSJpIg+0af+w3GWtO AZs4+k30DSP6HZv0dQr6uvgebdKpF3boBCRj0iog/xvfUmtoqQWYwB0UBNgE 7mzhrtWli+TgNmEnTf5TNqEXeZXZbJsATApz4ilM6MAuTkl6del1bIevLEoV VeVqZFxTswTeDO698D0sm1CeHLwXnm5jBJ5g6oTYpEvNfBfCE7DJIGOTrRXP Nnlwe8cmjxmb3L9lXZ7roDYxNpMRT8Ymh03emTpxr+nap6Brr5f4IDbZqxH+ gDY5eC/8XjaBnxTgoGkoJ/OlixM4RfF518MLsqNyr4dD5GdFQxTlxhXnJcCb pKIovbo8W8wrVtRXNSsEf9Am7s0mdE4XjhF2LoUnpZLUJvBvF7wTNm4O3l0f pDDZXundZlRCYqkb98KPdtYrBNerC8IBGqXZgaSmK+Y05k3AJh77TTzOEBZz ExWiTKOmHOd0TY9oVmfNd1f7H20OP7k7hvtNQCLYbEJXMdJ4+WQOgtoE9zB+ 93QNbfLji1vAk1++uU9qulgkoZVdHhrhASmebLJX3gRV4ijrerbx09P1N083 3j7d+KtvfA6Pw+Pw+FsfO50mCd7V8V5Vcce5scc4UUe4Mbgj3ouf4A3Bi/cS J5IQxh+Hx4b0Mx1V4Z/aZM9mVZ+NSe/089baS1dMRavtJWvtJavmkvX2sg1L +Xp76aqpaMVQsKzPt8vihkThg4IQmzR6VpOy0Jwxp01bbSLrF2dlYZPigAmB 77jgGsRE7ZVx/uUJHsQl4AkjlPOYHEGSwDl4BGAij/rQlHl0qPwctp9M8H3J DOG6gHEmxkgpF6nmsotJI7yNYARUEjwqCsJAm7BSJ468CeFJpS/ypJvj21l+ DYJkT0qvMHHVVHLZUHxJV3ixjYwUPt+Ud06Tc1aVfUaZfVp2/bQs47Q0/RRE fZpPHUSqjzjZW5REQpiI4SVI8BImHxUlfazJPD7Eu4Y1XTcbAmfrAiYkgaPS uFFVJuZNmH6TXTZBerjXceF9uwtM0CZ4V797E4qjpottE7oLflcvvDNXYut0 zBC2diiGzA3D7Y0jHfKRDsUwIAVsYpb1sWdzOZHiMW8yBD9LlwpjuNsRg53K Qfgxdwfci+KKE+AJ/KRTVgME2qS/U4bRbZZY9IIuUJWZbGMEnjCrT+ocNumS IkyGeqVDvfXDffXjXfVjFtGYqcLWlmvTJtgVwfaGa9OKq7NK3xvKgFllyHRj +Lgs0i6NmlFGzKoib6ij5rXRC00xi81xSy1xuHKRKegCm4TMqEJn1WEAE2yH v6EOw70nmDcBmGBQnthUIXZNmE0bZ29KsTdn21pLrW2Vw3rBsEE0YJT0myR9 7XV9lrq+DkmfWdxrEvWQIPtNuowiiA69wMKyCUmXMOFuExd37GMTj9v69rqn dbeJ+04Tdk0XuwNFUJXLA5uUpnOKUsvyk0ryEkrzEkvzE+G8vCC5ojCFU5zK LUmHJ1SXZnBAK/lJVSVpdbyCFgUPbhr7LKr+DhrKfgsJ5zBhRR8GMQW+ZzRD NLrB4Nrhbg9JEwoWTJ0gTxAmjIPkPWbZULdy2m7YXiMzhJ0SsYJNACYuLSeP 741h3gRsYhvUUJsYm/nsvAltNvFoE5wh7D6qa687fPeXeP9ha/Rl9SiOvSZ6 7ZU6QaTsz5C9FtnDFeAJ/IDwLqouSy7LjynMjs7PjMxODc1KCcnLiMxJD8+/ HgXvjaoy0G6OsAp+olKVtKqpkdei4LcqazFYNuHrtfB3QdKhq+/Q11va6swt 4vY213HBaBM6RnhnnjD5KinJnujr4auMzQJDE8lFgk1MrXxTC3+oR8Hshe+/ vdJ/Z8WRLtle7kGYbC10wUXgyeZcx7BFIq/NqCmKrCoML8sOzE+9AhKJDT4a BzYJ90qJPJka5ZMec+Z63LlssEny5byUKwVp1wrTfYsy/EqzAjl5oTXFkbVl MRJuohJsoi7v1vFGOutmR7XrNyz31wcfb42ATZ4+nnGkSxihkHPWDGE4f8l8 6tVnC68+W/z6CcTNr58sf/fV2g/PNn96sU3GCDON8L98vaMS2mkCgXVc8IgT g52LSwAmTFO8s9ALeMI0m2B9l8MpcOXnl6SO6+2LLYw3wJOn6z8/3/zl+eHu xcPj8Dg89juwcIskR4AnYJPY4wATTvhHVVFH+XFwC31SEO9dG+dVE31Mknii LslLEHtEFH9MlurTw4t8Mtbw/Ibq3/a6W92Vq+bidUvJRkfpsrFgA2DSXrZu Ll0zFa8aCyGAJ2MN8UPiiAFhiFUaNa1OvtGUNqNJWWtOvKmOvdEQPiUOmhD4 j9f6jdf6TtReneBfmeBBXGayJyRozzs8jlZe7Cs+Zcr8WBnzgSXnBGULfHZK 4D8mDbLXk7DVBVolAaNi0lrC5EogQtAjGPTc2XUSMMALAJuQ7AnXD2ACQump 9O+q8O0qu9ZZetVSegWiveSyueSSqYRM7tIXXWgtONeSf7Yp97Qmx0ed49Nw /aQsg4Q0nUR9mjcE2RefBHFSxIw7EwJMErxqEz+uTzvelO01UHV5oTEUbLKq CIGTCXHgcF3MsPL6cFvZkFmAc7pcbAIGYS9SpHVc7M0mNBkBgZaZGNFBOKYN O/fCs22CPGHDhOxe7FJZO5UYo8xmE4hBkwxsAlfws6Qv3rTbJntMD0ahDANJ 3GIIbAK/sks4kiYALu3kqH5+smNxuss6QFInOC54uBecIuswCEk5WTvJpDhD 4rQJhYl0uM8RQz2i0fYKqy7Xro6faAyelF6bk12bl/nONvhPNwZPNEbY5LGj ivgZFVnpPqeJWWgClSTcbE1Ybkskne/KMCZCZ1QhGHPacAITTdisymET3G/C toljhrAiyqaKsWkSbWCTlkxbW75VVzRsqBwyVPUbBX1GcY9RyvRTNMKP0G0W QXSZhJ1GAdNTIwSFtTM2QZ4gSUAomDqB+yjshWffrL4z9pklu3+6ZJ9d8LtI 4gxxdR6/IpPr3KtYmhtfUZAEj3Benp8IFyuLUgAj1aXp8Bz4FFyEE7RJp76B tpOwV5n0d3gYoeCy0NORoTtAWRfypNvYgLsXwSa97Q3Dveopm/72+sj9W7b7 2+CRESZdshNoE8KTu2OP744/ujO2Mt850qcEm7TrauG2FmcIszMm7jZxDOlS cD3O6XqnTdivuPtAA4/kZC8rYb8ZDj5t2MUstMuJ7RH3zn38beOGUHjEvZPw Lsq/HlqYGVWUFVNwPSojITAtzh8CzuE9I6rKldTkywTFCkm5WlqpbQCeVDfL ayDgvcFev2jQitpb67FtBE5MzRJQBl2zuEe6xBEWHZilvsso6zJKceodqKRV xW1TV5nb+IbmavjXZn7KvLbYe2uJpEhcYgPUsDYAJ6szpj5DLdiEXxINPCnL CsyKP58U5hUbeAQiMfREaqRPWtSpjJgzmWCThAt5yZfzU64Ugk2YKM7wq8gJ hi8UlsdJKhOVwkyTurxXzx/trL8x2gTf5d7awCOwyb1xYhNGHy/+PQdBGLKT IiHN798ARj5bYgV8uPz9VxtMpuM2iuPnV/d/efXQ3Sbw2e+/2vruy00I0gLv rOmC65gxYdlkm9V+shPMZpONt883f36xxQ648lff+Bweh8fh8bc+wCZV8SfI eK7Ek2ATbsyxisiPuZFHamKO18bDjbQPBPCEH3sCSAI2EcYdhahP9u6uifh8 vPHZrPITq3izs2LFVAQ2gbhpyGdUUrJiKFo1Fq2ZitAmpBdeHDEoCrNKo6dU SWCTueb032cTOB8sO9td4N1fchrOESbYDj8jChx/H5uwy7rQJr1VvmgTBibE Jt0cP7AJREeZgydmZnIXLj1pKzzvtMkpxiY+aBPKEwhqE8oTCLBJXeoxsEl/ 1eX5hhC2TQbFUcPKjFEdmSE80C7Z3yYIE3ebuKRO4Jk418uRZ2F2L1KbuKxf hA/hIsRgp/zPsIkHg+wR2AsPATYBVd0Yb1+Y6pwdN9sGm7CvBO4WACndZsk+ NsGaLpZN6tEmo205jE2CwCbzDb4LDX43GgNm5CGT8ki7Ms6qTJhlbDKvjV1s jgebAExWdEmzqgiHTYAhLJsgT0gOhcELs5lxD5soGZtoU2zN161teaNthWyb 9JrAiY3vZRMadE5XI2vVu3uDgEvsPz/Wo01c1sG7J0082kRUnYs2AXf8EZvs 6nP3yBBnoeDueIdNaOqky80mk1bd/jZxpE5YNhntV3WZxPCStbcJaC88bTbZ a2bX77CJe+rEPQvmcfyaxzyaR5t4fNu4fAsMdupk/6li8NPhGxJO4H0LPymf k1aenwAYyU0Lz0oOyUuPyEkNK8yMFnJzpLVFjaJSgImyrgJsAjBBm8Ab4502 MTaTVizE+/5CaW+TOG0igw+ZdfC8ZgWnRVnJzFvjwj84NyaMK/PdW24wcdhk ldhkZcoIlGjkp/OKo6oLI8AmwJCYgI8jrv0j2v+jhJDjyeHewJP06NNgk5zE i2CTgtSr1CYl1/3BJvC1nm0y57DJ5/cnnn0yizZx5EeYXAndZkIGc32xsjtW X3+xhhsS0SaEJy/uvX3hSJ2gTWibCdKDCgVO2AyhfShUK+zmFPIh2bd4aJPD 4/A4PN774MYdd6xcTPLhJXijTaqjj/FiTwgTfcTJpyXJp5EnksQTslQfccJx zJv08qO/mJA/nVE8HBZgQRe1yaqxGGDiYhObNJaxSSjYZEaTMt+SAfG+NsGa Ljgf4VzANhP2upPJWr8bkuDfYRPnEsbAQX4gsUnVLpsQnpT7QmBlFxZ3mUsd PNExqZPmvDNa4EnuqcZMwhNGKI4Am9SlAE8gfJAnKBRB0hFJylG0yZwsGG2y KA9z2ESRwexeFPWbxf2Wd9uEwsQ9dcJMu1LRmi78EvtAE7umy90moJKhLgXE n2GTAYuH2MMmarTJcI8GftuTo/q5CcvyXM+UTe/c+a6Ax71swqw4qQObOHlC arqGeusGu0Uj5nKwiU0VN94QNFF/daHRb1HuPycPnFWETimixlTxNlXirDoG kyZgk5utBCYQTndAhEwrgzEwaYI2oU/YK29iVUZb1QkOm7Q6bWIkNuk3Sf6I TTBvAjeB+zcvH+S/yvfnCRsmLjbxUMq1M1U4x8UmoI/3sol76oQ9wO1dcaCO eAi0SX+Hkum7bxjqUaFN7jlt4uw0IScMVUbZNsGarpE+JdiEvF6MTfQaV5W4 24TA5HfZZB+eIB/cN8K/l03eOd6Nfjt2ZddeGRMM+Lnol8MPC2SAf7JU9RxR Va6gMhveA7zy6/BuAZg0CEtAJfApDLCJRsalNmHDxKNN9EBCLQ/+aoBQ9ucJ s2mxDm3SaajDv1BN8gq0SZumcqCrAWyyPNe1tejZJvdW+uHk5qS+q7W6gZdW VRAOATZJizoVce2fYVc+BKGATZLCvFIiTsLF67FnwSb5KVfAJkXpvhhgE05u CNhEVBEPNlGJstAm1i4p2oTUdN0adbEJwoQ1LngZ4ruvVul6ESbWvvty3dke cttJiXtvnoNHdtIlzp73nQCVvP5iAwJ5QvMmhzY5PA6Pw+PPOHDZYm3Kqdrk U9QmNTHH+XFeoqRTkpQzdSlnxEmnhAkn65K8gCQAEwh5xpl+QeyTsQawyf1B /qq5ZNVcvNFRCjZZMRUyKileM5WATUAlWNZll8UNCsP7BcFgkxtNaYttme9l Ezo9GBgyWnkRu0soWIAncBHOZ8VBB7eJTRLqbpP+Gv/eKr++Kn8IRijwGNDL 8e/h+JHirgoiFEv5VWyNR5u0FZ4nNsk7DSHPOt2YeQqj4boj6lN96lIgTkGA UDDAJuKUo8053gOMTXC/yUJj6KSE2GRInm7Vc0Yse9oEe9tdYOK+FB6+BEtc 4CI2p+AT0Cbs1fBYx0WTJqASYAt81tZ9UJv0OxniMVxs0t/e6BIeeTLENJtA DHQq8acAnixMd06MtoFKIOAOEG4Y4KadGV9cz7KJGKLXIunrkPR3SZw8gZAw NhEeyCYqUtDlljfxUNOF/SZwMq0MwdnCzBQvDzaxyiPRJlZNsrUpA20yYqwc NlYPmISk38QMrwVOo3oPm2BZFy6Fh5s94IPHO899/gPc45BYlyqgA8JkL57A fSbahJIEhXJAm7gMCkab0OkQ7449+k2w5YSdOgGb4OLF3vZG0m/C2AT7Te7d GmY8Mow8cZ6MOlMndrTJzRsWeHN2GkXwepnbBMZm/l7bTFxhsrdNDrjfxGOV 10Febne/0NjLJu48Yc/sYo/t8jiZAa7DD4g1YzpNzdhQ6/Mnmw9uzc7aO+GF gJcbZIEYgaAwwXOwCTtpolMLMNxtolPXwN8LNk8gPO43oXmTbpOM+RAXBlXq NNXmNr5Oyx3qkc9PmUnehFli4m6TO8u9cLI0obM0VUqrU4AY3PwwapPwqx/G Bh4BmCSHe0NQm2DepDjDD6M0M6AyL5RfEi3mJNRxk8AmZk0F2mTO2uxuk1fO 1hK2TRw8+XLF3SYAk7cvb2PtFsQvrx788uoh/RB4whrJtQMQyhNMoEBgNRf7 aS4f7lXTBfFX3/gcHofH4fG3PsAmBCbEJj418V6V0UfLwv/lYhOaN5GmnBTE HhHGHW1MP90viPnMLvtqWg42WbeUrbWTZhPkCahk3VzK7jdZMxWBTQaEYWAT myx6rjl9SZf1/7N3319tXdve8Mf7jPc+95zEvXc6Nu6AMTbF9CaQhBCqSKBC LwIkhFBBEr3jbjq4pNuJ7cRxip2ccu8z3ufPeufaU1ostrZknMQ3+UF7fAdj I8vtGOfsj+eac95sy9q+TQAgtFyCDJlSxAFP4CM5xyU7iWB5r7oJ2ITyBG0y KE8IsUkM2MRZFTfAHe7q54RiE52EYOmks+RI4FhXAeGJIZfwhBMKCdqkLnMP 8ER7dR/LE0X635VX/taat9stOQ42eWA6AzaZ1ydNahIG1efBJr6OCp9VFcEm LEywBZ73CtrEyX13bIfHfnl4HWxCV8ODTbB0wh7l+tA22Wa8jiZ3H9f4zLUV wG8HfoPj/g6/qxFI4umvh6eFAau2t0NOtqv0QNTBqOCpPsCTPlWQJ2qwCYld 4e0u97Xlgk1GdfFgE8EzXVPGczOmc0zphPBk1pxCFsGTXfBnkCQMTBKnDIkI kwg28RvOUZv4W/N8bYXEJt2sTRre1yZ4oAueweBRFh4RgQzhbPLOR1NBm9Dl JpHbTOimRcH9JrVVuWgTSpL3tUnoHhNBhtDNPmwi24Qtndi7dGgTbgMjsQlY GGyywdmEyyAVypbSyfrIJ+ujT9ZG7s7Z8EwXsUmbnNjEJNlycIsL75XWhiqS 32oTfPiPPDt6OzzZpk3YH4o3bIHXFy9Y2cEiC/w24SOuSoHfr15ZCpq4O+uB DLs7etu1YJAmvaRRJ6Y2gY8GdQXahBZNItiks1EG8KE2QcULbmC0dsDHOtyh Q+sm8MfR1VwNf46dzRKf03hr2nr/pmP5VmAeFxuwyRo3quvmaBtoQiu5AioR 3UgEblw7v+9C3H+ei/mPy4kfZaTsBpjQuklu6uG89KMFGcfhbaVZsRD4XiAa edkFdVUatYmzS442WZq3gU0+Wx169nji5eezCBPa9g5h+03AJlvPdD2AoE24 TpOH//r+0b+/f/Lv7z/5r9eB6cH0WBcvyBPafoJnvVAo2I0StUn0il7R64+6 cERwzZU9sjRSNKlI+d8lSf9L8EyXKvVjfeZePNOFNnk6Vg82eTwoX7RVLFgJ TJb6ypftFcs20ZK1gmuHB6SU4LEunCHsViQN6y7MNmfe6cwFnmzfJhPyGNCH p/wABHgCNgGS0J0mw5JjXtEhsMm8Nvm32YQrnSSATbiWE2ITlzSOtQnEEeRJ H8cTsoqx7FgnPdZVsB94stUm+5EndZl7tVf3UpsgT4hN0v8TbTJbl7BgTgGb AFImtYlezQUP2KQdbKIk/SbhbcIe4qI24ZVOBnr18FQPN/SbiE2CM4RZm8AN PcoFMMF8CJuE6y4JtcmQswUHuoJN8H8E+H0NOoAqehzJ5erTOXo1EW2iApsE eQJRgU3c9lq0yZDxIthkTHNcsBd+0nB22niW8uR262XIjCloE9NpChPuNBe5 2U7dBGziN10WtknPb7EJtvrCExc8g1GbhDvBtZ1n0dCmeNYmvIoJ3f/+TpvI q3LQJuCR0huXECa/zSaUJ4Jnut7XJrzSCdoEvurAJv3ddYP9RmqTjeVBgAm1 CXe/aZMnnE24uonNO2CAPyzcb9LRKOWd4EKJ8Kjym23CPv/zbIIcEOyXD/fl EfoF8M5xCryDXryxXRFOf8FvEL8V++iNmgptTVG9skxdXQA3YBAInuBihWLU iFibUJgI26SpBoiBAZtgwmyHr7NbdNwfesAmIJpWY1VXs4za5PaM7cGtgcg2 mR9utZjKgRUAjbLsOHAHMARUcjH+b2gTDIAFbJJz+dCNtCPAE2qTityEyDZ5 vDgYapNvv5iDT9mOeAh4JNyZLmyEpzb57x8/octNaEc83oduYMTCCi2d8PpQ 3tkLH7VJ9Ipe0SvyJU7bKUnfVX1ldzXY5NLHFWf/s/T0/1t9cYfs0g7shccD XbRuoknfCQGbeJSXwCZfjmrBJiv9VUt9FQiTVUflCvAEPrWVLfSWLFiLF3qL 7nXn+7Xn3MpkN4hAf26m+cqtjqzbnVmL7Rn3mi7P1adMqBNGa2NGa05CJmpP TshPTNScIDaRHh6THB4VHxqvPjFUedhbftBXcWio6siIBNhCWuPp0hO/+Oio 7OS0KmFMEz8KUZNwA4QTIMPBhSZsRjRnhtWnh1TJfmWST5GINuGOdcW5uTil gRqKSxzvFANVAjzpqzwFQZt0lR5lbWLK3Qcx5uwzZEP2N2Ttrc/aq+NGCtdl 7gOhaEj2qDP2qDN3qDP+3pSzwyE6PKONv288/cCYDDaZ4OomnvpMbk6Xwtmt BJuEjhEWPM3FLjrh1U3oEkZ8fdjdzAW+byM8erls9QM9daRuAjYBkjhMXOCn MwwNmIccJj8EfgSgAbDFbnD21Hms9fApvgj3zu66d6pk0yb2LYOC3bZAuDHC RrcV7k0em8ltBYk0cwe6TBDa1++06h09daTHhDu+BTfw0G63aDmeaLiTXXi4 Sz1g1QzgPN4+tcuucdu5k10DtW57tbe7zNt6Y8iQPlp3dkyVOKNOmNUkTOsS pvSJ4w2nR4xnhswpk4aUKQNI5Nys+TyWTsAmwWYTwhB6pose65oyBIom3PaT M7ganl2/6Dck+I1JQ6YLQ43pQ83Z/tYSX5uIzBC2KF09Gif59Wv6rer+vs0Z wmSAcJe8r6s2OEBYHoQJPPqSIE/YM10AB9pl8F422U7LCe9Ml1Kaq5TkKiQ5 CnFOrTibpGoz8qoseSXkeg1ElF1dfh0MAjCBIEyw64SqBAI38B54EQL38IwK T6HW9rp+SwOuMkGY4GrF7duEDHwLjhQeJCOFNwOvBL7MuOnE8ICKy00cPXqw CfxdwDldD1eGad2EhtZNCE/Whp+sjTxc9t+a7vH01wOZLa3Vnc3SdrOE9Js0 VncAT8xSSDsIxSRpA5gYxa2gEgNRSQuXcPtNcN8i3uDrvPG8+JAvWKqIsNeG F8EeJcHyCu9wFw9EoaUTno/oG/BFuIHflEFTplcWm3WAssrmenFLg8RUVwH3 TfXipvqqJn0VfJO5Dv5nAZtIaL8JkKSzUYEBm/S0akAl8AWDm0q6W5ShsXVq QSKbIaODA69wzSZkThf8hQLOwN8poGVXixSYOeQ282yyfLNveT4QUAMe7prx NbXqCpWiy+U58RCgx5Uzu9KSd0DST+/EIV04pwttkpt6GN5TfP1USVYMpDw3 TlyYzA0QTtXJMszqnC5TqaNTNuzQ3RxtW7ppe7QANhl+9njy5edzr766hfnu S+DJPHykr0B+eHoXKyZBmyz8/M3im+dLEDqn61+vHoNN2M0m9HwXtQk92UW3 w7N1E9qEQt/G7zfhePKvQFYgf/aDT/SKXtHrL31Vpu8UX9ktzdhTnbFHmrar 8sLfK879p4xbaEJmCF/eBTChdRMcI6zP3As2GVSlfjmi+9SvBJusDUiW7SJq k6W+0mV72WJf8f3eAi75d7tz/bqzLmWiUxE3pE+ZaUm/1XntZkfmcmfm/Za0 ecO5CU3iSG3MSM3JEdkJziYnSd2k+uiY5NBo1cHRygOjVUeHRYchI5VHyH3V UX/lYbosHlSCroGMKWPHlHEkqnguiePqpCFl/BDZaZJIYTKsTh7RpAyrzwyp TvuVyT5Fkrc2EWyCPIG4ZXGu6linlCxkpDYJ1E2EbcId67pB0pi7z5yzz5S9 z5i11wA8yd6vJ0LZV3dtn/baXk3mHvXV3XVZu7WZH5uzPrKV7p9Sx96pT1w0 n5nXJ42r4t3Ks8QmbeWebvmARYFjUXnrF1mSYO8JdrsjT7A4wi40ZL8vR5um YU8zxjtgAjJw/Rp1cDPoMPqcZgjcgCP8rkb6KcTTb4DAOwEdcIOvwD1ZBy/U C8+DSegeRvKKrd5J/GXA50On1YiPnfD86bGzCUxhGujVYds7qMTerQrEokGe BBfTw68H151ouY54LY17QOqyVw5aSrwteUMN10Y1qePKi9PKszOqs9N1yVP6 5AlD0mhj4khzwpQxZdp4lhkjTI51BWsiSdxyk81MGRMnDQmTDQnwreP6hDFd PGeTM9QmuN/EbzzhN50aMp0dbkwfbs7zt1b62moGO3SDnfVOMjpYY++ttdlk ff0yV7cSdy86umr7O+V9HbW2jlorwKRNzm02kdPdi3iKHj7SpfDbsUnkEong 3GDhdnhJHo1CfANSW5VLI68ktRJZRRYEYIIFEYBJSe5FLJ1AQCLY+wzBogmo BIsp8CnYBJ5C8R/D7V31wBPc/B6semzfJiZ2hBc9AMb+NYG/aPCl2N8NSDdx Z3t08EXlczbOjHWvLw49Wh3BXnhUycayh9okyJPhx6vDG0u+m1Pdbru+p70G bIJ1kw6ASUjgzwskghhBj0CoTbBoQosjrE3gm9AmoXWTUJsI9omEe0Po2ITQ vpUIcxV4x7p41ZPQn5F9G13diL9T+L3DbxOAhvUjXpr0gXZ4ahNQCcTSrOpu UfN4Ap9i4Jsw8LXU16nHYJEF3mnrrCNbUTo03FJ40sMFf6eAJ20mcatJZOtS jHqb78z2Ldx2rtx2IEzAI4uzVsjCTC9qZe2OY9JjMilzassvVuYllWXHgT5S kz5mx3NhACbZlw5i3QRSeO140fUTkNKcmMqCxJrycyrx5fraTLMmp8NY3N8p HXXpb020L960cjYZefZ46uXn86++uh0hr78iY4RRKOFs8s/vyAzhf73aJAkb Zq3JGu2Lp0Gk8BrnaX59vvTrNwv/4JYt/vPFEubf3678O2qT6BW9olfEC2xS dWUXzybVl3fKLu+SX96FNkGeoE20V3bpru4Bm3jVxCaf+BSPPDWrDvFSXwWe 6VrpB6SUQhib5IFNvNozTkUC2mS29crtruuQpY6r95pTwSaTmsRRReyo/BTW TcZJ0SRgkzHxwbGqg0ASNkMQrsEkaJMT/zM2CYwUDtqkp/w42oS0wxcSm7Tk H2zOOwBpunGgMfeAKWe/MXtfQ84BiP76fuAJwiRgk2s7BG3iUZ2jNnF2K/Gp iT5Q4YMWaxM6s4t2u2NxhN20/k6bkDlXQZuARyDoDvhWCN5TTfxRNgm8ErQJ 1kfQJnjyX9AmTnKgS0eLJrgavo/YRIM24X4xW2zC8sTtkGzTJtOmwIGuYDs8 3ybgEVo0gfuJhvjJhkC/yTZt4mup9LbKvJ36wU49t9lE029V9PXVWPukEWwS XLy4aRN8jhK0Ce8xMoJNIs8NDjtDWHIDSUJVAh6hN9QmAJMINpGUZv5P2oRt TqGbgNAmELQJnu15T5sMhbNJZxOZFoUkaTdLMfDnhWGFQm3Clk7wIw0+wCNb 2KYS3qN+aO+JYBPKO20i2PYebtpwqDvC2URwqBfKC37j+NsXhAlnE0moTQAm rE2QJxQmbHgwCbGJCv9CoU3azVtssnjHhTYJ8GQuwBNSQ7nZt3q7H2xiVuWi TYoyT16/sP9y4kcQLJrAp5nn9oJN6H6TvPSj+VeOFV07wbOJsuoS2KRRm2tp LHP1yMc9BrDJg7meR4vez9dGv34yTW3y3Ze3BIMwoTb5+ZuATegMYdoLv32b YKGEVk/oi6H55fnir2QRPNkFz2WB7F7kSid/9oNP9Ipe0esvfW3a5MoeSepO sEn52f8NNqlJ3V2L4XiiSiedJpr0ndQmPk3aF8N1jwflG67qlf6qRVs57l4E nlCbLNiKHlgLwSb3em7wbHLHkgVZbM+423R5tj5lImiTMUjN8THZ8bHqY2PS I5xNDoFNhkWHR6uOQgAmcD9UeXiYmxsc4MkHtolbkgBxSuIHsHpSFWuvisFp XZZgy0lr0UHgSUvBQeQJ2sSMPLlxyJB7sCH7oO76fu21vQATVcYuXfaeOsYm dxuSlhpTbuqTcE5X0Ca1YBP2gYqqJBQmaBN6oAunB0e2ychgC3z0Oc3ABCw3 gBRAImgTuEF9UJggJVAif6BNnIxNuGXcRjyxE84m7r4Gjifk4FYQJsq+Lo2d 4clArxZtwvFki01cxCYi1iZjigvTCgGbzJjPYdEEbELPdDGt7onUJptCMSRi 3SR4potvE59B2CaeDl1/l9bRHbBJr03ijGgT5EnAJpv/wCuBRzvsN2EXW7yX TSLsWxScIayS5vPqJtQpvKLJO20Cb4CbquKMD2STUJgI8gRUgjbBM13wd2F2 vCecTbDfJMCT1bA2wX4H5AlViaBQqFN4D+e0moAVE/wIz/Zs80i4J3+WBqFN Iu9rE3wD/TphI1g6iWATChNqLgj8HrdpE3qmC4smtCyCAEGeCL4YWjShNuGK JipaNCFzDMySNnMla5NVrq8kcKYryJOleRvcUJsoKi6JC06XZsVmXTyAWxex bpKRspu3exF74YuzTpVkk5TfiJMUn64VXdBI09AmPc0V3j7VtL/x7nTX4k3r kyXfF+tjYJNvv7iJBoEbwWwtmvBtEmiHf0+b0F0nrFAE8+tLMi741xeLkF84 mLz95gGe8vqzH3yiV/SKXn/pS5S2oyp9l+TKbumV3WAT0fm/BWyStluRtgeL JtQmABO0ScP1/T5NegSbLNpKgjApAJiwdZPh+rNzbRl3u7MhgjYZqT46CpEe HZUQm4xLDk9IDgvaBPebkFSfGJEF8oHqJhCmbhI41mUTnewuP448aSs+BAmt m6BNIGATfdYBeqYLbdKY/XFf2YFpTVzAJvVgk+CcrvaKwZ6wNmFhguUSCF1f Qv+VOKxN3AQmGNYmZGn7gGnI3cTahK2YYAvJ9m3yzg4U8opVzzXsG3GphMtm whV44WyCvx6njVRG0CZcn7gaeRIonQRaTjRcy4kaeRJAikPs7BN5uooHm2/4 6zNH1WFtgnUT7DcBoXA5D+5AeqBNMNgOD5k2JjOFFWGb+Iwn/caUIXPaUNMN X4sIbeLmbNJvUTM2UQjaxNpey/abWCDcwXhqE1AGkIGu8w7XOyDYYxLaVxIu tB0+FCbhiibhbAKvAEnwDe9rE7pglI1wLzxnEN4gL94yIPzuoBL4eqP9Jn5X UzibUJ4EhTL0aGXof8wmLAGoGgSHZYUb6hVhVEIoYdhO+XDL4gWVJGgTqh7W JrQYxBZQBEP3m7Sb5LRogvTgHd+C15Et9KAXrZWwMCHf1EEPdAnYBP47M+Zr AZss3XWv3R1YC/KEJxT4FGzSqL6hFF2WFJ6pyk8uvHoCVIJnugAmack7eI3w uBceYVKaE1ORFw82UVReBJvoajLMmhywic+unhtpWZjvXb3b/9nq8NNHky8+ m/v+6Z0fvr73+tlduIlQNwkWTR68eR6ACSS4FP4h2br4/Sdsm8lvONPFbEth s/Lrd8uQX74FCi1B3r5cevN84efnD/7sB5/oFb2i11/6AptUpu8kNknfLb68 A20iS92FdRMFtxceO+LBJnUZuyFok6G6K2CTcGe6SAu8rQhyryf/jiUXbOKr S3EpE13KeLQJ1k0Ez3QNgUSkR0YkR0Ylh8elhyekxCaCZ7rAJgGeVB//oDYZ qIodqIzFAcJkA2MFmSFsryJC6ak40Y0nu0oOt5ccbi04JFg3IaWTnEP1WQd0 WaR0AgGb6K7v5NnkFtlvssUmrh6V4Jmu0KNckDFvO/KElk7C9ptwNhn1tlKb AEyACdQmENpj8nvqJpFtgp8OBG2Cw5HAJvDwOdBjDGcTRJOrT4c2welV3OAd 9WbppHdz1wnYZAtP+rfYZER9OXLdBINImTGdpTaZaCANJmiTuaYzOEaYLD3h di9GqJuwNvE2iwZbqgc7dFg36e9Wc/0m1RHqJuFsAs+9aBN4bkSbhPIksk14 5ZLtwIREnMtiBD3CwgRtAsoQtAluh4fX/wdsEjpkOHRXKWuTgV4yp2sook24 yV3eAE9W/OFs8iHOdPEqI1j1EDzZxRvqRd+/fZuw3xp5eFcoTyLYJLSAQn+p 27EJzukCm+BpLqQH8oSFCSsX2mnCg8lWmygRJvBHBjaBP772xiq0yd05O2cT 53oIT2jXCdpEVZkqLUqBlGXHZV86mH56J/bCA1LwZBfPJsVZJ2ndRFyUjHUT sIlJnW1pLHP31k75zPdmLCt37FwjPGk2AZX8+M19CAgFeBLab7K1aLJpEzqn izS8c3O6tm8T9igXb0c8L798t/ILwATzinx8+93yzy8Xfnqx8Gc/+ESv6BW9 /tJXRerHaBNJ0CZlKf8hT99Tk0r6TRSokvS92G8CKsFQmwj2wq8NiJbtZUv2 kuX+UuDJ/d78BVvBkP6cR53kViWATWi/iWAvPNiE8ER8mLWJYC88a5PhIE8+ WL9JPK/fhNikKqZXdLKHO9nVUXoE0lZ4GMIJ5VBz3qHGGwch9ExXffYBfTbh Sd31ffqcvaxN7hmSl5vOgk2AaYxNFGS/iVAvfGjRBDLu62B5gu98p024XSGb NgGSsDb5nf0mEWxCP/0NNuH69PXUJr0dOBQ0wBNBm2zyhNikgrXJaO15QZvM NgbKJUGhAFXOoU04niRQmwSXwgNPAjYJXzc57jPwbeJu04JNHJY6sImtu8Zq rY7Qb4I2QZ5Qm9B/kIcnOvAFzybs4a5wNgk9yhUZJoxNtvS/U6HwiibvtAkO 6YIbHNL14WzCvsiO4KZ98fB1SG3i6NENu5vnJno3lsLahPIkgk0+RC+8YDVE EAKhnem/zSaCc4PZ6LdOJ45sk9AfkP42Awe3wsBE0CYgEbb5ncIE53cJ2gTf H2qT7tZNm3S3ykNtsn4vYJM15nDXwmzvg+keuKE2qS4+CynPiUebYN0EbEIb 4XFCF/ablGSRoklZbmxFXry05Iyi8qK2Or1BcY32wg8P6G6Oty3M9z4O9pt8 +8VNIAkGnBKaH55tFk0EbUJnCL+vTXg8EbQJSOTNd0uYt6+WMXD/87eLf/aD T/SKXtHrL31JMvaKQSVpuyRpu8WXdlZd+Kjy/N/kabvlpG6yS5m6W52+R5O+ W522G4smTN0k4+lY/SNPzYarGmyy0l+50i8CmEA2XFVrTtGas2J1oBx4smQv gvh1Z8EmHnXiqOH8fPtVgMnNjszVrmuLbVduGs+TGcLyGAIT6bEh6ZFhSaBu QmYIc2OEh4lHjnA5OiImJBnmlsJDwCbD0mPAk7GaU5MKgEnsuCpuXBVPok4Y VydOaJKHwUTqwEITNkOqQHyKRG4vfByNWxbrqo6BOKWn3NXxrup4J5kqHDcg iXVwQZtYyaKTE92lx7tKjnaWHG0vOowBnjTnHWzKO9CUd9CUBzw5SHiSc6A+ h/BEn71fn7OnPmdXU87HttJ9M5q4BfOZBdPpWw24Fz7FXZ/hbSsb7K31WNWh Dbx0kSILk+3bhNDGHeiFR4OQMoSt3t3XgM3v8AqO56IwoRO6AjyxcaOAg68Q aFi5o1ngkV5dcI4WSRiwBMJ1rJOzZPAE6LSSR0H4SI51WU0Qd5950N4UCJn7 ag7EgXUTPQDEblFbO5W98NzepeqDWFTwSn+3BrecBFtO8GQX9sVrvbaqwZ5y byexyaAh01eX6lOdH9eeG9eenahLmtQnTTUkTRoTJoxxIJE5wpMtmahPCgTe ZoAkTxmTZ8wps41nITOmFCAJjaBNSL+J+SzYxN+Y62uq8LXIPJxNBrrqHBZV X3eNrUdqs0pcFpWrSzUA6VQ6OhT9Hcq+DkVfuwI+2jqUVi69XOhzFFs34Z3m Csx9hYdAeHTkooM3gE3kkDySmjwtRHZDQ/IeZ7pwejAmMEM4MEk4S16VVVN5 XSa6JqvIrK4gI4KxJoIzhPE0F7vZBAI2wfcgT+h+EzyKA4+UyBPi1r4mspQk BCYQ2pNF3UFtwpIEz0ay78T3uGwG+DJz9wFSAN26IdJv0r2+CPrwBwcIeyAb y26eTR6uAFt8qw/cc5OdLru2p6Pa0iqxtEi6miXtZkm7ScoNEK7ubJR1cWHG COMA4crm+kruntw06SrMdeUmAIim1KAugRsSTakZHt115ebg8Sd2I7xgC3y4 UV2Rqx7s2bBQj7A//nZ+RvZt7IEu3nvYRngIWz/ipcWwCRPaaYLECLGJvLNJ bmlW9LSqcPM7nRsM9zbOIyTtRCXBA10K+neqpw3gX93RJLZ3q8b9rWQp/D0P zybIk6U5GxnbNWcdcejxTFdN6XmwiehGIgDk6tk9wBOsntADXbTZhDvTFVOa EwupyEuQFINNLmmrr9TXXmuqy+tuqnB0yfz92rmRlgezPTin66uHE998MvPi s7mXn8/Dx+++vPXqq9t8qsDN0zs/PLv349f3fwKbvFh882Lp7cvlX77lbAL6 AJu8fvLv15+Qk12vHwc2xXNOoYtOQqcHC7S9hyw3Id/l2+W3oBKuXBIonbxa 5j6N9ptEr+gVvSJd8uuHJel7qy7tBJiIL+4UX/hYemlHbaDNZKcqdZc6dZcm dac2jYwO1l7ZhTapv7ZvWHf1m0njulMajGTdKQ6mat1ZSW2y3F8MNhnUnHYp Ewc1SeOmi6CSO5asW53X1izXl9ozbhnPT6oTxuQxw9Un/JKjw9KjI9yZLi6H MEPioxislWC5hC43wdfHa05NK4EkcfB4D9iZ0CRySYaMapJG1EkhMNlcxcjt hY+DeGpiMW5ZDMRVfYpEFuesjsUMSGMGpPAxtl8ci8e6rBUne0pPdJcctxQf 6yg+jGO7Wgu4k12Q/APmfOTJAUPugYbcgxxP9uuydxlv7Gm+8XFvye5pTcxi U8q9hoQ7BvjVxrmVyS59+mBbqbe31tunEfxHYNYmgBEIqARhwo7qYv9VmQUO VkYoQCg9kCFIEhr2ZBdiZItTmANaZHwWNyaL7B/p1tKpWbw4bYGgHYhicPBv r54d2OWxmzfX5PU3czzBkN8U+Ai+o92isXWq4CndbgkME0aVBCsm2tAMd1cO dZX524s8TbkuY6ZLf9mpPT+kPz+kOztalzihS5rWJ87Ux0/rYgAaWCvZapNk DLe7hAQMEjzxdW7aSNY1TnGLUSCCc7qGzDFDjeeGGgM28bfIBtvqPG06Z6fW 0aXq75bbe6rtvRJ3l9rVoR7g4mhXOTpU/R0qe7vS3qG0bQ19jmo1irHfBMgg vJNCUaivLcDo5PkYUAkN2ITwpDpXXb19mwT2wrNhl8XXVGbKRFchklJSEwFx 4HITgAkwBII2gYBEMGgWeA98k7q6AJ5CQSWUJ/2WhoGewKBpEATSm50PzG7/ YW3Cgwlvhyl9J/5QXAFFD1+Wfpd5dtyytogMwVqJK5jB0CzfH5idaHf2qXra JZbWKkhXS2WnObB+kQ3uYaSrGFvqK2ma9SKwSWNduVlbBjGqSyAAEwy+KLg3 JBwNwkkk3DRgQcWw0BDsuxfkCfvd6b3gPDF2bjCqRBAmkDajDLcu0rnBtNud hQlnEzyaJcc1QOzWRbiHWDtUGIQJaxMI2KSrmdgE/qsyOdz+4NbA6gPv+j0X zyaQ5fk++HRhttdn04BNFBWXassvgk2q8pOLMk9mntuLHfHAE7Zugge64A1k uUl2LKT8RoK46Eyt6JJGeqVOdrVZV2Brk7h6FMMD+nmy36Tv05WhL9bHwCbP Hk8BT55/OotCwdZ4PM2FQglMEn5294ev7/34zf2fni/8/GLpzcvlt6QTZANt 8q/XT/71+pP/+vGT//vm8//64Ql4BD6iUOiO+HfaRHCG8JYzXUzefhu1SfSK XtEr0gU2kV7ZBzYRnf+o4uzfqy58JEvdJWgTIAnbCz9an/li2vzQLQum+qFb itlwbbEJ1k3cqiSnIt6jTgSb3O66fq8nB3iy3p212HYFbDKlSeRscnxIeuy9 bAIf/VVH/Nw8YbDJZG0swmRSk0iiTZrUnoYI2mREcxo+chvh4zF4j0hhnSJo E4ckDgI8sYlOWctPIU9wZhfYpK3wECmd5B/kbHLIxFVPDDcOok0gddd3Gm7s Bpv0FO+aVJ18YD4NNrlrhF9tvEd12l1/xdte5rMqfHZtZJugSsZ9HRi45604 CR1PxJ3p2rQJRQe1SShPeNUTXsMIqoTmnTZx9ekwQaFw35E8B27LJvj74trh yVky5AlzgouO59rkD5shi8jfWeZrK/Q05TgNV526S2ATv+7csP4sCGJCnzSl S5jWxc3oY2dMZ9EmLE8EbcKSBD1CQ/fCA0zAPjhD2GdK8Qdt4muudrdo3K3a gQ4N2qS/t7rfKo1sE2u7AtLbVgvh1U1+s00QJtuxCe9Y1zZtIi0jvSTUJrRi wgZegaBNcIRXOJvgMDfhL++INgkddsd7J2IHPnKLcnRD7sa5ie71JQ+zddEd jIBNVhdcc5MdYJPudjHCpKOpoquxuqtRxq6Gp6FL4ZEkEWxCY1AVk4SMCH4v m7Aw4Ykj8mkuwdNf7PEtwdQHh4DRoolgXwztqQGnYDZnczFmoTahB7qoTdhO E+5A13Ztgge6sN+EzhDGXvj2xiq0yeId1/qif+P+pk0oT5bmbHC/NG8b7te1 1BUoRZflZRfAJuKC08XXTmWk7D4X8x/nY/832ITXbFJ49QTYpDQ7tjQnDoI2 kVdcVEvSwSZNdfnUJjfH2pdv2b9YHwWYQJ4+msTSCR3MhS3wbAGFllGAJz98 ff/HbxYEbfLv10/AJv/np0///fox2AQ9EmyW34IUunWRTdQm0St6Ra8/8JJl HkSbVJz7e3nK3yLYpC5jN62bgE3GGq6DTR55ahieBGzCwUQEMFlxlKFNFvsK PepkpyIBbDJhvkRtstGTvdCaDjaZ0SaDTQhMSOfIdm0yIY9Bm8Cn4BSAyZQC iybxk4GiCfAkObJN/MpEyhO4weCnFCnhbBIonQRtAiGNJ0GbtBUebik8BDZp zD+EPDHmHTLcOIQ80V7fgXWT7qKdY7XH7hmS7ujj7lCb6NMj2wT7TdAmQJLJ oS4I70wX2+HLO2kfWjSh1ZDtlE62kKRXF1wpoqNIYSWCp7zYuO16CCMU7ocS tEk/zomFNHsdTZjA74tbDQk/FwgIePIeNiF1k3J/e9FgUy5nE1I38dWdHdaf Q5tM1sWDTWbr42bJnK6z27NJSgSb0KIJ2GTIdNJnPOk1nvGbU4eabvibRYON EleTytWicbSrHZ1KziaycDYhPGFg0tMqh3QHFzGwc7p+s00AJtu0SaDf5D1t wp7pQp7QAElosBUF3g82aTXIgCTY6cyzidchcFgrnE0Ez3SFvhPbu9AmTqt+ 2NM0P9mzvjS4TZtA5qc6ad0EbNJmLus0SyPYhBZNwtnEpCmlJGlQFgUSLFVE Pkz1TpuEFj7CnfJi2+FDu5kgLC5o2MaZcBtYwu064e1hxINeENYm7MrFkKLJ e9lEzRzr2rQJaRcK1k0WbjupTTBUKIuzVjzcNe4ytOmL8EyXrOQc8KQsO+7a +X0Akwtx/wlIoTAJVEyux5RmxZbnJpTlxkMq8hLRJipxGtrE2ip29ypHnPW3 xjtW7zi+3BgDlTx7PPX1k+nnn86+/HwePAIf2dJJqE24AE8e/PxiKdQmVCJ4 AwFcIExwZTw94iVYQInaJHpFr+j1B17SjP1gE0nq7soLH4vOfSS+8FG4M126 YLMJxJB1YNxAbLI2IAlGvDZQFQxph+fZxFeX4lEnebXJYJNbndfwTNdGb85i 25XbpgszdWgTrp/9/W0Cr6NNINgLj/0mY6TlJAkyqhY+00Vv6LEuQZ6EsQk5 1kUmCVec7C0LHusKrjvhhHKktegw2KSp8HBjwWGOJ4eMeYeBJxBd9i5T/t6W vB1ok7sNibd1sbcNSRPqWJciyaVL4850yQdt6nB1E1o0AZVMDVsgE/5OeqyL ZxMeT3CDCc8mPJ6Etpmwo7qCxQ4dc1JLGCyh2b5NgjBp8TpaGJs0sTbBGk3o ga5wZ7pGesUjloqhjmJvyw236Zq7PtWtu+jTCdhkxpgyw/AEE6FuEsoTXtGE 2ARgYjgxaDjtM6di3QRt4mxWMzYJWzfhbKLCusmmTVrloftN3ssmbMWEwESa o5JuFkcEE04lEWxSXR7Yq4i98EAPbDnB0B4TLJeEswntiGdtsh1xCPbCb98m 2z/TBYS5Od3lsqvBJuQ0V7OoxVjSBo/TBjFIBG2CZ7pCiybvZZPQ3SXvZRN2 6q/gCa7Q8W6hg914IxdYWfCIgaPG4NPIjTCCPAm1SatBeOtiSNFE0dEo2/aZ LjzQpbS0KOjM5952uJd1NkvgPywTQ233bzpW7g9u3HdvcC0nLE8WZnvRJmPO hlZdIdgEYSItSqnITci+dPBi/N/AJumnd4azSfkNErCJpDgF6ya6msxGbR7Y xGNVjboa0CbYbIIwwdNcNGzphAplszX+6/vhbBKYrMWVRVAlSBXaCI/B0olw d0koT74lDBHMn/3gE72iV/T6S1/VVw/Irh6Qpu2pukj6TQAmEfpNIIxNsp5P mVb6q4IhvfAYgAnahINJCcBkwVbg150d1CSzNrnZkbnRk73UngE2mdYmjdfG Akzeq26CzSa+ysM+bmYX8AS0wtkkljenK7JN8J7ahB7x2k7dhLPJKdYmQZ4c ITbB0knhEQjHk8NgE+RJw4295oJ9YJOe4l3jiuN3DYm36mJuNQRs4tSleVpL vL214WxCe0ywaEJtAp+yLSd4eJ53Gh8ez6hN2PnAgjwJhQn/KFdvQCL8813c i2EWMm73TFcYm3Bb77mjZfCzAEzIhC7cwGhRIlLQKWFt0l0x3Fnia8nzmK97 GtI8+kt+/dYzXXruTBephvB58r42YYsmI9oEn+G413jCazzjM6X6zDnexnJi k2Y11k36O5V2S429Rxqu34SkU9XXqbIxJ7voLoZ2sxSe4n6zTShM3mmTyDAJ ZxNZxXVqk+KcC8gTliQ0YBP4JngbvB9s0tJQDR7BNmd2WhfwZLBfYCxwOJsI FBC3faZrdcG1vuRZX3KvL8GNExPOJrdmLO5+TU+HBA90tZpKW4M2QZ6wNmGL JuCR9zjTtdUmkXkSahNKDN6OztAvG96CTp5Q2OpJZHRQmIR7p6BN6LEu9kxX a7AXnracUJuwRRP41t9vE0tLTYhNXGATHk+wbrI4Zx2y1zVr8xUVl2pKzwNM 2A2MYBO2F54901WWE0frJmAT7DfRy6/hmS74PwKwyc2xds4mw19ujGOzCdiE hlc6QZsEVRLoN/np+aLwmS7uHBcGoEGHdJFxW9xOE9y3GK7tPWqT6BW9otcf eNVmHanJPMjVTXZILu2Spe6uvrxT0Cb11/ZBgCd1GbuxbvLNpBFUsmyvDKYC w8GkgmcTr/aMW5UINplsvMz2myx3XL1jvjitSZpQxI3WnCI22Xa/CQZepKWT KUUcN6SLP6cr3JkueqwLT3bxyiWR+00GpPEQwhNRjLU8wBO0CceTo2iT1qLD zUVBmxQcMeUfQZsYST3lQGv+zt6S3ZOqk/eNSWCT24bkSaYX3mcN2wvP9pjg gS4I2gRbTvCJC/8RmP478OYgIw4mEWzC4wkrlFCkoETYKcGRbbL9XnhBmwR6 /IOzi+0WeMxQ27qUoTwRtklP1bClnNRNmjfrJkP1Ar3w04xNKE8EbRLa/E7D Fk3AJt6GYz7jSZ8pxWe67DVlD5rLvE1Sd4vG1aJFm/R1yWwWia27KoJN7F1q TB/nFLAJ8oTaRFWd8742QZhsxyYRjnK9yyZZktJMUWE6qKQo+zzlCQ3PJpBt 2ESgLPhOm0R+p2Av/PJ9J/BkdQE+DqwuODCCNgHCgE08Di3YpLNZ1N5YDjZp N4nZc1yhB7qwaBLZJrxeeHZlyW+zCU6NZpdvhi7EYRXDW7kY+v4I57UEB3aF 2iSUJ4LDhFmbsMe6+EWT97OJOtgOr7QEz0l2t8pxThc907W24MO6Cc8mS3O2 lVv2B9M9XqvapMyRl13AM13YbwIeuZTw98uJH9HFi7xe+NKgTUT5SdKSs4rK y9rqjAZFFvbCo03mR9tWbpPdi9gL//TRJK2eUJ7wuk4YmDz4+QWBiaBNwCCv v3oA+sDTXPRkFztAmO5bFDzBFbVJ9Ipe0euPumqzjsoyD4lT91Re3CkGm6Tt qUnbU5u6S5G2S5W2U53GdZqk79SlB+omWDoxZh+cbsz9Yrhu1SHGusmqg5zm WneKyRjh/vJVR/naAPm40l+6aCtcsOZ7VEkQn/b0hOnirY5r93tzH/TmrlrI ipO7TZentUmjuN9EfnKk+ugwRHpkWHp4WHKIy8Eh8TEMtcmw5DgNfhN3rAtU ksgliYQc6EqGjGlOj3ISQYyE2gRhwvaeoE1wWpdbFu+ujucmCceRSMkwYW6e cJxDHEvWnVSctJWfsJaTPYzBTfFknnBr4aHWwoMtBYeaSQ7Cx6b8Q435ByHm gkONBQfb8nbbSvaOyY/frU+435B4x5A8XZfg1aS49emeliJvj8xnV/sGBNbB U5jwbILHurAdHksnqBLKE6QKrn1n3QHQoCphbcK+wvKE3RQfuspEkCRbl56w M4TZzhT4pnrySyX73+FJspkJtUkjN+LVAJDp79bZLVruSYMbILx5sgs+qoLT g9XBwCsqapPBoE1cdRf8+nNDuhTOJolgk2l9HNhksj6Zm8F1ltsLH1hxMq5P 4gI8AZicoTAJPcfF8gRtAvE1HPeZ0CapYBOPqdRjFrtJ3USLZ7rslpq+bmlf j9jZpXZ2qge4OLamn4u9k5zvgvSATVpqLc3wqCYx1wVsQh4aFfnardEpC3VK 7l/CSbgnTJwhvLUXHhKuzYTChE0EpKBNkCe03wTQASqBAE94FRO6KR775aVl 1zSywuZ6KZCEnunqtzTwbLKdagg7F4LdExTOJpB32mQ9OEOYK6l4NrisL7hv TnV67JredomludLSJOoyl3eaJeG64JEnNC16UWt9JQRumnUVGDN4RF0CHxsh 2jIMzybhKhEQtrWE9yISg662ETQIS5hQmLDr4Nnmd/ZYF9vJIti5jyShb6DN L6xN6OQu7IUPtcnWNhMOJoxNwO/AEzAIy5OtQtFY27W97ZqeNjU3qgtSG1ia 2SRx9Gonhzse3HKu3Cdzung2gZDt8PN9CzO97m6FoTartvwi2AQiKTxTmhWb eW5vatLHack74AZhsp26SX3tddYmN8fawSafLvs/Xxv5amPs6ydTLz6dgTz/ ZPrlZ7Pffj4HH19+Pgc3330x/+rLm6+e3vr+2e0fvr774zf3fnp+/+cXC29e LnFkWP71u/V/vNr45+uH//rh8b9/+ATQ8fWjuacbMyAU3FeC1RPaBQ+vYBc8 zybhyigkXL8JYoR2mkRtEr2iV/R65yW7dkSScbAqdV/lpd1Vl3ZJL++uSdtb m7ZTQWCyQ5O2oy59hz59R/0VMqeL9puYcg7NtxY89iioTdYGxBsuCdcIL16x l605ytcHKjacIrhZ7it60JPnqk3wqk8P61ImjBdvtl2935MDNlnpuobrF6fr kodqTvplJ0YVMcOcTYakR4akh4dAJYEcozxhgzYZkZ6AjFafHK+JGVcmB6JK HgtmXJsypj0zqj3DTg+mPIH7d9ikOj40RCiS2AFxTH/lSbvoRF/FcVv5sV5u TTwe6+I64g+2FhyAtOTv58Wcf6Qx71B73l5byX6A2O26uJXGlNv1SbN1iX7t Obcuzd2Y77FI/HaVz7HFJjihCycGY/UESYJFE+yIpxtP4LvQWglrk9C5W7hL UTChJBGwSW8kjISc6QoZ8MUdzUKe4HJGrOAwHtmSwX54gDQ7rQZHT73douMW FmjsFjVtOeFsonT0qhxWiCKYWodVLmgTn+4s1k3G6xIn6+Kn6mLBJmO6RLDG jOncfNNFCNhk2ngWiTGmSwraJGU7NqGlEzqnC+smYBOXsZLrN2F74ckMYUeX yhGikoEuTYAn3MyuvjYFpKeltrtZbmmqgcfdRrBJbUFg92JtnpqJqjZPoyzQ ctEo8iFa9mROzZYI7jcRhEk4m4BKMNQm4lKyu4TOB8aTXeyZLraGgiWV6vLr 2poisAmFCV1xEu5M1zZtghFcgwJ/TWjdxGnV45mulU2bOKlN1pbca5xK1hbd aJOHi561+8658XaPVWVtFfe2VPU2V3abKzpMwkUTDD3rBQGVtAXTCk7Ri+Cm kbNJI9qESxNjk9AGdkGG0NcpBOqD2xKpUNgSiaBT6Gku+Aqhn+IZLZwM/E6b 0J+RPdlFMcIzjnCziVHcbgrABM90oU02PbIlW2zCK51stQmzupE72QXpaKzm DndVw3+mJoc77990Lt7x4F54XuiKk8FelVGRjQOEcU5XeU48kAT3wsMNwoQu NwnYJDee9pvQXnhdTSbaBPtNgjbxfbE2/OzR+ItPp7/9fBY+wv3Lz2bgnpdX X82/ejr/mvDkzo/f3EWeoBR+fbX2j+/X//XDw38Tm5DRwaCSrx/OvfriHjAE PAIGYVtOsAWeZ5NIMAljE7z5sx98olf0il5/6Ut69ZD4yoHKy3vBJuLLu6tT 98jT923fJlzFRIzt8KASsMkjT/Wag6jkkbsKAjcr9pJFa4FTHg82Ga0/N92Y eqsjE2wCWevOWrVcf9CaPq07DTDxVR8blp/0Sw5zMDnCLYgnMBmWHhoObxNQ yZjsFKgEPhKeCNlkTHNmVH2atr2jQeg9rZvwjnVtbjmRkloJksQjS4AM1iRS mziqTlGegE1wTXxX6dGO4sPUJqFpLDjamH+Y2uRWXdyy+QxrE5c5z9NFbOJ1 mML1m9C1JlhAAZ7wbAJPaPQxjBUKncRFYRJaN3mnTTb74sMf3/rdNmkMDdcL Tx41XTYDbu62W8jJLrQJUzcRtsmQRTTEzRAebM5le+FDbTKuS0Kb4HZ4uAGD jGgT0CZM6UTgNBe1CdxQm8D3BZvgmS6v6fKgMctjpDZRM/0mv9Em8GT7Tpto ttgk8JAJoWe6Iszp2mazCWsThAnapLo8sPkdx3BhR3w4m+AgL1o3QZvgnC5q E0joMa0IZ7pCw7NJcPci7YXX0174lQcCNllddK0uuhEmZMjw0uCjpUHWJj3N lT1NYW1CgyrBPpQOoEpDFcuTFl0FaxNQCYadfEWVITjal32RNQv7vXilEDa8 CV34Tl6RBd8Qzibhfqn64Dp4tgBESUIXxAvaJLQRPpxNwBfIE4RJ6LGuCDaB 7wg26WiUwlfC1EjXg1susMnqHT5MqE2Wb/YN2evMqlysmEiLUqrykytyE66d 35ea9DEOEEaYsEWT4munykNsopak6+XXWvSFfe1S2gsPNvl8dQgw8s2Tyeef TEHg5uvHEyAU4Ml3X8y9+nIeAjCBT8Em3z+9iTb56fm9n1884Nnkn6830Cb/ 9+0X/+enT9EgoT3vdDZX6LGuCDZ5S2o0S7++IkJ583Ix+POuQP7sB5/oFb2i 11/6kmQcRJuILhKbyNL21l7Z/1424VQS2L0INnk8KNtwVj72iD/xSiHAkzVH 2Yq92FWb4NMEbHK74xrWTTZ6c9Z7shfarqBNBiVHh2pO+MSHgCdEKJJDAZhE tAkEbQIJZ5MRVfKwKgATChC6zQQrJjiqK4xNYtEmqBKIV54UWjqB9IqITbrL j6NNsHQimKbCY00FR9AmoLCb2tgl0+nb+sSZLTYR+/qU3uDTF/vvvbyVi/R8 F9sOj8e66HfcYpN+Iz3TxdqEndAV2gsfoWjywWxi9g7wQ0eQwW/HaSU26e/m uk62ZxNfZ7mvvcTbWuBpzHEZMyPZRL9pEyyagDXAF5QnaBPBbSasTdh+E7SJ 13jGa7wENnEbS6hN+ttU/R0K2gu/fZv0ttYiTwI24c50CdpEzZEEA69ouAdL 4g6ux2RLIg4QRpugPrZjk0C/iSiruvy6pDSzsugKndb1Tptg3QQeF9EmtN9k oMeINtnmmS5Bm7Depy8CSbC8CF9a8MUZwSYrC86VBVegaLI8+Gh58PGyl9hk rM3dq+TZhAKEhoUJXcjYBZ8axKASEAoEbNJcV86WS0JtwqtHhDaM8D4VXFPC +46hzGEJw+tVod8xQt0ktDWG6on3HrrcBEnyXjYJTUcjsQkEbIIHusK3nAjY pKtZDjxpN0uoTRZuu8EmdHQwDdgEYLJ6u3/M2dCszcdOE0hlXhLYBEiCNsm+ dBBUAsGiCcKk5HoMndMlyk/CM13UJvaO6kGbesxtuD3RuXrHATYBjGChBEgC PIGPoBLI91/dxABPiFOezn//jNiEK5rc4850LQaZsBrkycN/vX783z9+8v+9 +Rw+4qguLJ3wSMJmOye73r4MFErgI/6klCd/9oNP9Ipe0esvfX0Imzx0VT0Z lH7qq4Y8GZRsOMtX+0u86tM+zZkR/dkp8+Vb7aRusmwveGS78dCau9ieMROw yRG/7DjYBOPnbII84Rre+QGV4A0gBVQCAaSMKZICUSaNBsPZZLNiwtu0uA2b bBZNECYQuEee0NIJxCo62RM81hXZJi3Fx1sKj3YW7Aeb+MWH5tUxC4akW2AT LSDurKsu1Wm64e4kNhkMHspiIwgT3ooTfELjqQQfungt8DjwKhQmOKeXdr6H hhZNPpRNQlZAQuj0Y08/t36xt66/hxvVRVpOaCM83CgEbeLtKBtsKx5syXeZ s9n9JhFsQmECyhjWxENAGbR0wgstlOANWzTBOV08mzgNImejkmeTvh7xb7aJ XlEIgiCPjvIbKiZK+IhCgY/cK2quxYCzSbZKsjW/zya8igkpmlRkyCq2axNs NoFX4M0aWWFLQzU2wmMvPF1xAqG9Iaw4wp3pCv17RL8LW14EkoB5uW4m8gWJ Z7qW7w8AT1YeDHDpDySMTWY5m/S2VFGbdArZRJAnFvgIL3IwQaS06CqAJxgK E3CKYCVC0CYsW9ijWaGN8II2eWdnCv25kCSCe0x4rSj0l41NJfR74beyuxcF z3ThfhO234TtNHmnTdgEG+GV1nZtOJu0mcTwn5rpUQue6Vq5vbkOfnMv/M0+ yMpN++hAPdgET3NBRDcSy3Pisy4eAJhcObMLKyahNqngKiYQahPsN2mtLwKb ePs04x7jncmutbsDny77nj4cA5i8fnoLGIIqgfsfnt2mNgl8+uwmJHigK2AT +MhVT1aCPNn4J9dU8l8/PIEAOn58tohjhKlKfvp6CQKvQ/CeCiXCfhPshaeV GlYof/aDT/SKXtHrL31VZx7+PWe68EAX2GTDJcUDXeFsAjCB0DNdpBHeUfSo L2+rTY5usQnJAQgRShibgErQJthvEtEm/LrJ9s900aNcbN0EP+Wd7LJWnuwV nWRbTsKlteREa9ExapM59akHDYm3dAnTW2xSBTbx2A28IcCQcDahfSh4oIue 6WJ5AoEHe4qO32wTtmgCsvgwNhGIz2mEj4MO+DXouDFfpFwCMLFxNgny5B02 8TTnuUxZjvorDu1Fh/qsoE0m9MlThhSwCZ7mAmUALobUcRDeya5QmFCbsEUT QA2ZIWwgM4QHjZc8hutuQ8AmA00qsIm9Q9HXJcNe+N9gE3iybdJVvMMm9NOa XHVNLu0r2U7dZPtnungVE4AJaxPsOkGMvNMm2poisAk8LoazSShPwnW4h7MJ +3dkq03I12SgF/6egE0Ez3St3hugNuluEnU3iiymckGb0H4TtuWkC5BilEAA JvR8FzaeIFIQJmZ1iUEt3MQReqaLtQmtegTO8m2tfQie6eJ1miBP6Bkw/FlQ GbiOhEIjtPmF2oTtNKHjgnlllz/QJrwzXaEwiWiT6nazxGWrnxrpujc/gDZZ uWXnZXHWCjZZnLN6repG9Q20iaTwTEVuQll2XPalgwCTjJTdCBOBM12MTaQl Z9EmDYqstobi/k6Zz66dGDSBTdbvOT9b8YNNXn42gwbBE1zUJvAptcnrr2+9 fnaLNptg0SRYOiE2IXWT70nd5N8/PPnvHz8Bm/zycg0AAtzAPYy0bkJtwuNJ hL3w1Cbw06FNaOHmz37wiV7RK3r9pa/f2QsPKkGegE1AJRDgCdjksUfyiVdK bbJiL8a6yVjD+bmWK3e6roNNSN2Es8lSx9UZ/RmwiVdKznThgS7OJgcBJr6q /ZBQmFCe0Eb4CDYZVZ8eCek32X4vPHoEQm1CP2VLJxBr5alernRClzCGt8nJ LTZRnbxfn0BsotliE69N4eFm/9KnL3zQoh0lLFKmhi08mwy7W3j/Mhx4AAv2 kgSYYCVG+G02waLJB7NJg3egPjSDDr2nH96pAX2AQfostaxNOJ6Et0lnwCZO 0/V+fXq/5ny/KsVXl/JOm2DRBG3Clk54rSWCNsGiCbXJoOH0oOEi2MRlKKY2 sbcq7e21v8kmJMCTgE2UhfjMGWoTJQMTiErGqWTb/Sbb74XfMjo4aJMaURbw RFp2DXmCi+DD2QRfEZdc1cgKWw0yXPnNrobHY12hu3si1E0ihMU7zrKG2C1a +LL0OU3To51LQjYR7IVHm7h6FO+0CU4PxvFcFCngEYAJCqUj+CkihZ7vApgY lUUGoaKJYC88zyYUJtQmdNYWu7gkXC88bULhzQ3GmVrYJ4K99iyX2DZ82onP SoTaBGlDF8qH64XHdhLekC5Bm4T2wodMDw5rk86mGq7sInX3NUwOd96dcyzd HRS0ycJML5khPNPj7JIbFdm4dRFSnhNfmhULNrl6dg8kL/0owCS0F57apLIg GWcIU5s4umrQJnenLGCTL9dHsN8ESPLdF3Pw8fknU7TThA050PU12oQ0m6AL sBv911dr/3y9gb3w/8WpBPOP7zawIPLf3D1tNkGb/PB0geUJFYqgTd68XGI1 RI+TResm0St6Ra/Il+zaYUnGAXHaPkna3ur0vbK03bLUXbVpO5TpO9RpH2vT d+iuAEx2NGTsrOOiz9xdf22vOffgTHPuI7ccbBKsm1Q/HqzBPPSIH3uln/iq P/XDi+L1gfLlvmK/9qxfkzJef3G+5eqdjqz7ltzF3vwNW+7Dvrzlrsy5hrPD 8lO+6mMkwX4TsImvcr+/cv9Q1YEh8ZGhqkD8mMojo6ASyYlhMXw8OVZ9CgI3 o7WJPJuMqZLBJmwvPK2b4Ngu+go95UX3m6BNPDUx3KKTuGDiB7nAjVtGBgs7 JTEDYmITW+Upq+gk6YgvP24pPdpVcoSXzuLDmNbSE62lxzuLDlhL9/klB+fV J+83xM/XxU2pY33q027tRZcpx9NZ6bfVum0NwJNBu9Hbb/YPNA45m4aczcPg DlfLiLtlFHjiaR0Dngy24QBhahOc6EW7M6hQOJtsmR6MYc9NsTYJ5QnbbIIw ITbpDexh5I0U3lRJ8A0um8FpxTQEUx+YIcx9R7pphbNJA1cr2cygox7jtsP7 NcAQa6fc1qki6VIEbaKA9Pco+3shtbx+E2872gTrJhfAJl5tir8uBW1Cdi/q yO7FKcMZbHVHngA0/KpYDJZOsOWEXbAYGrZoQmhTn+SrT/LUn/XUg00yPab8 wcZSZ5PY2Sztb63pb5fbO+V2S629u3agSzXQyYabJ9yhdnDpb1fb21QYtAmt m9QrC/FftiGsRBSkUBI4x7X5aFotHOoR9s3va5NACzwHE1o3wdIJoIPyhBVK gCf5l0punC/NuyApzaiTg02kPW0qa7va1qG1dWrtXSBZvaOnfqCnwd1nDJW7 YIc77+AWrZuEswl8JF7uJXWTmbEuQZusLjnXyCpGN2Zjkdhk/YFrbrzd1aPs bqq0NIp6mqp6GistZmmXifSSdHLp4Kok8IfVRh6zJS0NVfDsbdZVNDXAd5HB G9oBI6AS7s1w0wYw4aYKk6Un2jKzptRE6ibFDSpIUb2ySK8oxMCLBq6kYtTQ lLLDuGjhg4Y9lxVaH8ESCVUG+oXtWGFtgkUTxAWvXsPrxKdUYc9xsY0q7LEu IZtUt5Mm95rORnlXU21XM4mlGSsd3KdNtZ1NcvhWQZvwmk34NmnTcFtOyB5G XMLY1SyD/xhOj1rAJgu33cu3yAkuft1kzro4awWbDHTWoE1kJecgohuJZdlx WRcPZKTszjy3FzxCk3/lGO43gZTmxJbfiIeI8hMlxWdqRRc10nSjKrutoaiv XeKza6b8jfdne9bvO79YH3n6aOKbJ1MvuInBLz6d+frJFNx89+XNV1/ewsD9 d1/Mv/7q9g9P7/zw7N5P39z/+fnCG7LfZOmX71Z+fbWKjfBgk3/9+OjfPz75 1w+PSV4//sf3D9+SVpG1f33/iNiEmdD107Oln55uqoSN4MmuNy9X30K+hY8r wb0qgfzZDz7RK3pFr7/0VXP9sPjKvqrUPdVX9smvHpCn75Ze+kiRTmyiSf9Y e+VjXcaO+gxiE7ivy9ihz9xlyAKbHJhqzAKPcJ0mUrTJIw/ARA55OCh+7JN+ 4q+GPPRUrTnKl2xgk3M+sIn+0lzj1Ttt2fc7byz1FK7acjbseSvd1+cM54Zr Y7zVx7zSo96qg8CTIbBJ1UGAyXDl/lHxwWF4pQpz2F9J4hMdGqo8as/b1Zv9 sav4wJg0Zrw61i86xthksxd+lGuHZ2EC9GCPcrG74OnKxeBykxh3zXF3zQm3 7KSn5hSX2CBe4tyyOFd1rFMasElf5Umb6KS14kRv+XFIT9mx7tKjNJaSI5Cu 4sOQlrLjreXHO0oO9Jbu9UsPzmtPPjDEz+tip9QxfnWSp+6C25Tl7awcttV6 rA0em2Gwz+jrNw8NNA07m0dAJcGMulvHPG2BcJ0mGHZUF+/xDOd0hY7hwiYO nk14fkFu0Bex3wRtsrmjJIxN8A1kgzw3YYnEagoihTwQDlj1tGiCNhl0bJ7j ohl0NNDzXa4+nb1b1dsht3bAI4eS2qTPQoopRCg9EDnwhIs8aJMS7DcZaMgY qLs4oDk3qDnj056hNpnRx8/Wx82az+EArlnz+fmmi3ADKvEpYyBww9qEri95 B0zUccP6C37deY/uvFt3adBw1duY628tdDWXulrKHW1SR7usv0NB1pd0aTmb KJngEkZunFebqr9NbW8NBIsmjE2KAk0BHEmISmQ5kFpZTjiJ8A90cbsXQ23y XvtNWJtIy69AECZYN0Gb8HhCbSIqulSUcwYiKUuHh1h4FoUHS/L0yPUL2C1a 0qVOlo/oad3knTDZhDlzuJHXioUkwR+cm/+m5Xrhw/ebLDpWFwfWFgM8ecjV TTYW3DcnOl09qi6zCNLbLOltEveYq7u5XhIsiLRzJZJ6RWGznvR6B0oJ8KBe V2ppliNbWuorsQMFbuBTmsa6ctzJiAviG5RFEPihMOyKRhr9VnSwbSOsUHAa cGhrCcqCzgqGG96gLbajhLdaES0TrgtGcBc8woQm1CaQdrMUg70kuIWELiHF tYm42B0HbbE2ga8ithee2qS3LXBukGcT7gesgf8qzo733JsfIMe65vuwu4Qn lPtT3QuzvbRugnvhK/OSsN/kypldV8/uofsW2RRePVGaE1OWGwupyIuXFJ+u FV3QSNNM6uzW+gJra6XPrp4dbl6Y712/P/D5Gthk8vmns7hp8cVnc998MkNX LtKl8JAfvrz745f3fnz24KevF37+ZvHnF0sAhF++W/3l1dqv36//4/UG5J8/ PPwnEcrjf/7w+B+vH/36/cNfXm28BZK8XAOY/BJcvEjyfOWXb1ZojwnbikJ7 T7bw5OUGl7VAACncQTLIn/3gE72iV/T6S1/EJul7Ky/vlqbvq808KL+yR3Lx 7xFsUn9tN9ik8cbB6aZstEmwF57wBLPurnw0KH7ikz72StZdohV76aK1yKNM 9qrPoE3utucsdhes9ZWu9eVu9BObzBvPjShifZxNSLMJ8ARgUnVwqOrAMASE EoDJIX/lIWoTR8Gexov/qyHl/+nN3jEujZmUxfkqjiJMcE7XuPo0RrDf5MPY 5BTYhPIEbILh8QTSWn5ii000J8Amt+rjZ+rihrWnB3UXPeZsX1flSJ/CYyM2 8dpNaBMBknjaxgfbIeFsQh/V6D8Rv69N2InBENYsbDs8W/v4Y23C8iSyTYI8 +QNsMtd4HucDo03gBnABMKFnumjLyXaKJoHDYEI2cbeUuVsrBtqrHe01pB2e 7FXUcLUSvk0GOjQQjidEJX0tKkhvywe0CcuTD2cTtm5SeuNSZfHlwuzTBVnJ 4tI0eHxtM0nw2RKFAo+UtCWEhQm7n1RwcUmoTXA0BCVJf3cdN/NNi/BBcQ+5 G+cne5bvO7dvk/mJDsYmYrBJb6Osxyyz0DFc3GkuoAQoAx6/A5tB4Dm8vqLd JIU/RCAGfBN2oLA2QZigTQAd1Cb62gKITp4P9/AiL7wlJlsKZ1tXw/NaS1iw wA1yA76VziUOZxN2H/1vsAnLE9YmlCdIEpYncEO/SKhQECl4Q22CX0K8uglZ y8jUTZj9JqibzboJKZ3M2XBcMMsTuEGbDHTWGGqzsG6CvfAVuQnUJjinC4sm 9EBX8bVTZblx5TdIRPkJ1aUpyqpL2up0tImtrUrQJuAR4AnPJqiS75/egfz4 1f2fnz7YtMnzJeAJtQnyBG0CKsGgTX75jqjkzYvVN8wYrl9frv3z5fqvzGBh OshLuCk+apPoFb2i12+65FlHqtL2VFzcCTZRXDsENhFf+Fs4m+iu7sS6SVPe IWqT0Kw6K5AnpGjirFjqK3nQU+CqTfSpUybqL6NNlnoK1+1lAJOH/fmrPVm3 zBdGlXF+2XHshfdWHoD4qw6gTYZE+4a22gRgAnGX7O+8+h9t6f/hKNg7Kjk1 Xh0LH8e4ugnYBOsmaJNhZdKQkt/5/iFsYhfiCUUKKxSwSUvpMbCJtWwf2GSO s8nthoRZXTy1ibdTROomtobBPiPaBIsmABPECC+CNqFPa9Qm5CHNYdq+TXg8 oZtQAk30VmGYbOmX/x02oRJ5p02sf7RN2LrJXOMFWjdBmNBhwrw2E1pDoXln 3WSwrcLTLiI26eBs0qEKZxNnp5ZnE1uz8gPZBCTyP2kTWjQBm1QUkroJ2gSe YKlNcK83PFVyE7TIpF9exQS/1Gl4BZRQmyBwQCXBSdRaCPz4+IPDK2iTm1O9 72WTufF2Z7cSbdLTVMXZpKancdMmrfWVzXoRqAE+wnM4/G8I/1tpavOMurLm +kqsiQBAsA+lhXszr2iCNsHSCRgHYVJXkwf3qBU29cFmeWoT/GN958J32lqC N+9rEwTIe9mEPdPF2oRXOmFtgmEBKxj44sGwNqFFky02aVXj2bDOJjnap7Op 2mM3TI103ZnthyzM2hZnrYQnTAEFPgWbPJjpcXTIWJtU5SdX5iUBSTJSdl87 vw87Tdhmk8Ccrrx4CMCkqjBJVnZWJb5cJ7ti1uS0NRRyNtHMjjQv3rSCTT5b Hf7q4QR4BGECSPn6yTTcYBkFeYI2+enpgzfPFgIwITZZ/Ol5oAuelk7QJkAS DIEJY5OfGXT88nz1V8hWm/B4ErVJ9Ipe0ev3XzXXDwdtshdtUnX+P8PZBGCC dROwyUxzTqBKImSTNZcIYLLhrlwdKF+0Fd/vzncrkoe05ycbUvFMF62brPfd WOm+ftN0Ybg2ZlB6FPtNBjmb+Co3beKvPBjMIYSJt+KgX3TEW37IW35kqPL4 iPjkmDRmpjZxVJ4wIk8YhRtF4ogiEVtO/LUJ/qBHILgX/kPYpF8ca6+KYXmC wSNebCWlreIk2KS9eH/AJurjYJM7QZvgma7Bjgp/b80gd6ALbOJ3NFKbTPo6 J7wdEEISrnRCKikfzCY8nmzuN7Hqsd/EbtGwR7nY5pTfYxNPfwNIhMUIN6FL wCa97fDUqrB21iJPbF1wIyc8+R02meHmBgM6po1ngSdwjwe6BG1Ce97RIHjo KzThbVLp7JANdMgdncoIdZPfaRN16DwulIiEP0NYKcnGqVyh04P/WJuEFk3I kK78C3imq6okFZ5pW41ieOyEp0esmCAi4CPaRLBuIrjfRLBuElo0gUdWtA/8 dPCF7XOa3vdM1+xY24BFATDpNFV0N1b1NFbRugnOB0abgCPgf3z4PeZkxF29 dDwnM76k4HydPA/EgWe6MAgTtmKCMKF1E7QJwARtEpqGYIsHWzoRhEm4tne2 2YSnDNYmvIoJb3bxO20iuBsltHQC4akEwzu+RUM/DZzd2toOjzBBmwQa4VtU CJOOxhpBmzyYsS7M9AJPUChL8yRwf2/Scn+6294mbZBfx0Z44Imk8IzoRuL1 C/vpmS7gCVZP8q8cK8o8WZoVW5YdJ8pLAJiwNtHVZDRqc9Em/v6ATTYeOL9Y H332eArrJlg6gXs84sXyBPLzM2IThMmb50tYNwEgvN1aOoH8+v0GquTtd+sQ tAl7pouc4Pp66c2zpbdBgPAOd23TJpg/+8EnekWv6PWXvmTXDoFNRJd2SdL2 yq8eqEnfHaFuAjBpuL4HbTLbkksPcUEeumWPPDUYUjdxiR4NitEmS7biBz0F HiXY5BzWTe515C73FoFNVm05q9bspa7MeeP5Ifkpd9XhQckRb9VBb8AmXCM8 RLRvKGgTn+ggwgRtMlxFVAI2Ga46MSGLm65NHOFsQlJLbII88cnjfVyrO4UJ bYH/w20SjidsEwrapLnkKNjEVr4fbDKrPr5gTLhrTJqvTxipOzOou+gyXve0 l/t6ZIPBZhO0CRgEMuXvojaBTwEs8E2CNqGLTuA5bfPg/fuc6eK9jdqB7YVH m9BzXH+gTTz99TyehLNJL2eTIE/+SJtgOzzceBWnsNmEd6YL34Y2QZjQo1/0 nfjmESGbeNrKPW0iYpNOYpN+eAK31An2m/zOM13vZRNAB48nH84mbNGkJPdi ad45tEll8WVqE3iMRJJg8FgX7Rnh9ZsIrlyMbBOqHizN4I2tUzXoMISb0xXO JjOjrdQmFnMl2IT0m5iCzSZBmwAxJCVpAJP080dSzx5Kv3gsI/WEqPCSpjqX tMlzFRO4YW0SChO0iU6eH6FuYmDgwOuL59mEt9CEfRG+I10Hj8s9I9gkdJX8 Nm0SesQrtHQCoR5hQ3tPWJ7Qokmg4Z0bzMXrgg/4pVXNwURtaVaiTTieVHc1 8890oU0oTzDwKdqkr1VSX3MNbVJTel5ccLo8Jx53L6Yl78i6eABgEmoTrJtA wCbVpSm0btJuKEKbzI22oE2+3BjDQ1wIEOQJOoWFCVc3uY82AZiQvMCGdGKT t1u7TmjRBG3y9tu1Ny9Wf/1ugyTIkzffLL/9evnt1m2M79tvErVJ9Ipe0eud V3XmwSqu3wRsUpOxX5a2K5xNNOkfUZs05x+ea73BU8kTby0m3Jkur/rMmO7i rDljwZK/bi/jcmO9L3el+/otM1c3kRzxVR/ziPZ7uX4TsIm3Yq9ftG+YCAVh coC1yVDl0THpSVAJlk7AJpM18aRiggkWTcZUyWATr3zTJux4rg9kE8qTUJsg TwRtct98+mZD0pj+rFd/yW3K8rRXoE3YZhPsNOHBBL4J5CJoE7blZLPr5P1t wpZO6KcsTwSLJn+gTShJ3mkTjid/jE1w1TuuX4QbtEloLzy+DUsngBG2ZZ4u Q0HCjNRfFLBJazn2mzg75UASh0U70K37EL3wv80mlCcf2iZYNAGblOWfB5gU Zp8WFV2CR1l47OxqrqH/6I39IGgKwAXtaudtYOTN4BJc9INnunh1E4RJsIBC ZgiHm9MVwSaOrtqATUwisInFJLUYpZvTgLl+E0hFwcXMyyeupZ7MSo+5fiUG bJKVFiMuTgV6wHvgTxMkQm2CMKE2oS3weKALI9hvwlvLjnwQHBHM29VI34CO wDnS8Iq86hp8gYWzCW/p/G+zSejALtYmwFWy5SSoEraAAjcsT7D3hJ2lwDvQ tUmYFlVgFjFjE/yheL3wYJMH0z3IEyoUeAVtYmsRo00khWdqyy9iy0lu6uH0 0zsvJfz92vl9AJOcy4eoTUquxxCbkCFdpN+ksiCR9pugTfraxWiTpVs2Wjd5 8dkcNphg3QQw8vrZXQiQBG8gYJOfn5JmE4DJ2xfLb1+SI1UBIPBLJ6TZBG3y 5tu1n/E0F/HF5tmtX7he+LfRXvjoFb2i1we+SCN86p4qsEnqbln6npq0nbLL H6vSP1YDTNI/0l35qD7j44aMjwwZH+kzd9EzXS0FR+Zb81Yd4nWnlJZLQCWf +pWf+BQb7qq1AdGGq/KRR/zQXbXSV7rQXeCsSfCrz47VXZwzX13qLnxoL3/i qHzoKHjsLHrYd+NeS+q4OgFnCJMDXQGbgET2DVXuH6k6wLWZkKNctBceMiw+ Nio9MSw+7q88OiIGm8RM1MSMymPHauPGauPHFAljqsRxVdK4KnmoNt4PAZso EoeUScOqJG5N/Gm/ItmnSIJ4gU4k4BTykUUKZxNUSQynEgITBjLAk1hXdYxT empAcsohAZvEQOyBmV0nINaK4yE51lkZ2152vKvkQB/YRHJgVnXsQUPcA1Py zfrEEe1pj/a8y3BtsL1i2CrHfhO2bkKb3+EeXgGYwLeCX1AiOEOYrobHj+w/ I3PPaThGGJ7T4AkNuNHgstV7HUCSYPqNGPKGIF5Ym7Dd8egOThbwaT38UC7u x4QfGT6lo4ODm1DqBnobnL0GkuAYYW6qMPcdue/rJj+pgfsV1mMEbQI3vF54 xibygE1Iy4k8mJr+3hq/ReTtKHU35w+Ysh0NV536VJfukkeb4tWeGdEmjtUl TuiAJ/HAk8mgO6aNZyFAj9AZwsH9JmCTM+P606O6ZPhBhjQJQ+p4nyrOr46H m2FNwogW2JI0pkse1l/w1YWtmwRsEqibKAe6FBhHJ0Tp6FA5OpT97RAVhM4Q 7oGnr2a5pbmmA2yiJ/tN8KyORp6n5pa/q2S5SuAJlj+koSESIavhuZWLam65 CWUI5Qm7eDGySugYYbrlJMiTawATtAkGhCIwQJjMEL6A/SaVxZfRJvCIyDYL 0Dld1CZssMOdllSoWVib4HvwB+H1m+AcMJzT5eitw73wK/edqwuu1QX4OLC6 4AjuhSc8AZsgT8Amj5YGyV740db+TjnYpMNYbjETm3SZA2vfuxpl8BHcYa4r A0WW5KaATQAmORlx5GRX6onMS8eLs88AD0EfKBHSk6IugbA2gU/rawsgDYpC GvjUqCo2hcTA7GenZ65CVzTSAb90NQnaRC3LxT0mWDGB+xZDFfyJgBFY8oRO 6IqwZZ43UpjShm1d2Y5NgmeuZHQkF9v8zjabsDZhty7S2oqlWdG1GVBJDS43 6Wyq7mkDmxhnx7vv3xxYuO1amLeRicGY+UAW5nrvz3TfnujoNJbqZBk1Zeel xWdoOzwwJCNld2rSxzyb0H4T2gtPbULrJmCTIYd2fqwVbPJwwfXlxtjTR5Pf fDKDR7kgcA9IwR4TOqQLQrrgyS6SxZ+/WXrzfPnNi5U333JDfb9be/tq/e33 67+83vjl9UPIrz88gsDN2+833rwiPHnzcpUI5cXKz7RK8jV3rOsbAZsIr4bH nytYK6EDhKMzhKNX9IpekS/RpV2Vl8lGeLBJddouedrO2rSdWDGpu/J3/ZW/ GzL+brz6NwiQBHvhjdn7WguPzrflLdsrqU0eumVoE/j4yCNZ6S9f7S9/5BY/ 9khW+0ofdOW7ZInDmvMTusvz5swlS+FDW/lnA+JHA4WfukueOAoftKVPaBIJ TCRHBrkzXdycLiAJgQlnk8OhGao6Miz+/9m776420mxR+Pfcc8/MtGP3tLNN ztgmOwO2wYByzglEzlkIZYmMEw5kbHDCOdsdpsNMz/3j/VzvrtrSw0MpGHdP T89dS7X20iokgdtQ7VU/djoIMSY9PC47MiFPgBhTQCSOK5PGVcnjmpQJTdqE Jn1MkzaqSQsATDZFjl+d41NlYnhVjFD8GtRKGieHgkFWnxCbQABenLJECIc0 wS4BmCRC2EQJg0KAyWEIkEh49AhTuvgJvdX7bDVf+8V7rmkOzZmT562Z143M 4hWnNtdpOeVp4432b/TC0/0m2GCCGROECbzH72hCm0z4OsAmSBI6XUJ+Y0z2 O5CyFhx5FB7Rdi+GL08kG+vwrg9vDkmjMfm9NFbj4D0hvp/+FPpWk/3TzRA0 TzhIcQwY0SbMkC52vwmnpmuwB0IRCvlgj8zfI/R01DiaLtitYJNTTkuJu7bY bTzqMeSMgCAMGez6xbRpUzDZATaBwKXwBCacSq1xczbGmClr1JgJXwfCr0vD COjTMZjnTWCToy4ItElTWaCtEhDq6RChTZiaLpwh3K0Z7lbbu1QQcKM71KFi xgt3qG3tEJrQ4kV41MBtFd6YwX1UI2sT/F03vQGcXuweLbbS9s5RCehjizZh eFJziqiERPgGRgh+Rf6lshzgCfbCw/0naYTHe0ss7oILib5ySBKEXGPwJFxF +H8BsUn4eC76+kSb4PXJIiVkk3kAiItjk2WwyYIdnqRtwuxeHGuzdSg66/nt dTU9DUKIDva3+vgrfQi4x4a/F3xnwF8beZOixJP5h88WJp4/mSasyNdJS2s1 lcCQFosQMYKBZmk08urAI6qL8Ihh1VRChMOE2ISutoq4opFefYg973gJwYUB 57jBBMWBHACh4HpEss2E5gk9Zzg8h0KDiHYNbROy9yS834TYhBRx4dr3TXmQ SDAJ7zSh5nqpQ7vgVQQ77Q3wU5P0tMnhXxu4DOZvgE0cizcGF2f6OQFwWLje B4JoNp03yIrVwjxpVbakIhtswi9LA4aczP2yOGsnaYcHm9C98DhAmNgEa7qa jOUd1ku2DgnYZKOm697EywfTrx5eRp7QXfCc+I5phF/6HvgAiIB4s/K3tytM ydbHtR+/WfsJJMLGj/AIMGGD+RBe+rgaTKC8u4Md8cGvEFplwinrirIXfumn 94vh8eO7hT/6xid+xI/48R99oE0khV9KgzbZhTbRF29jbfKX2pK/1J3g2qSt 8tBM24WVIREp6MKTBx4ley4Gm6zYau45RWsO4VLfpdvtZWCTgO7ohDF/pvH0 lm3CzBBGmwS3LoamB2MQnmyyCcsTtMmYOpnJnqjTJnQZ47qMUXbLyYgmgxnb FbKJX53162xCL2dEmPzhNgGMAEkAJhAgFFy8SGyCGRO8MYu41uE/0CbOQRPy hAgFkULbZLBb09uuIL3wxCYMTCLZxNct8HRUg02G6s4OWU46LMVgE4/pmNeY C3ZgUieGtAlD6qQhZcyY9lk2AZgQm4BEfqNNHD1aR0+QJ2ATWzuEKppN8NfF cJ8G929YrvPrbEJ4EtsmNEB+D5sILxVUnz9aVZ4r5ZXAnSr8vUizAMcm5BLi KIO2Cbai0DaJ2GlC22QjbxKyyXIob4I1XctzNia4NvFEs0mbVUw3ccPNNnyT AV+lJ1JKjh+EAKEUHzsAJ6cLjpwpSKg8m6UUnDIpL+AsLzI0GLMn2IRi1V4C m0BYlBfgMRpMIKyRpvtGzJtgWweIgPTOk5Z5eDN+ETKFGN4PfxF4MyEGp+WE XrzIKe7iZEw4yZdoNuFMEqZtAv8X0EveOY3wnE6T8IIudtgC/K+kYacHb2C/ s0kGNululcG/NtenesEmEIszAxFtMn+tFwSBNlEJjkezCcIEkyZY08W0nESy CXyprobqoU4p2gTsc3fW/uTu6PN7k8ATsAnAJHyzCSZQvn15G2zCLHN/ufg9 K5TvXy99/2YZxLF1mzBvfkcFZ7tixPFccZvEj/gRP37bATARoU2KdsuLd6uK d6mLd2kLv9AW/kVf9GdT8Z8tTPyptuRPEW2CyxbRJmRsF9pkebD6rp0Psdhb ebP1HNjEr8mdNBWATRa7Lt7rr3k0JIxoE6YXntpvMirey+5eZPIjyJONXviQ TUYlhwhPxpWJE6qkSXXKpCZ1Qps6qU2f1GZMGbKmDNnj+uwx3HWCPNHkQIBN Qjxhirs+yyaEJ7HzJhHjd7UJLohHm+B2eLKBkV6KTSdNYtgkPP7NeZPw7Em4 TXrblH3tKqa4i7UJzhCOaBNvt8DdXmVvKLfVnrGZTwybi5zmQtYmR9EmY/rU cX3yhD55zPDZNiFJk99uE2evjmOTwTZlNJvgHge0CdbeRLTJ1mMrNkF9/K55 E9y9GCNvghcShxj4akSbcFIn4Z+42Sb6oV6D39mweU6XHWGyNDu4HKrpCvab LHseLHsj2oRZ/k4Nv4WfEXxbzhQlnsg7VJi7DwJUAo8FOXuLcvaVHD0ANtGI z1rUFWATutNk0/RgNm+CgXmTaDap03FXInISKORJrJ4iTMAcHFwMZMsJGUQM FxjAAd8c3B0ZsgadNAkfShytoCu2TcJTJ5g9gWsDrny62z2iTcJTJ+E1XX3t wX2LbOpEgT+prmZAiozkTeZm7LPXhxY+ZRO9tEjJP8bYpDIb53ShTUqyd505 /jWxycUTh2PbpMV8IWiTYSPmTXCG8LO1CZonnAldpOXkuxfz371Y+PbFwnes UL57tfTd66VfbZOf36/+PRScMcIR4+f3yz9/WOJE3CbxI37Ej08ejE0KvwSb yIq+JDbRFW3TFX1hKP6LqfgvYJO6E0wASbDfpL70a8Ym7Rfu2MUEJhB3hyXw DIBl1SHk2ORGy1mXIsOrysa8yULnhbUYNmF3L/rF+wIMSRiYbN0mTFA2mdSl TeoypnSZtE0onuQGmMgO8oTtPdm6TUgHPZ1AGf5DbULXdMEjp6Yr/PaM/u0x RHjdPhNh/SZkSNe/wSacfhNUCfkQTob7DcQmDE9CNiF5k4Fu5UC3PBSygW6p p5Pnar00VF82YDk9YCy2GwsdpgKPMZg3YXpDdCnjuuRxXdJn2ITNmNBJk3+r TVqCRSm/ziZk/TdJrHyyl4Smx9ZtIqk+Ka7iRkSb8C7mYS+8qKoQ+01whnA0 m4TnPuhBXmSEV3jqJDxjgo3S+AXZRSqMTa5OdINN7iw40SZ03oT0wq8tu+9H t0lHgxTLkOBnBI/wDa+5cOxscRJ4JD97DzOki02awPmxtC+BJ8KKfNJpgotO IDCBQuq7MF1CVAKPcB7RJrXaCC3qEQu6kBgY5EO4GODNoAOy3ATfj17ARxAE yYZwkiYxpoGF4yjcJuGpE7rrhLYJp5qLrF/kpE44c7rIZ/W16yCAJ2gTkjcB nsA/LPAPzpXxrtvXbGCTaHmTuas9V0eb0SYK3lGwibgiC1fDg0ROHf3qRM5u sAnWdOH6xY3di6URbNJoKMOarpFh48xE2/LNwfuLruehmi5S1kV2xJPsSTB1 8pttgjVdZAkjBG2T2Dz5+UPcJvEjfsSPX3OgTaRFX8mK0Sa7wSZMv0kx029i ObHRb0LbpP3S4RvtF9EmCJM1pwxhAnF3WIA1XQCT1WHBcn/VzdZzbmUmBNpk vuP8vYGYNhHvY22yj9gkYk1XeFkXE0yzCfAkeUKdMqFNndCmT2jSJ/WZE/pM ApPNNgmmTvyfbxPyNsKTYekfaRO4+8LUCcAEN5vAnVg4NyImTeBO7P9Rm4BE WJuoetm8CfKkv1OJ7fDhNnF38JwtlTZr6YD5FNhkyFAwbMx3G3I9hhyGD/q0 X5M3oWDCSZr8G2q68L4dbq7gVgrbk+l7wk/ahH4PwiS2Smh3/E42ofMmcL8a I28SsVuE5D7QJvT8Lk7qhPOJCBPc7cixCfabAEPYlhM7PacLkyasTbxRbdLI 2KSlTgSPcJsN3+Tq80cBX6cKjhQd3Q+BZV1ok+Lc/ZKqIlwKDxIBj7RYhMgT HPCFmRROxuSTNuHwJLzdg4YJ3ZCO+RTskYFLBZ7EUi6yLRHfBk9GTJqERwye xLAJzZOINV3ReMJJndA2oVMnfe1wrmPLutRYJMl+ZQUE/CMD//JcHuu8dXUQ eBItbzJ7pfvKSFOL+UI0m5zM/RJsci5/L6es69M2cZhuTLav3LI9WHK/esgM 6SLpkogDhDG+Y5bC//qaLoAJ6TcJxutlopJP503iNokf8SN+/KoDYCIO2uQr RcmX6pLdWNOlK/pCX/RnYxFT01VbAvGnaDZZdUixmgs+XLYJwSZ37Hxik3tO 0Z3BmtvtZQATlyIDbTLXXn6vv+ahTbB1m0Tshac74jdSJ5y8iTYDYlybPq4N 9puQmi5ik1Dq5LfmTZyyxD82bwI3XcCTEVcLzg2GOzG4AaPJQEat0jYhv3n+ D7RJxIKucJv0tMmZGcLMGGFlKBR9HfKINnG11zhaKgbrzvWbTvYbimz6fLsh z6nLdumywBEjOsYmE4aUz+s3iZ40+Tf0whObwD082ATu5T4rb0LehjbZIkx+ V5sIKvOrynOBJ5+0STgryBsi2oSTOuGM56JtAoE28TnqwSZ3FgAgbpYhgJRh jDtsIExi26SrSQY30vDTgbtruOWGb7W4uohfkXfxbObJ/MNgE4AJOqUgew/Y RFRZAAwBm2B3CS43wYWMBCmAEcKTrfTC0wVX4R3xdC88WIBGB+ZQMCWHNqHb UkjAZ3FWqNAFXQQmmKeLppJoNuGkTlB5nF54uqyL0w6/la6T3rZgTRdb1qUM fU0AjoLkTcAmEMycrkg2uX2560qgEW0ir8lFm8gu5YouZKJNIM7m7cEhXbgX HmESrRce+03sXbJRh2lmog3ndL24P0lKuegsCTkh8f1v7oX/kV10QvfCM+gI qSR2v0ncJvEjfsSPX3eI83bKCnYrinerWJhoindqirbrCr/QF35hLPyzuejP tcV/roMoYXrhwSbw2Fi+t7M6YaY92G+CSRNmHTxrEwg6b7LmEK4MVINNvOps nzpn2lJ0u7V0sevial/1g0H+/eHKdXf1A7BJ+4lJY6ZffsQrPeiXHIAYER8Y Fe8fE+8fZyMg2hdg2k8gcIwwE14+s+skIDwwIjoUEB0cER0clx6ZUCZMqhIn 1UlTmpQpbeqUNn1alzEBNtFkjGuyxpjIHtVkjaqzAlRNF/abeFXpOFKYkxCJ NqeL2IR0xA9LE+2ShCEI8RGb6DDEIPsYHl2ilG5RUh//gI33tUf418uqA7Pm 5Nm69Gum1IAu06U/6qw97W7jBfoUYBM3tX4RMIJzg+ERA54Em8B7fPZGzh4T ssEBK1vIq3RZS2ybcHagxOg3QXE42EnCZIawc4DZHT8M0YdrUJhNKMzA4aBl zOzQYAu+k3wWmSHsHDSHNtFb2I0nwfDY67zDVjgZ7jcOdGp62pibB6YjvkPe 38nApLcdThQhm5BQQLg7eK62qqH6MrAJkzcxMnkThy7rkzYBj9CLF8leeOw3 AZggSXzaVObrsHO6NqmEDZ8+x6vPdZuOeSwFXuspX3M5sYmzU+HoVOEMYSZv 0q11dGsc3ThDWMWMEe5Q464Te4fO3qFlhgkzM4Q1/S2qAbjvalV3NcrhlrVe X21SXTCpNm4O2V0n5VpFmTYMKdhKQAjDaTP5ZNLks2xC95sQmwBMiE1ICC8V oE2kvBK0CadfgPCEXkqCMMHg2IRewoipExQK8pwIJfQVgCTwjGmwy8DmTRqv TfbeWfCsLnkxRXJ30QFxZ2F4ZdFO+k3omq4ro8x+k54mEe43gehqksONNNxU Y3IBvvPwV4O/4PnT6aQLnoFJzt7jmX+FgO9AS62ou1nRbBEEhwnDIxuNhpoW E7/VLGjU1zTCh/pqTJogTBp0VeFRx6ZOmA2McK6rsuqZYJbFAwo07IYUJi6a 2WQK3f1B2wQLt/AcsyT0JnckCd1xz5nNRcMEFziS+i6Oj8LXL3JSJxDYDo82 wZqu8F3wdFkXXdnFCepTACY6NrTswC5cjKJka7oU3uHaa5Pdt68N3LraN399 Y3QwieUbtrmrvZf9TU3G8zpJkYJ3TFadK6nIBpvQeROwCaffJGiTc8wGRl5Z iuhihqLmqF5SbFGdbjZd6GqoGeqSB4ZNV8daF2b6V+cdT++Nv3g09Wr98usn V98+vfbu2cz7Fzc/vrr9zavZjy8xbn94MQvx3atFAhMm68GWZv38Ye3vH+/9 /Zv7f2d3mvzj2wehYD5kNjCySxjhbcwGxnd3Sd4Evw4p7iIw+VQvPJcnEH/0 jU/8iB/x4z/6kBz9QpG/g8mVlOzWlezSFm3TFPzFULzNWLzNUvRFbfEX1hIm 6k9sqz3zpenkTuu5vzad39dVk3i9lZkh/MinZocGK4And4cloBW0ybKtBvtN wCbL/ZdutZWCTUb0x65aT8y1ly/3VN7trbo/wLvvuLTurnkwfGm+49SUKduv SPTJDvulhwISprtkVHxwTLR/nI0RpqxrDxvBBfFssEkT0SEIdkf8oWlF8oQS eHJkUpUQ5IkmdVqbNslUdmVMaLLHNTljaojsURVjEzKny6vM8CjTPco03HIS rhKgRzSebOo3kSXYpUeGJIcxbOJD0aJTnNwjTe0HvPD3uARfTin3zVqSb1vT r5mDe+Fd9Wc9HXw/2KSfsQnyBJcwYqKEpFHAKWgT/3Cwr4RTVE86gnHdCfbI w3vwxozcnm3FJjHmdOH6EjjhrF8kb8MVjRicd9JfmfxZ8OdGfNJjt+KCSDiH L9LfoWF+sdku72mT9rbLgCQgFBYpimBZ1+bwdAEEqocbz/ebTw2aSuymwgg2 0W/YBLcrAkCAJF51Im2Tje3w5mzGHdpUjzrZq0mBr4NU4cAEwqPL8uhzPObj 3roif8MZf3O5v7XC2y4I2qRrwyauHp2zWwPh6AKSqAAmEI4uraNL5+jUs3sY tewSRu1gi3qwVQ1C6W1StLM2MasuMvv4QuX9zD2h6rxOtXFnSGdS8ElOywmn uIu0vXOSJhDkmYjBsQlZbkLbhAMTCFFVEdgEAj4X7lTBJuHNAiiUaDyhbcLp haeD8By/Av4ifaATLlF4xszaxBhwNl2b7Lsz77276GPLunCSMNsXv2CHoHYv Bud0XR5pHu5W9zaLuxuFXQATK7+TbTNBm8BNOHwn+RV5Z4uTTuYfBpUgSY6m f5mTuiszdWdW2q7q80fhxhv+1m1WMU4SZuYGsxIBazRCaOGxuslQ02zkNYVe ghNECvOe0JsZuUBQI4jJ5pRgTz27Xz64w5FqReGkMMK9QLYlkoIxer0jZ4cj fZmF2yRGQRcndYKBqRNiE0RHeDUXlmbhxpOIeNkcup4WDGw5UbJlXfD1ZfDv RsBlnZnumZ0ZuHWtd/5a/0JYgE3mr/ZNeRvqdWUaUaGCd1xec0zCbocHmwBD Itpko6brbArvbAq/LE18MUtZc9wgPVGrPttqqexq4A2CTZyW65MdSzdtawuu x/dHnz2aeL4+9eLx9Msnl189vfr66fX3L299eHX7w6u59y9n3724/e7F7Nvn s9++XKBtgm0j//h475dv7mP889sHGPghvISBG+F/YmHCtQlFktg2+fHt0g9v F358t8giZVP80Tc+8SN+xI//6EOc+xdZ3nZV0U60ia54u7bwi4g2sZzebTyx g+RNrrWULw7wcdkizZM7djFjk8HqFVsNwOSeU7QyUD3bUe5RZY3oNmwSzJuE bLLQeRpsElAm+uVHtm4TeI+Ht8d2fmd/6bahC7sCwoNXVKmfsIk6O7ZNMDh7 4WPkTTjTutAmhCcxbNIlSemVpQ2Ij9gEe93Cr6ZV++frUm9bM65b0sdMOV5z vrvhHNgk0K8Em7gonmBEtEl4nzunVgp3PYBNsFMeeUIqu2LYhF4KvxWb0Dz5 l9uELK+Hc/g6fe1wFwEwkQFMUCUIkxg2cbdX2xvKB36tTQK6FCzrwpou1iZZ HJuQ4i4OT7z6HK/hKLGJr6nc23zBGylvEsMmAJOQTTS2Vg1jkxbGJj2NcsYm uqpoNgkvrSH3ihywcDrif51NOKvhQSIcmMD5J20C96g4QziGTTgVWfScrtg2 Ic1W5CuE8iafZxN6hvDKbfvl0RZHj6anSQQ26W4QdtbxOtl+E7ijbjTz4SYc /l4V57JwNhfTY5LxFagkK3lHZtL2zJQdGSk7ThUcQZG11jE2QUpwbNIQypLA kyAUDJJGIX0oDSGP0EtSyCZH8iRukLdEqrMixVd00VddpLnEnEZ4TpsJfb1x 0iXhe+FjwCRi3iRiuoRjk4g9KRtFX6263lY97oVnN8Izo7raGyTAk8Fu1Zi3 8dbV/oWbttvX+yLaBGL2cs+Ys9aqLVUJ8gEmsuqjksrsLdqEdy6Ffy5VUJ6O NtFLSiyqM221l7ob+bZuxYir9ubl7pXZ4XuL7if3R58+DNrk1dMrr59eA5u8 fX7j3YubrEpuv31+6+1zeJz9hu2CR54QmwA6wm1Ck+Tn96sYxCaclpPw2LpN 4BmIP/rGJ37Ej/jxH32Icv4sPb5NWbiD2ERXtC2iTcyndhlKtoNNGsr2gE2u NpeBTR4HtMgTLO5adUhZnvCJTe67xHdtNXOd593KzBHdUbTJSu+lewM8sMkD Z9VjD++howpsMm3OGVElBRQJW7dJQHTAdmFHc8H/bsz7r75z23z8/WOSI5Ft oqFtwsAkZt4kneOOcJVEHNKFNuHwJFp0S1P7ZGmDkoQh4T6wyWX1AbDJrbq0 q6bUEUOW23jcaT3jbuf5euUeViUcm2CJF9Z0gU3gQ1f/JonQex9IcgQXLGLL PC6Rh3Pynig2sXrs1vDsSTSbhKdOfg+b+BwNEMQmcPPQ3SpFlWDqBAwS7DcJ t0kn39XGzBDGOV2Ra7pi2sSnSYKAD9lOEybGTJFtQsq6Nmq6DLlgE68lz1dX 5Ks/7W0sA5uwNV3CrdqkU0tgQmwy0KJCm7RZhGATk/LC1m0SbYZwxIFdn2uT jaQJr0R06QTdaYJOiWgT4aVC3G8Cn0j2m0S0Cd38ToIM6cKMIb0XnhMIE1o3 aBNbt4nYxO9oBJuszEWwScTdi4s3bVfGWsEmTNKkQQA26ait6WiQwr002gT+ RvDdKDuZijAhGRNik/TkHTmpX8H74Ya5zSomaQ6OTZrZZ9AmTYYaCDhvNQta TPwGdsLwRps8RRLCEBJgHxIcZXA2oXAqvsIjGkw4NV0QnK9Gt9Vz2kw4KiGT hNEmuM6S1kd40iRa6oQTfW36vjZDiCcqyiZSyiZDszP9C9cjwGTuSu/t6e6A 3QQ2UfLzQjbZat6EX5oqKE2Dd0oqsolNmk0Xuxp4Qz3KgNNydbxt8cYg2OTp w/Hn65MIkzfPr719PgMwCcWtEE9miU1onkCAPsJTJxFtQiOFdko8bxI/4kf8 +F0PxibHvgCbaIp3aYt3xsibfNIm2HUCNmH6TWw1d4Z495yihx7p6hB/vuuC S5FBbHK3v/qhTfBoSPjIXfPEy3/krF7sOnPZkjuiSh5RJga2bJMx6WEPb+/Q hV0QfsGBSXkSRESbTGjSxtXp4+qsMXUWwmREmbl1m9AkwfBr0iOvOGFtshWe RLFJerhNvFSuhATaBLtO/PZGtMlwr4ne+IAYwV8g01O5EB3AE1wfD/ds+FJE mwBMMDg8CbcJBx0ke/K75k2Geg29baqORunn2YSaIWwz5H+WTRAmaBNsNmFS JyGbuFVJwBM4ibgXHsKn32yTJtYmbTx3u5Duhbd16iPahO030dJJE4iBZhUE sYk1uk04uRKORMj6xRg82bpNOEkT1iYMT2ihxLYJBHwW3KnCzSfZvcixCd38 TiYtkOkKZPhDtCB5Ezr/gjaBYE8MYJOrE72RbTI/BIE2gVhbdMOtI9pkuFsN MCE2gVtcuJ3GPm74G8G35cKZjKKj+8EmeVlfY94kO2UnwxM2b5J6eCf84Jh2 b6sYe+HDbdJEPqRsgh9iQwoEPlmrrqABgiTB5JpFXbEpItmEkxMJbw/hRPgW +PCWk3DsxIAJIQkZIEx64cEmuIiEdMTTMCHr3Tl4iWiTgQ7jQIeJ4UmbvqdV gzVd8G9LZxPzT0rAZb1xuXf+pm2O2f8ewSYAk9nLPT6boV5XpuAdx5ou6ZZt wsCkLB1touLlGaSMTZqMFzrra2zdCt+wCS6q+ZmB1Xnnk/tjYJPn61NsQdeV N8+uv3k2w0bQJu9fzn54Nf/h1cI3L+a/eT7/LZU9gQBrkNotIhRS0EXzBM+5 YKHmdMWe2RXRJmyD/PIffeMTP+JH/PiPPkjeBG2iLdqmzv/zFmu6lgYFT0Z0 yBNS1oW7F++wm03uu8SsTXhgE6c8ndhkdaBm3S6CYGziE4BNlrrPXq49Oqr+ bJuMiA/5+Pu9vH0B4cEJWeJVdVosm6iyxkIwiWaTiDVdNExAJRiRV8NvtkkM nmy9psszWBfDJhDEJmSqKj0yC52C92mEJ6TWBTtQsP2EFIPFsAnhSQybMO7o N/1+NiH/SfAh2oRdjrblmq5OvrOlEm2Cc7o+1yZkWhfpiMfuEq8mhdiE7oun eeLVZXNqunwtFz1tfLTJcMeWbEIlTZhqLgYmzcq+ZmV3g6yVXRduVJyPaJPY Hom4LD7ivsUt2oROmkhqihEmdETrNxFUFtRcOIY2gXtX0lAQbhNOazxZB09m Zce2CT2tjvCkv2OTTXyfsgmcIE/QJsu3hqbZfpPuRmFnPb+rno82wbwJ3FfD /TZ8Y/kVedhpQmyCeZP0pO2ZqTvTE7bzLh6Hu/dmi5AMDebYpF4THMMFz6BN SL8JVnkRoXAKt1AoxCY0WCyaymizszhCIVvg6ZfoD+lpXeGjuuhOk4j978Qm NEzI1kW0CfIEhQIRDSZok4iVXXT0dxj725noa9OzA7vU7JeCz5WTfpP5G1Ft cnOyE3ji6tM06MtBJUGbXNpy3uRcqqAsjdjEKDtRpzmH/SYDnbKA0zIz1bl0 a2htwbW+Fnh8f/TJg/FnjybZyq7LLx8zLScsT24Sm3x8vfgxZBOI4BjhV0uI jnCebMUmP0WBydZtEs+bxI/4ET8+eTD9Jse3qYp2gk00RTs0hV+o8v4Uoxe+ vvRruhf+2Zjh6aie5sk9l/y+W7I6LIBAm9y18eY6zztkaaTfBGzy2CF+4pCs e3hPfYJ1Vw3Y5Ert0TFNyqgqaes2GZUcCogOoE08NXtHRIei9ZugTcaUmZ+0 ScReeE7GJNwmZC88scknUyeRe+HrIvTCu/ot2G9C8wQ+hEfaJs4+C8cmxBc0 SUj/O9m3CDDBdY2xbcJJnUSzSdAdv6dNiFDQJthv0hvWCx8RJmgTR0sFs9+E tcmgLu9zbYLNJqTrZCs2ITzxaCP0wtM2YQYFf8ImmlDSRP25NiFzumh6kBwK nSUJ58mvtgkmTcAmmCshMBFWltADhH+dTcgzpMcEr2oCk9g2Ce+IhwCbDHYZ N2wy3HBlvCeiTZa4NnGBTVZu26f8TWROV0ddDWOTema5Cd5Xw502/FDg+3O6 MKH42AFshM9N252dshNskprwF7AJUOVk/mF4T72hJppNSMYEe0zIkC663wRr uprNAogmEx++CAMQbHtXXsD8Gm6fR7wgKDhk4Cw9idELH9smdOqEY5NoSRO0 CWflIm5dpAOFgvogRVy0TTipk9g1Xb2twS0nrHSY/SZDvRqs6ZqP3m8yM95+ a6rL0aOq15VJq3LBJrLqo1vPm/DOMTVdgvJ0sIman2+Sn7RqS9Emtm5FsBf+ 1hBcYI9WgzZ5+nCC5cn0i/UrwJNXT669fhpMnWDe5ONzxiZ06oTYhPCEwIQG CFkEH17QFXunyVZsAs/80Tc+8SN+xI//6EN2/AtF/jZ14XZt0Q4IXeE2bUGw pstctK22ZFvdCYjt1pPbLad2Q9Sd+WtT+b4eXsrV5vKVIfGLCfPTMeN6QPfA p77nVd3zqO571Y+8snsuMcLkgVuyNiy43nzGLk31aXOnrSW328vvDFQ/GBY+ dDB5k8dsTddKb+lMQ/4E3L8pEohNRkT70SYT4gOjwBPhPowAs3Jxn0+wdwRs wuyLPwQRgEfp4XF54qTiyBTYRJkwpUqa1qRM0zZRZY6qMgNs+JWZfk02jg6G AJi4FWlUTRcmUEAfqW5FCnzoVadvBPsGtzLVpUiBcMqTnbIkBxtOKTgFPkxm hgmLE4bEzDxhuyTRLk0cosImTeyWHumVJQ2Ik2y8wy7eoSlFwqw544Yl4Zol Ycyc7DZlDdedcLUKA316QIcr1A6PMME5XThSGAJOwCbwKukxoSOaTUibCdy8 4UJ5zgIIvKnzORqwegoDrbHRb8IOB8Yg/SahEcEmIhRiE+QJ4gVfpRlCA4To g5Ov4bxq7zPinK7uVizrUgx0qSDY/SZ4ruaEp0PgbK6yW8ttljODxhND+ny7 /rhbn+NmbJI6ygwQTp00JE8ZksZNmRNmgEk2xLgpK6BL9agS/VogCdAjDR7h 3M+ejxjAJhl+XbpPm4YB5/AMCfgQw6lOd2mz2BnChV7rKW9jma/lonujpovt N+k2DPeYiE2QJ44uRiUOeLVDQ2q6ACa2Vk1/kxKCtgnedhrpNmTMm1DzuKI1 mKBBoqVOSFM8hyocsJDYxJPN+01QKJtIws4ThhBeKuBdPA42AdHAjSvcWOIt JTCE3mNCB/bFY4MJ7ZHw0cH0rhNytZNpdRBAEoj+Dh1oyNatD7gar0/13Vlw 4wxhdv3iMDNAeN6+Mme7Mzd0d354dcEBMLm/6H6w5Fm5Zb8y0kLZhNdeW9NS J8R1gVjZhStOzpUkF+buO5bxFdgkP3sPeCQjcVs2PCZtgxMwC3wfzOqLDdhw AY9GtnvdwEwSrgeGsPOEG9nxwvU4g4sNKzuYq05TyZRyqSssqou4Yh5sgkip Y68QACwE8iTYbKLeWBlP72oPX8hIgrMzha77ImVdZM0iPbALqUInaBBBcMLp gse8CS0UCOIRWihY2cVJlND9JrFtgr3wHJswv/doUzoG9OO+phuXe+dmBmeZ bSaDSxDXBxYhACZXIfrmrvTOX+m1d8rrtaWyqqOKmuPwCDABa4A4wCCgElxx gvtNODOE+edShaVporJ0KdpEdrJeU9pmruxp5Nu7lSMOy7WxtoWZgbV55/0V z/q9AKjkxeOpUHHXlbfPZ948v/766QzEm2c33r24xWRPns9+ZGLumxfz375c wJHCP7y589O71X98uP/Lxwf//ObhPz8++OX9/b+/XwsufGertn5i8yB48iM7 oYukXX56e/fnt6s4Qzi4x+QdPK6wsUzHj28X43mT+BE/4sevOJT5X6gKtmkK tmkLt+uKdhiKtjPB2GS7uXi7pWR77YntdSd3QJhP7Lae+Wvd6a+ayw/08dMu N5bdGZK+nKp7Nm5+5Nfd86jvupVrXvU9n2bdJweSgFAg4OSeUzRlLRmWp3u1 uXByu/P8ymANPAl4AZusu2seOqru9pffbimeMmQwM4QlB/2YNxEdIHmTUeGB EcF+jAB/n59dCs/ARHKICenhEVkwpuRHphmesDZRB20yrmZsAjAZUWcF1Fl+ hiRgk0yUiE+dwdZxpeKHVGVXKoYHngyFG55XprkUAJNUpzwFwyFLxnBJU1yy VKc0xSFJtouYJYx2SRIT0iQbFYPSpB7FwX7FEZskbYiX7K5Jm5KnzplzZ8wH rtcenLAe9lhShywFzhbRSF8tgQnJm+AYYRQKKfFiyrqoLAnZWhIRLJylh/iJ eKuGU4hJYGcHJk3oFviIXfDhEXwP9TbGJn3BxArxSDg9SO1W+KAw8hJtk85m SXerrL9TNditgYCT3nZFOEwg/N1STxvf2VAxXFdmN58eNhTZdXkuTZZHmxnQ pY3qUsZ1SRP6hClDAthk3Jw9YcmBGDMxWRWXMpFequjTpmIE9Jkk/DqQSIZP mz5iyAp/0qFKc2oynYZctznfXXvC03DO03Te3crYxNmpcHapHN06R4/R0Wt2 9XJsooVwduuY1Ak7pwtTJ0Nt2r5GRV+TordJ0VUvbWXvPOGe0yAvN4S6SxiP KMu1ynK9ctNgrvCpXMQm9JYTEsQg4atMaIxAbMUmGLhykWMTzJtUlefi7kW4 58QbS8ACGoStvGK25pENevAIz8NljDO0aYaQwdrhVzh8iJYh/9fgzC74U+CL w03sYLduxA03pf13F4O7F9nNJsG98HdnbatzQ2vzjnsLzvuLrgeLnodL3ju3 7DPj7cQmEG211WATvJFGm+AkYaDHyfzDAJPiYwcAKVnJO4Ak8GHKoT8l7Ps/ 8CR86+Cd7Q1S/BTMI2zcuus3ZgKTfvnwVncMLOtqNPJaa0WAFAjECJ1DYSLk CDo+2YQSPqSLzphEtAnZDk+P/8IT8tdE/nAWL5K8CbEJnpDKLhTKb7cJ7jfp bJL1tqmcgwawyfWp7tvX++duDCzfsK3csC0jTwAmV/og8MOhdhmYQlF9TMXL k1cdlV1iVpzwy9IAIOCRM8e/Ppn7JccmAJPqs8mCc6mi0jRJeYa8IkfDzzfL TjZoStstl3obBcPdylGHBS4qANG9edf9Fff6PT87RngS48Xj6bcvrr97yXSd YHHXuxc337+89f75rQ/Pb398MfvNy7lvX82DTdjsycoPb+7+8uHB//3m0f/9 Zv2fHx7+8vb+P0I2+Xuoo4QsMfmBXbnI7Jd/sfDt8/kfX9/96c0qlR8JkuTH N0s/vlnYFOxILo5N/v5xBeKPvvGJH/EjfvxHH+rC7ZrC7Vo2dGzeRF+Ic7oA Jjtom9Se+rL+7B7gScv5g/2C9CtN5avD8g2beNWrHhXaBEjy0CMFoTAJFKcI Yrr+hEuVFTAcv9J4aq774l07P4gXN2/dw3vkrF4dOD/bWjJtYNYv+sQH/Ljn XXJwXMzwZEy471M2ORTbJmOq1DFVGthklLUJE5qc0Ap4JpAkn7QJwiSGTdyy VOCJMxQOafKwNDmiTbrlB/pYm9h4ya7qVLTJDcvBGevhyfojaBNHsyjQa4lh E8ITtEn4kK5owemXJztQgnVcQ/UbWxpDveekwopGytZtQp75dTahR4T9RpuM 9Cr8nWJ3a7Wz8eKQ5axNXzikzx/WZLm0WWCTgC51RJM0pkucNCSNGpgmd4AJ ri/xalLAJnSZFlWvtckgyBByTodTne5QZzj0OS4zsxfe01DK2qTmc2yipWzC rF9kkiZNip5GeadV0gL3nOoKvawshk2i9cJv3SYcnnCa34lN8Jz0m0S0CdkF T2dP+BV5uHtRXF0E965wtwn3k1jTReYGA0Ywk0KC2IROlJBzGibk8qbXxHPm CcPXZ/qjO7V+Z0NUm8xt2OTBkvvhEmOTlZtD18faaJu019V0MhOfpMQmuJ4D brlPFybkpu0+kXcISJJ25C/Ak2MZX4FNIM4UJcL3HEmCU6pi2ARhEj4TmLSW wDPYVIKL5jvqpe1WCZxj3gTfCZeNSRXBJhFzKBG3uke0ScSWE7RJ+AxhUtlF C4UkUMhGeNJvQrecYFM8yZ4gScgzn6zp6g3tN+luCe5exP0mYBOXzUjbBIyA Elm6xtgEA89tbVKr+hzYRM3PR5tgTRcABDByLn8v8CTcJhDC0k02schPNWnL 2s2VPQ18sMm4q+7WVBewFy6w9TX/+j2mrOvRWuDhqv/hamD9HjNVmJnc9WRj nvBvtwnOB8ZJXHCCPPnbyxWGJxsbGOE9iyxM4jaJH/EjfvxrDg2WcpEo3KYr +MJYst1Uwtik9sQOhIn11M6QTb4GmwwIM642la85FK+mrc8nLOsB/X2vhtgE YfIkoIQTHCN8ueEk2GTEmHe16fR8T8XqsABsAu957OVDrLtq1gYvzLWduGzK CigSGJtINmwyHtMmGzzZqk2yRzQ5TGhzA5osDk+2aBOESTSbOCXJDkkywMQt T3PJ0xyyFIYnkW1yeFCcaqsJ2mTWlHOz7tDN+iNTDQkeSxraxN9jjmgTUs1F Z09IvRYnwm1ijzTRC2/MsFwf7+Lg5i3gasK8CTKBdJpweBJe1rXJJlTS5LfY hODot9jE0yX3dsn8XWJPa82g+WyftsCmL3AZjzn1OV5dRsCQMW5KnzSmThpS Avo0sAnABJMmHnUy2ASEgrmSzQO4uPkRCK8mDU9op7g0GWCTYV22y5TP1nSV uhvLP8sm4bsX2X4TVV+zsqteCjaxxLIJd82EbnMHSkSS0DYhDSaxl8VHSJp8 jk14F49XlmZXnMsCm1hCe+FJXwmO1SI2ISO84CW42iNuM6EnCdM8oW1CN8Wj UNi8DGOTm1cG7i66o9jEDjZhkiaMTbyPln1w43pttHWoU4k26WoQgE26moI2 wbIueIT7XjipPn80J3VX6uE/A0kKcvYCTyDSE77Iz94DOoMfFtyWww088iTM JpsyJo1GHralkFUm9Hxg/JCp2lJegEd4GzzZbBaAUOAljfisTloKJxZNZUSb hEfEwcIRbcLZcoJBf3E6QYMfwgnBCP5l6bwJ6dyhp3XhMOHwoJMpnxgjvHn3 IuZcaJvMTPeATeZvDi6yKkGMMCfXmVi40jd/uXewVVKnOktsQmq60CagEtJv cr74IF3TJSxNE5elg00UFTlaQQHapKO2qq9J6OxVT7itt6e7V2cdcIE9vON9 8mDk2aMJuBpnZ/pmZxg431vxAlKePpii+uJn3j/7rXkTrOzanEa5w7EJwoTN nizSEa/pih/xI378uiPcJvrCbaxNdhCbAEwgzCd21Z1marpCNjnPsQnABOK+ XwskeexXoE0AJsAQsIlTmRnMm/Rs5E2e+ARPfYInHv79oYr59pNXzNmkFz4g OhAQ7h8V7gv2m0SyiR/ew/IkIDnEfBYbUW2iTmcGCGuyESYQfnUmsQlRSUSb kHQJnTH5pE2Y4i4WJpFtIjvQK0ebJIFNJmUpYJNbdYc5NomWN0GbcHgSrpLP sgm9rg73yMPN25i3FXhCuk4AFMCB8N0ln0ygEJjYuvWkWf6TNglfSQ+f9Rtt 4uyUubtkwBNfh8jZcNFmPmUzlTgNeU7dUY8+y2/IHDNmjBvTxw0MPYhNmDZ2 1ibwiN3uaJMRQwbbCL8pY4IwgfCoU/GECGXDJmbGJp7Pt4mzW482YXmiQ54w QmlV9zTKW80C/AV4RJtE3IIXjSccfUBE7H+PxhNu0qSmWBylpiu834RfkQ82 gcCaLrQJ2/1hwCuWrumCE3x1sEuP/VM0TOim+Ih9KFjWxbEJPrJpGl3A2XDr 6mAUmwytzduDBV1gk+WgTa4Emm0diuCcrgZBh5XXTlUfoVDgVhn+CLgDB4Ll ZX2dmbQdC7rg/GxxEr8iD34EqBLcihJuk3CY0DyhUyfYBQ8n2GaC/e+YScFm EzyHayZisiNioddn2YRch+FIobfD40pHPIcT3LFI+k3o4EwSJotOYtiEs+Ik wu7FsF54eLKrWd7XrgabTPibcS98NJvMX+lFm9Qqz4BKwCZY0CU8n8ErTQWD gEew5eRc/l7gCdgEtFJx8gjYBILYhMmb8PJN0hP16nNd1pqBFrGrTwM2uTXV tXJz6MGi58Edz/P18dfPrqwtu2cud0KszDvAJg/u+sEmL9avgE0w3j27+Vts Qk4wb4INJj+/W/v57RrpN/n5HcQKxBZtAh/Ge+HjR/yIH7EPYhN98U4IA9ty gjapPbGz7uROYhNjMVPWBQE2GRRlXmu5cN+lQps8HjE88GkxacKxCRpkuv6E Q5Hh1x8DpMx2XbgzxMNO+ad+4TO/6KlX8MBeudBx6qolh7bJyBZsEuQJvD+m TcbVaROajHFN9phmI2+CnSY0SbDlJIZN6HRJtH4TtAlGsNkkUk1Xl2x/r/zQ gChlsCbJWZWCNrlZe+gGaxNvbZq9ttDZIo7Wb8KxCfKEnq8V2yYRa7o4A46w smvE3TzqaYFHsAlphI+8HT6mTQhMfp1N6D/uN9rE1a10dcpd7RJPh8jXKfC1 XnJZS23a48P64x4mdZLlY9rbU8eMzP7E8JounMRFFiwCTFi5cDMmJAhPMJwq pqbLacj9dTVdEK4evbPLgDYZ7tCDSkAoEINtmqBNoudNoi2FDx/eFc0mpF4r mk0ibjZhYVIU0SYb/e/s2K7gCK9LhVjThXO6cEM6sQk6GtvhsfgKX8WWE+RJ jIjYJk9aTojckT+2Hv2op/n2NVtEm6xSNnm47AGYQMCN67SvcbBdjjbBx9bN v+HH22m4YR7ztMFfBP6yBTl7S44fPFOUCDDhXTwOPwVy5w936RFruuhSLhom dGUXCgU+xElc5HkgCSCFFkpwJ06kWqxoKtliTVf4VQdB5lfTvSf07C9OI3w0 m9DDhCPWdHGGdMXYCx8+p4vYxD1kom0SsaYLYLJwpQ9sYpafklbmqHh5ABPR hUywSc25lIsnDpcW7AOYnMjZjTbBsi4yp4vYRHYhS1l9TC8qsshPddZVE5vc nOxcvmG7N+96fC/w8skk2OTx/dG7i86V+WGACY4UxoFd/8K8CdMIH2o2gUc4 //ntKscmf39/Z+s2ie83iR/xI3588sB+E7SJoWSXsWSnCeLEDvOJoE0QJhBg FtYmX7VeODQkyb7RXvnIq319uf7FZC3HJoARsAkE6AM74qesJU5lZrhNngVE EE99jE0WO09fteSOqZP9koOhGcKf6IWnbeIP8SSiTSa1GZPaTNYmDEwCbBCJ uOQpTOGWMs0pS45hE04pV0SbOMRJaJNhcdKQMMEGIUqIahMZa5PqRLTJbWP2 jdpgvwnYZLiuyNUqGe2vi20TOnVCfktMz+baei88/SnENX5nIwTmTUhxFz3y dys2IaODf51NOH/Wb7SJvUMOChhuE9ubeZ52wViXYLSj2m4otOvzXPocjyHb Z8gIGNJHjcGkCacXHnkS0SakgovGCPIEw61KcSg39cK7G855my9svReetYkh hk1aTHy4w9RKzsW2CSd18sl18OE2iVjcFdEmoaRJZJtw1p0E98XXlOAMYfgi cKeKNiEN7yTNh70n2LdOUifACryeY8wQpou7wsu6iE0GOrVwgY37Wj/LJgvX +qe8DQNtsk02sYo4pUdwOw1/NfjvX7rlXbrtgxP4QcA3H76NcIKJAyxkwoqm GDahkyakNZ5uk4cAgJBmedzOyVRwqSswjYJ98dHyJhEjYhNKjH4TvOTogdV4 pdEXDJzDS/h3JzYJ74VHkoQH6Tqhe+FJCzyngitC3oTthadqulQ4p4vY5Mbl XrDJwi1bxF54sAmcE5soa46LL2bRNgGSnMz9sjhr59m8PaTlhNhEVMY0mzA8 OZ8pr8zV8PONkpI2U0Vvo8DRoxpz1oJN7tyyP1j0PLk/8nx9/OWTaYgXj6eA JBCvnl559fQqwITmyb/EJjRPvn0+/8OrFU4vfKiga0s2ifebxI/4ET8+eWgL tusKtusLdxgKdxiLdpogipkwF++0FO+sLdlVd2J33cnd1pNfmoAqZ/5ae/qr pvL9dlnu7a7qx379qynri4naxwHDA68G4pFfB/HALXkSUKJN4Bxiuv4EsQnd C//EJ3rmFz/ziR45qpc6z4JNRpSJXtF+n2h/QLR/RLRvVLR3VLhnVLBnQrhv XLB3DIK/d5S/d0Sw18/fOyY+FACqAFtEBwOig6OSw1Oq5MuKRIgpZdK0KmVa nTqtSZ/WZkxo0iHGNJmjmqwRTVZAw1RzueXgjjR4dMlSmXPmJMUDz5CQB5/3 MNtPMvBJF7yNiRQWLMAWcA04JdklT3bKGZIAT+DRLkq0CY4wITxiJ9O6NtIo yV3S/VjTNcT2wk9Ikm/qMm5aDs5YDk7WHfZb0t3WEk+LJNBlcvZaACac5veI NiE3YyRvQs8NjgYTYhOST6E/i5AEHkEopLiLpDMITJh5wlsr7goOGd48Qzi8 04RT00WC/AdgV/5glw7uH8AmPW3yrdhksENl61TZWiX9DbyB+ipnU5WvrcZV e8puKHDqjnqNx0ZMRwN6kEjGuCmHjewxY/aIPtMHylCBXlO86hQ492vTR3QZ o/rMUUNmQJfh10KkQ8BLEF41Ham4vtOjSrUDaTWZLuNRdyhv4m4s97TxPB0i 1iZqZ48+ZBONs1fthMcejaNH7QChsOHsYVpOmI54JnRD7VpbKzNMuB9upRpk sXvhI/4SO9rArvDiLrpYKzyBQudNImZPxNXBkFSfkNQEQ3ipCEJ0qUhcFXxe WnMSIAM24V08Dl8H7lGxF57uNyHtUeEbT/ANpDqRFCiGp0vornl6VBcWdLHT unRwrWLeZG3ZAxEaIGy/uzi8uuS4tzB8f9ERhMmKd33Ft77iX7w+ADYZbJd3 NQiwposZ1cXahA0xCgVs0tOq1MlLwezfv7/7//3y4uGdyasTffYeY1eTvKVW 2GQWNFuYkb+NuBce9WEKRgPlEQycvkVSJ7RZmgw19ew+FJwwXB/KpzAk0VSa wRHKCwYQRKj7g+RKyAVDN4agNT45rSv8cwlP4BGfgasLftb8ijykKO9CXlXZ MYXgjEldWaurqdMDSQRWPQ+iwShgwiRsqZU014oh4KSlTtJaB99JJtqsMibq 5e0N8o5GRWeTqqsZQt3bGrm7hFZJiDAaJpoh1OxS+I1+E+9w7dRI280r/bMz trkbQ8ssTIhNkCezU91zl3uAEkbpCUlFNhnSBULhlaaWFe4HmBRl7jiRs/v0 sb/SPAG2QPBLUwWlqfxzKeLzmZg3MclONmrLmH6THvWk23pzonPp+uD9Bfez +2Nvnlx++/Tqu2fXIF4/vvxqffr1kysfXt549+z6y0eXn9+ffP34ypsn1949 nfnw/NY3L25/92ru+9fz379ehPjhzfKPTLLjXnCGMDNG+OE/Ptz7x4c1YhN0 B/a/Y7oE++KZRAmbNyG1Xn97BW+YB5iwqZOQSqL3wsfzJvEjfsSPTx76/O0Q hoIdRjZMhTshzEW7LMW7IWpLvqw78ZX15F8hTCd31ZfutZ77Gh6HZDlzPbxn o6Y30/WvJuuejhgfejQQ6z7dIy9T0/V0RAU2wRnCaw4h9puATa40nsJeeOyX X/eInvokz/2SdQdvqfPcFXOOX34EbeIX7g0I94wIvx4VMDEJPOF/Pc7EnjHe nlH+nhE4ERyAmJQmTMuTxsWHR0SHJmUAkySIaWXKtCr1sibtsibjsjaT7YVP HVWnj6jT/argFkWmV12WupXwKrMgPIp0CPisYIN8ML2ysaXRJQ+qZEiYgIE8 gWcwhlm2MH6RJHdK94FNhqTpdkGquyZtXJQ0o067ZT44YzowYT44Ysnw1Z/0 Not9rTpnr9kzaAWDjDiaUSK0TTZN6xraxJOIlV10KReHJ+FPQtC7F0mQqcLI E7KsJHwqV2ye0LsX6cUlsW3idzbS+1AGu3UdjdKOJnF3q6yvQ4kAgROwCQgl Umj62lW9zdLO2upmXWmb5lSf6ZzdfNpmKHbq83ymgoDxuF+X49NkTphyx405 Y4bsER1gNh2uGdzCics3A9oMOshSTry6ECPhMczaxGnIdRrzwCbexjLGJu18 sImrS+nqDtpkuAdMqmIDeKJ29KiAJ8PdGBp7JxPMlsYOeGR64QfYXnjcbxJj hnBsm3D2m4TbhGxUJL0kEOE7TWiw0Nvh2dQJE5hJgQCwCCrzIYSXCkRVhfgM BJzDzSrcssIfWm+swV+DY9UW0QdeqGgTfBJn/3KEgit+wpMmdMs8p9+EdJ2w eRnDiLuJtYkXbHJnwbE8xyRNGJisuB4sOx8sOYMwueN7fMf/+E5gaWZw0tNg 61CgSpgVJ1ZeR4OYuUo3R52+stUq7GiS9ndofMP1Y56WMU9rX6u6tVZEtiWC LBiebAYIRotFSN6Db6Ofod/ZbKhpMfDaLML2WlGnVdJhlbTVibHQi6xKNEHo Ks1U4oNIBK4NuGAwUULQEW0BCga9eJF0vsPFBl8Krjcs36rTV8FlBj/9S2U5 EJWl2dXleeUns/gXi+T8s3p5RZ2O32gSW/WCWi3YRFRvEMJ5k1kCT8Jjs0Xa UitrrZO3WRUQ7fVKctLRoOpsVGP0tmmw5C+GSkJJFhWbLsEIJlzgx9TdovA7 66dHO+AymJuxz14fWpoJJk2ITSDmpntuT3Z11lXrREXgEWllDvAEUydgkzPH vy7J3oVJEwy66wRsUn02ueZcCrwT3q8Am4iLa5VnrOpzjE26VdOehluMTQYe Lnoer/ifrY29ejj1Zv0yxPun1759eevp6ui3L29+fD7z7slVCHj+w7PrH5/f +Pj85rcvwSaz37+e+9ubhb+9Wfzh7dKP75ZxtSK7e/HBP7999MvH+xyb0BkT fISAZ+iaLna8MLy6QNsEVPLD63kmItkk3gsfP+JH/PjkQdsEYQIRDhPWJrsb y/c3lO2DR7s8d76X/2Lc8vZyw+spK7EJCxMNqARswozhYnmCNsEZwlebTi/0 Vt5zioKvuoVPfJJnPvEjRw1jE1N2aIbwgYBo34ho76hozxiEcE9EmwRq9k6K DyNMvNV73NV7AsKDU7KEKXnilCI5aBNt5hVdFgMTVeqIKs2vTPUxGxVZUMgj MIShR1j4VNksTzKY9fEgFOVG3Re9Pp7YhPDk19jEzNqkNpO2iXugDm0y6mwJ DDfhRvgILSeb18xxcigRsye0TSJ20LuHItiEVHlx9p78S2zyybxJwNUEL5Ft 8gOd2vYGSWu9AHiCqRMIsAmcw2O4TframZuTzgZRve68XlRg5B+tl+Z1KfMH dMVuU5HPXOQHmxiOerVZsW3C4QkNkxg2carSwSYOfY7DcMxlKfE2Mv0mxCbO bjXWdNE2YWHCtQnAxNauGmyDYPbCMxsYW1Rkv8mvy5ts0SZ0n3tsm3BSJ5+0 Cb6E7wSYwJM4RBcnLJEZwsQmWH+FLSdIErKTkUMYzJ7Etgknb8guYWTyJmPe FsybrC65OTZ5uAzhDsLkrv/J3cCTuyORbdIoCbcJXIq9baoWq7DBVNNo5jVZ mNKvOt0lnPRLuyM8PxJEB+sRDHw/+RSyaZF5Ul/TrK9pMfHh8gChtELUioLL UEIrFC36S2b9pfB5XNGWvIevaMQmEYIdGjL4frjY4AcK1xvWp8Eb4KKCHzTa pKo8t6rs+MUzudXl+TXnC1SiMpAIkASEYtHUAEzgHJ/Zik0IT/ratWSYG80T WiXYlsI2mGhCEcQL/Ji6muU+h5XYBGL5xoZNSMsJpk66rDXACklFNvgCbYI1 XTg9+PSxvwJGyosOlBbsg0CbYDt81ZkkgAm8GWwCrtEICiyK04268v5mkaNL Oe6onRltu3Nj6PnaGDAECPzywSQA5PWjabDJh2cz8CE8+fbxle9e3YZHUAng 5cOzGwCTb17cgoCT7xkvLGGgTdjt8Pd/+ebhLx+DeRO6/50ABOK7Fwsfn85C fPd88fsXy1QyBR4XSU0XGSAct0n8iB/x41cfoBLD5owJHUQoELVnvgKVWM/t AZ44VccX+4XPRk2vJuuej5kf+/UIEzh5EjAATJ6NqnGMMARIBEjiVmePmvKv NZ9Z6AvaBF5i8iZ+KZM3cfKWu0qvmnMCioRQv8n+UfG+MfHecQjR3og2GeHt A5v4avb2nv5zZ8l/D1/cPa1InpQemZQlTMqZmi5ik3HKJl5FKM0RKUWCyRFO gE3YyAzyJJJNACZoEw5PID7XJpOWQ8Qm/ja9qy9Y0wUwGXO1glDgHGxCggjF 72iil8rRM4joNEo0m0TMuRAv0MGxCWkJ+Y02CU+dRPzT0SZkjnFfhxru6Jrr eMCTrhZpb7sCkyZok/Do7VD3tmuAM2ZVGdw/KCozdTU5VkFmt7rAYSp2mYo8 huNe3TGPJieaTSKmTiImTVDBdDhUaTiny2k8zu5e3LAJ1nSBTYZ7DOE2QZg4 ejTEJoNtyoFWCCZpgnO6cL8J3NnqpKW/k004PKHbTyLahBDms2yCqRP4EP6r miwCuHUk+01IWRfJicAJSIQu7iJCQZvgxRzNJpykCTaboE36OzRDvYZxX+ut q4NrS4xNVuaHl+fYCV2Lw2CTRyvu9TueIExWA09WR+C+EW5cwSZDnUqwCQaz 4oQp5ZJwos5wCUgCJ90tCrgHbq4VQFj1wQ2JbXVikAV2jtA1WgQmuKmkhYUG plrwPTReQnkTXpOu2qqprFVdtITWLOK6E+IIk7bCCMHO7yVd7ciN9gZpS50I zqPN1yLTukhHPN0dT+ZuwQlcbPAMoKCtXgKvwhXCu3gcYFJ9/mjNhWOCiqKK s0fBJrwLhZLqUxrJecRIrZaHORSI2DbBD+nUSW/rJpWEw4RM9OpuUYVgspFb gZ8Oscns9aH5G8MQyzeGVqiyLjKza266p6eBjzZR1hwHmwA0+GVpIA5cbnI2 bw9OD8ZHMqer+mwyvA0CeQKfqBUWmmQngSe9jQL/oOH6SOvtyS7449aXfYCO Z2tjEOARsAkI5cX9CbjwVmcdNyc77y+42UzKzQ/Prn/78tZ3r2ZBJRhsZdcC kzR5vxJKmtz/57cP6bwJZ+viRrrk3V348Jtnc988nf/mKdN4AsE2yEPMh1ac fHq/Sdwm8SN+xI9PHsboMKFtYj35V8vpL9Em9aV7iU1eT1nRJg/c6ntO5X2X Ck7AHWATpp0koASngESAJGCTEWMexyZPfJLnI/KXI7InbsGdnvLrtUdHVUlb t0mgZu+Y4ICr8qvuk3+CcFd9fVmZQmwypUwmNpnQpI9r0kfV6UGbyJOdskSn bGNJIokYNgnPm7DFXRswga/pkETgydZtctty6AZrk9HaTH/DKV+LhLVJLeZN ACbj7jYQCuZQSGwgJbRRjhZKeKFXxPKt8BlfeKsWnraA4CQ1SKP6b7cJnT2J FljT5ehnbdJv7mtXt9QJm2prwCbYdYIw6W6VwUl4dLZputq1rQ0Sg6pMVp0n r8zWVOfqKlOaJLkDmuND2jyHLs+tP+bW5oxHsgmHJ5xSLvIeutiPDrsixa5M c+hzsN/EVX/W1VDmbuN5qF74Ybj37jY6epRsIEyUw90qO7zaw7SckLwJ2gQ3 MIJNyH6TaL3w/xKbRFyzGC0295tEsAmohAMT7ImGE/hE+M9rrhXCbSTeVZKy Lhzzi5PlSI6DJFZIoDJI10m4TcILunB5CtZ0wZ9o62bmdN243L/K9sKDTZZm h5bnbGCTtWUn2OTRSgSbTHkbwSbdjUJik7Z6UVu9mBNw04slQ3ANwzmCBZTR bpV01EtxgTvZVxLe9g4qgTeQtnd8BhMumEbB98NJq0nQamSSJnB5NOqr69jB XHCdMP0mJCeivmjQXOTYBKeEAUxwzwg+CRcP9oyEC4Ve1EjAQvaV4HmDiYe7 aeALws8abMJ0mlw8DkRVCs/VnC/AoW3lJ7NKSzKMyktgECzrApIARkAlCJNw m8A5bROMriZFeF88Od88y0tFRfCzItpk5eaGTegEyvzl3u56HqgE3FF5KgEe sXALxAEGwdQJKeUi6RKACbMXvjwdbFJzLgU4A18BgAM20YmK2syVAZsRvjL8 QXdv2VdvDz++E3i45F28PgD/GU/ujjy/Nw5OwSdvT3fDk3AOWgGbYMYEC7rY mP/uFZM6QZv8/cMasck/PtzjJE0wV/K3V0s4TBhfZau8VjBvgt3x370Aocz9 7dUCG3Ookp/eLv78jhkXHNEm8RnC8SN+xI/YB13KRZMkUk3XruYLB4EnYJNh xVGwyYtxy8frLa8m654EDACT5UHxQp8Anl8dFoBNcEgX2OS+S3y99Sxd07Xm EOIsr6d+6YtR+atR+VOPkLFJ3bExdTK3pksYtabLV/X1KH//iOCAr2YvREBw gGk5kR6ZCtkEe+GBJ5Maph0ebeJhYeKQJoTDBAIBEhZZHkUmp98kFBswCbcJ 8uTzbGI5OFV7eLQui9gEYOK11YNBaJvAIwbNE45N6PouusQrmk3o2cIkItqE rF+kZfHb8ybhxV0Rw+dogHfa+4yoIbivw7xJW4MQ8yZoE3LOifZWbXubtskq 1inKpDUF8ku56upcTUWKuSajTZLdrzo+rM13MTO7jo+bjka0SUSebAUmrE2Y dnjWJgXu2hNO6xm0Cc7pcnSqhru0HJuwMFECTII26dGCX0I80UDglhPcb9Js 5JkU5/89NuGM7YoGEzKtK6JNyDOoEsy5wJ+OXwH+g9mecVU0m+A1jGO7cNcJ 6Yu3dRtwqFcwA/gpmxCYULsX1cx+E1cj2uTuootjE7amy8Wp6UKbwA8LbYJz utobIuRNIJprBZg36WySdTL7GSWYMUF3YF0WEUo4TyJ3voc+a6MPBdhiYDri IcAmDSx2gttPNvpNmLyJKdKaRc5wYHwSLyFODoVseydOgc/FznekDXwI0oEf ZVu9BD6EnzjIlF+RBzCBa0AhPAcqkfPPii6dKMo9nJGwq+LsUVRJvUGINkGV xLYJzZP2Bu5e+OgtJ8oQTJSUTSLWdDE24fLk2sDcdE+75RIQoyB9W2HG9tzE P2Uf+e9jyX8CiYBHACYQuHuR2ARhgnkT4InwfAbmXAySklrlmSb9+S5rjb1D PuGsmxltW701/HjF//LBJNDj/oJ7ddaxNudcmhmcu9ILJ4CUd0+uvn96DWyy zr7t/dPr2G9CbPL962DLCaemi9iEdJpg0gRO4Hl4JEVcP725+9Ob1VCzydL3 L4EncxDfv5wHm/zwej5uk/gRP+LHbzxiVHNxeGI5/VVrxeGm80zLiUudt2KT EJus+3Srw3KAye2u6tnumqX+KrDJA7cEVAIAgZOZ1nOkF36u5yLphX/ik7xg 8yZP3UKSN9l6L7y/mmmHHxcfHhMdCvD3+/n7Sb8J2GRSkTylSplSp02p2SFd 6rSAMtUrT3ZJE4clR+ziw1u3iVuOEeydZxIusmS0CcIk3CZ06uS32CTQbvBs TpqgRDg2wSf9wxFqusKX0MWwCXmSSqNsjPAlgbjAzAUuaseuk3+VTWLzhCno 6jfbQ0vn0Sat9YL2RhHJlcAJ2ASEEh7tbXqIhjqxFmzCK5RVHVVU5egupesr U+t5ad2Ko8O6Arex0GMqnPiUTWiehJdyEbfS4VCm2SG0WS5TnstS4qw7g3O6 wCaODrmjU8mxCcIk3CZMegXe2QVI0Tm7jNhv0tukAJuASn5vm9Cpky0mTaLZ BB/hbfil8A+C/xj84+D+FmyCKsFHzIwgH+ipDth7QuYJk84UslE0mk3oIXV0 0gTbWGzd+gC7F351yQM2WZ6zL962Lc0O3lmwr7GN8OG98GCTaV/QJhjM+sVI MIHrttHMw8YTtg1KyYwarhNjNRdRBlmnyGEIqeDCvhJ8hpzQz7cY+WATRiW6 qnqWJCSITczaSrBJxF54bGYn2RDaJpyNiuQZIhT4FDIWGLMnoBK454dzFCjW 70EwF4DgrIx3BuLimdxj6XsPf/0/aYd3KoWl2P+OPIGIbRNO6qS9Pji3GbNv eAnR7ScUUkgjvCp2L3xEm8Dj7cmuVlMFQCMv9S/5aV9kHPzvtP3/K/PQfyFJ Th39CnlCxnMRnvBKU9EmoguZsku5an6+SXayXlPaUVs10CJ292rGHbWTLivY Z23W8Wx1DFvd4REMAkiBgAuPbTxh6ri+eXEDkEJ64UPNJkwvPDabYC88C5Ng LzzHJthjQpIjH5/OfvNsLjiz6+XKD6/ugEpCDfJBm7A8mUWbAEziNokf8SN+ /OojLG/CTA82F+0wF0PsrC3ZWXdiV93JXdaTu7Gmq750b/OFg35D8d1h+fNx 85urDU/GTA+8mjW3asUhX7SJIVYGBU9HtI+8yodu+bMR7QOX7GrTWYciy6/P u9xweq678q5dCC+t+1Trfsljv+SJX/zYI7jbf2HGenxEleQXM1tLmAHCwr1j gj3jAoYkE4K9E/w9CBPGJrw9IzVfj/H3jQv2T4gOwuMof98YnIsPMZtNlImT ysQpVRJrk9RJdeq4Om1EkRJQpEG4JEl2weFh4RGHMNEpSvJIUjzSVI8szS1N dUlSvIp0vyoroMn2qzGy2FxJukuWTrWlpLjkJDZgEsMm+EieB5t0yw72yA4P iFKH+KkeXsa4OOmqImXWcuhm7cFp6+HR2gxPXbG3WTjebQywWRKwCQT2wtM2 wZfwkc6YRFyKHd4dH24TusQr+GaGJ2wMwKsWxwBTScUEfDgI7wRK1EFsrGIM DROOBZN+7gzhzwr8s9BN/Z2aljphW4MQbYLNJgCTzmYJJlA40daqaG9TNlkF OtU5uaBAVp0ju5Rp4GXqqlLN1cktkqxe9TG7scBjPTluPjpmzBkxZAV0GewA YYYbgA4GIMpUHwhFlRYA86rT4YRueA8OgouUN3Go0oeVaUOazGH9Mae52F1/ ztdy0d3Kc7Xxh9tlxCbDPSZmbnCwzUTFRrDfhC3r0mIMs+Ho0NlaVH1Nip4G WYuRZ1Ze0IFNpOUQejnEeb38gl7BRPjWxfDlJqgSjk0iDgqOrRJO0iQ8SLoE YUKSJhDwn4dIgTtYuJVFa+BdJWZGaHfQQdadhL+N7oinbYI84eRNAM5DPXpb jw4eA66GmeneO/OuuwvulXnHyvwwxJ0Fx+qSc21heI0ZI+x6sOx5yMwQ9uMM YbDJEFyHjaKeBmFfo6i3QdgDt7iNsq5GaRfcJzdIOkI2gUsXTjqbZF3N8q4W eXsjvCTtqJe01YmYAcLMDGF+o7EGo2FzwM+61cRnOtzZJnemZAswYuI16Kvq DVVNZl5rrbClFu7necw7mZouJprhc/VVdbpLVjZqdZUQFlCJrsKkA5twp2+R qVy4VAVncGGTe/hyRoJfegox/DSx6wTO0SZNFgH8cMmPHvXKXFSic2rpeXHN 6ZMFKWkJO/d9+d9f7/yvyrI8i47fZJFYjcJGs6TBJG61KgAmpOUEJUL3m5Bn wCZt9VJcy0h3LRGVkHwcBKikpxXAou1pVZPqL0BNb5vK57BeGe8CmwBMgCcr N213bg6yPNlImsDJrcnORt35ylOJx5L/nJf6RfaR/5N5+L+zE/5UnP3lqaNf nz625/TxPaePfV1WdPB8yaELJw5dPHmk8nRi1dmk6tJk2iZaYWGt8kyjrhxs YmuTjtrNN8baASYrMwyIVmcdcJm9Xb/8/snV1w+n3jyahpPvX4M+bn98PvMN xIsbf3sz+x3TcjJDarqQCd+DHd6xg3zf3/nHx9Vfvl3753f3fvkWhAJOufvT u+Uf3iz+7fUCxvsnN14/uvbywZVXD658eHrz+1fz379awPju1fx3LyHmvn0x ++2L2x+f3fz47NZ3L2//8Gb+J8AIC5Of2BXwKBQOUv7oG5/4ET/ix3/0wZke bAqqZDuEhVkNv6Pu5A5cDW8+tRtgAtF+KWHMcmrNpXw+YXlzvWl9zIgrFx+M 6O/5tate9dqw9GlA98SvfezTPBvRw4dT1tMu1dGAofBK47n5nupVu+SRR7Xu Va8HpA994kc+4WOvcM1WebOxAGwSEB8cwa2Lwr0TbLqEzZjshQjCpOZrjAnB PoxJ4X6IKdEBJlQJEJPMI9gkeUqdMslE+qg8ZVSRMarM9EpSHYIEpzBxuOaw S5DoFaf4Zel+ebpXmuoWJ3vkcKuZNaLNDbC748EmbLpks03Y/SYQTlkyUUls m9gER+CETBiGk175kW7J4T5Bio2X6uVnjYuTL8uSZmsP3ao7dLn+8EhtmtOS 723iT/WZUSUIEJIooWGCMe5uCzibSU0X3WlC95LECDJAlYOU8DFf4bRhYrB2 05r46ItOyHKTLRZxhQf9WQOd2uZaQWu9EGu6iE2wpouQBNiC0dokbmuRNFqr 9arTcsExWU2WvDrTKMrW89NNvJR6cUa7IqdfX+C0nhozHx01Zgf0mT5tOrM5 UcnkQcAXXuCJIsXHznwLKJkZC+EwgYhY1uVQpg2r0sEmdl0u2MTbWBZoq3S3 gU0Ejg65s0vl7NE7e03OPgvb9q7eUrSph1pU/U2Kbquk1cirU13US87pxaV6 cZlWUqaTntdJL+hlF5lQnI9BEk7QMNmKRDhBMibhNsHsCf62HG9QCU8waJu0 N0jRJiTobSbhVYgQBDI0T0iqBa9qIhR6uQnaZLBLBxfnUK8OY8Rdf22ya3nW eWfBfWfBSYXj7rx9dd6+tuC8v+R+wGRPmP0m81f7prwNtjY52mSgSTzQKO6t l/bUS7sbgsEIpTEYZGxXO0STtAPlUi9urQNZAE/4oAyMRhOQpBoC6GHVX2o1 1rQbeW0mPkS7WdDGzOASAD0aDYxN4M3kE1vZ98BLTYbqRn1Vo2Hji9TpgScV EGbdRROEZmPFCWY9yAmqBNFBpgRHHOdFr0FBqqBN4Mdap68CmMDb4KeMOCVX C1xIMuFZjfyihH+mJD8p4cBfvt71X7u3/a/CY4lq2QWrSQTRVCttsEha6zds Et5gQg/p6mrStDfI6LwJXhUb+xZDmRQWLCQ05FUwY2+7yjtcd22yB/MmbL8J 2mSQtQnAhJnTtXx9EARRrym/eCIhJ+F/jqcwNsk4/D/ZiV/kpe86kQsw2X/6 +L5Tx/aUFh0sLzl8Hmxy6kjF6YRLZxOrziXyylKxpovYhBR0jTtqb0103r1l X1/2PQb/so/PVkdfPZgEmECAUF7en3j3+OrHZ9fBKe8eX4HHD0+BFdNv1q8C T4AG4BFAASCFLBn5xzd3fvn2LjyCGuAEAt9DKPHh2Y13T65jvH868/H5TWDO 394EB3BBwDmbjpmHl0jxGD6Pb0OPhCdQ/ugbn/gRP+LHf/SxdZtYTn/ZULYP AmwyXnv6nlv1YrL23Y0WsMmqRwU2WR83QTwcNdxzyAAmwBOwCcTKoHCy7pRX mzdmLrnWXLbQWwNvAJjAS09G5cCTxwHxU7/4vr3qdnPRmCbFLz7oF+4fFe5j kiZYx8X7K0iEAxM4R7BAbBIKkzdJmArZhGk5UadOqtLGFakj0lSfONktTHIK EiEcvCNgE58kFWzi+//Zu8/gOPLsQPDTY7ub3huA8JYACMJ778v7QhVMobxF eW9QKHhL0AIEQAPQ++5mezc9Mz3SSIqQYiWtTrpY3YRO2l3pIs582Nvbr/cy H5DMLoBszsyOuj8g40VGVlZWgkNUT+ev3/+9x0uPcFLRJmTeZGN2fFSUTbYR 3ljTtRHEEMa0V9uEXm+CzYSpxV2vY5OYIi2kOIs2mQgbx8mgC2Vbm4yE9MiT rQOv42LbfArdJtv2Fv5e2YQaHA820cNTnLIL+3RRTbpwfdc2NtFxjHquZqBD KqjgdubxOnIlzPx+bn4fO3eAla3l5pqFeWATv6Js9LVtQrXhovPk9W1C9Ona qIUXU3PhibVbmCX5ZmxjE5PEb5S49SJ4+tXLOxTCRrBJN6tWyqqVsGuBJ1IO wRNCKP++NqEv6IJAjMQFZRM6T+BPhQkUeIil8ibb2gS5QR8YCt9Yqi6eaiyM o0+oQhVs3oU5lLh6E7LSREYWNMkgSJuoz01ZV6+EttrkxpIfYu1qaMMmKy9s 4oav36ZNnGrW4ACbCBUHYGLT8GzwqKzjD2p5EBswUXOMGiJMJEyMShbYBHkC AdDAQFNgGOTtRnmHgciJEEIhsyddwBPYw5UkPVpU8lb4iLGPsIm+txN5opK1 km+1KeVtA5s86Zc198mIvAm1XgtVQl/NRXcHvfZk29mL9FmNaBm4LdhE1dMB Xz/4dVNFRhjw6+YxqoAhXEY12CTx2JsHdv9g/64fpCbuYXVU9Eo7QCW6AR7w hNiTFfHUmi66TajJJgATCLOGj0kT+pouqmfXN3u7yRym7k2ebCRWLFqewySO BpRgE0yakDZxX7vg2oDJOSfaZGnWMRvVqqUNLRXJp5N+Wpi+C22Sm/x2YeY+ yiaVBUfqSk42lCU2licATCBaqoAnp+h5EwnjbB+/Qi2ts6o6A4PCqbDq0uQg 2OT+tRh4BNzx7t0ZwAgE5k1gD29BgEqAJLBHpDy8OfFobfLZnVlKFggEMAhI 5Jcf30CYAChwXDulFcQLOgVlAcCBm2yuDVukEiKwhyvhDNUQDNM0mxNVFqlb 7fTp2tl2tp3tNbfXt0lv+UbexNiSSOVNns6pb4/IroeFa6RN7k30gU1uh4UA k4cjMhDKnYgIMDKhKB+WnYX9eWPjsrNrPcgHm8C7YJN7Me79Ec6DGOeWvx1t EmOfiLGOkzY5QtlkpP0gpRLKKRhxQpniJUzzE2cEp2aEybPi1DlJOsS0KH2M lxLqTHA1HnY3HvG3ngi0nfR3JAS7ThF5E2462iTESg7z4IEzc1icAzCB/ZAw kxx68nvahD6EkerZhXs7P2GrTS71n7iENulPI/ImOsakvXcyYpqImMZfIpSt eZOty7pe3yZbl3X9gTZ5afwBNgGSUAPi4RhtolNs00P4JTbhQqj7O8W8SnZb Pq/jtIxzVi0qUQuKtPwCg6BgUFzolBX7+stf3yYUPehC+T3yJn6zkChyh0fo Qfnr2yRgkgTN3V6jBGyik7X3CxpIm9R8tzaJ4wnVkgu7cmFjLgh8K84mWIlA 2QRL4Le1SVw/YeQGVotQgUkT+vouvJj+Dac3gqDbBGI0olmYtoFNri8R5fCb EYS4eTUAQdnk9soQ8CTOJk4NYROrkm1VctAmRJAqAZ5AWEieEEu81GwIYnA8 aROKJxBADPQIQINKiBgAJsRQxQ2eGHo7QSXmARYEfAQuA4AMdDfDp3R4zaZc tKRcMJSbQlHIW/rlRFcudW+npq8LS9dhD8fYYgsL2/EY5BIHE+wYTE1LoU85 wcCVhHBzbT8Dvn749UCSYMA3jc+qkfCbeMyaiuK0xGNvAUwO7vnB0QNvdDQX y0StoBK9kg+hUXDVm4UndJ7Qg6IK5k3iyuFxEdcWvcqdZhnmTQAmcCXZv4vn NEuGgyq0yWYPYffqeecGTM4BTBwAkyvTtrlhnVJc11yelJ/yJtgkL/ln2Yk/ o9uk6gxhk/rShMbyU5g0aalKQpswGgiYsJuysYFwv6BSTQ6FB5uM+fsvjJtv XPI/uD4CEvno8XkIMAgcY+oEcyWP18Yf3RwDtsC7nz67BBc8uzPz9PbMu/fm IeDgya1p8AUEkOHrT9d+/dk68ATtgNAANcAZ4AkKArRCAQSs8f7DjUmO1MAU qgMYXEDPntA6g21Ahqo02bHJzraz7Wzfuv0OeZOK/fQ1XWsh4eNJxcMpxZ1R ObGmK9aNeZNbIzLwCMDk0agchII2Ge8vo2yy4mKATe5FJcS6r1HBvZFv2GRc mjbCOTnCPkGu6QJrEB26IMAmGFt5Em8T7knkyawweV6cdk6ScU6audCdM8FL 9TYdMZW9bSnf5ao/5Gs+5m45BjwJM5OHOGlD3DTKJmTT4GzSJkSxCbmOa5s1 XQCTADc5wD1FDz87aWvGxN2VgEMYqewJ7F9mk8vKBLDJcH9qSHE2Stpk4rVt 8vqrubbHBfmE9rKWwr+nTZzbxR9mEyAJfiQaUKNN4vp0oU1eljcx6vgGLQ9s IuFVsdvO8NrzZZxirbhCJ64wCItNomKrpMQpK3PLy0Z7X9cmWHOExUfblpl8 a94Ea+HRJh6L1G3u9lu3X9OFRfH0CJilYBOfSWpX8wzw6ChqlHNrZeza7g2Y 1CNM/nCbvNog9NiWJ1thQh9oQv84/HR8WIVHX3iqxHzHtjahz1ikVmph4QkV cU6hLEP/SlPJF7Lllxy+YH6nHGNsiLDJtUWASYRmE4Ina8vB9RViQdcGT5Yj t65GrszaJyMqsAnAxKpiODUsh4rpUANV+DYNj1jQpeJYVERyZFubmFQbQeeJ rr+LWtxFJVAAJlvzJgAT4v4aLnwWPoJXgk0ArcRqLlmbVt6u6+vCXAyRhSGD 4Im8TdHThhjRD7B0CiZOSISXoAkkCV0fVJdg+mQTfJfiCV6Ge/zWwd2wQxfl EQisb4IQceqlgmY+q7a6LDPpxK4Du39weN8b+3e90VSbL+Y1qvrYwBOACRzE TTnBGhMqvsETMm+y2SV4o/vW1tolyiY2gwTnwsP1JGq48P8wsZAabbJ0IQCx fN61suAgVDLvgFiatS/O2C9NDp4fM/ULquuLTxakvnUm7W2InKQ3T6fsOpu5 rzzvSNWZ41VnCJ40lCY2VbywSWs1xClWUxanOYfbkosNhAdE1VpZg13D8Jn5 I97ehVHjyoL7zvIQ6AMk8sHDc9TyLTDIh2SZCRzfvxa7tzoMSAGzAFJwORZg AZMj79wlMimP16fgJK7j+tUnNwEjEAgHwAjaBDMd8BJgAh/HBVrgETAOuoOq r6ebBQKOMUeDy7rwDFyMQkH+7NhkZ9vZdrZXb69vE5y9CGFuS5oYqFqPiJ9O K5/MqpAnt0dk9yb60CbgjsdjPWgTOAaMgE2i3YVgkwVDw7Kz61ZIgIu+Ho4L 74/yHoxyH45wbwc6LutLJrrTX20TOlK2X9PFOQE8meEnzgmSz4nSzkszz0uz FvvOzAozA01HzaVvGYvftFbuddUddDQccjUfRZ6E2SkQYJMQNxV4MkSkTrKj oiyiKxfRvys9yE170c6LSJekvNom9Lnwr2+Ti33HL6sSZtWJw32kTfTMCVvP y1Sy1Sbfmi75Vpu8YtzJ99Amw0EN2MRpkaBNTBoW9uaiSk5eYhOhXsNX9zNk wnpuRxG3LV/CKNKKKs2yWpu82tlT7emt9vRUObvBJqdf0yYbXanJ3BnVkuv1 bRK1MIcsbOwhTNlkq0FeFkFLN+ZNHBo+PKMqxc09vDqASfdG3uS7t0nc7EUk Cb1nVxxP4Idizy54+oVHRATFtjah2gVTo0zgy09VtW8+c8rwGiqHQgW1JIxe aeWz9xADdFw9GGND2vMz9m1tsr4SurVKqGSDJ1eJjkloExd8Fb9pEwfNJmZS H3Frukzkmi7i5WbJCWUT6iWYAnhCruxqNfZ0mMlCko16k34iTAqmWflCN1ix QtgESNLToe/tJFZ20QtYejuQJwM9hE2wmxaOXKQ8ggkUoAo14iQuLfIym2x0 JybrU7DeBO5gULJhj98r3MPXbON7yG8Em/CYNbUV2SkJuw/u+cGR/T/c8+Yb FcXpcLJf1oUwUfay1N+ECX3YIi7lgrDqpBD0hsBU0MtMKOG6LBt5E7AJwoQs oue6BjdscmXBd/VicPG8f3nBuXxuwyZLc/ZFmk36+FV1RScQJoXpu3KT3gKb FGXt37BJIWGTuLwJ1pugTXitp0WdZ+ScUpWkVt/ThDbBvMnVeefNy4G7K1Fc xwX0AJVgDgWcgrkSOACVPLwx+uD6yHvkdHikAXAAxIElJM/uzD69PYPZk68+ vAZBrfKCY/AItQoLUySYFoGAl09uTWPFClWTAns4gwvG4BipAoFJE/gIJlPo GZYdm+xsO9vO9urtd6o3AZio646CTcYVlWCTJ1MDzy8YHs8oASbrwJCJPoi1 YSm44+lEH/AEDh6OyK572WCTiKRgrK/0nL6esgmRW5kQPRgTPBzjPR7l3Q11 LRrLJmUZWAtPrenCWnjMlVAwibUdgNi+Fp51fJp9YpabMC9IPi9OvyDNvNid vaw4e06UFWk9YSvfbSz6man4rcHy3YM1++wNhzytx4OMU4RKMLipoU2b4IIu wIifjbFZ585JgiBhsr1N6Eu5IFydJymkUKXxL7PJFVXirCoBbTJM2uT1a+Gp BV2/axV8nEFedv57YpNoQE3ZBJwCNjGq2Hpll1nLBnpQS7ni+nRRNjHpxXq1 QN3P6hE38btKOK35gvYzOnG1XdEc1LZHDZ3D+vaQssEtr3j9vAn1BaAv8Ps9 bOI3C4mB7yaJyyT1mIUesyAutrVJyNIdgOsNYnj6tShYamlrL79eyqqRMmvE rBoJu07CrpdyGiD+/W2ydWXXttXx1Hm8mOpO3CNqNGt4aIptbUI9XtKbcQW/ OUgReUIZBItK6DyJa0ccZ5PxqO7CrGNbmwBMbq2GKZusLYXWFkOUTQAmEA7S JlYl+xu18BouqCS+Fl5LhIU8T8cIBOZQ6Ku8CLD0MSx9DFCJuZ9JhIJYzQU2 MRANvrrwU3gTywDLQr4LYcTeX1QBy6ZNlD3taBN6ITy9bCSu5GRr0iQuXkyc FzfBbbGOHlRC1cJTXyrkCdE7mt8k5jVyuqrAJqmJuzFvsvtnbxSeTuAyqhVy hlEtxHJ4nSJeJRRGIGz6bgy7QWal2YQaAR9XBb+Zg9vgic0gQZtg3oSccaOe m7CiTYi8CWET+yZMbIsztivTtosTlnMjBoWwprE0EW2Sn/Im5k3ibVKS0FCW uFkIn9xWk9xRl8JsyGQ3ZWPeBGyiFNcYeptdenZgUDgeUFyesl47771xyb92 Jfjo5himRTCB8uGjBdh/8vTix08ufvrs8idPL+H6LhDKk1tTmDcBhoAIUCJU LgML2zH3gUkT2ON6LWTFnZXY4/Upqo4eLgPXwLtbK9wp0WBgtoU+9pEqRdmx yc62s+1s37r1FO0Gj9ADbNJfukdRRsRA+V4MZcU+RdVBsIm24bilPXlioOoW aZP3zuvBJnfHem7Fum+Pyu/AAVlm8mS8FwK7dd30c0d7S8LifNhTNoG3Ho3K n053P5oQP4EYE94LMxeN5VPyrBj75Aj75Bjr+Bjj6FjnobGOg+Mdh8YZR2Id ByBGOg8Ntx8Yat0Xaz84wTw+ziBiknViip0AMck6OdF+eIZxfI6dMM85tcBP OS/MPC/MuijNn+ZkhJpOOqsODZbuM5zdZSrZq68+YKo7bGs+7u1KDnMzwtx0 PyMpyE4Ok12FY4KMKDc1yEiIcIiWvwF2io+0ho+oZE8KEBUleEDUmAS5KSFe Spif6mMDPU55NyIRw9110sNM8DATIeC8j50Ee5sg2cpLdjDTPZ0Z4a6cMVbq NC8FbHJJmTBL1ptEFEVgk0mwiV876tfGfJqYTw37Eb+W5AnAxDAWNo5HzOMR y1jEDDEZNY8EdRGPKuRShN0DQ15V1KcOOhUQIdcAnIGAA+IMHIBcvErYw3HA pfDDUxnVK5h4d+OCIR9IRx2Ge7qVL9Z9uXEKCSGL8GbQB8RTQiHaDm8Zj4Iw QZtQJSRYPEJNnN/ajwvfgssg8C3Mm7gGiTVdRjUTMIL6QJ68tBZeyzFoODpl V6+0gc8oYrXksJuzBgSlfhNr3COa8AgnPYLhQYZbWReQZI8pzowqCoZk2UFR up+fEuCnRIREA2HCJmQMC1KBJwRLOYlxPMFjeholIkz1CdP8kkx/d45Plufr KQqra2Km1oiZETIz/Wa+1yxwm0UueGQySd0mntvEJfcYfAgSI2LfoITYWyCI GfFBszRgkniMIgc81iqYmu7WPkG9jF0jZVVL2GATEEotKZQ6ueDFEAo6Urax CcCEXSViQVQK4RmSgVG+NX4/m7wsqI9Tc+GNKg7gAr511CIuzINs/rfuF3Uo 8DKOJ9h6CyWC1ShxbKFg8k2b9IYQ2s5e+JJPDBsuzrmIHsLE+MUgLQI3V4IQ awCTlTCxB6RcjSzOO6eHtW741mlYVjWDqDoBpKg52EMY9lhsgjahsiREkIXw W/t0YcAxnEFubKCGlIgJ9mQYFUw9XEYEg36xmfzRCCKLmmMcIC/bXNOlIRMo xI+AnzXAoOa/06fDU5276CPgt9a/4xB5+Dg9b4IkoT4C94eAXyvaBPZAEngJ Xzni986skfCbuYyamvKs5BOETQ7t+cG+t3+QlXqws6V0oIdlUAkhjGqxfgBs wjEouUYVz6IV2vQSh7GbWIulIwaUwEs72Q3YYSTyJgANEC4VIA5qCCNVeEII 19oDATyxGwmbmMEmKo5Vx/cMdo+HtecmrEvnfMvnA1cX/MvnnLimC2xCBJk3 AZ5MhpRKcV1T2anirL1nM3bnJf8sP2V3fuqewvS95blHas8m1Bcn1p492VCS 2FSW1FxxqrUyua06taM2rbMuHYtNIATt+VTexG3ghGziieDAlRnb+mIIO3SB TYgq+DvTWPNOpE6eXPj46cUPHi3AMdgEtPLO3ZmHN8ce3hzHPl2Y1MCCd1QG YgElgkXu2F8L2IL1KfDB65eCN6+E4QDXYsG75K0ufvbe4pfvL3/x/CpVP/L1 p2u/+uTmn3x++1efwMHaLz66+eXzax88ugAX/PLj6+RPhJ914bN3F3fWdO1s O9vO9q1bb/GurQE2wVAQw032YVA2GexImVRW3x6SPptRvXNO+2RWdZ8sgV+P dQNM4AA88nisB21yJyJaC/BGeoq32gSueTYjfzQheToJx6L7EfYVwibZI5wE 0iYnSJscHm0/NNp2cJRxeKhtX7R9/yjjCDkR/iDEOBOuAcKcGGeenGAlTLAS x5kJU+3HZrpOTHeemGg/NtYGcXKk9WSs7VS48YSz8pC9HOKwpfSgo+q4pmy/ vvKwseawuz15WJAX5WcHmWTJCTs5xEqK8dNGhGlhVgJEiJMS5KR4GYnO9uPu zpN+VhKEF53CIpwC7xKFKvx0H63eJK7whMyYkK262ERYhalWfpqDmenpygp3 nR5jp03zUi/1nbg4QNSbjIBN+s8O6xjT9t4xrzrmUUbBGi4F7AmeEHkT42jI OBo2AUnGh6xjZGBWZdinGfKoIKJeNRzH/Fo4gJcRtxICzwND4sLv6seDoGcA g5CLVxn164Z82ogXhbLBk00v9Ed8Cowh/wA1NpEulK0wob9Fd8crbEJ15UKY 4AHaBM67B7uJIREaFtgEeYI2oQbEx9lEr+o06Rh6TWdfdx2PcaarKaOrIVXO LQw7+HPRvrmhnoVY33RIGhrs8oiyxlQlY6risCyXGErCS/ELUsPC9IgwHWwy xE8ZJm0CEeQm0WGCGPGxEyiw4FvAE48g1S/JCshPe7tPu2VnAsqqmLk1TNrE BzaxCN0WsdtC/Idcr4XntXC9Fv5mCODdDZuQJPGaxV6zFCJgBp5IvCaRS8+3 wOOlrFUhaujh1cm5td3cWikHq06IkL2+TdjgmmoxqwpCxKzEEAJPusrjgt+1 vU3oq7niciVxEtkqFHhqxRVf8MczKNkoC3rlCL37FrZdwnp5amUXPdOH9KAP Ht1qE3pCEG+CH4ev2cSw8dK8Z3Vxs2/wVQj/RixDBG4shyBuAk9WIuvLkaUF 1/SIzmMW2HVsq4ZJCAVsQla+UyShB4URetD7dGGlCSUUFAcGfNBCpmDggOIG XIw2gaCuwbQL/iDMxWAPYaq4Hk+iHbD+nV5XsrVd8NauXDhgEW2y9bOYecH7 w5eQ+r3jOJuNzl2dVVJBK59VX191OglssusHh/e+cXD3G2mn9jbVnlHIWep+ nkElMmulOgUL/pBYCwN6BWvA1wDHu1PuwG8FTn7fmjqh18VvpE4AJtYeclmX hLgSIKPi2g1CsMlkWHd+wnb1nG9lwb9yjrAJ1sJv2GSOKIS/Ou8c9fWpJPUt FckVeYeKMvfkp7x5JnXvmdR9hWl7y3IO151NbCxJbig+1ViS1FSaDJe1VaW2 V6d11mZ01WWyGgmY4FB4GbtEKa7RyRtdejbYZCqsAvuATTb6Bt+dgQCbvHtv FgfBw/4DcqzJ+w/PwUscwgjx5NbUk1tw2TwuskJ94NotXH8FfMAKESo5Qp2H k/evj926Gn14cwJeYnqFMM57Vz5/DrciAoSC2Rb4LBz8+jOwyTrELz+CuAVg AZh8/t4iXvnl+1fBNfASUPNdP/jsbDvbzva93ra1SW8REZsJlA2e9FXsU9cd BZ5Y2pOnVDV3hrvfndO8vk0ikoLt8iayR+NisMmTMdGDIc6SqWK6J2eUmxhj nRjBcYqdh8faD8Va9odb9oaa9wy1gU2OAkliHUfCzfsBJqNdJ0a7To50wplj w+3HYh3HJzoTR1qPDzUcCtQe8FTtc5XvdZbv8dYc9lQdspfus5ftd1Ye9tQc C7ck2SuO2iuPmkr2u+pOxlg5MU72CDcnyskIM1O8HSd8XQlBoulWgpd5gljZ xUnxgE06TuACLcIam8UjOOc9SC4G83OSfS8JL3tDJUTe5Js2CXXmjrHSprgp VxQJl5QJ08qT0d6UUO+ZYS1jxtE34lENuwYizn4IgideFXBjLGQCm8SChljQ OBIyj0YGCZuEifGL8PTlsxFPXPAkNhLSRzzk+i73Zj8uNxFAD/QIBkoET9Jh QuZNtHSb4NPdZgpjACIaUGJEfN8AxbYq+f1sQr8GAkiCGZORsA72HqsMbWLW ssEmWHLyCpvolF1GLVOn6uiR1nI68zsb0jrqUqSsMwErdy7af35UtTipvTim mvRLQz0FAJORgbOh7hzCJnzCJiF+aliQGuGnUDaJCdOoXAk9SwI2wUCh4AUu XrJXlOHrzvFIc13dBb6BiqixOWJhhi0sv4VYsuUZlMCzELEGySrwW/nUXHhq /OK2NoHwmcVug8CqYul72pWSpj5BA0QPYIQP0SjjNUC8/oIuCaeGsgnFk39P m7DaipitZ+FPCE+egAjs8Utvt4VJE8yh4H/9JkBn66F6cG1bQkXNMaFsQtXF Uy3strXJtaWNdVwkT2g2WQkgTCDWVyK3VoYWN21i07LAJnYt0a3rG4u4NpMj 29qEXmyCQkF0aKkEBykURAp83KYXwPMz3HyzN1crioNo5LWZOoF3cXkYnsGA a5SyFloQjYXBFPDAr1MwYU9VstNtstUj9Nh2TRfWoeBKMCy0hzPwDcGuCPB9 ELGrQCuAFD6zVsJvEXIa25uKM5IOgE2O7PvhgV1gk31NtQV93QxVH1enxLwJ GwEFAX9asAY5PHEbm+D8d0ooCBOqbRfaZGN94KDcQbYRJsvh4a9UYFHz7Ab4 R7J7KqK/MGFfBpgsBMAmqwsuuk0WZ+2Xp6xgkxFvL9iktTKlMv9wcdbeM2lv F6TuyU/ecyZ1D9oESAIw2dYmzAbgSRa3JVfQno/zTcAmTh0rbJdMR9Rgk7Ur wfvXYk/WJ4AeIBGgB9jk6W3Qx+RjMo0CLxEmaBOgyrM7s+/cncNadUyRwDE2 6fqTz2/96pObYAo8j8u9kBiAF6yCx0KSp7dngCcQcAAfB5t88f7ip++ATRa/ +nAVq+nhPNkHbPb9hxc/ebb0+burP3//JplDubnZDWz5Fx9dw5bFO3Phd7ad bWd79batTeRn30abIEyUFftVlQd6yvaqao+ATQY7UmY0dfdH5O8v6Le1CboD bPKQ7NmFa7qGpGfG+8viauGfTHU/HEObiMEmV82Vs32nRzgJdJuMth0caT0Q ato33H4YSDLUeijSchD3gBGIaNvRUNMhX+1+b80+CHf1AVvZbmvpLkfFXgh7 Oez3u6sPuasOOcsP2kv3O8rALEdCDYljzVnD9WmBysRIXcpYR84YI2ecfXpa nD8lzotwUp1tx+xtRz3MhCA/NcBLBVy4GAmOzhOurgQP69QmNAh0+LkpAQhe apCX6uVuEx4ORIqbTYSLlUxG0qAgxcJNsTMy3J2ZwY6cUWbqJCf5ykDiJWUi 0aeLtElU0zll64k6+sEmwx5lDFTiVUXJnMgokISAiWEkRNokbAGeTI/ZRoeM YZ+KyoZQ0BgKaIZDuuGwPhbWw0HEr4bLKKFsmzGBCyDQJmRsDNEmWiH51dEA hHI4qMKIhdSIi60pj/8pNqFgAj8XSAIBx6MRPezBJgZ4AKPZhJ462c4mTIOG rVN19Ujq2B0F7XVpbTUp/PZcu6ZjMtB7blh1ZUJ/eVw7G+4ZUZWODBQN9eYH xJk+QZqPtEmAR67f4yWjTWJkycm2fbqAJF7WSQg4wLfgGic3ySNM80iyXOJs hyTP218+ZGgi8yasuLwJaRMBzSbiOJuQIfXBlSax3yTCvAlhk94OlbRZIWrq Fzb2Cht7BBBNwBOIOJJgRcn2xSbfVAnCZNv41iKU38Mm8HFs6gV/EoOSDQxB LNBHt2PSBIVCrcyhL+vatmyKyqQgT+g2wf7DWEqPdwi4iDWHkzHT5XPe61fD N5YhgCeBa0s+iNVF743V4I3V0NpqBOPWavT2avTKOedUTOs28dEmDh3brmFZ SImYaUu2XizNeg2bUFMUKZ5goDuAJ7DHhAg1A4XKnsCeujPeFn801cWLmMDY 3ayQNhHxzXp2qsBka7vgbRsIUyTZWn6Cq8LUvZ2ATeAJJkqwYxvahOjZxW0Q cZv4rHpOV01xftKJQz85vPcNsElW6sGW+rNgE3U/T0/axKDiwk0wbwLfEGy9 ta1NcBAn2oRa3EXPm7wYemLqtpuk5Fx44lZWndCqFTiNYq9VNj1kuDjpAJus ng+uLgSuEbMXXWCTq/OOxVmi2ARssjTrGHbLB0S1gA7KJoVp+06f2pWb+GZJ 1sHGkuTWirSX5U0Y9YRNOM05cTbBvAn8iBuX/HdXog9vjJJF7htZkvfuz2H2 BGzyzt0ZZAvKBQL7ZeFSLixmB0Rgo2Bc3IUSAT5g32Dsx4VjGTHgPHzqwY3x 9aWhOysxYlrK3en3H83jGHoI+BQABNeJPVqDP8O5p7fnHq/NPlmff3QTuLTw 8w+u/+LDm5+9u/zl+9d++fHa5++tfPrOjk12tp1tZ3vVtq1NyHJ4ImlCwURd dQjzJtqG43ZG+ry+8dF4/0cXTd9qk9thIdqE3qcLewgTZSmETUSETcbFD6Pc ZUv1XH8e2GSUkzDOPjnGOEqUwLcfGms/NNx+5Jwo/YI0e5KdGG4+6K/b663d ixhxVe6xlb5lKvyJPv9HEAO5byhy3tAU/MRStsdedcBRdchVc9RWdsBeftBR cRjXdLmqjrmrj4fKTw1Xpy0wiq6KqhdFled4xSOtmRPc3HPdxQt9pZPivCg3 PcrPiAmz3MxER9cJW8cxCOAJvPQCSXgpL4K0CYSbm7E1nOw0JzsVwsFKsTPJ YCRb+MlmTrKtK93VkRFozx5hpEywky4rEi4rE+fUiSP9aWCTiKp9zCwNDcqj TsVYQDsZNowHdWCToKM/6tUO+3Rgk9GweSwyCDAZCVtiQ8ZISBvwKX0ehcfV h+H3DsBLDDgO+lWhgBrTJegRKoGyFSYQEZ8GbRL1bxTaEwHSCaoplWAM+bdf jvUH2oR+AQmiDZvAAdgE9l6bHOtNcFkXZZOXzTfRq1hGot6EJRc3sNrPtNak t1SmcFpyTf0tY175uWHNpTGwiX4u0j9rqospzga7s32idC8/1cdPRZsEaTZB nqA74niCRSg+dgIc4EnYOzin3IJUtzjTSdrE01cW0TeGTJ1BE8Nr4nnMApdZ 5DITT0rkmi4ebU2XcDNEXjPBE/+g1D/Y7R+U+Y0in1HoMQqdOt6gkqmTE3kT hagR8yZgE4QJ2iSu1P1lNtl2Tde2QhG8hCevaZOtdfF4AXYbhj+JTsEEfdAz IPQWwYAL+rIunMZILdCiRvmAOLa2dKD3dqD6D8PXm5Z5eWGTG8uEPiibAExW rniovAmmTjBvcnneMRFVu4w8sAmEU891gJo1r2uTbdd00atOMOAt1AfyBBeM wd1QKNTF1HowakEXlTdB8pBTGjds0i9pxD5dWFcSV3IShw56TgSbeoE76N2D 43p2YeEJfAQzHfCbhS8Jo6UQftECZgV+D+XidqmgVcBugH1Hc2le1vGj+39y aM8bBTknOlvK+mVM3YDAoBJBGFVcIAnwBPYmNRczILhqa6tN6DzB1Al1AZ7c QI1BbDXAZRgim15k1xP/MPpscrDJpSnnyvnAtfNBiOsXPNR8k6U5+5VpK9gE +BBxSPv4Vc3lSbimK84mDcVJLeWpr1jTBTaB4LflUT2EXXp20CoaDyhw9uKd 5aF7q8PAELpBiDKTJxdgTwkFtUKyZR5kAQABPmCfLqp3FpafgD7QKcgQUAle gM24cHIiLgCDk88fLBA5lLWxZ3enyB+9QK4uAyhdgGsAOF99eOPrT2+BQT56 svjBwyvv3r1wZ3l8cRb+2ONfvHf95+/f/PDR4idPlz97Z/W7fvDZ2Xa2ne17 vb3MJtRqLrQJBNhEU39M13gCbfJ4ov/jS+ZtbYLDTcAmsL8TEd3wccAmw7Kz kwMV9NmLRKvhSemDUdGTCenTcfGjYd6qtWZekT/KTRznnZoAnrCOE+NLOg5P dB4JNe2fF6atKotXBormhZmR5iOO8rdtpW9aS94cLHrTVPhTQ8GP9Xk/1p3+ kSb/x7ozPzGXvG2v3O+qPeypO+5rOOmpS/A1JoVa0wMt6b6mVE9Diq3qpDL5 TWveoQVmyV11530t40Z/0xzrTLQ5dYKRc1FafFletiA5OyvIG2NmOBgJlo5j prYjZoj2o9bO405WopeXguHhJkO4yXCyM7aGg5VmZ6aSkUZGqo2RahGkWHhE 3gRsEuzIGSHzJoRNVBs2CfYUhJRtI0ax3yQdcvSDSqaHTMCTIbfSZ+0Ju1RD Hs1wQD8SMoFNNngybJoct81OuyAmJ+yjI5bYsCkWNcJ5esCZwCZDECBxGZOX 2WQ4QEQsqEMjxNnkj7SmKy5pAhELaSHgJWZPwCZGeOJSv1jW9WqbGNVcs5av V7Hl4kZWW2FrdUZLZRqnOVcnbxz1yBZiustjhisTpoWo+qKjdbj/jFeU7hGk eshiE4jgZt4kwkuO8lOipFCCtF5tFFIAJtRqLmqtF2mTF3kTTz9hk6CpM4A2 MfHBJk7SJh4z12PmeMy8zeCDXNwmYk/ZJGCVBW09RN7EKEKbEPUmcqLepF/4 jTVduKyrm1cXt5TrZTaRQnCIQKSgU/7dbAKBT63wx9P2M9AmFCKoRVlYSIIt vDB1gg274rIhdJvETSClL+WKswm+C1+/qRHTlQXfzZWhtdUhAAjYBGGyfNm9 uuS9RizuIkrjCZ5cDa1dDV+as48PqSibuAxcomeXlvui/v2113RRc+Hp5fDU Si08g8bBUSlYeEL/LDUVhdINnlf3EGMcMcOilLUgTPrEDXHrtZAY27YLppoJ I0yoMSjwkh44zJHKwsgE9bAHTcBexK7CZV3YmY14S9rZ182Q8Fvk4g4xr7mh Oj/p+K5jB35cWpjC6qgakLMIlRBJE+DJhk3oPNnWJtjSjRIKeoS+1ota6DWo p2xCnLcbXthkJmq8NO1cvRC8fjF0/ULo2gUP1sJTNgGYQIRs4l5eJWWTwvRd BSl78pJ2F6TsLs0+VHPmJPDkZTZhN+VQ9SZYCw//j+Q2cMJ2yURw4NLU4I1L frDJ3ZUoFsK/Q4wvmcPlWyAFrDqhYAIHT29PPbgx/mhtEnMlVCstXK+Fk9w/ fHwREyUgFLI85AZmQLB2HktU8F2gB1xAVrIvfv78yufvLUF8+g7c4QJKhxw0 D3cgCuF/8dHaLz5c/+ydax88XHx0c/bB9Zl37lyA4y+f3/jy+c0v3rvxXT/4 7Gw72872vd5eYRPkCb3eBG1i60qb0zW8Km8yIgOeoE1uh4Vok5i8iLLJWoAH ZgGePJqQbNpE8jjGX7XWnhsomBAkj/OTJrmJk+wTRHPgrqNgE1/d3kjLkRlu 2mJv4Yqi5Lz49GjnKWfFHmc5xF535X5P9QFv9UFP1UFf7YFg45Fw0/Fw88mh tqRYV/oIIzPGyB1m5sbYBYH2HGtNsrroiDB1l+zkjxXJb/oqki+Jqu/qGI/M nLvarkvCsllm/gIn/7KgaElcsiovX5aWAEBsjJPAEwiwCQS8dHGSMJzsUw5W IoaNlfbqsLPTMayiNKsgzcnK8jCyyVr49Gle6qLy1KI6aUaVEO1J8cvyQgOt oyaJzygJ2/vGAtqpiHEipI+4BjwWWcipDLtVES/wxDAatoxHbZMxB0hkfs63 sjK2tjazsjw6O+OODhnGRgcnxm3TU865Wc+5ed/5hQDE1JhtcmRwdMiI67uw 2GRr0oSwiVdDwkQHATAZCYGG9GgE+pouiD9GLfzWpAkVcB6F4rHJ4mxCX9a1 TQ9hjcCiExnUvF5JM7u9qK0mE2wCzwYKYc2QXTI3pLkQ018eA5tol7xd0b4z bkGqCwRK2CQN602IkhPSJkOb4d+sK6EXv3tZJzFpQpkFbIJrurzSbJckxynN xzVdIXNXEGvhzcSaLhe5pstt5rpNHLJVFwbRp8sJD7pGvsdEjEEJWLsBJmFH X8giDZL1Ji49f1DJ3LRJYz+xoKuBvqYrrt7kpcUm28Hk39MmcBJs0tV8BmyC eRNcZxXXxXpzVGIPveSEPmORUgbVT5uiCjAEgnpJnYF4YRO3Ar57UyNmsMna anT9WpRuk6uXXNfIvAkWm6ytRjBvcnHWNhZRUjZxG3jErBPd69bCUyfp2RPK FxRMKJvAlfSMCVVRQrkGhYIDHMnK9/bNCSmbo+HJ8fGYOnl1M664NVqYWwF3 UDbBOnrACM5tRJ5g6QrmUHBZF/z1wi8ULgCSUEMY4WspE7UpezndwjbgCewZ bRWZyQdOHv5pZUkGp6tmoIeNNtENCExqnlHFge8G/ETYv8ImWOdO6ZUiCQYm TTbzJlTShFjTZYPQCV1mqd/eMzts2rRJmLDJeTf2EN6wyYwN+3ShTag1XWTq ZG9+8p785F0lWQfBJvVFp+qLEl9iE6KBMK/1tLirEG1i6G32mnhRl2xmSAP3 R5vcvxZ7eHPs0dr44/UJAAjWlUDQS+DxGITyeH0SePLk1jQahGojjAMWMbD+ HUclYidhVAyOeqefJ/Vx49ef3/zFxytfPF/6+QcrX324ih/H9ArA5JNncKur n7+7+umzlY8eL3/2zvWvP7n31Qe3nt+/8uw28GQJznzx3s3v+sFnZ9vZdrbv 9YajTLbE7s1lXbR+wtUHcU0X2GTB2Pxoov/DC8bnFwwPpxR3x3rujPWASsAm ZA9h0aOxboj7MfHtCH/Z2THSUxjtLpgcKL1obrjm6bod5t+NCu8NiwAmj8el YJMno+LHMeFNZ/P8QOGEKG1ckDLOTRznnJzkJkywT4x1HfXV7PXX7gs3Hp5k Jl+RFVxTlF1TlE8x00Y7ksY7UyYZ6VOsjBl21gwra5qfNy3InxMXT3ALol05 Q125wbYsQ/lJ8Eh/wWFp1n5u8ttdJ3/cfPhHjPS3Wk78SJD6lrM65Vpv86c2 yS9d8s8MrAeSyuvs06ucnOuivFt9RXfVpXM9+WOizBA7yd1+3NZ82NJ8aLD1 qKXjhJ2VZGWlDLJTB7lpFk6qmZNqY2fYIVgZNgg2RCYZWURwcojgQpy28047 hXlOQb6bV+zlFgW5xVFhTkyceU6btKBPnlCdiPYmB6U5sf7maZ0wZJUFrbKY Vzka0AzDs5NX5SNGOfQP+TRDQV3Ip5kYsV9aiExPuENhrT+gsjvkDmePz68c jpkmp5xj49bxCfvUlHNm1j03552bJ+LyldiFi9G5+eBIzOb3aX0eNUTAqwl6 tSG/DgIOAh5N0KeN+HQYQ8CTgHY4qI+FDEMB9RABBFWUWNmlxuJ0sqUw0APQ AfTo9Tt7IPAk/S0y+ukNuKj+wPQuwVQ/LnrGZDNfo4E95k2INV12uVnDNagY VBthCiP0iniECbDFpOGZtXzdAEsmqGe0nGmpzmiuSmurzegVVDt1rFFf30xE szBinIvqLrqZQ/0lHlG2i5/h4qV7+ekebkrwhU2ShniJQ1wiiLVbEHBACw/r hBfMsnk+wDsV5Ce7+SlecYZHkuUUZRH1JopyshaeATbBNV1ELbyVHFRtEroN fBAHhAeXbOn5boPQaxJ7DCI8CAzCd0Put3R74QnKKncbxRYlWylt6RM29AqI 6HmxrItIoMj49Vt5shUpG5NNWNhDuEoIJCGiYtt42dyTrQXy1KRF+rDFbW0C 55mtZ4EnlE3Ivr7xFe4IE2q6ItVYmKqXhwdgXKwFQSVHKIlE/Ro0C10rlE2I VItbQa3poudNcE3X8mX3DYDJteD6tdD69fCt60N3rkfvXo9enLWOhBQuI8eq 6bJpGU4926ljW3WsQR3LoiVDwzSDo9VwABKBA/ZmYCfhzVGMag5BDFIZOkyd wH6TG3ryJOwJmKvYxPhRWlmKhgaZjSuJHlxdmr4OIoiZJiCFFiXABCQLMCGq 4ImVXXSY0EeZbI1+SQuEQgqfggDgtJMB2AH1dKh7OmAPx3BG28dAleCt9AOs 4YD20pwffoNAG/j6UaM2xZz6XnE7n1Hb1VzK7aqGfXbKwbSE3dWlmUJWvaYP /nLEJrCJgmdQcnB4PQQ9bxJXQrJVJRgvciW0gYw2oxTCToSEypu4Af7OPrDJ 5RkX1ptcOx8kV3PZMW+Cc+GXZh3Ah6BVJOeU1xWdqCk8VpF3CHhSmL4vP3VP PjnipKrgeH1xYn1JYmPZKYim8sTmiqSWyuT2mlRGQyanKZvfnCtszZN2Ffby yrXd9Zb+Vp+ZDzaZjmoWZx1ri6F7JEwe3NiIJ7emnj8499GTi588u/zBo/Pv 3QePnCNHtBNnPn+PWIj17r35p7eJAfEfP72MAxZ//dn6n35x++tP19AaOHsR 23DhUi40C1yMuRVqRgkmU754fvWzd4laeGrKCaUY8Msnz+AjVz4FoTxb+vjp 0idPgTA3fvnx+hfvrX74+MqzO+c+egzv7tSb7Gw72872qu0lNtmYvYiBNgGY qGqPYL3JpcH2p1PKjy6aPrhkuj/RdyvWfZe0ydqwdB2Oo3wQx8NRMRzcjnAX bc3Dsvxod97kQMmlwYYbfgacvzcswP3TSdmTie7HI+InMdG6p31WcXZUmDou SpsUpkwKkicFSeOchOHOI/7qfeH6Q9Gmo6NtJ+e46Yvdhdf6y25pam4MVF5X VF7rr1juKb0qL1npLb+iY0zJ6oe45fbmXGVpgvT0QVbSrrbjP2468sOGw280 HPph7f43qvb+oHrfD88e+nH50R+Ksne5apKvSet+bub9uUPyNy7Rn5sZXyir n3YX3BKlr8ky7qny19Qlq4rCC905Y+ykQOtRe+MhS8OBwfYEGyPZwko3MNP0 nAwDL9skyLWxMm1MMliZViKyIWycvI3g5g9yCzCc3EIXt8jNq/Twyr38Mp8o 1yfOmNCemjYkj6lODPcmR6TZE31NCxr+GDyiu/pG/Sqwidcqc5rE8Ejvtsmj Id3ctGf95uzVpdELFyNDUfPQsHF03Do9655fCMwv+OFgYsq5eHXk6sro8urY 1eXRK4vD5y+G5s75lq7NXF6ehJg/Hx0b9wxFbT6/IRQweVwau1XhsCo8TnU4 YBofccVC5mjASIYhGtQPBXQRvzbi12zwBJiwGWEvPMgBOoAevRABF9hEjmcw 8DwZ8SMXt7XJ1lwJVW+CQoGDWEjrs/fAs5xe2QU2wVnwiBHqmLIJnIEwaoiA hzcJt6qzKa+pOr2pKq21NrObV6Xvaw07ZWNB5UxUPx3RzjuZkYEKr6TAKchx 8DLdvAwnOxnrTULcpDD3VIR7cogMoIdvS3jYJyG8nATCJrxTEAF+kkeYCr9o tzjTLsiwiXI9/WXDppaAoT1g7AKbeM1CsAn8lolWUdaekLWHaNFm7/MaJS6d 0KbiwgGEWy+Cl3DgN3f7iCmN3U6jxGftcZmkFjVPIWmR8+u3jW+1CVWEgiMX MXBG3ivi9W1CnwVPCWWrTagmTlhvAo+XlE3os0sg6P2E4zoM021CpUjieBJn EyynourisSUdrum6sRwBmNDrTchaeP/atcD69eCt6+HbN4bukgE2iQX6wCYW VQfwxKFlQgxqOy3aTrNmI0zqLpOqC5BCBnszyFVeWp6FHBZP2IREB+ACA22i I5UBEXceT9KDOqkhtUKARcEgirPI26p7wSmdqp52sAlGr7iBGqpIDTShppNQ VMGThEe62wbAJtJW+MpRAS+V5FtUwG9Q3duJXzkcvwg6GA0b4S8ZXmKCrLUu t70hr62ugNVa1tlY1FCR01KTD1GSl3g250RjZa6U26jr5w5qJRaNWK/gafsJ leCCLqOKQw5J5G1tC7ytTeCCuKL4jQ9+0yZYb+I2S8Pu/pmoEWxC9RBeObcx Fx5tcnXOgTYJ2cTdrFJQSfWZo7isqyB9T17q7rzUXYUZe8vzjtQWn2wsP9Vc mdxQllhXcryxPKGlKqm9NpnRmM5tzOI35QhbTks7C/t55bru+kFFG9hk2C2f jemW5p3rS+EHxDjFyUdrE9g469Ha5JNb0+/cnQN6QODAd8AIVQKPsxThAghc eYVJE2yuhVPgcU/NeccZ8XgepyhigTzWoeBgFJzkiD2H8QCXh6Fi0Cl4jMka 6jJqOdl3/eCzs+1sO9v3evtWmyBMKJvoGk84WZmL9q535zSfXhn88LKZbpOb UcnLbAIxrSq7PNgINrkzxIO3IO7HhBs2Gd3GJhP8pHFe4gSXqIsP1B2ACDUe jjQfjbYeH+tMmmanX1dV3rc0P7J23Le0LveXTzIzhluTdM2F7NPHq468VbT7 Z2d3/7j84I/qTrxVc+yn1Ud+Wnvkp1UHf1y6542zb/0AgpH8Q33l0Xlx0UpP 5QNF/Yeqxi+0LX/j5v59QPi/hDh/5mj6UHXmUU/m4/6sO4r8u8rCW8qzyz2n 53ip0a7EQNtxZ8cpW3uilZVhZmXomRlG3mmTIN/KyCAjcxCCCftsCBIm+RCD nHwLJ9/Mzjez8q3MPCuzwMYssbOKnewiFy/TxU8ZUydM6U+NKo/H+pKHunOn +lsu6IRhW8+ITxVy9g15lWNhfcDV77RIQ37Nvdvnf/nVk8ePllZWppaujt9/ cPnnXz189PjK3Xvnb9ychlhZHV9cig2PmIdjZjDL1LTr3PnAlaVhOH/zzsXV tXMrN+eXr81evDQ6OeUPBE3hoDngM/i9+qDfGCIDeDIcNAFPIEbC5mEiY/IN m9B5EvHDg5yCwgjy5PewycvSJVSMRvSYqQGbwN5rk8NTXJxNUCL0Vl14xqLj GNREwIMZ3SYQgq7iAUmd3yoe9vaNB1XjAeWcgzE0UOER54NNnPwsN/9/gk3c ghSPKN0lyrDx063CHHdv6ZChyadr9Ru7iB7CFhGu6YJH67Cjb8ilGPVrYh5l gMyJWFVcp07o1Avh2GsmOnT5wCbwAGaSkg9RhFDAJvBwKOPVvdom9IZdfwyb bIXJH2gTVMbW1Al9wjvdJlTehN6Ai1rWhfkROINawZegEqyoovAS9irh+zYz Nrhpk8iWPl2/m00s2i66TQa1LDI4m0HUpFj18KjMR57E2YQKA5lP2aoSYpDi pkogcOY7vMRcDNyN+giFGviIUt42ICOyJz2ieqreBA2C03CoXMm32kS5eZLu FKxDgVvBFw/voOhuxfZrcJ+2+tOdTQVgk8aqTCAJs6WU11nVXl9YW5pZeTa1 rCAJT/YIW4EkYBMIwwBfR7MJwoRuEwDIVptQSRO0CQZ9AZgNSEI26bIZxNin i1jTZZIEnX2TYd2lKSf2EF6e9y2/xCZhu0TKLAGVVOYfPpuxuzB91+mUt3OT 3z6d8hYgpTj7QFXhMVAJ2KS+NKG2GI5PkjZJ6WpIo2zS3VXYz6/QyxqsA+1o k/lRw9VzLsom4BEwCEoEeIJOwdISOElNM8HGXDjBBE7igHiqNxc2Cqb6cWFm hJqlSG/VRV/fRRmEmmkC9wHpwAFOZkS5oGXQJngl3Af7CSOFvusHn51tZ9vZ vtfb62RMNqbDVx9S1hzSNhwHmyw5GM/ntV9ctX90xYI2uTfRd2esZ21YemtE 9rK8yZSy9LK18WaAeW9Y8GBEBDCBeDYlB55QNplTnJ2UZk5JM8AmY7xEsMmM MOWcJD3SeszfcBAi1Hwk1HI00no81nlqipux1F9y29gEcV5S4KjY15v244ak vTUn325LP9KRebQxaW9z8v6OjCOVB39UuveHxbt/VHXwp6yMo7r6s2FR2xQn a0leclddu95bcq+v5Lm66svB5q8Mtb+xN/9tiPmPo/y/jzJ+Y6v8SJGzJky+ LUm/35v3QHn2zkDRkrzgnDDb3XLC1njM3pnm5p62c/LM7NN6Ro6lK3OQDEtX lqUrG8PKzocYZOabmXlGxmlDVy6EqSPb3JFr7ii0dJ6xdhVYmak2duKI6sSk Dm2SMizPm1W2XzZKYj71WMgwEtDBs1MEnqCCuvkpz1/8+Ud/+zdfPXm68t77 a3/65x//9l/+w69+8+G11YnZGffK8tj6+uza2sxQRD+g6LLbZIMWiV7H06jZ EAY932wWj4y7J+eC5y7FLi9NXL4yvnB+eGo6EAqYfB6dy6Fy2gYwbzI67IgG jCNhy9iQFWwSDeohSKGAROJtEg0QE0/iePI72SRu+DvaBBlCj7EhA5bDo02w 3kQ30Ilruqih8HSbUEkTuGDbvEl9eTKrJb+HX+kxC4bcgMH+EW//nKNrWFVF 5E34OS5BtuePYBNPX9nGmi6yFt5LrulymYnnKK9V5rFIYR9w9IZc/bB3W6TY kQkOfPAEbpY6TWLPYLcDHqW0AhSKWcVFm2wf29Wb/DFssq04XmaTl81ejLNJ 3KQSapAiNV2R3l6YXhFPXUwve6dnTyiYxII6COpkZMMmlsXzfrQJmToJXr/q R578TjYZ1BE22eCJususZpBJExYtb0JUmlA2AXFvrNQirUGRBBdx0aFB5wl4 ZEDWAiShTuJNdJvLwPAAbk5xBi5GnkBgkQhVYAKOAFNgJiUue7KtTVSydrpN NoRCVppsfIo8hvtg9gSO4bcMPKkpTYGoLEqtK8vqaDgLUVOSUZp/CngCVJHx mwe6u4AkaBOjUqBTsHA1F5U02bYt8FabYJkJ5k3oeRbiAvgnyBSfN4F/xPw2 +XhQg/NNVs+/1CYQQAlR51mASfnpgwCTM2lvnyZgQkRe6q4z6XtKcw9Wnz0G MCHjBERjeUJrdRKjMZ3fnCNozhW35csYRQOCSmNPk03Z4bcIhpzdU0PqxTnH rasRsMmjtXEAyPMHC4AOCFyy9Xh96uaV8N3VETiPxAAUgBTgXbwSeAKBpsCW XDiBkao6QYBQlMCXWGaC2RN8C9yBjYhxlDyWyWPg2jC4AFMnCBy8J64Tw15h ePF3/eCzs+1sO9v3evvWjMkGTMr3KqoODFQTo+E3bHJOBzb58LL53ngv2OTB ZP/d8V4iaTLeu61NIpLcCUXx5cHGtSALYPJoTALXwAHa5MmY5OmI+Ja3Y26g aFycPi5KmxAkg01GOScnOAnT/KRw+3FPwwGIUNuxGPPUBDd9VpR7TpI3L867 KC+63FsC+xnh6UjbKUV5iiD3cG9pqjj/RP3hn1Tv+WnF/l3CzP3ygmOG6owQ q3yut/2ymnNFy7vWXXZbUfNI13hPU3NPW31PU/HYWP2Rre7jwdpfOhr+Zoj5 TxOC30ZZf+ts+Eh55qks654o/Z40+0Hfmdv9RdflZ2YFOcNdKc7mRFdHmpuZ Y+3IHOzItDJyNiN3kHF6I5gFABMLI9/EyDd05ek7IU4b27OM7dmm9jPm9nxL R94gM8XKSogpj0/qEsEmI/2psZ78OXXHorl7KmoZ8mnmJlyTIzaPo39lafyf f/uX//avf/eLXzz76lfv/f1/+ov//G//8Ff/8ev3PrkHDNGoWGaj0GGThQJq ONAMMPtkrX3yNkVvh1LRpRpgqJVMjZI5oBGabf2+kGl0wjMzG8IYCg8G/caA zxAOmkElM5P++ZnQ/JR/dtwzGXOMDQ3GwkaACfAEYBLxqyCo7AkR/j/IJtvm ULbC5BU2MagYaBPECHVMT5pAmOCpT8uDpzIpr7qj8TQmTaqLEzobc7s5ZS4j L+yUxbz9MU/frL1zRFsLNnHws93gCH6Gi5Pi5yYHuMlBzqkQJzHMOREhw8dJ 8G6JbW3iFab5JJkeSZZdmGkT5Xr7y4dNLWEzw2/s8hi5HhMf13TBozU8GANJ fHa5H2wCf2Ou/qCrn5iyp+M7jMQ8OBAKHEDYdEJ4iPIOymFvUnLgyZBIkfDq usm58N+IzXQJfcTJH8MmdIlsjde3CfzZqFp4qgSe7gsKHfRp71R74biB7/S6 +K21J5RN4F08A78CAPL0qGXpQoCqN0GbIE9e3yZWXdcgEYxNnjDAJpvB2gxy hju5pgsXdOk2ikQ6t7UJlT2hIwUuxsVa1Bm0CXqECrOGSzkFfgQJkxYyycJQ 93ZSLbawuVbcvEVUhnI7m+BLevakX9zcJ26mZjjCAdoHbo417PATeV1ltWWp TdVZDRXZ1cXpDRU5nY1FwBPYC5m1CmmnUsbQ9LKBJBaNGMKkEuoH2HELuujT 3uO6B9MzJlj/Ti3oolvGYe52WGROs8xhIjkDJw1iwib2HsImk99uE5u6S9B+ pqrgCNikJHsf8ARIkpe6m8yevJmX+nZh5t6y0wdri0ElCXUlxzF1Ajah502I NV1k3mRQ0ean6k2+aRNEBzb7xTHuABOIR2uTuHwLTqJHqKVWVM0I2oFWwP5i iRe1TAtXXlGZFOpirJSHt5AneHNqoRe1Qgxv8uvP1v/k81s4bxGFQmVqvusH n51tZ9vZvtfby2xCLeWibAIwGajeyJtcdTLfX9B/uex4fsEAMFmLSu5v2uTe RN8r8iZXrE3rITaQBC54mU2GeUlRTsIw60SMfWKEfWKctEm0KwFUEmg5Eu6A k8lTgqx5Sd7lvmIQyiQva4qffbGn+Kahcd3UHGjLkqbt6s440Jd7VJF3KNCS PSOqvNTffKG3CeLKQNs1HQtiaaB9RVJ9RVA2xzkz3JYWbk+OsdMuq0of2Bue OBo+shE8+Wtf+28j7H8Z4vzDEPc31obnPfl3+em3BJnrkrxbssJ1ZeUVaWGs Kz3YlhxoT/N1pAcYWU5WgYN1hgj2GTsRhRBWFhGDzEILs9DE2IyObBMtb2Jj beZN9KfGVCdGFWkjvQXz6k6wyUjQMBG1TsRss5PeD5+v/8s///W//te/+5u/ /fq//ff/8s//+vcff/l0eNJncWt61EIwiEbBsOgFNvj3qavf6+gNuBXw0qzj w9O4Qc3RqdigFbWC0avkKjTCAa3IaOn1+vRDUdvklH960j8zFZifDV++OHpj dW79xgLsly+PXZwLz014J0cc48ODYJOQV73RwuubPAGV0GEScPX8Tmu64qaZ vMIm267p0iq+YROUCB0meMasZZt1PDNhk04xp7KtPqeuPLmuLKms4GhHfbaU XWrXsYN26bCnF2wyY+sc09WhTTyi3E2bpPyhNsF6E7SJgrCJ39AONvGZ+T6L 0GuVBpx98MA8GjFMjlhwhgv8zfgcPX5nL0DMYRbbgCRmiWuwG/ZWA9FQCOtN 6DbZBiY0m9Al8sewCcpia7y+TVA38GeDR1CwyctmkVDttuIGvqNNqD7D9AQK 3Sb0tl3Umi54F4/JMaMbNll7YZPQjeXAH2gTy8ttQq80ibPJ1mVdW22CGCFW OZLooFADNwTyAGypoIru4V1NX4dS3ooLwLDRFiZQqAElcb2FX2YTkAi1lIuy CX4WSYIjTrDBF/wI0AH8joAJ8Ltuqc1prSuoL89Gm7Bay7gdlXJBi7qHBTDR K3hAErNahGGg2YSCCT11stUm9MZcWAsf39TLQtmkm7KJy/y6a7roNinLPVCa sx9skp+2G2ySm/wWaZNdYJOSnP1gk7qSk9Vnj9QUHW0sT2irSW6vTWbXZ/Aa s4Enko6CXm6Ztrve3NfiM/G2rul65+7sVp7A8ZNb08CT28vD967BZdNYeAIX oCywth1Hw6NZKC9Q6QwUCpVAoRehUJcBZHCgPPxcuM9798/Bj8bsDOZl6FeC Tf70i9vYmpiqPdmZC7+z7Ww726u3V9vkBUzK9yprDmO9iZuTveJmf3De8PMV 57N5zY2I6FpIQNXCv8wmo72Fs5qKJUfLrTDnfkyIa7q22mReWTzVnTXdnXWx P++6ofT2YNU9W+1DR/01Q9U1fdWSqvR8T8F89+lzsoIF+ZlL/cUQs5L8cV7W tCj3Qk/JVVX1uq5xXlCwqqy7a+5YGahbVtStKhtWVS2r6talgeaL8vqL8obF /tZlZccFbt1FYcOcuNbfcbq/7BAv76cDNQfCvJTzisJHpupPrQ2/sTX9tbXl Pw62/EOE9/dh7l95GV8Z657KC9cE2aucjGvSMzd7S68pyi9KC6e4uaPs7GhX uod71s0tIoJX5CKixMUtcXCK7ZwSCBunxMopxbAwTg925VkZxTZmkZ1Z6OCk O7hJo+qTU3SbaAibTAxZp8fcEPfvXPqn3/7Vf/9///Nvf/tX/+f/80//9n/9 b+9/9igQcyiN8l6NGMII/7Y1CK3wr2CjyGWVeWw9cGCCxw94CNHyLDq+Bf6N TMaAVtin4ovlXd09DK1O4nJrRsfck+PepSsT9+8uvvP0xnvPbj5+sHxn/eKl +cj5meD8pG961DkWtWyWnKgpm1A8AYZQtfBYCP871cLTbULxZFubbFsLr1V0 gE2AHtinCyQCx1uTJnCSyJtouOreDiGrvLkms7o4oaro5NmcA+11WRJWiUXV 5RsUDbt7o66eGWvHuL7eJz1D2cTNTf0DbeIRpHpxTRdZC+/t31jTFR4khqwF bVK/Xea3k0XcnoHRIcP4sGksahyG/5nOXrdN5nf1QXjscrtZDOGwSGDvNEnd 5m6/rRcepQY1fJWsHZMm2Af4G7FluMkfySbAEBzsTo/Xtwn8ULRJN7+Osknc AHesWwdBkAkOFdah0FMn1OR3jLj1YHGNhem18HCASBnyE8N0ZsetVy8GKZvc XPmDbLLBE9Im29bCv2jStVlsQi8P2VoLH7emC44xq4IH4BEse8dkChzDGRt4 lgwsQkGk4M/C9r90m8ABZRN66mRbm8QFIgUxQq3mol4iVeAv/9bq1PWl0ZlR 27Df4DDKQSJKGUMh7ewTtw90d6nkTOAJ2ARVAkKxaMTYp4sqNtlqE/pQ+G2b BuNLqtUw5k3s5m4SJuQoT3iL7NMVditepxYewm3gSBjFlfmHwSY4Fz4vZVdu 8tvZp34KNilI31OSc6A871BN0XGwSW3xMbAJ5k3AJvH1JvJGrIWPumT0Wniy dTAxVBEDaIDQACnAHl4S4xFvTgBSUChwBkhCzVikqtox00EtwaIaC2NeA/Mj 1KR4qvIdTiI6fv3ZOhzQe3lh4GouXC1GzXbEO2NtPt7qu37w2dl2tp3te71t a5MXHqnYp6rcD6GuOqCsOqypO6ZvPBkUFtwKiT9cMHyxZHt3Xn0n1r0WEd6O SW6PSNeHxesx8d1hwYNRMdjk/ohoPcw5b6oLS3NjPQUzmvIr9ua1EPuFTUYl 78z0PZmUPxmTPh2T3g9xLuqr5noLFhSFa4M1z4eYn08IfzEt/XpO/vGo6MuZ Hoj3o7y7juYVbeWVgeKrqrJlVdmFnsIZYfYEN32KlzknOn1NWbk6UHHX3PzI 0XXb3LpmbLtt6VwcaJgWlcQ4hRPCsvN9jSt65vqg4NqgfnlQt2DqcwkbOaUJ Nak/q8/4ETf/p8amYxe6C54ZG35hbf1TY+Ov1dW/dlT+daT1P41z/tcY+y8c TR/1Ft5lptxkZd4RFdzurVhX1FyRlc9Kikb5eSFpqV9U5BMVByRlfnG5X1QR EFd5BRDVXn6tT1Dn4zf4BI1+QaObV+LkAExKbYwiG+Osg5Pp4qdO6E5NaBNG VMfGlekjvfkzytZFi3R21DUZcyxdGvnN1+//4z/82b/9l7/7//7bv/yP//Gv H3501+XRKFR8WR+7X8U3WHqcg92DeqFeydar2HDgtsocZilQxaInPDKohxDC AThFrRMNqPm9Axx5H7NPwTWa5V6/fnomtLg0tbg4denS+MJCbH4+CjEx6pye 8EBMjNhHoxaIkSFzNKglgqxMJ1dzEf95GW0ShxHqmP4u2dHrGwYhPx4/0+Rl NoHHxTibWIg8yDdsQq3poloHo01wTZdBzVHK28Am9RWpxacPA0wKs/fXlyfz O87o+1q9FuGQSx5xyCatHSP6Bp+8yC7IsfOzHbx0JzfNx0v18VL83CSiLTDn RIANcdzDSdwabnYCHni5p3y8JAg/P9nFS/MIs1yiHCsvc5Cf4+4pjxpah63c IRsvbJeEHd0hV2/A2et3wAO2fMinGo3op0cGIYhuyTa5e7A76OqLeJXgO4+1 22mWwBm3SeoxSr0WmcsosWkFGnkH5k2k5AhFCYcIMeeFO+JiW5vQkULFVqcA Q7blCcgCecJoKYSAY7TG1h7C2wbaJK5PFzWyhEqdkJSAr5864iO+PyG3gpye 079pEyBer9/ZR87T6Y+bukhlT7YdcbKZjhmAv/a5CdvK5fDaahRssrYaWVsF ngSBJxBrK6H1lfCt1fDt1cida9G7ZFyasY6QNhlUdxI20bMg7HqWTc+06VgQ VqCKljmooYJFC/agmgVhUbPMKqZJyTAqmRAGJcMwQBMK7KnGwlRsygXbBWtJ iZjJtIiWXOil6mlHoaBiQCW4uMuqF9jItYLkP0cbM0ookiAicPg7HqNNVN1t ahkRqu5WpbSFCEkzedA8ICECDuClanNQI94hbqY82BNQ8PWXD//v/+Pv/uv/ /pf/+Hdf/+VvPnh2/8rcuMtn77cZJBatUNfP1vYDQ8AgAgiLRjCoExlVnG0X dG2db0KphB50m9AqU+QOk9xhlDmM3XajhAgDvCsOuvpnRowXZ5yX592L5zzL F3wr590rC86VBffyOdfVeefVOefSLITLbxHyWgsq846UZO8/k7Y7N/Fnuclg k93Zp97OSXr7TMb+0tNHyvOOVBcerytOqC85DtFUfrKt6lRHTTKvKYffnCto Pd3NOKsUVZv7WhzqrqBFMEzMN1EvzdrXrwTvrw4/vD76ZH3yya2pp7en37k7 ++69uecPzn34+AIEKOPL90ETV+D83dXYrauROyuxR2uTHzy6QHUGptRAFY9g NQpBlWdXPn/36s+fr/zyoxtff3LzFx9e/+r91S/eu/r5O0tfvLf8GRjk8aVP nlz+8vkyccHHN3/1MXHZ15+sffXBtc/eWYLPfvneMuzhI18QB3AGXLP4xXtL v/jo2q8+AaHAH+Aaxnf94LOz7Ww72/d6e4VNACZoE4CJpvqgouKgtu64vuHk kKTofrQHbPLZ5cHn5zSPJnpvR8W3oqLbI+JbMdGNCA9sgjyBuBlkzeoqA6Ks IVnepKr0sq2JsMmICN99ONb9zkz/4wn5k/HuZ+Pdj6KCRXP9tDx/Wp53VVf6 yNf2YYz78ynJn138/9m7z+C4sitP8NuabnWrqlh0xSoWHQiQ8B4gHOE90nvv vfcWCZvw3ntHOIIACYAW9CxfKqkltTda1fa0mZ2enY2NnY2N+bgbs+flJR6z AJBiSb0tfcCLf2Q8vEyYApPB96tzzz3yzwdkP53Q/dmsGR6fdvLX3ZVzurwp RSZkXJo2yIvvZUZD+tmx/azYEX7ytCJ7yVC8Zqtad5JuOMlT2rJBSf6Yqvya jb7q5l73CpZc3C6DxkInk7OSsqM+SjzzTvLZ/5Bx8Q9zzv5BxeU/0mQe7SBc WhVnP9IUv9CVPbMmf+HK/IW/6O8bqv6XeuLfOip/osy9x0i+SYmfJ8UvcDKm RTlTisIJVXGTJKtOmFEvzGwU5TQI8+oFVxsEBfW84jpucYBbFuCUB9iVAXZV gF0d4F71s/LctKtOSradnAk2cdAudmoj2lRngopTHapLQVFCl7xs0sJrb7AM 9QTub83/3V9+9u3fff2v//KX//wPP//kxa2WoE2poMnlVLGEJBQRpDJsvRao BO69raG6iQ/uytwyiNchdtuEIBeHmWczcix6llLNMJgFFrtEbxKotBwDuMaj 7uqpGx5t7xsIQrp6Gto7A20dtR0d7t4eP6Srw93Z5uhotbc2W4L1uuY6LZIC GjUSooQMB8h+p3z3+ncWbuHTTPbwBHLgPl0H2yRUN9nTb4LDBF/ThZVOtAyD mgY24dLyCrIiUmKPJV0+kpFwMi/9DLksXskv9piYYISAldthrWnWFfvFmXZW gpkWbaVdcjIuexlRXvpFLz3CSzvno3zsJZ+GuCnnXPvipp5H8dAuoMBnuWjR bmaci5Vgpcea6fEuUU6jrrLBTGmw0LG6iZ1X6xCCTeB2utmvCtaq4RHSVq/r bDJ2NBpcJi4aVB1wSvx2kcfCh7i0bK+B5zMLPEaeVUUHm0jYpcgmODdY1KtM ah5rVxnh+jhgssl3XxDulP21kj0fhu/KBSqpKU0mlKWAMkAiuE1eBxP8i+B1 E/iR4FYZ7h7xDvc91RPgW/g7B9Xj4C2BAjbBB4DiDAnPgTzBO1lANPDFe9os +22CeLI83bAy3QhZnWnCM9Zja/G/tAk230RPgTh0VIhdS4GgmYwQK8BERdwT qxKLWUmAmBQ1RgXBgAnllU2wKMjaUJkDTWYMn7EYHvw6akLBA0iBwEXUhAIq sRvgLp0N9+GoSRxu+OHOH/WegFPQsi6ECyQU4IlaUKkRVsGjil+hBIZwS+Wc EjjZH8XuwrBwmICIBcwi9C0ACN2ttgfbM//0qx//6z/9/E+/ujM13AheQONL 9veVAEDgHK7ssQkuDtwmkD2FEvQUfiXcJi6TyGkUOQwhoRgRTzigNngLdbca hnsdI33O0QHn5Ihndtgzi/EkZBMMJi7IVJ/ba2TWFMRkxZ1Mv3w0KeLd2DM/ jD3/XlzE+7EXjkCSLx+/kvBhTtJHV1PPFKSfLblypiz7bEXeuaqrF2ryI2il sfSyeEZ5Ai9kE7O0wqUh1VlYLW5hf5Nmqse+NFq7NtW4MRvcWGhFjSf4aHg0 fvHR1sjTO+NPbo/d3xjYXO5cmwuCULZWekJmebmn1ldPl9CE9/Cqx86tkSfb E2AQ0Mf9G4MPb448vzOFwQSgEdIK5On2S5tA4MOvHi+ifL4z/2RrHD4XAifA k6+fLP34yRJ8+pPt0Uebw0+2xz65P/3ZzizkSxDKw7lPHxzWTQ6Pw+PweNPx a9d04TyR557UFn2sLzmL2+TZuPVuv2qjXbTcyAabrLZygSfXGhmrTVgQQBZq ST2aHD8r+u1t0iNKbmPHDIgTFkx56+6yh0HaT0cVX4+p/3RK/2fzlj+ft34z pnnYyr7hqpxWZ0+psiZk6aOi5EF+wgAvHjLIiOmnXR5gxE2KMpd1xRt24i0X dUJdPGuoXHExx7RVddRUa2mUIvujkksfXY04mfTRHyec/mHyhR+lXf6T/NRj pYnvFUf/ETHyB9LEdxtKLs5xc7fU1U9MGc+MGZ8bsn9uLf7WS/pf69j/OcD5 GyPxK2nhBjX5Gil+mhw/L7iyJC/oUV3tUua1yXKbxdlN4txmSUFQWtQgKauX lNeKK3zCCq+g0sOvdPMq64XF9cKSekFFgFfiY+U76fFWysU2TUSL+myr6nSH KrpJmNApK5u0CntbXasLA3/1i+f/+Kuf/ud/+vN//ee/eLKz6vWoxCICn1cp lZD4gmoWu4zHr9LDbYaeBSrxu6R1XkVTQAOIeFnjCGga/KqARw5O8dhFah3b 5pRZHVKzTeL2aZtbnf1DTaMTnaPjnf2DLUMj7WCTljYfpKMds0l/X6C3x9fd 4WpvsQUbTfBlg3WYC3CbhHDxJpt8lyffqZh8X5vga7paG3SYTRyYTXRyAr5P F95vgs+CD7eJWccEvsG9GY9+tSgnMjX2WHL0+1eSTl3NOEssiZVxCpx6WsDG BZt02mqC+pJayRUHO9HKiLUzol3MaC/zt7KJmx4DNnEy48EmVmaiW5wLNqk3 kutMVLSHsNfK81j5HqugyacEmzR45HUuaaNX0dVsGupywbnDwLZo6KgdHuua twqc2KwTnt8iBJtYlLRXNqGG2yQv3Cbh+jhwQdf3tQl+BZ8FDx4JtwneHb/H JgfORoHvhXb6QnWTcJtA8M4RDBE+Jb7JG26TWoCbU4wSKppgCd+bC8/+vb/w 9V2YTZzYe7WnzTw9WheCyb+HTSxKokWBqQTFICfoX2avTYy7A+WxAYu7MEHj 48O1ohZjwxbxZV14FMIKEDqcGJQUbIMFI8dtebnpLgqaUYicgoSClz+Uomqd hKAT12hF1SGelP9am+A8QTZBuwpD8N3AgBjwBw2/+ZY6HXxreCWwBa7A9XCG IIngV8JtsgcmBy7iQs+Gn+OdKc6QTTCehNkEyAaw7WkzIpuMDbr222SqD7PJ zIDXraOXZ0dmRB9LjcJmwced/ePYC+/FnMcSF3EkMepoRtwHucmnASaFGedK s86W5ZyrvHq+Ov8CoeAitSSGVhrHrEgEm8iZuUZxmVNNrLeyWz2igWbtdK8D 2WR9phm3ydZK1/ZqNxLKw81hJJTH26NPbo/DCTy7OPFy8y402x0tygKY4EJB O3Q9vTP5+cMFUAa44/ZK7/Zyz87GMKgEuAHWgOsQ8Ah8CC8ApIA7vnx0DWCC VU8eLkA+ezAHotlc7ALawCvhQ3jZk+3xx1sjEODJ09vjz+5MAFLAJp8f1k0O j8Pj8Hjj8eb5JjhPIOE2WW8WPRw0gE3u9CnX24ThNllsYuJ1k402Ll43aeAn dCgyR60lcGUNW82FrfjaaOPtt0mfJLWVFd3Dj5lQpc8bsm95y7/sF306LP90 SPbFiPLH45qvRlXPugV3Gqhr7op5Y/64PGNEkjoqTRsWp/Tx4kfol4dpl4Zo l0dZ8dOijCVt0YatZslSs2ipGVYU2ksjWDF/Qo78ASnyD8jxH1ZdOl4c9X5F 0qmqK2cKU09kxb1TmnayMv0UOeEEPfqYLOFDX35CH6VwU571SF/4uan8K13p T9Ulf2uo+ScH45/tzG/N1K+lhfeZKUvVkYvU6OvcpDFF3qSmaFRZ0CfN7Zbm dSqK2uRFzfLSJkVZQFHuU1S45ZUueaVDXlkvLWuUVgSlpGYJoV5Q7uOmulgx rdrIFs2FoAp4ElsvTGyTVUzaJINd/pX5/s+e3vzi+eaf/eTx4wcrLU1WmZTM 5ZRz2eU8XiWoRCan2uxSIAnoI9QJogrt8asGkqDH5jotnABY4AUQj08daDDW 1hvaOj3X1ye//smjv//VT6dn+7t6G5pbPJ3d9aCSYKsXhNLV6enp9g30140O N44NNw721Xa1O1sbDa0NejACqlygAsrrbIKv7MIvNvi+AxMkjj0jTlBeZxO8 KR7OkU30SqJRTcZnweN1k/BlXS+jZxnUNLAJn1FQmH0xJfZYSszR9PgTuamn CcUxYBOXgV5n46G6CbKJk5Nkw0AR42HH/pY28TBiwSYORpyVHmdjJXkkeWCT OiMpYCT7TAyPiRmab8J1meHOEJwiAJugAkpbva4Dfu112nq3zG3m2XRMu56F 9hB267kePddr4oNN7BqmRlQjYhZjMKG8WpTFpOQyKLksCtY/8mab7C+s/Fqb 4Gu9wvcQBo+ASpBNSBVp4TYJ58kelaCvAz8M+iJony64e8RhEm4TzBGhd1E4 TyChlV0SPAgpB9ZNwjvl8e288P76UNePrLvVhPfC/5vb5ICoSFYlhhRUOjHC G1tJOrBuEm4TvICCbII7BVOJqEoVKpTs4QnaOhgCF7UyIlrctWdjK7ilR/UI QAoIBbCACii4TRBPUAEFIeVAm4S31eMRMIvgz1cjJYIy0EKyl185NPAdCQhV TNAjjpEDiybYYPcwd+AkOdAmePCxjMgmLpN4lyd8tFsXsklvuwkrmvS7xofc U6PekE2w7PIEK5rMDvocGkpR+rm0S++DTZIvvpeELeh6H9kkVDp5NzHq/cz4 D8AmRZnnwSblIZvU5EeATQgFUZTiGFZVkoCcATbRC0tsiuoGG6fNKx5q0eM2 uTHdtD7funGtDWxya6kjNO6kExiCqAIkeXYXG90OQrm33n9rqXN1Jrgy3Xz7 eh+o5JsXq2giPB60ry+2/e/daVQlwUyxNQ4GeXRrFGDyRWj5FgqgA+hxZ7UP HlF9BAJsAYl883QZTuBz0Rd5Hlrf9dnO3Gc7sy/uTYFKQjWUkUebw8/vToJQ ftc3PofH4XF4/F4f4ox39ufA6oki7wNd8RmwSRMvY71Z/HAIs8l2j+JGq2Cp gbXUxAKbQJaaWUCPkDu4N9t5S/XUfv3VOm5cPS++XZ4BNlmoJYFc4AWvs0m/ NK2NHd3Nix6Vp4wrUq4Zsu/VEx9183c6uQ86uQ+7+Y97hU97hY+7BQ87uOv+ mll93qgifUSWNiJNHRIlT7JiIBOs2FFmzAgrblyQNiPLWTSWb/oYK07qsLLI T4qTpB+lRP0RM+p9fsIpYdZ5dtY5eu4FflWijJZl4Jc4JNUBMcnPrHRWFjgK sp1Xs3pqoheEOQ901c+11S8kxV+KCn+hKP/WQPjPLtZ/dFL+XF/6iJN4k3px hXhmghq/wM9clucvqormVSUTyuJBaX4HCEVZ0qgur9dUBrRVPl21T09oklc3 ywnNclqznNIkIzbKrzbIMtv00S3ayGb1hRZ1fJ0wuVVaMW4VDffULs/1ba5N PNhe2Ll9rT1oVyvoQkE1RCSskUhIShXDapM0NllaGg1gENSojgIYgYSfw7Pw GotdbHPKnB6lx6/t7qvbunPtq28ePnp6a2q2r7e/eXZ+aHF5fHl1cm19dnys ZXCgfniocXa6c3G+Z2aybaDX395sams0tDXqkQ7Qjr4H2gTvfw8voOyHSdjC sLe1CXxH9N39DrFFyzCoSKjZxGFi4TYJ30P4FU/0TNRvwmfkg02So9+HJF0+ ciXpVE1RtJxb6DYy6uzYmq52S1WzrsgvznRwEm3YQqxYLyfuQJu4yGed+4Lz ZI9NPKz4UN3klU2wuomR4jXSw22C9IGv4AKkIKHAI3yIbyAML3DrOLhNbGoG 2ETMKsFgQs7DW9qZ5Fw6OYdJzkEfsg8qoOAwgRe8vU32tMzvsUl1SRLwBNkk fNDJ/saTcJvwGYXwCBfh5M02Ca+74TzZYxOU8H4TPKh3PpwnEFQ3Qc/WuWVd Lf+uNrGryRD8WYsa28LrQJsARkAl+wPXEUxQ4BwxRBkmFOQRNA8FCSW0yqs6 tG0XBX7ngAW0ngqNEUHTQJBQECJUoTVdeEAokANtogytBNvDE/iThSvwXeAc m+QYUgl8ZVRYgXPUjw9X0JouFESS/UUT9LPhze/he3O9wSZhKsHiCtkE44lJ 9GonYSMHfNrXYcaKJgNusMn0mG9uxDs3/Mom0/1usMl0vwdQWZh2Nv3yUUhK 5BFIUtSxuJc8eTf63I9iz/8o+dL7V1M/RnWT8pd1E8wmVbkRxIJLzIpEzCas PLCJVV4FNmn3ScAmM33O5bEAXjcBiaAAT1Am+52zw15wyuPtMbDJ0zvjDzeH 76z1LU02Dndax3oca3Otj7fHP3+0gJME300LrrwIrdoCkiCYPLw58mB9CIgB 4kAlEmAIKo5cnw4ujAQgK5NNazMt63Ntm4tdcH5ttA4+BLnsbAzD54YKKNNf PJqHgFA+fTADKnl6ewx48vDW0O/6xufwODwOj9/r43U2wUec4HUTZBND6Tnc Js8nbFvdsrUW/mI9c7mJfb2NB1kOsteCmDsAJuE2QWu6wCZv02/SyroMNhmR JY/KkqaUqSuWq1tB2u1Wxp021v0ODvDkab/4k2HZ837JTgcHeDJnKhhXZY7I 08eUGdO8+Clu7BQndpwTN8qOG2TG9TFi51QFq+bKa8bKeWPVhLq0mZ7sKo90 FFy2FUY7qlP9nMJWHa0voOhr1Ay1Wodb7GONrvFax6BZ18LneWoI7rLLzaSk cU7eurTsgaziE0n5V9LyX8iL/2dTzbf26m/dNX9mzv9MmXKXc/F6TfQNcsIG K/0mP2ddkr8iL15UlAzLiwcUJR2ailZdVZOhpsFEqDcRWzSUFg01qGIEVfQW Fa1NW96uL+owxbXoLjVjK7vAJilBacWQSdjf4V2Z799YGb29MT05HNSrWRIh gc0s5XEqwCYaDctml3p9mmCLvfUgm+xBCqqheP0aX0Dnr9PbnHJvrX5pdfQv /+bL//Jff7XzeGNkrHNmbnD+2sjcwvDEVO/IcFNHu6u9zTk0UD813jLUH2ht trQ1GVtDNsFh8rq6Cdqzaw9PDpz8/vY2QUu5IOgH8Dsxm+iVr2yC82SPTRBP rAaWXkkJs8nRlJijCVHvZiScqCq4JGXnwz2k38LxmVgtpopGdYFPlGFnv7SJ jxvv++1s4mbEeFnxLlaCjRGyiTivSV9VZyAFDGQ0exFs4sbmwvMBHcAT6+40 E79dVO+W1bmkaA4jNpkRH3GiOWBNF9iEHaYGBjkHs0nozn8PT/bD5LexCXoK 0AEeCbcJeASfAo8KKGhXYXz/LngKr8IIWcXoewmYRcgm+Kh31A7/anOt79oE 8QS3Ceo0QXmdTfbABO9keWkTrG5ixvfp+newiUNDsWsorxZ9hYYzvs4m4Qm3 Cb7EC13He0zCg28Chngi45fL+GXAAYh8dxUWKl4AEBBV0Ia9IALwgiasXILn bWyCeAJfCi0SgyCAwCNcRD0myEfo+p6uk/DqyZ4u+HBo4HmzTV6qJDRB3m0W h9vEaeIjm8A7Cmwy2u8Cm0wMe2bG/bhNXvIkZJPxbodRWlWQeiYz5nhG9LGU yPdSo95Pijoef/Eo2CT6HGaTuIh3k6KO5CZ/VJB+tjjz49Lss+W5Z6tCpZOq 3As1VyOpJbHcmlRZaE2XXVlTb2W3ecWDQR2yyY3pJtRvglSCl07gcaTLMtpt hbfivfV+gMnTOxOPtrDtgrdWelammxfG6uDxzlo/Pi0R3zcYYPL1s+Wvn2Id ImAKwMXtlV5UHAGkAE9Q6eSL0KIvrItkaxxeABIZ7bT1NGrbaxVtfnmzW9zo FMI5/B5uXeuEz723NvBocwQ8AiqBfP5wDpACjy/uTT2/O/G7vvE5PA6Pw+P3 +jjQJvv7TSDhNtkIgk2MyCbXgzzcJmvt/JUWTnjdBCTSp8sLcGKbRcnd6uwJ R/lyAw09BTnQJp38BLBJLz92TJEyoUydUqYt6LKW/VUbTZQ7HeydnlDdZED8 fEj6YlD6rF/8oJ2zUUuYtxROaLPH1Fem+HFTgrgZYcK0MGmCnzDEjuulR3dS oge5KVPy/OtW4i03Y8lEmFSWjEmrFkzsJb98Oahf6LRMdttHu+3Dvb7+Dndv k7u/zjXocw04HL1mS5OgyEfNaCCkDNKzVwUlO5KyF7LyT7lXvhbn/FSe9VeW wr/zlvytv/hPbVeeUdN2ahLv1CRsk1Nu0TPWuDlrooI5Rdm0smxQW9mjr2o3 1ASNNU3Gmg4Tq8PIbtPx2nWcDh2701TdZSnvtCa1GKKb1BFBTWJAlNokqeg3 CHpaXbPj7demuwEmZh1PyKsSC2oAJgJelUxKtlrFtQF9fYOppdWBLbVqNLQ0 6JFQ0AoufB0X4gmcYKNParUQt09tdchcXs3sQv/f/vKb//u//+uzT24Pj3YA T0bHu+Cku7exu8tXX2cI1Oo62pyDfbU9ne7mBmOwHlCgw1Wyuyjr19gE58n+ oslvbBM4r3VKMJsosDVdwBCnmQ0BnuAw2VM6sRk5BhUV7s2ErKKinMiUmGOp u+3w5XkXBbRsk6LGpaPBLWKzvqxeddUjSLOx4q2MWOe/Rd3ERY/2shM8nCQb I97KTPSIc5sN1bU6gl9PxGYvhtkEborQqi3UVAIXEUYAKWATeEQXwS9OLdtj 4KJeeJuaoQ7VTbCiSRgZ6KRsGik73CZ7FneFb8b1m9kkvHSCbAIqqSpOBJ4Q y1NBH6gbBTXFo24UvCEF4QWeRT+eiF0C3w63CdxGgk0ge3rhscVXftX+0gnq N0E2ebVb9UFruvCtifEFXfiIRjgBByGb/P/Xb/Jr6yZm1WvrJuFLuRBG0CIu fFkXuqjbHZIS3hGPBsej0SdoEsquUCqQR9Aewvg5ikpcg5dRjHKyEc5DK7vw pvg32yS8dAKygD9l5CDUxgJfFgkFzWRETkFrvfAiTjhM9hRN8DVde2oib+g3 gRMEEyRf3Cau79iEC2+e/k4LVjQZ9Ewim4weYJPhdotWWAY2yYo7CTZJing3 JfJIYuTRXZu8E3/xSMrlY2nRx8Am+WlnCtM/KrnycVnOmcq8c1V552uuXqzO u0jIj2KUJ0jo2SZJuVtLRmu6Bpq1YJOV8br1meZb860boZ2EcZtsrXQBT+ZH /QtjtTfmW7ZXu+9vDDzcHAabbK/2gE22V3tvLnauL7RvLsNTQ/gev/iwEown oUVZeDs8yGJnYxjboevO1GcP5lBHCcAEXvPi7jScwBV4anOxC0SGbAJp8UoH W01L4w1bS93byz331wceb408vT0GAZIgnqCm+N/1jc/hcXgcHr/XhzTzPSwZ 70ky3sWS/q44/R3ZlSPyrPchiuyjypxjqtzj6twTivxTysKPtCVnWyQ5t9rl j0ZMT8bMtzolN1oFK02clWb2dVBJG+9GO/86nDdz1lv5a0HOQi21W53nY8Y0 8pN7NVdnPER4dr0VU8nNduFGu/BOr3yzU7TVIQCb3GpmTpoKO/mxrczIbk7U mCxxWpU6q0qZV6des+ev+yvuBikPO5iPuzjPevmfDIheDIhfDIie9QkfdXFv N9MWHcVDirQhfvSYOH5GnjotSxkVxA9wYoa4cZ2Uiz20S8OcpHlF3oalctNO uGGuWnEJVjyiawHpYrNmqcO82O1c7vde6/bPd/hmWvzj9Z7Jev9sS+N0sHGg ntegKwtwMxvJyT2E5DVm9gtF5Ve8/K94ed8Isn8mv/oLbf5f28t+VUv4K0vR l9K0h4zoO+SobeKlTXLCNj39pqDopqR8QVkzoSQMasi9Blq3kd5jqu42EdpM rFYzJ2gRdFgZXTbKiCWvR5ncI43pU6S1CTOCopJeHbOz2TI30bo8393T7lBJ SWJ+hZBbLhHWKKRko5btd6tamqxtQXt7i7O1wYClXt8c0Db41HVeZcCjaKrT e53yWo/S71bW+bTBBnOtV720Mt7ZU+/y6MxWucuj7+5t2Ly9+Od/+dXq2lRr u6+rp2FopG14tK1voKmpzuB3KRr82r4uz0C3p7fDCT9GMLRJV1Mt3BDC3aC8 3gu3f8AQuBUEekjDgy7i10O7B8teVzfZn7exScAlteqY+AbCoBLcJqj3BAUX CrIJ3IkJmAXFuVEpscfS4o5DriR9UJpzgUVI04rL7Roy2KReXVQry3HzU5FN HKgXnhHpQTahnkMw8ZA+clEAI2fC4yB/7KSeddLOuejnXIzzLuYFN/OChxXh Zyf62UlORryRdNlIjnULc4KGGr+m2qet8ZvofjPTb+P4bTy7gWnVw8/Mcpq4 GEmwJmUe2qQLSOK3CX1Wgc/C95r5HiPXb+R59RyXju3QMK0KqlZUI+eW8ykF bGIuk5jDJl1lk/NZ5Hw2JR/hApUn4JxLy0cbCL+5bnLgHsL7e+HDn0ILugAm EHxNF77cCxiCtheGp1BhBeEFTV2E7wI/EkKTmFOKbILdOoZuIPFp70gQjT4l Crazlhe4Ia/z4BsFhzziVTR4Xw2RP9Am4UPnsbjh/SwPuCQ+hxDetN2tpunR 2sWZpsXZZsST3SkndcszDSszjZDVsIz32Zu9QoeOZNcSnHoynNg0NXZtaCdh 7Xdi04A+iHtiU5NsYVQJbSlMMcqJEIOcZAARQBQUg4JiDJ0bAAhw6y6p0YBK RNVqURU8agEREEnocXf5Fgreb4LvJ4w/Cx+GaiUvV3+FNPGydBLasAsFzXOE nwGLHs4lBPimCn6ZjFsq54W2DuZjUYJTBBUQtNUwFmHVy0dhlQa+oKgafnIF vwJODOg/JFQlwQ0SvrpsT+lkT8VkT968iAtf8QUnOEywzRYsYixmsdsscpsE bhPfbeJ5zbygXzncaZnod00PeeZGfAuYAryQ+VH40DMz5J4edE8NuPuCRrWg LC/59JW4D9KjTyRdPAJJCNkE7dOVdOlYRtwHWQmnUC98UcZpSGnWx2CTmvwI UuElYsElsAmtNE5EyTSIStE+Xe0+yViHeWHICza5Md0ENrl1rW1rufPO9R7I 7es9ABPQyuJ4YGWqAahy70bf/fX+BxvggtF764NoAAoKGsWI5qE8uzuFCwXr PXm8+EVoW+DPHy58+mD2yfY48ARrhH8w99n92U/vzXx+f/bLnYWvHy1++XDh i515uA755O70s63xp1vjN+falscbIDdmWm4v9zy4MfhwYxh+gBBMxtHj87uT IJRPH8wc2uTwODwOjzcfsswjELAJxpP0d1HkV96HKLKOKrOPqXKOQ9S5J+UF H8ryT6lLzrQr8je7lI/HzI9DNllvE14P8laaOatB9lord6NDsNrEgay3Cq43 c68F6N2qqz5GXB0nqVdbMO+nrgV5N1r4kI024c0O8d1+5VaXeKtLtN0p3Awy p82FnbzoIP1CG/3coODytCJpVpU0o0iYM2QsWXPWPUXbdZUPWijPutmfDQie 92P5ZED8+YjskyHJdjNl1nJ1WJoAGVMkj8uTh8XxA9yYfnZ0Dy2ql3apjxo1 zIxbkFzZ0BdvmStW/YJrHu6cj79YL1sOqtdaTTe7HBvtrs1O73qbd6nRca3J tRD0TNbZRtr4I03sflN5l+DKFD/nnqwUbPIlN/9LTt433Jxv+DlfC7N/oS3+ 1kf9u/qSv/Tm/8yc9Zkk6QElcqsy8nZV9AYxdZudvyElLCsp0xrasI7Rp6X3 Gou7TWUtVlqTnV3vELXaOR121oSpZECWOSpKGJVldAszg+KCbgO5pV4zNdow P9USrNdqFSSpsJLPLpaLCDol3WkWghram2xdLc7OoKO90QgwCQa0zbXaJj/w RFPnxeRS59cFGy3NDZbe7sCd7WuffrK9uDzR0OS2O3UQj8/sD1g7uupWrk8v LI4OjbYBTCane8enOnv66wNupdsi8jtkQKS2BkNLna6z2bxb5pDhHSWhKfDi /QtpXi6nCf2/6/1j3/cY5C1tgu8hjPpNXtZNwmyCr+lCJ+E2wWLk6FVUuMvi MwpK8i6lxmIwyUz8ICv5w5Ls88yaVLWw1KYmO7XUgDLfJ81y8VLsrARsny56 tIN+yUOP9NAisDoI9SyCCcRNAY98jOIgnXaQT9sh1DMO+lmIk3HOyTrvYl+A eBixXmaCkx5v2rVJi6Gm2UxtstBqTTSfiV5r4/qsXGwSn45hDQ3IQ5u7Oo3Y iGqspGLmeU08n5kP8Zv5tWZBwMzzGzguLcuhZtiUNLOcYpCSRPRCDjGPRcwD m7CIV+GRSymkE7JxmODu2N8Ij57dU0nZM9wE35XrwI22wBqAjsqiBAicHGgT 1CmP2wTtM4x31sMjuEnCLYObUri9hLtHFNwmqMARPh0+fM77gXlzL/yrukno vQrvap9DAI9dLYapEf/iTPOuTRqvzTSgAfErmE32ZqLf3ujmgUecepLHRAWh WFRVdi1pf2wawAhhX/ZUUihWFcWsIJnkRJOcHBaKKVS5MEiJ+t0ts/C+j705 CCb44q7w7YUBI3JBxZ4oD2qlR8UabHKKqErOL5NyS8TsIhmvFAIfQhSC8lDA JhUqAEho0dee/hTUTQ8//8vIyfu7S1A9Bb+OLr5OJeHXkVD2r+DCF3GFwwSL VezFbCIKReA18eEvmt/Ca/UrRzstU33OmUHX/LDn2rD32rh3Ydw7P+aZHXHP DINNXFMDrp4mvVpQnpP0USZmk5NJkUcTL76P2wROUqJPXEn4MC/l4+IrF0qy LgBMCtM/LM78qDz7TFXeeVLhZXJRNLUkllWVJKZl6YUldmVNrYnRWStDjfCr E/Vgk82FNmQTMMjDW0M7Nwfh5PZq94254Op04/p8C5yDTeD6462RnVvD4BGQ CJDk0dYYGrMIWrl9vQ8u4tPeUQcKmqj44+cr8PjsziRW+1jsfrA28OTWKADk 09tTn9+d+eLe7FcPF77cmf/iwRzks3szEPjwa3ANUOXOFJ7PsJ2Hp16EAip5 dmfiWWjWySf3pw/3ED48Do/D480HUsmevM4m0qsfgE06lAVb3aon49Yn45bN LulGuyhkE/ZKM+t6C+dGGw/ZBOgBDFmsY/RqCmpZCQfaZKNTcmdAtdUj2e4R 3+kRb7VxZmzF7ZxLTdRzjcQPOxnnx8Sx0/KESWnspDp5QpU0pUlZtOZu1VU9 7mB80sd73M151MV+3iv4YlT+xZjiWb/wXhvjmrNw0pg1KE/ulyQMShKHhIkD 3Lhe+uUBZswALWaAfHmUFjfLz1iR5S15GNfc9EUP63otf6NedLNJvtWqXm/R 3e1z3Oqy3GgzrrdbbrSYrzcZr7eJt7oV1330RV35trH6ia5yR1J4n5b8iJn6 gpP2gpv6nJv8TJD8iTjtJ/bcv64t/4dGyi891V9Lr9wjxGyURCyVRl8npKxy C1fklTPq6jENYURHGjJX9FuqW+3MJgevzikJOrhtdtaoqahfmTksixtQpLRJ UhtkeS2Gqp4269xkcGa8qd6nUMsIYn4Zi3ZVKSGZtexal6K1wfwSJiCUoAXx pKUOhIINcK/3qZvqTR6nwu+BE3NTg3Wgr6Grw9fd2+yrtdbW2esbXWATh0vX 1lE7NdN/78GNrTtLM3MDw6PtbR1eg1lk03NNavhXnlPnVqD5d9j/kfaiWokk DCai8P1aD7TJnrmKv7FN0KZe8CxaUea1C7Gp1t/TJnCfJmQVll69nBZ3Ij3+ RHbKRzmpp0tzLiCbWJVEu5pc+z1scg5fyuUgnXGQz9jJH9spZ+20cw4I/YKT GeFkRbhYF92MaDcjxkYHmESZaDFecW6riQgwCTpY2D5dRmatAxvMAfdLFgPD Cj+tPpTQiV3PcBpZLhPbY8TiNXEgPhPHb2D74UMj261nubQMBxamWlAl55SJ WSUCehHAhEnIBacgIOxphH/d7MU32CR8msnb2ATRA20ajPpNUN0Eb0jBZ6Dg hZj9NsGnvYd3iOyxyZvz5roJzpP9Npkc9r29Tcb7bPVODnjEoSO6jZR/E5tY lOQQT8jII0YZORRSuE0QTw5M+IKu8JYTVCJBvfB49ttELihHwV+DloRhXfbC SsAIwETCKYbASThPkFDAJm8DE+w/ZJ9B9je/4zsJ78+eCYx75r+jKgnuERR8 gwXcJrs8eWkT+CvW4lOEbOKY6nfMDrrAJljRZMwzN+oOt0l3o07FLwObZMSe TMNtcvEomm8Sf/H9cJtACtM/Kkg7VZh+qiTzo7Ksjwn5UWATNN9ExszV8ouM 4jJkE7wRfmM2uL3YcWuxfXOp4+5aL9jkyfZoqDAxDufbK13XZ5rWZps3Q9UT rOt886VKwse7g1AALBC4iGyCSid4+wkgBWxy/8bgjemWG1PBrWudD9eHXmxN AEy+3ln4POQRkMjn92fh5NO70yARAMtPni7/+PEiYgs8hcnlwSxIBNkE8QQV UODkd33jc3gcHofH7/WB10qQSlAZ5c026VQVbveon03ank/ZX9mkib3cxFwN Yiu7rjdzkU3WWwXLDaw+bSHA5ECbrHWKtgaUN7vFm93i2z3izXbOtKOkmRlR T/m4tvpEA/GDbvaFEdHlYWEU2GREFjcsjZ3SpK65ix+0UJ73cB60M+610h92 sJ/3C18Mip8PiODxThdrvZk06ygcUmf0y1IGxSkDgsQRXvIYP3WckzrKSBqh xo9S48dpiWPqvDljyZq9ZtND2fbQt/zM2wHOrWbh3S7lrXb5WqNwrUGwHhDc 8PNWrZQVM+m6sWZZVTrBTJ0gxd0QZO8o859qi54pcx+K0x4Ikx4IEx8IErf4 cQ/lGT+1lv2ylv6th/5zVekzZvo2KWmlMnqqOmaGnjojyplRFc0ZKyaMVaMm QreV02YXNDmkbQ5Oh505Yi7o06QPKGJ6VYlBeaJblu5S5TTXqYd6PZ0tZr2K IuAUSYUVMlGVTkFzmoVNAV1Xi6O71dXRbG9rtIJNIB1NJrAJqpuATer82sY6 Y51f5/doGurMT59s/B//+7f/9C9/Pz7Zp9aKZAquwSTX6sVGs6yjq25wuM0f MMuVLKWaY7ZJ9SahiFMu5VXq5FS3RYj+fcdu4UIDuPEuEpTwcRK/tmLy29sE TY3HpqV/T5tYDWxUNxEwC8vyo9MTTmYmfpCb9nFe+pmy3AiwiUpQYlYQgCe1 ire3yXknGeWcg4TFTjprp5530CKc9AgX46KLFelmR0F8vFgnM8pIOq8lnDfQ Y9zi7EZdecBI6m/C2kjHelxtDQaPTWwz8KwGGsSGR0+zY6E7DHSXgeE2Qphg GS9ER/fpGR64qKc7tXSHlu7SM506FgjFrKZppUQpp4xHzWeTchEl8Jt/AAif UQgBBeBCeXubvGFACWo2AZhUFMbDY/hWXajZBB8ZjxpS8Bkob2MTFGSK/cMT v1cQRvBGePQ10fsW3tJeO/83sMlYrzVgZ5kUFWATl4Fs09T89jYJ8YRiVuC1 Eix6CfFVxWE3BwpFhXWL4AZ5yY1woYQBZD9MKmT8MhT0AvR11KHeFrAJAATx BGW/TXCVhJMEVwmQBIKcpf8uTPb3vOP0CO86wbMHJuGD4Pe0luDvou/ECpHs 8kTgDZUmkU3Guq2hEfCOmQHn4ogP2WR2xDUz7JoeApg4J/udnfUaBbckO/HD 9JgT6dEnk6OOAU/AJvEhnsRFHEmIfD81+viV+A+wBV2Z55FNijI+LMv+uCrv PLIJvTwebCKhZys5+cATn4HWFZCDTVDR5NZ8653lrtur3RDQx4ONASBJaIDI KNz8A0a2ljtvzAXX51vAKSGbjEIAIwgmIBG0jgtNXXx2dwquIJJ89XQJXgAv hovYlYfYzsDPtie2F7uuDdXO9nnm+70ro/U3Z1rhyr3Vvp0bg49vjqD6yLOt 8c35jjvLPc+3J4AqABMIPIW64MNsMo4kdWiTw+PwODzefLy9TZRFp2X5pzSl Z7s1xXf6tM8m7Z/MOHGbLDexkE3WWrlgk5VGNlYWaRMu1TOBJPXc5ANtstwu uNknX+8W3ewRbfWKb3Vwp5yl9YzztZSPvdXHfVXHmikfdrHOQiZUSaPyeLDJ mCJx3pR9019+P0je6WBCHnVyHnfzHnZxnvTyPx2WPhoUPxwQ3W5nrfiqp40F I/LMXn7SMC91hJc6yk0dZiQNkuMHSHHD5IReZvS4KHlFk7dpKb/nJNx2Ejdt NXcb2Bs+6qqLvGirWTBXLxqrZ1Qly0rCkqJmXlreWhWvintHdvkHlsxjtQWn RtmJa6rsFXH6JCWqv/iDjux3+0o+Gi4/s0yNfaYo+CsH7Vdu1t9aKD9Tlz9k pi3VRM0To+ZZcbOipFlpyqKqbEFdNapnDpp4XVZxr43Tb2NOWgsGNWkDyss9 mvgmZbxFkqiTpNR7ZWODtRPDdR1BU8Ajc1p4BjXNrGV7HdLWRlNPu6unzd0Z dIBNOpvN3S2YUMAmDV51nUcZqpsY24L25gaz16XSqjnNjbaJsfau7kaJjE2h VfCFNJ1BajTLHS6t061ze/Umi1RvFBlMYotdbnMq+MwSIatUJSY6jDz4Jx7+ cYe7wYBLGgLIdzrc/Q4xlrDqCbZx6+th8jY2OTBAEvQpL+fC7843eUubWPQs nZICd1ZCVmF5QUxm0qms5A8BJlczzpbnXWQR0n4Tm5AjnKQLKA7ieQfpvJ0E MLnopEe6GFEu5iUX65KbfRniYEZZaBEGSoSBFmXlAD9za7WlXl11nYVa7xRY tVQxt1QiqNSpGVYj3Wak4bEbaI7duAx0txHC8BgZXiMDbmD8RroXruipaJcn u5biNbG9Zo7LhDXUm9VUjaQa7hvhhh9vYMcBciBMXmeTPfPfUaXjDTYpL4gD ngBAQB97tudC+b42CRcK5ojd1nV8ZuJb1lBQUGcK4gmCSWgfMDQVRYjb5HVr upan6/dnpNvsNdMMsjK7lgA2saqrwSbAkP0BiVhUNfuyZxoj2aJ8mX02Iey/ yUcru/ZE+bJzpDLcGvtsUvFmm+wtnQgrX05OgQ/hZaFlXXtUgtZ0vY1KIPCf ZngjTMIXa+EjTsLzBpjgw9/xlYEHxCYBm+zyROgzC7Blk6E1XWCT0HbBztlB 11Ko3yRUNAGbOKcGASaOiT5HW61Sxi4CegBA0i6fSLl0HCudRB5LunQiIfJY 7IUjMeffib/4Xlr0MbzfpDjzdFnOmZqCCHLxJUpxNKU4hl4Wz6lJEdOy1NwC g6gU/mp3+KXIJuszzZsLbfdWe+6t9d5d6wWY7NwcBJuAQSBw5w+3/XAF2LK5 1HHneg+c74QWdKG6CW4ThBE4R9MY0ch4ZJP7G0PwSmxx15PFLx4ufP3oGrjj 1lz74nBgrs9zbdB/YxJ+ho7bS90oD9YG4AXAEDgHsGBLv+5OoyVeX2EzGbHO 90/uT6N1XHgN5dAmh8fhcXi8+Xj7NV2akjPygg915ed7daUhm9jAJqgXfrWZ u9z4yiagD2ST9VbBYh2jW3U1wE480CZL7YKNPtmNbtFGj2izT3yrkzvtKmtg Rfgop93Vx3zVx+qJJxtJJxuIx4ckMRCwyYg8YUKdumDOWXEU7LQznvRwn/bw H3VxH3SwwCafjciejSqfDMl2ekTbLaw1P/GarXxaXzgmyRoTXRkTXBnhpvfT knrJCf3UxCHSxTHq5Vlu4nVZzrah/I6lZstYuWkhXJMXLihKljVVS+rqRXXN grJyml0zya5ursgUx5wgnP0hOfodctx73LR3DWXn/MQod/Fpc+o75vg/tCX8 oSfzSCD7eMfVjybKI+9yrvxcX/2tm/2PHuZf6MufC9O3mTHXGRevMc7PMc7e 4uXeFBQtykhzKsaEnj9pYk9bWNfMhWPK1EH5pV5VfIMs1ixJNCoz631yUElj rcpl5dtNHKuBZdIyHCaB3yVvaTB2tzl72z3dra72JltPKxawSWu9vtGnAZvU eVUBn7bWq4EE/HqXQ+l2qsxGkULFI1PLiaRSLp9iMMltDg3AxB+wBOptbq8O eCJTMLkCAodfDTYRseE2hgA2QbMD4N/3XYOI9tjEZxft4cmBS7l+S5vs6TdB 802+V90EcKeVEcWcksqiuOyU07lpHwNM8jPOVlyNRDax/CY2eRkH8YKDdAFs YqdedEBokU56lBN4wrzkZl22Mi8bqZF6SqSREW3jpzhleS5lkV1V7tBWOc00 nbKay8rncQoVshoz3NYaybaXodiNFIeR6jBSnEaqGwvNY6J5jDSviV5rovlN NC9cMVBdOrJTR3HoKE49RhiHAVsJBrHp6EYlRS6oFLFL4J7/1UxGUs6BHnmz TXCYvM4mAA3cJognqOtkf/b0y+OFmP02wZfihK/swue5o8VdzbWaYED79jaB Twy3CVq16LUJsTezQwA2gTd2T5txZizw9jYZ6jS6jRS9tBS1nIBNIL+lTcwK 0v41XahEgm718fv8g22ya5DwEkloLvzLHEiS8DVde4omipBHEE+UIafI+eUh mLz0iDIML5rXrODCYYI30RjClnK92SZoK+M92b+UC4cJbpPvNJh8txK31yYW zCa1Vn5raE1XaFcu965NsAVdAJPpoVc2afErpKzCzLiTKZeOgk1SL59Ijjya FHUc2SQuIjR7MfII2ATbpCvjbGH6R2CT8tyzhMKL1NJoWlkcwIRRnsAlpMoY OQATu7LGb6S3+yTTvQ60SReyyZ3VHrAJ0OPJ9uiT7bHQWMNhVD0BqqBGeHgW Hu+tDwI3Hm6OIpugogn+CDaB6yg/fr4CYEGdKaCVLx5h094/3V2y9fTW2M71 gfsrfdjjav/OjcFHG8MP14fAJvD4dHMMVPL45gg8dWe558F1DCzYyq7Q7EUI 2qHry8cLECSU3/WNz+FxeBwev9fH2/fCa8vOKQo/0ldc6NOXgU2eTmA22WgX rbXwcZugfhPQx3IDC2ACAFmopXUqcv3M+INt0iHYGFDc6BXf7JNsD0i3egQz 3opm3iUv+SNX1VE/4UQd8aS/6oir9E96+Bf7hZeAJ6PyhHFVyqQmbVqXsdlA eNjJetLNe9DOvNfGeNzDw2wypHjSL3vcK33ULbnfxr8b5N4L8u7Ws6/bCbOq oglJ7jD/yiA7HTJNjJohX56mxs4yk1YkuVu6yvsW0n0TbUNetSIsm2UXdpYl e7Mja/NjnKmJmuhI9oVT1MiTzNSzwtJYLeOKnJKgoSdbqIm26mhLwVlzxglj 0vuGtCOW9PddqUca049OFkc85mT9ma76l+bq/+iifOuu+Zkh77Eo5gb99Dzh 6A4l7QE9+yavak1CXVTxlvXsFRPrurFgWpoyKrvcp0iol8TZZel+S1mtWwIw 8diFFj3TrMP+t7/DzPPYJbVuRXOdvjNoB5v0tLk7mu2DXe7eNntns7mtwRgM 6Bt8Guw1DeamelNjndHtVFrNErtVZjGJWRwinVkNj2ATrV7icOl8teamoLun r6mx2WE0S+RKllRBF0kpglDdRMavsmhf/osfGoQn8NoEcPPmdwqRUPbYBOfJ G4omvyub2E1cE7bnMBlut2pKE0ElBVfO52eew22iFpZalASbivR9bHLRSXoZ BzHCQYqwkyKspAgb+SLETom006Lgc7Gw443USxpypJEZbxdmGHjpUmq8RpBn VpSZdTVqRTmLkUUkpjCZOXpNlVlPsOgJVgPRZiTZjSSHkew0USAeExXiNdN8 KEaKV0926UluA9ljpLgNVKeeAnhxm0AlNLOabNFQgScOA9zXMeAWTiMlSnnl fEYhKqPsMQgqW7zBJggmv9YmhLIUsElZfiwElU6I5alvtgnaRvgNNtkz5QRv EgFfoKLJ97UJzhNkE3Sz6rbwgScAE4+NB2/s3nbz7Hjd97KJy0DWSUqQTSyq qt/eJqFGeOJ3G+EpWtF3bILu8w+0iUq0nyevVmqFcnDFZF/dpOIVT+AEroQW dOHlEtwjELW4+uWGxrvlkj02Ca+Y7LHJ/o2C9/DkwH6TA4sme4eYhN5Fe95L e2zis37HJkGvfLjdNDPgmhl0zQ5g/Sbzu0WT6SHH5ADAxD7ea2/xyZFNkqPe T921SfLlk4lRx0Nrut5PunQsPfYkvCA/7SzYpCDtQ+BJadbHVVcvkIqiqCUx tNI4ZBM5M9ckKXdpSD4DrdUjmuy2oeEmuzbpRu0kz+6MQ+AEr6EgkqBiSsgp 37EJkOSLx9dQjwla2YV4Ai9AYIHzR1tjIZuEBpqEGt4hn96Z/mR78vnm+OP1 YZAIyvPtCXgEpEBuL3VvzLauT7fcmmvfutaJlVFW+p5sjaL5JognAJOvny6i KSe/6xufw+PwODx+rw9Z5nuhvItOEFJAJSGeHFVmHVfnnISocrB+E2XRaUNl xICx4t6A/tmk7cm45UarAGxyPchbDe3ThW0j3Io1myCAwOO1AL1NmuVjxDUJ 0gb0xXM+ykojG66DXLCNvDqFG70SyCYW0c0O7nI9uUUQ6yV/7Kg46qo86qs+ 7qs86ip7t5lyuot9cVAcOyJLHJUnjStTpjTpK46i7XrCgxY6ZKeV8biD/aSL 87hb8LRX9KxP8rxf9qJf/smA6tNBzU8mbc96VJsBzrKNNKOrGFMUD0nypznp 44zkMWbKKISVOi/KW1OX3TaRtgyENUX5MDnFlniU/9EPxGf/sPT0kcJTPyq9 cJyWEiEuTNJTcp38Misrj5pxmpHyATPxJDvuuCzlQ1XaaXnCH6vif2iL/6Pm tPdmii48pKR8zc/7uSDvW0PNf/Ix/rGW/hfOykey1AXC6ZuEmJvE+BuU1A1G 1iav6I6s7J6qYlOVvyhMGxYkDCjSg4pUjyKt2VHaUq9qCihBKA4TRycnqWUk u4kX8KoDXk2dT98YMLc2O7va/D0dge4W51B3bXeLq6fVM9rfODbQPDveNdjb 2B501/vNAZ+p1mcy6sRCHplALqshlVbWFBLIpWqN0GpTOpzqujpLrd9oNApk UgqDXsxgFMukZAGrSMgqkgsrjGqqUU0xa2gOE9tl4bqtPLhzg/s3XCh+h+il Spzf6Yh/XSN8uE3QcIoDm00ObEJBL0ZrupBNdAoS/IRWHQN+PKeJ4zDCbQkT naDYDSyIzcC0G9gmNc2gJMGdFbkypTj7QlnexZLsCyU5F6oLotiEVDW/2KKo ssgrvaL0gCTDx092seKcjBgHLcpJi3RTL0C81Ase8jkP6WMP6YyXfCbAvOQm X3AQztqqP7YTztiJWKzEj62kMxbSGRvlnIt50cWMdNAvqMmxBlaqhpFi5md3 eTkjLUqTuJBWHsesTuLRs2WCYj7rKrEqmVKTphAWmzUEu55i15OdRqrTSLNq iC4T3W2ie0wMiNf8MkASgIkT4wnAhOIy0Jx6KnqNU8+waagQu5bu0MGdG/af DzdsRhU1NH2ygE3JYVMAHSCCLCY2AAVQkMOlfWdLYbTCCs7DiyZ43mwTVDfB 9YG3mcCzKMgmaMQJqpugbcTQqjOwCdypornw4Y3M4bt1oeBrulBr/H6DYFsN 73svNexuOxxwSf1OiQ8rl4g9ofe2xwZvck7ALeppM8yM1y7ONoWC9hBuCO0h HFgKtZyszjZen2uCR4DJ0mRgpMPo1BJVvHyLvMKhqrYpKt1aolNNdKgIdhXB oSY6NSSHhmhXE6wqyF6b7G4djMHErCSYFUglcCdPDL+NB5voRDU6sAn2WKPf DfahsFojqNIIKjX8SjjRYsNHQvNHhNhGvkosFaFVWOVYsYP/ss9dBgYRVsgw fVSiQSQy/kuJhCa5l6N57mFgqZDxyqTcMgm3VMoDoYS+FPoUAb7zMPCkBl/Q hZdLDoSJWUExh4iB1mvhu3WF97njPME/3G+T8EVc4cH35tq/Sdduv8l36ibe 0JqugE3Y6leATab7XahuMj/onh92zQ25ZoYc04NYgzyySYNTJGbkp8UeT4k+ lnL5OCQx8n20SVf0uXfxPYSzEz8EmxSkn81PPVWQdqo486OKnLM1+RFoky5G RQKflK5kXzVLK8AmaBvhoRY92GRjNnhrvvXuync6TR5tjoBH7q/3o725wm2C 1U1u9N+90f/g5tCT2+OhusnsF48XXtyf/vzRfGgR19S99YHb13vvrfcDT57e mQSqoL2Fv3i08NnO3OcP51HjCZps8sXO/Gf3Z5/fnny6Nf4ktHXw41ujOxvD O+tDq5NNS6P167Ot20vdm4tdt+Y7tha77q31hYo7Y0goiCeHNjk8Do/D49ce ssx3dvPurlOQTY4qrhxXZp1QZYNNPoBHSd5JdckZU3XkiLVmZ9j0YtrxeMyM YIKlhYd1wYcC+kAbCEMW6xgt4kywSVCUMWgsAZssN7DgOrxgo014o0u40S3e 7JVu9ohvdQk2WtlrzYxWQbyfct5Rfsxe+r6n8ri/6oS34pi37GgL9Wy/IGZE mggZlSVNqtJmtJlrzuI79cQHzdSHLfRHrQx4fNLJed7Df9En/KRf/PmQ4osR 7ecjup/OOL6Zdnw+bHnQobru586YyaPaqjl58bggZ4SXNczNHGCmDbPTp0Q5 i8qidWPlhrFynJPmvnJMEfUD5aX/KfXMDzPOv1MUd4qeG62suWKi5BoIV3gZ 54mXj0oyz3ETT1Wd/sOaMz9kRL2rivuBO+u9gcoLq4zE++yM58zMT+mZX9Ez f8LN/bm8+G9spF818P66gf2lvWqNGr1CjLxOiLpFjr3HSL7PTn/AydwUZa/w 0gd5Sf3yzFZNpleZ0uos7G7VtzdpO5r19V4Z3FvaDNxatyLg09R6IIY6v7mp wdHe4u/pbOwOusf7m5dnBp/v3Pzs6fb2jXnI0vzI6GB7R2ugpcnbWOf0OA1m g5zJpZRXF5ZXFzBYNVIpWyZn2ewKh01e69O3BG2tQatByxLDXY2KLuIWCdkF KkmlWUs1aSj4fEO3lYvbBPHklU0O2q0rvCn+wBrK9yqmwBfZaxM5Ce634feD bbdrwqY52/QsdIIC9+Qo8BqjEhu0rRCUUatSy3IvVuZHVVyNrMyPJBVHc4lp WmGJFWwiK29S5QZVOfXiNBcr1kaNslMiHZTIWna0lx7lJke4SefdpHMuwhln 9WkH6ZyTfMFFiXBTI1yUC3byeQvhLEDGRY+yUSNMxLNm0jk4sdEizII8BT2D W5UgJKYYhEU+PUXBziUWXa7Mu1hVcJlJSGdTsskVKeSKZAEtG25NPSamy0DH ZjIaGXCzivWYmJh74sI8QnYZqLtBDSlYv3yoKZ7hwBrkGXYNw6ikwq8Ffhug M7jnlHBLpLxSuKUUsYsEzAIeHUiSyyJnw2N4uQQf1LgfJq+zCaUqA/W5o626 0C7BuE3w3YMheL8Jvs8wqtogEIFN4J4T3Ubi95PhG3aFT0vcNQjGExQcKdii r9e8kdDbEr1jsTcw2MQG720OxG1l17oE8BdwesyHz14MDTdB801qF6cCYBOA ydp8MzwuT9UvjteOd5pdGoKSkwdvIaey2iIps0rLHYoau7zaKq2E2JU1cM/p 1pLtb7QJ/OmbFDVGOcEoQ3l1P4/WdOlDDEHRwt9W8Ai/Er+iE1ahi+i6GhuM +DJhNnlVOpEKyiSCMilGlVc2CWGkEj8PDxrpfmDQZ+GDUTT7bBKuEowku7GG 5idCgBjgDjTi5ECb4DzZs08XbhN8Bdd+koQXUL6zrMt2gE3qHaK2WlXIJs65 Yc/ckHtuAHgCcc4MOqYHXtkkYBeI6PkAk7TYEynRWOIvHgm1mbwXssl7iVFH 02NP7trkDNgEEuqFP1N99QK1BGs2YVUlCcgZKk6+RVaJ6iZgk5565fygZ22q cXOh7QHc8G8MPAgFYQQF2QSVTuARElrTBTbpewBAuD0GEvkEgPBoHh5BKD9+ vvz83uT2avetpY7Qa4YebY2hdV9oGuNnD+GVswfk/syLu9PPbk8CTx5vjkHg BDxyc6Hj9kovUAUNl99e7rkD6gkxCgz1/O4E4smLe1hT/O/6xufwODwOj9/r 40CbYAu6wmyCeKIo/EhTetZCuDTuID0atbyYdj6btL2ECRYubhPQx40WPtpJ +FqA3ixK99Jjm4Xpg4aSeT8V5IJsstkp2egW3eyVbPXJtvukm93Cm+3cG0Fm uzgpQItwVZ5wlh/1Vp3wV58EnjgK36mtPNHOuDAoigOYQIYlCZBZ3RXgyXag ZidIQzZ51sV83s36pJf72YDo8yHp58PqL0Z1X0/afrbg+8Vy49eztTt9ptV6 8YyTtaYnLKsqZkQFk4K8cV72ECsdqDLITJmR5C1ry2ZkeW2ESxb4bUT/4Grc yazLx65EvleSeIqYca4q7njJxR/lHfsjaebZWkKqqyRGEntEfOlHtqwzo7To eV7ShihzW5B5h5X2gJb8iJr8OSfrGT11h578XJT9p9bqv2lg/bKV95W++JEg fZscc7Mm6lbN5S1S3F160gY/czlkk15ZelCV7lIkNdrz2ptULfVwo66wGZga KcGoZhjVTI9T4XWpAl5jU7092ORqafaCPga6Aksz/d98vvPf/89/+W//9R9+ /s3z60sT0xM9QwOt4yPdPV2Nfr+11m/zes02p0GlldDZBCq9SiCgKRTAEwbY JODXez0qtZJOp1wVcMs1SpqUXwo2UYorLDoa8ESvJFr1dLCJywJ3blywCSqa hOom4n8fmxxcN3lrm9h2baIUlmM2ycNsAqkquEQpjRVQMg2ScqeG6FTX1Mlz 3fxUtKbLTL1spUVbKJfMxAhjzTkr8aKHHu1lXHaRL9przltJUS56nJkYZSJE aSsumIjRNmq8qjxSURohL7kgL4vQEmJc3Cst6nKvlrg+3fjJnfFnm8PPt0dv XWszySrIJTEVuReKr5ypzo+klsdTSuNJJXGM6hS9tNJrZuEGsWnIODrCg5Z4 ebB6CspLv7iNTGSTEE8wmxiUFPRL0MmJABMxp1glrsZ2OVOQ4a2lEFYIWYVs Sg6D+HIv3/AhjGgB2FvaJHwuPCqavNkme/pNUCNMuE32rOkKb4ffs6wLSBIM aENTfjQ4T15nk9B+XFKkEp8d273ZaxMimPw6mwReZ5OBoBZUIqFfMYiKwSYO RZVLVWOTVUGAJ3ZFjUNFgNtOj47yb2WTcIPAh3DdICYYJUR4RM++xiah/bV2 I+GXivml+w3yuiCz4AkHC3oWweR1NgmHiUVJRTGr6WjDjdDKOgGcH7g/8IE2 wftN8O2C8Y2CcaGE11D2FE2w9iW71G/DEhKKyGcR+i2CRpcEbDLUZpzud82P eOeBJ5hNnPttUu8QiuhXk6OPpsedTIv9AJIQqpugPYTjIo6E2eQM2ORqygf5 qR8gm1TlnWdUYDDh1KSATZQhm8A7pMHGaXEL+xrVM33O65MN24sdYJP7N/ru hYJaS/DgffFggVBJZXgHhAJU2Rx5emcCbPLiPlY6gZPPHs6BTb58cg2u398Y AJvs3Bp+emcSb0VBWw2jNvk9+TRURgGefHJvBk7Q+fM7U4gqcAJ5dGv03trA vbWXPyQatgI8QX3xkN/1jc/hcXgcHr/Xx4E2kWUewZpNsk6ggE00uafAJuqS M+aaqEkXBWzyfMrxfMq+2sxbbeZiCWJrulBwm6DZi0FRho8R18hPHdAXI5ug yYzb3TKAya0+6Xa/fLtfttUjutXBW29hdUqS6xkX3VUnwSaobuKrPO4qfs9e 8CNP6ftt9PNAkhFpYi/v8oAwdkgcP6lKu+4outdIBps8aKY+76Q+7aA862J8 0sd/0S96MSD/bFjz6Zj5qxnXny41/my15cuFxrsD9uUm5W07+5aJtqquXlRW zMtLpwApwvw+Rlo/K21EkDWjKIR00BMsOceJ6ecKLh1NP/UfUo//QfqxP8g+ 8gcFx39A/ehPfEWX6/MvNuVfbM47310UtcDMWqbGrtJib7KT7gkzHomzHvLS 7zIS7zMT7tHjd1gJT/ipLySZX6jzfmYp+08t/F96yD9RFTxiJG6Un79RHnGX mrjOS1vhpw7y4rtlKY2qFKs02qVP6e80dbcaA26xUY3dWDb4VHVeldel9LlU DbWWtqCnvdXXFvSBTbrafRtrU3//N9/8j//nv/2P//f/+t/+y7dTEz3dXfV9 PU1r12fn50cbGly+WqvTY6xv8tpcBhaPzOKSeDwKj0/kcKsNOn59wFTr1xr1 XKWMrFMz5BKiTFDKY+TJhWVgE6OarJFVmzQUNHsdlU7wlpO3t8mBd4mvs8nr 9hDG9+mC7/h9bWJSUYxKEm4TUAkKtSxOwsixKKp9BqrfSG2x1LilORZOqomV YmYm29gpdnaKiRptJF+2UKIt5GhjzUWInRpjoae4+TlmWrqdna0jpxppV/SU zHoloc8pXO3x7Mx17sx1bQzVX+twDbcbXTqKml8EAhLRstg1KWJ6Nqk4uizr 7NWkk/nJJ9ECD2xP0aJotbDUZ2EDTyBwgmCyv27iNdNDwVd5sZBowCZuA2u3 dMLEEvpVwK9LLakGmIjYRTJ+GYAFRSsjKkWVcF3ALMDXcYUXUA60yYGh1VzB 2+HRiBNUGdlvE3h2f78JfC+0uAvZ5LUbK4XxJNwmLXU63Cb/H3v3GRxXluWJ PXYVs9PdVfS2ig6EIUA4wnub3iAzkd57772B90h47wGCBGjhSRa9rWo3s6Mx mpVW06vd1ejD6IvmgxShDYW0IUXovLzAqywQ5HBmJ9StCLz4x4vMRBLFBrPY 91fnnnvwjpIDP3V4uWRXJS5pLJ+yCQ6T5uX5T9pkbsDd5ORaZFVmSYVFUulQ 1IbNdQATn44eMrFCZnbAVIe2eLl1NJfun80m2A4uCRnt7AKVoHzGJrvdIj+t m6ilmC/gx46IgbjxKZvEBsfvRocdU0z9uGjymbrJx6UTCzw11IMdEChimw/3 98KjjpJ9QkGJr5jg7sAGvu/xBJ3mcWBfPNbB5FFDEE8ibkWDS97gkrUFVGCT 0S7r/LBveTK8PBH6jE1knNLMpKO510/nXT+bm3YmM+l4RuKJWCP8j2cIo34T tKcL1U2IxReoZZe5pHQBNUtEvyFnF+hFFWAT+JyATbpDCrDJbL/7znTT5nI3 8GTnDnaG8OP7g/E8QR5BNRS8Nf7l9uQLeLAzhdvk/dMFdAeY/Mm7O79+ffvN 49knD4fvL3Wu344+XR/HTxtGSPnYJkCPNzuz4BFQyfdPl0Ao8Ph7bJrJEk4V cMrz9Ymna6N4Iwz8fl7vTOHtJ7/vhc/hdXgdXn/Q15fbRFd1HtVNwCYvp1zv F3zv5r132oS7ic1e3M3eni40e7FTmR/hXW8WZQ0aKxaCTJALvAHwstWnWhtQ 7NpkSIXZpEcENulTZbfwruI2CZFPBOEB4air7I8hEdKJXt6VIUkKBGwC91F5 2qK54GGg9nELE9vc1c181sV8EeW8GhC8GpC8GlK+HdO9Gbe+nXL8sBj+7Urb b1Y63s43PRn1PmtQPg5Itn3CNSfnnpW5aqYtamoXtDVT8rIRSeGUqmzZQlo0 1Y7JC2V5Fwnf/Lzwqz8q+sUfkU/9TJV8zJlzfqIub01DucXJv8st2JaUbQmK dgRFj0U52/ysDX7mhiBrQ5S9Jsq8z0+DrPHTHosyX0pzXktyPkhzf6Mq+psA 7T82sP+2gftvXdQfpAU7zGvr1MQ79amrwvRxSdqQKrNNk+5WJgYtmV0t2slh /9iAL9ph62o2B90Ki64+4NWEA4bWRlcPsklnpLsj0tPpnxzr+O2vX/xf/+ff /z//9//6d3/3u56ehsYmd3Orb2JmYGQiGmp0Qdq7IqMT/dPzoxaHll1PYbNJ XC6Jxyc1RqwDfZGmRovHJfe65H6P0mYWqKWEeJuYNDSHiY2ayhFPwl7p/8c2 wc8QxufCA0m+3CYeC9+uZyObcKg5xLKrCCbk8kSwiZpf6jEwGh3cZhevw8OJ mMh2aYmRl6Ovz9Kx0s3cGwFFaUBe4pcU+MUFEXlJt5k4GeTtzDa9fzD0YW30 z54tflif+G45enso2GDkmvg1AkIOrSilKvNicfLZwsTT2Vd/Vpp1sij9eGnW qYqcs1V558uyT9MqEknFlytvnC3NPFmdf45SeplUfJFSkagVVyGMgDUiLiH+ +KMcYJNdnuzZxGfGbAI/EPgJoGYTgAlEJa4FkgBM4EWIRVsHT/UKkEuthFsZ 3yCPYIL6378kqG5CqrxOrEhDAPlym8A/DnXZ4zbBB7jjJ/3unaklx0sn8ad1 4UUT/CSuA4t0uzDxyuNtEjjIJrEek90W+Fgab85FDrTJ/bmW2X5Xb0TZ4uJ5 NGTgiV1e41AQEU98erpHR3NrqR4EEx3V8dMcaBOrimZV/disgc4Q3lcxwQAi JiGw4K9APmUTtfiAugmCCfzpwx3BBD34TN0kniH4K7hWIJ+yycf7u8zwoo6N D3NHPe8HTlQ8MPuOC8YLbR/bBD+8K/5tEY8q3iaRPZv0NBqwusmIH2xyayL8 KZs0eaRiVnFG4hHcJlnJJ7KST6Je+NTLX6dd+ToDa5M/Vpp9vjzn2x/7TUou 0isS6glpPHIG2AQ7QFhcCTbxYX8R8TrgE9iknei23RoPry91btzs2lrp3b7T 9+gedloXfioXKpTAY3gRvooO8nq+OQ42AaG82pkGg4BKULPJh2eL8OD750sg FHj8Ymty7Vbvw+We7buDzzYmgCfvvltAMIEH+/N4HgWEgpCCTULZmQWk/PL5 8q9e3IKnqIzyahubtAgeebc3IB4CL8Jv9fe98Dm8Dq/D6w/6+vI9Xfrqbyyk y25mCtjk1bT7+6UAsslqqwBLbPYiCjpAGLdJl7IAbNIoyIhqS2Z9NHgFeAJf 2owqY5NNsD1dW2hPV7fwQQdvQJPTyk8MUk/7iMeRTQKEo4GaI76qrzwVP4d7 A/lkF+ciqGRYeg0JZVKduWDKv+etetTMeNxZ97ib9aS3/mm/4PmA+PmQ8sWI 5sWo6c2U/cN84Jc3G355s/HDYuPbuci7bsvrdsOzZs1WQLzm4a97+XftdXPq 6hlV1aS8bEJeOqOumNNWQRb0zC5mfqDsaqg0oYeSNS8sX5ZUrQpKHojLV1k3 7tbd2BEUPxYUbdfnbQqKHvILbnGypxmpo/SU8fq0GcmNaX76DPf6Mvv6PU7G Tv2Nt8KiP1VVf1Dn/bm96t+HmH/bwPmdl/6nuvKXgqwHvOt3hemTktRRdUaH Os2vTGpz5vV3mieHA4M9ztawFtbbGhlVI6e77bKQXw826e4I9nYDTMJtzf7e nlDAb7h9a/x/+tt/8/d//x///C++7+5tCDU6IM3twa5ocwsoZrDtzvrN/+5v /vLf/ru/un13zhew6XQSoYgmEtNamhztrW63S2Ex8S1GnsMqsluEClG1hFcG NkHNJmYtHWwCAaognuClk//f2UQvJyGbUCuTIWCBelK6TlThN7NaPMIOv6S3 Qd7frOqJyLoCwk4fv8vH749Ibw7Y16aD391seX6rbWcucmfANtui9GmpGm4R ufhSWcbJgpSvi6+fKMk4VXj9ZNH1U0XpZ4oyzhZnni/J/qbsxoXa/HO0skvV uWfgQTWsTPLO1VWnwD+XVplUU3ihIvdcTeFFakUyqfQqvfoa2MRjwk4Dxm1y EEyQTThxNuHt2YQPNtnjCWYT+JnAjwgAohITJNxyhbDaoKTBz81pguVfvd3A QYnVUJiwyJTyqtCBw6iF5MthgtdNkE3QBMZP2QSfHY/+EYgnqPcEFsawLgWA 4G3v+GG/yCbx27ri2+Hjd3Ohc4YPtMmPG7q8mE32ePJJm+zBpOnmXMOnbLIw 5J2OOrD0Ooaade0eUbODh+3m0lDjbQKLTyfc/zlsgsMEgl6BB3oRAWIQE40S EuRjm6Bh7oq9yEXVMlE1Nl4Ha2//SQ60CV5b+bGvRAWqpeEkwUsqaL7JPpsc 2BRv1bLQ1iy86wRVRuJPD/4MRhA39gXRY9+eLmSffYoJu5UH7enCbIKd0zUa QHUTrBf+oH6TBpdYyChIv/p1TmxP141rp8AmN66dzko+FZtv8nXq5a+uJ3yd mXikKONMcebZksyTZdmnqvLOIptw9myirC8ySqpcGkrAVAdpdgkGmnXoqK6P bRK/lQv1mMDrG7d71pa7tlajqNkkJpTJ149mUMUEtwk8+M2bFbi/2pl6tjGO DhwGmCCS4HPk9wXcgTZ0QVANBe6vt2fgjuomPzzD2ucxvzzZnWwSP4TxzaOZ w36Tw+vwOrw+f32mF16TfxxsAipBvfBouImLkTztZb6ccn1YDLyZdR9oE3SA ML6nC/XCN/DTu1WFUy7ycgMHtcNv9CpivfDyjQEl6oV/GOuFH9LltQuTw/Sz AYBJbENXkHjMW/kL4Emw9ijYBB600M9G+QnIJognE6qMWO9JzVYn+1Ev91GU /7hP+HRQ+nxE/WxY/XzU8GbK9mHe9/1i8MN88N1c8N1s4Ndj/l+N+F50mTZD so2AeDMk2QiKls20RT1pQVO7oKmZV1dPy8vHxUV3jYzbGvKCpGJRUr6qrLmv qr2vqN5W19wTFq2LSx7wCrbFJd/Jyrb4Bcuc0mlGwQA1u5uW1cstGFFXzdio k/qaBSNxVU1YEZTdYxV8V1/xg5T6Sp79vTb/T40lf+2o+Q9B5v/YWP+7APON oWxTdmNadG1cmd6jTgvJr7bbbnS36ga6bUO9ru5WMyyt1VKKXsm0W8SRoLGz 1Rftjgz0Nfd2NTRF3A2NNqdL1dHpf/T4zp/86evvnq+NTHQ3tnnbukORVt/A WPfU4uj8ytRv//KH3/2Hf/MX/81v/+wvf/nnf/mrne17Ho9eJq8Ti6hiIUUq oWjVLIWUIuLXcOpKBexiIadYJakxaWgQo5oKQrHqmXAHnnhsPLzr5Mt74f9Z bIKfIfxPs4ldXxdvE1pVCtx5lEyjtDpkq+8ISHsjysF2w2iPdbLPOdpljjap Wr2CgIluEharWDd4lVfIOSeJ2ccJWceq0n5RlH6sNPt0Zd75qoJvKvPPl+ed K8s5V1V0oab0MqS69DKxKpFGSmNSMrg1iVLqdWbZpbqKK+yqJEZFArMqUczM Y1Rfqym+Up5/sbrkKrX6OrE8hUVMB5vAAtVtrAvaeQ1u0YEbumI5uN8EbBK0 CXCb+Mx8v0McazZhor4SuBtVdFAJ/NzgDiQBmIBTIHYDPGWDUGD9CTYBMnzG Jmjge3wQLtBRXQgmn6qboK8imwBnkE0guE1gRQoAQR0lH88iQTDBW07QEEa8 F/4nZ3aFdQfaJJ4nn+k3ibfJzbnGz9hkftAz0+ec7XfN9bumum1j7aaJTks0 rOrwSprsvJCZ5TcyvXo6LD5d/xw2wesjyCYxieBPiXtC+VKbyAU1qGiCqid4 AeXjwDsh8FXUWmJQ0sEmEHiAhII31BsOskl88J1dNh0bHbcVb5NPwQSVVwAX +NFteFMSLhFUGfk4+M6unwyLdyn2euHleC98i08JNpnodSyOBW5OhJbHQ8tj weWxA2wSdgj5tLzrCV+hXvhY0eREbtrZnNSzmUknY6WTr9JjNslLPZmfdrIg 7WhxxomKnNPEom9p5Ve4RKzfBNVNTJIqAGzYyoGPSoOdCzZB/Saby92PVvsA JsgmqJUDVPJqexIW/C+3JlAvPJgFbHJvoW1zjyfPNgAd0wAT3CaoIx5sAve3 T2bRBHnACD6ZEeVjmwBGQCKou+TFxiS2d+vhGNzhdWQTfGcXKpQARl7vTKM5 LBB4BZzy+174HF6H1+H1B32pCr5SF3y9m8IjEE3hUYgaux/TFh3Xl5xEUVee NRIv2hmJEx7GswnH23nvqxnX7WbeSgs/FnjARVltrn/YKbrbxrvXxr/VwO6Q 54S41yKC9B5t8bSHstxYf7tVcKdDvNarXO9Tbg2qN/qUm32K9V7pRo/4QQdv 1FjUwksKUM/4yacCJMiJMPW0t/a4lxBL7XF3zVE/8XiEerqbn9AvTh6Spw7J rg1JU8aU1+eMuWst9O1O9pNe3vMB8ath+cthxdMB2etxw5sJ05tJ69sp+9sZ 5/s594cF7w9zTb+cb3k7GX4Sta+3atcalVstmgdB8V0Pf8XOvmVmLOnIc6ra KVnlgrT0trr6jrbmnq72vr72vqbqgabqkZG4rq7c1lZvKsvv8nIna6/0FZ7y 1KQEaRkd0vIhE20+IL7bpLrXqFwLKTbDqkdB9V0DZ4pVNkcpWa2rfsovfcYv eSMq/l5R+mfmqt+F6H/byvmbdtZrc8GMIGFQcCWqTm/WZrRa8joiiv5209Sg byTqCrjECjFBIqg2G3mhoK6nNzQw1DIw3NbT1xRscFjtSqtNEY7YZ+cHt3ZW 768tjU70hJtcWOmkwTk42jkx0z8w0rF4a2J1deH16yd/9z//+//8n/+33/33 f97TFTLqhWoFSyqkygQkuYgk4FTy6kohsIIV15eqJLVGFdiEYdYwrLo6u4Ht MHKwA3tt2HnCQbck7JHFhp7IQh4ZrPF2JzD69p8kvGcTLUpbgy4W1EISO+V1 9z96G7E0GAEgHwfNN0GDTiBNATWst/F1NTxGPIHAUhyCHuNCcZt5LhPXYWBr pdieLjK2m+sqrSqJWpnIpVx36shtflFPRDbQrGoLiq1qAq36akXe6bKck9UF Z6kVlxkVV+gVlykl3xALzhLzz5Lyz9bmniKUnCeVfUupuEipvEStukyvuVJH vMoiJbEpyRxqMpuSxKYmsaiJdeQEITlRSkvhE65K6deNwiI1t4BDSJFx8pk1 KdWFlyoLLtWWJVGq0yhVacyaVI2w3AMwsdWH7bywgx+wctAg+H0J2tgQIFXI DuGiN4fssdgEiCcBiwASdMt8DjH8oBTCGnF9mZxfqZdTsIOFLXy3kevUc1zG eo+JB/EaeS49Jzbgj66XkFWCGhm3gk8v5NELuPsS2+uFDg0GeuCFD3xbF+IJ BD83ON4m+GRGvG6CT5aH74PqJug8LuQOnCeodBL7jAEuwCZIwWoI9lmK6OMT f64CUgk60RrBZPeErtghXbFzutAZwrhNzPNToduL2NlcN+cji7OhxdngzbnQ 8kJ4Za5hFTtGuDmWxlV4OhtZmQreHPXMDdqnek0TXfrJbuNcv3Wy2zzeZRpp 1/dG5M0uXsDE9Oiwc6pdWopbT3XraS6AiYZsU5HsagrEoaHZsVBtalAJzYaF boNVPaztlShMswLW/GSTnIRFBiHjwcaaSLF9XDoxUSsk6CRk+EPUYSFBtBKS RgI2IaiAHsIaBSiDXw2RYQeGVyN0yLCnu0Elkn0nccFfRDIh9k54ivFERjEo aEYlw6ikmxS7McppRnTEMcBEQbcqd/8n2MEj6joHigYPy6HjOHX1LgPXbeS5 ASNGnhMLF7vHN5vEzIKPW8Jx8anDuPYl3iY/2frlVoQ8qohHFXIrgk5Z0CkN O6VNPkVPkxGbCz8WWEBnCINNxgPAk8UxxJPd2YsBK09Az09P/Do75fj1hCOQ jMRj2SlnIJlJpzOunkzHxsQfy4QXk4/lpBwvSDtWknmqMvccofACpeQypzaV R8oQ0rLl7AJjzCYRWz3a0zXaYV4aCYBN1pc6t271bK9EH9/t/+7+4NMHQ8/X R19tTbzemnyzPfV6e/Ll5viL9bHna6NP7g9urfQ+vNm5c7cfO8X3yez7WNEE HvzwfAnyYW8kIqLKK+DDzgwaHI/mnqBG+APqJk/mX2xNPbo/vH1n4PH9ke8e jj66N7S50v9sfeLdk4Xvny396uUtbLDjo7m32InEs/CdMTTFGvMhr3am3jw+ nAt/eB1eh9fnLlXB1ygIJphNio6iO0RbfExXclxfegKirj5nIF20M5Mmfcyn E45Xc54XM06wCZYmbiwclNVm9sNOwb027r1W3q0Iq0N+I8RNaRRn9RnK5gKM WwCZdvG9bvlan3qrX/1oSLcRVW5EFes90s1eKfzCcVNpU/1VL/m0j3TaSzgJ HgnTz3pIp1yEEyiOmmOOqq9dNUcaGed7hIlDyrQBWUqvIKFPdHVEkXrbXb7e QHncycZGxg9Jn0ZF3/UKX46oXoyonw+rX4zq3kxZPiy4frXs+3Cr8/1yx/ul 9jezTU9HvNs91q0u892w7EFEsRaS3XXzb5qZi3rqoo66rCi7raq4o62+r695 oK99qK95qKve0FWvqSvuyUsWuVmD1RfaC453Fp4w01NNjFS/oqTTQp4ICBcD 4hl7/cOA8r5Pfs+rmNXWddKL2qqyu6pzNlm13/FILyWEl+KyF6LcD9q8v/BU /nUL6bUtd0GaOCi80q/NbNPntpgKuxqUgx2myX7XSK8j7JVqFCQxv0KjZrpc 8o6ewPBk58h0T89wq7fBZrLIzVZFIGQdGeu6eWvi1srUzNxgd2/DwFBbZ3e4 t69peLSzsdntdOtmpwb/h9/91X/63//+3/3NX6wuTzoscqNWoJIyFSKaUkRW CEkSbrWAhR3NJOKUyviVGikJdSWgOIz1oAC8SBFwSrBd+k4JeoD2xqBTj+Kr JzhPWsLq1ggIRdPWoI0ltm4M7yZmExNKe+MBPEE2Qe3w8BS+odcuhN8S+u// 6IxcHCa4TXCegE18NiHwBGxST8ulViWTyq7Qqq7SqxNFzKyIk9PbJO9rVox0 aFvDIpO6klR+gVB6Hu7k8m/ZxCQpO1vGviGry5IwMkSUNB4xpb4mkVN7uZ5w hUdMEJATRdRkMT1FwoiFnixhJksYSViYiVgoV6UQapKWk2mXl9rkFWpuvopf xCGlEUqu1BZfIVWkkCvTSBVptMokFa/EZ6qLOHhhOzcIMLFyMIB8lKCNheXH r/IgEYcgjGyCwYQXMPP9Jn7AJfU6RPBTUksIckGVUlQDNgGY+G3CoE0E8VsE PhPfa+D69PVeWCjCclFdZ1MyzLDslFHk9eUSdomQVcxnFtbT8tiUHBb5Bpua jzME0AG+QMdtoW1daIIJAIRQnoregA7sgjviCbyOGlLgS/B+9Gsh8AZkE7uh Ht+yhW/QwqsneJEuPvhZcB/X4JBNEEzQ0cG7KolLyCOJRYTbZG4yuLKEnc21 NBecn/YtzHiX5vy3FkMr8w3Ak72EV2O5Pem9OeaaG7RO9xmno/qZPsPcgGkq aprus0Ame80jHbreiKzNKwhbWX4j3a0lO1REu5LoVJOxvV4agAkWEIpNRbEq IWS7mu7UMtEfh13FhD8RuJuVZJOCGBdwCjkGFmwbFTbQBNlERNSISShqERGi EoJKCAp+DUTOq5Zxq6T1lbvhVaFIuJV4cLCgSspuYUVKcttF3S3WziYzGEEr JcP3NwJJlAyLEqvs2LDfKhZ0Yhg6OgwFfvMO3CZxcWk5LrCJvt4NPDFwASlO A9ehr8fu+M4uM88BiT3et6cLFUr2iQOf/443nkD21U12deNRQkJuZdAVa2WC 9zslDV55d7NxasA9PxaYH/ODRBbHACa7Npkf2W+TzKSjWcnHUi9/FdvBdSQd SJJwMuPqKbBJRuKJjKvHM68eu5F8LDf1RHHGqYqc89X5FwiFF4mFFxkVSazq a1xSOnaGsKgCPgkhC7vVI+qNqCZ77LfGw/fnWh8utD+YbwOePL7T/929Qcjz hyOvNydebYzD/Q0IZWvy5frYi7VRuMOXNld6nzwYevt49vtni8AQuL95NI3O 8t0XNIQRH3Fy4G6u3brJ4zl4G/Dku7UxyNP1cbhv3x2EOz56Hj/s6+0T+FaY UF4/monxZ+plrEP/973wObwOr8PrD/r6jE0AJvE2UVWd1RMvOOqSZ0Oc51Mu ZBNsN1cLH7LSzF1prgeY3GpkH2iTZumNQUvVYpi12ia60yl90KvcHNSBTXYG tZt9qs0+5UavbCsqW+8WIZsARrykU57aE+7aY0Hqadwmztrj9uqjtspfOKq+ 8hGOt3Eu9ctS+iXJ3bzLkH5x4rg6fdVTvtFAetpd/6JPsNPBftRZ/12v+ElU 8rhP9nRQ9XrC+GHe8eubnu9Xe96vdH+41fXD7e5f3up6N9P0dMj7sFm73qzd atJsRJT3/ZI7Tv6KnXtXU3tHVQ25p6l5qCesGYhrBsKWmfRAU3lbWjjGSOmt /naQdGWMnmxmXpdUXVRRk+38nFY9YdBWN2CkT9l5w3pGl7TWT8s1liQZci/r sy50F16boxY95JU/Fpd9J8p5Ik57q7vxwpq7bcicV6cNSVP61NltqpwuY2lv k7q/zTDcZRnotDSHVBYDSyqsUinpBgM32GDpG2kZn+sbmOiMtHtdHj24w+s3 tXcGgSGz80O3V6fhPjbR09LmC0XskUZnuMFxa2X6r//qN//Hf/pf/tu//pPZ qb6AR2/Q8FSyOhGXIOUTlSKSRkpRS8iwIBGwSsX1ZQphtU5OQZumUOwGDuLJ TyEgDGAzGffmnnikYS86XljRGFCg2fGxqHCb7PHkJzZpDf9TbIKsBL8fVDfB Syf7Ar9P+JLfLgKh6GQkLj0P2YRaeZVFvKYRFneEJANt6oEW5Xi3obtVZtZW Mmovs8mJAkaqkJaqYGeZJcUWSYlNVGzhFxjZOTpmlpqWriQnqchJakqShpai paXo6Ck6Bkqyvi7ZyL5m4qRa6tOs3Ota2lUsDHjxuk2Q65SXOpWVsDpVcQtp lak1RVeJZamUqgxyVQa9KlnGLoA1asCC1USAHujBQTbB6iYIL7HAm7kNTmGM J0JkE5+RC+LwO8VumwD+7FTiXZsYFBT4UQQc4ka3vBmW+rAeswjhnW4Ny2fA fgmsh9FEP5uaCSteLfxCfqWIXcKl59eRsum1+4cqosdoo9c+m6DR8AgvcEc7 vmpKU2rLru0rnUDgMdxhGQw22Vc3QTZBPInfN4jnH7QJ4smnbIJG9oS9YmST vk7TP8omyxOepVHn/JBtdsAMMNlNv3kqapzshQeWuUH77IBtKmrua1S0+4Qg FK+e6tKQ4GOAzWrUU506ZBOyTQXBhOLU0l06pktX59AwsAKKElvnf7lNVIJa 5V5wkuAekXAq8HzeJvE8UYiJKhkZVvXjA+Gl6c6uJguoRy+jmnCYgKQ0bKeG jXi7L5+3CeIJbhMsMZtgdROLwGUV4GUUtPvr4/4RJJH4se/xQsG7UeKHMwbd ioBb4XeAX2KHDzul8BdFg1f2sU1ujvqQTeaG3bNDntkhL7whaOMLGQUZiUey ko+nXcE63zGbJJwAm2CJ2SQz8XhW4vHs5OP5aafKss8CTGoKLlbnfVude55c fJlensiuSRXRb2gFZegM4WaXoDukQI3wYJO1xQ4I2tn15O4AsgkwJN4m8BgF Xn/6ELXJY/PZASBgE9wp+/L+6SKukt3zuD7BE9Qpj+bLA2debk9Ddu4Nba72 A1hQqWXPJvMoaC/Zh2eLkNePpg9tcngdXofX568DbfJx0cRQdlJZdVZH+NbN Sb3ZLHw163056wabYKcHt2HDFldbeGATxJMDbdIqzx2yVoNN7sSKJg+jqq0h Pdhke0CzEVVu9avAJtt98o0eccwmiZhNiKdc1cec1UewWSeUM/CKm3gSeAI2 sVd9Za/8hbPyqyD5VFv9hag4sV+c1CdKjAoTBsQJM/rMFVfpZgP5cVvdditz u7Vup6N+u5O71cV/FBU/H1a/nTT+MGd7davrzUrP+zu9v7zb99v7g7+5E32/ 2PZ82L/Tbdto0W8267ab9RsR1V2vaMPEeKin3NMQ7qpr7mlqH+gghC0L9b62 elVZtqIsvaUomeHf6CZcVlUl0NOPQCipv4B7fc4ZXt45Rvpx+vVjtLRjtOvH OTfOigoviwou6dPP+YoS+4nXl3n5W7KibVn2jizjoTbjvj5rWpM+KEuLKnM6 ZLmDxqr2oLS7UT3YYRrrcw32OGHthI1vVjFkMqrGKAg12XqGmvtG27sGm8Ed /qAFbNLc6u2JNgJPVu7MPH2+/ubd483t1aGRju7ehoYmV0dXaPX21EBfs0LK FvEoUiFNIqCI+WQRt1ohJusVNIMSi1pCQEUTeABP0aYpSLxNcA5AfA6+34kF VnRBtzDkEUEiPgkEFnixyBoDWMAmPy2d6GI22R2c9yU2QStMZJNGvwp1l3zG JqiAgio7PpsQluIeC18rJdXTcimVScTSy5SKBDYp1SSv7GlUgE3gZzPWpe/v EFs0RVzqZRknVVV/XcNJM/IyzdxMMyfDzLpuZqZZGGlWJhYHLdlBS4ol2Ykl yUlLdNKxuJlJHlayl53i46T466/ZGAlGyiUj7YqVdc3By/JIi0PamnYXz6ej SuuKaBVp5PI0em02g5jLqk2T1OWZZDUeAwPVRD5VN4k4IdwwtpuLG3uFCzaJ wQSzCSqdBC0CQIffKfHEHAd/phJuuYxXoZORwSZBpwRg0grrf68yZBUBSbw6 DsSt47i0sbWlarc1wKKkw89NIagSc0r3qid5gBG0U+tjm6A9XWATAAjc4Slq KoE7KppUFScBT+ABGtEIvxa+xIp9T/gOsBgGm8T2bqmQTfYFL8bF50CbwEfl 49LJgTbBmqd8MrAJfIyRTWYnArE9XV9kk1uTXmSTmX4TqpvM9huno4apqGG6 zwRCgUz3mQEp4F/IWJdxqE3bFZREbCyPjmxR1lhVtQ4tyakjQ9BGL5eO7tTS 7GqqTUW1KqkWBcUsB5iQvtAmuEdQZNwqiJhd/nH2qQQF70DBN3epJSQxv0oh IRqUdIMSazNxm/ktAa1VwzLKaahuAjYBmGDc0MIdkMJCdZ/PJPZmzoE2wWeX eGwij13kNP+kAwUJ5eOjt/AT3vYJJb4v/kenOKR+F+AFeIIVVnw2EfxFcWDd ZHHEi/pNZgZdM4PumSHvZL8LbCJiFoJNslOOxyabHInVTU5kXD2VmXg6K+l0 dsrpnJRTuSmnMq8eyU4+VpJ5uirv25hNvqm8cZZYeJFamlBXlSKgZmn4pQ4V KWCqi9jq232SsU7L8ljo4UI7qATb03W7d2clikonzx4MoyoJgsm+PF8fw08V fr0zhXo9Pi6axLZ4HXwq18dnCKPtXqAP1JYChAGhgE0eLvds3RnAN4bFvjT3 MU/gMbz++174HF6H1+H1B319yibxRROACbKJtvYbHy/9Tqf87ULgxYzr2ZQd m7q4yxP+nVbeagtWPTnQJi2ynN26Cby/S/agVwk22exTAU/AJtsD6s2ofLtf vhWVTlrKW3jJgBEvYKTmOLKJn3oWe4V8GnjirD3uqjnqrP7aVfU18MRPOtbB vTSiSBtTXR+UJo9Kro7KEhdMN1bdJWuhmp1WxmYzbaedtd3O2mpng1CeRMUv hlVvxvVPFlqfL3e9Wul5eyf6A9jk3sCvVqK/XOp4OR7e6XFstJs2Wg3rTdr7 YeWOs37Lxlo3M+7pyKtqwh117V0t4Y6m9r6eeBfb6FV7T1czwc1qq/pWcuM0 +cJ/xbzyMxok8eeM1GPkpK+4+d8Iiy/ziy7zi6/wyxLqii4Qs0/JC67oihN8 lYltxMRRRtKyMP2+PGtFk76qz55UZQ7JswY1RZ2SggFdTU+DqqdJE23RDXZZ R/o80U5HY1Bt1HOkUopAStOaRe6QKdzqbu4Ogk2AHoGQtbHZ3druj/Y3A0le vdl58Wrr9dtHS8vjbR0Bs1UhFDNEAopERBPyyVpVvUxEFdTXaJRMlYxsUDNi p8jS9UqyRkaQCyuVohqtDNvQBSRB+6bwdmlkExSsgGLn+hxcv5MXcPEDbown QY8QFngRnxgTih+EEkNKQNocUsXzZLcLIKTbm+ttaA0bUT5lE7S2REvNBp8S JIJ+D7hN9qkk3iZeq8BvF7lMXI2EEOs3SSSUXKJWXuXRMuwaQrRZ2d+q6m9R DrdrBlu4TlWesu6qgZ+qr08xclLMgIv6VHt9qpOT6mSnuuquOetSnMwUPyPJ T0/006/6ILQrXtplSJCZgKXucoh1JVh3Be4hVoKr7qqFetFEvmimJdjYqT5x QYuB2GZjN5nrbNJaMTWXWXmdUXmdWZ3Jp2aJmblaYTleOvlUYjap32cTSMjG B5tEHKIGp7jRKW10ymApHvLI4Eehk1PAJlJehUFBhR+F3yaMwBvccrgHrSK/ iQ8w8eytJ7ElpYaFHaOkYoBN4JeAaHYn94lqYO0K1kBjFnFcIJvg/SZAD7AJ GAR1nSDLwOPqkuTKokTgSXzpBH0HdKSwjF+NzhBGE0yQR/CPCnYM195g9y+x CeJJfOkk4t0dufiTeGUxnkjgMwyU7uv6x9lkZcqP9nQBRqZ6dWCT+UHzZK92 uk8/O2ia6TfC4/FuzViXFpAyO4DKKFawcLRR3u4TBG11PjPNbSA7tES7Zjdu Pc2ppQBSbCqyXY3t8jLJCD+FyedsooyzCYIJsomIVYbyI0/qK/AgmIBWcJvE 95sYNUw9NhCHihrh9XKqWkTUSSkGOc2soANPsNKJGjDCcseQi5z7eaeAZZxa jlO3yxNnTCV2HQcLPvbdKnBjM3oOsAl+MnD8tq5P2WTfyV1YnDK/UxZwwlel 2FNgzifqJmCTJWw3l2d2yIXVTYa904OekF2A6ibZKScyEo/t5ira0HUqMwk7 sOtGzCbpCV9lJR0FmwBMSCUJpOIrABNKyRVa2VVW9TXMJrwSu5KIzhDuDMjG u6xgkwfzbbvndO3xBGzy9P4QKp283pxAwWHydnv61dYkGhn/dG3k1fYkwORX L5dRAWVfcImgjhJUNDlwLjx6A/7V+F1ejx+MPNuYQMUXkMv3z5cQSRBP0P4u 9Mrve+FzeB1eh9cf9PUZm8QXTZBN1NXngsKsh1Ht+6XQ82knbpNYhHfbMJ5g Qvm8Tdp2bbI5qIvt5lKt9yp2YjbZ6Vfs9MunbZXtwlQMI+TTntoTeN0EXkE2 cRFOuAnHXDVHPDVHbWV/bCv7VxHqqX5x0rg6fVSZNqlIGpVcmVGnLpqyV5xF m43EzUbSTqyAstnK3GpnPe7mP+uXvhxWbs237Cx2fHer+9Vq9N29/u/vDnx/ p+83q/0/LHe/nWr6bsCz2WFeazGsNesf+USPvMJtF2/dxrpnpN3Rk+/qKXf1 pG0Ha8vKeKAnrqgqF8RF88ICf3maLPG4Kvmk6tppw41L5rJrivzLstIkWVmy sChBUHJVUJ7MLL5MzDtPyTjNzjkvKzinyj1mLzray7g4L72+rMxY1eVOy7KG xFmDypJOScmIkTbabR3sMHU3qjsbNH2dtvGh4Mx4U3OjyWYTgU14YopMW29w KNxhS6TR2dTiAZsAUuBBT7Tx6fP1f/1ff/jTP3v/mz95MzM3qFTz2PVEDpdE JRcJ+SSpmCqX0qQisgAWKoIao5ZpNbBtBpZZy4jZpFYlqdJIiXoFFcCCCiXI JjhJ4uOxs70Ojs/J8bvqA25uwM0LenghryDsgwgjfogI0hAQgU1+ypNdm+wt O/Wft0lnswmtSJFNYHmJbBJfN0ESwT0SzxMPMMoqwG1CqcDqJtTKBAk7N2Bl DrZrwSYDkBblUJjuVWSaOAkOwTVrfaKTl2znXPXwUtzcZBcr0cG84qBfcTIg CT7GZSzMSz7GRS/jgpfxrZfxTYB1Mci6FGRdgAT2YqNeslEv2+mJVnqihZHi EeS16gltJnqriRFUk/WcIn7NdXbFNV51uoSZBzZR1BdZlUS/mfWZuklsTxdr 356umE14YBMMJi5Js1ve4lE2h7URvzLolpo1DGyqhajWomE6jfXYti7rbstJ 0CIMmAVuDcsdt4BEJykBTCAmFRajkoYCy1QhuwwcgQ7gQsdtoV1b8TYBmOD1 EVAM3MEjoBJkE8QW3CYo8H1gYQyLUrTCjLcJ3pqEyh8f5zM2iS+dfN4mIY8I bNLfjfXCf/merpXpA22imerTzQ0ZF0bM88Pm6X7DRI9mdtA802+a7DWMd+vG uw2TvVg9ZazH0Nskb3CxXXoSYBnuPjPdY6ShGgqKXU2GT4VZ+cU2iW3l+pRN hHWlKAJmiRCesstEnHJkE/j5ow1dP7aZ7EUuqtXIKSY1c/foYBlFKyEDTHCb YKWTWL8JTpL4fNombKdulye4TWxa9o9DGOP6TfBjhPF8bJMD93R93CmPeuH9 LrnPLo1t65IG4D2ftsnCkHtu2I36TeZGfPOjgaCNj/pNbqSezEw6HjtA+FRm 4ilkk4xE4MnJrKQT2UknMq8euZFyvDTrTG3hJUpZIr0iiRELszKZU5smpGWr uMVWea1HR2ty8tGeLrAJvqcLeIKEgu/sevZgGHiCNnfhNnm3M/3u8ezLrQk0 AOX1zhRuE/xcXzx4jwnc43d2fYon8UE1lF+9ug2PUdMKGjEfO/Jr90ww3CbI Kb/vhc/hdXgdXn/Q14E2+bhogmyiqjobEmVvDho+3Ax/bJN77QKUL6mbPIyq cJtsRJU7g5qtPsWjAeXjQeWso7pTlBakn/dTzngIJ1w1RwOUU9gWL/KPXSfI Jj7CcWvpHxsL/4Wz4uetdeeHZCkTmoxJeeK4NGFKmTSrSb1pufHAX7HZQNhu pm010zaa6VutdY+7uM/7xa+HFQ9nmjYX2p+u9L66N/D6Tv+blej7O/2/uTf0 J/eGfrvS92629btB30an7UGL8VFI+igoeRSQbPtFmx7emo31wMx4YKKtWxhb NuaGifZAR3yoI67pSQsiWldVbntJljfzijPziqMkVZuXoC67JitK5OdcFBcn KmozBbXX62tS5ZQcJSVbVH6Rc+Mr0Y0/cpR91UY/N8FLvK3OXVDkj0vyhuVl HeLSMWvdcKd5JMaT3lZDtMMKNrk51zk92dbR4dKZhMATgZwh0dRrrTIgSWOz G+7R/ubB4fa2jsDC0ti9BwuLN8fBKXanRiCisziEWmIRlVzM5VRLRGQhr1Ys IMjEBKuZazNyLDrsfGCrnmHSULTyGrW0WisjG1V0vP8d2WR3wHqsToE2U8Vs wvI6WD4nG+J3cQJuEEp9yAs84YV9fEjEL0CJt0mMJ/tt0hIyfIlN0FITlpc+ uwjfYBbfnr87Su+nPAGb4L3wqN+EXJ5ALL2o4BU2e/kjXYa+FmV/s6InIhn0 EPyiVBvrsoef5OZe9QtSnKzLLtaV3dRBLqO46y54YnHXfeuu+2Yv59x1Z92s Mx7WWQ97N3bgDDPJwUg2UxPN9BSfIL9dT2w3UjstjHYLK6gkGurypYR0GTFT zi4Q0m9I6vKM0mqvkRmwsH2mus/0wuNPsXO67HyUiEMUXzdpCmoCbin8iGIj 4Ck6GdmmY9n1bIeB4zVhPMGEArEIXbBWjGtbtsd4go2lUDPMagbiCRIKrEtV YiKsYGFNi2ol6BhhZBM0wQTZBDCCOt9R+wm8Ul2SDDCB+766CS4UWB7DohSW kbhN9oprejRgEd+d9YU22Vc6OdAmIc9uvwnYpCkoH+ixLEyHv9wmaE8X2GSm 78c9XRO9qqk+zdyQYXHUvDBimR00Tka1MwOAESCJfqJHB0KZ7jPNDlgm+kxj vYbhTm20Wd4WEITsdR4jxaElOnXYLi+7hmhV1VpVBLuaZFb+I/Z0xcMEtZng KgGS8BnFPHoRFmYxv64E/ijBJgCTfSqJP6pLJqxRYX85YIcGY/NNZFSwiVFB Nyt3jzi2oY+NKp4erPh83iZY0G6u2M6uHwslFr7Tsnu28MfzTfYdC/ypXvj4 TV94T0rQowy4FQGnPJbY3xuf2NO1BB4ZcM4OuZbG/fB0ftS/NBH2W7h8Wl5W 8rGcNMwm2Skn866fzU45k5V0JjPxNKqbZCedBJvcSD6el3oSbFJTcJFcepVe kVxXlQJhVV8DmwioWegYYYeKFLKw27zi0Q4zvqdr+3bv+lLng/k2QArwZGcl CgGhvFgbRQWUeJu8x47wnUajT55vjL/ankJj2T8Oqn2ALBBMPlM3AXQgv+Bv QDbBzuZ6PPdsY+Lp+jg8iL1zEcHk4+rJ73vhc3gdXofXH/SlKvj5bgq/UheC UL7WFB1BMInZBFRyKpbTirJT2upvGsQ5633adwuBt/PeZxNWzCa7Ed3rFKLc 7+BB7rVzH3TylxuYbbLMMC+lRZI1ZK64GWHBmx90ydZ6FJt96vU+5Ua/CrI5 AEjB9nTtDCjmvcQ2UaoHJEI+5SGeBIb4KCd9pBMQLwmeHsdSewzb1lV1xFV1 1Fr6c3v5V66qI03Mb4cUWRPK6yPSlAlV2pQmY1qXddNe9CBQ/biNsdlEeRgm rjeSH3cwX0R5rweEG6Punangi4WWt7e63t7qfrvc8+529Nd3R359b/RXd8c/ 3B5+Odu7M9LyIBraaNBsN2kfNWm3Iqo1n+Shm/fQVf/AwnhgoW9Y6RsWypqR sG4grOtrVzSMGWH1RH1FFzk3WJ7qLEu2lCa6abmNgqouLXPALhz2yKMeaZdT OGAX9Fk4fn6xpOg8N/Mred5RfclJD+GbTkHGhKGiX1UcVZe2SPKHbeThbvvE gG9mJDQ+4B/t900Mh8cGg1MTreNjzcATu0MmUzBFYqpcxbLZVU6XrqnJ3dfX 3NridTm1kYijscHp95rsFqVWxWPX1VBJpWRCMYNcwKIV8VhlYl6VVkFzmPmN QY3TzLNik8GZZg3DpKYb1TSIWcO0aOvwDV3IJvjQEHT4FaAg9iIWn73e7+AG nLygmx9yC0IeQRjb2SWM+EQNPnGjHyJpDimaQ8qWsLI1omqNqFHLSQu2nsSW lK27B8DGThLeG2iyL/GDTiI+WE5I4ptf0FYunCc4TNAuL3fseDF4v1ZC4NJy aJVJ5LIr1LJLVkVVT1A02Cjrb5AMN8kGwsI2bW5AmOThJvh4V731V3zcBFfd RU/dJQ/rkp99xc+5Ancf+7KXdcnLuuiLi5d1AcXNPO9inPXUnfdzLvjYwJbz dvpl4ImDmWgHobCu+YQ5zeryTiul00rrsNKbjRS/ssYuLLXwipWsXBkzW8nO NYrL3Fpy0MwM29hhKztkjW97xxKwsgOxF/dsEjtGeF9sfEgQfghWod8qdBm4 FjXTqKBZMW4wHTqwCd9vwWwCd79Z4NIynWq6A6JhoNjVcGfCHQ3OM8MqVEEz xf4juVlJN8goamGtrL5CxC4VskrE9WUcah656jqh/BqxIpVQkVpdhgEED9rl BSpBZgGtoC1hqOyCTvGCO6yQrTo2LBTRnq740YoAk45GU/zJwPjpW19iExR8 5OJPbSIOe7GiSdAtjNnEujAdQbPgl+awM4SXIHOhm/PhlbnQKsp86M5ebk15 F0bsU33Giah+qt8AmYjqpnu1s336uX7D/IBxfsA022eYicJT41y/aa7PiGcW flWPaTJqnem3T/fbx7rN/S2a7rAs4uAEzAyPnupQE+2qWkjsAdGqJJgVBJOs 1iirMcoJRjnRIK01yUl6GRaDnKyVELVAidiwEuxkYF61lFslqa8Qc8qFrDIB q1RQV8JnFqODoDm0Aj6zJHYCxi5M8AGL8YPgUfRymk5O00qBJBTsAGE5zSij GuU0EzbHBJvGgn1g1EyXps6BFVCYH/Nk3ysuLduNhePSYXFjLSf1rt1wXSau O3bYNSqMftwCj5+4ta8gEgJ94EF/1ruRY/HII57ds6PhKTYOHt7jkAQdopBD FHQImrzS3hbD9KBnYSw4v8uQ4OJ4YG7YMzfiXZoILY4H50eDSxMRv5XLIWfl pp7ISzuVc+1ENgAk7XRe2rmca+dupJy5ce1MTuqZXMi10/lppwuuny68Djw5 Ryi8Qq9IYVamAkwgPHKGhJmrrC/SiyqcajLYpDeimup13BwN3p9rReUSuKMD u9CRwqj35On9IRAK4smzB8Po/K63j7BZh6+2J9HI+Gfro/AUzRyB4E754Tk6 U2v+5fb0881JEMrH+7vwTV97B3DNx2sFvQK6gV+Ob+vCm02wfpOf5ve98Dm8 Dq/D6w/6Uhb8MURV+DNVIQjlF2pMKF8hmCCb6EtPQTCblJw0ES62ygo2otp3 8/7vlwJPxyz3OyW7NukU4zZZ6xHe6+BCHnYLbjbQWyTpYV5yiyRzyFy+3MB6 0Cl+2CWFrPfI18AmA2os/cqNPvlmnwx4shiktIrTXMAQ0qlY//txL2aTY17i US/xuIdwzF171F1zzFV9zF7xtaf2pKPymK38iLHoZ47K4y3sxFFlxogifVyd NaHJhvu0/sayo2SribIeIT4M1a43EHZaKd91Mp51120PWZ6MOl9MBd4uNL9f an93s+vtUtf7W4Pvbw+/Wx1/vzr55tbk88XRx7ODj7vcW63W9Qb9w5D6YUi5 EZRtBiRrLva6i7XpZGzYKOtmwpqxet1YdUtLWFBUTcsrxyXl0frCVlZ+K6dw 2Fg375fdbreu9rhudTsX2m0TDfrZgHLGJ+831rkYOeL88/wbJ6SFZ02kKyHB jX5TVZsiv1WR1yTJGnPVTg4FdtYmP7y6A/eFqVawSX+3u7PNPtgXHB1q6On0 +L0ai0loNPBsNsXAQMvUVK9Ww1PKWCaD2O1U20wyvZqnktRJeBQOvYpaW0Sq wo5IgtUIrD0sWlbQJUPHH8H/1zuMXHjFpGZCLLEZzfis8PjEH9KL1vlWHctj qfda6302bsDBDzoFIZcw7BahRDziBq+k0SeFNPnhHycHniCbtDUgm2hjNRRN 3HoSLUH1H/MEnqLJJqjxpMGnBIDsO6cL/fZwmMSfIYyVeLBzfrgaSS2Xmk2t SCSXXhGQ0hrtrPFW1UBY1B/kjzaIh4L8sCQtKEzy86/6eAlezmUP+5KbddHP vuwHm8Tiq7uIgr8SnyDnipd5wUU7D/dQfUKAfdlN/8ZK/sZC+dZBv+JmJbs5 19zcdL8op0Vf1WYitJrJTUZSRE8Iamv9mlo9N1/DydVx803CEoeyxm+gNthY YSvkI5tY2BD8aZxQuD/WVmJfwsYvWoRhhxTuNnUdLCZNsc5lh5aNbILiA5vo mE4tHcWhoTk0sNSkI6GgM2ytCrpFjkKzKhkmOVUvIerEBI2YoBRWayQEEbuE TsgklKfUlCZVlSZWlFytKLoKGEGlEwQT1GmCRpzE2wSd7gWPUd0E9ZvApxSH CW4TdGgbOrcNweRT53TFqxbnCW4TPDGbiMJe8Y91k27MJjfnmpZmG5dmG/YS WZoNr8wGVuew3JkP4rk945sbsY71aiGT/QbIaI9mNmqY+ygL/SbIfJ8RBT2d idqmeiHWyR6IBWW4TRdtULR5hSEL06MjO1QEh6rWKKkwSyutSqJdje3yMiuJ BlmtXoohBT7bEJ2MqBbXxNqCYruwBDUgDnCHCGDCxvZuAUP4dSW8OJvAK/BV dDYXcAbBBPcIPuodi5Sqk9L0MrpeRtNJKXopBbNJbAq8WU62Kqk2FQ1s64oJ 5VN1k3iYQDyxoOYUD9gkxhMUsAnajQnxwb/Ie9u34s/aOnDMYsgFPJHueUQW wTDyibhkjW55g0sSsgshYYcwaOe1+GX9bcbZYd/SRBh4sjAWWJoMLU4EsRrK aGBxPISZZRReD3vNbEZNau6143mpJ/LTTt5IOQZIybt+Lif1bHZKrGiScjL3 2qm8a6cL089A8q+dKEw7VZlzgVKSRC+/xq5JA5vwyZnYXHhxpVVe69JQfAZG tEE9P+i9PREBjABJ8D1d8ABvPwGegE3QqcIIKXB/sTaKRrG/3JoAm6Cm+Nc7 U69jA0fgARjh+70pJ/gs+BdbUxDgCaqhoFOF8b1enyqm4IcP4+/BHjzZlQj8 Ng5tcngdXofXl1/xNkEw+ZRNlKWnLKTLXerSR0OmD4tBsMnzCduBNlnvFQFM 7nfywCZLEVqz+HqIm9QqzRq2VNxqZOM2WeuWrferUMAmm/2KrX75Vp/sVgOj Q5bhoZz2kE/HGkwwm7hrv47lKIprzyau6uMAE2QTc8lX7ppTfcJkUMmULgcC D8ZU6TOGnFvOknv+qo0G0nYzZbuFDDx51EbdGjQ+HrU9n/K9mY+8XWx5s9T2 erHt1ULPm5t9b26PYDy5M/X+zsy7OzPvJ9sfdXvvhXV3Aqr1Bu12E0Sz5Rdt eHkbbtaGk7Fpp21Yyetm4gM94Z6udkVbe0tHWNaTF0yMeTPrYavpYbtltdO+ 0uW81e2e73CMNxpnI/qpgHrcI4+aOFZ6DjfnlLjonLryWxs1KSzIbJXlRHXF HYobUV2Bx8ztajaP9vuHej0TQ6HZiZbhPn9Hq727wzUQDQwPRsZGWybG26Ym O5ZvjQ0MtjicKotZqpSzNKp6iF7DN2oEaikLbFJHKasszigrSOMyig1KOiz5 0H+IhlVfo1/tsWIdplYd26ypg1h3ZzRz8XIJOqQLAmt7vJUDHsNXYzPZ2R4L B3jit/MQTIAkB9qkKc4mMZ78wzbZ99+9v9AmOEzwufBoBxqyiVZC4NFu0KuS KWUJBmFpX0Q+220YjIijfu5AgNftZIbE1wKCRMwm3F2bQA60yYE52CaksxbS ORv1gpOZ4KxLtNcl2VjJNk66X1rYbCB02OhtdnqTiRIxkGzScqOgCGyi5xda pBUeLSlsYUZs7IjtgK6TfVqBIJvgPNmrsGA9700eRdAmsqqYegkJVpI2NdOp Y8f2dIlCdjGacoLbJAaTXZvY0BDA2F6v2MQKuDPMMqo1VkMxxsZ/mxQ01Cyv EFQJ2SX19HwQSm15Smnh5aKcC+UFCajrBLXG47u8cJugjhVqTSY8BaTAchq8 jObCx2/oQjbBEtv1h6zxJTaJbzlBRbcfyyW4ULC6yY82GeyxLs40fLlNVmb9 YJPxqA7yeZtA9sEEMt1ricEEI8lEtxkFXpnps8N9qFUbO3a4DoRilVdbZFVm ea1FQcDa5NUUm4aKNnoBSVSiariDE1WiGlQ0wWGCSIICMMFtAsF3cyGb4HWT eJug/nddzCYxnmA9JljFBCudgE3IYBOLggI8satoThXdETfN5ECb4E0o+Olw ABMsBq7HyIVPJiQeJr7duu3+Q4D/QZt8Dia7NpGBTcIOUSyYTdqCisEOy9yI /+ZkBHiyOB68ORUGnixgNRQs8KWZId/scMCpZ9CqUoAkOdeOg00AKQXXT+en n0dz4a8nHLuecCQr6XhuyqnduknaKUhp5rmavEvk4kR6eRI6pEvNK0EwcWup kM6AbKbPdWs8fG+25f5cK5pygkiyudwNPEFCQU3x27d74XWEFKwJZWsCsjc1 fvLp2siTB0PPN8Zir8wAW9CxXWCT2BSSue+f3/wlmpwYUwnyCCqC4PQ48Gxh 1GOCOAO/HH0HMAh8f5wnKPAPhfy+Fz6H1+F1eP1BXzGVYFEXYkUTTdHXkANt oi4/Y6de7dVVPB42v5v3f1gMvJi0g032Ir7fJUIBmwBMIGs9QrBJkygtWJ/Y JssetVXhNnnQKQGbbAyo1/qUEGxA/IASbLIZla401XUpMr3UM14K1mDiJBx1 k47vs4m75pi75rij8oizCiua2CuOWsu+tpYdsZR+HSKeGpSkzhrz50wF0/rc CU3WpDZrKra562GodqeFCipB2ew37Axbn026X84GX89HXs43PZ9terXQ+XY5 +u7O8Pu7Y8CTt6sTb1cnf7U48Hay83Fv8GGz9V5ItxbRbjUbtiPKzZB00yvY 8vK2vPVb7rp1O/2RibhjJK7rifchZtqqte6mibHWrLvfpLvdbFppd6x2e292 emaa7ZMR84hfNxkyzDWae81cMy1LWnZRX3O5RVY8aKkZMFV0q/NbJBn9hqJo m6W/ywnrcFhWgVCmRhu622yjQw29XZ7GsMHvVYWC+q5Oz/BQY7QvHO2L9PU3 hEImk0EolzEsJnHQp7ebJRI+mUkpphML6xkVCjHd75DCSq+zyQxrPDQqApZ8 B9oE9ZLgnSbIJrDCR1UJuMPj3cO7jCy3mf3lNokrnWg+ZZPY5i7dP9kmPxkH v9cXg2bHw10nJQoYuYzqFFpFoktN7A1LR5rkXW52h5PZYaeH1JU+fpKPl4AV TbhXwCYoB9oE9PFxDrSJg3LWTj5jI5+zU7+10y5baZdNlEtq4gUjPcktzm/S 13TaaR0ORquV6tMSgCdgExU71yAscakJEWtdw0E2+dggyCZoaGN89STilLT6 1e1BbdghAZLEbEJ2aFnuWL8JwATkAvePbQIwgcBq06qgojl6uE0scho2AEWB xaKkm/f6UGBVLOGWK4TVSlGNsL6UTs6uKUupLEosy79SUYgVUBBJUPsJPEA9 8qASEAoay4hsAp/JBp8KqQQNN4EHCCaYUH7aQvL5PV3oX6L46gmaC48mwuM8 CXuxA+UiPgnwBD6lgz22f4JNvqRuMturhyChgEoWB8yL2EgUC5rSOBU1x2Ka 7DXtdcpbZgdscB/p0PY2SBsdnKCZ6dbTsaKJvNYgrUFFE7CJTkbUSGpjQqnR SAhyPvxZVOIwQRg5MDhMUKcJskm8UHCbxMolNK0EHsTmLaqYZgU95lMKsgnE pqDaIZ/Y0xUPE1Qr8Ru4ASPPZ+T5TdioUL9ZAB9FLHsk8cWGE2HziWJ7uuK3 dcWfHvzTPV0/gUmDV/HJuOXIJhGnOGYTQcjBbw8phzqtYBCwSaxKgtVNdksn MZjMDvumB71TA16wCb36GsAEt0l+2qmCjG/y07/JTjl9PeFo6uWvMhOP5aWe yUs9VZh+pizrPMAEUpVzgViYUJt/gVGRJKLfUNYXGcSVDhUJYOLR0Vo9oqle B9hkdaoRcme6CZCCek9QwCZrix2P7/Q/uTsAjwEviCdYAeX+4OP7g989HEYt J4/uDazf6gaegE0ACIgnaNzJzr2hrTsDzzcn8ROA8SOCcZUggKBdXvuC3vli a+rp+jjk5fY01g7/FNswhniCq+TQJofX4XV4/YPXLkyKfq4u+gWCyadsoqs6 DzbpUpduDxjezHrfzfvAJg+6pLs26ZJ83ibt8htgk9tNnIddErxugttko/8A m3jI2EATe80R4ImHcMRde+RHm9QeB5v4iKfcNSfibaLO+SPtjX/ZSD07ockG nkzpcmYMOVO67FFl2rQ+e9lRfD9YvdVMApg8bqetRTVbg8YnY/bnU17gyfOZ yNPpyPO51tc3u8EmHzCbjL66PfJieeiHm8O/Wh79fq7vu4HG+022OyHt/Yhu s0G7EVZvBmXbQelOULztF2x6uN+ZiE8t5B0TacNAXDNSVo3UBTVhyV6/5BIs BZTAk+VW23yzZSpiHA0Yx0Pm2Wb7Ypt9tsnYa2FbGNl+fl6DpLhBnNuhLh6y 1vRoC6P6ov5O+8RQaKTP19Nm7W23jQ+Flma7xoYbB6KBrnZnW4utucna1Ghp iJhaWu1DI019/aGWFntbqz3g14iFRCopn0zI4TBKVVKa1y5rb7R1tjhAJRBs u37EAIs9NGL7S2yCeAKvoH5zrLU8ts6PdcpjNvFYOD4bN+gUfM4mAflPSyfY ScKfsMn+2Xko/yibxFdM0P8WN9ZLy4X1m5CZV1ebyqhKtsmrIlZms5Ue0hFC 2pqwptotKfRyr2IqgdRjKvHVX4H4Of9FNnHTzruo5xzkM3YyVj2x0S9ZaZeM 1MsmWoKJiU088cuLG3XVrWZSs63OryOZRSWa+jwdv8ihrAma6AfWTfYBBAkF YIIS/9WwQ9jqV7YFVCG70KamGWREiF1Dd+rrPEaO38oL2Pg+C9dtYMdVTLCx GnY1VjGJTdagIozgNolt7tq1CVY9UVANCqpNx1KLCUJ2iZRXoZNT9CqaSkYU 1ZezKHkgEbAJzhNCeSo+Gh7ZBHXEo+OIYZ3sMHLh84l9GGIFPrSzC7cJ+hh8 iU3wz0w8T/BSCyqgfGwT+IgORe2gki+3ya1pz+ywBdlkasAIGY/qZmIMOTC4 TRBPZvcy04+d4jXdBzFORbGW+fFu7USPDp7CV+cGLXMDruE2Q5Nb6NRSwSYm BcGqpugk1RC9nAQfb5WoOlY9qZXxf9zKxa8rwaskeBBMwCyfsUk8TyBAElQ3 Mch3bWJRMnaJGoNJzCYUm5yCTlTYNwv+Y5hgNjHyDraJZb9NYv9e/+RgLsjH MMHO6fpCmHgVjR4F2tOFbBJyCMJOAdhkuMuGbLIwFpwb9S+MYzy5ORUGqsSK JgATz2S/x22sYxHT91RyMra562R++vm86+czk06mXTkCNsm4eizv2un81FNF GWcrcy5U512CEAquUEuTqWVXmZXJXGI68EQnKLMriU412aYghK2cyR47kATQ gUonaHPXxs2unZXoo9U+yPbtXgjqQ4H3wBvgReDJ43uD4JHtO30QeABOgTs4 BQ06QVutUN1kYyW6Mtt6d6Fj++4gECPeILhKPhP4JcgjiCdgHKwK8+zQJofX 4XV4/VOuPZj8wzbRV39joyR0qkrAJq9nPG/nPM/GrZ+yCb6n62YDHe3papNl j1grkU1AJRhMehX793T1YXu6VptZezY5/UmbxPZ0BShngCeOymNgE0vpV8ai nwuv/Utxyr9wlP6sh3d1RJ4+qsyY0GSNqzNGFKljquvAk5v2wvvBSsST+z3y 9X7NoxHz00nn82nvs+nA0+ng05nml4sdr2/3AU/erY68vj38Ynnw/eLYL29N /vrWxPu5ge+GmjY63A8aLWsRrICyGVZthRXbYdlOSAp5bqO9tDOe2ug7Ftqm mXbPTL9toM4Z6PPmujmnYMErnfPJp32KmYBqImica3YstTsXW21LbdbJkLJR SQxLy1rV1T0mwlSQ86Bfu9jM/3/Ze6/gOLMsz296zFZ3OboiWTTNogO9J0F4 IBNAeu+9995beCCRSCDhM5HwliAJOoDeVnVV9/Ts7Kw0sdpdxeyOHlYKhWIj tBFSrB52n/Sg830X+CoLNF09PYqqB9z4x437mUySkR8S98dz/udMNwvHhxPD feGxocTtxezKUv9ErjU3mBgZTPb3RrOZyGB/cnCgqScdbml2dqZ8LW3Otg53 Z5fX6ZAo5I0SMUnIq6Y3XuHQr+tVjFhQ19HsiIfWa7HC1g6FTgBM4De71yYC GAEqIfwmgCdoM09kdhH9TWB7T+z/0VbfW8QmYbfoA36TpvCm0MmH2IQ4809g k2I8IUqKwT8B/YVh/yZlX+XWn2aTTugF1+yKKo+y0iUrc8uue2XX3ZIrPv5X fv4hELAJAhOcTb76U3K6/LS9AdpemD3UvR76Pg/zkJv5lY12yME86uCccPJO O/nnXKKLXumVJgcrYqa6VTUWSZlFWgH05NM3RO3smIPzdvrW25yyiU3QybCT 3xSQt4QUEZfAZaDjRWixDa3bSPdZWAEbx29le81Ml4H2QzChoWwuLG6ChU4Y CE+Q3wRL6MJ8KzTcGk8zq6jAJg4D26BoBDBRiWsNykZgE4OGZtIwUMFhQA/g EWSEJ2oLo9AJipug4sOITVBfeCKbi0jowswmmN/EinCDsJy8r07XJjYhXgJa bxAfUAOYwLMUhwc1rER4As/nQI8bwOTHs8lc3jeWtQ516xGbwDrXax7v+RCb FCd3TfRZxzdU6LUgYYdZawFIp8c02m2AGVtjthTXaNo90GHrjKojTuwzNSvJ RgXJrKYQbKIW1yqENcXZXIhNuLSrPPo1EGITlNyFSgcjNkFIUux/L87pMqkY ZhUTZFEzrViTeiZeNxgT8bSguIlzo+Cb64fJXUQqF8EmQRM/iGdzYd0/QRYs mytoE4GIhC7EJpts76ji1qYyXASbEFlbH2aTpsA6myR9CsATxCadcd1gygVU AmwChDI+GJwcDgGbzI1hKV4oblLoD+b7AjibnL12etcGm+wANrl8as/FE7vP Ht1x+jDWjfHc0W2Xju8sPbOn7NzeyvNfkq4eaiw7yqw+ySOfk9AvChvPsmtL AE90gjJgE6+eCorauUMdtsVcAqDjznQHwpAH892ohjCKj8AMnAJsgkp4Idc8 dttiem25Fwllc4FQKhdRoQv1Xny5mn94a+D+Uu+j24OIMgjLCQhVBiZqeb2t Bzf61m72w9Xvns8i+wnWhPE9OV1vHhZ+6o3P1tgaW+NnPQg20V//5MNsYibt d1C+AjZBOV1vxn2PB63vZJO3vfBxUUmr4nwxm9ztVt3v0bzTC3+jhZvSXAgx 9gbwZoue+m2+xu0Em3gBVeo+9dR+5q75zE/e4Sfv9Nbt8JEwR7y17GPB0T9X nvqF4/pfJai7AU/6FacGVKeGNKdH9QApZ/PG85O2ywu+spUYFj1Z7pKt9GhW B8xPRl3PxnxPx4JPxkKvpttezXS8mk+/Wex9s5h9NZ99NpN5PTn09dTI7+bz f7OY/93M4Kvh9tVU6GbMdDtuupfQ34/rAE/W4pqHCe0bHw/03MN55GTdtzFu 25g37cxZK2vKzBizsPI2Ts7BG/dKF2K6qSbHTItrqtkx3WyfSJr7/bIuOyfj 5nTZaFk/92av9e9We1/Nxh+P+x/cGprKty7NpN88m3+6OjE11j6RaxsdagY2 6esJ9/fFEZu0tri6uv2xhBkIJZG02G0iqYQs4Fdz2RUMylUW9ZpBzWiOmjtb nMmIEWsMsdEnoimsR83IUNAEqMSsYVi0TIQnRJtFVEO4eE24TtZbH274TYBN Qi5hxCMmHPHvZJOi0Inux7BJMZ78eDZ5O3pSzCYyzjVe4xkO+aSSdVHJPK9h njFyL1gFl2yCi3bBBS/vkI/3a5Cf9wfY5Md74T0NOwO0PUGAFPqXfuZ+H+uQ l/WVpeGAjfaVk3vCLTjj5J+1ck4ZGSVuZZVLWe2QV9pBimqHssalrgtbmREb K2TjFGsTmBBU8nboJOzkNQWkLSF5zCP0W1keE91loIK8ZkbAxgb5LEy3kebE mmh8DyYEm6zvOVGgREnDkESBzRYF5jTBEroATzR0m45p17Mwywme0KVXNBrU NL2aivcQZ5jUdNj0wiaZUX8BtThBNYRR6ASxCVxCOV2o9yI8nyjtEAuU4EiC 2KSr2d7Z/D2bFFfr+gCbFIdOiJdgoZMfsgnCk9a4diDzx7HJzKgHkGQwpQM2 ATAZH7Bj80YG19tUsjnRqw8nkT5EJeYxUMY8kbVO9Nsm+jFCwW/ANNazzibD Kedgp72vzdLTYg47BQCbVi2wQyNyxKtENQq8iyJwBxE3AaFSz8VsApeQEZ4o 0gUsiYVI1PS3ZcaQhI2LZVEzrHhPE9QHB6+ZgLmTXBo6ltNVxCbFyV2bwOR9 bOK3YK4TVKQLsUkYvnaK0rcIMPkwm3wYTHA20fyATVwYm3QlgDE9gCFz+QQe N8HYZDYfmy8kEK3geBIeywbdRgaLfOrKyR2YC/4kBiZXT+1CbHLu2E7QhZKd F0t2XSrZVXFhX9nZPetG+Irj/PrzMsY1Ne+6nHWZ33AatV80S6tDFlbcyW/2 inPdLpTQBdwBxIFiJQAjxQ3iHy/3wQJV8QKEQbaUO3NdD5Z6UMQEb7+Y//pR gQhkoM4m60GNx5MolQuY4vn9HIgIhSDQKLafvC24H6AG6AYWhC+eKM9V7IUH MHm9NvZTb3y2xtbYGj/rYar8TF/2MUh7bd0Lbyj77D1xkwO2hq96TLXPR92v C/7XBe963ASjEmQ2kSDd7hTdAnUIb3YIJ8O0FvnZpORUh/rKsJO00MTHnCZd qnvdmtWMHouY4GyC1RDGvfDAJotN7F7j1RjnAMrp8jZs9zZs82Oxks9A3rrP AEw8tZ+7a4BTdnrJOz0k0C5X7Q579Tbd1U/MZR9ZK/6FreojX8O2FsHBXs3J EfOFIcPZvPViznK+YL806boy7bm2kiAvtHBvdYkf9GkeD5uf5hxP8p5Hee+r +dZXC23PFzqfzXc+nu18NJMCvZwcfDE+8Hpy4Lu5kd8v5n470/91If24N3K3 3XUjZrgR0a0kjPebzQ+aTU/j6qdx1cOI/H5Acs8vue0TLXsESx7hjI1dMNHH jPRxC2vKwZt1C3Muec6tyHmUeZ9qyC1LW3kpK6fDxm61MEabtXfHon/7JP93 zwvfrQ48vT9+d2lw9dbo47uFm7O9w72R/EBiNBsf6o0MZiJDfdHhbGwgE+lL Bfp6gu2tjo42Z7rLGw1pbSauRFgj5FbyOeVifrXNyI0FtYmwvglHkvW22hFD PKCB3+BBlwzYxGnioTpdqG0BzG6L0GsTg+AqHjfBGg2g0InfIQq6JSEP7PzF XrsgYONhsvNCDtgDC8Iu4Xr0xC+N+bHW8KgpfDKibI5qkFpiWqL9ItpMtsTQ /42b1/WWXwAl8KAuJ7CGS7CrjPlVm3ovbmKT4jpdfrfU55K4rQKjqlHCvsom n2DXHZNSSiQNR1WUIwZmiZV9wsE75RGdDfC+CvIOYTDC+yoMcIGElQ4+hBQE PPlh9KSYTVCuF3ES1h7aXjf1Cy99j4/xpRfE/NLHPOBlHnTRDrjoB93MQx72 EQ/7mJN52E47ZGWdsHPPOAGRpNe88jKn5LpHWRm3MsMmut/ECJhZITsftk9B G39Tba73sQkmjyjhkzYFZAmfJOoWhRw8L7yPgxfGQypBO9dnYbmNACy0IqcJ gAnVqaWtB01+EDcBQqFbAUwUVJsKLjEc+P+cY7tTAwcWZiXFpGg0KyhmFc2C iWJRUQFerBoaXNJKybBnbqg6ScKLdwGYUGrPUurO0esv0khnqXVnmA0XZPwq p4kLyADggEzu+MMAZGGBByDVYn+bNd6pTWxSzLaIZdbTugJ4UdmQoim6Htdr T+oHgU0KSVyJOaTxxPx4fL4AbBJdnIhgBYSnYjemY8vTsZvTsZkRd6HPMpI2 jHTr8z1G4AvQeNow0WOczJimMubJDBwax7oN+W4DluuVwSsJ99oKGcANc77H NJYxYbGSrHVdfRvrPoxQJgfsU4MOUC5ty/c4xvrcuYxzpNsx0uPK9/mWJtv8 Vg6fflnMLjUoGqxahlZKkvNrZbxaCadaxK4SMiuFzAoQj14G4tPLBIxyOBSx AFuqpEAxovW2JljQBNgELxeMGpdY4TsB8BNf29RMu5rl0GDCusBr16tM42K4 dPR1aWlw6DYwMQGzrAs74zGyPEa218T2mTk+MxfkN7MwWTiggJWLf6Xw/Vau 38L1W/kBmzDkEIWdkohLFnbJIriibgBtRcyrjHuVCSALrA4wLvwMJt/6eUz+ dSX9WJQEYAQJDuFqc0DVFFA2BRSgpF8OPylJv6S7yTDc457JxRbGm2AGMJke Dc+NxebG4rO52NRwGGgFC51k/VYViVFztPT0tssln5Se/Lz0xOeXj318FSDl xI7LJTuuAqqchBmrzVV9cV/l+T0VZ3fXlx5i1Z7kkc9K6Vc0/Gs6YamGf1VC PytoOKXmXQ2Y6E0eIWg05VwuNCPcuDnecnemEyEJ0XsRDuESwAvchuBl3SY/ 27W62PP4Zt/T2wPP7wy9uj/6+kHum4eFr9fGvl4r/ObRxLdADY8wvVkd++bh +F+/mPvu6fTL+6Mv743CmRf3RmENC7gZroJggVwqXz9ab6T4mydTSHAG2OfF g9yL+7mXq/k3j9bf/9snk989mUKCNf4+W3GTrbE1tsaHhrVmu6H8E2AT9dWP AEy01z42ln/+Hr/JQQv5qz5r/cu87yXs4cc8L3KujSJdGJLc7BQh3epY141W QSFAaZKeAaW0paPuhoUmwa0O+Uqn6m4K2MSwHjTB2QT5TYBNFpKsfsv1JP+Q rxFvAd+4A2MT0nZf3TYkT+32dZF3usk7XaSdzrodjlrQdnvNdkfdJ9bqX5rK /9JS9VGQvqtLdnTQcHbUcmnccbVgv4zJdnnScWU5XH2zhXmng7ealj/u1z0b MT/Nu56OeZ9Nxp9OJh5NNT+cbluDXwEzXavTXU8LmWfjvS/Ge19PZb+eGfh2 DiBl4OuJ7of9ieVW13zcvNRkWWl33e/yriQMd5LG23H9raj2Vky3HNEsBBTj DsGYlZszs0dNrLyZM2EXzLglS83Ola7gWjb5LNfxcrz7xWT3s8nuR1OpxWxk eThxb7Lj9d2Rv3uz+NunU68fzj5aGbu3NDSdaxvJRLJdvonh5lw2NtoXHemN DGfCQz2hwXRwoDuQbnd1tTqG+iJTYx29KZ/PKRHzq/jsMpBMVOuyCuIhLSgZ 0RNt7GAR86sBTFABYZeZ7zByAU8Qm5jUdI9V5LNLvTYJLNANOMJwMTZxCoNu MQgWXjs/aONhKmKTdVM8XpGVYJMExibv6L3YGjMiXEK9F5HwXic/ABPEI8RW ExZNER1sXIn29MV48k75vXK/R+Z1iMwaipR9hU06zqw5zKncy6/+UkE+YGIc cXKOefglQdEprIkJziDAI6AI/3DkXWwSKPKbFHMKOgzDy+FO9kEv/Utn4xcu 2m4kN30PyEPf66EDpxwg5KEfBLlpB2xULNHLyT7h5p2xc8+aWGfckmsJCyNq omMFfIyMoE0QAdqyCv9g3OR7SHGLYh4xbLpAcS9Whihg4wKkgOAjgzWgisfE dBnom9gEUQluIqARYIJyulAAhTChEO0aQaic10aEZd2DYIf3gXfT0h16lsPA 1krrxaxyRv0FwJPaspK6ipMU0gU6+SyNBGxyXswps+mZEZ8iEdKAgCDg4wag QA8A4MnbvW/eBynFj9AmNoH3RK6TdV88sEkMi+iBOpoMQxnPzFhiFlMcdqTz hQRooRBfGIP9agxruTgZvzEVv4GBSRw0M+wCiMhnjKPduly3fgzwBFijWzfe rZvIGCZ7TVPAHXAGb8tYwHovmke7TTDnMpY8ZjBBeIKFS4icLnhPEFAJsAm8 OVwaTRvyvbZ8ryOXcYyk7cM4m+R6PWMDob4ux+vHU4XBGLXuNKP+nJRXIWZX i9k1IlY1iFgQhyAJpxZJJqxVbIAJFjRRUI3AnkAieDtFoqOiW8dxali4NpK1 MCRBfXAYRLgNyW1kEIJHC+TU02CGQ3jY4JHzWdgbYvgsdJ+F6beyQAEbB55J QC2Y4WkP2YVhhyjqWq8mB4JFzC2PexSghFfZBMSBe0bw8IfyA4LbmgMaUPFL AEmag5iaAnJQ0o+xSbrZMJx2zebhg26CeWokNJuPwAOA5XTlolMjGJsU+v1j fV6HhixoPFV3ZU/5mc/LTn567fivLhz6i8tHP7545OPLxz4tO72z8tzu8jO7 YFF1fk/1hb21l/bRKo5ySadBIsoFrfCaSVZmkZdrhVeljHMy5nmjuMyprvPo GtJx7WIugfK4bow1oegJMr+jViYAI/dmu6b6g0AxMAOkrOd04eWF4Z5X90Ze 3x+FGYTax3+zVvju8eTvnk4jfbM2hjrLv3mQh0u/eTj+2ydTcNuLO0NYn5RV 7CTo69Wx16v512t51CEFIIXI1EKBGCIyAvd89wR7f/hTvn00ATO84V8/m4EF vPlPvfHZGltja/ysB7CJseLTH8km1vrDWVsDsMmrMd/rghfYZLldutwuWe4Q 3+wUY1TSJcbUIbrZLgQttwnH/I0J8alm2dm0viznaURscrtDeadL/aBHv8lv cj+jfJBRFrHJLsQmWE4XaZevbieSp3YHru1u0g4XLidpu5O0DclT+4mz6leO io8clb/01n0ap33RyT+YM2CNTsbNF/OGcznd2SnLpXnn1dsRyv0m9qMuyYs+ 7eshy6tR98uc71kh/ngssTbW8nC88+FUz+pU5sFkz+pIx5Ox7ucTmZdTva9n +r5ZGPjd8sg38/0vJtIPBprm29wTcfNsi+Nmd+BGk2MpaZ+LW2aiprm4danF udzuXu7wrg0kvp7u+f3y8N+u5P/1vfG/X516NN1/byy9PNi2mG2a70vO9iVm euNTmdhMNrEy0fPkxuiLlcLvniy+uF14sToNbHJzpre/y9caMbZFTeODTfn+ OOAJYhMEJqDuNle6wz023HRjrm98tKUpapAIqoXcCpBUWGM1cqIBdSKsw/Ak pEMlj2AR9akCTikeFhE4TTzEJkToBI+YIK33YsYJhYfYJOSRgGDhcwgQmwCY /FFsgoIm72OTliI2IfaWKFcHnSHiJijZDLHJh/HE75IEPdKAS2TRNIqZFxnV h2jl+6lXtjFLd8jrvrSyj/mEpwKikwHhifWwCOfXxYRCsAlxNfBDL/ymMApi Ezjvpu6x1+90NO5yUDA5qV+AXNTdLuqeIjD5nk2slF87GEccrBIb64SOclRc c0Bc+2ubqCygbcDYxMSE3VrQJsQ2aY7NoRNQ0it+WwAjwCZJvwyE2AQ+LJjR AnaAsD+E7SK2aTT+cWyySQSkoGYoKAcM1ZUFKnHC9lXPdBrYwCZei9Bh4CAf CptytaH2XE35CXJlSWPNSWATKa/SpmehonAEm6CUrU0WpOIn5J1s8s4mnkTA jjDFYwGUP55NliZjBJtMb7DJSLduNKXLpw3AJuNp4zgWJcHVYxzvxZrFT/Y7 JrKO8T77GFBGn2Ms6yj0uyYHXRMDzkK/o5C1j8MNA87JIXe+z5YDbOmzYScH nBOD2G1AJYNdlmynaShtz2e9uaxvKOPubrHksuF0m3NxOv3m6UIyrOcyrnFp ZQJGJZCIlFuHhGEIjyTnk2EmBOdlojqF5PtsLrMa87k79Bw7kCZQiZ6DtWs3 8Dx6rkvLxrVhIfkRbILA5G02IfDEbwUqYSAwwQVnODib8BCYRJziD7AJIXQG BFffySYtQW3zegYXdoiBCRCKX45+NBC8J3ySuFeUSuqATQBDgE3g08eDJtGF 8SSW04WhSnh8MDCW9eV7PQEzXcO/xq47Rrqyp/LMtusnPrly9KPSk59fLfm0 9OS2+msHWDXHaRWHay7uLT+zo+binobSg8zqY/z60yBBwxk1/7JJet2mrLQq KoFK1LwrgCcK1kW9qCxq5+bTbtTZBEVP7s+lUNwE9YWHBRAEnAQwAS0XmuEq MAvK+3p6qx+uIjYhFmgNSIIIBXgBziCWwc8XACUASRDIwBnELEAZqJ8jIcLe DjCC54yNI0KBxW+fYjBC4A8SvC3op974bI2tsTV+1sNWuwPYxFD+iebqLxGb mCq2vSen69e2hiP9toZXeQAT/5txH8EmKG5yOyVZ6ZbeSctud4qX2wQ4nogQ m7TIz/UYyvNeSjGb3E/r7uCWE1zqexnVvR7F/R4FsMmA9S02qdvtq/0C164N NtnhrtvuIm13kbe5yJ+7yJ/h8+fu6o+dlR+5Kz/yVP/SXfWRt+qjMOnTXumR vP7slPnCmP50TnNy3Hhmynxuxlq+7CU/SPKfpzVvBmxvRnyvR4NfT3W8mU49 n848msjcH8vcyffeHet7Mp15Ntv7fK7vxXz25UL/y6Whl0vDb5ZH39zMvVwc WptI3x5pu5NrX51If7tU+Otb07+/M/vdrcmX86NrE313ct3Lwx2LQ21zgy2g 2cGWaVz3l3KPVyZfrM69XJ1/eGt8eaJvYqBtpDuWTrqTbl3MqW7xGW9O9D1b mXq0Uliezgz3hBN+TdAhBWXa3UTQBMCkP+Xv6/T2dniy6UCmyzvSH1uY7pkZ 74K1TkWViWphs6GUko0aus8piQU1IMQmqK0JYhNkhCfYhHDE++yALWK3RUSw CdyGsYlNANt7xCawQGwS2giawF73Bzldm9gkVgwm+rYEtm9ENucNWZAQm2wK naCtKdFxLxHURH1KImjyB+Mm8LcNeyRBB9+krBNQT9PK91FLd3PKdklq95np h3zCkxHpmYj4ZEhY8k42eUfQhH3QzzrgZ+5/H5vA7GPsc1F228g77I07EZus 4wkFtHsTmwCYuLESXkfs9MNW+lFgE23jEcbl7aWH/qLs2K8EtcdsirqglQNb tZBdDLsvWAetbMJ+gloxNvkkbwuBSUtI2RSQwxo+qXWQxBfo/6jRXtFrZP5I NinynlAtcopZ1ghCkRREKEQ/lOKgCeCJQ88ENjEpaU4jDy+1JIcnTSuncujX KbWnG6pP0Mln5YIqh5GDbE3JkBYFOIpFQAp6PDqbraD3scn7tKmtfDys/LFs UoBtahTHEyKna51Ncj2GYjaZzNoARvJp42jKkMPM7OaxjC3fa82tU4lzrN+V z7pBw932oZRtsMs6lALZ4HAkjZ0ZxdO3QPleVyHrmRz0D6Zs6RZ9R0zVEpbH A5KAg+cwMFwWjllLZdMvN5LOCAH36KUU0gVW4zUuFcMTMbsGIYlCUA8zUjGe 4HGTOmATvYJi1jBsgCQGLoCJDS/D5QDY1HNcOg5QiVvHAUIh2rv/eDYBMEFs 8nboJGBjgRCY+CxMn4VgFk7Ayt8InYgRmLzNJgSPgOAS0jvZBEVMisMr2NqH ATv8XCBF3cKoW9CV0BJxEyyPKx+dLwCTJkGITQoD/nyfJ5dxB0w0nfC6oPEU veorWtlBSun+xmv7GssOkK99WV+6j0M6LmWc4zecbLi+//rpz2ov72bWHOHV n4D74SRc5dYfk7HOGiSldlWVW0sGWRVYb023tj7u5GdbTLNDkRtjTcAdxR0Y b463LIzGkVMeLsFibjgKt6EbUHlhwBPgFBQEQZERYA1YP7s9ANgCM9alEQuL jMEh0WUebsOiJPdzCGTgEMAE4OLbImM7IRQuQb1UgEqQx+S7J+uxkt8/nwUh MEGHP/XGZ2tsja3xsx7fs8m1X+qvfwp48gE2cVCODtgbX40BmAS+ngi8zLuR Ef52SrbSLQMqudsjB610SQBM8LQu8XiQmpScblWcx+Im3sbNbLIOJpq7RWyy 1MwZspc3Cb7yUzA2WfebvINNsLiJe51NEJ5gctZ+aq/62FHzsZv0mavuE2f1 r5xVv2znHxw1np90Xh23XsoZzo3ozuRN5+e8DUtB+u04/36bcq3buNbrWst6 V0eSa7nW1ULP6mR2dXpobW7s4cLE2sLAw0VMawv9a/P9MD9c6L87nXkwl320 OPR4aRjm1fn++7N9M70tUz1N46n4WCo2nk5M97cu5bpvTPSClqeyN2cHlmay M4V0YaS9t92fafN1N7tbQqaQXeHU8y1qNsw6CUXFI+lEjVpRg9cktmu4sDfQ SuqlnEo5r9qqYQbskoFUAKVyDXQHsl0+oJKeVle6xdnT6QFN5ttW74w9WMkX RpoNahpQCbCJXFwHnOJ1iLGErqgBgQlqB49yuoBNEJggNkF4AvLZJe9kEwAB bJPvlRJsErLzMRFs4ha9j01+CCbrlNEWJ8DEXMQmhuLNJ9JmNglhbPI2lWwy mxS5ToQRLGTAt2vISs5FaeNxWeNRDfWwhV3iFZwMik6FRSUhwbEg/0gQB5C3 gyY/iJhsgAlScQAFDhGeEAldVtL27yMm68lde9y0vR76/g0dQGDiou53Mo9Y KL82Ub6yMkr01GPMqzsu7P2LX3/8ZxcP/hW7tsQoqYbtfcAqwMqrFrEJApP3 sQkCk9awqjmogN0X4hEU6graeYhN0G7wx7MJYY0HNsHBpMEkrSeABREK+t91 h4a+KW7iNGL/Ie8y8eC58trgs5MHXHK3VWxQUqS8ShH7ukZKclv4qF07ipgQ +VcoBeufkU2I6Mk/jU2WpqLLUzHQ9JCr0GvB2CSlBTZBaV0oU2uk2zSSMo5i 6VsYkoxkbCM9tuEMLJwjvc7RrHu035PP+rCatH2+kYxnqNvV32nva7cOdjv7 u+w9LaaOuKYpIINtc9DBdZqoNn2DUU3SSKtkgnIx77qEV8ZlXhXzKwWcClrj JQ6zjM0oo1OucahlwCY8WjmKnmyKmBCQgp0U1spxNjEoqRYtwCPHZeShnC4n HjrB0rqwTxOByTqbYNExLaOoYAK1WES4hAATB94mclPoBBSwMUGb2GQ9dLLB JhGn5I9iEyKGUiwiVkIQCvZCjwRHEizFEQ8mwvcYvzOuGelxw+cObIKncsUQ m6C4yeRw6Hs2MdOBTYSU0zxyiajhlLjxNMz8+hPsuqOs2iP8hhMS+ll+Qwml fH/l+W3ka3u45ONCyikR9TTMcEPD9b1s0mEl94JefM2urAmYqDEHu8Un6ooo BtosYz2e6YEQSugCEcWEAUwKGW+u2wUzwAson3aDZgbDqA0K3IM6M+LZXOt4 gsdBciA4CWzyeLmPCKk8uZl9MN+N8ARuBgHXgBDU/Obh+DdFpYAJobQuovs8 6juP2OS7x5NEQhdQCTrzU298tsbW2Bo/6wFsYqr8DPDkD7KJmXTIST0+6KAA m3w9EfxmMghsspJSrqQUK93yO2k5wSZ3gVNS0hXMFC+ZDNNb5OfalBe6dddH PQ0fzul6gOd0Lbfyhp2VzcLDfsoXHvJ2T/02N/kzP2mnr24HEsEmHvJOZDlx k3e4yNuRTHV7jHW7zXVfWMl7rKTd5pqdhqptrsa9zeKTfcbSQWt5v6m0z3B1 wHR92FlfCDDnm6UrPaYHQ+7VXGQ1H384lXow2bUymbk91Xdzqn95cmBpon95 LntrfgC0PNO3ONmzNJm+MZWezbfN5dsXCp03JlI3JrrmRlsmBmKLuc654bbJ gaZcOpJpdrWGDEmvuimgi3lUfrvEYeSZtSyjmmHSMDxKuldJh9klpzplFKeS 5sIaRtAVnHKtsMZlYPttwohbZlJRgU1MSppe1ggz7BBgn9AeMwOV9Kf8ACZ9 nd5MmxvABLFJpsu7ONPz5vnS62eLsLAaOQYNHdhEJqrVKSl+l7QlbgIRcZNi NiGoBAlxitcmwc0m6zldbosAF59gExCynCA2QWCC6YNsgsDkx7NJMZ68M6cL leH6gBH++5wuGzfqEcXcAp+JaldUWsVXbeLLNt4pl/BsQHw6ICzBqeQrgI7i uMnbbPI9mOAYgtUH/iGeoDPIeILYxEbeUUQlyHKyt5hN3LT9CExA5oYDxvoD FtoRB/uUmXmSV77n0r6/PLrtz45u/8Wlox9Tyg/LOWUuPQvYJGznAYygesKE 9+SdbALbWqASwBOYEz4pfEyAJEgAJohNkP4oNkF4QsRNgE2I5K5iNnHhSAJy GzATtNvEdZt5PniuzFgyIQgQ2O+Uh33qiFcB/GvTszxWAVY4C2+M2BzRE6EN Ak82teb8QE7Xh50pxcaTePhH53ThbILjSRTY5AbOJlNDTsQmwyntSJcWsQnw CGikB2QZ6bGOZOyjvfbBtG0obR/KuIZ63YMZV3/akU3Z0m2WVIu5IwlPviYe kIfcIr+db9fTjap6raxWI60BKYWVEm6piHNFwrsmE5aDJHxQhUxULeJXCbgV Qn4Nn1MtFTeIBGRqI8YmACbFeELYTLA8Lh5JIahXChvUYspmNgH0MPGBH+14 QhcI95sQYMJdBxMNE3sw1NQPswkBJsVsUownf3pOV3E2FyKU97FJsT9l/f4i NsHxBGOTroQ21+uBTxzFTXAXfHS+EEd+kw028QKbRGwso7hcQj8nopxRMC6o WJfk9PNK9kUF+4KMeU7OOq/kXoIZ8IRWeZBe/WtB4wkx7TRIQj8DJ6mVB7j1 RxWc81rhVZOk3G+ktPiE2RZjIeOZG46C5kdiwBpADXemOxCbwCHQCjALgAkI eGS819fXbOyOabItpok+/3KhGW5GlpPX93N4HGQUBUS+Xs0Dm8AhQAcACNao EbfVP1zKIDaBBczI1YK6zAOhYGhzf73XPCHcfjL25mEB88LjePL83jAs4E8B lkE5YwhM/ubF3LePJrb8Jltja2yNDw973c5iNgF9gE1ctOODTipik99MITZR YXjSLV/plq10S5HupeX3exQwr3RJp6PMdtVFUEpbOuKu/7AXfrVXvdqrutUu GHVVtYiOIDZxkz93kT71k7a97YX3NXzhrf/CU/+Fm7zLRdrlrNsJUtYe0pCO aOoOK6t/rag6qKjYJyvbo6k5aKOVtOuqBz3M0QB3KiaeiUumOhRz3dobWevt Yc/tUf/yaGhxJHRzom15omMJAGS6d3Gmf3F2cGluaHZucHomOzmVmZhIjxdS hVz72EhLYaRptD/a3+1Nt1rbotq4V4r9/7Nd6DVzYOsFGzC7hmZRNpgV9R4T G+Q2sl0GllPPRAqJSSFRnV9c6xHWOPiVRk6plnlFTr8gppx1aOojbn7MLwp7 BGYN2aigAphY1AzYJLiMPFh0NzsQmCA2weImba6eVlc2HUh3uGcnul48nnv1 dGF5PutzSt12kV5FVcsbYHbZhImwrilqSATXLSewIPwmBJsgKkECKvHZpXhm lwiPmPBRwS6s/aJbvIlNwhtsgv1m/xFsgoPJH2aTTaGTd3rhUdwEhU4+HDfx WVhRFz/m5gXMVKeq2ia5ahVesPNPuYUAJicCguNh4bEw/3AQRw+k4swuxCbE pbfZhMAT4BE4SaxdlN32+p0fYBM3bV8xmzgYhy3UQyiny0gv4Vfsvbz/L49+ /mfHdvzizMG/Il09IGWVWlXUoE30TjZ5p98k4ZXgdbrkCE+Q5YQAk38am6zn a22EThCeYM53/B4ipwuTlkHgCcEmACYu0/pzBQ+b1y4NebFiWcCY8GnCJ4gV zgqqE0EN0buEEHz073SRvJNN3lmn691+kx/NJvOFCKiITaIEm4ym9cVsMpbF E7eyTkCSobS1r9PU06ZvT6haY8rmKPxoSKN+ccgrCLr5ThPbqmeYNFS9ol4t rVOKaxTCKo2MpMVEhoVaUoskFwGMlMtElSAp0IqgUiyo4nMrOaxyHqeax60R ixsFfDKdVs6hlfOKxMXDKAhVhMwqlOhFsIlMBG9ORjlddj2W01XsN3EbuB4D ASYcwk9kVVKsysYPsAkCk01s8pbr5D1eeOv3XviIU/Ij/SYIT97JJsj8TkRM NiTdyOZCeCIENkkldfk+38J4ksjpms1HZvOx9dbwOJuMZb35Xk/UwbHIqmTM C4AnACYazhWYZcyzUuYZkIx1VsW7CJIwToMElBIh9YSIdlJMPyVnn4OraGGU lNpUVS4NKWxldEXkwCazQ1gEhIARQAaiRDBK60KHqGX8VH9woM2Sjmu7Iqre JsPsUAQFTZAdHpnZsdjHWgGldaHeKEAfyLeC2qPATDSdR6Z7oosK6PndIeAO wBNEKAAmyPmOUrnwlo7jcAYuvVnNIzYBMAEq+dtXC//q9SIs4PCn3vhsja2x NX7Ww0Xeo7v2sb4U9ImxbJvh+ucmQJLynebyXbi+WFcFsMmvndSjw276m0Lw m4nw64L/2YjzdhewiepOt+p2SnGrU3qrU3Y7Jb+XVt3vUd/tVqx0ySdDjDbF xVb5hS7NtY06XbKVLuW9tGatdz1u8j2b9GFscqdLDGyCx012uUlY0MRT/7mX tA3Xdg8JWeB3OgFG6vc4G/ba6/ea674w1uy0kPa4KAcdvNKQgpTQ0zpsvLRb 3OeXZbySDhun08bN+qTDEdVoTDveZJhoMkz2h2dHEkvjbcuTnUsYj3Tdms3M j6fmxlMzY6nJXGd+qHWgN5FJhdMdgc5WT0vCHg+bwj5twCH3mEVOPdemYWFV /TeS6mGH5tMw3UqaS0FxyuqtolqrsMYpJfnkjUElNaKkRFW0ZgO70ybsdoj7 bPysnd/rEPS5hJ0Wlp1zmXlpV/WJj/lV+8LGulSY3xZghax1BskFi7xeL6yx yBo8erZbx4KNQU+zo6/dO9AVTLcBlfgyHYGuZjcsBtKRng7f+HDb739z/9/+ D6/++pt7XS2uoEvpMAosWoAOvs8uS4QM7QlbPKBFeAKK+dUht9zvkGyKmCC5 zSKfTQL/5KBDFrBLfDaRzyrCeg04RCGXOOyRRDxSEObg2PCbIDaJAZXATtgv SwbkmILyJqy5iaIprGyNG3AZcaeJkcirwapyrdcQXlcLVusYm9fPYE1PCO8z 9tqWGGwp4R+i9jkESH6nIOAUgoIuESojtkkhGzvu4sUd7JCp0QvbAMllK/eM i1viE5yKCEuiwuMJ4bE4/6swe//35pGNssCo4hbClmJfCWITBCOb1sQhsAlW pws3v7toe/BsLiyhC2eTfUVaj6F4ufvsjN0W2j4z7ZC+8Zik8vC1/R8d+/QX Jdv//MKhX9ZfPShlXrKp6yIudtzDj7p4ESc36uKiRdjBibuFCY8o6ZUUK+YR xb2ihE+c9EtbQgpQUwCYmoeXEebhvRdhf4hn1JhYqFTXRn8TDExsKopNRd3E JsjwXhw6AWFVhfGgCeGIx70ndLcWYxOPAd6c5TZgtO4xcUFuC8+7UcpgPbyF h8CQCx6rIQx4suGFL+78/r4crU15XJvgZRObFMMORihRNYYneAuerhbTYI97 cjQ6k4+/g03GYzNjWEXZG9PNt+Zal6ebFyeSsHcdyTiGe+yD3db+Lkt/pxkW mQ5zutXY1axri6uSIfhHiQIuIDKWw8iw6mlmLcWophhVjQaQkqJXNGpl9QAI KnGdUgSqxQtn1Wuk9XBGLqiW8atk/Gohr1LIqxLxa0QCTEJ+jYBbLRLUCUH8 Og67isWsYLOruJxqIasaSITVcI1Zf5VBvgILQBJ2YyksCB+KlFsn55NFvEqV lAx/BPw1HEYO/E08Fr7HIjCpqF4TD7V9d+nYWLwMt59gzRY1DJuKblFSzIoG K/aEUGzqBpu60aZptGOiIBJBSFIsIp4CeEKwCRE3wRvucIigHmITwm8SdUhj TmnMJYu75QmPMokMIzhoRD3yiBsrMhx2SUGoyHDUrUCVh2GR8KmbAtpkQJPw q+NeFQiVII56JFgmqksYcgpCWDUPQcQj6O2wjA8GUe1orB38WHRhIjGXi80M h8ez/umh0NRgsNDrGU7Zwla6VnhVzjqvYJ9XcS7ImWcxMKGfkNBKJNTjMMvo J+SMk3BGzjwlo5+EGUnNOavhnddwLxjFV53qKq+uLmBoTDo5PXHlaKd1biB4 M5+8M9n2AJBhugObZ7uAGpDPHcAE0QSq4gUIA3iS63b1t5qBTWAxNxwFoAAM QVlbwCav7o2inC7EJoAeqKIXvCfKFkNCjnusEPFMJwAReofnK4PPVgae3u5H tYhhBr3C6gznv35Y+PYxXi746RQssOrEOAR9swbz+LePJn/3dOb3z+f+5sU8 6Kfe+GyNrbE1ftbD27BPc/mXuqsfG0o/M5VtN5R+bry+bZ1Kyn4o0kEH5ciI h4HY5MWo5/Gg/VanEgSEcrsLZgXoDt5UEeurmFKudCnGA/Rm6XlQSlua8zYu Ngtvd8rvdqseZLQPs4ainK7v2eR+WpZzVxNs4iF/7qfswAIoJGQwwYoGO8hf 2MlfWEi7rPV7HNSDfu7xFvXVIS9lpknYF1aPtljG2mwTXa5ChwM00mwe73TC 4XTaO9cbWOwPLw/Fbo0kpkbaZse65gup8aHmvk5/utWd7Qo0BfVxvzbm00S9 6pBL7rGIbDqOQU4zKbEmyDYNx6XjeQwCr1HoULOtCoZFTrfIaBYJ1SSmGIQN bgXdq2SEdey4kZcw8Jr03FYTv9Mk6HPKc37NeFA/FTJOhw1TQf1iwgiai+lm o5qJkKLbSPGwzrPOfqqpOZhUl2dc1C47OaoutbKP2+UkHbcCZJc3OJQUp5rR 4tcMdAT6OwIdCWdb3NnZ7AX1dIRSzZ5sKvxsde6//p//+N/+7//09bObLRGr Xs6wank+m9xvV9h0fGxtl3ckrSihK+JVApV4rEKbnk3wCEqwWY+SmIU+qyTo kIddirALCEXqt6EGzWKMTdwYm0S9MhDaRSC/SRSvVRv3SlA1TiRUnxP0viYU RJSkSObva3atV/Eybmw+sXaNzVHYrGpAfiff5+CBYIEUcAmCbuHbijm5SRcv YWdGjA0B2AlIrti5p92c40HByRgOJknBkQT/UIS1L7jBJqG32CT4HjZBSAKz h7Y3sBFPQYduQBIKDiZvyQv3vCUXe5ud+bmVvttMO6CrPyKrPF524OMTn/3i xLY/P3/wV3WX9omoZ+zqqriX0RaWtEdkrSFJk18YcwObcDA5eMAmLQFZs1+W 8EjibnHMJYoBsGBgIkEdGFvDClhHXICTWFvGkIMLG0K0LfSamF4jQATma3Zo KHY1ZZ1NlJSiosGb2YQInRSncvmMPNRNz6dngRCYeI1sDy6vieM1cz0WrtcK TynfbxdgKsrNC8NWE8eTmF/1dqmuD6sYTN4+s6lOF8EmTTFNLCRH7RdTrWZg k/Hh8DvZZGEyMZ2PwPnlmbbb8503ptvmCsmJkUhnk649rmuNapJBRdQLPyNi n53ntrKdZqbNgJGIQdWgU5Bh/08INV7XyRuRtLIGIBFAEpxQSMQhrBXCWtRI Ucir4XNrsBAJpxoWwCMiAYnLrhLwaomTbMATZoWYUwsAgoImwCbU2osAKUTo hE+vgKtAK1hVYW65gHNdJa41qqgWLd2uZ1k0NMATo6IRta3xGLk2Fc2J9dnE hBrBYz034X5lI5JV3QACNkGyaynvFAqdwIzYxGNi4mzC3AATNoYkGzmHxWwS dkhiDkncIY275Am3IulZN4+gWEnYLQsB3sLz45TANxV8a0Xc2HcXUtSjTPg1 hOI+NSiG4Ykq5oPvMXiVAPWQDbuFUZ8om7KPD4XW2SQfmx2LLU4l54FNBkOF jGd2KIwv3IPtppCVquRekDLPyNnnFJyzYqASxkkJ9ZiUekxOL1EyT4IUjBOw ltGOw6xinVKzT2s4Z3S8cwbBBZPosl1e5tXW+PWkkLGxxc3NxBSTPa75gcCt fPL+VPvDudSj+e6HOJWgHosgIIjlQvPCaBzRBKwns4HRlHOowzbYbs0k9TDf mmh9vNxHkAhCFZTK9ez2AMrjQn0bUf+UG2NN8BIAFsQm8KfAPUA0wCYodIJF T1YG8cpdY3h62BgsUJFhJKASEJx/8wCuFkCAJ795CLQy8d3jqd8+mf6pNz5b Y2tsjZ/18DXuV1/6CGeTTwFM9Nc+g/kDbDLspr8eCwCePBtxrWUtNzsUSIAn QCV302oQgMm9tBrABFTw0wBMmiTnMDbBawj/QTZ50CMf89a1io8GqFhOF2aE fw+b2Bv2WkhfmEh73IzD7brrY2HWQpt0cSi5Uui8XehYGe+6lW+H9XKutcOv avMomp3SqJnv1dDt0nqTsMYgqbWp4Rcu3a6hGGV1JhnJoaHCGaeO5jWxAhau z8x26ehWZYNZSTMrqCY5CO6kGKWNRklDwChIOOSdIWO2yTmWCs8Ntt7Mpx4t DT1aHHy00P9wtu9OvmMuFcgnrBNx61yL63an/05n4Faz+0bcthSz3gnr70YM 96KGOxHdzZBqwSedcYvahdc7JWVZfe2wtXHATE6py+OCc1ELy6Eg67jlNlm9 U0V1qOhNXlW23ZNudnY2OdoT9vaks7vNl273A5jcmOn/j//2t//pP/zt87X5 zqQr3eYzqdiw96DVXYI9CSzMak5Xs7uvy9+esKRaHImgNh7QgIIuWTGYEGzi Ngm9FnExmwTs8BtfgjdoxtgE4QkIWaoJLzyKniT9sp8bmyRc/CY3P+lgRUwY m3jEl22cUx5OySY2ibL3B9nvYJPijvDF1hJCiFBQO/gfySY+uI25HyGJB27G 5WRtsAl1v5Z8WFpxrOzAJ8c//UXJ5784d+CXNRf2CimnbarKqJvWFhZ3J5W9 rdpMi7YzpmgOiOIejFDiHgGymSQ8YtQXHkikOSiDGUVPgFDgENYAJiBEKEE7 BwRgggRsYlM1wE8BgIkVtp0/YBM6yul6O60L1gAmHj0HwASoJGKXwAYyYhWE zDwfwIiRDTPWa8/CgxnYBMCkmE1Ql0yCTRCe/Hg2eWcwZZN36Z1G+HVCeYtN Jt7DJrBNnS1E4fyN6dZbcx1LU61w22jWF3Tx7HqaWd1gUtUblWSDgmRUN4IA SQyqer2yXqeo18mBTahIegWIBrNOTgUMQQIYIUSwiVJUB2Ai5VVJuJVCbo2A i/lKMDDh1QKYSIRkOIQ1nBfx66SierGABJLySMAgdNJl+B5AXwUos4tDuY6i Jyiegt1Qf47ReIFad5pceZxLuwJ44jbzDHj0BABELyE5dSyTrEHNq4IvQ6uK jiIpFiWACWUdTFSNxWDyATYBbUrueiebrCcc4l54nFDw8nT2P8AmCE+ATUJO GUISYBCCR9Zh5IdKBpVxP7xW6LNxAU+ATWJ+cV+XrTAUWpxsBuGEEocPfSEX AyoZ7/USbDLQZgzb6CreRZTBJWefATaRsU7LcRgBKiFIBARrOAOHQCVG4UWT 6JJFcgXAxK2uChhIIVNDzEpv9wl648rxtAPYZKXQvDrTCWDyZLHn2Y3epzez AA5AEPMjMdDMYDifdk/0+YFQlvJJWACYDHfaYVHIeKf6g4u5BNAH6mwCDIJa nxC9UZD5HfEOsAlRBAxleaGyXXAnvBZm1JIeXove4c0DzMPy2ydTiEQ2lN9Q AUVMgEdAsEB4AvqpNz5bY2tsjZ/18FMOqC7+C/21TwylnwGY6K5+Cnonm1jI WE4XipuAng5jbAJIcqtTCWyykloHEyAUABMQMAhozEcFMAF1aa4NO8nzSf7N dikwC+DJau96na7vvfB478XVjGLcT26THPOhuEn9NsATzBRP3r7hfN8FbOKo 322r32Mh7zaT9/o4x1KmykKEPdskilh4IRPXraY5lI0GUY2WVylnXOOTzwkb LkhplxXMUjWnDE7q+FUG3mWL6JpTXuFWVrkUoEqXssoqLrVJy+zSMpgdsnKf pjZipoTtsLtTdkZMA+3eiWxiKde5MpFZmwcMGXm8OLw2N3Bvqu/+ZN/adP/j myNPbo0+vz36aiX3bGnwQaHzZn98od03k7DPRS03Eo7lhONW3L6SdD6Omh+F DY/C+odh3f2A6m5QsRrV3AnLF928SSstZyQP62qy6oq04loqJA8aaWZxlUVS Y5OTXFpa0ivviptSSUt3qyPV6uxqdabbfZnOYEfC+eju1O+/eQBs8u3Llel8 KubTa6U0AaMSNiGwA4FtiVpM6Wn3T+Xa8wPJiZGWVIsTdvsooQsVDUbluYj8 LqeB7zGLAnb4/a6IuBXwix7wJOSEX/0YmxQLKxqMl6Il6j6B4rjBAREKcmG3 hlU/Gkz+VDYJeURvKwk7dpxNoqZGYBOX6CJikwD/BLBJUnQc2CTO+/X72ASJ aPtOZG0RkAIYAkJnfiSbINMKwhOgEpTo5eJstzE+NVF2mqj7sbhJVUnpvl8d /dUvjn/2i7P7P6o+t4ffcNKqqoi4qM1BXkdM0tumxUzWPdZsuyGVULWFpUAo YQc74sSSvhJerPciYhNAEuARECxaw1haV9SN2X5jHqxoKoAJFkCxcFDQBDeb YFRikpEtigaLohE1gseztrC+8MgLT7BJcYsThCd+Ez9sE8ecsohNGLbwAxae H+sAzkV4gumHQZOAQ0iYg5BpCOHJO9nknRhCuE6K87uKvUubCGXTPc0/ZJOh jOd9bLI03TQ/gf2POrDJzdn2hYnmiZFINmW3Gyh6eZ1GUg0CMAFCMWkoJg3V pKZtiG7WMIwqmkFJMyjoGJjIaTo5XSejIwwhCAUJRUwATBTCWhm/GtgEkxDo o04irBULgE2q+ZxKLqtcKiLJxGQ4w2NXsOildMoVEI9RxmeU8ejXQVxaKbPh MrXufH3VKVLFSVLFibryktqykprrx6tLj12/crC6/Ej55QMXTu44dWTH1bMH ZNwKpaDaaeSguIlDyzRKyV4DZooHNjHK6g1SskFaDwujjGyGJ0TZYFHVg4jo yfuoBC2I8sLvi5sQdbqQgjZh0CaKvo9NPIqI5wehE4JNkgFtS9jQHNIDnsAh UjGbJAKKmA9eJQA2AQUA2D2Cnnbz2GAQwGR5pg3mhYkEsMliPr4wGpvo8yE2 Getx9bcaog6GTnRVwTmv4l1Q8y8AmCg4Z7W881ruWeARBCaw1vPPGwQXYEZg AlRilV6F2SYrBTYJGslhc2PCzuwKigdbdOPdjtms71Y+CWzyeCENYPIcmAL3 j9yfS80ORXLdLiCRbItpNOWEQ2Q8AR4BYFkuNCMXPHAE7oXHupm8uDOELCoI Q+7h6WFAJcgCj3LDUNsUuARr1GUe2VVQwxT0EuJVcAmPmxTQDJDy7aMJotni b59M/+7pDBKsQYhQfuqNz9bYGlvjZz1C9EPqSx8Zrn9qLPscqAThyTvZxFp/ yEU7Nuplfj0eAj0f9Tzst95Na1dSasJ1ghlPcO4AAZjc6pABmyTFZxOiM926 6yPuemATOAmX7qSUDzLaohrC62zyIKPE2CSAsYm3caer7nM3+XPMcoKByQ68 MNcuYBNn/W5gE3vDXms9VpVLX7vbSPoSpKvZza08xK36ild1WNZ4Skk9q2Fe gFnLvKhhXFDRzioop+WNp2S47PyzfvmVqLY8qq0IKku90ssu0YU2G3koJljs Nd3NuR8UfKvj/oeTwdtT3ben03dmMvfn+lbn+x8uDj5aGroz0X1vEmvOuDbd 92g2+3hu4OnC4Mp0z/257OMbgy9ujb5Zyf/mVu43y8Org82Lbd6ZsGk+arnZ 5LrT7L7X6nkcMz6M6Nci2gch9R2fdCUofdikvR2R3AgIJp20UVNdVlOekl/u kl3sDiv8BopVWqUXlmn51x3qhohD0BpSdyVMWLnUpLk1YU61uQZ7ozfnBn/7 +u6/+Vcv//P/+m/+r//8D3//L5+HXGq9nCHl1sGex2uT+e2KoEvVmXTNjHUu TWduLwyMD7cMpINhj8JjFRazyfd4oue6TUKCTeC3PPa7fv1/JsVBp4hQ2Pk9 mxAFaZG3FPmvEZu0RdRt72GTt83ORWDyz8kmSTeW0xU1N/pVlS4hzibcEn8x m3D/iWwCa0Qi/wxswsbYxEzdhdhEWnkc2OTIBptUnduN2CTspLSGBZ1xcU+L YqBLP9JjzvXaRjPWwZQllVACnoTsTCAUWCS88OlwgT5QQheCFJhRZheiFbi6 ntllXi8jjNjEpmoEMDHL6y3yBsJRYlXQQEX2k+9FVOhCbALCAigmbtAE1MND eOI1cTxGNs4m3wdNAEz+f2WTt30o7yCUuBbYBPlNutsswCaTI5H3scnCZHJ+ PLk01QJ714WJpvGhUFez3qTGeMSsbsAiJkoyFj1RUTflbmlljXishA4/oSCd jIGBiRTYpHETmIAATIqFm1DqRNwKIaccBAsxr1LCr5IKqvms62zaFQ79Ko9Z ymeXCdhlsODRr9FIZ2uuH6kuPUKqABI5dv3i/qprX8EhCM7XXD+KRK4uqSg9 xKg/11hzMuAUP1udaApq5LxKGa9CwqrQS0hAKHY1wyStBzaxqRkAJnASwMQk b9hgk8ZNbPJOEZWEAUlQu88Nv8k/nU2Q34Rgkw08kcJXVjGbNAV1m0In65zi kwGbhN3wbSYAhVx8YJN0mynX74dPFvATZ5MkfOhLY4nFXHyqPwBsMj0QBDbJ tuhjTqZBUqoRXDZIrhkkV1U8gJTzGu454BHAEJgBT5TMkzLacThEbIKncl0C AaQYhZfs8rKAgYTYJBWS5DpM071ulNO1NtsFVPIKGOH2wIuVQVRfC0VPUHku 1HIRZWcBOKDAx+PlPhQrQYZ3lMEFZ2ANN08PhFBUBW5GNbie3upHxnlUNxje B/ELnHnzII/OIKGQCvwFUAmvjc4pOdSfEVUMRjwCMIKEsrm22GRrbI2t8QdH jH1Uc/mX5vJt5ortKKHrA2zipB4d9TAQm7zIeR4N2O50a0CAJ7iUSHdwAYPc bJfmvRTEJhljRc6z7jcBrXQp7uONF1d61ER/kweYlGu9yslgfbv0uG+dTT5z kT59J5sYa3aY6nZZG/bZGg+YyPsATLTVX6jJh7T1X+kaDluZJy2MEyAj9Zim /is4j4mEzdqGw/rGIw7W4SbtlV43ud/XkHHVddurU7aq0TBjoom30CW71au5 N2BcG7U+HnPcm+6+iwsW96bW9XC2d20GwKTn4UzmEWg683Cq5+H8wNMbw89u DD1bHHyxOPhqYeD1fP/XM9nVgebFFudU2DgbNi8nHSutnjsB5VpM96TZ+DCp vxNW3InKH7Zq7zUpVxLSaR8zZyMPGCozmtJeXVlvXIkZt800t4ZsU9YGzMyE RxR1iVsjmo4mbA/W1WrPDyVWbgy+fnLj5aPF//Fvnv3jv/vd//Nf/pe/+93j mE8vYFTS6i7VV56tvlZSev5QXdkpOZ8cD2i6mh3ZlL+vy9fVbAcwIRqaFAdN MOm4LqPAb5MCm8Cv7/XMbdguur9nE9hMwq7ybTABocyuuPf7zho/OZsk3Py4 kwO//WNmCoqb2LmnvdwTfl5JVHAsKSoBNolxD/5ROV1EhS4EI0h/Yk6Xg/m5 jfGZhfaFibJPXXdIXH70+v5fHf14PacL2ETQeMqmroq4qC0hbldC3NeuGurW D6dNoxnAE2uh3wmE0tuqbQtLAExibg7GKQ7Y7MGHwkckAgIq6YxruhLatogS 1jGPEO7BvfBMnwlzxAOeIDaxq6nAJphkjQhPLHIMT4rLBSMeIUTETUBeA9dv YPuNHBQ02cQmxUETTD86p+sDXUveNsi/zxq/CWSATQgvPMYmve9nk6l1NkH/ r74w0VwYCnU26fSKGoQkanGVTlYLhGLWMCxaplnDNKkZRhUDj5WAgEqYIJ0M k1aKSSf/geukOG5CUIlCWIurGiTnV0o4ZXzGVXbjBTr5LJd2mUE+S6k9Rak5 CTO17nRDVQmHeolGOkOuPM5sOK+RkgwqipRfyWq8AAwCL4FLcBvcDDxCazjX UIe9Cq7WXD/Mo19Zmky9ejSdy0aNciav8YqMXa3kVhgl9TYV3ayg4uGSerOi EXnh35nT9U5tanGy0YHxT8rpItjkB6ETB0gKX1xY1lZAC2yCCAUEhwm/BrEJ 3BD3y4FNIh4x4EnIJYzA16xPBGwymvXBRw94Mgcf/URiebblxnjTjbEkUAnB Jn3NupiDaZRe1wqvAKEYpdcQm2h551ASF7KZSChHQUR+F8IW4BRcF22y6359 HWKT7rA032me6/ctDYfvjLc8XkgDlXxzb+Tru8Pf4m4OHE9GXtwZBppAUQ/C sY6aKsIluAHFOwBPiOysb9bGnq8M3Z5sI6BmKZ9EsRXkQEFRkq9XsVaMyHWC GAfeB5XtIip3gVBWGAIf/E/H7PYIT/BEL8xsglwnyHKCzvzUG5+tsTW2xs96 JLkl2iu/slbusFbtREZ4IJR3somp7oC98TCq04WxyYYXHqgEJxSMTe6m1fdw FzzBJjlvI4BJXHi611RJ+E3gPOhutwrABGmDTbD+Jo+y6pkIpUNW4mtcz+l6 H5tYSF9YyLsd1IMuxmFz/X597R4j6UtN1XYTeY+Nst/D/Apma8OX5vq9upqd xdJW7wA56PtaNRdGfKRCmDLiI/c7q3qsZcM+Ui7YMJVg3uySrPZrHg7qVvu1 dyY77kx23p3quj+dWp1Jr82kH872wLw23b06mVrb0OpE14PJnidzA0AlLxeH 3twY+WZp+M3CwLcLg1/P9D4abFpqdc1EzfMJ63KL815I9Sihf9JsepjU3Ysq 7yeUj9r0d5PylaR0NsAcc9YPW2t6daV9+uvpiLTFy0u6ODE7K2ShRxychEcY dvLjPmlHk6mzxTqcjbx4PPMf//03/+F/+u5//vtv/uHffPu//ePf/c1vVrOp sEHBbKg6BzwCIpWfhplSc4FHK+dQr4g5FXoFxWcX+x0Sq45lUtNh7/R26MSm 5RSzCfolvvGrX0yACagYTIgufsgXT7AJgEl7VPOTs0nMwY7bGIhN3KJLDt4Z Lw9jk5jweJP4D7DJO73whB2+uDDXn+iFd7K2Wel43ISyT0P6SlJxDOV0ndz2 F+cP/qr63B4h5bRDU435TSK8roQo06YYTOlGM6ZcrwVpLGsHQhnpsWRaNK0h UdzDCTu5qKsdStyCOezkpZsN/Z02mFtCchQ6QXETABPCDo9qwwKYmGAjKmvY wBMqjifU4lYmRH4X4YXHqMTED1qEARMX2ARL5ULC/SZIxUET7In60V74H1On 651FulCXRlgUs8m6/eSHbDLc630fmyxOJt9mk46kViOtQqlcGkm1Xl6HswnT omWbNfCDxjKpWEYlJvjxJMCEYBMDFkwhYivrrhMioUvKq4KfXCGrTMC8zqNd 5tEucamXiBmkFFYphdVaKUkjqYO1RlILC6ueoVPUi7llClG1y8INe2UeG18j IymEVVJeuZB1jUO9yGg4RyOfATBhUC4AmADOAMhwKBedRg7s8B/dyd+eyXiM gtawpTWoVXGrZOwKtaAWBxMKrsb3eeHfKeSFJ3rEo9DJn+iFx9gEHhXvD0In AZxNkCMeMKQpqGuPmUFtURNACuAJnETZqihuAlQSgO8xpyAC8B6QAJuM9Hmn RuEBiE3nosAmN+dal8eblgtNM4MhxCaFjBvYJOpg6sWAJBc1gsta4SUF56yS e06NZ3MpmScRm0hxazwsFIwTcB6leBmFF83iy2bxVYeiHNgkYm5MOljAJqMd ppk+L7DJvcm2J4s9L2/1v7kzBHjyW7wEFsqhIpKpULd31PwdBT5QCAOvzZVH BEHgCSDGcqEZeVWmB+BfEYFDVKQLFndnOvFejaPwcnhzoBJgHHgfeBNkNiF6 MhYb6hGnoMaO8CcCAeE95XOEHR7hCRy+vp//qTc+W2NrbI2f9WgRndGXfmbE 4iY7cO00XN9mqdwFC6yScMUuS+UXcAhrXdVeD6NkLMD5zWQE2OTVmO/RgA2v 0KVCbIK88IhN7vdogEEWm4WDjrqY4FRSfBbYJO+jAJsAldxoFYOw5K60ErTS o7rTo7yXgVdhfeHvpiSLSVbWcCnM+NJNwmwmzrrPPfU7N7TLjekLV/0Xtrpd IAd5j7P+Sztpr7Vut52811a700n+wtWwx9O4F7OlkHbZ63basTt3wiVrzXZz 1TbU0sVc8zlsKbPma3lPTc5TM+ysGHaW573Vo+7KMV/1UjP9UVb+bEi11iu5 PRq5M5a4N9GyOt3xcKZrbSa1NtO9NpsBrc72PpjpvT/Td386C1qd6ns6P/R8 cfj54tCLhaGXi4OvFgefTmVezw98s9D/dDy10hebbXePJ613m6z3m233m8wr Md3tqOpuQvmgWb2SEN5vkdyI0Av2ymHjlT71mS7x0SZLfbOd2uKgt7nZTQ5W 3MmJu3lRjyTilbYkzD2pwPxs9t/9+9/+t//+f/y///1//6//5R/+7b9+/uLh bFezw6Rm8BnXG2tOcyhX+PRSHu0aLLi0azJ+tVJSp5E3AIa4LQKLlqESw56n wqKhWzQMs4oGsmmZTj3e0cDA85oEAaso/P+xd5/NcVxpvuC3b3tRXpSlvOhk KYoOJAiA8B7lUN577733vgooX4WCJwHCEbSiDCmp1WZ6Zu5MzNyI3diN2Lsv NvYD7Kv9APtkHiBVAil1q7snpBfI+EdGIqsImiqA54fnPOeo8dU4sQU54X95 hlVNs2qoELOKbFKSzKpvtZm01k3Qgl1gE6wLHq+b4JubiL8dsImE0Ae2bvC3 gj/qlKAnB93oQuh3CnwOgAkPgmyCSIK64IEhNsPkgwGbuDUTaE4XZpPJHZug fhM37bCb/Lpj7JBt5AXCHYRNiIoJkZ26CT4jCyuX4BUQVATZ2QAFv49mau0h iab/WZTWcgkR1ejjssFHxH1PicEmPa/T2w+fOfTIkcd/fvTJn7976Dft7z9H 7juu4F9wGYcjTmrcPZnyMXMhbjEurqSklbSsnlU2pzWz09qZKU0toyzGJbkQ 36kZM0n7DeJeo6TfLBuCmGSDQRsrHZCmAtKQg+s2Ttq1ZGwRVznWD6KXjOpE wxrhkIo/pIR3BW9IwRmQs/ulzH4pAzIgZQ7AHRkL+7G5mj+EbQ4uHNKJRtSC QYhWNKQTD+slI0bZmBmsirxDBD6Uw5tkAgt4FnvnkC1qigUtBK2lWbQ0K7aH DvZWt8O40cx2WdhuK9dj48Hrju+SIwx5JGHv3rTs7ImCbaODPLIHI3vqJrs8 EWIwsXH9Dn4ipChmjDMlB76/iRvbfQ9fsmmh5sL2B29gMFms+5ZnAldmQ0v1 wEzBGXQKcJj0STi9QAMRq0fM6pXwhsS8IRF3QMwdFPOGxdwhIXuAz+zDwoL0 85h9PEYvl94rZPfxGd08+iW0XDCES++ijZ0hDZ8kDZ2cGDwx2v/eaN+744Mf sChneZPnxexOpajfqBp3mug+Oycf1+Ri6mQQLM+1aMlG1ZhZjbVOaGTDAmYH m3pOxO5SCPsl3G4O7TyER2+njn443Ht8oOvIUM+xoa6jlIEPSH3vjXa/Pdx1 fKznPQmrx2XgRFwyr1mYj1pWmun1hfzm4lQ2apLxh1jki0JGj4I/rJNMSOCN wenXiMcALEJs9tcovCVUvCGNaETJH4Q3BkTJ61fy+9GML7zrBItWPKiTDOql gJRBg2wE32xx3KKasChJRvmEWUm2YAGY0BBM7BomxKFlYQFx6DkQbClg7ILt +HbAuXolzaZnW3Qsl4XvsQp9dnHQJYPvJyGP3GsTOUw8mwF71GPjO0xss2bS pKIa4HfUUD0WdjamLmWN9SnzTME6X3FcnvGszvquVL3LZQ8M7CHNnHkma0y6 eWZZP9iENfYue/w9Luk91tjbEH5Lswl/1ymobkL0myiZpzWcc3p+u0nUCbFK e7y6sahtMh8QNrOGyyX7ejN4fTlxZxXvXl+bvne9cv9G9QvwyI3KZ9eKn4Ad rpXg+vPt8ieb03dBDZvTcB+ec/96BVgBUkC7mQArUDP7tYUYmgw2kzXDGS3M BSpBVFkuu4En8HuhLd3R9vGo/gK/FgyCa6WAeIJIgnY/+QSfbIbW7ILf9HOw 0nYZ/9PWvgBM4fkKYLW/L/z+sX/sH997BCbfE519XHjmMfG5J6Tnn4LAtezC 0w9GcOE509jxho38u6bjy4btfs18M6fYnc3FQzbZSYxzPS1cj7JBIjlFB9jE x3g/KW4r6XsXPeSVIB1gAmdsclectZZgQzaAJEnWFiTBuhqirPgnispzjtFD 2i58NxM49zz97WDVE3Xn0yiaroOarmch2kvP6brhfBBF0/UMiqrjKYjy4pOK dpDX4xDZ+cekFw4oOh73Ut9Miz4say5U9e1V/YUZc2dF11bWnl1wdF9PUG5n J6/FJzZKlq2K40bDe3sudGchCjzZbkauLySvL6S2F7Jb89mNuRye/O3FwsdL kGksi1MfL+bvLuVvziTvLmS/uDJ9//LUnWbiat7dDOuv+jWrPuWqR7bqEV/1 CNe9vE0/b8NNvQ5qcww1VOdK4venuEdj5ENmxkmfpDOs7o8bx8O68aCB4tOT PUaWy8j2OaW5jOvKSuXP//r5//E///0//uXO1/dWNlemZsp+p5kr5vTTJ9rY 1ItiTp+UNwgGkfEHefQuiIjXLxOOaKQTStEon3GJPn6ONnpGyh2Qw9OwJXcG 1IIRnQjb8VkvAZuQTXKKVYVtK+DUMV16GBhMWnYLJTuboyknHmoTBBNiv78d mziBFa1BTcqtMPmmVuJziFu6mMXEjo0Bl8Dv5PscMEwFm3DBI63Lc6ESyXfZ BK0hjHrhwSZoTpcZX6fLRX3LRXoNbGIdfv67SiR7YdIyI6s1yCboIQImhEda 02oT1GwCUQw/Kht6RDLwjKj/RV7P65Pth8++cgBgcuTJn7/90q/b3n12vPeo nHfeZRqJOmlJDyPtY+WC3EJUWE5IKknpTF41O61pTqnhAs7oejokitrodsWg jt+l4XWZpQNO9ZjbQAnZWVG3IOzk4dudTGjFA5hNZBN6yRjaRRRfIRaCLViH 1qyTMLCI6f0qbC1ZwMsgikY0ZJCN7v48fEAvhQ+H0Z56aA+LPdnd+Hui9Yfk 5pbXkXjhHCYG2sHTY+PAKw6vO7wBQh5R2Cvek6Ab2CLYk1abPDjL61sB9tp5 PnivOgXJkAKGps1dm8xXXTupOedrjsW6FwNLzYPbJLxY9zcKzohXKucPwFcT qIQ32SlgdAuZPXxWt4DTI+T2inh9Yn4/ngEOo5NN74Azl9nFY13isbr57G7a +NmJwZOj/R+MDUBOTAx9SB07RR3DtoDnM9uV4n6Desxhngy4eCEPJ+LjxYPC dFQ2lVKVsrrKlKFZtlanjPmEMuoXuK3guzGzZtSiHTcohyXcTjb1NI9+Tsrr kgsuMcmnqKMfqMR9Vh1Jyusc6z8+MfgOqef4eNfR8e5j5L53aYMnaEMnKQMf wneDsEMS82rSIWPYpcxGYJQeX5iJ//6L9X/+enuhHjWqJtmUThl3yGngSrCJ Xn0q/gi8W+TsQTlrAFvai9UronfB20MtwHgCrzi8PVSCPrWwTyMCmwzoJPBW GdCI4DyC3gnYNxMl2SAd353NhU3lwmHCAJjY8A53VA1BIaq6e/rcgR5WA9tj FzktfJ9T4rYJXVZBNKAOeRWJsA7OcNPvknodYrhwmLHNnuxAFS3Dpmf67YJ8 QludsgBMmkXbfMV+ueFZmfEuldyLBfdSCeuIn5uyNnOmmINtkvTKmOd22kwo cAakvC2ifIA631tb4BFV4EPZ5EmAiYp1BmIUXrRKL5nFnVZZt98wHrPTc35B M2dcLjtWm4Fry/Gbq5lbq7lbq/mPN6bugkHwwPWd9TwEbcWOtkQk9m2/h+/8 jmSB9oX/6mYdKeP6UgIMAhJBE7oAF9uL8WbOUksZ5qftcBN4AvfRWsFIJWgq F5r0RUwAQ3dAPWhaF6qb4L9pCQPUrdqXt+tfgkfwbRkhX9+dhfzYA5/9Y//Y P37Sh5/2LmCEf+oACEXS9iQIBa5BKIARefszcMZ3h8c+FLY/byW923RQwSao bnIjK3+oTUAl2ykBskle2emivu1nfoDtC6/tQet0oXZ4bC0vHCZ7bLIWpq4G SLhNXsYXDf4H2ASeQ9gE8QRsImt/VHj21+pLTzrGX8mIT1Z0wJMLdePFkuZc UX16xnxxxTe4GR0Dm6xPG7bKthsN9+25wJ2F8K356I3Z6I35xI355PZ8Zns+ e20utzWf35zP31ks3JzL35jN3JzL3prL3pxNbTfiNxqJj+cyny/l7i3nIR/P JrdKgfWoadmrmndLL3ulq37JRlB0LSze9NG3fJNXrP1NVVtV8mGR93aK9pqO dNzFOxuQXUroR5Kmibh1MmjANv7GihFWwVTavjif2dpqbl9fWGhE5mqhxZno 8mw8HlCDO1TiMYAJ6IM72QlUUQhHJFx8PwX+oFaB7e0OWmGQzpOHPoIImd0w oEKLgsJoRIPv+Ix2gjZISWYFFQYGDi3whEHYBDHEKB9Dw0sCJq02Qet0EUWT kIP/t9kEn6Wz1yaIJ4RNWosm/9U2aW02eahNWtvbCZWo+w6ioA+JOV0P2kQ+ dEA+/CjYRNj3AtiE0XHkzMsHDj/+M7DJ8Rd/dfbtp8d6joBN7PrB2K5N8iEe YZNaWt7IKgEmkLmCdqGkny/qlkqWZlaX9fE92nGjuA9iUwy79GSXnoKWFHYZ aGATo3zErMCmWsHIENkEYCJj94voPTDslLL6sTEne1jGGpIyQSv98IbR7G74 rhMPo00rdn8Yjrb5HsH31BuDt8qeEDvRE3vTY2+hb7+IdiMdAjZxmpl7eAIM AZ7sCdx8MGg214NVkr/HJgt1Nz7Vx7lY9+Gbm/hq0/aYXyoFg7B64AuKN9nB p3fBhUzQL+X3ijiX+MwOiJBzCT4UsDo5k+0M8lny6MnxwQ9G+98d6XtnoOvY aO97k+OnJZxug2LcbqA5TZMuM8NjZYbcvFRYlourplLqQkZTBoxAcrpqTo8l b6jhgZultGYqoYj7BV4Lza4b91sZEKt6TMHrkrDa5dxOlaCbRz0DF0E7Kx2S poISh54s43ZS+98m9RydAKF0H4MzdfAEc+wsfeSMRjTms4piXjXwJBM2gVBC HgVka6Xwf/+ff/5//q9/ubZa1EnJAnqPnDeMDKuGbyCCMbCJij8MPFFw+3Xi UdCuhHUJFU0Im6CiSatNdn/QQQYgI5sATHZtwvxrbEL0udtNXKOGDjyx6FnA E4AJSCTsUwbcsohfBddwAUKBazgDYTxWYcCJr5xgF4bdkqmkrjZtxXZdrDgX a87luuty3b1c8iyXvDC2Xyw6Z/OW2bw55eFbFYMqbruA+qGAekJIOyGgfgA8 AZvgfe4nCKFAwCYQ7ujxVqFoOOeAJ2ATp7IvZCYnXaypoKiZMywW7Ssz/s3F 6PUrqRsrmRtXsjfhvJKG3LqaBZUgntzFt2tHW7SDTeAa8rvbWN8HWjiLWDsL znAN3NiYDQOv0HJeaCvGq40A/I3g7wU2gSwUHNcWYmhaF9qfEXWyEC0nqNME zvAhukB38G6X6S9u1giVgEd+/8kcyr5N9o/9Y//4/iNIfx88Ijj9KLIJnHkf PYIwAkGVFBTRxRcc1A/m3XSwyecV06dlw/WM7KE22XEHPqcL2STAOpGSnK+a Bi77aWCWjRgHnnAjI3qoTdYjtKtBUknV5hzDbIKtGwxC+UfYZE/pRH4RK53I Lz6q6HjMOfFqUvh+RXe+YeqoGQApbZC68cKCs3srNr6cVgBPblQdtxqeWzO+ W7PB2/ORW/PxW8CTudT1udS1Zmqzmd6YSV+bSW/WEuuV6GY1dq2e2KrF1suh 7Vrs7nz2s8XspwuYUO5fnsKEUg6vJ6xLAdWiV7bsFa/4BJth8fUQb8vHXDYP 1OVtVdFHJe67adobZvIxG/19G+tkSN6VNo3lnPSoieRQjro0JHzWAQ9G9WG/ OhzQ2I1sn0OUS5gKGVssoDKoqGrJuIQ7ACSxaBnwkMvM00gnQCtq2YTNwIKb QBXa2FnK8Cn6+DkYREk5/TCQAJjAWcXDW5sFo8ATvWQC2QRgguomVhWVgMnu vmnfjDOJoSZRNEE2AZj8UJvgE7qI5ZUwleA7wu/8bJwonRA2eXBMuyf/EJvs aYE3PqxhhJjc1WoTVe8zEGQTuIkY8lCbKEceU4w8Ku5/Gmwi6HuT1XnszMuP vHlgxyanjz052n0YbGLV9rfapBgTIZvUMwpkk+aUGtkEy7RxsWCG1FLqpJvn 1k6YJP12zbhFCQPCMWITRjjD6wtjQhgZ7tqkH9lEzOjFbTKk5I6qeGMQCbMX HoWRp1owhG+kOIa2/MZ7nLGiCd4+MGpRjWKzdIj2gd081CYPJQlcENfIJpDv YMhereB5eCP832mTZsneKGB7811u+uFcyZu9Ng6Hel7AuCjjgVAwnnBp7Wzq WQ7tHJ9xQcC8wKGdpY6eGOs/PtxzdHzgncmJkwJmu1oyYNWRXGZ60i+ejqtL KR2kmNJOxZUJvygXkWYj0kxYnItKc1FJJixKBfmFhLyUUqKU0yqUalZTQ8lp K2lVPixOeLlxDzfh5UWd7ICV7rdMRhyspJcPH2pF3Tb1aD4irWV02aA4G5Kk fQKrfIg1/iGp7zht8P3JkQ/JA+9TBk7wqReNSqrHzI/5VNmoqZB0ZOKmqZSt lHXGA5qZUuB//4/7/9//+z//x7/cTfg18D5RYDvFD2J7x/OwzRm55HZ4R4F2 pawet5EJ7xDEk92iCWYTgwwwixXX4A1g02Bra4BN4JegtblaiyaO3Y0UH7RJ K0zQvopehxgS9MjBI3AGiUQDarjOJsyJsA4u8ilrKmrIxM3lKTf8jdIRQzZu ysQMqbAmE9HWp20zRftsyQ42Waq7luturM+o7Llc9qEdRpo589yUOeMTWuT9 CvZ5PuUEj/w+wATCmXgHNZUQ63Shigna34Q9fBTO8CFoRUr7UME4pWafBZ64 VANhCyXt4UyHxDNZw1LJvtoMbC7GwCY3VwAmuVtXc7fXsKACyidbBaJo8vn1 MoLJzk28ivHljdofPp7982eL/3r/8r99uQLnf/58Ce4AH0AcaK1g4Am25/ta fr0ZApLMTdnmp+3wFwSboFIIURxBE8NQ6wqBEeI+Kq+gbvp71ytgpfs3a1/c 2imdENWTH3vgs3/sH/vHT/qIsD4EdwBPUH0EzqhuAhdExQR9KO065KSdmHNN orrJZxXjVlL8XXUTwiY5JTanC2ySlV+sW4ZWgnS0J+NOT8p32oRcVp93jb8K MDEAQ/4RNnmwdILP6XoMbCI692td7zN++lsF1ZmmpQvnyfmK7hykaWlf8Q8s x6WradVWwXir5vy46ft4NnhnNnhjJny9Ed5qhDfrkfVq+GolvFoJr1Vi61gw m2zV4mCTa/XY7dn03QUMJsgmX64UvlotfrGQ+7QRvz7luRLWzjqFCy7eWkhy PSq4FuQsWQYrsraS6GSB/36KfthGOWKlHjVOHHGyPwzJOoAnKdNEUE8KGihe w2TQxo15ZdUp52Ij4rMLIz5FMqwNe7CfD3usAoVwWMYfUopGgSEemwB4Amen mWsFmOiZKvEYm3qROnqGMdHGpXVgdZNdm6DOAiVnEGs5EY0TdRNkE5uaZlNj NgGPoCZWjWgQTdEhfhiOxpmtzSZEL/wPsYkUbzMh+polyCYhzzc2QTwBkjzY afJfZJM9y3MZv72+FpHWlYHRnK4fZBP12BOyoQOivqdE/S+KBg6zuo6fPvTI m4/+7PAT/+3YC79ENpFx2zCbuDCbZPxsZBOASTUlA5KgqVwAk1ms8QS7WCyY FqaxzE+ZGhl9PiiJ2lkuHby4w0b5CFphGG0Qb9fQ0GBSJx5FNpGyeoWT3RBc KH0yFsYTNX9cK0TbXgwBT+CZeskosiq+8hL2aUE9FtWYVQ0hEdvfENmjEjSZ hyAJUSiB/PV1k++yyUOX53rI1o0/wCbOZtnSKJkXas7LTd9CzVXJG6M+kZjT AdwQMNoZE6cpwydIQx9Qht+hjb3HIJ3g0k5JuO16Rb/DSPI76CE3K+bnpcKi bFw2lVRMpZTTcUU5pS6nNcWkCi6AGPW8biomzkWE2TA/HxUWk5JKRlbOyGpp RS2trGdQVJBGVtXIqeECv6+ayalnsA+VtbSqklSUE4pKUgkXcK5n1NMRMQyn zbK+hJtdz2jQQ/mQKBsQhB1Mk3xQRD/HHP+QOX4ShEIdOiFm91i1k04jx2Fg B+ySREibS1oAJpmosZR1TSUsC9XIjavlf//jzf/80631+axNzeCMt0vovWhO F5rQJaJ3iZldRLPJHpvopcPIJmjzVrDJbtHkG5s4tH/BJq0wgXhsQgAISKqQ dUxn7JVpz3wjtjyXurlVv7KQmamENlYKCzOxeimwupSDOwv1WLMcbJR89YKn NuWcLbvg1W8WbThP7IsAk5prseBaLnlh6H654pmbss7mzSB9veiSmH6GPf4u a+xtLuldHvk91thxDt5aQmxxgq5b53TJ6R+hNYTx7RfPIJuEzOSMl1sIS+am TFdqrvX58I2VFEjkk83iJ5ulT7aKn14rfbaNMYSACYz/QQHIJthsrhsVOBN7 jnx9ewYw8se7c//06cKfP1v4719c+Y+v1wApv7/TvL9dub9dJpbeApugPhTI Ss0HNkENJkSLPWotQVUS4g66SWw6jxYThj8DCsETyL5N9o/9Y//4i0ece0px 8SAxiQsMIjj9KMIIAgthE3n3K2CTpoP61Ywdcq9m2kyI1qIPsckmvv0i2OSy n5ZTdDjIx8AmGVl7zTx4JTCJ9j2BAE/W4g+xyUZ0ci1EqWguuCdeBZgYew9i pZN/kE1aSydgE8n5R8RtvwGbaLqfso68EOEcqxsvQpBNqvq2GUv7oqt7Icxf ioqvplU3Spa7Tc/Hs/5bDe9m2bNR9q6Xfetl/1o5iAX+m6smtuqpa43kNp7r M4kbzeQni/k7c+mPZ5Ngk3vL+S+uTANPvpzP/X658NVc5taUZzWsXvIIl9z8 NT9nK8Rbto+W5BeK0jPT4pMxxhEH+U076Q3T2OsWyjE74/2ApCOhG/SrhgKa Ua9mImpj58LK+bJ3bT4RcIrjQXXYK/fasAE/DL10CrJMMKSTk4EkaDDmtQtN 6kmNnCQXjQiYPUzyhcnxcwzSeTalXcYblOJtBQou/nNyFrbLHmGT3ZYTjCe4 TWgwmEQw0YqHiD3UiAIKGmo6dLQHp3X9IJsEHm4TCfoJOVE6QTbZM5vrv9Qm rSsGf79NkDh+6JwuzTjY5BGwiXTwkLD/LUbH0bOvHDj82I5Nzhx/GtnErh+M uyZTXibYZCrMJ2zSShLUbAJnXCVGyMK0eaFgbeaMtZQ25RcFrEy7loyW7UL7 MDq0MBSkIZsoeQMydp+E2cOndvEonXAW0LpFk31SJjazSyeegPcGjCHRBDCd ZASV0nCoYmsu4WuCwWcet2spaMzZGqKAAiRBPy23YUsk7Z3EBYELAiao2QTv ItnbbPLdeficrr/HJvM1+2zF0iybF+qO5aYHztVpY9DN4cGonnyKQfqIRTkt 5nRqpIMO/WjQQU0FOLmYcDohKWXk9Sl1OaNAqWSxczElKySl5ZSimlFBKmlA iqySllczilpWUc3Ky2lJISGEFJMiSA0+SVpeg6Rk8IrD6w5pZBUzWSXchzv1 jAJ73ac0C0VDM6+FzE8bZvNakEstpShExD7juM8wnvZxGsCZlLIQFQNYClFJ PipJ+nhuA0nJ7+KQT7EmTjHGTjImzqnFwxYNzWlk++2igEsaC2rSEUMypAOe TCWt6bA+Ezb4beKZKd+/fX39s+1m1CmfChlNMgqP0gHvIiAGvENk7B60uQm+ jHD/blMSBGuEhzcP+r6BbLK7bjB1t2jCQC3w32UTYioXYZOASwYwycTNkHTM OFsLb69XPruz+IcvNz7/eGn9yvSNzdq1tfJcPQI2gYtrq6W15fzacnZtMbXc CDdLzkbRjmzSLFrmSjZUN1kueZZKrsWio5kzozldWkGnkHaKNfYOY+Q42IRP eR+rm7QsFCzG53ehXeAVjFNK5mk1+6yGcw5Fy22Ds1ncCTYJmkhZH68UlS0U LKsNz9ZS7M56DtCBN5U3UDECgk/fKuMNJmUY9sP4H7fATqkCguZ0gUrQVK6v buIt6ltFuAaY/Mu9ZTTjC8zy9e3GvWtl1DJ/8zK2dzyw62ojsL0Yx/cuKaIe E/TL0RbzaE8TdI3meqF+E3gO2oHxy1sN5BFiWheRH3vgs3/sH/vHT/pI8E4r O55FM7iQTfinDqCKCVE92UnnS67JD9Gcrvs1y72q6VpK8tC6CcAErdOFbGIn HfUzP0hLLxA2QfubfFe/CdhkPbzXJvp/hE32lE6UnU8ATARnfglnVdcTis4D ur6nstIPq/oLDVM72KSsPQs2Wfb0VJ3UWT/ncly6kddeL5lvVB03aq61aft6 wble8m5WAtfqke2Z2PVm4nozewNbrSu9PZPCeZIAntyeTd+ox2/PxD+ZT6Ng ffEzmd8vFv5pqfCH+ey9WmgzpqkYaU0r+WqQs+wildWdJdWFouJslHXMSXrd Nv6qafQVK+kt08QRO/OEX3zBJe4KaoZdyuGgkRa2soJWTsTJ91j5YBMYesUC qohXga6Jhl+bgQVU0UjHRew+LvMSFnx5LvLwKdrYWd5kl0o0KuMOSFl9eHql jB45qw/ZRC+ZMMrIZgVaKofWahPUXKDk98EFWgsUNTgjm6D9TYjtF/1WDpYf bpPdkeQ3NkFtBUTppNUmRGvJf51N9uxm8lCbEE0oCCatJPlreuHxuskj0sGD 8uFX+L1vTF546/zrjx994udgk+Mv/qrt3YNjPUek3DaHYQhbpGvXJqW4GDWb EB6ZL+oQT+CikdHM5Q1LRctyyTY/bQGb1NO6WsZQTumTfonHREc2cRsnUVcR iGPXJr1iRjfABCKgXRJO9oBNxPR+iEY4qhGOwNN2epbxFdvw8tkoWgwWJw8W hw57M+wJ4RGMJLhWsJstuiQKKEgoqGKCYAJvgIhPEvVL9wRuPmiTiO9bvfAP kuRvsoltrmqBLM04Ls+6wSb1oqmQVrsttKCLE/UK4gFxPqEuZvTVrKqclhWT gAsxZDouykcFcAdSSkmJ+5BKUlaKS0r4emvVNERWz8qraUk9CxfSclJYTPCK cd50jFNJiKtJCR4pcdHIyGfz6tm8CnhST8tmsopGRjGb0zTSqtmcdrFgnMvr akkFpJ5SJl3MnJ8HF/BQJS4rx6TAk3IC/kiKbEjoM1N04l4Ro03EaNfLhvEd W3o1klGPheu3wz++zOsQwxdsxKvE4lEkAhpI3KfOhQ0pv2Y6ZrnaTN26Uqpm HM2C16Gjsyfa4I2k5O/sC49sgpqSdm0yimwC3zHgbWBVUfbYBBVN/qJNCJhA ynn3za3aJ7fmb2/PXF3Oba+X796cu3d3GfLn328DRi7Ppz++MbuymKmXAleX 87c26zfWKzc3KzfXi6tz8ZmiA/XCz5Xtc2XbXNE6DzwpuZeK7oWCY37aDjZp 5kwJFxdsIqGf4Uy8xx5/V0Q7IWWeElI/EFF2uuCBJETbOyERdKHnXzAI2kEl qB3erR4Em+QDgmpCOT9lvlJ1bSxEbq9lwSBf3Kx/eWsGMQQFDf7hAm9+r+D9 Jju5f7P65c2djdpRpwkgBfLljSpI5E+fzKMtSOD6nz5dgHxxvYpYcX8bAwgq hXy6UfgK/ySfb2G7PcKvRQ31+NPKaLlg1CwPgV8F13AHpbXT5A+fzv/xswUi P/bAZ//YP/aPn/SREp5SXHxSeuEx6YXHJW2Pis4dEJ97VHwOW1V4NzuTu0QX X7RRPrgaFXzZtN+vW+6WddcykrUYdyXCWo2yNpLczTQXiLGO4YKxGWOthelL nvGU5KyLetRDO5aWnKsaey/7yOsRxkaMuRlnbSe5G6mdbKY4mzhMUC/8in+i rD7vJb+OJnRhvfDdT2tRLkGegrOm6yl155PqTjg/pel6GhlEe+kZfddBiO4S 5Fks3c8irWBCwZYRfkrR8aT84hOy9sfl7fC3g7/sAWw94fbHJOcfkV444CK/ lhF/WNO3Q8qa8zVD+7y9p2jsm3GOLYeYaynxtWnNdsl8rWheL7k2q/6tmdi1 2dTWXHZrPr81P3VzAcv1ucx2E6uebNZjG7XIzWbyxkzi5kzsVjN+ayZ+q5m4 u5D+tBm7v5D6cjH7JdhkJnMz51/26SrayZKaVNEOlNVddd2FmvZUnP2ak/ya nfSadeI1G/lNE/CEetzCeN/Ob/PJu93Kfr9uLGSmhiyTIQs95BBE3eKwSxj3 yyJucdCFxa5nOwwcl1lg1rDk/DHuZA+D0jmJr9/FprSjoomY1asVj0OUvCEZ q0/C6JHQu2WMHgWzTyvCZuzoJeMGKfCEZJJP7Cz6qhg3yIa14kG1EEYavQre JbSZ2p7SCfphONrihFiqK+AUfDsiLNg4R+THzmK/HSLx2bBzwCEBngSxEaMU P4sjXlnEK4XRJjZRxy0MurBP8qBN0LD2waB94T2aEae8z8xv19FPqEjHTZSj FupRB+VNB/l1JwnbFN4++jwxdwsLvugWWhPYtLtQMLHN4kNtQjSetC7SpR54 viXPoWiHXtQOvQDRDEKe16BHRx9TDB2QD4FNXhb2vsHsOHLhjSeOPPnf3nz8 Z0df+MW5d58Z6zsi4bXZTUNxJy3tYeQDnALYJCosx0TVhKSeks1kFHN59VJB t1TUY+eCbj6nXZiCCwOMUeenjXNTWGanzHPT1mrGmI+ogla218Swq8kBu8hl 5JpUNLV4TMzq49MvCZk9HGonl9rFm7wkoPcIGX0iZj9EyhsUcwcU/CG9jGRW 0UxKsl42rpGMGOTYMrA2DRk3CKh2ArkD/Uic2JST2LKzlSdWCAgFngljVAPd YWQ4TQyvjQNe8Nl5fgcPXnF43QERODokKK022cMTeKtE/QpiTxOigPLwAHgd XJ+NE3TxkyE5ZpOyc9cmOzyZw+KcLVtnyxbIfNW2ULPNV6yzJXM9ry3EZZW0 uprRVNOqSlpZBgukZGCHSlwMLw1c15LSSkKyCwoJfAg3QRMgC/AFwGSnbwh4 kpLWMvJaRlbPyDGkpIAn8JCoGBdWkErgs+G/Fu8wUsB5JqucyakauEqwM1ZJ UTUySjg38xo411JylGoSfq2inobnq+EJVbiTUoBNchFhOsAL2elG+YCU066T 9HvNdHgtjMoJGa/PoJgAm6B/K49V4LUJfQ6x28wPOqURjzLu12QjpmzUnAoa kgF9JmyqpOyXa9GoSzxX9F6ph9WCATGjQwPfLoQDWrCJeFAvGdJLBuHaIMWW m7YoJ+zwTUNDtaspNhXAhAxIsSqxa7sa23bWqaVb8d3eLWoGxIr3xSOhwLVR QdPLKBCTchIe3V4rg0H+x799CvmXP9741z/d/Pd/vvNPX1/77M7i779Yv3O9 uTATX13Krixms0nj5fn43RuNG+vFGxuFj6+VNy+nFmqeRsHWmLaATeYrjrmS rTltXig6Fkqu+aJjdtpWyxgb+BrCWn6nnHlOTDslpn0kpX8kY5yS0E5KKSek 5A8gcsqHCtpJJe0jBe0j1eQpuNYwz+jZbXpOm1lw0SLsAJtAHIpen34kaqPl /PC1LJsDm+zM6Upj3e5bpU+3wCBVlHs3avfACLfqcP5kq3R3q3gXzpvFu5sF uP4EW1i4ioIW7/36TvP3IAU8X3/chDtf3sLvgyA+bn6BrzkMT/58u/TZNUjx c6xSU4Un/O7OzJfYCsC1r3DjoGCVkd0NVtCqwvjGixVkGThjMrrVgPzu9gz2 W4OM7s7++fOlf763/GMPfPaP/WP/+EkfadFHsvZHxW2/hWG56NxvhGd/A04B m6B8yyYdhyzk9zeSkvsztvsz1jtF9WZatByiXw4zrkToSyHKrHe06RlZDJLW I5MbUfpamLboGk2KTnknj7koh9OSM1VD92XfBDy6GWNsxZnbSfZWmreZ5hE2 2UywNuPM9QgNbFLVtgcnDxt7DwJMsOAYQcFJgkXV8QQEXROPGjoPGsAmIJRL z2Lpfk7f8xyyierbNpGeB47hgYvzj6IoO59wk9/ISU9VdRfrhs6GsWvW0lMx XZqxDyz6SCtR9lZOtl00bBWMGxXPVj2w1UxszWU25vLrc9Mb88Xtufz2XPba bHprJrlVTyCbbDfi2/XYdj3SmpsN353Z0J2Z6J1a/E459XExdSsXW/VqKxpG UdFXkF2oqs/M6D9M8192kF91AE/Ir9vIb1gpYJNjRupxM+tDK/e0TXDBIeny aYYiFkrMRos6+TGXIOmX5CKqdFABPAk4hAYFxaJh2A08m54rF4yRRy6MD7XR x9uYpPMQ3mSnSjRqVU9alDQwiIo/LGf1A0wgcmavktWPYKKXjEFQpzOaroPP 5hrUiDCYKPmXFLwufNWdHZ60lk6w9gEt9Vs2cfC/HSGK3w4RQXww2rGJ0A7O ATv8LcRB4AkWuBBFPNIo2MQjCiObwDDVKQCSEDAheqgfGq+B4tWRvNoRp6LP ImjXYzY5BjYxU47YSK/ZJ16xj79kH3sB2cT0QB66JNf326R1cxNAh+qBqAdf QCHuKPufUw8/phx6VAE2GTwk6n2T1Xn0/OuPHX7iZ288/r8ceeEXZ959erTv sETQZjUNRqzkpHMy7+eUo8JaXFKD0W9cMpdV4lFBFvKa5YL+ctEwm1M1cyoA y1xeO5vTzmS1jYxmqeRYKNhnC/apiDoXUllVJL0EW1/aqmPpFVQRu1/A7BWy +tBe5BxaF3fyEp/RA3fgITFnQMQblAiGlaJRrYxkVNHMappJRTEqyWYVBU3W AnE4tTSI28iAwDsB4tRPwn3iHdI6oQsTCqESeLKJCXGbWQATv50Hbxh4uUOg ErcIvQd2yyKSh5ZOiH4TsEnUr2zlyXcKxQ024UCCLl4yJAObzLbYZK7iQoGb zZK1WbRAZksQ8zwgpWypZ1Qwwq8kYeSPQaOG2wF/UcSQOrAxIWkkpRB0TXw4 A5zEp2ah1QwwdOBTtoAbKDV8phZ6AnrOnqc1skriyejDRg7Pt+9/T7DpXhnV dFySCQnAJnpZn5zXYZANuAwUeC2cRoZKNChmd8Pr6zSznWaO3ylOhrWJkMbv kDhNvKBLBgl7VImgPh0xZaLmXNya8KiiDvijWmsZ+0zeeWtlyq1nCqjtEkan kturFQ4YJEMWxZhTSzHLxyFWJckGHlGSLIoJOONCwT5E98Es2NtJz95ZIril Bd5t4sN3jLBbnghool6lxywwq+hXl3J/+t3W//of94Ak//nfP4GL/+0/78MF 8ATM8ocvN25sVpdmE3P1aDapb1TcNzcLt7aK22v562u5zcsJZJOZAqgT64hv wkXBMl+yL5SdswVbPWcqJbX1jAGzCa9Dzjgno5+VTZ6R0j6SUE9KKCclE+9L xt/bExnpAzgrKB+qJ09BDOw2iJ533ii8CDbxG0Zj9kmwSTEixeomNTfqN8EW 49oo3N0AdJQhn25XIJ+BC/Cgm3uys5IwtpbvNwv5opWyIHCN+tOJRnW8BFND vSr4ql+VPW3s8Gv/CLk794ePZ9F6X8CQLwE1eA0FbW6CyjQQvMhSQX5B5RsI anv5sQc++8f+sX/8pI+M+BTARHDmV2AT/OI7bSLufNlOPbGZkgJMILeLqvWk YN5HWYmyVqKMhnM4o7mQ1bbXnYOETZbcY8gmbuoRsEnd1LsSIMOjiCdgk80W m2yl2GhO13aStR6mNAydYcYxc/9z32MT5cXHEU8IoUCMXc8aup7V7fJEd+lZ Yn7XX2MT+KdQdT3pobyRl51umrvnrL1wblh7Zx2D866RRfj7xrgbedW1ouFa 3btR8a5Xw+uNxFozs9bMbcxPr9eTeOKb9QTYZKsR32rENiphyLVaeKsa2qwE N8qBtaJvo+jYLDk3C55r04FbxcSnleznldznheBW2LDsmCwrO0qKjxq6ExnB K66Jl5wTh7Af5oNQKG/YqIettKN6ynED7R0YV5vYZ4AnQd1IzEyKwVDKJ56K qUspfSGhzUY0qZA64IDBvCLqU0V9aquOw6B0kUfPow1NwCYKwbDLxPVbhTY1 HdlEwe6X4nUTObNPxR7YrZvs2kQ6SthEKx5ANlHwMJso+ai/dQDf33nsH2uT XZ5gNgm7JWGPBFQCA1QYpqJP0ro2F7GgE+Svt4mJfNg68ap1/GXb2Iu20edt I89ZiFoJ2lqxZV/Fv94mxEwtom7yF20CMEE2UQwckPY/LRt4Sdz7Fqvj6LlX H33jsZ+99eR/O/bSr06/8/RI72EJ/7zVNAQ2SThoUwEukKSZVsyk5NW4ZDaj hMCHKCCU+Zx6YUo/v5u5acPclAkyO22tZY25iLKUMmTDqmbBVcvZKSNnJdxB rYwMZ2QTtDU5nHn0bnQHYAKPAkwUolG1ZBw4Y1BSbXqG18rz2fguExted7SS m01N8RqZdmzlpW/eD8gpqG7SWjTB9us0MiBAEo+FDfFaORDCJhhMwBqAkd2K yZ66yd9rE48g4OSCTUJufios/x6bzJasROZwmBA2wYLbpIqXSGq7DCEkQgSR pJmWo1RxcRDo+DYc5ERfCeLJHqHsgcb322Tnod1HEXCqKXkjqy6nFbmIMGCl GWT9SkGXWTXis2BIhFfBqJwQsS7J+QNWPd2koUK8dn48qIx45U74TrI7LTPs Ucb8WkjUp6nlPLmwIR8xlFO2XFifCap9Zq5Th3WuwWsN3yi04sGdn2lIx42y CZOctBtskx18Thea1kWzayZ3lgrUs11mPvxeMb86EzXmE5Zp+OQxczFtn6tG ri5mNy9PX13MLTeT5bz7xmbtn/9w/Xf3rgJP/vVPN+/enLu9PfPZncWv76+B UO5/chlskozoU1FNLCSfq/mur0+tLsYXG/7Furc2bUVzuiCNaUtjyjxfss0V 7ZBG3lxJ65FNYg62lt+pZJ1XMNtwnpzCeEI5KSV9IJ14f09k+E2wCURJPYmE omad1fMv2GTdfv1I3EHPBwR43cR0uerc2wu/CxPCJp/fqKEP4eL+rQYKdo23 pRBTvx5czhcCN7HOFPw+0gqaJEY0rbTuTgL5w13MJsRaxHvmd7VKBGfLzoeE TT7dmP74au7HHvjsH/vH/vGTPnLSM8Jzv+Gf/qX84mNgE/7pX8H4/KE2kXS9 4mac2krL7jUsYJOb08rVGHc5RN9IYbiY840XTJeK5u5Z7yjSx9UQFdkEYOKi HM5IzzbMfXAT2AJneALYZD3JQUE2uZbibKc4N9Kc9TAV2cTYe1B18TF1x+Pf UzdphQk8CjYx7tpE2/mMdmeu119rE/h3EJ79tfzio17qm2XNBbDJjOnSrLVn 3t4/5xycdY0u+KlX4sL1nPIm2KTkXC1512qRNfDITHZrfnqtllirxa9Wo+vV 2AakFt2AR0tByHrJDyS5WvCuTLmv5F2rectKzryStl1Nu67lQrenE5+WMvdL 4c8L3lsJWV3XMy09UdO8nxO95h5/zjX+vGviRRfpZSfldQftLQftsJl6xEg5 oqW+baB/4BC0hdR9SfNYxMHKhCTVnGG2aJ8tOhoFe23ano/r7QammNPPo3cx yRcpY+eZtEvUkdPkoY8YE20q0QjYxGcR2DUMvWQCW6GLMyhjYs0mCtaOTXCe jKLopTtLMOEt8JhNlPwegImc2ynndqPld7TioX9g3QSf3yXa5Qlmk5BLDEHl EvjlqDXgwb0w/oa6CdjENv4yVjcZxeom2C7w468QNkHQeChMvit7YPJdNmkl CUTR9yxEPfyEvP9RSe8z0r5D4t4jrI7jZ15+7LUDPzv85C+Pv/TbU8efHuo+ LOW3W40jMScj4+VMh4SVuLyWVFQS8mJUMpvXLUwbFgrGRTzY9bShnlXX0jBy VlcgaR2QBMZXTXif5C3FpDHuk2Ui2nzcOFcJbl6ZdlsE8IaBAEnY1E4+owdg goomYBMRux+DCXdQJhxRSsbVeHRyslVL91i4wBOsKwF/ucEgYBO7moI6jyDY rK3ddwXhETTdCz0BFUoImGBTuWxcgifwuiObxPzSWEAGaZ3KReRvtknYIwy6 eMATZJNyzgQSaYUJphKUb2CyY5OFirWB/SMr8dKJDFRSjovLD1RMCJK0wmQ2 o4BUH7AGRoxdXLTypBQXQwihVPGOeESMVqd8l03QSm4zeRU8gbAJ/JnBVpWM Mh8VB22TZuWQRtzjNlIjLh76WtPJRsXsbpVo2GfnGdUkzuQFNu28RjbmgZcG 6x0TBVwSrKPHJUVOCbpkDgM3EzFEPaqAQ5qNGiMeRTKozUYNcb8Kvpy9Vr7b zLHr6WY12aik6mVkrXRCD28kDcOuZ4FB4AzfowJ2cRRvaUmFtOmwLpcwT2fs 5Sl3vRyYq0cXm4nludTqUm59ZXrraunaWvn6Zu3urfmv7l1F9z++MXvnevOP X20CSaoFby5pma2FN1eLcBOyPJeMh7RuO9dqnIQ3UmXKVsiYMjF1PqGZTumK GUMtb6pPmbHd4ae/sUk9ZyqndGCTRtYQtbMMwm4tr0PNaVexziuZZ+X00yAU Nf205mEBjGgZZ3TMs5CdugkXq5vY5T0Bwyhhk9m8abnsIGyC5nR9hpME6IFy 7yY2pwvdgYsvbs9AvrzThHy1C4o9rehE4D6SCAEW4j56CHXc38d3KkEforII ggZCB+gDNcjjvSffFFBQ9aQ1xE4rP/bAZ//YP/aPn/QxJT8nOf8IPhrfsYm4 7cB32cTHPgs2+axmBpvcmFKsRDmXw4y1BNYwshpjLIXIkMsRzB1rYRpmE89Y QvgR2ASSlZ2bsfS32mQrzkSN8Mgm19Kc7TTnepp7O8ffjE42TZeirOPIJprO Jx5qk1aSoMDTsLpJ50HCJpofaBNV15OCM7/ifPRz9aUnw6zjVd3FBXv/rKVr 1to9Zx+Yc47MuSbm/cylMP96xb5RtK0WXFfLgbVadL2e3GxmCZuslsNXS+HV YmCl6L8y5b2cdy9nHUsZ+2LaBoGL1bx5JWtezdjBJusp31YysJ0K3c16P51y 307KG/qeKdwmefHrvvGD3rGD3onnvKQXveRDbuprbuobNspbJtKbBvJR0+Q7 du5HftnFmLYvYKFmw+Jm0Xx5xrNUd9enrfAfa8DJFzA6yCMfUcdOU0ZOk0ZO jw+foo2eAZswSefBJth//QYO2MQIowLRmIo7JGP2SfFmExW2TteoVjS6u63e qE4ygtbjQjZRC/v22ETJ79OIBlHLyd9vE5wnIsImAQdcYBuihd1iomgC4yWI RUdF+YtCeahNzNRjFuoRO/l1O+lVx8Qhx9iLjrEXHrTJX5y+9TfbpFUlEHnv QfXQk/K+xyS9z0r7XhX3HmN1vHP25Sdee+Rnbz3xy2MvPnLq2MGh7qMS/kWr cSziZKa8vHxYXIjKinF5KaEoY4vEamsZDZY0doYP61ltI69vTBlgfDUzZQaV VLOmcsaQT+iyMW0yqPbZhRYtQy2ZUIhGgR70iQsAEzSni0XpQHUTyJ66iUI8 psJhopWRDEqqWUOz6egQu47us7AjLmHYKfBbOF4jk1ixDd4JELiAEE3xOyrB Z3y58KIJ4glRNCGcgkonEa8YEg/I4kE5pLXN5O+3CagEbBL2CNIRRTVvfihM miXHbMmGw8S2Y5OKFWwCAER1k1abfA9Mvt8me2ofyCaIJ4RN9kzuepAnD80e m6BPjk1Fgz95Rjkdl8bcbLeRbFQM2jTjwJOwWwQYNConpNxeGa/fbWUaNeOc yTbq2EkBq9OkIeMLqXG8dp7PIYIEXGK032UyqE/49amgMeHXRTzqoFOOZl6F 3DKsRcUrTwRUcb8y5Ja4zXyXkec28T0W+OqWJvyabNSUi5kLaXuj4F9uxFfn 0msL2asL2eWF9OJ8amEuCYGLpYX08mJm5XL+6sr02uo0XDdq4eK0O591TGXs ibAuHTPmktZC1pmKGW1GjlFDd1r42HYnHnkQj9XIUUqHTToKWnUBW2zByYt4 hbm4upDWV7IYTxrTltmidQ6LHU3oQjZBdROD8BJhEwXjDLKJZhcgrQGbAEwg etY5E/cCxMK/aBZ2WKWXXKr+oGk84WSATYoR6WzeuFxx7rXJAzDBu04aRMAm X308+/Un81/vFkf+8Ok8kT9+tgBnuImqJIghrRsjEoFHkU2IlcE+x5rcq+AO 1GZCBEhyf7uC36zg19jyxYREWoM/ufJjD3z2j/1j//hJHwXleWXnE/hOH4/j c7p+/V02EXe+7Oe04TYxETZZDtFXY5gvriaYVxOMtSR23owzEE8u+yZS4tMe 2lHv5LG84vyMtX81SEHTvSAYUuIsCGETgMmNDO9OXrAVm5w1d8fY75j6nsWK Jt8xp+uhNgGY6DuewSomKD/QJvBPATZhn/wZ7/QvdL3PxHnvNYxdc+aOWVPH nLVn3jE46xhpOCYaLsp6Tr8xbV6ddq4WPFfLwTXwSCUGWSlHrpRClwuBy1P+ 5bxnKe+eT9nnEtbZuKkZM0LgAnI5Y1hOG1bStrWMey3pXY95N2K+G3H7raT1 Zlw6axooKT6qqt9L8Q4Fx58OjD/jH3/WP/Gcn/SCl/yym/KKk/KGlfSaifyW hXrUxnjXyT3pE531m8npoKA+pV+o2uYrtnLWkArLIl4Bn9FOGf2ITjrHILcx KOcnyW2TY2eBJ3z6JaOS6jJx3UauU8cyK6gGyYSaNyxnYTaRM3uBJ9gG8dhC TDu7fmvFw7s2GdKI+pFN5NwuGaej1Sao5QTx5O+0iQ+3yS5PMJtEPNKIB3gi wnji2pnT9ffahEbY5BXMJuOYTSy7E7pa53T9UJt8qxG+7+BDbbJHJSjqoacV /U/K+l6U9b8u6jnO6nj33KtPvXHg52889osjz//21PFnh7uPi7kXLYYxv3Uy 4mSn/MJ8RFaIK0tJdSWtrecMM1MmFLiuZmAQpc5H5dmwNB0SJ/yiuE8U9Yki XpHPzneZOWYtw6iZBGXIRWMCdr+YO6gSjwM9GKR2CMCETe0EocCZmNaF+k3A JsrdCV1mDd2qpVs0NLueYdViHSXADXjRoy5RyicLgiIBGvhGnHCNrSZt46Le E0IlOz0pLTYheILSOq0LkggpIGCTWEBGeOTvtAn8m4BNgi5saJqJKqtTFsIm rTBBNsFhggXBBFJLK2GEjyXxLZs8CJOHTutqLX98a+ZVbm/p5KFzutCjfw1P QCUo39gnq0CqquXU5bQyFxbHPFyXkezUk5x6SiIor+StwBObflIjGXVZ6FYD SS7qFXIuyoU9BtWYRU9BX30OExOQEnCJIj7s39PvUPjsCqcR3mngEVU8oIt4 1fGgNhk2pCIoukRYGw9pMjG0n6MLS85VK/jnatHl2dSV+czaUn5zpXjtahnl ylJuYT7VbESr5UBx2jOdd+VzjlTSnIwbkwkTnCNhrcclsZg4KhlJIyfrVTSz jqmQjEv4QzxWr5A7IBONSgXDXGYPm34JzlhYnQYNCb6HGFQT8BdxmRngU7BJ MWMoZ/TVnBFbratkx21im5my1LLGasZQiKvLSQ3YRMfvVLEvKJhtcsZO0URK +0j1sKKJivYRwAQJBauYsM4ZOedNuE3c6oFQi00eur9J61QugieoUEIUTXZs ghOD4AlaI+uf7i1B4IKQCHLKgxUWNL+LmOKFNp2/h9NjFyC7S3LtTtkiKim7 eEFPqKI7RH7sgc/+sX/sHz/po6S+oOs9CDz5izYRdRwKcM+DTT6tGr9o2m5O K8EmK1HWRoq/meZdjTNXYpPrKdZWlos1uceZmzEGSCQrO+ejHw8w35lWtSOb oBlfYBM4r8aYYBOgzY5NMjywye0cfz1MnTF2RVlvG+HP1v7od9VNiDldaFoX elR38WnINzZpWU/4r7EJviDAr3mnfg48EZ77tXnohSjnnXnzxVlT+6y5a97e 17QNVi3DZcvoUky2ljNcnbJfyTtWCt6VUnBp2r84FVic8i/kvQs5z0LGPZ9x zmccjagJgmCCMhM1LCQ0C3HNcsKM6iYbCd9WInAr5bqdst2ISWYMfVPSEyXF 22n+y+GJp0LjkGcCEwf9ePXETXrJRXnNTnrVQn7DSj1igXH15Nt25ns29UDE zShnVPNV62LNXp0ypsJSGF+J2B3kkQ+pY6eoY6fJY6dppHOkoY/o4+eUQrzZ xC7ymHhuA8empptkZA1/RM7CWk5k9G45owdsgvNkeIcn4mG05Te+dDBqNumW cztxm/Qgm6BtwdFiwv9Am+A8wWwS9cqi2FJd4vDuOl2oF/7BlpMfMKeLetRM OWwjvWab+GZO14ON8JC/zSbfbG7yvTZBKpH1PANRDz2jGnxaMfCyfOAtUc87 rI73z7928K3HfvXagZ+/9exvTh9/frj7bRGnw6wb89sYEScnCTaJygsJ1XRc lY9gBskEJQmfIOriBu0svwX+/WkOHQli15MdBorDSHMY6U4Tw6KlmzQ0g3pS LSdr5BQxf0TIHSKmbIFEqKPnKCNnJ8fPM8kXCZ6gdniIRDAsw/tNwCYWLcOm gyCe7KDDY2IGrJyglRuy87GdN21ctJQ0CAWyUyhpgYkbh0lr3QTN6UIqwXrh XQJ43ZFNUmFlMqwEnqCZXQgj/xCbQJBNalOWhZqn1SYIJt9lE7TUFR6s0wTl oTZ5aC88YZO9XSEP2OShvfC1B3Tz/TYhPjn6EOuFTyubBX1jSldKKfMxWcTN CTrYXvNkwMkvpI3ZmCbkErlMbL+T7bTA22ZEpxwyakYtepJZRzJrSVYDFf1k wAkvn40H8Tng1TG5rbKwVxd0q0MedcSvTUaM2YR1OmMv5V2VaW+jHJyrR5bn UpfnMyuLudWlPJyX59ILM4krC1m4CRczlXC9FEQpTLkBI+mUJRbVB/xKt0vi sAudDpHLKUaBa6uFZ9Az2YxLRg0d3t5GLQMwIuYNchjdIt6gXDQKSGFQO1iT XUxaJ1zzOd0K6ZBRDX8LiklDtugofgcnn9CUwCA5Yy1vApvM4zZp4i1aABPI VFQ5HVVE7Syi34SwCZrThUokewIk0THPotIJmtyl5503iTqcyr6AcQxsMhUU lmPy+WnLSn1vLzy2GNdWqbUjHoJKJ8gmkN0Cys52hw9dyBdVT1pndrW2paCb xFQutKsj5N52qQUmO+hAU7aIvhI4o2LKvWslVEMhuk7QKsQ/9sBn/9g/9o+f 9FFSt5sGX5BffAyC1ukSnXtEeOaA6OyjEPG5x1vrJmFB+61pzed1872G5XZR fTUOJOEgm6yn2ACTzQxnO8+/nuLczPCuJVhX/CRUNwlz3i+oLzatA3DnaoiK YLIRpW/EsbW5thLsa0n2dop9Pcm5keRcT7DWgpQ5c1+C+765/wVV+xOKC48R MPkum3yzYFfHU+oOfNMTvGjSutGJugvf36TjScXFJ+TtT0iRR9oOQMRtj4jO Y+Ge/iXvzC+5Z37JOf0L3tlfiS8eUPQ8lRG9O2u6OGe51LR0z9oGquaBimmw 6WFciYrXc4aNKctazrqSsV7O2Baz7oWMC49zPu3AY5+JmfGYsGBOMdYjhpmo qhlVL8QMVxL2qwnPZtK/nQrcTjk/zthvRMXz5v6i7P1p6Vs50cvBiWcD45Dn /OPP+8af90686J14yUN+2U1+2Ul+zUV9w0V9E+KmvWURno2ah2txwZWyfrlk mJ3WF+KysIenkvRTSWcopLNU6oVxUtsE+TyP1m5STNi0kx4z22fles0cn5lj 106aFSStaFjB7ZOyuiEyVjdcwx2DbEwvHdUIB5E7dm0yoBb2A0YUvB6iaILa 4YnFhNGcLmINYbT9YsDOhgTt3KCDF3LyQ05B2CWEhJzCkEMUtAsDNqHfiiVg FQVtooANboqx4C0nIZc0AgNInyzqg+GlLOgS+x1Cq55h1dFtBgjDbkSh71ZP 6A4zyiTErSN5MJuMueT9Zl67lnZCOX7MSD5qIh+xTrxmHXvFOvKidfh56/Bz lpFDrTGPvAQxDb1oHHphT0yjkOeNo88bRp/Xjz6nH3keoh1+XjP0HEQ1+Kxy 4KACjxK43fusqu85VT/WAq8ZfFEz+JKy/wVF//Py/ufk/c/L+p6X9WIRDb4u GHhDMHBEOPS2cPgDWtfxU689euiRn7904GevH/zFh0eeGrh4lE/vMKpIMIbH agrY+rpct4Vl09NMapJGMqQSDyqFAwphP4pSNKCVjhoUJLOGatPT7QamTc+0 6hg6OVkLJpWS1FKSXDAq5Q8L2f1ywbiINcij93FpPUxSJ22snT5+kTEBMOnm TfaiCBgDYvawhDco4vQp4U2iIJs1NIeB4TIwbFqqQz/pNkDoHiyTHh0VPvSA Dc1Mn4UJZxSfBcQKbwwWXMOjbiMIhY5P98LmfXnBL2CT3U4TLE7MJtjOmx5s R/hEWJGIKONgk6A8GpBGgCcAE+xCEob4JCGfGItXFMbWnZa1Bt5C6ALfMv6b hH2ioIcfcPPCXmE6pqxOmRdqABPHbNmOB5/HhadZMs6VTfNVwIt1vmqeKxtn i/rdDUrwosZuWqskqD5C2ASpBJ2b2KyqnXW6vlU3ye7tGcEflTayWOoZCZa0 FFJLy+ppsIm0ursuMfZkbKFgFCWkkVHhmy1iK4nBQ9jywjl1M6eeyapm89q5 KR1865jJa6tpdSmpzEUkwNuwgx128hJ+ScwrhC9ej5nhtXPcVrbDjHnfbqLb jJNY4VJPs2I/HICvPqbLwkY28bsVyZglGjTEQsZU1DKVdtaLQYDGbC260Igv ziSWmkm8MjK1cWV6dSm7PJdcmIkDVWYqwWrBC3gBwmQT5mREHwtqogGgjSrk lwV9Yp9H5HEKXHaew8qxWzhOGw/ONjPXauIYtXSlbEIiHAF6aEHNehbwBGDC Z/dBBJx+IXcAYEIZb6NTLrLpl+COGL6JifsNqjEQlkk9YdVRfHY2qptU86b6 tAVbTLhgrU2ZGzlTM29uAE9S2nJcWYzK4w6WXtCpYrVhYZ5TMc6oGKeV9NM6 0McDMbDOGdltRvxs4pzfCb/dKu50gU30o3H7ZDEkbma0l8uOqw3v1nzk9krm k83pTzeLn2wUP9mFSWtayygt87vqX9xqfAnWAJtgMFn80+dLf8BUggXufH13 7ncfz36F1Vxmvry9N/d3J4zdg8+MVWoq2Bl+r2v4XiqgD2xhYfy3wLZZxH8V gAjdhD8GPr+L8EtrR/yPPfDZP/aP/eMnfZQ1F81DL0rOPwLBbfJbcdsBZBO8 dPI4sQ+j9NKrUVHH3bIBYAI8uVPSgE3WElzIepKzkeYATLay3Gs5Hijjdk4A NlnyjMUFJ12Uw5hNNBfn7EMrAfJqkAI82YwxriV2NjS5tpvtOOt6nLUVoa/5 KQvWwRT/pHXoZYCGvO2xB+dxPZQnuFCIDRl3ZnN9Y5PdvRfR9ovSC5hNsDoR bhNh2yOCtkc4p0Alv+Kc+RX37K95537Dbfst9/xv7WMvFJWn5q3dc7beGWtf 1dRfMw/W7eQFP3stpb42ZdrIGleSoAzDYsaxkMYyn7ITmU1Ym3ELEkojaqpH wCbGWkTZiKpnI4bFmPVKzLUe82zGvdfjtlspy/WIcNE6WFGemBK/nhcd8k+8 4BvfiRfLS1hIh4AnHvKrXsprKD7q61raMRPnhE/RkbFPTPkYhbAg5qQnQxK9 cmRk6ERHx+ELF4+cPv/WmfYjSn5/xAWDfw6a/I82bUerKgE6QBkyTreUfQnO cm4PIoZRPgbiQK3uKGhzZ7iD8+QhMCFsguom6PfCf2bODNhYQTsn5OBCwk4+ /GHwxgRh2CEK2YVBmyCAwUQYtIpCNownIbs4tGMTbDHhsBsGljs/Bg+4JF6H yKrDhtlWPWYTPPTdXU4m7SYaUonDDBdUj47shWjGHLI+E/cC2EQ18baRfMxM PmqdeB23yUuW4ectQ89ZRw4RsQzDzZfgiwUCnN+b0eeMY88ZxjCY6LA8rx19 QT38nGroWeXQs4rBg/LBg7KBg7J+rCyiAJ4gmwy8pBk6BFENvawYOCTvPyTt e0nc+5Ko50Vh9wus3iOsvmO8off4wx9wh0+QOo+cPnzgtad/9s4rv23/8NBY z3tsSruU068U/v/svWdzXNeZgLkzY1uRpCJzAjMlihFE6gYauXPOOeecc84J sQMis6hgW/ZYtmXJcTxVu993v+7+l33vPUCzBYK2ZqZq7A849dSp07cbQUSD ug/fRLPqmBYt3aii6BXzWtmsVjYDu1oyrZHCYQ4uwlMmNc2soZvUdKuO5TTx 3BYBAAewErOGAdeNKppeQcF6Akvn1JJZg4Khk9HVYoqcPytikfh0Ipc6Bjsg YIwjhMwJQCud00imbTq618rzWLg+KxfNzsPiIE4+ZiUuQcLNT7r5UQwBEPMI e6QCoKtS3FZE2MxHJw+IuURxtxjJLPaGweMmO8NN8KmLGDE1UMgYi1kT7EA+ bcCsZJcsric7bpLQpmM7UztxScEAN8H1RL87zROb7IkN90xoUshNEi/cZLMV xKaZ7BS/e7dwNlecWy3Xw67v0Zr/QQfcxLmxZG9VDDtNtIrafd2kl9DVE5N+ N1ndLSF5UXLyimL29YZ+vaED1uogJrpOVdupAPo+DJ2d6SfmtaoF0a3snNdr 1o26bbOBdZPeajqA7QVnt2btVq3YXrOt1e3dhqPTcGJJgAlVMa7ORRXJkCTm E4bdfFCPqF8eASPwSsFE0O8d/ALCGa4nw+p80ljN2xcqnuWFWHslvd7Jb62X HmxWHm1Vn2zXnj9qPn/YfLZdf7pZe7JeedQtPewUV5vhpbq/WfFU845S1lrK WMtZayFtziWNuELqUhENfOZ4SBUPyWIhaTQgATkKuoUgRKBFAbcI7x4mcJi4 BhVFKZqSC0gCDsGkZcSCmpBXgWIlGrBpXFKQm/BYo2L+hFw8rZVPWrRzbgvD Y2UCQRcP3KSWN2P1Jk1vdykAtBd8qw1Pp+bcbHo2Gu522dqtWFcLxkJQ5FJN WKXgJsNWQDSIsIOevASmJ+Ihj3TEJx8LKIkh9URYQ/KpiAEtKWElZ5wM3E00 23Xns1b4s7X4z7fzv35WQwNEfvflyu/6Wgf36FWg9KInf/x6Y0/5yV9/9/A/ v330H5iVPICHf/7NFlzvTwbrBVx69fW9uMwe4KlenUvvY9HnefEN7Nen68BN DtbBOlh/dyE3QYlMqvs/ATfB8pqG0PhFEJMjYCVoarxh6lxBR/pty/3dmh/0 ZK+bVDA3QXry06L4F1U52MfDCD2vuAVukpHeWLaNb4epSExQRfxXFdkXBRHw 5S4/zYt+lhd9mRU8T3KQmwSoZ2wT75vHjvxAMQF6s+B72VzfG7848R4SE+PY Yf3oIR3G29gERjCy4bdUw2/JB1+T339Ndv81+dDrgBQYft0w9pMk/1zXSXgQ mlvzzXS8c2t+aifA3ogKn+QNXzZcXzY8z0rOhznbdjmAfGSrHADASnogPUH5 XbibWLt523retZX3P8xHnuajn+ZjX+a8Pyu4v0wrt73zy8abTe1AU3tmfzfh nI5zzoCb9OOTfOKV3vLL78X04xEDySYboRJO0qcuTdw/ceXCmwPnXr967b2b d04RSB85DfRy0oD0BG7/kDUEbFyPiQlmgdwE5WiBa8BFNIoCfATsA17QE5Oe myCQmKDACnITVA7fG7+IvlAqsOMmu3qiyISUOwTVyE3SSEn+626yqyffc5Nd PcHcJOHG9CRipga00+AmaC68l3vNx70aYA8EmGcDdJCR49hcePopHxq8iKbA U4ET7v3iJg4aWMlxwIFgnHAwTlpox8yUoybyMQP5qG7+Q93cUe3cUROOef6Y mXzcTDlpoZyxUM4ZKWeN5HP6uQHd3IB2dkAzM6CeHpDMXZOQP1Yz7+q4Q3r+ iE4wKmPe45PvSBhDagHJIJs3Kqh6PPkKHARMRCWeAnAlAT2Z63MTslFF7bkJ mIhNz3YYuWAlWNm7mg5KopOTe1aiEs8oRdMmFcukYoOeqERkGW8G9ARkRMqd FrMn4QxIOFNwhosayaxCMK6Xz/ps/KhXFvfJUF5WzA1+IQQSHlEKHMQjQGKy R0/ASgA4RFx8sJKgnROwsaNOIegJUmYsDxCPmOBuIk+EdvUkirtJylBIGwt4 vUkeQ4/IJbHQCZbZldBiYMldr3QTRE9PMnjcBPi7brLVcj/oeB6vBwBMT9qe rRVnezf2sbpbbILqTfatMem/gljtq3AHPem16tqvCbBxvWFYa2Dz4js1cBNs jnwv5tKpYsNK2mXjaglrvbVWs+JY4Nyt4sDFunW9bkVX1hu27SXX9pIH2Fxw rTednbpztWpfqdiWK/ZG3lRIaFCLgGRIFgcpcIuDOOAmWHAkrIY/ukLKVCs4 VhqBtZXYVif1eDP/7EHp6aPq44fVB5vFzbXcg/X8g7X8+mpqpRFeqPhrOWc5 bS8lrbmYCX6vk0FseA0qJdvJ3wur4n551CeNeCURjzjsFoXgV9sp8NqYXjvT 7+AEnFzAZ+d6rRyPhQ273y7wWHgWDVUtnpTxiCL2KLz/Q26Z1ybUK8kqybRB SYEraumMhEvgM4a49PsC5rCER9TLJu3aeZ+F6bfC31pMeDcmA5JGzrxccXYa 3rUFPwCHVs3dKtvX6661mhPcZK1qW8kb0h6uU0n8n7iJRzEGbpKyU3NuFrjJ Ykq9WcXiJuAmXz0o/PrT+m8/X/jdl8uYm7wkJr0mXcgLkG70TAEOoCF73ASu /F032ddK9kRn+tuC7TYH20Sf9s+7jbn+0jexETUf/kff+Bysg3Ww/qnXipXg o54EN9nVk9dRvQkqxNCPvgNWYiS8D5hmBsqGqW/aWCE8cpNPC2Alis/LmJug nC7EzuySguhBhAZuEuVdzso+WbQStkIU5CZoygm4yed5ISo/2Rl6AmQxPsPd pKq6G6SddZA+sBD2D5qYiYdfpl9MkJUAzumjSE++7yZgXkfwmprD2uHD6pFD gHLoLcXQW/KhN2X335AOviEefF1073XFvX8xj7+Zk1zpuic2g/NrfjK4SdvP 6oZ42yn1ZxU7uMmnFTe4yVafiSDAR/rd5EXopOgA1grejXxgOxd+lI08zkSf pT3Ps85Pk7J1z9yC8WZdO9DQnv3bbhJlnwEirNOAi3vNxfvIKbjhV9xP2+dr UXHYNE+88wHh7tFb19+9cf3dm58cu3X7FHH8utvEBDfJhlVYhhWe/9/vJmAZ veIRsAyUlAWKgdwE+cjLID3phU6QofS6daGyaNSmCbkJ+gdzHPkuCtxKVP89 N/E5RD6HYFdPdtwk4AZ4u3qCu4kL3IQNbhLUz3gVBHATM/Oal3fdx70W5FwI sM4FGacD9JMB2vGdKng6XgJPO4FBPeHEOL4HG0A7AdjpJ+3003bGGcBEO2Wk nDSQT+vJJ7XzwAnN3Akj+YSJjF00kM+AkhgoAwbKBT35kp58WU+5bqTdMNFv mZl3zax7VhHRJpmwy6fsimmLbNKimHFqaR4j26qmaqWzasmMVk42aVhWPdeo wqIegEFJQ6Khkc73ZiPCFXgKtxKmRcsEHwErATcBQwFPMSip/W6C9ARDTAYr UQrn5fxZUBJkIihuAvBoBIBLHQPY5Lty/rjDwAQ3gR20F94tO3riEiA9Se64 CfgpRr+exL3wlhDCQ7gecnBBTICIQxD9vpvAbSrWRjggi+/qSTKqAtCUE6yZ MA7WtgsHzjsDUPB2XrlXu0lPT3rRE8xN4qp93KQV6LXk2plm0vaAkjzZCD7d DMH+sOPdXnWBNbyoVQfRKGiWsZmY2v5wCVKVjaqxFz1BdPDXr7wcOnmFm6w1 jWsNU7eODY5vVw0v6lAqpt1eYVjTtk7VivVqq9vXMBzrDYxW2QK0K9ZOFWvj BjKytejeXMTa5K41Pd0mVmTRqmNl4PWCpZTGKtcyMTXoXiFlLGXMzYp7qeZr LYRAQ7a76SdbhU8flkFGHm3kAHgIPFzPbraTrcXQcjNQKzmLGTN8YDFtBovJ w59/TJ+NaIFcSJMNqdMBZcovTfklQBr7a0ES8whCdo7HRHMbqW4D1aWnOPVk p47s0M1bVVM29bRLDypBD9lZUfildguCdm7Qxo04BTG3OAJ/G5g4djXVrmNa tQydbA48RcweVQpJJhXVqKTAQcTa6QoiZA7De9gkn3brKAELC/CbmWE7N+UV NzKmlZKjU/OsN3xrDV+35mlX3atFa7fqADpl23rNDm6ScLIcin3cBGnIHsBK XsYlGw3qJtMOWtbNzPt5zaQSc5OV4OfriV88LPbc5Ft8Lvyr4iZ79AQcAVkJ yAgSkx7wsBc9QfTOSC6AnrD8XXqag74i0HMTVIpy4CYH62AdrB++li1jIeZZ /dhbKK1LOfgalta1Uwj/PTcxz16omma+7fqQm/x61f4sL8PdRIG1Ai5LPiuL d/p04flavbhJXHA1J7+JauGfJtmgJ6jqBF6zr5v8NCf8PMV7GKDsuMnkh1bi Pr25kJuYCIf2sCdussdN4HrPTeA/TT/6HtYeGa+p0Yy8ox55RzV0WDl0WH7/ bdngW9J7b4ruviG8+7pm6N+U9/7VSjpcVN7oeqe7PnLXR+kEMDfZiCue5E2f VZ3Pq54nRefW9wMlyEf6PWUnaJJ1reRsK1l7K+Nup33dZGAjEdhMBJ4kXU9T 9idx+ZqH3DTcrmou1nUDCdaxOGOHGMYJANwkxj7ds5Iw8xTgxtzkupV9zci8 6hTdTVjJNumoUUrUCMdmJ64M3Tk1ePvU7VunxkYvO/W0QkyLrCQTUqaDCrgJ RG4CTtHvJvBKpBXgF0hb+gMl6CHykX436YVO9rgJCp0k/aKkH3bJLrKdGvmA IuWH+xPlf8NNfHasprvnJn6nYLc0nt9zk6AHDtyYkxOzs6MWWtg451eNg5sY 6Ve83D1ucgLcxEU/6dzFQTsB2KnH98VKPY1BO2ujY1jp56yMASP1nIFyVkc5 qyWf0c6dUc+dVs2d1pLPYsyf05LPaykDWvIlLfmKkXnTxLpl5gxaucM23phd MO4UkswiuNUhOUAP1fMm2bROPGVVUSwa0BCqHoRCSderGDoVU6sAv2Do5TSd nKqRUtQSsko8j9BIwDhAPWhGJcOkZpk1bLASp4nnMvNRQheoSn/cpBc6AcRs EoqP9AA3AUOBg5A5gfSEQxllk7G7Ox5tUMwesWppYbck7BLCTxz1BI44eFEn H4i7MCWMYLxwk35DQW6CErrAUCLOfdwk7pfFgIAM3AQjogRyMU0+Dje62kJC V0zqSykDUEwaCgk9XAHQs3/bTfboSTapRW6SS2pqRUtn0fewG9tqh7Zavcr3 nTGLDzpYNheICeJR1/+g5QZreDEeEblGQQPS0asreZWbwKH9/aAJJib1V+Z0 dZpmRLthatVMqzXjatXQqplbNctK1bJcMa9ULKtVa6tma9ednbqr23CBdGCt 2xa9G4s+sI9OA7+INXPzwg6vWa7alyr2xbJtoWRtFC1gJTUQk4ypnDXXCvZG 2blQ960shjqrWFjkwVoGAWdwkPXVONBeDC9WvfWis5q3V3I2PClLX8zoi2kd /HlmY8p0GBxTnNhJ7JSChqR9krRfkglIo3Zm2EoHIlZ6yEz1GebdmmnXLk7V pEM1aVeS7IoJu4IEB6dqyqOdDRipESsz7uAknHwg7sCxC2J2fgSbqiN0GbF5 kRL2iJg9rOAT4awRk2TcUQFjUEAfFDLvy7hjWumUTTnr1VPDVjYQNDMjNk7K I1rImFaL9m7VvdHwAWs1T6fiWi1akJuguMlyTv9KNxHv4yZuyXBPSbyy0R2U xLBhOmmjpBz0jIfdiCte5Sa/e0WS1Z7oCUrlQtKB9ASBxKTfTXYbDu+wx1D2 sCfOgkItvaf63eRPeFF8L3TSP+XkH33jc7AO1sH6p14t+3iMe9FIPAR6AigH f6K6//puIfyh/pwu6/ylumXuuzU/mgsPbvI0J33hJiUJWMmnRSGAFbnjoLhJ QngN1cKveWcfx5nITWDfcZP8i9d/mROCmPy8IP4izX8UpNbU90L0c+Amr4qb vCwmQK/epL/kpN9NUMkJ6Ilh7H39KIZuBPTkXc3Iu+phcJMjyvvgJoek996S 3H1TeOcNwZ3X9aM/kd76P+R3fuQhHytp7qw4p9ueeRQ36Uakmwn147z5ecX9 Wc2HUrl62Vw9Jem3knbGCTQSJqAZty1EnUsR72rI2w55H6e8T1LOx3FF10tp GO+WNZdq+gv7ukmUdRLoiQk6eHnXXZyrdtY1J++TtHlmu2JuZ3Uyxm3B/I3h m8dvXD5y98bxobvn5mdu27XUfFTT7yZwRvUm4BR73KQXN0HpXmAf6Nn+GhMU THk5pwtNYEQlJyhughcRCHF6eoKJCWoqi1eaKHFUeL2J+oe7iRd3k1092XET P+4mu3qCuUnUgblJDG6BDDu18CbGVc+enC4qltPlYpx0MnAxoeNiQjv+Kiy0 s1baeSttwEIbMCPoF3Tkc9r5s+r5c6q5s8rZM4oZnNkLGHMXlXOXlPNXlPPX VeSPLfwRm3DMJiDahONW0YRNNGkTTVnl03bVnEM1b1eRTfI5g2zOqWcblTSD km5QMw0atl7N0apYagVDI6VqpTS9nGFQMAE4wEO1mKKR7Fw3KrEELbOa4zBw kZh4rEI4oNDJnpwupWgaG7PIn5XxZlDEBPmIgDEOPgIywpi9j6BN3yOTbpOG LswSr8wSL1OnPpJwRs2qOXir7Ix3t3MBzFAcXCyPDlePPXqCxKQfeBZL6Opz E1QFj/oJx3ZDJ4kwpie5iDofUReimmJMV0roK0lDJWksJwyluL4U1wHFmBYo RLWZ6N93E6Qn4CaZuAr4AW7i7Y+bPOr6wE06++V0dXbL3rvfHxDf/xDR676F Kk3Wm5aNBeu+btJuWhCrDfNK3bxSMy+DmDTswErdtlID7Kt1Z7vh6oB3ND1t RMPdwsEEpGhpFi2gIXBoFMzVrKGWN9ULZlCSRhHcxNYsORolR2sxuN6KbXbT WxvZrY3cg63iw+3Sk63i4838djfdXY4u1Xy1gqOYNhdSJrTDH2k6qk1FNPif uSIdkaYi0mRIHPcLYj5+0i8M2plBGyNsZ4ZsjKCFBoCShIyzYdNsxDwHh6B+ GggZZwL6Kb920qcledUTbtW4S0l0Kghu5YRLQXIpJtwKkkc15dPM+rXzQT0l bmWl7LyElRszs6MmZlgPn5ztNTPtGrJRNqUREhW8ETlnGHYp+76QfkdIuwMH rWjcAn/Xqef9BtAiTsTKDoGbWDkpt6iZNq4WbN2Ka73mXa97QVLaZWerZFsH 16s6WiVLt2IFN8l4eU7l+Mtu8nJCV39aFyiJX0EIqsZD6omAZiJinMHdhAZu Uo/L18rWJ6vB3Zyu2jdfLKKcrm/62nP9bTd5OdUK6NWb9JecvGwfez5qzwt6 VoKyv/Z8rR3wehNUbLJHUv7RNz4H62AdrH/qte6ZTgmvmsYP60bfxN3kNdSn a7cc/kUtvI18uWGd77nJb3A3+aKiRG7yvCgGK3lWEAC9TlzbISpYCXKTFfsE chN4FmV2gZvsW2/yVVHyZVbwOESrawZxN3llTheYiHHs7T2gUncQEKAnKUhM eiUn6FnD6Ad6xAjoyfuakffUw+8p7x9RDB6WDYKbvC25+5bwzpuCO2/qRn4M biK99S/qoZ94aKfqxjFwk5aP2Q1yW0FRKyjZSGielV0/XQg96Cs26RkKKn5H YtJKO4DVlL0aN1bjplrU1og4myHPctC7EvQ+Svsfp9yPE8quj1Y33S2Bmxgu 7usmYcbxCPMECpcgMQGCghtu9jUH65qNdT2sHFuJy6sBoY43ZJZMMKdvjN4+ de/G8Ts3TsyQPgF9gBs5bCgeHrMAwAuQgIBQIPtAAgKWgW41QTFAPZCP9J7t T+J6OaHrVfUmMQ8/7hXEvSKkJ6kA5iao3gS5SdKnSPqUCa8y7fvvuAmuJ3vd BNcTPG4CbuLA3CSon3HLRu28W1b2R27OVc9LtfAgJg7GSTv9BMJGO/4qLPQB C/0CbiUXTLQLRiqGavasEvORs/LpM7LpM9Kp05JJ4JJk6rJ0+ops9pps7iP5 /A0F+RMTb9TMJ1iE4xbRhFVMskmnbNJpk3TKribbVGSLYt4omwU3cZl4Jg0L ADHRqVgaJUujYmvVHJ2M/jL7uolN/yJu4jByUb0JqoLHM8F23EQhnJLzZ8BK wEdY88PUqbuzxE+mRj8avXNh7O5F4uDl8ftXJoaukoavTY99PDlycYZwGdxE xBr2WkFJ+PDGwN4z8EO3cZCeRO2cqJ3d7yY9PdnzcCfRyy3ur4VHhfAgJlHc TZCexMMKIBtS5UKqQkRTjGrLcX0lYagmjbDDuQS2EtPBdcTfdpP+0AnmJgk1 cpN6yfo33GS77XnY9e3J6dq3Fr6La0inb9AJnNu7Mxl7T62j6vXdEngQk81F 29aSfV83aTWtqzgrDety3bJUw1hp2FebztaCC6PpBlYb7vaCt9X0rNRdixUH SEc1Z8InH6mBQlJTTGlLaX01ZwQrWW1620v+zlJwbTm8vhrdaMc3O4nNbgro tlOdVnJ1Oba0EG7UAwtVX7PsrubtICPw5wYmkgyrQUYAZCVY0XpQiZWihERR HyfiZUe9nKCD7rWQAzZayE4P2mhhGy1ipwNROyNqpydslLhlPgp6YpwB4AAP 4RDSTwV1k37NhFdF9CgJbsWYS05wyYkexYRHOeFVTgIeBTAV1M7HTIy4mZm0 suNmVlhPC5iYHgPNpprVi8fV/FEFZ0jGGpSz7wNicBPqLTgYpSR4gVs9HzQy olYOEDIxIxZ22i1aSBlX87Zu2bVe9QBwaBcdnbJ9s+kBPVktmtsl80rekA8I 962Fd+yX07Wn5AT0JKAk+tUTKG6SdtJzPm49Ju8UTMhNfngt/Ms5XXtcA57q hU76c7r2BET6a0n20F/JgurlUV18fy38zvfQ5ya9KniU1vWPvvE5WAfrYP1T r+3gTF523TR+SDuClZyo7mOtuvqadIGVvGcYe98w9oFpfqBun/92I/DdZvCb juerBfOnBRAT1RcV1edl5WdF2fO8+NO8GHbkJk+T7K53Ji35OMa/AvuybXzd P/ckwQIxAeAF4Caf5YWfoaAJcpOi+GdF8S8qsp8VRI/D9Lp2MEg/ayW9ZyQc 3tdNDKNvAXvdZPxd8wSGpQ8r3kAY6yEMgJvgFw2E9/UY7+nG3tOOvqcZfVc9 8q586LDs/mHp4GHJ4GHx4CHRvUPCe28rht+QDb4uuvNjwe1/kw+/5aZfKOsJ bR+942e2/ayWj7UeETzLa37esD6qg5J4Nkru9aK7W3B28nDwtXOeVta9knEt pZyLSedSCg6uZsZaS1qqEUs9bF8Iu5fD3pWwdyvuepx2PU6qun5a0zJY0V2p 6AaS7GMJ5lEgzjgaBegYEebxKOtEBAudnOqR4Z+Lc86EuZd9/I/j+qlO0bq9 FFKIpnVKKoc+Spm+OTd+lXj3FJl4Ce4ecxE1ipigoAkQhvt5Kwe5CbwA2YfL QEe9tlBIBT3Va+HVG2jSK41HwENEf9wEDbDA3UTQ7yZJf1/JyU7QRIn6dGX9 mlxAmwWCulxQlw3psmF9LqLPgZvEjLm4CXZsunREj7mJTei18192E7+L2+8m GT835WFFLPMeFdEuGbQJblm5Hzu4153cay72RRfzgot+zkk946SecrIu2JkD Nvo5GwM4b6Wft1DPWWkDKD5ioQ6YyedN5PPG+XPquQHN3AXN/EX1HCjJBeXs RUAyNSCeBC6KpzBEOLyp6/zpj/kzNwRzN4Xzt0Tk2yLKHRWHoOVN6MXgI3MW OcUsp5jkZJVoRicjG5V0s5oJmFRMi5Zj1fEsOq5Rw9GrWFolEwxFr2arZDSl hKqSUdUyqlJCUYrn1VKKSkyGg0Y6r1dQTWr4WJZVy3YYsNCJ08gFzXEauBY1 QyudxxttzalE0zLehJAxyibfo8/cmhy5TJn8hE8flvFIavEsfCd6ORV2EYvA ow2x5u8y5+7Qpm/SZ25zKTcZM1dpU1dk3CGvmVFO6h51Es28VS8lufS0ODb5 nefHVAVzk6hLkPZLww5u2IEVCMCVCJ70hbXzcuPFKR5RAnCLk25JwiNJeqVJ 344+x31SIOaXoobJmJ4E5dmwIhdR5qOqYkxTSmjhq1eS+nJCV4prgWJcA9eB QlRdSpmz4CYRbSqsSUc0pbS5mrPnwUpAUlDtAxDVZaIgLzosAQwrZtHWi7bO on/HTdrBrXZgu+3fbvtQ3+BHa/7H6wGwEgArh+/6Hra97Z6b4FaC4iY79e84 KFzSKmhWC+pWSdujXdZ1azudtbBidqwTl3Vj0b657GzXLJ26tdOwt7EELVu3 YYfzUsW8XLWs1OzAchV2R6vu6i74ugvedtO7WnMvlhyNvLWGjYAxlXPmUtZY SOuzWMsyMC91tWBdqLpWmr72UrC7El5vRTba0c31JLDejXdbkdXl4FLTu1Bz VYuWUh7r1VzOm4tZA5bzllDnk4AKi4lEZcmwNBmSJIPihF8U9wmiHn7EzY24 ONgwHRsz7mLEnLSYk56Ag4MWsVGidiqGDaAAMTsVAz9ErOSwZT5kng2ZZhBh nKBxMqCf8GuIXvWYRzXqkY15ZASvnOhTTPgUJMCrIIGeeJXTfvVsUEcOG2lh Ix12v5nmMpDNykmtaEzJG1Jw78s5gxLmXRnnvow9JGXfVwsIWNBER/UZaEET I2RmBowMn54WtrCzfulyztIugYy4OhUX7O2Ss1V0rJSs7ZqjW3etgJtULEs7 cROiVTJiFQ9bxUNWfMaiXTj4spgAO52Ed5O7UE6XTzUObpKyUzMuRt7PayQU 3ZLlyUrweTf2s63c10+rv/184Zsvlr75Yvl3P2v97uftPXz3Vee7X3R//4vu H365hjf1xTv69gU+enUlqPAEpXX1krv2rYv/IW4CXxS+9B9+0f3jL/EvCjuc f7H2J+zhWn974T8BICa/3f7rNw/+0Tc+B+tgHax/6vU4Ol9W3wA30Qy/ph56 TTn4muLeT3Zr4d/BxeQDI+FDDPJAw0X5div4++3QbzuenzWMn5U1X1TUoCfA Z0X5Z3np85zk06wYzS55HGe2XVMJ4bUQ+0JSdL033wTE5FmKg9zkeV7wWV7w Oe4mX+Bugnp8/awoeRyh18BNGOfAJgw/wE16OV1ITH4IhvF39UQMHeFd7di7 6tF3AOnQIcn9t3fEZBe4KBs+JLz7Bu/WTwDl2HsB7vVl52zbSwaJWAvQN8Os JynhF0XFs6XQdtXTzdtWM5allGk5bWvlXAtJO7AIYpJ2LaY9O+TtjbSlGrVU w9Z6yLkYcq+EPd2w5UHS9iAub3spDctgWX85rz6bwtzkQyDO/DDGBD35MEL/ IMrquckLCpyjFdGZCPucm3XJKxuJ2LnltEWpYjpdSgFvanTw/PCt46R7JyiE cyAXOzlUQQUyFLj329dNQC7ATRDgKeAdcH2Pm/TSul6mfzR8rxYeFxMhchMc 6W69iXxPLTyISR53kxzuJrmQLhfW5yOGfNSQ/T5+h/j7bsJ/Vdwk42enPIyw ecalHLVLB+2i21b+DafwE4fgYyfvmoNzxc66ZGdcsNMv2FiXLYyLZvpFFAox kAd08+d187Cjblrn1dPnVVPnVJPnZJPnZVMDsqkL0qkLkskLkqlL4slLwsmL QhJwWTh5RTgFXAU40zc4059wZm9y527xyXf4lHuAjE1U8kga8axBTjEq6AY5 TS+jmjRso5qtVzJBQ0wajlnLteh4Gjldq2DAFYMae9YAbqJiycTzEuEc7Aop RS6ZV4jn1DKKSjKHiwnWPdiqZVh1TJuO5TRy3GaexyKA3aKmyXhE5txt4r2z 4/fPzYxdZszcFDFH1KJpo4KiFE6YVJSQSwy368WkKR835mKGdFhr0dDgKSFz iEMBN/mYTb4tYd9hz19lz13jU29I2Xf9VuaDVuy7X7b/87uH8L6C9wAaDQ8/ +nxY5dJRglZ2yicBDQnZOLCjJsM9dlp7uURJlxi5SconS+3Oaoy/NCY+G5bn Iop8VFmIqUoJTTmpRcC5GFcDcB2RCCiiXlkyqAJSITX8ajQKznreAYdCwpiP w7tIlw5rEgElZigRbSaizid09YKti7vJdge5iX+7A/gedP0A6tDV69P1qOt/ 1PGBVvTcBIkJVm9S0ALtoq6DKOnbJV27jE0hWSlpV4pY/ftKWbdawctMMDcx oz5aa0372oKj03SsLbrWFj3tpqu94O4serA4CFhJ1bZSdazWnLAvle3NvKWS 0peT+krKCJSTBkQlb62XnQs173LT314OrbdjW2vJR1tZ4OFmBs5rrfDqon+p 4Vloeht1d7XiKBbMuawhl9bl07psUp2KKVJReQbbpcmwGEcIxIN8DD8v7uMC CS837uHE3OChzIidHrJSgxYwDkrcTkk4qEDSSUPAOY5fj9nIiKh1Pmwlh3CC lrmgeSZgmvYbp+BXFQiaSAHjREBH9GsJPs2YD6xERvTLx4GAYsKvJPmw0Ano CQn0xKee8Wnn/DpyQE/xGiku/ZxFNamXjKkFwwruoIx9V8q8J2ffV3KHNQKC WT7j0tE8BobfxAjggKR4dJSQhZUPylslR7fq3kOr5mg3nGtN93IJ6zOwmNWl 3Bys3gSLmAzZABATwT3g5eEmPSsBMCWRj6HQiU9F3HWTnVr4jYrt6Ys+XS9y ujA3eYlvf95GYJLyVef3yFN29aRXddKri9/Dy2Umr/KUvYlbv9r40682/vzv 6z3+8ssd/vz1CyHao0j/6Bufg3WwDtY/9Xoap9R0tyykI7vz0H8svfOj3SZd 7+5xkwUPDbnJN13vT+uYm3xZ1XxWUmLNhAuYm4CYPE0LvwTRyAtBQLrembjg aoB5PiX+aNk2vhkgw0WU0wX+8vOyFHcTIXKTL4tiNOXkq4oMDOVRmIbcxDr5 vpG4fw/hfit50arrv+gmOsI7AHIT1cgRXEzeFt/biZggxPeOSO+/K7p7iHfz Dd7N10R331QTP0gr7jasE2tBykaYvh6kboSpDxOs5yuRh3VfO2tpxrSNmG4h YV5MWqthYy1qWUg6ljOelZwfWM76FguORtZWiVvLIUslYG8GHEtBVzto2oxZ NmPSVS+5br5X1F3Kqc+AmyRZRzE9YR2Ns44hwE0iGN9zkyLvWIxyJC26EpPe SppmtxYDn24VVWqWwSjUadlS4dT8xNWRG++R7h7VS0i9UAUa1Q03fnvcBPG/ 5iZ4TpdqTw/hH+4mAacE9enahQfsWwuf9LITbmbYMu/RTDgUo3bJoEVw287/ xM674eBct7GuWBkXrbQLVuqAnjqgowxo5gdUs+fkU6dlpNNS0mnZ5Bkpdjgj mTgtGT8lJp4WEU6LJy+ISOeFE+dFpAGwEtHkJQHpgoB0CWPysmDyCn/qqmD6 GsCe+pi96ya8+dt88l1wEwlzTMGdUItmdFIyEhOdlIJqRpTCeUCFJ2gBOjld L2foFThybAQJlrWlZmqUNJWcosYga+VkvYIqF5BU4imDYs6splg0VJuW7jAw Jcxh+uRHxDunBj96n3j3NI98x6SYLyWMlbSlnDSXEyagkjRXU5aYRwI/LPih VNOmRs5ay5jhAD87nYSkEhCU/DEB7S5l4jJj+iMJ6zZ1coAxfVlA+0TEuGVS TKYC0lxEWcua/r//57vvftlF7yj46QdxGckEZLmQIukVg4n4zcyIg4esBFXN IxJOUWLXTTC+7yb9epIJyVHcpBADE9kJnQC4m2DA9R0SBhAQAAQE3AQOuZi+ lDKDeYGbINBFYF832e4EtzsBAInJf8lNumVDt6RHVoJGIq7jM9zhNcsFzRJQ 0i4WNQsF9TI2tNGAddmqWlo16ype1b5asy1XrEs1W6vpwocA+rtL/vaiG65U c8ZiSpuLqzIRBerum44oiinDQsnRWQhst+NPNjIP13MP1nLb3ex2N7PdTW93 U1udRHc53FoILNXdzYq9WjCVc4ZiVp9KqpMJVSKuSsaVyagiGZElI9J0TL6r JKJ4UACAlaRCCAFGUJAGAoJsQJDx89M+XtLDSbhYcQczZmfE7dR+MUm56ABy k34xAYKWXcw7bgKEzDMh8zS4SdA4EdSPIz0JqIgBJTAexCAFVKSAGmV2kbAU L9WURz3j1cwCLt2MUzdtU5NMcqJWNKLg3pOyboOeKHn3tUIQkynwZR/4CG4l QTOz5yZhKxvcBBXCr9U863Ws3gRVxG8s+TaWfRuLXnCTdsWymNX23MQmHt5x E1xPUPrWq9wEBU16bhLST4GbZN3MQoC/mFJv1RxPW6HP1xNfPSz8+nkdd5OV H+ImSExe5Sav4r/hJthnBr7e/Avwqw3gP4B/3+Gvv32wp+ge1cj/8SCn62Ad rIP1N9fj6HxDfwe5iXbkDRQ36Zts8j4SExPxqGH+/KKX/rvNwLcbgd92PF9U dU/zis/LKhCTTwvyT3eDJuAmX+Ddt0BANvzzSdH1EPtCXnHrb7jJTtXJrpug /sM9N7FNfWAa33+UCerT1bMSdBFe/APpE5N3NKPvqEeOgJvgcZNDeNzkcC9u Ir73rmTwPcHtw9xP3uTdfJN/63XOJz/STx6NSz5ZcU+vhygd/2zLO9UNzD6q e8FN1gr2xYS+GdcvpaxLKVsjbm0mbIspJ3KT1XwAaBYd9by9mrCVwtZSwFYL OBZD7tWQaTNpfZBStgO0mnWwZLxSMl5Iso+Cm2CwjyXYxxFR5rEI83gYKzl5 QZr+ToZ1NMw6G+Bfjxumayn9w26GwSCy2BNEwkeE4YuM2U+Y01en75/QiifQ zR6qNEHniEsYsHGRgPRK3X+4m/TyuPr5b7gJipugnK5cQPOymxSixnzUiOV0 9RF0SfE2wpiYeO18r53rsXH2uEnIy8N6CHv5cQ8v6mD6jXNOJdEkHNSxP9FQ r6opl9XzF1Wz51XTZ5WTp5Skk+KJU2KsQuSMcPwkf+w4ICCcFI2fFU3gjJ8T 7iLC4iMXwUewWAmIyeQlPgm4DHAnr/Amr/KmrvGmr/OmPwI3YU3dYM/09OQO j3xXyiK87CaAQU41KugokgLAQSWcVYtm4SmjgmZWMS1qFqCSzkiFEyLumJAz KmKPCJj3efR7fPoge/4WhXRlZmxgbuwCffIKZ/5ju3oebvWbWUu76sWoeDo1 72Letpizwb6UtwNwWMjZ6mkDGEQmIC3F1LWkvpE2LuTMIRtHyR02iMfdeqpN NYun698UMW5yKdeFdDjcYs9dEzFuW9WzXjOjmbcUYlpwk//3//7us+0C/NyD cLMXVqZ8Evg88BlgR2LSi558302w8Yu7aV3SHTfxSqJeSb+ewNsmG1ZhFfFR 0BBtMY5VxCPgDMBFRB5P2QIrAUBDqlkbWAnsjYITAEnB0r1CathfETcJ43oC YrLjJg/XAj/cTVqgGyVjq2hYLRpgb5WNwHLZsILtxqUyqISullOX04p6VrOQ 1y8V4aJpGcvasoKV1AtmEJB8UgOkY8p4WJYIy1JRWTahyKc1xawO5GKx5mwt +jbhW11PbHeTD9ZSGOvph+vp7VZ2bTG1UgstlHy1nBP+w7H/zJg6g89STARF iZAoFRFnYpJYUBwFQqJYSBwLiqIBQdjHS0el2bg8F5fmE7JSUlHJgHgqKxlF JS2vpDDKSVklIasmpKWoqBgRFUOCvJ+X9XEyHnbazepXEiDtZgDIVvr1BAAl CeAELXMhy+wOuJuEzJMhEylkmAAwQ1ERAkpCUEUMqsYx1BMB9YQPx6ua9ChJ LhXJpcRwqMYdKqJTTbKrJqxygkE8ouHfV3LuaQXDNsWkWzvnN1BCZkYE780V srBg9+qpQMTGATdZzlvbZWen4kJ6stn0b4HxrQYftEMPVoOtqq1TtS5kNHif LoJVOoK5CSDcmWyyJ31rp10wnta1x1C8yhdu0pu9+HQ19LyL1Zt8/ayG53Qt o5yunon0+ANKqfr39T/hgQwslvH15p5OwohXNeD64Tld/YXwv/8lJkFYuAR3 k7/0ucmf+xLJ+gMoB25ysA7Wwfrb60Fopq6/Y544rB15XT/2lmb4Dc3wm3jQ 5IWbgJgARvLASoD17VYQucnnFS24ybO8DBOTgvxZTvIsIwJATz7L8gHQkI3A fFrycVxwtaq7j3K6UL1JL6fr0xz/+W5O15d4QtdPcUP5Iid8GKKCm4SY58FN sDAHbiJ72BMx2XWTI0biD0JPfOdlN5ENHwak949IgKEj4vuHAcngu8I7R3g3 3wY3Ed55W3j3TeZH/yq694Z59mRacWvJSeoG5nE9mW5lTBsl52bZ1S3YWzlb Jw8HT7vga+W9qznvSta7nPUhPanlbdWstZywFiPWYtBeCzkXo56lkHEd3CSj aocZVdtgwXilbL2SxOMme9wkwjwWZhwLMY73k2d/UBacivMugJv45CN+MwPu spwuZbUa8fs0POYocfDM/etHZoZOqoXE3jh41K1rj5v0Rr3/r7kJnmCm7PXp SvpUQM6/v5sUYi+5iVPyfTfhgZ6g+SZ7Zi/Cl455BBEnx2ekWqTjCsYt4ewV AWlAMAGWcVpIPCUYOyEcPS4cOcYcPsYaPc4mnGSNYbDHTnGJZ/kTA/yJCzgX +ROXBADpsoB0STh5RTR1FQuRgJJgSVzXuKTLHGDyGhfOU9e5Ux8BLNJHrMmP WdM3kJtw5+8A4CYop0svoyANwfREMmeQU0wKqkFGhrNeCsIIqkIxyilwRSue UfBIYuYYnzYk5o4AIs59IXtQyLzHo99ikz9W8oet6pmYm9fIGtYXvA9WQw9X Q62SfaVgwbGuFm1Aq2Rrlx2ww8XFrKmZ1teTulpCW4krckFR1i8oRaSNlGYp D7fTFhA6m5KU9vJaJctSzuDVzyk5dwX0G+AmnHlMT3Bu6yTjERcffrKoF1yn 4f+//vjp//mHp+2aB3zHb2YmPKJMQAYkvWAfOyMa+/O74k4h6Em/myAxifW5 CQJPSlSBnuQjmkJUi/sIiAnWp6uIU4jpMKLauF+BErrgl6KSsdZydtiRm9Tz DjijuAnct+8bN3nQxdzkQTeI3ATE5L/kJkt5/XLesFIyYVNFKpbVimWlYqln tQsFw3LVAiyUjLW8rpLTNAqGek5fSqmzMXkSBCEgjPqF8ZAESEUVmYQ6FVel 4upc2lArm5eajvaKf60dwmiFge5qqLMSbC0Fl5u+hZq7XnbUSvZ83JKLmDJY rZYhHzPimqZNh5XJoAwb8u7hhd2csIcT9XGTEQnWUCssgUM6KgElyScUtZxm oWQAgVqpGFdxVsoGPNCjXiiom1llIy2rJ6W1hASoxsXVqLAc5peCvIKfk/ex 91gJkPEwe5ldveQuAM/mmsfTuubD1jlExDKLpXVZpsBNwkbSrpuMBpSjuJ5g hhJQj/sBzQSA6Yl6woV19Bp3Ksbt8jGwBuyhesIJnqIg2mQEk3jUKiW61dNB IzViYcasrLidE7Iww1Y26Alyk6idWwgp+t0EicmDpdCDVuhhJ/y4E1lruNYb jsWsDvUQtklH7JIRu3jYLrq/77BFVFoCPrK32EQ+hnK60g5azsPC3UT7oOF6 2gpjcZPv53S9LCY9N+lZCWJfN3nZF35gxKTXl7jXqgvc5NuvOuBKf/iqg5eZ YPzpqx2+w2vzUXn+nsL8f/SNz8E6WAfrn3qBmywY7yE3MRIPgZj03ASfbPJB z01MlAvtMPe77RBWC9/1Ijd5lBY9yUqe5qRP8YgJchPUhutpkr3um8tIbySE 18qae4sWwpp39lGMAdfRfJMvC6JnWR7wHFwmt2soOJ/nBMhNwqwB+/SHFtJ7 +45Z7NW/9xvKDxSTnptox45oRgEsoUuJi4ls+Ihs6B3pUJ+b3D/Cu/UG7+br /NtviO+9Lbr3FriJ8O7r0qG3zLPH04rbLc/cRojW8c01IqrVtAnc5EHdt13z bVb8G2X/eiXULQXaBf9qzgdugiimjbmkIRsxZkPmQshei7gWYt6FoKEVM64n ZKtBWsU2mDdeKVkvpzg79Sa9nK4Y82iYgbHHTeLkt7Psoynh5bRqMGenlGOa zkJYKqVqNBwqeWh89MrU6MWZ4TOsqctK/iiYCGqc1Ru/COLQ7yaI/zU36Z9v 0quFf1Xc5GU3CYCY2Ptzuvg+B2/fufBhlzDsFIbBX4wMvYgonPuYQTjPGjvD HjvDGT3NHT3FGznJGznBGz5BG8Ggj55kjJ1mEs6yiOdYxPNs4gDG+EXOxCXu xGUeFha5wiNd4k9eFkxdBSvhkjB4U9c4pKtsjOvsyY/wVC4MJukjDHiIh044 c7eRm4BoqEUzyE1Q3MQonTMrKFYl1SQn68UzGsEkoBVOydgE3vwd+uTHtAn4 PDfgM0g49zXScZueHHLx8nFVs2BerthWq7blsmW5ZF4tm7s163rDDqxhc+KM zZRmMaNrlcydirVdssB5KYvfORdMKwXjcs4AV1aKuqW8ppaUVePShayqUzVt LtjbZWMhLChHRYtZ1XJBW4qIMj6OyzinFNxnz13jkj8SMW6JmXcUvGG3kYYP K8EqTUoJuCVWr1Y9f/71xtefNzs1Tz6sBBNB7YV7NSZ73CSOuwnSk0TPTTzi 6Pf1JOVXpQPqTFCTC2vzEXhvGIoxYyluKsWNcADgCiIb0eXw0AkICJgIKEm7 GUJWUk5bYIczCAvYCrxgXzd50EVuEkRi8l9yk5WiebVkXa3YWjV7q+ZYxUtF lqvWpYq1XjQWUqp4UBhwsTw2mtNMBlxmqsfK8DvZIQ8/4hcV0vpqwVKvOheb 3uWlYHs1stZNrHVD7VXf8qJnoeFs1OyVormQ1efSumxKm0nq0glNMq5ORFXx qDKJyb4y6VUmvPKEV5bwShNeScDK8Vs4ITs35ham/JJcWF6IKqs5HXw/CxXz St3Watg7C44uVu1iW1u0ry/a15pWfNiKqV3RrxTVSwXVYl65kJU3UtJ6UlKL ixtJSSMhqcfFtaiwGuZXgtxygAMy0hMTsBIEuojoeUrUQQMidmrETonY5hFR 6xwQsU6HzZMv3EQ9GlThqMdCakJQQwwA2gnArxn3qsfdSE9URKdyDHCpQE+I cMWtHsd21QRoi1s1GTKSY1ZGws5KOtjITQDkJjEHr+cm3aobBU22F4MPl8Nb K1i7tgerwU7N0a3ZFjKamJ2x101wPbHx7wJIT5CMgIb0fAR16EKhn4BmImqa zTjpeS+7FBIiN/m0HfliI/mLR8XffNbA+3StYuznJjtV8DgogIKXw+/jJv/D nK7elMad4Yz/vv6Hnfp3XEz63OTbvrbGvTnyiH/0jc/BOlgH6596PY7OL1mG LKQj4CYGwtvqIaxVFx40QVMXP9gREzxuAm7y7Vbwdxt+cJPnJc3jrOxhWvQw JcQMBbeS5zkJltmFuwloSNs9heImOfnNpmm0455+GKU/jjPhKTQa/kma8zTD fZbmfprhfdabwAhukuU/CFKQmzhmjlon3993zOK+tfBGwmHDD0NPeOEmKGiC uckQVvmO4iZITPBa+Le5N3/Eu/Vj4d03xINvwU6/Bm7yBueTHwnuvGGnnCvr xzp4UXw9pFyIadcK9icLoSeL4e1acL3kAzHpFDFaBazYZCnjXUi503FNIqyK BzSpgCGPu0kj6lkMm5Yj+nZUvBKi1ZzDBfPVouVSz03izA+jjA9RLXyY/mGI fjRIP9ZPDHeTGHcgLLrhlY3YVbMBh9BoEuYLfr9Pw6QOjd09Rbj14fzoGRl7 CE3H67kJAOIABgE2gRoC/++7SXp3LjxedaLNgonsV2+yr5vs26er5ya4mOy4 SdApCjrFYYfIZ+YYJJOCuRu0sQHGyBnmyBn2yBnOyBn+6Bn+2GnB2GkG4Sxt 7Ax19DSdcJZBHADohPN0AhwuMMcvsSYug3pgYZHJ61iIZOISe/wSZ+Iyh3QF U5KJqyzSNRbpOmsSD5RMYbESAMSEgbsJCp1w5m5hcsEclXMnVMJpnZS8U2wi Iat4EzLmqIg6yJu7w5m5SZ/4iEK4Qrh5YvDqe7cvHr5/7YO50Uty9phDTSul tM2iGajnDM2CcalkXiqZlsumlbK5XTGjqur1unWzaWsVscyibsW8XrOuVS1w Xi3ol3NaYCWvQzs6LGaUcFO9kFGUIgKgkZLBuZ6UlqNCOADLeTVchCuVtDrs YpuVk1L2Xc78dR7lhoR1Ty+dcBmwyTjoh5sNqyopYzWpf9JJfLaZXSk5qil9 JiADN0HstOr6vpvEdtO6sHvp77tJT0+wITh4i2l4t+QjBuy9EQU3MQPFmAlA VzDiRjCOuF+RCChTIXU6rAETASspJk1AKWUGPUGe8qq4yf/ETZpZfS2tKyfU +Yg8HZIkA6K4XxByc30OptNCsRnnrIY52G3GeZeV5rWzwl5+MizLJTWlrLGS Ny83fa2l4NJioNnwLTT8sNeqnnLZVCzosxltMqGMRWXRiDQSlkYjcJBFwvJw SBYKSoMBCRDFLE+S9MpwsPYCmYAiF1IVo9pq0tjIWLCMvoIdWK1hStJugpI4 1xad60uAowtKsmBbb1g6NWO3blxvwDvKuFJQLeeVSzkFRlYOLGZkiynpQlLS jIsaUUEtzK8GuZUAJ+Nh9EdM9tB7CitCcTHwpl50rK+XgxK1k8FN4nZyDAzF hoVOem4S0o6FNKNh7RgOIawjhnTjQd1EAMenHfdqJzwaMBGiVzvu0YCVjDkU owDuKUQwF6cSLsIrpwP6ubCJkrAzwU0iNs4eN1nKWVaL9n492VoIdBqudsPZ qTvhx7qY01Vi8rCFalcQdtxE8sJNUEW8A2/Y1esYjOrf97hJUEuKW+azLkbe y8HdBMvpeobHTX7xsPib53XUQ/hVbvK9EvhdSXlVvckPiZu8KnSyp+vXX36z /R+/2e4ldP3l31/kdP3x+zNQQFJ6vY7/0Tc+B+tgHax/6vUoMrdqH3XOfqAb fQPP6cLiJuAmRgIaufj+jpgQPjRTL20kxN+s+3/Tcf9qxfF5RQNishXnbsU5 2wnuoxT3SZr3NIMBfgHq8TTJBhlJCK9FuJcy0hvLtvGuZ2Y7TAU3eZJgwbPw GmQlIDLP8TQwBKpVeRSlL1kIYfYF08S7xvF3TMQjJsJeDKOgJ4eMYxgmwmHE SwKCYSAeAfTjOMTDWhwN4V1ATXhHNQa8qxx9B5ANHcHEZPAd8eAR0b3DwruH BHfeFg2+hXXouv0Twd3X+Xde4976CfvGj/m3X2N/8iPWjR8pRt8N8j9u2qfX Qqy6j78Ykazn9I/rzqdN74Oad73oWk47ukX/WiXSLoaX86GlbKiZDuZSunza kI+bK0lHOeYs+M21iGMlYVkIaVYi/OUwtekfKTuup/VnYpxjMfaxKOtYhHU0 vBMxARNBYnIc5wQiy3w/xfwgwb8Y4F/3SIczAWmrHpDKqALhLIU8NEm4NkO4 NDNyhkI4J6becKnh//WMrF+cC8piTl7CxQ/buUEL221gOjQ0u5pmU1EtCrLX xPVZ+AEr32/hu41su4ZqVszppdMG6XRvygkaDY+GLQIOHdWupSDATZDdIDdB 802ibj7eRvjFfJPdpmHKXTFRZ0PY3WYWF5MM1kMYayOc7bkJXnKCVZ1EDRgR A+4mAuQmaPYiiEnII8LYEZMdNwk5hGGnKOIU+kwscBPe7MfkkXP0sQH62HnG 2DnG6DnmyFnm6BkmKMnYeRoOEhPm+AV0QGfm+ADGBHZgTV5hki4zJi7Bzp66 gj2cuMSA149fYE2AxVxiky6xJy9zJi/zJq9htSdT1/jTwHXBDIaE/ImUclNK viGe+5g/dY1DvMgcPc8cPYHlkhFOM8dO00dPMwnnp259+NHJH10++i9XTvzb zYFDM8OXtOLZgE1cjEkbGdVSUbdSMqxWjK2KcbVs6NTM3bqlW8PmYmANaXHW Ksb1qnmjal6rmPDqbEO3bIS9U9S3CrrVPLiJdhWnkZQupOXNlKwWF9diIuxf wuPickRQAU9JSgF4CvZ6QtJMK8sxST4oiNhoFjlBxbkrY95ScO4ZpeNeEy3m Fhai6kIE0OTCikxIVknplkq2xZI1G5JHnFy/hRF2crH3g0eA59phV+JOQcIl jPVwY0NP4N0S84oiXlHUJ44HpEDML0kEFMkguIYqHVZnIppsVAsUEgas8h0r ftfnYjq4Ak/l48Zy2hr1yn02Ydgt9VoFcPBa+YmAqpAwwVO1nKOed1Yy9mxc m01os3F1NqGpFiydF24SfogRerQWeozzbDP2eD3yaC38ZD3ydCP6sBNcX3Jj 1eslI7hhLa3ORyXpgCAXFnlM4PVzRvmUQQZeTzLIp8yqWbNqxqqZs2rnHXqK 18IMwe+gW5AIy9BI+kJaB+RT2iycM/pixpADoUto0nFNKqZORBRprGuWLBGW xkN4nUhAFPELEdGAGK7EgpIYngyWDUkKEWk5pqgl1Y2MdjFnWC6Y2hVbp2bv 1h0IOHeqttUKvIX0raqhDRrSMK81LesL1g1g0bqJHSzAJpwXrZ2yrl3UtIqa 1bxqJadcyioWM/KltBz0pJmUNLDQiaAS5ldCvLyfnfUyd6MndPCRnI+V87Fx WPDUrrzQk6AnTlrcQcUAJbHPx+xzUdts1Ap/WU2GzaSQaSJgIAJhPcjIGBDW EyIGYsQwgbsJBgqd+MBKVDgaDLdqzKkYcciHER4VwQWSohzzqIkeFYZfS/Ib yCETIww/CDMjbIZvWFiPw2+EtV1yrFfdWw3fVtO/2fCt1zzdmrNTta8UzNWY shSWZDzcgGHOKh62iIbs4hGbaMgquGfh37XuRkx6QRMUMemVwL8QE0A/FTHP Jh3UnJddiUpW8/qthutZJ/LFZvKrx6WvP6v/9svFb75c/gbNN3mph/C3X+Hz TcBNsB7CeGHIrzb2jZvsG0PZ00N4p5bkFSNOesoDH4gVvANgKF9vAn/9evM/ v94C/vorrED+z1iO2TrWTBgrS+n8/qsOHP74y4O4ycE6WAfrby1wk7aT4CEf AzfRjb6pHXkL2OMm5vFj2E69vJWS/nbN93XL9cslK7jJVoK/GWNvxlhbcdaD BOtRkvU4xQbALx7FGCAgbfdUXHA1xL6Qlny8Yp8AVdkKUdBTiJ6MoLbDPUBb 4GUrjokw56KOcFiLqcc+bmIcO9zjhbCAjIwd6qEbOwQfrsfFRIcDVqImHlYR D6mI76oIGMqxHRSYm7wjvf8O5ib3jojuHhbeOSS4/bbw3pu826/x74CYvI6J ySc/gp11499g59z8MVzUko5FJbcWnLPLAd5KWLgSEXdTqkcV6+O6d6vsXk7b W3lPqxBczgUXsqFGJlRJBfJpfTlvbpQ8y5VgLekpBi1LKd9GzrUc0a6Eeath ymqIsOS7VTAPRDnHI+xjYdYOISaWvhWgHcXBxCTEOIkIz74Ro7yTFl2JSj5x iQd9JnomorXZZamUy2oW3b9z5srZ1+9dPTQzdJI9MaDnDXo101kvvxSWJRzc BDa5mxe2cTwGlkNDd6gZdhXdIqd4TWAlwoBV6LcIPEauXUO3KMkG6Uy/m6AI i8tARyA9QYbS7ya9+SZRNw8fv9hzE/nLboL+JRybt7g7eBFdATAxiRgQoCqI PW4ScAl33MS7100iTkHUKQS8RqZeTOLMfDQ3fJY2NoBryDna6DnayFnayGnq yCkG8SKCTkARE+wF80Mn5odPUkZP0QinGeNnWaTz7MkB8thZCuE8lTiAc55O PI9pC/EcwBoHzrLHzwAcOBDOsQnnYefscAag3PmAevcD1tBR/tgpCem8Yuai au6KaPy4hHRSNnVWOnVWSDornLoweePIteP/cuXov1w+/q83LxyaGbuqFs36 bXDPKa2nZAtZ5UpR2/sX+56P9LMOVDDWygZEt6RH/aPaBS2wmtes5NTLWdVC StYEB8Hzc+q4nlSjQgAOSFV6wIvrcUktBq+RZLwcl5qkYt+W0G9qBMMO7WzU xcsG5chN0kFJIaYqJ7WgJ7DDGa5EXNywkxO0swI2JuzogM+R5/VK4yNObDgj NpMRExNRzA9uItkBnxGfDCtTERWQjqqBfFIP5BK6TEwDD9FT5bQt5JKWUtaI R25UUiIeGdZ62i6K+1W5mLGQMIOVNIseoJg15tM6NBq+kje1F7zgJg+7EUxM OuFHXSD0BHxkLfxsM/F4DZQE3CT2dCO+3Qq2G86oh2vXzZhVJI14RC0aVgmH dNIxnWRCIxrXSUi9UKNNQ/aaWSh8iUKKKDYU8mAdGyJ+AbgGDoiGMBWVA8kI piG4gwjCPn7IzdmFG4YP8WGkIpJMTJZLKIppdSWnrxeNjZJpqaBbKepXS1gN /ovuxHUrHPawWtatlrXtqr5TM6w1TMhEkJLsAd5LaFBLuwDvGdVyVrkIYpKW 9945O8ldMVE5zC/g0ZOUiwbAAZQErgCgLXDG3QTTlt0KFAoAbhLH3GQ2apvB ErospJB5ImgaBwJGYkhPCOrGADiEQVUM4+AmmJ5oxwOacb+aCPiUBK+CAJLi w6aiEDyqMcCtHHUrR9DBpcAOsDvlQ7A7FBNO1bRPTw4aqUETLeXmN1O6dsnW KWPAYTVvXswYmiltMSTN+UVJeOuaaQH9nEc9ZZcRXQqiW0F0SkbtuJvYRfdd 0hHUKHiPkqCK+F7cJKSewDBOh82zMRs562PX4rJ2ybTVdD1fi/30QeYXzyq/ /qL5zc+Wv/nZyjc/3WcoPJoLvyd7ql8i9vQQ7s2Ff5WbID35G/NNetGTvwC/ 3kJisqMnv9rhP3rV8btPwflPv8RGn/yjb3wO1sE6WP/U60mM3HWP+6gn9GPY XHjd6NvgJr16k56bYFAvb6dlv1nzft1ygps8L6k247yNKAvYjDG34y/cBMxi O0wFuWg5J2P8K+AmKG7Sdk1t+OcfRGgorethlP4cD5r0GwqSlJ6bwMeCm2hG 3zaCibwEsg/DGBYf2blI/Dtu8v+zd1/PbVz5vuhH9oxtUWISJZFikkTlxJxz AEAiEiRA5JxzzhkMAMGcs7Js2ZJlyXE845k9e88+5+XWvU+37qn7dv+V++te ZAuiKM/sfWpq5oFd3+pa3QBpykTZ/dFv/dZCFZN9m3S8YxOAyYdswq0/xanL QRmp+Yxd/SmEeee3o7UnOXUnYcC6+ztFd7F/rHrZwVzzjIBQ1vyCR1OGZ/Ou +9PWnRn3RsqxMulenvItTAYyCe9kxBkKSSIR+WzKMTfhnI7YluPu1bhnxa+Z c4oWncwVN3nV1bpgvj2prMBtsh+MJ7hN3NRzhE2I3eEn2OcClDznUImVcdky 1pD0iB5tJnR6HhYtR8DtZZDu9TRe6K47x+q+JGVUA09cKnLCyY1aR2M2TszB C1u5Lh0bbAIwMUlpRgk12yZ2DdusoO3bRDSQDRNUN0EwIaonkOy9F4k5Xf8l m2Sr5G/a5GBC16/ZxG/hBCxciEPDUPG6h/tvkZorhlovUtsglRDMJm0VtLby rHlcmEqobfj8rs4KRmclnOmd5bSO0v20w+VFvJJyidlZCR5h91we7ixndZRh aS9ltZUcBMalw62QC8NtJezWkpHWEl5XOb+7nN9VJuguE/VWSPovyclVOkqV lnxJSbokH7gk7rvI77vcdfPk9XMnrp3/zdWSj+qu5w923xKN9dpNY5OBsUxE sDguwzb7S6shH7LJ1lEwIWwCMCFscuRDZnaybQIwAZ4sJ+VzUUnITNfxWzW8 Vi2/3STv95mGEx7RhF+W9EqTfslEUIZtjxhTE6v7wk34DIA7QB8+y4jXDB8V Nhg5gG8ovz/p62Dj+DBWMRGATZBQIl5h2CvK5gmyCagEJRlWAk9QQCUgEaeR a9ON2PWjLtNY0CkJuaQxn3IirAOYLKSc6/OB3ZXoyrwzM6kfjyqSETnYZA3Z ZAtsEniE5zEOEwh4BC4frPtAKMCTvVXP2qzFZ2VpJV3gEYCJRtwJY5202yAf MMpJFtWgQ0d36hkuA9NjGnYbAWLDxAD+4NjZxiaCocMxGoDPrX3EC7GxPdZh t4UFcZmZfjs77OLEvLy4j58MCCfCknRMPjuuXpjSLaUNq7PmjQXb9pJzd8W9 s2DeQeWPrOB7zR8OkATBZHNWCzbZntdjDJnXv5+dGd32tIbYR/IQT7IDn5YU Xj0BfYBN4Jx0Mqe8IxBkk4PSCfYq3ntChWA8sVDCFvIBT3qBJ4RQPDhMkE3w dPrV3RCcJ92IJy4Z8KTTDWNlF/AkO4RN8HML2MQqbtHxWg3CTou01yrrg/h0 VADIDPg0KJnw8GP20bBlOAhwNjFt8n6TuFvHb1eONMpZtTJmDUTHbTSMNRk4 jUYutvGihd9sPdjBhODJ2853/CbiCcAkoOz1awfAJmHzENhkNiLet8k2YZOF v98mRH7FJtk8+dCcriNz6M3/9j2+LNibrb98u4308ZfXW5D/+PYtTP76w95/ /nj/f/z0AAKX8M5/9oPP8XF8HB//0sfnUdquq9dDL9N0nNJ0nNZ05GKlE3zv RbRO17s2Ef+w4fhu1fJ60fBsUrwdZG8HmDtBCGMPrBFhQjChhJl7viGgx6ql J8y9ERy9lhTdA5sAVbbd5GyboPldKKhHHlSCTegKMeBtK2asbqLpKoCoOvMA KYeiaD8NUeL6UHbkopuH5nShm5hNOvMPpnLlyrGiSa60vQAiactHKhG35kOO tMlow+mR+lPs+hx23cnh2s9YNZ+yQCh1J/E7OYx7nwzd+mi49qS063xM2rJo pW76uOt+3m5c8ShjfZCxLSeN8zHDwoR9JeNfnA6kxt3jccf4uCYRV81Pu9Ix y8qU/8v1TMqlH9dyJ7XsGQN5wdS9aKyf015LycrAJgRPkE38zAtgE5wnJVi5 BIdJcLgiRi8IDeWHRi4H+PfsgiaPgTk/ZaPR2mi09vbWG5crcu5dy++qL+6p Pz/SW7X//1NeKz6TgR6xjETtYxE7z2vkWJUMg3gIAkJx6TgeI89r4gFPHNoR C7wkHdSKSFrRAPE3wKjfBGEEgmyCaigAE7StPLIJasD/b9sEMeSDNjGPHcCE Bzbx2seOtIkPfhIzB2JX05VjXay+mwNN5ZTmisGWyqHWCmprBWETaksZtaWU 1lpGx+Z3VTA6KpgdcL+U3lbGaC9lAjo6y4e7y4d74HyR1VnB6igd7ixjd5Wz O0uHMYYUQ9ht59nt50faizkdJdyOElFfpbj/orgfzpWSPkiFpK9cPXgZoiJX yvvLZL0XZD2QEl1/pbavQt1Xqeq/KO+7KO6r6rt16ub5E1fOYDZpuF0w2HdL zOuxGkYm/NyZqHBpQr6O7yeO9iX/gE0OkwTlUNEEspSQHsmTo6on8JJgPipa SsjgmSpiZVqk3T4DHeI1MQMWdsTBi7uxBoeJoCLpl02GlGiBXxiko5rxgBzO i1OWpZQVbsLHAz4tARM7eGATrHRiB9VysboJThIimFM8Isih6glIBJuXlRVw yuyEbSKkjXoVYBOrlg1OgXgs/LBbBip5tpv65vOlF4/nYLC3GV6YsU7GVVMJ 9WzKuLHkfrobe7QdBJ7gMNm3ydPtwPt1E7BJ1DPmNtFdRppNS7HrBtHZrCSZ VSSbZtChp7oMNKeB5jLQ7dohIg4dBCxPDdjZQQfbZ2V6zQyvhem3DYccIwHb MNyHQcTNBYwk/ALASDoimYnJ5pPKxUnNckq3NmPYwPeL35gzQTazxtvvwQTZ ZGtWdyjbc+8ABHhCVE8OZ1a/N6vfOaieYNvcT8hRwCkooJWlhATxBCSCz+xC 07oYyCZE6SRrZtd+eQUXylDUNhixYkIJWwZC5n4QCgqyiV9zUEBRdiCb4Dzp OeBJl1vW5ZR3ECFsQpRRCKRAzMJ2i7jLLu2xiDtN2Bje1udRk13KAaukyyRo NwraTcIO7FVRl1HUBTZRjDSIaXcFg7cgPNJVIeW6knHPwGkAmABPtOwaG75K MFqVC5EEVUyyiyZ+RQ/YJKAjBQzkiIU64WaD8TfS+vsL9s83g1/txV49SX33 fO7HF4s/vVj+8atlJJFDyW42/3tscqhW8qH8zb0XkU3+QhRHDtYQxuZ0EU0o WaUTQArkn/3gc3wcH8fHv/TxPM544Bvwsyq1nae1nblaeHrHbYLzpIBYQxjZ 5GFSAjb5dsX8zYL+cVK4FRje8jO2Awxkk/shOuIJoIOwSWTsZohzfVxcvV83 8ezXTQieoMCYcAoM7vup8B2WzV2Bkav63iJdzxlkikORtZ2St59GIW6+32+y b5m3bSa5so5cacdpSXs+DpN8pBIxWkD4KJuw63NHGvLgzKo7xaqF5DBqTuKD U8N1p+GSevcT2t1Ph+tP6ymXYtLWRTt92TOy5OWuxeR7adPenGtn1r05F1jJ eCciRpdVbNBwovhCoAtp51LK88PnW//rrz89nR8Piqh+fn9E0JxWNq+YGlZN d5b0V8OjF4JsLAc8uYBs4qGdRxO6EEwwm9AKIrTC8GhVSFjjkXbEnPxHmwmr TWq2iGVSen/Xrc7GioGWCnJrObOzEmCiGK5Tc5os0l6nkhKzcRMuQdTB95m4 YBO9aBBsYlOycJjwfWY+8MSl51hVTJOcqhOTIUTFBDXCowYTZBMEE7uWgWDi MY2ATYjpKwHb32sTxJNsmHzIJtgCwlk2AZh8yCZoTlfAwt2f09WPzekCm+A8 KR9qAZKAUMrBJvSWUnpzKXZuKWVAWi8w2i7QW4vpLcX01nPvpOksvamI0XyW 2XIOMDKCYeT8WGfxWGeJoOuCsKdU3Fsm7S+HqCiVRNRYKtSUcmnPWVnvOVV/ sYZ0QUe5oKeUQjR9WLQDler+SnnvRdlA1WB17t3iE1X5v7le8nHTrYLB7mty fo9dz54K8MAm8wnJMjwfHpROQCjv55BKEEkImBA2AZjAI+X7NkEwIWyCMhcR 7icqng4KwhaGVdYTtrLjTm7EyQ3asMJH2A48EY/75XGseiJHy/zur/EbxKgy P2FeSdvnx03jAUXEKQxZOaGDNnks+Jwu+MCEnGMB5xhSCVY08QiCbiHiCdgE 8QSSXTEBqsAdeGk8pAF3gD5WZ30RjzzolExFDTAIuaQLUw6AyV9+evzTq62n O1Pba0GwyRTW4oHZZHPfJqFHmEqC+zbZDoBNPt+LgkoALAATcMqDdd/GvA1s 4jEzgCdm1YBFTbJqyGATk7Ifxg79kNNAhcAduIQBEAbeCQbxWVnAkKBjJGhn BWzMgJURtDEjTnbcyx0P8NNRSSYmnU3I58dVi1Oa5bRuNaNfmlQujisgK/Cr nAZ76tangRLG7TkTnDeBKtgdsKoWL4Jg2Z4HaOhxaxhgjOiRnexJXIRQjoDJ onFvzoBsso19rrCZXaASGGDjKeUaLhT0KYIzfIrSfg6avgUBiaA5XcgmKPir qEF+v4YSs1FjdowneMgRKwkJJWjq82HzuDoD2i444wWUDp+qK6Dp8ashvWAT nCfYpicH87jaCIxAwCaomEKwBXsbtgEitgSxXdxhwVva4YwPWk38ZiOvGe35 bua3WCQ98J/N/dIJu15Cvyei3pHQbkuotySDN2XUW0rGHRXzLsTEbSCWCyY8 gmzilXXtqwRFRwoaKVErbcIzAjbZnDY8WHR8vhV6cT/+zdP091/O/fRy6aeX yz9h/SaHYQL5lSlYR67TRcDkV7YyyV5Z6xB80D8OK6N8v/vvP+z9FQ/eb7L3 P364v99ykjWV652N4787XkP4+Dg+jo9fO75Ksh4HKIHhiwATXVeerisfrSFM 2ATtC4/6TR6Ny75ft79ZxmzyIMbb9LPAJjhP6LtBOtgE8iCMlTx2vYMgDsBF mHsD2WTJ2EnUTUAiCCZogKhClE7gDsAEvgNwBmwCMIHIO3PlHYcjbTuFpf2U DHjSgfI3bLKPmo7TmE0wleShiFoOcrRN8tkNBcP1+czaXBR69SnavRxWXd5w fR6MB29/OnTnMyb2zpMqUllY3jrnYsx72DMezkJItJTQrk2a19PO5ZQzk7Am g7qIR+W1jToMLJeB69JwM37z9njAzmPoB1sMgw12xu2kpHbJWL9ouJlRXwqN vGOTAG6Tg7W53k7oApvE6YUR2hmQppd72y1pH/eKnz9I8/iUAVJDR/ut5rrK npaLA60VPfXnmV0XUd1EyqzV8trc6qGFmGYhrp3wSrxGjkVOB5uYpDSnZsRn FvgtwoBV6LcI8NLJsEVJx2AiIb+/Qle2TVCnCagEBWyCeAL5L9mEyN9jk4Oi CdiE9yGbBLH2amwNKNQLP0K6Q2m9ONhSOYgJpWywuXwI0lI21FLKbMXCaLlA by6hNxfTms5RG89SG8/QmoroLVgYrWeZbedY7ec47ed5XRcEvWXC3nJxHxik QkG+KOsvg8gHypSkcjWpQkOp0A5WqskXVCQsalKJZqAYRd1fpOkv0g2c1ZOw 6AaKtP1nNP0lOlKZnlKpJVcq+ivkpMvU2tx7xSeuF/7mVsmJxmunhtqr1Lwe j35kEq+boDldqGgCSDnSJhvv1UrWsmySXTRBs3EImCCGgEqmA9xDPJmPig5s IsqEhFEbC2wSNDFjDk7MzQs7uNgaC0a21zgSdoiiLmnSp5wMalJh3VRIi1b9 HffDL1cJlzNx40zclI7oEy5hDN/3BG3I6LfCJ2cEPjBhrBd+jOg3wSZ3ufd5 gkoniCfEPC40xQu1nMxOWM1q1sPN8f/n//z96y+Wn+xMbS4ElzOeyYgekLK7 En31bBHkAoOlWXtmyoD60GemDGCTx9uRR9vBRxhMgvj0LQwmuE0iyCaobgI2 WZ+zRtxcD17yAIkAPSBgEId+0GkAmAzhN6leCwPe47exgCQBfGpW1MONeccS fv5EgDcV5E9HRLMJ2eKkahVwMWNYTqnxaFaw7Ro1aJMRNHlvdUq5nlZvZLTY ogfTmq1ZPVb7QMHGBizzoBINlgXNzoIWyyJ2Z+u9gFkIfbxtLTlqThfAZHdG t5PVdYJsApcbYBN8lheyyXIS+zjBJwckAiqBAEOQRwihoDLKuGs46dz3C15h ocUdVJSYnULwBIuhFxLS9yCe+FSdXmUn2ATnSS8qnXhxm2TrgyiUIJtAiGIK DOziNpcUmwZmFWCbJ8LZIW63CVuxthFRGwQGcNPCbzaLsbqJXtABNlGPNsJ/ SIEnmpF6JataMHB1tKuC3VHK6a7g919W0m8bRmqJnRbBJuARZBOiaIICNgmZ BsEmk57R+ZgU2eT5dvjdOV2rv3+5+j5M3rfJ4d3bP9D/TszOOlQoeb8EQwQt tIWKMtiyXYgnBwCB836zybc7aCoXwRaElF9erf/x67V/9oPP8XF8HB//0sfL CfaT0FBo5LKuC9mkAK3TpWzJO7BJkbrtDPDEQL32eEKO28T0al53P8pd9zI2 fWATOthkJ0DbC9IQT+77qTseCpwXjR0Ak+DotbjgzqKhY8XcveUkgTuAJxDU k0LAhLAJBL0KNkFzutSd+dgULBwU2ZG0nxK35cAZQtz8oE063lZeDmzyDkyE +OrBR9qEBTBpLIQzoy4PwqzLp9WcptXkYjfrCwbvnCTd+oR67xSM6XWf0Oo+ VdMvTVnJiwFO2jU85Rx+MOe8P+tcHjdP+JQBi9Ch5RjlTKsSHv7JZgnVpRjx K/ke8YiNQ7MwOx3sDh+nblxWP2eondFdn9a8tck+T3CbHOxpUkrYBBIaPB2m FoI0A/x7Hml70Dq6Pu+Ty4eVyhGVcpgx1Njberm7oaSzpmik74piuA7+lyqm VytHmzwa6ta07eGyfyaqdutHjFJsQpdFznBpRwNWUdAmDjskIbvYZ+a79CN2 DUsvoYBNEEwOrR4MPEE2AZi8bxOU/4ZNCIP8qk14B0UT/q/YxG/hoLqJQ8Mg 6iaD+ykfBJ40gVBKKU0ltKZietP5/TSfQ6E1FTJaiobbz3O6S/n9lWLKZeng FeXQFRVk8LIKzc6iXFShmggZVFKGZaBUM1Cq7i/Vkot1FDzkYj35vJ58Dgvp jG6gUN8PKTAMQAqNpEJF71mskgLfgVKhJFWqBqsY9fl3z5+4c/43t4p/U3/p U2rrJS23K2QczUSEC0kpmseFVuX6UN1kI6vtfe2gVnJU0UQKKiF64YmpXNk2 IXgCg9mwYCEmXoxLZ8KimH3YJu8NmllR3CYx4IOVY1PRtMI+t54TcUrRbxCt 7ot+yzCejhrTEQOcMzETnFNBxZRfmvSK425h1MkP2cf2e+Fd/ENzugAmROmE 4AncgTF4ZCKqnh43zKUsixn70rRrdty6Ph/4X//Xz//3//HjH97s7q3GdpYj S9Pu2QnbYsq5OutbTLvSMeNUUpsa1yKbzKaM2yveJzvRI23ybDcMl0S/CZrT FfPy/LZhQAeazXVQHAGP0D1mGiRgZ0U9nLhvbCoingxjO61nEnKU2XHlQlKx NKFcS2tRxzpWBJk1on3k16exyghqZoesAAemFGsp5RrQIK3amFZvZjRbM7rt WYh+Zw5igOzOG3aXdLtL4BGwiXprXrU5p4TA4P1k24TIkTbZzbLJBl4oAZsA SQAp78/vApvA5wTXBwuRBF+qCxsjlaT9HAi+otf+/C48dFBJwkmDxB2DBE8g cQspZh5APAnquv3qLo+iA7dJL9hknye4TbyqHo+qG0kku1CCLlENBQ0colaP rMst7TBx67TD9yy8Rq+82yZotvKb7MIWeBXrZ8fSapf3mSU9ABMdrw1sglpO wCY6ToOWXaeg3xGSroBNRjrLhANVEvJVOfWmlnXPzG0gWuOJvnjQilfWhbWc 4I3wMRt90ovZZCtjfLjk/OJt3WT+p5dLv3+58qG6CUEGoqLxIZsQ/SZ//flh du/J+0t1/T3507f4YsVZey/++dUG5N++2SSmciGeoNlc8M5jmxwfx8fx8evH y/To/QA5yr+u7Dglbz2p7z2jbDutas9XtOYRc7rQDoxGsMm45PtV63crpteL ur3wyJafuROgb/to276hXT/1fhDLXnDoSYj5KEC/7x2aVTcH2FdCYBP+7RVT 15qlZ9Pev+Mi7YFcvIPwhgcBJuRhiAV5FB5+HGFDHobAJsz7Acayudc/cl3d eUbelidry5G1H46k9TNp60lp20l4Vd5+St6BRdlx0HvSmafuxM5YxeRAJWgC mKwdq7aIwSZteaLWXIiwJVfQclrQfJrfhIXXiK0bPNaQA+HW53AaTkNG606z a08N1+SwqnOY904y4Fx7ilF7mladQ7uXw6jJZdXlD9af7Lv3O3pzrnbkVsJC nvGy0y7W/Yx+MSSMG+lBNcWvorgkfYbRloCO7lYMumQMj3Q4rBQEpbyoXGSh 9/JbbtFvFqn7KlOa5oyhbsZQPcGrjAxj+y1CYqNl0ZGyCBtIUuzHbII5xc8s RQmTzifoFcHhKhf7ukNQN+nnfP1sXKOl0uh1NGoDuecOueP2YOvNzjtlw91g kwYxvUbMqFVx29xa5tK4+eFqZG85PBkxWNRsrZSuEg85jbygRx5wy0JuadAl 9VoFDsOoXc82KKkGBdWoGIQY8BgPbGJRUVHRxKlnoS74QxO68JWED68hjDZ/ RHsvoi1O9jetCKgTflXcp4z7VGgQ9SiSAWzRYEgSixrFZcb3XsRKJ3yPTYDz hO9zCHwOOANSxrwOLhY7VrUBtQWsI04tTTXWzu67Sm4qIdefIdUVkmrzybX5 Q2DMpjPMliJBR4mos1TaXS7rrVD0V6LIesvlfeXy/grlQKWKdFFNvqyhXDbR L5loF43Ucv1gmY5SqiEVq/vP6cglWEjFWlKxZuA8lv5zBkqxnghmE4wnuoEi InoS5KyBfE5LzlcP5CoHilTkUiW5StJ/ndVUefvs726e/fh22Sett4vYlNsm ZT885Wbwoska/pfnb1tLsE0odKgDBTWhYG94dzYX4snauzBZjEsAGsQ8LqIL niAJUgncR+/JhEZno9z5OH8uLkiHuDEnw2sg+cxDMffIZFiY8PM8JoZB1qfk t9uVzLhDlgkZMmEjJBXUxd2KCb8mHTYASZBKUDJJfTqhm8TW2lLGA/DxE2L7 1Ni58Hv0u/gBtyDoEYZ9oohfEvbKgx4ZJOxVJMK69LhlLuVcmvGuLQZ31uMP d6aePph+9iAD588fzj19MPNkb/pPPz7+65++/P2bvS8ezGwuhRanXYtp50LK MZ0wJQKqmE8xHlJNRTVTUdVURLWQMt9fC3xxP/EYn9MFKnmyE3i6CyrB8mR7 Xyt414lvd9m5PmeOOIZdOrJdM2BT9Tm1Az7jYMjGiLiHY76RRICTDHKnIvzp hDiTlCxPq5enNdg5g52X0qqlafUKtsya+uAXp8N/d9gAVycR7Ca2c8p+AClK /AOA2WS/bQRl3gDZ7zHBxvqtOWyK1ya2DBcKaEWzfZBsm+wtmVCOXKdrZ0ZL 9MKvH2BkHbcJARMUousEPi2oekKs04WEAoOUbxRemnC/vYNejdtpSScDAk5J OEAotLidGrNTozYKXkPpDxp7A/jawl5NZ1APVOkN6nqD2h585S6smOJT4R0o qm5s9xPUh6Locsmw9bvcik4YOGXt+GWHW4rvLy/rtPKbDZw6E7feKmi2CVsA JnZRKwzQJcYTSadV1IHP9WoxjjXpOQ260XrjWCPEwGkwchv0o3Uq5l3p0A0x 5YqAdJnbU87pKReRq9SsOwZOrYXfaBU02YTN+Pdssota4J8b0FNCJlrcNpzy 8RYTyu0Zy8Ml1xdbka92MZvs101eYu3wP3+z+odv1vbzev2Pb7Pxy5tNwMKf sXIGVtH4dZtk51ABJdsmh2ox6CZ6M1ZYeY3tqwLcwDZeRJswvtr409frf3yx +qdX68gsqJ6CkILe889+8Dk+jo/j41/6+G5J/CROT0rvKLtOi5s/UXfmy1tP Kdvzldj2i4XE/iYQC/3a51PyH9asP6ya3yzq7kfAJowdP23HR93xDu76h3Cb DO4FKI8D9Ed+2gOwiaopyL4S4VxPCu6smbvXLT0b1t4te/+2Y2DXRd5zU3Z9 DMieHyTCehAcfhQeIfIwxF6zkYOc29qe84r2Qnlrjuy9SJs/g8haTsLPrGiD nEbd8YghyoMGk/3+94POFFnbKYi0NUcEMGnLEwJMWnGY4OE15aCMNZ7kNnyG MlaXw63L4dSeRIt0se59yrwLOclAQqk5zazJZdbksWrzBmo+66/+FM7sznMm Xs2EdWjONzLjZqVs9HHjEGTCOBTXkHzizqCa7lcxQupRj3jYyBxk19d0lF1o PZdffeqT2tMn+A3nUuqOaW1jSl0zyasMM84GqIV+amGUfSEyXBJmFQcwmxQf 2hd+nHo5Qq7w0i55Rm44+Pdc2q6ol+V2j87OWaNhDYfR1td0o6f6Crn+5kjv dTWnVcqsFzPqVdx2h4Yx4cf+BjsV1sNDvlpC1SlYOuWwzykLBVQhvzKCx++S OM1cu3HEpGEY1XSTimpUDiGb6A9aTpBNiB0bCZugRvignYcvI/zO3otRN7Y9 Hx5x1EVsDY/tqRcHj/jhcVEJiXoVKAkAy3uBH9tp4mGlEwvfYxV4bPs2wZGC 9Z54bFwUrG0B20eD7dJR1WOtowNXqa0lw50lnO5SQW+ZuL9cPlCmIEFKNQPl 2oFyHalCT75oHLxkGrpsplbBWE+uPBQLrdxCKzNTS42DJcANHemcduAsGqDA JYrhLUmOeJW4A68ahnK15JPKgQIV+YKSdEXYfZPVdPX2+c+unfntzbJPO2pL xli1NiM5EhhJh/nzCQk8oxK98PCYimySrZXsOV2HSieHYIJP03oHJtk2yYbJ fFQ4E+XMxjhz8bHZ2Fg6zJnws+NuZsTFHA9wp+MySMzLtesoalFH0MxP+7UL cctC3DofM6dD+rhLPhXUpkL6VNiQikCMqSiWmZRlNm2ZSZkzU6bpSeNUUpeM qrxOngeM6eT5gCceYcgnDvsl4/D+pG025V6eC26uxPc2Jx/tTn/+aP75k8UX n698/Xzt5RerXz1b/uLxwovna19/tQE3v3y69PXz1a+eLG4txzaXI/NpJ9p+ MRlUBRxCt5kbcYkngqp0VJOJ6xanLLsrfrDJk+3QY2STbf/TXf+zvQAEvxPC E3yw7tlZsm/OW1JBfsI9Apnwcab8nHRwDNuhMiaYjgtmkqK5CcnClGwprVie Vq7OqCErGdVyRgV3IItpxWr6iI6h7F8iepXIoTdsYjbRY7u3H8AEj2l7zoT6 UPCN3bHPxkGPiQaf8YVlZ+GdtnfCJpD3iyk7eNGE4MnGlBLlEE+IvniEFPjM AEMAHagRnpjiBZdgE3QTTfFCrSioOYUIMd0r5hiMOihhGylkwdpPAsZen747 dDDRK6jrRnO9sKh7wCb7s7xwmxCLDB+KR47VWVzSToe43Yrvn4hmdtkBI/jk LhhDYACXkOxZXijwJQAT+CoI2uJEP1qjHr4jolRxesp4/ZUy2nUN+65xrE7P qdGO3DNway2CRru4Bf7pXjXJrxsKmxgTrrGFuGp7xvpo2fPlduzFXvKbp9M/ vVz6A0aS1Z9fraAByh9frxE2+eXNxp++3fzzd2CTLdwmoIm/vYYwmtmV3XhC zOZ6f4YYfCt0H30VDP7wzcbPX6/9EWfIL6/W//ByFWDyl9db//5m+8/fbMJN oqSCVg9GLSf/7Aef4+P4OD7+pY9ftjUvpjlTyhpdX4G09TM5esJvywOeaDuK 0L7whu4SY88FG/PmNwv63286fly3fjOveRjjrHuo2wATH3UXq5tAQCgUsAm4 475nEDKnbgaYxMZujgvvrpq6kE0gm7Y+EMqOk7Tlpm57aDteOsETIMnjyCjK OvyvZ+wu2ETZcQb0IWs5HGnzSYisJQdexXkCP3muov1ts/z7NkEwQTYRNGPl ErxiggUf58FNfjMqneRwG05y609y6j4bxVSCZbj6JKv6M6xogiUHS/VpPLmM GkgewIRcexJCAct0F9sFjTMuVsJAStsZ0zYmwCSpp8TVAz5hu3m0i916reFC 3s3Tn908+UlN7um6vLzrH39055MTLYUfCRvPJMQ1ScmNhLhqglsOMPEN5nsH 80ElaF/4AL4D4yGbhPvLkrSqOPe2nVFl5d5+sGz8//7fN27PKF/QqpBRpHwS d6id0VHbe++KmF4XNLICBqZXx/Abh0NWXsIj8xjHPCaeXECSCcgAE7OWE3Ar wgF1JKhOhLWQkFcOz/wO06hFxzJrmWY1LZsnaHIXssn7FRMEE7T3YsTFw8M/ CNwR4huIH7ZJxCMHjBA2gTNQ5X/TJk4j22nEVm116Whmaa+a2yhj3pVTr6no 1/X0KybmFSurysq8ZGVcNA1eMpIvGsiVEBiYBy9bhqrgpolyOMgmpqELyCYI Gv8Im9wtyblS8NG1kt+115bw2fV2EyXoZYFNZmOi5UkFKp2glhOs8/3AJu/3 m2TbBGBC2ARgcqRNDvWYZO9vkgmPYjyJ8uZi/Nm4MBMVZCKCpI8T93EmQsK5 CdViSj8dV0Q9Y3Mx3ULcsJgwLibNC+OWTNQ4EdBMhfRTYcNU2DQVgZinotYU ZBxIYoZkJs0zKevctH1hxjmVNMAdGK8seLfXww92ko/vTz7YBoyknz6YBX18 +XTx+ZOFLx7P4ypZffXl2jdfrUNgAJcvvlj94unS/a2p1YXw1mrsyd705w9m H25Prsz5Ih5p2C3x2wUey5hJRfcYOXGvbCahX5g0g002F9zPdmOPt4L7qwdn 2QS/E0Q2ebjh3V12gE3W0trlSdXShHIhKVtISJYn5BvTmqWUYjElx0iSVgJG kEqAJ2+ThsCrR9vk0J232MxosQYTHCBIHPs2mf17bIJmZyGSYNld1B9ZNznS JvfnsV54ousEkIKa4rOFsnYglDW8pALnxbgYTe5CCwgTrfHIJmk/B+RCrC1M tKWgMbGcFxYXNe4aAp5EbGSiQT5k7A0d2ATxBIumN6DpI5pQkE0OFhnuwFBw sOawV9GD9adIOlCAHsgdyCNEywncId5DCAXdR5DJdo1V2GwVNpl49SARUAk4 RcW6DTCBgZx+A87wEtgEfhK/lhLQU0NGetLJmYsqwCaPV7zPt6NfP5h4/Szz 44tFkAjo4xBPDtmE4Ml/2ybZnSaHdjNB3yd7JWEY/PH1BjbN7MXKH79ew/as f7n651cbyCb/jjMEkWS/pIIL5dgmx8fxcXz8+vFve3qwybSm3kg+K2/PUeGz oeStuar2Al0nwOScvqsYYGLpLwebfLdi+XnLCTZ5OaO8HxlddpA3PYPYhC7f 0I5vcNtL3vGRkU2wmoiLPKNsDI1cjXJvgE2yYYJssu0YAH1suoZAKNk8gaDB qo0UGL2l7jorbyuQteS+H0nTKYi0GZxyGn5meWueoi3/0Mpd+xuavFsxQcGn b+VCwCOC5jyAibAlHwJjuMlrPIXN5sL3W8SmctWeYtXksGrgfJpZc4qBBfMI vTqXVp1Hrc4duoeFXPMZqARCqv50qDZH1F/pEjVn7IxZByuhHnCPNTm5jWZW jaizsu/GqabSj2+cPHE39+N7uR83FnzWVPApuSJ38OJpatVH8tbTk5Jrc7pr y5YbKf5+3cQ3VBAZLgkxz/tpRf6jbJJmXY9SKj3Ui2ATI/u6U9OZivE9Xo5c 3kvqv11z63zznYqemit91VdH+2+ATRKOsYiVE8S2gx9x6dg29bDLwFUIyUrx kEJM1avYQY8yFFCFg+p4SBMLqsM+hc8pdFvHbAa2TT9s1TIsmqzqyYFN0PJc H4YJGIQPQTDBG5z58NKRNgm54KFRRgjlQzD5L9kEuw83rVzgiU0xYOS3aEdr NYzrGvpVPfWigVphopZZqaU2aomVeslKBY9cMg9e3E/2OCtgEzO1FNkEWUPT X/QPsUlxTlX+iavFv22rPg82sRkxm6RC2DpdC0kpPKxiD6JzhuzZXPBMC2yB rGAPjapDC3Mhm6AeE6QS1Nv+fpsJ5NAWJ+ildGA0E+bOxQQLSfFCUjIXF89E RZmYDAIkmUmq5yZ0kJmkZmnKNBPTTEdUMwndbNIwkzDNJq1TUeMUVi6xpGLW VNyeijvScddixrM851uZ96/MB9aXQttrcTDIg+2JhzuTj/dS2AStRzNfPJ77 8uk8fl58+cXKqy9XcYmsgURefL781bNFQMrjvemd9cTqQnB+2j0eN4cDWodZ aFANO8y88bB+PuWaHrdMRPXgEaOSppMNmtUMODt07LBDlI5q5idMwJP1OcfT neijzSC+8SK2HfyTHSwglIcbPsSTx1sBsMneinN70bY+rQObzCdkczHJfFyM bLI2DeJAUaKsHgz2A29AOcomR3cP4VWSzVlcGXMGAh1vhfK2emJCfStbswbi DfvblLwDE8wm2Zu/I6Ecuf3igwXjg3njfXy1LuAJ0XuCyijZlRTUhIKBZUq5 nJTCRwvN7EI2QdudwCXABH3MUGGFuJ+9nNdbpLhpCfcBT4j1uw5U8hYm2q6Q rj+kG0A8IWySXUN5O8brJm5ZFxHQB0IHBJVLkEQO1U32G+R5TXAmbIL2XrQJ mx2SNlSXcUrbgSrGsXoDtxbVTUArcDaO1dlELSEDNWphJewjUx4+2GQjbXqw 6Hq2EQKbvPl85vsvsb0XASNwBpugZAllHSHlUOnkSJv8+m4m2dWT92FCfC0x +OPrTWxZ4xcroBLgyS+v1v/0NZZfXq79O77jyaEc102Oj+Pj+Pibx388NIFN ZvVNJvJZaetn6q58vAZx2CbmvjIr48abJdNPG/bvV0xfTct3gsOLtgHMJt6h HS+cKVse0o6PBDbBekk8gztOUlpW52ddjnCuEzZBKkEwgTeATTacg8CTbQ9t 18cAkkAehtjIKatWzCaqziJFe6GsOU/6XiSNpyVNudJmcAp4Cn7yAixth1cV RkWT7IoJRNJykt8EBsmHCJohBRBhSyEK3OE15o01nObWn+bUnWLX5UFYdbms WmziFrM2j1GTx6jNp9fkU2sAJnmD9/IoeKi1pwZrTg7V5NDqTtFqTzEb8sfa SyKyzoyZNqGjeHjNFsY9ec/loZs5vLYzrLrTpOuf0m/ns+6c5dWWC+svShqK 5c3nNe2nHIMFaXnFnPrCsqE0LbwUZZ0P0s74qYVgkyDj3IdsEiVVJGlVQdZV G/2ynnU16hh6/TwRiYj1+iGTYUTI6aV119LaqikNt1jdV/16RtQ6GjQN+wws sAm2PJeS6dRzNFIq2EQ0NiAVUGxGXtCvjATVAJNoQBXxK0NeacAlcpo5DtOo Xc8CnpjVNGQT49+yCYIJbhAeJNsmB2Y5wiZog7wPTeX679jEMuq3cfyWEY+e 5lD2mQXNupF7etYNA+uahXnZyrhopZfbaaV2aol9qNIO0MNjG6y0UMrNpDIz ufyIUMuQTYAe/1Cb3Dr3KdjkWslvW6vPc5k1Fv0AbpP9vRc3ZrS7i6a9JWyj PeKv1tGyXUsTcmzxrl+FyUHFRIjv887LVgn6O+3353dBUgFOJsyDh/ClcRn4 aCYqTgUFqbBkOqbIJNTTMWynxZmEdn7CuJSyZOLaqYgyFVVPAVISxvmUM52w QKaT9syEc2bSM5vyzaYwkqwthjeWI1ursd2N8Ue76c8fzX31bAnQQRRH4A7k 2cPM54+wPH2QfrgzsbMe21gOz6YcMyn7zJQtPWFJRrRBj9Rl4zttIrddatFx lVKaSkbVKRjwUVeJKWoJZZTWMMZsFo60q8UkpbAfbBKw8pN+GfBkbtwINnmy HXm4AfrwAUAebfkeb3sRTx6se1EjPLLJ/VXXzpJ9La1DdZOlCcUaPKIDIiBp NR7VegpFuQYP7akjc4RNACCoCoZqKPA7xaSZVRTbn80199Ym2TzByiVvN4Lf /1Zoa8VDdRO0wvAhnhyZQzYBmBDVk2yhQFCPPNLKyrgMmwd4sFk8WlUYDALu QC0nhE2I+6jIQszy2keKh5H0YDyJObHlhdHiXUFD7/s8QTYJavuBJ0TpBM4w fruiF36JbIKqJ8gmqIySXRNBKiHyzuJduEeyg1dY2lF1BjkIxkAVq7AJYuY3 gFCAJ7rRatCKS9EXNNDiNoAYtuHj6qR+b97xeNX/1W7i9bPMd8/n9tvhsdW6 juAJqqFkl07wHGGTI1flOtImh2Zzoe+T7RSs5eTN5k8vVn4CnuABoYBKwCZY OzzeaZLdbPKfP95Hq3X9sx98jo/j4/j4lz7++sj8aoY3Z2g2ks/K2k5qugtk LTloTpem/Qya0wU8MXSXgE1ezmp+WLN+u2wEm2z6GMgmGE88lG0PedsLwXmC F01AH9k2IfpNiKIJ2ATBBNVNiMaTx5FRVDdZt1OCnNtgE2XHGVlzvrQp71Ak jbkQNIY3yFsKsLSdJvY9ed8mBExwmxQeiqAJYFIkaD6DXTYWjoEs6vO59Xns +gIIq66AWZfPqM2j1WCh1xXSaguptYWD1QXke/mku3kDd3KpNTmUO59Q7nxK rzlFrz01dOck5eYnoo7SsKRjzsKc1JCD/FbD4C1O/TlO86fc5s+ErYXq3goT 6YZ54Kah55q6pcTWXxlilo/zyucUZTOywiVN0bTorU2wThP6WR/1zAdsUh6l VProl52sq1bu7ZiT+vxhYGpKy+U20YZqe9uud9VdobbeG2y8Q2u7aJeTvFqa W0N1aWguLctjGLWqsDWNrbpRk5qtVbA0cqbDJPB75eGAKobzBI8y4pN5bDyX BZscBTwhSifEIl2HbIJ4kl03ibjG8Lwzp+vIfpOQUxLEE/HIf6Vo8l+ziZER tLBCZqZfP+iUd5nG6lT06wbWdQPzqpFWaaSWm4ZKLdRSG63MPljuGKpwDFXC 2U4pt5JLLQMXLKSjQi1FzSbIJgATdd+Zf4RNbhZ9QthklH7PrOtHc7rm4mJ4 WMX/MtywM2+EM1wS5RIi61OHYQJBPSbZMIEcUgnK+4t0YQ+ZcBnmz8clS+Py +YQsE5FMBYQzcWUmpkxFsM3fp8LKTFyH1SBStpkJczphSMX1qbhhZtK2POtd zHiWZrxLc4GVxfDqcnR9Nb6xlny4k3q0O/3kfubZw1lgyPMni18+XQKSfP5o /umDmYc76b3Nye215NZqfGXBuzjrnElZppL6ZFQdCymiQXnQKwn7pdGgAi5h 4HMJXDauzcz3ueROi1AlpSklg2ATtWSIz27nMltYlBqwiYzXo5VSVKIBh3bY bwE+i8YDcvjJN+aduE38wBAAyMNNL9gE5f6aB26i0smjTd/9NffusgPVTebi 0tmoeCEhwbrU4RH93cd1YuLT2rurWmH5u21yaLoXmt+F3vaWJ1k2Qat7ETP9 0M7vqCOeaDk5KKb8bZ7cnz+ibkLwhBAKBNVN0BgGy/h2J/DJyV5VONsmxMwu VDGBMbok7mBI8THHvXSMJy5q3HGw+4mpP2zsixj7wlkzu7JtQizhhWBCzPVC l0faBLWfoAldyCagFbTUcPa0rkO9J4RWHOI28AjYB8nIKW2ziVqAJ3gNBZvr BTHzG028Bpuky6UEXtESjtFMSLo2ZQCbPFkLfLkTf/UkDTb54asFbPvFD/Pk /dLJkTZ5v2jyfqdJ9iYmRy5KTDAHbPLz12vfPpt782Tmx+eLv+AqQet0/Rlv NiHaTAihQP7ZDz7Hx/FxfPxLH3/a0X4zy5/RNYJN1N15hv6z2u5CgAnwBK3T hRrhtR3nbMybX6Tk369a3iwZvp5VrXtoS3YSZhM3ZdNF2vKQd3wUgMm2d4Ao jkzL64PsK7GxmxOie8uGjlVTFwiFaIcn+k1QywmyCQRsAmfMJo5smxRImw5H 0piHIm3KhzfIWwrlLWeybULwBNmEmM2FbCJoKoLwG8+g8BoKIdk30R0Iu6Fw uL6QWVdAr8Gnb+GFEnp9Ea2uaKj2DKW6kHSvoP9OHmTo7mfkW78j3fiYcut3 Q3c+Hbz1Kfn670jXPjFSb02qSdO6wSk1OSrqstKqdYPnVf2FOlKpZagqxGkM jzYFWPV+6u0kp25RWb+mq9nQ31hUFq/pLsyIq+LsEmxaF+0Mqpt8yCaJwYuh gXI/o8ozcgNsEnUMPdiwx2Iyi5WF1016hjqr+2qv9VVfpbVf0vM7DYIug7DH LB2wKWkuHRvZxGMV2vRci46rU7BsBp7TLgSeRHGexEOaeEgV9krhgd9jHXOZ RlDpBNkEbQpPNMIT/SZIKNnTuvBeeO7f0wsfdIgBJtnTuv73bRI0DMWsjISN GTEOehWdZk61YqhKR6vS06uM+HJbZho2rQviGKxwUMrt5DIbqTQ71oELh2I5 mNCFmk3+oTa5nPebq8W/bbl3jrDJoXW60PPqTFQ4HeZnIoL5hGRpQk7YJLv/ PdsmxDYleNGET9gEqQQ9HxKzboiOeGx+DgglIpiLShbisrm4fCYqmw5JZxPq 2YQmE9dMxyDa6ZguE9PPToBNbJmkFc4L0+71xeDOWmx3Pb67mdzbmXx4P/3k 0cyzp/NffL7wxeOFZ9iyWrOP9zIPtlPAkLXFyOKMf37aOzPlSo/bJ2LmRNgQ C+oiAVnYLwl6RZCQTxwJAEmwO2iAxgGP0OvkgU0SEWM8pDeo2XIxRSUZlPEH xlito7RGLqNJNNqhFParxSSFoM+iYvjMYGdh3CtJRzVgk8db4QfrfrxK4nm4 4Xm05UE22Vt131/zEjZ5sObeW3GuTetWU5rFccVMVDQbFQJPFpPS9XdbxZFK CKegXoz9nvFf3T3zyCaU7BUPspvis0onb23y9j0zGsjmrBrlACm6bJ78at3E 9HDBdCRPDhVQ4A8If0y4RJO+4E+KdmOEDw98qNBMLVQfyd49B+31CTfRZ4/g CRLKVGB4KsCa8DEwoeA8wWIjx63kmHkgauonhAI2AZggm2QHOQUJZX/G17sq QWMkEWKMbILeg3hC2ORIqtiEzXZxK9gEfAT/CJesHS5RGQV4Ak6B876SdBSf djCgp4JN5qKKzWnzg0Vsna7n27EXDyfRnC6ACfAE2YTgyfulE7DJAU/+xr7w RI7c34QQSvaCXajIgr4DtmwXvOebDVDJt09nf/hi4ecXK7+8XIOATf7yZjt7 y8XsGso/+8Hn+Dg+jo9/6eOLKckPK8ZZQ5+dcdVKvazpOmfsu6DtPKtsyVe3 5OnbC81dZ82dkCIb88YXKcWred2LGdWzCdGmh7bqoKw7yRsO0qajf8s5sO0a 2HH177j6UH0EzpPiarROV1pWBzZZ0revGDuJxhPgybaTvOOi7HqG7nupDwOM RyHW4/Dwkwh7z0fb9dE2nKSY8J6mt0jUfFLRWIAihzQVyJBNmvLFTfmi5gJR S4GotRAibjujbstRt52EqNpyIEo88rYcWVuOpC1H3JYjaj2JgjWbNOdh3SXN ebzmvLGmXG5T7lhzAbc5f6Qpb6Qpf6Q5n92UP9yQO9xYzGooZtSfo9WeHaoB jBSR7p2hNpQMNZSQ64oHas/3VZ/tvne2625R752c3junuu6cbr2d03Dzs9ob v6u+/vG9qhMd1adl1Kqoqjujo6RlpLSoPya46WZWuOgVLlp5nHdrVd++Yexa kNcuq+p2jPUPrI27prsriouL0rJZyZUI8xwEbBJing+zir1DhT76OR/9PNqB 0UM7jxJiVPppFV7WZe/oDevw9YiuZ2daPZdQiYaxKSuUnjttDVVdzTfa6q9w +68ph+vUo00abqtR1ONQ04NWns/M82JP+AKzhmPScA3qMaOWZ9KwvTZR2COP eOUxvyoRVMV88rBHiq9oNGrTYR3xEKx6clA3QTYBmKCiCTGti6ib4It0vV2n 61fqJkGXNOSWhjyysEcGP0DUr4yDREBJAYgqHlQnQppEUAMDt0VgN3AdRq7d wAGeeG38gEtEbHSSbRO/mRWyDocsLL9+0KXotvAadKzbevoVA73KTLtkpVXa h0rtQxeslGL7YIWNUmGllFtIZWZSqXkAiwk/wyXctJLL4VXsDbQyBBOkEjhn 98ITGMHE8dYmxTpSsW7gPB4YlGAhXQCuQvRYzmkGimS9RSpSqWKgUtBzkdl8 4U7Jx1WFv7lS/FHTnTMj1FqTmhp0C+bi8PQrWRqXLWMGUaymlGtp1VSAM+5l pwKc+bgY3wgD+9v7laRkJSFeHZeugWUm5OtYFCsJ2UpCuhyXLsUk82HRbFCQ 8fNSvrF0gJcKjE36OJAJHyfpHZ0IcLHAEyOQJCrMxETTMVEqKp3CIkvFFOmE Kh1XTUXhrEnHtdMJfSZpnJkwz01a56fss1Pu5dngxnJ0d3388e708ycLLz7H qiHPn8x/8WTuiyezTx9mHu1N3d8ZX533L067Zift00nLVMw4EdHBL308pIUz fAhjfmXUp4DPA7a0tVsQcMHvmh9080MeQdgrivrFMIBEfKJYQBIPSqM+MbzN bcXcGnCKHSZwN1UjoYg4XRx64wi1Ac4Cdpt0rFvO74XYtWCT0aCdC59MsNXW ggtsgs/p8uPTunyPNr0o4JTdVTvk8TZqP3HtLFlWplR4xUq5PKEAmKB2eMIm 2ckuoxDbgsDXgjTRlC3UQgLnI/WBbPK2OIKaTWaJWklW9rvjDVv7WzFiwb8J 8AQUQ9RQdAcTvfTvL9h1aEPGvUXT/UUTnPcWIMZdPNvwT4GfB2SEz2RbBzod VE8Ip6AFu9CSwkgf+LYmWJM7Kp2AStD2Omjq16Hi3T6Tg5CRVIA95Rue8DDH 3XRI0kFN2IYSFkrcTI4aB8KG/rC+D/XCAw3CehICAprBRYQonWBR4ruiEMGX FCZmZGGXqHNE1uGQddil7VgkbRCbpNUhAba0O8VtWNAmJqJWGLsk7R5Zp1/Z 7ce/OTapDN9sBW2w4lZ1+7QAk/6AnhKxMCZc8G9AuBBXbmXMj5Y9YJMvdxNf P0p/93zhp5crv3+5+tOLle+/XIT8/tXqz6/W4PyH1+s/fb2CLSb8ZgNb0ffN xsF0rG2iMoIqHQgUf/354X/+4RGMs6dp/cdP9/8Nh8Yvb7D9SrC1iPEztj7w /tLE21jeYGBB3wp95z++xt7zP3//EMQBMPn+2dz3T+fAJn95vfVvr98uzJVd Ojm2yfFxfBwfv374eE3PptTzZppz+J6dcUvZXqzqKNZ1Favbz2rbCvVthYbW fENrgbmjyM669VVG/XJW82Va/ijOA5us2EhrdtK6fQBVSbbsfTsOSC/Sx6qp Kym4AzYJj17LKBqybYKyaetD1ZM9N+WBd+hxgP4kzHwaBZuw9nxYD8u6o39c WgNPaGMNv5U25ksbkUewiJsKRE0FArxVhN9SwG8t4LUW8NsK+di6xzkQnCdw zlG2A0xOos0Wxe2nRO2nBJC2U/zWHF5jzlj9SW7dZ2MNOeAUbnPuaONpdmMu uymP1ZzHaslnthay8DDayumt5dTmC5SGkv668z21Z7uqi9qri9qqi1runW28 c6b+dkHdrfzam3n3rn52+/Lvqi7+trzy4+LKj85ePFFUeaK06sTFKyc66nKU zBtJdd+8jjqrIE9J7oVGLgfZlwKs8sTY5XVDw46lZV1XvaGv3jVV71lqtgy3 V5VVS7KLs5KrIXoRskmQcS4yXJJtEwImbuo5F/WCk1rqoFc4WVcsjCtRVdf9 KWXUMpzyiWcSRqOSyaS1dLTdaGqo4g1cltFuqoer1SP1urFWm5zkN7L9FoHP LHAY+RYdkISnV42pZCN2HddnFaHiBT6rShlyiYEnQacIbILa4eFs17OybeI2 srP3NDnUC//eOl3CD9kESAIwCeI8ifgUsYAKMAISgUGMsElo3yY2PQdsYtOP usw8z4FN8G3iudnBmk2soz4zy60btMu7zbxGPfuegXHFQLtsHqq0DpXbKcUO LOfxHpMKiJlcbiKVGQdKiZjwxhP0KsRKLzcNXSBmcx1apCsbJm9tQkIkKdb2 w+DCQUp1A2UHuaDpL5F2n1ORyhWkCkFvObPl7J0LH109+5urJR813ipkUWqM SkbILUNzh+ABGAFkDd8rPBPmTcGDXICbCfNno4K5mAjesANPjJOAEfFiVLgE d+KSlbhkLiicD4kWwqK5IJb5kGQpKk8F+OkgPx0STIFQgvxUWDAZ4kfcbEgc nBLiTUSFkGSYn5nUpcc1yYg8GhBDYgFsW/agWxjxSSZjusWMc3s1/GRv6ssn c18/X3v9YuvNSyzfvdqBvH6xsbuRXF8KL8/55qedmSlLesKcnjBNxjQTEfV4 WJkIyGM+WdQrjXgkiaA87scu8UijXvhMikNuXtiDwo94UQQBJyfkHov6BDG/ MOYXQeIBccglchqx3XksGqZGQlYK+wEjw4O18K9xlNYANpFwu2S8HrCJQ8/w mtk+ywh8OKdj6s1558MNbJEu3CYoXpRHW+7dVevOivXxtufpLrDFub1oWkkp F5LSubh4Hq+YAAyxfpOjbJIdwibwJbMxEXwtWmwNrbd2aDloFGxTeLzI8rYv fuYomGQle7uTw7O/kF9m93mSbZP7y2bIIaHsLpreD76LihGtxoD0BD/h1kEN BSkM/TGJ0gnachFgErPRJj1sYAiYBeSC8HKo7+ldm4ymAiNgk0kvC+cJY9xB S9qpSetQ3EyJGkkRA3ikH1UlDtnkyGQvNZy9otf7ccg77fIOLAcbzUMcEEmb S/xO3JJ2iEfa4ZV1YpHjXSf4TvQYT1TdbnWPR9ML8WoHwmZayjc2ExYtxBUb aePDJffX98ffPEm/eTb33RcL3z9f/PEr4Mn6d18uff8Vlh9eLP/+1dofXm/8 /M36jy9Xfvp6NXuD+OwuEgAIsZXJ//jj4//5yxPwBZqphUoq//HTg798v/vn b7chv7ze/MOrdThjPHm9iQboJWQT9FUgGvgOYBMQ0x/x1YN/ebX+52820Tpd WPUELg8W5sqe0HVsk+Pj+Dg+fv0QdF1ccHGmzXQD7ZZqoErdd0nbf0nWclbe elbdfg7beLHtrKGz2NpX7h6992pe/82C/quMEmyy7hpatPSv2vrXbP0HS2/1 bdt7t+0963hrCTAEbBIYriJsgqZ1ZS/YhWyC1hx+5Kc9CtLRNvH3/dQtN3nV 1jsprzMNlnDqPh5ryh1ryjsUXnM+ZKwln9eC2wRLoaL1lAJfUhhrim87LW3P hUg6CsQd+cL2fEFbHq8tj9uay209zW/Edn7n1uVx6/O5jYXc5iJuyzlmUyGr pYjRepbWWjTYcmawtYjaca6rrbSj9UJrY3Fj3dnamsI7d/Jv3c67cu2zy1c/ rbz2WfmVT8qu/O5C1e+KL398vuKTs2W/Lag4kVt54uSlE59c+s3HFb85VXni LPCk4kTL3dMGTu2MhZbRk2alNcnRq3F2VYx9aWKsalldvWls3DE37FoadszV m4Y7a7qbK5qrS6oqsEmYcZaom4BNfNQz2fuboOoJ5hR6mZdZ4Rm+HODdjkob N6P8PzyOfrUZVrCb+YzmEVrTIKmO3F/X1XFb2F+mpFbpWLe1rLua4WoDr80u 6/caOW7DqN0wZjcKrSaxxSixGKVgE7sODMJ2GrkhlxTfnE6OFlx1mUZsOiaC icMwjDY3IWzyq73wfDyCg4g+NKcr7JGHvXJQCVYxwSWSDGuRSrID9z1WIaqb 7NvEyvM7hf8Imxj6LxA2IXhipVeYqaWobgJBHkHVk/cnax1M6PqbNinVDlyQ 9ZzXkCtUlIui/kp2e/Hd0o+vFGF1k8ZbBZhNVAyA21xCtpiUoW73FXwPPnhY hWfj2agInnJnIsJUcGwKnutCvJmwYC4inI+KFuOS5aRibUK1PqnemNSujWsW Y4rZkDQTkMwEpXNheSYsg6SC4nEvP+4Zi7q5IcdIMiCERH28sHcs5OGEvNyo n+eysryOkZBXADyZntAtzwFGgk/2xj9/OPX8cebFs7mXn8+//HzhxbOFh9tT u2uJtfngQto9M2lLJ83jEd14BH6nIE1Z2CsOeURBjxAS9QjjXlHCJ074JXCO wR23IOmXjAdlWALSJAQuA9LxgGQiJJ0My6bCcshEELsTdo1F3LyoB8KPefgJ nwjuJ/3ShE8acghcRrZBRpZxO6ScdubAbcbAbS6tXjLaBndkY51KfrfLAB9g FvAEbJKOqtZmbA/Ws2HiI2zycMO1t2aDgE0g99fsYBNU+CBgAk5cPtgzfQ1f rupQxeSwTfCvxb58XIYm4yFBHFk3QY0nK/sbL2o/ZJOsxYQPMoevOTyrQ50s b/O3bJIllCNscn/ZsrdkhgGxWBy21U5WBwrxpyZ4grpOkE3GXSxwB3gE2QTx hFjLGgllnycBHCZ+9uR+3YSBxUnHeGIdSlgGYyYysgma0EUku8fkV0LwJJsq xE4oTkWnAwXfYt6BCwXbwFHWAQzJDmGT/UtpB77bYwdhE1wlfT5dv09Hiljo YJPZsBjZ5NGy55tHk989ywBMfvhy6cevln/8ahXyw1cYSb59vvDmi3nkEfAC 2ASoQgglu2eEmNZF7AWPCh9ojKon//7DHuQ/frwPZwDIz1+vAU8IkiCVoMs/ fbsF3x9N68J48u3WTy9Wfny++ObJzPefz/8MP9vzpT++WMV4goMFW1X4NbZH PAGTY5scH8fH8fHrx5Xcj4dbKyycNhX1Hr/rkrj7sqC9QtFzWdl7SdN7UdNT oeosVbSeB634eXVvlkxvlowvMqqHsbE15+C8qXfZ0rti6UV1kA1rz6a1e9Pa tWbG+krAJgn+bbBJaOTqtLweVELAhGiHJ2yCSidAkgcBGmQPt8mKtSelbLDS ysAm3MbT70fYnI8Hn9PVUggRtxZKmnMlTbmS5jxpS760tUACaSsUdZwVthfx 2s5yW8+MthSMNOWzG/M4TefHWi6MtZaym4rp9UXUxnOM1tK+hqLehrOdDUWt dYWNtfn1NXl1NXlVNfmX7uVV3Dl14dbJc9c/OXP1twVVH+dWfXT68kc5lz86 eemjzy599Onljz65dOJkRe6py/k51099euPTj2+e+OjGiY/gfPHE6WsfnSk/ UVb2m76mcxZh47iZPC+rTfFujo9cTbIvj49empXcBJvs2ZvvO5q3rTXrxttr hlur+huL6n2bRFnnA7QisEmUfQFsEmSVBFkXAqxSfF/4C/tIYZT7WJVORqVz GKubuAUNSSN5IaKI27khu5DLbG2sq7x3p7St5bq465yOUm5mXjWybmgZN7XA E26jeqxdNdapEpJ1MqZeOWrU8O1mmUHBtGpGXKYxr1Xgswn9dojAbebifwXN QjZBOdRvAjaBHLWAsCjmEeARHkSM9oU/ck4X2AQwAiSB59iJqB7OhFNQAQXO 8KrPLnIYx5ymMWQTt5WHmk3+ETZ5nydE3UTddwbVTYgxmuJFJKvT5DyoBOVI m+hJML6g6C3WUirVg5ckpEujnReqK7A5XReLTjTcKhih1pvUTPiDzyXk80ks C+OKpUnVagoeCHX4OlEqtGAU4CUTFWcioqkAPxOVLE6olyY180nVXFw5F1el Q9JUQJIKyjIR5UxUNRWQxpy8cZ943C9J+kRxL/bLwtd85nltIz7HaNA1Fvbw owHReBQwol2csW6tep8+SH71LP3yi8yXT9Kgkqf3Jx7vJvc2YhtLgaUZ18yk FSSSjhtSMf14WB31yUIucRh+7z5pxCuERH0oWOEj7OHFPbyEF34GwYRfOBkQ YQmKpkKS6Qj8QeRwToWl6Yg0E4M/tXp+XLMwroHzXFI1G1fOxBVTQXHCy4+6 OFEnJ+4eg28FlxM+SSqkmAzIIg6eQ01V8zql7GYO5e4o5S6fXgdj6UizbLRV w+8ClXhMw3AGEIFNVjJWZJMH676DeFAebu7bBAZgk71V28acfi4hRk5cAlwA NOLidHAMnsPR/oOIJ79iE4AG0XKC0PGOHbJyaL9FVBDBNjp5zyaoULK/DcrB 7K9Dl/tllFnt+zY5lCyhHB3ixwDpbMxot4/qkUcFFPjXAuggFg2GwAD0QUzr Irb4RDx5O7mLsAlRNHEzJlyMSRdj3LZfOgGeRI2ksJ5ErNBFLM/1KzlUPSEu iS1RnNL2v98m++WSg3jwGWJO/KvAJh7cJgATv34gYKDE7axMULAQk61MaLZn LE9WfWCT149TXz/6/9l7y+82snVxM2bG2HHimBkSY5jMlkEyWyyLmZnZDJIZ Ewc6DenuNHcnzYfuvfO780/NW7XtasVx+vRZM2f6fHCtZ9XaKpckW9GH/eSl +S+eL2Otej/ZfPXJ1mvY83++DXoCMgJ8/WIVKQmArhCGgqIqRCU76An4CKou AbP475/e+8cPT1H4A4nJ3189/tt3h798tf/j51iFO8gIrH/9+gDOKIaCuclX e/Ca8ArwUljw5cvdHz7bBvUAB/nyvaWXh3Mf7fo/fTjz4yebrz9e/+6jVQAr QsGHMwJnPYTPjrPj7PinR8X5qIbCpOF75ZMdtX2t+eRr+ZRrlylNuePXLzFu F3LuFXMxijh3Cmy0lmM34YObbOh6l+VtYcWDVcUD5B2gJFvKe1vKo5r3Vekd L7XWOlRqHymfm2qO7NOFlAQgFkcjUUykhxbMUA4sfTuGbuQmmsGCiZZYWktq JPSWVEZLKguvN2HfyAQ4N7MQ9BvnacDN87RbObTbOdTbF6h38ibu5o3fuTB8 K5dy4/zA9ey+lkxSc2ZHS17X9UsdNy7db71wozGr5Wpmc0NmTV1aZU1KaU1S cU1yYU3K5eqkS1UJmVUJ6ZXxaZXxqZVxyRWxCeWx8eWxceWxseWxMeVx0eVx URVA/LmKhPiS7LiSrKiy5KjyhHOVsedqYs/Vx8dUxiZUxmWXxl64HF1RHEu6 fUnNurPEblxmN8xSa/2jpZ7hwuBkybqocVvWdKABQ2nZVV7dwt1kTVyxzKlE bmIf/CduYqEUmgYL1H35GnKJfrRmTkV6BvuNGZlJPOAxccRT/R0Prty+WXmt tYx5K13SdVEzVKYZrpKTK8XkWsnQVdHodenkXTm7R8bpEzBJXDqJzxyQcAa4 1M4J8k1yd0Nfex2lp2GSckMlAiUZQgldxARGtXAAQG6CZi8C73AT2h90E6uO 5TBNgX2AlUx7ZAC4SWQqF5HcZdGx9AoquIlaMgpng2oSLzb5/8NN8B7CWJMu UA9BexaA9ORtN4kMoBBuIurIfaebdOcTbsLB3eRqAeYmJTlRLTUZI33NcgHZ omPO4rv05YAgNC0KT4vhDKzNScMz4pWAELseFMEaLs55ecCCX7gUEC8GxPM+ 0axHMAs+4uLPOAWzLuGMU+izcl0GpkU1YcG6q9Fc8O9l4fjsvKBTuBBUrC7p dzfsh/u+Z4+n338299HzxQ+eTj9/7H/60Pto17m9ZgovaOYD8M8k8Dl4HhvP aQa75DhMeFaeiek00h1GqsMwCbhMNK+V6cLSsSZd5km3ZdJjpXpsVK+NOuug zzkYc/h5wcVa8nBWfNxl71QI/MvPQ2v8IW9tWrgaFIb8/BUfXOfBlXCAv+SZ mncygxaqzzjmNYwigmbGtIU1Y2V59ZNm6aCC3c4du8EaamGQm+iDjQAspkav S+j3rOpRiwq0egy+nPMe4QbuJqAkjzbNxxgRT3aNj7a0++uqR1s6WIObrM8L p20T8/g0zEUXfQk21W4GLJCbAMSwj3fldIGYEN2ATxS2n+omYBZIPd6wj993 E9xHTjz8nbgJPDxxEYkJ8b4EJ0bSH12PGM4Y2b9rGx93AupB9BP2aAb8esoJ NyEWqDr+qH2cffwopytCT6aNlBkjZVo3CHriU5GQniA3AWvQsm7p2LdBMU7U wv++nrztJlgfYJTQ9WZOFziLgXMHBUoIrLwHNn4bAtYW/DUN3KOcLpOwDQVN cDch+XTDiw5G2MsFN9lfUr+3af38yQy4ySeP5z4+nH35dOHrD1dff7r9wxc7 yA5+/HIXxOSLD1Y+f38ZgEWkpxABFKIDMKgEUWlCZHkdLb47/NsxICkgI2Ac hJugRC+U3AVvTbQXhvOrTzd/wJtxgXeg8YvfPF8BNwG+eX/l1Yu11/hkxtfH 8xlRltefvfE5O86Os+M/+ijIOHc5PfpqYcrt2tzW8rTmwoSbZanXCmLuV6T0 1mdTmvImbxZyHlTwOqotk02fh2VYTtc879A9gdxkVdm2pmwD78DV48G26h6w Lr8HegJu4pmssVBKbMNls5wmFDRBoKHwKG4SqSf7RqD3wEzaN5OQm8zwWtQD BdRrccyWNAIGwbV0jOs4KIByI5N8K5d8O3fwdu7A7dx+4M6FvjsXum7mdNzI fnAt605Lxs3GtOtXU65dSa5uzK64mllWn15yJb2wPi2vJjm7Ij6zIiG9PC6l AjQkMbU6OaU6Obk6KaUq8Zik5KqkxKqkhKqkmMrE6MrEqMqkqKrkqOqUqBqM lPLspLKs+PLMuKqsmNrMqNq0c9XJsTVJseVx6SWxuYWx+XlRV0tTBu5WesYr V3jNi5wG/0S5c/iye/jy8lTtmrB+V970SNP8UN20I6vbklRtSSrBTVyUXOQm zqE8wk1slItviAn5oqH/kolcaBwqMQyXy/tLDPSWRcPQ7qyCN3qDOXy7/XZl bVVOc2NhS1PxRGuioC1HTS7VjlQphyol5GoxuW6qr05AaRSO3uSP3GIOXh/v aR7ubOi5W9N2o7ztZmnP/WrQkwny9Slqm1Y6opEMIStBKHErAbRiMnITg2wY OJHQdZy7RcUhcrre2afLpmfZjRy3lQ8mAnoy45UDoCd+p5hwE/ipywIWwzYo aQYlFdxEJ5/QK0FDqP9WN3lDT/rzZb15yE34bZmEm0RayYnkLnFXLhKTd7vJ ZeQmot4iQW8xqwvL6aq7FFOWfa7sQnRrTQZ4opQ3YDOwZ728eR/AXwwIlqZF KzOS0KwUzsDytHgpKELnOR9v2s0POHl+Jy8IPuIR+h18l5ntAncwsixahklF tWgYbjNvxi2fdklm3fAimp2w7XDH9/7h3MfPsdSsF8+X33+2+OTRzMGef2fL vbXhCC9p5oNin3PKYabbTTSHmYmys7AELSPLZsDOWDcDMzdgY3vNWJKV38oI 2Bh+K81noflt1KCDPuNizHtZwBxWXE+Hjf0ywotVXmBl/tPc1SAWhghjcMJ+ TsjPxivNp0LYlEPOkpuNzzrkhHxYK2M0+nDOTg+Yxn2GUZ9x1KefCJhogFc3 YVNQNLwu4eRt4eQt7uh1+kDDRG8dY7BRMHlLwWqDr4dNM27XTqC4ycai5uEG JiYPN0zHGBBPdgg30WK1J+vq1Vm+Q93vhD021ksKFfswsAmMfs5RG67jOemb bxpKpJucSOIiSk5OcFRmsiQhIibvcpPIH0Vmdp2WAHaKm+wsnYynPFpTvtNN lrBBkLBGo3awFC+wp4jOXShghBbwgYQ8TGxKjmUM9CQyboJyusBKiAXSk6MJ O87JBefEvGN8zjY6ax1BVSezpqFZ0BM9Oag9yuzCC096wETASlT0a2rGDfCL t3t2nWjedSKzi6g9eTunS/vP4iagJHZBu0PYcYQIyysz8R+goIn5TTfxaofA TULeKcJNPnnkBzf5/L0l4LNni188X/nmo/VXLzdBQFC+FkrlAiX56qMwAtWh gJjAbYREELXwf3v9GBXIR1agYHz7CCV0oQDK3/Dyk8h6E7QAXn26gbLFQFKA bz9e+/bF2ncv1lB1ya9f7P31y/1XH65+djj37YdhVIQCoLGMaDQ88GdvfM6O s+Ps+I8+clOiCs/HXEw9V3I+tr4oqf5ywq3q7Ct50U35sTcLE9or04da85n3 KznttXi9iQT4aI6L3GRF0b6u7kA5XdtqPKdL82BX8+BUN0HFJgjURhgFUCIN ZRdn39QLoHoT3E0uM24mslrTAeY1DPAR+rV02vX08dYUYAy4ljp6PXX0RtrY zbR7t7Lv3swCbt/MunUz88bNrOs3s+ubkmsbEiuvJpTVxRVXxxZUxuRXRGdd SU2vS06tSUqpSUquTUqsSYqvSkysS02sT4u/kh5XnxaDkR57JSO9JjW9OjW1 OiWlOjW5KjWxKiWhKiW6Iim6Ijm6MiW6KjW6Oj26BshILwUyk8uzE8qzYyrO R1VmnKtMjy6Pjy6OTroclZUfk58XW3Ex+WphtqLz/Az7ygK3MUCvco8VeUYL Qrz6dSFQtyutP1Q3PVI17ktrd0SVK7ibeIbz7IM5yE2sA+dtlDzgRL2JhVxg HLisHSjQkktlfcVW9s1NFz3s5hsEJJN8nDPZ3t3RcOdWVVND4VBD7NS9LOUg uEk1uImUXCUdrGb3VEiGG/Xsdrt4wCUftggHlPR25sj94d6W/o56Sk/j2MA1 9sR9Ga/foqEZFGMq0aCc34dFTMRkbNaJmIwAN0F6AqDJJifc5F+YbxJRCA8y AmKyEFTDGTyFcBP4Edxg03OMKjq4iUY6Bm6iU4wb1ZO4mPxb3ORkWhfepwv5 CIqboLp4wkoiwiVE0+A/7CY9hfyeIkZH4dCt3PpL0chNWgg30YObCOb8gvmA cCEoWgIlmZWF5uTA6oJyZU427xfOeEFGpnwOrF2V1UC36OlmHdWso9kMLKd5 ym0VwOe5OK1dW7LurnsOd6ffe7Tw8bPwR0+WPzhcfP/RwpO9mYfb/oc7/o2Q PbRgmpvRBv0Kr1vitAttFp7LygCcFgZyE3gLsBKrnmbV03ErYQPwLuAmPgvd b6FN25nz7qk5F3vGyZxzsRZ97EUfnFlLftZSgLUcYK8EOSs+ZtjPWg2w14IY sFgNsNanwU1ARrAfAbBY9tCX3awVDwe2c2Efl2AtwAdW/Ty4vuRizdloQdP4 tJm+6JwCQ3Eoh+wKil7Qo+F2KlgPJLQ7bEoTjVTPHWlVcdrhulU1Cm4COPXU WRd/Y0G9vwY+coqbPN42HG7rUFrXoy3d/qpybU4AYmKWdVvkPW4dOWgeBT0J HQdNTnCqm6ByIZTQhazkXW4SWSpC6MA7jOOo31dkOOPERXT9990Ea8+1qgAx OVxXneomRFoXspITboJ8BP2laI3V13hZaFI86Am4iU9HnjGPgn2gbC4igELk d6HykyU3ddF1pCfz9jGkJ7PmYdATcBMidILrCQl0QMu6paC2qOjXQTGc0u53 6cnboZNTa+EN/Pt6BF7VfpSjhf/Iwn0Dwk2cok6XuMuJl+RbhG1HYoIXmyA9 sctJfv3IkpOJFYLNSA6WNc+3bC8OfJ8eBsFKvv4wjI04/HgD3ATsAxWbEIaC dAOrTP9i5/VnWyi5C25DMQ5kKCcmJxKG8vfvn/zjh6dEsckvX+3D+R+vn/zX 909//nLv+5dbwA+fbROG8urYetB7wcMv31/59HDu9cfrmHd8tv23rw5+/Xz3 uw/Cr/FRjGAlaMrJX+CVv9qHe+Dhn73xOTvOjrPjP/pITYs/n52QlRaXkx6X fz6+ICu6NCe2LCuqJi+mLjeq5XLcQMslTnfdVFetZaLpsxX5J4uiF7O8Q+fE lq5vXdW9pcHYUXXsKNt3lG074B1gJZI7ICYh8S1wE9NgkWu8CtwkLLkNeoK0 BTXpwgBD0XXtAvruPUPPnhEDxATOO/qubV3nLLdFN1CAzUm8lkhrTWS0JDFb kllNKaymNFZT+mRr1khzRv+N7O7bOXduZV5pAfuIu3w1Mf9K4qUrCRevJOTV J+TWJ+TUJ2TXJmTVxmfUxqfXxKdVJaRWJaRUJsTXJsdhpGDUAanx9WkJVzMS GzISGjJhEX81PR47Z6TUZyfXZSXXZiXVZCZUZ2BUpceUp8YiKtKAOJzk8rSk 0tS44uTowsSooqSYkmS4IaY0IbY4Pr4oPrEoPrUoMb0wKaMgqaMkXtFbN8O5 G6A2zk5WL9NKlyfy9wUl29zCbUHxnrx6V1m7rqxdVdatcCtdQzkOcrZ7+IKD kmsbPG8nn7cM5lgGc83kCwQWOHdm20kXTeQCw0ipcqRMz7u+GmRurqpHKVdp 47fv36isLc1pa61sa64kX8li3i6Q9VepR2pUI+WyoUIp5TKXlCcbKbUJbs7p B5fN1HndpF8+whm6Tu1rnOi9MtHXQCe3TI3fETM77FqaXUc3KifV4mGFkKIU D6kkw1oJhYiboKAJLMBKiLiJQ0dDC7d+EnDpqS49zQ0cO4vHxHabOG7TlMcM 8LwWvtPEhb23zQCbWy6YyLQHG9gHboKSu0BPkJvAT606NrgJqjfRysb1v7nJ 5Ak3MSuHraphu3LIKu3Xc9uVE61iSr10oELaX64klahIRZpe0JN8XW++mlT4 tptIOy4CkW6C3dCbq+g5L+vOlnZmSzDOSzrBUzBEHXniTtCWfLw58GVZZ46s 87ysIweQg5W054genJd2XJB3XZTBi3deknRcknReAjHhdxQKuoq5QHcJp6uU 1l5MuZlXmxdTnXeuNj+qtSqV3Fmt4JFA63wOTtDNmw9KVuYUoXnl0oxsLiAO evh+Jzgdw6qfMOvGLfoJm2HSYGSYLByXSxQMqpaWTJvrrr3dwKOHs08O5997 svT86fKzx0uPH8493JveDlvXFvWhOc3StHLWKwk4sRwtr43rsYLLcDBs2MJl 5dgMEw7jpNNMc1noLivNbQbodt2YQzfmMlLBR4J25oyTjVWI2GkLTvqKhx32 g0pwVrxsfGLjVNjPCeO9dvFOyJy14NSqnwOs4Wf4UdjHCuGhB+y6j43hZ2PX vSAmjJCXCTfAlTV4bgDuQT+FpzABuGHZTVt0Uhfd8AswPbpRu5JikQ7oBD06 fjecNbwuGfOBiHpHxmzTC0gWGXxpR+H3t2O//+SMk7M2r9hfM6JsrmM3MR6s G4CHG3rgYF17sK4B9sOq3WX5jHXcqe63yrsBu6LXox2cw/vihjxM8BGU0LWF QiR4ihdyk98mMOL1JkSFO/KU38/sihxlsr9yWvrWggRLrFqU7i9JD5ZkB8uy h8tyWP92BbEsi/AUWWSqGHqIpOPRmur33SRSTDA3gVdAjYUXxFtzQtRNDs7r eEnOipe16KLP40M8A/isE2x8ScRYE+Qp8OnBPzf2L47Xniy7QUvBU6gLjsl5 2/isdWzGPDJrGZ01j85ZxmZMw37doE876FT02qVdNnGHif8AM4ipuyAFdkmn DRB3nODU/C6wGNTaK7IuHtwExU2QmyBQAhiRwXWUxyUA2m1CxLEBwVncaUcT IXFg7dMMTRvhe8IOe3hrAfFh2PDxvvfFvu/jh4HP31v+9sXG9y93gVefbH/7 Yuubjza//nD92483v/9s94fPd3/6cv+Xrx/C+Vfwjq8Pvv9s68sPQh8+DH64 H3j5ZP7Hz7b/6/WTv393+NPnOz+83IKHv3y59+vX+79gFe47cP7L1wfYFdwd UD3IX0FPvjtEKvEDHviAZ6FmXNgZ3OSz7Z+/2IWnAPCyaPAi3P/fr57849vD Xz7fQeESEJZXL9aQnsBL/e2bh+gt/uyNz9lxdpwd/9FHUnp8cnp8elpcRmpM dlpMbmrUhdRzRRlRFTlRlVnnruZFk5pyWZ3VzPZKO/XaFyHFJwuij+cEh46J LW3/lrZvU929qeraVnZsyR9sSe9tSu4CoCHAiugmuImhvwDcZJrVAFdAWCJb dYGbbGs7t5GevO0mui4A3EQ/UMi5kTTZGkdtjaM3xzObEtkNSeyGVHZD2nhz NqUps+P6+Zs3sqtaUy9cic2oiUqpjjkmNrUmPqUmPrU2IaUuKRmoTUmuS0k6 BjORK+kEiWAlOJEXj6g/H1+XnVCbHV+dGVuVEQdUpmNKAmJSdkQ8UJqaWJEa V5oUXRR/riA2qjAutiQRHgKwOEF1dnR7dbZqsGmWe2+R3TQzeml54uIm++IG J2+df2lNXLwiLV9UVC+q60L8Svdwjn0w0zMCbpJj7ssANzEPnDcP5pgGc8zk XISFcsHVlePpu2Tsv6QhF8hGShScplnvuNvDkMp6NOpRCW+QNnj/Xn3x7aqC gbpc5u0y+UCdeqRWPlQspeTJRy7wBzMlI3lmztVZTU/IPLGom5xWjE1Rmhh9 9RPdNWPdNROkega5hT1yQysatGmoNh1TLx9XCIdkwiGFeIQQE4DI7AIxIepN kKfAwqObBNxITIAjMWGBm7jATcxTONikRbeV78DbCKO0LsJNUFG83ykm0rrA TUxqBrgJiAlgwHO6ADAUo3o8EpOCgo04UQ7ZZYNGbifmJuQ6SX+ltK9C0Vui 6i1W92JT4LU9l9XHYkK4CSjJqW6i6D4v78qWd52XdWF6IgU36Tgvas8RtucK O/NEnZfEXZcBSXeBuDNH3HFe3JGLk4PFTTrzhB0XxF0XJT0FgKgrn9t+gfMg R9RfLeyr5nSW09tKGB3lrJ4aVm9NVW5c+flzVRfBTZIpHVUyTrdVPe53cb0O jhM0xDAJGoJMxKgZhYXdRPPY2bN+0cq8cm1Zu7nt2tnzHzyaPnw8d3g49/Dh zMFBcGPNuRa2hVesK4umxVnd/LRmLqAKungB55TPzvbamG4Lw2WmoW69qE+v 20KHi3iHXga+pntsdK+N7rczAnZG0MHwW6gBKy2INR9mLLpZy14OlmcVkaID m0xkGWu4g5xgPcBd808hVn2c3yHkpSPCPsaqn4mANVxZ8dAQy24qhocz52D6 TRN2FVkv7FbzOrX8bi2/B9AJevXCPqN4EDBJyFb1sEU9ZNUMOw3jQQcrPCvd W9VHBE1MB+tGxEPQk3X9wZruYE27v6o+CKsPQiqQLGybbRr2aAdssm7UiAn2 2CgEEPYw4Q9Ec9K3j4MIoCRb+CjGvXkR6gxMlMMjPYkoBpG+OaDkJJH5Xb/V m2AVHxgHi1Lg4ZIMgR5Gsv92R6/jOEtktTsYx9ti8q7QCaxRXTxY0hb+B6IO Y1i7gCAX9VtedDOwaaHHnbiIXsHAgn0SProwLqdoMAoRTIkskEdZYei5qLLe re53KHpBQ6ygHriPWETtAPEQ/Yjg1ADKG8MZj8MoRNzEcDypBDALTnOTd/iO Q9KFcEq7EW4lOWiYWAYX9gu35xSPV00f7/s+PZz+/OncVx+sfvfx1utPQUx2 MD7ew/hkB658/3IPhOWHz3a/+3gTzn/99tE/Xj/55av9r8BNDoLPNl0f7QXA Ef7n+6fgGlgxyAch1DgL9csCTfj52COIcnVUEgKgtlpw5buPVtET0aQSlJeF noJ6cIF9gIbAj+Bd/v7tI9Q0mLhOvDJ6Qbj+Z298zo6z4+z4jz4S0+KSUmNT U2LSU6IzU6JyUqJyU8BNzpVknKvMimotjO9vyaO3VdAflDto118uyV7MCcBN Dqyja8ruDXXvmqJjTd6+Lr2/Lrm7Lrq9Jry1KrhJuIl7olrfd9kxWhFkXg2J bxGhEzQdHgPXE+QmmJ5EuAlc39J0THOaNKR8RguISQKKm7CaUziNqezGDFZj 5nBT5mBz1t2WrLqrSZdqY9Jqo5LqopKrYlOq41JxJUmvT0q/mpJ2NTWlHiO5 Pg0nHZF4NZMg4UoGIr4+/W1iazJjcSuJqUyPrkiLAcpTj+Imb7pJQnlKpJvE FCe8y02K8mILs6M7G7K0E01+Xqt7PH+BVbTMyAmzL4S5l5Z4BfOC0jlJ9Zys Lsyv8ozkEm5iIqXbBrNPdRNn13lXb562J1c1kK+hVlkU9zaWeU+euchDdQN9 Vx/cKmu7VjHWcaP/xpWB2vOs2yWKgVrNcLWcUiAlX5AP5SrHLirH803sumlV e8g0uqSbCEqHNewHUuot3nAzm9w4NdwinLwtY7UJaW06MQVv2DWpEg0rBBSV GMvpQnlcAFEOT0yER3qCwNwEC53QPAY6xrvdBEVGQD3QZBNwk4WgGgVNQEyQ myA9sek5Zg3ToKSCmOjkE0a8Fv6dbqIajnCTa//UTQgxOeEmRA9hefdFWVce IO28IMUq3HMBTDqOuIjRhSHovsjrvMDryuN1XeR25HHhYl8ht7dgqjufg3GZ 3XWZ2ZnP6LhEe1DMBCXprGB0VFA7KsbbykfulV4piK++GFtbFH/ryvmh7noR u9ugGFdJBpSSfrV0UKcYAj0JuHnLc4r9LdvjffezR74Pnk5/+GwGgMWTJyAj /q0t58qycXZa6fdKvC6RzcSyGBgWHR2wGZh4ChbHa2F4zXS8SRfNjYGVCLkM k3CGK3DdZ2H4rEy/lQW7d2DayZ5xsWfd7Dk3e97NCfm54QAPL13HwiKwXcdC JD42KhxAhkKUh5/mJlP4zPo3fvqvugmC0JMF3JLmHHSPfsQs69MKOlXcdjUX MxSDqM8iI9sUQ4BVTrGoKCYlGbDrRpGb7IZ1+2sGQkkwK8El5XDTCDzaAEMB PdEgN1kLcoHVAGfRRQsah0FPNFN3rNIuj2YA9s/wtxMNuzaOZ8FvzfCJcoyt iKHw7xjyfpSFtbVwyrD4SHn5TS4i7IMQk3/JTd6OkhDVK2+by9tugt18PESS cC4iPASGsoqaJ0cUlRDGAW6yHNFMAHUejiyQj2wvDGvUkdivp4CbAE5Fr1Pe Q2CXdoGGOGTdABZSiZAUJAuRrYaJQY2Em6B6E0xJhG2A4bhsBOu4hYdUrLw3 IGIlkRBvAWeXrAeA9wU3mbPQV1zwBwrATR6FDC/2vF+/v/TdRyGsN9en27iG 7GE+8ukBxsu9Hz7bx4HF7rcvNn7+8gDlZf34+c6X76988Xz59ScbP+BzRkAH QBlAHNCQETgjuUCpVijP6kdiRsnxQ1Qk8urF2hfPFj9/uvDth2FU7U6UtKPb iPgI8BPeswsJCLwjnJHsoDNcR7/Gn73xOTvOjrPjP/rA3CQtLi01NiM1Jis1 OicVc5OCtHMFqedqc2PaajPH7pYwO6pYHVU2auuLOeH7wamPZrg7Rsqi+EFY 3hmSPghJ7oVFd8KCW2H+jRDv+gr3GlgJsCS47hqvAjdxjlVOsxqQm6Dxi0TP LrCPrbf1xNCza+iG6+vKB0F2o7r3Eq0phtqaRG1NZrQkM5tT2E1pzKYsRlP2 0LXc/taca41pRdUxGdXnkuqj469Gp9QmptYmpdYmp9Ynp15JSbuSDhBWknRE BhCPkR5XlwbE1qbG1qTGvAPcTY7EBAMXk/+XbnK+IP7C5djyoui25lQ1tXaa V+ejFS4yLobYl8OcgmVO0Qq/YkVcvyS+Am7iHb3gIGe5h3Pt5PPgJpb+TPNA 9ttu4u65EKQUWSmFWkqhdLhYwrzqtgyEV5VM1i2lYog1+YB0t76rpepuTRGl Lpt1s1DaW64ZqlQPFcopuVJypmggXdifoRgpcgtuhI1Dmzbmmpm5YJ50KwY0 zPs8ShODVEfvu8IcaORP3FFye4yyYaNiVCsdVokoKhHZIBtGYkI0EEZTTpCb oIgJPhQeNocn3QS16nrbTYjELcJN0FCME326TsRNwE0Mqsl3xU3MuJs4VcN2 +T9xE9WbEZN3BU3UpCJpV4Gk67K4M1/ceUnUcVGEZAT3EQHQCeTxOvO4nXmC 3iJuV8FUTyG3p4jdVcDsLOD0lPD6ytndJbSOInpnMbunjNtfxR+o5vbV8/qv TvU3cvoapgab+CM3RZP3uON3xcxOrXTUYWC7sLiSwOeUhBc1O+vmwz3X+0+C H703++L53Mfvzz9/HAAxAT0BSVlb1s4HJX4X1+/mu+1TNhPdpB03aMZMmnGL dtKoGgPM6nEr/EvhYSyvmRWwMvwWug8bbkL1GCfchnGXfsxjnPSaJuEi/DSI 9fVlzTrYsy6MeTd7wcNZ8EzhHbQ4qwFst4nla2FWwoyMmETGTYgK8XeBWwn7 KI/rNN7lJoSeENGTRTd90c2cd9KnrZMB85hTQ9GLusBQDOIei3zQrqQ4VEMO kFbVsFUNX+xBwKEfm3VPrS8o9lb14CaISDd5vIWB64mecJMQSBORmeZjw+Y5 YBgCQ8FrCnpgzwz7Z/S3r+JpachNiLmEkeESwlAi14SqoHSvExAK80bIY+mk mDxalkdKCsGpboJE47fpiriYvN2++F3Rkze6CuO/NkGkoWBzYbwsFBYB1wDR mDGPommMcAU+LpTzBh8Xuu2EnqCpKPAQngIfMnzmaNa8TzvoVfd7VH0Il6IX rAQkxYU7S6ShEDNQiKAGQFgJUYGCtRHm3UMDE7GF4IEF1oKj7sR2wZuITw5Y QUli6GZiKCQQ0I0u2lkhNzfs5W/OyB4u6z/a9Xz34coPLzd++mL/168f/fr1 41++Ovz5y0c/fgY8PBaTfTzXawf0BNwEtf999ckGchNkHygC8n9+fO9/f3oO avDfr5/816vHv365hxQDRU8iAyLoKbBAzbWQdMDNwNfvr6CewLCGe4jgC1z5 5oMQ+AsAN6NpJuAgcI58WcKJ/uyNz9lxdpwd/9HHSTfB4yaXks9dSjp39WI8 qfkSta0S3ITdWW2nXnsxJ/pgmgtusm0gLwjvhWQdS6K7S8I7K4JbIf5NEBPk JsvCGwC4iXui2jhQCOe5qWbCTdZkd5GbYLzlJqgW/sBMgiub6vaZqWZdfwGj JW70WuLYtaSJlmRqSyqtKZ3alDXZlDV4Pa+zKbuuLimvIiq1KirhSkxcQ1x6 Q1ra1bTUK2kp9WlJdamJdakJtanxR6TF1aYhGcGozYitAdJjqoE0ILoqDV+f JK42C9OTiLhJLB46eaebFMaduxwDegKS8i43SS5KTC9OuFgYVV50bqTtgp1R 6WWULtEvhxiFq/SiVWbpxlTtBq9hdeoquIlvLA+5Ccrpepeb+Pouefouqjqz 5aQ8La3abyZ99NT8ycs5qbxHJh3kMbsZlPvDD1q6m6vJtZmsG5fl4CbkcjUl Xz6YLRvMkFEyxQPpkv4L2vFKJ/d2QNQTEJLmDSMeOUnHvicebeFRGnnDLYLx 6yLqHQW7XSfsN0jIWvGgRjSAUrmIKnhUb4IkBbXqArBKE6wQnuE1UL16KhIT r5HhPRKTU9wE9eNC9kG4SaSYwHXUp8uiZRlVdDR7Eas3UY7jVjJ5ipsoh2y4 mzjkZBOvSzV5XUKpF/dVSEjl8p5iZU8RKImm57KmO1/ZfTmyBB6sRNKed6qb SDoLxJ2XRZ35gLDzkqDjEr/jkqDzEr/rEq/rErczgp4ydlcpu6tkqqec3VXG 6CihtxdzeqpY3ZWM7kpWbzW3/wqf3CCgNPKHrkkn7mqneqzSIbeG6jdxZuwC rH2WR74yZ9xe9xzszTw+XPzg+frzx0HQkKcPvWAiB9v2rVXj6pJmxicMevgB N8/nnHJZmQ4z3WakOkyTDuOEw4BjnHAZsTiIQzPq1I17DJNeI9Vnoh1hHPcZ x/AevL+14YWHftNEwDw5baXO2GizdrzTL17SPu9mLnpYyx42Ng8dJ+TFKz4w EwEroYe9dCJcgpQEbc5PV5IAC3g7CPI7RLrJiSce6YmPteQFN6HO2ifxM9Vr GLGrBqyKPrtq0KUd9uhHXdoRrBpFPUS4yYyLszYvj3STSD05PBKTN+Imx2UU zGU3A/7AjeP/6p+1jDmVJDTPwqsdhO13+M3+Xdt49ITYq0cmd70tJic2+QQo deotN5GdEBPEH3STN4pHjqUDGROhJyf7Bp+WA0Y0Rn6Xm6wdf1ZEdTxK0wLv gM+KCDbBh4ZqT4j+XchQUMsveCJIDQqdADOmkWnDkE8zQBiKW0kCwE0i9QQz lOOgBviCS9bjlvcCqHA+smcXqjcxCB4AejybC8QEzkeuIXyDU93kyGLwN4LX h/fyKvv82pFp4yS4yXpABG7yZM38yYH/2w9Xfny5AWLyj9fP/uv79//x+vnf vnv28xePMT35/AAXk73Xn+68/nT7x8/38PNRxfr3L7e+xttkYQUjn26CUMAZ ZOH/+uEZAgwFPCVyHiJag1Ygm0AhFTgjPUHxFKQk6AY0rASeAqYDZ7jy5XtL L/aDnz2eh5uRmKC4SWSo5awW/uw4O86Of3oQbpKeEh3pJvnJ5xryE/pa8ifu l9MelLM6qpz0G58uSj6c4X00w9s2khfFD8BNFoV3FgW3MTcR3Fw9BjQEQPUm 4CZwBjeBh3AxsuQEAw+dRFadACAmj6z9WFqXrnOef81EKWFfTyRfA5KGW5JH m1PHmtLHmjJHm7JILbl36tLKK+JySs+lVEbF18fGN8SnN2alNWSmXk1Pqk8D K4mrTompSo6tTo3BSIuuScMbamHE1mT9QcBN4moy447TumLf7SbxZcngHVER bvK2lSDiqtKjC2OSCs6dzz93tTqO+iDNSiudpxcu0ApD1KJVevkGq3aT3bDB aljhVnhHL9gHM7GKeEoOiIl1IOtUNwkOFnj6Lqm7zst6L4gphUpu8/IM4+CR lUq/ptWMsantXTer+29d7WqqIlelsW/kK0llGnKpcuCCbCBDQU5Xj2TJyRmS vvPSvnz1ULVupElNadZQr8nHGvmDtWxSFbu/hkdpEI62Csauyxj3sFx9AUnF 61UL+kzyEe3xZBOi3gS5iVk5hrp1ITcBB8HcxPCH3IRI2QIBAU8BMVkIqlGx yYkewm+5yTvrTTA3UY+41CP/1E3eFpNINyHEBBB35Yu6MCvBxASUBGcKI3+q 8zJGF1A41VXE7q7k9FazSdWcvtqpgSsAi1QrHrshnbglpd5VMh7oprrNon67 lDJn5S45hetB1f6y5cmG5/nezEeHS+8fLj17uPDkcOnJ4+W9vfnQqndu0T4X lIKDuG0sEBACeAhKgtpnEfisVK8ZfGTcqQcfGXFqhwGPbtSrH/MZxv04Pt2Y Vzfq1lLc2iGPbsirH4Y9vM8w6jfimMaC5vGgeWLaMjljBajzDqzCfcGFDfJY 9jCwEMmRjzDAR1YBD30NAE3ALjKJrK3fdRPGWoAOrPppYR8VCHknQ17qadDe 5SZAZGbXkoe27GMglryMRQ99wQ1uRQuYx9y6IcCjHwGcGopVPWRSks0qCrhJ ZE7X2xD1JvurWL3Jfki1v6LcnheBnoRAhfA9M9KxTfz//Fdc9KBx2KHoxXvG dsMaNt5wD5IUuGf7uAoD26jjoH07YQGRyV2nDosnHCGyAddBhH0QYvLH3eRE ghbijV/m1LEmEXryaE2Fqk7QMPrI9sioIxn6Y7GwEa4eKHoSmdZF5MIhN0FE 6gnq3wVPAZGBZ4GbgACCm8yaR2dNI0E9hdAT5CaEnriOk74c0i5CFpCYIDcB 4HpkfpdJ2IbqTYx4NhfSE5sYMxGn6A3sp3UDQ25CvJdHQfKrB8BNgoaJJQd7 1SsAN3lvw/bFk9nvPgodu8l7//3DB6Anf3/13q9fPQE9+emLh0hPkJv8/OXB 9y+xiMnrTzfBTdDAxB9eboE+oFQu0ARY/J8f3/u/f37/f396TugJshJYIIgi FBTmAMv46vnyZ0/mgW8+CCEfIbK24B6scP7rA9ATeC4KrADwLPQ6cANxEQQH FOnbD8PffhD+szc+Z8fZcXb8Rx/JGQkpGQkZ6fGZabHZaTEX0qLy0s6VZEUV Z5xrLkjobcobuV00cbeE2V4JbvJySQpu8uH0FBY3Ed1flrQtCG6Dm4SEt1eF t9dFGBviO6Ae6/J7oCE+Wh24iWu8aobdiNwElZyg4YyEm7yd1vXQ0geLLW0H 4Sakaxj9LcmDzSlDjWlDjZmUxqyuhuzrVUmlZbG5ZVGplVEJdXHJTcmpV0FM MpOvZCTWpcXVgI+kxFQnR1enAlEYaVHV6VE1GNFVmTHVWUBsTfbv8+9wE+x3 KI2PKjqXlH/uUtG5G9XnqA9SAvSiGXrRCr10lVm1yqxbZTZscFqXpypQvQm4 iXMoF8TkXfUms0PFvoHL2p5cZf8l2UiJSXb3yZ76g48CLPZtiahfwO5hDbdN 9twevNU4VJ3Gvn5R0VOsJRerBi/IB9Llg6mAtD9V0pctH8jXj9YaR5s15Ebl WJN05KqQXMsbqOYO1AqGGsRjLRxyo2j8hpLdruF1q7jdGj7JohghYiUAGryI crpQ1Qkxe9FrZvuO3QQTk991EzRXESVuTXtkSzPalTn9rE8Ba8JQjnK69Gyz 5o2crnfVm/wrbpIfWf8OYiJuuwALJCyRbiLqvijszhN0AhfBSnh4iITdfonT ns/pKOR0FnG6Sqa6S6e6yxh9dVNDzVMjLZzhFsHETQnzvphxTy/qd6jHgnbO SkC6tag7WLU83nK+PJx/sT/zwd7M+7szT7cDB+vevTVveMm+OGcOBg1uj8bm VJrtcsBioFoNkzYjFQEOAkpCiAk+c4QOD8FW/JaJgHVi2kadsdNmbNQgPDSN gWVMg2uYxoPGMWDagBEAGYnApx8BsNvMEzNgJTizVuos5ibUBScNnzOItU5C mTarXgZuJTQcKoZ7ctXHQllMKB2LiBecoidBxnqQDqwFaMCqnwqEfaAnE2/x e24SGToJBZgrfhATOrgJiAnoSTjIWfaxlr0sEKugZRz0xKWlePTDdu2IDcdl nJh2slfnZESshLCSvVU9FkxZRVai3Qur98Kq/ZAS3GQ1wA1hM1mwzC7UVwrt orEYCv7HLuNZXnZ5Dxps4VSS4CHafmO3BaZQ/UWkoZwSOln6rfzkn45ZPFg6 JWjyx93k1Ip41BDsxNjHd90MbgJes7d89CuhkZFEiheqiwe28A5mqKgEdAMV ksyYR5HBRRYoReZ3EW5CzGdEKWEgJqAn08ZhcBOkJ+AmkUpyAnAEBCgJKANR pU5ApHhZxB16PHRiwevrwU3gjLzjRNzEdlotPKqpB0NB9SbwjljcRDcyb2Vg TbrwWvjDkPHjfd+rF5ib/PLVw79+++Rv3z0DMYHzX75+9utXT3/56vBYT3ax gYxYTtf+9y+3kJ78ABIB0nFsHGAloA+I//n+KbEAK0GF6ugGFEkhtAJARSgA OAX4BVHYjo0ywTPBEEQNCypRgSuo2AQW8NzPny589nj+i2eLLx/PwRoWf/bG 5+w4O86O/+gjJSM+JT0uLS02MyMuJyvhQmZsXkZM0fnYstyE5tKszuaS8Y6G qYFb7L4bPn77y5D6WYB/6GZtGYeXZV3AkvDesuheWHx3Q3pvW3Z/R/FgV4mN VtxWt4OGuCeqTYNFtuGyBV4ruAmqkQc3QcUmmJ7gYkK4CaEn2HwTfLEovGEk FzNb40cbYkYbYkebEkdaU4Za00gtGV2N6bdbz9fWJOaWxqSXxiRXxCfXpaQ3 ZSXWYSTUZsbXZMRVp8dWpcdUpYFTxFYjMjHLqAHXyIquSouuOsraiq3JiKnJ iK3NjK7NiCKoOyKmJiumJjOmKhN0JroyI6YiI7oiHc5AbPkRcTiJZSlxJUc5 XVHgJsUJMXiKF0hKdDGQEF2SGF2KkVwam1Qck1R8Lq04OqskNr8ktqI6nj5Y ruNe9/Gag+y6ELdmh1ezO1UZ4lb6xvJsAxm2gUywEnATwNSP6QlyE7AShLX/ gm3gonHwsmbgspJSrKU3zJsoLx66JMx79JGbnbcrbjUWt92oudNcMdiQQrud K+4tUpBLFeQief8leV+esv+CgnRB0XtBTbpkHCy2DlfaRqoMQ5U6Srl6sFwx UC4bqJQM1ojJddxBMJTrUtoDOatbIxjUS8Z0kjGjYtIgn7CoaWYV1aiYMCkm jPIxh5ZhkI5YlGN2DdWlowfMHI+e4dbT3QaAgVWaYLA9Jg7CbZxyG6a8Zp7P IvCY+E58KDwqe5/xykPzhp01J5xBUkBPiFwvkBQ0Fx7vHjxpUtNNGppBNXFq TpdDOexQDDnlZLeCbBV0y0eb+X3Vwt4KMalS0lMu7iqWdhaBpMh7iuSkEllP saSrUNxVIO4sELZf5j/Il3SXyHvLZL1l0u5SWU+5vLdc1l0m6C2Z6iwADeH1 lPBJZbzeMl5PKaenlI1RNkWq4A9Wi4bqpaMNtPFrXM4DhazfpJ/wOKamfaLZ gHhz1bK/5Trc9T/eDzzeCz7ZCz7dn94NW5aDinmfbMEvD7pEbivPYxeYDSyr aUqvY2k1TIOBYzBMGY1cg3rEohtzmKhuvHGWx0J3m2l+GxOrUrczg3bGtIMx 62IteKYWXYwlF2PZzVx2s+C86KQvOGjzduqcdXLWAnoCbjIaNIwE9MPTplFs bRwNGEb8+mGffsinGwoYR+CeGfM43D9vox4BW0E82x9tDo/dhLXqZUYAu27G up+57mOu+RjAug97uOFnbQROYS3IIFgN0IGwnxbyUd8GDGjNy0Cse5lH+PA3 gose+qqbHnbTwi4avOmqjx72YNGWZQ91BXTGD28EBoFVxMw7adOwmzWNeA3D Lt2QU0txaMku+BwctPV58aMNMBH1Tli5s6raWQPUu8C6+mBF8TCkPAyrgEdh JdaYd1G6jv/HPtKuyCBRRJk/tqOGT8ynI4OhoMoFh6I3aByet00swCYcn8CI WJ/hh2ArjgYyHvfp2l4Uw05+b1FygHsHav+LOgMfhpSPQopHKxjwELG/jEnH EcsYe0tStEA/OliRH4Qw3tV96+1aklNLS1AZPtFt+ER1/IkRkGgYPRE92cBm MmJDTzbBU/xTIQ8L1xPavA2+bJOoWxeKu20GeaAwWxH5XSitC0kK8VVEWWEY 1vEZC3y3h/06ikcz6FEPeHF8qgGPss8NMgJ2oOrHFkqSB5cXp6wbcKGyFFm3 Q9qNqlRggcVHZN1Y+fxxEb1Z2HbU/ustLPw2M6/Nwm+3CoAOrDRe2Il1FcZC Kl2AS9YLYgJ6EtCPz9tYKx682CRkeH/H9dnjmW8+DINr/PjFwa/fPPnbq+d/ f/X+3757/pdv3vv162e/fP3056+e/PTl4Y9fPPrx84fff7b3+uXuq0+3vvtk 8/XL7e8/2/nxi71f8KBGpJugGAc8RFfAMr75IPTdR6vgEfAQFaSgFlsoxQsF StBFYnIiES4hKuuRmBDZXyhGg7QIbAWFXcBuXr9YR/LyZ298zo6z4+z4jz6S 02NT0mPT08FN4s9nJV7Iigc9uZgeXZKb2Fia09ZURiXdUjLJahZlWkr6NKR9 PiN54uPu2SbX1APLsu4VcVtI0rYue7Alf7CnbN9Xtx9oOvb13aAeq9I7Xmqt mVwMbrLIv4aCJqjkBPXpIupNiLQuwlD2jb17Bqxh15LoJnKT8broiSuxE00J Y62plGvpXa0Z95vTWq+dL6tJyCiJSimJSa5MTKlLS2vIiq/BiKs+CnOcAF1H 92AzE3FQsUlMTVpMbXpUbfq52jSMut+IhpurcTGpyoyqzAA9icb05A03QYCb xJfgtfDgJoVxUbibYGEUuFIcf64kIao0EYguS0ovikotOJdSdC61JDq5ODa1 MCajKK65NYc23mzl33Bzri5MVe0KKvZ5xWFepX/8IriJpS8diYmlP9PUj+nJ CTcx9ueaBi9q+vLkvRe0Q6UWZuuGfWJnWqLldEzbeC4Dhz7a1nanrro8p785 mXovR9BbKB0slQ6UyPqKlAPFqr4CZW++sjtP05Nn7Mu3Uoqco6UWSomJXKwf KNYOlCj7y6T9leK+KtFQs2TshmjinoTeqeJTtOIxBX9IJ50wqxk2HcuqZRqV VL101CAd9Rg5Jvm4UTpsVY57DMxpy5RXx3DhAZSIMfHYvEWvacpn5nqMXHAT n5kfsIp8ZgFIR9AtBQeBBfjI6qJpe9Wxu+4CYA0/cpq5oCewsGhZWtmEWjIK bmLRMsFNdIqxU93EpRm1yclWSZ9HSXGISfKxVm5/jbC/RjxQK+6tFHWXSXvK 5KQKTDpIZTISnCskveWinlJhd5mop5zXXizsLpeQqmX9tQryFdVQg5LSwOqu pHWU0jvLWD1V7N5qVm8Vu6+aP9IgnmhVMm8bBO1u9eCSk7k9K15fN6xtmNYx zOtr5tWwcWVZtzSvnp9WzPhkAbfY5xC4LFy7kW3RgmcNGVQjNj3VosWmtNiN DIeF47JxzXqmQUM3G9k2C9flEFp143bDBFiJ384OOqaCDnYAm2/IWfRyl3y8 ZR8XtfDFumZ52StuJrAMkuLENn7AAuYmsIsbBx8JGIb9mIZQXKp+J2zbYAun JcNDuB7ExGQUneFmeNYx2L6R2BCiLSIqBzgB5iM++gk2/Iy3wZTkmDCISYAe 8tNWfNS3WQcl8ZzOmpsOrLpoRxARnKNkMCyegg92ZGG1IR4smDLvos3aJwPm UY+e4lD3u3TkGSd1fV74aAMb/r63pgR215Tba4qddey8tyjeXxAfLEoeYsXm EljvzgkjG3ARVrJFzDQ5BhnKnHXcoxmwSrsskk4UQJmDT9LDDIPazArQpn3F x0ZpXZGhE2wnPyfanRPtzYsB1CIYiAyOHK4oEPsrb06NP5YCVMb+OzbxW5Tk n6nKu5p0oYhJ5Cv89pu86SbA7jx8gCIwlM1p/rGeMIivKBgKfGlXffBhCrZn BPCRoo8RBeMix8cTYFle9slZ28SMdTyIf73hywxfaY9qwKceBDfxKvsJkJtE BlZgHVmQgqrmUQviyObDRGviUxB2gJLgVoLJiEPcDcAazk5Jj1Pa45aT4NcA Zszwq7LBTbZmFYer5hcH/i/fW/j2xfr3L3d+/urwr989+xuIyav3//rd81+/ ee8XzE2e/fwV0pPHwA+fH7x+uff6s51XL7fR+btPt1BOF8q/QoUh//36Ccrm QvUgoAko4Qr14Pqf758SRSjIZVBYBKVvRZalIIigDNGSC5XJwxpeCt4IXgEe fvV8GfSHKE6Bd/+zNz5nx9lxdvxHH6mZ8elZCVlZCdlAZsKFrLi8rDhwk7K8 5KvF2Tdq8gfvXRWN92jYQ/PKwY+X1e/PSsFNdizjW/qhkKI3LO1YlXVsyNu2 Fe37qg4QE+Qm4B0bivs+Wh24iXOscp7bguImJ+tNTnMTOGOdhI29wKLwBsrp GquNGr8SO96YNNqSOtic1tmS8aAls7E5s7gyLg3cpCwOm9iOdd/KRAJyQkZi KtMRkRf/FTfJiK7OiK4C0qMq06NRw67KNDy/6w1OdRMUK4mKAHMT+LWLohKL oxKKomMLo2Pzo+Lzo3MvxVy/lisaq3NMNc5OVW8KqrZ5ZeAmgYlLb7uJEXeT SD3R9WZbhy7rB/OVpIuqwSLteP2mfeL/fLujm+rgjN4eITXfbim5fa2i/V7D YGsq7X6ukFQk7i8WkQplfYVqcqm6v1B17CYG0iULudAxUmImF5oGC/UDhZr+ IkVfiaSvTNxfIaA0CIaa+KO3xLQ2GYek4FOUgmGtZNyiZlo0R3oCbqITD7sN bKtqUi+mmOWj4CYBEydgZCMxOc1NeF4TD9wEDMVvEWJ6YheBfRhVtKBLergb +OjZ8ov3VrDIwv703oZ7IahGxSZgLmYt84+6iXbMKiebJf02+aCB3yUaaeb0 1fL7avikan5POb8bNKRC3FMu7CwWdJQIO0sFXWW8jpKptiJOe/FUZym3p5zb U8HprmB1gYlUcEjVU6Takc6qSVL91Mg1KeO+htdtkg06deMzjqmVaen2iu7R pvXxjv3xjuNw276xZgqHDMtL2vlZedArcNvZViPVbqLZDPBrj1u0YxbtqFkz YlBSjHKySTFkVY85dJOA00D3WDg2Hc1pYtkNLNTv127kuOATMNJ8Fsa0c2rB K1wKiJd8wkUvPxwUrgaFa9Oi9RnRxrRwLcAP+/4FNwExsUq7TaIOo7DdJuuB 7dyMeQzdg4CnHD/93+ImR0ETPG6C3OTUuMmpboKshODo4mluEvIxgLCfHfKz l33MFR8r5OcsuujTljGvnuI3Di+6GbBzxjbY6+qDNUxPdsLyrRXp5rJkY1my NRsxMxGfUXLUawuvmyAcBI1cjJy6SJROwAJ21PO2CTSSAxuMbhz2GobAj+Ct wVBQstOyl4WlPCExWRSjPCjYouOBBoxd3FMiVQUZCojJ45DyDSOIcBOUHobc 5MTAxBP176dayW9JXMtHPN7QAMhHgMN1deTDE52+IktmkJ7sLUj2cD0B9UB6 AiYC31X4iqLoyZGbTGNtzdCIefQZHneZjmjgdtwRDv41F5y0OfvkjGUczBp9 vd0gI6oBP64ncAY8ij6il1ckR6Uoke28QCQjZOTUUSkRM1M6kZUQgJUQC3hT +AUCGvK0bmjRwV5281b9op0F1ZN168cPMTf5/tOtn788+Mu3T//++vnfX3+A i8mzCDF5isQE+P6zA9CTH7/cB77/fPfITT79bWQJipgQyoCEhRAKcBPQB6Jn F0jE//70HBWqIFshIilE3hdRqAKvFhlqQdfhuch0UFYYvAus0bsDf/bG5+w4 O86O/+gjPTsxKyc5Jyf5fHYSHjeJu5gdX5ybWFOYCW5ypSjzelVed2sl+c6V WXn/iyXl8xnJIzd7XT+0pu5fVZLW5F1r8s5NRTu4CYqbAHvgF+p2cBCU0+UY rQA3WRbeQAldkSNOTnWTTXgFfMoJgNxk6mbySG30+NX4iZaUkdb0/pb09tbM +61ZNVfTL1fEpRbHpFQkptZnJNdnxdWkn6oh/4qbpJ3iJrVpqGIFbo6qSokG KpOjK1NiKlNiK97gD7oJkFgalVASFVsSHVMcE10UF10QG305NjEn6mJxdPfN LMV41TT/alhQE+KUhngVyE3MpDRUbAJuYuzD3MR4nNaF9ETdlWGhXLKMFOvI heAm6pHaVfPI++smOe2uUTqsEQ+PDtx6cLu2sb6A1JQEbiLqK5YMlIr7ipCb aMBNSJdVPRfV3Xn63ovmwcv24WILpQAbNA+mM4DFVqQD5ZKBCtiTcwfrRdis kw4Ju0syRVKLh/WySZ10Qi+fADdxm3kOHdMkH7eqqGbFBLw7uIlTS/Mb2TMW 7qluAvjMXJ+ZD3oCboJCJy4zTyefkAsodgNnK2x/9nAWrGQzZIP1+rIF3ATV m/idYrOGQbgJrE1qqlY+eqqb2LXjZsWQCXb+skE1t5M/3MIk1WGRDlIVj1TF 76vikyp5PeVTnSXivhpRb5Wgp1LQCxdruL3VbFCS3hoWqZbdf2WK3CgYuyah 3Zaz7mulw/COLjAvh3DeJw/N6TZDlu11++aqdQNnZcng90ksJpYO3lozCibi OPKRUTPWsXbArCRbNWSbhmJXkx1aigt2qvoJv4Hq0U3YVcMWBcgdxSAeFLO6 OGN3R0kN5M660f5mLrVNJSS7jbSgjb3gEYSC0tVp2SqcA+L1afEa6IlfsBYQ rAcFa35eyMMJef6omyA9ATHR8e4bBG2gJx7NIIqegKQgT4G94r/JTdYDv7Hm p6/66WEf7VROdRMiVoLcZMPLBNa8p7jJkmty2UPD4iZeJlaE4gE9Ya94WPDh zOG5aiEfG/v/fFQcsSTZWhRvLIjW54Wrc4LwHH8Dyz46qshGBe9oyDtykEht IbK8ULjk7Q5d8FzUZsqh7rcqem1KklMz4NaRg5YxMBT4xVbhNrzUnegeHBk3 IUInxJpozAWG8q64ydHrLEqIoAl4xNu8K5JClLQQioFkBM5vv8iJUvq3fxNg D/8TUOgEzGsjCB8gD76u8M+BgnSwCHvZ6wGsaQDqukx81Jt4oQrq5YWCKagj 3IqHueRmYHpiO/qSY4aiJQe0FJACsJKglgJq4FX2+0EM8Xp5OMMaPcSyvFR9 qFAFeQoKrETOTEHyQkjKG4jeEBPCSkBYXNJeeHd46xn98LxpLOTBxGRjWrq3 qH66YUNu8hrk4ot9cBMsoevYTXAleQL8+MXjH784/OHzR8CrT/dev9xDboL4 +euHP3+xh0aQoDbCKJsLBTtQKAT5AlxHReugFWgBED6C2nAR6VtIQxCEnkRK DZIXIl6D0sDg14BXhpc6c5Oz4+w4O/7pkXE+CdwkNzcl53xyTnZSXnZCfk5i aV4yuEl9YWZtfmrNpeTGosw7NflBCenFsuqDOdlTP2/DMLwo7VqR96wrutcV XchNdhVteyqMHU3HrrZzRXQTrMQ4UGgdKl3gtYKbEH26UOjkXW6yoWrDSk6M vQcm0pLopmW4jHc7dbQ+frwxaawlfag1g9Sccb85805zVklNUl5ZbEpJbEpl ctqV7MT67KjKo3AGoSFEGOWEmPyem9SkYtT+RnRtSnRNcjRWU58cVZUUDVRi xFQmxVa8wek5XcUJUSUJ594kpiQqpjQqqjQOe1iaHFWaElWSknI5Jrswpr4y brQ9x86qWeDXLk5VrHArgpP5b7kJricRbgIYB3L1fTkG8mU9pUg3XGZmNG86 Jj7YMDnlZJeOzqd1dN+v725rbLt7hdSYSL2fI+4vkZHLJP3FUlKhEsvaKlL3 FSA30fXkmQbyrZRC63CBZbjASCmE11STi+WDZdLBckZ3mWikUcfvNkoHFbxe EbtLxuvTiEeVgmHCTfxWvtvAtignDdIRlNPl1jOC5nfGTXA34c04JLNO6bRd 7LcIAa9NqJWNg5uAdNgM7KBbCjICShJeMK4tmZdmtGAlqOQEd5NxlXgEXAbW xne7iVU3aVCOGJXDFvWoVTWsF5GkjHvUnkp6b9XUQC1voJbbV8XpKQeYnRXM zkpmVxWzp5rdW8vuq2f1XeFQmoXjN1XcTqty2GuiTzum5t2C0Jw6NKdZmlbM +iQBl8Dr4LqsHJeVbTHQtKpRjXIEzlr1mEY9plcMYgPH9eMuw5hdO2xTk0FG 3IYhj2HYDTqgHrApSFZ5D2AU9Bj5PSrWA9HELf7odc5QC7Wv/kphYtn5cxV5 0c0Vqb13ynjjd/VistdIm7ZxFtz8kF+yFpSt4W6yAW7iF2LjEjzcNR9v3c9b 9XLDfzhu4tWS3eoBu7zXKu22SLrgDHriUvXDj5CYoPO/Kadr8xjsIX4bmAUs TuEPuAlceZebrByFTljHbsLAeiC7GGEPa83HWfdjIyBBQDZR9ccMfwPNCsRZ m+WjtCKi4Ria7U7smSMNJbIChXATdBE9a3cOK7WAF5y1T3r0FHATo6RTL2qH BejJopuBMruIongs3rHwhpWcMkjxONErssKdMALidVBZ/d4yFj051U1OzfWK FBOCE3aDFOZUNzk1dIL+HBQAwrK2pvmb0/xVHwe+seiLCmf46sLXGAWhTrB5 HLoigilYbzQvC9wE6QnYNHzVMeDbaxwFLwA7AEMBwE2COkpAR0YE9RQAFqAn SFWIFsRIXuCMrhCeQuR9RYKSuBySNwArcUp6PIo+0KJZw8iccXTRMhHhJhpw k08eBb96vvjqE2za+y9fP/7rd++hhK6/fPse4SY/fH74/WcPX788ePXpPnIT FDFBaV2gJz/hXnAiooEiHUgf4Aym8L8/PYf1tx+GUSstOH/zQQhA7baI+Ymo qzDRpws5DpEABms0jRHdht6IuB/9CNZnOV1nx9lxdvzTIzMnGbnJhdyUvNzU /NzkggvJxbmJ5RdTKvOSKy7ARij2akF6d0vFkmbo4xUspwvcZF0/tCTrDil6 N5Q9m8ruLWXHjrJjT9m+p2zbVT4g3MQ+Ug5uQtTCE6GTdfm9o7Sud8RNsG5d hp4DM2lFcts2WsG/kzZyJXG0IXm4KX2wOaOnKeN2Q3rrlbRLZbE5pbEpZQkp 1WmpV87H15+PqkglQiSRsZLI9f9HbpJ45CZv8jtuciKnK7o8JqYyLqoyCX7n qKqs6Ors6Mqs1JLE3IqUspKoOw1xYkpBgFc7z68h3MTUmwpuYiefN/dlGEmZ BtxNIvXEMVJgHMgzUgqMwyXgEbLBCrfwwf6szCToMctH6UO3714ru3+r5mZr RV9TEvVejqivWEYux+tNChX9WGREg7uJqusCuImx/5KFXABuYh2+bBoq0FMK 1eQiOblUSi5jk8oVtGsu9dC0lenUU1WiASGrU8Lpl/MoBsWkVcu069k+Cy9g 5YNxWJWT4CY21YTXyPKDhmjpp9abgMiAmyx4FKGgdtGrDNpEXhPfYeSgnsAm Nd1p4s76FCAmK3P6zZBtb8O9vmxBFfFeu9CkZmikf8hNzHqqHhxBPWLVT067 eIt+kc9Cn+yrG++uYpCq2f01LDiDp/RVT2F5a9eEk7dE1Nti2h0p476C3WGQ DBgkg2bFiF076dTTPEamz8LxGCY8+nGnbtSmGQIsmiGjcsCgHDCqBo0qsl45 oFX06ZT9BvWgUdZlVZHcBorHOOTWku1KkkXebZF2GYRtGs4dOeOGZLKFP3KV M1jDIzfwKU2cvnpadzW1q3qis2r4XsmNyuSai+eqLkQ1Fie0t1xkUVq1vF6f njpjYS06eSGvaNUnCXtFIQ/s6ASrXn4Y3MQ9teaZ2vByN3y8P+4mPrxq2Kns Az0BUO0JLJCevFl18m90k03cTTA9+Vfc5ERO1xGn5XStBlg4nHCAHQqwV/xs UICwi7nu5WwH+dvTgs0gbyMAQjGFGQruJr+BV20TGVyb+P/Yb75DT7Yi/nuf SPcKeZhw3psXHYBogCmAxeBlJmAioCdmWTfoiRW2vrATPs7yiiw82T1NTE4d +H6qmxD1JrA+mtu4JIksFTl1rMnbbhLZLuxE6QpK3zrxIicmy0eGTvYiQj9E lhrSEyKzC+kJkUFHgFK8ToSrwFBQ3AQD/86jr/2SnTZvHgcvADsAK3HJegFw k2nD0IxxOBJkKACKpCDQQ6QtxMwUFD05gVPaAyYCL+6WkwjgHYlULvgd5k1j C+bx5f+Hvbf8biNr2n4ts2yZmZkxnJhBaGYQGCRZbKGZ2TEzU+yQw5yZDMP9 wHvWOf/Tqe6yO4rt5J53vc85Mx+817V6bbW25LYkJ/unqquqTzQ/KF4elQGb HK12P98fffdw5hMZNyGN8PdPzSZHv76/DwJC+fH1AbAJgMnHZwAm28AmH5+v fXi2+v7pCggmn56vAhEgklBxDXNfPIUYwA4v7919uD74YG3g1eEUgMm7h3Of nq1QnRPhsZgeRoEJGurN64Bh2AXxhAIW/IlUpAYDLn/3xudyXI7L8Y8ebl6O mNPl483w93UJ9GEE+TiG+TiEetkHuVj5O1r62Fsk+DmVZ19Zaqt6PK0CNjka aQY2mVOx70pz1rXcdS1nozV/qzVvW5O7pcnBuAnmdPVVRmNO14Qodb7l9oz4 BhAKBk1OusN/hU2wYBewybwirbsiCtikNNG+JNG+KInBTXbOTXa6nsBIiqF7 hli6h1ozIhwYsS6OiZ7W8R60CAYGRygYOenkfirzkMr/Dps4WMbSLWMI0aLt LUEEm9hbRdlbf6mvs8kJklhFOGD2l208wy7JxSbJ3SrBwzLR1ybJzzrBxyGc 7hPvGh5hmRBuUZPtMdgYPyGOAzYZqwm4kE2MZ9O6fDuK/YBNjKUh+tJwXWXC SnfV24NhnShHWpdTwb2WmxbLzE7NzUwuvOaEXnhZQaiMF6LkEfla+sIQIq2L ZBMd09vIJdK6Okv920vgOf31RQGawkBFUYisMFTICVfVXhsylK9MKJbuqvva 6qWivKZaprK52KCsQjbpNQgH2xomeltGOpo6VBXIJv262n5t7YVs0q2t6zeK 7vYrlyaMcyPa4Q5Jt1bQbRIRdbfgrk6iRzyAydJM+/piz/bqwN7GMODJ7IQe zp9hEwAZYBOtouxCNjHoqvQgbYVBWzE60Lw+b1ie0sgEmY0V15vLr0irrstr bqjrbumFaRoxUy1haQixW6VcUjyttEAj5mqaC7TSIpBOWmKUl5skee0tee2y fFAXbOY13E41p0vN6W7ldWsLurW8LpjoCnr1hZ3q3DZ5pqElXdt8Rym8Lq5K EhTFCHhRfG5kPTuylhlenRtalRNSmR1cnR1WlxdVlxdZnRNenRNRkxdVnRuZ FGAT4WYR5215I4LOvuHfVHrDJOENA5u086e6G+f6JfMD0rm+5tnextke4Xyv aLG/cbG/YbFPuNgnWu5vWPjLOV3oGgYeQVM8HGHeo+J0KVhwHNQVoeWEqqH0 P8sma8P166RgsjZUtzpYtzJQuzpUt3ZOF7LJSRLXX/DCLwzz54fq5wb5wCaL Yw1LY40LIw3Lg8LVoYa1kaYNwJPR5tWRpsUB4dpYM/qvKUJZPk0iOvnS/jSV CPfJZ/Bkc1KCE/Mv+bHqFKzcJiIgUjwDbDI/LAIS6WnlAZUApPTrizqULIAU IJQZcgFwxPp0y/b0WSRBKqESuihH/IU5XUgH5sldAD7YzeSvCAsCn2loct4m f95msnUGlMwaMm5fFPrZmJBgZhflOoEPLcZEVk9dPPia47uAVEKFqyg2mSU/ +SDCYt9TN9lWMWkqHzeUAjhgKa0RXdFEW9kk2Q8FwQRvwgSYhcIWDKmcF8ZQ zqhXxiJs70AoJJ4QrhYVl0rlgiNcA4AJgSfdgunehsVh6eZUK7DJi4OxD4/n fn699dv7fQCTP78njPBk0OQeaYp/9NuHB4AnP7za+/7FDrDJd883Pz7bADY5 44XHCsAIBcgU55OvsFbwi4PJw+Xe3bmOZ7vj2Age87LwsdQDkWgo4fNQveaR X9A4T931X58OsZcKPg+gyt+98bkcl+Ny/KOHr6+Trw8D5OfD8PdhBHg7+HvR fd2sAzxsAt1tfJws/Vysk8K9mHfilzqq70/KH95V3B+XrHVUzGs4M0rmioa9 2spaa83fADbREtrR5W3q8naMrEV5GlBJe1HIQHXsSH0isAnGTbC5ySoZXjnD JlikC9kEby6rs/pr4oBNKuMdS2Lp7Fh6bpJTxlW3+CvOgbE29HBL+wgrmyi6 bTTDPtrFLtrVLgJgxNEyCsQwl22cCxytY5xRtrEALwxatAPIkmiA4ghH4mYU oAfdgpADLQZ4xPFEJJtYxTpYxznaxBMt5m1iHWmRdpbn2MQqzMYyzJoWSsgy zNYqws4qwt4pyQPESDyRY4I7yCaFbpfq4JDk7Jjg5hTn5Rjn7RDn45jo7pTg 7BFlGRpJY95y7qqLnWxKmWsMH6326SpgtHMdu4pce4rduwpd2wvc2grcqbiJ qQDk1V7g3V7o010epi8MVHL8W3hhA9KsgzldqyinRZBXU3I743bUjWsRt2/H clIdqzO8m9jBLQVhyqIIdXG4khfUWhii5ga0cny1HN9WtreW7WXgereXhRpL gvXFwdriEFVBUAsnSMoNETCDtbVXpzsqdqfkOzPquX5Ru4ytErI1jbzWJl67 vLxfX99vEAy1NYz3SOdGW+8OKYe6iCBIb1tDX1tDr6EONNAmGOoQgfrbhP1t oj5Tw3iffGJAuTBpXJnpnB7V3R1p7e+WaZW1PW1ig7q+XS8cH9TsrA4fbk8c H84e35t5cji7uzo4O6Yb7ZW1awVaeZVKUtYqqzRpagFPAGoM6mqjBlRJ1hNG VRtba9v1fJ2qUq+qHOhqWptr21nuHukRKZryW8VMo4yrkzK1zblGOMoLVFKO rClfIsoRC7JAzfzMptq05to0KT9L2ZinlbCN8oIOdQnhaVXzBpScPjlrQMke JPYkeYNqYtInz+0SZ5pEt3V1VzXVybLCCAknpIkV1JAfIMr142f51GV4CTJ9 hFm+wmw/YZafINMXjsIs/7oMH2G2vyg3WJAbXAeokhVclRWcHGAd7WkR7k5L DLLLvR4oKLltbCkdNJSPtldNdsMGTDg32DA7IJrpF8wNCMlCwTARzJEVg4nq wX31uD1DMMEcfgST8faKUVOZedzkpKKRthAJBfEEj5jZhQ+c6YWn5Z8Kf0T9 iSV5WHCiIf4CUdf3NNhBhUVG+GujgjU4kvocKwEYGaw11/LAFzeBU1CIIaDz bIInKUJZHgDAIbRMaglF1DQGCZZGhMtjouWxhuVR0cpI4+oIGQcZbUKtEJlX SBlEHhdqfUJ8pu4WJnfhhvlzlORcMGXtdAuN0Za106gK7qVx/fyggPBHdFbC cQw4Rc1pl+WZpDldStZ4RwWs3J45sY3DBh4mQCKE5/20VBeehCOAyeFi61k2 wSYj00QmFSDJIjARXDlcCdDBObLYX26l/CPm0RACKKZPyxp/vR08ldn1OYlr huzYiGWEvzTmb8+S1Yy/1OaUbG1SskRmZ6GrfaKraqGfTyDkMCBk4/poEyDk xhhIvA5v02gTcCWpxpXhBtINJJgfFC4Qn0l4g0RLww2z5Od/vK18SFfUo+S0 iXPaJbkjhpKJ9gpCHRU4meyovNtJ9n8kPFblsH7MVDZKuK5KR9vKQGOEiPPw 5zCkLRzUEPW+BoiawFwgkT6idSOru4XZA2xCRkzgOKDmEe57bREK8ATAZLoD fgp/qgc+RfLtGf295a7j7eE392d/frP72/t7v3+8//vHB79/BDYhinQBmCCb /PLuiKzQtUdGTwg8ASr59GqTspz8ADefE9GTn19v/googTwChPJu98/3u78D rQD7vNz8+dna+4fzz/cmAEy2Z9oebw6jRQXdKAAU7x/NA7l8eLSAGVnIKRTv UJERbNpIOU0QUjCkQkVYEFX+7o3P5bgcl+MfPfx9nU4EbOLt6OdF9/Oy93Ci +bpZBXvbB3rahvk5XInzT7saMa0vPZqQHc+oH062rHZUzKrZ04r8ZQ1rRcNc bc1bb83bAjYBKtHnA5vsmtiY09VZEjZUGz9clwA3sVQX1Xhxk+SR8wWE4Qwe AVJWNNlD9YnidOfqeOfSGEdWDD07yenOdffoay6esVY20ZbW0dZW0XSbKEfb SAY90pke4UyLcKBFEiIJ5UTWMU4oq2jG55NxDCvgDkzTinGAOZxBwRzvOlEc KTJuQgVNCDaJtLP6UvZxDvR4R4cEhkOCk2OiC4iR5Oqc7AFySvKk8ARkmWxt lWRNj7NnxDBco9ydoj0ZMV6OKV528U6MaFpgNC37plNnbfxU09W5JmAT764C xw6eQ1eRc0+xG7BJR6FHe+EplfC8TDxPI9dTncPQsdy7y0INhUEaXpCiKHJI lrs22iKruUN0POyWVJRm5Oam5uZdLbjmXJ3p08AKkhCWkwhVUZiME6DiBQHR aDg+rVwfDdtLw3LXsj3aKyKMZWH6klBtSaiqMKSFGyTjhfBz/dSViZP6oo2R hq1x8fKAcFRfMqir7ZSXGcWF7bLSXk11r7auS1PTbxROkK1JBrrEQATteoFB U9trrO/W1XRpqztBurpek3Ckh2hi0mUQTg6rt1YHHh/Nv3m++fDerEnf2Kqq N2kbNPIaU6ugU9/wYG/m//7Pt//9x8sPzzee3JvZWOiZHmmdHFR16kRaebVS XKZpqTCqgU3q4Yh4YlATbIICNgFs6dDxtfJKo7p6qEu8sdBxuDU4OSCR1BO4 oREz5cIshSgLjlJRtkSYLRFlt4hyFI25ajGzVco2KXltSl67qrBdxWtXcIwy pkGaN6YtntSXjLUWDinYfZK8zsYMk+CWruaKpiJJXhwr4UY0sYIb8wMb8gJE GV6idM+GDK/GTO9vS5Dh2Zjt05gb0JAXxM8Jqs4MKE/3vxpsFe9jEeJmEeNv l3UtqL7kjlFeOWAsHWkvn+iunhngwyZzbkiInm44TvfXwxE1TZRXPdEZNoGd FXqEKTaBIwUpSCggvAnn0RSPmV3TPfBsfFInOTOg+QE+ESsZqjcXlYiFAII8 sj4qWD/FkzN5XF/TMqDKqRb7a8+4Syjz+xk2WYHzZlpGK8oQ2WOFbLOyPCpE mRMHJYoyqG/p0R6y9mUGEVWA64zMs4/WTuHlTHiFSgDD7/+pklPAeljIq0vB NIqzupWsqe5q0qIiRTbBKMm9BQ0ayTFWgudP6nSZIQklylOPjVSotC5M8cIK xrCMspCYgwkGXKgO9Rf2WzyfEnYSNzELuFBZYfhsF1cDmz3JOgN6go/x3V6i zvN8L7yzAviXZ3WoYZ2McJkLzoDWhhtBy8PAjISWRxoJ9xDpr4fJwqAQPsba hnRJZaqy/ma3ko24jToNCNZQsUX0qmAhiPHOSkqA56gxQ+mIrnhUVzx8Wp0Y CQXBZIBgFkJDrYWwDKhkiCQU+Jdzsq1ipqtmuls00wvvu2pvvu3Bet+z3fE3 R3M/v9799f29X98f/fbhPsAIypxNfn57D+3wmNMFYAL64fXWiV6uo358tfHL 2+3fSGQAMPmPD/tw/O311u8vN0G/PFv79HT53cO5h+uD95Z6Hm0MYY9FJBSM huAZDLWYO02oGsLoiMeOjWgzoZqhUMW+KJD5uzc+l+NyXI5/9EAw8fNh+Hk7 kmxi7+tph2wS6usQEcCIDXUDNrmRFHxXW3w0KXsyq7k32jyvL5pWMr9kk9xN UlvaXOSO6ebrXaXhgCcj9YljguQZ8Q0qbrJG5n1tkcERcyqhtGmA58xZVmeB gE2kma61ia7l8U7sBEZWsvONVJewZIZHtLVdrK1trB3BFDEMmyhn+0hXeoQr xSbmeEKLoNvEOhOVtaIZQCgwgZsAF7QI2xOF2xAKs/7MI2ayine0SXSyTXCy jgNgoQMNWcPJKHs4OiQ4O6e4e1z38b7l75cW5JLqdip3l1QP1yueIPtYJ/tY Z3qcK8gh3g1FS7K0TLSi2MQ5xtMp1seWaBnJcIi08IuwyL7p3FWfAGyyII4c q/HtKXLp4DKASroKiRrCRONFImhCsImR62XkehPieHQV+/eUhxmLgnVFoTJe OLDJ/myrUcziZkWlXQ1MSfRLTQ25dTum5JZHVbqXIM9fTJbqknGDWlj+Sm6A gu2nZntr2N5qlqea6d7Kcm8vCzGVhOhLQnTFIeqCIDnJJg3MQEVp7KA8b7m3 Fthk927L9oRkxMg3NBeoBcxWEbtTUT7a0TTeLSFKb3U09bQ1dBqFxtZak7Ye 8KRLX99jFAx0NA53iwc7m3pMok6DoEMnmBrVzUwYRvqV3e1i0NSEaXzE0N+t 6OuQ9bZLu4xNwCYP92f/+PH4x/eHxwfTOysDC5PGmVHt7Jiuy9CoU9SoJOWt MoCOWpOmTq+sBl3EJlXtrVVaWbFRVTbYJVyb1d9b7x3uEIgqb8v4OQphbgs/ s7WJqRLlGlo4BhnXKOcaZBx9C0snydeJc/XNOSCjJK+thXCIw5amR8XR1lxX lie3FMc1sMPrcgJrMnzrsvz4OQH8bH9+lk99pjc/y1uQ5S3M9gE2aSBljiEN pyfNJcz0EmV5NxCd5QMJNskKLEvzAzaJ9bYIdrWI8rXNvBooKEtvU1YPGsvO swlodpBoeo5UgqIiJubZXBeyCUwoIacgkmABYcz4Qk6Z6obnqTtVzWk9pVqi R/zASdN27Nu+MvTZRULFSpBN1i+KnpwRdRfgydJAzRLZa36uuwo131O90FsD IjDkSzD5H2ETqvDv6mkqkXmC1hmbw9fQZu3LB6IF3lxbd6WfffGnD4GHA+gB j2Cvxg5ZXn8rD2iFeOYRoJ4TSEGnxvZpqSuy0K4EwyhUQ/YzOolWzBFAATeX 4arISMrCSAPhuyHNL4gM58sIEzAypzzTHf5rbPI138rnLC+yBPHXcsNgAVwY tqGEjzHgyVxP3QKJJyuDIgAQ4JHNMTHoPKQgjBDxrzEy7EVEvojayzCBD6qK f6uKGSauSAH0pkiEMKSQiI1xxnki8sinoJ5QXx2WJr7bU0P56+92VN1tr8Q8 sS8I5RRJUAAmE7DGWAZUAoL5VEfVbHftXH/z4pBsfUJzsNjxdHfk3YO5D4+W vs0mpOuEYBPQp5fb2N8E8QT102tCACZwBDb5lUSGP96ScZN3u3+82f7zNSHA k59frr99MPtkZ/TB2sDTnbGPx4tY9RcBBIsJI3dgWATNJlQPR8p7QpnfqegJ OlbMO8jDsr9743M5Lsfl+EcPPzKby9fb0dfLwdeT7uNh5+Nh686g+XnYhPsz ooKcY0Jc48M9EiO9Zo3l9+/Kj2fU+0MNs9qCaSUL2GRJzVxW5y+rc1bV2Wuq rHU1IXSUjAtTOkvCzrPJsjID4eU8m2AveLiJbLKiyQYN85MkGS41ie4Vie7c ZLeMZJfkRAf/eDuXKEubeHubeLpVPMMqlrCQ2EW62Ue4AYZYkDqDJ0AlIEAS uzgX2zgXOBJQE+toE8ewIWMlBIZE0wlOibSDCdxrE+9kl+gCoqe6OaS6Oaa6 M654OF31dLnq6Xbd2yct0PtOgNdNPwATABAgFKdkN8dEJzJoQsRNAFvo8U4g h3gXUm6IJygqbuIYzXCOcGVEuTtEecDFW0bY24ZaeIVYZFwj4iYTopQlaexE XWBvkXsH14Xob8Jzb+O4tvE82nifqcTAIaRjusKZjuIgfUGgguVXfdtNWhC5 MS4fNlT1Guo69Xx2fuqd2zG378QW33Qru+1en+Mr4YXJC8NlHIJNFNwAJccf 2ERNsomGRbCJqTjAWBSgJ3rN+6u4fgpOgJwT0MwMkPJC9XVXh5T5022ly331 m6NNW1OGmV5pf2tNm7TYJC3uVFf1aOsIk7tJ1KHjGzW1almZRl7RpuP3tTd0 GwRk9/b6Dr0ABMDS3d7UYRQN9ClHh1pHBjUjg9qudunwQGubvqm3vaWvs8XY Cg+UTAy2Lk61r8x2Ld41LU21AZhMDWvG+xXAJnplLbKJQVUDePI1NjFpSto0 JboWrklZ1K2rmOxrnB+V9xmq5IIsg5hjauEZpQUd8mJTS6FBnGeS5HfIWJ0y VkcLs02Sa2zOMojSW/m3FNVXxMVxQm5EPTO0Ni9YkB9Slx1Ql+Vfn+1fm+lT l+kLQCHM9gU15IB8QKJsUumewjQPEEwwgEJgSJqH4I77GQGbCDO9Rdl+ImAc kk1K7/imBlpFexJsEu1HsImwPAPYpF9PGKVhw0bxCCIJbC9hLweTKdhH9REF crGTHRUxobZV32YTKkpy8qXx6WLU3S6KTWopNiHtJzWz/TUUnhBschGYbIwJ QX8FT6i7kE0ATBb6qmY6K2a7KkEUniCbnO+9+DU2OdGwYGmE0NfYBFO2zkRG zOMg5k6H8zKHlLUvgy+IJKjtqRb0nqA/harrNT/AH28vH9AWAJX0abgwGTWV 4j75xEDRVw9H4JS9WSWACZ5ZGm6ATThhLb8ITLBbCkzMN/8bMzJs7LgIPxqu nKww/NdNKBcSytdo5bwJ5WudHDGFDK4KyynDh5nYzHfD2wpvtPA8m+ActUoW +0K7EArBBF6WDeIblVJ9U2abNBc+yQgjVN4jvrCYA0YJbi4MCheGRfNDQqIC GPkHhUEWuCTQTGf13baKMfiT1Bad9HYk+zwOa8mqxbpiDJSAAE/GDKXAJtOd 1QRqDYhXRpVbU7qj5a6X9ya+f7L86enaL2/2/i2b/PSGqCQMYELldP3wmigm /NPbnV/f7f7+YQ/02/tdZBMicgFCPHm7+x+k/vVm5/snS0crfdszbTuz7c/3 Jr57sgRAQRUNBqb48cUanMHWjYAhlOcdQyFUfxO4C70nOMcOj+hnoVrMw71/ 98bnclyOy/GPHj5eDt6edC8Pey93O283Oy83axCwib+nbaivQ6gvPdjbDo7R wS7LXbUP7iqezGoORprmdIWzavaMkglssqTKX1JlLyuzVhQZK0AlinTssQg8 0lEcijldo/ykC9mE8pVQYAJa0+YioYCAUIBNxOnOlQke5Ume3BTPtCSXmGg7 jygrRqSlNQEmDpaxzpYxLlZRrjYRbjbn2ASF2VyAJNbRDFhgdRJMsbXAoEmU vVWMA5IIPdnNIcXdMRUYxMv5mrfLdR+Q8w1vp2teBJVc93a94eN2w8f1mpdj shsDlOT6pZxBJKE4IZjYxzEATOhxIFf7WBfbaCebKAaIlmBJi7e0ibK2DbOz D3KwCXa0CmbQQmxpITa0QAu3QIu0K47t1bFjgqRlafxkXUhvkWcH17WD59bB dTexXE1cLxMBJj4GDim2j57tY+J6avNddQRZ+GgLQ/RViYsd5d89nFgZaakv vVnCSb2aEpieHs9k3Si45lx8wwXYRFYUoSyOlPOCZewAJTdAxQvQcHzI0IlX K9sT2MRY6Gcs8jcU+Ol4fhqev5pHLBPn+zWDOMHykujWqmRD/fWu5gw1P0/F z5fX5KgFTKOkqENZ2afn9xuFo13i/s7mLqNQIy9XSEqMrXVaRaVBXdOu43eZ Gno7xYM9sqE+xdiwdmG2Z211ZGf77u7O9Pra2Nrq6Nry8Pb6+GC3sq+jpcvU 1GloaNcKxwdUd4dbJwaUoJGeltFe2WCnuEvfQMVNvs0mHa2lHZoSg4LXri5q BzzRlvXpK3s0JdqmvDYpt72FZxJztKJcjTAHMMQgTNPxb2tqrsnKk5oLokWs 8PrcIH5esDAfFCTIC+Tn+Ndn+YJqM3xg3sQMbmYGiXL8gEr4GZ78DA8BKWEG sIaHKNMTkYSiEoybUMBiLkGGJ4EnWb4nbJJJsElKgFWku0Wou0VswAmbGGQV fbDnaS9H+kBRaV04odhk6suIyURH5dfYhJI5m6AtBVNfMOOFPNadZ5MZACUi dPIFm1wYMTFnE/PkrvOpXGfiJsAmZNyk0jxucia5i2ITuOtCNiEsJ4P1JJvw kU1AX2MTczA5Ewc532bxjM7EUNBjYk4o5jEUKtfLHGqmuquBR0aMJWNtZZOd lWTlgZNv8uEFx5LOsHMGNoEtN2yqyUK7zScNUC5ik5PqwV+WFEY/CDrTTzoz zirMseIvsok5ZXyjm/wZNvnq084pMa0LcAlwm6DvHoJNMHSCaV1nwGRrXLI9 IQWtmYEJ1aoSzTgwWSYMKUKC7IBETnkEXz3UmWSwE//RWNPSaOPiSAOBJ2Qg Ev4Q5nrr53vrZ7tqptorxw2lJ2xyCibIJgAmwCN32yuJKmFk9AQTuuCB8/1E QtfurPHBag+wyaenKz+/3Pr17f55Nvn940PKe/LLO6I1PIjymwCY/Pxu95f3 e79+2P/tw94fH/f//O4A8OTnN1u/kLEMDJqA/vV+7z/fEfqv9/s/PFsBNlmb 0K1P6h9tDL06nAI8oYACHgVggrWFsQYXGuGp4sAfjxc/PVuBm1QABVuZYPtF yiOPBY3hgX/3xudyXI7L8Y8enu52Hm627q42Hi42Hs7W7k6Wbk40YBNfd2t/ d2tfVytvZxpMYkJcD8YkD6cUD+8qdvoF0xrunIa7pCtY1rAwbrKiOmGTZXka NjGZEKUCm4AGa+IwbjLfchtrCCObgDbMsrnOsAliC8yRTUrj3EoTPdmpXjcT XELDiF7wDhGWtFg6LdbBItaZFu1Ci3KzivSwjiBCDxbh9mfwxJIMoACb2MQ4 WUc62MY628W70hOcHYAmUj2QQdxu+oE8bgdQcr/ljwI2YVzzZFzxOBHAS5Kr yxVP5ysep+ESF4ySOKe4gpySXRhJJ2eATWyINigO1hEOVuF0ogljqB0wiEU0 zSLSwiLUwirIysbfztLfnhZAJyoMh9hYBll4hlikXyXYZEKUsixJnKwLJdnE rYPn0c71MLHcTBxvIxErIamEBfKFo4HtbuB4mAr8NWxfBctPygkdU7HWx2TT PSJgE1FNTlZ67I0bkXHxftwrjLLbbsL8AFlRJLCJoiBEzg1UcAj0INiE5YVs omG6mQq824p8TYW+ep6PrsBPWxioLghU8oIVvOBmVmAjK7CZG9rMDZcWRQt4 VxuKb4Gay9MU9Xk6cVF3a227qqrPKOw0CNq0dWpZmaqlrN0gHO5TTI3p56fa F2e7V5cGdrcmDw9m3745+Pjh/qtX+8+f7754sffi5f77D49+//Xlbz8906sF 0sYSsaigrjxbIiwwqGrbtfUd2voeo6ivrXG8XzHWJ+88ZRP0m5g0dUAoF/pN ulrLOjUl7YrCntayDkVhp7KwW1XUpSxU1Kcp6m7La29JK68JCxMEBfENrLAG VmgDk5AoP0SUFyTKDWxmwS8e3JQf0Jjj15Dt25Dl05DlLcr1F2T7CrJ9hFmE BJle/HSP+jRXQYZ7Q5ZnU7ZXU7ZnU5ZnY6ZHQ4bn+Zyui/0m6R5EWle2nzAn oD47sCojoCzNLzXIKtIN2cQm/UqAoCxd31Lepy8+HzehoieU2QREZa3AVorK k7+QTQa0hYO6InN3CRYNRmGtpNOnonRSRon4Drmvbm6gnkrootjkfCoXsskZ PPlaWheCyfJgLeZ0gQBJUFRClzmbUGDyDTZZRDwZ5i+e4sk3UrPOk8X5RvD/ lk0+95E/16GDekK4CyEFoypYXpiKoWAlNPwmH/bG8I7Ae9TfWgBvGQYFcIMN 966Ni4lcr4vYBKDAvL0IOj6I7K8Z+eeW8bNnW8b/Www574un6OPzT5+Rf9Fc /jTl7Ks1weZOrmplQgx4sjjaONdbh2yy2MfHtC70mCCbIJjsTLbs3pVtTkiQ SqiixKD9OdXujAKJA3PhYAGGRUAII18gyWkmGD7P+qRklex3A3iCISqiKWQf HwRXNd1RhdWJseM8IglSCfLIFGZ/kdETmM/1wOdQuDgoATbZn297vNH/+ugu sdV/s/vbu4PzbILCSsJkSWFCn17uoN8EIyYUm/xO4ol53ASQ5ARMPuwDlQCb /PeHg9/ebL+5P7M337kz23643Pt4c/j10TQQB7Y7Qab4/uny8dbIk+1RIBRA j//n18f/108P4DwsgMe+ezj3w/NVKu8LCAXYBI3z2JkR2AR+KeSdv3vjczku x+X4Rw83F2uQq7OVq5OlqyPNhZAFsImXC83DkeZGt3B3sAA2SYjwfDClIDQp 3+rjTypZcxrOmqlkTcdd1bJXW/NW1TmrysxVJYknZH3gqaZrXaXhyCbjwhQM miC2YJGu9dac80ETpJItIwuDJhg3kWa6FkW7FCcAm3hfj3MODLa2D7SwD7ek RdlZRNEtop0solwsotwtIzwsIzzN2eQznoTZYbjEMcnD42ag9+1g37RQ34xQ n4wQ7/RgzzuBACCuN3yBUJyuepkLsAXkcMXdEZR6IifAmVQPwBN0uyOYoOjx jvZxDnaxdJtoe+tIO6sIW6twG1qwlUWwtUWwzReKotGiaJZhNJtQW3qwo12o s22Yi1W0Ey3cziaU8Jtk3XDqrIufEV9fliZN1Ib1Fnl3cNw7uB4dXE8Ty93I 9jKyvTFcAlSiY/qC2oEjeN5alpcyz1PDC1KXxKz31f78bHbzrrqUlVhTdic/ J6moMI3NuVV80606w7uBFdRSEC4vDAc2UfCC5Gw/JZfI6VIyPVRMDw3LQ53v SsKOt7HAR8f11vF8tYUBah6R/aUqDBGzA5tYgWJemJgXLi2MrGUni4puNpel 8QuuVXNSm6uzDC2lwx1NC+O6hbumtcWezZX+7bWho72px/cXnjxcPn64/OTR yvMnG8+fbh4/Xnv5Yu/Z0+03bw4/fnf86cfn3//4/NW7B48erAwPtGanxXPy ruZmxDOzEgvyr0hFPLW0DIsVA56M9sqGuiTtWuFf9MJ3qkrbFcVtssLe1vIu VXGPunhAV9at5AkLE+u40XWcqDp2eC0rrBaQJD8YYESU4y8kEqv8m/ICxPmB jbl+Tbm+zTm+Tdk+Tdnezdk+IAGRfOUrIiZAEz7NeX7iPL/GbK/GbM/GLI+G TLeGDLdGUhfGTS4UP41I6yL8JjkBdVkBlen+wCbXQ6wxbhLlZ30nxRfZZNBY NtxWNt5VBQyyAJslMif/vBd+qq/O3NVLlefC4zfYBMEEV1I2YcosPNkJmEPp BF7IZBjBIrnhB6EX/q+zyYU644LHYApAhzmboM5kc/0VNlkaqv82m6yes4qY 64zJ/Ws6E4U5U22YMshjHTCqGyMcAUwQf6h250AouHmGdwTBRN+UKa+9Dm8W dgDBhiBEud0h0Ul85EshEZyJklD5XdiWEW5ika4v/OyzJ/W1sD2KeS6WeXbW hcERqlfjF3W6Zk5bN85/NRxD4Qn69+f76udJywmmdQGeEGWfSUJBNkEw2ZuS b9/9okMlFljGWgHESbKMAMzXT9vQr556Uk50GnZBKsHn2YSrhSuZlBClpEca MdFraVC42C+AS8K0LnSdAJgAklDpW4gk053ViCfoNIFHrY0Ae8qQTZ5sD719 MP3j87U/3u3/ToDJWTYhwyVElxPyJJbwevDTm70fXu18dsGT+uO7gz+/OwAw QUL5g8SE//iwD2AC+q+PB0AlyCa/v90Gsjha6QMwebg++GRnFHADOzAidwBT wIIXB5NoSAHKADz5Xz/eB/qA54S7YOXbB7PAKVTuFmVFwbQuWIOliS/Z5HJc jsvx7eHAoDk6WTKcrRhwdKA50i0cHSwAT5wcLJzsLTycrD1drNwYlgnRvrvD TUcTLfcnZNv9glltAbDJsr4Q2GRNy17T5q+35m5ocjY02etkfeBNXd7dxqsA JlhDGOaY0zUnvQV4AgsIMCH7wp/GTZiEDKxNE3vdwN40cdf0rFU9a0XPHmm8 0ZLnm5volpXkdivVPSHZ2Tfa1i6cZhlOo8XYEyW2ohjWkc424S72Ia70EFda uIMFIUdaBIhBi3Qk2CTcziLc1i7OyTct2OdOkNetAO/bgV63/D1u+LoCgKR6 OKW4M1LcnciAiDOJHjAHBiGDI57OVz1dr3s5X/FwTHZ1SHKlJ7rYJzjZxDoS xYRJUzzIknTWW4ZaWYZY0kDBlhagIBrIKsyGlK25aAk0ywQr2xhberSjc6Sr Q7QHPcbTKsHFCugmhuYbY3Hrqr2hLnZCcm25OW6qNmSw2Kub49rBcm5nunSy 3TtYnu0sgBQvE9PbyPQ25BPScTz1PO9Wnq+mwF9bHCorDO+TZCwSWejSpqpb Jay4tBsBt64FsHLjq9M8q267C3P8xMwgGSdEzg7WFIZL8/1kTH8ly0/J9FPm +8hzvVqy3NUFQa1FIaqCYKI/Y0GIqjBMzgmRsYOl+YHNuYEN2f7N+cGNuUHN ecENpbfVDdxudfWgUTjRI1mZNOwv9x3vTb55uPDueBX0+tHSi/sLLx8sPn60 8vjx6vHx2tOnG8+fbz19vv346ebjp9sPj7cOH63v3V/Z3F9Y3pqeWx3v7pZW lKdn3Ilk5yfnZscyc+KLuVf51dmSBq6ssUAlLu7Q8Yd6pL1tDe1aovSWUlxM YIuq2tRaY1BV6VWVOmWFTlmmV5WTlYQrDeoKrbxIryzWK4pNqpJOTUmfrmTQ UKKsvSbgRoo4oY0gVlATM0DMCmzK9WrM8WzM9mjK8WzO9Zbk+UjzfWHSnEOo CdAjk1BDhmd9ugs/01WQ5SbIchdmezbkeJHybsgmLO2CDA9+ujvqQjC50Atf n+YuyPAUZfsJCA+Lf0W6X+kd3/QYx1BniyAXi0gfq5sJXrVFtwyyigFDKbDJ WGflZE8N2uHPu+AxrWu693PRISQU4AjM16Js71TjRWATxBMqresMmJymdX0u YUTRDfnFvnBpRLR8+m0/nFkerlseqVsZrQetjvFBa+Pw4TwRzMmT9eQC/olG CC2P1IOWhuvMhSfn+mtQ8/01C/21oMX+03bwfbXf0NJJ05PPcZNve+HP2NjN CeUk+Yr8TZeGTlqWn8nUOnkILKZwBu4ifSXIIJ/xhGx9QvUWpJwsgCRY/Qz9 +OSrKkQAwTcU3qkuBQvLqfWquT0qDgALWaygBllg9S7RwWR9ugVztM60F6HY hIplYJIVZQy5IH1r7mzLEvOaXd9O+jJvB08JC39RXHMB4JxGWIgwx5Bourv2 bmfVTE/t4qBwjeySuTravDUp3ZmS7U7L4bhNlllGoMDCZXuzyoN5NRzNu6gg nsBzrpMAQqV+nXksLAOoAe3NqXZnFcA1m3dbEGqI7pwjRE2whQHBTE/d3Y6q cYB9+FuAPx9DyZipbLytAi4VLhiuFoST2d46WL80RDx2bRzNJj0v9sY/Hi/8 /Grrz/f3/vhw/w+CPogkrt8/PEb98u6ETQBJsOnJL+8Of3l3j2KT716sn3jh 327/8n6HiJ58t/8HqT9JUviDNIn8x8f9//x4QBDKd4f/+njw0+vNZ/sTxzuj L4+mPz5Z+vR89YcXa98DdBwvvns0/+F48cOTpTcP557tjT/dHQNgwcpdGFIB GIEzQC5AKB8eL8D5//p0+N8/HFHtFwFJ4PzH40X0xf/dG5/LcTkuxz96uHnQ Xd3snF1sCDlbOwGqOFjY2Vgw6BZuTjRfTztvdxsXB4ukWP/twYbDcenReAuw yYKhGNhkoZVL5HSRdbrWNCdsQuBJa86GNndMkNxWGIxxkwlRKrLJfMttYBMs 1XWGTdZ1zHWCTThrBs66kbuqZ6/oOStG3pgkTcEOzkp1v53smpriEp3i7B1n ZxtJo4VbWACbxNBpUY7WEQy7UGfHYGdGoDMtzBHAhGQTBsUmVlF0WoSdY5Kb b1qQ+3XCLeJCVtACuQCAkHJOcUfh3CnZDQQTRpIrAAsj2Y2e4GxD1ARzsELL PJBIlD1hWsEaXzAJs7Yk+puclV20g7lso+ggok5XkrVdrJ1jDMM5ys0hxpMe 60VLcLZMcLSLpXlFW1xLtWmtiRoRX1lojpmoDeov8erkuhiZjsZ8pw6OexvX s43rRWR2sb2NHB8j6TppKwnQFfjI892kee7KgsDWyrhJPeflbvfySFNz9W1l E0sqYhXzUvNzYstvuJVeYfAzfMXMkBZ2qCQ/SMWLAOKQsYIUnBB1YTigipwV 2Jzl3cgMlfCiGllhIDHs3vND67ODym56VN3xkfLi2vhpC+1VD2bU73f6Xhwu vHm89vbx+ssHy8+PFp4dzj05mD3en37xYPH9041Pr3Z+erv387v9X94ffPfx 6O2b/SdP1u4dzG5uji0tD80vDgwM67v71IaOFqWuQarki5V1YlW9gJ+fkxWd mR7Byk/Iy4mFKy/iXqktT2+ozRXV5DTXM9s0tcPdFJtUkGxSCmxi1FTrVRUg raJMpyzVq8oMasCTCjiq5QU6VbFeXWJQFbUpCzsU7LaWvKbCGCE7rJkdLAEx AyT5vi1Mv+Yct6ZsV1BzjntzjgdKTLCJFwjZhMzR8hRkufKzXECneOJBykuY 7S3M8iZSvAh+8QBRYHKGTah4CiVkE2GWryDrhE1KbvtkxTsFOlgEOFlE+9nc SfGrLbqpaS7u1RUBm4x2VACe3O2tPQMmSCUguMvcAk+ZR8wrcZ0pGkyFTjCz 63yRVcp1cqZ7Iy7AL/CpMkdLI3VLI7XLo3WgFWCQsfrVccCTz8KT5AI+agmQ hNQi8MjpBIU3Z/trUPMkmBBsMkCCyZdRkhUSVZZ6aygtYpAF1xNs8m/qdF0Y B6GAwry/yTcsJGcKc6H/nWKTtS+N86tmz091P0E/PnLKGS88uk7wvQAq6Vay sRMNnEFXO3ZXhCOwgzmbnEn0+obMLe07X3Z4P2GT05LCX2MTSlTdYHNRqWUn miFQ5UJnyva0DPbz8KthqiG8AmtjzZiChXWVgSMwWcucL7C6MrIJtqqk2lMS HSpPAytUb3qsckatgQeC7i1oQJgVhiXRAE9WR08KgmELe7gwRHX828GLJH1Y dVTnU/zTQEsLmX2n2pkxPljtf3VwF7b9v77e+fP94Z8fHvyBYPLxEcUmZnGT BwgmP705+P3jfWCT719uYONFwgj/Yf/HN4AqG6Af32wCpACb/Ov7e1QtX8Ku /n7vPz7sEyWFPx78+m7n7aP5ZweTr4A7nq/CTdDPb7aAWT69WPvu2QqwCXDK mwezrw6nXh9Nv30wCwIkgeOz3fGDxe69+c7jrRFsKw8Ago54LCD8y+tNYBNY jB1P/u6Nz+W4HJfjHz1cXGwYDEs6neZApznSaQziaMGwowGPuDvTfD3s/Nzt vF0tr6eE7g433RuXHo5Jt/v4i8aSWTVnVsVaUOYtKvOWVNkrqs91uoA7QKP8 JFNBEMZN0G+CQZMlRTqmdWFO12mdLuamgb1pZG8Y2UAlqwbOoiZvUctcNRVM yjK1RZHZVz3upLgmJzlFJDh4xtjYRNFokTSLWHvCchLlaBXBsA1zpgc7OwZ9 ZpMTPCHZxCaWAXjicsXL9aq3ExkfcUh0AfSgyvwij6Cf3THRhR7vZBfraB/H gKMV2WOR4JFIO6rUMBEZgSNVfBg4hYybwPrzOk33OrHG49NezCbxTuZsoq2N BjaZFceO8UN7yrxNPFcdy0nHdjHy3A1cDz3XU8/x0XN9dDxfPc8PpGO5Gble hkL/1oIAYBMxN6RNdGuyq3ZlXCYV5hexU65fDbpzJzorO6n0umdRijM/M1DK iZawo4TZsCePamCGNbDCmjnhEl6kmBshZAbVZvuUp4fwWQkiXrKmLnNMX70x rn62Pfj+4fT3T+B/n82fXq1/93z51f3p5/fuPri3en9/5d7u4tH+0pOH66+e 7719de/964PXL3aeHa89ur9wsDu5utw3M2UaGZAP9kh72hvbDHydpkajqlIr K6XiEpm0XC6raGmpaBaXNTaVgOpqsnOzY7Izo5i58fnZsYWs5IrCG7VlafzK zLqytIaaHJO6hmATU0OnTqBTEHETbA1vUFcBlYD0qnIAE0rAJq3yQoOm1KQp MyiKWsVMBf+2uCJFwA7n5wU35AU05weIiYwsIkQiznUHAaFQbNKU7X4hmwiz 3YQ5boJsV0E2wSYgfqYbySZeACYUm9SluQvTPc6HTv46m+Qluwc5Wvg5WkT4 WN9O9qkpvKluKuppLRw0liCeTPbUULESCkyASlCYcGWewWVeJfhMy8XzbHIm s4tyvp8JxOACTDQCwQR2YrBvXBo5YQ3kjpUxAWhtXLg2LiIlXBkDASOgLmAT PAPzhaFa0PxgzYVsQrRfHKhf/VL/37EJtlNcO7Wc/O+yCRV5QbpB+jj5ueQE E73wIXBzrr+eNMITFnjY6KJLggqg4ARDJ/Diw5tIvGtdVfBhADDB8AQggHmD km80djdvwvjtelwUcfxFNtk+1yMeH0W1qkdOMTehfIFCUy0AAvCbYtQPJkuk qx1LkyGGIDtQoEGxCcUagBiHi60gmCB34L2ILRhMwcWUkGLO48kG6WpZHWsm Gjuesgn+lSGYwBmy7w9R+Mvcbk/1XtmY1OzOmh6uDbw8uPvdk6UTNvl4IZtg hS5AkpMCwj+/vffLu3vmNYR/frcLbPLp1frH5yvfvVgFNvn1w+7vHwn7ye8k lRBm9rfbv73eAv0K619vAob88HKdiJI8XgA2Ibzzb7eJjo1AFm+3f3y18YkM o8C1fYQ1D+cANIBQQM/3Jh5vDoMwHwyNKpjZhT56LOT144s1OI8P+bs3Ppfj clyOf/Sg29Ic7GmO9jQHOxrdjsawJ6jEzZHmSrdwd6QFeNiF+TqF+jjcTA7d G2k+HG8BNtk6YROiTtecPGdekbOgyFwmzCaZaypCGBaZEKUaeYEGbsAAYehO BTDBoMkSaUg56XJC9lgkoyfMLSNn08hZN7BWdKxlHWtOlTOvyQc2mVbmmMrj cm543051i090DIy1dYm2so62JLzksfYWsUQPd2ATmzAn+2BnOsEmDhYoxBOS TSwj7QFP3K75OKV4OF/xoCc628YxzN0iSA22MQ420XSivTvwCOAGogcwCHDH +WYop8xiHeNgCwwCOBPvBMhzXnRQgrN9vJPtaU9561iHi9kk0cU6CS7G0jvG 4sZVW31d7Kjk6pwkfpwf1lfm18bz0LNd9Wx3E89Ly/IA6VjeWraPluOr4/jr OAFEGWG2l5rlrWT7yjmBzZwwogmgjDc9IBkfVK0uDypUfCYv/VZmatmdMF6q T1V6eAM7UcRJrM+PkZZcUVTdUNfeUdffVtTckFdfVwtuGyXZG3dNT7YnPh6v /vJm75d3Bz+82fvx7f6je3NHe9OPjhaODmYPD2b39qb392eeHe8fP9y5f2/j cH9lf3dhY21yYW5wZFg3NKgZ6Ff098l7usUmk0CjqdJIC1olhNRinqqZo2jm yJs4SkkRSCUtUcvK1IpypaxUJimSNvJKC68DleRlROelR7GyYnl5ibUltwUV Gfzy9ObavHZVzUiHpN/Y0KUX6hRVn9lEVXmGTTB6YtRU6JXFRlVpm7LU0MJT CbPF5akCbrQgP0SQF9SYG9Cc6y/J9ZPm+rbk+kryPEAknrgDlYAas9wuZBNR jjvFJkAloPoMVwJMsr4AE4JNzAoIU4RyHky+xia5SW7BDAt/hkW4N5HTVV1w XdNcDGzSry8CPAE2meiuJnK3zlEJMAvIvPyvebjEPGKCupBNMLML8YRiE8oU by7YhsEy2Bt3KViwSYY5bMPIHvH8xZNqvUABItDaeCOllbGGlTEReV5AgQkV KKFoBeZAJXMD1aDZ/uq/Hjcx14kb5SI2WR27oA7wt9nEPMCxflEBrgvZBMsF o6kEwyKLQ7BfFSCbUFWL4adTiwF/5ola0HVIKLDFhf0w7NLh5cUv5JEK4TXv kBH9d3pUHHgf+7TEJwQ+BtivBHf+GEkhMqlmPlcJvpBNzvRPpLDiTCQFdOJk +QtscuHPOt/kkXr+s3gyRSRTwW8Nvy/u/3HzDzt/ZJOT5CsSNKiMLAoxMPyB YAI6WtLiESEFQyToSTF/FCWKaMx/BOIJUAa8KVRLU+R0ZEa42hNzPWW0P/Xa g3Zm9AcLHQ9W+5/tjr9/NP/zq+1/fTgCNvnz40OiaPBH0DHqtw8PkU1+eLX3 3fPtTy93ye7wu59ebgOVfPdiHXO6fnq78wmA4tU6gMnP77aBTX59v/srGcXA PKvf3mwTVPJi/afna4AeACNwJOjj2QocsSsKnERhnxRiwbOVH56vfnq2gjla WLyLvGCi0yLa579/ugzn3z6YhQnWFsYfioZ6OP93b3wux+W4HP/o4UwHGLF0 c7RydbByoVs629Oc7SzcHCw9HC39XGzCfBgxwR7Rga63ksi4yZjk3qhkq7d+ wVCMbDKvyF1Q5p6Jm6ySGhemAJuAsE4XgAlVp2v1NLZyIZssa5nAJvPq3IVW 5lpb4Ywql2CTWz63rrpFxdO9Iy0dI2nWMZa0OCtanB2BJ9GAHgyrMCfbECe7 ICda6BdsYhHhQDjiQ6zoia6uV72dUz3crnvbJzgBUNjFOgKJEBiCAAIKt0Ek wSbvOLcmAQR7wZtPUMTzxDsRJb8SXRjJbnaJzudln+QCgoltgpNNPMM6zhF0 IZtYJrraJLvQ4628oi2uX7HV1cYMNaXMNcVP1kf0l/q3czyMTDcDy9PE8daz UL56tp+eoJJAAydIx/FV5XvJ8rzkrAAF4U+P65bkb88adxa7xMLC6sp8Fi8t j5t+J+c691Yk+3oon3NNzWcZmgv0zQV9rTUr4+r7633vjmd+eLXyidDyD69X Xj5ceXJv/vn95ecPlp8+WHr1ZPPVk61HD1eO7i0cHS7t7s9t78+ubkwurY4v zQ1OjLT1dSk6TZIOY3O7sbHD2KiUlavkZWplmUZZqpQXySRcSROrtSlP35xv EDONLZw2RUGHqqhLXdKpLmtXlZqUJUZFieFUUiG7qvhWfkY0MzOGl5vAzY4r yk+uL7nTWJXdVJUj47M7lTUjbc0DhobOv8wmRnWpEX6KrEgn5ijqM8QlKSJu jCgvpCE/VJwbKMkNkOX5K0C5vtJ8TxDFJgAmDZmuF8dNctzOsAlIkOV5nk2I xiWnVYLNSeR8DeEL2SQ7wRlzuqJ8ibgJsImyoeAMm8AWFNnEnEpAcBeyibnt /UzFYHMw+RqbYPSECp2c6VWHwlJgsBKeBPbJ8Dwwxx01bK3Rzb18GhS4qBLv F2CCIRIqhoI3v8Em2Cz+L/lNLmKTf2tp/zabXIgn32ATdKNQcRPz+l34VNR6 ahk64rESF5aQgiNsywFP4JWHdwfetT4ND8AEjvAWdKnYHUrWgKF4ZoCPPIIF r0DY/x2bmJzJm6J0nk0uDKwQbPJ/FjeBZwA22V9upQz4Z8jo8wVMy7enZASe DAgQT+AjCh85IrlrXAykAHCB+EClY1ERE5gjjGD4A6nkwYoehHiCwtQvKonL TMT6+8s66kkw5oLFvlZJToS/BSyFR2U2IphQxb7Wzap+oQ4W2o6Wux8STvNR 2L3/9GLzz/eH//r48E+ym8kf3z2m2OT3j0RzE5JN9oFNvn+xA5Dy05t94ruj 11sfnq2+e7IMeEKGTvYIJPmwC2zy09utX95t//Z+91/fHaANhCifdcomCCCA Hpi7hXETLPCFYEKxCVVrCwEEj2iWh6cF+oAFcPL14fTx1sjro2k4Dyfhrv8k 08mwX/zfvfG5HJfjcvyjB7CJk52Fk62Fix3NFcDEhuZoZRHk4Rjm4xwd6BYX 4pkS4Xc1JoCdnrI92HBwyibz+qIZFXtWxSJ6L2qYK5rcNcJsQmiTNJtg70XM 6RquSxjlJ81Jb4Go/ibohTdrvMjc0LM2yJyupdb8FR0Ljst69np70bQyx1Aa k3PH7+ZVt7A4O7dwC3qEhVWslWWCDcUmtEhHyzAnG2CTYJJNQumf8YRkE8tw W+dUT5crXi5XvUg2cbYk0eOkFzwpKxJJbGMcbElswTAKiB5P2N4RQyi/ifkE no1iE1sAkESnMyLAhJAzCBfYJDh9jU1sUwg28Yi0uJJsramO7BclzjQmTAqi +8oCTRxPA8vdSFQP9jFw/Qxcfz0nkBA3SM8N1nOCtQWhSnZQCytIyg5rYoVV Z4cqqm5pGrkjnWJTq6jD1CKT84VNVYLGqna1oMfQuDrdfXww9/rx2vMHS++e brw5Xn4NegJaenW8+OLR3NP7My+PV48P5148Wn7xeOXRvbnD7btrC/2Lsz13 x01jQ4a+bmV3p9xkEBt0TSZlhVFeZpSXGuUlWglP2chUNORpJRyDvLBNVdSm KjTIOVopUyPONzZnt4lzQKbmHH1jdqswQ8W/oxZmGiXMLmVhl7q4TV6gl7A0 jbntmlqpkFPMSgEwKcxN5GTEFOUmiioyxTW50po8pYDTpawZNjYO6IQdOgF6 4amcLp2yHGWe0AVqV5WZFMUGaYEWrrA2XVKS0lwQ15gf1swMk+YHS3MD5Ln+ yjx/eY5PC9ML2ESS5wFsgmAiynC52G9CUImreU4XKWATT8ppAmBSe8eNT7VW /JJQ/iKb5CS6Apv40C3CvaxuJXnXFN5QNxX16oqATYZMpWOdlcgmsAU9QyWo b7PJGTA5zyYYcKEyu/A74QvZBPEEv8Onin1NdVfP9NZS9W9hF3e6Az8R+QUy fqXMPwMmIJiY3/wWm/T9/80mq2Zg9W08OcMmZ/BkdbTRPN2L6sZILTjp80g1 qSebv2NO0Qr5jT28sNg3ECEF3ix48bs13E4Vu1dbMNJeDtw6PyxaHG3E7oqY 6PVtNjHnggvhgoKU//OcrvOWlgvLF+/OKrDQFnxs4JeFjyL8mvD7wm8Nnx/A FmQTZAfzmAiyBpAFwgVSBlDJw1UjHO8v683vggeSzGJ4uIoyPlozgeAMsgyu x8VwPfBGrJGQiJl1+NdBgQnwCCyg0szQAkPFZe6vdD5a73+6Pfrq4O6HxwvA Jr+92f/zw4PzbPLHx0e/fzwJnZAd4XeBUH54RXSQ//HNNlAJuk5gjuGS3z7u neAJCSB/nrYgIRqUkAldv7zc+OHF2icgDpJB0F0CR6K018d9dJ1Q8AKsgTW7 AEA+Hi9i0AT7m2BHeCwjDGfe3p+Fu7BPCkZPsJIw3Pt3b3wux+W4HP/o4WJP c6VbuTtYezJsfJzt/F3pge6OCaG+V6KDbieG3UkKz0yNzrsRX83L3OgTHIyK D8ekmySbzKrZ8xoOUadLx1nXMTe0+VvavC1tLgjYZFWddbfxalthMGikPhE4 hfKbYIVhWLNJti8574UHKiGM8DrWmpG30VE8pchuLYzISfO7cc09JNbWOdTC NszCMs6KlmhDi7eziAM2oROJW2FO1iFONmfYBESyiV28s/t1X8ATrMoFHGF5 GiWxiaYT7RETnB0BLpJcnZLd0Bhi7joh0rHiGHYwSXDGpCw7TM0CeIHHkolb jvDYFHdboI9zsgFCOXeGlnwBm9ikeNCvujsmWntGWVxNsdFURfYJE2akKZNN Cf3VoaYiH0OBj6mIaNTeWuDfygvQcAPVpFScIJCUGSyG3TU7QlmcoCq/oqi8 NaKrnhtS3Vsb2loeOdpffHK88/Ll/aP7W8ePNg8PFh8drTx+sPr4/uqDewvP Hq8dHy09ujf/+HD+6YPFZw+WHh/OHu1M3tseXZvvnB3XjfbJek0N3QYhmT1V rWmp0Mmr1ZIKjbRSJS7XSKtaRVn6xqw2SV57C9MkyTVJcjrlrC4Fq1vJ6VFx YdImzdU1ZmgEd/T8W9q6G6rqK7KKZHFpYlNRXENhbB07SlyWom3IapexTNJ8 FT+tqeyKpD6/quAGJyuWmxVbkB1fkBVXzkyV1uZLa5mSqhxFPbtTUT1kaOjT 8Ntbv+qF1ypKTiImGjhT1gFsIi82Sgt0wCbVaZLiZGCTpvwwCTO8BV69nAB5 jr8y10+e5S1jegGeUGwCYPI1NkEj/Dkv/Gc2waAJySZu/NtuZ/DkQl3IJhmx jEA6kdMV4W15I8GzuuCGVlLSry9BNhnvqgISQTs8xSYnVNJVBfq3YPIX2QTx BGXOJuZ4ctqZsYZqTofJLZh1T3yHTO6r10/LtJ6ySdPX2ORCfc0Lv3Qup+tM Wtf/CJtQHnbzjKzV02DQX2QTCk9wAWZ54coz91LBFGQTsrywBM0UFJvgu4C1 cPEmvFl92oIBQzGol5zAJwE+IcAmACYr8LRTLZjW9TU2udALf1LX97SYMFEH eOakmeNfZJOvybwE8ddaq+yShbbQ6wG/OCazYSk5AAE4SYU8zPEBhWxCEscJ a1DEgWeQU05vEmcer7eBjjfan2x2gHANucxACSiDYKVxMVpO8POPhncMbyGY mCeYYUAH6enhaveTraHX96Y+Pl6Anf/PL7d+frnzx4f7X2MTqi88sMmHp5uf XgJ67GHQBPvCk4LJJnrhf3q79RMZAcEMK8Jy8nbn9zfbiCc/vFj/+HT5++er vwBcvN2GybvHC0gr6Dr57f0u1iLGHvEYPcGywFRlYOyuCOgB9wKVUJYT7M+I jwKigePfvfG5HJfjcvyjR4C7fYCbva+ztZ+LTYS/c0qE77WYQPadpPyb8azb iaxb8QXpyWV51yVV7P2h5qOxlqMRyVZX3aK2eEHNXdbyNgwFGwbepoG9bWDv GFg7BuaugbltKFxv5d5tSjMVRnaWxIzwr4wJr06Jb8623F5Upq9oMldbCcGE jLPkbmrzNnX5mzrWpp4FT7Xcmr9p4gGbYJ2uGVVuW0V8anZA+FUXtygr5yhr erilA2zp4+wZCQyrcGtaqDUt2NoiyNoq2M46xN42wsEyxMYiGM7bWobbW0XS baIdnVM8PK77uV71ZiQTLnhADDI7y8Y6xs4+wdEp1cX1mrvrVXfnVFfHJCfn VBdGirNjspNNrL1tHJ2eQGRtAYOgAEmI6sGxjg5JrjCxjLK3IeeMZDfAE7tU J1tSMLE/lW2iI8j+SznEEaKT4GOX4GSdxLBKYtCvMhxS6J7Jtj6RlslJjuLq 1E5p9oI2Z0J6o70qSskNUHD8VYXB6qJQBS9YzPRvzveXsIIUBeHGmqShloyF kabtOc3+suHeWvvhZvf+Ru/jw/HH96fvH0xub45sbY5ubU8cHi0+Pl5/8nzv wePN+w/X799fvX9EJGjdv7ewtti/MN0xM66fGFKRTUPE/e2NRnWNTlHZKitX S0tU4iKVuFAtKZKJmHIRU93M0Yi5WglPK+XpWgq7xOk9kvReaUa3OK2j8Vab 6AYcNdVJIHVVoqoyXl4e21ISLSmKVPDC5NzQFk6wlBMs4YSIOaEgYV5gEydc VppgENzqbcnraMqSladwboZxboYXpceUZieU5yXXcq43lKQ3VWS11DIBT+T1 nHZ59aChsbdV2K6t1cpLFeICtbRIryo3qCvIJK5yKmKCbALqUJa3yUraZUVG MUdZm95UmChkRYryQhrzg8V5/pJcX2mud0uuZ0uOuyTPR5LrI87xbs72bsry IponEo0UvRuzvAhlep6YTdLdhUTndw/RiTyJ/u8gIIt0QoI09/o7bvW33epu uwKS1N9yBTwhOr+ThCKCBafBFDhPqf6Oa32aW326Z32Gd22mb1VmQGVmYGac U6SbRbAr4Te5leRTU3iL8JuQboKR9nI0whOe9+7qM0ETZBPKb4JUgiQCR6QP mKB72pxNEE9QFJuY2+HPB03we3u0P+BNDKOQkFJDRk/qMHlp5dQ8jkEBckKg ysqYaGUMSQHNKYAq/NNuKUSrFLKfY+3cwGfNDxBgMt9XA1q8iE0WSf/7iU7B hHjUYN3CYP3iEH9xRIAifzpsJgmRRpjTtiNjGLkAIpCuj0vXxsQUMpx1smNQ A7uifJn3ZY4nFJuY94I3X0kV8qKcKead4jGqAsf1CTEWGYaXmjTI18PLCOfh SuDVHjYU96i5A/AuG0vg2Kfh9WsLhgzFUz2Ef3wDNszTsp1Zxc6MYoNwyhMm lNW7EvNICqIH9mE8wyYnmj3Rv60hTIHGxcaWOSVcBpGvNSOH+d4cwSB786r9 eTWIqNxLnoGrxQQtDFVgGhV8xjCWh4UXABNg20/AxWrbg2Xj0aL+3oLucEF3 tGg4WjI8XGl7tNr+eK2DEt48Xu883gB1weTJRteTzW44whliTtwkzjzd7IbF IGLxeic8Cp7t/pJxf7Z1+65ydVQy398w0yOY6q6f6oKPPfxdCFZGAUxkezNq WHMwB9KB9mYJHczD9bQ9XOl8tNZ7vDn45nD6h2crhHeDZJNf3977/f39P79/ /B+fnvzr+6d/fveEzOl6+Md3J/r944Nf3hHRkx9e7ZHH3e9fbhN9GF9uf/9i +8dXuz++2vnh1faPr7d/frP7y7u9X9/tgn55s/MbiRs/EVSyRvSLf7/z86v1 395tw+Snl2ufni+/Opp6eTj55v70jy/X/ni/A+f/+LALCwA00FoCQh7BQAkI c72wxyKWC8bywngXnAQhy/zdG5/LcTkuxz96XIkJTEuNyrganXElknUnqYx5 q4J9uyjrCi89uTj7SkFGEvdOfGFGkrA463BE+mBMdh/ZRFeyqOGtaAvW9TyS TThbwCZGFmgX1Fa21sqdaEgzFkR1lyeMCK4N869MiW/NSO8sKjNWWrNAy5rM JXX6pjp7U414kr9FssmGnrWiZW4YuaTrhL2k5wCbdNYkxecHe6U4OkVbeSY5 +l5xDbnjH3zH3/eat0uCs02YrWWwFS3IihZibRVuZxdBtyLYxIoWagM3baIc 7GOd3K54u1/zcbni5ZjkZh/vbBPHsAKsiLa2ibNzSHJ0uerqdt0djs5XXOiJ DjhxTGZYxdjYxtvDGbv4z1SC4RIQI8UdjrRIOzhiQhccSTZhgOxSGfanskty sEuk2yd8IadYZxA93tku0ckqyZGWQrdIsbOKt6Qn2QReY4Qk2F+94t5QddMg 4fQ032kXXldVJkgKI6TFUcrKRHV1yrCaPa4vWB6oP5xXPts0vdnv/f7hyPH9 yacPgURGD3YG7+2O7O+O3tufePxw4f7hzOH+9L396YOD6cN7cw8fLB0dLe/t za+sjc/M9I6OGvp6FJ1tzUZ1LWCIVlaqkRSpxTyUSlwAUhPiAYyom1kgfQvb KOe0ydkmOcsoyzdIc/Xi7A7hlXZ+alt9sqE2UVcV11oRoymPaSkMlXCDxZwg MZcUJ7CJHaDiBIIUnEA5O1DGDJQwA8WsQFGufzMrWMyNkJfEmQS3BlryB+Ws PmVlv7qmR17RKuQ0laYLCm4KCm41lWdKq3MlNUyFgNehrB0wNPVqgU2qtYoS hZirbilEGEGDCZXKReFJu7ysHdikBdiEq6hNbyxIqM8PF+YFi/KCmnN9xQAj uZ6SXHdJrqs4B8DEF7srNmV5o6hYCUklHqTcLzSzU5laCB2AJEgl5mwCE1xm zia4sj6NYBMi2pLuWZPhU50ZUJUVBGwS5U70Nwn1tL6T4l9fkqZuKu7TFWNC F7rgEU8os8nnoEln5fhpkS5MtaKiJFRPE6ysdR5PUGe88ObO9zNsgpWIzkEK bNVqJjuBayphz4zJXbiBx6ADNhwkt/oNJCCIqFgGdkXEHo4AJlS45DOenILJ XG/1IhkWOZPEdaaD/EIfUaTr/2XvPZ/ayJr3b2dyEiLbBkwGkTPKEUTOWYCI yoicTbTB5JxtwDnnHHbtTd9/6+mZhmEswOv7d99P7b7g1FWnzhwdjQR4q+az 3Vc3sAnVtn5msBRFlOoiPx20eKUC2WR5rxMf6RSoAwGe0LuTLB5o/r54WPYX PYBCwQX9PocGWfAMIA/8xuAXRRnk8ddFdT9BgzycQZcK/G7hcqQ1u1sjw3Yn VCwMw2EYZVgme8fv/m9/+BQgILgtENPEXnvEPYe7SUWvgxEWek6XCZ7QIyDX 53SHJ4/tVcfCyAJVKYsytlPCBC04gGlUWKQL0wiBzmYHFNj8nYhuLLTdnm+9 Odu8M9MEujXXArq72E7XvSVADAANQBJgkC7Uw9VuFLVDCQ8/Wut5vN4LM1zC p2xPGzfHdUvDdTOXqya6y8e7ykATPfDfggL+qWxOaIBH4AypZtD1iaYbk7AA dOq8t9Rzd7kX2OTlzYlPj5fI5//1X55t/vJ8C9jkjw/3//r06M8Pj4BNvr25 9/v7uyAEk69v9lvDA6R8ebn9+cUWosqHp5vvH62DPjxZA0L58gLA5MbX1zd+ ebn58SlhHqGqBMP86cniuwczHx7Nvb0/8/b+9JdnS7++WP34eB42X9+denNv 6sOj+V+er3x7tY64gcRBcQqFJ1/IpK+PjxeJ0A+5jwhDZYJh6OSffvA5Hsfj ePyrB8uLSSJJQrogOl0QlS2OzeBHZfDCkxMCAUnkCUGSqEuyGN/SlITtwbqb Iw3bgzWrnSUzhoxpXeqsIW2hMWWxMWXJKFsBPGlO3miRbbYkX2/PWNCJRxQx zWmXunKDhsoi+4vDSTZJmlUDlQgXdMJ5rWBOw1/WgQh/yopBtGogei+ukF74 pabkGYN4ril5tin5GrBJUViQ6IJrlK1ngnOA0DM8LSgmOyIijRUoDfAR+tiF MU55nwUSAZ3xMT/rbQZsApwCl6e8zwGbWAbbMWPcAE9swh2BTcyCbU8DU/hb AJuYBZtbh9sAjCCP/JhN6HET4BGbcAYsgE3OBlhiQtde3OTn2CTIGmQRbG3G sjodanky3PJEuMVZlpkly9w1zMbd71xkOLO6iN+tLejUyLv16R26jO7GrPH+ yhtL7Q93hkCPbo48uTP27N74o1ujN9cvr861zU51zU33zE51L80PbK6N3Vi7 tkVqc/nq+sLI0nT/5NXO4R5DX5uqvbmyrbmiUVeirstRVWeolOl1FXJVZYpG KTdUpxprCTXVpjQTSm6qkRqrxQalUFfJ1yrY2vJEXXmCtixeVRxVXxBWlxdS mxME0mT6qtO8G+Se9XLPhlTPOkASqYdS4l4ldgNVS9xrZOdrZedh3stD81BJ 3eskbjXwqtitQuCiBEghmox416cHdFQmjTdnDhmLh5vK+vVFzcq02nxuRUaC Ij1BmcutyGZX5vK0FWldutLLTZU9hrI2Xb6hPkOtTNHVpjVrclp1eU3q7GaQ JgfUos0FteoItaty2huyOxoyW2rkmhJuVTqrVOJTLj6ETap4u90V6Tzy37MJ iuIRE8vJfgyF7VDC3mWTArZzPsc9l+PBDbK+ZEd44b2ZZ9gRHuU5XH11Vl9T FuWCRzyhGsEjniCYwJmDdbqOQpJD8YSqJExVHzqKTVBUrVR4ViRLpxIFpgBM hprhc9PhmRkIBUMMmA0FhLK0G0M5kk2AI4BEDmOTwv+/2GQEc7R2m4MvX6lZ GqlZukKETuhYYRL1OOiONzmwRDO5m/AIFS6ha4FWoQvYhCIXMqCzH7XBXyMW GUDog3fBnxv/lGjKwILPiCfYHGR+iLCuEPxFOuWxkNchDRkpANnrCP8DNqGQ BEgEF2hyh8XWgmGD1kR+n01oZX7piU8HRVXxxdAJ1u9FPIF/lgRwXa1BhLk5 S/AIsANiCKIKXlJIgsRBZxMKTEBAHybCA082+p5uXoYZ1nAf+BSgj9WrqrmB 6qneCtTsQOXiMKCf6saUHuEI2GRnpgXYZGsKzrfcnIVvBZ9yGcDk0cbQmzvT X54sk4bxtc9PgAK2d9nk48O/Pj7+4/1DYBO4/OPDPQQTqjU87ACtkE0Ydyha +fhk88PjjY9P14FNPj/f/PICBDCy8ekZUS748/PV/SYmz5a/PFt+/3D2xa1r z3ZGn98ce3l7HC6BWWDn0fXhV3cmPj1ZIAIorzYAT0BUcWDEE8psgiRCxVao 8AoVUjlmk+NxPI7HjwfLi5HCDs2XJWbyo9K4EcAjomifNE6IIMJTGu2TEucr i72UGu9XmZ50Y7BuZ0S1NVi33Fk2Zcia1KUBocwbUhcM8qXGlJUm+VqzfL2F 0EarHNBjuDyyKdWzI9uvvzgUNKZMmKhlz6j481oRkAvMs2oBVuta0guWDSLC b2IkLCdAJQstKTNN0tnm5MlG6VU1v70kPEjiGSC+GJXFiskJSyiMji+ISSiM i86LiciOPM/2NPO3OuF19gQQivc5AJPTJKec8DwDbAIvWbMcnGLd7SKYACag c0E2J/3MT/iaAXqYsywBQxBGbCJsQUewiQ2V1kVFT/53bGJNxk2ATSzPsSws Q62cWTZuvhYJcRcba7ImetV3Nocf3rx2f+fa7RtXb1+/euv61RtrQ9sbV27e GNu5cW1rE+bxna2Jrc1rO1tzK0ujk6M9Q5ebLnfr+zq1ve2a7ua6dr2yqaFM X12orcrXKQsMNUVqZbq+PltXm6muSiV4pCbVoEzRKoSGSlGTUtJSLWmtFjdX CZsq+I1lHENpkrYoXpUfXZ8TUZMZUp0RVJniq5B5l0kulIrcy0TuCol75W4c xKNe6g5qIGfgjlqxS73EjdiEWeIG+3DMIPcwpLjrkt00UtcGsUstmTpVK7tQ LTlfKfZQCD0U4gvqzKDOioRuVeaAoWDAUNhRn6EqFlZmAZvElWUkFMljFDlJ emV6j6G0r0kBc4cu31iXoVWmGGrTWjU5Hbo8mFvVOTC3gbS57YTyQJ2avG5t Xrcmp70+TV8uqM2KUCT7H8omVNbWHoYARzj8T9ik7HtHvIkdfvdVoo88ySZJ zPwkp1y2Ww7bnRds62NPxE0uOZ9JItlEp8zsNhC9F5FNUIgnWK2LziZHtYDv 0aZgOwzKcoK0QgELldxlgicYPTnIJvS2gNjEAZ5+8f/tj3cXDrdk9TfCc3IG 4MlYZz5sYmcQrN9FPlRXUGCCVEIJM7uQUChNYnf4ngLUf88mu41Odgll9zkf CystEX3AAQdqyOjJd1hhAiBLtEaKdHih9pcOsAyIcsGbYAuCBlFheFCxfBUe d+s2gBpojhV8C9UIkoitkPlyJNdUTZPpXuj3wT8TLJAu8e+1awUCwCEbNVKN 2ten1AdbNB7JJt+HVxBPgEeQTQBJfswm1/f6G1KFfOllsui1tig2ub5nPFkb q1skWx9iDxFAFdgh6v3OGIEagB2QPjDGYQImCCAmJPJ4vRcE6HFQeMyETQB5 AD02rmmXhusAT2YuV8G8MAx/xPrNCYCpRozdIJuQeNKKQZMHK32P1wcerQ8+ 27r64cH8r8+JqMTHR8uv78z/8nzr66ub397e+fPjw//79OTPD4++vr77+3vA k3v00AmIvobFrl7f+gaQ8mrrl5c3vry4/vk5QSXAJmT0ZB3wBPWeMLbPfXg0 DzDy7sHMm3tTj2+M3FnpAyQBQgE2ebJ1BWZ4Ffjl1xerGDdBPKGytkC4oCIp FJXQOQVDJ//0g8/xOB7H4189/F2thNF+GfwIeWJwSkKQPDFIDGySGCiK8EyJ 9QEqkcf6pCf4KTOSrg81bI+obwzVLXWWTRqyx3XpU4aMOWP6vDFtwShfNMqX m1JWmkkZZTMq3nB5FLBJW6bv5aLQwdKIMWX8eE0S7M9rhQAmMM+q+Qs6Qot6 wWKjaNEoWWwiNG0QL7WlzjTLppqk4wbxsIrXUhIWnOwdnROSUBQdVxCZWBwb kx/FLk+KL06MyovxkwXZRTJP+ZidvHTuhOfpUxfPEHETLyJ0csbH3CLI1iaU 4RjtahvuaMmytwixOxtoDUBxwuccJnQhm4AATKzDbQ5lE4sQG/MDeGIb4Qhr 9JtYhzn8x2wSaGsTROV0WZ8Msz4RZn0q8JwFy8otzCEg0iUzLW64o3Zzsnt7 eWhnZfjm6pXbG2P3tiYf7Mzc25q+uXnt5ub4jZWx5dmBmYnu0eHWy93aVmNl s768Ra9o1pU1qosN9UW62gJtdZ66MqdBkaGuyNQrcw01eTA316e3qbM6NFlt Delt9fK2upTWWlljOdeo4DYrOE3lSY0l8fqCaG1eRK08BFSTElyTHFgjC6iR +VXLfGtll2okntWi80qhe7XYvVZ6vj75okriqpa6aWTuaqkrrEEaqVuD2Bk3 CQYRMOsETFg0prg1prjqZa5aqYtK7FQncq4VOqvlnrUSjyqhW4XAVSFwq5Jc UKX7NVWKezRZg8bCHm22XiFW5iSUpUWVpMcUySMr89jG2oxuQ3GvsQTUqctv qsvQVaU01qS1qXM6AEM0ubAAwQIEO6hOdW6XhmCTtrpUXRkf2KRc6vuTbAI6 lE0ONbMfyiYgKn3rx2xCxE2S7Ek2cSTZxBXYhE+yyUX7E97MU7EhzsUZiSpF aocmpb85E9iE3nKRYhO0nyCb0C3wdAxBNsF6s7hDuBIOC6ZQRbcoPDmUTTCe gmuKTRZJw/gkfCXC+ZIDYALq0SYPGNPHCe+DgmqGfhBMgEcoMAGOoJBkP4Cy xyaT3fkzpKlk7nv9PJvAB32PJ5VURSyMmyyO1CCbkBZ+U8/70vdUgphgEknB VxcPNIJf2svUMgnHUGljGG0BGNmcaAA2Oah1ovGHkipHDG+ETXhKx9Yb8Leg IlkALNi3EUt77XbPJC1LM/CdyfpdBC/M6ZbH6zCYQre6/9g1b9IehYqbYGVg WBz69q09BqF3RcRSWib9RKiywPR0L6xXRviViH9sVeiIRzYBGKFiIibhEopH 6PQB0PHsej8IFgeFzPL8xgAILpFNAHkAPTbHdStXGhaH6xaGamGGfyRk0ER3 c5b4GoAnwCY3Z2EBINOGQZNHa/BBw09vjLy6Nf7lyfK3lxvwkP/+weLznen3 j9Z+ebH927u7dL8J5nQBnmCsBNO6yPaLO4gkuPOV8NHf+ePd3d/f3fr2Zufr 6+1fX9349dV1AJPf3sJ6A6tyfXmx9uHJ0ovb40+3rwKJvL0/DXgCGAICSHm2 Mwqc8nBzCGa4hM1fnq9Q8RHM3fr0ZIkiESQUOqQcqn/6wed4HI/j8a8ennan 4wNcpDF+0lhfebx/Bjs4NSEgmxssjyOQRB7rnRx1MSPBtzaTvTGoujGs2Rxs WOxUjBtyrmkzJg1Zc02Zs8aMucbUOUPKnEE2q5eAlgyyqTreYEmUMcW7LdP/ clH4cHn0aFXseE3CjIozp+XN6/hzGt6smjOvI9YLBsFCo3DBKJ5vloCmjZLl zvTpZtl4o2TMIB5ScfX5QX7iC7EF4QklMQklsYmlcbFFMQmlCfElSRG50UHp YecFl6zCGYAJJzxPAZuc8jxzwvMMsMk5P0urEHtgE/sIJ9swgk3OBdmcJmoO mwObmIdYAoAAhthHOyCbwOUP2MT8e0c8sIkZySbnSDaBS6K/yc+zSQADZBHk YBZif5pldzLM9kSYrVmYjWWojVOwjX+kS0EeZ2JAuz3X92hr/N7G1TvrV2+v XtmY6Z290jIxaGjXl7XpSlu0pU3q4saGIk1NXm15Rn2FpE4h1lTLtTWpqspk dWUKzLXlUlWlXF+b2azKa9UUGOqy68pkrTWylmpJs1JsrBToSpPUBbGq/Oja 9OCatEBlim+l1FshulgmcC/lu1bwzlfyLygFF2uEnvViL5XUSy3zVkkuNIjP q0RuDSLXeqFLvdCpQeikETlpxc46iQvMsAbBGhcglcCxnudQx7WHuVHmYkx2 0cuctVIntcSpQUT0ZKmXuBIBFJJ0aiTnq0QeoHJ5qKaE26VK79VmtdXJDRVi TamgrphXnc+uLxW2NGT2NBb1GosvN5d26wtb6jMNSnlTbXqHOrcT2ESV0w5g os7t0BCCHVRbQzbgSacqq6U6BW5ekxlO5HQd5jc5mNMFJPI/ZJODb/nOdZJo X5xoV5ToUEiySR4ZN+EG2XjZEnETT8eT0UHMovSEhnJ5uzq5tzEN0ANIZLK/ DESPmyCboOXk0FQuwJCjZIIn9LQuqsXJUWyCO/g/sbHl3App2Z6+XDrRA+RS iAI26VJLAU9gEwvwUmxiEitBKqFyuiZ6C0D7eNK7Cyb/Ezb5Dk+GK0jDfvWe AE9qUYu0fC0qyeoQ48n33hMKT5ZpkZQlepNHbDRPw5ndgmDkJXwE4MZ1ooju ftyEEjALzBhkwRw5wixPmmWIxKfdMmjEnwP/LotYIY3EFvh7AcOicQnwBNkE UAIbNWIYhcKTQ2VSIng3wjK539gRU7xMrfRHswn2IqHYhM4jlKhQC6aBYWFh NNFQbHJ7vpXCE8pFYpKvhUhCUQkI0INamwheerk99GJrENkEbg6fAtyxcU0L bLI8Ug+CxdqYigyaGG4v7Dtfbs213pojwOT2fOf95d6nm0MvgQt2xt7dm/71 2SqyyafHK6/vzL+5t/zxyea3t3d+f0/U6SLMJu8eYNyEYhOEkU/Pb3x+sUVP 6AL9hq0b397c0w5Qybc3W6BfXq6j04QwmxDhjIX3D+eAPl7dmQBCeXNv+vNT wnICO0+2rgCYALmQrpM5ik0ASagWJ2gnwVQuuhuF7klBeMFoyz/94HM8jsfx +FcPL9tTERdteazzshifDHZQJjtIFu2dzQlKi/PJTPRLj7uUHuedneinTI1b H1RfH9ECoSx0Vlwz5I5pMyYMWTNNWTPGjBlDypRONqEWjasE4w38RV3KeDXv ciGwiU9HVtBAccQum9QCmyTNaQFJgFDYs5rEOR1vTs+fN/DnG4XzRvFcswQ0 2yxb6c6cbAIwEV0zSoc0/IZsXz/pxbjiyMTS2ITS2JjCqPjS+Hhgk9KksNyo oMyIwIwIV6732SCrE95E3AREeOE9z2BCF7AJzASbhDqcDQSasMCcLstQK4pN QJjQ9WM2oYdO/ms2cQZZBDqZBTNPsxgnw+yATczDbS1Z1owAS98wx+zM2B5j yZX2qqlBzZWu6qH2yoG2ijZNnr46vak+u14hry1Pri6RVhaJq0qkdRVpmpps fTVfU8lurBMZ68X6GqGhVqKvldQrBPq6lCZNpqE+rUGZrCwVluWzK9JDS2QB Zcn+VWnBVamBytSA2ozgmlQ/ZfKlSslFhdCjQuhWKXRVCt1q+K61fNc6gVu9 0K1B7KYWu2nEbg18R2ANjYihFTM0Qgc137aBa6UVOmqFTK3AcXchdNQQa6aa 79DAtYdZI2AQa45do5TZKHMySAFemBoJUy12UoGkbrVC5yqBk1IIhOJRLfGo FLplci4q0sONleIudXqHKg3wpLVW3qHOMFYn65XJbeqsXmNRf0vpQGtZn6Go rT7LqExtroGTOUAfhKmEXGCghFI7ySZd6mxgE20p74dssu9/p5Dkfxs3oRfp MvHCFyXYEqLYhOOWy/HgB9t62hBs4s08FR/qWp7D1VSmA5t06VKwNixlNqG3 ht+v1kWr04VVueghEuzWB8IYCrVP4QlVSRjB5Ad+E2pBgQmZY1MLj9kzQE/A UPD0S6YnjXXmDzXDbTOvtucCqsDm0vdsQoHJD+ImBKT8r9mEwhNkE/wf8uST /K4XnnCdjOyX3kJjO/DC0l5MZGmvSBdCGd0dT0/fosdHqIws6jwVTKGiIbAD 7zJhEyoTbGtaA3gCh6kEMJJ6iP6MVFiBzK9TwB8OjfAYD8Kaw0RwrS0Hiwwv wM9F5m5RreTpOpRNqMbuiB4AMngY2QTuhs3fD03oInO61PRQCIUeVJNEShg9 oZfhpcgFkARLK6ObHv0mJBEQrhNAEjSwH9ShbHKUgEpAsIC7odlkZ6bpxqRh fUyDbEKAyah6Y1xNBE3mjHeX2uDYnuGlDdjk1lzHnQXgo8vPb4y8vjn25vbE x4dzvzxd+fX5GmnouP7l6ca7B6vvHq59er719c0dgkpIL/wfH+7/+fE+ldOF +vJyG/CEIhRM7gIwodiEDJ1sYdwE2ASbKn4Avni8SOjR3Kcni+8fzn4gF8Am aI2HHcAWgBRAko+P5788A/rYTdPCtC7M6aICKFQSF75Kj6HgS8dscjyOx/H4 2+HlcJJ13iop2E0S4yNPDEyJ9xdFeaUlBaazg1MTA5LjfKUxl2BhrEi/OdG2 da1ldVA71VY5oi0YqM8abMi6XJ3Wp0ztq0zuUUi7ysSdJcL2Yn57EceYE6dO DauTBujTWd1FscOVnJGq+NHqhFk1d1HHW9JxlvWceXXCnF4wrxcs6oTLOtGa VrKmla5rZUuGlOXmtGvGlIFGSadB2NIs5gsdA9P9o4oiYwFMSmJAcWXxMSXx cWVJYfnRQVlhQZnhXtJAqwjGSY/TJ73OnPYxIwoLXzh92vscI9rZLtzRJoxh E+pgEWJ72tfspOdpmImOJGF21mH2NuGAFQzbSIZNhAOsrcOJHdi3ZNmeC7I8 G0gI/SZ018k57HWy15MR1ognFhE2FhHWJjIPswI8MQdCISEFdI5lYR3AtApg mgU6ng1hnA51OBludyLC9myopU2kLTPYyjeCIZOFVBXxGsrE+kqRViEwVktb 6+WNSom+QtRSQ7jUW2pTmqtljRVifbnQoBA3Vcm6lEntFXGtirimslhdcYy6 OE5VHF9dmNimzmjX5bfq8ssK+amyCHb8JXm8U0oMI4fjVp7sU5HsXSHxrJX7 1Eov1IrP14ld64TORChEwAQAqRE61gqZoDoitLGrOiGjTsSoFzPqRcSiTuhQ K7BXCx3VAoJZQPR1A5/RwHOAmbrUiF10Une9zAOklbo3iImyvQ0y9xpgEz6T oAMRYJFLldC5mHu+XOitTA7U5ES1VvB76uXdDfAInd1nyO3S5/U2FV1uKe0y FnU2FrVrC5rrcxprMhpr0o21mS0NWa2q7DbSbNJO9jRp311kdWjhpbTWevgF SnXlHGUmq0jsVSa+WC6+UCVyqyKIzEUpYCoFjpVc5z0hmxCiFt+712HB3JMT SMF2IhfETmmCY0k8oyTeoTjOvjgO0AMYhBC8qywR2MQRDuyJsXfSoSjevjDe oTDBsSCBmZfonJPolp3kwQ+xv2B5ws3qhJfjqehAx3x5LLBJly6z15B12Zgz 1Jp/pRNIpGSsp/RaL6GxnpLR7iL0m4AGW7MHmjP7mzJIZV42ZvQa0nr08h59 KqhbJ+/SpnRpk7tobEL3wtPrdNGDJnQLPPrfqcShucEK7FpCPh6b1tqFy6m+ kjEioAN3zoIFUbzrcul0P9yndKYf0KZsbrB8fmg3vWq6v2iiN5/sEQ+EUjze k3etO2+8Jx800ZOPYAJCAKGDyVF+k6k9NiE0UDJNEgqWLAbND6Pg0xWLV4AU TE3xB0tvIUQcLBe8fJhTnp6ItW9sJ8tkETlUe570FZgB62CTFKxXx+vX9nK6 TNgEc72w4PDuB5FeFXonlEUST/BPttcEsxqrN88NVwHYEtYkMgw3C3wEX2wv jwsWROgEoyd7jviDjUiQUK7P7jLI+pSa3rrxYJN3ik02J03N71RMxKQ5O92Q QocXmKlKX9ic8caMcRvAYb715kL77eXOu6vd99d7QQ9IPdzoe7h5GfRo8/KT rcGnoO2hZ6Cd4eegmyPPyBkE+0/JfTjz+Dqc77u/3n13pfPOSsft5Y6bC61b s02b04a1ce3KmHrlmnptQrsxpb8+03hj1riz0Hxrqf3OStfdFXhLz53lnttL 3bcW+m4v9d9fHX68Ofp8e+LNfQCElU/PNn55CeCw8+ur7c/Pb7y8t/Ti7uKb h6sAHV/f3CYjJrtUgqKSu3CTXraL1K1vb27jya9vbv7yauvzi+u/vCL05eXa h6eLL+5N3t8a3lntfbxFpGyR9LH87RUwxernp4u/vlhBJIH1N6J68Ap5ZpdB sJ3iH29v/N+HHTSSYNFgjJXgYi9isoxE8/kpvBHevvhPP/gcj+NxPP7Vw9/l XJinbWKwmzjGRxbvL43zg0VKYmAGLzSVHYw78qQgY1XWtZaKK8ayy6q89spU faFIk8NVZbH1+QJdHl+Xw9NmcTWZbHV6kiotsUYeWZ0cXikOKef7VYn8DJlh PaWJw5UJV5VJcxrC+b6o5QKezKuQTYRLWuGqVryukWxqZJtq2apevmJMG29O H2iWt7fI6g38KJ5tSC4rojgqpiwutjw+riIhVpEQVRoXWRwfXhjLyosKzon0 TWMxk84TBbguniRavfucIxjE+6xDlJN9JNM2nGEdam8RbHPa59yJiydhJnbC HFA24QwUwIUNuW8Fh0Ns6Q0WDwpTvLCeMJyEtxBdHYFNwq1NhGyCOkeCCcgq wNEywNEsiHEuhHEq1P5kBMEmp1nm1pE2zmE2PpEMPt+nOCu2Kj8Jnp+1ZWxj laC9TtpWLWqu5Lcohe1KUVuVsKVC0FzOayrlNBYnGYoSm3OCW/JCjLksXXZI Q0ZwTUZoTWb4o83Bm0s9amWqokhYkMPJSItLkUWlJjglx9hnsV1KJV7lkosK kUed/FKd2KNO5N4gclYJnYAs1HwHNc++WuBQLWTUiBxrxcw6shchdkvHhukg eBXVIHRsEBypeiCUvbVK5KoWu+tkF0AaiUed0LWaD/d0rRY6Ey1FxEAHGEBx rhReUPDPl/HOV0ou6XIjOqqEfarUfkPuSGvxQEvJQEtZf2tFd1NZd7OiVV3Q VJ9rqMnQV6fD3ARsoskhld2qydpTBqhTn9XcIG+ukzbXSvQKYJOQQtHFctEF hfhCJbIJUTTYSclnUhhyqOi1f/coYxdMSDZxhhk3kU0AN1AkfTBoPPKd8FWC TeIcCuMZBfGO+QlOuQnOOQluWQnuBJtYEGzi7XQa2CRbGqVSAFbkXDbm9Tfl D7YWjHQUXe0CHikd7yszYRN42uxvzrzclNFnTEf1Nqb1GFIpdevloC5dCqhH l3KQTSinyaF4gtYS5BFqgUETmipNBDAy2Vt8rasACwtP9BThTN6TqEkFkDI7 SEQxgE0m+wqvdedMXS4AZJgZKIL1WFcuCAhlgqSSXTs8AEh3wWx3wXds0pU/ RWoXUnrIol5Upa/+YhTgydyQiXY/nex4QkU9qBQvU+I4WP6XXnSLbpw3gYtd iqGQBCmAFL1qFqX1w9jExBq/m2ZG/vKxLzkKCGV6jyWRH5dI4FoarQUeGesp wj6eUwPl81eUVINFotEJ7Qsgs1DFuDBicqj+tgMjFTehs8mhVHKoMJhCNXOH 9wKhoEH++kzT1lzrzcWO2ytd9wBGrvc/ujEAMyW4RD0B+tgZfgYkcuvKi9tX X94ZfXV3DNcgfAkEiwebvaD7Gz23VzpuLbeDdhZbt+abr88a16f0qxPatUnd JlDJXBNsguBVOHNntfveGhBN//31gQcbgw/WrzxYv/r4+viz7akXN2fePFh5 93gdGASjHti1hGKTD083YQcQAzGELqrRCVW2iyKUrwSYEN55Une/vYWXdn55 ff3Lq82Pz5ffPJ59fm/8ye3Rx7euvrw78e7BzKcnC5jKBSRClgteAwGb7NlM 1uAMyRfLVPrW72+uA5sApJjY4UlDCkEiJoKPgBv+0w8+x+N4HI9/9Qg5bxXu ZRfr75QU4s4Nu8CP8EQBjwChAJgkJwTArMjk5glC84WhRaLwEklkqTSqTBJV Ko6sSI6tkMVWSGNQCkk0qEwQUiEOLRcEFSZ65cd7VAm89OmskWrO1RrOjEaw qBcuaDhz6kTQjEEwoydKCi9rRcAmGxoZaFmfstSUPt6aMdSW1tOZll8RFiNi RBZHRZfFApXEVybGVyXGKhKBTcIKYiKKCEKJKIoPyY32lge58DxPXjh18vyp 075mgCdmAZY2gB6kgE3Mg6wJNvE8dcbX7Cg2QTwB0CCalQTb7HZaPIxNiB6O 5AGKTeCNluE/zyYOILNg+3Ms+9NhdicjbE5E2JwNNbMIM3cJt/aJsGdzLhZl RlfmJbZW8ZoVSS0V7HYlr72C01SaYCyObSyM0edF6nLCtaTUWaEN6cEayQWN 9KJK5lkv86pJvlSV4l8lD+zSpG/Pt+vr0kry2VJxSAjLKS7BOzmWIYu2y+a4 KpIvKaSewCY1yV61h7FJjcChRsioBTYROdaJmRg3aZCSPdOBUABPAEwEDkq+ /aFIohIyQcgmoDqeA6he4KISuQGVaKXnAVJqBS5KHnMXTEQu1SKXSuACPhMW SqFrBc+phO1UzHZWiL20eZHdNaKR5sLR9rKh5rL+5vLB9ur+turelqoWVT6y CchYl9Wiym7T5raos1vUWS3qzD2lg7q0ma318pZaaQvJJtWZrCIhwSblovOV QtdKgauS56zkOcFX+gGbmORr/YBNvsONWCJuUhzPOApPdk8ezSYCFuOiFVFD 2Nf1TFyIc44sur4spft7NrnSWQx4gmxC4kkx1X4R2ATxBKgESYQSIgmoU5sM wrQuKqGLqtOFoZOj8ISqyvXzbEK0OCGf9tEmj5BCJozBbQsBUghCuUzENeaH y5FNJvvyZwdhpxDZBEMnEySVYBnh6cPYZLIzb6IjF2YQASkYZDmMTWYHTdhk 1x1P+OL387KUR7EJxSNUltehyVf0Y3T9PJuskXej7kyPwph80CJpe4c/Cun6 qYGHdhBcUmxC1RBeAF2tBh6ZGaqY7C+bHlTAGr8A2uGRUKjvYxI6oRK6qDpd uPPjvvDU5tbMfnYWZS0xyeYyEbpRyD7vu53cQVTSF6Fp4/WZ5p0FAg2ARABA EDEo0KD0eGsQhAcASYBN6EJCAcFLDzb7Hl7ve7zVD3hyZ7WTziYb0wbAE5jh 8uZSG7x6d62LVPfdtZ67a713V/vurfU/uj78dAuoZOLlrdk3dxde3Z4DNnn/ ZOPLy20kC2xWArQCAjDBTC0AEMCQPz/e/+vTA4QU2EEMwZ4mcAzeBZd4kgyy EGBCEsrdPz7c/fPj3a9vt399c+Pzy1XAkw/PFz6+WPzyeuXT08UPj+Ywjwvw AUjkt9cbvzxfhgXRipGwmRDxFHwJuOMjUdqLsJl8e7WBoZPfyZbx9BYnX54t k4e/0zGbHI/jcTz+dgCboEIv2kRecojxY8YHusQFOAsivYBQgFZE0Zd44RcJ VEnwkyf6p3OCsvmhOcKwbB4rgx1ULI4ClUiiS0mVSWNARfyQMnFYqTAoN8Ez I9IlP861gu91rUF8tZY33sCb1QrmtLxZDWdey50yCKYNgjmdYEknWtWI1zUy 0LxWOt8oH2tO6zFKm4wiQZpHUrJLVHlsVEV8TGVCnDIpVpkUVR4fWhzDKooJ K44LL4kPL0lgFcb550R6p7PO+VuccD950uv0WX8LuwhHQBIrlh2wiWWILeyc vHT2pPeZcySz/IBNdhspkpGRo9gEYyvUgd32iz/PJoF2VoH25gSb2J0Otz0V YXMy0toi0soyzJzJMvMMtYqLd81NZVUXJXVXJnWUxbUWRTblhRlyQvSZwfqM IE1agFrup0nxVSf7gFTSSw0Sb4PkvEbo1iB0U0kuqpIv1aT4VUh9hppzby11 1CmEFSU8ZaUsOTk8NS0mJY5gkxyumyLFp0LmVS7yqJZ5kmziRhrbmSo+Y59N 9vCEYBMxs0HipJI6w1xPZxPe37MJUEkt1x7UQLIJgIkJm6CUAidkkypY8BwV HIdStn0Jm1HKda5O9gUoGzJkj7YWXWktH2pRDLVVD7QquxvLgU2MdTkUm7Rq cjv0+YfGTYBN2hpSW2qkLdXixnJODbCJ4IJCeL5CeL6K7wICNqnmMqs5jpVH gwkVNNmrCXwImyCYUEETABNQIUEchIriGUUJjOIER0pwCZv4KnGMELIJE9gk m2QTSYSTl/UJd+sTPi5n4lguucnRdaXJXbrsvsZcgk1aCobbC5FNxnpKyKBJ 8Wj3vhcewGSgJQvmPmM68gjMQCIdGhmqXS0FtakkVOUuehlhym9i0hr+YHd4 tMCbsAlVloquhaEKfEpfvlo9O1AOJAJIgjWj9vGETL4COgBCmejNAzaZulwA i7Gu7P+ATTpyJ/ZEEEpX3kRX3hFsUvy9YKd0z3tC9VVUotnkB0WATZDhKEIx gZSfZ5PVv/sg6p6LZHdCJEf4i2CIBGmF+hshbQGYEMQx2bA8XgfruZEqYBOq pDCW6iI0Xr+41wmF+CY0QjEp0mWS7nWwLzy9M+P27G5eFoUnoL8FE6ASRJJ7 y633V9ruLrUApOzMGvAmG5OGjSnjjdmWm4sdQAeAJwAgGBYxIQ7AEyp0gniC hPLq7hiIDilPdwBhBoBNgFDurXffXukADKGzyeZMI7IJIsyjG5cBZ+6tA5j0 3lnp3VnoJCr0bo4+3ZoAKnl3f4mwvT9YAQZBrKACH9ivBB3uVHFgoBLAE8oI T2cTmOlsglTy9Q2cIe0n7+/89Qnee/vbu+0vr9Y+v1r95c2uPj9bxOrBVJ0u TMQCAU3A5eeni9gABatywfzuwdyHRwuYvgV4AmwCnEJ2ZtllE/KlNRPBfY7Z 5Hgcj+Px4xHsYRnoZu7nfNbf5VyQu0W4l12UDwMIhRN6PinEPSHIFSAFCAVm SYK/LDFAzglO54dmCcMzBWHpXFa+JLpAEl0IPCKNLZbFlSTHlybHF/JDioVh RYLg7Hiv1HDntHBGdrTTaIPkSp1wtJY7pRbMG0TzOsGCXjBhEEwCmxCWE9Gy Rryika5qpLNayZxRfqUlrVUnqKyOjpc4CnK8IhSxoKjK+GhlYlRVQlhZbHBR VER5YkhxbFBhVEhRbDCwSW6Ud0aoY4zLae8zJy6cNA+0copzAwaxCLaxDWfA TCR6eZ8542cOa2CWo9gEXe2AHuY09PgxmwDF/Kc5XdZB9tZBdsQdQm3PRNic irQ6GWV1LvycVYS5fdApV//TIaFWyQJvlYI3WBl/uSyqLSdQm+ypkp7XJXs2 yi/ppBf1yZ6GZE+99KJOckEnvmCQXDTKPAwSN43YXSO9oE72rknxqZT5bE8b 3ty5qqkS52dEZqVHcZIuCXj+RE5XtJ1JTletyL1W6LbrNOEzVDx7Fdeulmdf x3eo4zPqgTUANESE1BJnwsAuYtYLHesEjFqeQw3PHiMjJkIwMWUTIZHTBWCy l9PlUs13QiqpAiQhqQSk4DIUSbblSbYVXEYl30nBdwGCqJL5tFeJBnVZ19oV 1zqrRlor+pvKew0lreqC5oZcoJLG2sym+uw2TW6noaBNm0sqe09ZbdrMLk1G R0NqW420VSluKuPUZ4QW8y8o+B4VfI8qnosSCIjjVMN2rGEzKo7oWnKQTQBA fpJN8uNBDgUJIEZh4gElMOAlOADHCuJADvlxjLx4Zk68U3a8a2a8myzKxduG YBNvp9MxwU45sqj6shRkk8vGvIGWfIpNrnQW7qlgtyl8Zz6AyWBrNghDJ5jK RcVK6JBCOeLpdbroQRMKTOid37FrBtEm4zA2WTpQqwrzo6iCVFhkGAiFvEkR ijDO9xG29xmCGkqn+wvHe3JHO7OutGeMtKUDmKDGu/Mmu/MnSOKY6sr/cdyE ZJMj4ybTA0XwKTQRURsys6scCwKTeHLkT/T/wCb0BLD/IG7y0x+015aFqM2F Ia1FQMU90WJA1YtXq7E8F+EumWgAAJmFPwogJOmCWdzrGg9nvmOTyQakDOx+ Qs/UgssfsIlJ1/jtPeig+0p+EDcxYZMHq+3IJngJ+3BgY6oR2OT6TPP2fNut 5U7AE2AEQA8KTxA9QG/uj1N6fe8ailrjAk++vjf6/NYwssn9jZ67a12AJzuL rdsLLYAnoBtzTXB5Z7UTDgCYgB5ev0ykkG0OPNgY2Jrr2Fnour828uTGOLIJ oUdrpKnklknXkh9ov4/JHqHspXLtUgzFJiDy8s6fH+/+/uHW17dbBJu8XPn8 ahnZ5MtzoIn5D4+wywla4OeRRzBuAtjy8vb4qzsTHx8vIH28fwjnF9DhDhiC rRhhppzvv744hE0wevJPP/gcj+NxPP7VA3gEqMSHeRoU4GqG0ZNoX8fEYDcA k/hAF4yeAKoI4v2ECf7ixABJUqCME5zCCZFzWdniKFCuODpXEpMnjS2UxhXK 4vJ5rCJheCGflR1/KSXMRRpsJwux7angDNUIrtRyJwg2kQCezOmF4wbAE/6M XjCvEy5pxMsaKWhGJ50xpgCbNGv52Xm+CSnOkiK/sPIYUCTJJuGK2JCS6ODi qJhqXnBxjF9eeEBBVFBhrF9upHdm6AWeN5DIqUtnrVh2FJvYRTiaBVqd9CKc 8rAAMLEk3es/ZhO0nBwKJsgmFLyYA+yEOdhFMv8TNrEFWbBszMJszkRYn4qy PBllcTbsjEX4WfugE0yfE94+p4VJbppK/mhV7EhZRGeWj07kohU6N8k8WlMu NkncW6QeoGaJR7PYvUXi3ir10Elc9FI3ney8Wnq+juyxXp3iO6BL2xzXGJSS +jK+spSfmRwm4fmn0HK6MG5C5HQdxib1ZNVfws9OmtnVQiYIywLDAr3tcIDQ YWxiks21xyYuFJvAAthEyWMSFg+STSp4jhg3KecyyhNsFIl2lVzHaoGrUuBe xnMvTHKtzwxrLucOG+FBVHGlrWywufhyY2G7tpBM68oGPGluyGkj4yaHskm3 OqOrPq2jRtpWJWou5agyQkt5Fyp4HpVc9yqOs5LtVJ3ErElyrE36EZvQ6/2S HRWPZBPKaUIETWLsADryAE8AQABPEhkmwv088syhbCKNcPa2xb7wp6ICGFmS CIyb9BpyKDbBtK6RjgIUsgnoalcB4YUn4yboOgE8oQjFJLOrey9uQseTQ9mE 3gie3hH+J9kEa1hhMw6qRBW8nbxPCVb0mujdrRhMVNMaKAIwudwo69VL+o3J GDchBIuOnLH2bNChbAKb+wldXXvOlEPZpN+ETQi/PBYKQws/KaIS76E/kYnT 5GCZ34N5XN91M/l5vwnthkdldtE+rm51tJYgFPjm5N+FbM6yK4pNMEqCveDX JlVAHzNDFRSbYLoXxSlUJAVOImvsGuTJS2wTD7c6KnRyMNFr+zAAoQIodNEN JmROlxFI5P5K673lVmATEC7uLDZt7rEJ5Tq5s9r9eGsQ4yNAKCRrEOjx/tHU h8fTqI9PZijB/ruHkzi/fTAB87uHEy/vXHm6Mwh48mCzF9gEMASTuwBPQAAm QCv31rvRmYKEQuaMDT2+MXx7uffWUs+91WFgE8zp+vBw5ePTTWQTykWCbEI3 lRxEEoyPHLoPbydt8vf3dA9zuj6/3Pz8cuPr282vbzcIKnm9Avrl5SrZVJEQ xkqATUCwgEvgkafbVx9sDAKeoBEec7qATfASXfDYJh5rc5H5XaYJXSD8iH/6 wed4HI/j8a8eACa+TmcuOZ4CwZp1wTrC2z7M0zbGjxnr74QBFOAUgBROrA83 zpcX5wcSJPhL2SFyfniGMBKUKYzKEkVni6JzxDG54ph8XmixKLJYFJ6T5Jcc 7ioOshMH2hhywvuVvKv1/AmNcM4gndULp7W8cQMfNK0XzOmEixrRslYKmtZJ J/SykZa0Ji1fInfjZHiIinxZ5dGhiphIZUKUMhEWwaVRwaUxsbWCoOKYSzmh fvmRgcAm+dGXssO9xX7u7IvmQdbAI4xoZ8zpso9kErleF06e8joDVALwYk7C xUE2sYtiUpYTgk1ohbmO8psQbBJiC2+xj3b6T9jEBmTBsjYLsz4TYXUqyuJk lJlFlJkZ65R90Elnv5OXfE+LOe6qCs5EVcxoWVhXhpdB5GQUObcne7TJ3FtE Ls1C5xahc6vIpU3s2iZyhYWaiGg4qaVuKqlHvexCTYp3jdz3wVLL+9sjfbrs 6vyEAnl4higoQxQsj3NENimX7fpNalO8kU2I9ogCR4pNGgAlgE14DkSWl8BR A2CyJ8KTgidJNRzGJogkJqoXuDQIXTUSD5BK5FYrcK7iOlZyGRg6ATZR8ByJ mctQxNtVJjpUsplVXJcqvnsZ1zUvjlEi9KyQ+TVXCq62Fox1lo60FvXqszp0 RW2aAqASZJNWTW47toYnROV0ZbZqMnpUGd31aZ01svZKUUspR50ZVso9X8F1 BzZRUmySyKhJdPhbNqFK/v4tm+wmdMXY5SXY5xJyyEsklJ/EoIQ7eQkO5IHD 2UQU6uhlc+K87YlLzqci/R3ShaHVRZIubdZRbIKhE6CS0e5CEIAJIslRXngT NjEJndBzuig8gZmqJ4zZXKifZxOs3IXz7AARm8AWgcgmZBuUfKCP0c6cqcuA EgXDrWkdKn5rHadbK0I2gXm0I2e0Letqa+aVlgwAkEO88N0FP+mFBx6BT6GJ OECWLy7DCmPktz2STUzKdv3Aok53we+X1frvvPCHssn6tXqqdBWW2F2kgcki peGqOcBD+A6kkQSgA+Mm+Ln0AsKwD8eQU/bbMk4QQRPM+NpPPJs4PG5C987T /CY6ekwEdWhPk4PHQHcWm5FKEEwwxWt90rA6rl+fbCRCJwtE6ATY5MHmZfSe PL91BSMmQBxUfATWiCefn819eT7/6eksCNYwwz7M7x6Ov7p7FfDk+a1h4A6g EiARevQEBJwCOwAvmAD26Abhu3+w0X9/vf/h5tC9tX5kk+c704An7x8sfyLd Ir++vgkkgiWCTZq8/yBo8l0veJp+f3/vz48P/vr08P8+PyItKsA4t355feOX 19d/fbPx61vQGmE2ebn09dXaH2+v//4G4GKNqhgMQoP8pyeLwCbwnYFNsOsi gAnFJoAhGDTB2lxU9eBD2eQ4bnI8jsfx+Nvh43DKh3HK1/G0n9PZQDdzNJ6E edtF+DhE+DJiApwTWe6JLI8Eljs70pMb5cWPuSSM8xUl+EkSA6RJgWlcVho3 NIMfliUIzxFG5omi8kTR+cKIAlFkvjAsmx0gj74oYTkKg2yrJH6Xq4UjDaJR lXBCIxpX80FXDJxRA3cC8EQnnANmUYtn1eJJg/yaMbXLkKwoj0qUOCdkeQrL gkOBTcpjwhSxhMpjQstjQ8vjIivZrNK4wMKowMJoYBP//GifnAgvqa+XxOei wMslyc0qzMY82NKKZW0eZHHW/9xZ37NmAWZWIVa2oTY2IdY2EXY02YNsI+zt ohxgtg63tQy1Ng+xOhdscTbI3DLUHktyAaogkuAajfBYyAtzumwi7awjbHcV bgOyInvNm+/LAnU29Oy5UDPLECtrlq0Ni2EZ5mQe7nwmwv4scQdzZsgZX9Yp OY/RXBlzpcR/tDSwP9+7UcJoFDs0SZlGCcixUQyChVOT1LlJ4myUOOvFTJBO 4kw0ZJd61Mo8q5O9OmtEEx1FPbqsloa0mlKBiO0THeokCreSRFinxTHyuW6l wvNVkot1Kd5knS63BqGzSsBU8xhqrr2aY1fDJVTLs99L7iLyu/arbwlIACH3 6/lOB9UgcCZFrOt4TFAt17GGy6Ts8Bg3qSaDJpTZREHiSTmXUcZ2JMUsZTOL 2U5FSU5kQV2XAo57VUpgWwVv1Jg71pzfXStra8jo0GR3qLLaYaHO7NJkdaoy OtXpXZqMLnVqR0NKlyq1R5PWrU4d0qQNaVIHGlJ6qoUtxfHqtKAqwYUKrlsl x1XJdqlOcgY2USY6ghRsp4MiHe6Oe4V/90v+orcd8QTABER3wVN4AmySRwZH 8jFWkkQI1qQcCCXsCi0nwCa5cYysWMf0GKe0GGdxGPOi1YmL9if93c6E+9ln SyPry1LaVek9+mxgk6FWCkyKrnYReDLcnj/SsRs0AQ235gw2Zw00ZfYDmxjS evWpRD0ufWqvXg7qIZAkuUsj61TL6GBCd8Qf7AsPMwZQqEbwVA1hik0W95+B D1hO9roBUlogd7A9B+AJYT/pIsDkakc2WTQ4p88gBTDp0YkBUkZbM4FHxjtz ZwA0uvNHWzKHG1Mxd2uqM2+aDKDMkHWD5/uKqdAJ8Wp3/uzl4l0w+Z5NpuBk X/FkL/w4RUTIpocQcdlXTBQNGygnmowMVy7Rfgp61xJ69WCq9YlJ7hbCCzKL SQBlZY9B8FGfrrVJFQirZhHxiD3WwIJUGBnBS1IUmxBViEGrcM/xhrW9clvL Y3VEBtdoDeFzH61dANC4opwl2QSIA0MkcyNVIOy3aFKka2aoYmqgHDO+YAGX cAD4ArAF94n4y0Q9URl4Sk0U4JrW3JjRbhHSbc/q4RI36UIvvAl30FO8TGpz 3ZxrvL3QtCcjwMiD1faHax0gWIAerXfeWurYnG5aHtOCNqaMt5Y672/0gQBP Ht0YeLozjKETQJIXt8de3L728va113cn3t6fevdg+v3DmY+PAUkWfn2x8u0V PHITuU+fnsy/fTDx+h4cvvJ0Z+jBJrBJF3wKIM/tlc7t+dat+dabi+2wvrvW /Xhr4NnN4ec3r4KebI88uj50f30AnvOfbF15dB3msWfb489vTry4Nfnl6cbX F1ug31/f/OPtbdBvr299fXXz66tbREbWmzvf3tz97e29397d/+3dXRNCOYpN sEgX2Q/lAfDOnx/u/vnhzp/vb/1O9DdZ//Z6/deXy5+fLYB+e70BYPL56W5n k89Pl4AggFa+PFtCSHl1Z+L5zbEXt65h+hZQybsHcxgxIdO31jChC6kEm5hg pS+EERNf/D/94HM8jsfx+FcPH4eTfo6nAwBMXM2C3C2ATVgXrEO9bAFPwn0Z 0QFOccGuACaJoR7s8AuciIvcSE9elJcg5pIo1kcc5ytPCkplB6dxQjJ5oTn8 8DxhZL4oKpsXkcMLz+GFZbED0+K8ZeEuohBGCd+rp0pwVS27ohJNGqQTOvGE VjTayB818Cb0vEkNf1olJCWaMMivNsrb9LKs3MAYsXNCziVeOSuczOkiqKQs mlwAocSFKxLDyhMAT4IJ10lsYEFMQH70pRQ/nxR/vxR/d66HZaiVebCFZYjl Gb8zZ/0BTM5ZBJlbhVjasqztWMAmtgdlGwmcQmAF8d4Qi3PB5meDzKzDHIA+ TvtboK/EPMT2lJ85ZTZBvwmR0xXFtI20p26FbGJNsslBnQ4/fSb8DHwZmxA7 +2Ana5abZajHyVDG2WgnyygrRujZS6yTKWybtoqI4ULv0VK/wcJLRqmDQWxn kDjoxQ6NUsdGKdMgdaLJuVHiBNJLnDQSlwaJe430glJ68WpT1uO1roHmgpaG 9HZDQX5WfIY8Mj3RKTPRKY/rXiK8WCn1qkvxUaX61os96kXuKopNOASbVHNs q7l2oBqePaU6AYNSLd8BRPpNnA+qQeCCgnUdz6mWC2zCBDap4ztTbFIvcq0R 7LrgMa0LwYRgEw6zlMMsYTsWJzkWghKZwCY5cY6FHPcKyaWGDFZbOWegQT6k hsfm3IGm/F59dnt9aktNcmuNrK1W1lkn6wYGUaV018u666RdteL2aqGxIFKf G6rOCKpL8VWKPSv45xVc9wquayXHpYrtUpXkrEx0rgIlOCn2giAmMimrhfTx t2yCeJJ/REIXhST7bBLvgHGTnFiHzGhGWpSjPIrJD3HwsiHYxM/1VJiPbZYk QqVIbVOld+uy+pvyh9t3wYR0nQCewGUh4AmmcoGGW7OxNTwgBjZbpBK3cN2t Se5Sy0BHdWCkqnXRS3VRXvij2IT6//Pf1+zaFx1MUPBeoABgASJ00lNwrTsP 2ORKe9ZQSyqAibY8uq2eO9gsHzGmAY8Aa8ySWVuwhp3x9hy67R3DJXMkm+zv dx3OJoQIMNkVZXtBEe1X+ssw8QzZ5GBHRZOCXSYlgk3cJQe1shccobMJvUEh hQnrNDah8ORQrXwfdqFqbS2SYILIA/tLY7VU1hYFJliniyogTH2ruSsEkkwP KgBDYMY+8nAANke7C2EHgykwr5Pt2qlWiVgcGNaU6EWDTcoCU2ByMEpCq9C1 W57r/kobBk0oQgHdW+veWWhfHdcDm6xPNt5c6gAqubfeC3iCvnjKe4LP3vAQ /ubeFBouPj1Z/Ph4v6wume9EPKu/fzQNeAJvebI9BPe5vdy1vdBGsknXzcWO 7fm2HYJNiJLFZPLYyItbcOexZztXH10fBjYBMHm6DR83/uIWUMnEy9uToM+P 174+u/7t+Y3fXmz99mobCOX317e+EXiyyya/vb2P7Rd//2k22asevNtEHtjk r493/3p364832wAjv71e//pi+Zdni1+eEm530Nv706/vTsJMFhNepJgCsAV+ /Fd3Ju+s9L24NY4lgrGGMHYwocIlVE4XuVjFEAx1H8pf/08/+ByP43E8/tWD oBLnc0EuZkFu5sAmwR6WRNmui9ZE6MSXEeXPjAl0BjZJCjtPCQgF8ATYRBLv J4v3T04IAEJJYwdnclhZ3NBsXlgqm5XGZmVwiEJeaQl+KdEesgiXjBiX5uLE q+rkwVrBpCFlUi+d1EmuGfhjWu41FXe8njtRx5usF001SEb1qf0ambaez5ed j5S6xhcGxJcEhytiwzFiUhYNYpXGgELL4gFPQKzS+OCiOFBIcXxgZkhAetAl qQ8z3omggGAL8yDz076nAU+QTaxZVnahNg5h++xA19+wyZ7NBNlkP6frh2xy qM5Gnj0Xec4m1No2xB7YxCrE1YLlfpLlcDaGYBOHkDOeQSfEcRYt5WFDh7GJ UcY0ypwaZc5AJXoJE6QTMxtBB9ikQymY768YbisuzowSJnpFhTJDgxwykpyz kpyzk1zyOa6lAg+l1LNB7kOyiVuDwEnFJ9hExbFTsW0pNqHjiQmY/C2bIJgg m9RwHH+eTco5jmUcx1K2QwnboTiJUUQYxh3z451KuR6lgovF3AsKkY+xIO6K Jq1Pm9FZn9JaI22tFnfUSnrV8mFjdksF11Acr8mLqs8KrUoNKJNeKpV4Vwpc FTxnoJ6SJEYp27Gc4wxgQojjAlKwXRRJruVJLqScf5JNqJrAmNmFhGJiNtn3 wu/Rx9+xCQNExE1iGZkxjLRoZmq0U6Kf1SU77At/knXJJl0Y2lAu71Bn9uiz AT+BTRBMhtpgXUBmc8EOYTNBjwkwBYhqCk9HEoQRXFCXPTTXCYherYuKm/yX bLK4t49sAm+hhGwCmiIhAn0lV9ozgE3qCkP1FbH9xuRhY9pYaxYyCMzX2rKv NKXjDl7CjEiC8AILIBfQZFce0Xuxr+gQPOkrwb4qlLCX/W6zFTLrDNmEVrbr O78JJmhhZGSVbIN4FIn8N2yyth8i+S5l6yCbrJJ3OzJDjIxuUK0VkVko5zum eNHrceFhmAFGqCALEMp4XwkIO+kAm2DrEyK+Q1LJD/RjNqH2Yf19reAmuERC gTXaTNAID5ACVPJovZPAk82+u2s9W3Otm9NNIGAHoAl0xNNDJ0QBrlvXXt4e x4dzygyOzgt8VocZW6W/ezgFbPLq7hi8FwAH7gYkQpYIJhaAPztEn8cu+CAA H7jz67sToJe3rz3dvgJ48nBz6On21Vd3pt7cmwG9ezBH5Ec9WP70cPXXp5u/ Ptv89fn1317t/PHm9m+AJCACRu4Blfzx/uGfHx6RDvefZROqjDDpW7nzO4DJ 250/3+788RY+Yv3byxXAk1+fLwGOwQ+O816jE6KgFpIFgAmwDLDJ7eXerdmu R5tXPj1ZwsJcVL9FbHqCkZS9LvCLgHKUjQWdLNjl5J9+8Dkex+N4/KtHsKv5 rkg2QbE8bULJuAmwSWyQS3yIW2KoB4odfoEb6cmP9hbF+QKbiGN8JLG+0ji/ lISAtMSgDHYIKCUpVM4OS+OEprNDUgFeoi9KItz4gTZ1mZEjGnlfNX9Ulzym lY5pJFfVXNA1FX+CiJiIpzXJ01r5taasPk2yoiwmksOIkl+MKQqIKPSnswmr NCqkJJpULKs0jlBJPKskARRamhheEBWYEeLBOw/P/0AW5t+ziWWwBeCAfZgt I9zu5+MmVmH2Z8kW8LsW+GAbYBNzWk4X1Xvx59nkXNQ5s0gzOpuYh7gBm5yL cbaMsrQPPnPe/wQv8lxTKWuo4BA2aUp2akp2pthEJ3bUiogULxBAikbsUi92 QzZpLE0YNGS0qdImBmqv9NVIBYFRYc7iCGt5jEMO27VYcEEhvlhJtPYgmpvU CQk2aeA7qrgOFJsoSdHxxCRigjqKTXCxDyYcx2qOYy3PCat1UTldh7JJBddB wXEgCIXNAJQoTiTwpIzrWsJ2KUx0AUgpTHStTvZrKYm/aszurBFrC2JqM0Mr 5QSGlEm8i4UX8rluhVy3Yr5HEc+9mOdWBj+mxK1G5EIkjxEdTJhVPGcl30XB dSnnuJRxnMvYzqVJLqhDweRQNjm0i6IJlRTG2FFe+IN2+INsQlYVdiyId8yL Z2bHMTNiiZyuJH8rH3vCb+LlSLBJhiisrjS5Q53Ra8ih2ATAZLA1H9hkqC0P hDld8MQ41JYz0JQ5YMwAvgDKoNgEYyV0KjkUTOD8QTDZK/b7/84m+NJeHlcF FpLaM63s0UF/yXR/8cxAycKIYm6oZKgltak6sbkmaaApZdiYerU5Y7QlE2Yg EYAOWB/KJjM9hbCAA3gM2AT9JpOoy0WTe3hC8QiIMphQm5QdHi38VI/7vfpd lSs08wgVW/lJMPl/YxOkEoxN0HK69rVG3oQOJhjjgLvBjM6R5fE63KG3L0H6 MKkVjGxyY14PQv873mS0uxD/mcE8cbkU0AZevT6nu7FnGDFBEiqYQhHKwS7w 9LgJvZUJBkoASUhU2aUVmIFNMJsLE7qebHY/IgtkATUAlQCh7Cy2I5ggm9Dj Jq/vEQ/ndFEFdRFPAEwwsvDiNlFJGNujwB0II8nmZUQeZBMsCAabcOz1vfF3 D+A+02/uTQL+PNsZBTx5fGPk+c1xwJO392fRtfHhPmj586O1X55ufn1xA9jk z7d3fn9757e3d4nUrHf3AEx+zCYHC3mhC36vxQns3P7t7c3f32z/9e7mn+/g I9Z/f70GAkJBEsFSXWSoaBHTur6+XPv0ZJHcnIcf/MHG4Oq15vWJ1kfXr2Bz E4ySIIxgy3hqDXfAcMmvL1YoPMHoyT/94HM8jsfx+FePEDcLVDAZNEGFetmy QGToJCbQGfAEZ4CUpLDzu2ld0d4gYZS3KPoS4Ikszk8eT+AJKIUdIedEpnIi Utms5Dh/SdRFYbgbx9+qKjX8qiFzWCMfb0yfMKZNGlNHNMApokm9dM6YumjM WGzKXmzOmespGW7OKi6Oiua7JOT4RxYEhhb4I5jQ2CSKLNUVE1QUDQI2CStL QsWUJQRmhjglOANZmIVYWLIsrVhWwCZn/c6YB5rR2QQw5FAdwiahBJsAj6AF 3izY5qSvGTrlv4ubRP4HcROKTexYDvtxk1AHs1gXi0hL+5AzHn4nOOFnjCUh R7OJE41NCBlIUWxSLTlfJbnQXSd+ttkz3ldVmBaRlxYFbJIYeyGH55HDdQM2 wbgJ4TdJ9t5nE94+myjZNnQ2QVHhEopNYBMjIyaiIOUoNlGJ3H7AJpVchwqO fQXgCdu+LMm+NNG+JNGhQuBWksQsSmAWJzkXJbmUsN0rhF5Vyb7FgvP58BOx XUCFHNcSgBGuSxHHqZzvWiX2qBJ5VArdleLzNWIAE2YFl1GWZFeSaFuaaFeW BPjD3BWbWZbELE1yLE3cD4KY6CCb0MsF0xO96FQCKoi2zYuzo7PJD1SSyCxO YBYmMPNJL3xmnHN6rAsvyM7blmQT5glkk+oiSfthbIJmk8HW3IGWHKwbTERP SCpBMDFhEyqVC0VHEiqhi+q9iNlcSCX/JZtQm3Q2wSJd+/ELkk2I5uzDcM/i 8Z7cwWZ5l0bYrRUN6JJHjGmgQX3KkEEOYIJhEWQTgkHInC6Y0QsPO0AugCfA JlM9BZO9BXQ2QVFggtYSlAmqIIzgGfoxPEkr50UAi0lDxv8tm1ARE3zUp2d5 7bPJhCmbYMIVsAM6Rybhp4Nve0WJ96dHWA72MUE22ZzRbi0YAD2oCl1zI1Xj fSVwKwAT9DdNDyqIGsKHxUp2GyP+BJ5QSELZT0CIJ7R6XM1oOQFaube864Lf DZ2QbAKYALAAyHBrqRNmKqcL7fAkmFx7s8cmACB0kd09lsguhEQTkFd3Jig2 gbc/ujGAYAL3vLPajWCCDejhVZJNrqF7BWbivbeuPd2+CmzyZItI63pzD9gH oGDxw4NlYJOPD1a+PFkn2YTI6aLiJn/LJocWGSb7M+72XqTY5I89Nvn9zcYf b9b/fLsBeIJBjS/PljDnCgtqfXu1jmvSNrIMv5mbi90bk60rY03Xpzuebo8B g1A9TUziJuR6CZEH3fRw82O/yfE4HsfjZ0bYeWtU6AVr1p7CvO1AoZfsMa0r OsAJk7sATzC/i4ieRFwECSK9AE/EMT7SWN+UOP/UhECQLCkihWCTSDk7VBYf II66KAh35wbalslCRhtz5jqLF7qLlnuKF7sLJ9pSpzrS5zuzV7rzN3qKN3vL NnvLV4erJ3tKq5U8cWYgt4AVnusfVhAYRqZyIZhQcROgksDCKIJNSuMjFJzI Ci7MMaXxvqkB9tEOACYWoVbAJtah1mf9z57zP/s/YJNAK4pNYIGWE5AFyw7r dP0HOV1RZ83InC5gE4cQZ+tQd8JvEuYIbGIWbu4QcvpCALDJ6aPYhMzp2vWb kDldRCoXxSZqsTPFJv2alPXRhsGWQp1SVl8hFfP84qM9sjhuuTz3Av55eJ4v 4buXcl1LOc5EkS6hWz2f2cBjAJs0sG0bkmyATaoO4MlBMPkxm+w7TQBM2Awl m4FsAmBC1Ok6mk2qOPZVHLsKjm0F2648ya4s0Q5QoorvUsZmwqN7aZJzCeBJ vFNBHLMwyamQTQqwBfiC51Ip9qgQuCiIxihOFXy4rZNS6FIjci2Hm8NHCJwU AmY5j1HKti9OtFVwGITYDEWSgyLJXpFoByr/T9jkYMVgEypBAZvk/hyeEK0Y MW4S50h54fkh9pfsiBrCXsyTIV5Wcl5wVYGojfTCH8zpQjzpb87GWsFE3WBD KsUaFH1QPEIRCoh61aQ7PFWqi6rT9V+yCeU02cvjUoD2ChHvpVQNlJLVg0vI zK4cYBPQQFNKp1rQr5UBlcDcp5aAAFKoiAmCCdXWBF0nGFgh4ildRD+USbI0 sQmeUMRBF50+KFEvUSQCwn6R6EzBBDB68S66/ks2oajERAfZZJXGGvsVtMg7 ww4gCUAEmkeWx+uo7K+DxcHwK+1+jYkGerNFrLi1OEb434FlxnqKBlqyRjry 4LZrY3UmAEVhlAmeUJlddDxBMKHYBIUYQlXlohGKkUzxItK60H5yn4yPoBAf AE+AUw6yCYADCFObMGKC7QgxxwkerWFGNnl9l2h0Am+Et8NN6BGTnYV2YBP4 rKc7w9ioEU4Clbx/CAwyQ+HJ85tjACYvb09SOV0fHxBgAiJCJ882v77Y+vX5 1rdXt769Bvogoydv7yOe/DybkEhC6c7v727//u7Wn2ROF7DJn2+vA5iA/nq3 +cfbTazNhSESwIrfXhNmdnSdEIff3YD9e2v9DzdH7qz031rqe7A+/OrOFFrj 95K4dkXldGGwCYX+HYzI/NMPPsfjeByPf/WI9LTblZd9hPeuovwco0kkQVFB k7hgV5gRTwjXSaQnsoko+pI0hmATeXwAsIk4IVwKeMKOSEkKlcYHSmK8RZEX 2AE2uTyfAU3a6qBybbDy+ohybaB8eaQEtD5cen1YsT1cdXO45tZI3epw7dyA 0qhPzytP4OYEh2b4hOcGIpLQRPhNAgoig4thERdWnghUEl3Fj60WhuVHXhB5 WYVZE0GTUCuzQDPzIPNzAecoIzzBJqTf5OdzugBDkE3O0tjku7gJ2S3lKL8J fJmDOhN55lzEWYJNQh0YLBebMA/r8AunIpjAJufCzjmwTnsGneAezSakF96R boQnBGwiIpK76Gwy3pb3y6OJlXFdXRlfUcBJEf9/7J13U1tZ1u7B5KBMtsk5 SuQkkETOOeecDbbJOWewwQYbDBjnADhnu9P0pPe9971V9yPdtc+SNgdJuN0z c6v7D3Y9dWrr6OhIeKaqz6/Wetbjk6jwzpNdyJedL4g9Xyw7D2xSKberkts1 KEA2wCZNscJmKV+TTSieqHVzfSebKIsmDJvUx1gcs4ncCnPhNdmkVsqDL62R cqujuSSHMZLgSU2sdaXUoizSohRYINISVBxuURJtURZjVSq1KI4SlkaLKmVW 1QAmsRbVcqtqJjMFblsH95eJymQWZXKrcoVVBUhuUR5D8KSSVGf41VG86ihu daQ56vvZhBnepWViMBtMCoI4IDabfBtPyAzhUH5+qCA35NgLD4zvJtSxNdNx FOl6O5gowlyrCxS9zelKL3zvsRceG7pAkz151G9C5nF1pKpxB/ZuIZsMtCSC +psT1Nq61KonOKoL8AQJ5d9hE7bBhOU0wYhAygXl61PlGDKyPJIPYLI6Vjg/ QHzxACMjLfF9dTGDjfKxtsTprjTs45q7krnQkw1IgoUSWj2Bd/Gt5QGS0rjM YpNlFZ7Q7wW4oHxEAYTNJrSPa4NaTmZr0Zyipg2menJagvy/xia7rOrDt9lE ixeeuQmmvWMKPI7bwnATFLtcQr8UTfFsMMG3sH2LTOVaa9+52rY2XY1jqxdH Sm7NK4cYs+3w9DdrsgnFEzUXvCrH5DJQiaqn6wqdFfxsqw/xhBpP8PyT7SFa JaHNXUAoaj1dJOWEuEJWkFBAbx4COyyhCYUWU+ACEkH4eFEVEE96urB0AlRC XfDwEsiFGedFhhJ/Plz7+hwe+Il15dPBGlZnAElAH56ugQiePN34/JRYTr4e bn053Pp6dPuH57s/v2HP6XqissNr8cKfEs5IdMwmnx797dND9ML/7cPePz/t //MTwRM4/tcX4o4HasBfiEHwX45uYIsXQMo/Pu3DBUwBZevL0QYg1dHe3MHO zOfDG3//uI9+E1o9wQIKUzfBQgzZMNUTJar80Q8+Z+tsna0/9Qpy4gc7C0Ah riLMNCGxJgyPsAVUQi0nWDeRqtVNQtySQ92VbBLqkxThnxoVkBLhmxjiER/k pJDYx0ts48TWjXlhN8brd+fbbs81b882AqHcmandn63bn6vfn2vYm2vcnWvc nG24Nlkz3JNbXxOTmeWrSHFVpLoFlQYFlgYFFEv8CgMCSiSS8hBJRahvcbBP MVNDKQsVV0cH1sR4FgU7KpwswyxNfUkrFz+QTxq6XPSASkx9TEDmfmbE4uHP IWOExXxGAi5KIuRJhHCEk+b+PFM/jrEPoI2pgaeJqR9f3xPYxITGmuh5APhw jH3NDb1NDX1MTcnULx4/WMQL4p+ov0i4ZhKOicQcZczSOYm5gYRj7s/l+vP5 fgJTMd8kiK8bZKwfzjEMM+KK9ex99SIl5m3FodPAJiVus0VuvcmWl+L5F+W8 Tjm/K0F4MU7QESe8GA+QYnkp0RoEYHKRxSboN+mukm7PNW6vdLZUxtWWyjOS xZGh9lnR53NjLhTI7IsVDuVxDpVxF6rjztfJberl1iQCXiZojuW1xHBB9VLe CTEjhY/jSzDtPZYkKtYzA7g01QBgEmsJmzrs5oqxqI4W1cJLmVWD3AZoiJFt rQwIxRJUw6g6BmRRLRVUR/OrgB2ieOURStXEWNVIraqirCoiLMqBEcJFJWHC imiLSqllJWnKEsGxKsayKgbOiJj7MPeE+8usYEPA59hrLyyPFpRH8SuigC+E lVEiokghSiubaFrgiaJIHackUsQUO4RF4WTKVl4wJzeIA0dG3PwQRmGCPEb5 LBVEiArChaB8EHMGLsgJFeSEEBEjfIgoLdgqNdg61lfowideeEehrquVQVSA fVl2bFdt0mB71sSVwqkeUjFR+U2IGDzJI04TJnKRDuai3EHFZhMQ9cWzjfBs ywl1nWitm2BGPKacAJ6w0zTUpOF/r2TAhK0Kogm4Z/HqaMnySMHSMOBJweJQ 3sJg7lx31uzljKnOVACT4ea40daEyYsp6EDB+gi8O9GRDGeuDhUCm6AVBfZL A3nAJnAfEBLKEhyRUEaUs4JpWYR63imbILmQRHvGWkJ8Japr0IeCA5Axn2Vh oGAV6AZAZrZ2Y64OdRMwBLXInvHbdJrx/ASbYPz6auvtlZbbZMpW89ZSM35c u06O/1UzxWMiCUa94+QuuDMJeWdy4dm0QlPgyS9ZaWH/KnbIO7zEYJSrk5Ur 4+Vb8w1qYIKRJUgllFNwr5axCGxCP6JKgb+sqo9cwpcPbwCkAJUAj/Q+vdn/ 7NbAs1uDB1tDB1vDh9vDTxkwwUATEJZOnt5WnyGMnVdoBkcwUVU3FtAgT2mF wZO5Vw9mXt6ffnFviklUJHjy8ObQw5vDj7dGH23BzSdeP1jAVi5mFvHal6N1 NHTgwz8msDNSlhU+H9z4crDx9WDzy+Hm58ONL4c3vx5t/fBy58fXe7+8v/8r Jr+/va+iDGUGCkY0snXCePL+4V8/PGJGBz/+K9PQ9euHe7++3//L+/2/frgD +vX9LuivH/b+8ekuIgZgBdPQtQ0A8vbRKgjog+naIhYSHB2MHpOX9xafbk9h 6QTHcwGPwAXYosZAygbTEob+900m0nGDTBJ4du2PfvA5W2frbP2pV5ibRShQ iYsw2FUIbBLmaRXhbRPCqpigQr2tKZggmxA8EdvLJMrSSXywS2KwK+BJSphH Qoh3UphvaqR/aoRvUohHXKAjsElSiEO0t7Ao0Wd1qPrOUtft+bat2ea9iaqd 8cqt0YqN4dL1geKVgaKl/sLZ/vyxK1lXWpPqyyMKs30zUlxTE52CiwODiiTi ggD/fD9xsSS4PCS4ItS/NMS7KNCnJAjYxL8y0qskxDrZ1SbSRhDIRwzhS3hm vqbnnM8hm8Ae2USpAAGKKxaCeBIRCDZwBoPjjb3NjbzMDD1N2WxC53QBm5j4 mQOYGPqYmPiZAonwgwVqbGIm4ZI0RgmHIomhSuckPH0JyYXk+PF4flwgF6Mg M90gvXMRJkaRxhyJ3nlfvXAJr6kwfLrIZY7IbSDV+nI8vyOG0yXnX1Qwihd1 JlgAm3QlWp3GJnOXs395vrJ79XJzhTw/PSgzWVxeLCuIcymQOxXIHLCtC9gE rgQ2IbxAkkr4zbHcFkYNMTx1PJHyNNMVGTYRIX2wpZVWqqUWNTGAIVZ1Mut6 gie2jXF28BJOqqlaKqqKFoAqAR8iiQibSK2qowmbVEZaloeLysKEpaGCymhR FSAJI+QREOnRYs4zeGKFtveqGGGllFjsK6MFFVFE5XBbEvJ+qsGELfZMYBwd TDZAJYyKAEwYFYYLcoM5OUHmINiA8kK4RKECTRWEi6jyw4SonFBhNqPMEGFa iCiVsIlNvMTGkaNjZ65jz9cBNonwO5+fHN5SFtvdmAJ4MtieOdyZNdGdP91X NN1XiGwy2ZNL4+Dp3GD2SC72S7bxRK25iz1AWGtAPBtPKJuolU6+zSYqMKm4 OlbJkjLMEe0nKyr3OgIF0AcIRwezO7toTxdQyUhLPJxcHSxYYxIYrw0XwXER 3h0qQDZRisETomElnqBzhD0umF06wX4ttgsetam6ks5AJvOH4W6MoQOnWrFz 1dUSFY8R4CSbqGWdHPdWsXzup2lLwwt/muC3rcMfO1+P9ycEpHK7K1NOMGZl VR1MaGeXspiimlEMN9xigleQUOgAYTpGGD3yp7EJDV5ETqHVk5PFFIInoCeb fU9vKsHkcHsUdbA7Tr3q6AphDxAGNsH4RWSTD0+vIp5QGKEtXvgW7t88AjaZ fnl/CtgELSegx9ujACaPt8ZAh3vTWG1BKz3qGENYbU7HOgQ2IQJIgSf8zwcb n4FTnt/6DHpx++ur3R/f3Pn53T3lNOAvT//x9RkI8eQvSC7v7qtxCrDJ3z4y c4O/kGSTv3168NeP9/7CsMlf3u+dEJOcCFiBMIJZinAEEnnzcAXoA8sl92+M gD48XQMSgfNHd+bgiLSCeMIeKawqmtxkpn5tMkO6Ns9mCJ+ts3W2fnMBm0R4 WEV52UR52wKVAJsAoYScpBJUhJ8dSgkp/uejAy7Eih0QT+KCnBOCCJ4khbgl hvokhfkkh/sCm6SEeSUGuwCbJATZh7lxkkLt+upTlvrKF3qLpy/lzTQlTDUo Rqpj+ioir5SFdZWGdZaGXayObi4LrSkKrCyQlOT556R7pCY4Bub5S/L8A/L8 /HJ9xYUBwWUhIRVhASUhvoWBfiXBAeXh3sXBdmkeJpGWohARN4ADGAIwAkhi 4K6v66xL2YSNJ8AFIMAQEJtTTmMTXTdjQy9l3QTZxNjXzMDbRCubYFvXv8Ym hhFGHLGenc+50ABOQ37oTLHrTKHzbKHrULoNsEm71AzYpC2WA2zCUIkl4Ekn STax0somw82J9691wn9ALzWm1ZbKE+VeMZHO+Qrn4njXkniXsnjn8nhHUjeJ v1CrjU00wYTNJjTqHdikTirUyiZwrI0Wov8dXwJxfCebkLx4qRDE4IkA8aQ6 2rIqypKyCeIJqXpEi9QI5dtsUvEvsYl2UwkLSUAFYXwQwgiCCeUUrWxSGGGB YuNJHrHAW+SEibJCRcgmKUHWCYG25011rIx1LvB03G2MIv0v5CWFVeeFX6pL RDYZupg5fiVvsgeoBMGEeOERTMYuZ9LxXOxCCbuMwh7VhWxC34IPTl7OQmHR BASEclrphGnKqlSLX/x32EQ1s0sZSoKEAsSBbIKa7koDDMFCCbAJTuia6kwd alLAu9R4Qpq7+nKvklxFZdFkWVU0IWKiTBBP2EUTTVG3PvZ3bahSTjaZSsoJ lmEyCkHIJmqzeU90cC2flAaSaDZ60Q9+m020jhFW08aCst6BPw97tBBGKIAg 5qjhCQUZtpRllMUmABN0naiVTqjUjPDfEDZ64Ufg5b21TmSTRxvdTzb7Ndnk OVPXQFcITV3EDcUTbOtC27uasLTBJgvYv3u8gKHwL+5N0jldmPkOYPJke/zF 3Tk6i1gNQ9QsGPTk18MNEMMm10m719PrH55c/3i4+f7ZjZcP1149Wv/0fPsv Hx4glZAgRUaM2/0xsMlPb+/9+ObuD6/3QV9f3fnycu/zi90fX9/95e194n// 9BDYBMDkl3d3kE1+AfR4v/fXj/u/frjziyrSnXRq3Zl7dZ8kmPzXl/v/+HQX 8ORwd/ZgZwaOoMG2/IWhergGrgeEQSM/HDF+kQrRhqaZ0LoJndz1Rz/4nK2z dbb+1AuoJNrbVupjF+1jd4JNNPAkzMcG/SZoOWHy4u1iAuwRTxSBTsgmoIQQ 78RQb8ATYJPUcO+kEFfS0xV4HtgkwoNTnODdnB/RVhTZWhjRleXbmenTnunV kuHVlOHVkOFVn+FZn+dfle1TnuNdketbnueXn+GRkeQoyfULyPH1z/bxz/GR 5AcElwSHlocFFAb5FwaKS0MDSkNdsnxFsgvGYSJ+IB+4AwAEYATBRM+V1E3Y pRPEEzM/LuIJJRSQVjYx8eXpeZgCm1C/Cck38TM3YtjEwNvY2NfEXMxRAxPi NJFwTFlgYvTbbKJ/LsLYINzQPEDX1ls32M+sLjd4tth1usAJ2GQ43fZSHK8t 2vSSQtAh49K6ybfZ5HJF9M5iy/JoTX9HzsRgdWNNcnK8b57cKV/uVCh3LI1z qkhwqoy/UKmw084m0dw6DalVTFC1jJFETZqc8rvYpJpcLFSVTgRYN6mMFFVG WgCYkJ4uhk1ASBkII5RQvsEmFdF8Mvsrkup3swlSidLkziAJpZL8UB6KsgmC SXag2bfrJrRoQs5HWIKQTdJDLVKCLIFNFAFWwCbWJsd1k8LUyObS2P7WjIkr hWOX8oY7gUEARtBmQsBk/IrSbDJ6KWNMFWvCZhNNMNEc2IVOE8xt1GQTzdIJ dnOx2eS00olWNrk2XqWSqqeLDO8iLVK0YoLFjmsjRdipRQcIA4kgngCnwEvE ExzkBSfhXTSkLA/kMfkmWmYIA5gsDcHfUgTfiNChNiUYA01AaEihg7mwaKJd zDDea1NVGFaIyYbU0KE1BV4LXJwUPv+r4YlWQkG40OQXTTah7ngMfAeGgh/J BhM6yEvN/MK+IVZ8gEqAa/bWOzDfBIECjSdsHtE6m0tTbJZh11nuXrt4f/0S 09DV8w02ObwzoSSIXeVIYRpxAi/hXbjm/dNVRAacK0UfpNGF8eXoBnVMvH28 8PrhDLDJ87uTdE7Xs50J0NPbEwe7Uy/vzTMBjifpgxE8qCPgqFVSvh5t/HC0 CXjCZpMPBxvvnl5/8eDa8/tX3x/c/PndPWzogiMWSnAYFwjZBKnk0/OdD4fb RAdbnw5v//AKMOQeEMpPb/Y+Hd388fXOz2/3fn4Lxx1CJe92YfO3j/t/+3AH EOPNw5UXdxc+PF37lQGW//npMfyYw73Z/bXBB5uj0z2Vq2PNyCZoe4cNukvg iPYZoBVAG8ATdtgiBZOfX2/98mb7j37wOVtn62z9qZfM3x7AJNLTOhSQhPGb hHtZS1wFILGbUMIo0F0EogUUCikRvrZRvnbRfuel/hdkAQ4KsWOcxCk+0Dk+ 2Itp6/JJi/RLi/BJDnNLCIbz56U+olBXk8Qg67xY1/Jkn7qswLZU17Y0t7Z0 j7ZMz9ZMz8ZMj/oMj9osr+osz8ps74oc79Jsz8J0t5wUp5D8gMBcP3G2rzjH FzglqDAwrDTENzcA8ERcEuJbEGif7M6PtuVF23CBEcRcEJCInquerrMOEIom m4DUqOQbdROtbGLsa2boY6rvZazvZcRmE7YX3lTMMRGbG4vNjcRmKAOVtLNJ sJJNTP11rT11An1MqrMkTN3Eiamb2F6O57dJzYBNOuMEHXJ+m5zfDvsECwCT 09hksCHu6WbvvRt9jWWyioLowpzwrLSgAoVLbqx9TrRdQez5MsZvchqbAInU RnHURMsllE3qpbzaaEFNlLoQT2j1BF/+np4uoaqhS2k2KQvnVkQIGSnBBDZk H8lHPGETilY2oWBSEaUEkzK48+/v6aJsQkzuDJJQKlG2b7HqJsgmp9VNjnmE UW4IH4RskhtukRVG2ITWTezNiRf+Ak/HQXAu0N0iOz74cn3yaFfeVE8xsMlg RwaWTphyCQGTsctKMCGjurTVTdS6udBvokYl410ZIGQTOqcLRNPhURjFCJyi WTphZ76rzenSZJO1iWqWKlXDu7SyCWnTwtQSFHAKUAlgyHh7EhwBT+ACxBNg FmATZfxif971CcCKErXgxasTpcsjSjahnV1oP2ETChLHN0oqannx8IQPj/or 4+VLo6XLY2VAKCCtbV1sNvl29YTNJt+unpx2gSab0PPY3IVS9pWttFA7vGYv Gc1DYbMJgAnmmyBcAFNgNCTbGo/lDxTNW9QUxRP2CGJkE6ybnMYmhwx6PL87 hUJOATB5tDWEeIKVFNCbh4vYssXYQ5RtSH95e5sxgN9S5ZsTT/fbx/PAJi/v ww0nkE3I0ODdSdDh3vTz/dlX9xfgVsygqg2KJLR8gOOwaBUGLRiUTb4cbjCu jRufnm18PNz8eHjz3bPN14+vA5t8fbUHAILm9x9e78MeNgAm//j6DDa0dIJF EyCUt0823z+99eXF7Z/f7oO+vNgG0vn8/BbgyU9vboN+eLUFgs2v7/cwSxEQ 493jqyD4DXAGgAU9+4Ak3Q2ZoJvzl17fXwb6+HK08dOrLbiAwZAt9Ke8vLcI dAOfxVx4OpGYsgnGOP7RDz5n62ydrT/1ivCwCne3DHOzCHEVBboIQBJnPuab +DLyc+b5MfOE1cso3tbhPjbAJognMf4X5Co8iQvyBDZJDvdFNkkJc08KdQE2 iQ+0C3c3k/sLs6IcgU0ac0Nakxxbk5xak52bU5wbU5zrUpxrkp1qMwFPPKty vCqyPUuzPEqyPEpzvKKKgsPyxUE5fkAowCaBeQEhRUFemT6SwiBJcbBXjr9d vDMv0lootSNjuCQ8EMDIOZdzyCbGXkbUDn+MJywqQcsJ6htsou9phuO5dN2M sGii52kEMvQxNgswVyuaMGxi/q+wSZiBqZ+OpbuO2Mu4KlM8XeQyW0R6ugbT mJ6uGHP0m3TIecgmxA7/rbpJ1JON7v31nqYyWV2ZoqxAmprony93zpc5Fsgc ihUOwCblcrvSGPLcroVNNMCEzSYUTECaYELZBEVf/gtsAqJsUhbGLw8XsMEE 2QR1klC+xSblUUow+V1son0yMKtQwu7j0tRpbKIGJgybKHu6ssMsgE3SQqzT QmxTQu0dOYRN7Hk69nzdABdBukzcWZPQ15I+dil//Eo+sElvSwqDJzkMmGSP XspCMBnuPJ4eTNlELXWR4gns6cXIJnCkLnjKJmxhJQXFLqDgwC7Qv8kmqoz4 44YuEHAHBpfQucE4Q3juSiYWUIBQcE4XHIeb4wBbrg0XkTawnuwbkwAdJZq5 8EqHyElh7xYtkWxoVEY2VNIEE9D1mRrslVqdqABCQV2fraXGEy2QsqytcUuD TdTx5HQ20cQTLT1djBeebY2HH0mcJsvNbO/8cZmG/h4WRtGGLqyb7DMVEzpG DNjk1lz9lmp4FzZ6fYNNaKwJu3pC6yyM5eRbPV0HTGUEkATA5MW9aRQaT2iL F+rF3Vl0vgNWYPUESASfpQFPaKw5nH/3RFk3QS88FmWO9qeP7pBQxZf35uEm wDiqEVUb1GehelDHuVUbCCk4rPjL4Q02m3w+2AA2IWaT51sfj7Y+HN4CNvl4 tA3cgb4SOAKM4J72dLHbukAfnm2BgE1+fL33w6vdT0e33j+78eUF8Aic2QYh m/zIuEXQJAKg8cOLm8Amrx8s//puF6gE9j+93FoeaWwqUfQ2ZT/YGMW8SPTI //3jPkacwKfwYngXsYXNJlh+on/7H/3gc7bO1tn6U68gJz5K4sQLcOT62ZvT 7EU1Ngk+aZAP9bICPJH6X8C2LrnEMT6QWE5Acok7sElKhJ+STcLdk8NcFWLb hKDzwCaxvvzMSIfSRO/q9ACGTRxbkhybkx2bUp0a010bM9zqMt3rsj2qcwBP PKvyvGuL/BvLgmLLwiMLg0LzxcF5/oE5vuIcv6ACiWeaV2BhsLgwyCPDx1bu yAu3FERaA3oIAvnAJkaehrrOuuecdfXd9JBN1Nu6vtsLb+zDJWziaqQPe2AT b3NgE0MfUxWbGJI5w/5mmtOD/2U2MfHVsXDTCfA0qkj3nyp0nit2ZbzwVsAm F2M5nTJeWywH2ASoRKk4i854S61s0lMd8/c36x8PVtprEouyQtOTApLifIoT 3cuSPMqT3EvjnIpl50tibcpirWtlWuomQCI1keZqUuvmUrEJvzpSXVguYUMK bKqjv7+nS6jmNyF4Egbil4UJT7BJBJY/NPFEO5uUR/H+NTZhI8kxm5xeKPlO L/yJbi6ElPBjNskIs0wPtUkPtUsKOe/AYfJNhDrOFnohntb5yeGtFfKOKkVv c9pIZ85AezqwyeglNphkIpiAsBSi1QvPntbFdsGj02ScaQaj2YsIIOxoeNgg nsC7INriRfu7/rNsQvFkmfGPUDxBNgESmWfmdwGYjLTEwwZp5XJlxFCTAjll 9krG2hhgSCGd03XsNxkpxsG/gCSLg/CHFGJkCZwBQqGTuzaY2Vx0ejCdDLx5 kkpQ6wAsc3WksrDYABvglGtTVeszNWrueESD7/TC//9gE/bYLqyD0M4uNjcR KwrLhEIndKn5TVB7q+phi8AjgCdYQIEjnEHo0NrNRTNNaEY8UgyeZKZ1/bYX Hru20Pn+5tE8mkTQw44i8LI/S7ECkAGfpbEHCY7Yi4UcAWzy9vEcYzmZwXR4 AJ+X9+aATQ73pgFw3j1e+XSwxu5loo/oGGWItRjsFsPbfn52XamD65+ICJt8 fbEFeAJggniCbAIAAkhCqyefX+x+PLr96fkOCPYguAb16fD256MdYJPPz7c/ Ht76cLD58XCTAZMdRBJKKH99v4dWkb99uAOcAojx/M48NmjB8f6NkfmB2vWp 9ns3huEtHNj19fkmwAtej2Z5EB0jDNcwvnh1NmF05oU/W2frbH1r+TlyfB2U 8nEwJ7I3V27gLRWekBxGdxGyCc1hhGN0AJnWFSNxkAWSpPi4EFeQItg9PtQz McwrKcIrOdIrJdIjNdKDRJz4WER686K8eanh9mXJfuWpAbVJjtUJF0A1SQ71 qc6Nme6tud5NWR4Nme6N2Z5Nud7Ned7N+T7tRQHl5bLMnBBFeoA0KyAow8c/ L8AnX+xWAJLYZ3jbJLjyI+0sIs7zgi1Ffnyel7mZm4mJi5Ghk4Ghk76xixHH mwMyh6MPFZfjLwBx2QoQ8IBTAFj8+GY+XBNvc2NPM0MPU3MfnpG7qb6bsZGn makPYRY9NyM4GnianvMwPucOzGJi7AckwlcLMVGyCZpNxGaGLDbRF/MNxMds YgzvBpoCm+iGGZ4L0zcV61r7nPP3Ni5K9ZkscJ0tdp8qdO1Ps+2KE7QDksQJ 25mKSTtDIowsQB3xfFBbvKglwbIpwQbZpClXfHO6fmflcn9b7vDlstJcaVyU R6bUIVfmVKBwKpQ7FMaeL461LZPZVcmsq0npRNggEzbFMoQi59fHCInJPVrA tGzxayJ51ZE8eFkvZc5LhfWoGFGNiiOqCX0IqqJApN5RxQjOwAU1UrhM6TdR wxNtRnjL6mgLUFW0RWWUiOnjEpSH8xkw4ZeHY2eXCKU6KYCTlZHCqihRVZRF tdSyRkoGDtfEWNUCfDGqjBJWRArKI4jKCNHwS+GeUUKSBR8lKo0UgkqUEoFK I8l8YDIlmFFBKL8glKem/FBgCqLcEBJHkhvMzwEF8ZTCl0rxjisj2jjluJgS IgLlhYhyQy2yQy0zQ20zQu0SJDZuQpILf56r4yDUjfC/AGxysUp2qVbW0xg/ 0Jo80JLU25TQ2xQ/2JY8cTlruid3qjtn5GJqX3P8UHvKQEsitbdrGuHVvPA4 bZgdboIDhJE+aPzi/CDRHFH+7IBS80OFiyNFS6Mly2OlqxPla9OV6zNVNGaR LRWMVJ6MOKlBUTZhDPIAJqUnwGSkcJWpmyCbYMwiEgo2dwGVTHelwRHApL9e erE0eLApdmUwd3Uof7EvZ3W4cG2CmOuXhgmPLI0UL4+WTPfmTPcAWwFq5QKV oNsdwYQ9vAs7u9QcKMgjt+BJntmzMxY3We1bsEEeAUJBWwclFDYFfOecLjU3 OgLC8cmVFrgVGx+IrrbR6Vv0JyEZbS+SuPmthcZb8w2bc/U3Zmqvw48EFpup vTlXDyfh3Z3lFnLZSjMtjuB4Lsomar9qd0VLBDxQCb6E79qAm8/WwT3p5C5A DwY6LmHMIgYvwklaN8HpwTizC9gEhWzC4MnQwdYIiOnpUqEHUzcBlMDMRDr7 l7LJq/sETN4+WgY2AWRQ5aErE9JhA7gB7wJ6HO1Pv7g78/rBPOjlvdnn+9Nw hmnoIoTy7vHyp4Nrnw/J3GAcUQV3YBcR8CUSCnMenuRvkOYuIJQDMluYsahs fD3a/PJ88zMBgVtfn28xuv3jy90fXt754eX+T6/v/fLuAQj2H55tv3pw4/Wj jfdPtz4d7oDeP9t683jz3eONj89ufjm6pRKA0q2fASWAR+DHMH8g/Gl/ebsN bIIGEyQU4AtAEsSQ1/eXgUpm+6r31wcBOuBdZBDYwEewEww+CEfc4E3gGuxY o14bFpuceeHP1tk6W99aXvZmWuXtYO6twhMsnVA2AaHrBI5SiQMJYQxykgU7 y0NcFKGuoLgQYBOPhDDPxHDPpEjPlEjP1ChPYJMIL2GkNz/M3TwhyKYowac8 VdyQ4VaX5lKf7oqbmhQnOAKbAKQ0Z3u25fm05/uCOosC2qqSSrLDUlL9FRkB gWlevrl+XgX+bkWBTnn+NikeglgH81BrYZgdRywSevO5bmamTkbGjobGTkSm LsZcby6IoyY/vqZ4AUKAFCWbeBE2MfIw5frwjN1NDdyM4SUyC7KJIbCJO7CJ sb6nqZEvxySAT5LoGbHZxETFJlg30Q8wJRLzDVVswvXlAJsYSEx0Qwx0wg11 wvTMJLrWfuf8fIzykz0n8l1nitwnClz70+06CZsQC3wH4IlC2HYsC1B7PA/U Gi8ENmlMsK5PJJOBx9tTH9/oBja5WJPcWZ9ZkB6elRiULXPOjnXMibHPi7lQ KLtQqrhQGe9QKbMGPKmNFdbHMj53Gb9Jzm+ItaD1jpooAVZDsA7C7teqj7Gg M7VY7nXiEwERQokW4FvMZSd6upBNaN0E31WxiSUgBqgykrAJ08olUPV0CVTG EyF9S8UmIhBhk2glm9TGWIPqYm1A8Ba9GKhEqSghqiRSUMyoKIJfFCEsVg0H LomyQLGt7iyJ8hjlhghROcECUHYQX03AJiithMJ+mR8izA8W5gXD3SyyQyyz GDaJD7D2EJG6yQWerqOFXrTYISchpLM6trcxDrkDjn1N8T0NCthgCxYABYAG nBzrTIcj7GEDxAH7/uYEeFcNSTTxBC0nNBceweTYaQKP8YPqmh8qWhguRm/F 6mTFtakq8hB+MsqEXSv5NpswYFKulU2uDp/KJogn891ZACaAJ/0N0u6aiNG2 uMW+LMCTpQEyQ3h9qpwMIh4kc4PnBvIXhoqGOlL6m+PHu+CPTSe5JKoxXOwg eM1ARrbNBGAEO7vYGYvYtYXP/xRD1plGL83Bwpoeea1solXsEgZ7fNYJNlGl kKhZRZBNsJaxNd9wa64ekGFzpha78hAhN2frECt2VVTCliaYgPZY87jY6YrU 1Q5fB18EhEJneTFs0oVUgjkmwCZsywmrbtKFYELaum70PN7oe7LZz5RORo5u jz3fGWfXTdBygtUTEHAKrXqQUcCMVQTo4+Oza5iHjkYJwIdf3+387QM8hN8G iIALnu/PgF7cnaUCrgEwOboz/ebhIqbAf3x2ldmsMTHrG+yhVWg/ocZwOKoy 2ddY3vkNrD58OQRIufXD8y3Qjy9u//hi5+vz3S/P976+IITy46u7INgDqsDm 89Eu4MnbxzdB757cevfoxrtHxFP/+WATPv7Ty+MhWhj7znw7UAbaQHaxOwtB A+ACG7Re3F3YXuq+Pt3xcHMMze/IL3gZfooK2UQVd6JsWqOeGoA+JJQ/+sHn bJ2ts/WnXh7nTTTFBhPKJkEeFkFMWDyd1hUVcAGQBKnkGEzC3YBKUMgmyREe yRHuCcGO0b6WUT6CEFfTWD9hdoxrWUpARcKFqiQHYBMgERBSCXAKCPbAJh0F fgAml0sDuxvTynPCUpN849P9g1M8fbO8/QsC3AoDnHK8z6e48SJteKFW/EAL c18ez90cZOZsbOxoAGBi7mbK9TD/fjbBAgrcB9kEwORfYxPEEzab4JwuA4on WtkkzEg30lg3XN9Uomvlq+vjZZCT4AZsMq1ik4sK4n8HMPl+NqnL9L270nG4 Ozl2qbinNT8rMTAq0CFX4ZqncClQOBfFOZfGO5XHOZTJz1f8h9gEweQbbELB hBZNQHXkq62QTUBV0aKqaCEbTBBAaH1EE080xSYUBJN6me1pbAJUgmKoBCXA ycBsQtEGJjxNKvldbEK7ufAMXpAXJADlBsF9RFnBFhkhNukhtvEBVu5M3cRB cM7VxjA2yBnYpKtahtCBlIHB7oAngBLIJsOqiglcBns4g2wCJ09jE2pFYSeb 0AHCWDRRWuAHCmc1NDdI2GRxpISwycS32IR65LGMoskmOKSLzSbsiBNkEwQT ZBPic1eJEgposjN5sjNp5nLqfE/GQm/mUn8OsMnqaPH8QC5xvg8XT/fmzPbn X66X1eT6tZeHd1VHI57Au9dV07oQT5TdZawpXmx4oZYT2t91iwlbZE8PpqJU wq6q0D17fNZ3isYg4rDf7ZVTyy6aHyTx7qxkeSAFhJQNZpwaxtZcn6yCt0hv 1Y2u/RudZAwXQzpoLdHKJne0jQLGjBIaXAJfChAENETrKWhCgbcY+uiifhNt iSdKv8njjV4AE8omh9ujgCdsNqHVEww0eUtGAc9TSGGIQ9nWpbKcHDPFL2+2 qC8eHrPfPlp6eW8OPgLH1w8W4CXgCeYtYsUEjoAncKQjudAXT5/VVdiyiezD GDFuILngWDBsnfqizGG8xWaTry+ATfY+H+2Afny1/9cPj/7x+Skcf3l7H17C Wx8PtokL/nD7y+EW8a0cbP74AoBCiRVML9beX9/vUjZhakPILLtYDfnbhzuY //58f/7Bxuj9GyOwQU8KgokapGiyCf5b4Z+DfWs4V/kse/Fsna2z9e31m2zC 9psEuotCvKxo0IlU4oBsQvEExWaTxAiPpAj3pHC3tEh3udgu2lcY5m4e7c1L Dj1fkuRXm+pcl+aCJEKF5RJAkitlQb2Vof3V4YO1kUMtmZVZwYkK1/hUn8g0 r8Ac3+AiiWehv3OW54VkF364hTDEgufH5/lwOa6mwCbmLibAJibORgAmfC8u 7/ewCRyBTUy9OVg0MXQ3+R1s4meKUhIKskkgB8RmE0ba2CTCWDfK5FyEAbCJ pY+ut4d+VpzLeJ7LdKHbeL6Lkk1kvN9kk+YEC2CTOoZNOopD76523Fvv727M HLhYXFuSkJsSWhDvURDvXpzgVhLvUhLnWCq/UBJr+++yycmKCeq0uolm6YTN JkAllVHEYIJgQosmCCZUp+GJWg0F2aQ2xhrA5DQ2QSopjuAXM1RSGM5jRMYC 0+wSxBO1MVxKj8lJKtFEku9nE3grO4gLyg3kg3IC4VOCzCBRerBVWrANsImH iLCJveCci7WBLNilICXicq0cQQM5Ao5YPUGHCByRSrrr5Ygw2MeF6AHXa2UT ZBk1NsEBwiBqNmHYpHhuUFMl80MlC8OlS6PlK+OVVyerr03Vrk9qYRO28USN TZiiSRUre7GMZi/SUBI2m6iBiZoASZb6s0GwmetOn+/JmgP1ZS8M5pHiyHjZ 3EA+4ElreXhBgmNNjm9joaS3UTHWCf+GGYuDhWg2Yfd0qeUwUmaBzY2pKgCT rfn6W0xqPPGkMACixiZqYPIND8jvZRO1kBGtJhT1DzL+kR2VH4QKHetAKNeZ 0gn8bwTAQoZurXXQpEVsHtPaZsawiZbgEjp9i21yp24UrNqgFUVVHFG2dVHX CX723lrn/XVlWxcWTVSWkxGldsfZPV3Y1kXZ5DVJeJ/F0gnABQbBv36wiM1d rLFdNOWE0AQQx/snK28eLgKMwBGEYPLu8TK89ePLDXja/+nVJmwwFf3TwTpW DTCKEW+FL2EPVMI8xpOPMB55fJhH18l1Bk9uqkon28AmP73e//nNXWSQry92 f3pz969MBDwDJnd+eHkHzn95vvv56PYvr/d/fXv3l9e7oJ9f7QCbAFz88OIm 05FF+8qASrYwC56Cyd8/7v/Xl/vAGoAn2Nz19hH8U6whmyCMUJuJZkOXSsed bHQsAP7tf/SDz9k6W2frT708L5hqCsGEsgmACbIJOk0w3wQULbaPCXRExQY5 oYBT1NgkOcIdlBXjDWwS5SMI9+AQR7yfsDxV3JrrgyRysdAfSAQwZKguarJV Md0RP9uZuHApZaUn41p/9tpAzkR7bmW6RB5hG5foJsv0Ds/3CysR++T7uWa4 2yc4WoRbWAQL+T7mIh+OmbMxgImpk5GRg76xkyHH3exUNvHlmWsICeU/xSYm AWbGAWbIJiDMN/kmm5joRpkim1h463i562UqnCmb9KXZfptN2uK4oJY4QXO8 RUO8VV3C+ZoE+87S8Ld3J74erg205TWWJWQlSJJjfQsTPAsTPIriXQvkDvkx dkWxtqUyu3+TTdQqJhRMNNmEqYmc6OyiYKLGJggmamxSGspTq558o4CCpRNk k2/UTUoYKiFgoqQSXkEYtyCMT4NLKKGcMoZLnUqyAnm/i01oTxdlkxwJD5Qt 4WUF8jMChWlBlqlB1vEB1p4WZEjXBZ6uk6VeTJBzUVpUV42stzEO3es4JZhO AEYG6W9OgAu6qqVX6mSIMHgSLsOOL+p/Z08SPo1NMNyETgyeGyydGyxT0+wA OTk/VL44Urk8Vr06UXt1so62b7GFdRM2mDDnlUb4a+OVJ8GkhM0mS8MFq0MF ACZqbILlEkol2OgFSLIymAsCMJm+lDLZmTzcCviWvDCYT4hjomJppHiyO7ux OLgwybmjIvxyrXSwFf4RgPLipq5kaY7qYrMJ4gm8hQOHrzNsgmaTzRngrMoN VcsWG0/UAuL/I2xCKxfH0YerLd+IZVTTDsuuTtkE7SE0jAb+9yLtXvibWSO8 SBKKRmS8mt+EirraafkD/SOAG/Au3B/DOgFPsL8L2YTVx0XPwPES6N5a14P1 7ofXSVsXsAlJNtkZf7E7cbinpW4CSMKmEjSeMG1acwAmQCVs0Xh3oAl4CRfQ Pi6gEuAROOJL2H85WgfEgKd91F/f7zBelZuAJ0g6dHow0gpt+lLhzM2vz/EB nkzuJWxyQNhEhSfbPzy//dPrvZ/e7P34eveHVzuMdmHPJJjcg837Z5uvHl57 ++T6p6NbP77c+eX1nV/fEv3lzd4vb5T4AEDB6isjdRMEFngL8eRvH+788/M9 9JLgS5zfhTYTWiVhF03UwITBllvspjU6BABe/tEPPmfrbJ2tP/X6BpuwiyZ0 ThewiTLchAmIBzxBSSUOlFDiQz3YfpPkSI+USI8cma8swDbCiwdsEuJiHOMr aC+VjTfLgESm2uIARhYvpwKGrA/mbk2W7MyU785W3JmvurdU+2ClHjTbkVeT Lo4JEsll9op0z6h8v4gif98cb7dUl/MyO5sIS5GEx/M0tvA1N3cxJmYTBwNk E3M3U54n5/eyCQAIsgmACSDJ72ITY18TiidqbEJz4X+7biLWATbxdNPLkDuN 5TlPqdikQ85rlXGJC57ou9gkP+bCcn/xzbmO9sqEroas8rzYVLl/nsKtIN4N 2KQozqlQdqEoxrY4xqYi9j/DJmpgoo1NhGw2QTxR6+ZSskmUSM1pAmCC0sQT NqRQqMGusOpoS7ScgLSyCVJJ0TGVoHiYWsImFK2TgdWoBPX9bKLWzYVski0m yhJzM8W8dIkgNdAiJdCKsIlI6YV3tDgnlTjmJ4d3VsX2NcUjRCCbsB0lWAcB Nmkvj+ioiMS2LkAPOAPngTi0sgm7pwtd8Gg2oXO66JCu+YHyOQ3N9pfBcX6w YnG4ammkemWsdnW87upYBSvkXSmtwKICkyrMhWfA5JhN2PkmyCaaLnhMY2RP FV7ozUQ2AUgBNhltS+itjxlsjZ8fyIU7A1Msj5bM9OU1l4YWp7gOtSVNdwOC 5Yx1pvU3x09ezgQ2wbIIsgkVhRSKKmx/Cj15g1U3+Ubp5N/v6dIclqUeNL+s HtHI/l7sp6Jsgp1dcIZaQq4z8EhwkrHw05nDZLrXspaw+NPYhN2dhRUQHLoF Rxw4vMWMGgbRIgtlEzTIq3SZeuHvr10BPHl0o/fpTcImACYv9yYPVHmLbEKh ThPKJkR3SE8X4AmdJIxIgl4JRAk4Dxc8vT3+bGfi6M40IsnLe3O4efto6fPh GmWTX97c+tuHPeyewklfmOrIjlykAfFwMXyETirGhi5mmDBok80mX19sfXlx 6+vLLdAPr7Zh//n5TdCPr2///HYXTr57uv760VXQ+yfw2Vukm+sVQMruX97s oj2ESU5UDjdmjmToFkYoUtzAti7QPz7dBU7BeVyURNjdX9QOfxJMtqjrH4d0 MSikHFn2Rz/4nK2zdbb+1Esrm2gWTUBYNEEhnsAR8AQUFXCBsomMTOvS4oXP U/jLxXaR3vxIL16ws5FCbDnRVXh9OO/WRPHt6TIgkf2FaiARPD5cbUA9WWt+ dr0VjgudeY2ZgbGBwpgoW1mKW1SOd3iet3emu0uSo3WkhV2kpdDPjOduYOVj xvcgpRMTR0NTZ2MzVxNV3YT3/WzCNpv8O2xCpMYmgZzfYJNwY91IOOqbiHVE Xio2yXWeKnA9ZpPY38cmJXHO9691vnmwcLk+rTJPmp0YmJ8WXpjgCWxSGOdS qHAqktuXyM7/p9hErZvrtLoJYgjbdaI0mESLTihKS9GEzSYUT07O6VIiCRU1 xYO0swkDJoRNGCrJD+UwIl4SNTxRmw+s0gkwyZRwQd/PJvQkWwRMAjiZAZwM MS9NzE+VWCRLLOP9id8EvfBOlnpRYofs+OBLNXJgECAOaglBR0lXtfRybSzW UwBGLlZGtZWFd9fLsYxCvSda2USrFx6N8OiCxyFdi4NFACBzA5Vqmu0HPAFI qVwYAjapWR6tWxmrXxkhhgU1IXcgp6C1hLIJAyYn2WSkhHZzabIJLZrMXcmc 784CAaFQNlkZzLs6nA9a6s+e604f60gENhm5mDTXn0OKHePlS2RUV0lHVVSu wn6gJWG2NxfHCAOYzDCTuzCNES4G3NhkyiIUSZSjuphpXVg9gSuxE0w5c5jB EOQRmmlIJ3SxqyeUX9jA8rvY5NiWzqQlntZqtaUKT6RgAt8IHEHZhDriMTYR UQXO3GS6rfDPwcFi8C2YtHiK30RLTxc1jLATFdnp8LCBbwQgwoxFej3lFDTL P9q4ogyFv9mrGtI1yGhYqZ0TYIK2dzUvvBJSVH4TtbYuYBMmJn4DNnCS4ZdZ 5JHDvSkczwWfBTD5+OwqPOcjZTCgcRNN9H//eOefn+/CEV4ydhUCOzjAihpM mGFZyiwVxoNPhvEyIYzXKZt8PSJs8ulo89PRxpcXN7/CNUxACWzeP1t/8/jq u6drcB4z338gk7JuAZuQWcRHt356efuX1wQrmNG+txAccKIv9pIhCjFvbbF9 JX//uA9sAoSCc4ap/x1bv+A8RpxQNqHzhJlxXjeRR+BbcJwy6o9+8DlbZ+ts /alXgKvA3c7Y1cYQyyVe9mZAJXRUF8UTuAy98NQOj3O6EEywdAJgIg9xIfaT QBd5kCtIEeyqCHGJC3WND4WXDtH+tuHeImmATbA7N0ZsM3GlfHu+5s5Kw+5y 3c5izc589cO15oObHY/Xmh9fa3pytfHJasPTq40Ha02gmY60plxxXLggSWGX nuEen+ERk+IaluTqFWntEWXnEWMvCuAaexqZ+3ME7uZcZxMzB0MzR0MzJyNz V+KF5/vyeT484BFTTzNjD1NTb445UxzRFGUTdk8X2biTDbykJxFe9N2MQYYe piZwT3++oZ+JoT+Rkb+pUQDIDKCDzSbGKl+8uT/XzJ9rAj9bTIBFL8j0XLCJ QaipYYiJif85kZ/+BW99Dw8DRfSFsVzXyTzXiQK3nhSb1hhuGyCDlNOhsGhH HgHJLUGtMstWIBcFH9ikibCJTV0C8ZsUyOynurI2Zlp6W7LqSmR5qUEJUo9c uXN+nEuBwqlAbl8ou1AssyuSWlfJbaoVNnUyywaZRWOsqFEmbJIJGmIs6gE9 AEAARqIENcgmzDTg2hhGsRa1MqJqKRsrhKiKSIAUpBUBnoHLamOVjVvMSwtg kwaFLWyUHhMloZDSSVm4MnakLEJUSlBCUB4hgpOloDBBKcln55eEEpWHC1Vp jCjMPQG0ATaxqo62VskK74AqPamScEFxGL8olAcqDOEWhHMKwrF6wmOAhaAK Uyjh5oXw8kL4+aFK0fnAJ+ACyx/qOp4nTIElN0Q5f1hVfyGAkyHhpks46QGc VDE3WcJLkggTJSKZn8jLivR0OfB13az1w/2sU6ReHdXS7ib5QHviaFfa5JWs qZ7sqe7skY6Ungb5ldqYS9XRHWVhoK7KyLbKiMsNsX3N8f0tCQNtiYNtxJYy 2Jo4BDBCjolDLYmDLQmg0ZYklRJHmhOHmxKGmhLh/0jTl7KnLmXPXMmb7y1c 6C9ZHCidHyqbGyiZHSjBVq6ZftiXMmBSMT9YtThcQ7U8VK6plZGK1ZHKq6NV 18aq18Zr1iZq1idqmVauCkolLJYBNiG8sDSsjG5fHCwGPlocKCIxK/0FC/35 8335s93Zs1cIm2DdBG3yq4OFoBUSg5K/1Jc335MzcyVzZaR4eYREK8715U33 5sz05fY2x+XHO1yqkQKMXB0rWxkunu/Ph3fZbII+9y0AipkTWS2YvYjOffjZ mD5JZlvN1GLRBMEEw01A7NHBdEKX2kslm6iVPJaVhhH6/M/OOmFP6NKcNsyu p2h2kW3BbYFKmG/ZVn5d085q62344AoxlWyvkPOwoaO9lJWguVr1Acgryu/S BBM1SGGnn1BCQR6hM4ex1IJUAseHNy4DlQCeYC7801t9B9sDL3ZHj26PHGwN UTZ5enPo4c2+x9sDT3eGDvZGDu+MP787+fL+NDZ0vbo/9/rhwttHi28fL715 RMwj1G+C3VxAImoOEezpAn5hBHgyd3Rn5nCPxJrAmfdPVoA1aOfSz69JFxPi yT8+wRP+XRRWUtBZr5riq9wzhYnjMbyq6skGjhT+enTz6/ObJDL+kDjlvzJN VoQCXm9/Ptp4zxhDPh5cJ51Xyjts//xqG15+Prz+4ek10KeDdRwChtOM6Q/A b1Rhyxb1lWBZhNZH2B1ccBKoBITlFfYIYnS1oPcfpwfTdPizusnZOltn6zdX oLvIzdbIxdoAqQR5BMEESycIJhI3IVAJXIxsQtPh0XWCigl0BDABQokRO8VK kFBcgE3iw9xAMZILsYH2Eb5WUrFdkDsvyJ3fWBp/e6l+/1rL7krjzlL99nz1 /WvNz252EjZZa352rengWI1znWktuf6p4YJMhV1RtldebkBiolu43NE1gOso EdgHibjepoYehkZeJhxHI3MHQ1MHQ46zCd/NXOjFE3nzRb4CvjfP3Itj4m4K MvPicFUAoiasnrDZBElEU/iugZsxCF7C9cA1Bv4mKMMAU5SR2IzyCFtcPw7I NIBjJOacCzTTDTbVCTbRkxgZBRqZe+ta+eo7eOl7ehjKpfYT+R4Tea6ThR69 qXYMmwiaooFNLFVswlAJSs5vVQiaFYKmOEvKJoVyh//5dOv//uXhVG9Za3VS fVlcYWZYUZJHabJnSaJrocKxWOFQEe9YGe8AbFIltwY2qY9l2EQZsChis4ky VFE5bktUEyuqkVmgKI+whWzC4IlAhR4ibN+iL4FNGuPsqEEeztCPlEUIMfGQ YROCD3RTQsBEUBzKRyGYaAohpTLSEoSQQu+gVXhPZew7YRNOwXElhe1/ByQR UNF2LDU2yQrkqIldQ6HdX9RKzz4PbAJKE3OBTVLEvESxIEEslPmLvKyZOV18 HQ9bgwg/qzSZdwtDHMAaY5fSJ7uzAEyIrmQNtSX11MVeqooCMGkrDmorCuqq ie5pVvS3Jgy0JgCSDLQkAL8MtSQwVJIw1AwAEj/IaKRRMdqoGGmIH66PG6yT gwZq5WOtKZMXM6Yv5cxeyZvrzl/oK1oeKFkYKp0dKALNDRJCme4rmukvxoYu YBPQwlA1ammoYmmwXE0rw5WrI1VXR6tBa+O16xN1IAATNSqB53y2loaATQiV LAwWzw+gipT+l778uZ6cue5sWjRhwKSAgMlA4XI/sEnBUl/+Un/+IkgVrTjT mwNMNz9YMNuf11ISDP84iCFYrGEgSJnAiPGLgCdMmkmdpqi1n85GJtjCBKxj mglCiiabUB6hG3Zzl5oxBIspmsShtXKhlU1OzV5kzS7+TeFNKHlRPMFwFjS8 7F9rZ+MGO9hdbbAw4gmlEjpqGPu+2NWWJzd7nt7qRXPKndWOx5s9RztDh9ug YUbKIV2gx1v9j7f7n+0SNjnaH39xb/LVA0w5mUMbO+jtoyXACoQRpJJ3j1dA sKFggj1d75+swnm4DBAGwITq+f4sRi6it52mLlI2QWEB5b+/3v9fPzz43z8+ hCOiCtABffhnD7/6+pyUM8gkYZbQI0/Y5PkmogRiBeAAChu0QEBAwEQ4j4v6 0OnfctLtsk2BiIqeZJdLqLUESydqwuHDyDjMqDEabrJBMyjP2ORsna2z9e0F oIF1E4QRoBLgEZzTRcEEkQSpBB3x9GW4r61aWxdIGuCIeKIIdk0IdyejuiI9 EyOAUFzCvC1CvURiF3NfB+PkaPebs7X31joAT/avttxZabp/reXJRscjOK61 Hq63HoHWWoFNnl1tXL2S3ZEnzgwR5EZZ12f7N1dICzICIuSOnsFC+2ChtZgH bML34woD+Ebn9Y0vGJg5GvNczYUePBTPzdzc2dTE0cjEwdDM2YTrZs734Jp5 a2cTBBMabqIVTCib6LsagZBN4LMadRNTY6aty0hDACYcP46xmGMg4egGMWwS YqIrNiBs4nPO0tfgvKeeu6ehPNZxqtAL2GSqyLM//UJbLA/YpCWG9/1s0pwX OHM5Z+/q5SuNaTlJ/nFRLrFhjtkyx4I4l8I4pwK5A6mbxNoVx9iUx1hVMFHs tSRskV8XzauL5rLBBNmkKoJXrWrQqo4RVccSAZtgbvtp0mQTPA8va2Ot2NmL yCblETxyjDxGEgopiA/IJiC84DQ2AZWFCUFAKL/JJhR2lOHvKjZRtXidYBM2 nnw/m2h1prCVKeEqj0xjWKaEly7mpYr5yWJhklgU5y/ysdZx5Ok4CXTcrPQi fCxzE8Qt5aGX66IH2uLHL6dN92SCJq+kT19JH7+YNNAk66mN7q6OulQR3l4c dKkmsrshpq9JNtCsGG6NG2lLGG6JGwE1x401xY02KQBJGMlHG+UjDfKRetlQ XexgbcxAbexArWyoPm68JXmqM2P2Mjz85y/2FS71F88PlswNFjNsAscSAJMZ crKCcZ1UoABMSOlEA0xAy0MVIMATJBTAE9DVsfLTqISCiTqb9B+zyXxv7kJv 7smiiXY2GW5PBo1eTB1sSxzqSJ7py10cLprpyaGpi9iRBZBCKQaZBb0km4xf W1PsYgqTaF+O7Vvsbi4soLDbutRsJhRPaHlCjVZOYxNN/f9gE633pzH0JA5+ vePO9Yv7Nzr3T87+Re6gvVu0TYs9JZieZF+D8LKz1IxWejSe3L0Gl3U92uh+ crMXjfAHW0NHt0cx3OTF7sSznaGnO4PAJod3RhFMQDit6/WDBRRa2pFHKH0g oWDdhPpN2HjCmOLn0KLCFE1Wce6WavIwmbiFuY2qJJEtWiUBSPmfnx7931+f /Z+fH8Oe6a3aYhs6VK6QY9CgbILNV8gm6E9nQIC8RC6gF+Mvh+NPr0h3GRZr GEzYoGYQxn2PpY1bJ6sem1T0t1GpQQq1n1A2YW6irJuw8ERJKH/0g8/ZOltn 60+9Qn1sPM6buNkaoccE2QT32M0ldhMim0hURRN4CSexkoIhjGiNp81dACYg UjcJZhq6wtyAUBLCXeNCnYFNQjyFwR6CAGfzSD9r+E//g+udgCcP1i/eX+t4 uNbxdOPS47W2p+ttB2vth2tth9daD6+1HFxt2ejJ7y0MzpXwCkIsOzLFPTXx LSXRkjArDwnPKdTCyo9j6qLPdTfhuBobWuma2OqbXzAyu2BkamdgbKtvZK1n bKNnYKmrb6FjZH0O3hI4m4lcOWYaYAKixRQKJlgW0comcKRsAixD2MTXxMiP kb+pMSO0nBj7q8vMn2PqzzEQc/QCOTrBZjohpjqhJrpBRgbBJqa+pKfL1kvP xcNAGn1+ptgb2WQw0wHZBPT9bFKkcJy4mHFroX2qt2xqoPpiQ2ZFQUyewiVX 7pQvdwA2KZLbF8XYFkZblUktykmrlaAmml8bxauN4tZGcRBMjhu6InjAJuh5 Z9hEWBUjRDxBoFDTaWxCiyNVcGeGTepk1rSYAoLPloZxAEbU2AT2tFbynWyC 1ZPfrJvQQowSTIK5BeHmIASTvBBz5bhgpqcrN5jHxhOtbKIJJmp1EypgkAwx B5WpRBJuNg7pkvAyxPx0sSBVLEoWWyh8hQE2uq58HReBjquFTog7PzfOv70i 9Ep91GCbYrwraepK6syVNNDExUTQSKuirzaqtzqivzaqvyaqszTockVof130 cLN8rC1+sj1hsi1hojVuoiVusiVuohmkmGhSTDTKJ5qIxhtkow2ykQbZcL1s uC52pCFupBHwJGmmM2OhJ2+5Hx71CxeGyLhg0ByBlNJZpr9rtr+MkZJN5gYq SX/XQPniQJmaKKGwCyirjDNFDUbUKiaoBQZM5vqL5voLlXkrhE3yCJ4wdRM6 qgvARJNNxrvSB1sTexsVvU2KwfakiSuZs/15V5lyyTLTNkaz4OlLNM4js5yW dI/lko3pGuAU2MPfcm2qCgEEeGQF7jZWdhWQh4l9UWMTTX867ZtSb/TSaNk6 rWii9cp/k03YmMMOfMSXCCZ3N7rubV7av3aCStjZJWomd5qxSE/iHg0vWElB 58vmbN2tufo7q+2PNq48vdUHYEJSTq53A5vQXHhVvskwgAllk5f3p5gj4zRR zdp6+2iJwZMTbILCM3iSirpRaPUENsgmGCiPyYbYxYQOC0xaRIsHPKjD8R+f 9v/3jw9BsIGLKQWwh/TSagjihtIdrxLyCOr9k2sg5Wiv47eU2SJMZWQLJxVj KQc4BfTru9vU3sIWfiM90roMu2KCc7poSUWVaXI8Xpg1PfimCkw2zvwmZ+ts na3fXMAUwCPudsZAIsAjnhdMMW+R7TRBEsECCoIJ7PElWuOBUOjkLiCUWIkz 9nTJgpzlwUSKEBdgE5BUbBflbwMCPAGNdKTdW2MGQq53Pbpx6dF618HN7mfX u56uX3x2tf2AqO3oWvvztY6d3qLR4oh8f26+RNie6tdfFT/YkJqR6hcYbOks Fth6mQlcjSw9zLmOBvoCXWNLPVNrQzjCXp+vg9Ll6pzj6RiJznHtjC2cuNZu QlMvUhxRE4IJFk0QTAA9sHFLTZRN9FwM4SWyibGPiYkvIz9TU0ZmBEO0iOPH MfcjDV0GgRzdYDNdhk30goz1JUZGXjoC73M2HuccXHTDQi2ni5R1k4EMe2ST 1lj+76ib5Eo2p+oe3xoa6Mi5WJ9WXSSLj3YrTvYsiHcBNgFyKYlzLIuzL5Of L5ValEWLKqP41VH8mkhuTSSnJtIcwUSNTdDbTiQVVDF4AvpG0eQ0Niknt1Ky CRwZNhEimJSFcxk2Ua+bnMYmxD8Spi5KJYAkNVIbtJz8DjYJM88PY7MJezaX kk1Qp7FJpsRcTewpXjQPhfIIG1JyJXxQthgkyBIL0sWiNLFlvJ9IbKPrwtVx E+h4WuoGu3Azoj27KsN6G6KHWmTjHQlTXUkzl1NmL6dMdSZNdyaNtygGCJVE DtVLRxtjeypD+6rDYTPdnjDTkTjTljDdEjfbmjDTGj/XGj/bAoqbbSaabpJN NcVONsZONMSM1ceO1sWM1MWMElSRjzUlTLUmz3VlLHXnrvYWqLEJ4slUT/F0 b8lMHy2dlM/0lS30g0rVRAmF4gmIggm7REL3lE2YKWFFDJgcs8ksAybzPcpp XVRa2WS2JwfxZKg9CTvi5gby0QKPMLIwULA4WEiD4FlUgi54LWyCjn7CJjO1 ONuKREyq2reARwBMlkZLQcpIStXAK62ThDVNKGyIoAShiSEnhM6Rk1f+uz1d LJc9xRMalYJn0JW/t9pKkYRCCrtiwh7AhSRCbfLsj9BOMBCZacxk1t9ebL6/ funxZg8QyuH28MHWEM03ATYh2hs52BsGHe0TNgE9vzvx8j7T1sWEkiCbgLCJ C5EEN8AgKPShgFROk3lqmcd3cfgw4MmXoxsAGnQ2F84EZmDkuHKBdPD3j3f+ 68s90D8/32U6r/bYlg12kxUthSit8ScJBQVUAmzy9tEqhrmr+r5uYGMVHLFW gl8NR8oLTKzkNvuLaDmGxpfQCg4dIIy/ls7sYqcuskR9N1u0yQ3/Nf7oB5+z dbbO1p96AUp4O5h7nDdBNoENHR2sJuQUFOAJAgu2eMERCyg4uYvFJi4IJqD0 WJ+UaA9FiGNs4IXoANtIP2sglLq8oJ2l1oc3rjxYv/To+pWHa11PN7qfrl96 CpBy7eLB1Y7DqxePrhE96CudKoosEvPzAvi1ctfuMtlsV2FnQ2p0iK2zs5GN vZ7ogp6ViwnHTs+Ee86Ud86Er2fMO2fE1SXindPn6OqZ6+jDXqjHsTEROfCs XS1OYxPazYVgchqb4AUAJpRNyAgvHxNTlK+pGSNzPzOQmYYsvDkib2I5MfMH QjEzkJjqB5oY+RmY+Oibu+hYueo6OOu6O+hKAy0nC5R+k7608+g3aZZyv59N KpLcL1fGzA+UD3fmdzVmlOVGAZvkyp1zYh3yZPaFTE9XodRGVTcRkYIIq27C BpMapqGrMpxbyYzeIooWVEqJgE0ofbCllU3QCI+FFWSTerkNmk00/CYiTdFu LrY0wUSNTai+wSbHThMAkyAOZRMGTMyPJwYHETZh48n3swmtjCCbMC54Ebu/ i+JJvoQPypMIciWCbIkwU2yRIbZM8BFJrM85meq4cnX8bPTD3QXpkR6XqsL6 G6NGWmMnOhTTXQkzoM6EhSvJcBxviR1piB5tiB5riplokY01RE80xsy0KRY7 ExcuJsy2KmaaZQutcQut8eTYErfQrEBNN8ZMNkgn66XjddFjdVGjtVEjtdFD NdFAKGONivHmuMnWxNmLaYuXswAKGDApnukvwqLJTH/xZHcRgyelgCeMymA/ rwEmWvEEtDxcqlki0QSTE2zSV4hgAlroy1tg6iYgHNg1dyVzZaBAk00mL2eO daYxbJI81EFE8ITxoWDpZKYnB0SbuzSGBmthExTxmDB1E6UYvsA+LtDVyUog FGATzWldWnlB62BhNYhQssnpUSZqV/5H/CYUTBBD4FMnrDHMYOHbS03YiIWg Qdu01Bq62G1dtH0LP0g/xQ5DgbsRX89k9c25xjurHU9u9r7YHX2+M4p+E+zp Ah3ujR7eGQEwOdofAypBoR0ekYT6TZikkiVaE2Hb3rF3i217xzNwARINcgqw CTx44/M/MAjN9QAxjpJddJ2gLx6o5L+/3qd48s/P91D/+HSXWsspngAaaGUT ZBA8CXgCYIIFFJVWsQkN6z5MZWeNxo6cdOIfcxAbTNR8KDQRnt17Bj+VFlDY 1RP4R0AOYo0RVpZy/ugHn7N1ts7Wn3pFi+2RTQA91NgEqydokAdRSCHWeFUB hfR6qZq7qDue+k2wpwstJ6lSr6RI2LjGhzkDnoBgkx51/sZU/cPr3Q/WLwOb 3Fu9+OBq1xMglLWuw7Wuo7VLR9e6jq51AqE87a+Yyg8vDRJl+3MLI+y6iqVL vWXzvRWFCf6KCKfIEAdvb5GjJ0/kYCzkGXLN9ExMdEGm5udMOOeMOecMOLog YBMD/jljC0NzOzOBo0Arm6DYRRNEj99kExwvbKpiEzMWm9A9W+fdOSBrTw5A Ct/XjOtnyvE3MXM7x/fQt3bUcXY6521/LtBePz34/ESe+wSZ0+Xek2LbIuUA mzRGmX8/m1SmeC72Fm4vXQQ2qSuRFWWFpci9cxXOeXKnwjinQgXJXiyIti6V 2ZXFWKp6ugRa2URZNGHYBCcDV0bzkU0InqiN/2V0GptgcYRhEwHwCDsXXiVi jSfNWie98LTLS80Lfxqb/K6erhNFExWbIJhoZROKJ9/PJmn+ZukB5sgmACb5 YRYF4ZbUCE/nDyObFEgE+RIB4EmORJgltsgUW8Z58IJt9JxNdVzMdfysDaRe lvly/yvVoQONkeNtsdOdcTNd8VMXFZNtstnO+Kl2+WSrbLpNDpppVyx0JU41 xUw1Smdb5YsXExY74udb5QutikVUi2KxWQ5aaJItNMpmGqXTDdGTwDL1UeN1 kWO1BE+GqiKGqiMJnjTIJ5rjJ1sSploSp3pyZweKZvoLJ3vyp3oLp/uKJnsK AEwYlYCAShhIKZvvK53vK9GUGp4wKtHEEI1urmM2mSVgcswmiwx30KwTxBOt bDLbmzvdnQ14Mn4pfaQzta8lfvhiyjR8pD8feGRpqGjiUsZ4VzqgitZAE82Y exAhEcYRvzZRSQsompkmbPsJ+zxlEDZTaIKG2gXHbHKKY13zyn/fb4K1ElIZ We/AJi6EI3YaI5kwPN+wvdAIlIGtXHTWFsUTdlg8Vk9gz7aW0AR5KmATkoRy tf32UvPGTP31yRoglMebfUe3RwBPXuwqwQR0dGfsxb3xl/cnXtwjVIJtXW8e zb15NE+pBMVwyhJ1wePDPNZEEEwOdqee7Uw+vT2BzncsmuBH0JDy+XAdm6bo Yz8tVdBJXLiHIxAKBZO/fyQxIpgkAvqvL/f/++sDEBIKZRNgEAAQNTCBM6C3 j1ZBwCMfnq7hEUSHjH0+xFz7dfacLhwjpvLCbFPuoJBC+7vgiLUS9jgvtkGe XethMcsOHYmMFROmgnP9jE3O1tk6W99eMYGOYlcBIInnBVMvezM8Aqdo4gkt mrAlZjgFJ3fR5i6p2CFG4hgb6KT0m4S7J0R6pMR4p0i9k6VeiVEecWGusmAn kNzfZrKz5NH1kf2V3mcbo3dXroAerXU/Xu95er3ncKP3xWbfy5v9r24NvFu5 MlUuLw61TfPhZgSImtMkq1eK1/urQUONGdUZwclhDpE+Qn9HQyuBvoijyzPV MTfRMTfTNefocri6+ma6hoAnvHPAJoZCfSNLI1NbMg0YpUQSHw7I2NvcyMvM wNNU38NEj8ku0XU30vMwU8rdVM/dRB+QxJXp6XIz0Xcy0HPSN3QxMPMw5Xtz OO5m5m6m5u6mXA8zgRdX4M0ReJsLPM34HqY8NyO+uzEjI56roZWLkbWrkZWz gZWzvrWbga2rvpWjnpO7gYe3SYCvWbA/J9TPXCrhp0kvDGZewFz4gYzz7TJu i5TbLOW2xgpbY0UtMotWmVWb3LpNbsNI0KYQMHhi0RBnUxd/vjbevjHLb6I9 fXWkprsxvb5EXpAalCT1yJE55codid9EZl8Qex5z4cukFmVYN4nCugkHVENC RgSoSkAMAA2Vi0SZYxLFp7N/NcslWtmkUiosj+KBKqKYd+GkVFQnt62Jta6W Moqxroy2pA1dbGmtpJx6PoxUXiqiLCujrSqjrAjjhGsHEyyX0KKJqqeLmx/G Y0YHc6nZhEkzQTzBYcJknnB2IC+HiJ8DxBEkyA0myvA3zxJziGdEzIF9hr9Z ZoA54yLhEwUS5QQKQFli4iuhJ2FDbCZ+vOwAYa7EIjfQMofIKifIWu5uGmil G2CpG+FklCKxqEj0Bk6faY6eb4te7IhZuhirVEfsMnNcao8BLbZJF+CCduls Y9RsY/R8c8xia+xSm2ypTb5M1SpbaoldbIldaI5ZaJLONkRM14eDpurCJmqU GqtCRYxXR07UgKJgM9oYv3A551p/8Wpv0UJ3wezl/MnOnPHOvMnLhZPdxRPd xWNXQCVj3WWzvaVzvSVzvaUMpJwQ0+4FKl8cqAAtDCjRgy1qJ6EMwmSsFM4R /3sB+ySxnGhocaBgcaCQOR4L5wMDngCDjHWljXSkDLUnY8rkdHcOaOJSJgg2 N6axIFJFI+w3VPO4VFn2xGOCFRP2eTwJeEIIhahmY7b25lz9rfmGW0xWCAk0 hOvhUzOg47z4mwsNxFdOhvE2wxM4ijyuL7Wgttn4wBosrCnEBK3zvjRrK0rw UQUpntYStrvaCtpbbdu72gaMcOca0c5yyzb85sXG20zEPOg2wxcUNGjpRA1G TquesBNPNEstKpC5uLvcBtpf7Xyw3n2wNfRyb+LVnamXe5NM3WQE2ISpmyj9 Ju+ezL99DFpg/O/LTDfXMs7p0hRlk8O9aWATABMQcAr637GzC8d5/fJmi3Fw 7FA2+fHlppoXHoVnkFCASv776/3/+ekRPuHD8z+yCXAKey4Wk+S+iS4SJh7l /7H3lt9tZFnbd5w4RoFlZmZbsiXbYjYzoyyZmWNmTBzHsQOmOA4zc9KdpoHu 4bmf51nvX/Tuqi2dVCQnPXPTzAfXulato6NSSU5/6Pqta197E+IANrnISOjD bz6PdgkI+4bRE0zMY9kxC0/6+uLvIT+YDp7skGwIKcTCKxE3mDYKkgi+JOfP OeUqSdlYRpwc1XQdHUfH0fErhzI5OCnSPcrfCYSEAiJsgniC0fjD2YROypOR 8VjZReYwalPD9ZJIABNQniYxV52QrYyDtU4cgZNQFLFebWXqB1vzL66eeXV9 9dH27Nubq9/f3/jhwfkfH63/9vHGz083f3l+4Q8vLnzYnlxuyqpM9cuJZecn uNWrIuYas26tdN0+3bM5Yhg16Gs10Zl8r7RgBz/ecS/OMTeXY2ynYyyQ6zE2 286BReGJPSx4J5w8HZy8QI7AEexoSqxolmuMWc7Rrs7RLk5RLo60b3IiwhFk H8M+Ec06HuVyPNLJLtzRLvSkXai9U6SzY7ijY8gJkEvYSU6Us1uMKyfchRvh yotwdQt35oY5gnhhTpwQe26IPQ8Uau8eZu8RZu8ZZh8dw05IcE8SeKWKfBXi QJU0UCn2l/A5siQ3tchdLeSpk7npqR4FwCYF/stVEbOloQApfTq3ThXFJh1K WPA61cgmCCa+PTp3HMjYqfdq0/u2pAcCm1Rpg+e7cq+d618ZresyZtYWScqy hcAmJergUnVgmSqgTOlXofCpVHjXKDxqqbiHm0nGpfMmLFADlUD5InFY0QdZ 28bhP2cTHgUmlOfiXi93N8C7Cg8Ak0a1b6Paz6QEMPEGoGDaJb+KJ1+q/oIz 3A3vCTc8tB4MxESST2yShmBC6XM2oURsFNgHMAHoKKGwgg6w4zx3ARvOuI9v wUuAlPxEVzgDgFSkeVaKvSvFXuWpHrAGlaW4w5VAN7BGioGdijSvarmfURPc lB7elhfbU5o0Vq9Y6Mhc6s5e6Mxc7slZ71Wd71WiNvpUTMHOeo/iXLd8rUt2 tlN6tkMJOtelXu/WnO/RgjZ6dbiAHRC8tdapgmvOtElXWsSg5WbxUhOlxca0 hYa0eZN43viZZhrUKx3Z5waLN0bKN0YqVoFNeotne4opPBmuXhyuATCZGqic 6K9YGKxYGqpcPlUFggWuT49QtEIDS90qlUkxgIA4sOkWUwAdKyOlVrIFFhwN +SkXb/n42YlDBGACWhkpodikPw80TbFJPuAJUgkKUAUHRAJl4LDyHZo1dk83 Y/gdR0YS6wTBhKwpNqGmnzShpUK6DeOtduncxLalu9dlS4kX0MQePXAEGOTq WjvqYK3jGq3r56hpI1bOCDKF7Qh4247EvwopzPkph7MJPaXRKkVCGAQxhDli 3mr/KxNPrEjEqpqLGC6ETe5eHrq/PQy6vt577VzvnYunHu9NApgAnry4BhxB 1XQ9vzX34vYCgMnreysgZt6ERE5IMy54tid5E3RMsJoL2AQFmyC0UeAtuAzY BIMbiCFYwYXNe8lLMtbEQgdmBMA2VvRbB1i4hT7FLx9uMEMoJKL+/uEmToQk DcRwjeNXmCMjLU3GqHcBMejcxw7OkSTowRjCuEdghEyEhDV5C+nGCkmYVouV aDz5RGTMr/hXP/gcHUfH0fFvfQBEJEe6A5UAmxDrhGmaEOsEp8OTaDzm4lE4 Mp5ETnDWCbAJMAiQSKY8BpAkX8sHNoF1uiRKL45EqQUBjcXKj4+2//T+9u9e Hvzy+uAv39z88/trf3l/8LcPB3//5uA/vrn6f749AH27P3O6PacsxSs71rWQ 716W4tOSGXtzsf3GQvvBbMv5/sreInGFJFgb4RLi6RDAO+HFtnNzPsZxOsYG SHE95ux6zMH5mAMs3I47u58AuXie5CFERLgCTXDDXTgRrih2hItrhLNruLNL uJNzmCPIIdLZIQJIxMkxzNExzMEp1MEp5CQr3ME19KRriL1L0HHXQDtW0HFW 8HFOwHG3IHte0EleoD0v8LhH0AnPYHuPoOM+ofYBEScDIxyCIh1Do53DY1kZ ooB8aViJKqpMHV2ujixVhhXJggol/oUSv4I075xkXhafnS/kVSgCpgsDgE1m SkKmioIG0t27LGzSQbNJp9qrS2P2TXr1HqAevUdXund7ul9rRlBzRnCFKnCm PevgXP/ySF1tYVqBLkEpDMiR+ubL/IoUfmXqgEpNYK0usF4fVCN3r5HxDFKO Uco2SVgmiatJ4mL6H2ATKpxiTql4mJTADu4mpWej2rtJ49uk8QeOwDougidI KFZFXFb6EnT8t7AJo0PX4WxSLGQVJVOChUVsqtYrhVsi4hQmuebznXMTHLPj TsJLuhKMSw9t5FWI3UEFAhe4Bj9F1KDxbcsM6smPGKnkzzSIl9tVpzs1Cy3y c/2Z66dyzg/nrg1kLnSoQOd6rMFks19NwATZBLXerSZIgtrs0zPxBNkEtNou O90qAa20SJabJYgnh7OJSTllVMw16c705J8bKl0dKFnqKZjpypvtKZwfKFsY qpgbrJjoKTnVXjDVVTTbWzLXV0q0MFCOqAJaGa4GTjFr9JMJwpQtmxAdej2T UL7OJotDhVi+NduXy6QSFKDK+nQN4smnNlw0mxCLBIRTF5nXEBsF2IQJI5RX Qr8FVIKbyDtbsMlo27VnHobYfoUe0b5/tu3q2baDs+2ofZuqrUNrtJjtiH+V Tcx0Y7knIAmZ0miFJ8AmBDQInjAXxCihfvZauxWtIF8wJ8Izi7uskvJMHsGw PKO11yBQCRWEvzp5f2vk1ubgwVoPEMqtTSCUaSCUJ9em718Ze3J9mrAJnYin psPjeHdkExBpF8zsFUwyJiCEFCzuQgMFOQVTJ3T34C2MlpCqLRCOLyHdseAl ZsNJ+AK/FEunsHYLhN2xCJsQHKAHKV6C69EcIVVb2I8LNjGbD78Hd+ACLE77 +JSaY0KG0Vs1zsJSKyaJYBUWWj+MPLu5bRdz7gmzputzfYrbMKjnqE/X0XF0 HB2/cmhTwwEr4oJZgCQ4bBHTJTjuhCkmm5CJJziQERt2SRL8QMgmyuRgwiYA JjmqeAATOGcpYik8kUaB9JJIJT+ovTrrp+cHf/rm3h/e3/q/Pz7607ubf/pw 488gilCu/eXDwV8+7IO+vzG30pFVnuqZHetclMQrFXmWp3gvt2Rfm2m6u9y1 N2acNaZ3ZPELEj3iA1hRPk7B7va+LDtP52M8kMsxV6djzk7HXNjHWG52Lhw7 Zzc7jrcDN9SJG+YMcgt3caMhxS2SxY004wkr3Nk1zMkljMaTEAeQSwg1a54d 4sgJceCGnPQId+SF2HP87Vi+x1g+xzi+x7h+xzx8QHZefnYBQfbh4c5RUS6g uFhOYjw3KcEtOZEnErinJnukiTyz+F5FqYFVqshabXStJqpaGVYlD6mQB1TK A0rEnnlJ7JxElyIRp1rhM1UYsFIVMVcWBmzSr+d1qblmNlHyOlQeyCaIJ4ey SY0udLYje/9s7/pMU1utzlimyNfGl+sjKqi58CEVWqqmC7PwVTJetdStTsKu l7CNYlej2MUodv6fYRMPS3cvYBNPVJPmk28CVIJgwgybMLPqtvoSsPxX2MQW TL7EJkXJLkXJzqBioUux0LVEBGLl8x3yEinl8x0Lk5xLU1gVYm6BwBGuKaPy 9fBZVrmYWyP3qFf7GFTeJq1fd0HUpCH1dId2vS9rtV11pk15pg1IQbveo1/r 0a92aVe7dWd79Cud6qUO5Zke3Vp/xtn+jHWaQaxME6QSKyGDMNkEwYSYJmis rLYrTrdKaTBB60Ri8U3ElEwSpuYbVZMG2YRBNtesXWzPXOzMXurJm+vMne3M m+kpmu0rme4rGe8qONWSPd6eB5rsLJjpKQYqQetkcbACRZwUilNGvoYhTGHl FYiJJ1a0gnjyJTY5PQoXwx2KCZ4snSqGG8IZtDhUhHiyNlmFrcNgQZNOJawB RgAx0PggBgriCSZNCJsQr4RYJEwzhTm6ERPx5pZcNJ6A4PEedZWmErRODmWT Q4njUDaxtVdIsMWqE9enfQaeIJt8CU+QTVBmx8dineDCar4JaSBsVdnFfJfZ wgte3tsapDX0YGfk4e7o4yvjj3YnQPcuj9w4P3Cw1ndzY+jB9sS93dE7O8N3 d0ceXp14emPu1d3ltw/OvHt49s19yjTBgi46BW8ecYKtgNGJgGf7l7dXCZIQ SGGyCVyAPgV2oLLYE7v0Yo8OklB4ghVTP72iUh508mILnvMZILD9/uGFj0+3 cEoIPP9jloQ59IQMZ6edlx1kKDIaEhkHfgbaPRiBwewM/jmIHqRl1ucNfncQ ZOh2XuYZ7ghZeD2cMSZDX29ua0wMlMM6dKGZ8plXgl8EiAQ/5l/94HN0HB1H x7/1AfgANIHdg8mIEzRQmNPhyRxGnBFvxSbomxzCJmkRwCDomwCVZFN5E0qI J3pxpDwxqCJTfP3C3O/e3vn929t//Obun765+7fv7//t+3t//+4OrVt//3jz 7x9v/HRzdrFJWy5yz4o6WZjAKhd5FCawe3IT98cN95c7DiZNm72lk9Wq6rTA lHAPfhA72sshmGvn63oM8MSDxhM3l2NczjF3Nzse7wTP44SHtwMryIEd7MCh CQXBhBfFptgkks6MoHVC+ybcIAdKgfbcgBPcgONcfzuun513sL1nwHF3n2Pu 3se8fO0CAu1DQxyigu2jQxziwp340SxRnJuY7y4VuCtF3kqhl0roqRF56VJ9 QNoU72yRV6E0oFIbXpcRVZceCQRRrQ0uk3uXK3xKJO65yS7ZfIfCFNdKpcdk gd/paipvMl0c3Kdz61JxutRutmwC6tW7gwibtNBsYsqJ3lts+vHphZsXRpur 1OU5wgJdQrEmpERD9ekq1wTh7MVajX+1jFdDYQUH2IT2TVy+5JvYzjHBVPs/ 7puYpXRnsAmAiQ9ABArYhDlv8ZDBiJ/rH/dNDqWYw9nk06RFa9PEuqZLBEgC YAJ44lQgcADl809WiDmwAwsQ7MM1oMLkk+ViZ4PavTnTr6sgZLAidrxOsNyh ONOlWgNMGEgHne3RLLXLz3fr17t0ax0a0Lku3Tq87KbxpEt7rjd9rTd9vT9z cyhntUd/rptyRj4BCO2hfPJKGJvne7XMCi7kEeKVIJWcaZOfbpUhmCw3py01 pQGV0GCSSrOJxIpNlptU8yb5lEEyWSeZNEhnmjRLXTkL3Xnz3Xmz3QVzvYXT vUWTXQWj7bkjLdnDzVlwnuoqRMcEYAQWKCakLA9/go5fFaIE4gkiCVkzCeVQ Nlml4/AowJOlU0UgW/aBrzDHWGgqwSQ+7gChbNFxEnN7rqUGKzZBPNlFu4RG EnMXL8agRrRg0BnZJSMX6cgJygwmVE2XGUz+G9jkC52BzUPn1z+F6w9t9nWw bq7RYuIJs4gLF/Cb8cfDX7d3pgXOTE7ByAnVRp4SBRqAGwRS0FhhZlIIrSCb 3N8+hdVcVLNHqrJr9PHe5NP96cd7U/e3xm9tnrpxfnB/vfsW3HZv9Mn16Zd3 lpBNvnly/sPjdZKCt7CJeZQJUzgCHgkFqASRBPHk4f7844NFeAsYAZ7tgTWI +0A/7W+hjYLD2QFSMBoPeIKFWEAo+NwOC3oEyQ7xTZiduJhDTwBP6EIvKtUC jANfQTL48L0II6TJGCzIUEj0dOAXWkIluwRAUGipoCxJ+Sto95BqLizQwl9I RtJbNe/6nE32bau5EIL+1Q8+R8fRcXT8Wx/ACNJEf0CP6ABntEtIcReCCXYP xiGMyRaRUi4yIB7YhAxhNE9gFIZoUsIAQOArMmTRTDZB9wQ2tSlRmdK4qX7T T29u//zh/s8f7v5/v7z+2/cP/vrd/b9+d/ev393568fbf/14C/S7g+kVk7pa xMuNtC+Kc65IciuMc6mT+q+2Ze9P1F2drN8erl5qzmxJj1bF+ojDeIl+zhHu JwJZx3ycj3k5H/Pl2vnxjvu4n/DxtPf3dQr0d/HzBeKg5BbixAt1dg9zcQ93 BXHDXDihzuxQJ1aok2uIo0uwg0vwSY9Ae48A0AkP/+Oefsc8fSgFB9kHBZ4I CjgREmgfFeqYGM0WJrhLYjnyBJ4i0V0JSnBT8921SR4ZIq8MoScoU+iZJaKU KfTQJHN0KW55Mu9SbVCFPqQyPag6I7hE4VGu9ipXuBemuuQLHYrTXCrk3MkC /8/ZhIts0k6VdXl0qDw71d4W64QH6tLSWXidT7M+oFEf2F7En2nP2jvTfWas vrVG21gJeCIqVAUVKQNLVAHlmkBgkxpNQJ02oEbuUUvxBdco4zRI2Q1SVoPU 9X+CTeoVbljWRUVOFJR1Ui93p9nEt0HlS/ImzKg7qelCj8NWX2q99d/CJrZg YsUmpakuJSnOxSKnomTHgiSAEfs8/ok8vkMe375Y6FSrcG/NDu4tiuoviRk3 JE4a+TONycsdkrU+1caQbvOU/vygFhYgWJzrV68PaKjNLvVGl2azR3exT3+x P/1CfzpVf0WXYG32p5/r0Z7tVq31aM50Ks92UlmStS4ZCpGErD+zVHqta7eA R6zAxIpNQF9nk5VmxVKTYrZeOlGTOlaTOm1SLrZlzLVnzndkzXXnzvXkz3Tn T3bmjrXnnGrKBAGbTHTkz/QUz/WVzveXgQ7Bk1Nm24KpfwRPDqUVJJSvswlW dgGe0E2Dv+jRLA4BvBQDoaB7gjF54JTzM7UXF4yAHvD4jdaJVQKFysJbwIRU c21bwAQru5A+9phVWKstqCvEN1n77/NNvtCA61A2+awtmIVNSITkK+kSZBNA EiJkEzyjycLs00UAhIySJ1SCSIIv0UkBlkE8ATYB4WQTxJOn+7OP96aBUPbW Om9cGnh0MPnyzsKb+6dxvsn7R2vAJh8ebTD1zeNNNCPIoJPXd9dwAXiCARMA kwdX5oBKYIFhE5y6iPMN6ZjGNhoi+EzOnAWPCxorrjDdBPqyPYAOeJ5HMCFz D3GKIhn+bqGAfWyBBR9EG4KwCYb3idDuIfSEI05IvJ2JJ8waM7ySGCjk1yKt 4K/CX0jSMYfWdGEWnjnlhLg2/+oHn6Pj6Dg6/q0PwARlcrAgggcwgr4JsAlC CjYTTrJ0DCayCpuQFDw26cLxi8Q6oeLw4ki9JBKRBKkEhGttanSeOrmzvvDF 7cvfv7jx+/f3/vbTs798d//PH+9RTRQ/gm7/+dtboF+uTp1v1hlTPYtjHEvj Xcr4nJIEVkGcS3d27On2rO3RqvP9xYstGYNlqZmCIFWMd0owO87rZBjHLsD1 mJ/rsUD34+G+TqG+TsE+jmGBrIhQblgw2zvIGeQV5OwZ5OQZ6ORByZEHtBLo wA104AScZAXYs/xPuPqd8PCx8/S18/E74R9gHxh0MjTEMTzEKSGaHR/FSoh0 5UexRLHctAQPaZK3NpGnTeBpEtxA2gQupXhOZpJ7drJHjtAjl1a+yKMgxVOb ylWnsDMkvHyVT4nWv0zrV6H3L1d61uh8a7ReZVJWSYpTWZpzpYQ1XRSwUh05 VxYGbDKQ7t6tcetUcTuU3HYKT9yZbNKl4YI6NW7tGo8WrXejzq9BF9CUF7c+ Wvnz652721MdhvTK3JR0aXiJJrTMPBfe7JvUqP1qFR44e9Ek55LZi4dm4f+L bGKQcxFMDDJuPWwqqDh8o9qHxhNzTRfmTQ4ljkMru/7xLPw/yya21VyH1HQJ HYtFlEpTncvSXMrFrqCWrOC+kpjJetFiq/xsj25zKHt7vHBrPOvSaMbFkXQQ Li4M6y+PZYJgvXlKtz6gRl3oUVzqVV3qU13oVZzvkYM2ehWXBjWXhrQb/cr1 XsV6n+Jcr/x8P7CJdLVDgqIC759zyuds8qmIC3kEo/GH4YnEKm9CE8phvkmj HDRXL5mqTZ2pl841quaaNGNG5VSTdrojc6Yze7I9a7QlY7hZP9ycOdqaA2CC muoqnO0tIWxCwITSEFVMZaVfdU9IFRaTZQhZ/CqbYHEX3barxBZtAEPwnvhj 8Cvm+vOne3JmenNhf2O2bud0MzyHk7ZdKDKKkWmXMFGFgImFTdqt2GT7TPOe 5cF+H57tV9tA//W8yVe6DZvNEUtNF7kz892rhyXcScYEOQXRA0mEaa98iWXI gjDLoSMakVDIGtjk4e4oPXtxCscvwvnZ1TnUgyvjt7aGbl4ehPPd3bGnN+Ze 3ll6+2D1/aN1gJFvn1wAffcMyGKLBOHJ/HdiQMDjPbbqAh4BMLm/NwtCQoGH f7iGboe1R7rmIoMQEgFaYcyF36U7Vu2QGjB0JYBNUJgxwWgJGhNkYVnvWcrD cMr8NuIJ/H70SuAnYZdj/Nmwg5VdcA39vVtojjDLtzBLgsJmv3BPNFAIW+Gf A5/CxsXMeSuEnpgi/wiEUAik/KsffI6Oo+Po+Lc+smRRamFwaowHP5SdEOLK D+UIwrjxQeyEIE5CMCcxxE0Q6p4U5pEU7klqupIsZV0YM8H8O5kLD0IwQd9E R/cQRusEkQQhBWu6tCkxGlF0WaZ0f33253f3fvfy5p/e3/vz2xt/eXfjb++v /8eH6//3w/X/8/7gP95d/fHa/PnuwnpZUGECp4TPLUxg5ce5FCW41km8+wvj znVmLDUqF4yyxQZ5rSa6QOSviWSn+NsneNrFeRxP9DkZ6WEX7WUf6eMQ6eMU 5ecaHciOCmQH+DoF+IEcQf4+J329T3h7HQ/wP+nrC2f7wMCTfn7HfX3tAgPt w/3sovyPxwSdTAh1SIpwTolmpcawFXyeItFNEc9VxHNUCVx1optG4K7msygl uqr5rvTaFdYZKbwMEcgtM4WXlepOKYWnFbmBMsQeuXKfIrV/qS6wXB9Uqvap 1PlXp/tVaL1KFNwiGbtIypovCztTE7NUFTVTEjKY4dGf7tGhZHeoOJTUbp1q XqfGvVPj0aXx7Na6ETZp1ng1av1MWv/m/Ljptkz4f/T1zeHO+ozGSnWuOrZI HlSqDC5XB1eog6vUQbXaIIMuuEbuWSv3MFAoQVknJhnbJGOZ5MAmFsnMqpe5 10utRdjEYGGTOsQT3GEIqMQsqgUxDwSbJqVXg8ob2AStE6vICTMUj+BglTSp lRwiA/xahadJCWziTTcldq+T8ipEbPgUcwo8vqRgRMhCYZFYZSq3NNkVBItq sRucK1I48LIw0TE//mRBgkOxwBlUxHc0qXntWb6DJeHjNXGzxqTFJtFya9rm gPbyqYztkayd0eztUSDo7N2xnJ0R/SeNUtodTd8dS4eX2yO6rVPay0Ma0KUh NWDIRSCUftWFAdXFQfXFQc0FeDkAC/VmvxK10aegOMWSdsdmXAgptlVeVDS+ W0kXgMGmkincXOuSn+2UrXZIz7RLznWpgFCAR2YMSVO1gjmjiMaTT1pooNp2 LZhS55vkc43y6Qb5lEk2CWpQjJsUo0bZmEkx1qAGjZhUw0blKaNyqFl7qkU3 3JZOK3OkPWusM3vuVNncUNnMQMlUf8nUQOnMUPnccMXp0XJ48sdmWXAGBAAx ocDWRmE6LMwrCWIwQvGVZJijTb6+BP0R5BErNoF9vAPszPbljXdknGrWAJvA t8A9MXsChHJ+ptY85YQu9NqcM8AOmilY9IXNvgA0zKkTuqALd0AHlnbB+2tU BH6PLoUiFV+kIOpgrX3/ELXBB82fYvQo3qb7g1GB+rOt2MoY1uamxOsoOj9y vhMb/x5Qiw7zL1m3dDBeo6Yoku9ilmZZQQcJnoCALHB4InbxImkUchkiCV55 63L/9Yu9Vze6QLC4vTVwZ2fo9vYgrQF4CRfcpIVUgpVgtHVy6sEOlYh/fGX8 yf7E06uTzw6mnl+bfnF95s29pRe35x9fm7q9PXx1o+/ahQEglDf3z3x8tvnj S3gIvwRs8v3zy79/t//z26u/eb7z3eOL3z7YfHf33JtbZ9/eXnt/99y7O9T6 1Y0zL64tP7u6+HR/4dE+VdmFNV3w8I9BeBJLJ+MXkUGIRQKbWI5lCaTvkPa8 NGJQTgS250I2wSIubCBMJrbTnYS36AItM+zAmgRkcCAL8ghlndw8A3p3Z+2b +xvfPbrw/eNLPz69/OPTrR+fbf1Ei15sg35zmIGCqXm0SxC7rGZK0uYOIR0U M8myQzI1JFZz5JscHUfH0fGrB7CJRhScFuspCGMnhrgKwjjJEbzEYC4/xI1v BhPP5HAvELNpMCnowt5cBEzkgkAU0zfRiSP0kkis70I8wbwJYItKGCGOC8yS JmzMD/7+7Z0fn+z/9PjK39/f+tvbG39+ufeHJ5d//2DjN3fO/nTrzN2VzoXG zCpxQG4cu4jvVpjIKaB8E+cSPgseZecM4pVG+ekmxXKDbKA0zaSLLkj21kS4 igPsk32PJ/udiPWyi/U+EePrGOPnHOPnGhPAjg5gRwS4hPs7h/s5hfk5hvme BIX6nowJdo4MdIwOcooLc40NdY4JcYoPd00Kc0oOd06NdJXEsGVxHKpYK9Fd I+Bp+G7aRC5KB+K7qQUstcDVSnoRF6QTckBkrU3m6oW8zDTPXKlPocq/VBNY rgsq1fhRBorOp0LnXabxKJJz88Wuc6WhZ2pjV2pigE369bw+vXuHik1JDWxC kQgtwBN3qqCLfslkk6a8uIE6+Q9PNnfO9LbWaMd6KsqyhVW6qCpdZJUuvFIT UqkMrFT4VSp8q+WeNTIPM1DQ3bqMUhbhESvZsgl2A0bV0WDyJZFxjbR1YhaA CQjDJtQ4ElpWiXhkE/Q4rNikRgzi2qo6jYPCdVUqu0EFX+EFkIL7ACzwvbBf IXKtTGFVp8Fl1AdpimGBqlKpy8qSnYsSHYr5lMqFLvCpjszg0fLEBZN0tU0N j/TAAhcGNFvDABpZ+5O5oCsTOai98WwUvHVlLOPKWPreqB60O6JDwY7t5qUh LQqoxFbIKaDNfnOvYKt2wUwkITo0hEI+xUQbulWXAnhktl44Y0gGNgFOsbgn pMQrdd6UMtckn2kEyaYaZBMm2TjIKB0zykaN8tF6xQgl+TDIIO81ynpN8r4G xUCjarBJO9SiG2rVj/fkT/YXTQ0UTwOhDFfMjlSClk6VkOa9wCYAAsymvsRJ sa37QpFrmGzCDIwQPGFORbHt7kVaEMPCUhhmDpvAbQGX4ItgDTwC6IGeCFZz bVnoA/AEXgIEAa1g/y50VXZoGDG38LKwCYljEJEIPLPnsNlAoTmFXMAU+SxC DXW2fBeG8fFL9wnm2JRmIWUwTQ2rYPunnsafs4ltKP7mZg8TQwibkM8yv/oG PcARJzniMMdbgCSAJzuDsADd3OoHwf4dGkxIHB7x5OHuyOMrY0+vAptMPDuY fH5t6uWNmXcPVt7cX6ZHnMw9vAqEMnLz8qkH+9NPbyy8e7D+06udXz7AI/c+ cMpvnm//Bp7Sn+389vnuj0+2vnt44eODzfd3zr27vfbm5uqr66dfHCw/2198 sjf/aH/+IS1kkzf3zpHQB7PhFZ0l2UJvwirBQYYwYqthrJX67tk2dg/GgDkT TLDEy1Lx9ZkQcODbPzzatPJN3txafXvrLPwJH+6uf3t/A/4c+KN+ekr9jdb6 vJvWoV/BHChPCr1I6y36ms9KxUg7YmZDMFz/qx98jo6j4+j4tz6y5dHAJuI4 L2QTfig7KdwN2UQQyksK80AwAZF0CVOkoIuJJ6SsC60TCk/SIgiboG+SIYuG l0pBmDQ+MFMcszDY+PbO5Xe3Nt9cW7u5Oniw1LM703JxxLAxUHGup+Rsd9Hp 9ryxakW1JDAnllWQwAE2KeJzcqMd8mMd4TG1JydioV58plk5V5c6bdL0l6YY NeH5SR6qCKe0wBMpAScSfY/z/ewT/B0TApziA1ziA1kJgWxBMJsfBAuX+ABn 2E8McuYHu4giOcIItjDcNSWKI451E8fy0mK40lgKSeTxXFUi8Ii7Nsldl+yh pWFEL+ClC9zSBVw9n6NLZOmT2LbS8l11AhYIFkTpIveMFI+sNK9ciXehzKdY 4Vui8iuj5Fuu9qrUeldqPEsUbgUS1kxx8JmamOXq6Oni4F4tt1vLNbMJ5Ztw LXjyRTYxZkc1F/J/enbx/s50X1NuXZE0XxtfoggplgeVKALLlYFVqqBqdWCN OqDmf4tNMAhP2AR2aiUcavCiyswjOC2RFHcxwQRruojfwcjCHwImRoVnvdyj njKD4Od5AJLAtwCG0AzCrpVQ1wB0FCbY0z6L+VOMC+C3mS0YQJUmjW9Pbvhi g/Rcp+7yYO7uaNHeWPH+eMnVidJ7K5W3FkoOpvOvTuXB+fps4bWZAiLYwbco TWTuj2eAkEcQSWDzYDILzii84PKQdmtYDwI8QQYBJLl8SgeywhbSMZiwxqFg wmQTJqSYR5/Q+lQbRo04ka+0SJebqZouhBFbMKHUJJ1tlAKbTDdIp0ySCaNk HFQPZ+koEEq9dARkkA0bZH31st56WZ9R3mdU9JlUZjVqhlozxnrypwdL54Yr 50eq5ocrZ/upCSMIGuibAAWgezJHv0Vk2+8XwYRZ02XbT/jrosbN0zyCuRIc +0jPefzENYAb69M152dqze22aMEzP+khvE1XalFNhmnrBJAEPgIUYx53gmVd liZdSBwkM07og7DGFYt7QsIpzAts2YSE0BF24HoyL5J0MP7Mhfm8NIuJJ0zZ 4oktm3wCDRpMrBoLEzZhYhT+gZQ3tN4BSAIwcmf3FJAIMAgIecRKd7eswQSt E8STJ/vjiCcvrk8Dm7y6u/j81tzLO4uv7608v7Xw+NrMo4OZ+1em7u/NvLx9 5vvnl3/7Bp6ld37/6srvX14BMEFCgfMPjy99c+88PNvDE/7rG2deXlt5fnXp 6ZWFxxbf5Mm1JWABnL1Ix+Gpei14mMdsOz7DM/MmCCY0m1zBlsJ//PbmX76/ A4IFsUtIby4SNscBIpaIxyXkIPQ1EBlg/f7hBukqBr/q9d2193fXgUrg9xM8 ATb58cnln55ugZhs8iMDMQhEWNLrW9gKjHwpCkmEOR4F11b8Qga4MC2kf/WD z9FxdBwd/9YHsgn6JvFBzgnBVFnXob6JKNoaT9A9IUF4YBNEkkPyJuJIjMNj M2GcwKiXRKr4wcrEIEWif222eLqzarGner6zfLYlf6Y5b7YpZ64xa64xY74x Y4E+zxh1RlV4bhwb2CQ/3jUvzgV9k3IhyyB1Hy6OWzRK5g1p0/XKkcq09tzY crGPPtpJGnJCEmwvDLBLDjguCDzJD3RIDHJMDHQCJYW40HKm5ZIc6iwMcxaG O6dGuaZGuYCkcWx5PEcSy1LEs5WgBI4qkatO5Gr5bjo+ZZTo+RSSpPPZ6Ymc 9ERWeqJrehLHVppEFx3fVS+gIAXWWngpYGWneOSkeuWkeeWJvfLFXgUSz0Kp V7nSt0LtV6X1pVMn3pUq91I5d6Y45HR19GJlpDkLr+a0K1mIJ+2f8IT3JTZp zqd8k5fXF3dXewdbC4baiutLFdX6qApNeLk6pFIdXA1SBfxv+iYNag9bNgFw ABG7BPHEFkysmgmbB5GI2DXiL5V1uWMpF1onsDAq4CacqjTXGjGrTkaVnNVK ObBTkeJcIjhZmuRYI2a36n37CsJHyuIma5KWmqSbfRlXxotuzFbcXqi6vVB9 b7n23nIdLK5Nl+5PFMFbtxdKb84XA4DsT+YCgACP3Jgrgh04A6cgqiChAIMQ DEEGAeGm1f72SDoI2ARghBglh7IJE0y+NISR2ViYgAl6JYRHPpfidKsM2AQF eELY5DMwodlkrlECmm0Qz5jSpoxpk8a0iXoJaMwgHjWIR+okIwbJsEEyZFQM mpQDJsWASdlvVPUDmBiVPQZln0kz2JI+2pE72VM00186O1A2P/DZbBFCJUww Ie/aypZNmFaIrS1yqJjvkovRbUE2ATCBMxEZgILMghkT0qoLNjEyv0WnTsiw eGKI2LKJVX78Sy6JlQiVEO4gaGMlJl9YuSdWJPLPsgnpwcU0TYhwBy9jkhQ1 4WW1BfGEdkkG0ShBQiGQggbK3cPABEQvKAMF8QT05NrUk+vTz27Ovryz8Oru 8ss7Sy9uA6Scfnln5cm1xQdXZh/uzwGhfHx68ec3+7+8uQpIgv4CPMN//+gi rOGRHh7sme7J02vmOYwkC49RdDqjQeLkOyS0juYIKYuyDECknu3h5Z8+3vrr D3f//tP9P393h8yCJ+6JTeerfZIHISVk+MD/7ZNL6JuQmfVUTRoNJkBYCCbw F6EAuxBSaBDb/uH5tsUiIQbHDkmvM+ewMEvX0B5iNuNisonVWBNcH+VNjo6j 4+j41SNHEaNNCRHHefFDWXGBTvFBLgnBLItp4o6+iTDCG8TkESKs6SJUgjyC Z8oxSTPPhUe7BKgEp8MDpOjEEXCNmh+o4QdIoz0yRcFNBbKhuozh+qyROv2Y QT9t1M+a9PMNugWQSUcRSlNmgyYyl/ZN8uJcc2KcihJcy5I4xXynEr5Tuz5w pka03CCj2pnWpvUWxhtUAQUCtibypCzELiXIThRoJww6nhxkTxMKrWAHQYhD cpiTMMJZFOEsjHAURjgkh59MjXFOi3FOiXJMi3WSxrtK4lxU8Ww1LU0CJW0C W5fAyhBw0gVsikcSXOCcyWdl8VmZyVxb6flwMTsziQNnWKfDyyRObqqXRZ65 qR75qe75qbxyhU+1xt+QHlCf7l+n86lRe9WoPKmarpqYhYoIzMJ3ApIoWZQY bNKh5oHovIk1m9RnRU61Zfz9uxvv7p1rrlI3VqozFdHl6vAyVWiZKrhSHVKj CanVBtdqAv8nfBN45rfVoWxSL/cwKrxITRezT5dVt65DfZNDwYRYHsQ9oSq1 UpyqxS51MnadjGOQc4xKt0aNx0BRxFBJ5Eh5zHSdYK1TdXWy8P5K7f2VmrtL ACMVt+aBSiphcWO2FHbg5cFU8ZXxAhAsYBPoAzAESQTB5NZCyaFscm0q59pU NogJI7amCWhvLHNnNAOtEyQUgiRWtV5WXsmhVMIcE//ZpHjaKznTLrbSarsC kAQxBKu5iHvCZBO61oseetKQNmdKmzWmzRhTp+tTJupTJwyUxg2po3VpI3Wp I7WpfTXi3hpJX510wCAfNKoGTeqhBs2ASdtv1PQZ1QMNulMtWWMdeVM9RYt0 ZgRIZLYvD3kEF7ZswsQWW4RheihfH85oBSxIH2iakDou4Au0RZBKcOIJcVXg DDvwLhAKeRfWIFjgPbH6C65BnMEg/I6lgTDiCeERMqgR32VCxFc4xarmikkf VmvmxYeWbBFWsqrpsjJovsQmVtMYrWwU7A/MTKzAeet006WVxm0glPMd1y72 IJIwS7yQTW7vDN7bHrIFExC2IIYFuieP9kbvwj5wyo2ZF7c/sQmAyZv7q2/v w5P8aSCUR1fnn15fenZ1CRiELnnahud2EDzAY2UXuifAJuiePLv+GZtgFyzS zpc07IIz0zHBNVZwYYYdm3phDuWP3976wzc3kU1+fn8d1iDmXHjS/ArNFyzi wmks2FkLdrCHMKbgKUK5fhp+M/xyKzBhsMn2b5/TNWwWNmHUcW0TZ4Q0Osa/ 8XM82WaGSphsglRCNslL0L/6wefoODqOjn/rI08Vly4Olyb4JIVz4oOc44Nc E0PYQCXJ4UAlHsIIL1GkT0qUL0gU9amOC70SkFVXLkQSPOvSIhBMMP+OjgkK UEWbGq4ShijjfZVxPmlhHGWMR7WOP1SjHzdmTdanTxnTZ4FHTEAl2gWjer5e NV2vnWtIN6kjcmJZhYnc/HjX3Fhn9E3y4+wL4uxr07inimKXTNKVZsWcUTxc mtCWGVoj984TsDQRJ6ShduIQu9SQE6Lg48LgE0nB9oIge1ikhNinhTtKIp0k UU7SKOosjjwpj3UCyWIc5bGOynhnkDqepYlnac1UwtYnskDZSZzsJHa2gJUt cAXlCFg5SaycZDdbZSdzrQSbeUAlKV65Is88kUeeyD1P6JYn5FYogEf8jfoA E+CJ3teg9a5Te82Xha/WxgKbzJaGDmZ4AJt0qjmUaaKk2MSCJ19hk6jBOvnT /dnblyd6GrKbq7S56jhgk3J1GLBJuTKoQhFQIfetkPv8T/gmh7KJbU0XiGYT T5I0IXaJbRvhL/QQPoRK6CIxuA8PVZXKLkt2rkpzbtS49+QFDZdFTdfxT7dK Nvu0e2O516aLbs6V3l4ov7tUCbo1XwaCxf2VajjfWQQ8KccL4AwXEx1MFe5P 5pJSLnPt1lQesglhFrNmcq9P56BsIYWACVXuNZ61S+MJCBfERrFyT6zAZLNf fWGAKvSyFcETEi2hMITBJqfb0lBn2mQAI0Afs/VCDMKfbpVZmSawT73VmLZI sidGuD5lpj5lyiCaNIgm6lLG60SgsVrRaK2osyy5ozS5q1zUU5XWVyMbqFMM 1isH6jX9BnWvQdVXrxlo0J9qzhxpzSE8MtObiwVdX3JP4BpbwadQBG0wyX7o TEZbYEGsAACBM/FEEDTQ77i4YETcwGtQ8EH4uumeHFL6hTfBxD3m5YkFg18E 98EYyA4jcrLDmMZI0iW2UZSvOCmIDJg3wQ5gxPWAt0hDLSuWYbLJl6rLyCbp eGzFJrYREpz5TtgEnRTSH5gZUYEdYJMLS6aLyw0ETwBJDi504wLZBMDk9s4Q sIktmNAvYX+IVHaBHgKhHEyCHl+benZzHvCEJpSVV3dPA5vgcJNXd1aBUG5u jD7cngE8+eExUMllfIBH6wTYBH0TZJOnNJg8Plh8en2Z+CZoZ9BDFXfpWqYd DJLTz/Y7lqHq1MP5Lx+uI6HQufI9y/P/nqXvLsUmgCogzMUjm5BWXcxo+cen l3FGPJoayCav767hlJM3t1aZbAJ/Dv5F+KdhWdfvXuz9/uUVS02XmVBIcIb0 E0bawvouLPFiyqopMbNd8Oej4c3f8q9+8Dk6jo6j49/6KNQmZkoj5Xw/YaQb P5QFYCII41pMEyAUT8oxifSh9HnABNtzMZPvwBogs2NCR+Bx8CKTTfI0iSBY w1twjSzaUxHjJQ7jSMM5JbKI/krVWH3GpEE3ZdDOGNRz9ZpFk3a5QbvSqJus VQGbNGgi8+M5RXy3vDgXSjGOpUlsZJO86BMtmoCpquR5Y+qcIWW8kt+bH9Ws D6qSeucLWMoIO3m4nTjsRFoo8MgJYciJ5JATstCTsjAHeZiDIsJRFeWsiXHV xbpqYpzUMY6aGEdtrKMujhIsNPGuIG28qy6BpU9wTU9kZSS65iZzgCbyhW4F IhAsOHnJ7Dwh71DlAqQkceGcT2EI9TIvxStP5JmPbALXJHPzkjkUICj9DBpf k96/Id3fqPWpU3nOl4WtGeKXqqLmysKQTXp0PCab0HjyRTap0YUOG1X/77f3 nt0602XMbKrSVBeIazNjazNiatIjKzUh5XL/Mql3ucy7Wva/xCYkCM/MwpuU nnQ85FP4HddW1VzYUIvZqusrfboARgBJWnT+vXkRYxX8BZNktU1zaTAdtD2c dXWyACgDoAO5A6Hj+kwxIMm95SoQUMmD0zWwwHcJnsAF+BJ3bsyWIHdgHRci CUAKrskO6uZsHuiGhVBs8YQQyt54FujKRDaIrJFQEFIIp1hRycVBABbdoXhi xSZmi4Qu4kIwWWlNBS23pGAdF5NNVtsVyCakmsvCJqmLDSmgBRP1crZeNFMv nDYIp+qE4xaN1VLqKRd2ldEqF3WWp6K6KiU91fK+OlU/QIpRB+qr1462pcND PmIINu8FEehAAMF3CYZYiVxDHJYvVXnZsolVpRYSCrIJ0AQGNwA6ADQuzNej MwIXwA/uqhU3lQpG2/TwXWiyEIcFfsziUBFcM9WdDe+iO2PbWxh45CI9GIWy VOiOxPi0z6zvIpuHsgmBCxJRwXwKwgKp+yJsQj5iG3i34hFCJchNX2ETZlaF 2CVWbGLlrSCe7J5tBSrZPdcGurLeAVQCPAJnxBMLmwx9iU3ubZmpBAVg8vza FFIJ6OFVWMy8uL0IbPL63pnX96i58AAmgCc43wSe5B/vzt27NPloZ/bFwTLA CDzS45M8sU7e3joLT/vPLTPin988DSDw4dEmttvFB3vS2ArnLZJ5IthQC4S1 XkAof/p4C6+BHZyxiCSChAI8ApCCXYXpcfAHFkLZY4wL2SGWDXP2IvAC9Y2P qV+OJWoERtAJsgRPtn/7fBfw5KeXn3XoQgD5PNhidkBwSiPiCRo3iGboFlkR is0YF7N78q9+8Dk6jo6j49/6yJNH50gjNUkBadHuCUFOMb4nBaFsupOwmyCc lxzpIYz0So70TIrwTAMkifUWx/lI4n2lCX6yRH+Q3NKbSyEIVAKh0NKkRGpT o/TimHRpbKY8IVuRmKPkUwtlYp46CZSj4mfK4uECeUKAkh+YHMpNCefKot27 KzSjxtzpppxJY8Z0vX7elL5g0i/UaxfrtdO16vl6XasupiCOkx/jWhjPLuG7 FVCRE5f8WMeCOKfCeJc6sVd7evhSo3yqRjRWkTRWIejNizTIPUuTXTIi7UC6 cDt1qJ0ymJIq1E4TeVIZdhykjrSnFHFCE2mvj3VMj3PKiHOGsz7WAZQOO4nO GXyXTL5LRqJzeoITCBbZSa45FIxw8lO4Baluham8wjReVjI7R8jNS+GhCtI8 CiWe+anusM4VuaHggmyKaygB0eQnswsouYLKxdxKKa9a5l6rcDeoPBu0Ps3p /tOFQau1sZtNyesNAmCTZqkjgAm2C+5QcwFM2pTsVgW7Rc7u0nBANJu4N2uo j5u0vrX60PbS5Ovn+6+uD55qL6zME2bIwwoUwYXKkCJlcLEiqFQRWK7wr1D4 Vcu9quWUy2CQUk2AjRSecKg1Nv6V8VBGuTuc6WsomTFEcjiGfCEL70WTiIdB xqPbZ7GrUlkkt14vpyDFQFESr1bsUSfxhDPIIPXCiScVIla50KVC5Eqjhxsw EXyqQeXTqPYFSCkXugKVNGl8u3PC5o1p6126neH8/Ynig8nim3MV95ZrH67W 3D9deXe54u5S+d3l8jtL5bcXS+8sld1eLLtFx0ZuLZTcWSyD/funqx6uAp5U wZX0WyUg+Mi9lcr7tO4tV9yh3oL9wlsLhbcXi+4sFd9ZgmtKyBl2YB/ehWtu zBXcnqd0ay4fIQUFOwgsyCkILLtjlGNCqGR/MgeEL3fHMkmV14UB9flexUaf cpPqNqyGHdjHBD2zoxe8CyJdha1qugibEDwBGCEYQuq4AD3IAvephTF1rv6T ZlEGSjOUUqbrQKKpWtFQjXCgKrmvUtBTLugqTWov4bcV89vLRB0VaV3Viu5a VU+dprtO01Wr6TNqh5szJ7vy5/qKFwZKQHP9RbN9BTO9gCeAJJ8sFQIs8NhP xDRNrHp2MdPxTPfEKgtPQiXEFgHKwDgJzivB2i2SLoEFfGNrhRDYZLwjA76F sAleAF863KIFwc+DH4O5ePRNMAaO9wQewZTKFj3GEbMe8NBOrBOrdl62bMK0 RfDOQD1W09htO2sx/QukHgI4iEgU49ClZUxnB90Tck/8UuakEjJd0TZvYtt/ mPrZm91XN7uYJIKJ+OuXemGH6Z7c3/mEJMAjD3dHQY/3xp9cmXyyP/X4yuSj PUqP96YeH8w8uT737ObCk+vzsHh6Y+H5rSWqoOvB2XcP194/OveBGnRy/tun G98+2AAAeX3jzIOt6ZvnR+5fngIMgUd6eJL/cHcd3gJIgUd6WLy4eQbz5gAC 8HyOD/DogAAskPw70AeyyXfPtkg5E3l0p2eaXP/zd7cxCw9rLOhCNsHkO9LK H7+99efv7uBwxh9fUuPg4eMW24XCEzRNEBYATxBMqIA8bZQAgGD4HfT9o0uY PUEwsexv/2Sp3bIQCmWgAOPADQlWIFn8/ObqL2+v/vx6/7cv94B9Ptxbf393 /Qe427Mtc3fi5zu/fbH3u5dXmL2/yF995JscHUfH0fGrR54sKl8erUsOFFNs 4hjjay8IYQGb8MO49ER4niDCA9hEGOWFVGIFJgqaSgiYqJKDQemSOFCGNB6U KUvIkieC8tTJuaokEC7gLU1KlIIfLE8MFIbzUiJ4qRFu7aWqiabCCVPWeH36 pEE3U68DJJmuVs7WqqarVbO1mnZ9bGEcJzfKuSieU5LolhvtmBfjCFRSKuCA ypK4lSL3RRM1Bm6yWgSEcqokrlHtA0+/pUmOxXz7/Di77Gi7rCi7nBi7vDi7 HGCNeMf0WAc440IXY58R55iZ4JSV4AxnVBZgCN85W0CLDy8dMxMd4ZwjcMlN cskDphCxC1M4Ranc4jRerpCdKzLTSpHYvVjiUSz1LEjj5ae6wWaeiAMX5ICS WXlCVr6QBZ8tSmGXpJpVlsoCVYo5NTI3k9qrJd2/PStouijobF3cpdaUC83C U1leLVInZBMQYAjgCWGTTjW7UwPitmncmjUeJo2XUeNjyAwfb9L88HTjztbY qfaCqYGqNoO+Nl9QlRVfkR5VpqEru2g2qVJ4V1MpD+AOHs0mXCMDLj5NJ6HH kXzFFvkKpOAdgETgPwoNFFTfYFiQZr+wQMsDFpUprBK+a3kyp0II/2XhAnNB F5ALfhDoBu5ZmeJSluw4UBi71Ki4NABP+NUPTzfcW6q/u2i4vVANurtUfX+l 9sHpOouqgE1A91YqADRoPCnDHSs9OFOFwotRFK3QO/hB4Bpgk9uLFIBY2KQY eQTYhMYT81uAJxS/zH/CEysRPwUJZXsknRR0ETzBNWETONNZeCWyyUV6MiPu I7kgm9B9hqlrbIPwzLwJKegCNlloSMGkCZNQCKcQNqHcEwuJfEkzdSmg6VrR SJ3wVG3yUE1yf5Wgt0LQXSboLBV0lqd0VYo7quSd1YquahWASVetFiCl36gb bs6a6Mib7i4ATXbmTffkT/fAGWAkjzCILZtMdWeTt4hvYsUmzMElh4bimc24 EC6QTZBHUExCgTXcv9+k6KoVw5ei0QO3hc/igHi452ibfqRVB78KOw9jNRc6 Gvtr7Vt0qRgZyIhtvogxsUMjxrYlmYIYQiq+CLNYlW8Ry8PKHLGyNg4VhtNJ pRl+OzMCQ76ReXOrb/k6BzEbDqOrcmABE0Iihzbpovt0DTFMEzObPLkyhaKQ ZG/60e4U6Mk1ikee3VxEAZi8uL0MbGIGk8fr3zyhweTpBjxmA3qAnl9dAja5 fu4U4Mn7O+fQZYBHeiAUWP/4ZOsVPdMQ9PL26vuHG0AHf/jmOnoKJO7NnDZI 4iFY/kQyGgAXf/jmxp8+3kJC+esP1NDhP3xzEy0SxnT1zxIocEPM19uyCYmB mHuF0Wl3xCsAKyQR+ENAmDf5wQwvWz98GlDyWfCEeChkDguAyR/eHIB+eU31 DcB/MRJgwfQK1fjryeUfn+8wZp18pn/1g8/RcXQcHf/WB4BJoTI2IyUE2CQx 2CnO34FPt+oC0XPh3YBNRNHeqbFmKkEwsaIS4BG1MEQjCtWmhOlSw4FHQMgm ACl6cawuLSZbwc9RCgBMQLCAt2BTIwyXJQRKYn1SI92BTar1ghFjLmbhJ+q0 k7WaiSrFRKVsuloxWakAPAE2KU5wAzYpjGOD8mOdQcAmxYmsogTX/FgnQJXB gui5utSZGtF0tXCyMmmgILIvL7wrK7BV52OUu9VJWAYpy6jgNCjdahWeBpVP ncKrSsqrEHPL06gh4CVCV1SpCDCBTU8GB2pgFae4FotopbgWiVwLhc6wgP3S NHaZmFMu4VZI3CqkvFIxrziVW5LmViZ1r5B7Vcq9ymUeZRJ3EPVWmhu8W5TK KUrhlMKd0zjlYuqDlVJelYxXLePVyLhVEnalmFUn5zZpvdoz/TuzA+dKQoBN zjcmnTMmApu0KVw66LIuqiuXlod40q4CQuECm3SoqYx8q5rbpHYHuqlXe5cp /Uy5MT88Of/q9un2Om1dsThbFZkjDciTBxapQoBNytUhFcqAf4pNmGBSI2aj 6g4bswj7tmzSrPUDsgD6qBC5gnDICCbWcQIjPYTRBy5r0vi36oPa0oNBHZkh nVmhnVkhjWqvtoyAwaLoWYPofI/2+kzpkzXj07XmZ+danq23vtzoeLXZ+Wwd 1s1vLrU/W298eMbw+Gz9s3XT8/MNT88ZH52tYQpYA/TkXN2herxWy7ySQA1Q CQrWgCr3VkqtMOTmfAHhlM+0UIhiEgogCYissb6LWdMFVHJ1KhfEzJ6Q4i50 TNAlwSovJpvAu+d7Fes9wCMyWzCxZRP0TZiOyX+FTQiYgMbrhKO1yadqk4aq kwYqk/sqk3sqknsqU7oqUjrKxe2gSllntbK7Rt1Tp+6r1w6YcJR8FmikJXOi I3uyKwc00Zk12WUWE0lAuIlrxBNmTZctnnzdOvlH2ARLvGAN1wOVAICQOAzc GdkEewjD1+FPHWtPH27RAi7B3XZpNoEneXjax1uREi9iTIBwKAkOKGE2tiJJ eTLu5NDWW4cG5L8+HgUdE/RHkJXgJUZjmG2+mJ3EmCVh6Jigg/MVJMEqLxz+ DqKmLtJ4AoIF8VAQUrCaC2ed3Lncj/NNaDwZwbnwhE2eXJl+cmUG9fT6ArAJ 2iUYMwEBmyCeIJt8fLYJ+ua+uZkVMAjgyb1Lk4AnACmPd+fwYR4FT93fWTIX WNSE0EFDwbZV4AJ2sMQLkASufH13DYR5eXIZFoD96SPgyV0QLEgdF5Zyff98 5+PTLeAUxBN4F4gGhEPn6UHtF0mdFZluTwXzH24iO5CyLurHP7yAncewYg27 dX3/bIsxiMQ8joQO7G9h8zH8tZQZ9Obg51f7mFKBM+AJMWWIYBMg5acXh4PJ EZscHUfH0fH1A8CkSBWXlRaGbBIf6JQY5IK+CT/cLSnCXRjllRLjkxbnJ4n3 s3VMrMBEnxaRLo5E3wSQBKkEpUmJAmBB0yRLnoh+SqYkVsEPUvIDgU1EYZwM QUBnqWrUkD5mSEc2maxWTlUDlSjGy2UTFfLOjPgygUdetEtBLIs6UwVdVCIe wATZJCfqZL3Ubbg4drZOOF2dNF2TNG8QLplS4TxZlTBSEnmqOHy4JGKklNJA fthIScxwcXRvTkhnRgCoKzOwXe/XqvVu0XjBuU3n06r1aVZ7Nmi8jGqPeqW7 UeVhVHvWq9wNCh6caXngpknjRfkUap96WiaNbwM8gev84WzU+FL7Km+DyrtO 6QVMVCv3hAUtT4PSkz7D/T2atD5GlWe9gppO2KLz7s4JHCgIXayIWK2NXTXE r9TEDGV6titc2xSu6Jsgm9B4AuJ1UaYJNZOxTe1GsQntm9TogpsK4s+O1axO 1A93FPY05TRWqXJlQbmywAJFUJGSmnJSJvcrk/lUyf8J38TWOrEFE6aYNV01 YqorF9AHiC7fcqdb+3pa2ghTNV1NGt+29MD2DIpHenLDB4tiJqqSVprlG73p B1OltxeqHp6pe3qu4fn5ppeblL7d63t9sePFRsuLjVY40/st77Y6Xl9sfb7R 8HTdCGzyYtP08gKsDQAdcEY9O18PIi+ZguvhLYInwCDolYDoyq4K4BQAFnjr 7rKZTayE1slnWiwCMfGEEIqVb3JtJp+p67MFIMyeWEXjSSiexOTJYBTCJjSY yGzBBFMnBEkwbAJaaEihwyNCxBA44wRGkjT5FDmhSrnSrGQLJhSb1CaN1QhG qgWnqgWDVYL+yiTAk+7y5K6ypM6ylI7SlPYycVu5pK1C0lmt6DVoBhvSTzVl nmpKH2rUDzboRlozJjqzQWPtGeMdGcAgcEYMIVQy0ZkJIoSCdV9IClYD5Q/N xf8n2ARnu5P6LlI/RobRw03gLSQXZJOBBmVXrRgIBYgJPmgeg0LfB6u8mKNP iD7tWMwLMvGEOCxWI0uY1Va2IxS/1OmL6YzgD8PCMxxkj3iyvdy4zwAc235f BEm+5Jswq7wIoVy/2AM8sr/RSQgF1nvn2q+sd8AOEsqt7UHAEzJ7kR65OGqe CG9hk6f700/3Z826jtVc889uLhI2Ab2+d+btg7NonXz7dAPY5NuH1BM7CJ/n 39xcfbg9c2tjFPAEOAVo5Zt7G4gn7x9QIYuPT3GgyR5wwbsHG1hJhcl3fIxn NNc1p+OBGl7dOQsQYRXHoH0Wc+AdXRLs0AVrOMPmt08APbZ+fAm3ukLiKpaW X7vwA5BHEJFg8ebeuXcPzr+/a24gDMLgCe37XEb+oiu7tsw2x+Fh9h0yeBEX 8I1//ubmH99eAypBPCECYPnl9VWkFbgnvPzNq09zTz5PxB+xydFxdBwdXzsA TCxswosPdIgLcIwPcKLzJtwk4IVoCkxSY33RN0GZYyY0nmARF7KJLjUc2QRI BMGEWdkFLwFGsKwLFmipZMvilYJgdVKwONozNcJNHsVrKZCO1WeMGfTjtZqJ GjVV01WjnKyUjZZKAE96svlVIl8AE1BOpFNejBNhk+JEVmE8lY6vTHLszQpe qBPOVQtmKhPONks2OpUXupTrbdLV5tQzjaIzTSI4n24QnjYKzhiTlg38+eq4 uarY2cqY6fKomfKoqbKIiZJwWmFjRaEjBcFDReHACP35If0Fobjoywvu/UxB vbmUunNDevNCe/NDe/JCYd0DL/PDOrMDO7JAAe0Z/q3pfqAWvW9rVlBrZmBr RmBrun8L7Oh8QZ1Z/h0Zfu16744Mn77coPHy6Pl6yi45V59wujZ2uTp6ONu7 U031EO7ScEGWofBulvkmmDfhtml4zRoPzJtUagK6K1PuXR65eXG4vzmnKl9U nJFYpA4vUIbkywML5AHAJpWqwBpNUPU/7JsQMbnjH2ETcw9hun0WTh7BAi2A FICRVn1ARyb8Y0YMl8bDk+1Ks2JrKO9gsvTekuHpWtPTc01P1hpAby+3A3Eg kry62Pya1rutzufnAUyaX11ofXOpDajkw07nqwtNLy80AmK82DQ+3zDC+eUF E7AGCPEEwQQBxFZwDdolTN8Eq7yYO7SNYsaQeyul90+XPThTDkIzBc+fBFfS eMIkFFyjaQJsgjbKjblCECIJ4snBdB6c9ydzgFAAT4BNEExIn2Fmw2EUsgld zYW+iQzBhGmaMCPwoKVmEQjYBNED8ARHw0/XJeECd8jaFkyQTRBMCJtM1Qgn ahLHaxLHavijNfxhilCSh6qE3SX8rhJBV5mws0zUUZLSWixqLhI2l6Z11SgH TIAk+n6jpteg6qlTnmrWjbZljLVnjralEzYhBgpSCeyACKEACJDUPJkjj2zy pcmMZHb8P8ImOA4emIIMNCEDUOAmcFu4Pw6OB+iAr4PfM9Skbi5LaqsU4W+G C3BYPH7cikeIyD58HVyPwljKDu1o7FgMlENnuB86wcQWWEhAntmbC9fE3MG/ F76aeCXMEjIMyDA7CX9pjKNtxRcVdblAlXIxy7pAwCa7a21wBk6hR58M3t0b pnsIm00TBBNakxYwmXl2de75wTzoKQ0mhE1QyCZM6wTw5PvHF4mhgEVcr2+c AUJ5emXh9ubYjfVhJJS3t86+uEkNEIGHf7rYCUgEU947lkjFNsmDwMM8oAR6 EEgrdDLlCg46wSEglod2avg70geZt/j9c7j5PuLJd8+2cXA8du7FejAgFPom u5iCx1Q+zUrnX99de3v7LPxaHA2P4xcxNYO9kdE0ATABsvjpxa5try0sSCPW zLdPKKT6y7e3/vLNTcQQAJA/vD0AVIGXsP759T4ukFB+8/JTZp8Z3j/Kwh8d R8fR8fWjRJNQoIhBNon1t4/xtY/1c0DfRBDBS6b6BnuDhFFeGIS3ysIjmDAL ukAESYBBshV8Us2FYRNm3iRLGqdOCtUkh8jgttEekjB2Q07qSJ1+1KAfq1GP V6umalTT1YqJCimwyViZdCBfaJAEFidwC+PY2RGOBXEuwCP5sU650Q6EUMoT TrQq3afL4+YqE6bLYs+YRJvt8t1+7Xav+mKXfLNdstEmBm22i7c6xBdaRBtN yZvNQnqRtAYUYEqE85ox4Ww9KH7VEAdaMCQu1CXO1yXM1ybM1cbP1cTDeboq xqzKmKnK6KkKSkATExUxIFiMlUWBYHGqKAw0VBg6WBAykB/cnxdEqTCiD1UQ 3lcQBtQDGi6OGCmOGC2JmCiPmqtJAIba6JTtdIjPNwhWamJAo7m+3YAkdA/h jk/DTbhfYBNvYJOWgthqfejlxZbLS+3dpoxOU0ZlnqhQFVaoDC1QBAGbFEr9 iiXexWLPKioL/59nk0PFrOmC640Kd5PSoy09EB0T4BEgkfFKATzKrrZpznen A4xcmyp/sGJ6udHxfqvv272+Dzs9by93gt5cakfoeLnZ/GKz8eVm46uLTa8v gRpfXmiAt15daAFseXsZFs2vL7XABUgliCQvLwCeAIzUIVYgegCVALOAmLVb ROiMIIng9fgRdFVgjWxCeyhlBEkerlagYAcFeEII5d5S8T0bPLlP7yOeoABY CJgAklydysUsPGGTvfEsZBMQxlKY/bsInhDrBPMmttVczBQ80z1ZaqJmmoCA UIBBpmoFwCagyRo+ruEMa1h8nU0ImNBskjBeEz9OnYFQBKM1ySM1yb1l/J5S fndpcldpcmdJcltRcmthcmORqLVcAnjSU6furlV0VEnbKyUDJvVgowYIZaRV P9aeThiESSWwT95C6wTxBNtk2eKJbWXXP8Um+JSObbvgLRyqCAu8HoPwyCnw pRh7gTP8wn6TAiBlpFU3P1CAuXi4GHBj77AhicTIIGyCWIRkROa8g3YtCRTb cSf/IJ5YDW0kYXaSryd4QtoIW92KySPks4fmWQ6pPdvowgouEn6n+nRtdlO1 XnS5F71DBeSxTxcJmwCeUISyN4Fs8uzqLFDJy+uLoGd0QRdJmoDMw03oLDwB k4/PNn96tgWP6zhIHQ2Ud7fXcAGQ8mRv/u7FiVsbo8Apr++cpUeZUOMI3z/c eHt//e398zishH7C3yEVUGSyCUAKOh1oeZA1ef5HHkH35Eeqa9Ye2iUgNFPw LeAUbOQLHwE2+eO3N/FWOHsR2ARnrMAPo2iF7ioGfwWGZWDxjp7G+PHBJukn DGe6/mqHOScROQXtHgJc6Mj89uUu8Mgvb65SXsnrfQATCk/eXYM1jnH87fNd uCFVKmaJ3hyxydFxdBwd/9QBbJIni8pMDQU2ifY9EeV9Isb3JDUans6bJIRy +eHuGIdPjfGyatUFYrIJ4gkIjRKSgkdCQSop0IoKdSn5GiHsoG+iFYWrk4KB TcRR7skBTlWahOFa/Xh9xkSddqJGNVmtnK5WTlXJkU2GClNM8pBSPq8ongNs kh8LPMICKgE2wVA84ElBhF1tkmN/hv9USdR0WfRSbeL5FvFev3anV32pU36+ JXW9WbTRmnqpU7rbmbrdJtxuF+52pMBiqzUZzpsNCReaEi81C1CXW5Jg81yz aL0lZb0lFRZnG4Vnm4RrzaIzJsFpIx+0Up+4bAAlLNUlLBr4C7WJgDDzNZSA Ymar4gBeKH4pj54sj5oAWimNHC+NOFUaDRouixktjx2viJuojJ+sil8yJS+b hCsNwtXmlHVgqA4p6GqvYqNBsFwdDWwykuMDYAJqU7i2K1ltSjZzvgmp6Wpl 1HRVagLbSwTwv+x7OxMDLbmmCnl5bnKROryYUmipOgSz8OVy33+8psuWSr4U ga9OYwGe0C2CPZq1Pm3pAe0ZgX35kRNVSatt6u1TBTdmqu4v1z9ebXp7qQdg 5JudgY97Q6AP2/1vLnZ/f3Xgm92e99tdH3a6328DnrS9udT66kLTa5pKXl0E PGkAAZ5QPHKx5d0W8EvL60vNH3Y73m234lvUuxcBUgBMap+u1zBNE6zygvtg tMRKpGSL4Ax+CsGEeCv0uoro0dlKgieAKgRPsOjrnkVMPAE2QeE+mik354tA QCjomCCbAKSQHApaJ5hAYYZQrKwTkogHMdtzETax4hTL7EX56VYZzlvETsLI IxPViSAEE1jA+StsQqq5kE3GqmLHKmOoc1XcWFXCaDV/pFowWJncV5HUUwZs ktRZmtxRDBI2l6Q2laS2lIk7qmRdNXJgk9bytN56BajfpBpuATzRjbbpmVRC wAT2mXhC2nYx2eRXK7v+QTbZWWlCNsGWXFtAB3THLcy/I0TAPtwKvhowBH4G VnnBDwM8gd8JO/AD0Gqh4ieWXli2c+GtBjJSTsqZFszIY6EXvjS3I7aEUPCx n9gfxOn4CptYzVWEM7b8JWVju/QPOHQCI7ktE0y+wibWlWCMjAkZB09mL6Kl ApCyf77zzuVBRg/hEdSj3YnHe5PIJi+uLQCYvLqx9PzmIvIInBFPXt09zUzB A5V89/wC6LcvdrCUC7sHwwM8Psyj3QDnl9dWsMrrztbUsxsrwAhoi8AT++OD RZzASCInSChYf0WmmQBH/OX7O3/+7jZgBZkUj34K8UpI/h2TJu8ebH54dBH7 CQOYwBlLrQibgP708RbeB2gC8ybmySMPNoFE8E8gC/yj4C9C6wTTKD+92GWO d0dOsbQRNo+5Nyf6aecFOw9jKRep6fr51RVqjCOJ2L/YParpOjqOjqPjP3FU ZggKFNEUm8R4RHjZR/s4JAa58kO4iSFuCaG8hFD3xFAPED+MnmxCDzcRx/tK AEwS/UGKpCC5INA8eJGGFLROMiRROYrYPFV8rjI+Wx4DL4t0giJ9UpEuqUDD z1cngGBRpE/LkQu0okhZXIA40istlKOO9TpVo5+ozxqv1QyVSiaqFJNV8oV6 7XhF2mhZSk9OXE2ad16MU06UQ36Mc2E8GyClMI5dEMvKB8VQKot3Ko4+bkrj jhZEzlUkLFTFnzUKr/TId7ukOx2pOx2i3Y7knfaknXbBbqd4t0uy1yXZ6fj/ 2XvP5jau7d3TylYWc8455wiCOeecE0AkglFipnIWxYBEglk5UZlR2bZ87HPu nZmq/6uZzzAfY9buBWxuNiAdnTv3X/YLdj3VtdFoAN0su9w/P+tZK0YridJI InVSstdKo6h0suhpWbSuPVariAFp5NFqeZRaRkTWsiiVNHJKEjHZFj7RFjYh DhsXR4yLIm6LwkHj3B401hpG1AIKBd3idKMlHHQTSKc1YkwUOSaOui2OUisS NO2gRK1SoOvgpEyc64ibEoVcr/O5Wuvdl2ujTDlBkibJOMrEUpFsKRcSyZIs lUnHQXIy8cRCIrRuTbFtSbFrSHfrqY1dHu94sXBuqL24sSQmL9k7L9Eln8ub lAhdSxKdyhMdqoVO1Qk2tQLCJrUxJ+rjTjSCYo+TNRlceKo2FhZkCklrsm2j wKI27lht3PH6hOM1MWSaYUPiicrIIzUxeI5Nk8CqOvoY9vhtS3PoKfKF59XJ jszFkYpHVxqeXGt6fkv8dkqBPIICKkG91/eiCKfMtb+blW/pZVszMmCNdV3b mla8Md0G4tYi0LqOHAEwAWxZ10rXteS0dR3ZA3RwbAL00fxW3fRG1QjizBQD knC2CxHihkkQvuHF7caXJKuyzSPcWwApRC8n6l9NNoBg/fx2DYoSCtoorHVC Kr6M1glPlE1oodeDK2Wge5dKKJ4AmOAebRQ69wR7CyOqIJvAnh0cT5sJT3QK MBfPRuPHO4Sg28qksfakMUXSLYXgllxwQ0rY5FpbPA46AfG6CjNh+SgUdyT6 QlMUp2gyhJHDk5GacEBR0GBN0EB1wEB1YH9VwJnKwNOVgb0VgT0VQd0VQR3l wcqywPZSIkVpoKgkuLU0RFQWJi6PkFRGS6piJFWxspoEea1A2ZjSI8o8I83r kxX0yQr72rL620heflCaMyiDffaAJGtQBiLVX0NyAi/fadsFXMBOjceECE5O xEnu7HwTto0whtapb4IYggfxCL5LhYSCvwVfDhfQ15aKMRn4UWq74DM/Rkjm uAg8lmlRQkFIYf0UAiNXWwmkcHbGNNf7i5dPx9Iv/CoWDeiaYgjN1LOzVCiz 0Lkq8BO0jgu9FQyM8L4Nf4JlEOqq8AIphhkoUx3Lk+1LcHyy/Y6qg3upvKfu uq8hgsWdKeUi19YMh8I/0HTfU3XdV/c81J4mBsrMoBFPzqFvwrHJFUQSWs2F WXjAE2zPBTK06no+sfV0bOPxzY0nt7aejoM2noxtPhkHbTweX380vvZg7M29 G6+Wr726e/2R/txdzdDK4pX3zzVY/rTxZAIEbIIYgkFy2COAwAIe8rGJFhAK JtmpmUI+srX868bi59W5L2vzv24s/bq++PmNodAL9Cs89q8u/AbYwkEKl0NZ 5HyZBa5z17xxXONdOALXAFf1bkX9gYu9I2dhiAbWaJ1gJ2EMyBNCeaEFrqGV ZnhHNAiPQ963nqm4BsWaD/Dlz1Sbjyc2HpG/DGjr6eT7Z6oP3Fugj3CbgDOv tieeUCEB/dUPPrvb7ra7/a03ZJPMKLc4P2sv6/0+tgeDnI8GuyKbWAYRMLFG 0cGLPDbBwYs4bzE9lgyCT4l0T4/xyk7wyxUE5CUFwD47wbcoNbQwFagkOF8Y xB3xy4r3zYoPTov2F4S4x/raR3lYRbkdj3Y7JiuIPV2Vcroysbs4erAyYbgq YbQ68Wxt/GBFlCLLpyrSMsd7f473gaLAowgmHJscL/A7nu97DFTqd6DIe09F 0KGOdOezZQHny/2u1YVMy2NnFLFz7dHzyqi59og5eaheGgTAMqtMABFsUcTB Od/STEfctDIWpWsHSIkG0QVIIwdUAWCJ1LXHmUqriDWVWh6HUslip6QxKCAR 0HSHYKYzCaXvEs53xKrEwdfrva/WevXn2ShTT3JBeAtlqmV7qpUixUoutAIw IWwiOKFMOiFPMrCJKMUO2KQ4xqq9LEx7sWXmmqxPmnf+dHW3OFdWk9hYGFae 5lUscClOcCxNsKtItK9PcWxKdWpNtgMAaRZYNSecAjapizVMbMegekPCqaqo I01JFnXxACYnmoUWTUkn6+KP1sYdAQYB1cQcLwk5AOcosl2vihNWbra8HBe/ npSsquUbOuXWTOc7fRfsN6f52poBPOmCd9/pu9+DZkE97+cU72ZloC29dHNG glRCF1RwZHNabtAMSIYCbOH4pWWnxFRGipEAqiCz7NBk66uJFk7NO/Py9S8n 6lCvJgFP6tGR4eEJ+iY8PKEWiVlR34ToStn9y6XAJncvFtPKLgopyCaIJ1jT xRscP9mVROee0EZetLjLCCk4UD55oiN5XCkcVybfbk8eUwhByCY8sZxCdbkV wCQSdLE5kg5kJGDSEIWOCWWToZpgDk8C+6uDzlQFnUY8qSR40knwJBCkLAto L/UXlQa2lgaBRGUh4vIwcUWkuAIIJR4krRG0N6R0t2b3iHPhn+QBad6AJLe/ Lae/LZt29OqXZGAyBTt6sW27EE/Y4i7KJsAIuGDj8HS+iVk2QSrhiYIJJsdR CCyT3MRGpB70aODXSbMvLqiCdgztx8W24aKTRJBTsLIL22exv0IZhCUL2Ouu wL/+ItphGAEH36U5ERYl2AGLlFl4sx3Zii8QgAmQAvVoKEaZWjaIJGwxGOuw mIblAUNAJClv9F9gAb/1kIvDPyQGSp+xrGsY2MRY1mXIm7xkCrp4YRPaSRjY BLT5bGzj6U1OpNwLhWMZN59OwmM5mbT+6DYIR7G/4ToJwx6g418f7mHanZZy wRpOg6dx2kkYT/j4UmsMvxvKvbBP12+bS79y+mVj8cv6wpe1hV/WFn7j3BPU 72sG/fPdXRx0gqPk/9i6g5F5OAgUQ2Mp8NYHY+tjtH6QU2jwBK0T9Dg+rKjx wqjRA9D05c0MwhRGWthWYBhvefvgFgr+MnCEVpThuEYUjbGwYZa/+sFnd9vd dre/9VaZEVKQ6JMR6ZoQYONtc8DTap+f/SHCJq7bbBLiYQPiDYVHPEkMdaaz 4DPifbIF/qC0WO+MBF9uHHxgLpCIMAgW2YKArEQ/OA5Kj/OB8xPDXBKC3WMD XKJ87MM8rEJcT4Y5Hw53OlQc6y4vjussi+0sie4tixmojD9dGjVaE9dXGi5J 8ygPO5nrcyDP92BJ8HEMxRf4Hc33BR3L8zma630k33tPoe++Ip+9TTGnzuR7 nyv3BzaZEkXpZHHzHfELnfHzymi9PHxaGjLXGTfbEatXxsx2xM13Jcx1xuuV sXDEVMAmpgI2ocACL/XwcfjynqT5HiFPs10CfWciT7PdQkCPac4Z0SjikVO0 7QmUTYBKZruT53pSgE3UbSE3GnwATwbybTvSTmEDYWWKpSLFUk58E8ImUoGF WTZpSHeXFAW9mBt+92RsQF4oqRGWZATUk/kmAcVCt4J4R2CTyiSnmmRnrOki s0VijtfHnTDUdHHT1UE4fKQ2lmvJlXgS1Cg41ZJsKUq1akkmQ967C71V3ZlA Ih/nez8vnvm0cPqX5f7NaeW6th2o5J2+88NcD7wFe2CTrZkOnuAEAJP3s6Du D3MGfVxQflxo/zCveD8np5CCMAILFKLKO337+1klp/b3cwYRZpmBk8WstvQy Ci8b01IUByl8cfVj4jdToteTBnJ5q27FAMvrqQakEpZNTPEE67sQTwzReKNL 8uRaGejp9fJnNypQsH7CGCsPLpdSNkHrBLt10RIv2rALbRHapwstEjRHAEPY gYysh4LMQubFd6VMdaUCnnCEkgJ4ArolTzIVAAv1UxgzBZAkAnShKYJm58/W R4zWhSOY8NiEhE1qgvtJQRfR6arg3srgrsrgTiOhAJ60lQaISwLFxYGikqCW kuCW4pCW4tDW0ghReZS4IlZcGddWlSCvFSob0xFMzoiyTreSdl6oM+J0wBNg k5H27f5d6J6YWifUQKFsgnhCa7qQR7Cgi9Z0mSLJ99kEsyHwlA40gXQzfbUV vhynNOJwRkAVrDTDkfRwzixXqYU+CFugBT+Bsx0xDk+phE5mpIVhiAb4Lks3 yB1sOAUXSA2YKJlh2ISdNY/fQ89n223h5dGfZlt+8fCENwAF2YRtPkz9FF6f YXa4/CNdL2kdPD8Mon26aBYe9WL54gsTPAE2AULB+i5MnYA2n90yxyYTyCYU T1AYaYfncMCT50tXVh+O0YnwWKOFGEILmehb8Jz//rmGG3QyTa0E0g0YtLn0 9d2d3wAK1hd+AR7ZXP6dq+MipVygdYP+3DKwyadXM++fAwXM4PrDCx1t54W1 YWQYIteVCzCEhk1YVMG5J6D3XCUYV5amw5T9P9/fRfeHzovHcSd4Go6hx7+J oSeYsZcyzojnPjVtyibYoPivfvDZ3Xa33e1vvQGbFCWRmi5hiIO/wyF3iz3e NvsDnY8HOp8IADxxs6RsEuFjxVoniCcJIU7IJiBgk5wkAiCZgsCspOCc5NC8 1DDYZyUFZSQGCKO8kiI9BZwSIzwSwt3iw1yjA13C/RyCPawCXE4EOB4NcjgY 7HBA6HeqOSesvThKXhAmzQnqKolQ5Af3FAa3Z/s2C5zKQk8AmOT5HioOIm2E Ubneh3O8iLI9f87y3JPvux/wpDLksDLd+UJVyI2mqNstkWpp3FxXwkJ3wpwy ZkYWoZOEzrRHcorSK6PnOmONAlThiwIICjGEHpkFrulOnO8RLPSaAZNvs0ky 0AcICQVFfZNtMOlNXeiMU7eF3mz0vV7vM1hg15l2qjPdUpli0c7l34FNEEy+ xSZNmZ7N2d5jg9WqC61dLZl9skJxdVKR0KM01ask2b0wwQnYBHsIV8Zb1wps yYSRJJtmgWUjgEn00dqYEwAmQCXGtlpWbWkO0gyHnmKv0brQ65L42cG8F7eb OCjo+LwI9NG1NQMkooTFx/luWKPe6TvezwKeEMG7poKPc8JzuriPd31e6gB9 WtwmFBClEhZPjGCifD+npGyCLLOlb9spOQMmEvRNKKTskE66riUJl1WSYTFU f2HCxVge1oCQQtmExRMU4sl2It4cm6zcrARRPEFCoWCCbEJz8RRM0CihMMIr 36JdhbHEC40VNoTCFX0RqbrTQIAnk51AKKmAJyB0T3i6KROwbIK+CWUTDk8i UZRNKJ6Ahrg+XZxCBkgWnohjkyAem0hKAtpKAsTFAaIi/5ZC/+YCoqaCIFFp eFtlrKg8pqU0SlQeK+daDXc3pfU0p8O+uymlpzn1jCijry2dWie84IlpZZdp 5y7qnlDrhMUTmjf5FqF8xzeZ5gwRzaUmHIwC3w8XBleF14ORebhOWMM1wE/D B9kR7dTdmDGmWvC3sKaLDkOh0EEhBWP7emOrYepoUGpAWsGfmL0pQUsI4zOs 8UG/mS0to725eD275nbm+k0DL2ZmLxpTLRRYkHdA1Jrh1LM0Tt59qO15qid9 up7qB7i8ydDKLLbqMvTper106eUdw8hFyibom1CtP7mFuXgOSfhssvFknNME K+4hXINP4IAnACaAJy+Wr8ICnu05T2Q7/W0chj5DMQRbadFBjWhVAJv8woig CmuaML4Jpk7+5NyTzaeq1/durT4cByQBPOE6DG+Plf/KxUC+vp79vELGwbOO CWUT1HsONHAQPDYBw0oz2IOwTzLACNwguiRw2gdmyAuKTn7EmzXLJkg6f/WD z+62u+1uf+utIj24JNk/N84rLcI10Omw68mfPCz3+tof9nM86gd44gJ4YrBO wr0tEU+odQIShLlQNkmL9cqM982I80mLD8hIDM4ShmYLQ9MTg4TRvgnhnjHB rgYFuYDiQt0TI7wig5xDfO38XE962R/2tDlIkvh2e8OdDxbFudWn+danejck e4qz/OqTXFuFLqCGePvysJNcYy4ShM/zOZzr/XOO16Fsz0NZHgalue7J9tpX 4H+oOOBgS6LNueqwm63xY6JolQyAQjDXlajviNHJIzSSMJ08HNhktiMaNd8V u9gTT1+y0rXHoEuCYAIwAqILCibfYRNT6bsMJVsoIBEQEgocp2BC2KQrHq72 VpPfjQZfwibpFjvYRPhv2KQm2UlWHHJ/qnvr8c3rQw1t1Un5yd75iS6AJ8Am JUmu5ULXyiQnYJPaJPs6gR03XsSqMcGiIfZ4Q8wxHIYoSXfqLvQZrAy90BRz UypcGCl+eqPhzVTbWxUxFzZ0pDvWuk76brb9w5xyc0a+MS17z60/L3V/We75 stTzcaETjrwjpoYSFzzB8Q9EHR/nOS10gj4vdfLwhHooiCSwhzVhFvgSPSfy bQqUEV52sInRKDGkV1DfYBMZiCsVI2mXNS0hFGz5hWBi1jrh4Qkt7jLgCWeL IJtQ04RlE+qe3N/pmyCb0GouTJfQ6fC8KSdwBKMoNCZvNimvOU2k7kkHcXiS NtmZBngCosVdPDZhi7t4NV0cpEQZh6EQ64QNwnN9ukJM2QTAxLSmS1bqLy3x ayv2ExX6thb4NOf7NOX5NBcEthaFiEoixGWR4rJoESdxWYxim1BST7emk5qu NoInHKGQXDzbs4s3kJGXjkcwwTUbikc8YdmEdspiUQVllk3oaEUMzsP3wEv4 WjrIHi5p4lzd7dEa+HW4KoAj+Gk4kzzho5iyLiy7YpEHH/6RFChBGFLz18V4 2dOMdYIIg2yCJyObYMp+2pjxx8n1eA5v2CIvk0K9DwQNNmbCqwcznRpP8YSX YUGxdgnovroL8ATzKXD8vhpQpfeh9jTsH2n7HusGnkwPPtOPvJg/byjrMino wrwJ2iWbz27DAtt2rT+5weiWgVk4NkHfhD6EY83Slzczxmf4eTgCD+04LB4e 4OExHpsGY3wDn9KxYoq6J5RKUF/W5oldwoEJren6ypkmBuvE6JtguuRfH+6D AEDe3B97sXT93Yrmy5tZxBas74LTPj/XcaMVp+nIRVMhpLx7OkXvES4eCIvL 8pMEyj/f3+Ui/6T78dqj288WLq0sXn597waXPVHjn8KYmsdqrunvsAmHabu+ ye62u+1u39tKUwJKkgMKEn0zoz2CnI84HfvJ7dRPXjYHve1+9nY46usEeGKB eBLmbYl4wlZ20bwJCjgFFBfukRDpLYjxBcVHekWFuIUHOIX6O4QFOKLgZWSw S3Soe4i/g7+XtZfTMTfbgy5W+zys93jZ/ORvs1fgd7Iw1rEswblG6N6Q6lEe a1cXa9sscALVRFsXBR5B6wSohAOTg1keBzPdD2a4HQAJnfakue2FEwr8D9bF WA6XB98UJY5L4qfkibr2xOmORBJsl0eppeE6RdhMe4S+A/AkarYzar4rZrEn DtZwhCddezRlEwojZrXQm/yDQhjhidIKyyaL3QlaqYFNhgrtuzIsuzKsCJtw vbkAQ5BNJImnzLIJQEdbQeD8DdmLhfNnu8qldcmNpbElKV5FSe5FSa4lQsIm 5YkOpXE2NYm2FbEWVVHHGuItpOmOfcU+l+ojbrQJpzqzFkfg+Vm0plZuaJWr avm6Vr6mkb1VSd5MiYFNtmYUoFeTTfCQ/2Ee2ET2RtUCD/Ow3tIDRyiokQFH Pi500Jes4C18F/VpsRP0HTZBPMHF/wKboGlC13DNcKk8GcGECOu+4Aa5USkG x4QK2cQsnrCdu55w9EGLuBBJqHi+iWnehG0mzIbf2YGMKFizeXkaRTHpMMyp N8OIJ+lTXemAJyCzvgkbQsGYPAcpMVdE0aDLraAYEDc4nojtJMyyyWCtoaar r5qYJqxvAmwCkpf6ykp8pcW+bUU+4kKf1nyfljyflgL/pny/prwAIBRxaQRA SnNhaHNROOCJvDqxo17Y3ZTS25LWJ87sE6cjm4AGpOl0DAptKUytEzovnmUT OveExRPaqgvBhA4l+UE2mcY9TlfnZiziaTgGBadDopkCwAIHafqezjFBC4Nt qIVNuqa5ei2aT8FKKhQiBo6GxK5i1P6gRgZvmgmd54i3YEjl7+xLTF+iY4LX A6QA1EBD8bQoi9e/i+1OTEc0UkjhzUnBj3AA0oWOCSwolRiBBRYGPHmoOfNI 2w948nRmaGXWMH7x5R2+aYJsQgcvIp7Afu3x9dVH1zhtGyscmBiSFOgLYCtd 7OKL0Qwu6q4HQoGDL5avPpm78PLONQ5P9DjBhJommDFBM4LGOjAOb7BLuMVn wJnV+W+xCfAIRuD/+f7eH1t3gEpe3bm58QSIaRp4hHYb/uXtHOZNMAiPLbmw K9c2khjTKFvcHHns7oX1WnizcNn0InG6PdwasAkiGNaAUeJA4fgVZs2v6YKD f/WDz+62u+1uf+utWOiHbJIV4xngeNT+8E8uJ37ysNrvaX3Q0+6wj8MxP6eT iCehXpZhO60TUHywI63vgpeALbAPDXAOD3SJDHaLDHGPCHYNC3QJ8XcK8nUI 8rUP9nUI8XcM9XcK8XOEI/7eNj7uFp7Ox9zsf3azPeBhs9fT5idvyz3RHj8X xTuVC1wb0r2b0r2qBc71cXaiZNe2VPeGePuS4GMAJiCgEg5MDmS6EypJd90P SnTYk+KyJ9t7f0HA4bpY676SwFsSoUohVMkFanmCVhGva4/TyKOnJMAmoVp5 COxnlOH6jojZzshviQUTtEgWTwtRnFciAFpBD+XH2WThdBoI6QMwBEu8WE6B g6glI5vcbPTbySankE3QNPkWm1QLHWXFIU+n+z+9mLw6UN/ZmtVQElOdHVia 6g1sUip0q07zFOX5d1ZE9NVEjTTG3ZKl6vsK74yWP7xYtXKt/u2UYlXV/mZS /mKs7dW4dFUlBzYBMFlVS3HKIVY9cSNFSEffzRnyDP9G1QwLIIsP86TRFuj9 HGIF1mUpTAVnAn1wARPlp8UO1HfABOu7tl9+o6aLk4QVRQ+KMCw9sQLgIlSi k63rMJAiwb7EcHdv1U2gVU0z6ltsQlMnKMCT57eqXoxV82QKJo/JMJRyxBM2 C2+2TxcepzkUPM6exjYZ3tleGJVhxJMMVXcG4gmQyLfyJjxda4sDPOHEBuTj LrXEXmyKZfsJUzYZqAkGKjlTxSXiq4JB3VUhICSUjvJABWETH1mxr7TIt63Q V1zgK8r3bcz1bsjxaszxbczxa8wLaC4IaikMaS4MbyoMby6KaCuPba9N7GpM JoTSmnJalMqVdRnGnSCeUOuEDounbEKHudPICbIJdvcFPAFYMM3C/zibYHdf 6nHoOXAAWMDJJvCjcDEqztqAH0KnBmkIsQh+CJCBtsmingjt1kVHycNLnNsO L4Fr8IJx3Dwt30I+QpOF1ndRw4Jk55lLxbfQUuE1N6YQQY0P2nELD9JgCB6k Mxkp1NDP4mkstlCThRZ3IaE80vU+0p2GNeIJd5DE4bFPF1AJtup6PncO9YKb usjmTdiaLiAUOhcekOTNgyucrtIpjWuPx9A34eEJPGajA4KiLz+9mt54QmLy oLcPbsEap8CzYxbZvDn27CLexPu7v20tbxPK+uJn48QTotWFr0Z9eKHD2i2M wL9/rn197xYcBG0+VYG2AEMwDv9K/8sLHZ1jYmjJxRkoyCbbw1w4NsGKLMy8 481yAfkZesHcIJUZHOzCVnDRWA1CCg3Cm63p2u0hvLvtbrvb97fCFL+S9KCc RJ/0WPdA16P2x39ytd7nbLnHxWqfm+0hT4ejvi4n/dwtAzytgz3sQKFe9mHe DuE+ThF+zqBQb4cQb4dgH4OCQL4O0cGeEQFu4X6u4f6ukQHuYX4uwd6OoT7O IT5OId5OsAYFeTkEetp7ulp7OFu6O510tv7ZyWIfsImH9R6Pk3sS/Y/XZnhX JbtWC51qU5ya0t2akl2k2T69ZWFNQucMr4MZXvszvfeneexPdd+b7LonxXVv ius+ofPeJKc9Qvf9UbZ7BC57s/0OVsdZnykNvNwcN9UuVLUL1e0CtSJeLYtW yyKJ2kI1kjCtJHxaFjmjiNK3R88qY+Y6Yuc64uY7iRY641Gzyjg4ONcZPw9s 0p0IAhgxsMmZHVruS13uS1s6k/pvtdyXzimNOx+VOt+TbKrFrkSVKHSyNfR2 U9BIkVN3ulVHqmVr/FFFmrU0xVIstGhKONkqsJCn28sExwFMJIknpUJrWYp9 c5Jdk9ChMc1DnBc4MdSwcf/GpdM1Xc3ZTSXx2fHORcmeRUL3ygxfaUX0+GDV zIXGu9dbHt4Sv7gteTNF0GNNJVknjXkVIECSN1PSN1MScpw4Jm0AIzhShNRE acisQ+6BX8a1/DUsuC5bCmQT7vkfEYDigGKnb8JKabRRFB8X5B/mQQAj0nez UooY8PL9nAyOG4WoIsNztvSgts2ZbbuEwZN/gyTbmlW+03OEQqrUDA7LmlbE 9SUmSIKEQqRqfDPV8Gay/vVE3avx2pe3a4A4XsIC19xL1POxWtTKWM3KrZpn t4Bcqp/cqHpyo/LJ9crH1yseXyN6dK2Chk1o5IRWdtFEPE8ss6C9Qnt5GfGE aLo/EwiFVHP1plKpelKmupMnu5InOoUgTJ1gLp7nngCk0OAJ6IaMm94oibna RiY2Xm7FrsLRXHFXFNewK/JcPUmgDNaEDxCF9VeH9YGqQs9UhuL6TFVYb2VI T3lwd1lQd1lge7GvvNBHXugrLfBpy/cW5fm05PnWZ3nVZXrVZfvUZfvW5vjX 5QbU5wXW5wXV5gTU5QZxBkqUrCoOCKWnJbUX1Jp2WpTe35Y5LM8dVeZj9RQ2 7EI24fXsooNO6IIddMJrI0yND2zVRYGF7R68wzfhGmrhQYQIcoQzUOCzyCNY 00WvAd0TFMLFDDfHhA2Y09qtGeNIROwqjM6Oztjl2BDG597FZMq0MTvPIgaC j2GCCfcW7Q/M9tHCMxGLEGeQHRAuKEoYaaKHrfWipVlm0+40XUJHPbIjIOHb gEoeanvRoDHWg8Gv9DzSkSknj3TENOFadZ2lWfiVxQvPjXF4DL8jkqw9vknZ 5N3zCdiv3b+5du/G+v2b68AUD8c2H97efHQb9hsPxsgQw3u3YPHu8cSHpySd gcl3ShzIJnScIjdInUxCpOPaf12dpe/icBN0IrDJ8B9cA2E0TT6tzr1/PfPh 9cwnY6TdoDdzKJyEAvsvzAkYSwFOeXnnxrP5K0Ar71Y0/1hb+OfG0m+v9B+e TFEDhXootKwL2ISYKXBfcMIz1SdAmBUNLD4C0Twn6y8vdL+/nfvn5tKfG0t/ GO+CZlIoc9FR8r+8RYtEzx1E50iPU+9Rf/WDz+62u+1uf+stI86tIMUvI94z NcYtyOOY/ck9TpZ7nK32uljvc7U95OFw1Nv5hK+7ha+HZYCrLSjQzQ4U5G4f 5OkA8nez9XOz9XW39fOwI/Ky9/d2iAryACSJ8HcL83UBGIHTAj3sCZV4OYLw ZYC7HcjH3d7D2crF7rjdyQP2J/a4W+91swQ22Zcf5ywuCm3I8m7J8ZIXB3RV wDNM5FBd3EhDQmu6O0BHtt+hvMAjSS57kt32pLjvS3Xfn+K2P9l1X5Lz3niX PTGOPwnd9+YHH2lMduyvCLncEj+pSJpqT1K1J6rkcSopGUoCbKISh6nFYZq2 cJ00ckYerVfEzLbHzilJOy/UQmcCiryEfRfRgpFNSMDkdBIiyWJfMgrZBPEE F99CFfouq4XeZNO4CscmYSpR+HhzyEiRM7CJMsVCIjwlT7WSpFi1pVg3JZ5q S7WVZTgAmyiST4kFp0RJluIUABN7+As0ZXjVp3sNS/J0l+VnO8qBTU6LC8SV 8RXZgZnRdnkJTso6wf2JjtezA8+mFCtTitdT8rcq4oxsaGVbZJQhMUqMkqIQ TDg2wU68JE7OcyKMVVU7HAqjnfFjaECARYZUgtoJJgYxeIL8IkEYYRpz8fCE f5HfupIPcx3oxRBCMSboaV9iapoQAwWkany7E09gj4I11fPbtc9v160QNql9 RtiE6OnNahBHKFWPr1c+2skmLKQgoSCkUDyhwMKr+6JgQtmEKwMDMMnQnjGw CSAJigMTIWiiMwk03pFiFk/QQEE2QTy5IY3FgfIcm0Rj/IRpJhwJbEKyJ/UR w3VRQ3VRg7WRqIGaCFB/dXhfVRhAyumKkB4Ak9JAUHuRr6IQ5Ccr8JXk+4jz fUX5fg3ZPvUIJtl+Ndn+qKpM38oMH8CTpsLQluLw1pKItvJo+Ee6oz6pqzEZ S7yGZLmj7QVomrCJeF5lFy3lMi3o+hab0OnwyAUIGmZ9k+8IPoUT5OEn4Edp iRfGYfAC8DtpeRh1SbCsi34VngNXiEYPJmLgyxFPsEBrnjNBpneCCY2fUzuG reNCpuANUmRHqLC5dYobGF1/qO3BQixexy3qleAROAdtEbYTF1sABkfQNMFz aPPhu1OdON8E8ATDJlxBF/FNMG/yfOkisgnrm2CWhE6HR63du4mDF3mZcXi5 fu8WiI4s/MLkKb68MfQNRhMEn9uNJsI0ttsFNsFwCpzwrw/3CImszuFAQ1jj /MRf1hc+c5GTL9zi4xv9uxe6X4yT4slkk7cGPPm6tl21RWc1/mNzGQedAJKs PZoANnm+dG3t3hjOSfz15TRpxvV4Em+ETpNEYKEzUFAIL6hf4BpeYGhF9/XN 7B+rC38a67swTYO+Dx0uSRsmG3spL9ArxHn3cM2gv/rBZ3fb3Xa3v/WWGGqb J/TNSvROi/UI8znlZLnX/uRPACYuNvuBTdztj3g6HvN0OeHletLXyQrl52wN 8nUh8nay9Ha28na19nGzAULx9SR4Eu7nCmACeyARP1cbOA32CCMgwBn8rI+z lZerraezNbKJ46l9nrb7SeTE4qCyNumisuC8PPtWb+H0aNXc+VrtQIWmv/yq LFOc5ZUdcCjNe1+6z36By55E55/iHX+KcyB7WCe57o112pPotifB+adUz31V cVY9xf6XmuMm5EkT8sQJWdyULJZjk4gpSbhKFGqWTVAsoZC9EUyQTQwBk17B /OmkeSOhEJ1OXjydQunjTn86CI6Y6lu1XqZsstQt0LRFqMUR403BwCadqZbt yaekyRaSZAtllkN7liOwiSjZullg0SY43p5qKU2xlqTYKLJcFHne7YX+g03C c5KsjfvX/9//5/PyZL+kJqUqLyIzzqk8K4D0OyqJgKc43fmmR5Mdz9XKF2rl G5UCq7Y2v8smq2ocd9hGm1zRxrxmxYty/CCbmGWQjwtyFEsuLJsgnnwDTP4z NkERPDFyFjdRBXCsFURnpqxrmkFrHKEgpIAAUlA7CGWi/uVEA+jFOJnhSIWE wrIJzl7kdetiG3YBgyB9sL4JFY9KmBkoBjahXslO38SIJ0Y2YfEEqYSnq21R V8SRoMuiSGbWiRk2GamPHuY0xEAKBZPe8mCgkq6SgM5if2ST9iJ/gieFftLC AElRYEuef3Oef0OuP7AJIklFundZqmd5mhe8rMslHgqoIT8YCEVSEdNem9jd lAJsMijNATwZkmehaQKi7glACnIK21UYy7pMB8SbToengxd5Hbp+kE0wJwIL +Cr4flo8hj4OOju0pov+Ci0kw5c0m09NGbg8vHL4TtjDV8HLaePMFGzzBZeK 4Xe2OgvfYpt3IarQnDvbhotNtdOOW5RcjEH1LiQURA/kDso4iDMUTCiewJ6e gz+HpgkONMHvoVVe3BDGPhCwyTM9KejiNLIyaxhx8mL5kmkPYczCg5BQEFLM sgk+t9MB8fDo/nlF8yuBgjnadwsNETpFkU4/py1zkWI+vNBQGIE9drjCgDx5 vH9/99fNJWQTrOn6Qgu61haQTRBPyBBG4+D47ZZcXH0XHoQjW8/UL5dvrMxe fLVwBWAEbgFrurCZMNwgikUw6qrgAs8HKkEw+bxCpr3/8mL6F84hojEZvB0A LkooiCdYBgYX8ytzFwgmu2yyu+1uu9v3N0GYXXF6UH5KQGaCd3SAtbvtPpZN 3OwOezgcdXc85u50zMfRksrbwcIL5GjBsYklsgn6JqAgTwe0SIBEEENYHoGP wAdBng6nXB0s3BwtgE2crX92t/3Z2+6Ah/XeYMejl7rLb/VVXunIv32mWDVQ pj9bDWCi7i+73p4tyvLM8D2Y4rUv2XOfwBUYZE+8E2hvgvNegeveJLe9Ave9 Kd4H4K0ktz2lkSe7CrmJ5IqkCVniuDR2UhoDbMJNct82TaZlUQgmVDxCwcVc ZzyWdc0Z23MR9QrmjIRCIIXjC8QTyiZmfROzGGJWi12JWknEVGvYWGPQcKFT e/JJhfCkLMVSmmwJbCLPsK+POy5Js2vPdhYLLbty7AfLfC40Rowr0/Qj5UuX Gu6OyXUXmu+p+p7Mnr3cX9/elNmvKG0sicpLcsuOdShJ9uhvy7o3rnyuO/1S 2/lK27GqUa5pFOtaObDJJsmSmGETI5hIuCHsEgomZrtdmcWT/5RNWCr5tKgA sXiCb5laJ6Zgwn3bf8YmHJi0I5tw9yjhptLvYJMNoxBSkFPeTNajjULxhGiy EUUJBYQeCrAJggkmTWBPIycUT+jsRTb/jgzCE2UT1jQxFnRlsKaJoVsXD086 Umg/YWQTELVLWDa5Io66LIoAXWqNYBt2fcs3oVSCvgkFEzRNAEyQTTjBwl9e 5C8rDpQWB4kKg1oKAhvzAuqy/QBMAElKUzxgD4KXgCfUTAFOaS4Kk1bGdjUm nxFl4OB4nBGPZV3UPaFOCttY2CybIJhQNkGxQ+FpTdeP+yYYNp9mrBMMvwNr THBTGuEy4KfZxsX4u2wwn82/4AgVw/ST8/Xqi41w8cg48D0Gz4X7XWQZ6r9g kRhG6dkBiyhenh3f5Y1KpLVY7DhFmjeh1Vw0mcISDTVTeFPj8TQ0TYBKuIKu Hso73JHex9OkmuupfoCMX+TAZGUWwGSUJE24Vl0v72yzCeIJiE5dhD0Nnphl E7QV6JM8MU3gWf2NnpYw0UZb1DigVV44ahAf1D++1OE0kHcrql9XZ+FJHocb YuMvOPP3d3d+f38X55uAvm7d+X3rzlcONzBvgmwCQveBwgiyyadXM2R8PNfC C47DOe9WNOv3x4BNns2cfzl/Ga4fyOL3N3OfnmloHN4QhH84zs6OZ+u+8C/A uSfEeSHnkAnyszR+QtmE4gn9UyCVIJ5gKRfWoe3WdO1uu9vu9v0N2KQ0K6Qw LShb4BMTZOtut9/2OMcm1vtdbA662v4MeOJqfwTkbnMc5GF7AkTWtsfdbI8T xAA5W3q5WAGe+KB14mpDBVSCIhTDUQkgiYf9SXe7EyBgEyfb4w5Wh11sj3jC T1jvczz+U0aE3fhI0/hgzbWuwqnBcu1wxfLVZv35Os1w5fiZEllRQJr/oUT3 PVEOe6Idf0pw25PsvT/F+6DQ66DQ80Cy96Ekj30pXvtTPPemegGbnAA2udgU q1ImTyoEE7K4SVnMlCRysi18XBQCD/wIJjPyaOqbsJBCCQVfcpMZ40B6tpNw d8Jsj4FQCKT0Clk2QTz58fIts1roTIBLnWwJBTYZKXJGNlFm2EpTLLGmC8Dk Qn34RHvKdG/qXH/W0mjR8rmyOxer711vvnu99d6E8rH2zObT239+WNKP93aI chvKSEFXfpJ7YRLJm8DD29IN2VN19ytd1yttJ7LJmka2rpFsaCRm2WSNHJdg 3+B/65hQKvlBIjBlE55jgmxC8QSphC5Y68QcmPwHbLJd0EUiJxS+AEx2+Car muZNXSuIhydY4sUjlJccjFDTBIu7sKaLBRPgEcomIGATiifs+EW2aosn+u5O AyXbFE+wvovFE0Io3KwTHp6YmibENxH/qG8yXB9FfRNa2QVswhZ0oW+iLPZr L/LjsYm4MKjVHJtUpHsjocCiOstQ7tWQHywuiyLZE27iCeDJsDyLhuIRSXic QvHkR9iEQgHOZ9cakx0UE0zZhLVU6Pk0tMLSDTAC0goInRT8LR6hYPctjKJs 13RdaUG0weyJ5lIT3AXcGtwUfj98isIUbQJGO32hG8J2/WX7/bKilMGr9cLQ Cm0CTPtx8ToGs8fp99BRKbDnbBGDhwIwwvkjZ2iFmHHQCRIKwRMy5YQLwtP5 JmTw4vx53uxFtE54volhTPwPs8mXV9PIJijDgBLjmp0C/8l4JjcJhQwuXH88 jiNCsOqJC5JzLby4wYtfOUIhkLK1TOebkCf8NZKCRzb5/EqPGELfJe2CuYnw 2MIL2ASOAK184oyS9Xu34L7g+j88Uf0K56xoWAxh7RK4U1rQBQv4CPw1qOeC OANsgp24sJgNYASQBIXFaegKGSFl+xZQiFF/9YPP7ra77W5/6y0uyKo4Pago PThX6B8XbAdsYn30J2ervc5W+5ytD7jYHAI8cbE7DHK2OOxieQTkanWUyPqo i/VRoAwCGo6nPJwIoXi4WHq6bjsjPs5W2+VbHJWAkErcOLRxsT9lb3XE5uQB Z+uf3eC3LPd6WO9X1iWrz4t1F1qmhqv1F+rnLtQtX2laut6qGa1Wj1QOi4SN WR5VQsfCaNuccMu8SAtQdujJjKDjoKyQk0LP/ak+B9J99qd778sPPizJcLnc Eq/pTFV3JKvaE6dkscAmE+IwYBMAE1MhpPAIhRxpjwE2QbETGIFNEE9Q1Deh lV3fiZb8YE0XsIlOGjXVGna7Kfhsiasy5VRHqiWwiVhwQiy0kKTanCnxWRwu fnmr+c5o/uJw3v1LFY9vNDy+1fx0UvZU1f5A1fVY1wf/Rf66NT8z3qsU5zbX CAtTvHISXHLinMpSveD5TX9Z9Giy4yXHJm/V7W8RQ1Rta6R2yzybEDDRkumE ZrvvfqcX1od55X+SN9lhjqAom/Bk1joxF1H5j9nknX6bTXAM/ca0CISEAtqa FlE8QdMEhJVdPDzhhU1o0oSWclEeYdkEaYXKdOgJL2MCosVdeNz4Vu7sUA4Q Cps6gT2Nn2y7JzvZBPGEhk2ogUL6dEkwbAKEEvVv8iYmBV1Y04VlXWidAJuA KJsoAEwK/SSF/m2FAQAmLfkByCZVmb5Y0FWS7A6EAvtioRss4CASClontLLr dCsZdIKi7sl/xCbjZ2vZvAmlEuqb/NuaLlM2oXiC7+IC9ti/C4eqYE0Xa9ZQ USyi34+MY4jPc2PlQXAcJ85jAoU6L3g7hrGMXH0Xb24jZRN2NAm1Nng+CDVQ TFGFxRB6Gm/MIm8II68lF7cmbIIvaQ9hzNozbGIIm9DZi9/Km7BC34Qs7t0w ZRN8aKfmAkYwPnGTEzEPTkuYKJiwE0zo8Hf0UHBWI7DJi+Wrr+/d3Hw6CScY GnZ9uPc7V9aFAlRhZy8imyCe/GL0IGjeBO0S2AOegAiVcMPiv3Bpka+vZ7++ 1mNBF/ojuKDmCPbvMmUT/FPQ0A3+WTafGDoqA6EgdnH7WZqOx9vh9nfgqtDf oVNX0Dr5qx98drfdbXf7W28RPsfzU/yKM0IATwThTp4OB2yOkTi8k9VeJ6v9 ztYHAU9cODwBNkE8ATBxsz7mZkPgAtnEzYEICMXd6ZS7swXFECo4hy4omLja HLO3Ompncdj21EFHy4OYN4kPstNclE6ebZm+2KoaqZk5X7d4uXH2XM3idXhZ qR6tmhquuN6Tf6Uj97wsc1iUero+ob0iUlIU0pIbWJvmVS5wyQ87VRFvX51g XxVnUx59qjXF4ZpYoOtO13WnaTuFKkXcZFvEuCgUfROUpi1czeXiVaJQ6qHw qrx2+CZIJZ3xM6AuA56gzEZLzNZ0fSuEYramCy5JLY6YbA27UO7RlW7VnWHT mWnXknAM2KRFcKq3yGvlesOn2a7nN2vuXyh5dLV65Xbzk/HWpyr5M23HffK/ HM+sPbn1X3881dzqAjBprk2uyA4ElaR6VWcHyKvjZ6+Inml6XmoNbPJGJSNz FadEbydbv8EmCCayzenv2SK8ySZ0gsmPswnPHKHuCeWRz0vtqP8ONqE1Xe+Z mi46M2VzRoyEAtriBGxCUycIJqZ4YmqagJBNUEgoLKTwRPHEtNCLxRO2kRfD KXkUT9BAQTAxtU4om7DWyTf6dMWSPl3SmH+bhR+sjcA6LozAUyGesJVdlE3k hX7SAt+2Aj9xgT+ACeZN6ox5k/I0r/wEp4JE50KBCwjwBCEF2KQ2J6A+Lwjx RFknADzBOYw4Jp5OY+R1FcZcvFk2MZuFxz2rb82FN8smeg4csFsvhuIJmHBT GjEaTyaecEdgDVeCwrbGhhotbhAJy0fYOhi5Zto4ORG+B27nWn8ZHof7QmEm BT4InzIMhd8ZkEex4xcpTfDYhGIFnTzCIw4WWHhmCv0sgAYlkYfaXs4W6cWY CXDKk5k+wBM4iOfDr8BxOAhUsjI3BHqmH6LWCbDJ66VLb5YvA5usLF3g9ekC QgFUQTMFEyjw1updM2zCNt01hE1ezvxKqrb0OJ0Qn8l5lV20RTBX2gSEMoPN eNFAgcX755qXd649X7oCnMJNS9H+/u7On58egP7x4R7Bk42lr/Bgb4yQsGzC xkyw+RUNm+PB98+1INJn+PXsry+nAUz+WF34/c0cptqxUotaQshc36rpgoPw 13i7fH31zg34y5Ao/aPb64/HMeBv7CE8jQPi4aaMt4lzJw2TWahvQj2Uv/rB Z3fb3Xa3v/UW7nW8KC2oIDUoK8FHEObsYX+IsInFXifLfU5WB5ytD7lYH3a2 OeJse9TR4mcny8MgZ5DVEZCL9VHgC+KD2BPccLU95mZ33I1DDzRHQLR8i4qC CcjTwcLF5qjt8QM2R/e5nNrrcmJvR0PuxHCT5lzr3KXWxcstS5cb585W60cq Zs7WTQ1UTA2Ua4ar1EOwKJ3sL7l9uuj26cLbZwrGevOvdWSda0saaIwZak4c aIzvqQrrLA2QF3gpi7wvtMbp+nJmBnJn+rJVncnXxZFXWsJutkVNScKn2sIn xWFTbWFqaYSqLex2c+C0LAqrvAibKGLmFLFzQCWyaD0ckZMjBk4BAad0xs0g p3RxJV7dCXPdZDQ864BQNuFhCD2N+iwg+DgrwzcoY2ck4WpRCNDTpXKPngwr Zeqp9nQbcdJJaZqdKNm6Pcf1xZjoj4fn3i/2PLzZsHC+8sHN5uda5Yvp3qfq rteL5x5p+9/ev/FfX5/e0Yw0liWUZIQkhVjmxDuXpHhWZ/opaxJmL7c+UXW9 nu5+ret6rWl/rZa9VrW9nhS9nmzlhr8jj8g2dArQ5nQ7XWzNgJRbeqJ3sx1G Kem0dyOSbPcH/rjQzrX55ev9nIyKaxosR9PELJuweGI2foLipU5QbI9is6Lz H8mZO4awbI9T4YSQItmckaxrReukeVfrqqZlVd3yVt38VmXQm6mm1yBDwGS7 oIu1TiiY/Fs2oVTC2ihmzRSzbIJgQtmE1nexbGLAE+MQRtPUCQ9PbisTb8pj iW+CqZOW8AvNYecbw841EJ1vDD/XEHG+kWi0LmyoJmSgMrivIqivMnigOnSw JmygJuxMVUh3eVBniX9HiT/8awtreUmwtChIWhgEe0lRkKggoCnXrxn2eX71 OT5VGZ6lqa5FQqdCgWN2rF1evCMKIKUoyRUgBRMoNdn+jQUhotJIaWWsoiah q0nQ2yockKZjTRcNxbNsQuPwpmyCj/FoZ+CCHRBPIYUufiRyQltsYeoE17Rq C7MnmBDBQSfIR3Al2F54mjNZ4C22OZhhUCOXYaeD4+EK4SNwm3BTyFnopOCd wksgIPRKsLiLToGngxqpsULxxNQxYcu9KLbQCDw9wtZ60UIvtvMw+iZY0MXW btGwCaESzZlHZMbiMBctObsCmh0FcSn4UWqaAJu8ZmImNAtPX2IIBbV27ybN vNOEOH1uh2f1L891ACZfX8/+g8EQKoon1Dug8XA0F4yddWfwNFi8W1HDQ/7q wzHQ5jPV5zezf76/9z8+Pfjnh/t/kuKoe6B/fbiPNVqY2qCP+p9ezXx4ocNS LhD6EWim4FucdaInLcVeA0zN/fZ2DpAKFp9e6j6+0Hx4rnn3bGrj8fjawzGC G/dvAYPwunVhKRes4W8CbPJm6Rpoixsf/+b+zdf3bpDLfjqJ4xqxWzIIMzVw kIv5b7cvY/9Wf/WDz+62u+1uf+stxP1IQWpgrtA/K8E3NdrT2+kwaSNssc/Z kjNNrH8GNnGxPeZsewzZhO5RLlxll1khfSCJsMLjIDiHlHjZHrc5ttfu2B7X U3uFIU5XzzSrz7Zqz7UuXBbdu952/3rr0sW6maEyzVC1aqBCNVCuHiT7qf4S lHqwVDtSphspUw8BquRe70yfHCi53pV9WZF6QSIYbY451xp7TS7U9efODhfO DxdoetOvt0Vfbgm/IYkZF4UAnky2kfquCXEosMmUOJQmUABGZuUcmyg4NkHJ Y9BSIeSiJHiyo76LhFASkSlYvkA84dko2yVbDKHgEfazsF9oj5mRhGnEIZq2 cMImmVbtKSeBTSTJFrIMB3GqnSLb9cXttn89vfTlwdDKVNvixZp7N1pe6Lpe 6fueaXqWbimfzQy/vXfj40vt+DlpZ0uevCGrJMW7IsOvIt23Ms0H2GT+qpjL m+xkkykDmyCYkHQ8gRHlO30HLFAETIyC40YpDSPa9WhAKOicROOzveRbMtsZ mCcWWMzCC6+lME/fB5OdUpiKxRP0UAibGBoL4+iTVhxDiXoDeKJqxmnybP6d hye0gTAV1nTxZIokIB62IKGYsglnqRjYBPEEhdkTlk0InnTvYBOkEtO2XaCx 9vib8ji0Toh7IibWybmG0LP1IaN1oaCz9WGwH6kNGa2PONsQea4xCjRKbJSw vuqQ4fro/ppw7v8k+EjzvKX5PvIiP2lRsCg/oDnXrzHbpynHFxbNef5V6e7l KS5lyc5FAoe8BNucOOvsWKvsGFsEk9w4h/wEJzRQSpLdsXlXfV5QS3F4W3k0 mXtSF9fdLDgjThmUZSCemGbhebNOWDyBPQZA0D2hoQ82eEL7aLG0Qqu2flDU lKHj4LGtFv40sgnOQMEfoll46s7McCYIzljERsdw/XA+3B29HRDcIwjnS8Jp vAHxlE2oeChhdqIiDqPHwSh4Ju3WRbmDEgplGUo3bEthyiNUtN8XMVa0A491 Q0+mh0FPZ0ae6QFMzj6fO4d7BBMjm1zlgQkrllCQTXjdq2j5E9elSvfbK8Im vxtHmfBS8LSgiydkE9q5i5kDYphX+OmV7v1z7bsVDVAG0Mf//PTw//zyGKjk j6076DjAAjjlz3d3YUEHhQCkwBGMw1Meoe4Jl+yYxtGHtPgKO4bBfwsQKLae TWFCHz0jxBNKKFjchXGbt8vXXy1ceTl/+cXSFaCS9cfjmOKnUynx2+A4ohZA CmIL3i+We9Hmw3/1g8/utrvtbn/rzdfhQK7AtyA1KC85MCPOx9/tuLPVXsIm xDQhbOJqcwTYhLTS4rwSRBKHU4fsTx60O3EAOAXXsEdmgQWegyaLk9Fk4VEJ FRy3PbbP/th+d8tD8urMyXOK6YsS7bkWYJPlK63LlxuXOTZRD1apBys1Q5XA JlP9ZUAlqoFS9SAgSRlhk9FykGa4RDVYOH+5QTVUCqiiHixS9eVr+vNVZ3K1 fTlzI4VLZ4tn+rLG5PFXWiOuiaPGWoMBSQBMbrcGg1SScJ08ajsgL4sCGAE8 AcFiRhplcE+MbILZk2lOuvYY1ExHAkrfmTjbJQDBggLIv2UT6rCwzssC/JY0 QicJ07aFXyxz7+Z8E2WGrSzVSp7pKEmzb89xez4mBjb5/em5jfnupxNtj8cl wCavZ/ue606/Xjz/ZvnixqPb//e/Xt1Rj7SUJzWWJhYJPUtTfUqSPctSPDtq ExevS4FiKJu80cjfqCU4wQSpBGQ0Sv4zNkHThD7PGx/m27C7L4UR6nHwIOX/ J5t8Q9/3SshLZhzkD7EJl0BpM8bkxYgquEdOoYSCQk5h2wibcgo1UFiZFneZ tU5YNtmZRjGIxZMfZxPWOtmeeKJIGGsHJd6Ux1+TxF4RRV8iZV0xl1tjLrVE X2iOPt8YhQIkOQtqiBwBMKkL76/hYiZVoT0VIR1lwe0lgXIuXQJqzPIGJGnh 2KQmzb1C6FyS6FCa5FSS5AgCNikQ2Ocn2oFyYu2BSlBAKIAnoKIkV8CTinRv nHsiKo0EPGmvi1XWx3U2JqB7MqrMATZB94QNm9BWXaZ4gmxiKLXiIudm2YSm SNhCrx9nEzZNj1NIaGwEfg5+Ha4HOwzDVZGJivApJrcyY/RiZjioUXGtuuAu 4KbgjpC84GbhrmFBB9DD+WxjLmqRUDuDV7uFJVWUTWhjYewABtcD30BLv2iV 17ciKtR2YQegsGzCxN57QbB4rBsENnmkHQTBAvAEqARFJ5u8Xrr09s6VV3ev sCl4NmaCi+0R8PfNsAmNYCCbkIKulzNfmfZc6JKw/anYEAp7hGbn2UmFtAAM kATIYuPJFAgW8BJ9E8y2Y3ADExwYhKdzQ+A4pjkoktBCL/w5Dnxwwrseq8vo 2HeccU+w4tH4+r1bACAgzL/jLcMe23nBQYAXeHdl4dKL5atAH0Ai+A3coBYS jYfvh99iPRRqo2A8h/6V/uoHn91td9vd/tabl+3+9FiP0qzwgtTglCiPYE8L F+t9jqcInjha7neyAjw57ERquo4hXABNII8AmIAQTJBNULCmrgrFExCPSijp OFn+7HByv8Px/ZHe9sOKqvFRmWq0RXuudfZC88zZWt1Q+cxQ+exIBbCJZqha O1yFbIJgMtlXDAvNMEciQyXAJrqR0rmLdbrRSkAV/dmK+fNV8+cr9CMl0wN5 s0MF88MFswM5qq7kG5KYS81hN5sCbzUHjrUEAZhMcmVdWlmkpi3c0FhYGmng EQ5MDJJtp1GQTRBJtIpokEYeBVSia48DwQLZBBe01uv7bEJnNe7AE0X0LLKJ JPxCqRuwSUeaRUemnTzVGtlEke369GbLP59c/Mez818eDG3M976a7nyt7wU2 WdH2vlmC/0yff333Gvz3dOZmz9nuWmVzbkVGQFVWYHmaT2myp6wiRn+p5fFU J+nTpet6o1W+1SpWtbJVjWRV3bahM1AJSyJm2eT9bKdRhpGFIOMDv+GR3vgw LzZlkx+hkv+UTb4Rme8w1afFTsomTEbmR30TlCmhsHhCCcWsjUID8jQab1ZY 68X2Fsb6LtYx4c1hZOPwPNMEy7p+nE2wlAvtEqqbCsHNdqJr0vhLougLrVEX WqMvtsZeEsVfFsVfbI071xQDutAcd64lbrQ5ZrghaqAu4kx1WE9lSHdFcGd5 iKI4UJzr3ZDhWp3iVJnkUC6wK020LxM4gsqTnCqTXWozPJty/eqyvWuzvEDV mZ6VmR4o4BEenmBxV6HApTTFA60TwJPWkghFbayiNgbU1ZTYL0mjs07oiBPE ExA7h5HXqovGQLDhlVk2mWaKtWidFR2YyMpsOp7XFhh7/KIfgT+KrAFXCAs4 c5pJndCuX3QB1wwnw2UDc8Gtne3IhduE24e/A6zh1tDoAZqY5awW2lIYy7p4 /bhMe3NR0wSl564TvgE4hQ2bmH6EVwmGHzftKoxjTdAxIUgyfYZLxPcim6B1 Qn0T2KNoA2EgFNpDmLIJht9N2WT9/i1TNqHVTTjmg8cmtHwLK7hwQbtU/W5S +kWZhUUVY4OvBXRA3q1oVoEFjISCjgkskDjomEVYfHw5vfUMoGMaDRQ4Exv2 0la92CUMkIELg8CZOuQUNE1wgXjy4akKAYQtacPgCS1pw/Umxx3Yagy+BCdI UiFz4dBJpJ5NrgaMm+0yjcNcdtlkd9vddrfvb74O+xNDHYBN8lOCkiJcI/3t nCz32Z/Y43Byj/2pvY4WB5wsDzlaHXa0PoLJEeALZAr0TZBKqJNiCibIIBhO YakEhO86nDzoan3Yy+5IaUbUpd6mqfPtUyPNwCaa4Vr1QIW6v0TTXzx/FpCk Sjdco+PYhKvsKkM20QyRgi7NUMnUQNFkf4FqsFBFnJQKAJbZc5V3rtQvX6pe vFA5N1KkHyrQD+QCm8ycyRhvTwQ2uVrve6PR/zbnnmBNl0YaoabD4iUR05LI bSph2MSg9pgZo12CbAKaVsYjm8BC35kI4rEJxZN/yyY0Gr8AbCKLBDaBS7pY 5t6TaQ1s0pllJ0+zlqbbt6XZy7NcHl1t/OPR+a9PzoI+3x/eWupfne/Dmq6H 6jNr966uPrj5r/d3NFc6OppzJTXpVVlBVVkBZaneJUJ3aVn03BXR69kB7CEM bLKqa1/Tydd1snWtFNMlFEZ4Ytnkw1yXUZ3bUwsNg+B5j/Fm2ORHqrn+t7DJ p0UzbILCmfVbeuwVLGFL0UzK0v43sAnrnvDY5FuihMLOPeGBCc8xYTPyLJJg 2IT2E/4RNmHtEqprisSrisQrssRLkviL4rhLbQlXpALYXxDFA4ygzjbHjTTG DDVED9RF9VaFdZQGygp8RTmezZnu9emuVcmOxXFWeVGn8qIsiuJsygQOpYkO QCVVKa41ae7VqW7Vae416R4Nub6NeX6wr8vxrs72qsry5NjEITuG754gnhQL 3crTvKqz/ABPGgtCJJWR8hrinqB1MijLoKkTnm/CmiamYEKHMPJSJzvYZGf4 HVtvmUq7015BoR1DZymiFTLN8QKt0cI0ClZ/8abSs/VdGIqHW4DjcFNwg3Cn QF7AZQBow4osOIjfg19FoQn7CWPMBH6dFnRRBqF9hmnXX2SKBW7oPNou+BE8 gQUQtkKMPcLiDG9Y/HYpl+40TjnBmi5EEioeqpAGwvPnny9doH26kE2wafAP sgk+n7Ns8tsr/de1BdYxoWyConjCm0VITRNa00XbDnPH5wBAADFgD7ix+VQF eLL+eBIJ5X9+evh//fIE3sXWweikIKGgXUKS72sLNHuOVV7vVtQAI9zIFT3a JZRK6NoAKcYiLrhN7Oi1dvcmjckbprpwXb8+Go0S+E4QLOAlAgjHI1qsGUMY QRTivBWd0Vsh+qsffHa33W13+1tvAc4Ho/0ti9JD8pIDkyPdE8JcXW0O2p/4 yZ5jE4dT+x0tDjpY/exgdfg7bEIdE4oqZtmEpRIqONPT/niQm1VNfuK5zjrt 5S7tebF6tHmir2LyTKlmoHR6qGzhXLVmqBrYRMvVdIE0Q+XEMRkqnx6pnDlb oR0pm+wvvNWTfaMr43pXjmqwdPpsxcLFmnvXGu9fa7h7pXb5QvnccOFMfw6w ycJQrrY37UZb9NU63+sNfmMtQVjZNSkOBTbBYfEgLeBJG8ETKo5NosyyCWja UN9FqIRWdmFxFy/bjjxilk1MB8djFh59E5004lK5R2+WtTL1VEeGrTyVTDYR p9jKMp3vXar9/cHZ3x6Pgn59dPbj/ZH1xYGX06eBTZ7rh5/oBl8uXfm6Nn9f e/bimcaGkoSqrMDSVO+CRNeCBOemvODJoeonqi5u9qKBTdanFRvT8k0iQ/Id xdZ3/QibYG8r3qM7b/IIO/z9R/Dkv4NNsJQLwASudl0nWdOKVzUiY0uuHWKy 8DvYxGxZFw2hUCQx65uwlV289sKmQkLB7Alt1UUHx38HTJBNeGDyH7EJL2+C uioXXAYwkSZclICAUASXgU0kSeda44c5Hhmsj+6rieguD5YX+rXlejVluNYm O1Yl2VUIbMsTbauSnSqFjqUCh5IE4pVUJLsAidSmeyCVAJ6AKjlVZ3iAqtLd K9LcytJcS1NdSlKcc2LtMqNsAE8QTABSkE3Yyi4cy9hSEiKtisSyLgyeDMkz TbPwpgVdyCZYT4WQgs4F7L9V08WaFyizbGK2pgvpAxlnhjFNcDYim51Hd4YO psf+wFhvhkyBPgvCFAZMaBYeUQXumjbvIhYMsonR4qHIQ6PxbH8tLP1io/EA FDScQqvCMHvCYxA2z8LyDm9YPJZysVPjt8fHq/toNRcVHsEQCrLJ87lzzxbO r3B4gmyCo0x4VGIYyGiupgt9E3xoxyA8l4VfovTBIxR2YDrNgLNg8oWZ27iz x5cBK5A7MO3+9v5twBNAFaCS//q6AniCCRRAD1j8H58fgf75/h6SCGbhkVOM qROSZOFSJ4aYCaIEylDNxcVGPq6oMfkOwvZcpn8BBLT3XPdguGC8u19XyRgX DK1g/ITt4gW/Ysy8GGIv8Fk4/lc/+Oxuu9vu9rfefB32RflZFKQG5QoDUqI8 hFGefq7HHU4S38TBYh/rm2CLLVrThWxCFxRSYG02b8IDEzzH6sg++EIvhxOB rhapkV6kSddZ+fRFycRg/e3TZbd7ilR9xbOjlfNn0TSp0QxVqgbKtcNV2uGK qf6SmdGq6ZEK3Wg5sMlEX8FVZdpZcfx5acr4mcL5izXLV+rvX296PNZy72rd vctVi+dK9AO5c4O5SyP5cwPZE0rBreaga/UET9A6Id26JOHAJognGsATMcET SijIJnRWI7IJIsmMMRSPYIJ2CU2d8LpvmXIKZROzs06WO+KATbRtocAmVyq9 TmfZ0LyJOMVGlGwjSXdcPl/1272R3x6N/vJw5JeHo5/uj64t9L+YPv1cd/qJ bgDY5KFuZGX+0u2zkrPdtb2SYlFZbHm6X168U16sQ0NO4O3+yqfq7heUTaaV G6QBl4LMHJzeppI1jQy0qpaaZROzNV0smzCP9xI6HtHs+vuE8t/BJp8WO0E8 PKGGCCuzbGIWSWg0Hh0TGjYxLegyq2/hCcsmyCMUTKhp8o3hJjsi8BRS/hfY hLbqAl1TplxRCC/KBBckCWdF8cPN0f31Ed2VwZ3lgYoif1GOR0OqU02SXZXA tkboAFRSn+bSkOHWmOnemOUBqs/0qE13A/QoFzoDmFSkuFWlwREPAJPKZBdQ hdC5NNGhMM62TOhclswpxbnEqOwY24xI66xoW7ROYA9UgmyCXYVxPmNlhk9z cbC4PExWHdXREN/TktTbKoT9sCLLbBbeFE/g0R3HIGKVFObKv8MmaGdQvjAr Oo2dlZZrq4UuBp6GqXb0TTCBgkfYtDs7O57WlSGbIIxgG2GELBwND2usZCPD UC416a60ACngt9GRjjOcgcK2FKbzE3kOCIqSCAII24yLxRNT0uFlT9gJJpRT aGiFHFGdvq/qQz1Q9yOVwB59E4yf4OzFZwvnni2eZ9lk/cktBBNeqy6zWXim SZeBTf7xdv5PpoLrW4TC2ihY4kUJha3sYpIpxjGL64sm9odm7dHE5hMVHAQ8 +deH+xiQRwDBoi96hIZNkFAQQLDdMVZVIR+xNgqpuTKONfmwbaDoeM2EDen4 lwQujCNOpoGt/vn+LuxxdAtCCggrvnAGCo6hpEC0yya72+62u31/87E7GOpx KiXKM1cYkp0YnBbnH+hh6WSxH+RgAZQB9HHA3uKAncVBwArsGAx7wApgEJtj +1jHBCEFgYXFE4I2VocdrI9wOmxvfdjOqJOH9zhZ/+zhcNTH6WiIx6nseB95 bcbtwYbxwXrVUK12uGZmpHp6uFLdV6wbrdKOVmlIsRankXL1cKl2tHzuUo3u XLlquFg1VDw5WKAaLlQNFhPT5FLt4uW6pSv1xDq53vjgej0QyvLFyqXznIEy kKfry74hirjSGHShzvdCre/VxsBxUZhaGjXWFHS7OXiyJXiqJUQjCtO2hena wqh1opMwUxoBTJhqLlrTxTNNMA6PopxCGnB1pYDme5I5pSz2JIPmOhLnOxMX uwVL3UnL3UlL3YmLXQl3u+N04uCJJn+VKORqlWd3hmVHmsXpfBdZipUkzaEl yUac6nTnfM0/Hp7/7dG5Xx+e++XBuQ93RzeWhtYWhteXRl/MDa3MDq4+uPLl jfqutr9LlCmrTy4Q+qSE26dH2BcleYjLYiaHa1/PDr2e7nkz3bWmVa4TGJFt 6qRb5BG9zSANSLzKiRtoogBxw0FIr+D3c8r3cwq2UTCKe4CXmVgP2zxi1kNh +AKbCSs+Lijod35aVH5fn5e2xRzpAH1Z7qTRElafl7pQ+C7aKMwQSRxwL92Y lgKzcINXOt/Nyt+qiSECDMJr2IVIwuMRRJLXUw2gV5Og+pcT9VxX4TpOtc9v g2pAK2NEz25V8/p3PbpWwQMThJGlc3mLZ3MXRkE58yOg7Lnh7NmhTJB+cIcW hnJA84PZgOez/Vl6UF+mpjdD3ZOm6k5T9aSrT2eCVL0ZoKmetMmu1NsdybcU whtywXVZ4nhH2kRnxnhH+pgi9aY8+aY8Zaw99YI0ZaAxrqMiRFrk35bv05Lj 2ZDhWpVkT2yRBJvSeGtQRaJtldChNddHnO+HEnFqyfNtzPaqy3CvSXcDQoFF LVkTVaUSYAFaKRe6lgldSpKci5NcigxyLSRyAWVFO2RG2mdFOWRHO+bEoJxy Y53y412KBO4lQs/SZK/yVN+qjIDGgtDm4nBxWbS8Or6zIamnOaWnJXVInj3S nnu2I/981w424eEJiM6FHz9bC1SCURSWCGg/4R2ZdI5QZkySJrR0ylQGZ4Tj AqytwhiInsETgi3GNZ26aLYtGFIS4gncDsZnsHswrLFVF9wRBltAsMaAPM52 RALC+i5awYWgQRcsa/DaedG2wCxWfCsazxu8SB0TPIeej3qgJkhC9VAzAOLV dGHq5NXSxVdLl14vX35z58rbu1dX74GuwcK4Ji9RGw8MYGLKJhiEN4DJ2uIf 64v/WF/8Y2PpD4ZKft8i+rq1TPRu+XdO/3h3hyy2lslbm4u/gTYWvqzOflmb +3V9/hcQt4CDvDkgmDShVVvvn2tf3b356s7Nd880cOTPd3fRLsHs/IcXOjwf PggsAyfDnvsew3QVdCswG4KwgPNZQDi8/t2zqa2nU++ekv0W8MXjiY3H478A 5rzWv19RwXr90TjsN59MYPnWBrcw5k1Izp3zUObgJQ6+X304BuCD00+MmkHX ZpdNdrfdbXf7/uZteyjQ+XhCiEueMDRPGAZsEuRh5Wx5wImAyUFS0HXqgB2I GCiHsa0WCDgFSMT2+P4fZBMHwiaESlC2Rtmc3OdgddDN7oin/WFfpyORPhYp Ec7yysRLnaXqkXrNSN3MaJ1+pEbVBxhSiSJ4MlKhHilTj5RODRWrR0oATCYG 8kHas6Vzl6v05ytnz1fNX6wBPFm+2nD3agPgycMbRAvnK1Sns9Wns2YG8+dG im5Joi82BJ2v8xut8jpb5X2rNVQljbrdHAJ4Mt4UCGyibg3ViEI04hB0T4iM 4xpJOy95FEhjFLIJDZuYQgplE2Oj4FQQUAlooTd1qTdlqSd5oVMw35G40Jmw 0JGwCOqMX+yMu9MVoxMHTjT5qUUh16q9utItlKmnCJukWkvTHVuSbNvSnO9e qAU2+fr44m+PiL48uPD+3rmtu+c275x/NT+8PK58Mjv8SD948Ux5tzjzYn+1 tCalIiu0ONmnWOjVkB96tbt4RXsG55usadvXSOGWdEMr3uRKm0zFzoJnxheS LAbNjDNsYloW9eMNhOXst32HTQA6TLUTWDpQZn0Tlk0ovOC8RRSdC49rXGCD L9hT64T1Sth+wpRTXk7UoQBGUByMVIOe3apixbokNAVP557cu1TCVHDlmRol s0PZptL3ZejPpAOPoGb6smb6s/UDuSBdf67mTLaqN3OqJ2OyJwMXE11ptztT x4kIldxSpNyQCa+2CS40xw3XRpwpC+oq9BPleDVmuteludSkOAGAVAjsyhNt W3K82gr8ZMWBitLg9rIQ2MtLgiRFgaC2wgBxgT8I2KQ1368pxxvwBNSQ5Vmf SWwUIJS6TC9QbYZndZp7RbJbmdC1VOiC/YFBBUSu+YkuIGATABNkEyrAk/x4 18JE9+IkYBPvijQ/YJOG/LDmoghRabSsKl5ZJ+hqTO5pTh2QZg0rcgBPznWa 8U1YNkHHhKZOMHjyrXHthA4Y92TGWCJldhoj1mjRiIdZsSBDPRf6LnvcdCo9 fBbns+DtwB7vlIb6afkZmUfPDZfENf1y+kM0IM+jD9iz0RI2NoJDGGmlFm23 hcNKKHrQHsIUXqhvwrIJPf5QY+AREHbrogVdyCY0Do8TGEFvgU0YrQKbcFq7 dw21+WAMwcS0TxfHJtPAJn+sLvzJgYlBGzvY5OvW0m87hYTylXuLvMvhyefV WdAvHJsApMAeDn4l1V+L7LxCbMyFbgiWeAGGrD4cf30XnvzHP7/WA6GAYAEv t56pMZnyrw/3cSTKx5c7Ggjj2Efs1oV4QgfWw2m0vos1PrC7F7ohwBpAHGvM 4EW20xcWp1F/BO0YwB9axoYVZVyJF8nj/9UPPrvb7ra7/a03H7uf/RyPJoa6 FqdH5SeHp8UHRAU4ETax5Kq5ODyxtzhoR1DlZ4onrjbHYI0kguJ162Lx5Dts 4mp/krgq8BMn9jlb7PN3OhTgdCDR94SsLO5mT4VqsEY3Ujs7Wjc9VMX5Jiye EDYBaUbLZi/9f+y953MbWbbt2Sp5R4mkJFIURe+99957whEESMIQjqD33ntv AdB7J0t5W6oqle2+9028mYl48SImJubb/COzMzdwlAIotbrvm6j6wIwVGQcH CTDJqO7KX6299uZrujjTLTnAJou93OUe/mIXhSdr/cLNoZIt0GDx/qjocFyy 3MnuloSMlccutmavd7PnqmL6S3yATdq4Tm0cx1GxD7DJpMQP2GRa4jMr9Z0R +0yLPedKfRZkAXrRXbz0UgbOq4LmVEFMNpkvCwUtqMNAyCnYs4u0FP7EJtWf s0ktxSZr1THAJssV4Uv0XJWVirDVyrC1iiCNzHtG4rmg8B8VugGbqOPMqtNu I5tI46yUyXYbXYW/7HT+etj/ywFo4OPB4A/7A++2+15v9jxeab+na9nXtfz+ Zvloa6BemaEQRguygjMindLD7XJiHEU5ARPN/OerHXQWvvIZNf9d9XxO/nKu 9OWc9Fg2eamBR3GQEp/YUUZxDBIb/3Y2OQ5P/mU2wZd4JcEl5se/1KeLiCRQ jmWTZ3Ol+0O8lfbMtc7swxH+01nJiwXZS42cmXxHEWBBDwXruExJ5N4o73CE ezDMgTMRvfkp/84cxYgxEwImwCMmc0wyDS25TPCkmRJlmjSnI5KA5hvSFxrT 5xvTZ+pSJ6qTx6uS4DxZkzxVS50nqpNGyhMGlNE9peFNhX41bI/ybFdlumNp sp0o3qYo5lZW4NX8cEtBgq0o1VGa4YJIIstyA8FakeOBgrWcRhIUEApKkuFK QUqmG0AK4gmcS9Jdi9NcgU0KEig2oUyTaGr++ycx2AR9EyaeZITZZobfzY60 BzbhJLgBm/CSPIDBkU2UvPByQVRVcWyNKL6+NLFRntRaltZRQZV1kbAJk0rQ ayAz2ZkReOacRBw+gkVTOD4e8+xfGcJI3BZmu2DMkhuJxNKZKXWjC8g1emPF gDOwj7eEQxtxQDwG5HFKo442a7C5FiEdYtkgj+Bb6J4wq7CMAvKmI0tIJy6j AYsk5I7wgt9DWIY5w5GIySzAJggjzCknuGCaJl9hE1M8ec3wTQiekD5d9ID1 f5NNjPDk46tVQJIfaPcEwARfYgkWNgTGnsCwBsqANdZo4SaQCJZ4AY+8f6RB nIFNwJZnuxOwCe/CVyHaICbQ09u1Bh7RmYIJGit4MRlZgsNKcEYJCHgE2OTp zii2BUbThPQQJlQCZyxRgx+E7QKId4OYg3jyZz/4nBwnx8nxlz7crC+6374U E+jISQvPjg9MjvSK9He8a3nO1vIcsAnK2uIcCHEDJ5U4WJkBpJBOwseyCcGT r7CJ7U0zG4vLVmZnblz6251rp92sz3vaXPC6dToj6E69MHa6ka9rL15sFy53 lmg6C0Cf2KSDA1Si6eJqu7kAJhONGX3lcUPViXPtuQgmQCjAJpRvMlSyDRoU 7gwVwUNXaZJ1Hct1vCJuuT13qTF5VB7cJXBr5TgCmwwI3SdL/YFNJsW+MwAm Et/JYs+JYrdZqfexbDKnoDSrDEQ8QTaZU+mFkIKcQkIozJqupap4StWxoOWa uJXqmLWa2NWqaNo6iVipCF8pB4WuVISuqAN0Ct9ZqZdWGTBe7AFsUhZ7tTzp ppKu6ZIl3Fal2C+3cX7caP3t3tAv+wMf9/p/2uv/sDfwbodik0NNCzUrebXn 5cH4eKe0Vp7e2ySQcqIzo10yIx3y413hgW2knnN/vu7xQtXj+cqns6pns0pq ssms9AX94H2s6KdxBQ0pShRJZBwbIf9cCtNx7V/Ak29lE9hndiom2RDSXIth 6HyRTUyj8aZs8m65/MWC/NFk8f0x4eOpEvgLwA5NasYdupBNgFaezUkATAyZ 92Nckv0hNgoIhUCKKY+Q5DsTTGhlU2rPWqG13JYJWmxO05kISETXlK5tStc0 pi00pM5TNmLabEMGaKYhY7oufbI2bQJUkzZSkTBUFtsnj+oQhzQW+lUDkuS4 yFLsJEm2ksQ74gRbceJdSgl3i5LsJOnOylzPsnxvOIOATWANZxDuAJvAGR0T QiUoUtxF2IRKoCQ7FSY58hMdePH2nFg7Fs0muTF2RNnR9oAnIEASYBMjPAEw AWVF2BE2ARE2UXDDyviUdQJ4Ui2KrZPGNymS29RpXVWZzCZdzOEmKFjjQHZk E6QPnH7IxBNirOBg96/MN8G3iLeCOIDFWgQNyMCRRbqCiyAJk02Y7gnZZEbO 8SZBOJ8F7+2TXTIsI1eSSSXka0GEOHC6otGNMZGKySnMhDtzFjxpyWU6UJ5U fzEbDjMJxZRNiFECwqQJadJFppx8iU2M8ATZxAhPkE3osIn216fLX2MTZJDP 9eu7zd/ebRrhCQhg5PunOsATABPAkw/PdD881edEEE9+f7MJIh4Ktg7++7tt 2MReXggp2EMYPoWz44FWEFte35ulm31NE7jAxlnMSD4BEyzrIv21SJNhwBPE EDRQ4CUOVXxlqOwyakSM3EF8GdMGZT890xsof/aDz8lxcpwcf+kDwMT51rlI 37vc9IjcxOCkSK8Ifwe7G+fvWp63tQQSuQBsctuSEqIHYROSOvmnbHLb4oI1 6Dg2sbG8Ym1+yeLid5YXT9leP+t885y79QXf22cC75wviHMZUOcutBZpWoTr vaXaLv5neEKzCWihkw1g0quObZeF95RFz3fk6Tq5wCYkb7I1WLwzLAIwWe8t 6FdEFcVYqNJt+2Vhi63Zqy1ps5VRnYWuLWx7YJMOtsOAwG1a6g9sMinymhZ7 T5V4TRS7A57Ml/rrRbfw0kvuP2tgE4InQCWzymAjPCGFXswQirY8RlcRo6uM Bi1WxSxVRlNhE6qgK3qtOmqtKmqtMnKlIgzZZEnlNyPx1Cj8gU1qki3UcWaq eAt5rLk8wVqZZAtsMl+X9W654Y/7478ejHzcHfxhZ+D7ncH3O4PvtgceLXU9 0HVuz7X8+ES7q+2skWUohQkKflxeggcrwZ2b7CHKCRisyd+frqL7dFG+ybM5 5fM5+QvaN6EZ5Ev6BCbYdBcexb+FUL7im5h07jqGTY4Vc7wj6ZpF2IQ5oORL DYRNZy8eyyZwpgvYyjE1/2aRemnEJhiExx1YENOExhN9qIQJKTv9eaDdgXzU 3iALtNNv3BkYhLNLjGa+r7TlgJZbs2llLbVQojHEWDSSpM03pM01pM3Wp83U pU3Xpc03ZU/Xp49Vpw6VJ/apYjtlka3isAaBXw3PqyLfXZntJM9wkGc4KjKc xEl20lQHRaarKtu9LNtTneNVkedDGyLuSB9EBEzQMdHbKDnGYIJC0wQFeCJM dgAqISpIcCxIdOQlOrITnFjxjvlxDnlxDrmxjjkx9jSbWDPZBIW+CbBJbrQj O96VySbS/GA5J1TJC1MXRpYLoiqLoqpFMfWlCc3KFJz9gTMKjQYvMtkEFgRA MPzOdE+MZseTOSPHsgnBEOJT4IxFykahJ8KTblfE0SAUYAQIRoxgxCZ4e3ir 5OZ1hr7EzO9hRtSxy9biiBwdDSACwAeqwIxRhMYkFNJt+EtswiQRcm9GNWCk dbBp0oRUedGzTo5hExTTNPmnbMLEk1c7Y8gmTDwhQfifj3TAJn+8WPs78Mhx bPLbcWzyG4NNCJ4gjwCeoHvy4dkicMrPVMOudazgIkMVAUCQSrB5Fw4xQX7B MfHwLlwDSEIyJphPgTU9/WSGTEikox86YpcwwESLdVYkG0KKssiAElLchbRC 2AS/H2VoGqxFQkEnBV7++FTHnAuP3s2f/eBzcpwcJ8df+gA2cbQ8E+plw04N y0kISgz3DPOxAzaxu3Hh7o2LiCc2BjYB0MA4PPomdywukqSJqQiefIVN7K0t b169ePm7v107e8rG7IyDxRnnG2d9rc96Wp5K8rKo4kSOVrG1rcUbvXIjNlmg 2WS2LV/TxZ3vYE02ZY03pE81Zy318Y5lk4Mx8e5wsbY1t18eMaiImKlNXunI W2/LXGxIGhD7tHIcW1j2Lbl3Olh2UxK/SYnvRInnRLHntMh7SuQxKnAmbDJX ymAT2jeZofEERUPKMb4JviSFXphG0ZZHa8qjtRVRIMCTpcqopYrI5YrIlcpI zJusVkSs0myyVhG0og6cFnvMyXyRTSoSritir0ujzKSxN8tS7BRJd0fLEl9q qn8/HPvtcOznvZEfd4coNtkefrc9/Hp75PFy7+5C+w9H2gdrAy3l7ApxWmFm UEqoXU6MMzvRvSjTd6A672Cm5khT/URT9Xxe/Zzqx6V4OS97RZVvHU8lBEwY ZV3f6pu8XToeT45zT/5lNmFWkTHB5Os1XYRKmLMXv8AmSgzF4xreop2UUqNc CcAIEgrZNOCJMZuAkE2MZDThHS0SgiSEU0Ar7bnLrTmopZZsosXmLCNpmrMW mjLnGzOASiZqUserkscqk7rlUW0AI8LAap5PWb6HLNNJnGovSrUVp92VApVk OSlz3MryPNT5XpUcP0ps/3KWrzrfp5wFLwMquf5qlg96JSBYY8aECpjkeDCL u5S5Xsq8T6kTFAZPJJlukgxXcYYrxk+KUpyLUl1ouRanuRenexRnePCSXTmJ zkAo+XEAJg5Y1pUSbJ0caGWEJ+mhd7CmC9iEFefCSXAjNV3AJjJ2iIIbqioI L+NHlAsjKoujaiVxjfKkNnVqd3WW0exFzLxjKRQusKUwoQ9iSWDYBKu5SL8s 0kb4WDZZZOQ4CCBgF19ioxxb4sW8nrAJ0+kwghS4SbxbbCYM9w+/Dnw/6fe7 aAAfEm9nog1hB2QKpCTSEJgJSkZMZNSMi0TdQczgvNGwRQzCY8UXc8qJYVJ8 HWh/odmopsu0mgvB5EtswtwhbIJ9uph4YmggrPn5aBGD8P8GmxjhCdZx/fx6 Ddjk/RPtu6MFYJNfX+uHvxM8IYRC+nehaYK9guHi//h+F6MlgCdv7gNNzAOP MBoIL9JBDy1aG7SjofsKmBARNsEPEg8FacVokwh/BH4c2cTQtViHHgqZCAOL P/vB5+Q4OU6Ov/ThanXB+ea5SD87YJPMWP+EMPcIPwcTNrkAbGJlRsXh0TTB ZsLU5ERGFv6LHsqX2eTuLYvrF86anTlleeH07atn7a+ftbv2nbPZKe+bp6Oc LhdEu3RK05faxUw2MeAJxSYzrXkAJtpu7kInW9PFWezlabvZACZGNV2AJ3sj +rKug9GSrT5qFCNouytnsyNzujycsk5Y9q15d9vybEeLvaal/tMSn/Ei94ki jymR53iR65zUTy+6w7C+z7CBTZhiggnCCGhWGcw0U/SEUh5DWSe0b0KzCeWb AJ4slYcvqkOX1KHL6jBgk7Wq8I2qkNWKoCmR+4zEe6zIvTbFsjrZUhFzTRx+ WRxtqU61lyfa9kujns6Wf9wd/GV/5Jf90R93h99tDb7ZHHy9Mfj+YOr55vCB ruv9w/mjzdHOmsLGMlaZMCk71hXYJC/OuTDNq78qZ3+66om2hu7TVU4PMVG+ XpC//kJBlxGVGJ7eP4GJaaPdf+qbfGHoybeyCfMn4g+Fs9FnDQVgX2QTJpWg TNkEa73ohl3yV1q4VcqIYcRJhGSEIt2V61O7YEPT4GPY5GCYQ8q60DQBmbYF XmnPQCohYILwstaRt9KWiyKQomvKNNU0IEl18rA6rqc0vKUosL7Ap4bjqch2 kmc5y7KcSzOdJOmO4jQHOEszHOXZzspcNzXLs5LrW8Xzry4IqOD4qSkq8QUq qWD7V7ADylmw6U/S7kglcBmecYFvUU5Kvg+wCeIJMxFPFhShZLpRNkqGu0Ee 4kwvcZaXKMurIMWNm+QCbJIXR4FJZqRtergNIAlhE2ZlF2GT/FhndrwrsElJ NpWFl+QFlbKC5ZwQJS8M8ERdGF5RFFkjjm2QJbaWfbJOjPAEMxo4ipGk4HGe CBolBEzISwIsCCnHsglhEDKsELvvGsVMFhmNfBEN8Ppjs/DHWifws/D2AEzw V4DfZQEnQtLWic4QZlk0QRsQlmMx+3SR6i8moVBg9fnvhd/DjKKQMq1j67UQ Q5iQQmGIBlR/oK3HofCHukbQgeZT/p3os/ZcBjA5lk1wh2wim+DsRYInTDb5 6ZGBTV7+L2ATTMQDoaBpgnjygTI1lshoRRRmT4yERV9/f7cNYIL1XWTqIgnO Y9suum8wNuPSknotdE9IzMTIMTGiDxSZWoJ9g8m0FCakkPox7FRMOMjQFkwv +EP98Xbzz37wOTlOjpPjL3043TjrZXs1wsc2K84/Pdo3MdwjLtTN/e51h1uX MGxid/OS7c1LVFmXIW+C493tbl7Bsi4y4uTmldM3Ln8HsjI/DwIeuW1BJU3u WFLdum6bX7DBcSeMoSfWZhduXT5rdfmM9eXTNpe/u3PluzuXT906c8rR7Ey4 8/VkP5tybvxcu1zTpZxt5Wq7BCv9Jct9xcApc+3s6ebc2bbcufbc+c7cha5c TXeuticPzkAlK72FIPRNNgYp7U+I9yckB1PSwynJzqhwrZ+72JW31pax2Zm9 1po+WxHZWeBSl34L2KSbZTtX6rukCtSU+swUu04JnGeLXamWwlIqhEImM1J5 E/oMmpX5T0t9QTPALLLAWXngnCJoXhm8oApZUIVqysLmFMHwktpRUju4uQgM wtASpTBdWein2Y5lIYsgdchKRdCSOkCr9F9Q+E2UuLdkWatjryijr5YnWJYn W5clWstib7ZyvHd7Cn/eGwQ8eb/R+/3OwLvtgXe7I293x97en3m8OXSw2v/x 9cZ//vJosEtVochLCLGN8r2ZHGrLSfaQ88IH61i705WPtbVH2uqnmvJnmrLn C9SAjxfzUhpGiFHCTJd8Bib00zt6Ctg0uOztkl6MTrxGV34muPLdsvrzRsQV X6+/olWBoi0PwApkCn3jX7wT+jspJCGduOD840YNBkzwpVE1F8ET05snfgr+ Hei/jPzxVMnDiaIH4wgmyCZ6weajySK44MmM+OmshO4brO/TBVSCQXhS3AUv gVN2B/K3+3J3evN3e1k7lPK3evM3e/IoAbD05a/35q1256wAswC89LN0LVmL LdnLbfmrHazVdtZyG2upNR9EL1i65ry5usyJiuRhRWy9ILCc5anKdVflutH+ iJ0oxU6W6azIcVPleYCU8Faeh5rlVZrpKsuEa9wU2bDvjRZJLT+kmhcEVAJ4 osr1VuZ4KbK9gD7KAUO4/nBWs33LWD4qIJF8b1h82qc3FYYSL6zyktIkIs/x BslyvKXZXpIsL3GmpyjLU5zjLwJl+5Vk+RZl+ggzvIXpXoJ0L36qByfRNT/O KTfGPjvqbrbBN2HiCQjj8FjTBWyCkZOidB9Rlr8sL0TJDi/jRqi44UpOWJUw ulIQBaoXx7er0nqrc/prqTg86daFbILhceKYIHEQx8RITDwhc0+M+vqSJsNk hCIInuTRxTC1S4y6eJF98llSOcYkBeKqoG/CrDfD34JMadTRZg1cRuwPQkCA FThIBSetIF9QxV3jypUpNWhxTKEdkc0NiCe79MhG/cq9It1g6cqocnVUuTlZ vj6hXh8v2zAkSij0WKjZnq/ZnKvamKlYo7U+W7k996mgixglBjb5BCYgdE9o 1e8tNOzr1XSgab6nA0hpB0JB6+TxRt/jzf6jLdDAk+2BpzuDoEcbfY/0+7AJ O0PPdodf7Y6Z5k1wHCFOhKdqul6u/cebzb+/3vyD1u9MangDALL5i5HebPxM tRSm1r++1V/w67stOH98tfYjlTRZevdE9/ZI8/6xhu6stYgtgoE7/uP7XezE hc2EAUnQEEH0wBIvIrgeewgD4Hw40mF9F05+/P4x0oeOTDN5+2COHuyOHbS0 aHMATeCgRpKgJ5l3WDzfGwfBgqRLMGCCwqg79viiGwvDFy7+BjfwbOWXp8v0 eemnx7qPR5R+eqz9sx98To6T4+T4Sx9u1hc9ba8Eud1Kj/bJiPEDNokNcfVy sHS0vmxjTsXh7W9dvnuLYhMECkIlaKDgFEWCJ7eungFCuQVsQnslty0/sQnV s8v8oi2tO9cvgGBhffmc9eWz1lfO3EY2uXzK9vLfbC/9ze7y6TCHa/GeViWp waP1oukWGbDJQjt/saeIZpPCuTaqgfBsW95ce958Zw6yCQrZhNR0IZvsTYgB TGhJdsaK1gcLVvo4yCYb7Zna2rheoUdDphWwSVuW1ajQVavw18r95krcAU9m S1ynxF5TYm8kFIInoFmGjQKCd6ek/qCZ0gAQxSmywDl50DywCS2KTWhpVKGL 6mMEPKKlxzsytVgGYOIHbKJR+AObtOXcLou+pIi8XJFgqU68pYi7IY0yr0qz n1DEvl1pBzx5u975dqP73Vb/292hN3vDz3dGjzaHjvYmHu1O7K8Nt9QIWuuL xZyovCQvYJOEIKv8eOc2VerhQt0jTfXDhcqjhbIn88pn8/Jnc1SREjP5zkyX mLIJMReMegt/o5AISGHVN1DJZ07Hl/wOvBP8QsQQnLFIdsjLb2QT3EQPBf4s OEH+0WQxsgkNJgKkksMRPghewrtH06JndNOzYx0WulewfmoJaHeADevDQd7B AHenn73dy9ruo9XPPhjh74/wt4e4gCTLXdm6jgxNe/pWH3+7r3Czp2C1g61r zpmrz5ipSRstS+yVRLYUBNTkeVZkuakzXMrSncWplCciy3JR5OgZpIrnV8MP AFUX+FdyfcvZ3rAJKmf50s6IP1AJYIg8y0Oa7lqW54OOSRU3ECClpiAYaIVJ JUwwMRXTQ6Gj8diwi2ITA5h4iTI9SzI9C9NAXiBBujdKmOHDS3bjJLqw4p2B TXKi7bMibTMj7qBvYiTCJjlRDoRNBKneJRl+0pwgBStMxYlQssMUrNAKfmRl YRSotiSuWZbUVZ7ZX5NH7BIMnqCwQxc+2KNLciyYfIVNjFv70okSZk9gtBiO ZRDTXr5G1omGJgv4QeiwGJV44U+Bn46QAoQFvw7OtccWYXo8YdguzKbBhIAW meGUCdXKtHp1phzOsAY8me0XYaqF+jUHJEtDMgCTlRHFKk0oIMCTTy28ZisB TCjNV23MV63PVYK2GK2DCaEY0QoCC4EUAJZ9TQMQyu58HYNN2oiBQmHIZt9j YJPtARy2CIIdEO483R16Bv8/uT/yes8YTECGqYtaHG6CWfg/Xm0Y2GQTQ+sU PhzHJj/TbELwBPX79zu/vd+m8OT1+o/ADs+W3j9d/P5IR0a6E+ODsAlz+gkp 9CL2CrYOxqQ8plTePVx4/0iDsADEgc2y3j9awJAIM8NOR0IWSQkWTkLBC7BY i7gn2LkLs/CGIjG9LWKAFKzp0qD58vOTRfijgYDp4Ax/Q8zsgP7sB5+T4+Q4 Of7Sh+edK+42l/ycLNKivDNj/eND3YFNvB1vON++AmBia3kB2cTa4hxhEyae YGUXogcp67pl8E0QTxhsQiGJzbXzt83OgWBhdems9aUzNpfO3Ll82vbKabsr p+yvnnKE86VTgXcuRbtY5oQ69yg5c63yhXbBXGsB4ImuW6jpLJzT9xDOp9ik A/Akj8aTPBDmTRBPkE02h4q3R4t3x0X7k5L9SfHuePHWiGBtgLfelbvVk7/Z lbPUmDImD+7gOrezHBozbnbk2UyJPDXAJhKvBYnXXInHRInnpMgLRAgFIQXO VLfhUj+0UWCBbAKaNhAKiODJv8cmWqXvgtxHo/BbUPhNijzac++Ux15RRV8F NilLuCmPsQA2UcRZ1WY6bfaKftjs+rDZ/W6j++1m79vtgTc7g6/2x9/cmzra Gf3vvz38f/7HD51NJQX54UHu12IDrPMTPYTZARJWcIsieXFAem+2/P6s+uGs 4vGs/MksPEVL6CEdpUaNuUyTJqZgQtiE+dj/de74pxccCyYYSDe6EwI7ZMEk EVgQAMGvIkz0dcYhvyYG/5FK6PGLEqAPELIJoZK9Qe7+EA+tE/RN4GI4Y88u g8MigAWwCUAKcgrdNLgAPrg/yN8b4O/08bb7uNv9vF14OVS4OcDb6OfCeXOQ tzHIW+vjrPSwljpZmpacqdrUYXV8b2lkpyisrSikhuVdledRkeNRnu2uznIr y3RVpruo832quAFVvMAKjl9Zvo8q10uW5Q4LNQuoxLeKB5ASVFcYUlsYAvSB /gjwCJwrOQEAI4RH0ECBTUAVBBNEEqQSNe2k4CblleR6KqmCLm/4flAlV18D pqLru2TZXqVZnuJMD8oxyfAsyaCiJfxUkKeRcqLtaFGOCYBJRrhNWqh1SpAx mCCbYOQE2YQd7wp4UpjsWZzuK8kOlOeHAp4AmMjzQ8q4YYAnVYLoamF0vTiu TZnaW5Uz3KTPmACe4JhCWCCVGOnb2YSMRyRTDinPgh5cgvuAKks0CByLIccC C6mnAi3SA+Lhx5FsO4bTscqLFINhczBmch8+gjNQ8INo6OBPIdViJPz+WR/j ceXShArYZAOwYqYC8AR28DfVF6HRVALnxcHS5WH52phqbVyfZKHsoXHlymTZ 2jT18Q0DnhixCZLIsVn4Q13DvcUm1KFOr3uLFJXQ0nfroghlvefhRq8RnsAa XxIweXEwCmxiOt8EC7oImIBg8dvLddDvrzaATRAfgAt+e7v1r7IJ7P/0au2H Fysfni//RCMJmfZOQiWf2Mdg0JDmXeRKgBFSA4YggwH51/dmACVoBlnA6fD0 AHfK48DwCF1/pUNXxVDfpSXT2+FdMuqdQApz9iJWiP38YhnHOJJ+XPjBj0e6 n48WDdLRdXG6j48p/dkPPifHyXFy/KUPYBMPm8v+zpaZsX7Z8YHAJnGhbr7O t1xszDBvAmxia2ATUzHZ5JN7QrMJwRNyMZU9MVAJnK2unLl96azNpbN3Lp25 e+Ws3dWzDldPO5mddrx8yvHS33wsz4bdvZrgfquGlzjVIFloL5ppLphtKdB0 CBY6Cueo0fC82TYWCAhlviN/oZO10JWv6c4HNsE2wkw22RgSAJ7sTYiBTfYm SnbGigBPtno51FNfH3ujM3uhJm5Q7NfGcWrOtmnLvTNU6AqgsSDzm5N6z4g8 x4s9QEgogCdMQjFyUgBDjDQrC/x23+QYMFEFaxTAJt4Lcl+Nwn9K7NmVf7cq 4Vp53PWqpJvlSVaKOEt57A1F3C3Ak15R1KPJso87PR93+77f6v6wN/h+d+DD g6lXe6NPtkdeHE69uD/TWsOvKM3MTfLKjnPLiXPNjXfhpXg0y5N2piuRTR7N KY/mFE/nZPR/59fPNzFqHXyse3Ksk/ItlGHEJsy+vt8CJobCKv28FSy7wu8h rMH8ZvIugZF/GjZhCn8cE0wANwA90DpBNkG42B3gAJ7AGnbgLbjmaFr0aLLk 0QRcCSBT9GAMWEYI53ujgvuj8EHBvZHCw2E+fBY+uN0v2Bko2hsq3h8q2aP6 YBdt9gs2B4VrvQW6TvZ8a+50U+ZYbcpgRUK7KKRZEFDH9a7K96jM9ajM86jK 96xl+9VzA+p5AbCozPUpz/ZSZ3sqc7zoQixPRbYXkEW9ILxeEFHLD6vmBVdy AlHlLH9Vrg+aI0giBENgBx0TFL4EDEESQSRhCvEEwASFCRQModB44lvG8pXn 6NlElOFRku5RlOYuTHMTZlBeCfAIN8mNFe+cF+uYG2OfHnYbYASVGmIFSgm+ dSybkDg8jl9ENhGkeAGboG+iZIfDGdhExQkrL4igrBNBVG1JTIs8uas8c7Dh U9KEdOtiIgnpFfwv+SaETT5l4Ydl8Ba6GHA95TV8Pl6EwMixCXcCJqTJMPE1 TInGVAAjeLc4yx6ZAhlKSxeYUaVcNDoRWtFzCs6sH1PoxhTLk2XAFIAY1MtR OZkjucywSwBPAEzWx8vWGBH7ZdCECvBklTZfQGuzFdufZd71Mk3Ekwv2NfWA JPeXWh4stz5caXu43P5gSa9PnbtWu++vdT+gCYVACvomsEDfBNgEfRPTwYvE NPn16fInPHmx9l9hk1/fbYFg8+Pr9Z+oyq5VYJNfDLiBvgmcAToIbhAPhZR4 YboEK7i+fwxAoYUFoAoaLthSGISlXJgWAXz4+zv4+AYOcMeR7hgzIS28SEYe EYYZJ0E8Yc5nJG2EmZl3Q49i3S/PltElgb8e4An8GQFPfnoE55OarpPj5Dg5 vnZ42V51u33Jx9E8JyGQmx6ZHOkVG+Lq72rtZnvd7uYlwBOKTW5etDI/ixiC 0g98N7+ANgrsfMYm188xrRMbiwsYVKEuuHoWwMTW/CJlmlw5Y3f5gt2VC/ZX zztcPe9kds752lmXa2fcr512vnzK9fJ3/jfORthe4Ud5NApSx2rZY7WsiXoO EMpcK3+uFc682VY2iJ7AyFroZNNiETbByAmyydoAf3NYSFsngCei3fFiwJPN Pt5WP2+nj7fZnb/UnD6hCm/junSwHDtYDt0cp/ES73lZwDRgiNiLsIkRniCV oIGid09M2ORLNV1G0RIURSLKICNplUAlPlqlv1YVMCP17mHb1ySZ02xyg2KT WIpNlPHWspibyhT7ubqsdytNvx8O/LDd/dPB0Ie9gbd7Q2/h37y7I2/uT715 MNtWza2WZUoLYviZgflJHnk0m8Aj2e5M9YP5yofzFaSmi4aRUrqyy5RQjsGT Y82Lf0oiX7JUiMfxpSuPZRMCJkbFWsxqsa98oSmYmP52dAqe+iMQMAHiAGHk BNjkcISPYELYBCu74F3gl3sjwnsjRfdHix+MlTwYg5dFh8NCWgI0SkD7g4UH Q4KdQdHesHR/pHR3SLLeK9S2cWYacuZbWFP1Wf3qxHZpZIMQkMGbiqvnupfl uKmyXVXZsPaoZPlUAwLkeVfm+4LUud6qLC91jk8Vy78s17eCDXABuBFSUxAK Z3xZxQ0GwU5dYTgIaKWuENahNQVwGexTRkldIbWJqMKEFAyVVPICqgoC4UxK vHAfRAgFW3iRRl5qNlzmR4VNqIIuT1GGezGASaprYYoLK84JeCQn2j4zwhaQ BBgkOehmUuCNBH+LeD/zON/rIFgnBliaggmTTXD8IrbqAjYhNV3AJljTpeaF oyr4EcAmzbKkdlVaX21uX10uNhPGmAnI1DT5l3wT8vyPD/8kcgL72J0YSAf2 FxlsYjop3ijkblp8xUzTE2xhBuoJ1KBBAzeJAX8kFKzd0g9koUfDL/SL4S0N jS0IJgSytKNyYBO0TrCma2FIqjOMfVwalqFvsjGhphyTMRWslw2WEHUPU2oQ sAmlaTWACTDOtgl9kPHxRmBCh1D0ORTimzxYajOwid40obRGsQkKCAVl5KSg e4JswgQT0MfHn/7jPzXf5MXq3+Hh/7/mm/z2fhvxBC9AQvmZLtNiiiTc0S5B PIEfhN2DEUCwYzBpGkz35lrCci/6rSUc144BdnRDkCAAQ4ApEC7QLiGpeZzP CBeQUAkiDHooJBSP7zJLv75/TNoUU9/z67NltJmQTQx4csImJ8fJcXL8kwPY xNX6grvtlez4AEFOXHqsX0ywS6C7jYedOVAJ4AlhE6zjIkYJsgnOiMd+wgRP KDa5fo5YJ8gmeAEgCSZNsLjLyewyyPnaJZdrF12vXXS/dt792jlvi/Oul0+5 XPib59VTQTfPJblYFka6NwhjO6TJfWWZI9X5U4282ZaC6SbuTAt3tpUz1wZ4 grNOOCAjNlkfoLTaX7ABD3tjJcAmB1OUdULhyZBwe1Cw1c9f62KvtOXM1yR2 CX26Clzb2U5teXb9Ba6TYt9pid+02PdY30TfrYvBJiCqxxcjbIL6X8UmOlUg xSYcik3UsdfK483pvAnFJqoE69JoS3H0zdYC/72Bkl92un/a6flpv/+H3f4f 74+92Ox9tjXw+6vl//5xf6hNJOFFlLDC85K8MqOdsmIcucnu8Ei2M135SFP9 WFP1RKN+qlHps/AGNnn2+YB4k6mLKpz6wUyOfAsOfB1MvoVNmBBBoiUk7W46 sgTvCj9L7pDc85facxmxCYmZYI0W4gmyCZomgCQ7/WxkE6o6a4iHhALvAnfs DwoOhoBQAEyKD4eLUOQlvLvbz9/pK1jpLFxs5y+0cKfqcgfLUztLY1tKImr5 gdUFAZVcv3KOr5pFN+xl+1SwfSo5PlVc32qeP1xQVxhcVxhSzQ0EjmgQRoDq +GHV3OBKNgAFkAUgSSgsQDUF4Q3CqAZhNH2mVC/AcyRtqYD0PAKEYmSXwAKB BXgEwcSITYiTQgLy2GQYR5/QkROqmbAk00OU7laU6lKY5FSQ4MiJs2PF3kUM QRJBAYzE+lyL8TaL9rqKgjXsJAfeOpZNMHJC2IQd73qsbwJUUsYNU3EAUsKq i6IaJPHwv4We6uze2hycw4iP7qQ9F6ns+krk5FvYBHPrWkMGBK/U0mFzUjdl 6p4YtQ5mxklIOyyjLPyxngvRfJ8IfrXhZg6c4SbRN2H2H4PfF7gMSQrvHH8X anTLkFQzIlukK7uWxpXAJvODcJkEwybULQ3LCZsApywNyRYHS/G3pn5T2jeh rJOpMqCbdbqyyzQLz8ybMDcxF49hE5I3OdS1GMImHaSTMOZNAEaQSoBQ7q12 wYLJJgAmyCZGYALCFDw8V1NlXc9X/v5y/R+vN/4AKkG9/uRo/EtsQoSQAvpI F3QxcyUEUpj1Wkz3hFnrRSabAJ5gboVe66e0YyoEOOL53jjABSywlAt9EKQM 7NaF9V1kVCKG3A1vabEYDEWGwmMNGCn3wn7C1LD4Ix36Tfq/3rMVWH+4P/f+ cObPfvA5OU6Ok+MvfXjYXHa1vuhqcykt2qcwOzYjPiAu1C3I446HnYWD1RUj NjGt4MJZJyR4gsMWb5mfJ2wCwk24mKoBs7iEYAJn+xtXXK+buV2/6mZ+xd38 svv1S57XL3heP+91/ZzrpVNeZt95XPmbv8WZaNvL2d42JUnuFazQlpLEHmXG WC17prlgsoEz08IBNqGsk7ZPbELmwhsS8ZSATdYHCwmboHVyb6p0f0y0PShc 7WKvdbKWWzKHZKHdfI/mPIfm7Dvt+fYjRV5zsiDAEwImJHICojp0fZ6Fh80p iR9m4Y1S8P8VNsGaLo3CT6sMmJZ4dbPsqhOvl8ddV8deL0+yUiUAntxUxltL Is1lsVbqFLvJ8uR3y40/7/b8sN39AXQw/OFg5PlW/4eH07+8WOyu41WKE6tL M4vyQnPiXTOj7FkJzvWSuM0J9WNtzZG2GtjkGc0mz6nHbym6A0aEcuyIEyZf ELj49rwJU/+UTY7NvxuByU+btcxvYI4sMWIQIzYxTfd/CU+IdYJlXcgmaJps 97G2evP1GXaGgDv2BgrxDAJIAR6BM6w3uzkrbbnaxoy52pTpqsRBVUqXNL5R EFbJ8lNme8oz3WWZ7hVsv2peYA0/pJofTLMAEEFQOeAJxxeYpbYwqIYfVF0A +BDQIAwHdiCGCPBIJSeklh9RDQ/hvDBYMNc0kkTXFUaiYE3XdwWAiD+CeIJn 2MQqL3W+L1IJ0y5h8ggmTfQxecM0RqpJV4aLKM25JNWpMNGhIN6OHXMnL/J2 Vuit9GDL1CCLOJ9rsZ8L2QQXKGATUNI/YxMccQJswk/2LErzIXkTOMvygoFK lOwQBQsWIRWF4bUlMYAnXVWZwCakkzCWdTHHmnwlCP+Vmi4cIm/knmg/xxAs oyLp+K+zCTNaggvsAGxU5WU0a558FTWvZKoc7gHDNXBvS6MKnM8I9w872AQA FmSKPRklSWXqe4rnAEZGZEAlulE5ZuHxd4Rrlum8CVZzUY7JsBzYZIm+B/gq 6m8yIKZ8llH5Mu28rM1WgHbmqxmOCWWLgAiPMNt2oQiboA40zYfaFmSTT22E t6mACTAIwAhhE0AVJpjoa7r2j2ETbNKFYIINhIFNmH26/o0sPOERpn5hDF5E YUsuIzwhIjbKP97v4JQTLPQCMPlwRLUjpjsSI2IsGUYiarG+C/Ps7x8tYB0X puDRLsHSrF9eAumsoIeCF5AECsZSmI4J0g0WgJFmwhShHM4YWpxpgUoA6+Cv h8GTP/vB5+Q4OU6Ov/ThYnPBzfaSu92VhDBXVlpYWqxPSrR3oPttN1uzu5bn bC3POdy66Gh92f7WRUQMvf1hEPomjtbXnG5fx5bC1LB4cwCTs7eun7UCXTtz 2+zM7atn7M0v2F0/72B+wcniouP1Cw7XzjtbXPIyu2DQeS+zcyiPK995XT3t bXba/RJlnYRaX052u50fekeS6lPHj+2SpY9UsaYaC0AzLZRmW3hzrby5Nt58 O3e+naPtKtB28XXd/MWewqVewXIfqHB1QLg6KFwfLt4aFW2Pi3cmxLsT4u1x 0dZo8fpA4XIPZ7mLtdyeO1+f2l3s18J1a2W7tLKcuws8JqTB0/LQCZEXsgmW dYGAVpBQSOTE4J4E6AVsYhBzZx6AhZYpmDDzJp/7JgGgJXXQkjoEfkRX7t2K 6KsVsdcr4szL4y3L426oaZXFWCrjb5fG3KrL89A2sd4sN3+/1fsOtDf67mD8 1cHkzy9X/4/fH4/1lEn58TJ+XF6SFyfVOz/BjZfiUVMcvTIsf7hQ/Qh9kwUV 1aeL8gUkBElME/FG1gl5yGcCCKmzIp4F8AIusCILgQJ2MJyCOANngAs0PkzB 5Fhfg+RTkE0ATD5u1eGXkPz7V3Dj2Cj9mxXVq2XFyyX5c52MlvzFouK5Tvlc C1I8A2kUTzVy0KsFxdNp8f0R/m4fG5EE8ETXnLrUlrHSlb3em7fRz9oaYO8M 8bb7eHuDgv2h4u0+/mo7a7ElV9ecO12dMqaOH1bEDsqiu0VhrYUBzQV+qmxP gBFFticGPap5wbX8UIOdEV5dEExl1VnUqJHawmBQdUEgPX/EMBKRgguACECJ 0JqCcCSOWj5VrwXnusKIusJwLOtqEcU1FQOYRMDLclZAWR4Qhz99WRhdx0Wp tjCspjC0VhBeww+tLAip5IdW8UMrCkLUdE1XJdcfRA06obt4VVJx++BKbhB+ mzLHV57lLcv0Kk51KUl3RZekIMGBHWMLPJIZcisj+GZ6IKW0gBupIH/LBF/L OB8gFItYb/MYr+sxXteos/f1OB/zeF+LBD/LRP8bif43mUoKuEWaCeM5PfQO thFGNuElugOeCNN9RVkB0txgGStUzg4DKdjhSk5EGS+qnB9dKYytKo5vVaV3 lGd1V+f118HDecFoq2C8rWisVQCaaC+a7Cihz8Uz3eLp7uIvcQpSCamAYoqw iYaRMScMov2cTfCtYyFl2WCLMCekMBMoRiVhzFEpZGI7fAmyBpojQGHELQIo AzqDM1XWRadjtIakDN0luGS6UzjbXUyVb40qdYOlM11F8HKhV6TplywOlgKM AJKgYwILSoacC3zDZLcQcGZ1Sk1bJ+qN+aotTc32XBXG3unJ7xSh7M7Xbs9W MwegwCbdT7j1QNMGoqcutqP2F6jNe7qOB0tdj1Z6j9b6nqwPHG31HW33Ptrs ur/WcbDcfrDcdrjSgdmTh+t9R1uDT3dHnu+NPtsdfX9vBmDk1c44VnbB+vt7 s3TYZJGETf54sfYHHTbR13S9YsDCu20QuiG/f7+DQmfECFVMyYWq7NInNZbp RDniyTK6HkAKqF9frdHST1T5/Q0SCiUy1pA2UPQfx+sRND4+B1RZQvogWEFD BFXTBZ+Fa5A74IP4bfpI+/Nl+EFAKHTMZJrZQ5gMQyFrMgwF9OZg6v3hzI8P F/TlcHRUByu7/uwHn5Pj5Dg5/tKHu91lD/srng5XY0OcclOC0+N8QQY2OWtr cRbYxMn6sqPVJWYEnrAJFno5WJkBnty9cVkfOaHA5AzI6voZaz2bnAYqsb92 zuH6eWfzi07XzjuanXO+fsHz6jmDzhK5XTxFs8kZT4AUs+8Cb16IsrdI9Tbn xzir80IbhfGAJ8OVeeN1nKlG3nQTb6aZN9PCm23lzrVxQDg4XtNJEcpij2AJ 2KRfsDpYtDZUBGyyMVKyPS7ZmZDsTko2R+Fl0doAf7mHvdiZt9iWo2nK6BUH tvE9WzluzflObWyX4RL/KXkYE0lAY0XuIGKgkFA8zSb+n/DEIAIpSCULimDQ J/SgYYTgCbNbl+EaZJPg5YpQIKCuXDtgk8p488p4iwqKTSzVsXpJo26IIy0V SXfbhaGHY6ofdgfebfW93Bp8dzj5ZHvkcKX/6cFMS3VhpTxPIUjITfTkpvqw ktwFGT5NssS92ZqHC1XYQ/honsrCP6UHmjNNEyanMEPx5MGe2RfLiCNIUyzc JGl0Jo9gg1+ECDLo8FuquUBGzbjIKBNmcP7bwQR/ixdL8pfLKMXLZSUK2ARg 5MmCXkfzskez0idTokdjwr0B7kZ37lpn9np37mZv/u4Qb2eAA1Sy1pu33pe/ OcjZHeMfjBTv9AtW2lkztWnDyphuUWi7MLBPGtUtCm8XBrfyAxs5/vUsXzg3 CiMoKKDqpvQpD9Ijy0g0F/iR6Yc4iKRFFNNcEgPQ0VgUDVRSL4gCPKFfRtUL KDCBM6xhp4IdCAQBIAMwApsNwkj4IAmhwD6oghNYzgmsg1sSRlQVhpXzglXs AFmerzSXbszF8qXlU5bno8qjzsocH3k28Ii3NN1TkuYhSnErSXblJzkWpjgV prgUJDmx4+xyImwyQqxSA2keoXST1i1Qgt+NeBpPDGxyPdqTwhN4CZvwLsII yIhNmEMYjdkkyYOf4gVsUpIVIKHYJEzBiZCzw+Gs5EaqeFFqfkyFIK5SGN9Q mtKqyuiqzO2v4ww38UdbBKCxViEIIAXYhMaT4ukuMVZ2GeEJM/yOGMIs5WJK 3yCLgSHMXlhGzHJsD2GCIZgiYdZ0GcXhTQu6sJ0vXI+Bd8CTyU4BUAmJ/w81 sXHOy0RHIVXERf9SWsNkFgCQ6Q7BZBsfYAS4Qzcgne8pmaPZRNsvgZeETdA0 oc7Dn25mrL1AM1y6NV9N9fiiA/U7uvrtuWrCIMRAMS3oogq9Zpt251r25lv3 F4BQAEw67uk6UfcXux4sdT9c7gE8ebza92Ct8/5a+73VtoPl1v2l1r3Flh1t E1XWtdbzYK3v0cbAk+3hpzsjwCbvDmcASciIEzRNsB6JGYQnWXhKDDb5jS7r OpZNPvNHGL7JZ4RCt/k1FeKJEaF8GvioJ5QNgiFEZBS7gU30Hgr2EwYGAZR4 sT8B/2oAfTjS4k+BBWZJ6CtXyJf8+FSH0IHVX6SIi5SEmY6S//BgHsAERafg KQPlj5dr/3i98Wc/+JwcJ8fJ8Zc+kE3gHBlgl5UYkBrjDQrysHG/e83uxjnA E8o3sboEZ5KFJ3gCJGLKJtQQxmunUVbXKDaxuXb2zrWzhE2czC8QNnG7ctbt yhmDTqNcLp3yuHbG2+Kct/lZb/MzfjfOB1lfjnG6kBdiI0n1qWCFNQhiu+Rp w1V5E/Vs0FQjZ7rpU30XaL6di3jyOZtQYLJJ+SZ6NtkaK6Gsk5Gi1T7ecjdr uSNvqS1nXB3dXezfzvNoznduyXfqF3hPykKRShBJQKNCNxAJnnzes8sYTECf I0kICuc2LigCQYRTlsrDQARPYAfenZf5Lsj9FsuClstD52T+PSyHqthr1QkW VQmWhE3KYixU0ebicPPSmFul8TayJLuxiown2iZgk7d7Y+8OKDa5tzbw9mix sYKnEmeK2JEZMS75iR558MyW6lEljFwdUTwANpmveDyvOppTPJktfTJLsQmW LRFh/RKukVMAUr4w8YQafUiIwPDYT63hIySfgn4KmibIL1iO9XGr7uft+mN9 E2Z11mudkpg4xIUxDbYbVXB9o14sUTDyakX1eqXs1UrZyyUVgMmLxTLQc13Z M63qyYLyaJ5qa/ZwQnRvtGh/sHCnn7fVx0VtAqr0c1d7WYudObNNaWPV8f2q iIYC74pcZ1WmvSrToTzHuSLXrSLHrYblXc/1a+IHtQpDWwQhrcKwjpLIVjHA RXRTMeBDVGNRJAhwo1UcCy/rBeEILFSbLMpVCShn++rBhOsP+3ABXAzoQQfb QRFV3NByVpDBSQlBIXq0SeLbpQkooBJgE0zEk1w8qIYfWs0PVeX7lbH8gUpA inw/JdtfxQ1UsXzluV6ybM9Sera7OMO9JN1NmOQCEiQ6CxJdChNc+LR4CY68 REqceMf8GPussNsAJikBNw26lRJghSJswsQTwibwlhGbME0TBBOjESeAJwAm gjSf4kx/UXagNC8EqQTOICabgKpL4htlKZ0VOcgmoKHGAto6ofAEwGSqU6RX V5Fp9sRolAnpGPztbPKlLLxpcReZt06ohAkspmF5FJZ76Sc/0k238DKs78LB LoAkcEZUAWbBZmLw21F1aLSHArgx21U00Vow0ynU9IkBRgBJEE/wJWETgieL Q/pOYnAPwCYzfSV0D+Gq1enytZmKbW3t9hzVJfjzCq56HA2Psxfpl7U0pzQD lQCbMIVggmyCeAK6v9p+uNJKq+1wpR3wZFvTeLDccX+t++F6P7DJ481BwBNg kzd0NRdQCeIJHTbRfjub/Pp645fXG6YlWyRaQoAFmYWZiKdkIAsmRxyLJ4RK DDbKJ3OEXEP2kU0MvbOoCi68AHZgDQTxdGf04frA/dW+Z7tjPzzR4df+8ERL +ynaj8+X8NuwxIvE3knSBAP1pLiL5FDo+SbUcBNAkg/3576/N/v+cIb2oajw zp/94HNynBwnx1/6cLt7yeXOBVfbixH+dzMT/FOiveLDXEO8bD3tze1vnr+L NV00mxhl4YlvYn/rKoAJCBawb33tnBGb3KHZxP76eRCwiSPgyTW9XK+eNegM kfOVUx5AJTcueFmc8zA/7WV5NuD2pQi7s1kBVuIU7/L80Dp+dLs0eaA8e6w2 HzRRz5pqZE83s2da2PrOXW0cwBNkk+Xj2ATABLUHmhBvDgnW+rirXay1Lpa2 MW1YEd7J92plu7axXfoE3hOlIaamCfompngyxyjlMrJLjPCEtB1GSEFOIWCi pxIcmyL1BjzRqQKBTWCnl+1YE29enWhpyibSqBuK+NvyRNviKKuqXJ/5Fv7b zd73++Nv9sbgXxk/vVj5n//bq7620hJenJQXk5PgQffpcuUkuZXxQhYHpFRN l2H2IvYQJjVdhFBItuJoWoSQwuzfxZShtZccp8nDDiEanDX/uWRAGc/nqQ5g SChG49pNfRNDO18542fJmJ2ECRMxDZ2vy4hNXi2pXy4BkpTRPKICGHmmVT7V KOmFGv5Kj2ZkD6dlj2eVDyZKD0clu4PFm72Fq53cxTaWpjVvvCZluCJhoCy2 RxHVLg1rEPpXcT1FCdYlcVbixNvKDMfqfK8Gnn9jQUCHKLJLHN0pjuoURbUX R7UKI1oE4a2imDZJHMAIEApG2oFKaCShhH20UI3F4bWFwVW8gOqCwDpBSGNR BE00lEViUAwdeAfSiQb6aBHFotBYARhBwZVkXS+IQHuFApOC0OqC0KqCkHJO oJoGEyXLH9hEnu8ry/ctzfURZ3kAjxSluRalugqSXQoSnCgMSXAsSHApSHTh J7oWJrkVJrpTkxMTnFjxlHJj7dPDbZICbyYF3koKtKJlTet2UsDtBL+bptYJ k02IdWJqmiCYkD5dudGOGIcHMCnK8CvJChDnBAGboG8CZ4QUZJPywlgKT4TR dZLEjvJsZBMAk8EGHrAJ4gmwCeWYdIkJmxjhCTFKkE2wQOvfYJN/2kMYBFSy OV0BQgfEqLewKZ6QFr7Ma9CUQYAiU12ATbBzMoAJWiqAJ/ib6mP7tFcCeAIC JAEeAQGYoHWCeIKVXYgnekIx/CKT3cLxzsL5QcnqlJrqQkz36dqkTRMSgcfy LcZQeH3+Hc4PlykAAQw51HYApOzOtezMNhMDhWmdoG9iUOe91Q4glHurnQ/W e4BKjraGQE93Rp7D/0keTKFvgmVd8CBNj+T4VjYBMPn59RfTJUZmCtNP0V9G Q8GxbGKEJ0wwYbokpmxCrjT62p+eLYLol4s4//3x5hAQypPtEXj5+5uNv8Nd UQ2+qMvo1DxAyjK2/CKjFbFvMPovJGPCbC/8ka6Fgz8g/Bl/eDBPCOUkC39y nBwnx9cPYBNnm/Nwjgq0z04KTI/zjQl2CvOx83a0dLh1we7GOQATkP3NC/YM NiF4Ai8drMycbl8HAZ7ABbB/rG9iR5smlK6dQzBxNDvnQumsQWdQDpdOuV47 7W5+1tnsO8crf3O3OBN450q43ZlM/5vAJhWssNqCqJaS+G5F2lBl9kh1zmhN 7nh93lQTa6aFBWCCZ2QTXXfhYi9/qa9whcqb6Gu6tsbE+sgJEsq4aGtYuNrL QTZZbs2arIjtEfq2cdw6uG49fM+hYj+jpAmK2bOL6Fg2Oba4Cxt8GeEJKeUC MPk0d17qPVfqQ9ikj+1Um2BxLJvIY61KY27JEu6IYm5LEuzbRLFPF1ufrfUh mzw/mPrt/W5Pi7S8NEcpTGKl+LCTvViJbgWpnhWF4etjZY+1NY/pLPzTBToL Tz3wfwYmhE1QhvouLO7SmxcIGmT2B/k4drLCISC7A5yt3vzNnjyi7T7WwTA1 c/DBuBA+CzQBDPJP2YS2YHDUiP4nomAH7seoUovZpOsrbELqviieWlQ911E8 QgvWgCoVQCVH88qH04oHU/L7k7KDMcneiGitW7DUzptryB2rTO1XxHVKIttE 4U2CoBquryrPXZHtosxxhUVZvkddgX+TMBje7ZBEdUqjOyTR7eKoLmlshySm rSQa1CGCj8fDGRADqATYhK7O0hsoQCiNRZG0kwLsEAaimKUksqEoDPCEApPi 8BZRNEANVmcZQAMbcEUjsKAzghfAy05ZEqhVHIecgkiCxgpVzcUOpGIj+f6q fD8KTABJ8nxRsjwfaa63KMujKN1NQPf+LQQwSXTmxDly4515lFHiVpDoxk9y L0z2ALGT3FiJrvmgBJecWMe0cNvEIOvEQKvEQDjfNsiGkv9nbGKEJ4RNCJgQ NgEwMWUTHL+Ipglhk9L8UAATFJZ1lRVEA5vQiqoRxbeVZfbVsgFMiG8y0V6M NV0AJjPdEto6ETLZBGXqm/wbbGIKI8fG4TEzAgJIQTZhcofpoBP8LBKNaRdi +LYFzLnTs+NxyDvQlsaQf4cd2McSL3RGQIAhwCYgQBKygE2s7AJ9ck9GFKQR 8XRP8VgHHwhlcVyBbLI6U745U4FsQoq40CjBHfplHYDJ/aXmh8sUeiCeAIwA koD25lsBUgBVYA37hE0erHeA7lEGClBJx8ONbuzTBVRCCrpeHky8O5wGNgEw AZGJ8D8bmk19O5sYxeFNDRQjxwRxhskmX8cTplfCpJKvsAnzesMQE32vYMNE eM3bB1QXr6c7o0AWsPmfH3ZB/3i/Dd+JOXq8K/wp8FkyPh6bd6Fdwpwd/wM1 Gkb3Mz2BERZAKKTE689+8Dk5To6T4y99AJW42l70dLgKbJKTHJSVGJAQ7hbh 5+DjdMPR6qL9zfOETYhvQoSNuUgWHgScAvsYNmHmTWzMzhA2sTc7S9jE2eys QWeI7C6ecrp6CsDE/vLfQO6WZ4PszKIdz2cF3CpJ8lTnhVRz4akMnr4S+8rS +9UZgxWZI9XZ4/W5k41AKHnTzfmIJ+ieLHRyNV1cwBPaPREa8ISq5tqbksJ5 e7R4c0gAbLLSmb/SkbfUkjlfmzQoDmrnugObdPHc+wq9CJsQMEE2McWTY2u6 qEbEEr8ZqT+IwSnH+CZY2UUcEz2eHMcmVbSYbAJSxFmLIizEMVZFUVbCqNuV rIC1AdmLjYHv79H/FevF6v/9f76fHqqVCpLFnOicePe8BHdWojuwSRkvZGVY 8cjAJs80ZYRNmAVdRHTYRM40Kch8dtoikRM2gQWcgUoMkweL748JgEGYsz9w NCHCDnz2zaIKweSnzdovZeEJRGA5GdwJE6AYxPRZFuZL/ggZIm/EO8AjTzXK JwuKo3nF0RycYa16NKM8HJduDxav9wpWugq0razZ+qw+eXynKKpZEFrLDahi +1ayfas4ftU8qnFWvRB4IayxJBxVLwhuKg5rk0R1lMZ0lMZ2yOI6ZfGt4ph2 SWy7JB7UIU3skCa0imKBStql8UAZhE1oEglvKo5ETgHBPvWuKBKQpF4YCoIF fFtHaQLTHGks0ovwCApJBHdICAVxBu2SKm4wplEUuT44iERKDyIR0YVbxemu wjSXwlQ3ED/FjZ/sWpDkygMlgtxoufMSPQqSPFFAJaxkN1aye16ia1aMU2r4 3cRgm4Qgm/hA1J34QFtUgoFNvmSdGLEJ0zQheGI834RmE6zpAjyR5AYTQsGy LmATtE7UhVFVxbFN8lSMnCCeoGOCAioBNqGsE9pWMMITo7AJEsq/xCZfCYkw wYQ4IMfKKI3CnCaPlWDM4DxlndDj442KvpBN8A7hVuEl/Kbj7XxqJEqHYHGw dHVUCfSBXgmSCCAJUgkutHQuXq8hGRmhMtNbMtElmOopAjbBofAr0+oN2gNi Rk6QSshEeMSTA239obbNKF0CAjDZnmli4glFLitt91YpYU3XfQpVuvTzTQzV XM/3xl7sjwObvDuYRt8E2eSHB/PwUP2v1nR9iUcIlRzrm/xyHGsgoZjiCWEQ 0zQKc20UokdUwWuweRdzIjyG5bHPMMAFpuDhegzak5QKzn9HxiF4wizx+tS8 694s/g0NIxdP2OTkODlOjm86sKDLy9Eswv9uRrwfsElKtFdkgKOv800n60uf sQmDSkCIKtbXzsHa/tZVdE8wdWJlfhbj8MAmVmanra+evn319F2zs3o2uXoW qATYxOHqWaerZwyiJsKj7C6dcrx6yskMzn9zvvadt/WFEEfzRPer2YFWxYke ZbnBleywusKoVnFCpyypW5HSq0odrMgYqckaq8sar8+ebARIySWQMtOaP9uW r+spoPGkEPFkc5TS/nQp5k22hoXr/bzVLhawia4pfbEpY1wR0cX36uS5d9Ns QsCEFHSBmGxC8GRK7HusmHiCYoIJpk5Mhe8eyyaVceag8jgLZhZeGW8tjb4p ibXmBl3jBFsos7wGyjN1/crv79PTex9p/vHjYWejqJgbqypK4qT5clK8Ocme FJtwQ9ZGlA81n/fpYtR0MWYvyjFgYhohx5f4YI+DPwBG8INM6wR77SKMvNIq MJMCDAJn0nYYXjKT7EYiSEKbNUhJ8s+tHH1RmVFg/+t5EyaY6MFKW/ZMS1W4 PZyWHY6Ld+GfnP7CheacmfrMscrkntLIJn5ADcurMtddlekuT3eVpbsqszyq OAGAD52yBICLVklsqzS2WRzTWBLZUBzRUBwJMAJqL41tBzaRxXXJE3uUKZ0y 6gz/MHeUJoI6ZckdpUmkoAsYhCRNGosiQFjfpQeTkmj4tjZpTIs4CgkFfjp+ 0MAg8A2xWNaFlVpGwpGL9HR4/UBGYpeocn3lWV7SdHdRmmtxijMn2oYTc4cX b1eQYM9PdBCkOAGb8JJdCgBMUt0LUtx5yW68ZHd+qmdBsl68JJAXiJvomZvo mkexCSzcMqIdk8PuJoTciQ+iZaASA5tQcfhjrROjsi4mmxAwIXkTDJuw4125 ie7CdN+iDD+0TgieHMsmZfzICvhbSZPayjJ7qvMH6rmYiAckAR4hbEJZJ11F hE0InmAfXdM4/P8fbEKmnCB0kOCJEZuQsYwkloLduhYNHyTfg5/F78Gx9SCc Cw8v5w2uCpVJaWDN95SsjCiAPma7ijR9YhwBr28XTE8zQVqBt4BcKPWJSNvk +QExgMlMX8nKZNmOrm5LU7M0oVo3eEDYqguphA6efOobDGtqvommFSu4SBEX CCu74Exi8lRSfgnDJq331zqASkCAJw836DHx6/1HW0PIJpg3+f7eLFonQCjv D2fg0fpfYJM3m5Q+p5I/PuyimNVcRsVd+l5eDNOE8MWxwZNjQyjHOinkSpKg //3NBjn/9GwR8ITuEqwjXYKxn/Crw6mjreEHa/3Pdsfgp//j/fZ/wA2/2YDv YVypxaIvbCzMsFEoF4ZKxNM+FLZixrAJaSn8Zz/4nBwnx8nxlz5cbC572l8H BbhZZ8YH5FNthH2DPe94OVg4374MeAJyuHUB2OTu52zChBSmgQKyttC36rpp 9t2tq99ZXT4Fsrt+xv76GUfzs47XzzhdP+1g9p391VN2V7+7e+XUncunbC+d uguCy66ccrU47WZx2uPmGb/bF0PszSKczKNcLNN9LfND7wCbyDP91XnBwCad shT6KS4JHur6y9OGqjJGazMRT0ATDTmAJ5SB0kaxCYCJrocHWhkQAJusDxet DhZujoq2RkW7Y5K9McnOiGgT3urlaZoylttydI0ZY6qobqFvK9e9les2LPQe K/adEPmNCD1Hi73HirzGi71GC93HBO7jQveJIo+pIs/pYo/pEg9kECPNyQKJ aUJXcwUS34Rpl2C3LtM2wkAlwCYahf9qZTjs93GcqmKvVcabV9Bsoo61wIIu kDrpjirRpjTeWhh5oyjGWpnl2VQcPdla8nZ/4uX+1McX6//v//XbWE+FuCBR zIlhJfvyMwILM/yFmX5qXthMe9HDhZrHmponmopnGvXzBRVWZ2FaxEhMJ+LT U/0CpRfzyuegOcWzWTkRvIRNeAuveTargJ0X86rXWvhsxdulyvfLVaDvV6pB 7+kzikw5YUIKyZIYJsJT9/lkWvJstvTlguKVRvVKAz8LbkD2Wlf2bqkC9Hax nJYa3n05L3utUbzVlb3Rlb3Swj2oYPFsTvEU7nmh7OVi5eulqpe6iuca9aNp 5d6weKWTN9+YM1WTPlqeMqRK7BJHthWFNvACK3O9VBluilQXRZpLNTcIp4Hg RMJ6QRigAd3yNwwggoYUCjRA6G40FIU1lUQATQC8tEvjsaqqTRLfIoprLolr EcEivq0ktqUoqkkQ0VQY0SKMai+J7RDHNwujmgWR7aLYHllyrzyFOsuSm4pD QK2iiA5pTIc0tkUU3SAMR9OkVZLQKkmsF8aWs8MUuUGV3NBaPsBIOABLuzQJ gKWSE1zJwYGMwCahFexgVa6/LNO7JN2zOM2jMMmVE+eQG2WbHWkDygi3zoiw zoq6kx/vwEl1KUh352d6AInwU7z4KZ4FKcgjHgww8eAmgtw5CSA3doI7KD/O LSfGOTPCIS30bmoIYIhVvJ9Vgr81KDHgNpU3Cbyd6G+VSOEJpXjfm/G+N2ge MSejGEEJIH9znL1IYiZYzQXCNeIJNukSpPkciyfEPcHKLpCUE6oqjKoSJzTI 0zoq8/oaCgaATdqKxztFE12SyS7JVLd0uqd0plemT51QwRNK07TmeqUz3eLZ Hsl8n2yutxReLvTLQPP0eaFfrhn4TNpBBUo3pFwcUh7LI0btuYzMEYIeJBf/ JZFPUYNUaA6CNeAAJlawMIwZSMGfOEu3RMaaLsQuWPQ35I+0cmd6i4EyKASj WnhR6RIqZkKXe8FZ1y+B82xH8VynaKFbAtL2AbMAzsipDsxdotleqWZQsTim Xh4vXxpTb0xVroyVLY0o1ybKN6eqt2Zq9+Yb9hea9uabduead+eb9xZa9oFK tFRvLhTiCRIK1nTBGfbhJfoph8tYx9X1cKMbh5vQsxepBsIPqQ7DWNMFbDJ2 tDl0uNT9YLXv2c7o68OpD481Pz5Z/Pn58i8vVkGw+Phs6efnK7++XKMFYPJ5 ny56DOKvqFfrv75e/+XV+j++3/2PD3tw/vv7HVz/tx/2/9uPB//5wz4I9/94 t/07NUtxA5GBWdlliIcYi9lemJmINxI2E6YvI52HaYwytBrGC356tkwPMdGi /QFr+P4fnuie7ozeW+k9XO6BPw5s4r399noN3iUjF+mhJzrQ+0cLBG30TsqD OQQTQDwcuUhDyixAyp/94HNynBwnx1/6cL97zdvR0sPuuq/zzazEIE5mVEZ8 AOZNXGyuuN65CkI8sbv5WTUXCqu8SM8urOyyvXXJ5sYFwBNkE+urp24Dg1z7 7q7Zd3cpHjllb9Bds1N21045mJ92sTzrfvO8p9UFkM/ti742F/1tLyGYRLtZ RrvdyAmy5kbalyR5yjL8lNkBVdywVjHVVgjwpFuR3FeWOliZPlLzCU/QOqEq u+iR8bqeAto64S/3FwKerAwUApvQBgrNJuPS3RHx9mDRRh9f25y50pG32p43 U5VAzzpxb+d7DRZ6AZ4Am4wW+4yL/IBNxoo8gU1GC93GBG4TQvcpoQewycwX 2MS0yovmlGPYhIkkxD1ZUgfPy3yBTVYqwuCCHpZDedQVar5JrLmakgUWdFGE Em9NDWGMvSWMtBRGW8nS3WoKQkfq+WvjNc/3Jt8fLf7vvz2dGaqvVXErJVmF 2aGFmUHsJE9Okrs8P2i6TfhIU3ekq3umq3qurXipVb/83G4wEtNrwAZZr7Xl oFcaNeolPOfTgjXsv9EBIFSC3i1VkcX7ZQCQGtCH1Vo4w0sjfb9aZTqZkdlD 2OChKF4u6HkEBAtgEIAR2KRRRYWLNzq4k7Lns9KXc6W4Q31Ko3qhKXs8Xfpw UnowBv8YCJc72XONWRM1KcNliYPK+D5ZTLckqr04vIkfVM/1r+cGNvFDWgRh bUWRbcKoFkFEMz+8hheEYNIgpEIimBPplCUCd9D+RSSGRGDdJo1plUTTVBLd IYvrVaUMVmQCmHTJk3uUqb2qtC55apskEQgF2KRTHN8lSeiWJsKinUKVaHjZ WhQNtIJq5IcDqnSWApJENxeH1dGRk1ZxTK8qtVed3laa2FAcV1MYVcmPrBHE NklSGosBWOLrCiMBT+oFUVXcUGWOH/AILFDq/EBFtq803ZOf6MKNd2LHApjc zYywSQu1Sgm+mRJ6Kw3wBDglzi4/2ZmT5sZNdzcgCUUiNIy4f0mcBA92vHt+ rGtutHN2pGNGmF166F2gD5pEKCUFWBPBSyabUPVdfhYMNrmOOjZvYsomcHvH sgnBExKKpwLyvAiVILq8OK5aktSizu6t5w02C0baikfbS8Y6ROOdYopQuqVT PaXTdGWXkbDcC84AJrM9UhBACo0kCi1oUImClyhY6waBSlSLw2VLw2WLw5+1 C15ijFM0EiGUr8CIEZUwxXRbMLQChGLU7AtlZP3geqiZM9zKnewWAp4Qn0hf 0NUvWQJOGSwFMFkekml6pNpema5PDufFfsXyUNnSkIqmtlL4s1C//kjZ0lj5 ykQlsAlQCeDJ6nj5xmT19kwdgMnObMP2TAOzY/CxYAIimxg2ebzad7TW/3C9 G72Se6udhyuUgE0ebQ483hwCMHmyPQJP4Mgm2E0Xd+BMY8soPGb/8ERrVFhF hiH+f+y913Nb57bteextW1ZizjkHMCfkHAgGgAk5EiQAgplgzjnnnElJlBzl rCxL3uncuufc26H6ofulX7r/lJ5rTXIJBikfn7q3y37gqlGrPixEgtTe389j jjm95iHi9EMUzkykJiRSQxJBsMaL1JB3UudjSjyj67jtBy7wyp54GSJeXYUp ec6X9/xgeJ0S4AmQBU5dRAcEZ8FjFy/EE1j88sPuv/98hvETtEiwjfCzL1ao 1sGezYT/RoxZ3Hn79Sa6US/g/4PIcSfXsxevj+vj+vjtgxYXkJkQlBLlA+dy cYG6nAtsws5LyE4KgYsgwBbAk9jgGzhmkYqcYBweFwAmmIsHMEmM8E+M9o8J uxMW8Emwz1+ATSJ8/xLt/3Gs/0cxfn+J8fkw1ufDOJ8PE/z+khTwUULgR8kh n6RH3MqKvpsX65MX55sX65sXczs/9m5hvA89wZeV5MdODuClBVXRo7TcRKs0 w1acWSfPhB0U7Kz6rXzyvzmLxpySySbZTGvxbJsc8WSpS7HaW0mE4odqcF48 sAmAyd44QIp6f0IDbHI8YzidM6Nvgmxyb1J3MKg8HKw4HFBudkimbAVDuoxh feaUNn1KmwpUslybu2LLmzekz+lTKd9k2Qhgkr5mTl+3pK9eVdDliSTURWpi o2cnYa9qLvRW9lz52EZ4v6kI7hqrjHUxbzVyfBq5vi6un4vrT7GJnRfiEITZ +KEmdjCwia04qbk6b7nftDZc99ne2D+f3/9//s+/r812WjXiRrPcoKRbq1iG 8nzCN9Ewtkat3+11/bDX9dNe29O91me7Tc93XVSn399IZ7ybn7jfSnEHkIin kEQQRt5xB4kkoLfHbtCVbPL68Oph8Zej6z9toEFD6MkmwR2AIaRp0vIcOGuL sGxITnE92UJbp/6HDfsPRLdk+7er9Sfjmr3BypUO2aSTM2gt6jPlg0brOKN1 3JFazqCFNWBmDJhZg2agA/5ILW/QzO3VM9yq/NbKnCZFVpu6gOiXZWShOTJQ y0cqoSqv4MpQnXDELqbYpMfMJALs5OASskYLHsYbBAypl54L1nXikToxnIdq hYNWwYCV32Ngd2oZnToGLPpM3H4zb8Aq6CJiJnSSd7h9Vl6PmdNpYneZuF0m XqdZ0GkWuo3CDpPQbRZ36DkdOpazIre+PKtVw4AHuA2cZlURqEVV1FRd4FTm 1JbQjNKUSk6MkhVVzogoY0SUMMJlhSGi3ABgEzkzvIwTpeDHKkXxVdIkYBO1 JM2TSmqEKZ7Ci/gAAJMqfgrFJmXMuFJGrCeMeOLJ72QTQbZ3cRcIrRMQsgl8 DK2URlEJggnK0zqh2MRl4IIATxqNvE578Uh7NbDJbL/RE09Ql8HEC1JQsAk/ pw9SuySMUHiyQ94FVHIw13g437QzU395JqNn963LA008bZT3gYknznh5KFSm /n1s4jnJEScnghaHdXMDatDCkPZdymbMjGyyM2FFQiHckwk7IAmct8fq4Lw/ 3QBsgqYSgWwkm+zNNwKeHC01AZscLTYeLjQeL7acrXcCm9xbcYPO1nupMi1q poknmHjFTxBMvj8BBhkHNiG7Bw98tj+IwqQJBSY/PVoEwQI21S++Wnvy2RLc BDYB4fwO2KjjZJCLQMfx78cTWCChoGCNdIBPpO76t9fALwSh4LASfCPAATK0 vkd5Jdgsy/OmZ72Wl8jX8RYOdqSoBOEFwYR8xz00PogBJWRG/unny49PpoBQ 4Lu6mAu/Awu0TqiYCTweewtTkPLLN1tYwYVthLFDF3DKtW9yfVwf18dvH4Ae GfGByCYKcSGwiYybxcqNz0kOhbvgemq0b1LEHSJ4EuYbF+qDhEKxiecoRrgC j0mOCkyJC4qL8IkI+jSEZJNIv49iA28kh95KDrmZEnIrNeRmeuhNWtitjPDb mdGgO1kxd3Ni7+bFge6AcmNuFcTfpSf6Mgkw8eOmBggzgiuLIoFNLBKaVUqz FWc0KHPaNQzczsGub9guHGsQTzZJp1tkICSUczwZqNoYJLQ9ogIq2RlVgfbG VYdTWqK+a8Z0Nm9FNjmbMd2f0p+O1ewPKPZ6y7Y6ZYsu9rg5F/BkQpM6rkpe MGet1uWv1eUjmyzo00DIJmtmGrLJ+8ImyCawXjJngJYtmZ7Nhz0bdlEZ+fMm XXXZ244cjJzsNRKuynhVfCPrtot918Xx8WYTbrBTGG4XRdQKws38CJssyVWR 3VdfvDFq353r+PHh6v/9f7xZnGhtrquo0wgqJVnq4pwaCU0tTW9UM/an7N// bjbxNC8oTECaQAahIMWTU6grXoRC6TfYxHOi4qURJ8gmQBwNTzZBLtCFZdOE Ij0d+AzwYVq+33B8sWA+HVPt9pevw2+5VTzTyJ9q4E44OCN1rEErvd9KH6pn jzXwJ5yi2ebipbbyxbby2Ub5hEMyWicaBIKw8IetwhGbaKxOMm4HnCkmMux1 QsBkjK5jPATWlKh2W9hKC/Bk2C4YccBThEAxVDgd/p6H4DUbSmZalCN2IBTx ELyjTThQK8ApJJhbvxiqyMbhiT1mVoe+sE2b7zbQeyzcbivPbWL31Iq7ayVu i7jDJGrR8Z01TJuywFqapZekKhgRpUVhRhnxe3fV0EGNKkajiu6sKrSV5xhk aRphkpJJggk9vKQoDE0TSX6QjB5ayo5U8GKUgrh3bHKJSqoFyaDLbFLFT/YE kxJ6DEiSF46i8ITS72ETIckmVEthaiI8qpQRTbHJZTC5MhQPbAJIAmzi1LHh 3G6TDDQrxzvVM30GL+sEtELVdP1al/EE6eMym3iCydFCM2h7yoYJeiKKcoEn ux5RFM/hJl6Igb22LsvLaqGGwuNdVPOu+2stV7IJPIyqLsNBjfAJ1ybMACaT 3ZUzvdUrIwaMz2xh6+Ap2/a4BQu6AFK2xmxAJaCtURtoe7x+e6J+fbR2fcwG eEKUuk07tmecO7MN+3MNyCb7s07AtPurHQ83ukjfpJsKkqA8wyYUlXhONsHB i4AnFJuQGv78YOjR3sDjkwmygfAssgnACOzAgUeoUR1kaRN6FrvY1YpiE0yC X8YToIz/QpZ1eeKJ170or4vIJv/+8xnIk1Co3LpXeMQzfkL5JvAUeKKXyBc5 9QQlEDl6/ldsguVeF02D9/Et4BuABVyHN3r6+QrOQIFv7Nt7M/BdITFhUAWp hArFowjnhewbTLY72/77d7vYqgubCf/RG5/r4/q4Pv7UR3LkXVpcAMUmNaVs MYtGz4zJTQlDxwQEbBIX8mlihD924gI8ATahqMQTT+CulOig1Ljg+EjfyOCb YX4fh/l+FO3/SVzQp+mRPrQo36xo/5wY/9wYv5xo3+won9x4n5y4u9lxd3Ji gUru5sffLUz0yYu9WZhwm5Hsw0n146cHiLKCZblh5XmhKlacUZhqFqfVymgN ylxgE9ynwZZvsI4P27yxBtFEoxg02SQBQplrLyGLu8pXehXrA5Ubg5WbQ1Vb w9Wkb6I+mCRKvI6mDQ/mLA/nax/N1wKbPJg23BtXHQwod3tKtztlq808tE4A TMZqkuZNmcu1uau2vAUjbd4AVJJOKnXZkLZiTFs1pq6aUlcsmcuXRGXhYb1o IurB4LxkTsc0/a/Ho/wKTM4v1mWu1dIINnERRV+TqsRmzl1kkwaObwPHj2KT Ok4gsIlTElUnirQIIq3SBHsZzVFVONdtOFzqvrc5/MuTe3OjTa32qv5WrbWG a1QUAZvUiFMb1fTjOdf3e90/7nc92W9/ut/6fK/5xV4jznO/LEysU4NIYPFs x/E+NvGEFKz78vRQfptNvBwTTzbxKip7sdP6HLTd8nSr+clm05ONpp82Gp9v t8Li+1Xn4wXbw0nDyVDNQX/lZnfZcrt0FnjEyZl0cCacXNCwjTECPOLkjzUI QOMuIfG35JJONRZPNcknXcXjTtmYQwIaqZeO1EuG6yRDNsmgVTxgFQ1YRHDv qEMCeIKOCQhgBG6CcI0eSreRRSVNyDg8b9BGkMuIHZ4r6rfye81EzdVALeGe jDikw3Cd4B0BMEuPmdttYnfo6F2AJCZOp4EJazc5273DwAC5jcwOA7PNwGo3 ctwmXqOGZa8qgu23Xp6lEtMUnERpQRQn1YeZdCsv5qOC2I/L6JH2ykJnNcNZ TW+ogTOjvqLQUpqtFadW8xIVzCgFMxLwRF5IgImsMEROD5MzwpFNFPxYhTCu QpwAeILc8Xt8kwpuEoCJgp2AYFJcGAWSFURK8yNAFJtQVV6/r6YryNMxwZqu EnoUxSZKTjzlm6AM8iyQvjgTdDkUD3LpCdME2ATLurqdJYMtFVM9OrROgE0I KhmrWyXyJlfUdHkiCW6/Cd/k/WyClgqaJp5sgrNREEmoYiqMpV+ZOqFi77/R s+sym3hZJ+/zTTALTzXvQjZZGtEDnsz2qxYGNGtjJmKMIxk5OZipRzBB32Rj xLoxbAUqwbKurbG6zYuvBavdkE1Ae7PwIwChOHdm4O1cF2VdvY82ezHnjnq0 2X8lmHjiCdW86/HJ6ONTQt/cI/oGPz4d//Jo5Kuj8a+PJ785nf7+ARE2gc32 sy9WgFBA1AxB3PxjagOnFl5ol7JOPPHEk0288MTLKKGKu7C+C4VsgniC8oIU an6iV7wdHRPqWZ5CmwY/DH5a+BiX2QSukwVgh+ieeCIYfACs4yK60JP9u9Bs wi7BCCM43ISq8qIqu94+JubCI4y8/Xrrb9/u4ODF69mL18f1cX389gHcAVSC 7km5qEBVxpGwM4oyonOSQ9ExAWwBPAE2SY4KTIoMwBmLyCbolSCVIKTEBN+B xyTHBiZE+cWE3YkKvhkddDM26NP44JtZsQHZsQE5sYF5cYH5cQGAJyCCSuIJ 5SUQVMJI8WOm+hfE3ypKvM1MucNN9xNlBUlzQ4rzw0pzgmuYsQZBilGYYpWm Nyhz2tTEuOpOYm9GTNAmWh45YFcJhCIcd4kQT0gDRb7gLlnpUQChrPUrkU0A TEB745rDKf39WTOyycNZM8km6uORqv2+8p2u4s120byTOWLIAjABPJkzZhB4 Ys1ZJL2PJSMN2WRJn7qkS1nSJy3qEi+DCQrtEkASFOAJggmyycVM+ewrfZMt e855TVcjkZSfItmEqOkifRNgEwzCO9l+VoavnR8KbFIvjgI2MYlirbLk+ooC l5q9Nt749cnc//qP73aW+2u1khZbmUqep5JlV4nSCDbRMI5mG3446PnpoPvp Qcezg7YX+y0v95uoMeteojpoISM83yVGK74+fMcUFKFQ6yvZxLOs60o2eXPc hg27PEW9NWWdgJ5uNj/dbHmy0fzjWuN3y86v5+u+mLGejQOPqA76KrfcZYsu 0ZSNNW6hD1oKhiyFQ9ai4VrgEdaYgzvewJ9qAqQlwBb+eAByR51Cknalo05P AYDIRp1EJGSoXjZUJxuuLx51lI43lI85pSN2MVIJQApyCi7gOtnRl9sFNKEl TJNeC2vAxkU2GaglasCwNRaoTV3UqQfcFgzVSQbqRL21/E4zhyAOPaNdDwBC 0Ee3hQtyG1ltOnqLprCxJq9emelS5TdrATHyaxWZptIMc1lWBTe+uCiCmxFQ kHArN/bTnNhPs6JvZIR/kB31YVbEhzlRH8kLI2A37qxh1sO2nFStIh827Sph SiU3QcmKBjYBldLDi4tCQSWM8BJmRAkrAvCknBdTLiDKukDqi/D7f5g3QdME 2KSUEYtsAkhC4YmEjMAjj/xn2OSKHsLAJihkE3hrnSwDYQQEa0AV/Mw47sQz cgJq0BFggpGTVquoo07a01A63qkGPJnpM8wPmpFN1ibsa+/Jm+DGm0qaXA6b eOVNkFnQPdklG+1i/y6KTTDrgcyCF//DEMr7IIVaY3Ceys5fBpnLYIIfCT/e xqRlY8oKWh0zYVfh5WH9xqiJmMNImiYAJgckp2zBF3LBJgSeTNTvTNoR0AjN NOzMNuzOuYjUyXzD3ix8IfANOPbniLKu+6sdACakzoe/UwVdV4LJZX15OEw2 5gI2Gf/2/iTqm9MpEPomuOUGPMHBHLjThjVWKFFT0WHTjukPEGlkHHnhCWWL eOIJRQT4eMSTf//54X978wjOIA88OTc7ECs8bRSszqJaCnsWcWFKhXqWlzDS gh/pcszk13rny+AC3oVElT18fezr9fO3W/94SiAMfGkAKfAtvf5mC65TNV1o PGFp3CsyXQI8goSCZ4CU6x7C18f1cX389gHokZ0Ukh7rD2xSJsxXl3Pl/Bxg E7gISJIYfhuwBSAlNvgGsgk1xATZBNZwDvX5GPMmwCZwJSkmIDHaPz7SNz7c Jz7sbkLo7YSQW3mJIbkJwblxQbmxAXmx/iAglKzYmwSYJN4pSPKhJ/vSUwBP fAoTgE1u0ZNucdJ8RFmB4uxASU4gsImKdc4mFkmas5wI8LZrigBPugyw2WPD Zm/Yzh91CpBNYJM51Swl8UQ211682Fm61FW22le+OVSFbHI4pd0ZVR1O6kg2 sSKbnM0YH07rTsdqdntKgU32e+SrLXxgk9HqxElNCrDJjD6dSJ1YiEotZJMF fcqCLnlBkzSvSZhTxyGDXBaRnTekkXZJBrIJ1XnYq6bLM2mCbLLfWLDbkLfj zN1vKiL6dFUnuJi3mri+TWTeBNgEqATkYPma6T7AJg3SaLskBtjEKIgxiRMa 1SzYdnY7lHsL3X979mBhvGWoyzrZW1un5hvKC6tE6dWiFGdN4cG046fD3idH vc+POl8cdrwi+mW1IIZcFnoZ2M4XWwQDm7zPAUESQTDBUiuqxIvCk/exyS+n 7eiV/AahoIHy/UrD4wX7FzO1Z+PG02HN0YDqsL963imYrAUeYYJGjEVD+oIR Y+GojTnp5E41CicbhWNO3rAdwJYDfzmEGkTjjdKJJhmcR5yiyebSMVfxsEMy WC8asouH7dJhu2zYXjzikI86S0edZSOO0mF76VB9yaCNIBEklOF6EZ5B6Jtg WReSC/AIsIlbX9iqzm1R5bSocsmsCgMrtXrNPIyoE5n0yuyG6txGgA5NYYu2 COWqyXNW5dQpMmzlNEASe0UWLCylqTpJQjU/RgHgQIctejDs3gsSbtCTb9NT 7ubF38yM/iQ98uPU8L+kBH2QFkIoK/JjeVGUrYJuKYedeZGtogjOsNYXZ1UL UpWcBCX7nE3KAU+YEXJ6mKwwBKgEVMaJKufHAJVUiBPgrJGmU1t9ilCudFKo sAn6JogklHuCZV0II/9/sAllmgCe4AeGT+jJJpR14iJNE1CjkddsFrTVirsc 8pH2asST2X7j4rAV2eR9WXjkEQQTQA+8SUGKlyha2cVAyqz9yjHxBBrMns8H QXmOev9tKrlc/YWPxxT8vdVmanTjlbyze1FLBp+BmpayO1e/t+AAwWJ9zDTb WzPWXj7XXT3fU7Pcr9kYMSKhHM7at8ds60MWwJPtsbqd8fqdCfv+hYu0T8b/ EUxAR4uNwCZbUwBfRE0XssmDtc4Ha91U961z4vh1xsTTMXlHJeS9j3b7Ptvv //xg4IvDoS+PiMkm3z2Y+uFsjmrPhWETJBRMnWBNF+YmsK7Jkw4uemR5x8x/ g028Kr4or8TTOqG6+wILUGzimUDBD4BWDsZJPKkEH+mli1d+xyZ/++mQSp1Q YPLXHw+oV0YDBd0ZOMM38OyLFQAQNFPefr9zIWJY/Iuv1vGrw1QOzl5E64RY fL6CAROMwJNlXTs4Hf6P3vhcH9fH9fGnPjIT/bOSAmjxvrQ4XzEzTavkKST5 7LyE3JQwwJaEsNtJEXdBsAA2SYzwxy7Bnu4JBuGpnl1wBRAmNSYoLTYwJcoP npsScYcWdTc/KaAgyb+IkC8dSCTJh5Hskx93syDhVmHibXrSHUbyXWaKDwjX rFQfTro/PzNQCBuV7JCygsBKVriGH2uUJNaWpDVUZLeoCto0Re1EWQujy8Tu q+UP2UUjTsmIgzvq5I01CCYaRZNN4ukWyUyrFPBk3i0HPFnrU24OVQOVkJ27 1PsTROrkeMZ4Omu6P2ci5zBqT6bU+8OV2/1lW73y5XbBWF3+uDZ9QkcbV6eN 1SRP62kr1tx1W/6SKWPRkLakT17SJS2oExY18SuG5GU90bOLaNtlTEetmWig yzfXzRmELBkb1sx1a+ZGbRZoHc62bEIkrSCzAJUAm+y58nfg3Fg0q01t4/s1 cnyaiLAJUIkv+ibAJk5hUD0v0MYPsQnDrcKIWmlCgzLLXJJplGeZlcyj1cH/ 9//6193lYadZ0WIpVsmyTYoCWxXdUJJVp8zZm6x/djLw9Ljv2WHns4OOFwft L4/aX58ANXT/fND55rDzl+Put0fdb446/3ra/eaYMDteHwBxND3bbniy5Xiy aX990PLzYSsKewKTD2gEYQtfWDzbdhFthDftL7Ybft5vfnvU9vYYWAbgpfnZ btPLg9aXh8Rbvzpyg54fAJL0vDnu+fmo6/VhJ5zh5i+nfSBYvNhr/2Hd9XjJ /vms5XRUs9ZVudhWNttUPGYXuNV5tZI4NSsEzq3V2T0G+lAtd7SOP2Bh9RqJ 6Yd9FuaAjdNfyx6s4444gEoIowTOYw3icZcEBOthu2DcVTzqlI3YJcN2CTFJ h5j1WUpYJxcascvIVAg8gPBZRhxAJQSYjDjEww7xaIMMiGYACMUhHWmQDzll ffWiLhOrTVvQXJPTVJPbrivqJv90u03cNg3dqcyxlWTUlmTYy7NdlfmNNYwm FatZzW5UMZ2VRbbyXIs8yyhNB+nFaRpBUhU7trQgXJodWJwfLMsPkuYGSnJh A+/PpfmyUu/Sk32Kknxy4m9nRN1Ij7yRFv5JcsiH0b4fJAR9mBz6cXrkp8XM RHMFy6xk1New6quZFmUB/CVoZTSVOEXJjStnxZQxowkxoksYsM+PlBcBoUSC ylgxFbyEamEyqJKfSHYJTkdR00w0kgxc4GQTUmlAJYAnIKpPF7AJUAnlm1AR eM/sCUkoxChGYU6Ah/xR/Nwgfm6wIC9EmB8iKggVF4aJC8MlReEyZlQJO7ac F68UJFZLUtXFGUZy8CJGTjwFYAKylOcBnuCUkwYNG+TScpr0vBajoNUsbLeI BxuVM936hX7LwoBleci2Olq/PGxbGrYuEz27yK7C4/VrE4Q2p5xb0w2gTfKM Wp90rE/Y1ydRDhQ8ErQx5dgg11uEg9C4Mw2EAvt2F+7bD+YIwY4dmIWMydfh JEdiUMg00X94b8a5P0uVhF1osRl0TKgFdDFvEQgFrRMnLEBwhRJeuYwnl/sV o9uyT9aP3VtrPllp2pmuXxzUT3VVDTeXDzWVTXXWrI1atycdW5MOOK8NWTeG basD5vWh2qPZ5uO5lv0p18FM4+Fs09Fc88lC672ldhAsjhfbjhZa92ab9maa DufbTpY6jhba4Xx/tQvYBNsCn8+CPxj+4mDos73Bs+2+s60+WHx1NPrl4cgX B8NwBn1F9goGfX4wCGCCbPIF4aEQQ+G/vYd4Mo81XYgkuM1++vky7rQBT6gO XV4TDD2395QzgskRCkDwJhKKZ9iECphQhIIin3VCPRflaXyQMHL/osHXPerD IJ54FoBRwkw9+fQT/EEwUeLVhZjK13vOVUGRbtEOjiy5GCW/R82mB3jB1gFo PAHFYHEXXCQqvsjw+4tHyzjLEsDknz8c4Iz4P3rjc31cH9fHn/rITPSjxftk JPgCpAgZKRoFp1ycxy1IyksNBzZJDD9nk8TwO+ibEG24LgSEgt2DUVT2JC7U Bx6cFnPOJulRd7Pj/OmpQfTUQGZqICstgJ3mhyItkttFHmzCSoVtlS/cBWDC ywjEXQqoghlayQpT86MNkgRbaZqzIstVldNYndusym/TFnUaWT0WLuzx+on/ Ls0eqmeThMKfaBRONommmglCmW2TzXfISfdEuTFYBYSyPaLaGVXvjWtwJuPp jOHerOFkWgc6nlDtDCrWuovnW/iTDuaUIWdcmzFcnTxUlTihSV0wZ6/XFxC+ iT6NhJHUZV3SojZhWZe4ok9ZgSv61FXAE1JrwCNAJRc3Ka2baKANc8YGiSeo dRJPCNnOC7oIM6U+CwSEsu3M22+iA5s0se80MG+72D5Oto+deReoBGRn+DgE gbVsXys30MoPNfFCbbIkt45hkmc0qFgtZvlQm+H54/2z/fn1uf6j5V6XQVQt oSl5ibARtZRlHMw4n54OPjsdeH7c8+K46+Vx56sT9+tT98+HXT8fdL05BDDp IdX19rjrl5POt8duxBOAjuc7LhCwyWUBdJBI0vBk04Fte+GRbw9bXu83YQtf opvWYeubE/ffHvS8vdf16phwbV4euV8cdz4/dP983Pv2tP+X0/43x70v9zuf brf9tNny5Xzd/XHjTk/FYpNkso4zbCrq0+XZS1N0vKhqerCWE2EvTe23cBfb lXOt5SP1onZ1fq0s0SiMMYvjTKJYmzy5TZ0/aBNMuIonG+WAEr1mTrumoFPP IEax1wkIkR4H6YAQrX0BTAZtQiLZoaVjp1+8SGALOZqEYJN3gpsEm5B/k4L+ esmAXdprE3fVCtwWntvM7q7l9tUJe22CTjOnRUtvqM63lWfCuVXHbjdw23Sc Zg2zWc20luUYizN1knS1MKWal1jFia9gx5XTo0sKI4rzwyQ5wZLsIFluqLwg nGSTYHFekCiHmFTIofmx0v0ATAoT4Z/ebVoUCSahH8UFfhB+54PYgA+SQj9O jfhUQk8wlDOMCkZtFcNWxTCV5yKYVAkSFRwCTCj3wVOew9ZBZOY9DXTBJrT3 s0l6BTcJ2aSSl6xgJ8iLooFHLrMJ1a3rEpsEXmYTQV6wID9EWBAKEgGYFIVL 6BEgYBM5O6acn1ApTqmRpauKacarsvDomCCe4IgTkNcoxhaDoM0s6rGXTHVq FwesBJ70E3iyMly3NFz7rp8wwSZ20AYQBwkm/6EoSNkgCMWJ6+2php1pYJPG /dlGJA7Q/pwTtAciIOXCSZn5VYMvjNJ7CsGE0K+i8b/Vc5iKxl/2Yi4/+KIk rPFgvmFzonZpyDDdpZ5010x1quZ69cuAJONAT66NEdvmSN1yn2lt0ApgcjLf ujfZcDjTBJyCZ7iI1w/nWwFGjhc7QKfLnfdXu+EMurfSBWuMwGN/4C/JVDvq POG+O4Br7BLsoSHUV8fnYEJq4ptToo3wN6fniXiAFMxQ4O4ae3O9/X4X9uTk MPQ9NFDQ1CCNjHfpcvQjLmfevfp3eRGKl5BQPBMioF9+AGQ4gJtUmy8EE2rC O6bg//vbR2S65B76KcAp/+3Nw//tb1/AAnt8IUp4dgC7PDjea6ojxSaYssHx 8VRLLjhj77J/PjuCTwIwgiYUkt15fdej5Vefr6JvgoKbf/1m5x/f7//RG5/r 4/q4Pv7UB1BJWuwdIJTc1GARM7WmlFkmyuUVJgObYE1XcqQPKCHsoj8wmYgH KjkfZUJOOUH3JMz3EzRQ4GZihF96bFBqtD88NzPWrzAllJMZDuJmhPIyggE6 UIgklGOCYIJswqUF8DODcJcCm5ZqTmQ1JwLZpLY0rb6cBnIoM4FQAE8I98TA BEIB9VoYfVbWgI09bOeNOrG+S4ItvGbbiHT8+UzG/hpsL7wzAniiPZjUH03q T6YINjmd1t+b0u+PVK90yuaaeDMuzrQ5f0RDG6hMHqhIHKlOntFnrtgKLhLx qcumtGVjyqIuaUGTsHwVm8AZL3oKriOeoHtybqBcxSbrtgzQtiNnmyjrok9r kp30T+30mw7mbTvzTj39dj39Lqiu6E4d18/MuGPhBFh4IXp2UK00odfMtZRm aSXpDo2wvV757dn658fLHQ26talWp16sKyswKgqM5blWRc7ygOnHo4EnJ4PP T/tfnva9Ou15cdL54tj9er8TwAR0TijHaJ10gYBQ3hydux4gyivxFGmjtL05 IgQ3X+2f0wqhvaaX+82EV3LQ9uqw7flB+5O91ie7rU/22n7ab3960PHypPvb teavl12fzdUfjxo2uysXW+TTTvEo7O31Re1VmY1lKY7ihIaSpGZFeq+JNWqX zLaUzTaXDVh4znKaQRBtFscbBTG10sQGBc2tLRpzSCYaiufblaMOSYe2qLEy GyBloJYPkDLegGF2EbbbAr6Am5ONJRMuOTIIwAjcnG1VIJhQgntJSS7SJRJk kyFYOGRDdhmwSbdV2GkWdFlEPTZJP6CQTeg2sZvUhc7qPFdNQbOW0aRmNlQX 1ilyTcUZOlGqmp+kAmZkxQKGiLKDOGlEgJ2ReBPOvHRfPs2Pn+EvzAwAPJEX RpQzY0qZkcVFYeK8YF6WP5vmy0wjlJtwNy+R6DWRHvlpYujHgCRRvv8Scfdf Yvw/SAz5KDXihrgoXltaqC8rMpbnmxX5+pIslTi1kp+g4MSWsaIIi+SiDS+l MmYMgAlIwY5TcuIreYlk2t0bTN7HJthDGM4gYJPiwqj/cTYRkmACVOIJJlJG JLBJMSsa2KRKkkqxyeVWXXWVRcAmoPPJJlV0uILFXYgnBJsYCTbpsEpGWqrn +8xzvaaZbj0sVkfqsVvX72GTrRnXZa0RTooDHwDPgpvwOhsTjq1JJ4kn76AD Nv+gwwVgB4/kO2GpvOMXCkk818gmJ0sYe/eaz9h4We+LrlBPpOYz4qxGfFn4 YAdkVARTNnO9urG2qqlOzeqIbWeqYXvMDlQy36Vb7DHsTjgRSSgdTDfuT7lg AXhyONd6suQGDHmw1oMDTXCcItwEQoG7AFLO1nvJae/vwATledOTTUgkIUQO hSfHwZMT4ZFNcMoJsgm1ryaHm29dsMkWsgls1Kl2WBQpULVSnpVd1F2XmwxT zOLVyAt0eeIJPBILrlCYpgdR8RDkhb/+uPevz48BRkAYTqGC86S1QbQagytY MIbJEbRUPEfJI+/gE983lR5eB+0kcgT8BpUrwYTO8y/Xnn2xinVx57Gdz4iB JljEBVTy8rOV5w+XcFL8H73xuT6uj+vjT30AlaTG3M5K8i+ghYlZacgm/KKU 3JSwpIg7RCkXySZxIcQok9iQu1QbYTgDoeBFENVSGK4ApMBdwCZpMQFpMf65 icHszGhBLihKmBMpzA67qCEPBgZBEvGUJ5ugbwKblhpupIoXpRXGApuYi5Nr S1JtpWnAJs6KLMo9AULp0DO6jPRuE7OPSKDwhu3CUad4vEEy0SgjZ8eXznco lroqV3tr1vpUGwOqzUHV1pBmZ0S7N647mjAcTxpPp42nU8bTScPBqHq1q2Su WTjbKJgyFw5rMvuqkvsrkwerksfUaXPmnAVzNpGON6QvGNOXQPrUBS1Z0/X7 2ORXxoqJRnYhpq1TeOLBJht1mTgXfsuRu9dYBGzSyLrtYNxCNrEz7lBsYuP4 Gum3zGx/Kz8U2MQsjusysBxVRZW8hNpq7nin5Z8vP3/+zXGbQ+M0yirEmVXS LIOy0FCeryvJmOpSf3sw8OPJ0PN7gy9Bp33Pj7ufHbpf7rkRTF6RC6LE69CN YEK6Jx0AHWQRV8vrg/b36efDDlLE+tV+23Ni9nrLC5JKQM8P2p7tt/8ESELq 262mB3PWvRHNzrBqp0+91lk521g8ZhP0G5md6vzWiqxuTWFHTW57VY67Jq9b UzBkZs+6iqdcJSN1km49q7kyr1GZ3Vpd0KVj9Ro5AxbBaL10skE+4SyGBwxY +P1WYvw6iOzKKxqoFcK628jp0DLa1EVuHQOAjhzrKYYzCAcjUhYJwgi6JyCA FxAFKeTDgHEkg3XSEYcczt1WsdvI7zDy3SZhp0Xcbua6rTy3ld9h5rUYWC41 3VFd6KxhmEoyKzhxpfTIMnoU4IaCGcuhwT8HH3a6Lyx4mQHEII+cYFFuCEic F1pcGFHKjEZSKGFGS4vCBTnBLJo/PdWnMMUXlB1/B5QRczs5/JOYwA8jfP8l 3OcDABNQQvBf0qNuShmJwCY6wJOSXENpjrY4owarudjRIJxdiGPWKTZBKoEz QAoI2IRMlKR7sglQCeoym8CaclgquEnyomgEk/8h3yQ/RHCBJ15sUsKJVQgS 0TdRy89rurzwpFZZYFXkA4k0qNkgzMLDTQyewJVmAx/ApNUkBA24FEAlsz2G 6S4dEMr72ORKi+RKNqFE4QnhoUw4NicI92SXLOtC0Dicd12wybvQOsUmnkJO 8cKTk2UglKbDBcAKAAriJiyOiJveunKwI0UlFzDSQBV34UD54yV4WVi0HMwT n2Fl2DLeXj3pVi8NWtZG65Z6jQgmG8M2IBFgE+QRXAOSwPlkvvX+0rldQoEJ uiRf7AwBjMAVYBZgEyAU0Ola19l2nyebeOo/ZJPv7l8x34RqNkUNH0Qq8Rwm clFG9QDz7FiL5TXi5MpuXZ73enouXqLohmrkBWv0ZUC//LD/5jtgDaLOCrkA LR5yyAjhYgB6/Pe3j/795zPAEKpGC6kEcYaaPu9Z94WWitfwR68pkBf1XeeD IJHayO9qC2u98AFwBadYwhf79Gzh2dkijlxE9wTWgCegP3rjc31cH9fHn/oA KgE2AUKh2KRcnMcrTAY2ISfCE2ySFHE3PvQW5tw92QSRBNdwRjyBc6jPx/Cw tJjA9FhQQEFKKDc7VlqUIC2MlxbESvKjqI0HLyMQGATESff3lCeYYEU6miY6 URywiVGaaJGn2MrSGyqzUa6qnKaavFZNIWGg6Io69YxuI4voLXxeliPGnPJk o3ympWy+Xbnorlzuql7vV28MaDYHNdvD2t1R/cGY4WjceG/acjJpPJnQH45q NnuVi23SuSbhlIU+rM3pr6H1Vaf1V6UMq1In9JkLlrx5U86sIWNWn75goC0a aQuG9PexyWW94xQyn4Jau4pNtuzEiJPdhjxgk11X4aw2tZXn28C642TedrDu Olg+dqaPnUGc67l+Jvptik2MgpiWmvx2o4BoJFtW1Nek+fHzrS9PV3tbLf1t BptWpK9g6hRFmpIcTXHGTI/h+5ORJ/fHnj8YeXk28vLB0It7fS9Oe4BNAExe 73e+IhdvjrqATd4cubGmi0y+t15UcLkvi/BZDuHp7lf7Ha/2OuBMrI86nx+0 /7TT8t2G6/Gq48sV+xcr9rM56+G4bmuwZqVbMd0M23tOr4XRrae3q/JaKrPb qnO7dfR+E3sAfq1WXp+RBTc7AVLUBZ3aon4Tp98sGKmTTThLJxvKULAesIjg 4rBNCufR+uKhWsm4o2TULh+0Sfoswl6zoMfI69Rz3Fq2W8eGRZee20Weu428 PrOAJBSR59B2EJopl8q6JCTLiAdqRf0WUa9Z2GMWdpvgLOoyA5uIOgyCDqPQ bRa1WXitZm6zkePSMW2V+VpZGuBABT+xuCiCQxRi3aIn3+FmwN47hJcdKMgN FheEyeiRMkaktChCUhhezIiS0SPgZik7VsFPUPDiS9gxEnqkMD+MnRVMT/cv SPbNS/LNTfLNir9LAzCJvBUf+klUwF8i/D6I9P9LYsjHcYGEb5IZe6eYlawj fROdHMAkSyOj1YhSKnjv2ERWEE7hCQp4BNkEIeXCN7kCTN7HJtQjK3nJ2Krr f3pNFxJKMSu6jBcPbFIhSgY20ZRkGkuzTZciJ3izrrLIqWKhdQI8Ame0TmCN pkmrUYhlXePtKsATYJPZHiNR0/W72eQ3gAUdE/RQiOKuCzbZmW6g2AR9ExJP 3uU+EEYwlkI1KL4ST06W2ojUyQIhWINgcTjffIUWGg4vTZz3sEgaqJmPuAA2 ub/Wen+t7d5qK7AJvt3WpH1xwDTfZwQ2WR6yzrSrp9tUa4NWYJDThTY47002 7E44gU0ASe4ttoMATM5WOu9dVHABnqA/Amzi2ZUL1ggpxyvu0/Wuh7v9SCK/ 4Zt8efQrNkF992AG2ASbdFF9uqgeUx6+yQ61G/dMnSA7AJ5QTgcVOffKv3tN OfHKyHtRiefD0GGBdwECoiAI8ITsAHwAJIIkRTY0hiv7WEYFn/YfTw8v5jCe kGGTU8pMwco0zzny1JRGhBEsDEMqQYTBB2MunhrOiEJ2g7uop5DdzIheXvA1 EvNi7s//cDLz4+ksIAnFJqg/euNzfVwf18ef+gAqSYm+lR53Nzs5kF+UVF3C QN8kPy0iLYZMskf5gog4PFnEhUF4hBQQ1nThpHgcyIhsEhtyJyXKPzXaH9gk PzmEnRldyk4tYSWXMBLlRbHYOxS2ImigAIZ4QgqsPcEEHiwviq5ih6NvohfH m2RJ1pLUurJ0Z0UWCvAE3ZMWNdG8y63D3sJscgQe/udxolAHdpKIJ3NtyoWO itUe1XqfeqMf8ES7PaTfG9EfjBpOJs3HE6bjccPBiHa7v2rVXbrQLJmqZY0a C/rVWT1VaX1VaUMq2qg2c86cO2/JnTNlz+oz5g0ZC6aMeSPtSjY5r936td6R C8h0npG/0jfZchBxeCILT+ZN5nRpbXw/F/uuE/CEiJxchE1YvnXAJozbRqaf mRtEsIkwpqkqF/bDLjWnUpTZ26h++tXetw+33C69q1apr+JpFExDJVuvpKtk mSNtqidnU88fTb94OPHy4firhyOvHw7//HAYkOTlLmAFUdxF6MANbOLZj4vK v/980Hn+GA/99aQP9PaoB9Yvdtqxx+8Xi3WfL9oezdfemzbuDatWexQL7cVD 9ZwuQ0GLKqtFle02FPbVsgfrib67fWYu/O5wgEi/hdepYwByDpF5EOzTS/xO m8tmmipmmyunXIpxRylqzF4CwvWEswzOo/XyyYbyfou41ySE84BV0mMUuLWc Dg2728DvMwNWiOEMgrtG6uXwl0POHOGC+iw8/FvCUi5EEvi7govkAFB4NXGf RdRjEsBLdep5HTper1nSa5F2mSXtekGLhtes4bZo+daKfH1JRpUosZQdLSkM 42cHcjJ8Wem+nAx/fnawAP5F5ISJ8yJkhdGCPMIRwJ22lBEJZ1jDllvOjinl xpXzE2DvDWu4i58Xxs0JZQGbZAQWpgXkpfjlJPulx95NiriZEHYzLvTT6KBP IgM+igr8OCnsk4Tgv6SE38iO9wE20ZYUGBUMYBO1lBhzUy1KruDFI5vIiyI8 8QTXVFkXFnRh3sQrZvIbbFItSEXfBM4V3KRSRuz/DN8k+ErfhGIT9E2QTXA0 vCeewJpKneBoeIAUT98E8yagVpOw0yYbhr+xTu2kW4PZk/flTX6/gEfwWRSb bJI1XcgmyBokbpzXTZFyXIxfPGcQJBScnHKle3K82PY7dbTouhwwocDE00nB zl2weLDe+mC9HdgEPuHJciu8HdF6i5j87lgfq98Yt68MWABPFrr1W6P1QCX7 Uy48Yx0X0AriCeh02X282IG1WwAgmDEBQgE2wZgJCLPwRAp+p+/+Zs/ZNhGE 98yeXPJNRkgqAY2iafLNvYnvH8x8dx/wZI6aCE+luRFPqJouHL/oZZ14Dk/0 YhNP1qAwxIs7Lhd0YU0XVcpFPRFelmITfDoJKScAIzj9EMvMsK8XXH/9zSb8 LN/dn8Uf7eXXGwALVN9jKttOZvz3kLaQUMjarT2vmSlUxReVOqFKvHA4I3xX 8C6AeK+/ga9rh+wesIsgQ7gqX6w9O1v86d7ck/vzsEAPBc5PHyz80Ruf6+P6 uD7+1EdGgm9y1E3Ak7TYu5z8+Co5vVSYI2SkFWVEZ8QHpkb7pkb7pcUAZfh5 9ekCMEHHBJHEs+Ir5O5H0UG3EsN9kiN94bk5CUH0tHAFj6bgpis4qWWsRNiT AG4AdODGwxNP0DSBNfYRxXJ0eCSwCVonwCbm4mRbWTqwSX05za7IoHLxIFi0 qQtBOPqky8DqMXGwRAercSYbS2Zaykk2qVzuqlnpVpGEotkc0O0M6XaHdIdj ppMJy/G4cX9YuzNQs96lWGyRzdRzJqwMYJPOipTuytQhdcaINmvakD1vyV+w 5AGezBmz5oyZs4ar2YQIvF/SO0656Nb1vrzJlj1n25EDbLLnKjhqZc3r03H2 IrCJg3XXk01sbF8T/baB4aNn+mmZAWZxXEtNvquG0VUrqxBmOPXSRwdzzx4f jfU2tLs0Fo1Eq2RrFUx1aUGlmNbfVPn00cyzz2afP5x8cTb28mzk9aPRN5+P vSKZgmKTV3vtyCYXYxPP2YSo7CLsFW8B1zzbav1+xfXVnO1s3HgypDnsr9no Uax0lsy1Sica+MP17IFaZp+V2WkoIFJCDsGwQwgacYqG7EAfIooCQLCG3yD8 +kBTTaXUbxPOi+0q0FxL1XSjEgSQAiQCbDJUKx2pK4YF3gRCGayVAnrgGdik U8eFMwqoBK4P2WRwF/AL/BVdzNBhI57gGEQUUAkKLg7ZpPBEknpE3QaBW88H NukyiDq0/MYall1ZZJHnqvip5fRYUW6QICeQn+3Py/IDMBHlhciAAuhRxfRo WVGMrJCQnB5XwoiHrXUpL07OiZVzYkq4saVADYKEKmlalSxNKUqWc2MlACyM CBkrip0Tws4OYWWHsbJC6RnB+WlB2cn+yVG348NuxIXeTIi4HRd2Kzr4RlTQ J0mhnySGfJQedSsnwU9CT1AV55mUTGCTalFapSCpSpiEbELkTYoiKSRBSfPD 0EMBNgEwweHvZFnXFabJlWyCfbqAUDALD/87cGWfrv9c3qTgV2ACVEKFTbCm q1qappZnEDVdJe/YhMITqkkXXME4PAgXACkol4bTrOeDOuDPplE50aEea6sZ b1fN95lwQPzv9E0ug8k7HvF4DICJJ5ugJ4L1V5g3odgE23BhwITCE4zGXwqh tJF7/o7jxXZYY/MrAIHLupJNKK/Es7Jrd6YOPsPpStP9NdIxWSQS8WfrbsLl mWs8XW4/XGjdmWrYn2vem3IBm4w3Vc536lb6zRvDNmzYhcVdWNmFIRT4eIfz xMdD9wQgBT42miZwRgMFewV/dTQKDPLZ/uDD3X6iVddO36O9q7PwOHgR55sA leB8kx/OZoFNKN8E23NhvynEEyoL7zWWndql//IDLPap9lygywBy2RbxSsd7 ypNNPDt6UTVjFPugFQJIQlkhVKsuDJi8+GodCAWT/vATkSn1RfQ44PPj9BY4 v3oMP+N5IzKgFXJg4iYs0G3BMjD8eRFJsI6LKu7CNsLAcVSfLjSeSNeJ+Or+ 9t3uL4+JQfCvv1gDPPnxdBbO13mT6+P6uD7+wwPYJD3uLi3ehxbvyy1IqCyh ywXZvKKU/Iyo1PiAxGifpFi/5Fj/pFj/uHDf2HDfmFCfaOCRkDtRwbcjg29H h5LrXys84GZEIOhGdPCnRBY+PiArIUBSGF/Ghj0JrYKTUkaPLS2MLiuKgf2Y tDBSlBcmzAkFGAEkYaf5CWiBfFoAPz1AmBEkzQ4tKYgsp8dUcWNU/Di1IF4r SjRKUy1ymqU4vb4sy6HIaVDmuUg1VuQ3VxFg0qoqgDNOP4Ez7M9xSwmb2/GG YtjTTjeXzbYqZjqUs27lQlfFcm/Vaj8RP9kaVO+O6vbH9Ifjuv1RzfZg9Xp3 +XJ78aSVA+pTZXeUJ3eWJ/dVpAzXpE/rsueNuauW/FVz7qI+Y16duqRNW9Z5 50pAFIZQYLJpyXwHKWbaqolwT1aMaStmGmqVHH2C2rRl7drztuvytuvzDxqZ y+bsDmGgk3nXwbxbT8injuFrY/jUMn1rWQG17EAzK8jIDDZyws2iBKsspYqX WFtRWC3LcRhlT77Zf/nkfmebqd4oM1RzdQqmtYankueVchK67WU/3Z998dnC y0fzL89mXtybfHl/8vXZ9F/PRl4e9b447Hlx2P1k1/1sr/P5fter/e63x/1v j/te7XW92HU/3+54utn6fM/9dKf9+/Wmr5YcXy7av5ivO5u2nMCXOaTeH6jZ 6lYuNElGrcwBQ0G3gd5jYg7Uckcd4snG4qnmEtLPKp1uAdyQjzfIxl0yWEw3 l445ZXBe6KhY7qpe6qyaa1PMtMDvrhzOcB3BZL4dUEUx3VQ226KYbi6fcMGr lU41lpI1VzK4OdVUBr/3fqug28B265gDNvGoE96ldNxVOtWkmG6pmG5RDtok 3SZep4HbZeS6dew2DbNdyxywiofrZP0WUbeR36Fhwx9YgyLXKk2zl2a11tDh IjwAqATUZ5d31UrdVkknnC3iDou4yyYzyrMqOPHSvDAxOYMDdtdcmh+H5i/I CpLkwT4/soQeXUKPARGoXhQtJwUbddiNs9P9xUWhUma4jBlZwompFCerSzI0 JZmqYlqVJFUpSClhx4sKI4QF4cXMWG5+PCsnjp1LqCA9ghbnnxx5hxYXkABI EvhxVOBHcI4O+iQu5NMY/w9TIz7JjL2dnwxsEq8qztWW5OvleTXiDCUvqYwd V8aMLWFEU2DiJVFOsISMuiCeXIx9T8dWXYAhWmkmypNNKGEWvoKbhGCCPyxS CYLJr3nk3RBGvAv+J4KEFFI5ISBRTog4L0ySHw6SFkSQipQVEoJvFVCoRpSm kWZoZZkaKTF10SDPQjzBvIlVkU/NhcfZi44aJsCI56wTuNmgZgOetBgFwCY9 9pIBl2K4uXLSrSFy8f0EniBlwALwBH0QTLh7xUne16cLFtuzjTtzTbvzzXsL LTvTrl1SZCfhczw5XaH2/05qrAnpoRB+yuH8O6PkYK6ZFNHzihJu8tGSgJ2/ 5/4fBAvqXtK5aD9ebDtZar+34r63ClcAZFou1Hyy3AQ6XmpCH4fEJbK0bM5F tjIGvmi7twIv2L4zDR+m9eFGH7zyypBtrLV6vK1mulM706VbHqrdGHPszTQd zbcdzLZsTzVuT8HTW+AmnEFoneAnxLEmOBcePZRvjya+OhoBMAGhXQILz7Iu 0i4Zxa5c351MfXc89c3hxOODcRAsvj2a/PHe7JMH80/PFp+eLTx5sEAkIx4u Pb3YYGNNFxoTuC2nRIEJlU/H8i2qVzBWeXmaI5fLt95+Dy974OWnvK95F/LI Ja45oWqxgALgA8Mnx/A7yVD7ZK9gwBaCI4AXvn8w9939WXgMUAPCBZlnP8+q PP/yvJINuAwEPyAFJp6duzzzJtR1/E5wELyX3j7e+us3xCx4OP/85TpQCQgI 5fvj6T9643N9XB/Xx5/6yEz0QzbJTPQX0JOrS5nFgixgkzxaZHKcX0L0XWCT xFi/uKi7cRF+sYgnYT6AJIgh1AI4JSLoFigcqOR8cSMy8EZi+B1arF9GnB8n M1zOSKrmZ1Tz0pTMeCUjroqdWMKMRTwRk/Vd/EzYvAUIMoIE6QEgIS2QYJP8 SAU9tpITU8OPVwsSQHpJilmWDqory3aU5zQoAEzyGysKmioLW6oJGEE8QULB NRooQCiYHYCdKuDJZGvZVHvZnLt8oUsJeLLWV73eX705qNoeVu+NENoCNukp X3HL5xyiyVrukDa/qyId2KS/InW4On1amzWtzVwwZK1Z8tbNOct62rI+feWq aAm2EUZd5pR1MgWP00/esYnlHZtsWDN36nM3rTmbtty9BvqSyZNNAEwINqll +FgZPjZ2oI0dZGIE6ulBBna4SZRgliTDlsxYllvMSa6Q5X79cO2//vP7nk5r o63cWM2tLs7TKxjqkvwaScZom/rJg7kXjxZfPpx/9XDu9dnsz2ezbx7O/fJo 7Of7Q69OBn7a6/xmvfnJbuebe0OvjvpeHvQ83XZ/v9r87VLjN0uux4sND2es oPuTpqMR7W5/9UaXYqW9ZLG1eKKeO2AqAo3Z2PNNkk2AFKDC1nLs34vTCamJ 6kAcwBoAI4ghcBMWyCYr3TVwXnRXrvYQbhegCjwSHjPVBPRBdNACVAHwxCQI /JYRReHcqWe6dQz4A4CL8HsHJBlrKBm2y/qswh4zHzVMjHqXDtZJ+mtFvRYB CBCm1yxqUzGd5bm24gx7aXa7mtVvlXQbiaqtLj2vTcVqripqrqbDY/qdZW6r FHazVfwkQVYgPelWYcKnsJNHrwEEC9jVg3A3jpttWMAWGjbqZcw4VDkrHgQL wlNghJdyY5TCxCpJilpO05Vla0uz1MA7wlQ5K05Kj5HSY2WMuBJ2IiMzmpEd y85LKMok7E5gkEj/v5DziQg2gXWE34dwjg2+EeX3QUr4x7ToG9nxdwT50VXi TJUsWyvLUZFsUkqORJQXEbF3DJh4FnSBcNAhLHCmIfyw5FDFd326rvRNKMEj 0TSBnxF+QM+J8J5gcplNEE+wgQZJKO/uxV4ZIHgdFDqt8PrwRvAx9MXZF8ry YhMUsgnCCLIJVdOFNzEm36TjYVlXf0P5aGs1sMlMt36iS7MwZEHEWB61wZpy Tzw9kfcRiucDkE0IPJlt2j/Xu4Q7sgkSwbs+XfPO8xDKvItik8N5AJMWgAJP ebIJnKk+vbBAUTcxaU5CCpILnOFm60W/rxbMvOOHOU/QLzR6BluIASUzzTtT jXDGd5/q1A66lIONSvjeQOPtqrle02yPYWW4bne6CbQ50QCPx09CUlUb1Tf4 wVoP8ggs4CYOhSeyJxckguYIDi7xysIjnhA8cjDx7eHkd0dTINgYg57cn0c9 fbCA5UaEPl+h0uVvvvMGE2rkB7m3fydMqVMzDbGbFjW+5MoKLuy+BYCDz/oN S+XKu8jUya8+GBAKNs4iWWMbW4qRsRSiyIoKjwCzYGQeK7Ww8gohBRaIXedY QZZmYc9kz7EpsMYJKZ61Xr+mNiwh24Ev8A3pmGAQ/pfHWyjsJPxHb3yuj+vj +vhTH9inC/AE55vUlDHlwmwBIw3YJCnW95xNYnxjIm7HR/qDkFAAT5BQ8Ixg AlQCCgv4FG5GhdyODL4ZGXQjLuRmShTgiW9hMmGd1AgyNaLMGl5KDTdZI0gj 9kIknkjyI6jiLlFmsDAjCMAEJMkKkedFlBfFVLBjqrmxKhJPdOJkozTNKEm1 lWTa5Jl18kxHWQ7gCbAJCKmkpSa/uToPBGs0UKiynKE6EfZZGmuWT7SUTLeW nONJT8Vqb+VaX9XmQM3OsGp3WLU9WL3Zp1zvLluGR1o5Q/qCrkpae1lStzK5 tyJ5TJU+rk6f02WsWHLXa/PWLNmrxowrY+8UmHgG4d/Vd1nOewiDVil5+CZw fcuWvWHJ3qjN2XUWLRoz2wUBFJvUM31JNvEFNqnjBNeygoz0AG1RgJ4VZhLG W6QpVkWeVVnoMEgcpuKFybZH95bdbcbBTktjbZlOwdArGdqyQrUsq99V8dP9 2WcPF16czb1+OP/m0fwvny2A/v759N8+m/rl4fiPe91fLDc+Xm99ut/73Xr7 V0uNj2bt98at+33a9faK5ebSGZdk2iWZaZRMOUWjddxhK3vExhkwM8ftgpWO 8t1Bzd6QZr2rYrG1ZMwJ37+U7LgLqCgeb5ABYgBrgAA9UMAjIDIcpIDrACbA I3DGhwGkIKfAvYA5JKSUY5UX1fUXzliFBb9rIJe5NiUs4G+g28QDGAEGARgZ qpcBlYw65UAiAzYJ0ArpnnDaNMzGqoIOHa9dy+00CDr0/FY1G9YtsFOtKHQo 8utKcyzFGUZJmk6YohUki3NgzxzIJTtrwQJ377CTR4uBaKV10ecKuQPtEhDF I0AoICUnEXbvOlmWqTRPVZwOSKIpyVAV00CakmxdWa6qOFPBT5EUxQjyIkQF UcAmxcx4bn4iJz+xkBaVEuUbFfAxkEhUwEfxoTdjgj4BJEE2wYuxAR+kRX4C bJIVd4uXG1khpNVIs9SSrBoRDdiE+MdIxLuIISb4gRFPqJounMCOwRMqdYKO CcKIJ6FcZhPEE6qgi8qd/QabeGLIf4pN4IuFb1IrzTTIc1BY03U5cnKZTTAU j2uKTbCyq8Mq6XOWIZuARtqrZ/uNROPfKSec5wZMcAbiAEKBBc6O/2028cQT dE8oNjmYa6LY5GjxvBcWCKMfZFnX72UTRA9kE0qHpEmBBEGxyYV70ok9e0+X 3cAmWDmGbIJgcm+1lfwk+JFaTpfbUCdLwBetyBfw9L3ZlsUBS2etrM0sAjYB KoGvbqJDDVgHwLLQb1kbta+POVZH6gFPDi9ACU0TTMRjwy5gk7P1XmATWAOe EC289ofQNKGy8J51XJ43v9ob/XpvDNgEkOSHkxkQxSY/3ZsDNsHOUbB4cTHZ 5LJp4jWpEGEE2YTsmgUb8j2csY64gcGQf3t9RrkeXqF4uEihjaf5chlD4F6q oAufi62DqWD7f311H8MmCBqYJblgE2IiCd7EGjDsOUzNOkGmgBfEWixMuD/9 fPn7B3Mg4Auc6oJvgUl5KoRCBVgugdsFqnyz/earDcQTWLz9ehPYBJsJ/9Eb n+vj+rg+/tQHLd4Hs/DAJkQWvoxZIsoRsWiFmdEp8f5AJclx/uibeLEJUc0V ehedFHRPEE+ATS6cFIJNYoJuJIbfTIu+m5/kL8iJquCkacVZOnEGgIman1rK igPBjkhaEIl7D9hvSLJDxYAntEBRRhCySVlhtJIVVcGORjzRCBP14mSDmHBP TNI0qzS9viTLWZ4LeNKgyGuszAEkodiEaFSlKSID8oxOPbPHxEE2IQwUl2y0 STbZXDzTVgp4stilWO5WLnUpVnsqtgaqdoZqQNv9lZu9yvWO8gkbt0+b21lF 61Akd5TFu8viB6tSRtXpM4bMRXPOsiVnxZK1Ys68XNBF1XR54cmVbHLumFxi k81agk02a3N3HIULhozLbGJj+tYyfW3sQAszANhETw8ENjEK4kziJH1xRm1F Ub1O1GqvON2b+vnFo/YWfVezpt4gVZUUqEsLNKDi7M66ku9Ppn+6P/Ps/syr s7m3ny389fNFYJO/fjH796/m//bl3A97vfem7TtDhq1+3VJ7xUxjyZRTNuWQ jdYKBwzsXh1jyModMHOGa3mTTslcc8mKu2JnQLfZq17rqlpsK592FU84xBMO yYyreJYkDkAPhIvpZqKUC+0PEFmsdf4AfAzCCPomsF7v06z1quEm9XR4FlIJ FuxhQy1YLHRUwhX4jQOSdBlYIEDUsYayofriAZtssE7WaxG7idw6t1XNbFWz WlRMkFvP7TLy27WcVi3XVcO0Kwts5Xm1Zbkga0m2XpJewYqV5QaLswJQogx/ 3MZjchy26xpJukqUSsXGQQqiXCqGfFg0kAjszykHAa4AksC6ik94ELCrN5fl 11cxLZWFRmW+vjxHLc+sltAqxemVojQFP62clwo8IsyPEuXHSIriJYVxIkYa PSsmKeJu6N0Pw3w+jA3+FB0TFMUmsIgP+iAj5lZ2/J3cRB9BfnSFiFYlzqgR ZVQJ0hXcxBIGsgnRjwvxhGITyveBBdyE6/AAnHKCn5liE9D7wAQfAD8mssn7 CrouEwpFJb+TTfBLvsQmOV6REySUy2ziiSQUmOCsk3aLuMdeMtRUMdZWA2wy 2lEz3atfHrUBgyyN1M4Pmn/DN7ksz+wJ1blrb6YRRRLKeXhkf855uOAiWaAJ AyD7c3a4+DvZhHJGKO4AYXEXijJQEA082KTj/mrnb7AJ+ZE82QTO5+4MnOGt 10brMaEDZ+CR6S4d9mGe7TECmywN1qKAUABk8KNSHwCz8DhyEZAE0/GIKp/t DT7aG8CyLqq4y5NNKH29P/Z4/1fWCQgdEzRNkE2I0RuXmnRRAfBfB+HP/REk EWSTN9/tepogVDfg32jJhYRCeS5XsgkFO56lX+S7n6dgKHD4728fIX1QU92p qSWYc6eeQv0UVItgsvvWLtmIeAsrxH56tPjd/Vmc//Ljw4VXjzfhdf6XXz77 3//+JZzhZam38Bza6FX59o8f9v/5w8E/vt+n7BIQEsofvfG5Pq6P6+NPfQCb pMbchnNWUgCvMLGqhF4myQM2oWfH0pKDk+P8gE2SSDxBMPFiE6rQC/EEDRRy DYtPIwNvRAd+khD6aUrk7fxEP1Z6SHFBnEpAM8qyAU+qOUnlnIQydjzgiayI mMKGGxJpThggCYAJxSalBVEKZiSokh1dw4tTCxK0gCeiZKMk1ShOtUjSsOTG UZYDcioyAU8ASdBAwcouOHdo6YAnsDtF6wQ04BANOcVjLslEk4xwT9pLF9xl s21yOK/2KDb7K4FQNvsqNnoUG90VMw2iXl1eZ02GuzKtrTSuvTSuvyp5SJU6 qU2fNWYuWrKXLJnzxvRlXcplUXVcl4u7yJqud2yybLoo67LQVqwZqA1rJrLJ li1311m0oKd1CAMbWD5Olo+d5QtsUs/0QzaxMgNMdD9gEwMjGNhEz4sxihLt 1XSnhmOu5tiNspXZzp++O+rsMPW06e0mmaasSEuI8E1aTOJvjyZ+PJ1+em/6 5dks5Zv88uX82y/nXtwfP51zwlYfa6U6dYwOdVG3jjlkFYzbpTOuksVW5Xwb UakFNLHSVb3YUQHIMOEqnmstX3JXrnQTHsdCuxLWq9014w1SYkAh0TlNgp3T 4IlAGfPtSkoYKkGXhLJUKNOEclhwQZaBVc60lAOhgMacMmBP/C0DsACkgLDx L5z7rFK3jt+m4Xbo+LBo1/LaNdxWFbvLICTaahlFcKWpmmkvz3dU0m3lBRpR Wg2gBC9JwYgtp0dLc0PF2cGS7BBZbpg8PwIkywujap9gPw9sohangWDrTs0o rOAmIJ5QVVvolVRwk6jSI2NJrqk0D8CkVllEsgndUF6gLclVybIqhOmlnCQp Pa6EnVTGTS1lp8iZyXJmirQoUZAbk5MUEhdyK/j2B2E+f0mKuJMS5RMdeCPc FyDlBlnf9VGYz78AmMA6PujDzNjbOQl385P9hAUxSiENXhnApIKXCv8Y5fRo cmMfhRjlxSYo5C+qYRf8UDXC1Mu+iWcE3quHMLAJsBjlm1xZ0+UZPEE7FfU7 2QQr5ZBNsKBLJ8v6/b4JlTFBNWq5qGY9H9ik0ybrdZQCnoy3q8bcqsluLWbh AUxggaYJUoln3uQ3xpp4BuHhvHMeNkFCOc/C78zYd2cdF/kOYnT7f4pNPB0T ik08GYQilMu+yfvYBGu6SDxpPllqRZ0utyObwKuhe4LuzM5003yfCWgOqATY hMQT43yfGfAECWVjHGirFR6Jhgt+BiCRs/Xeeytd2K0LPhu8DtxFoMrer6jE s77Lyzf59phAEgATIBQKUijHhCroInrbXsQuLoLwv2og/OuN/bsgCVXThSEU r2wIVnZRXby8mgxTN+Hp78vI472Ue0JWi93HtsDYEYsqvsIr+FFx3iJOLfm3 1w8wKe/ZFpiiGGrePSxw1Dv28oL1y683nn+5ip24nny2BITy9ycHaKAgkmCb LxzaSBEKBSn//Onwv/x09K8/Hv79uz3EE2rWyR+98bk+ro/r4099ZCcHkKaJ X05KkICeXFXKKJfmC5npRdmx6UlBACYp8QHJ8QGAJwlRASCvsi7PBAqFJ3Az Iugm5k1igm7Eh9xIjriVHXs3N96Hmx6iZCUBmxilWTXc5EpBipJHEEopkwjG 4i6lOC9CSlonyCbFueHAJuWMiHJ6eAUrqpobS+AJP14nTAIZRMlmEk9qZTQg lDp5Zn1pur2M1qDMQgMF5arIhjP27wJC6Tay+638Hhuvr44/WM8fcYrGG6WT zcTs+HGXaLpZutAhX+4iCGW1q3TFLV/rrphrKR6y0DtVmW2VKa3l8e2KhM7y uN7KxBFV0pQ+fcGStWjJmnsPm3giyeXgyRoVhDemLRlSl+AMMqUvmQktW2jn LbzMWZs2wjeZ16VfxSZ+52xS5Gco8jcwgnTMUB032iBMsFUU2GtYmrJCfSVr abrjX//2rbvN2OFSWdSCGnmBXsk0VjC18hyXjg9s8tM9wjd5eTb388O5X0jr 5B/frvz8+ezj3d6VPt2ISz5ULxlrkE82wW5fMdeqXGirXGyvWiI101o+2VQy 7ioeb5RPNZfOtCnm2pWLQBPd1QvuSrh3GhikTTFLBElKKRiBM+AJQArWcWF+ BLgGMQfn0QCMYEEXGiXII+iq4CvAg0cdUpxFgo6JV4nXQK2gx8QBAZl2G8Wg Tr3QrRO0/3/svedzW1e29nltK4s5BzAgJxJgQgYIkMhEzoE55xxFiUHMQaIi FZzlIAfZbrfd7m7b7e6b09Tcd2q+zHyYmqr5T2YdLHL7GKTc7vu+Vd0fuOup XRvnHACHh1Z5/7jWs1ZIN+RT9bvlAx4FqNcla7dKYwZBpJ4XNQiCBqFLzTFK C/Xi3EZpgaWW4VKx7fIyh5IFx90ajkvNBrk1XEAPEMZHYMcOa7+BR44goXjr OQAsJKkJ07dg29zmrAMY6XDLOz0KQBIQLOBl3FEXtEi9jWLAB+ARm5prVXGA ShIS2lT8xlqWQpAvKUsrSj+Xl/JKYfo5VsEVfkk6zAVpr5Zkn2fmX0bvSVEG ZTYBbAE2EZdeljBTqjnp+poSp14AH+7RC5xaLpXQlaieZ5OXAHfQ/SakVBeC CQZNSHd4ut+EntD182wCdIbF+l7GJviSXsTvl7MJfDg8ZPguQBIEkwSk/FK/ CWET4JHBiA4EVIIvh2N6gifXBlzXht3AJns32nevtyGbHKx2EzahZ3OdyiYP NgdQdFShswnpXXK40XO40f1oE5AEqwf/ZX4T2NUTzztu+5M4hZ7QRT9F2eFf 7jdBUflmibOJC0aPa4Idme7JVx8sdR9TCdW8EjmFxE3g7GEiu4zcBraAx47w MAOPvL47vr/YcXel5+3b0+8fLhAX/MkOjHS/yRdvrqPHhARNYI01ozB0Qlwn 3zwnZaZOyekiSuzJ30gqDgwCMPnDF5RNPlFK66j/+79/9x4IWyjSSYTe6h2P nGo5oTeRp3ecR+LAmMhxj8hD9KpjFxK854Rr5pAeKEkSCb5gUeJEPhgVZMGf nXwmQArW+wJOoTdwJHhCD8GQBwVs8o+/egJg8qfPDkGIJ5jc9dfe+JyNs3E2 /qZHrShfzEqv5GTWCPOp3osOFbJJbSKni1OWwWdlg9hlGeySbBAdTzBcQqiE mOKBTQqyLuVnni/OvkDYRFh0UVR0UcZKt9WVxUyVzRZp2CD0Nwq9Bj7giVPD dqiYNnkplSteXWSuKsTQCbKJraa4SV5olxW4lMXIJgFdeVjP9mvKQjpmtJ4N iuk5cUOCU0zcFiO71cRpt/AAUnqdFaAehxiBZdhfgyW8KH90i2qyVT3bpl7o 1F3vMSz3GQBMFru0y3369aHG7TELEMruqHlnxLg73gRsstylGfeL+puYI07m mIs1aCqYdJYtBjirEf5ms3i3rXK3vfLUnC7Ak6R28IRNMMtrP8rfi/BAO1He boxPKc7fbRag7rSKD1rEt+Piu23S+101myHBaH0mYZNuVQZhkw51drMsPVKb HpFlhRV5YW1JcyOntamq06to8WmiHvXm8tD/+V/fX1/onRoKAao06UUBa03U KQ9Zpb0hLbDJ1+9u/fbZ1u/fO2KTv/9o/4dPdn/73trnT649We+5s9i8OxXY HPUs9VhWB5puDjSt9Nlu9tvXB50bg8796cDtudCt2eDWuHt9xLE23ASQcnPI DgsQoMrulG9v2r+VIA7M41ruNZHmmBguQdxAQlntt8AFcCXxvwOkoE0eeQQ/ BC4DbY44d8aBXFwAI6TsMCbvYQAFDlLBsnb9SEA7ETGMhfSDXnW/G5BE2e9W tluqwvV8r5LpkpU11TBs8F9dVaG5hmGpK21SskA2OSAGx63l2RVMh4rt0nA9 Oj5RoIGPkRF0l8COHY749EfMghV3EyWtqAYfsE/GrK3egKYvqAXBGmAE8QQE tAIX+Bor3Qaxp4GSs17YpOE7daImjQAEbGKoLpeUpZeknc+5+GphOhUuqWDl AJgUZ57HtC5YA5sUplNnkVngGlYusMmVyvKrgCe6qmKXXgjs49ULHWpOoogx lXIGbALocWqdLhIbwiaM+KNhka6kOl2nsglW9CJsggXKTmUTUk8Y2QSbH/1y NkHuw6BJzCpFNomYf65O18vYBKiEam4SN5B6wiPNhol2E+DJVKdlqtuyNhPZ WWwFMIEZCAXwBNgEdbJgV5IOt4cebg2C6Hhy+GNC149+k8dbvQAmgCeHG12P t7qxJ/uPDRl/gRcem6oTNiG+eHIECQKxhdZkZDIRBxnFsMgbCTZJ0ht7R6WM QXD9m3tHhhE0tuOXwvrx5jCQxdZsfHehbXuuZXU8uDPfcm+1785yDyzgyO3r ncT5ArcBYPL+vXmYUR8/uvHWrSmMs8BHvXtvFoMm7x3OI56QAEpSna7P3jhy mmCjDRSwCXpPYAHHUd88v3VshH+A8Qi0e58UMYnQS2wRLzyGUfACPAWXka7u 37548N1nD2GBLhV0xP9MeWGs1oXlv0hhYXSLYC+Sv//qCTrZMYCCyEAqaKE5 BWmLhEgwaIJRFcQKDHaQkAeexQAKEkqitNf93zy/hWWEsVAYfhdJeEtmky+f JHK6Hv0xYTxBfffRnbO4ydk4G2fj54e+urSOl13NzZQw01SVxRGH1mdRGBUi ubhMxMwVlOaImYViZpGwLJ9blsspzUE8ATYhdnjGiRrCjILLxfmXivMvMvIv lORfKM0/V15wXlyeIii5JGVeVYlz7Wp2yCrxG0WhBiq/y6fjejQcn5brUJS5 lEyTtIBK65LkN1bmoYBQzNX5lpoCW12hQ85wKUvd6jKvhknNWqZfx/JpWfAS 5kA9J6Bj+bXMUD0mffFajPx2s7DVxGs1ctvN/B67eNAtHfZWD1NhFAVoIqye ietmW+vn2uoXOylr9nKvcaXPdHPAsj5k3Ri2URqxbYzalvoaxkLSLnt5j61s 0MUesJWMOMumvcxrIe5KXLTZJtnprDpoEe2GudtB9naAteVnwrwHL33MbT9r N8DeD3EPwvy7UcG9mPAgwj+ICihF+LfDvL0QZyfAggtAt8K8WxHebTgehWv4 uwHm3TgQDf9Oi+hue+VOTDRjzu9Vp/SornapUjtUqW3K1FZlCiiR0JUZVWRF VblRdUFIWxKqL4+YRT4AQIO4r9ny9N7yP//w6fRIfGEs3t9ijzpVIZssbK2L 2WUdHvWzg7kv39r47vnt376385t3Nv7w4d6fPrr1x+fbf/po58vHC+9uD9xd iK4N2pf7LAvtBljcmg7cmQvvT/lBd+fhlGNzBLjDtTlCZVhtj7l3J7xoGNke d26ONe1MuPanPXvTHoyMAIOQWAlWDEYewTX6Te7OhfYnvffmQren/Lvjno3B pqUu4964H4DoRqdptde+NezZGfVtj/o2Bjyrvc4bHdb5FuNEUDMTM6z2OVd6 HSt9juvdtoUO81ybcbrZMBrRDkf0fX5Nu1MWt0qDDUKXmmWpLbbJSqx1lGyy 0iZFWZOi3KFkNinRpc5GuTTAJhzY9Pr0AtDxnhwjAsJEgVwu9u/w6XmwRus3 LDw6LiyilkogjoGYDtQf1eKiN6LpCiravHUt7hqY232yZld12F4RsordBr4T tvENQiewg17oNIgtap5JxWuQsdVVZfyS1KJ0yl3CKkiVcguq+UU8BoDJa4ys C4mWqWliVhar8FJZ3gVO8RVeyVUug5o5ha/yi18Tl12q4aXpqgvtGra3UejR 851atlVRYqorTGRtFVhkhZY6xqlKkAvwF9OtZaNrBtPSYIFBEywgjA8nCUzw SnhE9NDJy/qbJDU/wp5HScW76BSD70rcYSmyCWbKAZtg6OTP1hAmeEJSuTBi gnhCLWL1w3E9ssl4m3EA/ltqNSyOeDbn48gmMG8tNMMCa3bBTLwk99eoliUU d2xSbndYHG70wwIO3l3phrNw5OF6P6ypl4m+8HDBky1gjeGEu/yoctdPRNUK Hn66PYItSxK1f8dJdhZmVWFi1ak5XUArSZEUErP4qWv+qLZw4l0TicpdlJ7C XW0ffTvplvLO7R8rEuOn4Uu8k8dbw3eXe/autQOkPNoYAh6Z73OA5nqbFvqd wCyH64PkHrBiMDaIx5yudw5mDjeGgGUOlrrvb/TeWet8/fbwB4/nPni8AHr/ 0dyHTxKuk6dLH7++/PEbK5+8sfrJm6skbkJiJeiCR1QhlpNETtdtUqQLow/H vc4fk67ouPdGEEBHOb2MFcmYQk8KYRPsfgIk8vtP7wOYwPwNbNE/e/hb2K4n jCp00iERmaR2J+TUiS96HZO4MKJBv5/jVCuAjqMfBx0opME9Pb8riSyQOJJM 7tji5JuPbidKDR/+6+/f+Y/v3/v3756RfvH4WI5uLxE3+YcvHmPQ5A+f3MNe J2d1us7G2TgbPz8aaphKYUE1J0tSnqEQFgWsKp9ZYVZWKkRlwrIcYVl2Jbug glkgKMnllecBnhA2oadyJYmRf7m44BKIAcq/WJp/HvCkNOcVbvGFyvKrcmF2 Qy3DoeP5TZUhgzBqrAjU870aDsijZsOMcROCJw0VuaBGSY6piiIUa22hra6o Sc5wKEpwdipLXaoyt7rco2F6tSynvNghL3YrS/ya8oC2PKijsr9C2tKwrixm YAGhdFr43XZRb5N4wF3b76oZ8srGgsqJiGoyqp5p1mET+cVOQwJSTCt9Ztgt r4/Y1kdty/3GqXhdn4vb28QccnMH7CXDjtJJT/lCkLscE623VW53Vt1tq9iP 8ndCnK0Aa9PPBDwBNtnylgOe7PhZ+0EOxSYRAeAJ8MgtIJEgB5iFCF4SwVnU jr/8bpy/F2bfivEo9omJ5qyFfZrUHnVKtzq1E9hERbFJi+JqXJ4eV2RGldlR VV5UUwhsEtSVOYHg9LyIQ9YRMhxsTv3HP345MRjpDBtjLk3QKguBLLUBo9Rn qDi40fPpo+Wv39n68s213z7b+uH5re/e2/n23Zs/fLD5xeHsO1t9B7MhzJJ6 eL358EYLgMn6UBP2tdwYdtydj92eAVQJ7k0GsK/l3iRlM9mf9gGS7E66UNvj Diy3hREQ9JXAjOW29qd8B7NB0FFVLuCaUefBTGh/wrcz5tkcct7ss+9PBIBH 9saDB9PRvfHQSo99Nq5fbLPMRA3X262rva7rnbapqH62uXEqZphubpiKG8Yi uhHYagZUvR5Z2CiGjStaHqzHXUVQpHAW5lxhXV90hZCe5qfWyIWL0c+Ol2Ej DzSStDpqewOakXjjZLt1ttsx3mkabW8catH3U2Ci7gwq2v2yuKsqaBX7zYKA RYgCPInYq+HfiEPPd+gFrgaxVcPT1ZQ2yDkqCaNGUJToi0r1Nq1g5YIq2Xmi 8mxhWZaEkwfiFqcKy9J5JSn80lRhOVXvAlus8ovPCRjnKsov1QkygE1sGpan QeAxUGxiU5aYMX2rrsAqL7TKXsYmpeSZIIjBgkAHvMTcLRJMobMJuQbfBZ+T VKrrpBf+z7IJvp1wCvwS6QldaOGBOUEoyTldp7IJtoOnswnVFz5OsQlQyWhL w1hrI4AJhSetxrkBx40x3+pUaH02ClQCWpuJwAyQQmIoWIwLoyGH6/0AHaiH P10TYe/Fh4m0ridbQ8gmTykKGD7uXTKEURXY3j9O+MfpfvakysBJ9vYk0XK3 plAkmEIX/e3kypOFv076WfAGMIaCXhK4W6wb/GBtAK7Znm2G5w+/l6kOy9KI b2e+9cFxMWE4i0W60AIPkIL5XfAhD9cH76133V5te3pr6P1Hs+8dUvrg8XwC UhY/fHzj+ZOlj54uf/z6CuizRB5XUpQkiUrQpv3tp/foLngMFpA2IiRAQPbt uAnHC+h4Qo4kMOHHpCyMqsD8u0/uAZt8++IBogrGUEhtYRCpQkzaxNM/BFGC wAV+KQl8IICgOx49JuT2CIb8jOi9Jk89CA8HwARt8l99sAcPCm34xBT/oyuH ltP1xxcPQEAoGD35a298zsbZOBt/08NQzVKKims4uZLyTBm/wNNY4zPLzCqR srK0ggVbnQwxMwskKMtANuGU5tDZ5FQ8odgkIUY+sMml0vwLpXkXSrJeZRec FxRTjRXkguz6qiK3QRhL4ElQL/BpuSCAFJjtdSW2WgblOpEWIJtQJYUrshoq swmhWGoKAFJgcRxPKQJIQVlq8kC22vwmWaFDXuhSFHmUDJe8wKMsCqgZIV1p VF/W3MhqNXHQn9Jtl/S7qge9NUO+2tEgdpNXzjSrZls0C+311zr0wCkrA6al vsbFbv10s2zQK+hzsAZdnD5L8aCdMe4qnfOzl6LC9dbKrQ7p3Q7JrRbRTpS3 FWJTbBJgAacgpACb7AFxhLm3I/yDCP9WmLcf4gKP7CRCKnsJGKFzChw/Vvmd KG83xNoNc27FBNsRwayloF+b1qdN69GkdaqPwKRZfuVUNvEbeA4106xihx2K 5bmuzz68Pz4Q3l8dmxkIxZxql77S2yBJxE00C32ed2/PfvX25ldvrX/z7ubv n21/+2z7hw+2/unT/a9fv/5sZwDYBMAEBISyM+4B9Ngec8MCjgOqbI641gYd O+PAI75ES0Q39kbcn/LenvUdzPlBt2a8gCfEaYIL4JE7cyHM0ULBcQpqKE4J 7U8H7sxHEp/p2Rh2bQy71wbd1zstcy0N860mwJAb3U3LPY7rnfa5VvONrqb5 VvO1divVkz2i74CtqUns17Gb6opN0jz4T0gvzoRNLPa/wJwimAmMgJL+tk+C AsTlTXdPEIcFCRlELRLM1+oLakebjRNtlulOOyAJaKarCTTc2jDUYhiI13eH 1W0+WYunttldE3NWhe2VqJCtAgQLl17g1Asc9UKfSepuqFRLikVl6QVp8O/o cq2wWF5RKhOXAo+U5V7JT32VU5RaxSuE44n+JpfhMgATMSuzkpMtYgKkXOEU XwI8EZScF5VekLCuIJtYVUy3ge+u51JGeAXDVJdwlMgKbYqiX84m8Hzw0RE6 w9wtxDQ6nuD1eAouho8Csji1MNfL2OQknpzsF4Nl0JLYJOGI/0VxE9LW5Mec rkSsBGcAE9Rkh3mut2l5PLAyGVyeCCCebMzFkE025+PAJmhCubXcCZCSCJQM AIbcW+0hnd9hDQySoIyBh4moCgAIvjzO6RpCKnkZm9DxhGAIRk9Is5KkNotJ iVt06IDN/8vY5FQ8oX/aqXhCeqbQAzp4zeOtkQ8fXIP7h6cdMgon281rk+Hd hba7K734Q8FbMK2LfAiWFMabfPvu+BsHI88eTn3weO7te5NPb428cTD23uE8 ldb1Uzb5NGF+J5YTTO5KAhOsc/tDwqxBmnQc+zgeYSoUplGRTTvZ5yMdkGgF IgkK0OA///DBf3z/PppE0NgOGAJsgqETwBNY/+b5wddwDy8eYIoX6ZCCJYhP tkc5lU0wdIIJaXR3PC6IEf7PsgmdRF7CJtS3AJVg3/nffnyAXekxIkOsLtTb v6SCJsAmqITr5CEGUP7aG5+zcTbOxt/0sKmECkFhHS9Pysys4eR4jDV+q9yk 5GuqyqS8XGF5mqAsRVieImKm8pn5JHSS5IhPEqPganE+JUb+FUbe5dK8SyBW /gVm7jlO/jlxyeVqVppCmGOoKQU2CTeIAE9QGEBxKsod8jLEE6Mkn7AJwROj NBcIBQUvCbCA4FSjJKtRCso2VuWYqnMsNbnWmlxLdXZTXS4QiltZ4FEVBDTF 4frSmIHT3MBLlPkSddnFPY7KPpf0uOxw7UREPh2nCGWuVbvQqZtto5wp0y3y kYAY2KTXXt5jLuq3Fo85S2Z8zOth3mpctN5acdAp2W8VbUe5G0HWWoC5EWBu BdkbfuZmgOKU7SAbUGUvzAXtJ2IiJ0IkFIxQOWA+5pa3HLTpKdvylh5EuDtB 5l6CTbbC/GlT3mB9Rr8uvVeb3qVOa1OlApu8LG5CWbPrOVGnPOyQL810/ssP L65NdYx2eTrDxkiTMmyTxx3K5iZFxFLT7pbfHAs/v3/tm3e3fv3mza/fXPuH T+58++7an55vf/V08b3dwbvzkc0RoAk3zImYiBc7HsJM9bIcsG+OuPcmA8AR mNB1eyZIldKa8gKSAJ7cmQfKCNxdCJIuimgwwfYlqP1pHym9BYRCNXAfaNqZ Cu5MggI3h9zLfY6lPudit/16T9NKv+fmoG+p1zXbapmMGjqsVaBWc2W/RxFt FFqrC5vqGE0yRpO8xKEsdamZXi3bD/twVTnuorFBOX2bnbSdpq/pVXBBiCGw 6QUSaXPWdftgK6sbihpG4o3jrWZgkIU+9+KA91q/BxZzPU44AseHYw3dIXVP WANg0u5XNLtr464amKOOqpizGgRI4jeLfCah3yT0NFTYNTyTgtUoYyrF+eyC C7lXXinOuCph5dbX8WXickFJdmHa+cyLrwKeCEozJZx8YVlmSfb5wvTXSnMu CsvTJdwcYBN+aSpQCbAJu+giskkl83INL00jzTcBaGjZACY2ZZlZVmSsSXSH /AvjJvgkYSZMh0/y1OeJCzgOnwCfBkBBLxH8S9gkCU9OZRO4H/T1JEoHV6Hl BMDkZ7zwdDYh7eDpbAI8MtrSgBqJG46KCY94boz5lsb9QCg3p8OIJyBgE3qK 196NdkzWQjChAiWJWAnGR45Bg+IROoCcKnJx4vojMCFsktRREQWnkmgC6YCe zZW0PpVNkvDkZBQGwy4n4yZoeCHVwIij5OnO2GGiftdcT9PioPvh2gAcB2Z5 uA4/4zBa4EH4A6IDBUsKw8G37068dXcM2OT50/kPHs+/+2D62cOZD59ce/7k OqESKqfrjVWqETyt8SJGT0jcBNjkdx/cQjyhswns87GH4HefATIcko06nUTo tapw/48ibJIIWLxNXPDoHIEFlh1GHgFC+fX7+18+23sBd/XBLTiFHpOknvI/ bcL4Y04XwYcETz1EnjouMvaQFBlLssP/WTCht4NPqg+MPzJ88u8+uYP2E0Qe zHDDGNNRheFEQhcREsofXzz844sHf+2Nz9k4G2fjb3q0ujXqisI6fk41J1Mu zAvaZR5TtVUr0FaXSHnZImYaCNhEUHZVwCoAPKGHTl6GJ4z81GJKKQxQ3pXS BJ6U5ZxnZL7CybsgYlyRlqcpBHlqcSGQCCBJpFEcNVYApPi0XL+O51axXEom 4olJWpDEJognKCAReAnH9eJMUL0oQ8NP1YjTtMfSVaTpK9PrK9IaJWmmqgxL TZa1JstWm+WQ5bgUeQFVaVjLjOhYcQOn1cRrtwg6rMJeZ0Wfq3LQKxkJVI+H 66ZiCiCU6RblZFwO82yrcipWPeThd1tLe0yF/ZaikabiKU/ZQoC9FOGvxAS3 Oir2WkWbUe7NIHM1WL4eZG2EWMApACmbARbiCUUoQTbGShBMgFNgfZJKUBtu xu0IdzfE2o/ybseFwCZTxlxgkwFdBsUmmvR2dRr6TU5lE189B3O6Wv31W0tD //73XwCbzI/GB1sdUYfKZ6zyG6uCxiqfoaJBWuDWsm+OBj5/uvLNu5u/fWfz 7z8++OOHVNzkq6fX3tnqAx653tVIbObYRmRt0I6dDXcn/AAma4OOG91UXazZ Fi3MidQsH2Zz7U25AVIAT0hO1y5VXtiPSVx35kJ358MgwJa1Qdt8mw6e//U+ 641+++qwe3XIvTrsWeiyzrSZFrrsk80NQ0HtcEg3HjOMhPW9HmWfW9Xv1Qz4 tEEdEC4XFG4QhxsrKJkqQ6YKn0Ho0nAcKhbumXFHTaIkJAcp6U/99IAItslA GMHICMDIWItpos0y2W4F+pjvdRESme60w0HgERAspjpsyCYdfnVnAKRp96va vEpQu0/V7JbFnEflgn1GsadB6KznOnUipTBfVJLCLbgE/3C4hVdY+an6Gr6q olzMzC9Mv5J75VxxxmVecY5cXMYvyWRkXSrKoBqacIpSKtm5ACZSXq6Ylcll HAVNWIUX+IxzwpLz4rKLVZwUZUVOQ12xNdFgyCxjNNbkG6qotu+mmjyLrMDy i9mERENQeCSJ9ZKeKmGTpDaLhD5OZZOTXnjQL8/pSmpuklRD+FQ2wZ4mlBc+ 0REeeAQWVAwlph+K1QOkTHZbpntt14bdwCaIJCASOsHkLph3r7ftXWvdX2w7 WOpEHjlMiCR0nQyUJMEI4RFMDEMlRUzoLg9iP8dr6GWBCX2g5QRdJ3SPyUk2 ORVP6D1TsIc72u3pVIJnsc878aHgkcONoXurfcAmcPzRxtCt651wPTYxIe0X MZULcQZjKCDEk/cezrz/aAbYBOYPnywAniTSuhI1u2hBE2CTzxIFhBFPgErQ BU/P6UI2AX3/WXLdYJLXRLbo2DQEAYRu3IA9OSnVS8jlGGTeIU55TOvC+Mjv P70PC8ATELz8+oPbv3q2C5wCLzH1C23y2EglyXdPz9HCe0vwyCG5Wyy3Rezw dFT5s0hCSISES071oSTKecGzOvz+84e//5Tq+YjpZCQFDr3wKMImf/rsjE3O xtk4G39mLA4HrCqWUpwrF2ZrJAURh9xtlDTpRcAmlZxMETO9gk3NsL1BNuGV 56Ejnl6tK0mM/PTi/DQQI+GUL6Xw5EpJ5jlGxmvM7HOcvIsVJakKQb62ktFY mdckKwU8abZIgVAC9XxgEwAWwBOnotxeV0IV7EqEThoqsul4gmukEkASrSAN qETNS1FxryqEV1WiFJUwRSm4ohJeVcNLwZX6ihR9ZWqDJK1RCpCSbq5Ot1Rn uOsKfQoGEEpQUxrVM5sbOaAOK7/LLuhxCAc8lcP+KtgeT0TkEzEZsslCh3qx UzUZrgQ26U3ETYBNJl2lcz7mYpB9I8zdbRfvtIk2YtzVEPNmmLUeYa9HOEAo 60HmOhVGYW0eCxO3AEn2EpYTOpUkadNTchDlUn4TYJNm4XZEgHGTgUTcpFuT 3pHAkzZV6ul+E1WZS8sON9V5LdUrc93/x//27dJ871R/cKC1qdmtDVnrguaa gFHqqRdpRdlyTkrMLD5Y7PjyjdVv39v+/btbf3q+DWzy5eOFtzZ6die8QCXz bfUAJhvDDnhJ6mLBkamYZqZZN9eqX+61YNxkf+qo6u/mqH1rrAm0Pe6gCCUR IkEeAWFxYLoDBSsM74y7tqZCqyPeaz22yZaGqVbjWEyfmBt6vcoWizRmrIyb JMAgbiU7rK/ocanHY5Y+n67NLouZq1ub5K0ORdxaG7FUh0xSf0OFu17o1gtx 50x4BDmFREZIuAT/8I5FaGF/2+qoxUq/PX7YssJ+tYHER671e4BKZrsdhEcA WEabjXAWkAQWcDFQDKo7WN8VrO8MgHSoDr+2zatudinCtlq/SeI2iCxKdn1V UWVpWnnWOUb6q+y8S1Jmtkpcqqwoq+UzitOvpF94Nf38ufK8TCmnRC0Vipm5 QCU5V14pyb4oKM2oYOUAm1Tx8wBPgE34pSnoN2EXXeQXn8ImFnmJqa6ooTrP IM1pkOaaavP/orgJHTrobHIST05lE3qFLoInL2OTk3iCtbnwE0jcBL4afpWY XwdCPCEwAmBCep2cyiaY00Uv1YUd4TF0gvldcIQypMTrR9oaZvrswCYIJqD1 2SjMJHqC9bt2F1oAT27f6Li70o08cphwlxzhSSKhC+3wSChJPELX4fF7Tw2a EAZBNoFtP1DAU1oYhZBLUjoWnWt+CZ6QTyNlvkhohg44SeleeAG8EcAE9HB9 EK6heGR3HO4WAQfbmiDpAIYQazxpCg8H37k3AVTy1t2xJ/tD7z6Yfv702kev LyYqd/2Y04WE8tlPSwej34Q0XqTHTb6jdYQnvomTfg04ThK36B1Dkg4ep1q9 TgIfpK0JQAfmbpHGJf/27TMgju8+e/jle3uAJ4At2C2F3jgeIy8J+0ly3CQB Iz/a88kNEOc+4AMJqdCTtU7N2iJ4curZb1/cxzYoCGXwvb/9+ACUaEl/SPfC //NXr2N/kzM2ORtn42z8ReNgtTfqkBrqCtWSHG1VftBe47NUUWxSUyLhZgGV wN5GWJ7BZaQCm5DQycliwslskgdKY1ACNrlamnuFkXGuLPtiWeZr7NyLlaXp NexsGS9XyU7R8NI9ajawCShqrAAqQVM8sglxndBhhAiQRCdMBwGYAJWAYKEQ pqgq0pRiwJ8rKtFVtegqQIpeklZfmWqoTKXYpJpiEyCUpupcwBOPrMirKApq SgBPIvXlLUZ2m5nTaeP1OkUYPRkL1Y6GawBPgE2udWqWerSzseouSwlhkwlX yYynbN7HvAbE0S4GbcR5q2HWWoS9GecBp6yHEmyCChwJvfAYLkEBodCRBGnl yG8S4++GWHsR7q34kd8EwKRfm2ATbUanNgPxJC7POMkmLg3TZ+DH3Uq/rXbj +sD/+3/968HO3MxguL/FHrYrHPViV73Y3ygJNFKNNmDbCQ+5zS49XO393bub P3y4/4+f7P3zi1tfv379vd3BO3NhIJHlXvNiZ8NKn+XmgO16V+N0XD3Xqlsf atqbDGyNejZH3GuDTXANAMtCO+XWud5lWOk3Ap4AmCCb3J4JEDBBzzuiCsyA J4RNtsdcMx2m2U7LTId5OKLr9si8WpZDUdLeVNPeVNtirW6x1rTZ62AOGcQh Q6VXLXDI2T6tsMVa1+lStzYpYta6sKkqZKoKmqr8Rom3sdJvkp7atRwYBCvN YpkpPAjbWkASev8RELBJX1A7GNGPxBuJnYQgCQhjJbDAFC9gE5gBT+AIoEp/ 1NgTMiTYhFKHX9fm1TS7lDGH3G0Q11cV13DSxSWXeQUX2DnnJGXpckGhVlKu lTAlrNyy7KtFaeczzr9akp1aw2fW11ZW85jsguzsS+eKMs4JSrOq+UXV/EIp N79WWIxsUsnJrmDDP+FUtJwIGOeRTaq5qarK3EYZw6ZmApsYa5FNqLiJua7g L/KbkG4mCCZE9OSuJDyhswndCE+iJ3+WTQieYJkv/BBY2BVl8Mnw1Rg3ASoh cRPM4CJsErNSlbtOZRPSFJ7e4gQ7mwChYFoX4Amc7Q4pB5vrgU2wCSNQyfa1 FgydAJtgQtet5c69G+23rlMCNjlY6qQqcd3sfXhsh8csL6JTSYRETwiwJMz1 QyQyQqIn7x7MwK6eWDyovodrAyct85hqhfCCXUVIO5I/iyf0IAhdSaZ7wjt0 JkJ6QkK5faPr9vVOknL2eiKh69HmMKw/fHANCwjDAh30xG+C3RjfujP+4ZO5 p7eGbq+2P9odfP/RHLDJ86eL9LgJ5nR99vpNpBIUGuFJv0UAE+wGSOkFGuEP kxrBH0UBjrfcpBIv6YFIGoXQwyjIKehwRwA5rrJFuU4AOrDtO3re8RR6TGCN tbxgRkIhreGPixW/TjfjE/d9ghQeI6QQbwj5cY6jIY/+4etT2ORUDDkZN6G3 UMEbwC/FtvLYuRJQCAMo//rNW//y9RuIJ2dscjbOxtn45ePDw/H1aZdDm6+v SlWKLsUckpC90qEX6GoYUl62sDxdWJbBL8lkF6YJyvL4pbkgXkkOtySby8jm FGexizJBrMIMELMwHcUowIjJUXnhktyrJTlXi7MuleVeZeWlcgrS+cVZotLc SmaBtDxFLsgxyZmehoqgpSpkkfoaxS4t061ju3WsJlWJqTZPL8nUidM0wkyt KIvanyR2KVphplqQoeanqwUJ8dNVCcFCKUxXCROzgJJakKYSpNaL0kAGUXpD RbpRkmGUZpqkmXZprqM6311XBHjiUxQfpXjVl8cbWK0mXpdd1O+WDPsTHRuj iqlmFWU8aa9faNfNNyunw7UDTewBO2vEwZrw8Ka9/Bm/YCFcsdFcsdlSsd1a udUi3ogKNqP8/baKzTB3M8TZCrIoUbWFy0HbAB0B1naAReV3hTionUS6V5K2 w6zNUPl6oGwrzN6Kclf97Dl7Edbp6tKkdWrSkU0oPFFltwCbyDMj8mzsvRg1 sFpsEr+eFzBXxZzK9YW+f//j5ytzvXPDsfmRWHvQEG6Se01Sq5rbpOUPNZsn Ox0tLlnMXrM0Evr8zc0/fn74Ty/u/OOnB79/Z/3Te7MHs7GZeP1Kr32527ox 6LozFXm82P5wvmV/1L/e0zTfUj8ZVkyE5L2Oii6rYDqqWu213J+P3p0N3Z4O 7E14N4aaVvssawO2rRH33rhvfyKwPxm4NRncnfBtDDs3R1xbY5796dDOhA8W a8POtVHX4oBzussCG8LpLuvSsG9p2D/f65poNcMmf6LNNhIz9vq17U5lj1c3 0eLs8tT7dJUBg7S1SdXmUFOzU9Pu0na4tG0OTYtd1WxXtjapm+21zfaamLU6 aqkCRcxSEByB43FbDQhOxaywm61qddTQN66dHjnsXftDx5vVuGGi3TzZYR6J GwajuvGERXq0uQGO9Id1cIegma6muR7XSBw4pXEkbp5qd/RFGgFP2gO6jkB9 T8TYGWoI2mqjTpVZzeOXXi3PO88uvMhjXC3NeU1dyTbKKgy1ohpuMTPnat6V 17IvvlKY+moVu9CslDTKxRJ2XlH6xayLr3KLUqq4OQpxkVxUWM3NqeblyEQF tYK8am52JTuzgpUhLk8TlFzlFV/mFl/gMS4Iyy5JOWnKyvxGealNyzHJy4yy UqOs2CQrNssYZlmxRV5kgUXCykG1HEpQCVkTTwedTbBxCXGd0Ety4Uu4noAJ dp+Ez6H3Xjw1bkLP9SJ4QicUWCPg4L0BN2FRNayohjEvZEzAEOI3QTaBGWkF fssIJkctToKq3pC6L6zpj2gHojrQYKx+uNkw0tIAGoXfMvW7NsIML4di9bPw L2LMvzzqX5sMb8+3UE0GZ2Jbs/HtuebVieDaVHjvGoBJJzZAhw35wVIXvATd XelNhA966aI1hR+gI8lJPVz/0Q5PYij0vCzEDUygggtI5S5klgdrAyD8kKTg y8siJvTQCZ1EiNU9qSAYsZkg/pAbQ3rCG066K7gfQI/nDxc/ebwEAhg5XB8E hNlbaINnBaeO4iYH0x89uv7m/vjOQsv9tf7nh4sfP74BRxK68fGjG588WX7x +urnbyZX6KIX6fpJ0OSjO9/TWi6S5KUkTqHX4Pq3b9/99++egTCPC2b6Zv44 fvFjI3jScpG0eocFgAnpz0gKc8HZ7z8/BGF/RswEIx55EhAhVhcSr6FneYGA FIAXvvvsqDMjqeV1augkiU1Ozeai+1DowkYw8HXYvBLWcGPwQCh0AnCjfvDH //DV63/81aM/AP19fsYmZ+NsnI2fG+8/GDrcbB2M1RqqU5TCCxG7KOaUOg0C fW1JFT9HxMwQlWfxS4FB0pFKUAAmqGQ8KUgHFeenFCeaMIKKcq4wQNmUgFCY eWnsggxecbagJFdUli9hpkpZ6XJhbkNduaNe6GkUexpEHj3PXc916VhOTZlN UdhYna2rSKuvyMbe0BqkEkEGkAisT0olzFAK0pUJMEkAS5qKn6rhp+gEKXoh 4ElaY2WGUZIJsldRbOKqLUywCZXcFdKUR/XMeAO7zczvbhIPeKQjgVqqUSNl OdEkogANi52GxXbdtRb1kJM32MQZdrBHnZxxF3fKC2wi2WiuXIuJ12PCzbh4 Ky7ejgt34sLNEHczyElQCVWwa9NXtukr3fSVYwMUBJCfwZPtKHs9WLYWKN0E SIlwlnzMWXsR1d9EndKpTu3UpCGYJNgkqzXBJuFE70XsCx9qgJ0hJ9ok64uZ H+zM/t//9cPTuyudYWNHqMFnqfaYpF5zlcckCdpq2rya6R73/IBvvt872+u+ szLw7Sf3v35z9YcPd//4fO/LJzfe3hy8O9f8ZLl7bzy4OeRZ7bLNx/QTAeWw q7bfLh3yyKYi2q1hL5xd63eu9buWu23jQdVsXH+zzwEH9yZCMO9Phpe6Lau9 ttU++wrM/Xbs4Xi9y7TUa90a825P+Pdmw7cXYoc3Oz99svT9J3f+43dv/dcf 3vsfP7z/v3//3n/C/8q/eedfvnrz+4/vf/Pe7S/e2P7g3vJ7d67vLwzszPaC bl0b3J7pme7w9vobO1w6VLtTC1QCeJJQHWJIgkGqEU8SwEJnE1QlSfsBPOny Utk+sInt8avIX9SpArOJv6iDsOTseJtprMWYKMzlHG+1AkONt1hnuzwzne6J 1qbhFutA3NwRrI86Fe6GSn1tmUFWHrDJ9DIWu+gyl3FVVlFs0ogsugq7ttam qVVVcMpzUrIvvgqzqoJllIv0NTyVpJzPSCvOoKikhleorCiWiwpkwnxUnSCv hpcDYFLFyapMgImwNIXPuEJnEwknTVGR1yArtWrYx2zCMFFgQrGJWXbEJnQB RCCYYGyCsAnJhSPQAeSCPVAwfoGn6KYeUqcLQx4krYtuJKFTCfIIRk+SCAVm uAzZBKEJm5sgm6DlBMAE2YRuOYFfLswAnqT3IijxW5YTKgEkAQ3F9SjEEwpM 2ozj7SbQaEsDgPNcb9PSiG91PHhzIrQ91wLEARiyMR2DNczALCtjgY3pKLYd pIIFFJ50H4MJpfs3+0EUKaz9BEmI64RerYsIwSRJyAhJQvogvUueJPzmBEyQ a5KqDdNzvegpWy/L3XoZxbx53CCeVOh687gzI0ZtkGhgDbAGT4a4YwBAMHoC V8LjwicGTwk/6tmd2U+fLMMMTw9LfmHGF0ANBSaPl+Dsi6croF+9uU4iJkQn 2YRqWf7TdvB05wV9P59kJ6f5SihaQUAgOVcnywgDd/zhi0dIKMThjt0V8Uqc 8Sy96yK+NwE4R7WC6V9NTzAjQEGcJqQwMklXS6rEdSqVnAomP6NE8hjV5zGR GndI+jySB0hKDfy1Nz5n42ycjb/p8ezewLt3B/YWA05dgVp8KWwTRR0Sd6Oo QVZWLcitYGWJmdnCMoCRzJ9nEzqeJLFJ8TGYgMpzUwmbgCTMjMrydCkrQybI ra8usaq5boPYC9sYAwjwhGlXFhtrYHOSib2hEUmUvDTQX8QmKu5lNfeKjg94 kmoQH+EJsElTVR6GToBN/MoSwBNkk3aLANmECpqE5cAms61aAJOlHiNopbth uVM/Gagc8whHXdwRB3vMyZn2Ca9FpDdj4rWoaC0qWI8Kt5srdpvFW1H+eoC9 EaBKCgOPgDa8pRveEsImfz50EuNshpmAJ5sRdoJNymdshS9jkxZFZkSWQdgE fpxWuyRkFAbMVSFb3cJo/Ievnm0vj072BYY7XBGnAtjEXi+0aXhNOkHIWuPS i8yK8jaPcmHAB2zyydO1bz/Y+f7DHcCTzx8t3r3WstBhutZumoxo51sbFzvM 19qMi+2mpU7LSqd1fdB/vdO+1O2YbTYOeZWjAe1YUHuj27Hc41zt98DZm/1e qsZvm2UsqJyO6xY6Ghe7TDd6LEu9tqU+22K3ebHHsjriujni3pr0374Wf2tv GDYYv39++5++fPpPv36ayAd49I+/evqPv3r9jy8Ov3731mdPNz8+vPn2/rVH a5O7c33rEx3XB6Iznb7ReFO314BU0ubQAJWgqNCJTUlnEASTsEmC0RMUvASF jJURsyRhga86/tt7XZsTuIZadHqU3T41qDdAOeJneuzXBikX/BxlPHEu9Hnm ez0T7fapDsdcj3e8pWk4ZukLNPT4Dc0OpV0j0FUxJMw0UcllbuFFXU151Kmx 6SqV0lKDgm/SVGhqOKLyHFZeql1bbVRUsPPTKsryjXKxRsKqEzBqeAVyUXEl K5vPSKkTFNTXsAx1LLWEgVQCkAJzVQJMQBJ2JgmaJHSRsIlcnGuoK7GoWS9j E6usBGCENEZEpzlAR1JOF91sAmyCYAJXEt8HtmIkNQcQZODtgBIne5qg6GER OpWcZBPSHR6DJlgLGrPIMFUPa6mdZBNcAIyc1I9Bk4h2kGq5SIHJ4FHvRQpP kE0mEu54qjt8p2Wh3wlgsjYZBhgBANlf7NieawZC2V1oBWa5MeylQipzLXAK jmD05M5yD0IKLGCDjaRwuP6LqASF4RLc4RPR07dIEhceIayBbIJfl1SF+NTi wCfBBI3qpNE88cKf2kXl1DYrGDd5cLP/cGOIuqXt0cRDa8E2KHBXGCIB6ADi ACS5s9R9H57SzX6MswCVAIAAicBlmPqFC3gLwRMUSej6hWyS5IWnx1DIfv7Y DP5jT0aElP/8w/v//t0zjKGgU560KSFdFIE7ME2LdFpEkbN0lvm3b59hSAWj KpgGRvpC0jswEpsJ/fZofhNSvOvw5I/zP88m2D4e3wJf8btP7nz1wd73nz8k VYVJHho+tL/2xudsnI2z8Tc9Png4/N79odf3uoea5YbqtJijMmQTe4ziBnlZ jTCPSlZn5cA2iVeS9TI2SQqdgBgFqYzjfvGAJ4wElZTmppTmXC3LSWHlp3OL sgBPYJaUZ1azc6o52VXszFpelk5abNfwPPVCrx5E/WXVKmM0SHN14kxM2UIq IcIASpIQTJLYRMm5pOJc0gCeCFJ+ZBNprk2SA3jiqj0yxQOeoCke2KTHUTHo rUpik+VeqhXjWp/pZk/j9VbFbLhqwisYc/MmPfzZgHghLFkJ89diovWYcD0q 2IqL91oBT0TAJut+1gZFJWUJlax7GMgpp4ZOkrQX525FWBuh8i1kEy/FJn0J NiE5Xag2YBN5BrBJSJYVkueGEyaaqEkUNVc0u5Tt/vrl6Y4/ffPB/d0FAJPB NkfQXudsqLDpBDYt32uSdAX1XcF6h46nFucYpIVdPs3qROzrd9Z+9/4mzB/e nd6bjc53mtZHPPtT4btzzQczsc1h741Oy0ysftSvGPKrBnzKhQ7rjR7ntU4b Fvi93u0Yj+h7XbJuR+2gTzUR1c+0GOdajTPNhvGIdiigHPDK+rx1vd66kYhm NKab7TbPAa0Mu29fb33+YO6PLx7+8OnD7z+++91H977/+P73Hz8A/frt/S/f 2nvxeOuDuyvv3rr+5s7Co/WpW9cGN6e6gE2mO7xjzY6hiHUwbOl012M2F2GT uFURs/6ESoBBQMHGikCDGOU3iEA+vRAuQ4qhB1PanPKWprpWh6zDrezyApvo hqKNQ/HG6W7HRIdtsqtpvN0+3e2a7HTM9vpGW5uG4rZOnz5uV9pVAl0FQ1Ka xs69wCu8VJ79qpSZoaxgWNSikF3tM8sblEKZuISZfzX36iuZF/+OkXFFWVFu VUtMCrG+licTMpj5qTmXX+UWXVVLSgx1HG1VmaqSAVSikZbArKwoQjCp5edi 3IQKnXCzK5jpwCZ8xhWKUBjAJhcFpZck7FRgk/qaYpOy/GfYBPu2Y2gD2QTj JhiewCpnSS54UpyZ5FZh3ASropEjcBl82smeJoRNkqhEK8rCrM4kNkG6wXvD L0VoImyCpdWATZrtVaRIFxEGTWhpe1Rm15ERPqgeCGkGw9qhiG4okcVHtV+M 6ceaG8ZbjZPtpqkO81SHZbLDPNFuonIOR3zrU5EEnkQxiQtmwJOt2Tgc35pt BjA5XscTkEIJrwRCQTz5i9gkqf87+kdOtmLEhCu6TR7Z5PC0lLCX1Qc+tWIw gRQs9otOkFMjLG/Q2sTjS8qkn7gHuDf4BDhy+3onPD14FNT9bI3AG4FK0PwO B5dH/UB58DwplFvphU/DwAroo8PrwCNYcxjbNcJBOALHQb+cTY79Jsmhk5fl MiWFTv7068dYreu4evBbCWSg6gYDWRA2IXEQ5BHEFrImOWAYIiFN4eFd//H9 +6CEa/4odwuRBHmEdGBJQidSDJkEUE6lrf9JNkH2Oaahx9++uPfr93d/8/wW HKSXL4Y7RFb6a298zsbZOBt/0+P5o9Fn9wbfvTu4fyPi0he3eqrC9oof2YRN sYnwz7FJEp6UFKaBSFtGikpQCTZh5qVxCjMBTNgFGZVlWdXs3BpOXhUrW8rK lPFzdRKGWyd0avhNKk6Tim2TlzVI89SCdDknRcFNpRwlxwyiOvaYJEnJT1fw 00BKPiJMqpKXgmyi5V2tp7EJgAmyibuuCKgkqC4LacpjBlaLkQts0uusRDaZ iCgoNmnTXe9qTBjArev9lo1+83qv/kabYjZUOeUTzvhFwCbTPuFKWHAzKlyL CjZiwt1Wya02yV6LmGKTRNxk4ydxk7IkNnkZnuzFeUdsEuVsRbnLPibFJprU Xk0qsEmXlsYmyqxmZJO6zASbMIBNwg38iEkcbZK1+XQ3Jtt++OrZ63dXuqOW vmabz1LdpBcBm1jUHJ9Z2uZRT3Q6F4eDfRFDY3VxQ1WRp16wOx//9qPd7z7e e2tv5GCxZXs6fOd668aob2UAAMQ802KYa21Y7LTc6LYt9jTNtptv9DkXumxj sIsLa3vcdQN+JWooqJ6IG+Y7rdf7HNe67OPR+m5nbbO5ImYStVgr25uqBsOa kVj9ZAeVJzPTbducjb19e+rXb+/8+u3dr97Z+82zW1+/e+vLN3c/e7L12ZOd Tx9tffRg/dntpbd2r72xvfBobXp7pmdlpOVaX3im0zfR6gI2ATA5GTdJsEk1 iY8glRAl4UnMAlRS22yra7HLWpvkbQ5Fm1PR5VG3A+g5lR0uVadb1ePXDUdN w62WyW7XeKdjutcz0+eb7fdPdLm7Q41+U41VJVAKi6TlGZy8S2WZ53j5l8WM DHVFiVIEJF4ZsKqchhpdNaeaV1iSfTEv5dWcK68w81Ok3EJDHd+mkRhkfCmn gF2QVpxxLvvy33ELU+oE+WpJsb6uvEHG0kgZ2uoSoBKQqrJYIS6UCfORTUCw qOblVLIyRGWpwtKUBJtc4pdQbFLJTq0TZmsBOuSlxl/AJsRsTrfDI56QNC0U VjzDVoxJxZmxrQyuMW5Cyv/+t+MmCE1YoQs/nx6gwRYnWGaN1A0mLU4QT1od 1cgmaDYB9QdUA0H1YFAzFNIMh7UjEd1IpH44TM2jUf143DDZ0jjVappuM2PQ BP5zBS30O2FrDeixPdeyv9iRMJi0bM7EML9rcyYO65sTIdhgwwKpJBFYoYIs yCbH/pFTcrpOFcnRolvOCackhU5IahYp4UsHExJ8oWde0buWnJqpRaoQI4Cc Cib0BDD6e+8sdcMPDqABN4OFguGB3Bj2wsPBEA965AE0gC9gAQ8QzpLEuYOl LnTNA4wAhoCwuhea5WEm+V3/DTYhoZPjyMgj0t2D7OoJDpBMKnjvty/u4ynM uUrs+d8gPIIxERIEIQ3fSayELjxCfyNxpiTQ5q2kvDJSvAu/He8W7ge7MZKG kvDT0ZnrVB75b7AJ2uGxTyUmccH3fv3hPuAJWm+w4hmAG6ac/bU3PmfjbJyN v+mBcZP37g+/c3doqFnZ4a+LOaU/5nSxEzld5T+X00VnE8STZDbJSyF4Up6b CmwCYuWng8QlmRWlWZLynGp2HhBKDSenmpVlkbESYtoVLLuCaaop1lcCnmSg HR51lL71i9lEzbsCIjldDRXpgCe0oEkJRSV6qhVjcyO3zczvsov73ZTZBMBk KkaZTeY79Es9ppsDtvUh++agbWvQuj1o3OjVL7XK5sMSYBMAkwk3byXMXw7x VsO8jZhop6VyvxVUsRHknOY3OWKTPx86iXE3w0zCJit+1lxT8UvYJBPYJFyX TtgkUl8eM4viNmncqegI6BfHW776+NHBxvRwh2u0yx1xKrzmKodBbFFznQaR Tc31m6RzA777a8Mr49FOn9qmYMZsonfvTHz93vqTrYHdhfjauG952LU/H9uZ Dm9PBDfH/auDrsVuy3y7sd+ngu3cbLsV9mxjUcNEs3HArx4MaEbCsK+rHwpp x2KG+a6m5UHvyqB3ps08EFB1OmtaYXPYVNXprhuO6ans/UQO/8KAe/9G59t3 Zt+/e+Ojhzd/9cbu1+8e/PrtW1+8vvv5071PH21/cHf13VvLr28t3FueOFgc 2ZntvznWttAbmmr3jDU7RmL2/qAJMATABNkEs7ngyMviJpjHRQ+jgCKm6pil Nm4FMFG0O9Wdbm2XRwdzt1fX7a2HdZcH1vW9fsNgq3WkwzHV6+uLmX3mKqOc q6ooryjLLMs6X5rxSlnWOREjtZabp5WUeQ013obagEVpVVXoqzlyIYNbmJ51 6dWClNcYWZeEZbk1grL6OpFRJTXU8ap5+az8lMK0V4vSX+MzUlSSkkY526Ti 6usol4pRydJWA5sUY9wE2ARDJxSScLNhBlVxs4nlhIqelCCbXKxgXa0VZGmq Cgx1jASYnMImmNBFzCYoOIiZXRikQNag1+NCNsGmlug3IVW8SKgFW8kD4MBH ESP8f89vgi0XMaGLNKYnlETYJFFJ+BQ2IXW60HKCzU0GAuohAJOgZjikHQnr RgFJIvW4GAM2iRkm4g2TzY1TLcax5oaJdtNcbxNovs+BrhPYOYO2ZuNrk1QY JYEkYVhg0leCVlpgHw47cyQU3KLfv9mfCJoMH64PEDv8z0PKqf4OjJ4kicRN SAlfPEhEiIZADUnWQjZ5mUc+qcs8KQJMF0kAI5fBDTy42Q8/OAiIDF4CaMBD QGMOppbdT9hwEDQAXuBKYJPFQfdsjx0e9ep4CI5QYZdEaTJAGJwx1IJxEwCT T58sf/GL/SbIJkmhE9xykyyvpLgJPbEKrvn9p3fhvX867oSSOP5jUxLM78Jy wRg6Ib4StJOQ7oqIIYgwhGKIOYWEIf6e6gV/ZCE5ySZw/LvPKDZB98dxT8nk kND/EjZJYiJ8L5DRbz8++P7zhwhQ9KDSX3vjczbOxtn4mx7v3R8EPHl2b+iD w4mdxXB3SNHsrnY1CA2yUmATMSsT2ERQBgyS8fNsQg+dUDldBRSVHNfpSkGz SVkeBSaAJ0gowCbCYkqVZdk1nAK5oLiOmy8tBwCBvUqZVQ5gwrbWwe6lHAgF NzCwVyHZHWg/OTWn6ySbaPhXtYKUekEqsAmACbKJXZoLYOJXloY0TACTVqOg 01rRbhF02kS9TsmQr2Y8LJ+Oq2dbtHPt9Ytdjav91o3hJqq27UjT9pBtb8Sy P2rd7tcvtdTNBSuATSY9/Ot+zlKAczPC34iLNqLCnbjooEO6FeZthrhbCWvJ 9lGdrjJkk1+S1rUT4wCYIJtsx3irAfa8g/FSNpGlJ7FJyMCLmitiDnlPxLgy 0/mbT5/c25nvjprbgw0JF7zUbZQAmICMsN2VlVuUzA6vGtjkzsrA2lRzp79u ecz7dG/4jb2R2zfaNmfCD9d6bl1rXhpyTrUaRiLqfr9sMKiYatHPtDfNdTpn O5zdbnXcXD0QqB+JGKda7WMxc59PBwdHo8brfb71sfiNfu9Uq7nfr26HHaNF 2mKv7vapJjttU1120GSndW069nBr5J178x/eX31+/+aLx1u/fuvW1+8cfPX2 na/fufvlmwcfP9x6fn/j7b2le0uTtxZGdmeHloaaAUxG401DEStoIGQGGCHZ XLCOWeQgYBNieyeEkmQzIXgSNlZHTDVRM4UnzTZ5i13R2qTscGmAR0A9Pj1Q CRAKnDKrOK7Gyt6Y2aYTlOVczL70SkHK3xWlv8ItvKqVlls1YndjHfBIi7ch atM21vJqOPmCorSi1AvZF18rSHm1IPW8hFmgl4k8Zo3LqNbXVYjK8ovSLxVn vMrIfI1TeFlZWWxW8RvlnAY506hkNypYJhXHrIaX5boahqGOspxoq0qBTdAI fxQ04WZL2JkVzHRkE8pvchQ3uShmXq0RZKkBB17OJifrdBE7fBII0IMjmNmF QRM0pAOb4BEMtaDQMg+f8xfV6TrJJtgaHl3w8JmYY0aMMNg0k7AJlhHG+gaw wCNogSehE5gHfMohn2rIrx4OqEeC2tEQSDcWrh+P6CeiIMNkrGEq3ggaDGtH mg2AJ7Bhvjbggj0zEgpgyPKoHxfAI6j1qcjOfCvmem3PNSPCkOJdaPR+SNXO OmrIiD1QEFJOzel6Y3fspAOdVAMmxEGs7iS0gVGJpEbw+K7D42AKXnBq1ANF ihXTE71exiaY9JX0XWj/J5XE4CYT8aYOTC27t9ILTwbeBZQBeAJ3BUfg+Rws dQOYJCIscXxucD3eDDGbECP8X+SFx/4mdNs4nUcQQ7BCF0mdohMKHE/AwiHu w+FgYiv+DgII8AWpx0UytZLyuPAIAgjJ+8I1fggmev39T7uQJJrX38c4TlJC F9YQPhkMSooB/S9hE7SWwLckIjUPE0+GepnAkwdJnv2/9sbnbJyNs/E3PT66 N/DicOTjByPP748+vz9+fcgRs4td9VxDdWENl9rVVDAzReVZvJIMQVke6sdK woxsgBEkFEASWOOivCCtPD9ZaDkpz0sDQinLTaE4pSC9PO8ciFt0SVyeKmGn V3MyZbwcBQ/oI6+hqshSW2qXlTclZK4tMUgK9JX5ONNT0DXCDI0QiwmnqgUp Sn4qSMVPVfPTNJRSKXFTtLxUgyCjUZxlluTaqgrsNYVeOcOvLAtr2XEDr80k BDDptku67OI+l3TIVzsWkk9GlVMxFWixx3ijz7wyYF0btm+MUk06dsadO+PW O/PuOzOOtX7ddEwy5heMBwTzXs6Cj7sSEq1HK9ejFVvxytsdtVsR4XqQC4Sy GxNsBFk3PYx1b8mGi7Pp5mx5ONs+3q5fsB8U3AoKd/2w5u0FebdC/NthAegg ItyNUv0Wt0L8NT9nM8zfiIhm7cX92ow+qrlJ+k/ZJKNFkR6RpYVk6SF5dkhd THVssUmabVJfo7Qz2Dg/3Prbz97+0zcfA6RsLvZ3hhsdBjHIC5tzh2ymzzfZ 7dJJC1SibKeG2xPQrYxFH64Oro1F9+Y6Ht4c2phqnmy3jTab+sP1N4YDuwud G9PN4+3WTr86YKrQCkuU3MJOt8mhqCxPv8RMv8xKvyrKT61j5jpVkhZb/UDI Md8TO7gxsTzSOtsd6A0Ym+2qdpe2y6tvtitGW+yzPb7JDte1geD+Yu/tG/1P dqbfPrjxwYP1z9+6/c2HD3/zwYMvAUzeufPVs3tfvHXw8ZOd9x+sv317+cH6 1MZM99Jw87W+cH/QNBS1DcVsnR59t6+hAz7ZqYk2qSJ2ZdAi85tqgpa6Fpcq 1iSPWOtC5pqAqcrXKPEYKvxGacBYFTTXwMLfKA2aqt36Cmd9TcRe7zMqm10N 7T4LrOPOBm+jwqyokAtKhIxMbkEqM+dKUeql4vTzRrm4M2izqCXCkuw6flmj rMKkkLR6rUNtwc6goy/m7Ym4tVX8/NSrxRkXSnMuFaa/Vp57RS5mGlWVbpPc a1GatZVVvIKSnMsF6RcY2ed5BZdquVn66lKLgmtX821qvlnBsap4MBtlLGMd 0yhjwtxQU2aoLdPXlGqqGMrKQpkot0aQWy3IVUpLa4QFQmY6h3GVXXyVzUhh l6RySy6yCl8rznqFV3pBys/Q1BTp64rr64o1FKQUN8pLrOryhtoi4BRDTa6e Ug4sGmrzGuryYDbKCkBmZbFNXeLQMV16tqeB620Q+I0iv0nsaxR5GgQgb4PQ rec567luA9/XKPQ2CqmDjUK6GwUt8+iaBzYhlhOY4R91UvN3VFIBYdJ7EXCJ WGAIlQATIZgQLzyCCRYNJk0Y8UhSi5Ner7zfq+j3KQb8ysGAaiioBo0AoUR0 Y9H68Zh+Mt4w1dIIGo8ZJluME82Ns+2WhS77TIdlvsd+M2F+vz7kofK75lvX p2OUFWU6eme5B/besJ0GPIE1bLyxlhcW7IItN+7VEzOAycDhxuDjzR+N6okI CJbhAuIYJsWv6O1FSAd2pA8qCrMxhPv/pPrAxKhCz/sCHdJKCpPiWicDNPRs LrqQEegmejhysqow3h4p0gVzAsoG4DnA00DD+6PNYSzbhWlaWDoYXS1wdmM6 ilEnLH1GVevaHMagya/eWkcq+fyNm1Tc5I2jMsJ0kXbwWD34D5/cA53KJiRH CzfzpGwvut1xb4/MQtCAAAISDelvQopukcQtUryLtGVEYYQFIyYkyIKVhBNX vk5uCb/o95/eI3YPUkaM5J4lKOMn1bTocROkmMQ1pxYQPqlT2ITOMnSgS5yl WqL8/tO7IIzvnLHJ2TgbZ+PnxxePxz47HP34/vCHd4c/OZxam/C1uaQePa+x triWlyVhZVSysqgywiUZBEnoOrVaF1YSTlLpcfQEFniEApbcV0tzX2UWnOeX XBGVX5Ww0gCIFPxstTBXX1ForGJYa0opNpEzgU0apIUowibHVYXTE2ySphKk qARXKXcJLyXBJqkIJlpBWr0g3SDMMIqzLZK8ppoiZx3DLS8FKonoOHEDv9Uo 7LCIu2yVwCb97qpBb81oUD4RUR4FTVp11/vNS4PW1UHb+kjT5phzZ8K1O+na HDXfnnHenXdvjRrnWmvGQ6KJkGjOx5/z8q8HhavRyrV45WazZK+9Zr9VuhMT 78aEezHhdpC97imh7PAuzoabu+nlbvl4OwHhLoBJULAT4O+CghSe7IX4oP2w YDcm3o4I13ycZXf5epCXYBMGxSaadCpuclykK9F+MaNVkR6Vp4flGWFlDsZN gE1cGlZPqLEnYlmZ7v3//p//8dvP32321vc1W2NuVdBeF3bIfWapUc4cbrXt Xe9bn2ltdSlqWBkqQY5Ly7vW41oa9N290X1vuX9pOHh9MHBnqf/6cLDTp1by s2rZaTY1r8OnG22zD4SdHS5Tt9dqqhYI81LEBWmcrEulKa/mn3ul8OIrBRde Lb16TlyYYaziz3SF5noiA2F7xKwMmeSdXsNQzD4Us14fii6PNm9Md+xd63u4 MfH88OZnb+w/f7QF+uzNW79+du+r9+5//f6Db54ffvH2wUePtz94uPHOnZV7 NyduTnbszPaujLRMtLom2tzAJl1eQ0uTut1T3wby6Vu99XGXJmxXhGxyV32l xyD1GasD5tqQVRa2yoPmuqhdaVcL7Rqhr7Ha21gdMNVGbHBxfcxp9BpVTbpa mbCsKO1i2jkq+QqUe/m1nEvnci+fz79yIefyxZLMKw11FR0Bx0BzANQf97f5 7CPtkab6Oj4ji5FxUSPhuBrkZdlp+annC9IusgtS9TJBW8DaGbF7LIqgQ6uu ZpXkXMy89Ep+6mtcRkq1IB8YBJ5tk0bQpOHbVDyrkmuWs2G2KDiwMCXwpLG2 3FBdCmBSX1OirWaopUXKyoI6UX6NME8hYVBswsoAMCkvuFxacKmk4FJx1qu5 Ka8UZZ6vFuYYlCyjiq2vK7XqOEZVuaGuSF9b2CAr0lXnNtQVUDBCKR/mI0ip zW2U5ZsUhWZlkU1T0qQrd+pZLgPbZxT6jCIQ0AfAiEvPA5EFggm8JGyCQROg CZu8FMHkZFSUWOOTQidJxnksz4X2fGJvwSwyABM0wtPYpIbOJmg2wQAKYRNs cdLnSwaT4ZBmJKwFMEE2mYgbJpsbQGNRWDeAZtrMwCazndbFPufmDAUji4Pu mxOhDViP+qe6rJszcaAPoBJMZAJtzTbD1hqFYAIbbGAWLNiV1LvkCDSODexY EDjJCI8oQUIheIq4SE7q1IbvpFMJKav1sr7wP1O8i+6Xp6MKXYfHN0a62BNW gjVGZBDZ0HXycaJrCSZrAaHszLdSPp1jKqGc9RtDb9+mvg6uQZz55PHSZ6+v fvHGOmlxQvSbZ7t0PPn+47unsgmmRWGXEOx+DoI1bL+P/e9H6VtJ+V00vUkn kSRTCZ1QSMoW3XJCRL+MsAm5yURM5MeWiC8Lf5BwCbHS0DjlR/pAmPpZ/aII C9rwkd3gW776YO/TN9cAo8688GfjbJyNnx/AJi8ejrw4HHvxaPLF4xlkk4BR ZJaXygQ5UnamhJ1NpXWVZmLiFsnmAgGbCMryyEsAEyAOeqMTuoBKsJIwFT05 DqYwcs8xcs6VF1zkFl/hl1wVlaZImOlyfq5CkKsW5ukqChqlDEttuR12YjUl ppr/n733/K3jzNY9LUtWoEgx57xzzjnnwJ3z3tyBOeeccxKVAxVsyUm25Ci7 c3K3u8+5F+gTZi4GuHMGGAwwmD9lVtVLlssk5W7cL90fWHhQeKt2MW1T8Pvj s5616qziWmATPbdcyy4hZU8wMMHYhHlVxcxT46YJNtPkaGq8gVNk4ZXa+GVO YSWAiU9eH1A2htTNaTMrY2HnbNx2Bw/ApLtF2OMRAZWMxpRjcdVkCgOThXbT cpcVwGRt0LU5hIHJ7hiAif/mVGB31HFzqgXY5Oaka6VbPZXkT8S5UxHWZJg5 E+MsJflraeFWWriTFd3pkN1qk9xo5V6PMfbCtN1Q806gactP3zpik70wE6gE UxSJDnhC6HqSsxdnrwcoy96GzQgd2GTOUw9g0qO5hvfpuoaGwoM6tMU5dXFK WZRQFifU5Qk91qcraqJn3KKkW5HyaOaHc//3//iX/+//+veZwcRAzuO3Ch1a ht8qaPWr0wH1/EB0cyo3PxC+vtD5cGt4qtMbswnGMuaAtsklq8m2iAaTxsGk uTdq6ArrgV+UjNKmonOVl98CUUrPWyScNr+tM+zMei0Jpz5iVbtUAim1ilNd xKjIr8u/WHnpfOn5c1Xw/CVMpRfeKjqHfSyn9ppe0DyQci8Np5eGU9szXdcX eh9uT3xwZ/mDOysf3VsHDAEYATD5xScPMDz59OG3H94FAa0As3xwZ/XB5sTW ePtiX2Ii5wc8GU63jGa8fTF7zq/P+HVJjzrikIVskqBV7DcLvUZ+wCIOmEUt ep5Ly3GoWRY5za5iBq0SeFXFrWXXXqVWvFNXeK74nbdAJRfPVeW/XX7lXPmV t6sLLlTlX6RVAUTX6kUMl1YcderTfltb2NsRDcA57Xf5zRoRra7syoX8t98q OH+useyigFLm1PJa/QaDlOI1Slv9llzInvIanVqhhF7NaSjyWyQSRmV98UVm 3TWjrNlvEQZt4phTErIKAmauz8jx6FlONdUia7ApmhwqikNFtSspVnmjSVJv ktQBm4AINlHwqmTcKjmvVsqp5tFL6fX5DRWXakovVJWery56u67kolrU1Boy DXeF+rMtnQnrYLsrHVLZVAA4lVphqU5UAiRiVdTghILJKKnQi8rgbJFXg+yq Ooe63qVtbNE3ewwUn5HuNdARj2AAYsWMEoQkSIhT4BwwMPw6GpE0QXViCDFA gB4oRwb/qImJJ+RCL4JNiMg8wSbEyEXUshiZJm9iEzKekNmEGL/Yh1MJAhNE JQhMgEqQgE0QnuA3TYhN5jpcc50unE1at6dS21PJvbnM3lx2czK5PBxCXbkI 0wSE7BK4g7bZhKtCtM8iFshfgB041koXT6YgNiEAhOAXgjiOlXX9PWxy0to4 NQh/sk/Xscw7slSQgfKmejCUiyFaFpNTMIffOc4s7+I+Dgq8A2h89e4anD97 tASXD/DWAU/xdl5wCQ/Du7Q/nwWyQ3gCOIM1EH6++c3zLfLsxV98uIfmwgOb /OaTmwhM/vTlg++/eviHrx6cZBPUHRff+WM9r1DgHRkNBIAgWCCPaCfmISLE IIwPcqjkGH2gbl3oVWI4I0El5N7CRAT+zz9/8t1rrPsW4Y8cm8ZCGBlkGCHc E3K3ZDQUEjU3PnJn3qS/l03+cjS5EpV7AdZ9/cH2r17dArj7R298zo6z4+z4 pz5ePx758mDo9ZNxYJMvHk1ujAXb/KKojetQNio52FxpIa2MRynD2aQYVW0R hAJswm6qJDwUxCbkZsJk1ZZcOewkjBsoqKartuIiqKHyYnP1FWptHr0uj1l3 VcooA8kYpUAoel61VdzglFMATOxSDE9Mgioym+CbGdw0AR7BfRM1Vtl1DW7q OUUmXomZXwqyCcodwkq3uBqBSVhDiepoR2DC73ILe73ifr90ICCbSGjGE2oQ sAnmmOC9uVYHXetD7q1hz86o7/pE4MZkANjk1rT35pTn7qzv3pxvZ9g8n5WM xzgTUc54hDMV5cwl+MutonVMwtsdcsCT/RRvK0TbDlJ2ApQtX9NmgAHaCtJB 2yHGdpgO2o0ycdF/pBgT2GQjSF31N+/EWTtJzry3AcCkW13QoSlo1xQAleTU BaAObUmburhVVZxUliQ1FUk9mr3IjFs5wCa5oGltqud//vt3v/vm44Gcd6w7 1B4zJbzKsFPiMXJcWkZvwrIwGNuYTO/Ott1a7tmZyS0NRRf7W0L6JlnTBQXl slVcGTIycl4ZxiZelVtFV7GqWTWlTcVX6wrOl71zrrnkEqX0sprT6NFJgyaV 3yDtDLsyXkvYqrLJOVYpyyBkqDkUUXMVpbSg8vL58otvVVzCVHXlre6Ysy1g 1vLqTOJmj46XdKuyfv1kZ2h1LLe/OHB7dQR0b2P80e7M473ZB1uTd9fH4M7u XO/aWG5lJLM10bE2nOkJW7BoiVOZcilb3aqoTRq1ywIWkVvHcWpYDjXTqqCZ pTSTlKbk1HEbiqgVeY0ll+oKL1ArLoftioBVRq/Krym4wKzJbyrNbyi52lxe SK8q4TdX8poqRLQaObvRKGG16KWAJCCfWelQi2wqsVHMl9CaaJXFNdcul156 u/DCW8UX36ZU5DdXFIoZVXYNKx3Q9WfdSZ8qald59GKDiMmtL64tuNBQdElK r0i2qF1atkna5DVwE25FzCXzmbhBC9dvYnsNTJBHz3BpgEewfr8OVTMIFmZp nUlSC2eDuE4vqtOKatWCamATOc4mMm4NsImAWc5ouAZsUlVyvqL4XHXhBQGt Ohd1r0z17a9P7i0P31ofvbs9NtzhsSrrtcIytaDIIC4DWWTVelE5yCQBNqmE hUFUbpYCqlRb5TU2ZZ1dVe9QNzg18P1gcqqbPHoaIEnYzg3buMfYBAmxCTJN EJiQGQQlStA/atR961gI5VTrxC6tBcwh2ARRyalsAgACOlbWdbKgqyukPGaX jCT0IDKVkHQYigc2mWlzzHY4ZztdS4OBzYn49bnM/kIbsMnubOY63owL5U1Q M+EbC7l7OGXcwdtVoZ5de7OZY2xCCFEGsAygzX08YUHuzXVM5Bqtv6ljhEKO zBNp91PB5NRoCXoGpUtACG1ObUGMEisf350hEAZ+qBvzOUA2NMUeQQfCHNSM i7BO4BJ9z/ASclJQoRfQCurQBWcUWgGQef3eJsEmxER4BCa/e3n7D5/dBTD5 89cHf3n9+LuvH55kE+RHEOiBDAuiXgsVd6EJg+gBIpNCsMlJN+QYm6A2wohN ELwAHfzpW6CJp0TRF3kACtFA+GhA/BOigTA5jU6+JPXp+lELMtL6CfqKf5NN /n7fBL0bP+ajx798efNnL67/ozc+Z8fZcXb8Ux+4b4KxyecPR189GNscD3UE JQSbSLAJbmV8ajm7seRU34TTXIVqvUBE6uRUPPmhkzBJtZWX6rBSkysNVVea avIouPhYIVmxiFIipZep2JV6Qa1Z3IjYxCquRWyi45QeZeEPwQSzTtgFGnY+ WgObGLjFQCVWYTnIKa5yS7FSLgQmMT09bmAgNulwCno8YqCS4bByNKqeSGqQ ptO6+Tbjcpf1GJvsjfsRm9xbCN2e9d2d9d6f99+cdK52qyfi3LEIdzzKm4hy Z+L8xaRoJSVcSfCv56T7OclOgrcRom0EqJsBypq3cSPEwEXDFKShxVaEsR0F 0bZjP2grTEc1XRsh6vUUdzfFW/Q3AZh0qvLb1fltqvzskYBNcjibJJQlyDcB NknaOBETK+PTDKRbZgbS//GXX/y//+df+zItwCa5iCHuUeBswvaZuV0x0958 5/pE69pYcm+ufX08BXiy2OcZiGliZoZDUqWgXRU1XJRT8x3yZpeSknAAehhT LaqQRaTlNYlp1ZTyvIor56rzz5W+c6704lu1185zG6uljAa9iO4zySe6k2uT fdN9mcFMKOrUWeQcDZ8qZdTzGys49SWD2WBX3KXm1Ss5tVpBo5pXq+LV6oUN ZkmzVUYFwcIkbjKKGtHZIGzQ8etAdgU9ZBEvD6QWeuMtSqaGWallV8soJWpm pYRSDL9F2K8xtRgkpBTxGgsAFoS0CmZ9YWP5lTpA5tKrjWUFvObyFqPEqROK 6NUiRo1RxrQoOTYlHzDEa5SHbJqgVR22ayMOnV0lADxR8yhiei29qrAi7zyQ SNmlC0UXzlXkvd1QcoVWVSxh1FkU7KRXlwmaulOO7pQ97lHaNUwZp4Zbdw1Y DDiOUnpJQi21SKkeHTdsFQdMgqCZH7WLYw5J2CYMmHkePR3kNTBALTqaS0Nx qoFKmhzYRJIGiwzApAYEC52wRiuoQWCi5FUiNpGwq0SsSi6thFaH+yZlmG/S UJZn14hnhzv2Vib3ViZurk28e2flYH+2M25Rcsvk7GI1vxRIBGSWwptfqQMu EFfDV4EzXMIC7sNXtGAJ+nr4NkBWeR0SEIpL09yio7q1FOAUVNOFHJNDNjkK mxBsQvQQRjVdqBkXnIlCL6Ksi+jWdQxSjrEJquZ6A5ucgifH2OSoT9ffYBNU 0AWaztmmsjYAEzhjizbHVJt9ptu9NhoBBtmby+zOwjl7A6cPuLkyHJrr9Ux3 udBIFFTihafjc0T/Lnw0/Cm+CWy2Ecs8WO8l2IRcakW2S45xx6kgc6pv8qZ+ XCcdk1PZhOyb/E02QdMSicfgh4I3Ad4QABOCO4AyiDkmqFcwuoO6JSOLBM1n RE26Xj/bgEssSr/eC+8bPP/1uxuorAvwhHBMEJv89tNbKGzy/VcP//z1o+++ PsU3QVPOie64aKdNeAdABMAmcCZsFLJ7gvPCc1QHBQtiDuNJ34SciEf7f4QJ BBGgDz/q7vUcfaG//v4j9NXRt4Gj0HNyQv9U34TsnpBS848JNiHKuk5lkzdF Tk7TYVqHeN+Ihsz/6I3P2XF2nB3/1MfrxyPAJt88nfjy0fgXjyZ3pqJZrwDV dCnYWJ8fYBMBtZzTVHosaYJEpOOJ+Ak5e0JWc1VhY0UBETmpK82rKb5cV321 via/oeYqhifVeU2gqiv02nxW/TVeY5GIWipnVCjZ1WpurVUMO5k6i6jGyK8E GXhY+YeSXgA6TJcAj3AKdFysuEvHKdJzi038UpuoAnbUTmm1V1HvV2F1XEAl SRMrbeVmbLx2Bx/ApLtF3O8/ApOEDndMtNNp/VzOuNRpWem2rfbYyTVdwCao puv+YujunP/OjAfw5O6sZxe3TsbC3MkofyrKn47y5mKCpYRwKS7Yzkgwpfgb MfZ6hLEWoi37m9dDDFw00FqQuhakgDbCtM0IbTNK3QIkwbUdpwOVAJusByjr Qcp+K283xV0KNHcBiSivtqmu5lRXgUoyyqugdk1RVkXKm+iw+SZBbTM2e9Gr 7kk4htvD33z6+F9/99X8SOvadMdwh68zYc2EdEGbsEXPagvptqZzwCZbUxlg EzgvD8c2R+PL/cGZdtdkm7M3qveoqQraNV7tO8KGyzpuuUFYq+VXRx3ivpSt I94StKt9FpVByqLVFFXmny+6+Fb++bdKLp2rvnZezKjpTHj6siGTnG2Qckwy nlMrgYf9Vkwhh3a0KzE/2jHUER7ujID6Mr7hjnB/ynWopLMnZkt7NH6jAHgE 2ASk5lSr2FXALF49b647OtkWcMnpJkGDU063iJpcCgbCGYO4EWSSNptlFIuc qpcxNWKaWkTVSOiwAMEdp0HsMkodepELCMUosah5ZjUX2EQvYoioNbzGCmAo 4BSAFFZdSVX+BeCRonfeKr9yrq7oUnN5gYLTrBUyHBp+zK3NhazdSfdYV7Qn 5Xbr+Upes4RZw2supFZdrC48x67OEzdXmEU0n44bMgtjdmncIQ2ZBTG7OOGE tThmF0asfL+R7dQ0eQzUoIUVtLK8BqpD3WCR18DZrqq3KgAQqs3SKhNIUqUV VGsE1YhNMDzhVyv4mGkiZJSzmgqptVeb4V9WTV5T7VUxq7Yt1rIxN7yzNLY+ N7C/OnpwfX5tusut54lpxUpOBWCOXggkUmtTNNmVFDibpcBBDWZpvUEEYFIP a1yNVnkjauwGVGKRwfdTa5YCK1UjIVRxqpuAVghO8R+FTYiaLiALYrw7og+0 JrMJoZNgAkINjT3qZjRp5Sdquo6xCcKTYwVdh2xyImlCpOARmKAg/FTWOtOG UckMIAnOJjPtzsmcbaHftzWZwNwQXDeXOm6vdO3P57ankstDwdmelpGMuTeq 6Q6rdqZSRDNh1LALiAZVKz06LW+C5VDw+YxkNiFbHm+ij7+HTch5E1RwRXza U0u5TmWTk+n4Y4PmycPinx8NlMfKt/BoPCp1Q4l+FDNBAsRADAJrIumP2nOh +2gQPJy/fm/9q3fX4A48A+/V072Rzx4tf/V0Hbkn5Gougk1Q2ORNNV3krDeR KyGn4wnLgDxkhPBQyDl3wiI5NXKC+AUtEIwcmRTvEb4JohuUu0c88m9/+BgE C+AUhCqIUMidxI7lTU5lE8I3IfDkzfo7weQp6l1MxHBg/atXt37/1X14e//R G5+z4+w4O/6pj188m/z60cjrJ+NfHIy9fnd2fy6Z8fBDZpZNXi9nlYloJQSb nOzTReAJukT334QnP+Tfy67WllwBMMHYpLagob6wvragrjqvofpqY3VefcXl porLtOqr7IYiIaVMQiuX0itkjEqruBaFTVCrLtiTAJvIqVfxmYxXsXQJu1DH LdTzCo38EpOgzCwst0uq3PJaj7Leq2oI66hRPT1hZLZaODk7v8Ml6nSLezyS Pp+s3y8fCilHIqrxuBbYBE+aaOdypqVO6yGYdNtW+p2rg66NQaxJ1+6Y7/q4 78ak/86cH9jk9nQL6N6c9/akc71HMx7kTUeEM1HhdJg3G+UvxAWgjbRkE8MT 8XZGtJnirceYK2Haepi5FmashWmrIepKENS8HGiG9VqEuh6hbESpm8AmcfoW zia7cdaqr2nZ27ibYO8kuctBCs4meTllXhanElBakdemLvyhT5eyNKbF+nTF YXOrp2X9WmCT0c7oX//47X/95/e9addwh78jbsmE9OmgNt4i8xjYUbtoYzK7 NZ0FMNmezoJWRuLrQ6DYQrd/psM70eYeSJj7Ysa4XWgW1XBrLrCqzrNqzgub 81TsMqOc6TZK+3PhnnQgG3G2Bm1Og0zBo7Iby2qKLsA5E3YkfObqoqull7Gu uY1l+dSqQlpNIbO+hE+tkrBqHTpR3GfsSnkm+lNrs30HN5c/vr/x6cH2pwdb sPjo3vqHd1ef3Vx6vDf7dH/+/ubE5lTn4mBqeTi9MdG+Nd6+PJDqDBhRTVfC Lk+71RGbNGAWBSyioFXsMwk8Bp7XyHebZTadEGTXi/VytoTTIGTUcprL+fRq el1JUyX8lhbWllytuJZXX5xXeuVi4YW3iy68Ra8uDlrVab+ttvBKbeFFdn2F mk93asQRhy4bcvalW4ba/X0Zd2fCFnLIlLw6CaNSxq6uL3mnquBcXfF5atVl Fb/OpedHrdKsR5vz6rIeTdarTgCYmPgRiyDhECccIlCrWxqzCVzKZqem0WOg +M10n4kGC4cakKTGrqqzKWthgWSSVhrE5VoB5ptohJh1ghGKoFaJqV7MqmQ3 F9HrC5iNRSxKCZtWZlQwhzqjK9O9oOWp7usro/sro0NtAa2wUcmuNkkpgG8a Xo1R1ODWMoIWvt/EBUIBEgGZJPVAIjZF8zHhTsohmxjFVSBgE72wAhGKTVGP 8ATk19MINkEdugBPgDhQzETPLSX6cREhFGKBjBVEJWRgIXfoAjb5yZquQzYh WyfE4EUym/Th00LfhCeITQBMkGkygTfpQmwy1+mabndMdTrXx6KoTGtnJr2/ kAM2QYF3uANaH4stDQZmut0b4zFifDyq7NqZbsUaVeFxePLEdsQmKAVPREgI 4iAbJX8/m5D7dJFHN5I/20nX46fZ5NQ+XaeyCTGuEZ5/9/ooitLAT30Pn/mO /BTU4wvOhC0C9x/jjIa+EDDLl09XEZggffZoCd0BYQR0Y/yzg6Uvn6wh94To HgxUgjp0ITD5ibwJUZh0NIfxRzzy/c8e/+Hrh2iEB+GVEISCsvDHwuzH8u8E vKAKLniJaOoFH4UsDOKjgE3QXHjiCwGJ/Pt3LxChgP7jj5/AJUAKGndIHvhO poaTWXgib/I39fd3GwYYQR4TeqNwE+rhb7+4e5Y3OTvOjrPjp4+vDya+fTLz 5cHU5w8mX96buLOYa/eKsT9C6uk6XoWcXqxglYuaC9m1V7iUak5zFbupEuXf EYDAGhEKwhO4CWeEIaiUi2ATwliBl+pK8xCe1NcU1Ffn11Vera3Iq6vMa6y8 2lSZ31RxlVJVwKgr5jSW8amVQnq1mFGr5FRqeLDhqTdJGo3iei2vUs4sltGu Kuj5CsZVBSNPxczTcgoM/CKTsMQiLrVJK9yKap+6LqBtDOmbYiZawkxvtbJy Dm5ni6DHJ+kLSAdDkqGwdDgiG43Kx+JYY66JpBo15ppvMy52mJFvAlrrc673 uzYHXIfzTca818e9t2dCt2eDt6f9t6Z9oJtT3v1x90REMB0TzsWFU2HuuJ8x F+FsZmWbKeF6nHc9LdrPiLZj7M0wfT1I3Q5TNoNNG4GmjSBlA3NPqKtBylqE uRigroSZK1HOXIC+EGLt5hTLCdm4h5WSFXXqK1cSovkwZy7E7tGXdKgLUuLz Gdk7PbqCHu3VTuWlrKa4VVWYUBYl1CVxTXlUUx1WV4e0TUEdpc2v6k1YRnLe z97b/48/vR7rDC4Mtw7lPB4D16FhePSsiF2UcApXRmJbU6nNycTaWGRtNAJ7 p+XB8OpQdLEvONPVMtnhnGh3jOdsQ63G3pgmbudYJRUy2iV+3TluzVu00gsa dk1n2NIRsvhN4rTPMJj25cKW4bbgQCbQGXP1pf0peIFRU198qfzKuaIL54rf OVd2+Vz5pXOlF86Vv/M2tSy/4VqejFaj5TS7VcK029QeMvfE7XN9ia2pzleP d++sjuzMdO/O9tzfGH+8O/Pu/vzT63Pv3Vh4sjd7f2tieTQzN5Ac6wh0x22d MWvcpQAqCdkkcE60qLritkxAD4Sik7OUYjqfWdtUc62y+GJJ/oWiK+fz33m7 +Or5/IvnLp17q+DiW9cuv3Xp7bcqr5yvLbhYX3iJUVWoE1DDVmXCqQuZZFGr POPVdIVN3WFzT8Q8mHDEnNJsQDPdGwrbhPSqS82lbzeVvEUtf5tZfUFIKWjR sdI+dW/COtbhaw+oOgJqUM4rTzlFcRsf1OoSwxYaNtJJhwAuoxZuyMj0mzCv wWugt+ipbm2zU91kVwEyUBwqIIUak6TKJK1GVoWOX6Pl12DWCR+Tilet5AGn 1Cu4NeymQlrtVQGtgkspFTIqQ07NWG9qcbx7ZbpvbWZgZ3F0baY/4TWJmdU2 Dd+m5lvVXIOUAYJ7XqMoZFe49Xy7muVQs+1KpkOJWVFWebNdQXUoKC4VzSGn mCUN2B0lJqscvjdAmAaDqBpXJQjwxGOg+s3w4zC9eoZbS3OqKXYFPFlnltZp eeUabpmaWwZnDazxS/IcE3IEnij6QlMXUfdgABMiBY/mPAKVgFADYTTcBJsL 75MgZXySrE+S80sx+X4wTXqASiLqPjwFTwjYBC0INiH36cINFCsq6wJCmWl3 YmzS4QD02JtN31ruvLHYhoVN8Pw7YAiWFsGbcSEbBZAEtuK3lzvhDjqjXl4P N/pQ79/HOJjAJWzdUWUXwgfUloqACLLT8aYEyknT5OS8xWMduk5G438iaUL2 TU5++Em6IUq54CvCTwo/O7wzj3YHQU9vjDy7Pf7+nckP7k19eG8a9PHDWbh8 dmvsvZtjBzsDD3f6UVdhoBWAkcN+XM83v3p3DcCEECKUzx+vAJsQZV3AJigC j5AEdQ/+/quDf/nmyZ++wUqbQETrKsQFeCET7LQf/+7LB7/94v4fvj4gNup/ +vYJ+hBYHNVovU+uziIKt8guCXIoEIAAaxDjS45GKz4nHBby7EXCeSH3BIMz 8kpAyDpB4RfCyiEMFHJx1zE8eZNQD2HUEABAA//Ad4n2yKeKsJawr/uzp//y LdITeHux87dP/vz60fdfP/pHb3zOjrPj7PinPr56OPH60dSru6Of3hl9cXv0 3jKwiTBooHnUTQZ+pY5XqWCVyhklvPo8RCUEg6BQCZlNELDA+VjSBD1JVHwR /YSBUIBK6quuNlTlIwGbNFZgAkJBf07nNJXzqVVCeo2MWaHkVKl5NVpBrZpX pWCVSWiFcgxMCtTsa1rONT2vEMDEKCi2Ssps0nKnoqpFVRPQNgCYRIyUpJWR sjGzDk6Hm9/tFQGY9AdlwxHpSFQ2GkNgokTTTBCbzOUMC+0mYBOsSRc+Dn5z wI1NhB/27I36UA9hYJM7s6HbMwHQLYxQMK22a2aTkqkIdyrMmYlwl+L89Vbx RoK/0yrC2CQt2k1wsVBJhLEVomyHqVsR6kaIuuZvXglSVkK05RB9PcZZTwiW o9zFCGc5KliJCTtMjUllhY9zJaOuWErKluKihQiv21Daob6WEr+dkV4AMOnR XOlSXsyoi1rVRUl1MbBJTFUWUVUCm0QN1KC2OeWSdEX0w1n3B/fX/vLLF1O9 UWCTie5wLmTIBvUBC98kqU84BYuDofXxGD45LrQyHFwfi6yPxkFAKLPdnskO x1jOOpQyTrRZx7LmwZS2P67qjSnb/KK4nSGl5Bt4VekWhVtFpxS/U3/tXMO1 tyW0ci2vwa7kxFzawWxwYaR9bbJ3bqhtrCvRk/K1R11tEWdH1N0VbTEIqEpm nbi5Us2sN/IoZgHNIeU4lUyrjBq1yyY6gs9uLvUnXXAZsUnDVgnsky1S2Bg3 u9QskFlGUXGrNfxaBbuS11ggaC4U00rgDkgrqAMkyYWMMZfCIqcqRM1iXj2b Vt5Uk19VfLE4752CS+/Ull+uLb/UUJXHbC6VCZr0KrZFL/SZZEGLEhQCKnHr Mj5jxmeI2xUBvdAppxv5dSp6qbihQFiX11xyXsYoygbUXgNbxih2qmlxl3Qw 7Zjs8o+1e+A8nHUBG/Ylre0BZc4rg90yASNoC40uYUeN/uwfxWeFIDbx6GmA JMAmQCWwxtmk1iiugm3/oUkhqNEJag/dEwxPatT8Wq2wQcWvZzYU0Ovyuc2l 1OqrFjVndbrvzvb87vL45vww6Mb69P7aVMJndhulIafWb1P5rEqXQewxy4M2 ZdihirfoAlaZS8fTi5q1/AZ4n+0KukvNcGuY8F/Zq2W58c7GWE9jRbNF1miW NgBugPTCKjynX4N8E6+R5jPR/CYWOdcPCAMgo+VXqHE2IUt/NMqELDKbAKoA mzjl9UQ1F7xp8O6ht+4000QGVNLqE6f9koz/CEz80jbcMcGSJjib9IZVvUeO yVBMSxa5TxfCE9xD+YFNMDxpdyDfBB9cHsW6b6313AHuwIkD6AObXbLRh3pz oc5duGmSQd23Djb7D/BdOjyAJneg2DuQyAE+Mp5wRpCHQgxVJFdnEZGTkzrm pxBjGck6NvOdXJF10i45tYcw0aHrZEEX+SZq84seJkDpyfVhAJN3b44Cmzy/ MwFsAgIw+fTJwkcPZj68Pw1nuA96cR/LvKOAPGrhhbp4If2IUB6tfPF4lUid /PyD3V99vI/sEjgTBV1/ef3oT988PhYJR/VUcIZLuPn7rx7++rO7IFgAoXz3 +hER08ANhR9lNH6iJzA5hEKeY0K8ShR0EXVcxGwUPDL/A3EgPCF3CTutj/GP dDKBgjLyb9J3rx8eeUlYjh7RB+EiIe+GaFb2IwGbfPPkmP7126egf/TG5+w4 O86Of+rjywejoE9vD764Nfjx7aH7K7k2ryBsZrgUdW51k1fPgI2Wkl0mohQA m5DxBIHGm4bFk8edIKGkPNFSuKnyGp6Fz6urutpYXXCoiqsN5Xn1ZVcaceuE XlvEaigFPOFRKiX0UhmzHLadcla5jFkqpRdL6dgIeDW7UMcrNgpLzaJSi7jM JCxxKavdqhqvtj5oaIqaqHELPWljph3srJPb7uZ3eYS9fgmAyWBYAVSCwARR yVSrZjqtBQGeAJsg6wTYBITYZHuoBbHJPs4md2bDuIKEAFL2h+wrbeqZGB/Y ZC7OX04IVpPC9QR/Ny3eSfKvtwpvZkS7cfYWZp00b2CirgWpqwHKSpC2EqQv h5gAMqtxwVKUB1QyG2T3mmvc7Msebp4b2ERXvZSSLybEMyFul6G8TV3YKnkn LX2nQ3WlU3W5XXGpVXkN2CSlKQE2iSpLwzibxIz0iIGe8ymH0o7FoeTPP3nw //zvfxztCAxkWqJOuV5U79QwAmZezClJeySITbamkpsTsbXR8NZkfGcysT0e XxsKzne3TLXZx9KmoYRutNUwktKBxrOGmU7LTKd5Iqfvi6rb/dLhtBn2hEpG qbChgFZ6ubnkbYCUxuJLlLIrICmtOmRVpXzmVr8FlPSZsyHbYDY0N5Dbnuq/ tz7z4Z2tlwc3Xj68/mRn6c7yxHx/cjDdMtDqXhxMPdmbhXXQLIo7FaCQRQzM AouMT5f2alv0XKwHl4xilDTJWRVSRplB3Ah3TNJmh5qZ9KjbI+a4W+nWcQxy pkHBsmh4DoPIrhdatTx8Lbbp+HDpNkvdJqnTKIGz1yQKWiVhu8xvElnldDWn RkItEzUWcqquUIvfphSe41RckjYVqejlRnENbLyne3xjHe6umH603QXr4ax9 ptc/1e2d7PIMZez9KTOo3a+ADTP6wz68UQhPyJxC4AnqcEVmE9QLC7EJZpcI yrX8MgxShLUGYZ1OWAvC8ERQqxHU6URNGmHjIZtQSkWMqqHOyLP72x8+2r+/ t7S3MrE63T8/2jnUEXMbJZ1JbzbizIQdrUFbxK2HdXvU2Rl3gVr9xrBD4dJy PXpBi47bouV49RwfSMcOGLggj47t0jDwnsZY/AQPp2BsAmf4hlt0VCxsYqJ7 jVS/ie0zYnji1tJQqzHAk1PZxICHShCSEMOMiLw8Ggdvk9S4FA3ELHjEI+it Q5xCDF4EMGnzyYFKkDJHYAIi+gYjNkF4QmYTIgtPbs9FEApikx/wBGeT8TYb UPzigH97KonCJlhN12L74XRFnE1QzGRvNrMzjXUbRvPNH+KzF+/h89DhJjYe BT7DYjtmoxyNNUFwAUzxEB9W+AhnFtRcizwo5G+CyQ84gJeNIRGTUIh2xG8a 9f7TbEIk3Ik4yUm0Iaq2EKQgD+XZrTGgEgQm79+dBGFscjD78uniJ4/nQQAp 2PnxwqcP518+XECmCUqaECLYBAHLl09WgU1QWRfRSZiYBU80EMY8FJw1jqXC EUegNbJOgE3gjPCE/DA5SE6wCRlSyC25yLMUYQ3cgabGI04hvijhofz19x+D jqL0z4ncPdmnQIBANAojl3URVgtRn/b3sMnRQHlMePPk+7/9An72e/j9Q04h vgqBJz94KN+escnZcXacHf8rxxf3Bz+/P/jpnf4Xtwc+uTv8cD2X83BCJqpb XdfaIuqO6bX8cgWrWETJ5zZXoZouRChE8OQknqCOXicbdgGPoNbBxGV9dT6I 5JvkN1XmA5sAoTRX5lOrrwGeMOtLgFDQn8Hx9sKlUkaJnFmq4pTreKVabjHG JoISABMQEApQiV/fGDQ2xyz0lJ2VcXGzbl5bC7/dI+j2iggwGYooyXYJGrNI CPkmiE1Wum3rfc6NU2u6MOsEo5K7cyGke5PenT7zYqtkOsKdDnMWY7yVhGAz KdhOCXE2EdzOSW608jdDtBVv45KnYdHbsORvxh0TxlKQvhrlL4Y4C2HeSlw0 G+J2GqqD/EsW6nm/sMjLz88Z6pczmtmocCLA6jZW5oBNpFfS0ks5xeU25eWc 4mJKWYDYJK4qiShKQsoKYJOInho1MrJeRU/MNNrmfflk97/++pul0czKeG4o 5w1YhD4T36NnteiYGa90aSi0MRHfnW3dmU4CmOzOpHYm4luj0bXBwGKPe7rd Np4xjqZ0wwnNWFo/ntWNpjXDSdVoq3oiq5vvsU/mTIv97sX+lvGcdSBpTLlE DlmTltMoodby6kqoJZfrC95uLHyn4uq5qoK3QNXXzlEqryg5dV6DaCjtWx/v nO6Or46070z1HmzOfnh7/fOn10Gv37/98xf3v/v62dfPb3770d0/fPXeH18/ //WrR7948QBe/fj+xrv7CzdXh5fHstN9sYnucH/a3Rmz9iQdbWFTyqtJ+3Ud UUs2aAAWizhkfrvcY5F6rVKPRWLTcvUyuk5KNSlZPpu8xSzWiJvFrGo+DX6r rzWVnqdVvs1tuMJvymfXXWZWXeTUXpE2F8mpJXJqmYZV7VGxch7tQNw+0mbv bzXO9vsmu92j7Y7J7pbxTudEl2tuIDDd65nqaRnrcIy02XqThoxHgjAE/VUf hNYEpyBsgT128GgyCGITl6YZbfUJ30TDK1VzSzD3RFRHsAmOJ3XAJioeJj6t lEsp0UvpUY9uZ3nk/Ye7r57fffnsDpzfP9i7sT492p1si7nv7S4ujHVNDWSH O+OD7VHAls25ge35wbWpnu5kS8AqtSmZLg3XpWYhNvHjVBIy8aNWEXCKW8t0 qmkgl4aO1WspmwDWLLJ6BFN4EJ6GswkL2AT5JohNkG9yWMpFkvEEm6ChJ0RL YVjbpbUobHKMTVBxF2KTtFuc9UgBTAAJAUkQm2SRYxKQgQ7BJKTsxsEE6dhw E8QmqIjrJJv8yDppw/BkLGsBPJntaVkeDm3io+Fv4tVcqGrrAV6gdQdPoOzO tO7NpnemWwFAkJMCz4BQxdc6Pl9+bTSCGSjrvQ/wQi9UfwULNB4FBORC4Mmb 2OTU/Dt5AArBJoQdAy8R7snfzyZE9+A3kQvRwot4BrHMYTPhu1PIKyEEePLx w9kXj+YQmACkgF69u/Tq0SKAyTERpsnX762/frYB+ub55uv3NoFKvnq6jvIm v/hwD1V2odTJH7+4/+evH/0ZKAObvXjohpANEcQIyE9BFVwISf74zfH8+E+0 3j3GJsQCxUzgAwk2QQBybNjiCdvlGTGeHuEGKuUiegsTaRTy+BXSVJRTfBNk jpwUEb357vXB7768/+vPbv/8k30UaYdXUScuBCnH2ARLmpzGJn95/Rj0j974 nB1nx9nxT328utv72b3+V/f6P7078PL+8KPNtmwLM2Bo9GjqOsOKpeFQ2MZR sosFTZcRmxCREwJMCBuF3KrrWBweOSYEmxB3GmuvNVQX1FdeRWqqKqBUX0Ns glInCE+w7En9VcAT3D0pk7PKlJxyNbcC2ETDKdZwCvX8YgATm7TCLqtEYBI2 U+M2RquDDWCSa+F3eIVdvkMwGQjJAUxwNlEiNkGOCaKS2az+WN5ktce+1usA bfQ7UVnX7kjL3pgHH3GCeSUEm9ybDz+aC90aca63q2ZjfGCT+Sh3McpdT/C3 UoKbWcnNrPhmRnQrI9xLsOdb6ufc9XPexgU/ZTFAWwwxF8Oslbhwxs8CKpmP CnutDQH+FRf9bTPtYkhW6eZcbdXWrrQZZqLiqRC/x1qbURen5Fdb5XlZPBSf kV/C2ESF1XTFVcUEmyQtrJSNk/MrgU2GMq7nd1f+8/vXox2BkXY/bNptSprP xPObeG4tI+kWId9kezoJbLI9lcDYZDSyORxcG/Au97jnOqzTWeNUxjCV1U/n 9DNt2HkqqwXNwDfWYZyEyzbDPLxpg96VQf90h2OhLzDfGxjNuLpCxqxXG7fL WzR8rYgiY1fzmgrpNVcolZdolZcYVZd7447JroiO32AUNtsk9EyLfrjVM9eX WBtvu7M2+mBrEs63Vobvb07szvXeXB66tTx8d21sf6F/d7Znc7IDwGS8K4R4 BH4uQJKkR51oUaFhi24dB3kocNZLmuXcGjGzQsQo51GKGXVXqdWXWA35LSZB i0kopJWyGgrwl4qElGtCSoGYVihjlijYZTpBjUNFgw15yiVv82s6g/reqGkg YR1M2ABDRtqs070tk90uOM/0eYBTYDEPbwJ+cyhrHkgb28IKIv6AJSDchzET oqbrR2yCjwg5jJzoqIhN4GxXNpilNXphBYAJCBan+iYAJlJWpYhZIWZVhZzq if7UynTP7a25d+9uvnd/+6PH+88f7FxfnezLhh5cX/q3738OwPLk9jrWWHhj BtafPr355Qf3PniwPdwecul4VjnDqea4NGyvnuczcP1GHrwPYbMA2KRFy3Kp ATfgm2SC3FoMT6zyBhB8q6irsEdPBTbx4TVdLTr6sZquk2xyqm+CmnchPIEF ah1M1HTBO0aUwxE1XSfZJBOQZgOHYHKMTVBBVy8pCE9YJyAymxCEQsw3Oeoh bJ8CdTgmOxzTQKZ93tXRyM5MGs03Idjk4WY/mlRyfS6DsvCgrckkNq5xNoO6 de1Mp0Ab4/GN8RhcooA8kYV/hGfG0Sj5+3hfLwIlfoJNjjXmIj9JEMoByaAh nif7Hae24SKzCfEMkT05SSUEmyBLhcCTj+7PfPRgBpVvgRCevDiYO2STxwuI UECvHi0RzbtggcDkq3fXEJXgIxc3v31/C9c2mgtPzDdBeAKXv/nk5nef3/v+ q4Pvv3oIbPL7IzeEwBMEIHCG+yC4iS5RRRa5exWRZCf3ASZ32TrZNJiImfzE QEZyty4iFE/Mo0d4gpImRIcuIomPTA1koJBTJ29iE9Qtmawjl+SA9Pyjn724 /otPb+APPESduMjBlr/pm5yxydlxdpwdf/P49HYX4Mmre30vbve8uAv/72vL eZhBY6NXW5cLiK8vZsc6HHpRuYR2hUetQXF4clkXgScEmxwDE3SJYiYnhdiE 8E0INmkksQmtphAr7qq9wm3IF1GLEZvImSVSepGcnq9kXgM2MQhKAExcyhqP pgHAJGSiRK30JG6aAJi0A5j4xd1+MYqZkNjkFN+EqOYiwGS9z0lmE8w6GcXY ZH8C69Z1a9pP4AmwyZPF6P0p726vYSktmYvxF6Lc+TB7NcrZSgpu5qS3cpL9 VsGNNP9GK2/e14yoZMFPm/dR5wLM+RBnPsybCbDHfMxeW2NcWuRmXnDSz5vp l72iUl3TBZ+obD6tmU3IZ+KSfmdzWlOWUhSklQU51bU29bW0/EpKeS2lKkyo ioBNsJouZUVQWZmxc1M2brpF1hUx9CVt97cn/vD62WRPZH95aGk06zMJLPJm m5ICu8qojbc4GMTyJhOxrck4sAkQyt5YeHvIv9HvWe11LXRYZ7KGmYx+rs0w 2aqeSCqmM+q5Nt18h36h07DYZVnsts61m+c7rSv97pV+z2ynfXnAP9fTMt4G uzXXynB0f77j7krfykRutCvYHrOkfNq4RxV1KcJ26UjWO9YeMImbddw6FaNK xcDGlIiai8SUYiWrEjUNdigZThVTzijX8motUgrskz06LiYtZ6Y/PtUbBSSx yKk6Yb2KW41XAFagmSbsunxWbR4sQNSKdxpL324sPUepuMCsvcKuv8qqyxNQ igJWccQh0wrrFewqo6TJIGnyGnkgeItCNnHMJU16YH+rbguo2/zqnE+Rw3a8 8q6Qui+mH+90jHXYJ7qco+1WWIDmB32T3c7pXjdoqsc1nLMAnnTHNbBJ7ggo QbBAeIJoheAUBCYEm6CyLjQ0BPb5DlWjTVGPTBMQKuvSC2r0giMw+SFv0ihh VvCoJSJmZdxrADYZ603srU4c3Fi5t7sIZyARwJDhzvizBzt//dPPfvnF8998 /eHXLx796Zev/us/v//f/vKL/+O//+bnL58MtQXder7HIAxapHgdHZyFIKAS hCceLQvwBIEJYhPCFoFvFfFUi56C503YZN8EsYlOUHmSTU7NmwCPoHGNqKDL rWwENjlZ0wVsQi7oQmETxCYAJsfYhGjP1R1WoSB8/1FvLrKATVD+/dh8E1w/ lHVN4Wwy0+UCMEF4sjwcwlt1YYl4lDchhAbBP8BLvIBQ9uezNxfbEKcAjACn YBNSZjNIQCIocoI4AtYPjgq9HpGCJz/BJic7Bp/avOvJUTT+TSNO/iabIOgg s8wxMDnEkB/bK4cvPZj9+CEmRCgIUg7ruPAz3Pn4AHv1kwdYEB6EKrs+f7z8 5dNVwishgcnWzz/YQbPggUqQfvXxPmomjMYvEg27/kBKkRC+CbqEM6rjQthC pFEQoZAZhAwmxICSY9mTozEl7xMAguiGmGlCfon82Y6+ymETY2L4IwEphF2C MIE0AvIHYHlz3uTgmABMAE9Q119iACWACeAJ3EdVXr//6gF6iQCTn86bIP2j Nz5nx9lxdvxTH5/c6nx5p/vTu90f3Oj44GbX4+1cu48VMNb79LVJN+fWavvW TNKqqNEKSoSMej6tFgiFjCdED2EymxwDE1ToReTi0aATEKrpAjZpqrl2qCq4 md9QntdYcbW5Mh+xCcITRvUlNmwgMeukRMooETbnc+ou8urOSyhXgE3M4nIA E7++KWymRyw0AJOEg5V2c9s8gk6gkqC0OyDpCUgINhkMK/C8iQLhCRE2ATYB MEEpeAJMNvpdACawQDVdWOQEr+kC4XjiRXiCrBNgk8dzodsj9vU25XxCAGyy EOEsh1lrgCdx7n5adCMt3I2zryc56zHWaoS5HGIuBZkLAeasnzntZYx76NNB TrelPiDIa+Fc8vLyrNTzFuZVK/uaqPwtE+3aWFgynZBPRsVDLfS0phzYJKMu zGmK2rSFaUVeq6owqbwWVxbGlMUxVVlYVRlQVKSsrKSVk/UqBlK2sXbf0xsL //KrT7oT9tGOQDZosCqoQaswZBVY5U1hC3t5OLw5mVgfi6KCLtD+RGRn2L85 4FkDNmk3w1uEUjnTQElZeLv0sznNVFo5k1UvdFjm2y1zbeb5DoxN1od8sx22 tSH/TIdtqt220NeCV+Annu4O7a8ObM51LYy2TvSGhzv8w+2+kXbfTG9kZTSz Mdm2PQ1buPGHm+Mv7q+/d3Px3sb44mArkEvaq407FX6jIGqTAZUAqugF9Sp2 FXCKQdgwnPMBmwBHwC8JCBgEqATYBA/I1yk5WEwesMUgbjRKGu0qukPNgJ/d pqS6tCyPgevWsQMWYcAicGmZTg0TFjGXPNGijrmUMZci5VVng7pcSAds0h5U ZbzStEfcHpB1h5V9cc1wqxGQZDBjBI20WRCMLAz5xzpsOKrYAFLgPqgnqe2N 6XoiWiAa2C3DnhkZKCCEJ+Q4fOg0NoHdPsggqlRxioFKYAGEouVjrbqASpBU PFCNjFUlopdzmouknJqoR9fV6hnqjOytjB/cXL2zPQ+6t7e4vTjakfDsrox/ 9PjG0zsbr57f/ejx/m9ff/Sf//Kr//Hffv0///r7V+/d6og5gjZZ3K2O2BXw nyDr18WdsphDmnBIg0YeFjkx8UF+E9ejZ7k0dLeWhpwRYBPkm+DWSTOwScDM AQGewAOo9Avw5FQ20R15JeR5i8Ajdmktsk4INkHdgwkeQe8eKpAjLCqUNyGx iYzMJodNunA2ATAZABLBi7iQXULo2OBFNOIE1XT9YJ3kMDaZwOcqAptMdDjm +rxbU6lbeJnWYd4E7w+MciVw52CzH8Dk7koXNrVkbwRu4pyS25lu3ZpMAKHs TMM/w1a4+QCv3QI9wsEEzRYkIOLkXPi/h02OJd+Jtlrk+wAOJ1sK/wSbAHeg CMmpXgkCExBhlxBheWze4v0ZxCaEAENePl1EvglQCcqhvHdr7IPb2NxGok8X CpgQYEIW0TcYOSaISlDY5Lef3kL3Dzt3HZVykePwsEZEAAsEJkAo5JgJUcpF 5gsyrZwU2Rkh0iUn2YQ8KZ6AFDyE8gy15CLPUjlZynUsFE9cnsomxB2ycD/l 4A9HIykRg8D6m492v3y+CZByRC6PTo6AwXTGJmfH2XF2/C8dn9zue3Vv8OOb PR/ud39wvefxelu3T5Aw09zSyi6f+P3d4Q+vj83mnC5xrYxVyW28xmsuEdEr aNX57MZSdlM5q76S1VDFrK8GMepr6HU1tNpqclie8FaI1AmRhQc1VxWg3lyA JLDGLvE1dnl0B4lRd43VUMSnlEqwcScVYkoRryFPUH9JSskz8EpalHUBbVNI 3xw10ZJ2WspBzziZOTer3cPp8vG6/XxQr1/Q5xf2B0QDQfFR92ApMk0QniDf BLEJETZBeRMym2BZ+An/jUk/sMmNSR9qz4XY5P5C5P58+M6M/+6M7/qIfaVd uZASzcZ4y63CxQRvvVWwnRVvpHgbCe71nPhOVrATZSz7mha8TXNeyoyfORvm jfh4I35BRFNvZOYbWIUmXrlZUCnj1jFqCyhFbykbrwz74POI1xPcaUdFVnQ+ Lb6QUeYl5PlYYy51aVJRmFQUxRXFcWVpTFURUddENLVtLmHEwEg6pT1R82jO d7A7899/82qsJzLU4U/5tBpBLezGI3Zx3CWFLffCQHB1JLw6HNqdSu5NJXex UHxkdSQw3++e6bZPdVgn2y1wHkvrx1p1oIm0YTJjmMgYxtMAKSYMTNotCx22 pS7nEuzPu50LPS0zsEPrci8P+NdGI9tTKfyvxH27Mx2rI6m53vBMV2C2J7TQ H10eSuxMt99e6ru7MvBkGzY/8y8frH353v7Xz2+9fv/2Nx/c+er5zc/fvf7y 0c6rx7ufHmx/dG/9+a3lJ3tzD7cm762P3VwaXBpO96ecnWFzV8SS9eujdlmr R5NqUYOSbhVwTdQhB8UBOlxwlkYd4ohdFLELI3ZB2MYPWXkhKzdo4QStnJCN E7ZzIhZuwiFMt8DmVp7zybOAEl4Z+iN8R1DZGVT1RnUDCeNA0jiYMoGGW82j Wdtkh2u6q2W2xzuec4zl7HAeb3OMZW0jGSs8M5QyDyZNfTE9EAp8BvhUsG1G kAIbacQmqDAp4xZGzQy/tjmoo4QMtJCeHtTSAlqqVVilohUqqQVaZrGJV2EX A5rVarhVCnY5SMWtRDVdEkYFr7lYAuwmoURatB1J98xwdmd1/Prm9J3dhfvX l+C8MtWXDtlHuhKw2JwdXJvqW5noee/O5uuPHn337cc/f/kE9Ksv3vv8/Vv3 d2d2FgaWJ3IrE20LI6n+jKs9akx6VRGnJOqUhW2SiEMSsgp9Jp5Ly3CoqE4F xamkuFTNHg3Vp6X79Ywg7ph4DUzCOgF4Qan5kyLPXkTFXcApRAQe5JDVoSB8 yMgkRi4SrYNRmdwxNiF4pJ2kTkzy7oCiJ6DoDSr7Qqr+sHrkNDYh+yaEiDbC 0znbTJv9UO2OqZxtMmud63CuDwX3JhP7M63XZzM3F9uxNrlbA0/w6ik0QhEW qG8wYo2HG3238IbDeBevLAqeoAEo6HngGpRVAYohSryODSgh9wQ+ohW4M3RM z2+MfXAL0GPiw9sgwApMcOf9m4AnQCLwscP4B2J67zpAECZ4CdcYkXk/mS4h jzt5E5sQ7gk8Twx8fP/OJGrGhTImqHzr82crn723DISC2OTR3uCd9a73b06+ uDv36f2Flw8WXz1c+uwR1iv49XubqFjrZ+9vf/NsCzXmAvpA+XdYIBIBofZc v3t5G9V3wX1sQDyOHsg6AfRAUXR0Php6+AG89M2H17+BT/LyNjyJkuxwxjsP n5I6OZYZIQ83OVbEdWwaI7p56ifBN//PUUD+3/7w4t+/A32C4AV/4AeQwT/q h2quH5kaP57MSDAIPq7lUMSIRjxvgiq4DuD5z95de//uzM9eXP/dl/d+/dnt X768edRw+CnxVeDr/unbR8hw+QvcRENPgIa+efTH12ezF8+Os+Ps+Knjk1uD L+8AgPTi6nuy3t7tEyZMFJe4rM3FfbjU/ni1a7HTGdU1Y1kPVrmAWsynlHAa i1kNSOWshopDNqmrptXVUOtqkFFyLCBPzsUTNV2UatA1JGrN4boZd0+QUEth EK2mgF5bwKov5DUViyilUlqJlFas51WYhFUuRV1QT42a6HELI2FlJO3UlJ2W dtCzLmZbC7sT8MTL7QE2CQj6A8LBkHgoLEGtg0GoposcOQE2QXiCyrpQG2EU OSHyJsg3ATwBNrk55UNgcm8+jLEJpvC9ucDtqZbtfuNCWjIT4y21ChcSvNUU fyMtWAc2SfF2MsKHHZJbrdzNCH3JT5n3UWcCrJkQdwS+TzfHLakwsovsomps yqSwmkOrrCu71FDwlrz+Ur+btZYUbCY4866KNtFbadHbadmlmDQvrimL6yoT P7BJ2RGb1IV1lKCWmnLJ+uI2YJPba2P/+uuXPRn3cFdwrDsUb1EmWhQxpxR2 6VmfbGEggNhkD7HJZOKQTfrc0132CQCTNss0xiaGsVbAE/14GsDEOAVKG6cz xpmsEQhlNmeea7POtltnO2xzXa6ZDifOJoH1sSj6CzAAyO50+8pQYq47NN3h n+0OLvRF4HIXZ5N7q4MHGyPP92c+vb/y+dPrXz27+bOP7v3yk4e/ennwq08P YAGcArQCzPLZk70P765hw002xndne5aH05OdoaF0S2/c3h40ApjkAoaMT4cE hJJwKUFJN0iecMtisK/G8EQIYHLEJpxD2dghG9aWFja6sL9FgQUEEXAGpgB1 hdSITfrjBsCN4VbLaMYGJDLV4Z7ubJnp8ky0OTE8ydrh/kjaigRsAh8CbNId 1nQElOhzEjVd+HwTrCoJYxOXIGKk+zUA3VRYhHE28aspJm65ojlfSSnQs0rN vEqbsEYvqEFsImeVwVnNq0ZsAv9UhYxytagR2CQXc8yO5A7urN/bX7p3feng 1tr9/eX5sa6AXd2bCU72Z6b7MwPZUE/KtzrRc2t16vGN5evLo/srY8/ubXz2 /Oa3nzz8/ev3f/PVuy/f23t0Y3Z3qW97oWduONnTam8Lm1p92rhbEXVKnRqG Vd6MGSgqqktJcasoXg3Nr2ME9MyggdWipQGVIKFMilFcYxBVn8ImkppjbELg CUrBA5igkYsRMxuBCbxv5A4DBJig/3ZYEV1A/gOb+A/V6Zd1BeQITAg2Qfl3 IgVPzsIfi8OTbRQ0jRE02+5Amu90LXa3rA0Edsfjt/A+XWhkCWKQQ07BrRDk pCDdXMRIZHkI+ysBKu5CkxlRBdeDjT4UnEdsQuTWTx1rQhIGGsf0/s0xQjik HAouCTbB8WSIhCSjxId8fPdHyRFy+dbJgYwn9eLeLIiYzHgYbLk79QObEDGT Jwuv3l0CPIEz3Hl2exzw5OO7s4dUcrCMugSjISYEkhAtuYhZ8CAEJrD4/as7 sEAZeXgYWSff4VSCoiVoiAlyQ5CXgVgAbn770f6Xz7a//Xj/t1/cR88ge4Vs l5zEk5Oz4P8enWq7EJ+WaPD1H3/8lDwnhWh6jArATg2DkKclIouE6MeFdDSG 8rBhF16+henPP3/y7cd7nzxaAjZBmZRfvboFREOYL4QvQ3w2FKhHLyFg+Udv fM6Os+Ps+Kc+Prk19Ont4fd3ez7Y6/34xsC7mx1dPl7STPXIyrMOxo2p6J25 xFqfazAik9CLVdwqMb2E21wooJYCKbAbS9iITRoqGfVVOJtUUeuqkF1CZpNT uwrjofhCWm0REqxB9LpiZJQQYIK6CjdVXGmuzKNW5TFqrvIaCiW0EhW7wqlo 8mioQQMtYgIqYaXs7KSNCWwCQmySc7M6WtiITfoCwoGgCIEJkTRBPYTJ3YPf xCZ4fZfjsKxrBIucIDa5MekFNjmiEkwHy7GHC6EHc4Ebo47lrGw2zp9P8IBN luKclQQX2GSzlb+Z4j1sF99vE11PcdfCjMUAfS7IBjYZ9Qs67QyXuNwhqvSp mh3Sequkjkurqiq60FBwTtV8ZcDDXo5xloKUxZaqDsm5tBhjk6jkSlxTCmyS PI1N4iZmzMRqdct749axNv/djYn/+OPXY72R/jZvf7Yl4VFlg7qURxG2CYFN 5vv9K8MhzDeZTCBtTUbXRoML/S3TnTYAk8mcGTSW0o236idbDaCJFLaYTmNg ciTTTNY8nTNP5cwzHQ7kmyz1+4FN9mbTt5c77yz37c10AIwAlUy1+2a6AnM9 oeXB+PZk7s5y/4P14YcbI8+uT796uPblu5hv8u2Hd3/x4sEhnrw8QGwCzPLy 0c7zW0sAJvsL/VtTnSsjmZme6EjW25dwdITNWb8ehDoMgwBVkm4VbqMAmyiA TY6sE7Jv8iM2QXlq2N/CzhZgpAMfTQIbXQQmoJ6IFigDhMAEMAR4ZLLdhdgE IAUuyWwCC6AYYBmAGvhw9AmJUDxRkoTYJGXnRoy0oI4CYBIzM4FNAEzcsno9 q1jedBXYxMgpt/CrQHp+jYZXpeRUYFEswBNOJbCJlFnJbSpiNhTIuLXIN1mb 7fvk/bsfP7v94r3brz64/+GTG+uzg9EWQ1vM3Z8LD7VFupNe0Op4z97C6L3t 2b2lkY2Zvs3Zvo2ZnrWprtXJzhtrwyuTbUvjmb3l/hdPtn728j7o6w/vfP7s xgf3Vx/sTnYnbHYV1SJrdCooLiW1RU1FbAJggtikRUcHMEE1XRZZ/ZvYxIKD CcEmhHWCZscDm6BqroCeToAJMdDkmGPyQ8DnVDY5YZogNiHAZDRpQCJnTAg8 Ie4QbDLTZgckQWwyB1Te4QQ82RgK3cSbBgOeAJLcWcHmm+zNZlClFoKLA7zK Cy53plPwb3AYPn/OujWZgMdQPRh8ICoDQ6NP3sQmb5gFfwqbIB+EEBlYEJsQ Nwk2IePMT2MIOW/yE2xCuCeHD+Phd4QniFDQcBPEJi+fLmKpk0fzgC2vDn6g EuALoAzUjwuJaMlFdkyIgi6EJ4AkqLEwLOA+sAnKmxBsQlghaMYiGpUIl7/4 9NbXH+z+7MUNYBPksJwcifLTbEI2Sk41Vn4CUk62/0J48u/ffYKPjP+AXF1G tBRGAkI5FUyI+i7yQBPgDiARFDmBM1qD4AFYv/5w5+ef7H/3GujjAB5AlsrR zMqnR5/tR2yCprGgDsb/6I3P2XF2nB3/1AfwyIubA8+2uz7Y6/n4Rv+7m+1d Pm6rjRpQV+Zc9JvT4YOV1jtz0e1Rj1XRLGEUi+hFQloRv7mQWn2FRyllNWAN fhn1FSB6XSWtrpIK56OMCXniybGM/BGhXAMqAR5BpgliE8I9QWByNPEEwxNK 5RVa5RVWzVVB0zUZvcQmrSfYJGljA5vELfSUg9bqoGWcDFTT1enldvt4yDc5 xiaTKTWyTshNuk5lE5SFR2yCxeGH3TsjbjxsgvkmKAiPwAQWDxajj5ejjxbD tyfcG12a+aRwLs4FNlmMsZdirLUkF9hkLc6+k+bdywlvZgSbMfZqhL0Q4eG+ iSBtaGyRVnrktbARbVFRgL+ErLrKwvOU4rfNnKKxkHApyp521y55qrtk53Oy C1llXlx2Fdgkpq041TdJWtgRAyPhkHQEDQOtbsQmqzOdC+PZ+ZHWVr8maBUG rQLAE2CTuV4f9gdbnE12JuLYeTK6MRJc6nNjsRHAjawJNBbXTiR1kynDRFI/ kdBNJvXTrcgxMR1jk+l2+xGb+IBNYEuGdStaGbg+27k6nES+CWKTpYHY5njm 5kLP/bUhYJP39qZePlj94t3rwCaYb/Lpw1+/fARgAoQCl0ArcB9nk+WHW5O3 locAT9bGctPdEeAvwJP+pBPhCTJNEJsclXj9wCa4dSJCbIKLeyg7Jwyo68Ty 1LC/BRjpDmtQSARxCqzhDrAJUAbBJsg3QXgCYAJnEOGeIEgBNjnpmxBBePJ8 k4SNHTXRwwZa3MJK2jjwH9GjaLQKKjX0QkVzvppWaOJWAJiYeZU6frWWV63i VmKjfxglWMoGz5sw6vIp1ZfZTUV2HT8Tse2ujH7/uy/+9Y/f/Mvvv/7zb7/8 2efPtpfGQk5te7xlsD060hHrSfm6Ep6FofaVse7F0faFkbaZgfR4d3yiJzbZ i50XxzLTA/HpgdjMYHxjFlBl6N7OxOP9+ffvrX50sP7Jk63pvqjfzHNgpgnV rcLZREtHpknIyPbgYEKMX7QpGk2S2lPZBJAECXUMRkJsAgtgE9Q6GKXgiYIu MpsgPPkRmwTlhFDMBI1c7A7+CEwGIhqCTRCVIH/kKGDyo25dx6gEaaHLDWAC CwAT4JSlHs/6YHB3unVnuhV+/1HsfXsqCdyB+gbfXe1+tDVwsDWAGgVvTSYX B/x9Me1QyrgxHocHUJUXjiRZFJZH5WE/zSbk7MlJMCELlXg93R0EkS0SQgS/ kAnl1M7Ax3Lux7oEHxPCE7I+wttzIRFxeCARoJLPn62AAFJQoRdWxHVklyAw IbMJrAkPBeVNEKeg/DtBKMhPQS/B4nf4zHeiLTBqF0yMgEfQATd//dndX726 gwbEowQK2TT5X2OTo3Ks4zr1yVNbE6PRJ0TzYeSe4K++f2pL4ZOEQm7YRbgk wB2/+fwOypWgS4ARePK3X9z75cub8CSqB0PjTgg2QULT5FFhGEFJ6Bv4R298 zo6z4+z4pz4+vN790Y2e97bb3t/t+uhG79PNtm4/N21vDmkr29yMO/PRZzsd 7221P17PdCVMMlaJgFYgZZXymgtotVd4VACTImZ9MaO+FPdHyqh15ZTacrJd crK3MJlQAECQXYJgBOHJseKuw0nxGJhgvgm9Ko9ZnceuucKrz9PzKuyyep+2 OWKiA5skbayYmdbqpKddDFTQ1QFg4uf34DrJJlOtGjR4EVEJ0aTrJJvgiXhM h2wy5NoedqFWXcAm5LwJzilBYJPHS5G7Uy37g+aVrGw2xpmPc4FNFqOs1QRn I8UDNtmLMW61cm+k+bsp3maCvxQTzIZ5wz5+WF7hFJW5JNVuWb1XQ3XIGwXM 2qqit9lVF92SqsmIZCmCscmyt6ZH8f+zd1/Pbd15ouCn27KVRTHnjECAACMI ghEAQQQSOROJAEgw5wDmnEUlSsyKlizZcs7dbk+3O8zMzq17t2qqdl/3cf+Q /Z7zJX86Aim35+6D/cBT3zp1EAhKlNV9Pvqmc8Hy84GKq03iq2ATa0XcqTax SzlY0xU018Id+/Zq+L/+/s3MSGC4yzHW4wra5V5jlVsn8RoqfPqysXYdscnK oJ2yyaB1sddIDRAO1I+COLyysFc2CDahSUKFs3rEWRN21Ya9p+RNiE2mOl7b ZGuu+8Z463yfa6LNEm4xYk0X2GRxwAPPg1zQJs/vTn+0v/7pw5tfP7/3h4/2 IMAm3zy///Wze2ATeP7FzgrYZHd1FPtNwCYjrZb+Zj3YpNvdELIpmunUCcSb NpFQPGksY9qE4olSaFHmHwfahOqnBj6gRIhNkCfEJp2OWsyJYOoEeYKBPEGh wEtY04WpE2a/CdZ0YS/8a57UcW0yjl3OBZi4lPnmapaqOKWWFwM2AZhUc2MA JoqCZBBKTUEK2KScnwAwKWFHl3LjxPykUm4iK+US2CQt9hwvMwZ4MjEQ+Ouf Pv23v3wJMPm3f/3iz999dGt5TFcndhkV7V5Td7MlaG/wW9XhDi/wZKK3GWwy 0GoP2JQ+szxoV7Y4VL1BQ6evsTeo7281DLVbhjusYz2OsS5nuNMxBMzssDka yhTibCXVaXJkEz3DJrrjfhOIhiqWsjyrTpR+qk2kBQkyOlAleI2t8QAWlSgN RwczbUJquiKaTbCmiwqT+AgmDJuE6JWLABO0CcCk2/Z65SLAJKL5PYIn5Hkm TxAmeAE2mWnXLfValoccWJ11i951sjnZjNDAtMjWfNsuvVsEzjen/CsjrmF6 EPHSkGMt7LlBjyAG2pAhw/ghWBL2tpou5nDgk80mEKfy5KRBIDCBEiEUZl88 WbnItAnhyakwITb54N44xov7E2T5+1HSZIcKeOaDvYmPH819+mQBePLB7gQ8 83J76tS8CUEKPInPk7wJGcz1xxe3IODizx/f+/PH9+ECnEK97eXtHz65j9vY 4a4exAEPESbM5SZ/+nSbPCQ2iRga/L+RN/mZrvmI7Al+C+bnkJZ55goVeiDY 0ZAu5vpF5sYTkkbBUitmuoTkSkjeBB9iHwqg4/uP4Md1Dz7tp6/26MDO+iOM wGfiB2IHPfNbw0u/9o3P2XF2nB2/6ePRuu/pZuDBqufRWvPTGy0HS952E99d n2WuSgKb3J1wPFlve7zW9mg1tDLhNyj4In50aV50fvblvMzLgtxo2ibXOelg EIohualxOalxEQsZyZDhk5sZmd3uJJAnRCiIFLqg6zIr+TIn+TLYhJv0Hifx XEVejLQgkeo3qc21yzmOOgj2qTbpMBV2moq6zcW91lK0ScQ6eLAJwOSf2gR5 stStXupWrfU3bgwCT7RMnsAFnDFvci+svzuo3uiUjjvywSbTDv60nUfZpCkf Ys3K3nBwwSY3vEWr7iKwCVXTZSy0lyc1liaqixPVJalwXwd3d+Ki3MzEiyXZ V42SjCFL8aSFO6ZNnzOktZe/R62Dr6Rs4qyMs1XGn2oTj1LgkPN8OkmHo37A bzjYnPq//+MPz/ZXb68MLY61eozVxroCS32hs0Hk04vCbbrpbiPYhFq5OGCj bNJvWew2zIQ0E37FmFeOMeKqHQWMNFEkGXNJx+kY9dSOeqmgeQI2qRv119Ew 0UyEGolNqMqWmc6jvEmbGWwyHjKjTZaHfJsTISzrAps8uzP16mD9s0e3wCMA kz++2v/+w13Mm3zx5M4nDzbBJg9vTm8vD9+e7V0fb8d+E4BJj6cRFAY28Zuk EEyb0GVdRzY5bjkpsqkKT7UJGAFtgokSHPyLZ3gGcIE26XJKUSUYVPM7HUQo zK6Tk73wpBGezOnCXnirlEV3UVFJEwhDRbaUH1vNvV7FoWACJFEWpUJI+fG1 BalgEzEvHmBC2YQTV8qNL+EkcFIvg00Srv5LctQ7gpw4v0P9+UeH337+9LMX +99//v6P37y8vTKurimWiXkmVaVLL7c31HiMiun+lo2pgbnh0PxI21Cb02uS OxorvSYZ8ARs4rfJm621QYe83aNubVJAtLvUEK2OOr+lFv5bohrhK1gaCatB wtJWstAmAJMImzRWs3/GJmQ2F4EJboTHzSZgE5weDDz55XmT4Gk2oRbBvwkT pk2wagvcgcG0yanZk4iWE3gIZ7DJfJdxvs+6OuoiSRC6sqsVAgcIY+oEHbGz 1Hlvvg1UgjWQ6BFsil86Bg7wBK5xctdJm5wc0nVqL3yENZj1XYzkyODT20NM mzCSKQNkqjATID/T+f5LbHIEk53X+xax8QRXLuKCeGDLSZswMyYkh4Ld8VjE BTBBm/zrqy1qKtfH9/72+e5fP9uFC6AK1aICeHm1hZsQ4d4eSIIdJeARuCAk wcld+DzgBc5//foQIPDLbcK0xs93l/xMGoWM+TppE/j1Y0SMFCYTtE7a5G0r TghJECmkfAviD6/uwJP0lx8wpnvtkY542ilUEwqzBx8J82vf+JwdZ8fZ8Zs+ Hq65nm764Pxo3fNko/lgydVp4XlVObbalEAj9864A1TycCX0aLV97+bgcLtO WpZewLrKy7jAz7pSyInNy7jGzbjGTr/OTo+mbJIWm0MP5sLF8cwN8hFb45En JDmCJMGHxCakFQUiJ+kyBPab5EEkn2cnvCPhRlfxY+tLkvSVmeaaHKs056im S80mNV3YbNJlKe62ljBhMuik9ptgNRcuN0GVvM0mdKiOolO50FkPNlnrb1gf aACeoE3gvDmsuz9l3Z22gk12J833R7X3hjQTTsGEM3/GmT8L4eAtOPnLbiHA BG1y21+67i2ZsglHjLwRm6hFybHX5ujF6Q2idLidc6qKGuvL83MTKnnx1uoc sMm4iT2iSVk0Z3ZWXAiWn/dXXKHmdFXFva2my6Xg26Rcl0bU6VTCrfutub4f P398byO8NNk+PxpsdSrc+gq4RTfI8r06sIk20iZ95sUu/UyreqKZssm4Vz7h q4Nz2E15ZMItm/LWTXvrJt3y8JFKpNgLPx6sH29RjrWoJ0INYJPJDh19r0X/ q+9UG/bCj4VMo0EDsQk8CTCBuDffgzb5+PAGtRT+2b3vXuwATDBITdeHe2uk 32Q1HJrqdg0FTf3NeogulyZokQNMAmZZs7GW2MSpKQeYEJvQqZO32sRRL4Bb XJQIWUqCmQ64JgVdYA3iESZJSLNJr7sOSAJnCNJvgjVdZIww3EhjywncZsP9 tkWWR3easOxyrlPBg3NjWXol+xptk+tgE7kgUVOaoS5Jr8mLlRamgU3K8uLQ JiWc2BJOXBkvOS8d/nK9lxr9Tmb8BXbqVYNSPDfRfXN1fHMpfH9z9tHO+tRg qKaUU5KXWifJ11QVSUu59eWCTrdxsicwPRBcDHeM9/iCdnWTrhps4rcqOryN LkOVy1Dht0nb3KrWpvqQS9lslgZtdQGrzNkoNikKdbV8asuJhNVYQduEboSH /5ItMr62mo02gXNDFQvndJ1qE7LfhGkT0givLksnvfBk0yIuNCEqIeO5MMlF /Qm+3SYIE2ITiAibADeITZipk1PzJthmAk/CG8Am023aydaGyU49aAL++98Y 91Kpw/k2bD/ZoUcKw0Nqgwm9XRGf2TzuTwGe4DXQZpnq/3LSe0884+26rfnQ 22zCrO+iZwKfUtbFbG8njfCku4TABALlciKZ8nrIMLHJSZUw+0reVtNFeIK7 FwEmH+webYEHj1ALTbbDhCeoFdJv8sn+PMmbkACekF54uIBncGAX2AQY8uNH d0EooJJ/fHkA558+3YZn4J1fAmE+ugvoIHkTtAmA5Yv3N+AasxUEJt99eAcC zALP4JL3X2iTUxe+/7xNmEsbmeVbpKYrgi3wnv/80zPaLK89QqZ1ndYLvxOx Dh60gjaBMxgEJPL9R7fRI/AqPA/XcAZ9vF62SKYH00G+C3kJoIRTv37tG5+z 4+w4O37Tx5ONwNMbLY/W/XsLrgcrvoMlT5dV4G/IsUmTXPXpK/3qpxstT9aD u/OuR5u9Nye9Xl1RBS+qPC+Kl/aumAcGucrNvMbOvM7KjMnNiM2mg2kT5Amc mQkUsveEtL2fmjdhZk9YydG5SVGspGuspKuspMucpIucxAv5KedLc67JhMk6 Sa61lur4hnAp+S4l8Co/0FgQ0Ba06go7jCWtWmFIV9BhoAYIkzldQ84qKpqq R1w1Y77aMbiv9tbSMJFOBWXTLfKZ1rrZkGKurX62vQ5jrkMx31kPsdClXOlr WB1oXBvUbgzrN0eNN8OmW2PmuxOOLYgx+52w5fao6faQ9vZgw5SvdNiWP2rl T7kKp10FYzZe2Jq37qaqudY9xeu+siVX6aSteNxWPGIXt6rzmuTcJjnPrSxw qYtcmhKDpqa2jKcW57bqSvuNhaN69rguZ94INrkYqrjcWh3tKr/uqIi3SOKd omv2kiuWkqvWsmhbebxZkmQQJzXBnbaMa1EW+Sw1fa2mZwdr/+//87/++MXD vpDZa66tE+cqJSy4S/foJa7G4j5fPdxEzfaYwCYbcC80YFvuNS3ReZOx5rqw Tw5niFGvbNQjpUNGXVMPqTqucX/dREAxGVROtWim4H6stWG8RTPe2jDRqpvq MM73gT68NyeDGxNt8wPeqW7nRKd9pNU01GIYa7eOd9iWRwKb052bUx23Zrt3 10Ye3556ubsKPPniyZ1vP9hGmOCoLgDLqwNqnvDTu/M7KyPYCz/T6xlptWBB V7tD2WqtA5hg3sSrr8aCrqYGCTVAWH3UbELHsU2odni+pT7fqhJYVXxzfR4u 7yP/9k4qu/Aau+DRJqTVHdvhsZqLmTSBV4lNTp3ThRkTrOYCm5ilXFstyy5l O+DPrjpXJ06v5UVXc6LqBPFSXmw1J0aaF6cqTNUUp9flJ1YKkivyk8X8pDJe Qik3vpgbV0QHP/tadsr53LQL7PRLuemXigSJAU9DeNC3MNk5MxpanOzuDdnL hZlFnGRBTnxBTlI5P6umiGOUl9uUgBFpT0Df12JqbVLCfycQbmM1XIdcKuCJ zyKFa4igQ9HmUrc1qYI2GSCXsomUb5QLGirYYBNsNgGV2OoEdoXQDOCq5Riq wSw5mvJMpShNUZJCNZWciGph3FEUxNcUJEDUFibIS5IVotT6snRleYZKkqmW ZGkqsnFPJRZ0YdKEbDYhNsE/OJon4BR4KAlZjtqFKGBiADNpaXbaa0hBF5nE RVTyM0HyJhFlXRjTXdQsCEydYGM7dpdAUBihN8Xj5K7dpa7dxc7thY5t+hkw C5xvTPohbk4H18Y8o20NA4H6tQnv3bkQLmHEvfC4fpE5QBgTMdRGxY3e/Ru9 B5t9hzf7H0DcGnh4exDO1JM3eh/cHDjc7IfrQ3zpdQzC217HrQH42sPNPvgS 6guP16Y8vgl+GUFinGoT8pDJkFNbTp5tjzy9P/j0/tCznZFnO+CR8MsDauUi wOT5zuQHu1MYcA02QZhgAE+YMCGjunA+MJyx5/3755tgExDKnz++99fPdiD+ 8sn2Xz65Dw8psLzZb4I9JkCPb1/e/vzpOrCFZEaQJ/AStsMfN54/JMviyaQs cs3cIP+2vSdvi59pkI/AC/NLaMU8PdmEwiw/I78q0mzC7DfBRAlTJeTJb15s Yl88TZu9U6cT08ME9sm3wJnG+E1/7Rufs+PsODt+08eTjeCzm6GnN1r3F92H y77DZW+vo9CnybbWJjUp0pZ6VU/AJhtgk6b9lfb78y2jraoGSXqNMK6MG12Q fYWXdSUv6yo7K5qySWYcwCQrI5b0whOPAE9KeFnFeZmFnHR+dhI8j+3wv6Sm 6+jJpOs5SVE5SVdzEq/kJFxiJVxgJZznJb1blHmlKi9eVZJurKR4YpPx6KZ4 vk8t9DcW+BuFLVqwSWmbvrDdUNRpBJiUIkyo1AndNAEx6qZgMt4sgzhebvLa JhRPOhSoEiDJYrcKg9hkfUiHNqFi1HJrFFRivQ3nsPnuqOHuiG6tSzblLR1z CKfdRbPeYmqkcJNw3VOw6hauuotW3CWLrtLZprIpZ1mfsahDK/SpgIdF/sbS oEESNFY4TSqPVR0w1nRZKvsMBZOW/Bkzd0af3l5+vlVyqaXqOtjELokziWMd JVfBJtbSa1ZRtFUcZypPMpQnO5X5DpXApS+n/q3b27A21/uff/vi208PZkYC K5PtoaZ6Y10B2IQqcFIKejzy6W7jPJ03WR9pWuyzrPSZV3pNs20NVCrEr5gI 1MMZMDLikUYEygVenQyqXtuE4gmEdrLdMNdrWx3xbE4E1sZD84O+qZ6mcbBJ yDzcahpts0x0OZZGAhuT7cCTO/O9e+ujj25PvdhZAYNg6gRIAoEXOEAYbPL+ 1vzu6ujmVBfYZK7fN9Zu72/WdzapwSYQmDppNtZiWRfuOnFS+01EmDShhVIM PKEb4QXYCE/bBM58ZsMC6X+HMxkgjDYBa7ytFz7CJljQ9bYZwqTZ5KimqyYX eAI20ZdnKAsTKnIuV7GuyfixYBOAiZyfoC5Kg1AIkirzkyVHNkmkbMKJK+TE FrBj8nOi2BmXILhZV9hZl/O5MY2qUq9T2ddu6w1ZBztdLW6tVMyVFGQXsBJz E6/y0mKkJXl+i2a8y99slYNBnNoKp66i2SoDg4BHOrwNABZ4GLDX4XVXs5Yu 6FIErFKvscqmLjXWCcEmjZVsbSVbd1zQhTaxHNukUZKlLkuvpwcFY8N7RFQJ 4zDAJhg1hQn14mOV0LvmIRqqciyn1XRFbIQnqRMyYI3AhBTmkT9NarKBo4Zp k5/nCTN1wizrioipTv1cn2V5uOkGvSAexbG91Am+IDsZkSp7S117xzzBwVxU zIW2gCqLHZtTgXCHts+vWA67tmi87NCzhfdXeyJqukjqBM57Gz0Q+zeOhIJI gYi4Rpv8TLzxVYxtjKTf5NSCLvKQaZOTBV0QH+yOPt8debEf/vBw/MX++Ad7 Yx8eTtLjuaZe7E0zg9kLT/Im2GOCPGGOESa7F7G464eXt8EjP326jQHXyJN/ Pd5swpy7BVoBlUAAQ36Ad365j3f+cIdP9jBiQwrZC09gQmrASCv9Py3x+iWB 6RtEBynl+plCL7yOyOlE8IRun9nBLSekjuu7D2+BSrDfBGyCiRKcJ/z1Bzew Rx7ej1Vbp6VjXm+iJL+SM5ucHWfH2fFPj8frLc9vdb6/2X643PxgJXC47B9w lXmUOdaaZJcic6lX83i99cl668FS8/ZCy8Fq59Z8a8BYBjapFCTw08/nZYJN rlE2yYqlbJIZhzYhWxdJ9qRMkFvKzwab5Ockw5PwBnrFybVTbfJGp8lRbuUa HVeyEi5lxV/MjnsvJ+7dvOT38tMuluZcq86PV4nS4J4H7lIom9TzvdTtPZU3 AZu0G0oAJh3G4i7T0crFo/0mtgqACdU64aFsMuGXTwUVU0E5HZRNkCeUUOiM CfKE2GS5VwM8QZvcGDGgTTZHzGCTO2Hb3THbvUn77pRtb8p6b1S33FY95S5G myBPwCZrnoIVV+FSU9Gyp2ypuXKhuWrAXNJjLPbW88EmQV1Zl0PWbqv12rWD HZ7JTsdksGHEJgKbTOhzp7SpobL3WsovBiujmsRRaBOAiaP0qk0UBTYxi2KM 4kSjJMWtKXAATxpFTXpJq1u9Otvzf/2vH3/48lG7t6HFWW9SFpvriwLmGmqa roLf662b7TUv0tVcG6Muqh2+3wI2mWtvnAwq0SYQP2+TicDrvMlEqJEq6Arp p+m8Cdjkxrh/eTSINgGSAEwwJrudi8P+9Yk2sMndhT60yQfby2AQHNUFKsEu +FNtsjQcnB9onuh0DvgNXS5Nh1MF0WKtQ54wUydOjZjiyZs2MSsAJgJaJQKL EmCSb9cIImwCN7T4z+/EJhidjloyQ5hpk4hOE2ITeD/TJjhDmIwRRphAWKop m9hq2eripGrOVVHG+WObUEkTIImmOB1sUpefWJGfXE7DRJRH5U2KaJsIcq8L WNd5Odfysq9S59xrPPb1vNzoQl6irIJbXy3QKkQ6RZm6tpCXGZ0RdyHpyjtZ cZerClgmRUWzSdVYK5SJcqoK06Wl2aqqvEapQCcrAJV0+3Uhlwr+y2lzq8Em /a2mXr8eeNJip/pNXDqJRVmkl/IbK8AmHGITqxx+UwKLjAc20Vflgk3gLyyO CD4Jk19oE4AJhLGGTeWYjiu7UCWkrItUdkUMWGPaJAImb7PJ2yICJm+zyVio AdS/NORAmwBJkCd4gTbZphMo+8vdTJsgXm5OBTBvcnMmuDTqmh+y35rDccSt mDchqRNmuoQsed+nbRIRxCnELHD+eZUw4+Hm0Yp50nJycpLwz9iEeATi5fYk xge74Q/2Rl8ejH30YAJUAjyBeHkweapNSE0XyZWQ/ncs4jrew0ilTsAjELjl JMImr5Hyxd6f6cC5W+gLAMgfXm2BSoAnODcY0cG4pd8jeRPSq47PM5vlmQvf T41fbpOfcU3EpxElnaw0O8GTA8YY4aOmeIDJNy82QSjYb4IYgXfC9edPVzGf AkjBYcIRQ7rQJkgz8nsnRPq1b3zOjrPj7PhNH49WQ+/f6Hyy3na4FIRrOA+6 yt31OeaqZFdd1nJv4+O1ELz6YLllbzl0uN71/p3hiU69vDiplHNdkHmRl3UV bcKmbZJD84S0wANJ+NlJgtwUISsVAq5J+8nxNsZrbwuGSqgljOmJV9MTrqRT I4UvZsSfz4h7NyPuXF7ahby08/kZF0pZV2sLE7SVOTYFZROnIs9dz/epBVjT 1Urx5Mgm9Eb4o8YTtMmoWxr2SMEmkwFgiHK6pY5pkyOhtFERUdOFNlkdaESb YOrkzrj97rj93oTz/qRzZ6bpYNZ5OOvYHjNs9ioWg5JpT/GUqwBgArHqEmz4 itY8xUuu4hWveL1VutGuGHdX9ZpKzJVZTnleQCsaatb0e1XdrU1jfcHV0Zbb Yd98QA42mTSwphpTQmXvBsUXMG+CNV224ssnbdIEd9p1PLdB4jZWgU0WJzv+ z//47quPdkJuNdxk2jRlJkVhU2OZqU5oq8/v89XP9VmWBmzrI003x73Ak7UB 63KPkdgEeXJUx/VmMG0yGVRPtmjAJlPtusk2LW0TE9hkZdi9Mda8ONwMNgGM DFMFXUY4DwYNE12OhaFmzJvcnuvZWR0meRNiE+w0OdUmK6OtaJPBgLHb3dDZ pH6bTRzqN2q6sBfeVJfPtIlNne9oEJ5aGvS2GcJY00VsAkFGBzNhwtxvQhrh yT/4Y0GXRZZHtXjXssEm5qocKe96WeZ7ooz3arnR9QWJtXkx1exoIElDSQbW dEn4SWJeIiZNSgAm7KOkiZAVnU/zhJ8bxWdH57GiuLnXczOu8HOjuZlRWUkX U2PO5SRdyk2+knT1ndjz/5Iadb6IlVLOyyrOSRZxKebAZ2I6Bs6VBWnAE1BJ p6+x3aMJ2Ovg3Bs0DLSYurwNQZvcZ6pu0pab6wsbq7k0TDj6ao6BHtJlkfHp yi4452HeBGyiKE4+FSa/3CaN1bm6qlzwDvy4cFQX/CThj4wJE2ITgsrX1VzH uiQ2gT8aSpr/nbxJREHXGwviGTESVGHLCSgDuQFCwQQKpkuwuIvazLjcdZQ6 WaLEsYM7GZe7ACYbE/AXpHl13LMcdm9MHU3rwgqxbbpXZZ9e7EhmC5OWE6zC iojd9W60CVygTQAsWO4VEcQmTK08ood0RcSpPDnVJhEq+XBnCuIllSs5Sp28 PJgAmDzfDb/Yp3pPTrUJBK5cBIlgC/zJyi6c04VtJhB/+vAO0yZY2fXXz6im +L/S99JMm8AFFm4BTL7+4OYX72/AGa6/fHYDS7zglptQhdgERfPjZzsRQ4aZ U39/oU1OZQjuWMQSKZzKdeqbSX6H1FPhNcnvvDlb7AFpSDmeuLUHPAGYYPkW dp1gouTjh4uHN4c+e7JCyr1wsHDEGGEyygynBzC/3a9943N2nB1nx2/6AI88 3eh4uNIKKnmy3k7bROJS5Jgqk5vkWSt9OngSAt725GbfwWrn09tDm5N+uIkt Zl0tzLnCz77Ky47iZMeATVhZ8WgT9rFNgCHgkfycZMyVREzrovebRP1TleAY 4bTEKxCpCZfSEi6mxZ9PjzuXHvcON/0CJ/U9bso5YdYFCT9aVZ5hkudRNqnj NtXleVR82iZFwQYhwKSTgklpr1XErOk6WszhxWouyib/NG9CyrqWetTLfRpm ywnE3QkHBNpke9q5N20/mLHfD+vvj+pu9SoWAmKwyWSTEGyy7Mzf8BZt+EpX vaK1ZsmNNvmtbvVsQN5jLNaKkvXlGR5V4UigcarTMj/RNxfu2l4afHE7vDVk mXMWLToETJu4JdHOygRbZeKpeROLjAM28VtrAg55yKOZGW358/cffPT0Vk/Q MNbT1OnVwP0k3KhTeQSVsM+nmO01L/RbwSa3J5uBJ+sD1qVuw2xbA9gEm03A JmF6mPBJmyBPiE0mgCdtWip10qqbaNPPdFsWB5yrI56lET8wZKqnCQu64AxC CbdbASyYN4G4tzTArOn6pzZZDYewpmvAb8A5XVjThb3wpKarqUFiV5VC2FTF 9OLFIty9SOdNhGgTCJtaADZxaQqZo2hJOzy5yyX3t7gXnrScoFBOjufqckpx j3yETbCJG85OpRCTJlQGsC7PWsMySDLppMm7FbmXFcIETUmqlBdTxbou5yeA TSDqhckSfqL4OGlSzI4tZMeASqi8Se51UAk360pe9tV8DmUTHismJ/1yXnZU Xvb17ORLKdfPcdKuFXNTshMvx1/8XdKVd1iJ1wqzkwTpcQW5MUWsGCBJVWE6 qAQuIORluS5DVbdfNxAyA0w6vA1dzdruZm1bk9JrrHI0lFmUxQaZoKGKo63i 6qq4aBOcIQyBNgFKaCuyNeKM+pKUuqIk5gYTEj9jE4AJqERbw9LVsvVSqkIs wiYRvfARSRMmKk+FydtswsyMMCMCJsy98MwYCijH27WLg3b4309UCa5QBFxQ 20iPfQGxu0gF2GR/pYc0j+yu9oBN1sd9q2Oe+SH7wrBjddxLJhLjmC+c9HXv uNALhxIfNaHc6DtpE8AIKoNUc1HZkBMwQZucjMe3jjyC2RNM0DATKBHLFn+J TT6kPBJ+tjP8bAd4Mv7h4eQHe2Mf7E1QcdxsgoE1XRCfHiygQSIiYr/JHz64 CSr511dbECAUtAmq5G+f7/39i/1/fHnwt+NcCXPlIhLj25e3QSXffXgHzl89 33x1uPTZ47UfPrnPbCchuQmmTVA6JHPx382bvG3pCaEHuSb9JhECQryQYipE yj8Ye1IYTTSHZBUjJlBonmz/8Mk97IjHTfEQrx4s7G30g1C+/uAGyoUsWGQG Gb+Mv31me8uvfeNzdpwdZ8dv+ni4AjbpfLAcerDcCheHSy0jnmq3gmUoT3JI wSb69290Pd3oerTa9uzO4MFa5/5a9/3F9uGWBmlxajErip997Q2bZMWDTUhN F4eBFDJYGDMm2G8S0faOEaESjNSkq6lgk8RLqQkXU8Em8e+mx8Nt1YXclHO5 Sb/PSztXyrkqK01uqM6113GpHfEKnkfJx34TsAnApMtc2mMBmJSRxYsAE6qg C2zik0345WCTqaDil/ebUDbp1az0N6BNMHVye8x2Z8y2NQ48cdyfcuxO2fan bWCTw2nrzqh2JVQJNoGY8RQtOfkrLsG6t2TDL74RrAKbbHYql9tUaBNlYbyp itVurRkLGW4sjW9vzn328MYPz248nPEtukvBJhOa5JbSdwJl549sUpUINmH2 m1jKYk3liYbyZLCJUyV06ct9lpp2X+PafO9//u3Lf/zpw85mbYuz3mWohPtJ S32hWVHgVBf003mT5UE7qGRrJgg82Ri0oU2mWlTjfgXQA5Byqk0YqZP6SXrr HLHJeAucddNd5vk++/KQC2yCeRO0CQbYZKbPvTrWujHZDnF3oe/BzYnn95c+ 3Fv79OFNIAnWdFF7GN/Sb4J74fub9d3uhg6nqs1eT3rhyV54p6achklJhE2O glKJkA64yGdOf0KeYDBXnMCdLdzowg0toAOHcRGhMKu5mDDBAcJoEzKki9R0 4eJFai98PdVyAjaR8q5Xsi7L+LHq4hQIsEkNJwZruiCUBSnlvMQyGiYlnDgA RQErGmxSwI6Bv56gEmw54bOv89jX8zmxYBNOxlV2+tXMxAsp0ecEOXHF3OS8 9Oj4i78Hm6RGvcdLiynMShTmRAuyo+DTyvOTwSYSQQrYRFaW49BKBtsss8P+ 4Q5bX4uxJ6DvadZ1eRtb7HI6aVKkk/I1VKfJsU3oOV0YABOzlEv1wldkk36T X24TRVmaSpKpqcxurM4FlZjqeOZ6vkWeh2km0nLC3G9yakFXRNKElHL9vE1O TYicWsp1qk2GA8qxtkaAPz0EmJoJDLLA3Yu4rwQb4ansCW2T/eXug2ObUG0d t4bvLXbcmQvdmPLPDdpm+i1Lo00rIy568JcP98uDR/bXejEjszXfRjGHXoAC n7C33sNsOcE4Wab1Nps8ujMUgRR456Obg0ybYIKGuY0xgie/rKZrFPMmwBNQ CaZO3mKTN5pNIvrfSacJBi5bJDwhPSZgE4AJqOTfvjqE+DujxonZLQLxh1db wBM4Q4BQACYfP1j+/Mk6PMSkALnhZ37522q6fqa3/ReWb53sNznZC4/P4MAu uMDfGmk/OcGTU8q6sFILApMmNE+2v3h/7dn25KM7o3ABNvnq+QbIBRfK42xh EmQf5V8Z6MNSt1/7xufsODvOjt/0ASp5/0b347WOR6vtYBB4OO6XuxVsvTjJ XpO50md4ttkDb4BXH2/2Pt7s21vp3F7q2JwKmhVCETfmtU2y4yJswuyIhyAP yXIT+voUnhCboEpwNTzYJAUiGZByMTXxQlrCu2kJ51ip7+UkvZOd+Dt2yu8L cy9WFcYrytMtUlZTPcAk363kedX8YGMBqenCvAnuggebhD0ygAnEuI+CCcY/ ndMFPEGhnGqTW2HrbarZxH5/iq7pmnM+mHNuj+kfzNp3w7o3bOLgLdi4y00F mwHJzdaa9VbpaqvsZr+hzyIylKfB7Wh9YZK5Ni9orNhcnnj1dPtvXz7+0/PN /QnXQlPJnJU3pk4MFP/OL3ovUHGNqumqTLBWJDhLj+d0iag5XabyJPhzNNey AsYyt0Hit0lb3erxAd+Xr/a++Xiv06+b7Pf0BfVgE9wL724sGQyoqZL4ce/9 uda9pY6704Ebw47lHuN8h5ZacUI3wgNS/qlNJgKqCVyK3aGfbtdPtRmm2o2Y N1kZdi8MNQNDxjpsQy3GgYC+36+DM9hkqqcJW07AJnfme/c3wkCPFzsrOKoL VPIzeZPFoQDYZKzd3ufTIUwgmo21EFjNhTBxqMUOtYhKnRwVdBVjTZddXURs YtcUgE2sKr6dHgCFXQzIE6wROtqXYSwnNsE7W6AHGASFgq3xEUkTvPVlLjdB mOAAYTKnC/ML4GtLdY6pMru+IL5OADBJbihNUwgTZLxYOT8Bh3TBmWkTKmnC ihHmUkmTIm5cXtZVTublXCB82oW83Cg+J5qVdTUr9SI7/Qor7QrYJDXmHWFu fCkvrZibGncBbHIu4dLvc+OvFOckF7PjQDoQ8Jkl3HiwSU1xpkLCdhmqJvrc N+Z6pga8wBOIiR7XVJ9nuM3S6qiza0R6KV9NTeh6bRMSplou6Tf537CJvDQF eUJsYlHm2+kfF/abgOxwmAAuYYwYsxZRife2pMnbbHKqOE7tMXlLTZc6HGqY 6KB2my4O2ldHX7MCS7zInvc9ut8EbLK/0oOlWRCPb4/cnW8Dm9xb6tycCaxP NsN5ccgx328FoRCegEdwYQp+4C6dN6F2pqx27axRsbvezWyKR7BgpwlWdp1q k8d3h4EnKBRS3wU2YWZMMLD3JGJZ/NtsclIoj+70P70/CDwBm7y/PfKcaj8Z w0XwETVdr/ZmcSM8CazpYtZx4U6Tb9/fQK3ABVZz/Q2wcMIm//71g78fJz5I IwmaArMnQJJv6eWMOLnrsydrrw6Xvnh/A3gC74H7f6ytIi3nOMsL++jhq0Ao 8DZ0xP/PCV3M58nb/nHaRGK8YPbOMwUUkTqJWBAPgSOC6S3wR9vhv3158+X+ 7OO7YQiwyZfP1iFwYBcGmUJ83CN/NNMMmQZnrJH7tW98zo6z4+z4TR+HS4GH Ky0PV1r3F/wPloMPlluGXOV+DdtYkWCXpi92a55udDxZb3//RsfTGx3PbnY/ WGvbW247WOuZ6DJKi5MKObH8nOv5nARubgKoJDsrITs7IWKPSQRVmA/psq7r dAKFGdHZSVFZidfoZnnqIjPhanoyxJX0pMtUJF7OSLiYkXAhK+lCVuKFrITz uckX8jKvFrBjS/lJ6vIME5UpELg0VDQ3ClsMxW3GonYTtXix3w42KR10loU9 laCSEVctxJhXRmwy3iyllzDWQCBSKKG01TF5gjkUsAlzVNcRTwaNN4dMt0fN W2PW7UnH/rTzcLbpYMpOxaT1Zq9qqaV6ylUy6SpecAgXHAWLrpIVX/laoHKt VboWkq+1q6bc1XZJWh37kloQoxelOGvZpgZ+yFuzMmrfnvZttDfMmEUzhqKp xrxWUXRTwXm36Iq97LKl4rKrLtYlugLhLLvmEEfby+OsFUmWimSXku9tKGxq LA3Yarv9upEux6Ptha8/OfRYFS1uTVfA0NpUb1EVW9XFTnXhgF95I+y5EXZt TTfvzge3Z5pvj9hWe3QLbarZlvrJZmnYXQ0x7KwYaaocdVWFPdXj3poJXy28 NOaRUQtQfHUTzfWT/tc2GW9tDLdqJzoMY+36+QHHatg71+8Lt9smu5wTXU66 BItqDxnvcEx2NYEvVsdCt2d7txYGIB7fmX56d/b59sInDze+fn732xf3vn6+ 9d3L+1++f/ujg1V4aW99FBQDlpkfCMz0+sba4QNNnU0NLRaF3yRza6s9uhqP Ds9H4dCIHGoyQPgogWJXF+OFTU1f0w+dykJbncAqz3fUA0/gLrcMl5vQ97pl rWawSUW7vbLDUdndVEuHtMcl7XHLeiE8Mur6OOCl45AhZ8h+E/hATJrgGGHM m1jlPKuUZanNNdfk6ioy1WWpalGapiy9RhBbnR8jK0iuL01XiNLlxanyktSy /KRSXkJxXjw1nosVAzDJz4mCoP7pIOsq1RRGzaygLjgZV3NSL4FNeNnXc1Iu J0b9np8dW1GcWybMzEq4En/ld4lX38mIu8hNj+FkRgs4iWJhprggs4ibVCZI ryrJteuqRnvcC6OhiV7PeK9rZrB5vKdpaTw01u1s96h9lhqzqlhTzQXq6mp5 uhpqx6K+BpDCxuIufS1HV8MCWWgqslXlGfVl8FtIrTnWBzNqi5KqCxIrBfEQ cCEtTpGXpinLM5XlWZrKXG0NBz7ZVMfHCQYWhcBaLwRa2lQFdmAmHU5Nsaux 1K0VuXUij17cbJKE6J85gSSOI2DaBBNb8AfU3ySFGHCBSuRDnrphrwJitFk5 FlBDwEXYDzBR0+iAs4YRavql4whC1GOM+OvHWjWT7dqZTv1Sv3V91HVjzHNn OrA123J/PrS90LYDlFjs2FumFi8eNaTQ5V7bix1Y1gVyAXpgJgVzIvAqvf2k maoHW+wgg7+wSAwrxLaxh2Wlc3el83C9BzeV7K91Q8D1Ab0d/tHNgYP17t2V jkO4ZhgESPJka4RqLaGfJM8f1XS92WmCSEGPMPviyeoT5mAukAgZL4yTxKiG fWDUeu+T28Mvtyc+3Jl8sU2DZWfyw90piI/2ZiBe7R/H3hsDhDF7Amd8CEIB iXzzdB1JglsXkSo/fnQXbPL3L/ZBJbjcBIu74MmfjtsiCE8w64Hd7vAMXMN9 NQRcw5NUd/yzza8/uInb5OG2n5R44dguCFySAu+E95NPZuYRMJcRkUwheRB4 9X/++cX/+PE5ugYEBIEUwu8I74FXmY3wEWaJ+Ezyi8RnyNtoobzxC8PKNLo4 7ajjBnT2zYtbnz9cfnFv8tnd8c8fLv0RsPbh7e/pmcw/fbYD8Rc6J/VnOv7+ 5f4/vjqk4ssD+IFj/PjRFnzVr33jc3acHWfHb/oAmzxZbwOewMXjtRCch9zl zWoWbZO0hS710412eANlk4225ze7Ht/oOFxto3adTAcC1opC9vX83KiCvKR8 blJ2VkxWZmxOTgL7zTWLmCU5SRXyEtZ30SOFozDIQxzPBRdpxypJo1pOLqXH X0inKrveS6ea4t8DnrBSL/GyooSs2NoCqineoRI2qYW2ujxHHderEYaMxSEj tReebjYpHXSIRt0SrOmCCHtPr+k62W/C7IUno7oITyDujFoh7oYtYJP747ad CdvupG1/0r43YT2Ysm0NaTe76xcCkmlP6ZxdOO8oWHCVLHvFYJP1kGy9rW6l tX6uWeqVZql4VzSCaF1xgrk8TVufq5FmmGVZATWvt1EYbhDO6ItntPltZXFN BReaSi/Zyi6ZJReb6qI9ZVfdZVebxFFOyiaxVkkiteKkMsOh4Lm0ohaHrNuv He6yPztY/fLV/lCXuydk0UiFVYXpjbW8NpfCrhT0N9ffHPdujrnvTvnuT/vu TXnujNpv9BuXOxumA/KRpooBWxlEp76gy1DYay4ZtItHXZXAE7DJuFcGMIGY 9CunAq974cdDjaMtjRPthvEOw0yvdbiloYwTV5gVVS1M09UInJryoFkWsikG A8axdvt0r2dh0L8aDt2a6bm/NAQA+fjBOgTY5NNHNz57vPn5k5vw5If7Ky92 l55uzR5ujt9bGrg12z3V7R5rd4y0Wgf8xh6PrsOpabOrmo0yn0EK4dXXIkxA K26dxK0rh2hqLMOOeDib6oQnwyLjm6U8bOV21Bd4Gkpw5K9fLwoYRMiTNpsE 4tgmtbRNpACTtwXwBO6EI3YvIkzw3/xxWwfwxC7n2GRsq5RtrMrWVmQ2lGc0 lGdW5cdU8qOlBUmK0nS4XYebdggRP7Hk2CbYaRIJk8wr3IzLEGATVhp1zss6 skleVkwxL1UkyOBlxadEvxd3+XdJUedyU6J4rHg+K55+Kb2Yl1LETZaJ87xW xWi3a2msfbzX0+ZWe4w1PlOtvbE86FAEHXKrplQry9fL87W1PANcSHm6Wq5B mmeW8U1SHthEV8vW1rAaqnLUFVnK8ow6Uaq8NKWmMOFkwG+qtii5SpgAUVOY JCtJVZRlqCTZAJOGKhZ8rFGOMBHa1UUOTfHJcDaUQADJXRRPyoAnIbqUi5k3 iajmQpjQNpERmKBNRnz1p9lE9SZMfs4m4aBqvFUzEYK/EdqFXvP6SNPmmGdr Jnh/rnUbbDIf2qF4QsX28cyu+zQ3sE0el4lQmxnpRhJECi5wxAouIAl2ncCb ce88+QSq1mu1+2CtG1RC70zs21/t2l3uQKfgEka4gDdQixdvva7dAowAT4hN ItpPmJmRiKWKJFeC7znZZoI2ebkNt7hhHHcMb8OSMHz+1d7Mx/uzH+1OwzWc 8SHGJwdzVOzPYU0XkyfYgYL5FMyekI3weP7ji1s/vLz9pw/vYN4kYozwX44N EjFfF5/EnAjODYbASi2cMIxt8tj5Tqq/ACOYrSAZClL0FTFP+OSiRiYrSFEW FmiRycbwyf/194/hjA0d5Evelm2JyLyQ/hfm6pOIPSx/Ph5cdowUqoPmezoV hZti4Iwz0E6de4aNPHDGwIEDP326Ay/92jc+Z8fZcXb8po+DRT/o48FyEC7o aV2BEW+FT80yVSaCTea7VKAStMmj1cD7m22Pb7QfroYe3ejZW+9dGnWL8xME OdeEnDghNzE3IzojNSo3K57YhMmTU23CLPFi2gSfgYvMhKsQcEF1miRSKkmN vwiRFnc+Le49sEla7LtpMecy4t7NSb7AzbianxNdkRejFKVb5DyHUmCWcuDW zq0ShAwlrfqiDkPxUcuJXTTkKBt0VGG/CdiEzBDGRfBzbfUYsyEF2GSu/Q2Y EJuQsi7Ck7thGx0WjK2w+V7YtDtu3RmzgE12x833hrTLrVWTruI5e/68Q7Dg Klr2idYCFeuh2vU22VJQthCQtqo4DYJrakGUrjheV5LQUJdVX5WiFifYazK6 1PwJXdGsoWRWJ2gvTwCbOEsuWUovGMXn7dJrHjEVaBObOMZSnmAqT4RbXLAJ 3K2FnPK+Fj3Y5IMH63/+/sX4QGAm3NrRrLNqyhpqeAa5wCTj9nkVaJPbE56t Sc/dCRfY5NaQZalDE3ZX9VtFPaZiUElbY367VgAXfZbSIUc58GTMUz3mkVFb 45sVTJtgvwnYZLxNP9VtnuwyNRvK+CkXBelXJLwkWXGWUsxWS7j1ZazawgyF KFdbnW+tL/Xqqzua1KAVbDzZXRsBgzy5O/NybxmEAmewCcTz7YUHNyfAJpvT ncw5Xe0OZbOxFhfBH+9bLLerymxKEXy4WVGA9ID7Z21NHkRjNffUMBy3S9B9 3AKXughH/jbrSv360qPUiZXiSZezBgJtggbp88r7fXUnA+9+4X4YdzjiB2Kn CdqEVHYBq8Em5ppcY3WOrjKrUZKpEWdU8K5D1AoT5cWpcMcON/AQaJMibhza hMDkDZWkX4Jgp1/hZl6D4GRcA5skXf89Oz0qPzeumJcmZCVnJlyOv/L7+Cu/ S4u9IOQmC7hJAlZCITdZUpRdI2L3hez3NyZWp3tWJ7u2VkZuLw1M9rnbXWpb g5hed6LxWWrAJqpKtk5GrV+EH69BxjPKeGCTI57IuHopB3iiqcwGmyjK0sAm tUWJJ20CvzXgCaikuiARfoOgsHpxproiB2BynDTJt9C5kgiSAFWIVuACeYLR aq5Em2CATXDRTETShLIJDROSNAGYQKBHkCTk4pfbZCKkAZuMtajhPNtlWB1y gE3uzbaATTBQKBBYmrVLby2BM0CDGiA80QxPPjheKQIwAaHgDGGMW8dJFiQJ fgLO+Nqlxgv3oEHAJnABMLm/2BaxIx54Am87pBvkCUBIv8lJnjy5/bpwK2KL YoRQ0CYR3SXwDKAD3ra/2gO/KdQKvvrhzhTo47MHCyAReOZtNomACSZNcIAw 5lC+eLj8zdN1TJpgswm1xOTVFtxUw5m+nd45vmfewRnCpJSLZDTIvkKsiYJr LEyCu3R8D7z5uw/vfPJoBc6YWAGYoF9wGQp8IeACu9GZKiFSeHNeVqRQyDAu vIZvcW+p5+ZM26sHS0zdRKCG2WJ/ais9+XZMHzFb+0nHDdKMNPv/9BmVdfr3 rx/Az40ssoywHpkzQDJTBIB/+5waPvBr3/icHWfH2fGbPvbmfQ9XWohNHq22 hpurm9Usa00K2uTZJjVhGM4Pl3zvb7Q8Xms9XG45XGs7WOu+t9jeWMMVcWPz sq7xWbGszOuZKVdyM6OxweRtlV2nVnkxbUIKvUhNF8RxF/zFlLgLEKlx76XG vkvZJI6ySXrcueyk85z0K7ysqHJOdBU/XinKMFC9tzy7nOdWCYPa4mBjUaix sNNY2msV99vE/dYynNMV9sjCXtwIT9lkNlTPhMlRtJ+SOgGYoE1W+49GdUHc GjbTYbw9YoK4O2rcGjXuTlh3xy0PZ52HU7btEf1CoGLYwp+38xecgkV3wbKv dC0gWWutXm+rXQxUz/mr2jRcbSHY5IpeFK8rjZNXJatr003STE8dq6dBMKEv ntEXz+mFnZJEsImj+IK55Lxe9K6l+rK3/JpXHEVsYhbHG8UJDjnHXkfdy3kM kja3Mtzb9IfPH/zXf/4x5NUH3Rq/QwH3lmZlkc9cBTbp9chvhN3rI87NcNOd cRfY5Pawdb1XPx2QA0y6jUXgkQ6dEGACZ3jYay4ZsJUBT0aaKsLu2uOyLsVE s3I8oJpo0YSDarBJuFUbDmkBJhAOlbAI/pjyEqVFmWCTutIcgAlEYxW/oZKn qciDM7nWVHAaq/IMUoFJXmBTlnh0FUGLFKLTpRoJmad7XbP9nqmeprEOG7UL 3qlsscp9hmqnRmxRlJjkhfpaAYSuJh9CW82HgE/WVLJVklxleQ6c1RUsvIaL k6GrZOmr2MgTqzwfbULyJi0mMZU3sUra7RWdjmoI4AnaBBky0Kw4GdiNAjfD 2AuPBV2YNCFxxJO6PKuUZarOMVRlo03UZemSvKgKXnSNIEFWlII2gRv4Uj6V NAGbFLBjSNIkQiUUTNIustIu52VF5WVHsdKuZCdfSrr+Tm7qVbBJATspPycx O+lq4rVzcZf/JfHaO7npUYX81AJOUpkwo75a2FhXenBn/rtPHnz5cufjx7df PrjxZHthfbqr26fVyoRyca6qiuPUlVvUJbLSDHUVW0enToxyPtiEGtVVmwc2 MdeBWfKAJw1V8MPPBJvUiVJBIidrumQlVD4IYFIlTGDaRFOZ21jNBptg3gRs ghixqQoh4CG9Q1MIJCFIQZjAM36DGEerkV74CJsgTOAPaOAETEjSJCJ+uU0m 2xpBJWF4pkU93aFbHrDBXzSmTSDgIRULbZguwa0lmByZ77duTvrBJqgAuJnf ouu+yCxiHNiF3SsY1BrH46nC+6tHPIGA63sLodszgZ3lDngIzx9lTGib7K13 Y0c8Gdv1ZGvk8d1hZsvJEVhuvrHchMkQplAgTu18hzcAOuBLgE7w2wGPwEtw RomAPj49nIdr+ELyJMaRUE7AhLnWhOw6gWewC/640wQksvOvr+Be+vWQLvzn fYi/fnVIRmyRBna8J8ecBSZBMIcCZzIlGM64A4U5mwsJg9kTsAnWd2FHfMQa ROZQ34jljKTDHX8l+OofX93bnGmD/7ZvzbV/8f4GfCxpij/ZdfK2dhX8WGZ3 DH4CcyUKGVnGjH98dfjv3zz4j28f/ttXhwAN7NmBnycKhWkT4j6kH/IEf+a/ 9o3P2XF2nB2/6WN/oRlgAiSB89ONdjDIeKDWr2EDTByydLTJ47UQVdm17Hu+ HnyyGni4HHiw0rK7FLq/0NrtVSgrsgU51/Jzo3m5Mbnp1zjZMdyMuF/Ikwib oEeY/Sb4TGbC1Z/Jm6RGv5MW805mwru5KReBJ6LcqMKMyyXZ16TCFH0lxy7L d8jzvSphs7qgRVPQpi3uNpX1Wcv7LK9nCI96KJuMN8vAJnNtSuDJTGsdsxee 7DdhIoXZC0/6TTb69TcG9JuDeuTJVth0L2zam7BBPJprApvcH9bN+yVgk4Um /qIrf8kDNileDZSttlSstlYtBCpnfZIuPc9Qel2Vf8lQFqcXxcork9TSDGNt hr06I1THDjdSNV2zemFXRRLYxFZ43lT8nq70nKnyYkTexEznTZyKPLAJ3Mv5 LTVdzY3dQf2j7YU/ffO8v8M5OxbqC5mbdJX2BpHbIAGbdLtka8PO5QHr+rD9 9ljT3XEXwGQ+pBx1VYJEsJQLzq0aXqiBjzwBs6BNRuCHiXkoD/Ckfoy6nVMN +xTUavg2PdhkrF0/0Wl0qguEGVdLWbHAkypBKthELeECGTC01eAIAIUQLoAn oBKjTGiuKwSb6GvhGa6qnKUQZcMZ2KKt5kEAXiDkpZl1EKIshSirvixbKc5R lufCxVHAQwx4UpxTJ4J3ZgJJGqrgPplzKkwgtBW5wBMUilnKcyoLjnury477 TSiYdDgqO+xVEGgTzJicChOIPg8VcCdMZgjjZhMcMPVG9kQBsuZYalmmmlxD dY62IruhPLMiL6qSH1MrTESbYHIBm01O2uRk3oSVdombeQ148qZN4gW5CWCT nORrYJP4K79LuPr7rJQrRflpvOzYQm5yrZirrBYebi3+5dvnf/z80afv3/32 1f7//Ovnf/7qyfpUp9tYHXKpmvQVABOtLL9CmCQtTW+kE1LaGo6uhu40qaZ3 nbyZN8GaLpAI6XwngTVdaJOImi6wCbOm6/WMNTrQJqfmTXz0EAPMmGBBF7P/ ncwxgGC2mSBMQBzjQQ16BC/wGfDIaLOaESpaMafbBFSCNiFlXXenA1szwYjA IcCvebLUub3YcWsqcGemBSdxHaz17q32oEoieLIx7l0fg/DAGbvjd1e66exJ +95KJ6gEAkiyNd96c6oZzvAQYIIvoVPur3Ts0jzB2cJgkPe3w8iTiOwJ2W/C tAkaJGL5+6k1XfBmEAp8IdoEMynIE0yOAEPgIXwtmTAMQsGg8HICJhgRWxfh +pun698/38SkyU+fMraZHN8w4100NUb4eAIwM3uCY7gwc0Fay5ESZPsJwATO OM7rmxe3vvng1ncf3sEvh7dhURbuPSG3+qSng/SbMNMfxBH4rfFrcSAwvAc+ 7fuP7vrNlf1+zViHaWe1HxM0p9rkZH89M2vDrObCEi/8CeCvPGK4FirsJ8bU 5X//+sH/8e0jcAr8DE+mTpg1Xcc/8138wl/7xufsODvOjt/0cbgUAJigTZ6s t0GM+iqbNWyACfBktqMeVIL98o8XXc/X/E9XfY9XAo9XW3cXW7Zm/WvjPq9B LBEkFbFjBawYbmaUgJ2As4I5Jyq73lbTxWw8IdVczACbpCVdTjut3wRtkhr9 +/S4d7KTqK6TgrTLeQnvsuPeKcq4XFeYZqzkGCpYTjnPoxQGVAWtDUWdBlGf RdJvlYBNjvfCU7sXwSYTfvCIgo46AhO0SUTqhGkTsuLk2CYGtMmdUfO9MfP2 uAVt8nDWuT9h2R7Rb3TKlloql935yx7BsrdgubloxV+yHBQvt0gWAhVzIBdH saMqUZl/UV8abRTHKWvTGmSZhpp0R01mez13Ql80bxLN6gSYN7EWvGcsehdt 4n6z38RC95tYa3PBJnDD1uqQ9QR0bV7NvY3wX394NdjlGu5xuc1Sm0bsMVWZ lYWGWnans3Zl0L7UbwGb3Bx13Byxz4WUE77aQbu4x1QMKgGPQASUnBZ1Xltj PpZ1wavDTsnI8UxmsMmYVxGmBxYNeuThoHqq0zTWph9uaRgNaSmbpF8pyY2R 8JIAJigRCLwwSAvwGmwC0VjFA49AgD6AIboawAtPKc5VS9j4DJwBKfBMYzUH QlPJUkly6sVZijLQRwacIwJekpWkQ8hL4dUszJ7AWVPJRqcwQ1tJ8aRRkgM8 MdXm2RXU+ozjsbSiI5vYKJu02yiedDqq0SZgkEF//ek8oVcxwp1wm7UKbpWZ y02YXSe0TahuKbuca65lGaiyrmzgSQXverUgVlqQJKPbwyHgHv51IzxtE9Jp crLfJJduhKe7TiibJEb9np1+DWzCz4kXspLZadFJUecAJnBOjn2PkxXDTo8S shNL89Mqi3Pnwu1318L3N8bvLo8c3p75w6cHf/z08P7qyMxQ8/ZGeLDN1Cjl y8XZVQXJclEmXSkHP0NWI90ID0H9MLERnlHQJStJfptN/mneJAImmDrBONlv AoEDu1pMEtIOHwGT1zY5AZMIm9Aq+e/ZZIJOmkBgy8lct3F5wHZ7shl4whTK vdnXdVmkNAvnAMP11nwbGAR7TLCICwiDTyJSNiebl4Ycy8NOHC8M7zluRWlB nuwuw2cCfEK3pv1whoegEngeUycQW4uhOwutIBQcMgwSeXp/NCJ1gjwhNV3M xhNMi6A+iEdO9sJDgGjgDF8I1Hq0OYhvwywJVm2BQd5mE4hTYULmCeOcLtJm 8sPL2z9+dPdfX23hv+2Tu+U3C5B2/v5mLoN0tRObkEWHeOuO2QpsOfn25W24 ewehfPnsxqePVsl4Ycy2kB2IeIfPrJIic31PzZvAm+G7wDvhW2B+BBvz4Q3P d2Ze7M09vjv+we4cZmdO7Tc5dfwX+UakvuvkbxzzJljWhSo5arShiLeN6Q/K Jt89Ap6Q2QJ0ydZRkP53ZssJwOTMJmfH2XF2/PwB7kB97M37gCc7s54+R6lP zQKbWGtSpkN1wJbdOe/Bov9gxvZ02fN4yf14ufnJWuv+IvzfaPPOSk+vr14h zi7hxvGzozgZ1wq5ScQmv7CyK6IhBdMlpN8EEyjUkC6IxMsYx3O6qB3x6bHv psWey0ygWk446Vf4SRc48edyov+Fm/BuJTdOI8psEGVaazhuhQBs0qIpbNeV 9lkqBqwUTDBGPbUIEzp1Ip9uOVLJfLsSgswQZvabQJzsNwGe3Bw23Ro23x4x AUzuhi33xyxgk50xy+649cGMY3fMtBs2bo/o9sdNa76CVa9w2Qc2KVzxFy/5 RYuBssWgZKm1aiZQ2azIUOZfaCy+Ziyn8iaqmjSwiVOa1aniTeiLwSYz2nyw iVN43lrwLmUT0TljxQUyp+uoF56e09WkyPPrqPu0gLWm3aPuCujeP1j5+4+f 9LTaRvs8AWe9vq7Qqi5xasv0Nax2ezXcMi0PWDdGHGCTjUELwGSkqQLo0W8V YcYESBJq4JOWEzAL8ARepZImrtowVdZVR+VN/NRN2oBHPuxXTneZJzqMA34V hF0pKMi8WsaJrylIb6zi25Qih1pMr2sXYz+ISV5klBUCUuAM9ECbMIWiEGXX l+UAT0Al5CWVJBtCWQ7cyMJrCLibhYALuLNVlGXUidLpyGRWc8H5pEowjDVc fRUbeGKo5ljl+U4lNZn2eKkf6TehUidt1grgCdqk31cHMBkKKEEiJ/tNhvzq XncdVhOBTUAluImDjOrCFSdUO7ycizYx1eTqKrO0FRDZlfzoGmGcvChFXpyK vx20yclmEzgzkYJCAZsgTyDQJpyMKLBJXlasIBf+5samxpwHmCReeyfmyu/S Ey/mZcWU8NOE7ITywqyugHly0D/e7xvrds8NB28t9q9Pd/UFDG1udaevUVOT V5oXWy5IrCxI1tbysGFHW8MBm4BKcFSXtppqhAebkIIu7IU/WdMlL00lFWuA FPht4oQubIQ3yHhY0AUMwURJBE9IxgRgAuHRi31GSYDu7oFoNVfADx89cjJp AsHsfyc2mWhpQJvAxf+GTcZa1KMBJdgEYDLdoZvp1C/0mm+Oe+9M+SGQJ1ji RXrhwR3Y1Y7FXXC9TYNlc9IP7lgLuwEjmBYh2xvhPWCT1VFqqjDOKAbI0ImV wP3FNpAIFSudO0vtqJWd5Y4dmidY0wVxd6F1Y8q3OePfXu0k04MRJhE2iRjG hUFKtpg8ieiXR6Rg2zs8DzCBa5zZhTYheRMs/cJ2eGZZF+ZNTtqELF4kNvnj i1t/+YSeHPXxPeQJKSui/wF/nzmwC3vhSYc4mQOMDAFi/I8fn2PnCE4MJkO3 8N4eq7mw5QSo8sXTjS/e30CPYHEXFozhxkaSvGA2yJ/adQK6AZg8vBV+dn8a h33BM/A58BJ8R3QE9qREDOl6W0RUkf2DsbcxYoM8woT0wh/taqFhQmeddqjU Cbz/eEEMBuqDwOREOzz1hb/2jc/ZcXacHb/p43C5+dFa8OFKYHfevTPn2p5x j/lrglqeXZphqU6dCMofLLfuLwThfLDgO1xsPljw7y34dxcC2/PU/43uLfes jzUHzZWV+QmFcCOUcqGUHUMNIE2nztz0WAxOOgglmpUWnZsWnZN2PSf1enZq VFZqVIRcIpImOD0Ygx4g/NommYnU6pOsxMtZCa8jOxHiCjv2vbyES9yE85y4 c8KUi5Wc2PrCNHMVy17L8ch5AZWgTVvUZSjpMZUO2CshqI54dw3uhQeeTPil wBOs6cKyLlLThdkTIhRQCbacrPRRZV0QIBQ6aWK8OWSgmk2oaV2We2CTCevu pG132ro3bdubsR3M2g7n7PO+sklHwaSzcMlfvtZSBec5b+mNUNWN1solb+mI nuWTXLMI33GJLjlEcbaSWKco3l+VNqAVzDaVT1iLZ5xlweoUs/CCpeCiueCi Pv+cIf+cveSyQ0TthbeJY2zl8WATa2WKXcryqIV+o7jNXtvpVnZ5G9anOz97 vt3ZbBwM2VocSouy1KYuCVprbPX5Hc6a1dGm5SHb+oj95njTQq8O3AE2GXVV wkWHTggqAZ5AgFOwygueBJ4AXgZsEvh50qkoadhTh3mT0YBqsl03FtKNtmoH A+qR1sYmTWFR5rWS7OhaYbqxVuhtrGzWVXsaKtwNFXABD53KMruiFMJaV2Ks K9JJBQ3V/IYqHnWu5mvgooqnoSIPHmprBRCNNfz6chYdbKWErZJwVBVcdQUX HsKTCnFuXRlETp0oRy7KVomzNeUkchokOY0VuXBWlmWqxVlwI31UgFSbR7XM KwrM9QVWVZG9gaoLclGlQWKvrsyrK6X7FyQhi6TFJMaCLtILj2VdwBMITKDA Q3iSCnrdCeZNWkwS7IXHNhYQCo4RttXxqWWC9XkWGdtcy7LIORY5V1cNv8K0 Ms5VcV5UTXFyvSRLUZ4pLU2tLU4RCRIL8+IE7Oi87Kt59BZ4fm4UPwfQEZXP ug4POZmX2RmXOBmXspMv5qZe4WZeh4CLxCiqpquAk1iUl1LMS+HnxIH3k6Pf SYz6XdR7v0u8di4/J7E4L72AnVzATmmUl9n1Mr9T2+4zD3V6J4dCXQGbUVWh lRWYVaVUxqQoVQ0ekfF1MvjzotJYaBP48eJPFWzSWA2+yMF+EyzoYm4wgagt SoQg5WpY0IVJE6zp0kvzECZYwYVj1iLCUl8AZ2plj67co6fGsjkbRM06amkm robHxhMUSkTSBGLYXT/iqR/1KsNeVdinGvOpx5rVU0EtxGSgcSLQMN6sgWfg +ZHmo6BgAk4JAEBU2PA+EWoYb1WHW+ohxlqVlFMCqvEWarA2NSMCItSwNuS4 Ne6FuDnmuTPZvDUduDvlx1WMW/Nt948TKFjiRaZvwQXZKQ/ugIfkzSga0ApY BjvlsQkFZ3ndm2/bX6V2ptyZpZIvuEeeqhCj21IebPSDEYAkW0tt65PeW3PB +ysdWL71ZGuElHWRNnks5cJtJhBY38XsLiEL39EgETY5NV5uT324M/3RzvSH 21TAw5f3qYDrj3aoRfDMfYtYwUWWwn/1eJUkTb55uo4BQvnTJ1t/+vTeH19R Gzp++Pjuj5/d/8uXuz99tf/Xr/Z/+pLE3k9H28z3yf05WapO+tBJZgFfwrwJ WX1ObvixCIokGnCcFzatwPVnj9e+e3kHYYKzfNE18Ay21cPXohTw8/EX82Jv 7tHtMaABcgk+Fn4BhEVkJlhEKRf5ZZNkSkQnPr4NnRUxOoxACX+DOKAMYPUD XR0H+iAZE+AedsdTO2JojKBNjj1CaucoEmLXya9943N2nB1nx2/6eLgaAJs8 Xm8BpOwvevcXmmfaFMFGnkOWCTYZ80sPl1ohDhZbwCYHC83wht0F//3Z5vvz ge2FFvx/zKFgo6I0ozD7Sik7WoQ2SYumbRKTlxHLpYO2yXWACagEYZKZeu3U HArpf3/DJklXmDOEMxIu4U7GzBPBigGbXMxLuMCKfoeX8J4457pckKwvzzJX 5rikHLRJp764Q1fYYxb30ZVdw65q7IWnxwjLUSWvBwiHFDMhObOsi9kLT6VO +jSgkqPUCdVsYgCb3Bo2ok22xszbAJMpSiUUTOYch/POBwvOza66pUDFrEe0 4CtfCVQuNZfPukvWg5IVn2jNL17xlY6b2J3yBG/ZJZcozlkS6ylPDFan9Wo4 Y5aiEaNwzi0OydKshZftxVdsRZdMgvdMgnfpjEmUQxztKI+1SxKsFclgE7eC 59MUNBvKQvbaXp9mOGTeWh78/tNHYJO+oLnD09ikrTDSc6usCn6brWplxLk2 6rw16bk745sHm1hLB2xlg3YxnIEnOKQLbILt8EgVQArYZBBgQpfJjbplJG+C Ngm3aolNXA1FlE2yrtcK0ow1Qk9jhU9b5VKX+3RVlE20lS6NpEklBqE46kVg E4O8UC8rgNBJhY01+aASOEOgSjDISxDqyjyAiVLCoWECVOGQawy1OBsMQsFE QsEEQyXOUpdnw120roqtpf+Rn5ouVV9ori+yqIqs6mKwiZOKEq+2zKcr8+lF AaOYXucHUY6N8BFzuk61Sa+njtiEtJzgJGG0Ce5etFKD5ngWOdtE2YRrqeNq q7IVpSnlvOsV+TEyUZq6KheiTpwB1yJBEtgEGcI9tgnlFDoAJqz0ixjZyZdy Ui5zMqLAJnARd+X3WUmXBax4ITsBgp8TCy9ROxljz4FNYi7+Hv7agkpAKBDl BblqaanDUOcyK+16uU0ns2ql8LCqKMPWUOaz1HhMVU16iVlZCEFquhoqWVo6 4GcLMNHWsHCMsLI8Q1aSjNsVSeqEMaorCQu6sKYL8ybwaQgT0vlOI6XoZJgV BWCWSJvQi2nIBkZsOcGdmMy8CVwMuBWDbsWwVzniUwE6wn7NGHgk2IgB1xDY /P7aJgAT2ibhoBrncdFZEiWoBGwyGlBQMIGX/j/23uursSzL+q1weAiMhBxe eO+EkfBGIIe8R3gPgffe+8AFhE0bmRHps9JWuqruqs7u6u5xX+59vv/Mt/ZZ aMcJAVHV/T1kPnDGHGdsHR0JAUGO/cu55lqMAE9Qa4PGnXH7/WkXggkI1nuz zQgdSBy0susBQxwPGaOEgAbz314KLGcMXyBoIGugsOEwBk8QRkh5GPO2dGAi CgeUnG31nW723l9q25lrWp+0w/rdY8+aLgSWd19vFIyc4hGKp6NMKJJQQqHB k9d0PINCJEEhlXiI5k0ooSCkwBojJwAmOOLkTx/dx7mBIICUX754wJp7/oCZ YH7GUMlDdu6b7swxu8HOm7DrptghERohoaKdeL/5cB+JAx5+Ah+V8VMQQLBI DLb98G5IAUgZ+P6wwAouvAe/FgACRu+x4uu/fn4OunSk40UqYbsq7M5d+N3R dDxr6MkrNkHa+tOH+z+9PADK+PXrJ//xzTPAEIyWoGmCYEIXKOpMAdSgfuuN z/VxfVwfv+sD2ATxBM6AJ09Wm5d761x1idbKGGCTcVcpssnDpZZHS06iZdfZ kuvBUuPxIsGTo6WOo+WuhXsmU21mQXJocVp4bvzdpMhXYIK6jE2CgE1owIQd jb+KTUjkJPw8Dh/B8Y0I84nk+IKiXldCmDewSRLXOz7kZlLY7byogNJkbl2O UFMQbStLQDbpUmV1qTJ7tfkDhkLyv/ptsnFnKWbh59urPdiELDpemSbsESdY 08WecgJssjOkQTY5IBMY9Ww2ATB5umx7tmJ/e83xeEp/MCBfa5UuOiUrrsKV poJFJ/FN1pskWy2FWy2AJ7kLlrSh+ki7JNSQGQDn1lJRf138lDFr2pS94irq qoq05Ppb8wKteQHGbG+QvTDYXhhiLQy1FnEomxhLxQ55OrBJq17aYanscyn2 lvp//enTyQHXzD1XT6MKtv0KWRJs5LTlia36orVRy9aE7f5s49GCa2WwYcRS iCVbQB8gWPdoMtvqkoFKQK3yJBAAC1P3VYKRk0nSSZj06YJtGLDJdKeKzSYO ZU5WTFB2bHBJRoSmLMOuLHaqZZa6AldDKSyw8a9NUcQMcC8w1OYZ5fnm+gI4 66pzkFOARGBBsQXO8BQ+C08BqihKUgFPkFBqGQ+FLWUJbJuTVaDSFBCZEliW igtNeZq2Ml1byZBaTbZJnmuqyzPV54KATcxMwtqpzHepC5q1BS3MaHhMnVzK JkAlNHVCa7qobwJ7Y9qqC8EEG3bhcBPAE6s8zViVqC9PMFQm6isTFcXRFdk8 YBPYz1dKIgFM5NI4YJPyPNFVbAJrABNUQpQfsAnwCLJJckwIcEqo3w1gE6AS wJM0MQcEeBIfERjJ9QrxuQGKCPMFKkmJ4cI5NTY8Ly1aWVXQbFX1tppBnS59 d7OxzVrb3ahw6koMdbnqyvSaIrGiJKmhIk1NKrsSVIwJpWYqu4BN1GUJIGCT moLIsmyeND0MYYRtoDCRk3BpOrcoNaw4jawxC49soqtKQ8cEwIQp7sq8KPLr q80GHoF/1Ww2gR81WifsLLyHaQK/oCFHFeDJiLMG2YTACCCJm0pePWxVvqIS QBUAlhbSmA4z78Am4y01E60ETMaaq7DKy4NNlvt0W6NW4JHj+daThTY4E05Z aKPx9vOaLmZ+IsUTMuKECaFgl2DsNkwnyGNjLqQVZupiH3ooeAObX3CwCJ3t Dmu48mibxEwe7QzsL7YuDhsPVzowC0+ruajeu4xNqNh1XB7R+DewyQdHRJRN 0D355OEiygNPqIdCbRTAE0ydYIcu9FO++WDnu5f7FEzYomDyL189okPMaaMq 3JPjfh7z7CDarcujIArbC7OhhpoOABGfv70JNIGv+vr53hfvbsFWn45uh9u+ /wjQ6fir57twG/Vl0EnBrsVossDixcOljx6vfPfy4E8fkXn0dJbipbNRPDDK A6nYkXn6XVDbxeOnQYu7fnx58MvHR9hSAF2Sv3z6ALsx/+3Lh7Rejhoo6KHA /YAkPzGvBf3WG5/r4/q4Pn7XB/DI41UX4gmyyWq/olGeAGyilwlHHNLHK23A JqcLTY+X7Q8XbaegJcfpMrCJ63DeebzcfrjYtjpqu9dUW1MQlRsflB0XwKYS 6pvEi4LjRW4wERIwAcUxU+D/KTYRvPJNSKuuMB9RqDfBkwtK5PgkcX0TOV7i 4JuAJ1kiH1liWEVqmCJPZC2NBzZpV2R2KjORTfr1BYOm4lHbuW8y11bj0aTr fH2hoAvAhM0mpLKLadjF7tPFRE4YNpk2Ips8WbICmLy1Stjk3UXrw/GGrc6y RWf+oiN/xVWw1Ji/11my0y7daJKsOLLXGnM2m/M3mvIGlUkAJrb84MYiTkeF aESTBFptKuyuibDk+dkkASBTzmtsYjlnE5I30ctiXPVZHSZZj61ywFU/3W99 /2zl//nbNz1N2p5Gda9L3agtNdbmwI5OKY0DhFkdMa+PWnan7Ifzro1Rw5Sr DPAEqGTCIcPKLmCTltpEDJ5gw65+XQ5T91WGfbowbzLFNFMda66daleMtSom OlQjrfXjHapGdV5mTFBWLOyxI9TAJiqpU1NiVRQ26cpgbVcVw0OHWmpVFJG5 JMoim6oYZFEUmuokQChw1tfkUgG8IL+AYAFX2AiDZWBsnwUu6quy9dU5BlAN KNdYC8ozyfOYRa65Lh8+jE1ZaK0vIGdlgVUlsSjziepzkU2aNAUtukIQskmn sfhSNrk0Cz/YWI15Ezab0LwJhk2QTez16abqJGATfUWitjy+rjCyLJMLbELi GJJIAJPa4lhYlOYILmWTlLggZBO8AmeCJxEBgB4AJimxoZRNspL4mYk8UBYZ aMJNig6Gp8L8bnADboYH3k6ICAE2SRfzk6M5UVw/+CsuzBSrqgsNyrIGuVRR IdHXSeSyFEmqoDQvSlOVoalM1zF0wIw4SWkoT9aWJWOrLmQT7CFcLYkAJPFg E1YcPhyoBNgEBGuMnMiLYimeAJjAmWGTjItsAmQEZ1rWhXM2kU1amE7CtJoL F9QxgV8NaVbgqBp0VA85a0Zc8A8Y+Fox0aacaAUpmLMSHk4yYlEJ0WSrYrKt HnMlDJ7UjDZVgiibeODJQrdm9Z5hb9IJVHK61AHnA2bIO8bbaS0WIgnWa6GZ gmSBrIFCMAEBYsAZg/Ps6SenzLhGpBJipqx0k3de6cagPX23h1v9QCLP7hMD ZWeuCdgEB8Qjj9DgCchj0qIHnrDnnrCzJxc7d72mo3PrBIu4PBwTCimAJHTw IrVOQHgF8QRvgItfvb/17Yu9H5hqLkQSXACYIJX869ePQX/95jWsoAYKtR6w jTAKSYFWf9GtPnvnj6YD9vL64/s7OI0Rh8t/8+E+jpLHe+DK1x8QYHn5aPnT Z+vooeCX+PnzUxwEDwvsUXy6MTjcqlwdd713PAs3wIfxaPBFEYNdjcYOlbDt HryNPfeEgsnFGZQYP/mZaSmAJgg6JjhOEfsJuOPwD9lhk/PxMST1c4LtvH7r jc/1cX1cH7/rg/DIWhOyydP15mfrrWsDSkeN2FIRrZMKhuzFD5daAE9O5hof r9hOF8wn86YHi9bTZefxovP+nO1gsWl/3rU11bgyZrXUZ2TH+eUlBKbGcFKi iZBNEpn4CWxpxAyYnLOJMChKGPg/8E1YWXjinjCOyaW+yWtsEnwjU+AlTQiV xgfWZvJM0pjGquQWeVqHIgNrupBNxuzneRMQwybVlE0QT+Y7q9gFXQgmdDT8 uXWCzYQH1YAnwCbuyAngie5yNlmwPpnS3++vWWkqmrflLjrzgE3WXPm7HbLt 1qKNpnwEEzjPWXOchaEkWpLl6yoOHVYnjDQkrTRJumuEljxfm8TPmu9rzL4D spHhJsFY02Uq5BqK+PoivqUioUmRBRvpNmNJt616pF37cGfy//37D+P9jTP3 XMMdRtjtK0uSYSepKUtoashfHjKuj5qBTY4XmzbHjAtt1TNN5aBpVxkQSp82 u0uV3lyTAFSCPbtAACxALhOkQ1cFOws/0Vw72lQz0Vo/2lI/0aFGNnFp8tOi AtJjgorTharydJta6tSWWFVFcLapi+Gho0Fm10iZNXloV0uRTUCIKsgpIHN9 AVwBwYItfBZoxQNhkGJMcI+iEGVRFoHgq4Pgy1lVROSLkg8AXxrWhTa1G08U DJuoJMgmrfAjZWq6rmIT6pUglaCNMthYAxtgHL+Io+EvsgnWdCGb6MrideUJ DWVieUFESTrs1UPKsnnVhdGUTUqy+XlM3uSib4J2CUmauH0TYJPEqLsAJqlx YWJRADfwZqwgANYZCeEAJtnJAsQTuBIeeEsY4gWEIgzxgb9fYJO0OB4s4C8O rotCvQXBd2AREeYTw70TFXYjMuxWQVo4sImqPFVFHKhUnL2oKUtWyxIwC481 XYAn9dJYyiYXHBPORd8E2KRaEoWpE3VZEg5edOPJJVKXpcC/Z5M8B9kEzqDm hgIAE2wjTNmkx1KGBgqwCfxqAExAA86qAWf1PXjYJB9pqRtrU4y1KcfaicY9 9IpKGCelTQEkPtH6yjdB0wQ00VzLZhPUbIdysbdha9R6ONuMvsnRXMvpKim4 QjzBkDu6JzR4AtyBQHHmNlBg/WxnCNv5AhHAGa7A/Qg48A57sy3whjRdgsl6 jKLAs4AtiCfw1MlaN3AHduh6uN0PbHK81oWheA89P5686Iaw23bROq5XtggL Q2gg5TW5vRJKJYAYFFIQN9gtuTwiJ/Qhdg8GkfjJ821gkz99fPDTZ8dAJSi3 b3KG2RM3obwKtrOz6h4uCd3w0/tpOy92tyu2cO4JFmIhnmAOBa2QHz45/u7l AZzpfHmMkKB3Qyuy4OXwwi/e2Zrs1s30GZ/ujaP5QtMiFyu13jDihG36UDDx SOWzsyfUS/rpo8MfX9xHAZ787UvSrYuG32kWnubimdTJedsu5raH1/NNro/r 4/p48/F41QVIgjVdDKG0I5uYyiIbinjAJmeLzY+WW4FNzhbNpwumBwumkwXz 8aL1cMF2MG/bm3PszTnvL7bszLr6GiuqC0TFacHpcTxQagwX8CQpMpRUczGm idgNJgybBAKb/PN5kyhBABH/XNHhJAt/aeQEwATZJD7kFrKJLDG0KM6/PDlY ncs3y2Jd1clt9WldqswBQyGI7Zsw1kkVlnJRNiF9ujqrLpomyCbYrWv9ngLY BMSwiXpnSI1scjCuY7PJowUzhk2erdjemjO9NWs6G9PsdJUv2PNmrVmAJ/OW jI3mgt126X6nbK+jGNhk2Z650SprLxcYs7zVKTdNOX73lLFjOmCTfGAToBJg E5vE15hzC2SVBAGboG9iKeaZmJoua2WSqz6zVV/Uba0YcNUPtTXsLfb/9U8f dTrVo12WyT57m7naVJcLm0ldRRKwydKgYWPMsj/jPFpo2hg1LHXKV7rqljpq AU9GLIXAJp3KNGCTDkUqBuHhPGSSTDWWTrsqp11AJVU4e5GyyXhLHbDJZCdh k4lOdbO2IEHkkxjhl5/Kk5emmlVFdm0JnC3qYotGatVIycItgieqcwGkODQy Z0MJrBFJYAFXQPAUXgEhxYAAUuhr6UsIyKiKGcEXYqSRWTUyuGKFd24ohSvk KeaiDZjF7ZtgTZe5LtulLgA2ge8C2IRJLhRfxSYoZBPs3AUadHmyCWyYsaYL 2cRcnQZgYqhIttWRmi7CJmXxmtK4WolIlhZanBpSnsMHNgEwQTaRZfEuZRNa 0IVUIo7wAcUK/JBNkmNC4iMC+cG3YgX+CZFBcAXwBNgE8QQE0AHi+N8M87sV JwgCNkmNDYcF/MXF8ALgqfDAm7ygW0AoUZxbseG3Y3m3JKlcRVmKojS5oSod 8OR8vom7oAvOShmJnGAbYazpKk4LvdhA2INNSjJ5WNMFYKIsSQDewZZcWNml LEm6pPlzaTL8ezbUZHmwCRZ04eBFWtOFazJy0VU70lxHfJPG6oHG6nuumqFm +XBLHfy7xfbX8K8XziDkFBBxUtxgMtWmmmpXkmk+F/ImYy2ETS7iyUy7Yq5T tTpg2J1wHMw0IaE8ZIiD3TF4d6YZCIKm3YEg0OPANAqmSJBNqHnx1u4wsgYW gKGHgi/EN0czBd4ZBJyCbwLvCSTydH/o0c4AEgo8PFkntELj8DR4cumYxUsn xV9avnUJmDyYoWBy0TS5NAhPwQRghM40YTcQhsV3L/a/d0dOfmRy8ZRNrsqb 0BIpjyEglD6uqn3yyKrQ5sNYE/X9R4fAF5iahwWyBpzhOlIGkAtACr4JrM9Z gKEYbCOMAZPP39l88Wjpy3e38d2ummNCUYVmSejIxYsUw0Yb2qfLg1nw8/wM H/j5LvYZ+OHD/T9/ckKCJ8woRhAs/v2bp7DAaDziCbvECxe/9cbn+rg+ro/f 9XG25Hiy1gR48milkRgo661LPXJgE0OJCNhk2F58utAEeAJscjJnOFs0nS1b ThbNB3PGgznz0SKwiW13zn682r457Zgf1DcbJNKMkMx4QYaYnxYbDmySyICJ WHgXhWBC2YTdp4s93OQqNokWBKJi+URIKDGvKyncD9kkIfRWQsjNLKFPSRKn MNZPKvavTrmrlYgcFQmtdant9Wl9OgnmTYat0lG7zD1+kYw4oY4JgMlyt/wq 04RWdiGYrA3Ub927kk1Iny4GT5g4vOXZjPHdBevbc+bDATmwyaQxbc6WvWTP XnHm7rQV73VId9oKt1sLAE822qQ9tZH2gkB1yi1Dlu9IQ/yCI3utVdJTK7Dm +9gLfG0FPqbcWyDimxQG24rCbMVcm0xgKRFZSiPN5QmO2rSmBkm7qbTHXtPn UmzOdP3//9+/jfbYh9qNA80NLl2ZVSkx1mZrSuOBTVZHzJsTtp1J2960fXVI u9wpX+9VrnbXA5uMWosG9LldqvRWeRKwCSyAUwBPhs0Fs80Vs801oBmi2plm +RSzDRtxVY81yz3YJJZ3J07glZUYVi1NMigKAEmMykJc4NoEqMKs7YxvAjzS pC9vMVY2Gyrg01JIAeGiUVuK9gqyCXVPEFvsbvPlvDxMLbNoSkDWhlIqfAhn EwETsiYLhcRcT6jEVJ9rrMsxMhHsJk0hsAnJ7+iKAC4ATK7Km1zKJjjfxINN sEkXsIm1NgPYBMBEX55klacCm2hLxVoWmxQm34UtPSAJ4ElVQVRZrrAonZOX drlvkhIXhO4JUEmcyBvO0TxvZBM4i0UBgpBzNgFUSY/nYnEXxk/iI4IBQATB JHgCf2sZ8YLkaA4siFHCC8C/PuAU/t3bMdzb0dxbUZybeSkcZXkqsEm9LFF9 3kY4AWcvntd0ycTYQ7iuOKa2MAogS5oehqJU4jZQztmE1nTRvAnNwgOY6KrS 6qUJF4dmMu2Lk9lsAueWBuJzMb+yV3PhYYGmCQAjSZq4asdaFYNNtQAmcEY2 QTyBf7ooZBOgFRCwCc2esNkENUn7dLUBlbxiE4/KrqVe7daIFVt1PVgEgujF yiskiJ3pps0JBxAKOian7nQJcgrq1J1DOU+jMBVfOLQdmAV5BIehEGeE8V/g IbwzvC0QCpzRWCEZls3eZ/eH0Tc52+oDvXU48t7JxLvH4zQUj/VdF2Mm7DmM HjNNLiLJpcCCbOIhWr5Fq7lAl7IJ5t8Jj7y/A/vnH5jU9o+fAAUcAJ5893Kf tOr6FIjgAVZz/eW8N9dDyiYek0c8chy0sy5NoNDWWOzJjHRqIZ3YDqCB3bqw 0Ra81VfPd794ZwtIBBbfvriPFwE6Pnt7Az8D3onX4SHcA2+CdWVowfzwyfE3 H+6TYYjuLscegRG2LUID73R2JDuNQsu6PLCFdgBABMPv6F+/ePjji/vYDA3O 8AP/5eMj6pIgj7CD8O68ydlfPj355eNjpqbrwW+98bk+ro/r43d9nMybH604 n6w1Pl51PlpxPFiw7Y5rOzQplopIlSS0z5hzNGM7XWh8MO88XXCcLTaeLTpP 5uyHM5aDGcvhnHVnyrg3Y96dNu3OmDcnjSNtZTX5wWli2MnczUwISY0Lgi1o cszdWIFPfEQQKBYkYvBEFBwtCsY5JmwBpOAseA8JBYFEwiCRMChCEBQhDARF 8v2iBP4xwoAYUUCM0D9a4BfF940OvBkfeiuV75Mcficl/HamyCdT5C1NCJLE +BREe1WmhZjL4lsUWS3KrB5t5oAxd9ReNN1UNt1M5DZNXrHJuXXCohL0SlAe lV2w2B5q2BnR7o1q98d19yf0B5P6w0nd8YzxZNb4YN54umB6uGh5tGx5vGx5 Mmd6Omd+e8H6aFK321O97JQsWHPWHHkbTsmWs2CnsWDfVbjvKtiy5e605E/r xJ2lIYbUG415/oN1EQvW9GV79mBdlCXH25LjY8n2tub72ST+9gKOvZBjKwq3 FfFsxQKLVGSWRtoqE1qVmS3q3AF7xZBL3mOrnOs3/fLNu7PDTTODzsk+a4ux okknc2qKzLXpTlXudLdqddi8PW7fn3Ztj9t2BrVrPYrF9hpkk35dDsBIe30K 4AmCCVyZcMjg2cV2OWi+vXYezm11M+3y6Xb5aFP1aHPNVJdqqhs2dbCdq+uy yApSeckRfkki34IUXp0sBSDCrpG69GUEHEiFFeOSaGSNurJmS7XTUG7VyEyM seLQlbpMldYGmR1gRFti05bYdUAWMn29xM6E6FEkt6IsBtkURZi1b9SUoJwa WbOu3KUtY9Yl8BTcbFUUwcLJXHGoZQ4mks9cL7DU51vq82yKfIeywKHIt9Xn Nmtgl0uGZbTrijp1xZ36os4r2MQzacLUd9GwCWySMW/iUuXhBEYcbmKqSgUw ARkrU83VGXDWlCTUF8ZW5YikKWGSpODKPFFtcWydTFyRH1GaIyA1Xalk9mK6 OBiHv+M0EzroBAcvJkT6JUT4AqHECr3jRD7iCD/4q4zk3o4Kv4PxkzQxJyOB l5nIBzZJiSWlmEAfwhCv8MBbwCPxkSGpYn60MFDI9RGF+0bw/QU8Px7Xhx/u ExPuExl6Wxh8KycxvK4kTVGSqqnI0JSlqUpTkE20ZcnasiQNGbwISgABZdQW xgBxAHcUJIcUp3FKs3g4CL4kMxyEeRNs0gW30Sy8tjIVTRNzXTYI8KReKmbm 2sTSgZu0qReQi1WR61AXNDYUgpxK+N1J6Fx4JBQcboJ9uuBXM9hYM9JMbD62 RoBNWuon2lWTHeoJItLbATXerqCacGuSARMyBqWtnmqSychje2HUdIcCNNOp nO/RLPXr1ofNe1ON7PkmdAIj6HCxAzt34XXs00VrtM7cLAMXd2eagTseMGVa ACZPtweBOE6ZpwBDsOEwwgh2KsamxDhN/mC+DW5+tkvadj3eIh293nZPISGJ EqKxc90fo9fZcXh21dalvsmldgkVMsjHZwsUTD46nWezCRU7ZoJNumj3YNgt I6EAnhDr5MU+7dOFbPLz5ycsr+QRFS3rYos2raJ5DdyoY8CEPZPxv35+jukP pAmcLM9GFRxuAlhBul0xdgkQxydP1z59tk56eX2wf7za/2D93tfP99gfAAEH 3xOjLuxBJPiFLrLJxbIuumYnaC5m4T2qvyiY0LzJv8CZjIk/++XzB/DDROj7 6vn2Nx/uwsO/fElq5H754vQn5uf8qvPA5yBSTffnL4hR9VtvfK6P6+P6+F0f DxYsQCWgh8v2syXbybzl/pShVZVkLhcBm/Sbc49mrCdzDmATAJMH8w4AE9Dx rO1g1np/xrI/awE2AULZn7PuzloW7ika1Unp8YFp4oDMxGDAE2CTaN4dhk0C 4yOD4iIRT+5SNkH9QzaJELolCBIBmzBtuyL5vhE8n4hwRjzvKJ53NM8nPuRG Eud2SrhXhtA3J9I/J9I3W+RdFOefF+mVF3m7NClQWxzlrE1zydP7DNmD5rxx p3S2tYI25kIY8RB75CKFlOnW0tn28vnOSiAXeIiRk+1hwia7ow2UTQ482GQJ 2MT6eMX6dMH6jNHjGePBvfq1ZumCPW/Vkb/ulGw6JJv2vJ1GCeDJnlOy1ypZ tqbeq+G58n3apcHj6thVZ/aiNXNEGevI97fm+JizvG35AY3FwY5CYBOutTDc WsSzFvEtxYRNDLLoVmVWW0N+r4UUrvQ7qpeH7Z+8tz8z7BruNIx0GuzqIgPp SZVjq88CNpnsVK6NWHYnncAma0OmrXsNK111861VU42lw+aCHk1mlyodO3QB m8DDe4Y8eGq2uWK+tWa+DcCkdq6tdq5VPt0mn2qrJVX3rXJgE3hbYBPQYFN1 XmJYRkxQfhK3pjDBKM936crazNVYtQXrZkMFqMVYCRebzVWNxgoAEBBACqBK u13eYq1ptdW2WmvgWUAVuMGhLwOaQAZpaiht0Ve0GipRQCJN2jK4COcWXTlc gTvJbXBRWwbPthkqO80157dpy1wNpSAEGZdW1tggBWpzaYqbiApd6gIAk1Zt Mfk/8PriLr20y1Dc/Y+y8K+adDVW9tsrsI6Ihk1o92AcB2+sTNGVJYKMlWmm qnRDBbBJYl1BTEWWQJbKgZ08SYVL44BNyvNEACakpiuVl53EARhJZAAECcWD TfCpGMGdWKFXfKRvQpQ//FVGcG6Jwm7iuBMgFMSTNDE3KTokMSpUDH9upKzr Bsf/ZhTPPy1BEAVsEu5LxPPj83zDud68cJ9orrco+BYv4GZaTEh1YVKdNEVd TthEXZaqJkiSxPgmCWw2AaCgbFKYEgoqSg2TpnOxaTCCCVZzVeZFoOC7riuO wyA8IAnWdDG+CXkrOlsT7gSQwZsBZIBfHGoJgIlLW4RzZGgQHn8LWNCFcfh7 zmpgE8QTSihjrQoUgMlUp8ZD8O95rL0eNM7SBJBIWz2Oj6e6ik0QTxZ6G5BN yBBGBh+QPmgPYSzBAohAZwS7CtP8+0OmPzDFGXZkHigDkOGt3WHMmAC24GwU HMsI95DeXGTiSTutHMNB7TgSEcvD0AfxCLyzg/BsPEFsQSTB+SYeSRPUpWyC JALcgYSCD9kReCp2WRfFEyzoou4JDoX/00f3sUkX6ufPadLEk00uDYx41Eex y6LYsRT2zp/Wd1FkYPsOtPcX6IdPjl88Wnr/ZO6P7+28czi9O9fx/ME8hRfs Hsyek0jZAb8KLSp7Q0HXRbEJhR2QZ/smtOEwO3Hj9pLgW4Nv5CH8GOHnCTwC P95vX+wBm8CZmlPsdA9bTAPnaza5Pq6P6+NNB/DIoxUHCBani9bjOfPBtLFR Hmco4WsKOYNWCbAJkAjjmxDHBB8S62TOBmxyf86KvsnhouP+gn1z0jDRWSnN FQGeZCYEZyeFwY5IGHqTmUMdhGwSF3H3f8EmUREhkaLgSOFdIkEQaSnM84/i +UaG+0RyvSM4XpEcr6hw7xieT1LY7WTOnRSuV05EQEH03Wyhd7bQSxLtkyu6 kye6JRP7KXN55rJ4R1VKvyH7non4JjMt5cgmAClXsQl2D0ZhiddUS8lMWxmy CY472RhUEt9kuAHYZG9MS9nkaNpwNGM4ntW78cT8aNnydMn6dNH6bNH6ZM58 PKre6ixbbixYQTwB2XO3HHm7roL95qLt5rxNV/akJqa3PKyrJHRCI15rzEE2 sef5WbJ9QHZJILCJTRJmK+AgmzC+SYRFFmWQRrWpsls1eR1kDEdZn71qrt/0 3//6+fH2RBts8s2Vhtocc31ek1Zqrs2wK7IBIjbH4JfbBGyycs+w3qdCNplw yHD8Is6Fb6tLBkjp02YDsEy7yhbaqtE3WeiQu32Tuul2OVPZUj/h3sJNdatB 8uLE8tyYyvw42MRaFIWN2tImfXmrqarLXtfjVKBg3W6p6XUpexqVXY66Dltt O6MOm7zbWU8eWonaLNVtlpoOu7zPoeh1KHrs9V1WObBGu7EK2QTQo91UDVeo XAynIIzAmQCLvqLDVI1qM1YRMS9s1pcyKmnWyhg2KQI8adNJ2/XE8ug0SLsN sh6jtNcs6/0n2ARLvPps5/lrYBNs0tWkzsfuwbSgS1ua0FASD2wCYKIvT4G9 vVwSXZbBk6aEwTaesklZrhDARJoZnp/Gy0oMAxIBBokX+YiF3oAhl7IJgAmy SWIUmREfyb0tCLkRK/DDyAnTQ5iTHBMKbJLEdLGI4vqF+t4IvP0Hfoh3clx4 lCDAzSa+wCYAJqAojpfw7k2u342kiMCK/Hh5cbKqLB3YhKg8WV2axGThxWqS NCFsoipNRN8EIALoAxgEgCs/8S4aKEAoIDrfBBZ0vgngBrwWiAP7dMEC3p8x Tc7ZBMEEkAcWcB2eBYQBNiFgoi3C+SbwYwcSGXC8mjKDbII1XajhJjmyCVLJ eJsSdBFMrmITpqxLMd32mhBMLrIJrud7NMAmu5POA2a4CXbookMVQZRN6CgT 7KyFfYDZY00wNoINhNE6Qb7Ae3BuI7wV4Am8+SkTpUf2IVPmmXDKQ+a1mGHB 3sK0RgvBhI5ZvApPcL4Jm03++bwJxRMkFA82YU+B9wATWtyFbIJgQsq6mH0y bpURSV7PmLxik799ewmb/Pr61EVaAeURQrnoMqDRgAhAr+DNcNt//vQ+XP/y 3e0nu2MPt4bfO57dmGxeGrZ/9f7un798CGDy6Vvr3764T5sM4/B32hDsYqOt SzP4l7KJR/kZvolH6p8drrlMwFnkx8hufYaE8vUHO9gVjV73EF7/rTc+18f1 cX38ro8HC5aHy3bEE2CTo1nT/SmDvTpaJ+URNrFJDqctaJ0AkrAFbALan7WQ gq5p0/Fy4/68bXvatDKiMWsK8tI46eIgUtYVGxTFvZMaF/KKTSIZNokIAV3F JhcVC/eLQgjRCO5G8YOieAGRJGziGx3ug4rhehOF+ySH3krl3MkW+hdGB0si A7P5Xpm825IIr3zRHYnotizWR54Woi+MdJQn9mgzAU+GrQWTrhKgEtB0c9li Z81FUTZBKvFoKUybCa/fU7DZhLFOdMAmh1P6o2n90YzuZM4AeEJiO4tk1gkZ d7JofTxvPhlv2O2tWmkpXrDnLDvy1p2SDWf+piNvu1Gy11S40Zi105K3YEoa rY/sLg0bUUQvWtOXbFnDihhrjo8p0wvZxCYJsOaHWvPDKJvYZJHWkmhzWVy7 OqdFndumLSAVLLbKkVblly9ODjZG+ls0g21am6qQlC0pJfrKZIcye6anYWvC AWCyN9W4NmRaY8ImgB7AJgP6XGQTbB0MbIIT4WebK5Y6ale6FKClrvqlTsVi h2K+UzHXpZjtUk13KmHDNtJSC1u4md6G5WHzvZYGgBFtVTZsYnXVOTZVsUtX hokSVKdNjmzSbavrssk7rbUdgBsADiYCDr1ORYelhqxNVS0Gcn+HpbZFX0Ht knO+YPAE2YRwh7kGRS0SdEy6LLUguAFua3eDCb6Pq0HWpCtp0slcDcWNqkJm 6mJBu17WYZCR0iAjgElJr0n2ZjZhgwmo11rGZhMcvMju0KUvT6JsAmCiK0tu KEmszY8qTQ8HNilKDSOpcGbwIrJJcQZXks7PTAhFNgEwiRN4XcUmdAhjfKQf sElU+B1+8A1+8M04oT+ACdNAGP5U7xI2iQ7DgAk34BawCSfgNvzZRvD9RTw/ YBNB+Cs2EYXcEgXfCve/kRwRVClJkEvJcEx1aWpDOenTpS5NJJNNpHEMmxAw UZeRHAqwAxAEoAfQliQpOC8hCAQLtoECeAJggj4INunCLDxQCQjfB8GEOiYA JlgGBhfhBmNtpl2Vj74JsEmbrghj78ggwCMYh0ffBPFksLGGzSZAJVi+Ndmh vqhL2WSmUzUL6nhNV7EJ9U1WB407E44DMhe+CfABa66wjgsNFFhQWsEx7pcK BynisJLH7s7AJ0wBGBIKhlPgTTAmj+CDzYrPmKzKeeLe/SVIZZc7SELRg6bd PfDkYtLkKovkKt/kxcnsh8dkgQBysVcwYsilYOLBJgAmP764/9On5P/ts0q5 zn754nI28RhNcnF/ftFfoPt5XNDpJ3SyyS9fnP2ZVEA9xNnxmCWBZ4FNgAi+ e3nw8vHy8wfzH5wuHK303V/sxgny2I/rj+/vsJtlXYQOxAr4onSCvIeuatIF HxI+ALYpZt/m4Zt4pPspmKB14g7snOEPE36q8EPG8jkgQZxueal1AvqtNz7X x/Vxffyuj5N5MyDJ41USOTlbsh3OmPYmdLaqKL2MhzVdB1Pmw2nr0YwNIQXB BBZHc7bjBQeCCehoyQlgsj6uWxvTDnVrK4pigU1SYwNhdxQf4ZcWT7K3CVF3 xVF3gU3IBMar2QTOl7CJKIRIGBwjuBvND4rhBcaE+0dxvKO5QCW+seEgnxiO d0yYVzrXO5vvJ43lyOI4+SL/XL53dvjtApEXqDjSSxbtXZkQ0JDDd5QkdGnS KZtgQRfgyZvZhE0ouIAzcUyYwYukh/CQhomcaCib3J/QHk0bjmcMbjAhpgno dN74CPBk2fp4wXw6pdu/V7veUTJnz1lw5K4Cm7gKNhrzNxvzt12SdWfmbms+ EMqcIfFetWBEETVvTiW+iSrOlutrzLgDsuT6WfJAIZa8UEsBF9jELhXaSqJs pTGm0tgOTU67VtJpKCYbsMYaYJOvXj7YWb7XZq1pMpQ3VGaY6/Ic6kJjTVpT Q/7CgH5z3L41ZgOt3DOs9ZyzybhdimyCpgmcAVL6tNljtmJgk5WuuldsAudO 5XwXYZP5Hs1Ml2q0VT7cXANbuNk+7dqYfWm0earP1tuoBCRxNpS0mav7XCqA EUASAA0MucNTjdrSZm1ZM+NuoLXRbZX32ut7AFgYcwQgAouvYHFugjB4AnwB lAGsAbcBjMDDFoZHsF6LXbVFYiaMMJ9CUyrW+kKQXVnoVBc5NUVOdSHDJgVN msILbFJyFZvQUi7WUPiKHut5b6h2fTGaJi5VHoAJu3uwoSJZV5ZoqEgFMNGW JmlkCcgmxcmk/KlKEuXhmwCbePgmV9V0AZUkxQSAxBG+0TyvCM4tYehNbuCN CM4dJiMflhwDf6rBBE+iCJvEi4KFId4hPjdC/W/wQu4AlQCbgAThPny3dSIM vhkZepsfeDMl6m51YVJ9SWq9LEVVkqopS2V8k0RmLnycShanuoxNgEdA+Yl3 gU2oewLfJhAKUAbcA5SBtki9VIxxeNKauDwZa8MolaCASlBwP3wtQ02GTQn/ tiVODfzuSEEXWiRs4WQTHL+IcXh2QRdlk0s13n6Zb9KhnO5QzrS/pqvYBMAE +B3+TJbh727Uuj/t2p1+xSbonpBSLnfMBGkFWwdTDMEmXSCgD7yCZsop06EL 3mR7yvVwvQ/T8SB8ySNmDAoWeiHykDmPOOHR3aaYjTy0RzHlDnaHLrZ1goRC GwW/PJ29qEvj8AgmHxyRBQ5/RwPl4vx3xJOLYII1XdinC9nkRyZpwp69eFXe 5FI2YUdO2B6KRwiFNrZiuxI43AQErIFsgjVdOCMe6QBnl3z34gBI5JOna3Sm /B/fIw/hhfRtaZkW0gS2DmbXZb25IO1i8y62AeSBJ29wT1jjYM4JhWRPvjhF 4mNE/JSrarqwDOy33vhcH9fH9fG7PoBNHixYHq04AE8AUg6mjfuTemdtrKGE X597t0uXcX/SBGByMGVhIIXgCRLK0bwd2ASz8HA+YAq6VkY0gCfz4y6zuiAv lQtsQrZGMUGp4pD/SzaJg4tCZsG/yygojh8YzQEe8Ynj+orDfeO4PnEcb1C+ KKgoKqQkjiuNCS0QBUgEPrnhdwoEd4pE3iVRIK+yGB9lWphdKm5XJvfps0Zs hVNNpdiSi5RvddVeotfzJijqm6wN1JOpi6MaIsImGmATd+RECzqeMZLICYtN Hq9Yj+cMj1ZsT9ccj5esp7OGgxHFVm/FQmPevINYJ2uAJK78dWce4MmmK2er KWenJW/DmT2nT5rSxi9Y0oBNxjXxjnx/ABN92m1Tjg/InBtszgsxSzjIJvbS aHtZLLJJl6GoyyiFDdigSz7R2fD4aH5hrKW3SdXTqGjUlpjqcrWV6Za6zCZN /kxPw/qIdXvcDlodNK72AHHUAX1gky5gEwATnG8CQjaZaSq/ik0W+7Sw+8JG VeOwE+ttWBuzzQ44lkZbFkeax7vNA82awVbtRI8FaGW63z4z4ADN3nPCs6sT HdvTPSvDzWNtegATW12hvjxLU5KmLE7RlmWaqvMstRK42KiStWjLbcysRoQL mj0hF4Ey6gpMtfn6qhxNWYaqJA3O2oosXWU2nBvKM+EMTxmqc0GwAMFTKLM8 z0JGMebblRJgE6ZDF9Z0ETY5r+m62je5CCagXhuZ99dplGEQHjt0YdIE2QSE bYT15UTAJqpicU1eJLBJUVLIpXkTSRofs/CAIcAgQCIXs/DnbBLhmxIXBIqP 9EM2EYTc4ATcADwRht6OFfgDmIDEokBgk5QYLpZ1hQfeCvH7Q4j/DQHXx4NN wrnewCZRYXcEQTeSI4OATZSl6YqSVBVRMjMXPgFruoBNFKRPVzwyBeAG5k0Q SQBP4FtDYQIF3RPAE+weDC+BM1onCCawxtAK3INeCabmkVDgVXCPvjrdUp9j V+WDmjWvCroolWDABD0Umjdhx0ywoOt/xCaT/5O8CS7QOlkbMsEf3S7TPouy CZ2fiAYKQsQZkzrBoSRsNgFhAgWfOmMyJvBWJB3PGCVYqYXj4HEGCn4ttGYw gYJpF8y5ANFQNsEECuWOiw2EcbQKOiz/Ozb54GgKBy/SDl0AIOzJ7x7dg9lg AqJhE1rQBWzyp48OPBoIX80mnlPdKZt4dOvyKOXyYBb26EMkEWqanI8v/PwU h5vQeipgELiIXYKBZWD96Vvr7xxOf/viPr2ZXWNGUydvAJA3gAmbUGh8xgNM /nbZhBfGD2K3Djh3TxD68EcKP9s3sMm1b3J9XB/Xxz88zpZswCZwfrhsB04B NsG8ibFUKM8ObFOn7I0bgET2J0zAJiimxMt+PO8APNmdNu3PWrYnDftzVmCT 1dEGOC9NtfS2KssKYrKTwsgGKS44PSGMsok4Mvh/wyYoPmETMT84nn83nh8U zw8Q8/zjw/3EXN/4cN+EcL9Enp8slgNgUhhxt0AYUBQRKOH75HBuSfi3i4FN Ir1lEXdKIu/UJwfbimKb5fG9usxha8FEo4w6Jm9gE48+XaSO6x7Jv28MKsl5 SLk1ot5isQljnRA2OZjUHUzpDqe1x7N6IJTTBSPoaFb/eNX+1kbj01X7w3nT 0bhqb7B2uaVw3plLKruceWuNeWvOXCCUrebcFVvadnPubotkuyl/0ZK2ZMtY deZOahORTYwZXuZcX0OWlykniOAJwyYOmchRGuMoj7NXJXY25HboCtp1hbAl 7rWTmq6P39nbWuwfaG3otMvbzFVOTVGTTmaRZ1rlGSMttStDpvszTUfzrVtj ttVuxVJHLQbh+3U5OHjRVSUGQgH1NmRRNlnrUYFWe1UrParlLtVit2qhRwVs Mt2phP05sMlEp3K6R7MyYpkfalwZb1sYbhpu1/c2KoFNAEwme61whoubM927 C/17iwP3lwff3p9/tjtztj52sjJyujb2ZGvqrb25p9vTjzcn4SFcPFkevj/X vzbSOtZuGGpuGGhUdVvl7caqJm2ZE9ttsXwQFDIIoAcsjDV5SCWwoGskFEbZ +qosQ02WtS4P2cSlLmCC8CRv0qGXduml3UZpj0n6htmLtJoLr9PuwW26olZt IYZNgEoQT4BKcA1nXVky1nQpiuKATcoyeIWJwUyfrgjs0wVsgn268lNJHD4j PgQwBIRIcimbJAK2nM+I98e8CVBJiO8fgn3+EOZ/jicJkXcBT5BNsKyLf/c2 sEmw3x8EHB8s6+JzSTUXsoko5FY0x4sfeCNB6F8pSQA2UZamqUpTlbIkIBFg E01JoqYkXl0iriuKRcqQF8UCYZVm8YvTOOxqLnRM0EnBPl1wD3boQqsFYARe ripNRLqBpzCZgrEUoBIMznuwiVWRa1Pm0amL6I9gwzSs4EJhe2e4TpGELkD/ fE3X/4hNcBIKnOe61Uv9utVBI7AJRk6QTVDbU43wENsIY7SETjbxsDYwIfJw ox9T8zjTBJ5CSIEzycgzo+RPmM5d21MueH+kmOUh8+aEc2e6CRsO0+ZgyDLs FsHUPfFgE3ahF9VV6ZLL2GQaC7o8ku8XdSmbeKbgGTzBLDyWdSGeXJWFR3Dw EJ3eTjv6/uoeCs9u5AU7/P/6+Tm6GzR78t+/fICttNhviCNLqCGCxV1Y+gXP UjZBG+Wr57sALF/D98JE4+EedgSe8gKmUa6q4LqUTS5aPx52Ca31oq4QspX7 Z0XyJji5EqPx7izPGRPnOb2qpgvDPr/1xuf6uD6uj9/1cTxnebAAeGKFxcm8 FdawaK6PN5eLlPnBTXXindGG/Uk9XDyeZW6Yt8GZPJwjNx/OmA5nzXA+grNb G7OuhVGzoS6tMC20IC0sMdI3K4nDOCaAJGExEZwoETdKFB4l4sVGcGJFYURC UCgoRgBsEhaPEoTF80PjeaFiXkiU0D8mIjBaGBAt8I8TBiSIAsV8v4Rwn2S+ b0q4dzLnTqbAryA6RCrmyiPuVvH9y8N9Kvh+lcKAUqFfUbiXTORXJPAuEvoU inwkET4ViWH6onhnTWyXNm3EUTDVUjLdWjrTVjbbXr7YVe2esfiKRBBMznmE 6ceF00wwY4IPgU1A7LwJZRPMmyCYMO4J0ckCEUAKPjyd1Z9N6w5HFYutRTO2 7IXG/JWmwpXmoo022WZz/naLZKtFsuHK22yWbLUWbrXCdem4LsWc42/M9jXn +euzfECmnGBzbqghJ9SQG2YtEjrLY50VYoMsukOdM2ArHcIets6qkdb6X396 +e0nD0e7TUPtOn1NtkKWaK7LNVan2RXZQ001x0sdj9Z6jhfagFA2e5RrHfKZ xtIhY35/Q1YPU9PVqUxrrUtqrk0cNEsWOmpmWipGbEVz7dXLvfWrfcoVUK9q qVc52ymf6awfa64adlWMtdZOd6vmB3SrI+atidbVEdd8n2WiXTfarBlr1U60 G6a7LAv9zs3xjp2pns2xzt2p3scbUyerI092pt87Wv7gwdrLh5sfP9r66NHW x4+3P3myA1fePVx6uDlxsHhvc7JzZaRlrt8x0qrrtde3GauadeWkV3BDKeAJ sInD3VUYrtjqZdY6qUVebK4tMtUWGGskhup8BkxyDNUERlC6ykxdVaq+Js0o h/0t6WDWqM51afJadZIWbT6oQy/pNhb2mIq6jQX9luIBq2zAJrtnK7lnKyNy wL4XkIT5//OOyj5HZa+9opdp0kV9E9qny16XRSMnKKZbVzIK2ATARJbKgTNs wkmZU1GMXBpXXRhdkR8BbFKYKQI2yUwIBRKhvsklponIJ07oyzSmIIqHPyie D+/uTU4A4MkNbsANXhCZBQ8wgtOI4kXBiczs1EiOb1jATWCT8NA7ACaRggAR 318o8Bfw/bgcLwHndnjwTUHYnSi+X1lBvLoqu6YosU6aWE/GILrZhOnTpZCJ sS4LCAXYAWhCms6lpVwoJBT4NmEBnIKtugBDkErkbrqBh1jKhbEUDzZh9xw2 12WTgi5dMbsrF/VNqFcCYEJjJnAGKsE5jKNM92DQpU4KqeDqUoEmOhSo0Vb5 WKt8klmPA6R0KEiTOubh5AWRm9vqyFOA7V2q2d6GhQH9+pgNeAGT7zgIHrGC dv3Fgi4kFJpYp8LkO6UVLO6ixgfBFneUnlZ84eh5bNUFXwXYBD4Dk20BWjHB FXw5fi1c0MA7tUWALDxqvWgC5cPj6Rcn5zPf6VBFWMOVC3p128VB8Ox0PLu4 C88gyibnKfiXB6A/vT54Ef8PP+6oWVRCOIXduZfWVl067gT387hjRzahg048 +vfim+BrES5QOPAdvRV4ObPtP/vvX977jx/e+emzk1++OP3q/Z3P3t744t0t AJPP3tr69Nnm9y+PQZ+9tfMvf3z2ly+f/e2bt//rpw//88fn//79O3RO4r99 Bx/v2a/fA2jAVyRO0MX6LvZD+lHZLgn7BnbwxG39PKQ/PffP7dX69XkxiDBn CClYzfX9R2TWzG+98bk+ro/r43d9II8gkuACrrSqkqyVkeqC0EZ53Naw+v6U 4WzJATcAgKAYNrGwF0cMoaB2Fl3rM46+5srqwoi85OCcpJCUGFIrkhAVLI4M i4vgxkXwYiL40RF8sYgTJwyLEzJsIgiNIwoBNhGLwsgZOAWu8ENAXJ4XX+AT JfITRwUmRt1NEgUk8HzS+f7p4b5ZXB+JIKAsOqw6jlsdx6kVBtYKA2qEAZV8 v3Ker4znI+P7lET4F/K8JHyvfIF3vsinIoljKklulIt7DZkTTVJAEgQTTLh7 jFlENvHAEw8hnpAewgybUN9kb6xhf7yBZuFfw5NF4+kiycVj264nJBdvOZ3S bnSXzTpyZ2w5C878xUbJvCNvu7UAwGTdlbvugnURgMlqY956azFlE0t+oCHb F9nElEPYRJ8TZikUOEpjgE2sFeJmRUafRTaEcwCZcXJn+9PvP1qfH2k6XBsZ btdaFPnaynRDVYqpJm2kufZoof3haveDpY69qcatHhWyybAxf0Cb3aPJBDDp UqW316e0KVKGrYWLnbVzbVWj9uKZNvjp1S711C311C91K+a76qfbyeC50abK sZaqqc762V7N0qBhfcy6Mda0Oty40G+d6TZOtuvGWrSjzQ1zPbaVwabtic79 mb77swMnSyNv78w92pp8a3/u/eMVIBGkEjgDpMD5+ckqsMnZxjiyyfyAc7rH OtqmH2hUdVlqsXsw4glGS4BQzHKJpa7AIgcwkZprz9kEBWzCGCVuKkFVpRqQ TeoymQbL2aAWLeBJPqjDUABU0mMCPClk2EQKumctuWctvWcrvWcvY2CQZK77 7JU9tvJua1mnuaTbUorDNSibNKnzgUpony6QCb5uBYnAa0uT4CzPjypJ4xYn h8IZm1ABleDsRWCTslxhcXaEJF1AIyeIJ1exiVjkh0qIDMIJjNzAm2H+N8ID bzJT4P/Av3tbFOodT9roBQGhAJsArfCCb9/1vRESeAPwhKRO+P4iYQDgCans 4tzmhd6M5PvECP1KJGJVZVatNImwCZFYIRWTvAmrpguErgeyCaUSdk0X9hDG yAlWamG2HbkGwKQqPxKvI5ggm9CaLmQT+CqUTZr10g5m3iIm3zFdwq7jAgxh i00ixB9hPJSLmuhQAlZMMt0eEDEIkjBrKrx4qYBN8Gbgl+luNbDJXJ92bdTK ZhOkBnRP0PU4Y5AE+3RRsYu7MHVCha7HReMDnsLSLzKccb3vlImZILngV78/ 14qfChsR4834ntQiIQMT3WwCFz2Gm6Bv8sHRNEZI2HhyBZu8uudiYy4kFPRN sGMwpRJcYN6E1nSRIPzLgx/cw03YQ+HZdomHb0Lj6hczF2z35GKrXlrHxdbF JAjbiMEaLff4kke/fv8UsAK2+kAosKvH2fHfvTz4/O3t5w8W3zmcfev+zPHq 0Jfv7v/63fv/8af3//r1W79+9+7ff3iflRmBz/OMgYWHDJu8Fhh5Q2NhDzOF lq6xS9rwNoyZsMmOMshVuogtv/XG5/q4Pq6P3/VB2YS9aFMl2aqiNIVhztrY jSHlwbTx0UojMghaJIgksIab0UbBp7AkbG/BtT5lXRjS21RZxRmhZXkRyZE+ ycwMhYQoTnxUuDiSJ47kgxKFoQmCEFC8IFjMKE4Am6UQMUm+B8cIQXejGQmj /PkiH5HQJ0bkFy/ySxb6pYkCcoBK+P6VkaEqsaBBLFBHc1URYbWCgDpRkDwi CNikhOMl5Xohm0jC7+SF387l3ckVeJUnhgGbuOrE/absqZYSoBL0TRBMkE3Y eHJpQRfKwz3ZGtRsMTVdbjwBabCmC9jEjSdEwCYPWGzydNn6bMn6YLJhp796 wSWZsmQBlSy5CmZtOevELskHQtluLQQ2WW+SLNqyVpsLx3TJlE2MOX6AJ6ac EJA+O0SfE2qS8GyyKHtZrK0ivqk+vR/2zI6KAUfFcIt8pLX+yxcnnz0/7GtW D7Zp7epikzzHoS4ENtGWJ4611u3PtgCbnK10AZts96qBTWZdZSMmCbBJLzPf BLt1dWkyxhxSYJP59uqJxpKplvK5jmrAk8WuuoXOutmO2snWqrHmqvGW6il4 hx7lfL92eci4OWHfmmxdY3yTyQ7deGvDeKt2ok0/32tfG27Zmew6mBs4XR59 ujn97t7CW3tz7xwsvHe0/OHpOrIJgMmLsw1YA7Cgb3K4NLg93b046AI2GW7R 9trrO801HUzfYPa8EruyGNjEVJvPUAkKaKUQdSmb6KvP2cRclwFsYldkOZRZ zQ25ACbthgJgky6DBMCk11x0NZswwxZtFQgmHSYZNoai800wckILujAIry9P 0pUlamQJmDepZdhElsqhbAJUggI2Kc8TyXKiCjKE2UkcZBMccXIpm4hF52wS JyRskhoXlpnIi+H7CUJuAZuE+v4hxOcPgCcc/z9Eh5Ph7wAmiZGhACn8EK8Q /xt3/f4Qdvcmn+Mt5PkBm4AEfD9+2G1u8A1RuFe0gLCJsiKzpviVbwJsoiwW K4pjFcUxZO2eb0LzJuiPUDDBgi6s6ULcwDPACLKJvCgWuIPG3pFKLkZOPNik SVfcrpeib4K/AjpsER0TqpHmOjiPttSjOXJeu+Wu7KK1XqipThUbRoj90a2m NsqlqMLWqzIw5oUzPRrQ6ohlc8K5N9uC9VQIJnDGSAidC0+baGEnLnZ0nU0l 9CGSBeAJAgXgA0bXsScwtVrQHAE4Wh4yrY/ZN8btJytdeCciDOIJvIQ2Csbw CKzhHtqbiz178fnhFAjrtRA9UG8AE2qasGcsUsEVdEkARmjrYDriBLPw6Jv8 /NHhj5+cl3LRTsIgdjUX7rSxMImyycUcBxtPPGYy0uZXF4UDGdnwQmuo0InA cizmTeD9nzDteR/Bgowv/OzBD58cf/ne9qfPNj95uvHxk/VPn219eLb63vHi T58++vsPz5FNiHXiLsoCMIF3YL4d+L4eXuqbXDqlke2Y0DALhmXQ98HPzwyX hB/CE3beBOu4Xo1ZdIs2DUY8wZcwH+npb73xuT6uj+vjd30gj3iouT7eWhmp LeY21sbCfhtw43TRjjzioYtscn/KsDfnWBpuWB03DrfX1pdEl+UJM+L8U6ID k6OCkiJDEyPDEiK54ohwcQQvURicILjLKEhM/idtUJwgMFbEzI4nCowSggJA sTEB0ZG+MSKfOIG3mHsnjeuVJwooEwVVR4VqY/mGOIFOFKbjh5hEHLkw0INN pDxvYJN87u1c7q1c3u1s3m1pbJC2UNxUFz9gzkHHBMu6LmUTNolcKjaebN5T bw6qt4ZU28NqBk/UIJKIn9QeTDUcTmsZPGE0rz9hqrkQT54sEd/keFx1OFK/ 0Vk658gFNlluKiTuiTV9q0Vy1Ft21Fu+2y5dbcwjbNJUAGxiyvYzZPkAm5hy /QFPzLkhxpwQXVawLjvUmB9uLhZZS6KNJTEtykxS09VYCWxyr7Ea2OTT9w++ /fTR3LBrZaKtz6WwKiW6qgx9ZbKuIhF2SnszTY/Xe4FNyGj4vnM2GTUXEN9E nUHZpEebBWyy0FEDbDLpKp1urZhthx+dfKm7frGrfqajdqqteqq9drqzjqhL gb7Jxrhta6LFg03GW3UzXZbVoWZgk/2ZvgfLo29tz763v/juweJ7R0tomnzy ZAfOACnIJs9PVuEpYJOj5aGdmZ7l4ebZPvtom77PoehkenOBkEo8gifELqkh +odsYqxNJ2BSn2klYJLtUBLfBNikTS/pMBZ2Gs/ZpM9S3M+AiQeb9NvL+x3k /88Dm6BvAoItMR38h9YJ4ImlJp0NJtrSBJBaGo/zTeT5UaSaKz0cVM60rgIq Qd8EIyfF2ZGSdEFmQiiQCDII6B/5Jv7IJtnJgowEnlhEQiVAJSiAlPDA29Hh /snRnPPIScidsMAbwQGETXhhXsAmWNPF5/kKOLdDAm7wQm9F8gmbKCoyqgri 62VJCiYLr5TFA5sopXFKaSzGRi7OXsQ+XeiYAKogpEjTuQgaFE/gJRdHmdBn PYTjFxsqUl6xiXsiPNs6QdOEVnMhetDZi+w+XTjQBFHlvKCr7ZVjgtNFYQGI AWKzyWir/Co2oXhC2QTeB6AAiABDHwgm2EwYwybU3WCbJsgmONwER5NQbEGU oPegA4KsQUMibELBVsMAR1iutjBggE+CbwIvx8/wiPmi8BIAEDRNKOlQP+U1 HU4im1A8eYNjQtmEbZp4sAkI0yUgGoFHGwXZ5Pvnuz++uA9g8udPjn9mIQkV ZZPXu05d0jL3Yvcq3LTDjp26HriT/5U1XZ0KNvNU1EmhpVwYRcEZi//23ZP/ +AHA4W34VD9//uDL97a+er778+en33y4/+W7u9+/hG/k4Y+fnH374fGz/Zl3 Due/eGfnl88f/fv37wGb0KZbsO3Hsi6gG4ZNnnqAya8XRsB78Bf7oTtg8vh1 6+QtBCgWm5xeqtdnmpyyPZTfeuNzfVwf18fv+gDoQMfkbMmBpglccdWJzeUi ZJONQSX1SvBOd97EgutLfJM52+qodnPStD5hcWqypelheYlBqVEBKZGByZHB SZEhiRFhCRHc+AhuoigoQRgIihcGioUBoDiQKCBWFBADEgZEC/2jBCA/Me9O PP9OksArje+dyfMuEPiVR4c0JAgbxHxDNFcvCtVygwzcIJswjICJMBBrusrC fWQ872Imb5LHuZUXfjuPfycr/FZhlL8qL7pNnTxky5/rqAAYATwhYRN3l2BK JQgm5yVb984zJpeyCWpjQAXaHFS68UQF2h8nlV33JzVuPCE6ATZh8iZsNjmd ang8azgZVa23y4BKAE/m7LmzppSNpryT/oqzwZrDnvJz34SwSQqwiT7znE0M 2b7m3FBjdrA2864uO0SfyzEUCMhceDJ7MavPIht2VQ01VQ84SVnXi2fbnz0/ 7G/RDLXrXLoSY22OSZ6jh71xVcpYW939uZYnG32ny533Z5qATVbaaqadJSMm SZ8ms0uZBlSCbNJvyB13ygBMAE+mm+EHWDVP+i3XrfQqlroVc53y6faa2W4F CNhksqNuulvlrulqxpqu6S7DRJt2rIVoos2wMtgEbLI71XO0MPR0a+b9+0vv HS0DgwCJfP7WPujjx9sAJiR48nibYZNlyiaYNxnvMA40qoBNWvQVdMAiFnTR LPw/75sY5RkAJhZFlo1QSW6jOgfUos1zs0kh1nRdxSbu5l0VffaKPkdlv7OK yFGFeMJOxGPABMAEuwc3lMSDlEVxdLgJskl5JvEIKvNJ3gQEbELAJINbxORN 0sXBwCA43wR0BZsQPImP8E+MIgVdOAs+J0WUJuYy/bhuIphw/G8Ee98QhXpT 30QY5sMJuglgwg25Tbp18QmY8MJ9wrneAu6dsKAbAs6dGKE/sklNcSIDJkyf LlkCrelSutkEZy8im+BwE2QTDJvAGUQHLyJr0FkndFI8rC91TJBZKJvg+EVg k04GTJBNgErYoq2DEUaASqiHgoQCJDLTrUVNdzWgAFUmOpRIFoAVABdY3+Xh m2CihO2SvJog776Or0LAWRjQr45YtiYbEUmQTbDNL8ZPsIMWadXFTCpBG4XM W2TC7x7kQocz0jW76RZ204IzHfUOzwJiwNcCRIJPAh9v0FUFXx2/Cn4AjNID y8BrPzqbe/FgBl6IXcLYPYSph8L2TdhtuP6haXJxzCKbTRBJaG8uEG0gjKYJ gMlfPj35+bMTWsrl3iSf/stXD9mOCbIJu+yKpt0vDZXTFInHrv6qWYf/+dP7 OIWEfYVOGEGb5q/fPP6vn9/9+4/vYlHWF+9sfvHOFrDJT589+O7F0Z+/ePy3 b97+5fPHP3366PO3d+8v9m/PdLx8tPqXL4Fo3mOVkBF2wLzJ3759fBFMLsbk L3blekOTLjfsPKU/Orff9IZSrjN3k+EHjIdynYW/Pq6P6+MfHIAkyCOwQE6B RYsiAdnEWRu7OaTC8i3qklA2oQuPvMn+nHWfzIu33p9zjrXV1uQL8xMC06MD 0qIDU6KCU6JCkyLDkiI5SRFccWSQOCIQhDwC5zghibqDYoX+sQL/WL5fDKNM zp1srne+wLdYFFARE6KM5+mSI8yJIpOYb4riGEUhRv5dQ3ignuNfJwyqEQRU 8f2ATSr4fiV8n3M2CbuZy72Vx/fK5t0uig5oKIjr1qWPOgvnOyuxITCd8E7L t+hERcy5Y/4dLtLKLmqpvAqe9Cs3BpQb9xRuPFGC9sY0++Oa/Qm1G0+IAEwe MA27EE8eLZieLJgfzRreWrQ+mzMd3JMvuQqmzJnTlixgkxVH1v0uGbDJSX/V dmvRkj17tblwwpBqzvHXZ3ojm+izfCx5oYYswibarBBtdqgun2csEhHfRJHZ a5YOMdMA7zVWDzbVfvTO3h9fPhhs1wGb2NVF6rLUhoo0Q1WqoTJ5tEV+uNB+ ttKFNV2bPcqllqpJu3TIkNerzuhgpi4SPNFkDlsLJ12lMy0VaJ3MdVQDm5A4 fL9quUcJbDLTUTvTVY9sMtVZP9+vXR0xb4zbtifb1kZcc73myQ7dWIsGa7oo m+xN9x7ODz7ZnH5+sEyTJgAmnz3bw7wJeihwnc0mq6OtwCajbfpeez2Z0shM OcHIyXkzYTRN5JJ/Pm9CfRM3m+S6NLmtOgmwSbuhoJME4UlBF2GTy2q6+mxl TOeuSuCRgcZq0D1XTR8zjhy2xzRygr4JggllE21pgqIwVi2NB1HfpCJLUMlU KwGYYBBelsUrSucUZAhyU8LT4u4im6CuYpNYgQ+wSXJMMIAJKCU2NCtJkJUk BAaJCPPhBd0KJbn4m8AmgCpwJYYXAGwSxfMPD74NYIJ5k0gmbHI+ezHcixtM 8ibiyIDSgnhlZWZ9aWq9LKme6dOlfJ1NVKWJHnPh0TTBHsLomyChSNO5mDrB tDttKQyidVw0BY9ggsyCURQPNnFpi7rMpVjQhdVcKHbwBJMmWNCF1gmt3Zrs UAOMUDyhmuxUIVNQvSFdcimbIM6wb5vr0y4NGjfGHVjWhXiCU05w9iLiCRtS MBfPFi3xohF4XNByL4yfYF0WDnzHtAhchwW8FnsOAxatjlgx+QJfC9kE35mi DVZzoTuDeOIx3+SD42l2Qdcb8iZXVXNdjJzQNsLoniCSIKFg2ATY5JePj9i+ CW6MaXyb5iao6Fx4tm9yKXF49OnyaDLsEUWhpVzs5r3UPWFdf/r3H99mwOQR nL//6PC7lwffvrj/1fPdbz44AAb5+w/P//PHD//754/++vU77xzO7813v3+y 8NOnZ79+9w59Q0AbwBPmG3nyb989YTyUS8DkDV2F2WzC/oSs+MkrsfDk7KJv QuPwtH8X1ndds8n1cX1cH28+LmWTdk2KpSKioYjjqInZHFbRgq6LeROajmdr d9p4vOTcn7Huzzq2p+z2+sz8eP/MmICMmKC0mNDU6LDUKE5KFDc5khsXFRgb GUAUERAj8o8V+ccQNmEk8IvjM+L5gqQ8//KIu/JYTkOyyJwVZ8+MM6cAmwjN 8XxTdJhBFGwECe7qOH61goAavj9lk1K+r4zvA2ySG3ojh3Mzn++VK/AqjQ8x l6b06DOATeY6KnCKIiwATzyohDbgImBy7xxM2NkTz8qufgUI2MSNJyDF7qh6 b0y9P6524wnR8byelHUx2ZPjWd2DGd3ptO7hjP7xnPHtBcvZuGatVTppyiBs YkxetKbvtBWe9Fce91XutEvXXPlrLUWTxnRLboA+wxvzJtoML0temCHrLsMm wcAm2lwusImpNNadNymHrTJsj4db6p6dLH7y3v3hTsNUv63NXGmoyTLJc0y1 6dryxOHm2uOljqP5VmCTrTHbRrdiobliwlYMbNKtTGuTJ+HgxT5dDoLJVFMZ sMlKTz2ACeDJUk/dap9qqVsx20HYZNJd0zXXo1oZNm1POUGb4y3UNxlvaxhr AWmxpmt3qvtgjgThn25Of3i0ijVdGDahSRMglE+f7sLF94/P2QTzJjO9NmCT fqeym5nM2GGqtiuLaU0Xnol1UicDMXhy3qeLadX1pryJVUH7dOUClQCbgIBN EEyuypvcczLdg52EBwfc6rF69unCvImxMgVF2URZFKcqFgOb1BfEEMckg1eT F3k+iJAp6MLZi4RN0gmbpIuDMWwCDALnq2q6YvjeYpEfsElqXBiACZyBTXJS IlJjw+NFwdHh/uGBt7gBxDcJ8zvv3AV4Es0PFHF9gU1AwCZRoqAIUaCA7wcC KuEG3xBy78RFBpQXJaqqsuSyZHlxAsgjC38pm7BLuSikIJ7gFZzGCELrBM6U WfAiu0kXIAmwG6ZyPNikk3FMEEaoVwKiI06oKJhg+RaWdU11atAuYbPJdLdm treBFnEhm7CNErx4KZhQNsFX0SszPZrFe4b1MdvuTDOdb4KTTTCBAkiCU0io Y/LIXceFU0voQwy/gyiP0FA8PoWZFAyhgBBPXp7OwhV8W/wSCCm0tAy/EFaC YbgezjgtBa/TKAp28XpxMuMBJlf16fIwTdgBE0ol2KcL1nj++p1N0FdvbwCS IJtgny4Mwv/80eFPrAg8TT0wu/enHhts2pXrKiRhV0Nh3y2Mz+NLrjJNaBye bv7ZpVxY7sW84WPsrAUfEs4/fXYCbPL1B3sfP1n95OnGtx8e/vL5o79+/fa/ fvX2X74kfbp++PjBnz46+Zc/Pv3bN6SfsDvG8ozWdMG7MSVel7MJ+zu6+CER Rug3+2/uSfduw+gJnQ6PlHdp3oQt2lUYF7/1xuf6uD6uj9/1cbbUeLaIcp4u OB7MO+Dcrk52ycUNRVxDiWCpR340Y4Xrx3Omk3kz6GjWdDhjOJwxwpUHCxa4 AgvQ0ayRuW7YnDPvLjs25yxb8469pdaZAX29LDYvPjQ9MjAzKjQ7JjxFEJrI Dc6I4MdH340W+MVHBCZEBMULA1JEQSnCwGSuT2q4byrHOyXkdhbHWxYdWpca 1ZUa25Mu7kyLbU+JBrWlRDUliiwxHEss1xzL0UcGa4RBakGgRhhYzQ+qFQb/ H/bu+6utO1sUeOy4YZsuRO+9d9G7hHqXQHRRJFTpCNF772DccU2Pk9iOnTZJ 7JSZyb3vn3r7nC2+PhY4k3vfW2vmB87a66yjg8CgrLnrfO5uEFWBV0v8LxT7 nytln8/zO5vnfyaPdSYv4ExJxAVZTlCngJrQNdpRjrO5QBnMycBvWkjoWOyF ECz08OfttXM23qwVYMKds9UyY56OWXPNnIW7YKtd6hEs9Qjps2ClT7TaL14f lOI8YWpH/Jhmd1S561TsjMgh4OLaqOr6mPqaQ3FjVH17Qrs/JFvoLHPqckbq soZkSZP1WQuthRvGyi1T1ZK+GK7Xuspnm/JbC/1UaRc0GZdU6RcVKeeUGV6K DC+SN5Fls6Q5AZrSKLCJSVNka6ywNVZam6rgCfmj64tP7m326uXGOm6jkKOp yWwScep5GeqqJGtDxcpw4/50195U59JA/UwHd7ylAmBilWVapBmdguT22kTa JlkAkykDb6y9Cmwy082fMQvoIV2uOV2T3YJxI39IXzNuEo11C0cMgim7Em2y ONg6398yZdONGJSDeinYZLhDOW1rBpssDnSsO83XZgYOV8cfb8/e357C1AkG sQk2ntzbmjpYHFobM88NtI9ZGsAmwwZNb5sMeGJpFBrreAATMj0YL8Am9PRg KjS8AmITDS+P3mySqarJwgCbaKtS62vSGngZzYKsNlFuuzS/U1bQKS/oUhQa lcUmdYlFW2atq7DVV/ToKnobKvsaq3obKuz15bb6MpuunO7uqcIVJzY6elpr rPQYYazmwkb4JmE2WQePXfDYbyIqjRYUR/KLoqgojKotjML5VHTDRVRVLjyB h5VnhVVkhRdnhOUnB2bG+iZHXI0P9YgPuRQfeik9xict2hvuJIVfSQy7DDdj gi7EhlxEudCzvK4mRXriJpTUGJ/sJHZuSlBarG900AVKJd7UvnjW1TNsrzNB PmdDWRejQj1DAy8H+l8MDrgcEng1OPBqEPtyCGWWS6EBFwO8z8aGe5VzEnjF KbyiZHF5mrg8lVpxUpwgLk6QliXKy5OExfHCErBJoqg0obYwtjovsjwrlJPk X5DMgoCL/EQ/CLguTGGR4i50CmEIkASiOC0AEytY+kXyJqSgC7QCZ7CJTpTb LCsAm3Qoi4xHPMHUidtsLkQKtp9gHRf2mGDzu5tKxkwKCOwuQVyQcEuX/Ekm hVnKxQzgyWyfFqd14QoSdAHmTUiDPLEJc98itpYcs4kN4u6a7XC9595G370N uN9/d6337mrf4drAg83hR/TSQ0DEzSU7FmgdHK1HoX4m/WNBJfDvUt3xM0aq DGx9EL7l0fbI7eXew3X4IUMHc5abi/Y7K333N4aoRAk9EBjruLCUC+iBdwAg 5JqQhDSbkGouVAm4A1vdySRhCKzpwiIuDFAJ7jQhAVqh4qOtlx9vf/vp7t++ uPbDEyrIUF+3YGZMSMM7nYx4gCVY5Bkem0fI1g/8Frf8iKtWCi7gOR/O9IXr sR/+lae3Xj29+cvTW78/v/OPrw//+fLer88Pf3txD6ABBvnh8+s/fXkL3AEA efnRLhgEAq7h/o9f3Pzbk5uvn937+zcP//nd4z++/+Af3z5EGdEr5vcAX//4 7v4/v7//20uXJsiIY3gP/ubwt5BF9mRVClk9j3/jb8e23pP9JqSlnYwshjuY EGHuNPnx872fPt/H+BniCRWvv7z+y5c3/t0PPqfH6XF6/EcfN2Zar0+3QABP ACAQe+MN7aJEsImE4y8tYI11VRGbgD4QIHjecipRJUyYUDYZUa1P1K+MalfH dOvjzTP9dTpRdkFSQDY8/0SzsqICEoO8E9jemZFBcWFeMcFXkyJ8UyJ8k4Kv JrIvxfudz2BfzmRdymdfro5iKdIi63MSGvIS+9Lie9PirCkx3QkRXXGh+tjg 1ujAhnCWLtxfG+arCvVWBHvKgq5Kg64Kwv25wd5l/h5F3ucKfd4vCThfGnih gH2mMPD9PPbZvMCzNYleel7KaCvVV4IZEIgTJwMzRgTzMcAmyJN3BaiExKKd DzBZ7hUCTOjUiZTqOsFVjA7F5pB0a1i67ZBh7AzLdoakAJPrThXEAbynRzDX UTrakOtQpEzWZ4NElttL1g0VKx2lwBM4zzVzOkrZ2kwPCDVtE0W655FNqLyJ NJslyWYpiyPAJmZtMTwtm+pKTfDk3FzzYGf656/urTi75wfae1rEWm62pCSR nl6bbNGVrzqadyc7IJYHdQtGwWRrJQ4QhjAIU8AmBlGqXZU73lENJAGYgFDc bDIF39UtmOgWODq5E2Yx8MRpEMz0qtdGW8AmqyMdCwOtrn6TTvlQO9VvMmVt mrG30KO6uvem+u4w+k1AJaQFHmDy+Z31j64vwZfurI+BTTYmrIvDXU5TPdjE YdSCTcwNApOODzbBOV3MdngIsAn2wmu4BQgTOnLV3BwCE1x0oqlMrqtK0dWk NfIyWgTZwBO9OA94YlAUUVsXVSVmDWUTCIAJ8ASDugahNFRYdeWWhiOhtNb0 tnEhcPeiQV0CNmmT5jeLchoFWWRuMLGJlFoFEikoiRQUR4NNagsjcbUHPG9X 5YZX5lBB2SQzrCwjtDQzvCA1ODvePzXKCxiCATCBlymRnilULeWRUEI9iE1w 1DCmWlKivfJSgzjpIRnxfnAnIuBcwFWAyXsBnu/B2e/yewFeZ8EgIWyPIBZt E/aVIPaVwIDLIJSQgItok7hw77L8BG4RZRNhaaqwNEVUkgQ8kVCRIKU9AiEo jofgFcSgTVAlbkFUwgz0CFEJBumXZ+ZNcJAXnIlNILAXnuw3IRJhzhDGNhOE iaNLgjbBQIy4BbHJcV8cjxNtcjwG2mvhZ4JNVukF8WujbbgekUwSJkjZP+o3 Yc4QPliwHByr6aJtYqVtYqdtgkGxBWDycMtBaq4e71AdItT2kzkTmRiMCRR6 PyNlE/gdqJ+80gffCAwBj9xd7YefA0i5tUTdB7bAl3CLItMgpM2E3HS7T1pR cIYwlnUxl5iQHAqOC2bC5LhNXOsXP9kBmOC6Q9xvyNxjwgx8DocncHgnfMsL GjVff7gJFzRtXNsSMdPhbpAjm5BJXK4dKC8PX8PDPx2vgDz4zheHf395D+L3 r+/+9vT2r1/d+uXLm799TXHj95cPfnl+CCoBoXz/2QEJIAnchACz/PTl7d9f Pvo/P34MATb5/Zv7KCmEw+/fHP7xAzDq8OenB0RbpGef+UtiKoS5aZG0/7vN ASBYOypju3XUoXMbhYI5FLeZXT8/ufYKJEjD5KfP9pjx737wOT1Oj9PjP/q4 OduGPEGbUAvfx3R6YQLYBGAizvdztlfAnWuTTQAQ9AixyeaIgniEGSsD0i2n Zs2hXnfUrTt0C/31Nl1lcTI7O8orLcwrNcw7MdArnu2VHOJPrXcP9EoK8UkN 8UkL9MxkX8lkeZSG+nCjAzSpEe2cZFNJehcnsTUzqj8lricp2poQaYoL64wM ag1jQTSF+TeE+GqDvdVBXqpATzn7ipTlUcm+ClHK8ij2v1jCvlQceIHDOpvP Opty5b0EjzPF4ZdbqhOdrTWz3ZLp7jetJZglmbcLqDjOE7tLJRBMp5xgE3in lTdn4WICBa5BKNgRjzO7EClUDmVI4lLJiJy6GJJsDYivORQHI0qIa8Py3X7x cnfVeFP+iDIVbDLdkAsYAZKsdpYBUoAn8y0FXeVB9dlX6rIuazIuKVPPK8Em 6SfZhJ9q0hRZdWVoE0tj1cPdmd9ePJ7qaRnsVBq1Nc3igkZhfj0vA2xiUBet O1sBJnvwHNJfBzYZby7vUeYATOyKbKMoVc9LMIrT+rScic4aYpNZk+BEm4x0 1U5aJGCTUaNwrl+7Pta66mxeHzUsDemnbLoxk2bEoBzuoFacTFoaMXWyPGTY nui5veR8sDEFAEGeAExw5SIEOAUCwHJva+r60vDmpG3JYRizNABPhrrUmDfB 7fDYCw88AZvohIV1fA7mTY7bRFWTo+Hlang5qBJFVQZcaCqStZXJ9dWpYJNm flarMAdt0iUvPG4Te305BNiEyp40VVE2aajATfFgE1BJn54HZzKkC2zSKskD mzQJs8kAYRzSBTARF0XziyOEJVHCkhiwCa8gglcQBTbhciLh8RttUpUbUZkd DjwpyQzjpARlxfkBQwAgCaEeEHCdSlVReqFNMOJCLsWGXCQ2wT3yONQrNyUQ eJKZ4J8W65Mc5Rnid47tdQZt4n/ljD9QxetsMOsi2iT4bZuEsC7CV+MjfMAm NUXJYJPaokR+McAkSVySBDYRF8dR2+050UASflEcBNoEeFWYEoDpEmYC5USb FCT7kYYUkk8h/e8QmFTCIcN4LSlPrBfmAEwaJfm43wQCeIgFXaSUizlJuL+N zxwXjJ0mJ8IEAlvgCU/+XCh/0SZ9bVw4z/Rq6BXtLSAU4AmBCXOe8Il5k4Mj rZCbtC+sx23i6lvfHEaeYMc6tp9g2wheYLEW/KPwY3FXI5ypQq85MzAEVHJ9 HuRiQ5jABfIEAn4sKgPOZMUJ0QdzZteJs4VxVBdJoJD97zgr+DhMSKfJG5V8 sAHx3ae7mC5BXDDXlLwr4Ikd3o8lVV8+WIF4+mgNkPLdZ3u4mR3TCm4bTNwG YbmGcdE8QaGATV7hehQgydd3KaFAPKd4Ajb55dnd18/uAkx+/foeXPzw+fVv Pt777tNrmCsBlbym3wAXr57e/fXrB//87vF//+0jiD++f8xogbn528u7dNfJ 3dfPb9BN8XeZfxr+higp/C7SS8KcIcwsAzs2RfnWicHcwIg8efXFwesvriNP wCM/frpLtf98vP39R1v/7gef0+P0OD3+o48TbdIqiG+ujZUXsSUc/xF9+c5o Pdw8MUUCVDkem4OyvRH15iBcqDcGNCt9dWOdQkFuVGGcX1aYV3aEX1aEf0qw d1KgV3qwfyrbJ8X/ajrrKifEjxsdLEmKrEuJastJNBekWjhJxszozuSwjqQQ W0KUKSasOzrUEB2iDw9oDvZrCQWY+NVRLfBXlXTIWB5iv4tFvhdKAy6XBV0t C75aFnK1gH0+w+tMmtd7ad7v5QWfk+QEmhV5o3ou8ITsWHTZhG4tIXVcbwef qZI/sQmQhMSMqRovmJVdxCa7TgWp6aKCzpts97t4sjsg2bTzF7rKwSYORcpE XRbYBAI8AjABoSy2FQFV2ksC1OkXwSbaTA9V2gUqb5LuKUv3kmX4yDJ9pdn+ YBN1aVQLP7VbXWilp9paGiqtTdUfHiz88d3Hs/36gQ5lh7IcYKKuptb/qauS 2uX566NtAJP96a75Xs1MB3e4vtAqy4QAm5ilGR38pG5J+oCuEEu54Awxbaw9 0SZOA99lk27R/EDdxngb2GRjzLA83D7b2zRu1qJNhtoVU1aXTVaGDbuTvcQm 97encb8J2gQndAFVIMAm1xYGwSZrY+bp3lawyWCnqk8vt7dITDp+u6qKjOpq FBdra6nkCO43+XObYLMJZZN35E3AJgZFEdrEoi0HmzCTJlRxVxPFkx56vwlV 08UIsCEO6epUFqFNIHDxoqY6BWwiK42TFMeICqOYeRM6dQIR7eo3yY+CB3uw SVUO8CSiKC0kNzEgPcYHYBIXfDE26AKcgSRp0d5Y1oVggXNM0PmY4AuAEYQJ kCQ1xhvP6XG+GfF+YBOMxEif8IALwBOs6WJ7n/G98l6g/4Ug1iWwSVDA5UA6 QCihlE0uvLFJIWUTbmEC8ERYnIg2ERbG8jlRPE405k2EJVQOBf4KEFZRKtvN JnB9ok2YyxkJUkgvPLWSMj8CbUJnl6iXotL4OkF2k5QDQulSFWMvPGk2AYm4 2QQ7TbCIa0AvwKnCYJNxs5KSyLFeeNxIgjxhCuV4/HWbDHbw4TxmlpFhwjin i5kxwS54zIyQOi5MbRCqEK3Qs7lOsAld2TVwb32QGTjI68HW0If7ox/sOXHL /P5sN/wO1+mMzK2VHpwJtjXRdTAPMrLvzZh2p7v3prvhDlzAzYM5+E2swBPA DtIDJALXZEgX3sEECsmYMMu6jnfEE5ucmDHBNhMSiBQ3m0DgMhHmnvcTA3MQ wBDgDE7KggCYfPvpLgZZSoIlUuTxnjlr15U6ga8eCYXKnuDj/dNbEL88u/37 13epgq4X9/54ef+3rw9/+vIWyY8ASSC+/+zgb09uHKVLbqFQfnl+79XTw1dP 7/z+8sF//fDhf//44R8/PIJ/FH7hH55QayX//i38YkAPrLl6M2WL2b/PnH5M bjJ/ebf+fUaG6PbxXngyT5jZ9v7qi+u0TQ6ITf72yc6pTU6P0+P0+JfHiTZp E8Q31ESBTaQFrOG20k2HZmNYjf0m+5N1mECBgIvNEcXx2B2SHTjV2wPyLYon qvV+7ZxZ1lCZWpMSyInw5kT65Yb7prGvprKucIL8ikMDSsMCQCXy5JjGjMT2 3FRjTrIxK9GYHtOVFNYZF2SIDeyOC+qMDdFHBbVGslsi2Y1h/nWhPnVhfuoQ b0WQpzTwiiTwiojtwWdd5PmdL2Z5FAd4lAReKQ2+WhJ0Ocvn/bgL7yVdPVMU cVlZGNktz3PoayaMwkmjiBq6ZXP1vNPJkTfr3Y8F/3icaBP0yLyVh4E2gQvs QAGegE2wsmtvVIkZk61hqrgLbLILPBmQoE32BqVgk0VDxUQzx6lKG9dmTuly Juuz4bzQWoh5k5nGvJYCX0XKOYBJffYVyiZpV+UMm0iy/MVZ/pg3MWuL7Y0V 1sYKnCEMKvnqwfbqqGl93DJh1Zl13DpeNnZkd6oK15wtOxPtu5MdC33aaX31 oIYDMLHJs3qUOXZlDu43GaI3mwBJcPciVdZ1ok1I3qSbypugTdacXSuOjrm+ 5jGThq7pUjg6VQCT2Z7Whf72tZHu/en+uytjj7YomNzfdq04wXXw2BQPAXcO NydwLzzYBGcIO4xaXA1P5U00NXplJQ4TBpvU8TkAk79iE7e8iZtNOqQcUtZl UpeCTSDs9aTfhCru6m2s7Guu7m/jDrTX9ut5VJtJU6UFPv+myuN5Eyzr0tVm aGtS0SbiomhhQaSwJIpfDE/aVMsJLZRoXkEUXbAEPInGpENFVjjYpDAtJC+J jTaJD7kEMIFIjfLCsi6qCeXoZhT7/ajAc7EhF9EmSBLMlSRGXEmO8kSeZCWy MhICEyK8w1jnASbEJmy/82CTIJZHIAQNEziHBlwK9n9jk+rCJLAJj2ETcXGC qChWUAB/QhzARFSaCDaB63flTf6lTQhPcIM8zu8iNoHAxhM4o00aJfk6UW6n qpj0wpOhwZg6OW4TbIHHvAkYBG1yQphlyJN/KZS/bhPyZuw6WXW2uI0RxiFd EMykCdMjpOUEbUIvajzBJofrfXfX+u+uUoGZDohr82ZsaWfuZzxc78edjHD/ 4fYw8IQi0pQRVAIeWXPq4QyxONgENxEmN+hCL6zsQphgHFWOOZmt8RiAEbxg NsLjmkWs5kKekJFcx2FCrsEmlEpce+F3gBUQ4Ass6CKb34/3m0BgTRfuHGQu iMdnePgJJP9CAHJ89O4bm3z3AAJ5QgU+6sPbnt8Bm/z67M7fn98Fm/zXNw/+ +O7xr1/fA33QHSU3IOACAAJBYALXvzw//P3lw1+e38c71Mtv7qNN4G989nj1 5cebr57d+P0bamEK7Yjb5LeF9+Dvj78n/rFALfhGtBvp60ebnJQ0uX2cJCfC 5IcneyfmTeC/CPx3+Xc/+Jwep8fp8R99AEzcbALRJUvVVUfKCgMghltL14dU EIxeeFfeBC4QIxsOOcT6sAxjq194fUy9MyTbHlRsD6q3BupWe9R6bmZNgn9u 4CVOiGdekFdOgCcn2Lc2IlCZFKVLj9PnpBjy0jszkzrSEwwpMe3x4frooI6o IGN0sDEqyBDJbogN1MWwtVEsVYSfIsxHGuYlDvUUhlwVhFzlh1zhBntUBV6s CDhfHnC+mO1R4H+xMOBSUdDlAvaFTN+zaV7vibMjmmtS+hsqxg3CMYNgzCic tsmWB6RLfWIM4IlrNtdJNlnqo2KxV4Ad8X+eN8FSrnc1npCuE6KSzSEJxM6Q FGyyOyjdH5Zfd6puOFV7A5I1+FGdZdMNuaPq9DFNBgQgZbYpf7GtCIQCNmkt 9FOmnq/LuqzLuUq1nIBN0tAm3sQmUk5Ic20K1QvfQLc/wDNzu2BjwvrV/e0l h2F+oL1fL9Vys2rzo+mO7KTuupKV4cbtcT3EYn/dTDt3qK6QUokimwraJiZp xkhzGbaZ/LlNHJ08V7+Jkdlv0rk0pJ/paUSbDHdQNpmxt2Av/NqIifTCP9h2 tZxgvwnyBLfD0zOEp2+tOjcnbQtDnTN9bZP25lGzbrBTZWkUdmlqIDrV1Zg9 wZoushf+X/ab4MCuP7EJlnWBTTB1gjDBoFInjZW9TVWgEqZNMMjWRb2M0yLO bRJmN/AzMW9yok1cvfBURGMvPF2wFIm98GAT7IV3q+nCfhMILOgiZgGYRB+l TuLDPMAjIBSACQRcEJtkJwVkJwcTnrC9zrA83/P3ZNjEn2ETtssmCZG+lE0K kmqLU/glyQKIogRhEcCEHiNcHCcqTRCXJUGATXgFMfD7l2YE//V+E+IRskee 8KQ0IxBb4JEndNlbKK6Sx5quJimnS13CXAePEiEt8Mx+EySJ22Cud9hEDjwh QiE8OR5/3Sb4Zlx6MmVXLQ03YSM8c78Jju26dlK/CcmkMDcz3l6xvKvf5HDN FYgU+IHwk+En4AAuXM6Iy9/JZGD46vqYHgxyfcEGMJntrV9xtO5Od2+Od1I3 5623lnrurQ9iqRhgBAvGUChYysWs78IsCQnSZoIkYQZZrUgYcjxjgkO6ACY/ fLyNM4S/ozMd+PiN/SZkHpdbkOYLMpAK3n98BTyWQjFFw0SKe9B5E2IT1/Cu b+hmkxeHvz2/+zvNE0oo1Ijgx7+9uI8YAZhAwEsIUuuF5V6/v3z024uHqJgf PgdD3cL0DfyBT+4tfH44Dzz5+el1sAlgASSCgX8I6bjBvw4+lhcfbX3zyQ4E KVqDL/3G2HfPTLvQH4v7zkqiFTeenNhvgqmTf/eDz+lxepwe/9EHaYQnvfAQ 9vq8Jl6MojhQWRI0oi/fdGi2nXVu1VzYb0JsgipZG5KuDkqW7DUHYyrqSXtI sTes3hvWbffXWSQcXoJfHut8eYQvLz5EkBSlzE7pyEkx5qe3ZyXq0+M70xM6 k2O6UmK6EiK74sI7o0Law9j6EFZHCMsQytYkBGoSghSxLHGEtyDckxd2tSr4 Uk3olZqwK1VhV8pCLhUHni8MPFcYdK6Q7ZHvdz7X91yO7/vZvmeKQj1E6cEj LbyR1tqxLtG0WTbRLRo1CCYtEsojNiCGgOwuIeOC3WK5X0R4QjriT26Kt3Dd mk0wXYIFXcyaro1BMZCEtMOTmi6wyc0xzZ2JuoNh+aadv27lLbeXOFVpw/Lk EWUqIAVIAjYBoWAvPJAEYNKQ66nJuKRIf2MTaYYPsYmuOqFLkW/VldmaKu0t NX16/saE5enDne3pnv25/sWhjhZJkbo6Q1uTBs/GprrSxUHd3lTnzkT7Qp92 toM3XE8NELbJs8ySdDM9qsssyxxrq6TquLr5WNb1rpquIX0N2mTEwJ+yK1ed zWgT7IUf7VaPGJSOTuVwh/K4TT7YmXu4M0tgQrYufn5n/dNbq3RN1+TB4tD6 uGVxuAtsMm5tHOmuw9XwqJIOdTXCBJfCg01UNTkn2uTEOV11VSmk2YSa0yWh 5nSdaJP+phpiE4onjZX2hoq+Ni4EVdbVWgNhb6m2NVcZtS6YYNIEVFLHTdPV ZrjZRFQIMIkQHOs3wbIusMlRWVdkZXZEyVEvvJtNECakHR5uxga7NjOCUEiA U5AnmEMBnuSmBOamhuWlhafHs6ODLwf7vh/gdQZsEuB7Dm3C9rvEZnmATeAc xvYI9j/v70lskgg2EZWnCUtTwCb8wjiwiaQkXlqaIKFhAiEojoffH2CCSZMT 53SdyBMmUpAnZJ5wWWZQVW4Y1nTBGXvh5VUpDeK8Fnlhq6IIu+CxEZ6kSNxG dWEM6AU4pAs3LVI7Fundi//SJn/Ck/9F3gTOE1bFwmAD2ARVAmrALSeuHYgn 9ZuQWcFwgXdotpyQN3mwRQ37xX4TiPsbQxCH6/3X6ZKtPXqhCbzh44NxiCe3 Z3AsMNgE+ANWurloB9GAR+CTmbZrr82awSNUywldzYUNJvBj8YwZE4IUCCzl cpvThXVcWMqFCxYBI5gxcSvlOrGaC0u5yEb4nz+HZ+MDsAk8eGMvPMaflHJh QoFUN5GMiVvJFqn7wud85iAst+Zx15yuo3ClVI564f8B8fUh8OS3p7dfPb0N DPn7Nw8RICAU3Lf4+8sH2CNP7v/24sHrZ/cwsQLx+tkdHCMGv8zTRytf3F/8 +sN1oMHr5zdefORq5MdVKdjRD78bfBovP95Gr+FfAS+fPlrDNwBAcDoZ+VuI ZTDIKGbSDs8cKUyE8tOTfQITvIB4RYPl3/3gc3qcHqfHf/RxMFlP4tpE/bVJ 3f5kQ39jga4mUloUICsKGDPWbI3p1ka02PlOtZOMKLAjHlUCHsFAm6wMiDdH VNtOza5Duzus3RvU7vdr9/u0DmlBc3ZYa0a4uSDJlJfQnR1nzok3pEYb08Aj Ue0J4a2xIc2xQS1xwU1xwS0JoU1xQdoIf02EnzbSvy6KJQ/1U4axZCG+okAv YbC3INSHF+LFDfGqCfGqDvOujvCpjPAuDblaFHgxN+Rsiu+ZBM+z2cEXpPkh Jnmeo6V6uls03S2kZttSz88CvMA2ECp6ha55v73CxR4BFXY+xJvERy+OEX4L LPM2/tyxmLVyMcAp8xD22gU7Hz4TKvrpGHAFtetkWEqtO3HIqIWMdFCDhUcV EDtOBbzcpN4jWbNUT7bkD2nSBpTJQ6rUycbcZUP5THP+bDPHXBMOMIGoy7pc R+2Iv6rM9FRkecsyvSTpnsJ0b1GmnyQ/WFUaZdIU2xqo/4+xvYVnaayZH2z/ 9pMbB4vD49YGe7OoWVwANmkS5qgqkzqUnKWhhhvzJojV4capdsFoU3Wvutgk yemWZJvluRDDzeUjrZUjbVVjHTWTRt6EkTdu5M2YRDMmaiP8lFE4aRCOQxgF I50CZ5fQ2SUaNUombcr5gfqVkealodb5/qYpW92YSTViUDi65I5OxWxv81xv 80K/ft3ZfX1u4N7a2ONt1+5FJkw+u72GM4SxpuvawuDamHl+sGPC1uQwaoe6 1P3tCmuTyKDlGut4OKSrUVyMjfCYNzlavPjW7kW4T6dOsiFI6kRdna6pSa/j ZTbws5uEuS3iPACFXpxHIUWaZ5BzupWFJlWRWV3Uo6uy11faqMaTyt6Gagi7 rgqffuExuKeFh8tNrE3VOEC4XV5AbAIkwTldpBEeYCIsiOQVRAJGhPQudTjz i2J5BTEQXE50TV50dW5UVQ7AJLIiK7IoMzw/LRhMkRR5FfeYQKRGeydHeSbT 2ZCUKGpWcGLElbDAs+FB5yKDzsWEXowOuRDGOhsRQEVsyMXMOL+cBFZGrG9W nF8WnBNYOcns7CR2SrR3JPtCkM+ZEL/3Q/3Ph7IuBLMuBftfCmZ5BLOuBLGo fhO2z1m2z7nUeHZVUQq3OIVbmFRblCgoSRIWJwoK4/mcGEFBtLAwRlSSIClP llakCEsSwCZlmSHFaYGkoAtrukArEJxEKgqSWAVJAYXJAXgzPxEwQpEkP9EH 0yW4Ph5nC+OoLkyd4MAu+PTAJjpRLsBEryrp1lVQ0VBhba7p0df2tfN73xFY zcUcI+zokgBYMIcyaVWPm5UYExbVmIkyC1zAy1ETVf2F33LUkyKD76WaVrql DqN4GNBx1BdPrUHpEDg6BCMdQidEpwhj3CAZ7RLBHbiYsSoX++tXhpqwpgtU sjdn2p837852b052YtfJtaNhvxi4fAT3LZIFJXfX7ACTo+ihG+H7H+0MU2mR zTcBdri72n97uef2Si/44vZy751VahjXvY1B7EwHO4Ag4P7WRNf2pAF4AhJZ cbSujrTdXOoBqjCTJvBmzI+gR0gFF6npctt4gr0neE14QtIlbjZ58eE6PIE/ /2Dt+eNVOMP1i482Xn608d1nO99/tvvtJ1vffuLabPL953v4EI4wIYkDt1Iu oglMrJAECkmLkOlV2LGCkMEndre3MVvIX7248+rl3V++vffrd/epoBMo1Dup uAfx9xcUVah4M873Ltw/ys7AP+fK1NCIuEn/nndeP8Nf/k0VGT1A+BpWrx2l h248ubf04sMteA+29oPRACAAkyeHSzi77KuHq19/sPnfP36AEsExwjgrGHtS cAQxDvXCDwS+C76X7m25BiDCD430rTDnCbz64jrmSkhN1+mcrtPj9Dg9/spx baLuraBsoutv5OiqI4T5vvxc7+H28s3R+nVn3Yk2wUQJBj5yL/eLVobkaw7l 1ohqa0i12afYtMk2zdJReVFzZmhHeri9INGel2DPTTBnxlhTY0xJkYb4sA56 LHBLVGBjuL8u3L8xglUf5qcO9laFeGtCfSDAJupItiYmWBUdKAtngU24wZ7l bI+KoCvloZ5loZ7FQZfzWOezfM6k+r9fnnBFUxplkOUMNpWPd/ImDfxZs4gK i5AOAcYbmzBiude1lAR5gkExxPqXgmkTDODJUh+VeSGBH9T6IBW4kBF3MpIA qtDr4+U7gJRRxf6QZNVcNdGcN6xJA5uM1mfNtBbMNHPmWgos3IiGXE+I+uwr 9dSOeMom8kwvCGmGlzjTV5zlL8kL0pTF2HTl9sYqakJRM8/eUrs+bv75q3t7 cwNdmmpFRZqsLLlBkNfAz1KUJ+jlectDDbcWLbeXrFtjbRNttc7G6j5NqUWW b5blWuR5ZnkewGSsvWaiq3bSUAs2mTILZmzwCVPr4NEmU0YRls+BTRwdfOoB zCAat8hn+7SLQw0rDv3iYAvYZLQbHuTkwBOnUTXX1zzf37I02LExaro+139/ fewDOmlCeILVXJ/eWsWWE6ZNFoY6MWkCNunTy8n6xdajAcKuzSY0T060iZrr sgmzrEtVlQY20XIzdPzsZlEe2qRdyumQchgwKbZqS0AlYBMQCiIFYNLTUE1s 0tsKnzkXAnhClsIDT1rEuY2CLOQJ7jfBxYuYNxEUx4JKyLLC2sIYeJ4/2SZZ LpsAQIhNKJIw1i9i+VZkyIWo0AtRwedjwy7FhXtEB1+A90ey348OOp8e7Q02 AaGATTLgOingqC+elRLtEx3kEep/jrKJ/4Vg/4uUTfw9gv2vBPlfiQr1DPY/ H+D9flK0f2VhMr8svbY4BWxCjeoqjAebCApiBQUxYBPsgifNJiRvwuSJSyjJ gYXJQYXJbFekQATkJfjSb/AlyxnRJsx2+KOaN+oMH5qyJg1t0q4uNerKTY2V luZqa0uNrZVL8aRDAHGiTUAlZIwwVnbBf0p4CYG9JyCUabuWtgmVQCENKXCB 78dA11DG6ZYQm7zZzAj/02gXjNDhRKF0CMe6xORiyiSf79EsDejW6T2MuzNG YAjaZAucQtsEeXJwFMxFJwQsYJPDdfv9zd77m30PtgYAJnS45nSBPjDgGlgB PIHz/Y0huAB9QKyPtgNGbtNDgwEaOC742qx5b8a0M2Xcpbvg4T1wjUIh0sGM CUoExQGBPGHWdDGDwATLulAlCJO3Fpo8XiMkwcDrbz7Zwvj2022ACZzBI9jY zgzmSnfCE2a3OLNtnDmDCwFCOMMseXKb0IWjhn/99h7A5PU3hxi/MLtO4Ae+ eJND+eXtX4a5pZ0sW2H+i2/3p1P6wNI1ZAVa5sv7K5/fXXz58Tb8yfDVD65P LTvbe9oEn9yeA1Y8/2ADEyXwXW7juci/SyYnkz4dhBj8abjwET9PZmrpzccI ajtKmhCbYPbk3/3gc3qcHqfHf/Rxok0s6sz6qnARxw9sMqQvA5gsDTLGcNE2 wSBJE2ITuFgYEq845OtO1YZDtdYnWzGJFjt4YzJOS0ZQW0pgd1akKSPKlhFj SYm0JkaZ48ONMaGdUcH6CHZLKKsp2E8fFdQWFdgSEdAY5t8Q5q8L9dUGeYlD vfhBV2oDL9cGX+WFXOWGXq0N9yoJvFTIupDj936W75kc1vlCQEq0v6okokuS 5WitgidkeFpesEkXe+RzVtGcVXgUAox32QSDKZR37T35izbBRhUiFPyg1gZE GIiUNzEkRp6ASnbHlHvjqusO+VZP7Yy+0KFNH1angU3GG3KmGvNm6LwJqgS3 nKgyrioyrsoygCfe8iwfnNMlyQ8Gm1jry3qaqqkuYOr/h8+b6Wt78cE1sMmY RTfQLm9XlCkqUut56fBs3CbLXRpqAJhAbI/rR5u5joaqfm2ZXVloVeRbFPnE JrT7aqe6a6fBenYxscl0twhsMmEUjhuFzi4hzROBk7bJTK+GWnjt7Fgaap22 16NNnEZ4rtOATRYG2laGu7bGLbRNxj/am3+8N/dgh8qe4Gp4sAk2mwBVgC13 N97YZNSsY84QNun4XZoaHNJFNjAiT/6KTbDfRFmZqq5OIzZpleTrZZwOGadL XmBUFABMLJoSGialtrpyYhPKKW/bpK+ttrettqeVB2FpoIQIPGHO6arjpgFP cL8JzumieFIaLylPlFYkQcA1Dt090SbFWRFgE3AE0yY4hgt5QmwSHnw+PJjK m4BNEqOupsR4w3fFhlwEm2AZGNgkm7ZJdiILe09ykgOzEtlJkT5RQR5hrAvH bRIZcjWEdSHA+2xMqGdhVjSvOJVfkgow4RbE8zix/II4IVXWFQs24dP7TSDg r6jKjcBmE1AJoAOCIAWiKCUYgmGTAHxnQbI/6TFh7l7EvfDMfpPawmj49FTc 9AZxXpuyuEtb3t1QYW6qApigTextvD+xCXO5CaZLBtuFEL0tPOyOB5tM2TSk 0MvtAs5EJTiFGGCCMUz3kgx28GmbCBztfDebkBjthP8RSWesqsX++lVnK9hk f7b7gLbJ3pxpl94Of9wmiBG8ILvdb69QBV33NnrAJqASuhG+FxfEu9mEypLQ PMEGeTAIxPakYXWkDc7X562gD1ytCO88mLdujHXsz5j2prvhDSCUW0s9+L34 0yDw+n9qE+yFZ2ZM3DYtPn24/OzxKnjk5cebEGgTEi8wgfI5PKvvkFIunLuF QVpO3EYHM3tP8CV55Mb0AbqDPL2Tze+k8cRNKL/R6RJQyauXdyFewzfSM4eJ AlzFXd/cpwYL09/LzMtgagbzOGQToltqBt+GI8WYiSH4EtDj6cM1XD35cH98 qlenV5V0asu/fLDy3ad7T+4tYYqE/AnM3n/8BUhWiPTjMP8h8ku6Vbu5xgh8 eYP0m5CWk1ObnB6nx+nxL4932URXHSEu8Odlew62lYJNlodOHhe8PizbcMhB K3CB2RO4mHdIFkeka075BuBlQLZs4s/qKyeVnK78sKYEv/bkQENKsCExqDsx BFRijA2Dcwe1siSghdpaEtAQ4qsL9qmHCPHRBnkrWZel3hf4oVdqAi/WBF3i hV2pDvEoYZ8vZJ3L9TtTEHSpPMZPmBGqK08yK4ocLbVTRv6MSUhnSehciVk4 YwZHiOgQ0gEvqVTIX7fJiQ3yJ2rlRJtg7zzhCdMmhCRUAmVIAjCBM9qE5E12 4W3Wmum2giFNGthkTJc90Zg72ZALPOmuCiW7FyFUmZ6KdNomWd7KHD95TgDY RMoJUZVQNV32o5ouc0P13ID+b0/ugE2sjUK9vKxVWgTRwM+Ex+M2ae7ioO7m gvnGvGnD2eJsrB7WVYJNetXFdlWBlbaJs62KCn31eCcXbDJl5k+a+WgTmidv bDJmFI8aRFjTRWyyOtIONpnp0Y2b1cCT0W4V2mRxUL/qMKBNHmxMfLy/ACqB wJYTMqcL95vA/bsb42AT7DcBm0CATXpapcQmemUl8AT3m2BlF/Cknn+iTQAm uW/BhLJJiqoqVVOTjjZpk9I2oftNwCbdysKjpAnYpAJTJ29CV4WN1cQmGPCf ANcvdqmKsR2e2AT3mxCbCOm8CfJEXEblGnA/yF+xCa5TxPnAyBOMhOircVFX ACYQ8RGXk6KoUV244iQ26ALwJCPWNzeBlRPvT5ri0SZpsf5JUb7hAReBJyGs SyEsjxDW5WDWlWAWwORioO/7Ad5nIgI9spNDKvLjawoSeYUJNZw4bn4MvyBW VBQvKooTFESjSjBq8qPKs0Kp8q2jNhOCFAg6aULlTQqSAjiJLJJPoYu+/BEm uCCeJE2YNoEzvyhGVpmsqc1slOR3qEtNDdWWpmqSNAGYQJDUiVsMHO1exCCN J3Czp5kLQoGbCBCy+gTfQ21jpO/ANZZyYVUY9b0GkcsmdDWXyybtfAiH/gSe 4EvgyaRZPtejWXY0b4y3A0OITTCO2wT3ucNNXOl+e6WH3hHv6jehEyi9GGgT TJEQoZDUyeGaa7wwtsnfWLAhTFAf8E5gxeH64LU5C66DhzfANS6FP6Aru27Q O+JxLSNYBidxYV8Jc6GJG0zw/PnNGbehwW5zg589WnnGrOaihUJgAtfffrqN PCGDf3EUMD5XY+GWm1BImzw+seNLkkFAmxAdkJ0mpNzr2DwrOgnyzZu8CWUT egnjL4xNKKCSf377gIrvH/7xwyM4k62IJBAm2PDu1pVPmIN/FCIC4YDvxCqs T+/ML43ozU1cY31lX7vo2eP1w62R6b6G+7uj8E7mGGSsUsPJyWgN/BzwA8Hf BP4JTJfAp4ofEdMm5HcGm+AMYaZQTm1yepwep8e/PE60ib0up6EmUsTxQ5ts jNavOjRuGRO8Rptg1wnaBC6WHKLFYeGKQ7zhkK4PSlbMvDl9+WpLdV91UlOi rz6J1Z0e0hHH6opn6+NC9LHBbTFBrdGBLdGBTVHsxqgAeeBVGfuKIshTGeIt D/YUsTz4vucrg84X+53heJ/h+JwtDbogSPTX5sfoa9K6JXk99eWOttqxLvF4 t3TCJFvqlS3YJbRExHNW4bSJN2msWbCLFnogBEdBYeGv13SdWL71122CPHHL npxgk2EJVnORsi683ukXgk1m9IXO+swRbcZofRbwhMqbNOWbqsMwb6LJuEQJ JdMTa7oU2T60TVjSnABxbqCyJNKsLbHqqEZga1MN2GRhqPP1swc3V0aGu9T9 ehnOEG4UZGmqU1qlOfP9ddfnunEvPNhkqK68T1PqsomSY1MVjOqrx9prxjq4 4128CQN3ort2wlQLNjlKnaBNRMQmI53CEYNo1CSdsqtm+7TLw22Lgy2zvQ0T Fg3YxGlUYk3X4rG8ycOjIV2P9+dxOzxWcz2i8yl31sfQJksOA8mb/K9toqrJ YdpEUZWBNnHLm+jhWVea3yXLP+JJkUVTDDCxasutWlf2BGBigwsyAKr1jU3s TVRZl0FdQkZ1wcdez0sHnoBNFOUJ2G8i4ETUFrjKuoAnYBNBcRw+2x+3SUl2 BCc9BG2SEH4ZYAKRHuebFusD9IDAVndASmzE5ZgIj7hwD4BJYtTVtDhfeBvy JCHUIznialacX14SuyAlKDPeLyuRBTbJSoRgZ8SzU2NZEexLYayLxCYhrKtg kyC/8wAT4ElUyJWspOCy3NiK3FhuQTyXtkktJ1ZYGCcsjEWbkIC/oiI7rCQ9 CHMiqA/kSW68DyeJzUlkUypJZOUnwH1/erAw1XXChAmO58Jxwcyl8MQmdYLs VnmhAf7rNPNsrTySNAGVQMDFyTah15pgWRdJfIyblZNWNWZSiDhIXwlJrxCb 4Nve5E0MrrzJEG2TgfZaiidgE/0bmzCFgteUTUyyGZtqcbBhbbQNd8H/FZtc oxedHC036Tlcp/pN6A2MVL8JwITOngyATQhDmAkUkkPByi5S4oUL3+FLuNId xAF3QCV3VvvhJd2r0gs3MdWyONi0MdaB34L9JjiJ689tgjdBMdhsAufjMKHi A6qmC3iC2ROs5iIXABOMH57sffspNYQKbUJGdRF6MHMlzJvHbcJMKCAH3Dro SdaDOdXq1Ys7VCnXUWXXK3oD45sdIrRNXDz5/iHqg7lYBH8HzM6QZfRk6Txz IBjZWkK6YJASOCX4s7sLB0u9C8Oty852IMmTw6U7G8O2ltrp/sbnH2yQXn6U CHxKOLYLfwJIBz86bJzHn4/3Pz9chB+FH8gJeRN485dUIE/oRSfXTvtNTo/T 4/T4l8eJNrFps+urwsUF/sJ835HOig06b4INJthpgjaBC+x/Z1Z2QSw7BCsO 4fqwaGNIvNEvWrfyV7u5BzbZpDKvI5OtT2UZMoJb43zbE1i6+CBtTIA6yl8V 5a+M8pNF+IhDPWWRvqIwT37w5eqAiyXe73M8zuZfOlMedE6S6N9SlGgW5A+o Skcaq8db+XNmxYxJNtEtHTdJJyyyCZtiske52COZtQhnzHw6agER9PQtbGYX 0MHHWOo9wSbEI9gFj2tK5qy1sxb3+J/mTQhPUCir/VS4CYV4hBl7cL+ndtVc Nd9ZMtWcP96QAzyZbsqfZfSb1GVdBqGos7zU2d6qHF9lto8i21dG20SUw1aV RFnqSsEm1OK5xhpLY81gp+rHL+4eLA5119catTW2Jn6nqryBn6mpTm4WZ832 avanuzacLfO9mtFm7mBdeY+q2K4stNEw6asrGe/gThn41DAuYy3YZNzImzTx iU1mTOLpbvGRTUTOLqGjQ+DoFDq7JRNWxXSPenm4dWGgedpeP25WO42KEQOE ku43aXXrN3m85yIJegQCLx7uzt7fnkabbExYwSYn9puQmi7SckKXdf2ZTQhM qBUnVWnMmq4WMZU6aRNT7fDYC09XdlE8sdWVo01c2RPaJrbGaipR1VTT08Lt aeWRvAnYhDlGGJeboE1kpXHUhK78cF5uKA7mEpbEHfWbxL6r3wRtApQAfRy3 CcIEcyhxkVdiIymVAE9iwy4lRFyJDaGSLGkx3qCS3MQATkpQfnIgZRN6ywm2 w2cnBWYmBP65TcLYl+IjfTITg0qyo102KYivLYgDm/A5MXxONNm9iHvh4a+o zAnHdngIIhTkCfbCg0qQJygXeFtRagBODIbApAlpMGEGsUm9MKddXWpurLG3 8nvaKIxgYN7kXTYZZCyFJ8VdII6ZnroJiwqCWaxF6r7wmtlsQvpNqPcb6Gqu LuEQ3WmCPBlqrx3W1zre5gnVC98pwuuxLjHYZNpKDZFYdlAd8TszRlTJu2q6 8A5Zwog8AZsgTzBvgr3wtE1co4ORJwAQXI8IZ9IzQlbGYwIFC7Q+vzmDpVnw km6Z70duXJuzwEv4UaCSKZtmaaj57toA/oTjvfAn1nQxy7r+ZAX813TG5Dkt FJI9AZVgxgSruSDAJmTxIql3YgYzPeHWZnK8/YS8DZ1C3nN8yDCjF/6uq5oL W05evsmb0P0md38nvfBH34spEpIlIfmat9amHAt8M3N7C9ld4socfbL75N7S w73xe9vOx9cmv3yw8mB3bGfWAnfgnX/88Aj+RSziAom8+Gjr6SP4YDewv/7l x9tkmAAZRwxv++jmzNa06ZNbc8ziN/K5vf7yxq9f3USbvD7adXJqk9Pj9Dg9 /uVxok16G/K1lWGCPB+I4fbydWfdqoPat7jhkBObwDW5INkTF1Ucwk2nZMcp 2x6WbPYLtntFe33SOwOahcZSc1Fka5p/c5JvQ6xnW6KfNMZPEu0rivDmhl6p CLxQFnCulPV+bZQXhDDWV5rIlqeG1ufE6ktSndqKcV31RBN3uk2wYJTNm+RT naJps5wKKzwzqKZ6VQCTMatsqVc6bxPOWvgQM2bejIU7b+fjBOClPgEdfFec ZBMym8ulEnom8Lv6Tf6nNmHGSp8AA5GCTsHKLmZHPATYZKdPsNsv3OkVrHZX zrYVglCITZhzujTZXtpcX02evzLbF/tNwCY4p8usLbE10Fvnmqk5XVM9Lf/8 7uPba2MmXa1BU92lrpCWJtEtD4mNgoxpu2pvqnN9pBlsMt5aO1RXblcWWRUc qyLfri4c0JVNGwVgE6oX3kj1woNNxgxctAnNE8omk92iiW7ReLdkzCh2domc BvGoSTppU870alYcbfP9TZNWLcBkuBMe3uSYN6FaTlxzuiibPN6e+fBgkaiE kOTh7gy9L36K2GR5xIiLF8FcOKfLWMeDAJi4JU3e3W+SizOEmTYhc7p0jDld YJN22iaYOgGbQFg0ZVjWRQJ4gmv+kCf2I55YGf0mIB2yFx5soqpMAptQE7py Q6uzgjBvAiqhh3TF1ORHwsP8u2xSkBHqZhO4JirBgi64iAn3iAq7GB9xOSb0 YjibmtAV6HUmnHU2I863KD20Ije6LCeSkxyYn8QG2uSmBAJ58lKDc5KDMhLY KTH+J9qE5fU+2+dsTLhXYrRfcrQfJy0Ma7pqCxP4hfFgE15eFC8vEmwCtsK9 8MQm5VmhpRnBJelByBNik/wEHNVFzekio7rQJsVpAUAS5El5VjAuW8RcCa6D xyWMtYXR0ooksEkngLGltlcvJHVccMYECmk5cYvho3IsbC3BbAj2mMAZbIL1 Xf1tfEIPwhAqRXJUBobfiMVdrowJqKRTgDbp1/OG9G9sQngyYZQCSYhTpqj/ E6ec66/DHfFb9KgugMn20XZ4N5vg7F9sOcH5XXRrvOX2ioXY5O5aDx29h+vu tVtMnuAFtorABWZJ4A2EGOQ9OOALbh7MW1dH2vZnzaASoNz2pAGLxLBFBb8F u+nJjnimSjC3AiqBwDld75obzBzPhc0m8BIwAjABodAk2aOHdO2SkiRmv8nR LNy3hEJSHswCLXw/853HO9OZPfVvirVoX/xCl3L9/OLOz/TALuw3YU4G++WZ K34/og1THJhMIRtVSIKDSRLSAsOEEuZ3sOYK95hgIdazR+sACrAJWOPZ43Vw yu31ofs7o/A3oqfgAmHy1cPVT+/MwzV87zef7OAfjp8hJnQwybI51f3o2gT+ 7W5zutAmELRNriNSTmu6To/T4/T4l8f12bqDae3ehHpnTLkzptoeV+9MaG2N OfXccGlJADfX09KYt+JUb0zoNkdkJ8aGA0JKn13XO4MKiF36vDNAxS6c+xUr Zr6zodDAi1Pn+AmTLvETLhSHnysIOZvLhng/O+B9OFfGXtEUhNcXR7dxk20K jrO5etYoXrIo5kyCebNw3iJasIqX7NKVHtlyj2zRJoFYsInhJnxpziKcNQsW 7cKlHtFyrxgCL1b7Jct94qVeERU9InpcsJB+28nt8EtvzxCmkQIvqW9ZAIBY +eQltavRJnDdpy/I6pMTg2mTVVAJHWugkn7h+oAIgrn0ZGdEvutU7I8qdwel 1xyKvSHZ7oBkHbjUUTrfWTbTWjTZlN8nS67P81ZnXqnL9qzP8dJm+WizfDU5 /pocljonQJUbqMwNlOUFq4sj7fVl/c3Vfc3Vwx0ieKYaNdf/9OXho/05eJ6f 7mk267jq6gxNDdUO3yzKGu2W4H4TqqarrbKvvsCmzu2t4ww3lY60lg83l461 V00bazHmzMKZbv5wS9kE8MQinLOKprtxv4lwzFDr6OSNdNU6DfzRbtGYWTZh lU/ZlbRQtPDoMm5W0o920jGTasKime1tWHV07k5bby7231kevrPsICph8gQC bHJva+rWqnN/foDM6cKarj693NIoBJhgTVeztBRVAmcQCoS2tkDLo0LDyz8a HUx3wXOzVNxMZQ1EBoSiOkNZDUJJh2ttbXajML9ZDIHTuvKBFR3yAqOyyKQu NmuKrUiS+koMO13W1dtY09NQ3dNYDWd7A33WVcE7Ldpyk7q0S+HactIiztUJ MrW8NGVVkrg0llcQUZkTXJ4VCE/XQBLcaQKBKqFgkh91BJMItElBZmhuWlBW ckBqnA/mRKJDLqTEeqfF+UCkMiIxxjM24nJU8PlQ1pkQ/zORgefiQj1C/c6m RHmWZkVUF8SVZUfmJbEzor1zE1iZMT4Zsb55yYGclJDM+IDkKO/oQI8o9qXI QAiPCLZHGPtSaMClINb5QP9zEcEecZFeCdHeGUkBpfnRpXmRlcCQymRRVQqv NK6qMKKqKKIyNxzb+bGvvywzpCiVnRvvg/Vab/fF+3OS3tp4AjDBlhOATEV2 GP1zqCxMZU4orjKBjwinB2PLCXxuaJMOOm8CPLG38u2t1BmcMtApgejvEGMM dEJIBrukRyGmwiAeMkiGjFQMG6XjdvWEXT1mU41alSMm+XC3FO6PHjWboGVI WZdbMoWq76IndA29vd9k1CihRtgxciWgkrEuEca4QQz3x40SAP5sn2ZlpGlt tGXV2bw13bG/YNqdM+4f1XQx4+BoNhcJuiPeNVv4zip1vr85AAEwwV2Nd1ap xhNciXJvfQBzHDj7F/eS4Lgt3NgOdgBlYIsKoOPmoh3OxB17MyZsSwGkrI+2 7013YzHYXTqxQvabEO/ATfyx+JOxJwVtwpzTdbwX/sWH1OaOo9j8+kMq8Mn5 +8/38XH6m0+o/28/2ZaIA6mwMIloBYWC34hP9a58B921gdvkmTkXV0MKXHx1 8/XTW78cZUyoYirsJaEruH4lQ4PpcBV0vaRGCv98VBuGk4RJvwmzyd1V8UXX cTFrvTDIO13d9DRMyPtJqz79pYe/vaA2yP/tyQ1cLg8Xr57e+f6zgx8+v/7y o91Pbi0cbo1eW+w93Bp5+fE2fALwJ3/1YPXm6sCj/YnPDxdBMZ/engeqwOeM A7tI2RjJnoCASLoEfo3/+ttjONMfGnzU13ENCr0Fcv+nLw8w/t0PPqfH6XF6 /EcfuxPKvQnV7jgVwJPNUeW6U9Hbkq+pDhUX+YNNzI25iw7l2ljdllN+PNaH JceDkIQZe0OqrT7Zkql2rLnYJkvXV0XpioK4SV4QyvzQdl5qj7pwpLlqor0W MDJvki6YZUtWxbJNudqjXuvVLNklJBZtYowFK1BFRF7iV5EkhCck8CYEsoKO t5pK/jSEJ8YCwyauCzv/z2FCyrqOwwQCd8QzbULxZFh+MKKE8/6QbAvcZKiA mGjKH9Pl9stT6vN8VBmXNVlXqcj00YBNsv002f5v2aQo0lZX2tdU1dNYOdgu 6G3hwTP8j1/cBZvYmkUD7fIudSU8e+OiDV1t2kiXaHeyY3tcT9V06Sv7dYV2 TR4IxdFS5myrgDPYZLKLi3vhwSazJsFEZw3uXqTaT7qouc3jRr6zkzukrx5u 51I8MQrHzFKwyaRNMWFVgE1me+snLCq6Jp+yyaRVO9fXuObs2puxoU3urowc bk7c25rEUV3YeAKBQkGb7M72rY6a5gc7xiwNYJPBTlVvmwxs0l1fizZpkZWB RzBjgjwBmxzlSvKPWuBzVDX0hC4ugUk6hLwyjdikQZDXJKJ40iIGmHCAFZ2K wm5ViUlTQvXyHMEEVYJzusAmLp7QKsGAd5o1ZW42aRLlAE803FRZRYKgGAAS XpUbAk/XguJYiCOhuNo0qvPe2ARgAsE5sklavC/TJqlvw4SySaxXbCRlk4jA 9+GcGHklPc43OcoTzgWpwcATsElReiimTrLi/DLp9pPcxMC0GN/4sCuUTSiY XIpgUxFO2eRiMOsC2CSUfQF4EhlyOSnGpyArvIwTXV4QXV0cW1ueyCuLqyyM LIc/Ki8CYIVBCrqON8KTl2TjCRAG8YJIKc8Khc9BUBwvKk0EoWDShFcQBUGu RaXxiupUsEmrosgAn3ljjaWJS1d2CTBQKAyeSN4EDRPKJsYjm3TTNunRjNM8 cVoUI2Y5hPOo/51Uf5HUCXN7I/XVo34TiJGjGDWIRzpd44LBJkcXQgwXUgyi UYNople97GgEmEBsTrXvL3Tvzbt2xDO3nDAXnTDj5pIN3IEAubcxQK1c3KLW LLpWw9P3sTX+Ft3tfrg2gN3rEJgcwRIs5AMyBN4A71wcbFoebtmd7oaXX9ye Q7Bggwn8EHgboINaNz9ngZvYC0+Kx3ALPCKF7E8he+GPLzdh8oTY5GsGUsAj 8IANZyxkQomQciNmk7ubSvAlsxEep1GRxSgEJvien764DvHzlzconhzlSn4B Ab08JN0lGMdt8upoAjBqAlTyx3cP/+v7R/84ajNhpkVIcRfpQ/mdMeaL2Yzv Vvd1hIjDv3/zENfN4xJ53DVPdsq/+HDnyeHKw73JnVnr/Z1R+PRwxhfw5MsH K8vO9mGjfKa/8c7GMHwJfoE/fniEvwaztQS+hWxggfuAKTjTn9s+5RGaJz8/ hY8aqHIAd354clrTdXqcHqfHnx2UTSbV+5OavQk18ARtMqAv1FSHSIpZvDyv 7vrsuQHZilPz122yPajYHjgh1nskyxbBkpm/0M2b7qgcaykZ1JUO6somO2oB I8s2xWqPaq5bPGMQwhnuzJskeLFoka/0QsiWe6SgD/DIvEUIQWBCkaRHCm+g oo/iCcmeIEb+FzZ5e3LXm28n0jlZKyfZxK3fBAvMVvuEbjCBAJVguJbFj8gh ACZok2vD8t1+8aq5ZslYOd6QBzYZVKY1Fvprsz0BJpRQjmyiZthEmhsENrFq S1zLylt59qaaUbPutxePvzjccBg14xadWcdVVaXjig1NddKgvnZrrG19pHnK Ih9prQCVWFU5VN6kuRRgMtRUAjYZ76hGm8AF+AWoMmsWUvVdXTXjXdzxTt5Y Fw94MtBaNdhWPdzBdRoEoyYJyZvM9oFEdEc2gcc5xZStbr6/aX3UcG3Wfnt5 8O7qyOGq8+7GOPDkwc40GdX1yc2Vx/vzdHEXZZOdmd7lEePcQDv8RVjTRWxi 0HLBJq3ycvAIwITausjnNIiK3GxCw4TuNKl5CyYQ0vJUeWU6gEXLy66vzWkU 5qFNWiUum1Cr4f/UJggTpk0s2nKwCaAGvr1Nmo9zuhpF2fX8DLCJvCJBWBLD K4AH7DBB8f9/myTEeMaEX4qk1y/GR1xOi/PNSWZTPe+JLE5KENikIje6HHiS FlKYGpybwMqO989NpG0S7RsXejk68BLTJmEBF8EmQawLEMH+F9i+77N9z0aH XM5JCS4viCsviK2geBIHQqksjCrnROA6e9xojzYpSQ/CdEluvA8EEyZ4jRjB ci8s64Lvgu+Fz0FYkiCrTMVmHFQJlxOJF/Bx4QBhsEmzrKATMNhQbW3mEZvg BfAEoq9dBMFEiptKMIAkABO0yZug1y/i4kVECnMxCkmdUK3x3RISb/bFU+4Q I0zojAkKRQBBhDLaRdlk3CIDniwM1oNQ0CbXFk3b010704ZduogLhwaDQXBo sFuQpngqM7IxcH9zEM+IFLggNrm7RvWz36RHbJHKK+QJQQrGo+0ReOeKo3Vz vPP6gg1e4n3soIeAr6JN4Pr6vBVTJ0CbQ7oDhUwVBoyQ2VxMniBMyEZ49474 DzYwV4IqgSdnDBQKJjtQKJgowX5t8gjN7D1xgwlqhZCEvI3ZlvIjfOnJAdjk 1Vc3SbPJiTb55du35nS9onMrbwYIw9M+DRO0CZn3RdITzKotog9mhgXfQM5u 7Sq/PL8LEgGb/OPbR3Dx+tldUMnvLx/A+dtP9r/5eO/7zw6++/TaVw/WV8e6 NiaNj/Ynnj5aw4os+JMfX5s8WO7dW7A93B+HT/U1I0nEWAd5A+/jNVngSH/1 OkoEVPLjl/BhurQC8e9+8Dk9To/T4z/6uDatuTalITbZHldvjqkcXaXamlB5 WSCf42Osz5odkIJN3lHQJT0elE2OxZ5DvT2oXO+TrvVIVu3iJatg3sSb7qpd tEhX7PIlKwBEAjHXLaQvpHAHY9kmg0B3oE1I6gReugWxiZtE/tc2wXnC5GfS FWJSeEl+mluc2FrCbIEnGxgRJsxqLgg3m2CgTa45FBD7g9JNO3+5u2qiMR/C oclsKWbX53oDT1w2yfRRZ/mCTVTZLFUu22WT4kiLptiuK7fpynuaa2yN1UNd 6u8+vfnh9cWhTtWkrbFfL2kQ5CkrElWViWCT/lbumqNpeVA3YZION5f1aPMt ymy7Jg9UAjYZbCwGjwBPwCZAEngJX+rXFY52VDnbK8EmEwbeGGCkkztpEqJN HJ08zJtM2hTTPaopu2quv47YZKhDjDZZGGjeGDNem+sBmxzSNqGTJtNu6xex A4Vpk9l+vdNUP2zQDHQocU4X2qRdVQU2AY+4ti7yOfUCJkzyjmDi6jQhKpFX pUFIylLQJhpeVh0vu0GQ0yTKaxLm0jO78tqpRSeFRlVRt7oIbHIiT1AlpNYL ApMmgJoOeQHapElIwUTLS1NVJ0vL4vhFUVxOeHVeKNZ0YUEX1nRhWdf/Y94k OuxSROD7YBN4W2qsDza8Q+QnBxalhwJPwCZlWRHF6aG5iQF0gzx8KTgj1j82 hCroiqJUchGCmidM2yQ4wCOEfTnI76LvlTM+l9+Dm6mxAWUc8Eh8VVFcdRFl E4iqotiqPIonWJlWlRuBNV2ADpzNRWDCdApjdHAAZkzgG7l0Tz3YRFqRgvtf QHBoE/ig4AxagZu43ESvKjHWV1qauEgSW0stUQnWd7nZBAJLuYhKHCYZhNOi GLUqIVAl6BTccjLTUzdt18I11ncN6AXYqEJ6T6iFjCapO0wgukRjRsm4QYIZ E6zsOpY3EY9RSRYR0B5cvzCkW59o250zUDaZ6tqa7MTsCWl+x50mbkHuA1KO DNKHNkGnkNQJKdbC/SZwAejAmzhrC6mCEoHzreVegAbeuU1fwxvgzfAtxCDY xnJjwbY9abi7NgD34SfDfdJggjVdQJI/twmz6+T54/XnNE8ITDBdgpkOBAXO myJ3SCMGAuS4OzC9glpBzpC9Hm4d8T9+cd1lE7oLw9V48uLucZuQrYuudnia MCfOECZziZld9gQdxwdzuS1SIYFlYBj/+PbhL88PXz298+vX9/74/gNAClzA y789uQEwAZUAUuD6y/tru3O2/QX7vW3nJ7fmcBgXygirtnDQGemCPz4uGJtZ cKQYWdT4+jmcr+NcAhAKgcmpTU6P0+P0+PPjYEa7P0WrZFQBsTWu2hpXj5ur wCayUraw0M/ckLswJF8eUZ/IkJObUIYUx2NjUA6xNiBb7QNBSFZ6xRBzJsFK j2zBIoKLRSuARQwvFy2iBbMQgnppB7lIl6i+EjGp6SIMWe2TQ7iZhZnawFIr kkD5izY5vu6EaRO4xpfMajFyvXg0oJgZR534b5abuPabvA2T4zbBvAmqhBIK bZNt+H1M1VPNBZNNnGF1RnMRC2CizryiTPdQZ3irGTZR5rAVOWxJTqCmONKs LgKb2Bsqeppq7E01Ax2Krx/vg03gSb6nRWTUVjUK88Em6qrkOm5Kf2vNylDD 0kA9sQnmTQAmo/rKkdZysAkEwASEAvcNkjQImzbPXpc/0FQ8oq8cba8Z7eSO GWoH26oG9e42ofMmTJu8M29yf2vq/vY08gSHdJE5XcCWmysjJ9qE1HSBTbDf hMAEbULD5I1NlNXZrv73I5VAyCpTZRVwQdV0qbmZWm5WfW0W8KSBn90ISBFm t4nzOqScLkWBQVlg0ZZZtOUQiBR0CrnGL4FKMLpVJQZFUQdd0EUlTQRZdbXp Gm6qsipJWh4vKI7GvEltYRRNEqpUie74jsKn+r9ok+QYL+CJWyTH+8RFXYkK Po/rF5OjvTLoWcE5SQF5SWxOSlBhWkhJZjjwBG2SEeubkxAANkmP9YsKvBAZ cDGShgnaBGASwroQzLocGugZ5HfJ2+OM16X3gn3Px4V5leTGlnMSKgviq4sS uKWJ3NKk6qL4ypy3+k1wLzzCBLtOMGOSE+fNfAkBNgHFVGSH4U/gF8WJy5Ik 5cmiUmr5i6wyWVyWgCrBjwtewk01L6NJyumED7+Ji/0mpJrrXRkTDAITVAmE q4KLwRNiE+QJBAAERweDTQbbhUNHw76wuOtdeZNx2iaYN4GLY/0m4nGjmBoo YZKATeB/PvOD9cvOprXx1q3pjq2pTuAJyZugQU7kCd6kF530kBQJgQmp7Lqz 2guIwNlccEFWn+DWEtAEwgFAge0nwArUB47ewp56cMptOueC9IAvwbfDOwEm 8GlsjLbfWLRvTXSRQcQ4MRh5cqJNTpwh/OzR2jOaJ2gTfHjG9hBcrUhWluCq DpI9IZ3axCauMi36q8xJwmRosJsXqAfyr+iMydNbrxnLCk+0CQ7pInO6XHvh 38zpOiRzun5jTPr6hVH3xVQJs5qLNOwzcxnMDAsgBTzy928evn52FzwCSPnt xX1S0AUkgfvw1Z++vAU2+eD69Ec3Zh7sjj26NoFDvbDBhCxPgZvwsZAhycye F/wEMBuFnyH8h/jywQrtwVt/+wI+/12wyU9fHfz01XWcUfDvfvA5PU6P0+M/ +gCY7E2qiE02R5WbY6oxUyXmTQQFvqaGnMVh5ZJD9ddtsjGsOB5bTvWmQ7U2 KFvqFS/YhUu9ouV+yWqvbK1PvgSgsInhGl9uD6k3B1VwAS+XgRtW0bxZ8FZH yVH5FjNj8qYPxY597m8Y8j+yidvuxaONJ28lR4hE0CnELO+yCcmVoEpci2AY pVzEJif2myBMbo5pro8owSZ7dEf8rL54uqVwSJXewPFTZVyGUKRdemOTLL83 Nslma0qiwCY9DRW9TVW99MYNW7P4s9trH99cHjXXD3UqTPU1rdIidVWKtial npc60MZbHW4Em8BD0XBLGejDps6lMiP6yonOGlAJnAEmcIY7g43F8FWwSZsg sV2c0q3I7K0vHGmrGuvi0TapHtLXoE3g4WrcIjux32S0W8nsN7m1NHBnxXF3 ZQRrug43J++5kDJzFNNwn2kTrOlCm5gbBAYtt1Nd3aaoaJKUgEfAJhDYEU9s oqrJO4JJNsAEGPJGJXTgtC6wiaqGsomWEkqGrjarUZANNmkV51J7GOXAE45J XYqB+iAYwZuAEQyqBox+CTZpl3IwaULtNznKm8gqEkSlscCT2sJIApP/jzZJ SfCl2uHDLgFPYkIvJkVdBZukx/lmJvijTQpSg4vSQ0sywsqyIorSQuhmE6qm KzXaJ5J9ntgEYELZhNrDeCHQzyM0wCvo/7L3lt9tpdnWb4UTsy0zMzMzk1iW mVm2Zcu2zMxM4TjgMKcYkoLuOt1FXd3nvPd/unPvJT/elpTq6vPeO6o+eI85 9ni0ta3IUqrG88tccy37S7YXT4NNXGzPejtdSojwSo8LyE4KzEsNKcwIK0gP zUkOyI0/5puATSgLTy4JiR4KbRSq7ALFAEyITUrTg+Q54fRN0fCXwzbLftSz C8Ciyo+oLInlCrrwRdQV9DYUEaGwmi6wiZBHKAU/0qmAhGBCVEJgQmxCYDLT XwHN9pVTNReBCZVv4a808ETfXDLMz3CEuMV78ibEJgQmJMYmBjzh2WS6R05s sjJSvTZetzHJpU6uLHQa5U2IUN7HJnfWdaAPYhNKnYBNmAhPHu2Nss5arIcw GR+MTSiEQi22GJtQZB4YAu1Mtd1c0lJihaq88FPL+tquyqyN0cY7a/3X5rvY TEYyUIhH6PXZXHjCE7M9hBmbfPl8l+aeU/6dJURYEZdRey7hlHOjgSZGoRKS cNIi6477wxf3fuSFxdFk+fewiaFD12FG/icjH+TLAwgvJSzQYoaIaVNiYWcw 9pA9K7yTQ5V3j3795inhCWAEApgAUn788gEWOOOpw/quK/g8X95ZfHpj9uOH 66/vLmMBpqNkPbUFYBPkhTVpdAN5JTTdkjp9Pb81//nTLZ5KcPEqBU9Yldcf vfE5OU6Ok+NPfYBNrgtquvam1GCTkbb0qkLP8jyP4iTb9vKo5RHlf1TTtTOm 2h411irByLBia0SJM8SziWytT7zRL13XAU8kG/2ydZ0EwmJzQI5n8RS0NWhc u0ViWXihn7LSd5RMF/oav5NNNgYlkBGeCAGHXlnooWDNzJT3sQmzSwhMhGzC wIThiVGfrhvjqv3J8nuz1bcny2+MKG7wifj1ztyllozR8uiaJHtiE6Fvoo51 KIsVEZtI45wrM/zAJgO1OYMN+YNNRVzv064q7O1vrIyMdpRP9VTrGsSNslR+ AmAE2GS4tXhnonFjpHZKIx2uy9BVJPaq44lNgCREJfOaYkDKRHMO5U3AL9V5 vg3FQe2yiB51/HB91oymZF4rJTYZbSsc7yyZ6JJO9ciBJzybVBCbGPfpGm+/ xvfpusv36bq3NUl4AjZhifiHl8Epc4xNNia6KG+CX0rIJmSagE3IN6koSgSb 1EnTiU14MEkwZROiEr5YKJzGnajyo9QF0RUFMRWAlLwI3jeJa5DEN8uOfJMu dToDEAYpjEcgwAiJrnQoU4lNACbMNwGbKHOwzQ4Em5Sk+R4v6PL9T2u6zLJJ aKBtsJ8V2MTH9Syfhbci34SbZhLoEBfEEQrYBGBSkByYn8y17UqN9ACbhPse sglHJeeFbOJkd9HN0crZ9qLNRc43cbI+42p7NsxPlBTlk50UlJMcnJOMc2BW ol+eSd4kPdKFUUl8oG1cgA3OwrIuVtOFRUaUKyVNyDcBM1aLE+U5YdRmmR9P GUCtusAm5UXRNZIEsEmLOqOjKoefC19IEpZ1sd5cBirRKDl1KYwcE4iVchmo ZKBy9rDXHI2Gp6bBNJ+RDUBhAxxHOyTUqosbEH+oKY2MarqEOkqaUFkXd5t0 QiMZ7SjFfzuro7Vb000Ak5trhvnvRjLLJrdWtDSN8e5GP99SWAcMoZqux5dH IbZ+sD1E1gk16WJdtljCnc0lIUjBRYqKYE1lYNCVOc3tVR1+nDUfhvDJ4P88 +6s6athFJgvVgzE2oXQ8ZeFZny6zbPLZ400awCFkEwITSppgk0wYwgCE6IMu MvoQGijCUi7iFwpQsJQHY5Mjs+NLQQ9hc2wCMPn+y7sCNnkINvnHYestjkH4 FyE2MdrzCwMmQrtE2KGLhU2E7bkEMHUAACFR+da3b25SiRdBCnXx+uvHt//2 GVeUxXUn++gmEO/Dg9XH16Y/ebhBXYuZZ0TzH4VwRJ8Pm0dPXwS+kTf3Vl7e mf/k0RpNnKGaLj57wrknf/TG5+Q4OU6OP/Vxdabq6nTllanKy5MVexPlexPq 3XH1Ym9xVa4npEh11Kgit0ZVQInfYBOWgt8akUKbQ6Vbw2J+0Lkc5+1h+daQ jN/zc2ENgwYVnPTSQ59CgvXmUVREug5O4VCFiEPBz080Ee7E/YMgAgnfzleM hfAG7tkB6h4spftX+sUrfO9fphUdhB8U04+AmNap5zDfdpj/KY5iTAq9wCaS Q5A5WgjLt4ReiRGYcBqQbA1Kt/Wy3WHF3qiSyrd430S6N2rQ5TFOV0cVNyfV +1MVtybLsQCqXBmSLbdnrWlyxypj69OdyuOsFJEXyqK5ufDc+MVYu/I4e3Uc 2MSJarqqsvy71Wm9Vdy/5w80FPfVFUz0VL2+u/7qzoquUdxbV1xRyM1ArywA m0RhwzzRKb8627ExUoeN03BDnq4yQ1+bPdFcONaUP9qYN91ewpVsGZQ/2ZZH SZMOeaQ606Miy1NbnjDTUTzVUTzclDPSWsAH4UumewxgsjBQvjxUv9BfM9tb CSQZbZePtismu8pntFWL/fUbox1XZvtuLelvr4zcWR3dXx8DgNzhQ/HgEWIT rKG7W5O31kYvz/dTFn5KWws2GW5Xg026a0ra+SZdIJFaSdrRZBNelcXMN0k4 BJNYZS7XlYs5JsQmitwwSJkXXpYfUZ4fWVEYWVkUWVMcjY+oWZ7YLItvlSe2 KxPbFAkdipROZSqkAX2UpXerM3rKMzU8ieAhPYuHWBCntMqSGsXcWBOACV6N sQnzTcAmDExIJWnc1EIDoST5g014+WbHcMNNUmI84kKdqOmWv9t5KNzPJtzf NpwfuQjRiJNQH6sgr0sB7hdwA84h3pa4GBlgxxFKsCMNgk+McE2Ocs9OCshK DChID8tKCEiL8YsJdvF2Ou/rauHnZunlYunhdMnd8YKLwzlnyOacm90FT5EF ziKLM3YXTnk4XHS2ORPsbZcWF5CXFpGdHJKZGJSXFp6bEJCfGFiYHFyYHJSX 6J8d650R6ZEU5JASIkoLdUwNdkgOsEvyt00KsCM8AarE+lvjTCVeYBlAjTgj GAipLowpL4qtKI6j3gVAFfpkilMDcJZkhuDZenlqc1lmR1Ved21hT10hteqC ehuKBlslQ+0yKugS+iYGTtEcJU2YY8Ly71TWRZo+TMETm9B5pE1CGRPyUKi+ S9hemOdxKfUcHge/UOkXforv8cWF3wV5E6rsmu9RznUr5noUq4OVuxON1+fa byx03l7qubvSd7DWf399AOc7K723lrX7K1qyUW6v6/bXdTdXe6Hryz23ePcE Z85nWewCp7As/JMrY8+uTTy/Pgmxh0+vjgNVHu2O0D1ksnDzUPhisKdXJ17c mGYo8WZ/HnxBZV1ENBQ8wXXABRAD17cnW3cmW7EAdABw6B76QWojjDs/PFh6 fXcBenV34c29xQ/vL3/8cPXTR2ufPlr/7PHGZ082PqexJty8xR0SRU5YQRe1 tGUzB2kwB1EGJdyNXBUWMMFtzFsREopwjgkby3hUTyUo+vqBDVUkpwNYYZQQ eWe4KOwMzAHI4Q0s5UFIIhwQb1TKJQzC//Lu0T++fvzz20dgjR++wMOnv37z /NdvXvzz25fQL++e//TV4x+/xLMP//bZATAEd/7y7rGwGzDxGpWB4cXxGX76 aPPVnaVPH28Sj1DUnRoy069PP8tehEafkOhzxveCV7i/N/70xuyja1OfP92m eSt8xd3+H73xOTlOjpPjT31cna4CmDA2AZgQm1TmeIBNlGlOXarI7VHV1ojy ffNNTAlld0y6OyrlqYTGnYNQFNi6c/TB2ETPR0UGJcclPUx2SAVNg+WcBmVr xAvmBIIAdBiBiVAckjDpTCR41vwfwU88ESZQ3qffZpNjvsmg9IhNRpSXxzg2 4WMmcujKuIKX/OqEnNjk1hQHJoxNVjtz1rvyxqvjGjOcKxNsVNGXymIsjtgk FmziQGwiT3CtyvTXqFK0FZlgk6EWsb5ZrGuU3N2eeH5rsb9ZMtym0NYW9NTm yzODFJlB2Htjm3RtTrM31bo8UDneUjxYkz3SkD/dXjrRUgg2me0UAz0OVcQ1 DeY111UMQhlvyZnpLJrvEs9oStl8k0lN6XSPoUnX4mDFylDD4kDtjLZiQqMa 61CMdSjBJnN9Ncv6xq1xzbU53f7yEMAEAn0AT8Am97anqGHXoysLABM8NGKT 6d66yZ6akY5y6tOlqSpqK883AhNyTwQ1XQkEJryieevkWE2XkE0qCqIqeTap Lo4CUNSLY+pLo5ulcQATiJCEqIQENsFDnLFmz4JQQCsdytRmSUJ9SQyxSb04 jrGJPDtInIENtk9hshdVcx2Cib+ATQKEbJIT65MW6wXFhzkDMbjh7x4XwR2E JIxKCEygYC8LPAvhNrAJbgDR4AcNwZMw54RwFyg9zjcj3q8wIzwvNTQ7KTg2 1M1DdA5s4uvK2OSii8N5sImL7Tln67MAExeb8/YXP3C1Pedic9b+0ilPxwsx IW7ZyaGgEsKT3ITA/MSggqTggiSs/TKjPdPC3dJCnVJDRMlB9lBKoD3whBMf kBc6KSlhjrnxXkAPckwqS+KrShNwBp4AQ2TZYdTEjOa/4CHuwQ1gE4CJtr4Y 5+7aAgITXVMJsYkQSYQTTyhvwnwTs2xCF6e1ZUa+CcT6CQvnmwgnxQsnNo4d znk0jEFpl1Ic/ljkpFM62yUnLWhVwJOd8YZrs237i923l7R3lnshLPaXtLeW evZ5i4Sr71rR0gT5Gyva23yfrjvrOjYpHgsj6wRIAh4RtvCii+AUnOkejlYO rwNM2IwSainMJqFQMRhdB3d8fHcJPELMQuF3rG+v6g429cQmeIj7OUi5Pffy zvzre4tvDpYAJh89WMH508fr0BGYPN/mRy7uCVsHM8eE+IJGnBCksESJ0CU5 KsQSDH8XNuxiFVO09xa+iHDCoFBG7bNMXQ/TeAizPJgfwajnGAEdUomQlQQ/ /ojacPHFWo9+fvsE+umrJ6CSf3z9AgKtHOLJA9wDNvn57UP2qxmq1ATIQ7Ng 6FPFRZoXT54IPh+hqUQDK+ltMLhj1hXQZneua36wdrqv8vbmEH079FN/9Mbn 5Dg5To4/9fE+NqnIdgeeEJvsjJYBT3bHzeAJdRI2qu+6PKHYG+ccEy7uPSTZ Huask8ONPUcfh76JElcYmJAZ8X42MYMMG0Pydb2M80cGpVgQpJiVwCXhAMTg qgjuZ9hCRgy9IAl/ilE0/n/BJkZhE2ITgAm0MyQHm+yNHoXfQSVXJ5S8FNcn FVdH5TcmyghMoOujyst6KcBkTZMLNmnKdKlOslPHWhrYJIZjE/VxNqnI8O1U JhObjLTy2fOeqifX5z97vDPZUzmuUWsqc2tK4lTZoarskOqiqOGW0iszHbuT LSuDVdPtYn1tzmhjwUyHZLy5YKQhd6aj9IhNOo/YZL67ZKlXsqgVz2lKptuL KAtPYDLVJQabzPerl/SVxCZLg3Vgk/FOJTShKRvvLJvX1a4ON+9Mdl9fGLi9 Mixkk9sb43f54q4He7MPL88ZscnGRBfNNxnvqhKySUdFAQMTypvQpEWzbCLs 0yWIwx9nk6IoYpOa4qjqoojakijGJgxJhGzCxC5yhKLOaJMnN5bG1RZFAwMh rpTuMAsvywwAmBQkeeYluB8HEyhQ6JtQWZeBTWI8U2M8gRXkmwA6DL7JcceE sQnBS5DnJWITipxArGdXXKhTSjR4xwdsUpwVWZAeERfq5mZ/1sflEvCEsYmr 6LwLZHvexeacp8jC18VGZHHG3f6iqy3HJo5Wp/zdrZKifDjHJDUsPT4gNz4A bALlJQRweZYIt6Rgp/Rwl9QQR4BJUqAd2MSAJyHc1EVQCURZ+PRIF+objO8F PFItTiQBTIAhABZyTKjTMhkrtdLk9ooc3jQp4lVABV2Uguf7cXFFXFTNRXhi xCbCpImwdTDDE7NsAuIAbgy1lJKBIpzGaMQpQiohMCE2MQITYhPON+G12Fu2 MVxzdab11kI3dHO+68acBmcOTJa1rI6L2IRzTPjhJgdbg9RGmNADV2jiiTAO T9zB8IQBC3sWnPLixhT0/Prk61uzFDxhIxopI0+gQTMWKVBPeRMK0ROJ4PrN 5d5by724h3L3wBlwyov92ef7s5xpcrAEMCF9/HD1k0drQkLhIeWoSZewoIv9 0z1dAaQwH0QYZqetNZEIG7ZolI5nxGG2W5epGC8I22cJscIoVk++g3DAomAu ydE9pmH897HJj18+AINAP3zx8O+f4yEuPuUJ5RloBWzy45cPASZ0p9GQFKp5 ow4ArAcX/ix6exQnIdwja4l+ZXzg+CI+ebhB3wV9/gwJQTfXV3XAk43JtoO9 MQIT+oT/6I3PyXFynBx/6uN9bFKe5QY2UaU7E5vsjJX9WzZheLI7Jt0ZBZJw rag29WJCD5qxLhjazuXZGZschjskRy2wjnIlivfVdJmyCeOO38kmDE8Ym7Dr DExM2USYSfk9bGI2C09gQmyyO6zYHZHvjsgITK6Myw/xRHFtUnFlRH5tTGkw TSbKro0owCYb3fmrnTljVbGNGc5VibblcVbKqIvEJuoYW3WsXVmsvTGbVHIx 7cHGksGmUn2b8v7eNNhkrr92TlerrS2oLo5V54aX5YRWFUZiW3VtTnN9XrMz 0TzfJR9pyB9vLprTSMEmw/U50+0loBLQB6cOGmjCiXdMCmc1RVPtBXhqRsOP X+wsAZhAMz0yvpqrihvTwLPJdE/5WAd2aNjUqcc6VAv9daZssi9gE/AIZU+o pgsPwSaUNwGbCPt0Ud6E2MQITNQF8f+WTRieEJio8iPU+ZHEJoCIag5MImuK IxvEMa1ygAlX09WlTv8NPDFQCS+uezDPJjWFURX54VBlQQSxiSo3RJLhX5js lRvvlhXjbMQmpemBpelBtAMHmxQk+vF44psb5wswSY5yB1BEBtiBPsAdfq7n wCOmYAKBR4hNTH0TLnUSYqjsApukxnjnp4UWZ0UVZkTGhri6O5z15obCX/J0 tiA2cXO84Op4wc3uAnjEx9k6LtTH24nDEze7807Wp0WWH7janQn1tU+L889J Cc1KCs4zmCbBuQkBmTFeKaEuCYEigAmUEuyQEuRAbAJRTRdjk9Rwp4woV2aa VJUm1EiSgB4446E8J1ySGQJwww00kBFggqday7MBJl01BVBfYynF4ck0IQFM xrpUhCfH2cS4oIsr3xIMNxHUdJlhExaHJzxhs06EVELqbyjEPbRmTgpr1UVU MqORQUCS+R4lCWyyrq/enWi8Oc8hyfXZzmszHcCT/aWeO6t9R7Pg1/pAJfvr utv8WBPWJZiqtsAa9NBIIBE8y8wRMkpYXy8gyatbMy9vTmPBvBJKoFBpFrEG oQrZKAeb+ptLeD86Cq1A9/k2wljcWeunSSi4jdp2Pb81AzZ5cXuOrBMCEyGh CCCFwxOACQEIlW8x34T+6Z5Fs02Jwyh+Qrtx4RxG1l6Y5ncwZGCQ8j7f5D9i EyFiGLr+HhIKs0iEP0JsIqzp4n72HVejxbshj8gf4S0S6DHhCQELr0eHpV/H BqkYdQxgwj30xv71l6c409R44kH6fD5/sn1/b/zKovbGav/DK5NfPN0hxwSi Cq6XdxY/e7L18vbim3srjBZxzx+98Tk5To6T4099mGWTpb4SIZtsj6p+D5sw 32RzqGRrqJRME7AJFUTxKmXtrZhvQlt9IZvweCIzYhPmYhiJwYWhskv3v2QT RihCx4SxCb09IZgI3vNx/Q42IQFJIIYnO6AVfi4830NYenlMxhd3gVZkYJOr owqyTq6Pq64Oy4lNVjqywSYNfE0XsYk62kodY83YRBXnqIxzovkmGlVKb1V2 d3mmrq6gt7ZA1yR9eGXm7Yur84P109oqTWVOZWF0ozSppji2tiRG31R8ebr9 ykz71ljjqq58pkMy2yld7FGASsaa8o/5JoKarsm2vPnuEohmLwrZZLpbMqOV E5uY9U3AJpxvMmTMJhQ2gYhNCE8YmwBbGJtQFp7NXjTrm9AU+N/vmwBMDGxS EInPp4pnEzI76kqjW+QJ7cqkdiUXOekqS2P0wWTkmFBlF9ikXZHSLEkAm5Tn hUFgE+rTRWxSkOSZE+eaGe1EbHIIJtyuGyLrBGxyaJ1Afumx3mCThHAX8AWX KPG85O92npVyMTYBiUBU00V5E6zxbIS/LcMTIhSwSVqsD9gkJzmoID08LzUs MtDJ0/Gcl9MFb24W/CViE3eni25OFz0dLVxtz7vZWaTHhcYEeztannW1Pedm f9bJmrNO3B3OhfuLgCe5qWEFySHEJnkJARnRnsmhzvEBDomAkWAub8IpWJQa 5AAlHRZ0QWCTtAjnzGg3/O5cg4LCmGpxYp0spV6einNlSTy+KTALgRvhCeCl QZHWWZWnrS8m6ZrENNyEtQ6GWPid2IThiVFBlwFDeDYxwhOzbEIPmQ9CzogR lZAGGosGm4rJXmH3cANNjoMJZMib8IQCNlnpr1jTVxGSgE1wvrXQfXul9+6a 7vpi97XFLkq+g0rubA7s80VcbAo8sQnhCZiFzWSkQi9W0EWOiZBT8BBI8uLG FFV5sfHulGSnkfFko5CHQg2EgSpgkKvzXTeWtLeWe68v9tDceS4yP9t5Be+c d0+o4fCL/TmAyYvDyi7Km5CISj57YkidUBAeu1+jMYtUzUVIwkYoCpt0EUQw m0AIGgxGGJ4wz4UMDrIP2JiP//uaLqHIoWCRdmH5llFNl9Hs+J/fcp2BgSdc ioRnkF/ePf3l3TOeSp4CT3744iFohdiExp38/fOjWD29COsYgF+ZBpqwYYt4 V//nv178P397+c/vnuAGsAk+/M8eb330YO3x9enrK7qt6Q7gyc21gbvbI89v zeN7wUeEV8aH//nTbXwdr+4sgU2oAI9clT9643NynBwnx5/6MMsmy7pSYpOy DBeNKnJzWPG+mi6zeZMNffGmvgRUwpsmR1t607yJyd6edeg1ZRO5KZgYWR54 26CP3583EYKJsE7MwCMCPBE6I/87NmFXjNiE4ck2P+6E79MFSY7F4Uc4PAGV gE2ujSkvD8kYm0zWJjRlulTEW4NNVNGXODaJ5tkk5hibqNO8O5XJvVVZPJsU 6uqLBlpkj67O/eWj/eXh5snuio7ybHVeRL04oaowGltlXV3+zkQL2GR3smVz qGa5twxa6Sub75ICT+Y0kt9gk4We0sm2/JGG7JGmnPG2gomOYi4Iz7PJnK4M eLKkrzTJm6gmNGrGJjcWBu6sjnBNutY5u4RRiVk2ubo4uDnZDTYxzZu0/+d5 EwITQd7EwCblXNgkuqoYiqLOWo3SuFbOMeGD8KokTVkaC5swu6S3MpsW2oos wpNuvotXpypNyCYV+eHEJmV5oUa+yWE11xGbQFxZV3IAxNgkI94HbJIY4Qqs YImS94FJoMdFP9dzvi5ncWZlXQxPyDphbMI3AQ7NSgwK9bEnNuHHmlwyyPmS u/MlPzdbJ6uzIovziRH+2UmRId5ObnYcm7janXG0+kBkecrL6WJMiGtmYhDY pJBXXmIg800SA+ySwSMhorQQUXqII5QR6iQMmySHimjqIg2CryiOA5I0KtOb VBk410iSQCuy7DA8S33MgCfEJm0VOT11+Ksu1bfJcR5okTAqEYxZVAjZhGRq mpiyCeHJ+3wTXKTrrLGw8B7GJsxeGW4Vk72CK3w/YakRmyxoVbNdcrpIZV1L feq9iRbgCVfNtcAHT1b67qz23TicEX9zRUu+yU1ACt+bi4bCk4zYhMBEOAOF WIbaCxOScF7JtQmmR3uGUAlFSEiEJ2yyCTNTDngYofGLNxZ7wCa4eGulb3e6 fXuiBU+R82LEJmSdsGouiOVNWE0Xm2zCsvBEK6z1lpAyGJsIBykadRIW/hSN SmEgQ/e/j03Mzhw5BhG/KXYz+/EfBRNPhIzDKOaQfe5Txy3ePeHCJv/4+tk/ v315GDZ5TsBCeRM260Q4QoWYSzibkvCEfCKcQSX/8/1zCHfiYweVgEHu743v b+hvrPZfXeq9tzN6Z2sYkLIzq3l0derLZ7v0QYFiPnm0AWZ5dG0KP8j0R298 To6T4+T4Ux9m2QQb+Ips96pcT7BJpzJic0jBZ+HNsInZPl1bw6WbQ6WgEtLW EBeH58HEqE+XEtt7Nu6Q8iaHjX+N2cRs3sRAInyTrkVtMfQ+NhESCvNQjMCE SIT6GxvhiSmY/K/ZhOGJkE24XLz+GJsI8EQCNrk8LKOyLpz39NI9vIGegtXO nOn6pOZsN7AJ4Yk6xsAmZTG2qhg7YhMF2CTVu12eqK3MpJquoRYJ2OTW+vBX z68s6Btm+7ClVzQrUhskiRX5kerc0J6q7I2Rhp2J5s3Rhq2hmvWBylVdOdhk oVs201E62yk27dMFjTVnUyJ+qr1grCl3rCVvWlMy3sFFTsAms70KysITm5j2 6Vror1sbbtmb1t5a0gNMuKHwW1MHx3nESIxNVkbaf2efLt5AMcMmfJ+uKJM+ XRyYlBVECtmkQcINXgSbNMvim0Eo8niNOoX15gKGAEmgvqocCA8hWuAG7tmq HLBJkzi+tojDQIAJ8ISxiTQzoCjFG2ySHevC2IQHE/NskhvHs0mcN8AkIdwF fEEAAu4AjwiruYhNyFIBmPg4n8EZnELWCSVTKHICMOHZxDsl2isrMSA3JSQj LiDQ09pDdNbT8byn4wV3x4tCNgn0cHCyOuNoeTbcz7UoMyE3JdLbycLF9pSb /Rlnm1P2lz5wsT0T4mOXFOWdnxRMbJKfGJgV650a7poY5AgwSQq0TwywTQ6y B5hkhbtAwjbCKWGOmdFuufFekswQwGO1OBFI0qLOai3PhvCQ+nSBTZhvUlYQ XStNpiA8wGRUUzbcodS3GdLubLJJf3Mp6x7MFvx8E2PTRMgmQuvkfVl4UAau zGjVED1lRCtklNCsRgqn6JtLCFImTUwTCDAy36PExcl2MbXtAptsjzZemWq7 MaehRPztld79ZS0xCPiC6xvM4wkETrky33l9qZv1EBbWdAnBhMLyECVWaCoK JeJJVNb1McCBj7ETg7D5idRMmLUOJkuFxUzurg9cmdPszXQ82B7GdaDNreVe 4Mldnk3wU89vcQVdr+4uAEyYjByTQzzZ+fzpNva9EDbAgBSGJ8IiLmEbLtMS KcYmwjbCrNMUYQ7dg4f0D/5Y/EbkRPhHMI4wlbDuC5RBYmximBfP04dRM2GS SfXXAREHjydPwSY4g03+9d3rX795+c9vX/36zXNc5EMo93EnZ5p8cZ8lTRib kD1Efy5+Efym1J6L8u+4/q+/PMXNH91fe3mbG4MCNrm9OQQ22Zvvxhl4AkjZ nGq/vqIDnry5t/LF053n+/O4c2OyDczy5mAFX9bHD9ehP3rjc3KcHCfHn/oA mxCeCNkEG/XKHA/yTRpLArCfxw1c+da4wki7XLpEvjMqg7ZHIK4xF7EJ+SbQ FjcDXXa4pZcdih+eOChousuJe3gYHqctPX/DwNHGXqiV/pKlvqJlXfFKfynO S71FuLIK3jGolIm9FNa4Z1kHFVOJF4urAEYITBibHMm4nxgn8zPlB8VGEr5h YU0XsGtLrwSmUZHbFk9AW3opj3JcWmdnBJLsjEqujiqOaUR+dVgOMFluz5pr StUU+ZTFWMgjznN4EmtTHmdbFmdXFm9fFu+gTHBSJrrIk91lSe4NpdG9NTm9 tXm6hqLBFrG2UfLmwdZ/fX5vbapjoF3eiN2yKq1BmlQvSVDnh3VVZa8O12+O N+3NtmP/sz3SsDZYvdirnu3iiuHHW4onO0pIE+1FE+2FBoFTeGCZaiucaiue bOduG2vjNNEhnu5WzOnU3FiTwcoFfe3iUP3cQM1Yl4qvsZGNdamn+6qXhpt2 ZrTXV/T7G6P3tif5qYsGPdibZWtGK2CTvTnd+rgGbDKrawCejHZWkG9C800O jRKDDicwplWVpFYWp4BNQCXy7ChZViTHJnnCai5OsuxgZV6oMi9MlRdaUcil QkAQtSUxYBMQSpM0oUWa2CpLalcka1RpQjYhMMGC2ESYi+/hR590KFPrimOA gVBVYSReWZUboswJVuaGlKT5Uk1XSUZAaWYghEVxun9xWkAR9t5pgYUpAQXJ /vlJfnmJvrnAk3jf9CiPlHDXuCBRuI9NsIdlkIdFsJdVsCfAxC6EV5ifKDzA MTRAFOpr6+t6wUN02svprI/L+UBPizB/u3B/O5zD/LhzRKBDZJAoOsQpMcI3 OsgjIdw3NyU6NSbYx9XGXQQYsfRwsYLcnCycRBchZ9FFvk/XOdsLZ6MCPYqz EqHspAgvR0tXu/OeokuOlmccLp1ytDwd6uucEeWXlxBckBQK5ScGpUd6xPja xvpax/pYxftZJwfZpYc6pIfapwZzc+HjAu2SQh3To9wyYzyyYj1z4r3FmaHK /OhqSXKDMqO5LKupLAuLOmlqWX6MJCO0OCWwINGvKNlfnB6iyImsLEloUKS3 V+T2NUqGO8pGOtWDrVIq6GKEQpBCZ6KV8e4yI9+EDYKf6a8gJMGC8IRb8MQB gUFoRjwkvMiug0oISchGISphQXg2CYUDlg7jLDwjFJaIB5ssaFUbQ3X4z/Pm fNfdlT6uW9dq362lntt88p3DDd4xITzZX+27swYq6QcdUNYDC4jGkUD0kLvC J1PYmHgyUFjDrpc3p6HX+7Ngky8eroFEqIiLRp8AN6glF0cZ/EBGIhQ2Yh7C H7G/0kdvAz/1aHeUTXWkPl3Pbs08uTH19OY0IIV8E1zBGoTCt+faAaHgIna5 715x4wJvrQ9ih4w12SXAii+ecdhCHCEEEGFbYFYuxQbBQ+wV2Ch56uhFaMNu IGAxTZEIUyHsirAZl5A1hA8BGv/912fsuvBZ5o8wiuHXj6mCizpu0bR3mqjI 59wNJV7//PbZ//z1zX//5Q3YhFp1/fTVI7qTfBPh+2R/FkVvCEmowIyoDdf/ +d0TvE+sufElBysAkP0NPUjkyqJ2faL1ztbwg8sTq2PNM7oqkAhQBV/frY2B pZG6oQ4J/oO6tzsMtPzw/vKH91f+6I3PyXFynBx/6gNIQuKHmxyxSXWeV1Wu pyrdGWyC3TsHL+bY5BieHDYNBpuwvAmvIzZhE9XX+/keXAI2MZUQLogpTHXI JhxrYC18in6KAQJ7TbqZ+ymd2IhN3iu91JRNzGbhjd4z6dhYk0MBzYhNqHEZ fUSbPJsc9jeTbo9ItkfEl4e5mi6mqyOKayMKsMliawbYpKPAWxl1EWzC5U1i rE3ZRJrgIk5wqS2K6KnK7KnO0dbm9zeV9DSIt2Z7Xt9fn9XX97fJBlolzaq0 WnF8oyy5uiRaW5u3MlS3OlK3Md64MVyHLdBKf+V8j2pGI59sl4w2g0eKSeNt ReNtBdBYaz6PJKQiYhPuhvaS8fZSbv51t2K2rwxswuGJvs6UTWZ0NWCT7Zke sMntzTECECAJ6eHlOTYUnuLw1KfrysLA5mT30lDrTF89jYbXt6p66yUdvG9C RgmbbFJdmsKLY5OKomSwiTI3RpETDTwxyyaK3BBVfhhUlh9mhk0kBjZpkycL C7qE1gktGKRoDwcytitSaoujy3JCILBJnSSuvCC8LC8UEFSY7JUabp8calua GSDJDhZnBR3iCQcmJelBDE+ITXLifTNjvFIj3OKDHSN8bUI8rTgw8bIK8bIN 87EP9bUnNgkLcAzx59gkwMMCYAI88XY+h3Won22Yv4FKhMpLjc6ID0uLDUmP C43wd3O2Pe/qcNHd2ZLk6mTh7HiJ5CGycLe/KLI4E+zlmJ0UWZAeV5gRHxPs 5SmycLI6I7LgwMTV9jxoJcrPKSXcG3hSmBKelxiSFuEZ5+8Q42sNgU0SA2xS gu3SgCdhooQg+/gg++QwJ4BJdpwXlJvgI8uJKCuMrRIn1cnTGlWZJLCJuiBW mhlWkhpUmOQPQsG6vDCuqiSxVpLSVn7EJmNdZcKZJqy+C38D2XR4/IUEm5iC CY1cJNOEZi8a2ERrABAjNqFJ8UJREZfQNBHMOpGxvDwWpn26iEoITCgODzDh unUN1e1NtFydbr+10M35Jrx1Qi2CDWVavO5sDtxY0l5f7LnJJz6ABuAU0MHB pp44RSjhpHg21oQWT6+Ov7o18+b23Ed3Fz69v/zFw/VP7i2/2Z8nkVdCk0rI PWHz4ql/F4u90wJ/FoMX3AM24YYtPlp7dXfh0bUJiJDk+f4sUAWLjx+uAky+ fn357cvdL55tffxwDTtk7JMfX5++sdr/6eNNFoen7AkFT/CQhUpoIRz7bvSU UQSeRHVNxDgEKdSlymwbYVMZVXYRcWCTDxFrYPGvvzylsDm5IUymhHIIKU/+ 8TUnIpTDpIkBUg5D8Vwzrn98/fxf373+13cvoX9+++LXb54BWHD9718cGL1P emVh3h+/JhWSYUHIhtvwTqi9MADwowdrT2/MgkHw+QNJ9ua7t6Y78B+Rrqlk UluO/73vznVeW9Ee7I08uDIGMHl4dRzC9wu0/KM3PifHyXFy/KkPQhLGJiTs 1WvyvWm+SWOx/2q/hL/+W2xyHE/EW9ARm8ggqulibbjWdNL3sQnhg5AsTDmF 0YqBMswt6MeZZ2HKJmZrun4/mxxWqR3T72eTzUHlll61NaQ4ZBNW9mbMJntD UogRyjWeTTZ6CpbaMueb04hNVNGXgCdm2USe5CZLdq8vidJWZWlrcrtrcnWN xWCTa6v6J7cW5oYaJvqqRvhEcGVhdE0Jt0nWVGaBTbanWvdm29f0NasDVUt9 5XPdyqkO6URbKWMTHkwKCUwgQQilmJvP2M4ZKwCTCeyyuuQzPdw4+Pn+cmKT peEGxib6No5NZvtrF4eaNqe6wCZ3tsbv7UzRTBMyTYzYBE/d2ZwAm1BNF9hk rr8RbDLcru5rkHZVF4NN2svzqZoLwoKJTBOwSVk+55v8BptwVAJkKAhXF4SD TQAmOP9bNiE8oVIuIzbhhp7wkZMOZWp9Saw6N7Q8L6ymOLpWHAsw4ZQfVpDk CTBJi3AAmEhzQiDCk9KMIIBJaUYwVJQaKGST7DiftEj3uCBRhK9tmLdNqLdN iLd1mI9duK9DmJ8D8ARsEuovApsEeln5u1uAStzsP/AQncE6xMcmxMc21Ncu PABIIgKVhAfgfvv4MJ/4MN/kqMDUmOBwP1d30SVvVxtyTFwdL4FNXJ0tXXhC cbW74GR1FgAC+kiM8M9LjSnNSc5JjgrzdXHl2wuDUNy4e8542p+P8BFlxATk J4dnxwUmh3kkBLtE+9pG+9rE+tnE+dskBtqlhDhkRDglhTpCqREuGdHuBCb5 SX6KvCh1URyxSYMyg9ikVpoKEiE2AZiUpgXLsyMAJtXipAZ5ekdlnra+dKBF PtZVMdFTjr9vVL5FRgkWhCdsuAnVdI33GGImRrPghWxiWPQakESIJ6zKS1jo RRVcRgVd1J6LJsgzVJk0adJFfbqYXUJgstSn3hiqvTzZemWq7fps521+uAmx Cenu5sC9bf3BzhB0a6WPoui3V3XEJszIoFkkrOsvNeaiBsKAEYrDU/gdouAJ iYACeAJ9fHcJSEIwQgMZWfyE8IRxCp0JVegVSEQ3Hz9Yxd716c1pnD99vE6o Ajx5eWcebAIkefdqD3iC8+dPt8Em2Dxj8fDK5KePNr96sUddaqmXFMWuWdNa o9otWtP9Qk5hYkVfwjN7HaPuvqa+iWlAXhgtAYMQnjAwYcIVRihCx4SxCf+U gU2EeGKKKvz8d6yf//rN80M8eQ42MVgnx985M3SESXxW7kUBearyIrOJugd/ eLD67Obco6tT+Are3Fu5f3l8qreiv7l0Rle1Nt5ysDuCrw8s+f2nN795c+X1 vcX7l0fvbOtvbfT/0Rufk+PkODn+1AeZJhQ5YcIWvbbApzrPC2zSUOS3rCvd GSu7PKE0lWllF4cnI2JOhsGLUppvQsJWnJyC9X452MRspRbb0hsVRJmt6TLV /5pNjLLwQpnFELMyawCZffMbA1xVm6DITSrgHQPZ0Se5o5fs6iUMT4hNtrSF q505Cy3pmiIfdawl2EQRecEsm1Rk+VZk+7fI4nV1eX11+WCTvoYiXbNse077 7PbS4mjzQLu8syavXp5clhteWxqHHbimMnNZX7sx3rgyXLPSX7msq1jQlhkK ulpLxlqKmW9CNV1kncxpSkmznaUzHaXTnaXEJlMa6Uy3YqZHCTaZ06kXBysX hzg2mR+sxV6R/3ds+Xh3ObHJxqQGbHJ3e4LS7qxvMI8n88QmBzszpn26pnvr xruqhtrKwCaaqqJWdV6TMpuxiRBPQCUUhy/Lj+eTJpx1osyNNmUTZV4o803U +WGgNsg8m5g0EDbqISycb0Jx+IbSOGogjFfDZy7LDFDmBONPKUrxTo8U5cS5 gkpkuaE4k3sizuSoRJwZAhWnBRWmBGC7ztgkNcItNtABbBIO0PC2DvayCvO1 D/fj2ISXKMTPAWzi52bp52bh6XjexfaUu8PZAA8rkEuwN5V+AUkcwv0dIwIg p4RwP7AJwCQjPiwq0MPbxdrTmavm4sBEZGATiNjE4dJpR8szjpbnAzwcIwO9 48ICkyIDYkO8fZytPRwuOVuf5QnlrKPFKW8ny+ggj4zYYBBKYphnfIhbhI9t lJ9tbABXxBUfaJcY4pAS7gQqIaVHuYFN8JviVyY2qZYk1yvSQSXAEyyqS/E9 xoBNACYQFXSBTeqkqa3lOV01Rd21xX2NklENByaT2nIIC4IR8LhwNDzRCi6a Oibv01yfQQxPKGBiFHt/X58u4dATpimTOi5TxwRgAq3rayhycnO+62j24uF8 kzsb/cQmON/fGqIKLmrhy9r5EqEQnhCbMKOE9eaCqGkw9eyC7m/r+TxLLxtc wuYwUvyEGISC8EQlRB+UT6GbcZGKwXAzu/L0xtS93WHsXR9eHf/owcrnTzeB JDTuBJxCWXhyT8AdYBNKgnz+hOMUlo6nJrds3ImwTxeLtLMWXmzYojAaL6z+ MsrIs67CvwdM2ABHI0KhWi9KcPz3X5+RaWLEJmaDKgYb5evHQjAhowQPf/3m qdHFn98+g2gg4z++fvbLuye4yA03Ecw3McrXGxWesZwLZdvxu5O3gjU+5M+e bH38cP2j+2uv7izhY395ZxFU0tdYvDHZ9uZg5ZvXV/BN/eXj6z+9Pfj53f2/ foIf2Xt6cwZ48kdvfE6Ok+Pk+FMf12aqSRQ8IW2PquqL/IAn6kxXyptw3sqE 6vfiyaiE+wf/IzaR02h4aHtYCXGEwmfhN/RS0037b2/pjdiEKIbByP9Pvsnm oe8jlNkQym/T1rEIDE9nh33JpGv9rJuZhLEJZz8Nl+7oxcQmBjwZ5vImNN+E 8iblcVay8HNcTVesGTapygmoyQtulSf013NsoqnM7q0vHNaUL4+1vzpY257v Ge0pH+8p1zYUidMCqopiqkuiOyszFweqtyabV4ZrASaLver5HhVjE05tBjaZ 7ICKpjqLofkuMWlOI+Z6eUFdEr6gSwI2mdUqZ/vK5vvLeTapJzYZ7y4zYhPm mxwc+iZ8Tdccgcnjq4uQMAtPc+FXRtpp8CLNN+mqLm5W5dRJ04lKWE3XYSfh RHUBJ8YmvMywiSI3RJ4TzFV2kamRFwp2MMsmR+jB5pio0pg6lamkDkVKhzKV 2gjXFcdQk6660tgjNikIL0nzzYpxzktw/w02KUln1gnwxC8r1jvFwCY2oV7W IXxNV7ivA/km4f4iEEeovyg0wDHAw8bPzcrL8aKb3VlP0YUAD9swX8dQH1GI t0OwtwPOob6OEf7OkYEugItwP9cQbyfIz9XW09HSw8nSw9nS1DfxFFmILE4D PewunLa/dFpkyS3c7LiMvCdf7gUwgVxtzztZn3O2OQ9gAZ4kRfolhHlFBTiH +dhH+jnEBorigiCH+CCHhGARkCQj2p3OOfHe+GVLM0JkORFgkxppCqjEEDaR p1UWJ6jyoiUZoUXJAVTQBTaplaTwYZO8nrqS3gaxrkk62MobIt1lEz1qnGms CWMTwhPqIUxsIvRNGInMDlRCRCtY4DzfXzmv4wQ8ITBhgXejllzMMRHmTdhD MlDo4fRxKhFOXWS+CbHJ6kAV8OTqdPv+Yg90Z6X35mL3Lb5JFzfiZK2PCrpw pp69QBIqpqKAibCmiw0ZebA9xIq4GKFQky5ACl2kBl/4cTb83dQWYSJz5MPb C+SM4EyZFFzEszSZkc1JeXhl7Oa6bm9BAzx5enOajYZng07IPfnmzRViEzYO Hguwycvbiy/2Fz56sEZzAIkj6AbiFIIOmntuVL4lZBOhb8KKvliL3d9gE9N0 vDAXz8Ls9IJUIkVsAgQgD4VVdplWcx3lTQQDTah8i0q5mHtCqPLPb5/967tX v7x7/sMXDyHWQ5gHE2M2MdtSTNjcGAtK3BAD4gPHZ4iHRCj45F/fXb65NtDb UNSsSsP/4T95tPG3z/HR4YPd/+FLfJh3vv/01l8/wRdx/evXV/7ojc/JcXKc HH/q4/psDWSEJ5cnK8AmdYW+FdnujcX+S30lvL3y79nkEE8kO6PSQ06REZUY scnWkGpLrzLLJowjhJxiVkI2Mc2k/H+YN3kfm5iJnPxuNuFGT+pkFIQnNhFU i4kNeMKzyS7vmxzhiV56ZUi23pW31JYJNukq8SuLsQCbqGMtzWbh1eneldkB jeKY3pocsElnRRbYZLS7cm1Sc2d3fGGkSd+p7Gsu7W8urSiIapQlgU2alcmz veVbky0rwzUAk7luJcCEwiZjLRybjLYUjLUWjrcVgU1AJdOakpmuUsYmC93S hW7ZfI9srkc20SHmgvDYYmlVBjAZrFwaql8eaSQ24beFHJtQ3mRruluYN3l0 ZZ6VchGYMDah2YvEJmwuPIVNmG8ibNJVUQQeiYfK8hNIqrx/zyay7CDgiYr3 TdR86uTfsgmDEY5EeLXLk9twGy8+O5+CH6wpjCrLCQGe4AVrSmNUuSFgn/LC CHGGf06cK+ebCGq6uLKujCBiE5zBJofWSUBeoj/X8yrSnc+b2BKbhHhbc2DC 500iAhzBJmEBjmGBTmG+TgHutl6Ol9zsznk4XPB1sQr0sAvxFgV7OQR52mON ZyEsgBW2F8/ZnD9jf/EMuMPTydLf08HDxco0b+Jsc9b2/CngiaMlbj7tYnPe yeqMzblTztZn+Rnx5z0cLtHC2faCk80FV7uLPq62Yf4u0UHuUQGukf5OUFSg KCbIMS7IEZASE2CfEu5CEfjsOC8gGH5fCGyiKoihLDzYhKwTsAll4cEmJalB sqxwZW5Uo4ILy7fxvklfo6S/WQY8wV8zQxsujXJSWz7VWwFCITChyAmeojMb By90TyBTNlkYqF7or2JsImzGJZx1ImzPxdhE+FAYQsF/aEK7hPQe96QceLI3 0UK+yZ3Vvv1l7dHsxdXem7xuca23+sk3IR4h64TAhCq7jmSSNGFBeIhsFGom /OoW73QIxi/SmVknFHXHDXQRYAJCYWBClgo1+MKZOg8/uzn98Or4Af50vP7d BVDJm4Ol1/cWqbILwvrTx+tvX+6+e3WZJsLTJA5slbFh/vTR5ut7y6/uLH14 sIoNM00PZEBhNHtRWMrFirWEQ0+Eo+HZjzA2Mavf6NwlBAGW6cCCBT2EhV5E KAxSjCq7WOGWEZ6wsAnjlF+/4doIsx7CP375kLoNczIZsGI0eIVqt4SWCn4X fOD4bEF/+LSpJRo+eXwRuPLs5tzOrAawr2sqwYLnl6vgke8/vQn912f7ABNw ChbQH73xOTlOjpPjT30wNmHduih7Up3nVZPvDTYBocx1F+yOq3/bNzlunUiP sckoRyWUOuGpRPE72USIG+/Lm9BtxCZCWjE2Kcyxyfv6dP3f+Ca/DVNC8eNd OCqhIjewCXvZoxZnxCZDEoYnHKEMctrsKVhoSV9szeiVBFJBFzeB0RybyJLc VOnedcWR2qoszjepytE1Fg91qif7ah7dmNua6+5vk3VU58pzQquLYxukieUF 4U3ypGV97bWFrpXh2vke1XSnjJ9VLR1vLR1pKhxtLhpqzB1uygOhTLQXGbHJ QrcEbLLYI1/Qyue1cmKTyU4p2GRhoGJJX8Vp2IhNFBM9FdSni7LwrE8X2SU4 P7w8x2SaNwGbzPTVT3RXD7erdY2yruri9vL8lrLcellGnTSdpsPTUPiy/Dje LmH692yCs5qv5oKqiqPMsgkb/k5gIqQSBiatuPnwfo5Nijg2Id8EPEimDNhE mhVYkOSZl+AuyQoyOCYUh08PZHkTYpOi1MDClMCC5MDsOJ/0aM+kMJcof3uO Tbytw3xtw33tQ73tiE0iApzAJhHBLlGB7gHudoAFPglyFmcwiL8bkMTe383W x9naU8Q9BawQWZwCcTjbnHe3v8RNfhdZkG9i1KeLa9Vlc87uwgegEkfLs5Zn PnCy4jIm4BS8CGe4iCy8nay8HC2517Q+5yqychdZudhdxKsFezvGhnrGhrpH BblE+oug6EDIITrAPjHEMSPaPTfBB2CC35R8ImKTytJEysI38a26qkoSKQtP YRNFTiRQpUmV2VGZB3VW5Wvrwd0yaLBVSs4IzviLN91XCVEpF8CcHBNiE9PB i4Qnc4NVEEEKFmCTxYHqRR5PqKxL2E+YFr+RhTclFDJTwCamjomwT5cQT6is 6+p0Oz/fpPfeej/rA3xrtff6cg90g0OVPoIR4AnOZGdQzISJfBOWNyEqgYhW CEno/PLm9KtbMxR4Z2MWubTI3SUKnrD8CJsdzwYyshIvEAru4fLvfKAeL8Ux C88g1KeLjTh5cXsOqHJ3Z+j+5VE8+/HD1c+fblLH4O8+uvHVCy57gn0yFjSV g4YDfvxwnRoLEwIQDjD6YIDACIWiKGRnMLuEfhA4IGQTat71O30To7ZdRiVe VCiFM3b+RsET0nvcE+OwCQu/U6suWvPtgrF++o+vn7EewoYb3pphEyMwoQmV WIOV6G3QOEX6kD99vIlPmD55+jW/fnX18bVpUMn6ROvB7th3H9747qNrP7+7 /7fP8dne+OntwXcfXf/2w2vffnj1r5/c/KM3PifHyXFy/KmPazOVpKvTJM43 wW68Qx5WnuUOlWW4znQWXJ6ovjxedmWCSU3aG1My7ZJGsVbhTBI4JpQ3kR9C Ctc191hP3UMq+beQwp4iHhFG5tl1BimMRKg7MW7AerG3cEFbADZZ6i2BaBw8 jWI8mgUvXHA9tTiY4urQuJAIF5zha7GMrRMCJVZUJuQm9sYMTw3KoHWqJeMX G3gDOvFav2SjX7o5INsalO/oFXt65d6QjBwTg2/CWyfbvUUrHdnL7Vk6WTAN hS+LsVDHWqpjrcriIBvgiTLBQZEokiW5FMXYV+WH6OpydA15XVVZXdXZA+3y 6YHaNw82rqz0j3Sr+1ukvQ0l9ZKkeklyWW5Ekyz18kz33kz3sr5xYah6vFve 31I42Fo80iEe6SyF+uqzRtqLprWyqW7xWHsBNN1dOtsjMUgrndPK53rl832K 2R7FZKcEbDLfW7Y2VLM+XLs8ULk+2rQy1DDXVzXZVTbWoRjtUI51li0M1K8M NW9PdF2f799fHjrYmHh6eUEYgSfT5Mm1JSr0Ap7cWBmmHsLzA03jXVVgkzFN 5WCLUlsnbq8oAJiwvAkr6OLdk8Sy/ASq6aIg/OF8E6OwSaQ4J1jCF1Yp8sKU eeHqfA5P+KHwMY3imGZpXJssoUOeqFEkdoBHlKmdABNVmoYf/g4RuUBYNEsS mnmWaVQmQfWKxFppXLU4pqoUm+3oqtLo8uJILMqLIkBDpel++Yke4owgWXYY JM0KlWSGSDJDZVnhsqxIcXpYaVoozkUpIQWJQYVJwTlx/hlR3gkhLpF+DmHe tiFenII9OYX5OkUFukUGuIb4OgX7OUYHucYEuYX7Ovm5WDlbnbE/f8ru3Ckn i9Puthc87S3dbC46WZy1PXvK4tQpe8vTVudO2Vw8bW9xGmsXh4sclbhau7ta uwBMHC86OJx3cbGMjvbPz07As7aXTllfOOXnIQrzd/F3s3G1O+tsc8bN7oyn wzl3+zOuNqdcbU+52Z3zdrb0crzk6XjJ28nCx9kyyNMe7zDczwnvkLNRAl3x MMyXM1BSI91zEvyK0vEVhMvzoqTZ4TTfpEaS2KxKbyvLaFGmN8lTaiWpFUUJ 8uwISUYozqr8aHVhTKs6q6umoLehqL9ZfNiMS0INhCnwDjYRVnaxIYyUi+fX BntlFtwxUAPN9lcfqooXt5g7LOgSJuKFARPmnkx2Kya7wSPyiS7ZhEY2rpFx iy7ZWKdkqkcxrVXRw9EO8RQfNmEDFoEhpnPhcZ2r7NKp1vQVW6M1e5ON12fb 95e676330eCSe5uc9tf7b6z03lw1hN8ZhtDkEUqvEztQV2Fq58u6/rKYPBYM LrgUyc0ZohKWdqf577iHxU8obEK5eLYWpuOpvguAAyQhYf367iKlSz56sEJ2 CdaPr08CTA7AStcnceWLZ1tvX3L/Jv/166ugD8qYUGMuog/haHjhoBNGHEJY YK4K4wgjP4XYBNtyRhnvayAs9GWIYmgYCiGJMG/CBprgHnqr+FnyTegpip/8 n/96QVVebJSJ4ce/PsYj1BNYiCR8Cp6zV/7+5eO/ffH47189gn54+/iHt49+ fMfr7cMfASACmZZyCbsfCwPyv7x78uOXj/768e13L6999njn00dbVOLF9xbe /fTx+rNbs/ia3r3aw0OQyH99Bh7Er3kVV+jhiW9ycpwcJ8dvH1enK46LY5PN YYVGGaFMc5Yli+QpjtMdBVcmaxiPQFcny0lCDBHKCEmEOta2yxyGmAZPhIkS xh3C5l1CNjECAfpBo5EoAJP5nnya1ciGxROYMCRhuXjuIjf/kY+H6PihkAMy GmHP69jsxRVBdRmDFGGZ2dEvBRIRZPA5SOEquyTH2GRQsTuoMMsm6115ABNo UBlem+JQEW9NeAKpYi1VsdaqODtFvL083h5sUhzjUF0Q0leb3Vef21Wd1VOb q20qneirenlvFWwCTmmvyq2VJrcoMxplqbWliR3q7NWhpo2xtrWRltWxxqk+ tb69ZLhDPNEtH+kU9zXm9tZlD7cVTXZLp7olR9MVgSS9JBmoBFrQKYlNJjok c1rVqr4aWtSVr400Lg3WzfZWEpuMdajGO8uWBhvAJlvjmmtzOp5Nxh/vzj7h YQRIQu7Jg705UAml4+9uTTI2WRhsBpUAT9h8k/by/AZ5psnURcqbJKnyqLIr /jAIH8MPXhROhOfE2ESey7FJWb4hC09s0sKzSSfPJl1qQ8i9m+/ERQKttCtS 2vmMCZELzgCTBmVSnTyhRhpXJebApKIkqloSiwWuVJZEK/NCpVmBRSneQBJi E4M4MAmXZmITHk54UpQcAjABnuQlBGZG+ySFucUEOIb72Id524V624V4cQr3 cwabRPi7hPg6BvmIIgOcI/wcgz3tfZwsXKzPOFw4ZXP2A8dLp0UXT4FTbM99 YHfuA7CJ9ZlTdhannGzP+bjZervauNhfMLCJmw3YxM3FysXZwt7+HNgkLi6o uCCV2MTO4nREkEd6fEhqbGBytF98uGd0oEuYj4OfyyU32zPOVqcdLUEo54Ak kIfDBUAKKIYESMFbxfsEpMQEeySHu6dEuKVEuGcn+EpzIypKE6vESerC2Gpx YoMirVWdCTZpVaW3KNNqSlOAlgATcXqINDMMbFJVmqCpzu+pK9LWFwJPoL7G YshoFjzAZKJHDQFAiFCE0Xh2w1RvxYzOgCemmucLughPmIR9uphvAgDh2KRb TgwyrpFCWOAKrXED3TPeWjLVISFnhDkmwsgJPcWNX9SplvvLVgbUmyM1V6Zb 9pe6wCYHmwP3NvjBJZuDdzYHb28M4HzA13GBOAhMGE2wsMnBpv72qu7Wci9l Ugw9u/bGqNCL+IVEeELQwXpzEapQXRZ7iomF5UnCZ1mTLgOn3F8Gkry8M4/N LU1g/PD+8pMbUxAVdLE5jG9fXqb8O8UfaL4JwQjlIKjWC8zC8ERYqSVcsGou I7ODFXQRLwh9FrOz4I2afeEFaYK8KZuwMSIk6i1GN1O+gziFkvIkrMk94V7n qweGPLthoMmRXSJ8yMHLu2c/vXv+I2iCF9jkh7cPD3VfKFPThMYyCmnFcPEt Vx4GAvr+kzvfvL7x1YvLRIg8ZHGeCBjki2ebXz7fAkXi4a/fPvrxq7tfv75M QzNxz18+vv5Hb3xOjpPj5PhTH2bZZHtU1V0WJU1yKImzkSTaT3fkg00uj5fx 1snvYhOGJ6ZsIsQTUwYxZRNh+ZbQLtkYkpplE4YAQjrYHJbhCs1AIS32Fi71 lRCbrPZLWGUXk/Dhmk6+0itd1opXeiXAk1WdZKWv1CybLJuwidH6yPQxxyYk YhNoe0C+MyA3yyZrmlwav9grCapMsKG58KroS5AyxkIZY6WMtZXH2cni7OTJ rsWxDpV5Qd1VGWATgElvff5wV9n8cOPzO8vX1gb722SamgJs+aqL4xukKRUF MRX50aNtyr2Z7t3prpWxxpn+ylGNXN8mHuJU2t9UoK3J0rcUYkM12SWd7Cyd 1IhnemSMTeb75IxN5ntV012yKY1svrdsVV9DbLI63LA4UDujrZjQqMAmAJMJ jXplqGl1uHlzrPPKbN/+yvC99fEHW1OHbEJgMssmm1BNF2OTRX3LSEc5RHPh e2pL29R5YBNhFp6xSUVR0mHYJI56CPP6j9gktkkSa2ATBccm3eXGYAJpytLJ ScG6pyILwg0t6tSmspQGsk5k8aASJrAJzupC/NEh4gx/mk1/OKE+QpETybsD HJ6ATYpTQopTODwBm+TGB3C+SahrtL8IbBLqZStkE+z2secP9nEM9HYI8LTx cbXwFF10dzjvanfOyfqMPZji4inrcx9Ynztle+GU/cXTIoszzjYXXB0u+rrb hfq7+ns6ONudd7a/4OVmAzZxdbYEm+Bsa3vW2dkiPj5YKc31dLW2tzwNnAkL cEuLD06PD06N9U+LC8iIC0yP9Y8PdQ/zsQ9ws/RyvOhsfdqNm8l40d2eOwNP OBtFdNHbySLA3TbEW4S3GhvimRDqlhTmnhbllZccJM+PqZak1isyG+QZTaqs FnV2G1QGZbWq8BUn4+sDmJSmBeOszI2skSS1V+Z2VOVqqnO7avJAKP3NpWym CdV00YLABOhBzbvAI3iKJeLJWyE8me2vNssmC/2GvIkQT9igE5aOF7KJEE+I R/ob87sqM3QNecNtJXh2rLVkoq10tktOGCLEE3rIKrvAJgu9inmtfGWgfHei 8RbPJjQXnku7Q1v6g53he9tD97eHAR24KOQOPvluyMXTBMY7a/3Uy4scEzoT y1B1FkuXMB9E2CKY8iNCQ4Qi8EZOiulThCd8Tdci2SVEJRA4hVoK0xVqLPz5 082vXuyCSj57sgVhIZy9SHiCrTIugl9Yky7haHjTXsF0A7tCrbQYTZBrwDp3 CbMkrEaL9RlmnYqFNV3CvDljE7pOeIK3ijfMnBoq4iJIAZv8z/fPiVDwkLGJ 0UATYSKe+nH9/PXzX755+fM3z376+um/YRMTBjGKnwjIhUvWMyz6/pPbVFDH E8r237+4/dPbg79+cuPzpxv4vsApAJMfv7r3/ae33r26jK/vqxc737w5ycKf HCfHyfFbh1k22Rkr662Mk6c4gk1AKFMd+VTTZSRAilkqAbCYLesSVHYZyrqE 1VzCCLwRmAgj7WzAOnDjfWzCWICRCIHJgraAK+U6wgcx2AQCmzAeMavVPhkv KdgE59U+8fvY5Pe3NV7Vm2eTjWNsItvuPwYmlIWHQCWEJ72SQLJLOMcEYBJ9 ScHJUhFjI4u1lcbaKlPdimMcyrL82lVJfXW5ffX5usZC8k3uX52+sTE00C7X tyv6myWVhbGNslRFVpg0LUhTnrM82Divq13Q10/1Vk70lGPD1t9YpK3L76nN 01RgK5U/0l46ztVrSahL8KxWApFvQgVd0FK/erZHiWeBJOvDtVTTtTJkhk2W 9Y1gk43RjsszvfvLQ2CTg40JatJFdgmJHBPo9sY4scnaWCexCcCE+nR115S0 8mxitqaL7x6coMyNIzZR5sbIs6Ow8/+9bFIaUy8mNolvlyeCTbqUSQxGGI8I S7zIUgGbaCuzOyoz2yrSW8rTGKHUyRMITIhNyou4nIskM0CZx70HAhNVPjeB 5TibBBOb5CcEZsf6pUd6xQc7R/hyYBLsacPLNszHgcwInIN9RP6edh7OF10c zohsTjvZnXVxOOdkd87eiivZsr74gfWFU7aXTtlbnnGxv+TnIfLzsA/2dQab gFBc7C+ATbiYiYuVs+Mljk1cODZxdbVOSgoTF6U72V+wOs+9Au5PjQvOSAhJ ivJJifHLjA/KTAhKjfaNC3GL8BPFhXr6OFvaX+SC8662Z4EnbnbncKaFh8MF IpRgL4dIf8eUCK/cxKCitHBxVrS6CB9UVmdlYXtFQWt5blt5bgfOZdktyoyq kiR8g9LMMMITWXZYZUl8T10R1F2bD/XUFfQ1FlNBF42AJ0jBmouWdKkoeEIk AkgBjJCHgqfoCtgEN5j3TXRVplRiVOLF2MTIOoFwBWdQSZsquRV/i/h/PRht KR5vLZnulFL5FtV0EY+QXcIadi32Kef5VBcgZWuk7sZ8B9jk7rqOq+kCaKwP EJvc4eq79DT2ndwTNqidEQqtjboKMxIRgglrzMWSJrQ2tVRYvRbzR4QSGivs ztd8/v1D3j15c7BEiwdXxqia6+OHq2SaYA/85XNu+PunjzchmnWCHTLhCXXo oigH+REk1l+L2SXCgAmLojBkYK4BOSaUCiesMMsmLNLCwMRoBj2DHdZDmIq1 CHzI6/n69VXmttBtlDdhNgog5ddvjBsIC9nk12+e/uu757iBw4e3T3969xxg cqgnhpouTg+E+vkwzyKs6RIWdx09+xWoh/vjqGvxz28fEq/h/eMLAnfwXblu v3u1i4f0ZfFtn6/85WMugfLth9e+++jENzk5To6T47eOK1Plx8XNN9kdV/fX JJZluMqSRYpUp6n2PLAJGSWsrIvwxAg9SAxezELKMetkWGaUNzHrpLD+wMw9 MWp+ZcQmh7ZIEeEJIcl8T/5cdx6ucz2yeLTh+nTxBV1C04Q1Fj6mPs46obIu jk34VAiExaqu5JjM5U1oYL3w3XKmz3vYxNQ32dVLj2Xh+Tg8wGS9Kw/nAUVo VaItM01MfROwSVG0vTzNq1ESo63N1jUU9DcVaeoKpwdqn91eenF3ZUij6m0s ba/IqSqKqxMngU2KE31TAkWKjHBdXcnurHasq3ywVaZrEvfUFLSVZXDlNMrU nupcfUvxaJt4vI2Lk3AA0iOGeEKRzmo5PIEWdWATxXSX3JRNpnvKxzuVPJuo wCaLfN4EbLI3rb21pL+3PgY8ubM5QS6JYMTJPJkmxCa7s32rox1gk9HOCmKT gWZFT21pa1ku2KROmk6tuohNeDBJoAbCzDeB/iM2qSuNJTZplXFsosGWUpnU w5smRr4J4QnDFnJPOquy2iszWivSm9WpjapkwhMgSa0snqq8wCay7CBxhj+9 B2ITLv+Ct5cTadY3yYnz59jEkDexC/G04SMnduFcQ2AXKMzXKcjbwdfdxt35 gjPYxPY0yd76tM2lU3aWp20tTtla4HzazvKMs/0lXw8RwCQswC3Ix8nb1cbd 0cJVxA2FJzahyi6R6IKPjygtLaq4IBXkYnPxA5uLnG8CNkmO9o8NdY8P90yO 9IGSIrziQ92jA51zUyNjQz2drc/ZnPtAZHHKyeo0YxOgirP1aRcuosJdCXSz ig92y+EnyBemhstyAG6ZmqqSzsqi9orCzopCTQX+KuY0yjKqikGacZQ3AZ7I ssPVhTGaalBJIaiEj5yUsqGKWIBKqKZruEMOPOGmwPNzT8hDoUQJ6zNMpgnA 5L3WiSBsIhxxwsQ6d031KE3xZKZXhfVoh7i3Lqe9LEVTkd5VmaFvyB9rKQab UBweYDLVIcGCugcTnlAQfqFXudCrgJZ0Zev66ivTLbdXesg3AYbcXuungi6c 7x225yIRgxxs6ilIwoYwGmVSWPctohJD2IQXddaii+SJ0HwTo9ot1pgLoqQ8 oQp7lrLwR0/d45ImFDYhowT723u7w3e29c9uzdBDHkygXSM2IaMEe3tqF8wm krARJ0b9tYSD4E2nLjKUYAYHK7WC2LB4IZvQQlgwxgq3WOmXsCMWC5iwPAuL n7ACM9bFS9jO91/fPfvvv7wAgLCBJsLeXP/8lhv+zlPDox++evLDV5xjQmzy My5+g/VjUzb55fgketN+wkd6CyZ6etQK7Nsn9Mngqbcvd2n6zF8/AR7eePty B98U8IQq9LD+4Usw192TvMnJcXKcHL99mGWTvYnygZqk8ix3VboLNNGaCza5 NlUBEZWYRZL/iE0ITxib/Ns+XcwEESY43pc3MfIs8FMzmpzZrlxmmuA2/NGc Y3I43ITCJpvDCiyIWbjFYQ4FbMLFTI7YRELZkN/JJsJ3exSW+d15E7NsQrMX l9uzBhRhdami2hSH6iS79+VNCqPspCke1YVh2Pz01ecPtpSATWYG69482Pj2 431ASn+LpLU8u6IgpqYkAWd1bmRGqHOjJHVtuOX6ir6/WaqtLxlokXVXFzZI U5oVafXihM7yrIHG4uFm8Uhz6Xg72KRshkvBM+tETprvUwFMDtmkbmOkbmWw itV0gU1G2+Wj7VzkZK6vZkXfBDbZneq5sTAANrm/yZkjEPDkYGeajV/Emtjk 5urIzkzv8nAbZeGBJyMd5fpWFbFJoyILeFIvywCesB7CIJHDIHyCMpczTQ7L un5vTRfYpEEc1yyNE7KJtpLzRHqrcoQiKmHMQtaJpjqrszqrrTKjpTyN4Qmo BITC2ESaFVia7ifPCTtW1pXDlXWxvElJ6lHe5HgW3o6y8KHedhF+jmSahPo4 BnrZ+7hZOzuecxKddXQ462B32s7mlI3VBzaWpyB7m7OO9pecRBZODhZYiOwu BniJABo4ezhZuom4eYueLnwKHpDiau3mauXsbBEU5JaZGZubGedoe47YJDLY MyspPDU2MC7MIyHCKynCOz7UA1RCNV15aVHZyeF4M/wwlA8cLn0AJAGP4Exs QnK0POVue9bf2TImwCUrNrA4LUqek1BelNquLtJUibtrwMjirsqSNlV+kyyL OrCBTUrTgilvUl4UCzDpayzRNZUATMgxgcgNAYxQFp7mftKMeMITMMj8YC0E EqEpjXSR2GRGV2WqORPThPGIiY6xCeHJnE5NbDLUWqxryIMGGguITWg0PM4T baXCEi824oSDFN40ITZZ01dtjzdcmWm9udxzc0W7v9J3e023v27Ak/vbQ0Qf 5JiQOUKQQmMZyVLBQyIOmorI8u/CUi5hqp36AzPQED4lNFAIPdgEeVbQRWxC zxquH3D0QaESnIlTHl+fvH95FOfn+7NvDpYoCw8YITyhmi4hm5CBQvETBiCm qROWNBGWYJnmTVh9F0ujYx9uCh3Cki0GIMKBjEI2YckRusLy5qy3MEMk4VOM en795gnAhLEJ4Qm5GCS2/pnPm/BU8ozX01++fWqeTY7PXmS1Z0aowv2Obx/z YxwfH9o0ho7H//P985/eHvzl4xtklHzz5jLORCv41h5dm3h6c5oSKN9/etKn 6+Q4OU6O3zrMssnlyYqBmkR1pltZhivYZKw5m7LwRCXACi4qMiBe6y81yyaE JO8r6xJaJ8L2XEYSNgomK4Rt8oU7f1M2oTNemb0IFlMdWXPdecIf5J81YIgw 9o6LhhAKzyYGftHJqaaL4vBrOqISsSmbmE6BZOEXYRaee2iOTThHRnfEJlwQ Xq/cM8cmKx3Zi60ZYJOhssiGdCfgSX2aY3mclTrWkvp0gU34Pl0O4nhRYbSd LNWzIi+4TZWsrcsdahP3NJaMaSvuX53+4sWV4a6yvqZSTXU+zx3p8sxQSWqg MjNsqqtisFEy2KJsUmZNaqt3Z7XjmvLq4njAS1VhbLsqU1dfpG8s1TeUjLVK wCameRMuctJXNtujmOlWLA9Ubo42bI01rg/Xro00LQ3WEZuMtMlG2hSjbcoZ bdUyzyY7/y97Z9ndRpa9+zhmWxZbZiZZZpJsWbIts8VsZmZmjNlh6kAn6UAn DUNNSdNQ88z/3rXuq/uB7j61peOK7GR61n3R/cK1nlXrqFSSK0561vnNs5+9 l4duETYheZP7h0snrJMNjJxQNtme6QY2WRlpXhhwAJ7M9FhGWhqQTRBPWnRK 3MFiBZdZk2+rLgI8ATZxB+Fz/js20SKbFPQZi4BNhuC36gaTscYK0HiTBgQv MWYC76JI5KS5YrC5HPCkz6nqdhd3NevzgVDgjGyiVSXVlcTr1FI0TeBMcvFq GezAX+vTJXf16SrLTSjJiM5LCc2IF6RFc1OjQlKJdQJsEoqmCbJJbDiHF3Je wPcSCX0E/PM87jkBz1ss9Cez3SWcyHAeKDpSEC4J4XN9wwT+KXGhoLgIXqQ4 KJTvFyYMEAn8BEATpE9XYGhoYFpalFKZXVleGC4O5AV6Bft6pSWEy7OTslMi ZYmhmcmSzMRQUlfGTIEEXCqXyyqV2UAu8WEhgoBz4uDzoRwvYaAXnNmQAmwS wfUR+Z8P5/hlJ4bVlGRZa5TOenWnqWqwUTvebh5vMw4563stVV3GCoY6C7CH MPyKHHUFzvqCPqdmuKUG2ARzJdgoGIT+CHVPsKYLi7sQQ9ANQa8E0AOphK5P CpMm7LwJ7SSMSHJsoIy42IRtnSwO6GZ76qa7akh0a8gA67ne+gWmpmu5twFj JoAn8JJ6KFjZhTH5jWHDBjNFiLDJlPNwrvlovuXGZv/1zf5bW0N391xs8uDS zHuXZ2kpF9tAYQ86wQ7DwC+02S/GUtiitIIuCbykNV108jslFNqVCxgEYQRD JcgplFDY1z97dghIgrVbiCdw/uDeBlAJ7GxhgeTy2ftHON8EqATwhLIJIAYg CeAJEgp6JTRswq62YjfvosYKOyZP8+zs7l74QXafLnbLL9zM40YdgYLtobAR Bnf7NMOC9WNwD5op2MILr9MbaNQFHuCnV4/ZJIKidgnaKLD4X3/94N/ffvSv bz/+5dsPfv7mBegtvslPr2MIZahf3H4Kq9brCbAJ1owx3cBcjQKYzD7Q0CP4 q4G/po8fEKMEYATWH7279fjG4ruXZ+D86bPDrz6+9ltvfM6Os+Ps+F0ft1Yd aIiAbqzYbqw4biw7Ls+ZZ1rkDlWkWRGqzeMtdqivLzYeTBguzZgvzZqOpoFN DJfnTJiFJw2E3SNOGBkom1A8oUhykTUohLAJHafONODFyAbs8D0a87JT82wn 5dQ0yknAoWjATn/Q2YsuZ8Q9IH57tA55BAXvwsv9cdPuqAG0N2aENb7Ehafe OuKEnZfZhz8vS+w/LBFBlYbDSS2sL81aQJeZsZWXZo1XZkg6/nCkdqOzdKtL CWzSXippVgiaFXx7LhlxYs3lWXP5ljyBOU9syg9tyBEbCiP08hizMrFbXzTV XjfTpZ3utq6Otn3y+PqXH96d7jaPtela9aWmiqwWfbG+LL22OGmm17gz29Fq KC7NjB5u1t7cnp3sNDmqCqwV2VX5cYZSaWt90ZCzbK67frG3YXPUMt9dtznY sD2q3x7Rbw3rtkeMO0xQd2VAtzlq3p6w70w59+ZaDhba9uaa9+dbt6cbYcO2 2G+Y69HOdevmuvUbY07Q3mzn5ZWBWxfGHx4tPjxcpGMWUZg0wbGM2KcLfRMA E2QTAJPxdn2/o7rDVAZgAlQCfy5sJow1XXC2VhZZNEXmCmCTfGM54EmOoSwH 9vx6dQZs/kHoUICAR3TqVK0qxVCWZiqTWjTpztqsxhoccZLTqc/vNRUNWBWD tuIRh3oU8OR1jdjJRUCViSYNaBywBfilqWK4sRx+dYMO9YBd1W8r7bMqSbhe X9iuK3BWZ5rLUkGW8jRTuYxRhrFMxvTpIq26dOqMBpWsTpVeU5JWKU+tKEwu L0hS5sXLs6JzUkPT4/lAJclRIcnRIdJ4YUZSaFpCaHpSmDRREhPBkQh9AUYA T0BCvi8ZTQKIISLEAecIpg1XdCQvism88znnhSHe4aKA6PCQKAkH6CNSEgyE Aopk5pvA9dzMhMqyAqUiKykhnMvx9vM5Fx3OT44TpCQIs6ThGakSWZIgPZGf mSLIk0mKsiOl8dyS3PjqUlllSXpGgoiMROF4SbheYfzzgmDSgljIOS8R+Ip4 5+HHERoS+AuDzwMZFWYmOAwam66sw1Hf22zoadJ1Nda322vabNX22gL4m6ov Sa0rTgFCsVblOusKO8yqgcaqiU5AEtNUt3GyywDnmV6Sc8cgCZZ1AaegtwLX YQ0AsjnVvDXdsjHpxDGLLDlx/CJOXdyYcm5ON27NNF2Ycs03oYl4EOIJW4Aq xFgcMhMNmlcHTUQDpo0RK1xf6tWD4OVKv3G2o26+swYEhIJ4guH31X4dXeBF 0liYMU0ujJmATXYn7HtTjr1p59X13psXBu/ujt0/mAQwATx5Z2/szs4ocVL2 xnEcPPom9/fJvHiAEYQUzJhQMKElXsAXwB3IKbTHF0UP9lxFJA4s2cKiLzp+ EW0XYBk4f/JwFzDk00d7uDg2TUifrl0c/g5IAgACwoAJ1gXhxJM/Ptp59eGV L15c+fPjgz+9t/+XJ4cvP7iKDAJIggETtEJwGAdNx+NLFHVP2MDCbrGFOANb bqy5olyAwRO2LUL9F2qvsHVqRy96J7oVtKUwvYggQH8E9gpDv4ad60chRNCm XtjRC+nm52+e/u9/fAD6F1z89tnP35C8iTsLD4TylOnf9f4PXz7/CfTq+c9f PgPu+NfXL2CBY1BItdjrfyLmj/8ePg8hqa+O+xvjRVjAb+PLj67/5ckB4Mm3 f7r59R+uw18lEgqc4W/zt974nB1nx9nxuz5eYxOSKCFscn3JvtBR2lgWDWzS kMudbVFenrUtd5Wv9VZuj9QeTukBXq4vWW+vOZnaLTNrOrz+yoLu1G5dQCKv VXO5hgy+NsSQ7s8RUsjmnLmHvHVaCOVNCPCmQY0ebEJ5xOVcsOLwroKuCTe2 jBkZGdyLN+rXs8kpM+UnG06d53g0YyajKmeMDJuYrs4ar80aL47Vb3WrL3SX zlqzOlRhwCZNch6wCYMnfFuuwJLLsEleaF2WENjEUppoLElorMwYadJMdzZM dVlWRlo/uHPw+bObuKUfadVaqnLtNfnGioy6kmSgkvGOholObVVhikIaoVdn VxUkpYoDE/jeGZEBNflxLXUFE23VS/36ua7a9WETaGtIC2ACujCs3xk1bY+Z YNeEbLI75dyfbT5cbAM22Z1t8mCT2W4dCMBka6LpcKHn6trQ7Qvjj44WHwOP MDDiIQSW+0dLN7enL64M4+DF19jEWdNpLgc8OT1vUknAhLBJOWETABNGWYay TGQTqmM2URM2sTJs0lSb3VyX7cEmY43lgB4eIiTi5hRY48XRJs0IgydsNuk2 KToNRa0NeQA+gCf2SplJnWIqk6GMrh7C6bD31qpkwCa1pdJqN5uASvMTgE1y 0ySyBAGZbBLDTY3lpSeI0uKFCCZJMYLI0EABQyV8rreA54M8EhYaBIoE+mCo BGeX4LR3YBN+sBchEWbeIsAISMzzlQj84UqYKCA2gleQk6xR56tKchPiJJwg L3+fc/HRgrSk0NREkSI/UZ4bX5gVlScLL8gML86LURUlFOfGKrJj4GmBTVT5 yfCQEi7gyTkR5xwv8Bw34JyY6x0h9g8X+/M53tzA86E8XzHXJ1wYECvhpMWK Wm21DkNFs6mqt1nf32YYaDf2tuhsNflmTTZQG+AJCPga2KTPoQE2GWquBTyZ 7bOAYEHdEwQTNE2w3AsvAp64LJJxO2IICvGErnECI7AJwZPJ16iEWievJU0Y EWNxyAJgQthkwEQF14FQYIGEsgyU1NMAVILVXAApOO0USMQjCE8MFBeYmHcm rJRNLi51AJ7c3h7BvAnozv44YAiIjoaneRMq2kkY8YTdd4tOJKGpE7xIF2iU 0J7AdOIJfoq2BcOOxHDGWi+aiEdXxVXc9R6xRahgE4uEgrGFTxlXBT2Ujx/s vLizCfrDg12cAAjCSfE434TOi0dPBDPylE1we+9RwcWemUgJhTbsYtdxsdt2 0Q969LaiOXoPPPGoEKPjTtgDFmkxFc2hYAsyrPKi1V800Q/vIklR48bly7x6 BHjyP397DmwCC2CTX759jr7JcUD+y+c/vAI2AR55wQRJnjFyNftCNvHo34VG D4IVGj00189+eBxlggGTrz6+Bn93H9zb+Pz5RaCV33rjc3acHWfH7/o4lU1u rTau9JQ3lccgm0w1yi9OW4BNljrLNgerjqYN1xZt15ds+JHrSxY6IJ7NJicr uOBMryBxeIw7QVE2YcPLwWl7/lM7er1dbEJh2yWUTS7OmXC4CWks7O4tjFl4 FPbsOpgwupt3vaZfzyZsFqNie0nH4DZtOpo2IZsAFV6bM12fM12e1G33Vez0 qudsyCZ8Z2GII48HsucJbHnHbFKfLTIUEDbRy2NNyqQ+S+lURz2wyeZk18f3 L3314b3l4abh5nrYzLcZlJaqHHNlFuCJvTav116+NtHc1KDMSxSVyKKq8pNS JSHhAediQ85lRgRV5UbDpnp1yLTQU786aNgYMTN2iYtNtkeMyCarg/qtMTJ1 8Wix/eJy5+Fi+/58y5vYZHuq5eJS37X14Xe2J4BNnrpbclG7BIVOyr3DxRsX ppBNNiba4U8x329HD2jAWdNtqYA/EbAJu0mXezT8KWyCkRNEEpwkAjJWyPRl acAmenUqYZNKmZtNctq0uV2Ggj6zHMBkyF4y0eQyR9hi4wmyyWRz5Wizi02G nGXIJognwCYt9bnw5YAnNk26UZXswSY6hk0aStPrS9ORTaoUaZqiFBDs9mHP n58enpkkkgGPxAvSE4RpcQJpvFCWHJ4SJ4oUB4TyvXnBXqSmiwETsdAf2SQi jBMbLQAwCZcEw0U+14cX4k1E0vFeIq5PhDgI2SRMGCAM8QYqQVMjIVooz0+r UOWVqwriYsScoPMBvl5JcUJZarg0ObSiNKOiVKYqSirJj1MWxKnliRUlKeXy lJLcuOKcWDUglVwqz4pNiAgWBXsJgs7xg84Jgs8JOV4SoW90eHBirCgWcEnC ATaR8P0ihP7RooCUGF59eb5DV27Xqtts1d1NDZ3OOnttAfCItlSKc+Hhr89W nddjqxhsqgE2GW1rmO4xIZtgc2DX5PdBM4pONqElXiQUP2rFQfBsNkEhmFA2 OTVv4pmCfzObrPQb4SW6J0AlIGKvDBBzBASEsthdt9BVC2xCs/CUTch5lI44 sQGY7E8792caD+Zb4T+0GxsD7+yO3j2YQD1wM8jJgi5KKzSBgn2G2YVb6H1Q GEHHxKOZMNIKTcqzU/NwZg9wRCShfYMpm/zlAenQhb4JJk3c7YIvgxBScH/7 5ObSo6sLdw6m7h3NPH9n49NnFzH/jpNNAE/ocBOcHU/BhL3Gl+w2wrRVF22x Rb0S5AjEE/aMRY/xiydb7+I3e+AJ5Q5KMdiJi05gxz0/aRfsdk+olUN7grG7 H8MfEykM3n0tYg9wBN8AyADgw7DJv/764udvSGUXJlAYPCGZlJ9ZbPLjy6fA JsdBe1bYhLYvo9l82uUYzugTIaYxtAJ/xodM2y54yHe++vj6yw+uAJj87S+3 f+uNz9lxdpwdv+vjVDa5ueJc69M0lkVbiiXaPN6ks+jSjPVgwrA9XLc7Vk/+ r/sFK5ZsMR+xXl82s9nkV4ZNPJwUSigeDoLr4uth+bcE59+CBicIheWMuAnl aNYIwuwJ9VD2xnRMFt7IsIkO2QQHMnrqv2GTk6JsgjVv+PJgyng4bWSxiRnY 5OqUfodhk1lrVpsy1FnItecHNxYIQI58IbKJKVdkzBUjmxgUsdqiGENxQru2 YKKtdrzNsDTU/PTG9qsXd9bGWkfbdP3OmqYGubE8E9gEZKnKBkKxVufoVJnp kcHZcfzynPisKG5cyLlwv3OR/l7SUF9DaRLWdK0NGYFNLgzrLrjwxEDZZGPE tD1h259pRjY5Wupg8OQUNtkcb9yeaj1c6AE2ubs7BWzyhFXNhV7JoytroPtH JIRy92Dh5vb0pdURZJOloUbKJoONtb22yi5LBVZz4XwTJJS3skk2m00ABIwV AAVpOnWqTkXYxMawCc43adfldRsL+y2KQVvJsEM5fppvQiEFkAQ01VIFYrMJ tU7QN2nT5gOb2Ctl5rJUhk3SCZio0w1qMhoe2QTApE4prVGmIZtUylOBTVQF ibDhBzbJShZnJIhkoEQRAZNEUtMVFxEi5noLOOdEPGKaCPm+wCDIJq6GwAyV AI+EBHuhOEHnQgLOAZuIeb7hokAAEzgjm8BaIvAX8XxTEiRKeQawiaasKCZK yOX4BPmfT0uSZKVHJccLKtVZ1WXZGqW0TJEMYFKmSCovTlbmxZUVJcPTyrNi FNlxipz4XGlEON8H8ETIIWzCCzwn4JyPCA3ISo/JlMakJYQBmIhCfCKF/okR 3CiRb3x4UEF6TF1ZbqOxvMNR22qtctYVwV9ZjTwJBIRC/gFrslt0xQON1WPt WhSACbIJOibs2SXYngsELxFPSK3XiIWyCa3gOlWnTjP59WwCAh4BQsG3yGLY sjFkwqQJ5t/pQJOTcpsmbjaZaSSab4H/yq6t99/eGSHVXPvjcPagEuQUjMAD m1AkQeFLrL+CM34E2IT240JzxINNsIgLC8BoWRdNylPbBT9CUyce+sODbWwd jIRC0yU4tg/Onzw9wKEnwCa39yYAT96/vY6+Ce7bcY4hIolHHRdSCdoocAPG UhBP0IOgwROKAHSiIu3chZjAni/P7tN1klDYkROPZP1xutxtN9BCKSQUWOD+ H8eawD34kB5MhF+LZWzUOkEX5t9/fR/Y5O+AWvBTgFa+Bjx5/5dvn//8zXMW m7wANqG+iVvPMO3OVHY9YhsibF+G4gmWk8EaZ7XAkzBA9/Afn979659v/f0T oCpAvHvAKT+8hGd+97fe+JwdZ8fZ8bs+3lTTtd5f6VRHAZvoCwTAJlfnHVfn 7RenzYdTABRAHJYr84Q+PNjk6qIB2IR26GITCq7ZVOLRs4vNJselXEz+gk5C +Y9Nvdi5eA8oOEkoHtVcOBEez0goGI0n/DKuPZjQH0wCkpAmXfvj8JD6oynD Sf0XbDJ9Cp6wq90omxxOmw5P+CbXpg0Xekgcfs6WxaTgg215QU2FQpCzQGTL EwKbGHNEhhxRTQbfUBihK4rWyWP1inhruXTAXjbVZZnrc9w7XH75/Pb2TPdM j2W0VWuuzGZa6WbAThioBAilriTZVJELbCKL4ijTI6USTmTgOVBM0Ln4EK/K 3PCJ1spjNiGOCeIJYZMLTMHJ1piFDFucbjpaaIctEwgI5WCh7U1ssj/XdW1t 6N4+bJ9ITRfCCIqOOAEqubM/D2eaNwE2wT5dyCZDTXX9jupuqwabdLHHL76p puskm5DsOemUJWXYJIWwSVUGsklrg4tNBqzFQ3bliLN0zFl+UsgjM201s+21 IFhMt1aPtbisEzab9JiLkU3gy5FNSE2XOt3IyMUmKinsvetP803UDJsUyCKy WWwiSxRLE0QxYcFhAt9Qnrcw5DyTN3GZJiBcAJ7Agss5T3iEMVaAX+Ac7O8l IOkPf6CScLFLgCpRYRwxzw+UkRZdXpqrUedrygojwrghwd4hQb7Zspj87PjY yGB1SXpVWVa1OqOyVApUAnhSWhgPD1mhSFUXJhVlRBXKouVZsfLsuMRITrjA m7IJF/Ak5HxMBE+WGiXPTc2WxqbEhcaEkjnyACaxkoBYcYA0VlBZIgM8cejV thrSpKuuOAUEf2WWyhx7TX6zVtHr0ACVjHfoEE9ggYVb1CuhLYIxII+C63Db 4rBpeZTgCbAJgAnJlcw2o2ANcoHJlHNj/BTH5L/yTbCO67USryETewQ8exA8 Xbjck1HTcU3XpN2FJ4xvQthkm7AJ6PbuKJojHoSCg+Dv7I7hvEUEE3RJ2OMX 8S3kDsomFD2ojYLZeTp7kU6Kpx4KTqLHSStwJ9ol2GT400d7n723D/rTox1g E3RMPn12CCQCeII1XWidsFp47X/87s6Lu5sfA9Q8OcQ2wkgBHkiCqMKezEgd FnbDXtpYmM6Ip521aBth2uzXI+HOLt9i4wmdhOKBJ7SpF42f408hNPHtM9z5 0/5dHlkP9vdTU4b+IFqBhl/4LyCar598B3cy+v7Ve4xj8uykb/LTq+eMXHmT X+D6y8ffffbwn58+8OApdtifnZpB34dGXZinIiMXv/njDWYWPDDgXbjy05fw YA9+643P2XF2nB2/6+NUNgFtDVYDm1hLwgyFwnF7AbDJpRnL1Xkb7I1hkwxn ZA1S0+VmE0ZGohPdgymbsHmE5lBO1nSxK5pcu/Q54AXPnsNvoYA3QcHrGfnX qIS26vKYDk/aC79WeaV9LbT+ut7+VK/Njjzt43QqJVtHM+ajE3mTG7OmzW4V sMmCIxfYxJob6CjgtMjFzUWixkKxPR/ZRAhsUp3O1eZJMAuvk8fVFsbYNBnA JktDze9eXP3rHx9eXBmG/Tzs5NuNpc06hb02T1+W3thQ2KQtAk6pKkzJTRAW p0cqZZG5sXxZRFB2DEca6pMiPI9sstBTvzKgJ12Ch/VbQ1pgk51RI7DJ1ogR dk2bo+atMSuwycXFdjRN4PwmNtmbbT+Y776+MfLuwSzWdNF5i+zZi0Al7+zN gW7tzNAewtikC9lkuLl+sLG2x1aJeRNa1gVg8l/lTY7ZpJSwib0601GTiX26 OvT5PSRsUjzsIGyCzoiHAEwARiibIJ5QNqGRE1C3SdGuK8CartPYBJ5BqmXY pOG0vAns9kty44BNspLFsnihlKnpksYLEyI4hEo4XnCWCHyATQBDhHxfD/Hc ORQ+1wfghVl4cwK8SAWXMABT8CBYwMvo8BARF74qIDczoaq8EKQoyhDy/bkc Hx7HvzA3qbgwNSosoCgvoaxECmwC0ihTAUyKsiOVefGl+Qmgkpw4eWZsYUZM XnpkeoIoLjxIwvcRhXgBngCbcALO8YPPJ8QI1YqsKnUBnHOlMdI4cVxYYGyo f7wkMBEgRRwkjRXVl+caK7KIncRk4eH3Y63KhX/DXRZ1t618qLkWU/ATnXrK Jli+Ra2T1TEHmiZooKB7sjBoRDxZHbdRNtmeawEhnrDY5P+rpgtNk2MwGbKQ mi732HdszMU2UDzGL2IWHnsI74zbAE92pxx7JNjVzvgmo3eYNsJvyZsAntzb n6BXMPyODYSBShBP0EBhx0/YgRGs2vK4wUPYYRjz9fCz4EkAdqilgmzy+eOD L54c/unRLjVNaKsuoBI0TbCrMHooX7y4DGQBPPLnxwcf3r/w4b0Lnzw5wiAJ kAVgCA6FxwQKLe5CNqH5d3ZvYYoVNN6O5sipUMCeYHIyWsI2NWibLzaeeIyJ ZxsoHjyCW318JIQjOq6RXWDm8Tz0LbRLfv7m6Y9f4SD499xNuk7kTVhswrQI JmGT7z9/BHjC7hXGTvGzxa5MQ5eHeU6AlHf//sk7iCew+O5z+G3Ar/2sh/DZ cXacHW873pQ32RmpQ98E2GTUmnd51nY0Zbqx5IR3cYd8Zd4MZMHMYbQgm8CZ kcmjPRcVu8qLPR3eIxHPLuuiN1yaNwKeIKFQNnnT1Pj/yCZuPPEMwruSJpMk acKeyQhPwo7n48tTi7J+vW9y9AY8YbcLwJcXmT5dl1x9ukxMny7DrXnLZpdq u0e13FTQpgy15AQ2FnGBTUBsNtFnC2szBTWZAmATe3maoTihPFOizghtN5RN dJiubky+evEObO/n+mzLI832mnxDeYalKhvwpN2ktFbnVOTHKDOinXXFPbbq mqKUenmqTZNTr0guTOBKQ73KMsWD9tLZzhpkE9Kh6zU2IeOq14eNgCf7M02X ljvRMXlLTdfBfNfFpb6bm6PIJs+vbz6+toE8AsKyLhB2D769O4tZ+N253gvT XSfZpM9e1dRQjKPh3dVceXA+lU2wTxf26WVadZE+XQAmyCba0uRT2MQsRzYZ bVSxAYRNIsAmWMoFC7gy11HHZhNqnaBjAmDirM60wF9TaRJlE4NKqmexidbd p6ua1aerjMUm6XGCtDg+KDGSEyHwEXNJCywQgEm42D9U6A8wAgCCAgbhcrxA 2LYLyAUgBcu6uIEkbCIR+EeIg2IiuIAkWNyFbALrgpzkGo0cJJPGhQSfF/D8 eSEBwCaq4vS4KE52emRxfqJGCXgiqyhJUeRG56aHFufEwEOqChLVhcmFsujc tAhkqJQYXkxYMAAUP4iwCZc5hwn9s9JiFHlpKnmmpiRbWynPSYuMFvtF8r0T woIATwBSUqJCqgoTaxXJNfKk6qJEIBRLZU6zVjHYVN1rrxhorGLac5mRUGhB F3boWhm1A4nQwSX4EvAE1gtDRhDgycqYdX3SgS25duZbQWw8IbVeE54peI8p J/+xpou+3Bi2bsJn4R6mbzDON6Gtg9kdunBNCr2Gaasu8/aYdWfCtjNp35l2 wn9fV9f63tkZvXdIRsOD7u6OnezThcKUOhZ6UccE8YQGT/5wdxOnnNARJ8AU 2JKLJuWRSiitIHRg5y5AD1hgTRdACt5DJzPibZ883P3svf0/MCMXqYBTMBQP SIK5eACTLz+6CueP7l/AvsF/fLj37Nba83c2vnhxhZojcAYegSufPrv48oOr GIrHt9AWwQXNklM/BRPlHpRBi7vwnpMjS9jj4z2iJbT3F5tNqKvCnvyOZgT7 CjvWwY7G08djz6Onk+uRC2BNPCC4CMgAVxj9/M2z7189/u7le+4+Xc8YETY5 mTfBNsUkcuJ2dii4wRkNFPRKsPaM2is0IM/8ZuD6/W//BL/8m//87N4PLx8g nvzWG5+z4+w4O37Xx601y601881VRiuWG0TWmyvO7ZHatqoEa0l4Qy6/vToZ 2OTGUuP1Jef1Jfu1RdvVBSuwCY5ZvLpovrJgQF1dNFxbMl6a119eMIBgcTSr vTiruzinu7JoRLnfIu8eTNYdTTccTQOPAIzUsV/i4uIMESw8HJbD6df6eh1M oTzRAGcsAtewiYZFKFoPsXinAeX6Hnc8H/EEX57KJvus2MtJUPIoRTvmlFli DF2aM8L6EoNg9CLxieYNh/BHYERumzFcBoYaqdnqK9/p16y0KlpKJKYcTlNx qCNXYM/hW3P45my+MYuvyxJqs0V12ZLanLCa/Mjawtiawrjy3ChlZpippri3 2XC0OfPqj4/2VscWR9uG2vQOraLVpLLW5OnLZfoKWbU8viRD3KBOnuipH+us dTTkdFoUg83lw62afqe6uSG3uSFn0Kme6aqb79UBZVwYdomETUZMW0Tm5X7d 5qhlf6bl4mLn0WLnwXz7zgzpIbw72wQ7uuVBE3x2vle/NGDemmjanWm/tNx/ mzQQnn//2vqHt7afXNukVILj4O8eLDxiMvIAJkBVyCZrY6042WSiwzDS0gBg 0u+A3WlVi06J801YQfg8S2UByqzJYyabYDVXpo4pnTKUy8gQdk0mmS2iTjOo UvWlKXC2Vsic1VkAJt0Gebe+qIcZbjJkLRlvVE+3ambba+Y760EIIHQBQkih 8DLZWjHRUj7eXD7SqB50lA7YSRa+TV/Qos1rqsuzV2eZNTIEIqNahjIw4Red SqYtldWVyGoU0upiaU2JrEqRXlEIeJICUucnFmZEZiQKpbH8lDheYkyIRHBe zPcSCbyFQh+QSOQrFvmJREF8QQCf7w9noShIIAzk8f3FoRwhue7P5fnBSziH cH35HB8xzz9cFBwl4UaH8SJDQyLEnFB+gEQQCIv4KGFJYWa5Ml9ZlBUZxuVz /UKCvRPjxKUKmapYlpIghAcoyI5VFSVh3qQkPxYkl4YVp4crs6JKs6NLMiPl svDC9LBCqUQWz02JDooR+zDD4s9F8M9JQrzEwV4x4sCS3JQadV5FcaaxVuk0 VpYrMlKiBVFC/9jQoMQILojv71OSk1hVkqUuSK1WZjh1KnN1UbtFM9iqHe0w zg06ZwfsU92moeY6gNbJTuN0j2mu37owCCRiWxyyMmeSNwE2wXIvIJSNcQdg xUKffnHAAP9Kt6ebADf2ZltB2JVre6oJBDByskPXqe4JaHnYvDpiWR21rsB6 0LQ0YARgWe4n1VxrLG0Am4zAnSbUGtWoeZWZjQLrjXEraH3Msj5ug++Eb14f s12YJN2M4Ungv7WD2dYri123NgbvbY8+2Jt4fDTzLmOOIJgAIwBxAIPc35/A YYtwBW0UIBQ0SuAKogQmRLB5F82V4DewnRGs76KtumgPLsyV0DNeAQwB0Qg8 zZ7AxY/vbwNrwP8mffTu9kf3t//wYPfjBzsf3CX9uD64u/WHh0AoF9EK+dMj UtOFDYRBnzw9gitwP7wLO2QgCFgDsHz+/DIQCh0Wj3t4XCMvsKfDo4HiUTEF V2CPjbF0rARjtwtmN+/CLTqtEHP10frk/nefPcTiqO8/f/jDF++hGUH8iM9R j1yDQr56QoPwbPcB0YA2E2aH6PElrQHzcDRIGv2rJ//66sm/v34KYmDn8Q8v 3/uRmCZPf/z6+U/fvGD0wY9ff/DDVy8YkSHyPxA/hYxB+RfOlyez4N/76eWj H7+Ax77/HfOnowBFGyAjatHZMbTZMv0tsZydh7/1xufsODvOjt/1AWCCYvAE 2cQCALI31gBs4lBF6QtEzRXxl2as1xed1xYdbjCxXJ4zoRVydcHkLugyXV1k svBLJgQQKmATSitsuRnkWAyJeF5krp9uspxCB24KYEdUPLIqb7c2TiZTTu33 e6rrcbKBGHtxHDZhRkPiSxeYzAO1mdAb8tDBnB4EhHI0z9w2a7wyazwYrd0d qtodqAQ2aS0Nt+RxPdjElC3QZYkaskS12ZL6vIi6opi6orjqAmCTaFV2RFlB aqul5ubh2v/9X3+7fWltebxjosdqb5DrKjKNmixHfYGmKK4oje+oy10cM+0t t6+MWbrtxf2NpSOt5f0O5VibZry9crqrZranbqardra7bnlQT9nkwrDxwrBp iymPXxnQb4yYd6eaDufaDhc6gE3259oO5tt2ZsjWDjZpsANc6DMs9sMGzL49 1XK40ENqug7nnl1de3Fj6xFrvgmCyTt7cwAmcL66MX60PLS/0L811bky0jzX ZwM2gc0nOwvfrC3Bsi5sIIyj4S2V+WZNvqkiD2cvMtVcWa6MSVk6jjtEWSpk pjIpEIpJnUbZpMcg7zEU9RoKkU0mmspm2irnOlwkwhbSigehAJuMN5eNNZUh m/TblH1WZbuhsFVX0Fyf76jJsVRlGitILZmxzM0mBExcbNJQmlFbkl5Tkl6v yqorzaouJoRSXpBSmpuYL41MjxMkR4bEhgWGC31DgU0E54UCHyKCJ34ggBHC JoxgjS8BTETiYCAUONMbBCG+lE1AyCZhwiAQXE+IFleUFtRXlaoUOWHiYD7X lxN0PjoiJFMalZcVJ00OTYgJyU6PKMyKKsoGRYKK82IU6eElsgigEpBCFk6U EZGdJADJErjJUQExYu8wrlcY95wo6JwgwAsYJCc1qrQgrVKZba5XAZ7oq4ur Vbl56TFxkuAIvm+0KCBG5BfBO5+XFmmsUdSqsssLUxt16t7GuuF2w0i7YbLH MtZpmOg0TnWZprvN8M9jsssw02tm2ITgycqoc3nEjvVdc/1G7OIFKMFGDGSQ nelm+Ke7O9OC00yQBWgDYQ82YUfjXQbKiFvDLidledBtnbC0Pmhms8kxpIya qQiVjFlgscLAztqYbWPcTp9qD9hkpvXSfMfNtf47W8P3d8YeHUzd3yM1XTT/ jml3fAnXMQ5PrRPgDsQT2kwYgyS0vxZ6JRRMaN4Ea7po5ITGSfAM6IGBd/YC 9OmjPZo3+eTJIdAH6C/MAsgCoOPDe6RkC0gEcIOQy8O9P723/+fHByC4Ab0S wBP4CBANXAQYgU8BmIA+eXIEL2m6BMu9AFXosHhKJdQ9ofVduNmm/Xtp8y72 PewKLrbTQd/656fvksjGZw//8YlrAWdcuAnlEeqHl49oP2Hc9lM8odxBG/l6 lIGxO4OxOxj/z7fvA5X8/Oq9X74kfsr/fPucTJP/9vkv3z4HAPn+y2ffExIB SPkQ8IQhFNfF7798+v0rYKInP3/51OWbfPEQ9cMXxxMkAYvgIf/3319gny46 7J76TezOw/g7wWf7rTc+Z8fZcXb8rg/KJrfWLMAmLjxZduxPaNurE53qaEOh uLEs9uK0Bdjk+qKD6dD1q9gE3RM0SoBNjma1xEOZ01HBDZREYHFpVvcmMGGz CRtP3kQH1IygdsmvxxN6D8WT3QnPWZBvZxOKHi6ued0ioYYI+znhJYAJinIK lrHBgrLJxXkjXLwyZ7o2bz4cqwPtD1UDm7SrI20FfKdcRNgkV0CGm+QICJtk i7TZ4rpsSUN+ZIMirl4eD2xSkRddlhuVmxqhLkidGWoFNrl7dXNuuBnYpN1a bqsrtFTnOhuK9BUyc2UGSQqPmlbGTPMD2gEGTCY6qoYaVeOtFQt9DWsjpuUB 3Xx33QKwSZ92a0jvlmFryLjJlMevDhrWh00Xxh1kyzTfDnhytEg6Ce8wNV1L A8bFfgOwyXyvYXnQsjXRtD/XdWV18N7+DLDJ+9c2sKYLOwbf2Z+HM843uXFh 6nBp8OLKMODJhemu5eEmZBPYgo6360nYxKrpMJXRLDz2EAY2YXwTF5swUxcR TDJh828okwGYgJBQTJpMq8aFJ6SBsJtNeo2KXoMc2KTfJB+2KZFN5jvrqGOC JALnha4GEF7B+i7QRIuLTYadqgG7Etmkw1hErJOGAmdtrrU6y6QBPkr3YBMA E1C9krBJrVJWB5CizKwpIeeKwlQVwyZpMbxYcUAY31vM9QoV+IZiokTgJ2DE 5/vyGMcEAQTW+BLOcAXYBA0UWBNa4fqF8gOAR5BNEEwEHF9YSASByXFh6uLc moriolwpN5iACZfjHRUekhDDT44XJsby4iKDpInCrFRxVqooO02UJ5MocqNL MiKBTQBJ5OlhRVKJXBZenBmZncjPTRYCm6THh4DiJL5omoiCyLD4xAhudmpk uSJDWykHMDHVlRpqSsrlGZnJ4QnhcHNwYjgnku8TFxqQnSypL891aFWOhtJm g7rLXt3fVD/eZRpp14216wFMXOoxYVfhhUHr0rB9bbxpecRBA/LYqgv+WQJc bE81wVYf67LQK0HrBCAFfRPQqcNNTmWTtVHrCuNxrLhrvYBN1rDKi0GSdWax CmR0AkyQTahdQjwU5gp8GwGTCQfRGMETeLY9YKiZlotz7deWe25vDN69MPLu 7vgDBkkQRu7tjSOboHVy+8LwO9sjSC4AKVjlxWYTbMCF8xbR6cBSLjr8nQ0s yClYr8W+DdaIJwgjFEmoAExI6uT9S58xwlHvX350HaAD4AKLsoAp8CXSB9Zr wW1wP7FRHuzAGS7CSwAZLPSCK0AlzKyNe/BxbMOFBV1sGMEIPH2XFnfh1hre wrEpiCfsKY00Mk+RgdY44fXvPnuAMPL3v9wHPAHB4lQ8ATZhl2/Rnl1s0aQJ 3nASRjxmkQBKuMDka+YbvmbKtL55/2fQtx+gbwJs8v2Xz6lv4mKTV8yIxi/e +/Elk395Rdjkp5eP4NvYM+KRjOCbKZ5gNRd9TspoNAVzxiZnx9lxdvzH4/a6 BcRiEyvonfXmvXFtR00SsIk2T9BUHgdscmOp8cbrNV2YcCdiD4Vf1J+0SJBN Dmca2IRC2eRwqp46JrDGOi4PnWzn9abk+Kl2yckc/ZvEJhrKF6ePRHxDFv5k 6zDP2i0GMdicgjCCPEJRBcM1cIXNJnD96rwZ2ORovB60O1C53CzvKo+2FwoA TzzYRM+wSX1uOLBJvTy2XhFfW5SgyY9R50QWyqLzpVGdjvr/89OXty+tjXSa B1t1LUZVq0llryswarLazMq5ftP2bNvKqGFxSDvbWzvcXDrSoh5tUQ83Ksea VHOd1Uu9dYs9dXBe7q1f6q7dHNS5pd8cNGwwpfLIJltj9p0p4A5inVxc6gI2 2Z52wg6NzSZY1oVscp9hk+fXN59c33x648KT61tIKNhM+PG1TWAToJLLa6N0 LvzCgGO21zrZaRxt1fY7a7oZNkE8wSw8miamihx3QVc+2zd5A5tkutjE5Ztk NtflEDYxKvqMRcAmI/bSyeby2fYqABCs2qIkAgsAEzRNaPBksrmSARP1aKN6 iJgmJX3Wkl5LSYeBsElzfb6zlvgmJqasi4KJnoCJVFuajmxC8EQpq1JIK+XS 6mJZgzpHU5SuzErMSgpLCAsO53qLQ86H8nxC+f4gId9PCACC4vnxeH7IJli7 RYu4uMx19FBcNgrfH8u32GzCCzofHcaDBVxJTYjIy0yWJkUFB3oHB54DNokM C46J4MREwBlu8EuK5WamiDJThLIkHuCJPCeqNCsa2KQwLRQEeKLIiAA2yU8V 5yQJEEwyEnmpMUFRwvPAJpKQ82Fc7wi+b1IkrzAzvlKZ3aApqi3Lr1blVpXm AK0UZMSlxghjRP4JYUGp0QTKMpPC6tU5XfbaDmtlt6Omr7FurNMIbDLappvo MICAXucHbAAmDJ6YmWouB5xdY02Yhl0khDJkRjaBrT4s4CXu/BFP4J8xEorH RHgaiqfjF19jkzEbZRO8DmxCJpuQgImLTUBvYhNAks0JGwgW9Ap8oQebkGeG h5xuPpptu7LYdWO1753NIcAT2qGLZt7psEWgEpKIZ0VRMAJPJy3SdsHIJoAY bOigJIIwAuSCXbzgjNVf7HGNmD35/PEBCAmFLeKkMHYJsgkyCNAHJtnZfYBB GDahjsmf3nNRCeIMFnR9cHcLgAU+jpt2SiUeuXgaBmETChaAIQXg2A72BHla pORRAEYHuB/H1Rk2oVQC+tuf76GH4oEnbCsEoxzsHsIg2luYtsaiP4UNNWxC +f7zdwEogE2AKRgv4+FPr5788g3xTYBNEE9+/JpQyXev3ge5nRRXTRdWoJHv f/kIwQS+6pfXe4tRiwSjLvjYdECkh7VEf12/9cbn7Dg7zo7f9YFswuAJyIps 8u52x95YQ2dtskMVVZ/Da66IBza5udx0c7kROwwzeEKacWFLrisAI/N6mjcB MLm6ZAJdWTQim8DiVN8EYeRgsg7x5D+yiQee0ItssaMldPN/apuvt7MJ2z15 SwmZp9yOCa3m2p2oo3BEwcSjfAsvolFCnxkfA2u6mMiJ4eLCMZtcmtQejdVt 9ZQtNRf1VsUDm1jzeY48gcPNJmYShCds0pAbjjVd9XIXm6iyI+SZsdnJYQ5d 2Q9f//Heta2F0daZAae9Qe4A1RcaNZnAJqvjTmCT7Vnb2ph+vq96ol091VE+ 2lQy7FRMt5fPd1UuMFrurVnrq1vurt4YaNgY0DLSbQzo15kWQyuwYHyTXaYk Bq0T0qdryolZ+IU+PYAJaGXICmxyMN99bX343YNZrOkCMHl+e/fFO3twhjXN xd/enb26MX5lfeziyvD2TPf6eNvSUONcnw3YZLi5vtde1WWpADBhBkqqmrUl yCZmTS5giLXqlLyJTiU71Tcxl6cb1WkgS3m6o4phE1NxH8hYNGBWAJtMtVQw bOLpm2DkhCbigUpcAxmbCJuMOFVDxDQhYNJjLmZquvI9aroMJAifzmaTBmW6 VpWlU2fXqzKZBsJpwCb1qmx1bkp2Yni8JCSc6xsa7CUKBjzxDeUHiHnAJv4C QiWgACK+q6ALkCSE68sJ8YEzzZjAAsAEDZRQQSAwSGRoCBZ0hYuC4QuFIb7w Ehb8YB9hiB9yCifQixPkxbAJgAknOjwoUuIfLvKOjwpmfBOxNCEkM0VQkBmu zIxSpIcDmBRJJQpZeHFGBImcSCXZSYKsZIInabHBsgQu4AmACQrwJEroL40T q4vSgUqAUCqKMzUlWXAuLUgrzIhPieLFhQbI4kWp0fwInk9SOMegKRjvtkz3 2UfaDUOt2r7GmpHWhulu81SXCdhkrt8KeAJnYJPZPtP8gGVxyIrR+PWJRtDq mAPhAs5YuEXdENj8A5XAv+HdmRb0Td6EJ6eyySpjnayOHLMJBuQpmKB1svYG NtkYtwKbwJlWdm1M2BFMNicc+BgET+AhGTa5vNBJ2QSjJcgj2CwLF3CGi8As Dw6n3nV7KzQOj1hB2wUjepAJife28CKm4Cm2eFyntgvSDU5IgY9/9t4+sslJ AZt88vQI2QRZA0AD13AdFpgcoTVaaJogkuBFPFN7Bd6C24Ap4CKpBHvvAGu6 8HuwmovGTOgERnbzLnbnK9pe+GS1kscYlOPwuJtN8Ix4QtmEjSd0JArNjAB9 sHf+7MHx9B46D5HdNeu4zRegBAMmPzIP+cMXj4gP8jXxTX78+jnq528//OWv HwOY/OOLp/98+eS7V08Jm3xN5jP++OoJwRMGKIhjwqROsKbLowEy/lqwJo3W mLFL49gtl+Gt33rjc3acHWfH7/rwYBPEkwc7nfsTuq66lMaymIZcPtZ0ebAJ UgllE3YWHqjk2rIZhHhCK7tO5k0O3aYJUgk1UP4jmyCeePQBQ3nYJXT/z4aO t+CJx21456kWyak61azxABBkkyuLZhB6JbQLGftpj9cLRpSbTUhN15UZw8Fo 7VqHcrlFPlSX3KgQE9/EzSbWXCHDJmJS05UTVpcbXlsYXVsUV1MYX54XXZoV rspLzkkJ12kKP3x0/frB0spk5+xgY7Ox1KFVNOkU1tq8FmPxypjjcLlnbUQ3 1VE21aGe7ihb6que79ZMtpQudVcu91QtdVWCVnqq1wBPemvW+xvc0q4zg63J bOt+3dqQCfZL+8ymDv8/5/25lu1pJ+zfsE/XXA/Bk/VR2N0RNrnB9Ol6cnkF 2OSDO/sAJu/f2kH3hNHmw8urdw8WblyYurw2erg0SNlkvt9O2QTABKgEg/BY 1mWrBhjJZVp1Fbp9k2M2+Q95kzKpTZPRWENquvoYNuk3yQctxaMOFbDJXEf1 ybAJ2iXsVl2IJ4xpohp2lA7alX3W4l5LMbAJ2zfBmq7X2KSU6R6sJGwCYKIv y2lQZ9WUpFcp0ivl0orC1Mw4SbyYEx7iKwEqCfQWBnkLgrxFXD8R11/ADRDw AvluYckWsAnACIBJMMc7MOg8UAkKLmJBF0giCGSHTTBmAt8JZ3iLH+zNCzov 4PgE+XoF+hPTRMj3jYnkxkaGxEQERYT6hQnPR4f5ywA6UkVp8Zz0RC7giRyQ RBpGHBMmbEIqu9LDCtJC81LFuWnizCS+NI6TkcjLThGmRPPFwV7CwPPhPB8g lBhxUJ40BvAEqKSqNAfARFUoBTaBc15aZGZiaHJkSEJYUEpUSGo0N1YUbK1V DLcbRjuMA831ndaK4ZYG4Fas+pvpNbvxxDzdY4Dz0rAdxy8ClQCbrI2THT4b T9i1W+hNILMAoXiwCbuy62RN1yoVvThkBjbZcOPJBrM+NW+CbIJnqq2pRhBl E/zpW2P2vSkXm9xc6wcwubc9en9vHK0TJBRYYEsutpmChIK3YYcunGmCuAFn dqQdXiJ3YBqFmiNouGBYHpmFzmoEYQgFAYdmTBBVsIfwZ0zYBJMmdIHCyi4E CizQAu7448O9j9/dAWzBoi9kCnbVFkZLCJg82n9wef7prVUMsyOeIMtQN4SW adFeW3T2use7bCphtwumwt0745u8ljSBNV144Al7984em0Knq7Bbe7E9CPbN HvrlqyfIJiQRT/IghDX+8fnDf37x6Psvn/30zQvGPfnw528/+v7L54x18hRE rJMvSavhn149wdmLWB4G+v6z40g7e6wJjbp7jJ6kJg79LeH133rjc3acHWfH 7/qgbHJ73UrZ5N5W2+GUAdikuSJOXyCyl0YdTZmBTdg1XbRR8Kl5EwojNG9y ok+XKwuPSRNa2QVrDJ68iU3Y1smpbII1VOy9PZtN/qN1cmox2NHrE1jeNouE ZY7gAgCETSVUV5csIMQTNo/Qyq5je2XR5BLDJlfmTFeZ8Yv7IzWr7SVrbSXj +vTmEom9UEDYJE9ozxMimxhyxLqc0JqsUGCTuqKY2sLYyryYspxIVXZEQXpU djLp1vXkzuGti6vrMz2jnSZ7g7zFpAI2MVZmdVhVq2NO2KodLTQu9lUv9FZN t5fNd2mWeqtn2ssWOjVzbWXzbWWLHRUr3VXIJmt99W41rPVpV5k+qEt92vVh E8nCz7cDmwCYwNZud7YJ2AT2UcAms90Ncz26hT7j5ngjaH+u6+bW2P192DIt ETZ5HUwek7Zd63C+f7SEbALaX+jHmi7YfE51mUZbtX32qnajGpAEGwjjGWu6 HLVFFExo3oRRxsk+XcAm5vJ0ABNLebq9kpgm7bqCfnNJv6l4wKxANplu1cx3 uqq5PPp00YwJCgkFTRPKJj1mBRm8aJIT60Rb2FiXZ6vJNldmkMiJ2gUmOhab aFWZWnV2XWlGTYmsulhWXpAil0VHhPiGBXtHcP0juAHAJnx/L0GQj5DjJwzx E3ADQUAlAn6wgO9KlFDTJCj4vH+AFwgWyCZ45p1W0IUJFKASYBZ+sA8vyBvW 3ECv4EAvIZ9McoyQAJUEAJvERgaHi+A275QYjiyJnxoXDHgCyksSAJsos6JI ky6mQxcI2ATOwCZ50lAkFDiXFaWHcs5zfUnkRBx8PpTjHRsaVJSVAHhSqcyu UecBoZTJZcr81AJZjLogFQglKYIET4BQkiNCYoSB8Cvqa6wbbtP1OKqGW+pJ NVe/neBJr9kt02yfaWHQujLqaiCM406ATTYYBkG+wBQ8CEgE67vQQMH6Lsom J0PxHmyyytRfrY/biXvCZOHJu8xMkw03nsB5a8T2JjbBpAlBkkk7CBbb000X ppsATzYnXWACP3dz1Ab/uVE2IWCyMwascW9vHN0T2jcYr7AHMsK7mIvHe+ic d0y+ozPCnmmC/bgwkELbf6FjgmwCd8J1bDiMVVv4cYAUjJywweTl06MvmPA7 zlIE0VAJRkVoQoROMCHtuZhqLhxlQiu1YIGuCnwWrRNS6PVwFxgHttCAJPgW FoZRkKG9vOjWGjvxeoyJpyzDbjWMNgFOFcE+w+gsfP/5I8QQDJUQf+SL92iV F5tN/vGpy7JhB+2xuAt7C1MowNn0II9+wh5EQB7A7Zv8zDgamDcBNvnbp+/+ /fP3/vnyCWAIsMm//vaHn7758IevXsBLYBO4/k8GYX589Riz8D++fARU8t2n 94leH3BPx9C7uha7a96wMg0Lz6jDQpnut974nB1nx9nxuz5ubVhubVhvbdjc st9at19fseyMV485c5qqovUKfnVOAGyJSf8u9xwTbOflngVPRPHkutsueZNe 69+FHYaJtK6ir9nj1DxN05Nw/ZwexYaXy/OklszjIqUGHO9IJ6pgNAYW+C4z Y8U1MeTiDFwE5DEcTRtYV4x4hYgMQNR5iA0vlIBoDoX9AJeJjB66suBK61xb tKCuL1ld+R06IAZnxCyZL6EWTQybkD5dV2eNu4NV230V6x3KkYbURoUY5Mjn OwuF9kKROV9gyOXpcgXaPFGFjFebJ2koia0via8tTqgoiC7OFBdlxMjihQ0V +Q9uXLh5uDg94JjstXXaNXWlUkt1bn1pWpNOvjXTsb/YC5su2Ect9Olnu+qn YI/dXr3Y2zDbXgVa6Khe7Kxe6qpe7q4BrfbWoVxsgtYJqekyb084d5ndHVbp X5hp3ZhsWh4hdf7M1AkzbBHXxps2p1p353sur4/c2pm6d7j48NIKUgnACFZz Yc+uJ9c37+zPX90Yv7Q6gj2El4ebFvvsC7222S7zeIt20F7da67oMZW3a5Vt DSWt9cUtdYrmWnlTTVFjNYnDmzW56JjQLDwzeJGsiY1SkW2qYMwUTbpeI9VX SPXlUmNFur0mq4VMNikEoOi3KAatJWNO9XRLxQyxTmrmOwFPAExq5jpwUTvb Xj3TVjXdCqqcatFMNleAxmylo7bSYZtqyFo6YFH2mpW9FmWbrqhFS4ZdOurz LTU5hspMLakuyzRWZGnV6XXKtPrSdG1ZRoM6A7bc9arM+vLsGlVmcXZ8Whw/ JtQvQkTaZwFNiPkBpIiL58cHxAjx4XF9eTxfHt+PK/TnCQN4ogDsxIUMQtnE z5+wCTt7AoIvBAbBxlwopBU4C0N8AUk4/kQhAYRNuBzvUFFgZBg3JpwfFRYS ERoUJvCPFAclRISkxgilceK0OGFqLD8tOigzgZefKi5yh01KsqIATOBKXooo J1kIymWkyEpIjuSFhXiLg7wkHO9IgZ8kxDs5iq8qlKoASQqlFcrsspJMpTy9 pDBZWZhcnJuQlSJJjg5JjAhKjuTEiv1iRL4l2fF9TdqxLmu3rXawWT/FZOEn OgxwxpZueJ7vty0OOtBYWRx0Lg03ro7YtyaatqeaAZZxgV7J+piN6eLriqWv jZpoqy6KJ+zUyZsSKHToCbFOPOTCGTMjVwEY9gqj2hwn2iDn41Iu2joMA/t7 My37s61Hi8yA+AvDWK+FJVu0JRcAyN3dMQQWvIg3PLkyTy0P2jHYw0ahnbvo sBI0U+jsRQQWLOvChsMYSMGICn4VBuQBWABMvnp+GfT5+5ewlAuTJiiMhyBu 4HRFENyAeXlMo8AZy7roRHg0Vj5+sPPizibwC53ASEuM4Ga0Tmgc3mMoPG77 0aah237qj1CDgz1qhO2k4BXao5jGwEE0RE8/zjZoPOcnMh3AaMwcztg9DNM3 9OHZ3g2d0vjzV08BLn569RiTIxSOQASI4CVcxMA7U+j109fPfmCGM/741VOy ZqY0opiRKETfff7gpD/CjpkcdwZ49eSXr579+5v3//3Nc1jAT8GGybD4rTc+ Z8fZcXb8ro+b6+ab65ab61a3bDfXbMAme5O1Q9aMxsook1KkyfSDTTibSnBx c9VKeYStN7GJR2Nh9FNOih2WRza54mYf5CBaQoY5F4y6IKSAEAqQCzxmPrLH QTL3uDDkdUg5RW9qR/yat4KmjJtNKJggaJxq8dCnokiCNXJsPCGfXbYgm1xm TBb0Ta5M67cHNLsDlXv9ldPmrOYSCWnVVSBwFAhsBUJLvtCYJ9DniXT54ups UV1+eH1xXH1JQo0ivjw/uiQzTJ4Zm5korinNAja5e3V9tMvc39zQ21Rjqy9s 1MphP2ytyVsdb9lb6AWagO0Q7I6WB0zzXQ2TrZXjTPp7rqMa2WSxswrwBLTS UwuibLLGjIpbHTRsjFhIDfxMC2yZXHgy3YJs4h7S7WKTrel2+IlXNkZv7828 e2kZeMQNJhvsKSdw5e7BwrXNCZxvgln45QHnfI91qt0AbDLsrO23VnYZ1B26 UsATZBMEEycJmxyzCeIJM3gxk3ooeJ2oKkOnkWrLUvXlaebKDEdtVlM9sU66 TXLKJlPN5dPN5QySeMrNJgRMkE0mmspHrcpRK2GTQYuy31zCsElph0HRqi1y 1hdYa3LN1dkGDWGT+lJgogx9eRYZBF8irVKkVRQl15dlV5dmlOYn56aFJ0QE h/PPS3jnJAIydiSUHyDiucCEF+IDbMLl+lA2IXgiCmDmmLjCJsEcb0CSgEDC JnCGNdAKEgrcAxiCfYMpoWCVF1onHP9zQb7ngv3OwYLDsIlIEBDu8llCIiXB EYAq4sAYcWB8GCcxgpsczQM2SY0KBDyRxYUAgxQwfbqAUKh1UsQ4KcAp2UmC 5EhuQXpsvIQj4fhEC/3Fwd4RfL84SXB6gqSkIE1TmlNdll9dXlCmzFIppCUF yUVZsbnSiIwkcUo0N14SkBbDSwgLjA/1L5BGtZoqJ3vs7abKoab60VYt8AgA CNZ3sVFlttcK1+EfEmiNlBcSKgFdmGxG3wSxenPCRpr3klEjBhAt5WLrVDY5 OY3x2FI5IfounZNy6nfSMjMKJsgm+F/ZLtMZ7/JKz/WNgbt747QHFw5VBGHP LlgAaOB1gAg6kBHLtNABQcpASKFUQrPwbDY5dV48loSxM/W01gs+BWzy6tnF r19cAX3x/DLt04VgAgyCbIKzFGn/rj8+Ip2Ecd4iFlxhuRfaH3AzOimgPz3a /8uTQ/wsgM+XH16Hj+OWHgvAEGfoWEaP7lt0ZiK7fOtNQr/guE0WE8Rg+yy0 nRd+M93k01kq9AFOjndkDxNhz6+nPHVy9PwvX7vnJxJCeUKpBM0aSivw8qev nv7rry/+/bcPSHthhkQokrjnyD91AcvLR2yqwh/KfjwaQvnlq+MBjvQZUL/1 xufsODvOjt/1cWPNdGPNfGPN4pb1xqr11rr9YLphwCJzaiItqlBNpu/uRB1A gQeb3F63Y3b+xoqFXv+v2ARbeJ0UDaTQwjBW2dgxniCYIJsc08ppFAB7fgSE 1wfTGymYXJ4zoyiPUGCBi2+Pz7MLwJBNqGlCKeNNYOJhnVCxCQXYxKUlElG5 Om8GNrk6YwA22e6r2O4tnzDIyHCTImFjodiRL7LmCa35YkuBxFgQps8Pqwcw KYhsKI5vUCZVyxPUOVElmeF5aRHZyRLCJje3H9zYGuu2DLbqnLoSSy1sj/OA TUyV2cujTUAKsPmBndJiv2G+RzvXWT/fVbfY2zDfWQNaJCJsgkIDhcGT+nUG TCib7Ew27jMNjlwTIqZb1ical4atwCazfaTm380mbfuLfVc3x+4czAGGuAMm JGMCPML0EyaCxb3DxRsXpjALD2yyNta61O9ANhlrbhhy1PSaK7qNZZ16FVon wCYIJnZNnkVD2OSkdULx5JhNqjO0FWkN6hSdm00a67IJmxgZNrG52GSGxOGr TwrBhJomACbIJiOWEjRN+kzFveaSHrMS2KRNR9jEUp1j0GToymW6CjhnadWZ taXpNcr02tKMWnVmjSpDU5wuz45LixNEif1CQ7xEHC8x97yI68ukS/wEIYRK UKeyCTsIj2zitk7OgTB7gt26osJ40WE8LOiieELwh+vHDTwPVIJsEhJwjhPk BT9OyPeXiIIBZyIlHGCTqNDgSMATgV+U0B8IJTGCkxLDS40KSokMAELJiOfm pYoBTEqyooozIxXuUDxACnJKWowgJyUyMzEsMTwE2CSST74HFC0KKMpJaqhS 1FfKazWFFaocpTxVkZ8IvxPAExD8w85IEEUL/ZIiglMiOfGhgVmJ4daakuFW 41ibfqSlATAEy/+wqxsVvFweboJ/SMAm66PO1WHbmss9admeasa+wTszzTsz jRvj1uUhw+KAdmlQR6efIJIgKXgMOkFRJPmPYHKcRnGDyVvYxANMKJtgkzH4 z+1osfPKau872yPAJkgZcMawCfbmwuIrvIicQmeXYKQd8yPslsKIFRQxKGXg RdqVi8IL++NY3wWiQ0+wsuvl0yMglC+YaAmyCRWgBLIGXP/z44M/PNz98P6F D+5u4SgTtEtwh0z7ayF04BrOOJzxL48PgVP++HDvo/vbnz69iOkVtGPYnbvY yMCeG8gaHfiIWiRsP4WWObFvoLxDhQYK+2tRNJhPp65gYRh75Dq7T9fJBmL4 EYoM8LPQuUAuoEIk+fHlY4yTIK18/5IwCKDHz9+8T7p4MR4K9UpewxN3Bp/+ GfHXgniCvY7dpVzkx+GPQLuE4slvvfE5O86Os+N3fZzKJncvNAEgjDiygU3M peKqbP+d8Vos3KKOya01G4qNJ5RNTupUWvGIxrN5xEO0eIxNJVjKdWlOR/Bk 3o0nLJeEis0muOFnfJNjMLkyb0F5sAkCy1vGOHpEVI5mXqvm8nBAPB6JlnKh bizbcOFBKFdWrCBgkyvLJKJybYH06bo8pdsZqNzp12x1q0e1aWS4CWGTUGAT W77YVhBmK4q0FEUZCyO0hdHaolidMkWvSquWJ5ZmRypkYUwP4cjKYtm1/YUb h4szA87Vyc5uZ1WbRW2vKzAwExgXhhyHywOww4Gt0XyvbrqjdrqtZq6zFthk oat2wc0mCx2VKIonwCbEN3H36doYMQObHLBmLwKbrI07cdodwyakXdLKqHNj sgVrum7vzTD+yAYLT7YYPNnE+i7KJkfLQ8gmC702YJOZThOwSb+1ssdUTtmk tb64uVYObOKozCdsUvlGNvHAE0OlDNhEW5aqK0tjaroym+pzOgyF6JsM25XI JrNkLvwpbOIBJuONZSBgk2Fz8YC5BMT4JiVdxuJ2vRzYpElbZK3J1VfI6tVS UENZdk2pTKNIq5CnVsBZIS2Tp2WmhCVEcsIEPmSCCd9bgkNMQnwEHCI+x4fL 8XYpxPskm6AnAgIGQTABQgE28fE9B4IFXAcwCZWExITzQXQiPOIJtuoiGROG TTj+5zBvAmxCfJNQ4psgm0S62QQEbJIQzkmO5qZGB1HrJDdFBEhSmhODlV3K 7OhiZlI8mimKrISkCC7gSVZSOIAJmbEoDozg+4IyUyMBTIz1KmCTyrK84oJk YBNlfhJIVZiiLkwtK0yVJYTGiAKSwoNSIznJEdyC1EhbTfFIi3aiw0BhZLrb DISC/btAroKuoUbQ6oh9acC8PGjZHIfdfjONw9OoFOnfO2xYHtKvDpP4Cc16 YCPfU9lkedCEYrMJmz5OjpLHl/jxUw0aj2oubB1G2QTXlE3u709gwv3p1YWH R9PYNxgWaJHQSfF3d8fgIgILdT0QLpBZEEMweIILOgue3acL76S0QtPxcA/w CBmz+HD388cHgCRwxjmMJHjirubCFlsYgUcnBe2Sz9+//PG7O09urDy7tQZs ghc90ih0b4/VULBthi/8E/zEp0f4bQRwHuzCFQQf2pqY1nex8+yUDtD4oC2z 2KMPaS0Te/o5uySMDqCn7b+oXUIzGvRdthVy3O+LhSe0zzD+6SjXsIfa48Xv PntAMQQtDGqjeOj7l+/9/bMHICARYJN///UF4gnp1sUgCbVRfv7qCbVIPObC 06I1NzoR9qE2DeDJmW9ydpwdZ8evOTxrutZITde97ebLC8aploLGyihjibA2 L2h3og7DJiBgEEASapqc9E2uncYmp+LJyc5dIHonOzXP9k2oRYIZEyQUGkg5 WSh13E/MfR3ZhHolFEyQTahjQtmEXbVFdWpN16klW6eK7ZicxJPXCGXVhnhy ddkKbHId7l+w3GDGL+4PVV/oLpswyFqUYfZCQWOBxJEfasuHdYRDEWNVxJrl sbqiOIMikQzLKMuokacoM6MKUiUF6VHAJrDdvbw9c21vbmawEdikt6mm065x 1BeaKrMBT8Y79fuLfdvTzbChmu6sm2yrnu0gpslbfBM3m9Rh3gTYxKNPF+LJ 5lTz6pgD2ATAZKZXP9tnxHZJa+NN27NdRyuDNzFvQkaZbDx2TWDcoA2EQXcP Fq5vTdI+XaujLRg2mWzTjzbVD9iqgE0ATGhNF7CJs6oA2cRamUfLuiieeLCJ a+iJRqqrSNOVp+nKUg3lUlt1RnNDbqehqMtY1GeWu9ikifFN2qpmTogdM0Ew gftHbaVDJkWfUdFvKkY26TQoOgyKFm2hs77AVptrrMysV6dVFSdVKWU16qy6 shxNiawoK06aIEqI5AGJiHnnxTwfMd9HLPAV8X0FXB/BMZsQKgkJPk90GpvQ ofBs38TPn7CJrx/xTQBeROJgSRg3+jQ2EfP84aeQjIkfmiZevKDzgf5e8OOA TSJcDYeDw0WB4cKACFEgMEVsaBBT1sVJigpJiSRgkh7LATbJSuTnp4UChgCV oFS5seq8ODgDqpTkJAGYZCRI4JwYzhUGeceGcgBMJFzvaElwaVG6VV+hrSmp 0RSWytOUhcmESopSK4rTq1XkN1ZfnluUERfJ8wM8kcbwpFHczFiBQZ010Fg7 22sFAYwAp2DGBK/Q9Xy/fWUIUMKyMmRlesc1bo6TzT+ywM5MI+AJnLcm7etj Zpwgz566CLfRaAlbHmziCpucxiaIJ2wweTubsMGE0BNT0OXBJre2ht7ZGcWJ 8CBgkFsXhm9vjyCbIHq4OncxYXngCNp3C5MpwC/ULsFCLLQ/sHMXWiR0Cjyl EjRfEF7QcIF3sY0wHbkISILdur54cvg50zQYeAGgA8EEQ+u0hzDCBaw/ur/9 x0d7tOKLlmZh9gR7dqHvgAENmknBr/r06UVM3KPtAqLuyckGwuy+WB7tfHFN X1IYoVVPHsNTPNiEsg+sqVdC67XYqXza5Ap5hA5eYWdePB6YPAzTshjQALmA SX88RzxB0wTOACZw5YdXT757SfLvIFggiQCh/M/fPvjXX19QJ4X6JnQ6JPbp Yg80OZ63wnT6olEXfAb4cfDTf+uNz9lxdpwdv+vjnS0bI4dLmyDnna3Ga8sW YBOnJtKkFCGbUAChpsmb8ibXfrV1cqpFQj/OhpdT8yaumi53Fh516s7/1BwH Drj3EAUWNp6c2miL8gi7RTD1O9jxll+DJyhgE9RreLJqu4pasV5btiKb3N9o Bjy5OFa/3VM+Y8nurohpVIid+WHO/HBHYZSjKNohj7EXJ9hLkoyKJLMyzVye aVDJGDaJzk8OzYgX5qSElcvTbhwu3bu2AWwyO9gIbIKzFwFMKosStKXSZq0C tkmL/YbJ9pqxZs1Ua/VcVy0R6ZrrmTehofiVnrrV3oYVpk/XQk/9yoCe9DVl qt9RG5NNwCYLg2Zgk+ke3UwvYZPFIdvqWNOFmc7D5YHrFybu7M/dP1pi1XRt 0Dg86J29OQCTo+Whg8WBranOpaHGhT77TKdpvEU70liHbAJg0tZQggVdNGzC ZhO2dcKMhs/wwBOdJh19E62bTbCmq12X32MsHLQWj9hLx52qKWY0/Ek2oWCC pgmACYgUdDG+CSnoMiq6jcXAJp3G4lZtkaMuH2u66lSpGnkC7LSBSsqK04ty ElJihaF8H24QwQER1ztUGCAWkLmKAkCPEG8hU9AlDPFF3+QtbHJq3sTHl0RO sKALB8SHkswIlzbpomwCPwJghIZNkE0CfIl1wuf6hjLxeQATicBfwvcLF5AS rDhJcEJ4SGIkiJPMFHQhm2TEcwFPcpIEZfnxiCRw1hQlVSlSKhXJqvzUqpJs eWZCoSwuNzUqShgYJQxgenZ5iUK805PCaisKDfWquiq5SiEtlaeWK6SVyoza shytJl9fVWjTlprriivlsjixX4zQNzE0ICUsKD0ySK/KGG3Vol2Coxg9wIQM QOmzAZusjQBrODbGnIx1Qjf/jdvTTmCTvblmRk0eg+BPpRIUDoL30JtupvqP bEJLuSib0Kkr2OUY2eTaev/1jQHAE6CSB4dTIFjc2R2jU+A9arcwuo5jFgEu AGfgNhp+x0EniCF0/jvWcdEr7EEnCDVwPyIJuiQg/BJgk1fPLrrE9M4CXkDR QSRwEVDiz48PACsAVQAliIfCZFJoly0QfgrBhOIAEgrsmeElwAvtRYx5ebZp Qsc7si0MdtiEPf/95DCRk1l4dEY8arcouSBf0HmFFGToj6O4wZ54QgeI0Ic5 2c2YWhj//PRd2iWMogE6F1hqRVoEM4QCbII88s8vHqGBApBCDJS/ffBvBk+o fv7qCfuPz0Yzdicu8qf78gn1ZehPxGf4rTc+Z8fZcXb8ro87F+x3LjjuXHC6 1QhgcnvDcWPVOt6U56iIMJeKa3IDkU0oklBIObVP169nk1PxxGM2CmZSjvt0 zR235PKs8mIghRZTUT8CtvrwEtfYqguTIO5myFYKKdRD8cSThVPkMTkRL1Km oD/o0uwby8zYT+ih19wTTzaxApu8s+K4s+K4NW85GKqet+d1a2IdRUJHnsRZ EOEsjHYWxdhBxYkOZYpFmWYvywA20SqlVYUppVlxBSlheWmkjXCBLGpvbQzY ZGm8fW95eKRT36gvRtNEUxgvl4pLMyPatAVDzrKJturJtmpS09VVB7hxap8u KmSTZUbz3XXL/Trsa4qzF9lsMtOrZ9jEMNtnQt8E2ORgqf/a1vjtvdl7h/+P vfd+auTM2v7NECShnLMEKJCTyDlnCeUEiJxzThOBYYaByTnYY3scNjis89pe e4N394nv+z99T/eBe9qC8eN93vqW/QNdV3Xd3WoJMWar7s9e5zpn7Z17O+/e v3zURviQUIBN7m4v7G9O7K2PIZtQCYIB91K/az7iADYZdtf1O6r67JVRHbrQ OvHU29wM6+RovslLNiF4Yq/PaKuxtlaa26usVE1XY1agObu7Lb+rNa+vI3/Y RY04mfSWzQYqsXwrSlHVXJRp4q8c6ywGNhn3VACbDNiL+uzFA86yXkdJxF4c bCt01me3Vlgby8xN5Zaasoy8DF2ylq+SJsgEsVLBGbk4XiyIlYkTZBKOBNhE wpZKOWIxC8csYt4E2YSXGHMim5zYp+tM7GvAJnCJSRNkE7Wcj44JggmyiYgb CzwCYMKJo4Q1XWxqxAllnYgF1MBHeh49fOE4BR0SIWxi0vKt2kT0TbKShQAm cIZ1eY4OkKSxzNpUlkqdy1NbqzI6agtbqwtczRV1JVmlOaZym1Up5KqE8XJe jFwYp1dyC7KT25vKmuuLSmym8iJLQ0VWa22+vbHI3Vrm66iEc6+vKdBeWZGb bFIlmpWJwCbqxDM2k8TbWNDvrh3xNwKebEyEDoee0EiCbEL5JhNeTMEz+3TR 5YjdwCZb8/6dxeDV1a79jQhpNUzA5CeyJEw8WR/tBP1MMPkf2YQJJqRdGJzh cm+19/rm4MHGABDK/a2Jx3Qo/vnBErDGWzdWgESwqzCWdeEoRmyrRcLsmGGH l5BQcNAJ2h/AICTnTgL1WP1FxjLi54DgXdgrGLtywRkhBe9gD+E/0nCBTYPR DcFWwNjsF25+8mL/gzd2P3p+FWEEq55gA4+uByELJgiAcOcMlzhHHj4NK6aw FzESCkZU0HnBD8EiMWQfJi8gXDAHLCILYHcsLLUiIxFJay/yCcw2X2Ts+//5 8/v4DZnNgZmlXPCx8BhQDPbswrGMzH5ZBIVIny54yw9fHHoWRBiBJ0jyMnIC T9K5EqoT1xfPgVCATfDO3//4NoZQMCz/7/RPRx4hSBJV34Xf7e9fPEeXBKvI DoMt9Nf4pTc+p8fpcXr8qo9H234UEsqDiwEAk3vnQ/cvhJd6yjtLFY5SRUeR 9NqS+955H1Z84QIj8xSnoDbdt0/SrVejChnRyDRKmLVe2LNrb7ENRfp3weLq QuuV+ZaDo15epNXwzXUybMUFuk3JfbT595HhLDdWvDeWvfQEyWgxOYWBJ46o CAnTiPlR8Rj9c2+uu5iVacyBL+Sr0jaQgxoHs+a4s+miuO+sF5nl7qbv3tnA 3U1qmgz1fdZc987Df5rQnbO+25ve2zS5wKuge2eD1+Y7l3vKB1qtzmKZq8zi LLPYS8ythcnNBUmNtOzVWc1lqdW2lLpiS12JtThbl5eqyDbJc8yKPKtqZ3Pq wfXz00O+mWF/t7u+pTqnrSavtSavtiStMEOXa1GmaeKLUiXtFdZeZ9lUT9Pi YPvycMfSYPNMT+1spHYuUj0fqVodagAt9zetD7edn+i8MOk8O2ZfHWxZ6mvc HO1YGWiG89aM99pK142N3r2Vrs2pwMakH2BkZdS9POJaGqaGTayNU12SLs71 Xl0bu7218PDK2uO9DcCQN26cQ8fk2cEmXj7YXb63s3j70tyN89PAJvAWHLwI u82p7vbRQNOgt36IVp+zutteEWgphh2ph5q6aIOFr6mQumywAZgAhrRXZLSV p7/MvzNkP/JNOqqt2EM41Jobbs0DPOm324adxeOeshl/5Vywarm7ajFcuRiu WOqqWu6qAS2GYFEHWuluAC0DqgSqp9xlY4Hyfldhjz2/z1U84CvvdZcFOwqC nSWuVtha53Y05bU25FaWmLLTZXo13fBKlqiUsKndvjBeKoiDxXEBlYi4cdTM EW4cj3OGy46Bs1CQIABU4VNDFXmiBL4Y8ISNw01wHDyOX8Q+XfEJMWwO1UYY 8UShFMjkAoVCKFcIpVKeTMaHS4mUx+HEwsMsymSJ5fEBcFggbmIChx3H5QAW sYU8lpCXIBGyFWKWUsJSS1kaGUsrZ+kUbFCqhp+G0vLTtYJ0nQDOBRZVS1mW o8bWXJrZWp4NCzh3Nhb77VV9/ha/vbq12lZdlGbRCyWcMylqoUwQL0qMNRtk NeV5dVW2xsrs5qocYJP6soy22vygvbrf19zjqu91Nw76WvrcjQ1FaVYl1yRl ZRj4OSkii4YNEDQQaBjrap3uc8wPuPCPB/B2bdS/OOA6OxnemAyenQ5dmA1f mOu6ON+9tdhzeaV3axEWXVtLYdT2Umh7ObS73L2zEAZ2ANBYG3HA+cRECTyA a1wgnpydeDkgHt+FmffjbHI8/45Igt3DiFeCdgmm4EH0kNPD/zfg5rnhu5fG 721NPNiZAjYBKgGIIDNNSFkX9uBiMgUTLtBwQXOEaZGQFDy2BSaTFkknYbwJ D5P570AiaJRQM03e2iNlXZ++uPrJi6ufvnPt8/cOvnj/+hfvH8ZDqEZb7wKw 3Pvm9w++fP/upy9uffPBfZIcR+MDQQZ5BLbHBE8wdQLCXl6k9As39rD47ZPt t+5sfvzmHmbqcbePD2NHL3RkgGhgQaYfIqSQEiySgkcrBCuv6B8NG/jnf/4E vuf9v3z6+B9fAbMAngAxARzB93wdHgDBfXRDoubLM4PtpJkwQZioYetMM4VE 8v/+BZyfo3PEaFD8BvMBuPwBgOLL5wzB5Rvff/rka2C3D+5998njf/v2xf/5 y29A//3n9//ru3dJQ2PCKWRBvgCpQzvylUh25tkvvfE5PU6P0+NXfTzeCaAe bYMo0wT0aKvn0VZkfaDGVa5ylCjaCiS7s44oNsEFWd8hkMIQE09ONE3Iq8f5 hUkozPbCBFVAUX2GEXZubzhpHdWYrZM0h/door335ooPdGvN9xNswqzvimqr dWJnrUMdggn8vk5a8FscCr/hDWpGCXVJfbdNFx3Y8VJkh2ETiju89BejSOrO BtBH6MiIcd/Z9D281P1oO3L/QteNNaDIyIOL/dfXQquDTZG2THuptjZHV5dr qM8z1ucb6/IM1bn6yhxdeba2KE0B57oiU32JuSLfaEtTApvY0jTleSk3Lq+8 eHxteapncaJratDraSvvbCqGzV5Fvgl7eVlU8WlaVqFV0lic7G/JH/JVToTr Vkc7Fgaa5/saAE9AK0NNSwMNwCDAI4AnACZAKHBeG2o7N+6Amxsj7Ren3FcW g/ur3bsLACa+tXHv6pgHwGRxqHNhsHN+oJPq3Trdvb04sL85eWdrEdjk6f7Z ZwdnsYiLqYdXVhBPbl6YQTbZmAjB9hIHLzLZJNJZ1dVRTs9bzD8aCm9DNoE1 sklHZSbgCTNmQoRs0lZlaa+yOGrSPA0ZgeZsYJOe9pdsMu2vmA1UzgcrFsNV S+HqxXD1QrByIQjr2lF7waSrdDFUu9rTtNLduBCsm/VWT4SrRwIVve6iLkdB 2FEQtBf62m3OlnxXa0FHU351qSU7TZmi5xk0bJWU2uETKpHwY0GwPq4T2YTP iwMwAUKhKrjElIBQmH260Ddhjl+E++ibKFVCgBE5zSaAJCCpjC+WcOMTztAN h8+gErlxyCaJnHgQn8cScBME3HgRNaUxAb68SpKgliYQNrGoeakoDS+VJhSQ zawsz04CPHE3FvtayrzNZb6W8oC9KuJrGgi1RXzNoc56V0t5fXm2RpyoEsbJ 4VcWxOkUvNyMpPLizNqS9LrS9IbyTPijdTaXdDnrBgOtgCdDwbaxsB3wJNhW 2VKaaUtRmJQJACbJirg0PbepPG042DTT3znX74S/HAps+11zvY6lQff56e71 iQAICPrcTAjw5NJC9/ZSDwrB5NJi6NJi8NJigBABUAOTMk5Mu8NNgBeSN2Gu SfyEWRV2nE2Ol3Ix55ugSBZ+l0544cDTa2t9iCeYOsFB8EAor19bwCov7NBF xiaSKi9c4BR4nI2CmRFkDTRQSBEXvkSqvEibL+zZhZVg6JUAngCVEBHr5LN3 rn36zt4f3gYYuULrKtZxwfl3T3d/++Ty759d+cNb1798HyDlHhM00DQhbghz iCHu+UkUnfgjaKkAdPzu2c7zW+uAJ3946xp8IDIFPoOBengMXRt4lYADQRI8 4/abOfr8KDYCTPEUGATOsCaXeAc4hQgLpUiEhPgmzJ91YoswZkVZNJgwuhkT qjpeD0aJhpEo/fWL10Gw+PNnTwFPQLD4929f/Pf374H+80/vIJsQA4XZHIBY KuSbMMfc/9Ibn9Pj9Dg9ftXH090Q6snl0OOd0OPtMK3I4+3esyP1nkqNvVje ahNfGGtGEokSbbL4oiCFSStRBkqUjr8Ku/fjbgvVQ5i+JPET5JEo0+TwM6NF iqM8SB+w57+95r+9Frj9CjZhVnkhobySRE5gE89NWjfWcOY7pYMV+OZAK276 JTfeublBPXBrE/6h/Dc3vNcpf8R7c8N/Y913sOIFXV/1394I3zsfoSHFf2vd f2MVXvJdW/ZdXfJtzcHuxTkTaex3lnrqMmvztKXp0uq85OpcUEp1XkpNvqmu 0FRfZG4uS6svMjWXpTaVWmtsxpIMZXYSL9sky0qRAZ5c3px699n1tdk+ZBNX S6m9oRC2eZUFZngVnrFqEs0qlkXNyjTwStIVTSUmV0PORFf9TKRprq95rq9p caB5ebh1vp+KoqwMUGH5dXoc/OpgK1yeHQM2aYVLYJPdheDVpfDOnB/YZH3C x2ATJ7AJ8MXZqS5gk2sbEzfOz97dXnpybRPY5NnB5tP9DTRNcP14bw0EhHL7 0hyyCXANDoWf7Gob8TcCmwx46oBNehyV4fYygBEkEcQTNE1ggUkTZBM4n6C6 NKzpaq0wd1RZnbWp3oaMLopNbMAmQ84iajS8t3wG8CRYOReqohQEVVMKVS92 1S91Nyx1Ny12Nc6H6md8NZOeKvinG/RVhu0FwfaCHldZj7vS117UVpdTX5FW kKNP0vGkojMSUYxKkSATUUjy85Qg5sUjm/ATYwFMCJuIhFRjLoGEjWwiECaI JRwQ9uniJMZwebFwBgGqYNhEoRSoNWIEE7RLgEpAQhEngUWxCbIMsAknMRbw BNkEznxuAj8xnp8YJ+DCV6KgSSmOBzbRyBKQTVJUiSY110x397VQJV58q06Q b1XlW5TVNrOnpSzcWRtyVHe76ns8Df3BVmCT4S77SLdzIGzvD3UUZSXJuLFK CnnYEt4ZjZybbtFUFJirCi31ZRkd9QW+jsoedwNQCWgi4pzp8wCegIb9rfbK PJtVnqyIT1HGG6RnUnVc+J9Dn6d2NNiMofi5vs7p7vbFAdfaqB/ZZGPSj/NA aceke2c5Atpe7jpik8DFhZelUyBYYOb9Vb2CoyInWNZFDBRmSdhPsMnxpsFR kZPL9CChKF1Z7tlf76fmMNINu9AxwfA7TjnBDsM4Ap6kTpi9f+FVZBMyCYVE 45kFYPgwLpBx0ItBNsFhixg2YWbhSa0XsMln71775MXeR2/ufvDGzofPd4FK DlsKv3Pz0xc3QF++f/fbDwAW7pFxipgTQdMEW3Vh5ISwCfog6DIgkuBAE7Ra 4MN/83jrzdsb79w/D2vcq2NvYWAT5qxGjMCQPsNkz4/JETK9nWnZfPfxg+// 8BDQ459/BHJ5inYJrP/9m7fwDgEW/BBSEsZkE2aoBD6WOfmdbP6Ph01IRRmz Au1fYpMfADTg+3z7AhYAJl/Dv8mH9//6+TOsQ8MaMxQ2LkMwwYA8s5kwYRP8 bwHf55fe+Jwep8fp8as+nl0Jo57ugrqe7FBC3+TSRLO/Rt9ZqmwvlJ4dbgAM OS70WbASjMkphFZO9FNOtFcIkpxYG3aiFxMFJodPbrpoHSb372wcNr8CNqGo 5FCBV7HJiYRyIoacHG9f84GAMkCAG6/Uimd/zbu37L624jlY9+2v+q4Bj6wF DtaCB+uh6+uhGxtdNzd6bm1GQLc3um6sBnfn3OdG2+a7a4fdpT1t+e7arLZS c3WesSxLV55tqMxLqbZZKvLMVfnW2sK0htLM5oqc9uo8e21+baGlMi+5LBu7 IWmBTWxWqS1NnZEkyTErzi+PfPDi3rml4eWpnsFwe3udzdFYBHgCm72iTH26 UZyqE8IG0qLmmpRss4qdZeQXpcobipK9TXnDvuqZSMvSUMfycMd8f8tcd/1K f8vGiH1z1LE22L7U17wQadwYtq8OtMHlxUnPlcXw3nL37kJoky7oWhv3roy6 l4adi0NOwBOs6dpa6N9bHzs4O3370sKjq+sERhBP4Pzk2joK2wgjmwDU/IhN PHXAJoO0bwJsEuWbkCA8MwUPeHKCalNbqy0tFaaW8pS2CnNntdVdlwZsEkE2 6aTYZNJTNu0rnwlVTwerpgKVcJ4N18yEaqYC1bPhhrlww0yofjpYP+Wvn/DW jntqel2V3c7yrs7ybldll6vK2VxYU2zJy1CnJou1SrZMFCsRxomFsSIh5ZIQ +oB9/lH51qGB8mMlgABPmGwipE0TYBNq2ruEfaiTeggDmMCCBOGVKiGwiUJJ gQnaJUAlAiG8hQUwAmyC1glQCYha0KYJsAk3MZ7HieNxYuE7iHnw5WMVojiV JB7ZRK/kJCs5wCbU5BGaSlL1wjSDKM+qAhVnG5orc/y0XdLrb+4LtMAZ2GQs 4hrv9Uz0e6eHg86WchkvTsqHj2WJuTEqKcecJC/PN1XYTPDnCn+3AUc1QM1g oHW0yz7V556Fd/W6pyKuye7OEX9rS0U6gDawiUmVAMo08lsr0uEvZCLcCngy 3d0BbLLQ71wZ9m5MBAmbXFro2VrsOc4mFxcCF+ZfGhkET17FIAQ6yKtonWAi HhmETF38aTY5njHBIi6gEmzSdYXu1w1nvI/98YBNqIZdWxPAJth6C9iE4AkI iAPzI9g3mCkgC+YQRiQOMr6EzFjEWAp+MtaJkfIwNE2YTboAUnAoPLYURkL5 5G0gkb3P3t0HPPnD25Rj8ik9KR6Q4evf3f/Th49A3/z+4Ve/uf/NB4eOCZkU j7MXkR3Q40CzA0MomEzB5rqwNyZlYKRk6/evX/7tk234cfgSYgizsxaaLFjZ hQYNQRL8ZOJNkLbA+OO++/g+IMk/voLN+Rt//ewJrP/+Jbzx+b99/Sa6J3AT ziQdj7t6UuIV1a2LsEnUhJHjsxqZbBLVE+zns8nf4ReEL/PN27D46xevf0/b UsQ8wm+LkIJfm3TuIoPsmUl5Epb/pTc+p8fpcXr8qo9oNrlMscnDS92PtyNX 5uzdTSZvlc5VrgY2wf5dSCJk8WgrhCJ3iBBV0EN5FaQw758II6R4DO+QT7vF mPD4IzCh3uV+CSaUSLTc+3PYhNR9MQnlRDY5MW9yc9V340jXV7ygg2UPrmGx v+QGwRru7K349tcCoL0V/5Ul795K4MZm942NyI3N3hsbvQdrPVcWQ1sz3vMT zolAdb+9yFub0VacVJejqc7W1uQaavNNNfnmhuLM+qLMmsKM+pLc+tK82sKM moI0wJPy3JSiTGNBmjbfqoLtH+wGdZJYs5abn6aypalyLfKCdG1Wiiw/Vb05 P/DJ+48urIyuzvRODnjcrWXe9oqO+oKqQkthpg7gxaqTpOokaXqxVSs0qXkm 2F5SkMIqSJU3Fps8jXl97sqJrsb5gY7VQcCQjpX+dhAs1gYd60MAKXa8vDDh 21uKXFvuvboU+TGYUDVdc/2OtbEAIAawydW1sevnZu5uLwGbEAyBM4IJmiaw wDbCmIVHNpnr64R95rCvYYBmExCp6QIkIWxyYvdgTJ1Eqya1tcrSXJ7SXHbI Jp769HBLbg+dNxnqLBx1lUx6KTaZClZNU3hSc6Ta6WDdpL92JtQw19U8HWwY 89SMuqvHPbUDvvqQvdzRaGupzq4utuakqvQKtlISpxDHycQsmYQtEbOFgnge N1bEjRHzzhBCQTw50TdBNgEBmwiO8IRyTABMBAkCARU2EUo5Itlhky6ShcdW XeieoKUiV/BVahGwiVIlIqYJgAmXFw8CNiHCsi5qwYpFPEmkwIRiE4qM6C8v E5xRiuPU0nhkkyQVJwXYRMOzAJgYhGlJ4vRkSbZZXpChK8zSV9jMrtayoW77 SKRzpMfRH2wd7rZP9Hsm+ryTA76ZkdB4vy8vTaeSsAFPQEoJWyPnFmUZyvNS gE06m4opNnE3DPhbJiLOiR7nZI9zbsAHeDIWbJ/v946EW9prsjKThHr434Ka ZVYlpGkTO6qy4I9kJNAEVDvX61gccK2O+NbG/Ktj1J8ozty5OA8Kby/1HPdN gBGwVRdQA1ZYEcRAKlkbcawCng/bSbqEOR3+X/JNmAVdTDA5TignmiYYh79H x+HR/kAwAU55tjePtMI0SpApCIBgTB4bAiPCkOEmpKCLBEwIkmC3Lpy3iDCC YRPAEOKeEDABffT88sdv7QKbfP7eAR05uYHRder8/h3Ak28/ePinDx9/8/tH f/roIfYNJvPcMboOPIJn4IhPXxx8+MYVENAN3MEtOnOwCOnEBW/HwfE4WgVn PgKbII9gW2Pys8h7SVNfzOOTyi5mXv6HLwBVYDP/CCu4aAZ5imVdgCcgABYs 8SIxdkysIJ4w56qQrl9R1V/M0ZAkGn+8rAvf9b9gk3/AL/j1W7CAy7/StIUF cugfIfvAPwI6KaTKi9R6kYw8k4x+6Y3P6XF6nB6/6uMITEJRvsmT7d79JVdf q9VXrXdXaNYHaukcCoUhBEngzlENGCVCKARSmE7Kq9jkeAEYggZ5gPl28jA+ 9qNSLvKWs25aniP57m4e6s6GH/TTNV2EX5h48qq8yUls4r9BCWCE0sEyIImX XlOL/SUPfUnd2VsNHWz27G/0XFkOXl4KXFkOXVkOH2z07S6Fz02453oaBzqL ffXp9vLkpmJrnc1UnZtUmW2sykluLM7orC2y1xR1VFOqL84pzrLkWY3ZKbp8 kzI7SZaqFaYoE41Slk4SDzJr+clqnl7BMRvE2WnaDIsqRS8EMEnVCwE9FsfD H764tzbbNzsSWBgPA5gAnjRVZpfmJBVl6gFhrHq5RSez6qRpBlmaXmZS8w0y VoqSk6Jkm5SsrCRhebamucwaaC3aHPWsDzkXelpnw80g2JODVgccoJV++/lx /9XFvquLvVcWIutHYRNgk4VBB4AJaHXUD4gBoLG7MnLzwtyD3VU6Dn+yAEzu X14CNtlbHwOcgTfimG/CJv3uWjhjTRfxTUDAJiTqzpy6eKJv0lZtbakyA5u0 lJvaKy1Y0xVqycE+XYOOQzaZ8VdMBqunw3XTXfVTobpJoJJQ/XRX42SwYTrU NB1qGfc3DLuqBzsrBzorg/bKupK0HLPcrOUZFGy5MFbIiZGKEmgq4QiFLB4/ gYqZC9liXixs70GETV4lCT9eKmARNhHQqRNkE+KbHLKJhINhEyaboGlCUvAa rUSrkypVYqmMD2wiEifyBSzikmAdFyyIgZIQH8Nhx1FiAZUAGVE/XcCJEVH9 fmMImxhUiQYV26jmJGu5Jj3fYhSmJovTUiRZVmV+prYo11hZbO1oKooEW8YH PFOD3ol+N2hq0Dc14Ac2mR0NTw0FvR01Jr1UwotVSznYJSAzRVaSbWwozwQ2 CXbWRDyN/b7m8Z7OsW7HRHfnbL93ps8z2d051+eZHXSNdrc2lqVaNPDXG59h 4FlULJtZ2lhk7rZXIJss9DuXBt3LI57VMS8Q9Mak/+x08PxsCNhka7H7eN7k 0lyAOXgR8QEpA+MnBE/wDrPQ61/Nm7zKNCFB+KjZi8y8CYDJ9c3Bm+eGcQgj kAhaG2iaAJtgKP750XAT5AvSNBgW8C6ch4LxE0AYjJyQwYtY2UUumUJ+IWET hJGXGZMjMKGGML5JscknLyjr5Iv3r3/121voU1C48bv7aJ385ZM3fvj8re8+ foRFWUgoCA5okWCJF46SB9AAMPmUHpuC+RHc3mP9FbEbYLON3cDIaBXKqaHz 8mQkCtxB/4UMWCTggNRA2IRZggU8AtwB579+9gT9EbzE+3QE/pBQmHMbyYx1 zLCQYAsaFieyCfFNojp3/ZMxxv1f9U2iqOQwfnL0TUjrZviXZ1pIzJ91YvkZ 6Jfe+Jwep8fp8as+SN4E2OTJ5fCTHYoyqMD1VuTaoivSYvFUajtLlYvd5Sey CbIME09+mlCOK8pVYVZ2ETbB4jE4kyfxPmn29SOrJVo+uu2V/+4mKIBscmsV 5D8xCx/FJognJ/bpOnlqCc0mCCaETY6Q5OVN6s5m5GCz98pK+PJS8MpK9+Wl 0Ma4I9Sc461Lc1SY2kqMTQX6Rpuu0aatslmrC9OaKvI6aoubK2wVuam2VENm kjpdrzQrxWalxKqRwxlkkXPMco5JwUmWswzSBAATLewMJQlJGkFmqs6WYyrM t+bnWdJS9WkGkUXLB/RYn+v/8oPXV6cjg+H2iK+pviyjvc4GqitNBzzJTJZa 9SpaCiAUs1aSohIkKbhmDd8oY+nEZ5IVrBRFgl4cnyxj1Wap3ZXpI66q5T77 5ohnY9i9NuhEwZ1zY77d+cjObPf2TNfGhP94Fh7gYmMidH6mZ2th4Mb5WWCT +5dXHl5ZITwCa7xEMLm7vXDr4uy1jXFgk83J8IlsAnvOUFupt7EAXRKMnBAq YbLJiWVdhE1aK0wdVVZXXbq/KSvYnBNuye1tzwM2ofImPipvMt1VNxWuBySZ CjfMdDdNh5umQk2z3a2TwcZRbx0gSaAhv8mWXJQiMat5Wkm8RhKnl7FUwjhR YowwMUYiTJCK2TIpVybji6Q8roCdwImTHPEI5spRJ/bpAioBNgEx2QTDJmIR Www8IqUEhCKSnOCbwBlT8FIZV6UW6fQyvUGObCKWcIFNgJWIS8JiH1JJAosa 1xgXHxMfG8NOoNwTdsIZYBMBN56fGMvnwO/1moQXoxDFEjbRKVl6FdsAeKLj mY1Ca7I4NUWSn6XLzdCUFpgaqnOa6/I728oGI47Z0QAGoIBNZodDEwO+ubGu ycHAyuyQLcsk5cMH8qTUhPozyapE+DMGNnG1lIZddX2+5j5v01CwDfBkDoim 3wvnpeHgTMQ13tM+O+SaGXQ66vOS6f+NpGrYyZLYLD0P/gwG3LUj3oa5iAPZ ZG3cvzkVADCh4/BhjJww+3RtLYW2loIEGYAgsNEWaeFLfBDEE/RHEE9I0uRf 6tN13DRBDCGlXEz3JKpPF7AJ6PaF0UeXp4EycAgjzoin5i3S8ROCJ6QcizTj AqaAO6/vL6K9ghhC6rhIap75RhTyC5JLlHuCKXjs0IXZE2o0PJ2FRzb58jc3 /vi724gY1OT3Dx99//GT7z56/N1HT77/+Nm3H9wnWXgSPMFBiljWBTtn2AP/ 55/eYU42gY9CisGBjFSf26OyKDJ7Ed6OhWTw2H98+wLrxODOh8+vwJkADtZr 4adh2RXTrUDXAH4uMAi24WKCCXolRxH4QzyJAg3sGwxfAI0YNHfgZ2EXMmY1 F8m2HBc8g4xD5rb/S2zy739655/wD0WH4tFGAf3liMiQUIiBQrwbZgyHwWiv E6Q6ZZPT4/Q4PX76eLbb9Wy3+9llosjTy5E3rvY/3u7Znm3rbklpLxZ3lEhH vbkPLvgfb4VQjy4F4fwUqIRxB/QQYOSCH/kliimY5V7H2YQpJn3g8/ghP804 DHlxDguOYrm76QU2oZnC/bIT17Ln+hIWa/0IRuAO4RdGw2H39RXX9VU36saa B3STPsPlwYoLdfgAjR5Xl9ygvWXPtRXv/qr/2mrgYD20txrYmXfvzHuurASv rXfvLPddWRvcWozM9rV31mSWpKmqcoy1eabKrKSqLFORWVdkNrSW5LlqSpvL cqvyrGVZKflmjVUj0otZRiknJ1lpVglMSn6SLBFugmCtk/FNWp7VIMxLV2aa JCZtYnWJZWLQtToX6Q+31FWkl9mSCrO1GSlieCbbrMg0ybp9jXcPzp5fGd1c HNpYGJwa8nU0FLbW5jdWZuemqlKNIotObNVLzFpRsoqPMsgTcWgFCBZ6GQcE i7xkSYaWl6ZOLE5VeRsKp7rty8P+pSHf6khgZSSwOhq8ONe/uzK6tTC4MdG1 cnQTHpjvdS30uddHQufGuy9MRi7PD97cmH5waenhpaX7l+Zf31t7+8a5N66t P9xZBMHlg62Fh9ugxXsXZw/Wx7bn+s5NhNbH/IsDzpme9hFf3aCretTfMOSp 7XdWRuzl4dbiQFOBryHPXZvtqMyAs6sm21md1VmVCZeOynR7RVpbqbWt1NJe lgpruNNZlQGvtldaWsspKnHUpMG5jU7ER5ylva4yOPc4SiKdpQOeytFg7Uyo dSrQMuZrHHbVDznrR73Nk6H2PkddV1uVo8pWnmFMg38rYZyef0YmoNpqgWRC Fj0NhK0Qc0ByMVsOZxFbRg0rYUvpeSUyYYL0aK4i6ui9+PbDTxAfVWph6y1O YgybE0MaBQvpjAlG4OVSrkTEBnhJZNFzSRJiEqnRJLFSMUelFGjV4pfSSeUK PgALCD6Ek0hNacQh8vCB8FEAKQAmlJ/CiWUlxJyJiUmIixFQwx/jeIkxIm6s mEtVXskEVGcthYjKxevVPKOGn6wVpuhEILOe+tPKMqnyUnXleZb60uzmynxH Q6m/o3Zy0Ls01bM21780FZkaCoCWp/umh0OzI10BR6NOmqgUJCj48RoxO0nB yUqRV+Rb2usKA47qfn/LaJd9ut810++aHXDPDbrnh9yL9IDFxRHv3KBrus8B 5y5HRZ5JbBDHmJUJybLYojSFt7lwKNA46G+Y6e8EMFkadqNvAmdgk53lyPnZ 4MX50MWFIGh7uWt3refyatf2MuWhXJgPnJv1bU571iddaxNOWIA2ptxwiXfW xjs3f1zNFZVJObG116vAhBktYSZNsJqLWdlF2OTG2aFra32AJ/vr/Xcujj2k hzCSyAkRwAVzNAmpywKmAHAAQkHKeP/eWcybwBkwBz4K3gtvgbfjx6LnQt4I 3AGEwmzVRUVL3thluifAKV+9c/DZO/tIJV/99uYX71/H4AltoNwEffPB3e// 8BDD43/+5Clwyte/u//Vb+5++f4d0B9/excuv/n9A7ru6xG8Sk1F/8OT7z6m Kr6AO4BN0D3BVsCk5S8Jy+NOm/AOLGBTjQVjmEDBdDxsv3FDjkYJXMLD8OGk BTFzdgnTziAowey1SwwXMlQRQyVoTJD4CRooPxzNTPnhaJQJKeUia+ZPPF7Z xbQ2TtQPx97ykrngjUe9yIjrdDwRQ1qKRY07IZVppzVdp8fpcXr89PHschcD TF6yycNLXTtz7X0dVkeZrK1YMtCZgfRBYAT0ZDtMqATBBNnkxKTJiWxyHEyY Iq3A/kfz5Uetw857afmO8IQUdHkJbmAP4ZurXhJ4Z0RLThh0EgUgiCdwub/s xJvkzs1lukHxGlXWtb/k2Zl1XpzsuLzg3VsN72/27m/27a51n5/1Lg23d9nL 6mxJJWmKqlx9fYGpIluflyKlWmzlgEzVueaqHHNpmiFLJ7Wo+clyjk4Ur0iM ATBJUXDhjlnFS9OJ88ya8hyTvaZwMNC+Otm7tzV3cX30wtpIj7/Blqm2GHga SdxQT8f8RDDoqq6vSK8ptQKbZJol6ckS4A4glN5Ay/NHV3fOTq/O9o31uSL+ ZmCT9vqC+vLM/HSNWcc360SwgQRCSVELUElKHpwBTGBBBGxiUbCtSrZZwUqR xltViQVmRW1+SldH5ViwdWHQuzYeOjsduTDbd26md2O6Z2kkMAe7xz7XwoBn eci3MhxYHQ5sjIXPTXRvzfbvr0082Fp6urv+aGfp9b315/ubT6+sApLgJVDJ 48vLILhzsD5+cbpndci7OOCeidgnw23Dnvp+Z82Qu66/s7qrtTTcUhJsLvbV 29w1uc6q7M6qLFdNLshZneOszoY7eNNRmWmvyOwoz2gvS28rTWstSW0ttrZX prZVptqr0ztrM0HO+mxfc36ovSjUUdxlL4m4Kga8NcOBupFg/aCrdshVN+pp GnY3drdVOipz6/LMOQZJmppvknGSJSyjOEEniFMlnlEcwYgCSUTIAuEahXdw liKhGOb6uITCBLRCMNgOEMHmvIZsQvAEJZUkioUsYBMuOwbET4wFlIA7Mkmi WilEKtGoRCqFQEGDCeZTuLw4/ExQfAJQTzyQi94gFwjZsXExXG58XOxrsWde YyfAB8aJ6PmPgsQzgCcS3pkjPIlTiOJ0Kq5BzUvSCBBPzDT2ZpvVuVZtSXZK XUlWa3VBZ2OZt616INw+MxIANlmd7Z8ZCU0O+mdHw+P9vrmx7m5PW16qUcw+ I+OeUfAp+8mqExZnJbXV2oKdNf2BIzahwMTDZBNAEhBcrk4EF4Y9nXW5KXKu WUm5J9lJAkCV1op0YBN4YGXUNz/QuTLqBjahE/HBSwtdF+aoyi46BU+xyc5K 984K5Z7gnfNz/rMzXhAgCbIJwROKTSac62OdaJegjYJC94TZ2gvYhDlykSiq motQyXE2IQtkExRQCcbhgVCobl106uQ4myCeYE0XJuKJA4JmB042QTcE4QVb eOG7sCUXdvpC94SMPsH2wtikC6mE2Z4L2eTLF/ufvL33KdWqax/PuAA2+ePv boEAT2gz5da3H977/uPHQB/AIEAiIEQSIkzNo0iHYezcBUKIOE4NSCJk8CJm 7TFNj8JPIFPjcasPZzRrsPcXGTuCHPEDowNwlI9Aqq3QJSH5cea7CD0xK6YI /iCS4Jdh2iXMejPyTYh18io2YWJIVHHaK0GGMZKe6cuQEAozDs/8FX7pjc/p cXqcHr/q40Q2eb438OBSeHfBPuTMcFYoWgpF3a3mR5dCSB9IJQgmJ7LJ8WDI /45NjnPKz2OTQx26JzSbPDgfvHeWCpsgdGBN16EnQg9YxInwzNbBzDHxwCCo A4aBsrfouLbUCXcoG2XdizYKsMn1Rff+gmt/0X2w7Lu2HLiyFNhb69leCq1N uqd6m3u9le7mvJZKa63NVJ2XXFdgqbWZq/NS6grMNfmmknRtoVWVoRNalByQ VcVN1wqBSpJkHJMKkERUkGqoLUxtLs8OdlTPDvovLY9fXBobCduDHTWOusK5 8eDyTM/W5kRnS3GympORIhZz4kKu2r5gc2NVVkmuocyWnJuqyEiRZJpkgCc5 VuX4gPsPv328v720PB3pC7Z6OypbavLa6qiRduU2U0aKFH0TOJs0QhQSCpom QCUIKQZ5Iv2FqXOSJF7Di9UJzpgVbLjMMgjLMvUd1bk9ztqpSOfyWGhpLLQ6 0bU8HlocCSwO+RcHfXP9nvWxro2xrrWR0Ppo+NJM//WN6ftby3cuzD3cWXp6 Ze3x7sqD7UVc37u0AAu8c7A+cWG6Z2XIO9fnnOruGA+1Dvka+gFM3HW9zppQ Wyko0FJCl3Xlddbk0mVd+XRlV66jOodOmmTSyoAz3To4C2Svyga1V2XCfhXU VgnK6KgCQsnxtxYF20rC9rIeZ2WPs6rLXh5oLQ40l7hqbM1FaeUZxhyj3AL/ MuIEA/CIME4jjAOiNEgTtSKWkhenkiTijPWfySa4Jq8ynyHAIqALtMi8EuKb ECGkgCQitkiQgGF5OAv51B2pmPJTgEcATHQaCbCJUs4XSzgIJvB2TuIZFpsC EzgnsF5L5MYZk5Q5uakms04i5QkFbAATECvhNeAdIT8O2ITyTeieWjggXikG xWsUHApPVBSeMNkkx6IpykyqKcpoqykENnG3VIbd9aO9Tto6GVicjACbjPa6 B8KOsT5vxNfRUF4o4cTKeXFKQbxKEJuk4NjStC1VedS4Rl/TWLeDsMn8kIdi k2GKTZZHfctjfrgEQgE8me5zwH9fi4qVpuUAm5iV8cXpykBbyXh32/yAczrS vjDoIHmTrcVuCkwWupBE4Ly1ROdNFg/ZBHRhPgCEAjo36wNIQTwh1gmzZ9f/ yCZYEsbMnpyYfydIQlwSpphxeGzbBWyCY+KxuAtJJEpwE9mEBOExz47hd9IB +MMnW/gAth3Gj8IHSP4dXyINhz9+tkOS7yT/zsyeUAH5t6588mIPewjDGUgE 3ZPP3zsAMPn697dBCCnffPAAq7z+/IenICz3wktcI5hQqPLhA8QNEi3B/DuK dOJCMMHOXfgSEgdWlGETMNzwE7TBPTx6LgR88APJUEgSFSGMgFGX484CzlUk WXImHSChkPuEqkitF9MJYvIC07AgyPMqyojq8UWcnSg2iRpfcuJoFdIPjfk8 E1t+6Y3P6XF6nB6/6oNmk5d48vSITR5udV1bcY24sxxlsmabINycAhhyWLJ1 Kfh0pwsLugiYMNmEhERggUmQV9V0/RwqQdvlX2GTH/km917mTXyETbCm68eT 351k0iITT1DAICjEExRhE2Kp3Nrw7S+4DxY9+4vevXnP5Vn3hUnX5ljndKS5 z1XeUZNRmacvylQVZ2vL8pNqCywNxWk1NktJhr7AqrZZVHkmRaZBaFFzjJI4 rTAOdrZmJTtdJyjJNNYUprmbS0bCHVN9rtlBL+ztd9bGDy7OX1gc6vU0ZCWJ M4wio4w1EO7YXBy+tD4JZKGTJaQlSeT8+JLc5NrS9KJsQ366tijbmJuqzrYo kE1g0R9q++Dd+1cuzsE+cCTSGXLVtdcXdDQUAqEAm1j0ArNWBCJggmxCvBIi YBOzkmuUJIBS5BxQsowNZ6uaZ1LAJRteTdcJC6ya2gJrR62tq7MOkIpqphRx T/d6Jntci0PB1dGujfHIucm+rbnha2vTty4s3b64cHdrCXTrwvyNc3N3Li09 3F2/t71yf2f1weU1uLy2Pnlhpn91JAh0M9XTORpsG/Q29bkbQP2exm5HTVdH VbCtwtdc6mkoctUVdNbaXPWFuLBX57VXZLeWZ7WUZdqrckEdVbntlTlt5Vmg 1rJMWLfCAxVZ7VU59pp8EBBWZ50N5KiztVXl1BenVuYml2TospOkqRq+UcpS 8c4oEmOAR5LkHK04QS9h6+WJBgVPL+dpgEp+jBhE/y9sIuHHC47QAyMkmCIh YIJ3UEAi6Jsc9hnmxcMl3JRJEoFHgE30WimcgVOwBgzw5Gh2/GsYMGGxqZou YJO8/HRbQWZaerJOKxcKOGzWGTZdIcblxAioFH+chB+HBV30RJIESjIW4Ike /k7UVGUX0zcBNqkuTEffhGITV/1AuH162L8y07sy0z89HBzscvT4WsPuZmCT ttoSrYSnFLDUIpacG6MVx2WlyOtKM9ytZRFPI80m7tkjNlkAMBn2LA971yaC wCazwB19DrgJazg3FJszDbx0XSIoN0VUlWcItpdORdqnetrm+jvWxr0kC0+D SReDRPxUD+GFAF4yxcQTUtn1EwVdUWyCRVxMNoGbTDYhA02YYHKcTZiEQiYw IqFQofidKcQQpsh0eCzKQosEw+xwE/t0UakQussW4AmzxAvnvwObkLZdBExg gaEVEoTHDyFJE1xTZWNvXsHuwcAmn75zDTAEYAQIBdt2IZ5888EdGlKoXDyQ yF8/fR0EC+CRv3zyDMTEE9pSuYeTFo86+j7ENZZFoVGCuEEWzKw3mepIrAoy c4QZ9yDdq4h1wpzezgyAEOjAUijEkyjPgnS4Yv5Egifk62E0Hi8JVpDWWFFR +igAidLx2Sj/EpsQQ4eETfDfltGv7Ee90X7pjc/pcXqcHr/q4+lOGEHjSD1P dnpev9L3aLv7+roX2MReKm0uEAQajD/fN8EqLJI0YSZHjrPJ/9i866fZ5ASH 5ZyHlhez8NhDmG6rdVivBaxxsOi6Nv+SR17Wbi05j4MJCDAERQgFBJeIKnAH 1rAANrm9Ebm13nN1PrDa3zLiLAm35AYac+xV6S1l1oZSS12JtabYWlloqSgw F2ZoCzM06UahSc2xaLlwTlayDLJ4JQ/2WvE5ZlVLVX6vr2m817k6Gbq4NHB+ sX99pruzPr88Rw/q9zfsbo5fXB4cDDRmGPjpBr5aEFtdlN4X7IAtXEGmMUXN z0iRW/XSXKumNM9cnJ2cn6aDdUayPM0ozbEqM1KkIJ+96ncv7l69OA9s0hds 9TuqgUpaa/Obq3Phe2ZR7aREpJoLqYREThBJdFK2XsaBhUHK1orideIEo4yT JE8EJSsSU+B5BRfOIHhAL2ElK7kWrTDbpCyG7WhBWmtVvrux3N9aNRy0T0Y8 K6M9F+ZGr67P3r64+ujK+bs763d31m5treyfnbu6PnP9/MK9y+v3dzdAsLhx ceny6uTmdP/ScHh2wA+YM+hv63U39bgaepwNfd7mHmd9qKPG31rpa6nwNJU5 64vtNQWOukIQLOzVto5qW3tVfltlHpxBHbSoRTV1ttcVtVXbmspz6ksya4rS ynNNBWm6zCRlZpIsA2BELzZr+CY136wRaERslTBBJYxTCWPVwliVKF5J7clh Q85WwbZfwpGJWRJBvAjo4Cg2Ep03eXVNF7OU60TfRCQ6zJswQ+5ETANFCsTB YBNYiAQJcEcq5kSxiVTKlcq4gCfomyCe0N26qPHxSpXQbNEDnmTnWLOzrGmp SWqVWCw8TLLw4Rm6pkvM/VFNl0ISr5KytHIOWifIJpkpyvw0fWmOqaYoo6XK 5mwq97RW9fia4K8RYHl2NLg01TszEhoI2yP+Np+9rtvT1lpTnJGsVfATFPw4 BS9GJYiB/xClOUn2hsKIpwEQnmITqqAL2MRLs4kX2GR1Ijg/5J7p74Q7uEAb pbYg2apmAZtk6LmwqM43DnhqJrtbZ/val4addOTEuzbuRjwhFsm5We+5WQ9N KC/xBG0UjJ8w8QTEZJMoMPlf+yZR3YOxuOtEQkE2Ie4JNuwig0hIYy4yyZ2g CqnsgkscJQ93gEoQKzBywjRZSFcufAljKSQCj4Vhx9kEBORCjTt58wo91uQq EArACLAJkMi3H94FGMEECmZP4PLbV/gmTCpBffk+1a3rq9/eRipBWMAN/N/p ASLY7ItMLWFGvJmsQfiCbMiRdPBjETSYvb+QVjC9TlCIuCdIDaRpMHwZ0oaL SRnkMeYb0anBL8ZsjIzvwoEj//39e//nz++TCrGoGY7H9fPZJKrpFomxMHMl Ub8vwSJSSvdLb3xOj9Pj9PhVHyeyyePtbmCTW2cDY94cZ4WitUjsqdH+/LzJ iX26fj6bHJ9v8hM1XSdYLWdx/KL7cC78OnNO4hGD0GwS5ZIcvySWytUFO4iJ J4RQosq99lYi5yY8Y75qT21GU4GhwWZoKTFV5ephw9NQAniSVpZjTDeKYDOf rEnIMovSU/h6RZxSdEYvj09LEpblpXQ0FA93O5en+2ZHwyFXQ3NV/kRvx63L C5c3RmcGnflWVaqOn6bnAulc35pdmw5HPDU5JjHc0YljtRJ2UVZycXZKmlFm 0YkzkhU5Fo0t3VCWb8m1auEm7ANBOVZNbqoq26KAc8BZ89Uf3ry7fxbzJkFn bXt9QVNVTm1penVxKiAMBuFNGiFCCrIJ0y7BLDwlKTuJzshTlgoNL3BpoO/D 2kSXgQHIKAUJyUpqoRbG6SSsFBWAlSw7RVWWbarIMdcVZTpqisPtdcO+jumI 7+LC6NWN2RsXlw/OL+5tzu2fW7i9vXb9whLcuXlpBW7urACbDCyNdM0MBib6 vP2B9oi3pdvVGOqs7/E0BzpqfG1VnpYKd3O5q6mss6HEAXhSV9RRW9heU9Ba ZWupzGuuyG0qz4ZLCkMqcutLMqoLrOV5ptKc5PxUfV6qIdusTU9SWPUyk0Zs VPAAQ9QiwJB42BjLuLEybpycFycTxMqoTfgZpSgeeEQpBnaIFwto0T245DKu UsGHPb9MxIoCjZ9gExKBJzoxbyKmxylic2BS2UXAhKROQBIxB2AEZ6AgmACV oGmiUYlehk1kPPRNsKYLYYeTGIM2Cg5D0eqkaenJ6RkpebnpRYU5mRkmjVos 5MdzOVS4nseO4bNjhJwYUWIMnTqJgX8cOY0nailLr+Qy2aQgw1ieZ6ktzmyt LnA1V/jaayL+5t5AS3+obazPTXcPDgCbdHmaQ65GX0d9W21JWV6qUsCGf38F P0Yjik1WJuZYlE0V2V3OuuFQO7IJDSY/YhOMnGAoHtgEwOTcXKTPUwt4kmXk p2k5FmroCaelzBrprBgPN6J1sjrmXhjswLwJkgidLvEAm8AC7kThCRZ3IZsQ PGFSCQme/D/mTY6zCWnPRVLwwCOga2t96J7AfazpekA3BH5jfxEIhTknEUcr YnEXET6DkIIUAwyC8RN8Ht6IVMIcs0j6CQN04B0sCUPrBPt0ff7W3qFj8myH 0pu7H725C2xCDze5jukSwJM/fXTvu48fAKTAJdwEff/xY4IkpIIrSvgSBttx TgqWZiGbkO00icDjzpk4KdiUGOkDLQB0Q5htuLBrMRnOSOCCTEgn2/Wo9llk jjypDSNcw0ymMGu0ol6KyssQUwZHjfzXd+8Cm5Ch7VFRl5/Q/y5vEpU0Od6Y K4pufumNz+lxepwev+rjRDa5fwHIouv2ueCEP89bo2kvkdjL5K/q03WcTbBP V5R78vPZhNkT+H9Mmhxnk9sbTlquW+tOSmuHk0eATQhrHCy6sU8XPbvksJSL 5OKRSvYXO0HXFhx78/ar83YmnqDQMQFhFh4u4YFRf523Prcu31CZrW4oTLZX Zbrq8tqrMhtLLJU5RptZnqblWTSJGUaRNYmjkcJW9ozFwKkrt0QCDWOwWRoP bZ+dvnJhcWN+NORsyrXqk5T8msKkq+fGt9eGpgccBWnyHJNQJYg3yrln53sc 9dmV+XqLlmXWJGQk8Sw6iS3dCNu2gozkzBRVmlGRkawqzjZXFmTA7jpFLYQ7 sMeGm2lJ4lSjKCNF6mwtBTa5f/38ykzv9LA/5KpztZY5mopbavJAwCaIOSjC JognxD3Bbl1qEUsnBVSB+/CMEASXsAbBTbxvVPANcngvH+/Qi0SNiKUVsZNh LeaAzEphplFZaDVUZFnKs00tZbnepopgW02wvTbiah4Nd27ODG0tT13dnL92 bnF3fe78/OjaZP/scHhqIDDc5RwI2nt9baHOhh5PC2x03S2VKFx7WqucTeWO htK2msLG8tyaooyKfGtZrqkg3ZBn1WalKFP1kmQlD3hKI4rXSQG1REaFUC3i AFKpRWyNmKMRJ6qELAU/QSlgwVor4YJE3DMS/hmFOEEJYCJhy6mOWLDh54Fk Uq5YxKba+UoTpQq+Eu5TTkoi4ZGfyJsgj4h5cSARNY0xltGq6yXdMPt0kTg8 cUyYcXixkAX4gH2GxQKWXMIFKkEw0WulOo2EoidJokTE5tNvJCSCkMLmnME7 EvgPbVCkmLRmi96UosvJTs3LTdNrZTwOIE+sCGiIHSNgvyZKfE3MRTah8UR4 Ri6OU0kSdIpEmk1EWNNVmJUE/xXqSrLaa4vgPxCwSY+3CfAENNhlnxjwjfd7 gU087dXd3paO+rLOpsqG8ny9XKIScmTcMwYZy6TmpRvFFTZToKNqtMs+M/CS TYBElkcoNlka8S6N+tYmQ2iarE+FQZORjo3prrGu1nyzNFXDyTOJU+QJ2QZe R2V6r6tiqqeF7tblWxp2AJtcmAsijDDZhOAJU8gmTOtkkzEv/qfZ5Of36Tqx oItcMsFkf72fjDu5cXbozsUxYJPHuzNPr84BoWDfYMImpC0wGc6I1V+YIkEP BZ4nHYaxrAvbcKE5gtYJkghSCcbnMasCMPLVOweoP757neAJNSz++e7vX9/+ +K0rGHvHnl1/+uj+dx/fp/EEyAJIAajh3t8+f+Nvn70BeIIWCSERFNz/yyfP /vrp69QzR4VPzAEoTB8BkyaYdsdpKVjHhXiCqEJy7ggp2DsLOAUj8PgjSMKC uB4YHsHyLeIgEB4h+RESh2cOcyfoQSqmEH/IPHr0RNCdOV7The4JnAFSQGgS kUKyVyHJ3xmthk/o08XAluN4wrR1SBY+qk8XgbJfeuNzepwep8ev+ni8E3q8 83I0yePtrsfb3cAmTy9Hbm/6p/35vmqNu0LVlMt7dDH8+FLXk61u0NPtnmeX e17f7aGpJMCQD3T/yDphdhL+6XEnzDquE1PwUcMZyQyU47qx6gDdXOsEMAFC wenwcAmC+9dX7NeX7QdLHaC7KyD7nRXHnRX77eWOW8udN5Y6r8607893Arkc LHn2F9z7i+79Jc/VJdfuQufugnOfmufuvbzgvr4RPtjoubIS2luLrIy0R+y2 tlJjTY4iP01TU5Jelm+qKLBUF6fBujgnyawTJKu5KRpetkVp0QuzzAqlkG01 CKpLLEM97SuzPeMDzpI8Q6pRUF+RfmFtZH2hb3mmpyw/KVnN1slikxWcSyuD G7PdIUdFhlGYpueb1ZxckzzPoizLSirNNGYaJKlaYbpeDOgB+/8UtYiiDxpD ciy6qsLMvFQDXJo04lSDHG6CLDppjkULr8I27/037t/dvzgx4Iftn89e42wp d7aUtdcXNFZmA7zAW/BdZq0EPgE+HKADmCJJCZwiIJQBP1cr52pliZRggaLX OjlPR53phYKSUS4wyigZpHy9hKcTc1FwSW7COUkuNKulVq3copGZVJIUpRjW mUnqzCRNNuyHTXpQrtmQZzHaUpNL88wluaai7GRbhiE3VQc73iyzOj9dn0dV smnhMiNFmZYEv4vUIBfopDwKN4Rs4AsFET9BDuLFy0DcOCns3rlxdG4iqn8v w/J42XSL9aMpJLQAUlRSjhJEAwslKUcq5UgklMQSiinEYpZIDNSQcFxikDBa kpdiURJREh6b8076dJEewthGWApvOfpFcAGUpFMK9cAmKpEGOIWGJhCm5kFC Xjz6LHR2nrqkUioCqrUXxueT9YpU+M+RbirISTOoJQLOGREXSCpOQE1gfLnm sXDEJEsBGKvkGTTCZL3EnCRPN6kLslLgr7SuNLepssDRWBFwNHZ72nq87f3B ThAsgp1NoLCrxdte11hhg8faakvgrxr+6nRKjiDxTLJeYDIIzUaho6WEclu6 7XNDQCX+tYnw2amutbHAyohvecgDWhn2whq0OuoHLdLwsjoVmht2N5Wnpeq4 Kcr4zCRhipLVXJ4xEm4dj7QvjnqXx/ybU6FzM+ELc11bCz3bC5GLs11nJwMX 5gJ0Lj6MZgohF2KaEDbBwSWAIZiCx3EnK0Mdq8N2HHTCHM5IkASphARMoiwS rOBCN4S04cIzCtkkSvAAzmHEGfGIHkAlABfYBxhrt0j2BLmDvIplWggp6LYg d4AAQ9ArASqhBik+20FCAfqAm/AkFoOhbwIvYQIF1lT3YDoa/wlVzXUVBy/S nYSpHDo278WSLfr89M9/eB3BhOmYAKFgiRehkr9/8eY/vnzrh8/f/Ntnb2Im 5fuP4XnKIvnyN7foCfLAI3foxP3Bl7+Bn0jNf0d+weAJFm4hEZAgPOERUppF 8vXHxyBGWSF/Y0wwibIbfvic+sKoHz5/DsI1/Ar//OptENzBcA1BG2achITr kUr+49sXWPoFIPDf37+Hc1JIkoUERpjBEDLV8afGxwOAfPHGP798TonxaX+n R5/88PWbf//mLdA/vn2bEqOxGClyQ1z6pTc+p8fpcXr8qo+HWwFKNDvQeNIF AjZ5shO5teFjssmD80FgE6ASYBNqsdP1xpXIkW9C2MQPbEJquk4U4gnRz8zF R4EJTl0kQ+GZqIIYgmyCeIIeCrIJhSdHbHJruf3WctvNpbYbi+2g64v2gwX7 rTWqtzCwybUF1x4lz7VF761z4d1F57mJlvNT7fvroZvnerfmPTuLgbFAhbch vc6mqslTNhcbO6vSGsqzOhqK68oyCzL1GSkyIJFUo9igYAOYAJLQOXRlfroO XgUqubQxtjzTPTvmb6vPyzRJzDpqUPjCZGhrc3x6xJtjVSWpOEZlQrIywdVc WFtkKcrQwJYpwyg2qRLTDaJMo6QgVVOQqs1KkmUaYdMuB3ZQi1gqYQISSnqS sijLVGFLBwYBvoBXgVCQNbLNWlt6EiBMQ3n+Gw+uP7q1uz4/fGN3Y2ooAGzS VlfQWpvfVmcrzNJb9VIAGSaYgBBMkE2IAEM0ssQoveQUhig2kQsMMj5hE604 USfh6aV8A80sRrkwSSFMVoqSFSJ4Rifh6mlUARmoZ/h4hstkpRiYBc7JWlGS RmBQ8XWKRLWUrZJQjaG0cvgCHLxUiOLlwliQApBExIEzSMZPkPLiJUAivHgU rFGwRsMC9ROEQuuEqYgvkYQhYBOKSmiJaDABCYTxx3UcTF4lwY/nvAObgEgd Fzomh3jCp34X+P7EqQEYQTABQgE2UUm5+JJYcIghCCY8zhkuOwa7e1HFYPwE TNArZEAHohS9MgMIMTs1SSsTw78hPwHOgCRCeJgmFJSQd0YsjJNL2WoFV68W GLUiwJPUFFV+ZjKwSX1ZXnNVIcAyYAjwSMTX0RdwAJsApwCt+O0NIHdrTXtd KfALPFZbkgN/kGL+GZBRy9OrE5N1vOqSVGCTado3WRoNAJtsTIQ2J8MUngCV 0FplsMn5uchYV+tgsPHyxuhIV4tZI0rVCkoytRZNYpqe31KR0eutHetuBTZZ nwyenQ5fnO8GNrk0131hJnx+OnR+7kdeCenTBWISCiyALAA0yOBFtEiY3bqi RpwQ0wQdE6Koyi60SNATQRgB9CB4QngEPRQccQJgcuPsEOjupfGH9ChGwBP0 TbA6C2MmzPmJzBQJARM8o12CFVw4uwTPOEsRFwAd8Bj8CDiTLDxiCzwMD3z5 Yh8EhPLpi71P39nD5Dtd1kXlRBBPvvoNNb6E9kSeff/xM4yWRHXlwq07xuER UmhOeeMvn7yBT9II8wAtErp51wN0Yb798O63H97BUY/Y1ItZxIWWB441wfIw xBN8koyGJxYGKe5iOiDM+SPM3lbEFvnHl0hSz5FHQAgpCFnAJv/2xxdwhvt/ /exlZ+Coaewkrh4VsSc5FDhHFYyR2MvxmDyzRutl3OYkNgEMocbHf/0mwRPQ P49aB5Pfl3zIL73xOT1Oj9PjV33cPe+5d8HLcDfCIGCTx9s9yCbeKjVhk4cX QsQ9ebrdxZi9GDySH4Sj4bGgi0yKPz4y/lVscrzKizkvngkmNwA3AEOOCOUQ XrCU6yRFWSe3ljtuLnfcWO64vgSy4/D3K7P2K3OOqwvu/SXfwUpgfyWwt+Tf XfLtr4cPNrouL/q35r1ro+3d7Xm1+aoiK784VVSWKWsoTmqrsHZUU45JfrrW pBXoZKxkNdegSLQaRLAoyjY6mkpg5z8zEmquzgdsKS9IOb86cnZ5aHmmp7rE atZxtdI4lSg+6KoZ63c6mgpNWl6yOhGAxaTl5qep0pPFhZm6XKsyL1Vt0vDM GkGSIjFJmWjWCjOSFNkmdZpRlqwSADgARFj1MgCTXKu+ONsMeAJIArs4wAeg DPRN4DIzRQ3PNFbYnj+88eTO1fnxyN6lpbE+j6e9ytVa3tFQiL4JfBpSCRNM mO4J3vmX2MQgF+jl8E/E10l5WilPI+FSxVH0GgQvJSlFSSqxEdhELYEFKEUj NWllsIBXDQqhXsbHxeGTCqFBJdQp4Tvw1NJEpZitAFgQAo+wFEgN1LDCeHru YZyUDwu4Aw+wYSEB9KAHBR5SCQ8VL6WLqbAXLpNNjhPK0RjEaDYhNgpT/3+w CZ/RjwvDJiAEkyiRwjAAELWMByQCImCCd+AlamYKL45JJYks0Gvs+NeoqDvd fFgsZIkFLBGFOYmAJ5YkdU66yaiRAZggmyCeAJJQ9V20gcJLjBHwYiSieJU8 EdkEZE1S5GUkVRZkoG8C0BFyNvf67UTAJkglzuYqoBJXSzXAC9CKr6PerJVK BLFqeQKAiVbJsiSJ8tI1QWftzKBndsC9PBYENlkfD56d6oIzkMjakVaPtDYR okIow+6z85HliUDIUZ5u4GcahdkpkiR5fI5J4m4uGAo2zg44l0c8G5PBC3Nd gCcXZ7uO2OQliRBCARhhcgq+dHE2AKAB3EHYBEfJEyeFAAsaKBg8ATBBMa2T qPB71JjFV7EJggkgyc1zw6BDNtmZenR5+vHuzLO9+TevL2PhFuZKSANh5lR3 UqBFugSjY4J4QoXZ6Ug73iQNh0FkMAqsD9sF00VcpMTr6/du/Om3t794b/+z d69h5p0WNcmdApMjNqF7cwFuPMciLqQPkjpBHoHNPFoMcOfbDx5+9xFQybOX bbs+uE8qu77+/e0/fXT/z588+utngCGHA00wk0JGMWI+BTfzcIdUfMEX++zd 6zjMEZ/HGjBmZyripJC2WngHwYGEyo8Q423kESQREGETELz071+/8x/fvAsi HPQD3eYLEyXERiF9vciERzSA/uu7d//vX37z39+/xwySHOcUYsFENQdm+iYE T14aMd+8DQIeQTz52x+fg/7548kmCCnYvuyX3vicHqfH6fGrPm6fdd0558ZG WHRCBPAhDOfH29231n3TARuwiatcCWwCYHL/XODeWT8snm73AJtgz64fs0mA sAnCDlaLAYkcZ5PjzYSZhVtROpFKrgNorDoInhw+TJImNIwwPRRS2UVpxXFr zXVr1Qmi0ihUIMVzfcVzayO4v+K9POfamXXtLnj3luEyfONs3/aCf3modcRX 5mvMqLNpCsz8ugJ9faGxtSK1uczSWGIuz9EVZ6gAOsw6gVaaIOPFaCRxGklC jlVty9DNjoaXpnrPLo36HTVAKzpZQoqGOzMS3NqYWpjoriiwwKVenqCTcXJT VeU2U1G2IdUoMuv4aUlis15g0vHhXJhjBGWalcka2JknaiQsjZRt0opzrPos iy5ZLQb0AOLINlPFWvlpxsLMFFt6ElwCPuhlXK2EA5SBeAJ34El4rKO+7Ddv Pnz39bvz4z0AJs6WckAne2NxW52tvjwz0wQUI0QkYdolx9nEIOcdB5NXsYlW LtDKgSP4GtgMS7jUyA9KXKWYWmiAO5Qig0qkVwrhGYNKnKyVJmmkcAffqAM2 UUZJpINXYYOtEKjkPCVssCWJcglHKmKhZDhvHSSmR65jWZQARSXWhdxYIS9W RCmOMhf41E3cyb8KTwihgI6Dyb/EJj+/putEMRtzvYpNMBFPaEsuYgOMAJJg QZdWISCoAmxCzUyhqeQITF7jJFBixcGZZhPgDtpYgTWQiErKM2qkqSk6rUJI qAQhhVncxefGgIT8M3IJS6fiI5tYjPLcdGOFLZ3JJn0BB1BJxNfR423HUi6g krbakpbqIk9bLbwKGgy7Ug0KrYINYKKSxetVnJx0dX6GFrB6vMcxP+xbnQhv THZtTIQONR5cHwug1sYCyCbLo/5zcxSVgM4t9C6O+Rz1uRlGAeCJVctN1XGr bElhR8VouIWexujdmPRfmO26NNcNoghlPohsgnF4ZpMuZhQFXjp7lDdBEoFL IA7EE6CS1WE7KfQibAILBBOAmldNXSQj4AmenMgmWOtFTJNb50duXxhF3wTA BPAE9Pq1BdKYixAKCtfojGDhFg4xwZtYx4WvohWCr2LVFr4FPRR8BsAEjRIU huL/+O717353549UMy7KMcEUPDomsP+nSq1+/wB5BNjkb5+9+f3HT9E6Yeqw 5Im2Tkgz4T99CHpMRjR+/fvDiYrwsZ++cw1+0Hcf3//b50/+9vljnG+CBV0Y LSEtvMgcQ2QQwiYgUgZGWnuROek/HI2bJ0NP8BJdDGSKl2zy1VtolzBFqrlA iCf/+e17//zqTVKI9cNRb2H4NFKLhR4N5uLRu4Ez/ERs3gWQQtoLR+VESL0Z mi8nTmlENqH05Uuw+rdv3v63b18gmwCV/PWrN/7y5ev/OGp6zBT+lF9643N6 nB6nx6/6IGxyNJQkiHjyaKvr5poX2cRZpgA2ASoBAZ4cGiiXmMNNflTTRUIl iCd4eWJNF9MlicKQKEVRCQETZBOme/Iqx4ScX95cd99cA3lurIK8B6AV742N 0MF68Npq8Opy8PJSYGvOd37KtTLSEWjOrs6WV2bJy7MUJemy+gJje1V6S3lq tS05O1kM25gUJTvdIEzR8EBWg7gs3wKb/KJsY16atjDLcH5lfHm6D/CkriyL fkCkl7Obq/JDrsaGitw0o9SoSEw1SEApan5uKtX1F85wM0nFS9EJVJI4pTgu RSfMtKjMBtioC3UKbopObE1SZln1tixTltVg0skzklVmrQQwBHgBTZO8VEN6 kpICBzEbBK+mGuRwB84AJoAt9WV5bz+5/dF7T88tj8OX7A91uNsq3W0V9sai lpo8W4b2eCkXIAnxShBP6IQ7xSZqKSdKr2ATvoYW7ocxG45JBzjDTdgqo+BV cgkLfAzvkBokECzkUq4MJPn/2HvL7ziybNu3LExmZhAzM4Mti5klSzKKmZnM ki1b5mJmpu7T1d2n+56+991+Z9yP7995M2JJ2+GUqrrq9Olb9UEx5oixMzIy lZalqv3zWnNNiVYt1qhFagrykAdCSgUnzj2h5KTVcDeosP+n60qOAuRyf8WB AkhKHliEbCIklJ9TNzlWx7LJsVJz1vX/et2E9XSx4EWOTQ6pitjEYVY7LRpy mggTIbWH+YwEJsQmokDuTHUTctNTYUUlw7uJzTq5y6rDAgyiVQQTm2ABAVWU wBmJPx99ckqtDNCqAo0aEfDEbdeEuQzEJgXpceQ3aakuFRZN8LCuLB8QfTo3 pTgrsfZMXk9L9eXupv6eltQYr80oNusBm35gk6RYe25aOH50L7aXT15umRvs WBzuXBrqmLvSsjDQtjTYvjjQtsBDCmOTheGOucG2kfO1c8Pts0NtYxfrASlV hYkhZrHbEBxhl4VZxXmJzq7avKHuCgqLXx5u3ZzohtbHOlfHWxl9sBxGlhH/ QjGFr5hM9ZVPn68ggwmNCCZgoUBGau4iMCE2oZ4unI+d0wUqYWxCRvgf6+mi iyQym+ytXgabkCP+ydURMp4cZRNQBjtTlYRYAwxCofDC1i+qnjB4oUwT1rhF fVwQlU4AI9D37+wATKjvi+OUd259+fYNssDz04M5jgBEcG1U798nRwlPJc/I P0KtXGySMFEJa/fCQ2zpwSa/+/ARqORAfN0EQAGsAJuAg/CF/vj5wz9/+ehP XzwW8gjDE1Y9EQYyUiYj1VnYdGKWukhRj9i3CysmrIBCg4iJTYgmOAr4+lVh Kxd1dv3tuzch6vWi6sn/+t3bf/v+DWaNZ2UdFr8unE4sTJCnYgqoBHgCSGFf WphOInTH+Hjen+s5mzyfJwwwYWwCMPnj18+gvwjs8z4JjL/2xufkODlOjt/0 cW+5ntPzcVjN/JAurrOL2KQ+x1SdoQeb3J2rJzah6smDFa5o8mCliVfjoRoe rDx/N6Gf3cdgcjBT67iayI/pKJX44AkRyrF+E6FBfm+hjqJPdufqb8/W3Zqt vzVTf3O64Qavm7Nttxc6bs53ro81jnUXd1Yk1OR5CxLNqWHKlFBVQZKjLDus LDuiuiAuO96REWNLDDWGWeVhNmWYVRnjMTgMooritEvddf29jZUl6eFOtdss DbEphi+2rsz0j13pyE2NwJVQu9KmFcWGmMm7HenS0zDVUJvarhPHhprT4jy4 HuU2RDh1Tiv2jUF2s8xqlEaGWiJDzF6nzmXVRIZYo0JsEV5buMca4jCGuiwR LqNVI1EFnzKrRKCSzIRwnIEhNq3ErAoGm4TatACTGK8lzK7DGU+BXx7tboNN lqf7l6Yu97ZV1pZlV5/OqChOKc2Ni/ZyFnih2UToMaEZXGwM189nE7NBDnEF Dp3UoJXqtVyNQ4+NsVaCK0a9DE/hBotRYTWrcD5Ym5SQxaS0mVU2s5o9ZeLv 1+vkOq2MpNVAUkitEh9KolEfSiOCwCYKRQAEKvkxccUUPqdDiCc/32/yf41N jvWbCBPhn/d0yfz5Kg9n4WdsAtAjTgSbEJho+TnDR+smUhH3kETPcjUUaYBO ie8A3lBBtRKrQQkkoTVr8QKbgGtkklMqhb9GGYBvhVkncViUXE/XIZuUZCdV FmeRF55KJ+11ZdTQBTY5k5cKlMYNeGr4QsfIxU5ctxjAJkEahZ/FEBQXaS4v TmmqyhvsqZ260go2WR7tXh3tBp4sDrYvD3VAIBTgydwhniyOdHI5jHzdZLiv ZmWyZ3Gsa6SvPive6TEGh9tkbkNguFVyOjO8pz7/SlvpWG/lXH/j6kg7wITY hCWeMEhhThMqoNB6ZZgzmwBMIGrfog4uYRojFVAYnghdJ8f6TYAkBCbUzUWN W8eyiU/1hDq7gCc0sOvptdFXbk7QtC4yv5PIS0JIInSdUPmD4AVnGvBFCzLC H4SV0Fhgfk1RJngfijsh/zt5TIhNuCFdTzc+ennj41c3P339KlU0vvuAc8FT 6eSbd/dAFnzvFlcKEVZGfMQCGeme338EMOEqJlQ6+bePHxJf8Bb7A/3uo7u/ /3iP8QjFmtBD1qnF8kqITXgr/QNhpxabJ8zwhHlPhPmMZEURxhQeQsQrVB8h DGF2eFZDYdZ4RgTEIKyAIkQAwgr2MdiIY7wETERmeZ9BYT4zihme+OrrV/76 1UFnFxvbxdiEiiYAkx++evrvXz8PTGFpkvTlfu2Nz8lxcpwcv+mDM5usCEdm NUNUOtmZrT9kEx3YZG++gQLWiVAerjY/WmvZf57DTqqDKAheaGAXjgIWtm8x JGFw8Q9FMHJruhI6Cim3qV/ryJyu21OV7CKohCLjb8813J5tuDXbCN2cabwx 03R9uun++vntqeaRrsKW09ElKeacGHVWlLIoxVGWGVqZG3U6IyQv0Z4UonWo RBF2ZbhN4TVz1o+4EHOMxwgBQ7qayqaHe4Ahpbnxdn2wRRMAGIkLM+WkhMWH m6M8Oo9FhivY5MeF2iKchvS4kPgwe5TbBFLAhl8v88cZLIAriREOj1lp1okc FkVCjNtpVYV7TTERjjC3yWZUhjhNXofJadGadXLsDLEhBD5Q7xbeNisxIic5 KjbESgZ5gzzApAwCZRCbQPiiWOO2l/dvff3xm6uzg2ATUFVjZX5tWVZVaRrw JDnaRkO9CE8Ym9D4X1rgy0G/lE1MBjkYxKDjwUQr0fFDd3HRbFTQUzgDQ2gt vMHC4wkWeC0J17VqEU8lciYeT2RKhUilFPtKFURSKgMBIFLpKbH4lA+nyGR+ kPIwQ1CIJz5UIpzTdVScyeVF/St6uo6d08Wi4YUzhBUSP3x4Vo0Cm0CWwzIW OU0Ym7DSCcMTXMGaOEUchOu8NV7iT/URI2BQFmhQS/CTiTU1dKm4WWcH7ngJ XssHx6sVASat2KTjvm+hTn0i7zdhbAIYaas9Q41bWDRWFNWeySM2Kc5KLC/M 6GwoH7vcPX7l3GBfm9Mic1plWqWfSRcYGaKvK8/uaCiZvNIKNpkf6lwZPbc+ 3rM52bcy0rUy3HnAJgNtz9lkuGPqchOoZH6kY264fXqgZWG0c26o40JrWWqU JcwqifOowsyiCKu4rii+uzanv710vK9q9lL94kDz8lDrymgzYxNWK2FUggUF Ly4M1a/yZAHQmL1YxaonwqHBWNNTIBSfScLMb+LT03V1qpPYhJlKWHHEh02o 3Yt54Ul3Vy4BUnB+dn2MAk1AKDizYcJkKiGaYEZ4YhB6igJNaFoXzq/dnsJD IpEXUkuebQJAgCFYUK8XqOS7t29TygnW5EABuby1P//u4+WPXtk8TDm5DQQg ce1YH+zznV2P//jZy8xaQoUSVkARpjGS+KLJw0MwefSHTx6RpZ2fxAUSAWvc +eqdm1+8dZ2bBnYYpEh8QbOFcScVHYgFmLWEoICRCFlRyCZPdIOFEEkYxVDb lTA8keMC3ldCVEV4QnhFD//23Zv/8/u3OCP8F/gYLzPDO4uAZI1kVJGhxi32 JyXuoE/CqjZEKMyTwt6BxbgLkxafRy7inq94CdjkPw57ul5gE4F1hU02JiD6 tTc+J8fJcXL8pg+iiRf5ohG798drrYCR8bbkjmJ7fZYuL8yfDB2C7q8mMoyw 8gdjEOF0X2FqyVHtCFCCFTt8JmsdjNWaKYduz1ZAO3OVpN356nvL9XtLdTtz VRAeclcWyh8sVT5aqb43X3FzsvTWVNn9JY5QuKT4paa7C/h4jXtLLQ/Wu/aW eu8s9OzO9ezO99yY7lwZqJ/oPt1TnV6TG5Yfa8yPM+XHmQsTbPlxluI0d0Gy Iz3GGB+ijPMqwmySCKci3K70mGTZyaHnWsobKvKjPUa3SW5Ri+rPFoxe6rrY 2YBtv00rIV7ANh44kBzlBg5ge09Ts7Clp+uMTYyKQDwLFuBn/HLDtfDaMJch 0mvG2W1VYyMXFWIJdxvjIhwui8qA3S+2eRpRTJitrCgjArRi0YY7jCnRITnJ Melx4dEeq00rMylFatEpnENtejyLM3nhQS4Z8WHXV2c+fvvJ1FDPxsLwxEBX Z+OZhorcsoLEoqzo7OSQUKfWY1O5rUqXReE0yx0mmd0o5WTgZDNwg7BIZr3k WFn0Uk4GqZVklFkMYv6fu7lnsUE1ATq0Uq6DSycDZwGyLHqFSauw6rFtVhwV bqB7SHgJpNVJNRoJRKGBEMURKpW+Ym1OMkErFLeBF/Q+kaQKkVQOBcnkQQoZ FKiQBWhUIu2h9L6iFi/fMPcXcxKDj7LJsZxyrJmdm7h1RNznVIgk8iDuo0oD ZdIAqcRPLuU6r5TyAJU8QJhEj281wJZ1c7HuOKqbAL4U4lMq7rX8y2WBwBMy wlOthNVN6ApXCgk+RX1cOiVITYK/GpdVbzOqgCckavFSc+aUQEmwH3WFHbZ7 cfMHYkLt+WmxB36T09l1Z3OpdEI9XWATaujCDYCXswXpuNLXVovfsvmxyymx YYogf1CzSRmIX8DS7PjuxrKryyOrM5e5tq6hjvWZ8xvQ9Pml8W5wB7Q42jk7 1DZ1pXn6SjNN8SItHmpusG1r9mJXbX6kTRZpk4SZg906v9QIY1VBXH9nOYWk 4LUTFxsWRzoXRzoWR9uWxtpxXhhqXhpuXhpqWhpqXBpqWKLkxKH65aE6gAkz mMxcqASDTPSUCUskTGQ8oWIKHtILyXIC4SEIhbq5hA1dLGkR0MEIhVGJj+WE XCegkr3Vy/fX+x9uDlLWCSCFBggLo96pOMKqJwxbqLOLSiEELMATukjjuZjV nfCEpgTjWSrHkBceVPL9OzsQZZ2893jl7YdLYJOv3wWV3P3mPa6b6yvc8OE9 Fqf4p88BJi8zF7zPtC5cZLZ3sAzXBvYZl5CIN/ny7dvYqAMHWF0Au3EAxbfv 36UeLVZfYFnwBBRknMdZOJiL+IWt8RLq7yIwoaFe9CpCHmE8CnsJ3Ukf5m/f c2O4CEmobvLXr1+j2hCukPeEmrtYmjyzjTA8YWBC0EHcQUxEpEC+eFZeoQR5 mjDMKjhsqpgQVXxmdv3lq2OyGg9ufh4W/+rfvsdXAZjg2VdIf/kaLz/xm5wc J8fJ8VPHg5V6Xqwpi+vRAp483WwHmww3xTflGusytaWxwcxvTsZ5inr3yRkR dmcdfeqYTi1B8xWjEsYmLwz+fYFKDjAEurtYe2ehZneeu8IvqvfmKx8s1zxZ b3i4Ur+3UH1vse7xesvDtdb9lea9xaY7C013FlvuLrXtrXTsLZ6/s9C7Pd46 0V3aURZXnuEqSbImu6WnU52NxbEtpxPPZoYWJzuBJ4mh8ihHUIjJ3633i7CL YtyKzFhrW23eYF/d/Fjv5GBnZXFaiFUZ4zUCJbDhTwh3pMZ4AR00thcgAOLA Atepkwokgt0U2ATwQu1VuIKbiWVoghZuToxw4inwiMemseqlemWgUR3sNHNt MMATm4GzeHjt2thwe3ZqdOXpnDC7AYoLdWTER2QlRiWEuzxmDZ8bGKwR+4FN Qqw63AB+oR4tfKSkSNfNjflvPnlrvL9rdrTv8rn6trqS+vKc03nxxdkxWUne UKfmWDYBlZAYm3CUcUTPCcUgJYFNrEY85K4cPKvj/hmftzxwbEK4ATax6FSE IT6ym9TY+jJCYWwipBLVYVT6sTv8Y9nkqPgNP7fnB5vIZVCgnGcTXrzF/jj6 +Gmpj23fOp5NjvlIVP7wEfucUqAExyb+YBNgFO9YD9QcghJNDKZWLpdVC2EB MKGeLjALNzqYZxNILqiYEIOIg17yYROSNOglLgKeN8XrVWLgCXgEfzX42yQ2 AbNQZ5dSGqSUcQ56Fe+XP0iWlPi7LVowclFmQnFWYllBalNVYWvNaVBJV2MF YxM8lZsSDTYhOzzYZLCvbXrofHFOilYWiB9mm1YMNinMiOltqdheGt7dntme 758GaAy3b85eXJvsBZIsjnUtT5yDuCrJYNvCMNfrxbR0qI2pvqnLTVBPQ1GE VRphFYdbRDblqYxoc2dN7kBXBcAEeDJ+oZ4PcGydH24BmHCEMtKyMtpKbLI4 WM8J6DFQuzhQszLcSBEnVB+ZPl8BPGGlEyGesAAUEmvuooYuIZscBROqjFDR hNiEXT/KJrtLF4AnjE0AJpTDSEmLlHjCrO6sd4v1cTHnO4uAx/1saDBN4qL4 EkpgZNhCREMueLAJlU4AJv/GDeO6TX6Tw1D4u9RDxRUjeC88TyLcDGEqKAgn BtMentVTaA02+dMXHG6QbwWEQnUEqncIfSXEILR1pz08sQkbtMV27LR7p3KJ cAPPBlvhKeZDoc9PVRWhk0U4wosqFH/h0yRZWxeZTYSThOlZvr/rVeEwLmqU EnZtkQueAuIhGibMPj99Zvq0BDgQ/al9Os2ESEJNXyxBknlY6G2FFPPXF2wm B1Ty129eZgKe/Nobn5Pj5Dg5ftPHw9UGXk2H4pq19hbqwCb3F5tGWxIbcww1 6eqSmCDmN2elE7CJEFiEAHJg/Xgxf+Qom/ggCfVf+bDJgQ5hBABCOnDxL9XR gm9Oa+AWS3UPVxsfrTfvLzdwX3ehfn+1ZX+lfW+pdXexdW+5495K152ljltz LatDDSMdRW2lcWdSbNmRmtxo/ZlUZ0V2aF1hTGVOZGmaJyPakBSijrZLYpyB kTb/OI8oPUpTlh3SWpk23Fe5PtO3Nt17Y3XkSndVVrwr1qsLtXK559gmYedP ZAHKwP4fGOLQy6hcAtYg9GCWDdyMi2RapwYq4hRiFpAOSITABCIYiY90gk0c JgXwBNiCdYTHFBViCbHpIl1mIElqTGhSpCfCabLr5AATkk2Lr6UFngBY8Kmo NJMc5d7ZWvzL7z+fG7swP37hSk9DS01R9emM0tw4KDc17MfqJkfZ5Ng4D4Yn L7IJzhK+gCLlCUX2S9mE4Ql/pwzSan8xmwjx5J9kEzawS9jx9U+zyfF1k3/I JlIJxyYcAnCTfrmJZOwj4ZtsN6lAJR67HmKlE2rowucHmyglftKgU3y55MD8 fggjvnUTkozHE7yE8ATQoQAI838pABOgCtiE7CdqhUir4uYVcOEpvDue65GT BxmUIvy0ZyaEA0AqijNaa0va68oofpGxCcglJzmqNCe5LD+tobwQbNLf0zI5 0Ft7thDvwLca4rdPmp0Y1tdaeX1l7NbG5O7GxObspdkhUEPn1uzF1anepfFu 4Am0MNo5P9zBsclQhw+YQKvjPctj3YsjnQCQ6sKEEGNQjFMeagoOt0iK00K6 6/JHemug0b7a2YGWF9mkFWyyfFA6aVikOMX+moX+6uVBji/IYELOd7KWCGNN CEOE+Yx0J3nnWdYJsQkFLx7Nf2etXCyBkbV4+bAJc53s8454YhOACYnmCZO1 hCYAU148c6OQ852lLpLIVwLRgvCEpnWRY4XgBWcymwjFWeM/uPPt+7uk7z+8 +/uP71MsO4cn798/7NoCmBwUFxiDsMhFNq2LSipcH9cnD9lkLbAJs4rQSC7i C9apxUZpMZMIIxe6hzVrUTgjCftwVoCA8JDenMYLEwoxCCLRq9g4X97xwf2J hNODyV2CMwVN4o+DPyM/Yfhg2hVBDQWXCFuzWFXlf//hbeZ8J55iX104Lpgs 6oxNmIRIwr5LQgpjeMVeeKSM8pxHqGJCi19743NynBwnx2/6ONLT1QgBEB6v t95baBxrTWrKNfqwCevsEnZzCSUMRvzp6VvHsonPBOCDexZrScQj0L1lQEcj efmxeLTRAj1YA161PFpve7DacnexcWeu/s5i8/3VjnurXRySLHfdnGtbG6kd P1d0qTG9Ni/8TKqjJNlaluYqzww5mxlSnh1alhlamOxMClHFueRxbkW8Rxlu FWVEyfMT9S1nY0d6SlbHmzZnOm8snV+b7Fwe7+hrLirNDE2LMka55BFOWbiD CxYBfaREe1iVhKziND6L7B5AA4AJM3HgIkCG7gcyYKNlVgElJDTpF9wBBjFr xS6Linq6kmI8uBji0OEKEQqYxagOdhlVUW5LSnRIWmxYXKgDJGLF5lAeZFaJ HXoFkARggov8QkMJjPiKa3Ojf/z249nR82CT4YutbXUltWVZZQWJJTmxv5RN jo7M/XE2kfqwyaHkB9IqzFrlsT1drGhCYEIbYK1W8vPZxKd0wjzjR9hEzCtY pghWyKEghTzw57MJuyjUz2eTYzHkeDbhwEQklgVKZACTAMYmB3UTAZvYjErw CKjE6zDgDEjxYRPKi5eBRw6RRKhj2USOhxybAFJO0bhgLKiAgjOBCbEJDyYy nk2C+VhG7n6KvzTIA7wWDeij7mxeW11pZwMHJsQmTZXFYJPCjHgI8HK2IB1s cq65arCvDWzSWH1aJfanXxawSUac52JHzc31ia2FwdtrY/euzWzMXpgZaAGb bC9cBp6Qr4Rr7hrp5Eonx9VN5vmeromLDasTPWPn64pSvWFmaYxT4VCfinbI KvJiLrWdGe6pnrzUOD/UtjDctjDSSgKbLI+0rPBaHubbuoAnfN1kaeCAPsj2 TtxBC2aHZ7EmhCQ+M4cJT6h6IgyFF7ZsQT5XACPCSoqQTVhn1z4fEP/02iiF MIJKIOAJ1u/cW2ADuFiyCTnfKfqEzeaimgiX7c672rEmPCG0IccKjfOiZwlG IOEk4W+4cslBuMl3H9whazmZJsAm5Gf/wydP//LV68yRIbS9U2cX7vn2vXvf vLuHM9bfvb9HAY40VouCF6nbihlGGG7gTPGLbEgXuV0Yy5AR/ut3d6nIQh+P 4tepk0oYtk5+E9q6CysvjCCowEF9WZQLzwZzkZVGKPqTctWTQ5c61XfwkJiI 3BzEFJQRj0/FWryEo72EFn42lYuZ6IVZ8z7ZkcISiU9K43Fs8hxJSH/+8skJ m5wcJ8fJ8Q+P+0u1vOoPxZnEgQn7y013ZuvAJi355toMDdhkd67Wp02LFUqE Y7JYieTYm49lk6PdXD5TtrjJWpQRudIADCEBQxibYE3ClfsrrQ/WOvbXOoAk 91c799fP7a/37K323JhrWxyoutKS3VQSeTrNmherzY8zl6ZwYe51hbEVOREF ifa0CF28W5karo91K8JtkgibNCvOfjY3dvRc/vTF0u3p5puLndDaeOPcQPXq RCsgpSo/PC1Sk59ij/cqUiJ1caE2ggvQB2WvE4awOVd4iHtAHLhCrhNsqxx6 WZhdh/txHfdY1CKwCRlPuOREj8lj07itasCI166Fwt1GEEpMmA2oYtVLTRoR yAVnt0kdG2LPiI9IjwvHAhhi08r0skAQSpjdEOE0MTbBh8FXx4eBJgZ6vv/8 namh3vH+zqELLU1VBTVnMsuLkouzY/LSwv81dZNjerp4g7accINfKE0axXNU EYjZTIhKsAGGfimb+ODJsWwiO2QTuYBNuMxBTlw94ih6+LDJ0UiUf55Njv5B JPJgsSyYYxMpsYmfBNt+zi0SoOLTW9gHc5jVbpsOYBLiNDI2IbMJGeEhfEil xE8cdIp3u3PlElHgQeri8WzCpytyOBP0Qn8XK5ewUV16tUynlmr40Hk+NZ57 oVLsZwC8SPzUIn9A+tnCNK5uUv+8bkJsUpSZUJKdBDwpL8yoP1uA60Pn2yf6 e5pqziiC/awacYgVmC/PSgwdPt+yvTSyszV9Z3Nyb3tqZ2N0DUgy1A422Zq/ tDLZwxVNOJNIJ+cW4a3xQrMJp5HOBd4jDzbBYrSvNiXcGGWXRVglYWZRjFNV U5Qw0FUx2F0509+yANIZ4UonPJu0LA03r462ro4CT5qoj2t5sH5psFbIJkfx REgoq8PcwGFmRSE8YZ1d5IsnU/yxdRPhFZoYDP0Em9xZvnh/vf8RHxD/7PoY VUyITZj3hE0PJjxhDhQGJmANKpGwigkTLrKXsxdiTZkmZISnl3AllTeufv0u F25CufCgAGbZ+P6DffLC/+GTJ3/9+o2/fPUaQxLatDP/+9fv3P3izR2cabQX BZqwWVuEDORYZ+EjLNaExoIRwpCxnXVnUcWEPowwO57N9aJSCNvAE5UwJ4iw IkMvIVp5nsx+2NDFrCWsXEJ+E8qF56Ds0GDOqifU3CXs4BIWMoRPEXqw4cOM O/AUEObvP7xD/V1EKz6NWwypmOme7O2MyH6MTRiegE1o8WtvfE6Ok+Pk+E0f PJjU+bDJznTV3nzd7kztRHtKW6G1LlNbHB3o4yhhMOITNfJCy9ZxbhShhOUS Ntr3OY8cDtTaX25k9PFwvRmiKglQhZgF1wlSOH5Z7by30rG30nl/7dzd5a7N 8frJ3uKemuS2sujq3JDSVGtRkqkk1V6W5TmbFVaeHV6c4s6IMiSGqBI8SoBJ epQp1Cxx6sR5Kd6+1jMzQ50T/a2bEzVbk7XXZhtXRiqXhipWRmpWRusWh2qH zxVX5YdkxqgLki35SZZ4rzQulAs6BG4AKxIjnJkJ4VgwDKFaSYzXQgjDSiQG eQCeoioGDb8iMAE4gE1iw2xcv5ZDZzPIACAWncRuBCMoqG6Ch+RAgUAfSZEe sElylDfSBcxRu4wqrcQfhBLltsR4bQATXIQo5STKbcInGbrQ/sM3Hy5MXJ4Y 6Bo839xQkVdRzGUvlubGFWZG/Xw2+fl+E7NexEkn4YY1acWUWsLYBMTx02zC EIbsDIQn/2U2ITz5J9nk2PatI055Tmr1MaODf35P17ESsAnAJEAi5tiEq5sc 6ekCmwBJACbEJk6LxmZU0uhgakLj6InPcOHZ5CDWJDjgQD/S03UKiMFEMYsg ERZuQkEnnBtFI9OqODbRKA+M8NwYNLGfDjeDUwJeMsiDEiMdlSUZNKoLAIIz SORsQTrYpDQnmWv6KspsKC8Etgz2tY1fOddSdxbvgN84vgQpz0uNnB48d3Vp 5P7NxXtXZ26tjd7dnri9NgzcAKGATaDVqV7OdTJ+bnnsYLywT08XdXPhWaDH yvi5pdGu880lMU55hFUcYgy2KvxSIwytFZn9neXjF+qmrzTNDDRCwBNh3eQ5 m/BeeB82YUODSUJCobnBLIGR7qQr5DohUWfXUb/JUTb56boJ2IQLOuEtJ8AT Gib82u0pEtYQmxJMtRKyljAwYUUT5nkHbjAjPB6SaQX3MJEPhWolZJantrF3 Hy1/8trWl2/fJDb56h0u3JC6sA6LJlz2IvV0kdPk6DBhohjywn/3PhDjhUFb VIVhAEJIwjwgrFZC7ngscIV25gQXzF5BlRHa3pNXhUiK7melBDYpi+oy9LVI wkBG7uPxfhNmKmGpi7hCSfGspPLXr19hIMCiSdjkLjanl1lFKJ+RCigQ1qwy wqCDGsNochc5UPA+PmDiMwCZ2ITmfVFXmI/fxKehS1hA+bU3PifHyXFy/KYP vqGr3qena3e2GnRwa7JquCm+Oc/UkK0vT5KxgcBCHnkh9PDFGoqQU45v6DoE EBJhCDdNi3/I8chK06O1FoqeJyRhVAI93uQuMlqhgV14+Gizd2+la3ex/fZ8 +/pIbW9tcl6sKjVUkhmpzI83FKfYStKcJWmukjR3cog6JVST4FZE2cSxLlm8 Rxlpk0Q7lZWFiUN9DctTF+bHehcnzm/MD1ybrt8cr1ofrZjoze1vSz9XHVud 56gt9NQVh+bE65LDpDinRSojLP6xXgvog1I/sP9PjnIDVbBrokhEoyKQzO/R HjOFs+M2q0ZsUgZ5zCpgCHAGC+r1IjcK1ilxIQlRLo9No1cGGlRBBCbU3EXD uyI8pthwO87gEWITnENteiCJRS1Ri/ysGinAJDbE7jFrnAYlgAXvTz59sElv aw3YZHm6f27s/NiVjo6G0/XlOZUlqWUFib+obvJjc7qOsolJF2zSBvNUIuI7 wUSHqYsHbMKXTpRGtfzYni7mMWGmBm4Y1C/xmxwtnfyTbCI0mLCLLFNSqGNj TY5lE9ZvJtRPsIlIGiAWsIlKEaRWBPG9Z89nHfuwCR5aDQo8ywZ5ES9Q9iKL NSFCCfI/nk3EAZzZhMolTIxNCEw4eFQE67i6iUyrFmu579VBXcmoAlSdUgSe 0oCngk7ZtNLclMjaM3nNVSUAk5bq0prTuWxI15m81OrSHFzEDy2xSVtDhUYa gF8rF34v9JL8tKj50fM7m9M3Vsd2Nyb2tqd2N7EYvb06vDTeDSrZmL2wPnMe AqoAOpaGO4AnS3z0CdPkpUbgCZ7dmD6/MNwxfaUZL89Pcrm0fmHm4Ci7LMws SgrVtldlD3ZXjPbVjF+smbxcNzvYtDzaeuiF5/wmEJvTxVVPBLjhE7koxBOI rCXkTKGbhWxCYfGss8sHTyiB8eewCYnYZH9j4BGfEf/02igVUCjuBHhCawIW MqFQ4YNlnQhFMYtUBCE2oTXlMH7z5k0aycVC4fHsC9OJHyy+/RBa+uDZOgjl 2/cPste/e3+PzCZ8ieSVf/v4CZkviEr40JPH5C6BaHtPg4W/fe/e1+/sgguI TXCmviwqi3z1zg5Ewe7EL2zHjodseJdwKherRDCPBtu6k6WF5nRRlxf27Xif r9/dZa1iJBbCyMZ2ce/53RvCbi5KWqRaCVlOaJgwByyHZRHKl4eoF4uu09dl w4EJnaimg4v/+af3qDJComdxZkEn9HLgBm5jdhJhsqRPGxiVToQh8oJ4lBdc 8IxQTnq6To6T4+T46ePeYs39pVoCE/LCAweABjjfnqoebIhtzDHUZmjOxItB IqAM1sdFE4PZiGChjg4QJn8Ku8iiTx6uNz5cb2LE8Xij9fFGG/RonQumF+r+ cj0+3pON1mdbHa9c7Xq83obP8HCz4/F214ONjltzdbfm6/Zx23r71uzF8Qv1 dSVJKeH6GKc8NVyfn+A8mx7OK+x0ckhhrDMz1JTi0qSGq+Ld4nBzgFcXHO8U 1+SHTJ4vu714Dro113ltqmVjtG65v2L+UllffXxnZWRTSUhtgasix16aasqP 15TnuivzvTVFEXmJpuJ0Z2aMIdohinLp40LM4XaNyyCNdhtSopzxoZaEMGuE Q+vQiQ0yP634lEUVFGrlZmRZ1CKqpIBBQm3a9LhQymqP8VpAKHgWzKKV+JNZ HixD9ZQot4nmegF8YngUwlPUGxZi1YFKwCA0sMuhVwBMQChgFlzEGTfgIj9n WI9X4bX4ipe7m/703ccrMwMjl9oudNY0VRVUlqSdzosvL0ouyoq2mGQOm9pu VVnNCpyddo3FJDeDLwxSklEvIflEvVPCOMvOEIqxyaEkFO/Oi1lOlD/mNxGO DmacotHKVGqJUiWGaAGgoIdHJedxA5LxPnfO6n54RSjeYE5e+AM2USqCyGPO eqUYmxz1ntBFYW2FKOBAioN0Eg03B5gLW+HyVpQB0kMRWLHwRM7/IvP3iVOk Li9s7kWyAJHMTyzlqAQSi1+SS/0UMj+l3I+CDo2aYHzbnVaFy6b0OnVhHqPb rjEC5WQB+MviqYTzsPNNVgEqSZBMHCCXcFN/sZCK/CEsJMF+tGBr7h5RgDzY 30eyID+cFSLurTQykU4h0Su5CtdhHMxzsanF9L2iEBn8LlDQCSClvDADbFKQ HpeVGIFFQ3lhR/1ZsMlAb+vUYN/5znp8IbtOppMG4BekODN+fXZ4Z3P25urk 7sbMvasL96/N39uahW4sj0xdaV0a67m+NMiVTsa7gR4ro5282peH25YGWxYH mnFeH+teHelaGsTFztXR7pWRrsXB9msLV5LDdF5TkMcYZFGeinIqKwrizreU TFxsmOnnHfFDbavjXXP9jQsDdaCSlZGG1ZGGleG6pcGahf4qXFwcrJ/vr52/ UvO8YnK+cuFi9dKlmsWL1aTly7WrQ9QJdgAjxCnCHEZyxEPHsokwAp7MJsQj zPxOApLgzC7SwK4HGwOsbkLnt+7Ovbe/9PrONKukMBMK9XdRAYX1dFEBhdbU xMVlzT9c/uyNa9+8t0PTt759fxfc8buP9vDww5c3QCJvcUiy9M6j5Q+erb37 ePmN+/PQe09WP3vjOu32ufaq9+8DQPiawhv//uVrwiFdVC4hPGFrEjdM+HAC MPVWsaB22nhTRYMKJWz8L22wqR2LJSoyLzkVI8hpTpCCnTz2/LgBAEJ2e3Ka kMuDusjozVm+Ce3wWZMVEQG9G0Rfmnb4LBOEpZnQddbKRYZ3+jCEDPg8uAIR hrC+L6KJv//wDm4Q5i1SlxdJ2APmEyvPak8+s4V9IIXd87fvX6MZwkQoRCU0 UvjX3vicHCfHyfGbPohN7i+x0kkj8ISxyVBjXFOukdiE8YVw6JYgtPG5hGDC ouF9OIVEbPK8FMKDybFssjtX9WCVm2z8dKvjyWYHTystdxZbHmx0P1g/t7eC /zvXT/UVXKxPLE2PKEjyZsZY0yKN2bG24hTvmYzwnChzbrQlO8qQ4lHGWUVQ okMGJEkLV9UVhl9qzpm5VLE52bq71Lc0WD1/uXyqt3iwJau3Mr6lKLQux1GW rivPNFbn2GryHFBdgbepNKIq19NYEtl0Jra+JLo03ZmXaI52BINNIC+28VpR iEUZ4zHGek0gFNCKTRNsVgbgOjglNdqVGOEAnkS6jKASYAjfMM+Nz6K5waAV ssMDUvgQRmd8mJ2meLH2MDKz4x34AaoSndQ/3GFMjvLGhTo8Zg1N6ALauE1q spmE2vQ0QJgnFx0VaPDynpbqP3//ycbCCEVGdjefrTmTCTY5W5gENgGPEJgA SWwWJdY4Y/1z2ITCx4/qoKeLVVUO/SbEJsxvAjb5Cb8Jw5PDOV0cnqg1UiYQ CqOVf8gmx0oiDz7KJip5kIrHCuqVYu1bR9mE8QirqrzgQBGwiZrHExWVS1SB ELHJP3SakARscoqxiUxyCmzCh7AHckMJtMH4ngNMQlzacK8JbOKyqfGdx6ei ni5iE64jSxKolgYrpUEEJiRgCGBEFMiZUPiMEj8GLD+TTTg84ZxBBzUy+usm nwvARCnxo14yktOoSIp0UeJJcVYixOZ01ZXlg01ohvDkQG9fZ70syB/MTqRf lBG3PNl/dWn8Bs8md7dm72xO392cub89d//q7PWloZWJvgXgxmTPxsz5lfFz 6xPn1sa7wCbQ2mjH6kg72GRttGt97NzaaPcaDyak9cneheGOWI/abQh2GwI8 xsCEEE1dSdJIb834hfqZ/mYu6ASAM9y6BLIYhuqXh+uWh2rBJosD1UtD9dzk rsH6BYEdfuly7eKlGvAItHKljrTUX89IhAiFQQqBCUnIJoQnRChCNmE6lk1Y 3WRv9fK9tSsklhFPxhMazAW+AJKw1Hgqc9DoYGITatMi/zuEh5SEQr6Vdx+v fPzqFvDk8zev03zgr9659cVbN3Dlo1c23+UzTUAiWH/2xtXP37z26etXsQa2 fPLa1S/eunUw9ZdnED7i5MmfPn/l3798lQ3pYuEmR8HEh01YFxb793/mZyen CfV60c3Mn8KSTVjMOk3Bot04s2ngIe4n7zy56fElqDOK2Adn3EDoQYxDm3ky xVOLFKEBOIXFkRBr0G1sOhZjCsIEKluwT0VrYf47c7iTtYRdZ5TEMlDYYGHm TxGSCHsTehV9IWY8YeWkQ9fJK0QibJIwW//aG5+T4+Q4OX7TB9jk3mLtvcU6 od+EZ5PWnekaIZtQzCIbIEzr/ZWmo/JhEAIWeohn6SEWD9daHnFg0sR6tB5v /iibPNlqe7rd8WijfX+15f5Ky/5ax4P1rgcbfbuLHUv9FUPtue1n40pTLLkx mtRwc3asqyQtvDwnrjwntjDJnRauT/YoEpzSeIc4xSPLilDnxxqKEsydlQlD nQWLgzVro42LAzXj54ovN2V0nY1pK41ozPfUZturMyzVGWaoMtMA1WSba3Ot VdmWqmxbfYG7oyL+QmPGldbcoa6iuqLIskx3ZpQmLsQEDPGY5C6D1G2UAUMS w23EJk69BBeBLZFOHS7SkGEQB0DDpAyCgCdAD2zJQBz80CFuHDG5TpKj3Olx oTRnmMIc9TLuX4lpRjFeiI0ZcAZgAkW5LS6jyqwS66QBYBMH9vAqMQRI4VMX NfziwAUDdTVW/McPX97anB293DEx0HW+o7q2LPtMfkJZQWJ+eoTbqSMegUAo ODts6mPZhAZt0Z6TtTAdyyaUvci6vCx6GiAspW4uIZsIe7eYjlZPTDyVaA7x hKjkF7GJVBZ4VBLZcWyi+O9nExZVrzgEE0imCKDKyNEBwj5+GR82AZgI2UTL FU1EFr3YapS47apwrwFs4nXqnEBOo5z+mvDxVNIAVjcBm6jlIoU0SMgmABNm POFt8v50XS7yBRMmsIlSzJEO8EQr59u6DmNWaGq01aCwm1R4yComRChq0Sn8 PMeF2vBjnxEflpkQnpsSnZUYUZKdVH+2oLOh/Hx7HfV0XehuVIr9ieXxi5CV EDYz1Acw2dkElczyeDJz/+ocxybXZh/cmN+e758ZaFsc69qcvbgxfX5jsofH k87VsQ5ik5XhttWRro3xns2JXhDK8nAnwGRt7BxNFW6vyQ8xK0MtYrCJ1xSc EWPprsvv7yyfvtK0MNw+19+0PNJGRvilobpFopLBmhVAynADscniwHMXyQqg 40odVyvpr18fbISwWOQHdgnZBDcLqYSJJgkzPCH9fDahBQMTLO6uXKK2LuAJ 1UcoaRGIwZU/eMsJyzfBAnjCIk5oTXO6Dswj/M1ceuOT1Q+erYNEaPrWN+/t gFA+eW0bDELAgjPWEG+Ef04uYJOPX72KXT231T+cwUW58GyAMBvPRcmMvmDy 0cPffbQvnM3FnOlUH6HyAS6CSigA5cu3b1MMCtVQhLmKzBHPtutUtqCahTBj ne5kDVGUbwIRrdAHoPG/BC+026eXY6tPk7Woq4ohDOEGAyv6AMKKBuvmYvUX 5jHBO1AII0VPMp8IK6wQmwjasZ7jhjApns1SZrEs1MpFPheGSIeGl+dNXNTW xRIYf+2Nz8lxcpwcv+ljf7mOeeFBKMz6IWSTukxtWYKEiiYUvAisgI4FE4iV RYhBKEGewIReiIeP1lufbLbzYNJ8CCYcm+DiYfWkQ6i7i033V9sebnY92uq5 v9a9s9B+fbp55nzZ+Touxr0owZIdpc+LsZxO8VbmJZzOiMpL8GRG29IiTClh mqQQVaJLGmcXJbklRYmm9rK4kc7C+SuV85cqZi+eBdd0lcc1FoY25Lvrc51V GZbKdFNFmgGqTjfVZ1sac2212UaotcR1sS5upCNjqrdg4fLplaGa+cvlCwPV s5cre2rSTqfZ8uIAHVz7VphNDYVYlFgDTNJi3NFuA6gEbEKEwj3Fl0iAIS6j ggLiwSNRbhPYBMBC7ED1EYtajOvYpIFQqLPLppWQfR7XQSuUO49XFaQnJIS7 vBYteISmB4NNjIpgvSzQopYATCKcJrCJTSsjJz5eC/W21vw///7tw93N0cvt k4Pd51rKK4rTqG5SmBnlcempdAIkoYrJj9VNBH1Zz/UjbHIwp+tQ3MVDnDnE E36GMLOTCCXMhWfFFGCI5rCzS6EUUWfXL2ITiTTAV8exCZvNq1YEkk3jx3q6 jjXI/0RPl0IRIFcESBT+JGHqCrVyHcsmeEosDRBJA4Klp0SSU2LRSwI28Vcr A3TqYLNeYjNJ7WYZXzQxhLj0DovSblZYjQqqcGn5wBGatSUP9gNQKGXBEOvp kgRzk7uCA04F+nHGkxfY5EfAhLEJpJIEcbwjPUiox1eknw2wicuqddt0DrMa F/nBwnwBReJHJizQN35H8LOdGuNNiw0pzkpsrCjqbqq80FHf39Mydrm7u7Va rwzCrwDwHIr2mC521N65unD/xvLdrbndjem97dkH1xbAJrsbE/vX5+5uTa1P X5gbbl8eP3d1/vLGZO/mVM/m1Ll14MlIOwRCWRvtBpUAT4AkVDRZHe1eneBC T/DC5orMcKs81CwOtYjCLaLSjLC+puKZ/mZobqB5cahldbQZbLI4WLvQXw02 WR6q5Tq7hg7YZGHgYPoW53Dvr1vpr1/ltTbQQFoWZMQzsT4uoahu4iM2TFjY 2XUsm4BESKASRig0sOvlG+NkLQGPgEpe35mmiglRCZ6iUcMfPlolzztlLwJS qK2LzQ0mz/vHr259+PIG0INSS3AGntAwLrK9U68Xzt++jzN38dAOf/uLN2/x Rvj733+wT7Hvf/7ilT99fjDASmiBZxUTohICE26G8Af3yPbOxv9ScQSIQWUC cpewdHiACd1DrVzClEbhVC4a/EW1A6oy0G6fOIWgBs+S1569kMoltKB+Ler7 Ym9FoEQIQ9UTNo8LN/+/f3yX2rqICwhAmBeegIKSVqjqwVqtCFjoD8vcIgxP 6OsKyzEkRhwMTNjkYR8Jc+HZp2L+9z9/+YSJOOXX3vicHCfHyfGbPvjgRS4R fn+5gfBkbwGo0vB4nWMT8sITm/hAB9VNQBlHxSoj9FDII6xr6wnfnfV4E2DS fAgmHK2QHm+0+7DJvZXu/bXe+6u9N2fb5y+V9zfnnKtKOZ3izIk25MaY8+Pt BQmu02lhZRmRuQmO7FhrepQpOVQb65JFWoMiLIG5Mfqq3NCe2vThruKRzqJL jZldlYltpZEtxeG12Y4zyfrTSbpKjkTsFWn6qnRDfZapJd/eWeLtLQu/UBE1 0Zk21Z0xdz5vbfDMtfHqmzMNt+eab8y0zF4onTl/evxc8XBnYUWWoyhJnxLp AIYASaBQqyrcrkkIsyZHOnCOcumBJAxPaJAX9l2UGg8MwRXsxCgPkSwn9K/B isBTQI+EcAdEPhTyyFNLGCU2Yp0RH5aXGhftsToNStCHSSmiyEVACq6ASuLD nGRFAbng5fQOoJu+9tr//ZfvX3t0e2akd3a0r7v5bEVx6pn8hIrilOLsGJdD S61cVC4x6MRcieQ4vwmrlbB2Hfq38Z9ZN/FhE5NWYdIojq2bsBBGIZ6ASrRc Orxc2Nn1r6ibKKQBnGT+qsN/5Id+2m/CnOY/4Tf5Z+omPJj4P2cT0Usi0XM2 0WtF+CY7LHKXTcmDiQ5gwk0n0HPfefxN4YOppAEAE0ngS5A08BSHFZIgwhOy llArF9jkl9ZNGJ5wkvippP707aLSCbFJuMcCAU/wSXCPQnxKLw8w8cRBIaTk rkqJ9oBNmiqLzzVX9bXVXjnXPHqpq7mm1KaX0eAIPkJI0VxZuLM1CzbZ257f WZ/e3Zi6h4fbc3c3p+5sTj64MX93e4oLOhluX5/q2545vz3TBzbhNNENbYw/ b+haPezp4qon4+fmh9rXpvtmBluL0sM8hsBwm8RrCEjwqpvK0iYu1k9dblwe 7QCbrIw0H62bLA3VE5gs9D83wnMNXVfqiE2ooQtsssqbTYRpjBRrQlofbWEC mxyVT0b80bBFxiZUKMGCOIUc8TSti4JOKGwRVALRmiop1OIFNnlvf4kGCBOP 0JrERgpzESevbH7wbP2T17Z5+tglEvndR3vffQAQuPX5m9e/eOsGlVS+47IX dw45ZZeyFzk0+PgBPz34Me9/f/mHT58RejAMOZZK8BLo2/f3KNwEuAHu+PzN m5+9cQP68u3bbIww1TWosMIqLKyVi2XBM284kQ4AhziC8IR8H//5p/eY9UPo baG+KbyE1WWodEKVDqpWsOHDxEHfvb/3yWvXqAuLnCDEPsxswkJJfMYFg00g 3Mk6stgYLiyEkYvCIcCsfEPCVxR67Vn3F5tOTBUcqhAxnGHZK/z7P3eaEKH8 6YvHpF9743NynBwnx2/6eLLRDD1aaxbgST3PJm27M7VCNiHQoKYs5h8h7vAR gxR2haokJCAJE9iEFw8mW21Ptn6UTR5tDeF/uJM9Z7vKU8rTPQVx5vw4c1ak ISfaVJTkLk0LK0j0pEda4t2a1AhNnEcaaQ+KdopSItSl6a6mMwmXmnP76jO7 qlJaz8Q1FEbW5oXV5IZUZ1rrch2N+a76HEdVurkq3ViXbW0vcnWXhlysjBpp Sprrzlm/XHJ1qHxr+Mz18YobE5XXxytvTtXcnmm4Nd1wa655ub9ssrtwrDN/ rKugId+bGynPjPcmhtsinTqAidsog7AAreBifKiFSipEKECDpEgXxGZ2UekE a+zBUmO8uIF6vQzyQOy7QCu4Odyhp14vIAnWuB/CApiTmxKdEh0C9HAZVeAR nRS7OxGoJNSmj3JbACYxXhsIJdxhxA00vpjQprup8u9/+f791x9MDZ2bHu45 11JecyarsiS1vCi5MDPK7dSSFx6EAiQBgwBPjmUTMpgcTgP+ESr5cb8J/w/4 EqqMMDY51m/iwyaEJzq9grGJsLnrv91vopC9wCaEJ/+kF/6f9JsI2OQATIRs YtSJbSa506p021URIUavU2PF3yMflGnUiPGd13JpI1zRRBzAD90KPMW5RSSB CmkQtXVR3YQI5Wf6TXzw5ABSXmQTqpu4bbqoUHtcpDsm3BnqMuEi7tFKTtFQ OwfPHfQTnhYbQj1d5IXv72kZv3Ku6kyuVS8lMIEcOkl1SebWwshtrptrjm/r mrq7Oc2xydbU3vY039k1t7s5tj7dtzDccXX24rW5i9szvVdneq/N9F2d7t2a 5ComQjwhQlmb7J0bbFueOLcy2XO+tTTKqbeq/cItojBzcF6is6+pePJSwypv Xflpv4mwp4vMJsxpssJzCtVNhGzC6iaEJBtjrZRvIlyTWH8X/mtJbEI8wqZy CdmEiUon+7wX/um10WfXx5jlhFq5WB8XwxNa0PnDR6tsJBf5TUishvLOQ66t 69PXr9JkYOrXIkJhD3HGw+8/vENNX/Qs2ISKGpwOAeSHT58yNiH6oKHBNDeY iZ6CiEqoLPL1u7tAgy/euoU9PwRGYBjCQuGZX54FxzP3OjODU4i80ISC+8kY Qj1UWOAhVUxYjQMvxMf48NkWvjQW9BWpw4qqIfQmuJO2/fiod9cHPnp5m7rF qJBBa+ZDF3rSWbAIM4wIp2/RFSGwCFMambWEOUp82ITeWXgPMR0rITETisAF 8yrDE+aFB5j88NnDX3vjc3KcHCfHb/p4utnyFFyw0Up4QmaT/eXGJwI2qc/S nU2UUisXKANiuMHqIEIJOYXuh55td/I2do5NsIb4ni6OTXgqaWNswr8JFrih k7HJQEtJc3FiSaIzJ9KYHWUsjHeUpYdlRpny4u1Z0ZbUcGOiVxfrVCV4tCEm /ziPqDDFWlMc1XAmtrYosrogvLYgvDov5Gym63Sq/UyqvTLLW5sXUZlurs22 NeW5GvMcLYWu/rrE9Stl61dObw2W3xyr2Z2qvzvTcGe6fneq7vpY2c5M9e2p 6psTVbsz9Xfmmm9N1V8dr7k2WTfbVzx/8cx4V0FfdXJRnKYwLTo91hPl0oM+ 7FqRQyfGmdgEZ49JDjAJt2vALF6LGqyRHhfKJZiEWLEBI/M7FhQrD0jB9oxi HLGOD7NnxIdhh0YjtvAUsAX3Yz9GEY3ZSZFxoQ6yvdu03NgiEArAJNJljvZY QSV2bOxVYtAKFnhPsquATdpqz/znf/z+iw9eHbrQOnyxtbW2uLKEyzeBSnJi w7wmj0vvtGuolYsENiEdEMovZJNj53QdZROz9vgJXYxNhKUTsAnBCBlPcP6x IV1CNmGE8mNzuqQKKIjLhed02NMlhwLUh5RxgCGqYB2fFK9VBmmVP+k3UZBA JRyYHNRNlEH/5TldjE2CxafEIk6MTTSqQLCJ3axw2VQehzoy1AQ2AaoYtSKt IkCPHzmjkjfCAzFOSQI5Ud2EdXPRwC5GKM/ndIkO5nQJ6UNBNRQRhyRyKqkI qiqADnwh+naxni7wCKgkOS4sKzU2MyUGnMKZX0Sn8ONNE7YtahEAHGxOfpOa 07kt1aXnmqsGelsnB3oLshK0cn8aYccRilZcmp2wPHkZeHJrdfL+tcUHNxbv X527tzV3c2UEYLK7MXF3e+rZ3ZU7m2NLo11b033X5i5cmzsPPAGVbE508+ce 4MkBofDi8ISvmyyOdd1Y4cZ8ddTmh9uU0Q651xAYZhbXFCWMna9dHu1YHetY HGw4OqdrebjhICl+6CC7hJsM3F/HjPDU0AU2WeBTThibHDhTDhPhGYkAQ4S0 wvq7WGQ8sQnN4PJhE0ISeggqub/ev78xADDBmcCERGOEGZuQt53qKXTlrb05 XMF1AMiXr12jIEUsSDQ9GHjy3uOVD56tk7uEiRiEN5Vs4wxI+fb9O2CTb967 TQ4UvpiyQzYQzkjOoweQ5I+fPfvzF6+CUAhPcP2bd/e+evvOl2/tUgYKo5ID ZvnwoJsLogIKTdP6/M2b2PwzZsFC2LDkM9GLzdoVBAu+QoUG0A3NIv7+w3vU ecWCDoVhhSxahfiIklDYEDBIWIygksrff3jn2lzvo+vjNMgLzxJusB4tVstg vg9mVGddW+RbYYRCvWdsmhZLfqe3pTvpz0Vjh1lkiTA1XjgAmTW50ZwB9kc+ JKbnZhMSFVB+7Y3PyXFynBy/6ePBStNjUMZGG+npZvvL250Ud3h3vnaiPak5 z1CfpalKlT9aa8FFChzBnbiN7j+qZ1ut4J2nm3jD1kO1vX6j59lmx8OVVujZ ZterV3ug/eX2x+vnnm71PtnsfbDefXep/c5i66255v31nmfXLz/cvrA+Xnup ObWuwJ0ZZc+MduQnenLjXVmx9rx4Z168I8GhSHIpU7yqVK8qxa1McStSPcri RGNFprM2L6Q211OT7arKtJWlGM8kactT9dUZxrpsc30OZKrLNnaUeq7Uxc31 5m0Old+YqAVuQPcW2yDQB3R/qR3amWm8OVUF3Z6pIQkf7szWXp+oWL5cMNyS 0FxoyY21FSS64l3KSIvEqQ4IMUm9JkmUR5cW706OdYdhk29VOcwqbN2x3QIX AE8Swh3gFGpfwRUwCNnhQ6waGtIFvgBQOPSKcIcR9AHQIM8INW7hqcQId05y TH5aPE0JxrOgEjwVZjckhLuSo7x8AmOAIvCUikvQlrpNXEg9jSbGuTQn+ZtP 3vz+83cWJi6SF76+PAdgUl6UXFGcEhlq4U3TMpNO7LKpscbOFsJ2l8RnKVKK 4jF+E+rsOip2A+sE80GbQ7r5WQOEOVuKWmZQcdKruIA/LuNPKVEpxSSFUixX HUopOpZEjlPQ0dCTYysXSq1IoQmGlJrnDVrEHXzCyHO/iVYdwAvPBuKsVYtI XCKhSsRlf3DiPv8/jIx83tMlCeRLPEEiib9E7C8W+QUFgk381cpgg05q5zNN gABhbnOE1+p1GPCNtZmUVrNKqxIBtWRSfym9UOIfLPEPEgdAzHRD7W1USMIN kEjsBwWLTpE0ci7knaQQ+8mCX6IERmEgI0kpC+JrMQEqWaBexc1wc5jVER5L QqQb3JGfFluQHpebEpWZGApCVwUDT4Lx8wk8McgDwOM5yVFVJdnlhRlgk/6e lpGLnYN9bSmRbrtG4jWpQsxqh1YaZtXmJEUujF0m3VideXh7c//m+q31uZ3N 8b2rk6T9GzMPbs5isT5zfmWy5/ryAIhjbboP0IHz2njv2hin9XGohwSKWR3r mh9o2pw6d3Px0uJQS3GqMzFU59D6uw1iizKoqiie7xPrXZ/sxrNzA7VLww0z lyoWBmpWRxvJC78wUDd/yB1zl6qXACaH5RKmJcEgLxYN7+M3YT1doBJaULkE VEKcgvX1mW7mNBE64llDF7OckN+ExALiwSY0MZgZT1jdhBzub+0vvnF//vV7 c9BbDxbff7rGD9q6Rj1aBB1keP/4laufAFXevEkFi49eAYzcIFigBifyg/CA sPu7j+5SrxfRCg3pAjh89vot6Ot37v7uw4d/+OTpX79+7YdPn4BKvnhzB9c/ f+P2t+9xc4bpzEUuHhZThJxCJRXhdboTZ6ANKIZFIrI+LqH/wqc8gSv4bAx8 CHao0Yt8Jew24bwvNq2X1R2o/iKMeqcdPhb41r21v4zvG8MNNijYZ2Avc3mw mEhhCcMnh5HuFEafCD0p7Kszg4mwB4y9FfWeUd2EoQrdL3DEvDBAGGBCjvhf e+NzcpwcJ8dv+qBAE8o3JNZ4ttVBD+/M1ow0xzXl6huytZUpMtyGG8AyIJe9 hbrd2eo7czUMaoR6eZvTsy28FVCljVc7zztNj9faASbQ041OnF+51vt0u+fx RtfD9a79Naj7/mrXneWua1PNMxfLztenVuW4cqIVSZ7gnHhnTpwjM8aWHWfP ibdlRBpTw/SxNlGsTZzglKZ4FDmR+qJ4W0mSoyzNBp1Nt1dlOevzvI0F3oZ8 T2uxp6nA0ZRvay9xXaqNmerKXL5UdGOy9vZ0/e5sI0ci88103p1tujPXtDvX tDPbuDPTwJ8bb01XA0ZuTFaSsMYVIAnWwJPt0bKFC7mTXWlDzfHZMZbcOHuC WxXnUkZYpKEWaZRTHe3VZyaGpCWExEXaw70msAn3L8YaMfZdYBAIC7KQgESo LBLhNEBY82O4pEZFsEEeZNfJgScRThN4hBADnBLjtYE+ACaZCZF4GOW2gGUM 8mC1yA9IEh/mTIkOwRUztoJqCV5I07rwJfDmcaE2fNHclOgP33wMNpkd7Ru6 0NLdfLa2LAtUQnWTqLAX2MRhUWINNsHZYpBy4e9asVEr4lMUj/Gb/Biw/CvZ RMrYRK06kEolUagP9bPZRCYP/Jnphz+fTXSaQK0mkNiEV7BAHJ5wwY4KkVoh PtrTJaykCEX1Ha56IvITczoVHPSSVHRKJQ8yGeROm47ABMLCadFw33n8FRjk aspYFNPkYQ46gsR+gSJ/iDAEYmyCb4hwYgC7AaBBeYts0hfNIj7KJodDif0U En+dUoS/YrtJFem1xke6MxPCASbA5LL8lLKClPS4UPyC4GfYohaTzx0P8eOK e8ry08Am59vrrpxrPtdcFW7TufRygInHqAShhFo0qVGe2eELi+NXlib6r69M 37u+ev/G2p3tpZ2NsTtb4/euTd2/Pg02IQFJthcug00gLK4uXuHCGSf61sdJ z9kEYLI23r061rE+0bU907s23jnYeSYhROc2BFlVp0AocV7NhdbSxRG+dDLU sjBUvzLaNHelanGwdm2sifV0zffXMuJgbCLEk8UrtTQ0mKU0Hg03ERZQWBmF FU1I16a7qKcLSOJjimedXUfZ5MHmILPDU1sXjQ6mYcJsThe3eLzyzqNlUAml kzA2oYlbRCU4f/zqFrbWgJFPX79ORg9a0HBgIAlVRsif/t0HHJv82yf3od9/ jId7XPAi7+wAhgBAPnn1xudv7Hz73v4fPnkCsqCKCa5/+tpNnEEuuAI8YYQC sWKK0J9CNRc8y2ouYBziIDYomHlMmEmc9VCxrEOa4sVc9pTkSNEkdANrgmLz illFBkjCpg37jL0iCKJpw8y2z+ZrUcmGmTuYUYXMI2RsF/rWfVzzxBoMT+ie Y+cAs89M3w0a/MUAilWXWG7LEYO8b1sXdJJvcnKcHCfHPzxAHMATCDBCVQ/A BS5isTdfN9oS31pgApuUxgbSRdxJbLIzXXV3vvbH2aT95e2OQzyhYkrHkw0O TF7e6gaYPFnvwGJ/vf3hVtfTq31Pr51/sHHu5lzr+mhNf2t2Z3l8RaY7P86Q HaXNiTHkx5syY8wZ0abkMG1KuDY1QpvoVSR6FBnh6qxIbVakJidaV5xoOZNq L0myVuW4z6RZipN0JUm6s2mm2lx7a2nIhdq44ZbU+b68zaGym1PVd+br7y83 78417M7V35lv2FtsurfUjPPdhcad2bqdWe4izrgTwj3EJoARErEJXYS2Rs6A TWZ6MqfPZZSmhYBNwE2pYYY4l9prFEXYlS6TJC7MlBDlSIh2RYZa7GaVzci5 S0JtWoAJdlzABCpkUAEF2zC3SUl4AogAhjj0CoAJyIJSFMPsBo9ZAxGbpMaE FqQnJEa4WUOXSuSvEgW4jOq4UAeu03gunHE/bgCe4P3JtIL3L8yI/+KD1/6/ //M/pod7Bs83dzWV1ZzJJDYpzo6JDrcBSQAjZr0EkEKFEgYmBnUwifcvHNPT JaQPpv8LbAIweYFN1P8VNpHKAqQyfx/9s2yiDdJpn7OJWsmN/OIsJ3zcvEoR xDWM8fWFn88mfHg9xyZBolOiYNJLkmCwSSAAxGU/YBOcvQ4DcID7PmslRr0M XxGkQG1ggJrg4FOBolMBwX5QMN4KT4FcpAGs542xCQMTEQ8aBCMsFJ5Biq8O YhwBKf5aRTD+1vCLwLFJBNfcmJ8WC+6oPp1dX55XczoXvxd6WaBO6g8wMeMb KPUj19Xp3JS22jM9LdWDfW3tdWU2tcRtUIBNnDpZhF0PxXmt45e7wSbLkwMb c6M3Vmd2Nhf2rq3c2ZoEm+xdnQSbgFCgh7fmgCe7m2MEJjdXh3Y2RrfmL21O XdicJJ3fmOglURIKwIRLQhnvhEAoPQ3FoWaJXeNn1/h7jKK8JOdwTxXYZGGw aba/Znm0EWACLQ/XLwzUcmYTLt+klrVsLfEDhH3YZPm4cBMGKdTcxcCElUuo hkJnFsgodMQLffGk49lEEBAPPHnt9hQLOhHOEOZsJs/WP3i2/t6TVRAKzh++ vAEMYTxCa65o8uoWbdrBI5+/eZMJD2knjzM45TCffY/qJjTR6/sP96jnisOT D/b5kPe7X75156u3uZh4YhNgBZVUwCagDAj3EKSQqFzCzPI4//GzpxSMQleo bsKVVD5+IGQT+vd/oZNCWDQ5jPB4lTVTsUHBVDRhMR9sKi8LGaFdPSXUE8hQ RCOrtrBZxAw9qJRDTVmsm4sVQRg0McTAghjEx6VOvhVhOgl59oVRKSwkhfCE urbIjM9qK8J+MJYaw/5oJJ9uLqF+7Y3PyXFynBy/6QPE8WCliTq7GJvg/MrV LqDHcFNsS74RbFIcHcCehXAzXki0clRH6ibcRf4lraAS6OFK6/5S8+O19ntr HQ+3zj262ndnuXNpoPxCQ2pDUVhutDYrQp0WpkkP12VEGDIijWnhhgSvPMEr i/dIY13iWLc4MUSaFqHMiFDkx+uLk02lqeayNOuZVHNRgq4s3Vyeaa0rcHeW R12oSxzpyJy/VLw9XrU73/RovePJZueD1Za7C/U7s1w7FvVl7c7V3V1oALBg QRexgIg+sCAG8RHux51UQFm5UjjVnT7ekdJ8OjUv3pEZZc6KtiZ6dS5dkEMb aNEEuC2y6FBzfJQjIsTstnFDU0P4FEUazAVCwZry40zKIJyxpuoJH5KoiXJb gBXhDiNIBKyREO4iSzuYBdfzUuNykmOAHmAT8ItREWxWibGOD3MmRXpwP4gG OIOX4AwwwT0gI4IjvH9mQvirD279n//5h8nBc0MXWsAm5DcpL0ouyYmNjXS4 7RogCWCEGrqwIDaBzDoJCIUvmoBNRL8imxyAiVKqUx6AibCnS/lf6ukCiUik fj76b2QTtTJApQjgxhHzpniVnDOzYN8ul3CGDoXi5/Z0SeTBYhnnOhFJuIYu YhO5NECjFJmNCmHdxGPXWw0K7lutlRh0Uq1aLOdeckA0QcEvBXA65R+E9SnC E2rrOjDgvFg0oeYuGc8dxCagErUskEXM/0TdhGcTKdgkKtSeEOXBDyEYmbFJ S3VpcVYifjvA6cATgIlBHgBCMaskuLO6NKehvLC3tQYvsShFLr3cY1RaVeIY txlggvNgb+v86KWliX7gydrM8LXlqTvbSw9uzgNMgCd3tycgrB/cnH28s4Dz rbXhzbmLIBSwCc5XZy9fnbm8PX1pa+ri1tT5zck+sMm1uYtLw+1gEwKTpeHW zalzW7OXa4qTLcpTXmNwuE0WagquKYqbvlQ3P9A4c6V6ZbQJVMIP7Kqd76+h aPjFgefVkCWcBcGLB3giCIVfHW4CjFDECb0EV1gTF/lKIGrlIirBs+SFx3Va CGcI+zjif4JNWFsXOeKFRniqmzA2ofgSIMnnb15nFRMSWUtoKi9FhwBDGJ58 +vr1T187qKFQbeW7D3a/ff9gtjB54bElpvoClUL4RqyH33/w8PcfPTebAE8A JsCTL97cwZrEOAUvpBlfLJ+RIlGYuZ7eBOcfPnvMnBRsAhUzyAvZhBEHi2X/ +w/vMDs5lRIohcQnLoTwhER+E5yJOGiSMPVH0Q6fhaRQdYaM89RYxezw9M6E DOQEoXFe5EwRZjXSa8lUQh+SPj+90CcnhSWkCD+VMKTexzgvpBLWscZfx/ft KYnaumiS8K+98Tk5To6T4zd9gEr2lxuZ64To49lWB9hkb75uqDGmKVdfn6Up iQl49Vo3uVHwLIQFw5kjfpM2XgcNXYQzd+ZqHqw0UzcXuU6weHz10s35tukL p7uq4s9m2HJjNBkRypxYY168JTfBlhVjSQ3XJ4XosMlPCAGSBMV7RfEhosQw cVasKjdBU5CoLUrWF6cYipP1p1MNZzPMVTn2rsqY8/VJYz35qyNVN2eb7yy3 31/verDesbfcDCThIlqW6qG7i0CPqtszQI8aXN9bBJuAR2puTlXemCzH+fZM NYR7QDHMYELkwiom7Mrm8OnpcxmjbUm9dfn5CU6wSW6cIylEH2KS2NT+Xqvc Y5HFhFkSY1xRYdYIrzXEaaQBROQoiQ+z44yH2ImRHZ68J7gIPAmxagEX5CUB WTDXideiBYMAQEqyU9Jiw3AdsmllelkgdXOBSgA1sSF4cwteTi4V4AzYxGXk BnzRgNbECOfVlckfvvlwcrAbbNJeX3omP/FMfgLYpCgrOj7a5XFoqZWLmruI Tch1Qs1dIJSfqJv8cz1dx+fCH8cmUoCJkE24tiiFiKRQiGTKA/0SNvkX1E24 nq4AAZsEMgFMaEAxsYlc7ssgP6ZgSWCQmIs4kcgCpZIAnjVe0mmkJoPCbtW4 HQawCc3pdVm1+PZy3ny1WK+V6DRiGedPOaybiJ7XTRibUFsXlU58Ri4fGFKC T7E+LhWXYBIE4Yos+CUf8UOJuS4ypTQAbMJH1SiiQmyJ0dwkB8BIeWFGVUlm 9eksoEftmbzSnGRgu0EepAp+iaonMn8//NDmJEdVFGW21pxOCHcATBxaqVOH szwt2psS6Y71WK50Ny2MXV6ZGgSeQJvzY7c35h/eXrh3bQpsQniCNblOnuwu Yk3dXFQ9ubEwcH2u/9rslaszl4RssjjUtjHZvT3TCyrhMhbHOtamzs8PdyeE GO2awDCrxKXzj/co2yvTJy/WLA43rE+0row08AO7+OnBxCaDB6DB1U0uv8Am JGHdhLVyUZ2FaIXYhKUuEoOwhi66QmOEqW5yc67HxwhPSHKs30RYN2Fs4jNM +CBUkaeSdx+vQBRfQomK5G2n5i6c+aSSAzahBQgFVEJsQj4UXIH4KwAczib/ h0/3//Ap9sMPaZcLPAE+HIIG5zdhRnhcBJKwti6sfQiFXkUGEyqgsCh5OtOb QD98+kgIJsxJ4VM6oXKDEA1o/hXZzHGRUuapY42VJ4ggmEmEkIHVI4TBKKxO QbUVasoSho/QF2VzfYUvZ/YT9kVZHgq9ioEMG9IlhB32WrqT1V8YJRGaCR0r wvFcQsY5RJXHhCdUQ/kf3x6EnvzaG5+T4+Q4OX7TB4EJc52wsgg54sdaE5rz DLUZquJof9AKUQmrnvxk3aSd6iaspwtf4uVtzgIPJNlfat6Zrrk6Una5Jaf5 dExhojHFK00JkeUnWCpywzOjjSnh2ji3IsIqDrdJErzajGhbapQsJVKSHi3P jFNmJ6jzk7R5iZqSVICJ9kyGvrbQ0VkZ2d+WPnu5ZGuqAbo603Bzvnl3sXVn sfn2QuO91ZbdhXqQyO3Zyp25qp25ilsz5VjfXay9v9Jwb7kB663RkpUredcn zlyfLLsxVXZrunx3rurOfM3OXDWzvZPo4fWJijvzgJ0GXLk6dnauL3uiM/VS U0lpWijYJD/RDTaJtCtd+uAoj85jkUd4DAlRTmz1Y8IdHrue/h3YrpPSDK4Y rwVIwoJOKA6eohVDbXogCcW7gzvAF8CNhHAXWAOUASrJT4sHiVAlxaQUaSX+ uIdIBA/xQoBJjNeGN7GoJWSiJwIiP35qjPfG2szf//o92GT4Yitjk7OFSfnp EQkxbq+TS8Tg59CqyPnOjPDMeGL+Jfkm/2I2OQCTF9hE+V9hk3+F30Sj9ufE g4mQTfhWLoYnXE/XzwQTCGASKPIPAkeAFCQBErGfVOJnNirtVq3Lofe6TKG8 vA6D06KhFHi9WqTnSyeHfhM/H78JgQlr6yIYOT4U5gibqHHncWyilov4PEd/ hcRfzdnhuWldIXZDTJgjIz6sKDPhbEF6ZUlmVWlm7ZncurJ8qDAjPsSq0Ur8 aGYdfgXA7wCWgvS407kpeCrMqrVrJFC4XX86JzkzLgxscqmzYX70EmOTtZnh 7cWJO1uTzAtPlhOcoYe35nAGsPz/7L3Vcxzptu3bomJmZkGJmdEyihkty2Jm rFKJmRks283M7YbVvWj3Wt2Lzt7nnDhPN859uw/3/7gzc0qfs8ty73Vi7327 H5QxIyMrKyurpJIjvp/HHHMAnsyONi252jemejbcPeuu7tWJjuWxVsSTxVFs 67qPbILGk5mhJnf/g+aq21YV36Lk2lRshzogOVTZWpUzPVC5OFo3O1Dh6S2l 8aTiOZ7QZhMKT4BN6DHCTDxBBplhpJyQ/i6SDo9eeCQRr1x44BGimACYQDFN 8cQI/zIv/NF818lPLSeAJ4gkhE0umrvOKDB553Qae7rQbILdXMzMdzpIcYuI JkgoyCPwEJ/CZwFbaK5Z+fbDPVzT/vHzU6KboM8d2eQPnz7+/osn6IX/7PVN oBLgEWIb8ZJO8CQcoICCrpN/+fwxiZUnqPLbj47Q28IMN2Gau5nuciKdEDEF 0QMlCTShwM+F6IFSC1nzM9ui8LZk+hYaOohhBF9OTC5MS7uXw52wD8IIcYgQ pYYwBYk1waeIUYXMCibviCoJUwnCz0N0E6Ztn4kneFuMMiFsgonwf/kN/BJe +6UXPtfb9Xa9/ao3ABBgE2zQQjxB9AA2OZgq66uKLE+TA5vciWKfzVfDSXwW LgPWuNJsAvV0pe7pSv3TlftPluuxaLNJ7dNlygUPYLLSf6+vMqokRZ4UJE0M lCQFyZKditRwdXqENi1cm+hUxjikkVZxlF0aG6RIcKqhkiOEmXHyrHhFTqIK KiNGkh4tzk/XApU0V0RPdN5cGC5anSjf8tSsu6q2PXVbntpNd9WOp2Z/tnZv pmbLVbozVbbvKd11A2sU7k0VHc2WAZ7suArhJNSOCwAkH3hkdfj2xtg9mlzy kVyoV122e2HBMZyBOp6twc4u4BR3awawSVftneLsqLRwfU6sDdnEruE5DCKt zF+n4DjtmpgIW2igwaAWw1qLjooToycd2AQ9IGgzAUKBYyAUwJMwm96oEKId Xsb1BbKID7MDawBohJg1ACapMaFBRsoyD5fBs3gAVCLl+MJLFHx/uAzKBEt9 KQ8KaEUjZjGT6Ocm+/76xy8HO+uHuu431xXm5ybczoy6mx2TneyMjbAx2USn pDDkMlVcwMh2B6C4QiLRq0QvFlNPYbIJQZsX2eSf6OmiwUTEkzPY5HlPl+S/ fE6XWIZFhZVIpWxkE/llETaRSnylYl8KTC7whO7mQjYRssRCzJ2nQg//+Tld bF6AP9sHCud08WHxLwzQqMUGnQzZBKmEcjnRRnjqty2j/CZatYia08XzfXFO F4frx2QTrJfpJggm3myCeMI4kIou2ERIX4nDhPUKod1AiXeZCeF3MhMKaN2k 5E5mQS61L7qVHh9m04jZErYP/PHrpFw4gD38k4GXUBO2jUqjnGeQcmOCTZX5 N1KjgsOt2pbakvHeFqCSqaFO92AHHACnLLk7dxYHkUqONyYQSWB/sDq6tzwM B7AHNpkabAAw2Zzqhf3aZOfKeBthk42pDk9fDeDJwghliof9/GjLeHfd1EBj QU6MkZrLx3Go/Y1i37KbURNdxfMjNbOUC750srMI2OTCCN9DWUguxnC1F3ux CfpN0AWPVIIDh7HFC9iEWSiUYH8XRi4yIYVZ6DoheII8QpJNmHUw13lI4wmx nDzdGEY7PDZ0kXyT9x/Nodnk7RMP7NELD/XhkwUoVE+ATeiBwOsIIGiEJ4SC PIJR7Og3ASr58p0NeMmX72zB8R8+o7wY3310SE30olnj2w+Ovv/i6V++eeuH r14DsgDWQPRAgwlhE6QSFE2w3QsKHl52hR2jjIJ7wJMfv34dbvj1e3v42RBP SGwH6VkiC28v6zpRE3CRjwElOHkMbkIatEhTFgkZIfIHSQ8h7hXiMcfuL5xO zGymIs1XqNSQCEjmrC00s2DkCjpNmKHwiCd4N3wtGS+MdEOUF1RzcKQYmSeG LyRjwbx+S/AsfH2///QIABMIhUgnACZ/++71X3rhc71db9fbr3o7mC7ZmyqG FfjpQvXJfNXpfPWjxbrj2arHy/cPp6t6KiOrcnQlaYobEazDmeKT+fLz5Zon q3VQ58u1Z4s150t1T9cevLb+8Hyp/nC64nS+5o3NlifzTU8XWx4vND+af/ho oelsqflorvFovmlv+sHCcGl3XVp+ujEhhBtl84sJ1sWG6ONDjVGB6tgQbVyI JsGpjQ2URtmE4WZulJUfHyRODpWnhiszYoSZscKceNHdVGXFbUtrVdRgc9rC aMGaq3R3unLHU7HlLt1yl2xTlAHsUPxi7bpKoPbcpczCaWP77lLYw/Geq2R7 vHBzJH97rBBOAp3BHvANzkPhGXiIhcPHtkYLVgfuLPbkelrTxxoSBmozO8qS qm4E34rVZoQp44PkYSaBXuqvkwZoZXyzThESaAkKtGg1CpNSgOgRZFQ4Lero YBMtkchxZhemLmKsAyzDMM0EmAXHC0NFBRlhbZYW68xKjICTADLYEqaVsOGA /q9mFnAK3DYu1Ap3gIKb42VwW4tOYlBS44/gJNxqoK3+X//0m76W6rb64pqC 7ILsuLvpkbeSQ++khKcmwNuzLXq+Uc0xqrlQFp3AoOLplVw93EHBw9LKuQg+ UABHVMkFOrlAK7+cGww8orooTFpkFobxvWTs8BVs8twCT+ehQCklXIWYIxex ZZemcgkVbsiGVTpVYjZfHMAT+cNeILoqZvFy4Y0aweWZq+tFSJGL2aj7YKAJ HjCDF0lhwCKjiMkdinNZPJGIx4QRfF/MN3mxeEK2P9vXN+AVFpsatyXg+4tF LIWMZ9TLQ4KMEaE2p4PCYQnfT6kUKZQiTIFRqsRQlKIkZJHeLQpPOD6wZ9H2 E6YjHgovRjbBMcLUgcCPxfcJ4Pn4c30CuK+weFTB75zHpTwsfK4Pn+PDAza5 5Bco4Bf4vlRSKtFGxPXTKcVOhyk9KeZubkberaz829kFtzPv5KTkZiRAZafG hgeaZHyOTg5k6Svm+CpFbCizRmpQiuBPWs7zhT94zD1JjgqCfyZwPNz1cAqQ ZKwX9u6hTtjPjncuTfVuLY7ur7mgDlZdZ1szx+tTByuTZxvTx6vuw+XJ07Wp DXffTP/D3dnBvbmh1YnO1Yn2DXcX1PJYy9JY00WCPF3AJp6BBldvnbuvfrCl NNFp0IuoNEb4J+80CKrzkie6a+DZmaHGkfaKSQANGk88veVz/VUXM7jaiqAA T5BK5rrL53sqPAwSIVO5yEMstMOjSoLWEuzdInjCbOvCIlknL2olP9FNFroB TABPoB6t9L+6OYJsgnb4i26u4+kPTmawp+vFAjABQvn41SU4+ID2pACPfPwq NUYYe7fg4IPzRQSTi+ySDw+wYCn7u08OvvtoH6NPPn19FUmBmuX1zh6gxB8/ O//zl8ARb/zlmzcAKAAr4CSqJDhPGA7gSqbZhBx72U/QTf/bj07QgQL15Ts7 l5b8QwQTIjcQjwmxisCeBIIQ9YRM90XvCeIA8aQTOYOJIUR/YU4DY74R6aRi fgASa0JoBe+MDWZoNqHpgIIaII5/++O7CERetnei4+Bt8QwBFjTjM/UU5CC8 LUlgZD4kFhvqx4T64vzPn519/8nxv3x8/KdPT3/4/NHfvnr692+u53Rdb9fb 9fZz246rALWDo9kKwJNHi7WXCYn396cquisiKrI0RSmym1Gcw5nSk/kKBpvU nS3UwPL+ZK76yUrD4+WGk7na0/m6JyuNTwBGPHUHrprzxea3tnufrnXtuOqm uvI7KpOLs+zZMcpkpygxRJgUKo5yqJBKohzK2CBllF0aYRUHqlnhJl5CiCwz WpsTq8+KVqdHyG+lyMtumVsqo4ZbM929t6f770z3395wl0JtTZXteMp2p8t2 Yf8SNmGCCSba79OUQXCDYMjOeBGACQILFka9EDYheHI2XwMnN4bzgE2W+27N tGeOP0gcbsjurU67fzciP9l8I1qbGCIP0bON8gCTkmvWiqmYOacj1OmwmHUO gxwTTIBEsLcq2KTEqHcSEA8ngU2ARCxqEUBEmE1Lck/wYVJkYEp0MACOQQ5Q wFEK/OAALqYCspUCeDkgCSzVcOoX3BzZB+5vVAktWjHho4H2+//3//zLeO/D jvsl1flZRTcSinMTinPii7LjUuIdehXLrOMBoQCYGFQcsw44hW9QQQkAT7AA Ty6Q5LJ0Mj7gmJawhlJA2ETNEE1IKxdhkxfw5Arp5GVsQuEJk00kHImYTQUm StgCCYsCEwnrSjYhER4EUugzV4AAAQSmcqG4DFhk1n+QTcQSzotzuvDtyCfB 4grYARw/f/YrLM4Fm8APTosmqkC7zhloDLbpTFopfB6NRqrWSAFP5AohgAkc iCVc4monB1RzF9uHaTkhugkZ20U4js33ZQsui+/D4lGEwuP5ApsI+H5CPmV+ BzwRXI4XFvP8gE3gm8KoTfg24QDwJNhmSI6LADwpupdbfC/nXm7ajfT4jKSo tISI+MigULtBr6DYRMrzU0u4wCYmtQTwxKIRA5vAnzeASUNFPtA6/J3fyUzo b7sPSOIZ6XYNdsABQMqiu3fB1Q14srkwAmxyvDGFYAJ7YJOjFReyydna1HTf g5n+xi1P3/78EFDJ2mTH5lT3ykTr8njz0thDKMImU331SxNtwCZQdYVpMQ6Z Qx0QqGGpuL4p4bq+h0VwHghlsqfW1V02018JeDLTR0keqJu4259Hw6MRHvCE YAi2dRGVBDu7vALiUTEhPAKEQrq8mHhC5nRtT7VgT9fBXCcTUuAhszCZEQ4w 64QEnTDxBNjk/fM5Uoghn7y2DGCCD7G5i7airKK1BAtnCAMFAJVgYjsURiLS o4PhYPerd4FiNj57gzLLA9d8+vo60gfxm3z/xROctYWudpzihZ4U1FDIDGE8 wzwJVzInd2GXFxx/8eYmfjAcJuw158rL7u0V54FTfEn3FBaKGqTlibgzvFiD vNyrSYw5f5ipUzAjEUmnlpfnHXiE2OGZ87ug0FCDxnYAFq+geWa3GAENMr8L xxrjD87EkCsL2OQvzyg8gfoBMAcPPn8E9UsvfK636+16+1VvG2N3tycLdt3F gCcn81XndDI7ldg+X7vrKuuujCzPVAOb3Inl02xSeb5c+2T1/pMVKuT9bKH2 6WojFPAIPf+q5ngW0Kbh8VLz+ULT+WLTo8Xm/en7010F3VUpxVmO3DhtSqgs MVgK3BEfJI11iIFHIqySSJsk3CqKDZLHOCTRdlGSU5YSKgceyY5R30kyFGXa K26GDDSljbZnA5KsTJRsTVduQ3kqDuaqgUo2XUXbUyX70+X7M+V7VP9VyYtF hBKkkgOAETpfElMmsfAYqIQJJlDHM5XIJl7SySm8+0QRgAnWfFeOqyllsD5j 8H5mW2lCWaYjN0aTGCwLNXJtGq5Ny7fqJQ6LOjTEEuq0BQWaYAUFjABAoRYF YNYJnAHuIDYQoBIEk7hQK+zhmJ7ZJUFxBAAE2CQxwhEfZgO+gPvgreAaTC0B 4oCiJRi2nOcH90QbCxwAv2hkHItOgk1lcM+OBxX/z//1b+7B1p6mysbyOxV3 04BN8jOj89KjkmNtOmWAScvVq9h6JVUmDc+g4tHSCZ8pnaCT5QJMpDytlKeR PpdCNEw2oUd1oXqCy/grvSqXCSlXSCc/yyYcMo8X2YTCk3+aTX56cAWeIA54 aShKhmKCVPIfZxP6zEX4u0TKwWIqKWSMGO038QU2CaDGbfkim1jNmkC7AdjE YdVYDQqDWky1yenkqJvI5AKVWgKEApSBDAJFCyUXhEKiFQm2EEKB3wx8SKpN jiYUZBOO0I8qgS+yCYfzCp/nKxT4i4TU5DFKNIEXsugERtpsQvAEvk347mhf vDjIqk9LjKalk8y7N1Jz0uKQTVLjw5NinIFmtULIFrIo3QT+tIwqMdAK/IUD kkcHm+6X5wGbpMaEwL+ju1mJgx0PUC6BPeAJQMrcRNf8ZBfiydbi6OGa+4iu 47UpABOo41X3o43p1/cWd2cHZwceLo60bk/3bU/3bnl61l2dNJvQ8fEMNpkZ ahzvql4cbx3rrJoefHAvPdShZkVaxTqhT6CGW3UvabitfLCldLSjcmagem6w 2tNb7uosRjCh7CQv+E0AT2Z6fgIjxA5P2ASpBP0mzIYuqI3Jh2g28bLDb7mb AUww4gS4gwAIsgk+RK0ECp+Cl8D+eLEH2YRMEgY2IboJQRLUSqBwThceI5vQ 3pPV54O5aBc8FGaaAAXglGAcFPzdR3s4Qxjq2w+p8zh5mBJZaOHj8ze2nr21 +817FymK6BxB7wmOAibhJngBpiviSYxcRFr54s1tQBUc24UCCjxF2sy+++iQ ZBe+rGB5f6n1nJAwdK9YdtIQxcQTryJLfVz/e6EEmfFLUIgMKCbkAsdoNsFe MqQG7NoC9ICbYBMaCj3/9sd3iRHea3gXc8Qx8yclVnps+mKGNpJPgleSsWAX nWPAJvCmXz/FAk4BKvnzZ2d/+vT0l174XG/X2/X2q942x+/tugv3pkqgjucq ATdO5qqPZ6sOpyuBTXqroyuztcWp8rtxgsPp8pP56vPl+icrDU9WHpwv3T9b qDtbuP9osQH2x7N1xzP1p/MAJk2Pl9vOFpr3p+oX+op6q1PLswJvRCnTwqFU KWGaRKc6LlgZ7ZBH2WRRNnG4hR9lEwGSALDEBYrig0TJTlFWtCIv1VhzJ7Sz JsXdnb82UXMwX7ftqVybKFkdL9pwl+x4yvdmKo/mq/amy7ZdRTuuor2p4gNP 6aGn1Ktry0srASQ5BAyh6+iqIq1cTIkEgcVLOjmZrdoeLwQqWR+6tzGct9x3 a7oto782Zbgho6c6peZWyO14bXKYLCZQFGIWOvQ8o5pnUAtMBpndpgsJtgA+ UIwgZgFrwPoKB3PBSZydhckj8BAzUGDpFRVkRJEFMQTnayVHBcFTcB6FEpXQ H9AGKAawBc7Da4Fi5DwfpSAAjS3wKsxPATYxa0TwAeAh7KuLbv7v//mXsZ7G 7ocVzVV55XdS72VE5WVEldxIILoJk010Cg6UVs7FgrtBebEJrB7VEkZYPJAI wZOXuOCvim68KCae/CTWhMEmF21dl2wipakEdRNYzwOYYL3E9n4FsFzJJl6i CcICfH7gDgXd2QVUAsfY1vUfYRPy7i+2kDHZhMu7mKzlz/YBNuFy/KiGLjnf YdMHB5qCHHqriZobjL9StVoC96cCE+HboQUU+DH9Ay4wJIB1wSYESbyKTA+G VwGbwE0o2UXoD1SCugmHlk6g+JSHxRd1E8pBIwwAVOQF+ACekDAUIBT4vuBL BCqB7xQ5JTTQnJEceycn5VZWErIJgAlWcmyow6gSsX3lggD469LJBQApRgX8 yXHhH0J92b2K/BtA64DkBbmpoz3NQCWIJ5MD7TSetAGYQAGhrEz37y6NH666 TjenD1Ym9xfHAUxO1z3AJk+3517dmdufH54fal4Ybtmd7T9YGFoZb1uZaKPx 5IJN5oeprJPFsRbAE89Aw2RPLewby7LDzaIgLRsIxSjxjQtSwxmAF3df/dxQ 7exAFWU5odnkIuKEwSbPi+ExwQ4uop54iSYAIJhyAgAC3IFtXVeyCT71Mr8J gsnRQvfxQjfsEU9QVYEz56sDGMIIbIKh8B+ezn50Nvf+owu5hDRxQcEBGSaM hPLZG6tfvLUJC37Yf/yUyojHocFEMSFFG082vn6Pcpr89uODP34Oa37KCI8d Vihz0JkmB8/eeq6DIF/gU0QrIVO5SCF9EE7BRi+8Azx1eZPnASW4bv/TC/GL TMsJDvJCFsAzxHZBRA1iGCcvJ2OvvGwaTLmEqCGkXwu9Hhi/QmJQEBOQL5ij uogQg9BB3PE40et/fP8+EAq8BC0kcAemj578pESd+WnO+08y5Yl6wmST58OW n1G6CVDJ34FrqIdUfxfgyY9fnP/SC5/r7Xq73n7VGw0mxegHp9q65ikwgQU8 PVO3rL8mpipHB2xC6SbTlSdzlCxCdW2tNJ4vPQAkOV9qfLz08Hzx4dlC49n8 w5PZB4ee+t2pB1Md+e1liTU3QwvTrDditFQ8YoQ2NVwbH6yMtEqpqHSrPNKu jLTwYuyClDB5cqg0LVyWFi7NjdPU3A1tKYsfasqZ7S9cm6jcma47mGvYn6va nS7fcpVsuoq33CW7FEyV7k/Dxy7Znyreo36KggNP0dFMCWoiLysKSWYq4Wc8 pkMkmYoJOcAWLygcsIxuFMImBE+ATXYmigBM0J8CBwvdN8YeZg4/SO+rS2kq ji7JsmXGaBJDZWE2scPA0ytZCqmfXMoyGGROJ8UmFrUIvSGoaMCaCrACo+HR dYJxJ4AVwBrIJqiqoH0+KTIQCq6H+8DF6FJR8P3gITwL1wN3yHm+KMrgRGKc VEw1famFVNGcAnUnI/a///CtZ7ijv7Wmrbaw8l763fTIe2mRRdlx6YlBRg3H oucb1BwAE52CZVRzabMJlzhNsK7WTUinFs0mWKiYkKlcqJ682Nl1Wc/Z5IrI xUs2gZXtBZ6QdHXs5qJLILoAE57I/+UTg59Pyr2cSXUFm7xoigey+K/QTX7G gE/YBPGExfVj8/zZQA18f4mYq1KK9DpZSJAZymHTmg1yYBP8JUulPDSVAFNg TxfwBZvj+6JuwkwwIRoKOQl7+P3Aa6H4YhZX5M++pBLAE67QTyjwBzCh8AQ4 CH5wKRe+FAATlE5IcxfgCXybBrUEv004sOgVIXZDUkxoZnI0sElWSgwgSVKM E9gEaCUlLkyvEAKbQAGYqMQcCy38pcU6y/Ny8nKS48Ns8Md/OyN+uOshIAlS yUR/GxDK9Gj73EQnSifLnr6t+ZHdxbGTDc/+8sTRiutkbQrw5ARqxfV0e+bV ndl1V7en9z5QCeAJJZ24O9Zc7SsTzYRN5obuzw41zo00jbRXTA8+ADwBBinJ jTGIA4BN7KoAu4p1OyW4v6l4rLNqdqAac+GnaO64GNXVVoR2eKZ6gmkmVGo8 zSYAIyiaEDDBPTMRHlNOsKcLxRQSy4jnUVJ5WbIJYRPEE6KewFNwcLrc93Rj mLDJ+8fTACafnC98cD7PZBPiMUE2ASTBEEZaN1nDqVwfPV3+4BwuWyFsgn4T bOiiVZKVZ2+v/+aD3e8+2v/DZye4Tr6YqfvZ+Z+ePf3hq9f++Nnjbz84wTYt ZgQ8xpQw9RGSusjs+8IL8Aw+RMvJ91/Aovo5RxBRgwSdMItgBXNKFYl3Zy7s mZ1ghE0QaojV3Ut6YLpRmDiDbMLMWyGDv5BiAC4APRAxmL1hRL4hfEEkFSJz kJYt5iRhpvWemQ5P8ATbw8gvgdkVRr2Wbuj6y5eP//rlE0o0+YISTbCz65de +Fxv19v19qvegE123UUH02UAJrQXvuZsoRbW7Sdz1cAmPVVR5ZnqgiQJ5TeZ rrpkk4dQQCVnCw1PlpsfLzU/WW55dbUd6mj6/spAUU9VdlVOWE6UJjVYlhai SA/TZEbp44MVcUGKCJvUaRaFWiThNkWEXZkYLEwJldyM191LNZXnBtfnRXRU pSyNVqyMVW5MVG25q7enqrfdlVuuChpJinemSvc8ZfBpD6ZLD2dK91yFB1PF h9PFR9PFx54iqJOZYuQOr3qulVyCCfyABEkANAib4NQy2DOfJWzClE7gMso7 P1aIhvrN0fyV/tuezpsjjekD91N7alNq7oRmxwGbSJwWQaCRa9bxtCq2Etb2 RmlkpC3UhvOB5cQDApASHWxCRwnKGcgO8BCYBVgDg+NDzCpYfcWFWlNjQmAl FmSkbPVwmUroL2H7Sjk+cAwXwwVwZ72MBxfAPYFugGjQe0K88HAAOKOVsJMj HX/7/bOZ0c6epkpgk/riG2W3k0tvJgKbZKU4AUxsRqFJQ5lNgE1gb1ABm/CY RnioK/0mGgocaNxQ8L3YhFkonVyJJ8AdL+LJv8smiCdAJaibUCt5uqHrP5FN CDIAWfzX+E0uguBfHNLl5TeBRT9XwObCZxZz1CqJ2aS2WXWR4YHOYIsdaNQg p+bCyXhyauwYG/mCkAVACo/v/6LfhGQsIpugNT6A5UMuw84uKJ44ANiE9HQh m2BDF1V8f/gilHK+QsYT8/y9EuShyPeIYAJ7ODZrZRFB5rSEiIykKACT+Mgg IBRgk9yMBLtRKYUXcnxkfH+1hGvVSoC14a/9TmZCbmpMYoQD/nXcSIke6mwE JBnvawU8QTYBMJkd7wA2ATBZnRlYnxncmBkEMDlemzqhCwjlYHH8aGkC2ARq b25oYbh5pr9heaz1YGFoZ7Z309O17m5bnWzBMcKAJ6uuDuCRxfFWz0AD4Ans ex4URNnkGr6vXeUfpGVH26X1RenIJhhugtmLqIy4WgspPKHt8KStC8nlxdlc XqIJ0AdzjDAeAIOQgHgyWxgD4oluQqQTpsGENHSdLvXCnljjqZldS704TPiN nXFkk48fzTPZBPEEC9UTMkb40n6y8NGTZZRLMBEee7oARkhnF9aX72zQ0sk2 9nT97pMjXIf//tNTtITQs39f/fOXr9MJjBSAoMcEFRBkEy/pBLjjckTwCWIL nMeTUIA8aFqB+tOzx0yzORl1hZoF1ncfHUIhVpClOLP3ifRKEdHhxWeZgSnE M8IcDuyFNl4fiaTVY1A78gi+EBUQtMNj2ApzejByB35yxBO4DBNMCIwwxwgT 6iHDu9Ad73U3L8GINKT99aunxGOCigmKJtdscr1db9fbz287roLtyYJ9T+np QvXZYs2jxdqnqw2Plyk7yZ67vLM8vCRNkZcgygkPOJyuPpmrByR5stIERWkl 841Y54uAJ62HnvqJxuzqbOu9OFumU51olyY6pAkOaYxVEmURR1hEEVZxqFkE bBIZKI8P1yVGGTMiZJmRsuIsW2tFoqszb2GodMNVuzFRuTpatjxSvDpasjVZ vjtVteep3vWUHsxWHM9XAUNRKo+7+ICSS/IPPUWns6WP5ssezZWezZaczhQB dLxYgCRMKoECCgPuOIEzNIZgyAuJoQTuYMooyCZebV1wDRNbtscp6WS6C9gk beRh5tCDzNq7oRlRirhgYZCRE2TiBVmlDovUaBDZ7arY2KDoEBPOzsI4eKXA D/aobti0EjgGWkHXCQBLrNMCqy/gC3gIiAEXJIRTcXWxtP4CCAN8AWACJIJR 8qibAJLAMcol2M1loxdyQD0mjUgr4wDpwPtCRTi0P/72s/XZkYG22taaAmCT 8jspZTeTCrNic9LD7SaRwywGtjKqucgmVE+XnMNs6IJiDukyyAQ4p+s5Ysj5 KmQT2m+iucpvosLZtlDyC5y5ZJMX8eR5uxeubBlswpVd4omEmtnLgaLW8xKW UEpN6xKKrwATWGMjm4joCcMCarQX58owkSsHdr1sTteLRUWfSFkkA0UCXxzi CTCUmHNZPPGlF/5KKvEqDj+AS+FJgFjC02nlNqveYTdERwaHh9oD7TqmbiKi 3SWAGDh0CzUU+KkRWJhzuq5iEx9fP0o9wfNkaACACRTvUpbi0oTCZvsAmGBP HXwRwCZQchFbCh/yMj4e9sAp1Pxnypd08T0ieCqELINS5LTrY8LsseEOYBPg FJRRjCqJkOUDeALXQKFcCP8ocGZdUmQg/DMBThntaQYkgXIPdeLB7FgHsMmi u2dtdnB1ZnBlqm91qm9nYfRscxrNJqfrHmCT4+XJ1/fmj5bGTlYmjpfHFkea p/vvr7s69+b6d+f6tme6NqbaVycvmruARxbGWmA/N9IE5eqtg+ptLLQpA4wS YBM+QEpWrH20vdLVXTbZWTw3WD03UE0lwtNjhCdbCgBPCJugHZ5kLMIeUxrx IZnQhbIIpsCT4EXs4GLGnTDndG26mrCzi9jhgU0IjzDr8drgyWIPqirALEcL 3cwcxrf2Jt878lzoJjSVEDwhXnhUT5BTLqWT1ffO5t9/tPDlO9u4vAcewRxG YofHpMLffworf3gIwAJPbX/93s63Hx5cWC0+O0e++ONnj3/46g2AFHyISIL1 ot+EsAmTUBBe6FudY74J1vfPvHNDqOX3s8fEFUI0FCJbMDUOpl0dFQpsproM +3g+i5gJIEQo8cor8RJTiD5CJmWRdwEK+Nc/vEMmhsFl8PC//8t7sCdOfGz6 Qk8KSVRkuvK9hnfhW5M8FNLxxYQpktjIzIInTnzqJQAp8DuhDSZQf/78DJWU H7649sJfb9fb9fZz27brzu7UvT1P/uFM0TEs7xerHi1V03O66rcnStpLwkrT 1PkJ0tvRgqPp+yezD4BBzhabThebDmcbYH+80Hw493BtrGrwQXZFbmBWJMAI K9yiccIK2SANtSjCrHKAkSi71Glghej9I22slAhJdpwCq6U8eqAxzdN7d3W8 bMtdtT1VteOp2nFXQO1PUXXgqSC9WET4QMpAvsAiDALnyUlm4QvxJWcLtej3 Bxi5srCVi3R27dOjhrGYAgo+S64BNtkYzlvqy5vtvD1Yn9pXm9ZWkVyQ4ciM 1oaYhHYdz2GSBdu1dqvObNLA6jEmxAz4gI54ChboaV1AELCyQmABoIBrAE+s emmwVR3q0MEeCrAixKaJi7AnxQQ7TAqjWghcoBQH6BS8yFCzM1AXaFbCZeFB hihahUEY0QgDoHRiNpRVJVKpBDJ4lZKrUnKlEn+jTvDx++dTI61dTWW9LWVN 1beqC1KKcqPzsyPSs5yOYJnJIjCZ+Xo9Wyn3Nei4Fi1fJ/O3anhGOdsk55hk HLOUHSgRBEqEQTJRoFxsk4mMUoFOzNUrxFqFWK2kxtXKVBKJSiJWiRUKvkLB k8u5WPBJoODMi/XyQEYBSZ+/7BC7mk2IFx7ABEt0Oe2KudQnGsSV+sjPpJyg uiG/SiK5kk3kUn8ZlCTgsi7yGZ97ZEQsiZDON7kqXYX5gdFsAiUAggh4hc/x pecGKxw2vTPYEua0BQeabBaNyaDQa6WABnBzaqwWB+cD+6BnRCTmIpIwcQPO SKQ8FtvX1+8V/wB4iwuQoV9IsYxUJgAOwogThVokknGgZEo+l+MnEnJkUi58 GAHXFyhCTrHnhRUITSWIJ9jQBbQCB7DHzi70xSO5AKGYdfIQuzE6LDAhOjQr NT41IUqvEpu0MrVMyPX3gb1aJlCLWSqhP/yRA61nJoSnRAfDv5q7WYlt98t7 W+rGelsmB9rRdTIz2j033rsw2b/oGoBacQ+sTw+teQYOlifOt2bPt2aOVif2 F0cOF0eP1sZPt1zHGxOwP9t2r3m6JrprVifad2f7d2b6tjw9W1Pdq+NtUIuj jUAolCl+oM7TV+Ppq3V1V3t660tyos0S3yA1N8IksSvYlbeShluKRloLPX1V i6MN031VEx0UpwB3jLfmj7fluTsLPZ1FUx0Fns5Cd+eFG4WCl/YiRBU0vxPd BAo4hWglUCidbEw+JFOFmdmLpJjqydF81zHdxHVMzw1m1vFlcxeqKpjDiJ1d b++70HLyIS2XeNnhiWKCdWFCebL84eOlj5+uPHt7C6NDYP/5mxvALF+8tYlx h5eRIrDfBzD54q31L9+Bp/bgPEoVqJvQNPHk+y9exeRElDzItC4CJkQfIV4S DFuEggPkFGz3wunBFJh88QQvYAYyIs5cvu8FxcA1f/nmzb99+85ff/PmxQ0/ o3wxyCYkzuOHrwFeHmN8JE73xUB2srZ/Mb2RYALp2iJsQpLloZgNVGTGLzNO ER4Cm/yvHz6CM6SVC+9PsulJwxiZLUbmCXspLGiB93rVi2ONMZCF9H0BGf3r H97++2+BaKgQxj98Bk+dfv/sEdYvvfC53q636+1Xve1N5e268/Y9hUezJSfz ZSfzwCa19Bq+dnOsuKM0vDxDW5gkz4uXPFlpPV9serzc/Gip+el6x6PltpOF lrWxmrGW2w350XnJxswIWXKQMMHBj3eaw63qEJMsSC8K1PGdRkG4VRRh4UTb eclh4tsp+uq80LbapIHm7LnBgqXRkjVXxbanene6BsBke6py11Ox50EqqSBU QsQOLOALKBx3jIVnsK5kEyae4B2u9MIz2YTMFgbugPIiFOYFJCFluT9veTB/ suXGSGNWb11G6Y2Q1HBFnFMdbpcHmeUWvUSjFCpkApVCHEaP4cKOLCiHXoYz fnEkF84TxmdVEpZWzrXoJAAddqMcUMVp1ybHhsRHOuCkXsmHC4BNgFmC7Rqj VkTZ0lUCwBanVRNiVlFp2mK2XsIxKwQWpRAK2EQh56pVArWSp1JwgE10Ss6H b59Mj7UDm/S1lDfX3EY2uZcRlpBsM9sFBjPPaObpdGy5zFerYWuU/hplgEYR oFUE6JVsrZwF+yAlzy7jWMUsszgAUMUs55oVfIOSp1PyNPAhVXyFiidX8eVK PqESZl3JJi+mMWJ0IyIJEsplV9gVbEL8JgAR1IQuukQS1n+ETa70p8vF3mDy 0vpZNsHRxz/PJjibC5CEw32FzaGKy36Fy/IRcP0UUh6QSGiINTEuPCLMASBs 1MsNOhmyiZDvTyebCHh8uA+QBYfHZwWw/BBMmPnvUJcjvHw5XD/UkhBhaJZh szksHp/Sm9gcf7Gch5qUVM4DKkGhCsAEZ3NJaACBAjZBsjBqpPBliXn+Qg7V 3CXi+gKJPFdMxBw6lpGNJ01aucOsdTpMYUGWYJsBaAWntIm4ARw/X5WUb9GI lQJ/vYyL6T/owLqTmdBUU9zZWDXc9RDxxDPSPT0CeNI1O0YRyvxE3+Jk37Kr b8XduzU7dLg8ebbhOd1wH62M788PH69PMCMa95dHlifbF0ea0XuyPz+46e4C MFmiAhmfs8l0fy2wibunBthkqKkk1i4L1nABT4xiTqxdM9iUP95RMtZe7Oou Bzbx9Fa4ukom2guBTSba810dhe72AldbPuAJYROUV7BITxdRTwBPvKJMEFII hqD/HUcHEzs8M4HRy2yChML0m6DlBOqYjmIEPHljZ/zdw6kPTmaATd47m3n3 bIZYTrx6un7a2XUxNxiTDTFAhIpTpONOMHgRRwrT3VyUaPLVu1t0UYOzUFVh mEcAEJ4QpmAW6ebyautCriEdXKSPCw/wPjjvixTeH+rPX76KEIQnEVj+/OXr P3795l++eQMjIH//yQkO7KKRgUoYpNPPgQWeT+5iKg5kwjCCAOmkIkW6ucjM K4InTEZg+mJQHCHP4n3QBUOEHmbqIoEj5txjLymHTO5iXkDuw2QZNOzD10oy K1HQ+cfv3oSC3wbAGsbE//HzE+CUX3rhc71db9fbr3rbdedvT97bdRcczpQe zpQdTpfTdvjqs4X6jdHituKw0jRNXrz0Toz4fLXl0UrL49XWE0ouaVobq/Z0 FzYWxZfnhOTG6lNC5AkOcZxNFGMVhpqkIQZxuEUWZhaHmoRxQdJkKoWQfzNJ X5sf3lWfNtl1e36kaGm8dG++fmemdnumememem8G8KRye6p8f6bygBJHKo5m K4+h5ipxgBgyCPAI1uPl+/TEsAY6XeU+Of/zbMJs63oZm7wonbwIJnuuEuJG gWMcOwzXrw8Xbo2VzPXcmWzNHW3Krb0XlRQiTonQxQUrg81SIx2erlNJjFpF VDDV0wX0gdN9cYAwBpFgVCIssew6Kc77BdYAKgmxaQBGADoiQ0zpieFRTjOc 1yl4CC+UhqIVKSUsKd8Hzpi1YgftZIE76KXcIL081KwO1MlsajHgiQpuC2yi 4KrlHJU0QKdgvfl4e3ais6e5bKitsq32blV+clFOVF56aE6qM9yhCDKLAk0i q46vkwdQc7rkLLOGr5UGGBVcg5yrk3FgcWhTsm0KlkXOMsE18gADXZR9HuBF ydEoOSolW6XkKhVcuYwLcEQXD0up4NPF8yoyswt5xKAWQzHD5YlR5f83NmFe Rk7+s2Dyz7AJFQ3/c2xCLPA0nlBFRYfw/WRijkYlspo1UeGB6Smx4aF2s1EF Z7RqsU4jUch4fMrzDq9lq9SSW7ezHjbdLy4pNBjVTCph5pigyAJsgj1vUhmf Ps9CHz39kE0pLzIOgIlEwRNLKcVEJAygfufCAAATIaDHpT6ipIa2UW534Ava VyKFM+hAQRhBbUUmZMFD+ilKT8HZwkA08EKAF3itWaeQi+CPlu8wa+C8DmiI 46MWwR8bD/4dJYTbo4NNtzPia0vutNaXDbQ3DHU2Ap5Mj/Z4hjumhtqnhjqA UCgBZaJ3Ybx7abKHwpOZoaOVyUdbnrN199ESRSU7i4O7S0P7KyMAKaebkwfL I4ujLfNDD7c8PQcLQ9uenrWJdmCT5bEm9J7MDd2n8aRuqrd2qqfO3V1bm5cS ZhAEqTlWWYBF6l96I6L3wZ2JztLx9mJ3d/lMfxWwyVhrAbDJZEfBVGeRp7No uqtotqfEfTnIC/0maI0njV7Mzi4EE5ROcE4Xs5uLNHEBjDA5BQ+I8YTEnVwY 4X8adELcKKe06+TN3QnCJu+eTmMcPAETzDTBaV04sAvA5PM3qWQT9JiQXHjA EFRP0HJCIOWLt9aevb0ObIJjhL9+j3qKavf68CLPnQaNs999/IjIKIQyMCae ySbEDo9zuhBSCGUwWQP1EbwPPoUaCoDJj1+/jnhCrqdvAscXz8L5bz88REc/ gACACbLJ374D4nhChn2hFIIyBDFxXPgy6B4qMp4LF/zM/HdmlAkZF0wSG1+0 xmPLFkpO8HvGHjBi1SdvwUxURCRhdpQhMSHdYAsZsxWNfFoyCgxujt8p+nFw 7DCmwP/9t/AzwgemVKTffQLwcvhLL3yut+vtevtVbzuu/K2JPIxf3J8q3XOX Hc1Unc5TvpKNkZK2ovCSVM2daMmtSPH+bMPpcsuj1faNyRp3Z15LWWJFrvNG tD4rUpsaqkkKVsY75LF2RaxNEW6RRFgkkRZRlFUUFyhJjVBkx2nLbga116RM 9dxdHi9dc1esucqWxgq3Z6o2PRVQO8Ajc9V7s5U70+WHc1XH89WnC9W0BaYK 60Uw8WITgidX9nRhuxfTgXL8koauU3iWPmCyCenjIqO6MJORySY4uWtrpGBr tHCh+7a7NcfVfgt+S6lO+A1o4oLlQUaxWc23GWQhNl2owxjrtGAwIlAJTgyG xZVKSGWd4Mwu2KMjPtShAxgJDzLAPtCshIPk2JCUOCecx3gRtZRNiSZWtVYJ i3nKA2JUCymK0ctwGphNIwk2KABPrCqRSc4HPNECnshwvhZHJ2MZlZzTnfm1 mcG+5vKh1oq2mrvV95KKs6LyU513EkMjjFKHnGOTc+xKnkXKcaiEFinXrhCa xLDuEhjFXItUYBTxTHKWRcGxKDlwoJfCDwLLRTY1zkvJpT6YkqfCAuiQcpUy rooqylqilvPVCj7gkkrmXV6KCbIJHuNcXLScv4xN/it6usiVzIuvxJAre7pk Uj+qnrMJiwYTFhSKJtTEXQHrZWzCNMIze7qkIrZKITDq5YF2Q1REUHJCZHCg yaCTwUkVNSFNCL8NHtWj5aNQiqQyYWJSbFd3a2dXs8msQ6cJ6eZCkzt2cPkH vAJ4IhRxaBO9P2ooOIWY7uziS6Q8kZTDhWMlX0rhpEAq4chlPAoMBVSyiZB2 lxA2wSgTYAqHWWs3aYwaGYAG8AjwC7NQasHseHgVybWBF0LBSyKd9vKiu+lJ McAmCj41jE4jZmvELPinBP+ybqbFlt3LbqkrBTZB6YRik5FOmk3ap0eQTXqA TQBMll09q67enbnhk3XX+abnnMpknNhbHt6a7wdCOVgdPV4fP14b3/R0L422 LI+1ApjszfZvursAT1YmLhJP5ocbZgfrgU08fXUTHVWTndWDTSW3EgKBTQJV bLuCFWUV1BUkAJuMthaOtBR4eivmBqsn24sm2gooNukqmukuATCZ6y2d6iyh zxcCoZCJXsgmM/AqOhGejOfC9i3gEZILj+e9mriQXLyKqaGgu4TIJSidHF0O 7zqhdRMMOnlrbxIjTj5k2EyI98Srs+uzN4BKVunwxDUEE4xfhGM0mMBSFid0 YUY8XPz5m6tfv7f97Yd7330EFxyg34Sal0XjAx2VePrdh6dk9i+GJyKneA3j QisKGduFHhMcyYUtXrTkcYZUguTihSdAH16NXpe9XrB/TDd3vQH77z46QnGH VigoaeD7Z49+/ObJX7+FNfzFYp70VmGLFOERMgsLIYXZu8W8BospVTDZAYkD 70Oc9UAK+EtGJCGuEKSPF9/FK6eeORaAjAsmLWTMqEdmKxqODkAO+tOX51hA aogncPz7T49//+nRL73wud6ut+vtV73tuIp23UV77tIDTxmtLNRQSSWzsM5v 2hgpbS+OKs8w3YtVQO3NPNyeerA0XNVdm1l5K+xWgvFGjC4jQpfsVMU4ZJHA IyZplEUeY1NGWoThJn6IPiA+SHw3xVJ1J+xhacJUT97iSOm6u2JzqnxrqmzL U7o5VbLpKdueqdibrz5aqj1ZrjtcqNqbLT9ZrDpdqn5E1/lyFRbp3fLCE1Lk PNN+QorZ6/XvsgniCZnchfTBnB6M+SZX6iYbA3dWe2/Otue4mjI97Tf7atNv x6kzo3VJoapQs8SmFTgMUro1SwEwglQSSnde2XVS2tLOgT0a2MnwrvhIR2y4 zWnXhgXqo5zmpJjgzORIOHCYFDgjSyPjAPIEWVRGrchqpA7sRjmwiU0nxSFg VKSjQmCQcqF0YjbgiVbOV4nZRmrAF0crCTAruXvLk6cb0/0Py3sbitoqb9Xn pZTlxNxLCr6XGBJtFDukfnaJf7CSG6zghGmFdgnLJg6wi1mBUq5NxAqW8R1i jonvaxH5O6Rsm5RtkbAtMmAZvknBN8p5BgVPL+fr6PelJndJuRoyYZgq6rxa CpDF9aordRM8JroJuumvZBPpZVGphbLL+s9gk39GN3lxcpeS+lR+Uiix/2Wx mGBCiyYUm4j4rH9eN+EE+Ij4/gAgFpPaGWwBNomODLZZtDqNBE3oF2YTDsUm ABRiCV8qEwBiAFlweQGETRBMcFgZXGax6vPyb026Rvb2tza3loeGe8vKC+MT IvUGpUDIDmD50v1g/gIJy8ffh83zl8i4wCZCAYvKWKF/ENRNSNgiBsFjoIlF rwiy6kMDzTiYC0gEEAZt8nCliOuLF2OvF6ESeJWEzwqy6sqL7jysr2xuqA6x AN36ANQDmCgFVMYosElOclRBbiqwSX/bfWCT8b5Wz0i3Z5hiE9hfGE8mehcn etY8/atTfcAmG57+vcWRRxtTr+3OPdqeOlofRzY5XBs7WBk9Wh07XBzenu6l OrvGWndn+name6HW3W1kqjAtnQCe1E/11I22lk/33W8qzYm2ymxyf8ATm8L3 Toqt5/6t4ZYCYBNXVykVd0Jzx0R7/mR7/lRHIdRk670p2v8OeAJFmrtICCOZ zUUGcGEuPA4QRjwhDV1EImHiCR6g1ELYhKgnhE0oGWWx53SpF+rRSv/56gCw ydONYZzW9d6R5+OnS2h7Z+bCQxHFBEADR3WRni5MXYQDOAMHl31cF0XrJuvP 3l7/6t0tekjXT8ZhobODxpMzYJNv3jtEPMHgEsIpzEnCmGOCqEJOEpBh6iZo tCetX4RQ8AK8GK+5bAmjdJMfv37979+9DXjy/bPH6JSnG6iO6E9+9P2zsx+/ eQxsQgAEV/5MuYS0SKF/HDEBxQgygIvwiFeRlHacSEyED6aHhTR04VugnoIs g81daJAnsONlNiHmEeKpx1fBZUgiZKDxxdBgugcMCYWGSorUANN++BpQCH5A +KHe+PNXj6/9Jtfb9Xa9/fy2A4vqy5z0k7maR4sNp/P3Dz11jxaa1ofK2ouj KzLM92JV+fHqxZH6wYd3G/Lj7yRa0sNUySGK7BhjchgdWWKRhhpFIQah0yQO M0udGv84mzA7Wld1O3Kg8dbsQMnyWOXOTN2Wp3prqnxnunx3pmxvpnR/tnR7 pvxgsfp0tf7ResPZ6v2jxar9ubKzlZpHKzWPV6qxnqzWQP2TYEIn2v8cmyCV HM1UHl62b72MTZhtXUQrYbLJlX6ThY7MmeaU6db0qeZMT2vuyIPsimzHjVhD RqQ2LlDlNElsGoFRydPRqSKAHkAlEQ49sgnKJUArcCYmxBwZaAi36+AgItgI GGJQCUwaEUBKVkpUajys6ZRWvRTNJoAnoQ5diE3jsCidDi22flGdYAo+Bs3b NBKjjAdUAnvAExXfTyPmqOEhNaOYY5CxzXLOxszwm0erAw/LO6vvtZTeqL+X UnEjNi85pDot6EaQJNkQEKf0iZH7hgp8w0V+URKfCKFPtNAnku8byfOJ5PlG cH0jeH5RAv8YMSdWyo2R8SIk3DAxJ0TCCRKzHRK2XcKxSjgWKcck4Wjp8cLU hGEkFCkPj9USrne9xG+CThOG2eRq3YSwifg/j03+eb/J/zGbXIBJAAUmL2eT F/0mwCaAHgadLNBuiAhzRIYHhoZYLSaVF5sIuL4sekIXDhDG8Vx0zKKfV/L7 Zf47V6NVhziD4xOiU9Pik5JjoDKzknNvZpRXFLnco6+9/viTTz84ON5u63yY mpkY7LTKpAJWgI9MysP+NCkwjoiNsghCB7Z1GTVSAA2bURVsM2BrFnx9OLYL LwNIwdR4YBMAE7jerJMD0RjUUrVMcDMrpbOl4X516VBve0VBLvyFK/h+8A9K xvVTCVnwN58cFZSbGtNQkd/eUNHbUjfS3UQ54gcBTDoATKBmx3oWxnuATdan B6DW3H2r7t7Nmf7jlYlXd2ZfPZgDNtmc69teGDhYHd1fHt5fGj5aGgE8WXd1 Lo00r020A5gczA9uTnUAmyyPU51d88MNwCazgw2zAw8GHxavjLf1PygqyIh0 KFlQwCaxDmHZzYj+xrsTHSVjbYXj7YUTbYUAIONteeOt9yZb81xteRMtd100 kmDEiZfxBHUTMh+YGbBIcuEJgCB6YGGmCR4TBwpzpDCyCQYyEhMKYRMoMq2L sMkH5/PMUV1MvwnTDo/5JiQR/ou3NskkYbSfIKGgekKbTba/eX/nu4/26RX+ 8fN8kEt/+u8/eUT3dKGG8pN0RWbGIs4WxoBFYpBHloFCuQRJhPAIOYmcQooJ L3jZv3z+5M9fvg5U8rdv3wI8+du3b+LKnJYYKMf3pXpyStiEzN1FawbyAhk4 TJq4SLsU0gd6Q7zkEqbLg0SfMKcNY4sXYR+mUMIcVsxsIWMWiadnZrUQPYUZ CkkiYIjBhBATbcA5xrEAwCNQf/nNq//43ZuAJ3/77vVfeuFzvV1v19uvetsa L9inV9d77jI6vuQBzSawyG9eGShtKYgqSTHejJDeipS1lmcXpjuzow3JIcrE YEWsXZoQpIy2SaLt0mibPMIiCTWLwyySSLs8zSmvuhU52VG07nqwNdW47qqd 6S/c8VRtTJZuuov3Z8uPFir2Z0t2pwu3pkv2F6pO14BN7p+u1B0vVR8tVj5a rTlfBTYBJKl+skbV0/WaF6nkyoaul/V0McEEqARZDOjjxSJsQtq6oLy6uZjj uZ7P6RorXB++52lMdN2Pn2vNmG3N9rTcmHh442F+1I1oXXaULi3SEBOoCtSL TAquUc5FCzxQSVSQETu4YI/hJlBwEOu0YBw8MIhSHKCgVr8BkSEmYBMgFJtB ZjfKzVqRWsIyKPmxYdaIIENYsCE0SA8go5awRRzqP5NtWjHNJmKrSqSXsE0y nl0j1ovZWjGHLpZByrapBBYFZ8XV997Z5khLZXdNXlNxVvWt+Iqc6KK0sIZ4 bVW4tDFW3ZFs6s8MHMwMmrgVPpoZMpQWNJgc2BVt6ooyNQepWoPVpXp5vkqU K+HmSDjZUk66lJssZseK/KOFfuEi/1CRf4jIL1jkHyj0N8r5VFDjZUojFdQo 4VIlxT2PlErKYczpognlyujGn7KJXMKRe/V0idlCyUUx/SZMMeJnckyej+ei i1CJ+GfndF3Z1gVsQtVP2UQiDpCIAi7AhCqW6P+kp0siYuu1UodNH+a0AZiE h9qDHEZgE61arJDxoJQKgYz2p/v6+eAMLi7PH6d1BbB82Bzfy4OLdEVMWhQI 2VBCEQeTUDCoUSrjqzVSg1EFZTSpHYEmZ7g9Kze1ur6sp6/1Zm66WMT39/OV wXch51PtZAoh8AUaSZi6CbCGHV5O+9ztJo1WIQR+IWyCXnh4FeaeWA1KwBN6 DDI3LjKktqKovam+7WFdV+uD4a4m+Iej4AfAvyY5zx/+5i1qERB9SnRweV5O XendpppiwJOhzsbJ/lbCJtMjXfNj3UuTvRSYeGg2cfWse3r3F0YerbtfO1zY Wx5em+5en+ndmh/YWxremR/Ynx8EPDlYGFoea6WMJ1PdwCZb050YdwJFO+Lv A5uMd1S6u2uhPL31XbV5MTalUycI1vpb5b7JofLGkpShpryhJiCUoqHGOyNN 95BN3O0F013FM93F460Fkww8gWNiP0E2wbYuMkCYIAnTZoJDutBdAgdM9EA8 IYoJFk4VhiIPKQfKfNcJjSeIKo9W+pk9XW8fe94+8bz3aBa1EiyEES8v/Kev r2IrF3ZzAZI8e3vrq3d3MNPkm/epYVyXcYTUDGG6oeuA7uk6xIU3VZeW9t9/ Aphw/qJbBONL8DIgEaCSZ2/tAJ6gvEIABIkG5RUyahhlF0IlhHGgkEfwJF4D J+ED/OnZaz98RdVff/PmP377NvZH0Wv4J7D8hnU4bfo+goeomJCmKVjPo9EG e8CQEZjAQijgeVDIpTcE74APkWvIqGHCCKQRiySe4MXYNvZvf3z3H797C8+Q eV9eDhTSV4a0hTH0SE+EVsjYMeQj/Fnw/lDw1OW0sTMcXAa8BngCpPbffv/W v/3xnV964XO9XW/X269625ko2J0s2neX7LtKdydg4V15ttCwP11/ttSyMVbT VZlSlGrOjVJmh8tSwq1ZscGJocYIizzcJI2wiKJskhi7MNomiLJyw43+YXr/ jAhZ7b3wue47KwMFm6OlW2Ol2xOlu67yw+kqioCmqLax49lK2khS+2ix9myx 5ny57vFKPezx4MnqffLwJ7VU9+8qJjiti6mwkMuuDD25Ujdh9msR3YRIJExr Cex3Joo2hvPWh+5tjORtjRUAnozVJcw0Z2z05W8OFC103Zt4kNteFF+VE54e okgJVsda5U6tMFDFd+okYXTsCKYiYqgiHGNKu1UjhodBRgVGJQJ+cOVCc7DF HmoLCQ/MTI+PjwwKNEhtaoFJ5GfgvWIX+0Vp+UlmaYhNHmiRGuQBaqGPguNj FPna5f5hSla0lhutZMUoWKk6QZqOFyXyD+KwYsX8VC43i8+7LRKW2fXvuAf/ 9Oy8t+l2Z+edztYbjVXx9XeCS5I0FfHhPbeyVm5nbmclPE6LfDMj5PUUy+Mb pke55qOb9uPc4LOc8KcZMa+nxb2bGPVBauw7abGvpUY9To86yY49zI6dSXEO x1ganaoSsyBHE5Ak8Yvm+4aLfMLEPkHSV2ySV0zSV4wSH73EzyAOMMu5OglX JxeqlWKFRiaUC3USX4PMxyD3MSj8dNRwMH+Vwl+mYss0HJGGK1BzBDqBQC/k qHkK2hGP9pOfzOy9xASZMABL9LOCCLO4Qj8svtAfkwRFwoCL5itKFIB7XtSV YCIV+EPhmz4/L/aDkgn9pCI/ichPLITyFwh8hZiljhmRYraAsnWwmYIOkAiH 6wNABAcBrFdY7FfgAC+wGJQmrQwW8BFOW0JsWGSYw2RQaDUSlVIolXB4fL8A rg8Um+/rf6mboO0dMASohBm5SCLg4f50TPzFQ3wW273QGg8llnChJPRMYEQP zKBBmgD6gE8FGEIGCAN3oA6CITVmnQLYBJu18DIc5wW3wi+OOf0A81msBoXN qMxIjm5rquntbOxua2ipKwPuSI0JkXJ8pRyKTYwKPs7fzk6KLL2b9aCyoOth NdXZ1dsMbDI71jM11OEaaJ0Z7VqdHllyD0ItTw3B8cbc+Ob8xNbC5OOdxUeb c0crU3sL47vzo3sLY1A7c0N7iyOHK+O7C8Mrro750eblyfbd+f41V/vSWPPy eMviaNP8cCMcT3ZVjXdUrEy0urqrAVUeFKcHqnhm2SsWhU+g1jcrTt9ak91R mz3Slj/ckjfamj/aeg9qsqPA3VXo6ixAMQV4BAu9JxgNT9gE1ROS+U6QBEkE ZRGmqoL6CJFRSIuX1+QuQBKEFNLWhWyCxziq6/XtMcSTd048757NIJuQNJMr 6/M31wFJmH6Tj19dQbnkYgYXPUOYyj25bL7CeETm9C0mPpDZv0Aof/7yVQAE tKt7hZgAmHzx5jZaTpg6CBYa51FeISnzRHwhE4aZCgvp9frTs6co4qAtBZ3y REYBWkFsoYox84oIKLDCx64nnJyMXnVsryKqB8lzhz1JVySmFQIvqHHA/r/9 /m1stSKsQVq8iGKCbhFMhIeniDeEjOEi7nvsK2PGshDphNjkSe8ZvBBjX/C9 MPmRHl/8CKkEXSdwAJzy129f+8fv3vylFz7X2/V2vf2qt62x/O3xAtouUb7r KtueqNh1VZ8utBzOPFzsL+soS8pLMmY4JVBxgdrYQE24BahEGuNQRFlFYSZe pJnj1PlFGFkZEdLy3KC+B9kLwxVb40VUTRTtuEr2pgBMKoFNyJgsWsW47M6i eQSRBOrpWgPUfwqbMBvAmGIKMZscXzpKvIpgiFfvFrODiwzv2hzNXxu8u9R7 c7EnF/arA3fcD1KWOm5s9udvDRUv9eSPNWR3lyX1VGXnRGhSQ9QJgapoizzG rgo1SKKCDE6LGrPaMTARSiX014hZGHSCVhSAFJlSaHUYomND4+PD01Nj05Mi rHqJTSO0a4RmSYCa/YqG84pV7BusZAWZpXaDyCjzt8gDHHL/KA0nVstJVPqn qgIypP7ZsoBik6AxXN0ea+yOd46nx86lxK9mpm5mpa/ezf7b9uL/ePbq6IM7 3S23W2oza/NjanNCK5NtddHW4ZzYndy4k8zwd9ODPs22fpyueytb8Ua24kmu 9mmO8fUs2ztpQe+nOD9Osn+aEvhRauC7Kfa30h2vZgWfZwQd3wg9uOFcvxEy n+mYTDH1x6k7o2SVQZISq/CmnpMi84+V+EbLAmLVfMrAImMbqKFkQlhUy1Ui sZxvlnGsWHKeRSmwqEUWjUSrFOjUIqVKKJHzhDKuUM7lSdnK5wO7uCSW/Zdl Ey8qudBNRL5UCf1kNJtIRP6UYiKm6/k8MQ6yCfXwpyoJlbTIRWp4BR7CebGE bTNSAkRYkCUhJhTYJCTIrNNI9DoZ/Brhnny+H5sPYOLD4lHB7mhjJ853rzh4 AiNX1k87vi7s8zgHGA3vQBbodrebNBa9ko4sEdMwQvGIkEMFlzDt7UQWsRpU cIDxi1BGDZxUWPRyOABCATDBXj4AE5NWGh1mLyu89bC+vK/zYX97w2DHg4aK fGB8MdtXLabQHhXJ9LjQwptp1UW3HlYX9TTXjnY3ApK4B9tgDzU71g08suga WJjsBzxZ8QyvzYwinuwvuY5XPVAHSy6gkgs8WRzdmR+CAkLZXRhcm+oCPAEA 2ZjqBDwBMAEqWZ1sg4OZgftTvdQwYTjw9NX1PciPtSvNUh+H2jdQ4xdtF1Xl xXbV3xxqzh9uBjYpGGuD/b2JtnxXZyEQChNJCKSgKR7whLAJMZ6g64T0caFi guiB52GPagjiCenpIpO7vDQUYo0/vmSTYzr0BFNOgE3e3J14e9/1zsm0F5tA Ef/7T2udtHWRItmLhFCotq5399AVQkgEm6lQxUAnu9f4Xyz0rZM5WiiLIHGQ ZEbiN8FCeEH1BNvAyEOmL57Z8YU5KcxBxKTTDA4ASbwKaOXHb15jTgnGAxLR yCzSDYV+EFjkI24Q2YU0aJHRvmRUFzPYnXReIezgq8hALVRhCFOgN4SEORJj OwmOZMaskJYzIuUg6cAbEbM/M4b+x2/grc/phJdTFFCwy+vab3K9XW/X289v a8P31kfytiaKd90Ve+7KrcnKzYmKbXe9q/1uV1Va/d3I2/H6lBBJRpgi1kH5 SsIMwgizMNIiDNWzQrRAJf7p4bLy3MCeuvSZ/qINV83O9P2D6dJdd+H2ZP7e VNHhTNnxXOXhTAXprXq0CLDQ8Hj5ARSqJMgmr64/gPrP0k2uzD3xspxcySbE 4Y4MQjQUPEATCrpL1ofuAYws991a6L4x35WDbLLSfWNr8O7OcMHOaMlKX8FE Y85wXcZo491bMfrkYHmsTRpjo9gkWCuwayVmlZBquNJKEExgTYWiCSAJBrvj JGGzXhoVZo1wmuOjA29kxCbFBtqNlK3eouZpxX5Knq9Rxgo2iMIsspRQY6xN GSwPcEr9omR+6WpWtoZVYuA+CJYMR2unky2r6bbdG8Gnd8NPbkY/vh33amb0 GzkJb2Ql7mfF/zDR+7+/eH36/r3exnutlTdq7iZXZ8aWJYa1xug9OWFnNyJe y3B8mmr8OkP9ZYr4o0zeB5m8t7LF72TJ38vQfJJi/DzJ/Hmq9vNUzSep6o9S 1R+ma9/L0L2Vpn0r2/zWDetrN21PbljPciwnOZbjHMt2bsRqlnMmyTYYrn1g Ft+Vs1N5PiG8V0JEPkaJv0nJUQFryDgKOdehkDtkMqtEYhaJTCKBXiTUi0V6 icggk+hkYpVEKBfxsa4Ek1+WTZjyzaVhnysT+VBFsQn2dFFjhCUSuj3skk34 ABSUNsHGhjGmAR/2dB+XL8oo8FCu4AMFBFn1sRHBqYlRsdFOu1VHzQ3WStUq kVTCgWtoMKHxhE0pIIAVQhE1/peevuV3JZu87OSLSShCrq+Q44N4glO24BcC hAIwQptK1CF2Y2igOdhmUEp4yC+AJ3qV2KiR0hYSCewx3ARABl5i1skDLRq7 SYVzDwBM4BeoVQjgIQALnIGnUuLD829ntjZW97TUDXc9HOpsLLmTpZXwlAJK N4GCf1kRDn1WYkTRrXScJzzYXj/W8xDBBHUTQJL5iT5MY1yeGgI8WZ8dg9rw DO3Ojx8uu49Wpg6WJvYXxylCWQAkGYbaXxo9XAFOGVgcb50dbAAw2fR0AZgw 2QRqvKNifrgRIAWOy3KjQ3Qch9ovUONvVwVkxhpbq7KHmilT/GhrIeDJaEv+ eGvBRFvBeFu+VzcXggkJiGfGLxLjCeERAA1EFeQUQiiEPpBNmFSCRYwneIw9 XcAm6DTBOl8dADZ5bWv0jZ1xwBPUTRBPiOXkSjZBrQTt8MQRT8CEWd9+cMEF pKUKH5J5XMTJTlSMSwPIY5KriNxBJBgoYjwhyMM0quAbQRH1hAlBeHMCKUz7 PDHL4zU/fk05UKCASv7+3dv/+O07lIby7RvEJ8Ich4WyCDOphOSJEHc5Nk2h yEJIxCv0EC6me+Gozjc4JqnupDUL4YXpwUfuIGYWuADAhAgoxFOP3VzILOiL J+hBfCWokvzrH94hThaCM7TiAxfAD/gEFROMX8SUk1964XO9XW/X2696WxvN XxstWB8v2XFX7kxVr41VzPcX9tSmV9wIKs4KrLoZnpdsTXXKU52KaKs4wsgP N3DDDexQfUCUiZ0cJMpPM3VWp8wPFG9MVm+4qjZdlVuuyj1P/u4UgEnBwXTx yXz5yXzl8VwFDRcEMQArAE8aCIkgmzxda/hPZBNm0AnzDGGTE9pa4lVAH1fG xCOYoBUF0xgRSeY6s2EPhLIxnAcnDyYK98cK9seKdseATfKn225PtdxytRVU 54ZlhGsSgxSpYfoYu8KpF6pFAToph8TBB5uUCCnhdh3aTMJsWgATeGg3SUJs CuCRxGh7TnpkpFMXFqQyqTk6eYBW6mtSsZ02aWSwKswuv2GTZ5vFaUr/HHVA oYHb4lQOxBgXk81bWY7XboW+ey/83VzH25mm97LM72ZbPr4V+FlW0Oc5YZ9l RT7NifrbaPP/+9t3Fhvzu+7fe1CaU347rSI7tSQloTNWP3cj9Dw39I10y2cp mq9TpF8mcD/J4HycyX03W/B+luSDDOXnKbpnSYbPMhUfp0s/TJN+lC7/OFP5 Ybry/TTFe2mq9zO072fp38vUv5uufzfDAO/+ambgk3TH4/TAs/TgvaRAd5Sx O1BRYBTe0HDCpb7BYh8jz8ci8gtScCwioBKpRSyzSuVWmdwql1sVCmATnUSk lVKloUstFTEbuph08IuzCaESLC82wRnChE0oDBEH8EQBPCHFKRIpNWHMazgY E1LgQKkSWg1KWPwnRIcmxUWEO21mo1KvlWrUYuzp4lM9Xa9AcQS+bGquF3CN Pw7pgj12dr0MQ148SUQTUkAlWJj2jgWcAqyBbOJ0mCKd9ogQm0WvgJOIJ6iP AKRcUonIZlTBlQAydpMargQkIfME8DcJVGLRy/UqkUkrdToMCdEhhXez2+6X A5iM97U+rC6KdVqBTbQSNoAJ/OOCfVyo9W5WYmVBbl3p3c4H5SNdD3BUl3uw zT3YPjPazWST1ekRCkzmxjenh6F25sYOl10na1PHq24glO25QZpKxveXRvaX AFIGN6Z7FkYeAoCsTLQCoSyPt8BDIBRPXx01rau3FvZwDCeHmouzYs1WhY9N 6WdT+oca+RW3Y/sb80daikZaCkdbikZbCsdaCsZbC6HQ/84scgYjToBKcIzw lWxCouFhTyQSMkyYkAhaSxBJmMVMZjy6ZBMypwvY5NXNkde3xwBP3jpyv33i eYdOOUFCgWK64Bnp8FSRlBNMM0G5xKt++/FzYzszQhEX/2TS74tjtZh2debL EUyIOHKZ3kjRxPdfPMHsEoIq5LVENME7Y8sWHmOXFwETZlzjD1+9hngCbILN XYAnf/v2DSaYkJU/NmsRvwb6RBBYEBYwYx2PgTuQEUjzFb4WHgJTkMRDFFyY IgvTzE7asYjsgp1g2Eh2MXDg0oGCL8ePgaoKEhMZ+UVSWgj1EEMKEs3lUC8q fvHHb56ibnKdC3+9XW/X2z+zLQ7lrYwUbroqdqdrVyfKh5ty6u+F5aWY0sOl txIM5TfD76UGJjuVSSGKaAs/ROMXrPYN0/klBQqLM22t5YmTbbcAZw5m7++4 q9b/P/be6zeOLFv3FJm06b23zGQy6b1JnyRlSYmiJHonURIpeu+9d5Io7ynv DeW9ynRX1zl97B1g5mEGF5iLuU/3cYDB/AGzIha5FUVS1dXnnkHVAwMfAjt3 RhqmUED8aq1vfb35J/r3nxkpPj2Ye3Yk7+L4/suTBVemCmkVXZspI6JauVC/ dJr8p7DJ+mQT0JpnEU8uj5es10V6/8pE6VV4yUQp7iCeEL88Jp4M17gHjzhB gCezrTsATIBZrowcADw517t3sStvpmXXVHPueP2u/pqcukJndpLOGSXfmmpO skiitNT/1yWmEsAQEI4OhgWO7cKqCmyG60QmFddmFGc7YrMyom16YZRBZJQE GsT+YdIAmyo0RseL1rIjlEEHtCHVEeKmWGV/unHMblr0WM9n2W5lh9/wGB84 tc/cuudO9Wun6mOm/lmm/NU2zVuv9pVb/9xhWvJYf2op+h/f35s5knOsamfx XndOdtoen32PK+NIvHrQF3khK+qGy7RsV79zyd5k8J95uE+83PuZggc+yWO3 8oVd9yrd8BTWXtEjj/iJV/rEI33skj52Aq0on7tVL1zqZYf6mV29bNe8cOie ucMeO4z30/W3UvVLacYLdstZV8RAuqkjSV8VqTwQJs6ShThF/hl8VhiPbRJw zUKeWcQPE/MNYp5ezDXKBFoxVwWScJViLrrg/7B1kzVsIhH4U+IHSAS/YBNK qzksxG+yYd2E2E+woQvYJDrClBIfmZEcmxBjNZvUACZq2mwiFoXCdw6hzCZb gthbqNJJyErdBN0imLH4N9mEPEXGeTEnevFWqYQQCpy5wbCgurwAPQCdrCaN 1aQGaeQCABNkE/iHgwuwxQsoJtyojgjTmrRy9J4I2P4ibgCZeAZnlZQLbAJg AmeLQWEzazKSo/fnZHbUH2o6UlZ/qDjbkagUchR8ik3QugX/KblTondnO/bv 8lUV5rQcLaWzFxuATfpajsCZGia8jk1OjlGlE9DpiR5gk8sLw4Ani2PthE0A TECL463HhxsAQEZaK7Cza7StEkhkrL1qoLEEzn31RYgnsKjK90ZquDohK0LN NssDvYmGg/ne9kN5HdUgwJO93Ufyug/n9Rz9an4nYAI7aITHMcJjLUWAJCDm wC5s38JSCKxJ9QRphaAKAZNz4/XE+b7GjfKVTWgvPLIJgsn1hQ5gk5snuig8 Odd/98IgCAkFaygYbrJO04RN0AiP6fAo7OZCEaBgZiYiKRAQYAzsukwCExFb CGIQwzu81eu7i2g5YV6AxAEogZ1XgBUkzYT0jK2hD4IqpEyDbhd8E8QceB8s nSCkAKH8/P7mmjlXWMhAZCDhiWTUFdZKYI3JL8zYRKYPBdGADOzFogmTRBBh mPkjZCwYeS0ZuoVlFJwwjJRE5nSRZBPy5ZmWE2KBIan3WOVhVGGW6Ell13F0 MBDK9y8ufPf8wu9947N5bB6bxx/66K/bOt6+e6Z731jbnpZK1/4ssyOK64wW poRzvAmqPV7btvQwe4zCEauK1wVGq/xTzOytycqKnPiBY7tO9Jct9BScHio9 P1Z+lna7n6Ws7sWXJgovTxZdnaZmbV2dLiJzgK/NoIquzhRenabENJsgm9yY r/qfZJMNbe/Mnq6vw7s20iW4mGYTFO6Q0gkxnsB6sjF7vD4Tu7kWOnJO9+fD /uXh/IuDey8O7jvbtxdoZaEzf6Z1T3f11tYKX64jzB4lzUoxJIWLbRrqrimK tsMjj8SY1VgoCddK4J5KJQxWi+iwdZUw3qSK1EhSI3RbU6I80aYEtTBWzo0S smKErFRFqFsn8OkFWQZhjlUxk6o+7wtf2h51Lyf+zlbbba9pKV31MtvyzGN4 6dS8c2s/ODUfHaovbs2yT/AiU/zKKXnhULx06W9lWX9uOfA/vr89V5vTfGRX RYFn97aU3d6UXfbE6jhNvzfqQnbMdbdl2Wl471G/dUieeniPvfy7meL7PvlD j2bZYXiZYXycKXnoEz32iZ4ApHjEj53iZ27pSyAXh/x5mvx5qvxlquJ1mvpN uvaNx/TKbXzs0N9JVS+lqK9mGJbclvPOiEu+mNPeuAVXTH+Csd4iLVeEJMtC 4mUhMdKgSElguCjAJPA38P3NslCDJFgrDlZLghUiQACWlM+S//H8Jhv2dEmF AZQEgZLVOV1U9iKFJ18zIvmiUL6IjbOO10/lwgXsiCVslVqk1ohTE6KcaQnp STE2C5W3qFIIqAldEg5821Da1b7KJluCaO5ANsEZwt/q6WJSCbmM6T0hT3FD /JBHsLML1vSCtSbwnU4wCeIGswBbYB/xBDAEAxmlglB6Nhf1Y8I+Ugl2c+Ev Cf9wSgnHoBYDm+iUQliYtNKYCIMzOaogNwvY5FhV4U5vmkUrVQlDcEA3NnfB f1betNjcLHthbmZNeX534yHAE8Imo92NWDpBywngydxI1/HhTgATunTSdXaq F8AECOXURMfiOIUnZ6e7Tk+2nxxrOT7SdHKkEcslM71HQZNd1bCe7avpbygG YAFCATaBc+fRfd11xdmpVqM4AAjFIg+O1nJ3ZEQ0lee0HcwDQuk6kt99OL+r em/P0Xy6ekI54lE9VHb8boAUYBMUzukiCYzMYcLECE8sJ0zvCZZOyFQuoA84 w5pYUQib4FwvaowwbTlh5psQNrlDswmCCbOti8zsYmiaxC8SNiFOk1/gyaOz JDkRDelY6SCzfJEICDgQXiAlD1L+INUT0qmFpRN8Z1JtQQ87IRTgCyQU5BFY wCbJkccPwroJsszqnC6qfQt4BEsnyCn4LOIAme5LRMIQid8EKyMk3BDWn56e g5t8Yn4nVQ9sqSKMA1eioZ7pOiEDvpgzgRE3SI4Jk5KYDWZMgwkTRkhxhNhe yNxj5vUkGwVrJVguAUgB0dmL5z8/O/t73/hsHpvH5vGHPvrqtg0353Qdzarc E7MjQ+mOE7piBIlmdpwx2Bkrz/XYdjqsrnh1RrTCKvHPsHLLdsb2HN0x1118 ZqTqRH/p4kDxmeHS8+Ol50YoNjk/WnhlqpTuzqq4NlNK8hMpPJkDQim6Ngtg UnB1Zv+V6X0gqpVrrgq7ua7TbV23jh+igGWlsFJOieaXFTBZwyYMt/vVlVau UspIQosZBL/GdbKijdiE8AgKd7Bcgk4TTISHfZzZtdibBwwC57OD+6mXDO29 MVm0NF50ZYyKSjndX3ii+0B/zY6+mp0Vu5N9ierMZL0rTp1kEVnoQJNwjQTo w6wSRRoUCRF6uI8yKQXY7oXTuiKN8nSLMdWo9dksHoverpN5dPIUEScxyC+d y8rTSQ7HWxrTIjtdcRM5rsfbrE+2Wh54dE8zTcuZppdwdutee3QvHKo3GYoP DvUXp/Y7p+Z7l+alT/jKJ3rrkrz1KN949EtO/Zty7//9l/sn6nObD2+vOuDM 35G6PzMlz5FQm2wcyY6/tC3upjf8uVP31q14nSF46uE+9vLuZYoe+KSPPOpl hx7Y5AmAiVfw1Cd8BguX4IlT+NwjfWEXv7BL3tqVH53aLy79Z7vuQ5p6OU25 nKF64tI+8hju+8Luec13vZZ7Xtt9X9RShvVKhvWiI/KSL+6sO6baGVGcFrY7 RuU18pNkgRE8P1Oon0ngZ+T76YV+OhFLJfBXCPzUYmCTEBlIiCzwlQskgpUB vxRBUByxMgd4jSg84dECHFgVUAmbFwACNuHjdN9vskkwLbL4BRZ95RRhsEwU SEkYJKGcJoEiASiIzw8Aod+EDq8PofBEuMGcLhCyCXxPtUZiCdeZLdqUhChH anxijNWko+YGq5VCOMO7cTksdig1HJgVRM3pCuFSs4IJm7A5AWtcJL8okWCV 5Je5J9T8rhB6eFeoH7aHhbD9OcF+CCbcYD9eyAqbrD70w2IK/ESAIbG2sLTE aHtKfEJ0uEEtIc1dWPmi2IRmGbWMD7+VTilQS7lk4pmA7Q9wp5Hz6cDNEJWU C5BiM1PZQPaEiMqC3MOl+Z7UmJToMItGLOWw9PTkBKR72PSlx+3Jtlfs39F0 uLinqRpN8YPttZh1QvCEcp0Md870twCYnBrvOTnaeWKk/fREN7IJtnWdn+09 M9UBYDI/1DDTW3N2qv3UWPNYe9VoWyVQyVT34fmBY8AmgCTAKdjT1VWzf6Tt cFV+tk3Ns6m5VmWoXsBKCVceK97eWrWn7eCersPAJvu6qvN7j+7vPrK763BO Z/WujkM7QbCAh/3H9uKcLhC2dcEZ2ISEMJKRXAgjWArBAgpGmWABBdkESQSn CpPmLrxmTRTjyoSub7MJgsm3qWSSrqTMoN8E802QTVDoOiF4QkgESx7MdqyP j88x7fAkrp1UTEi5hHhVsOay5q0w34RY5sl70nYVgIglnK+FhAJnKlqRZhNY w+eSccSkiQvY5F++PPjX7x5SVZJVKsGXU/RE1x1IuxRhAeyYIp1aZGoWXAz3 /+jgwLIFoRU0niOekAYqfGcEE/SeYP3ln7/c/bcfHsD12LVF6AZ5hEQxkuoJ M/8RyzGrBZQl5pAxUnNBRwwSEA4lRiohTnl4lukxwXyTv36CN7+66TfZPDaP zePXj+ZD+Qf3ZeV64nzJYa54XYpVYlMFp5gF0eoAZ7R4j8u822H0xkpiNQF7 7NqmYsd02/7F/rLTgxXnhirODJSe7D1wZqDw/FDRxRHqNh5g4fpM5fWZiqXp 8jWCzd+oa1NloDUvhAXu/039et2EqSsbaUNg2dAvT+JOMBEecxuvjhZfHSm6 TKnk0lDphcHy84Pls80Hho/kNBd4dsZrMm2KnCTT1lhNjEwZLVNGSWURYpFN Ko7RKpPM+miDQicO1cvYkWGyxGhtYozOahRFRIuSUjSZDrM3WZNiDE0V+7kk /oWK4KZIyUlHxI2tifez4h+6ox84bB+zNJ+y1B8yVe+8ijdu2VuX9I1T8tGj +ETkVnyh9dgjeeKWvrdrvngsbx3my3bTi4qt/+9/ebPYtK+uJPNgvqtolz3P l7rTnlAVJepzh13Miniw1frOZ3jnEH2w8166Q557Qh9n8p54Rctu+Wu7+l26 7plb8dQth4fPXDJKTtkzh3TZKXvulL1wrOglrTdO6ou9tkte2iXP7dJnGfIn GYr7aYr76cr7ds09u/Z2uu5GmmYpRTWRahtJiRzJiB60xzQnmctsijyTIEns H83fYhJt0Ym2yIVbpKItMqm/VOYnlfpJBFvEnC1yrp9SEAiIB/ggpKZdsYV8 joTLlXH4CrZAxAlCy7aQuxIpQolHcQefZhOOYEUiXiBeuUZCTgCK2CtEnGAx L4QBKStsQldqWKvyF/P96GQWSpgRKRIEi0gIC80m5NNJ8ApJWqTlh9mLEilH p5eFmTUxseGpafEJiVGmMI1cIZTJBQqlSCTm4JRgFBM9AoNWpnXhPjGPrLks NNiPHbyFUogfAA6Iw/YPYvut1F9AHD9QMNefG+KHP4tgNQKeJJUwfzT4TYx6 GchkkBt1lKUdeQ2TNzHjRiflhanEIJNaZNKI6AQfgUwQJOL4K8UhGhkHhCGk RrUQntIpeAYFNU0i3qrb6U0DNokyKbe5ko0KkYTDUotCI/QyrYQNAjzZs9UJ qirc3dV4eKC9rq+1trelZqizYaS7aay3ZXKgfXqoc260Z2G8b360a360k9JY x/xY+8JY+/HR9kvHB8/N9i4MN8/01y8MNy6OthwfbFgca5kdqANIGe863NtQ MtpxaLLn6FRvzVhn9XBbFWqwpaK/qay3qXS44+AuT7RZGRShZYfJAi2KIEeM prlyd9fRAz21hZ3V+xpKdnYe3td/LL/n6G6gkvaDO9qqtrdWboN195FcNMUP NewnbIJIQsRkE6bPHdaEPnAGF5ZLgDsAQGAfbSkETJgRJ5emmpbm27GzC80m K2Byqvfm6Z5bZ/sw4oTMEF6FEaqVCxe0O36OOE2Y47nWiySeMBu94CX4Qlhj sxB1S7/qT19jZsdkExAOEH59d5EZuci02CPFoLAagjf2hB2YA3txTaIGsZ2M IBIIqATYBAQsgwONcfMfP9xazWS8TMwaa/JKSLcVMZITHMDvg5ZzksNIbOyk 0kHSG5mpJSQ+Hl6LNhasquBrseSBfxr8RcgOaF1HuzrswBo2f35/HecAI1z8 85cVfmEGOJIoRuacLnwrLJ2QBEbU733js3lsHpvHH/rIccVuTYtwxRkyotSp NnmsgWuWslItwnCZnytGWpAduStd54wU2CN4reXuseY8AJMzQ5Vnhqh8xnND ZeeGS84NF1+gwKQUwGRpumJV/3E2Wf9a1HoM2fCyDed0bRjIuCGbbKgNUxpx kBf6UBBM4HyV1hUQ/CbDJReHyi4MlU835o/W7m4p9OYkajMM3Kwo5fZ4XaxK GSmVWsXiCKkkRqVINGnTIkzxZmW4WmDTi+LDFfFWRbRZYtFy7TbpzlTT3rSw HRGSLHXIAR2nNlpxwh153hdzLyv2xfbED9sS33ujXmeYP2dqvmSqP2eqPnqV HzyKD275B5cM2AT1iaFln3zZI3+Xof7sMX90W6+7wp+XZP4///T8fFtRQ2n2 wXx34c6M/Vnpez2p1XGyPrf5Ypbtfrb1jdfw3in55BK+9HKeezmPs/hPfeLn bsUbh/Z9hh7Y5Nk6NqHwxCEFAEG9oAVs8topfekAyZ474DLlU4fqiVv3yKm9 lwFgormZrr2Vob9tNy4kmqfjTOPxxpEEU39CWHeqtccRXWJT5uh4dnlIrIBl Zm8x87ZEyQIVEir6RCr0E3K2iDh+MmGAShIKt7UyfrCMHyrjsWU8jpzHUXA5 WOlANuFzAlb097DJelQRcTdgExpMAihrCZ9q4pIKA2SiABJhvya/nskmbH4A iMtf280FYEJXPVjwJeUKvtGkskYY4hNswCaxcRHAJiq1RKkSA5uIJVzCJmvK Ilg6ITtMY/svWOZvsUngqthBW7jBfrS20BUTf+KOJ4SCPzifG8DjsOAs5FGx L5j/IheEKDB5UxiqEXMAT7QSrkEpAPoIN8iiLGqLXgr/lFI+9Q+qlrIRT0Cw VoiCET30Mi4QCpBIos2Qv8NTnLdNKxXB++ikHA0F+1yzWuRMigQ2Kc3fUVtZ gFTS3XRksKN+uKtxtKd5or9tarBjdqR7fqx3bqRjdrid0giodW6Eyo4/M90N bHJ2untxnHLBHx9qODHUCFSCmu6rBTAZaq0caC4HNpnoPjLSfhAe4rmnvrit Zn9/S/nRku2pUUq9xN+sCAyTsSJUIVV57t5jRe2H9jaV5zSW7mqryuurpeIX sXQCbNJcnt1SsbWvNo9M60I8GW48QComTDYhE7rWEMqGU4JBGMhIjCf4EOsm 1OjgqSYcI3yRHiN8dbYV2ATABHTrTN/t1dLJ42vjiCEkeJFpikcwIRUTYJNv 4cmnp+cwIB6LKXAmLEMqLChs62Ka3+GMg7nI6GAAE4AUptOEiSSMMEeSBX8B IyDRYbGmF4tpDCHh8mg/QXs+2kzWuE7+8vY60wDCFNOEQkoVzM9lMtEv7/mv M2d2MXPkSVg8jt5CtMGCCGaOMAcaM/uv0BiC4EBMIiQwEagEyYVe3yQQhF+Y +Vcg2ZFxYdjHhWiDbw5vspkLv3lsHpvHrx/pkWocDhxrEMSHCeNN/BgdO8nE Nwn9Mmyi/ZkRO1I1rihhVoJ8rrvwRH/p2eHKc6OVZ0cqLo5VXp08dGWy8vJ4 Ody9MyomZb8dQ34jpHwLQzZGmFUfyhowWV9M+e1ssmExBV0n6J0nM76ujRWA ro4BnhRfGSm5NFJ+cbh8oa1guim/ozSzwBVuN3E9VsnORH20XhmukljV0hij Kj5ME29WAZik2DRRelGElm/T882qEJ04QMn3c4pYB6yKIwmmY/H69iTTvDfm Wm763ayYB77I1x7rZ1/En33WPzmNX1JU33lU33lpeVRfKCnh/Mmj/IR44v2q V1nKVz7le7vmkzvss9d2xxu5XOj9H59uXWgrqinwlO+252cl57uT8xxJ1fHK HpflfKbtblbEK4/hrUv2ySN56eM9z+Q/zhY9zZQ996jfOvXv7canLvkTmkqe OqWUHJKndkrP7JLljBU9p/XKuVJAeeFULDuVz5yaZ07tI4fugUN7x667RRVN dEtpumtpurPxupMx6rko1VSkciJaM5FknnFEz++wD7niG5Kt5RGa7XJ+cjAr hrVFzvZTCPzlIpZU5C+GszhQLg2SCwLk/EAFPwgk51PNXWLhCjvA3TKyCY/N Av29bLKmm0u8EZvQwYsrYCIXBSskwUppMG2EobUKJkw8gU8HKgnlsUK4/qSh CwslSCjIJiJxqEZLNXRFRoUlJEYmp8RE2Ew6vUKtkQKeSGV8viBkDZsw/SPo EyENXcyhW2QMF3sjNiE5KaCA0BVx4E0CtrADt2ATFxIKdnnxaCsKk00QTwRc FvwOKikXBPCooKkEBDQBZ4AUrIzYwpSJ0aaEKKNZJ5HyA2WCQMQTpTgEHkp4 LJCUy1LwqbnBUg7LIOclRRqBTZqPlhft2SYMoTq74J9eL6PGStgM8m2uZAyL bzpS1tda29N8dKC9Dksn432tWDoBPJkdXmWT4TaKTYYpNjk+2gZ4cnG+/8Jc 78mxlvmB+uODDQtDjXOD9TP9x2YH6mABJNJdV4TVk7HOauCUvsbSwZYKUF9T aW9TaV9zWa4vziANCFeGWBSBeoFfVrK5pWpPS+WexrJdrVV7AE+6DlPzhLuP 5ILaD+4AMGkqy+o/theQhMzswuYuYjZh9nSRLHhSQCEVE2ItQTYhSYvII8zL cIAwsMn5iYZztCMedXm6+dpcG47qQja5Q0/renR1jISbrPLI7Ms7c6hXdykw QTYhDV0bsgkmMCKhIJtgajzswBnWpIby3fPLmDBC6ABYA70qJNAEIYWwCTN4 kThZmMny3y1TpnLMQ8RuK1IrwQXe8FOlDdoyT94HGQcN8sRygo1hpA6CJQ9m TAmTetYP7CW3/aT7i4wCJtUW4klf4zGh+6kuk+Fd8Oy/fn//f/nzYzhj8iOC DzO1BCCCsMM/fYY3AcYB+gC0uQo8gpsgWBPfCnrwsZ2MzA0mE5Ix3wShhhAK Gk9g//e+8dk8No/N4w99pNlU8SZxpIYboQ6N0nFiDdwEEz9OFwp4kuMwFW6N 3pmm9cZKPDHixcGykwOlp4dKz46Unx+ruDJZdWvh6NJMFQhR4sYsqOzGbOmN 2coNtZ4+vnUluZiwyW+vsBBrPJkY/C1dnSxbr98OLGTCMBE8XBovAF0dL7w6 TuHJ5dGyS6Plp3qKj3cU9FdvP7o7eVus3BMh2p6gjo7WhYcrzWZZuEUWbhKb 9XyLnh9vkcaZxfEmYbSOY5ayDPwtRoH/4TBpX4p1xht/MjP+wtbEm1tjb3gj XmRZX2VaPnkM37m0PzqUf8qQ/jld/INL+YNb+aNb9aNH9YNXDfrRp/niVn52 r5RLCJu8zVS9z9J8cuk/ukyfPBH3vVHP97v/+8vLt/sO1pVkHj7gLdyRUehL z89IrIpTtTvM57Ki7m2NeukxvHHK3rvELzIFy1nCx9mSp1nyZa/2jcv43mHe kE2wdLKmbvLCIacM8g45gMmyU/PUpX3i0t536O7atTfTdUup2isp6otJ6ouJ 6nOJqsUY6YxVMBbGHQnjD1ulI1GqE564eXfcjDd52pfalxZTE64t0sgipRyj MFDF95fz/aVClkTIEgv9pXwUSyxgCYQsjpgVKmXR9pNfsAk31P8/xiaERMTc kF9hE5kwSCEJUclC1fIVVzh1FnyTTQBMQMRpwlRgEMUmMjnPYFRG2IwxseHx Cba4eJvRpFaqxMAmIJGYExLK2hBMyBzgNQUU5tytX2ET/GLBdDcXFk2ATXhs fwATThDTCP91pDA2v620dYlCZBI2NZeMF0h1c0k4IAk3UC4I0Ul5ehkf2QTO ACYWvTQ6XANskhQTBguTRiQXBgGV0GASIGT7gYBN5DzKnBWmEuI51qLZt9Pb UX+opabCkxqDOYwKfjDWVlKiw3Kz7JjGCPwCeNLfdoyJJ1ODHVRn10jnSk/X KN3TNUr1dB0fbT053n5+tvfSQj/lNxluBDY5Sfd0TfXWwHlhuHG6rxYwpLO2 ACAFNuHc31QGgs2RzkOddYVD7VW15TtTIhVmRZBZHmiWBlgV7NIcO4UnFbvb D+2lSyeUxwTZpOtwDuBJa+U2WGPpBIWlE6YdnpkOT3IYmc1apG6CSALCqgrh FGzugtfCAnkE8ATYhGmHB+GC6u861X3rbN/dC4MPLo88vjb+9Prk8s1pDDRZ RZJ51Ot7x5lsQmYIfwtPcC4u5sWTGbbIBTi9irrm2UUyvAsLKNjchWOHkVAI mzCrJEzvPBNYqB4tmgjgU5gjeZlDcYlj/ae3KxO9cNgXYAj2mOFD0IrZhKKn r61cBCs29JvjpzP9KfhCMmSY0Aopl+B7Yu8W7jPN7wg18Fp4CFTy7z8+RLsK afr6ZQr8LYQIUjQh7nUQLBBP6MtuIvswfyj8fUi72mpJ6BpyDbwzrNF+ggWU 3/vGZ/PYPDaPP/SRECaJNcCdMN+mYVtVwVZloE0V5I1Tl+emtlRtq8hN2pqk 9MVJ3dGiU0Olp4ZLz42WXxivPD9WfmWq4s6JI9dnK2/OV92ar7wxV34dqGSu 9NZC+c25/zQ2IQDyLTbZwHKyrm7yrZ6ub7HJhgb5DYW1EjK5i2KTiQNLEwXX JgqvjRddHSu+PFZ6abTsdG/RYk/ReP2ejjJvgSvMFynMjBZHpRjC4zVGm1Rr 4ilVQWoZSytlxWjZqWZRqp4bIw6I4vnZ1ez8BP1JR8RFX+y17LhbW+Pub4t9 lBl+z6l95dO98Wk+uuWf3bIfPJKfPKKfPaIfnArQjy4KT37wqH6k2eQ7t/K7 VZsJ0Xuv8hM85TV9dBrfOy0PPJEv8l3/7dHZ5+MNTRXb6su2l+52lWba81Pi y2MUzemms1kxd7fHLLuNLx3y13bRcqbwaZboQbb0UZbyqVf3yhX2xmF55lE+ 8yieexTLdGfXsgvQQ0ZpHZssO+TPHPKnVEqj8olD/cipfejU3rXr79j119P0 V1K05xNVZ2IVp6LlU5Gc8YiQYUvQoDlo0BI6YOH0hXFmkgwnHbYzvsTz2Wln fCnzjrjx5IjixAifXhbFD9QHbVEFb1Gyt6h4fjIe3L76Cfl+PKFfqMg/UOLP kvqLaMc6YRPEk/8/6iY4FkwqoJzvCriplgKehCCbSFaKOGt7uni0AR/rJlgr YSabwLPAJrBQqcWWcF10jAXABPAkMsqs0yuATbQ6OQjYJDDo63CtNTElGw4H JvOBv9pPNmITMriMIpRVCeAHDPnavkVg5Gvv3OqOHGBEzqPwRBBEg1sgZcnh BMgoduCC1CI2CDjFrJNEWdTxkQZkE1BClBHwRC1lA48AlYg4FJgApGjEoTrA UgUfzkAiEXrZ/l2+0Z7mtmNVQCgJEQasmikFQQY5z6IRu5Kj4ILS/B01FQe6 m470ttQAoQCekM6uyYH2VTDpnB8DtR8fQzZpWxhpOTnWdna66+x05+nx1pPD TSdGmucG6wFMZvqPAZjgAtgEeGS86zAI/SYDzeWjndXAJn3NZT2NJbsz48JV VN0kSsNWsVnZKea6kh3N5bmUL74qr/3gVzbBIV1AKG1V2zsO7eyt2YOxjMwc RnTEEzbBBQETrKGQKcFIIlgoYY7kIjO78IVwGeLJpakmEAETQJJrc23wkPKh nOy8eaaXySaIJ4RKkFBe31spmvyWugk2biF94JQq5gRdcotOTaZaDTpBNiHR J8RUQkonzKlfZOYw0zX/NYP+5deRWRhoiGyCrVzEtA47SEYAIP/w/vZqjsld bOIiRROElx9ffW3Q+vXmLmaXFHGCkNei4R0xDUsVpHsKPfIkcnF9h9U/fb6D 6e2kp4vgDKnaAHRgWYS0YCGkoHUdm7sAMejqyR2cNsz8dyGBJsRKg7UVfBWy CT1AGL4//JtuzhDePDaPzePXjkgNFxWhDrVpQlPCJdkpprri7MGGwuHmAmAT b6wEtD1FfWq45OJk1dWZ6ivTBy+Ml12ZKqfYhJr6W3lrvvzmfBmAyc15YJPS m3NV6/V3sclv5JdvtHV9c8LwGv1P1k0InjADUK5P7gddmzhA4clE0RUKbUrP D5YCnkw17e2v3nZ0d1J2rNRh4UQma23JGnOUVKsP1ShZBrGfQbAlTRWSaRR4 ZEF2zpYdkpAjscaxnc4HWdH3PdZHHuuzLOuzzLDnXt3rTP2HLM2HTNUnn+ST R/DJxfmQEfQuLeCLQ/bFKf/OpfjerQQhnlDFFJdijT66lZ886i8e4wen8U2G 6b4z4uVux/9+Y/7ddBuwybGSbQXb0wudKbvjospilA2pxlO+qFvZ0Y+dhmW7 7EWG6KlX+NgnupctfZCpfELNAQt7bbcsr2OT5y75mroJ4skzu+KpXfHErnyc oXyYobqfobmXob2erL6WpLqUpDoXrzgRKZ0288cM7A6Df7fZv98aNGgLGYpg D1hCu/QB09HyM+nmi07bBbvtkiPqkiPmXJptxOdoSowpMWq2S/gZ7MDYUP9o boCG46fk+gkEflyRf4iYFSQNCJQCcfxn+k1Wbry/4YWnJ3RRbAKSiwLl4kDp ak+XGF3w/CAhj0pdpMwmvEAyuBhu/kNX2QSpBMQXBAUF+8HZYFRERoXFxUck JkUBoYSZtYAkGq0M27oEwlAmmzABBHPhmQUU0txFvCdcHiBS8IZsgkYYVCic BYFs6lcKWqkErfzhITJhKBE9GRgtOYEKGRfYRKXgq+nAd+zpUsOZRhLNqiMe FgaVANgEeATYJDnWnJZgTYmzxFi1gCfAI/yQLYAnsJDDr8oPBOgANgEBm4Sp hEAfjYdLgTVaayuBQTRitlIQDAgDzwK/RJmUmRnxgCeHivOajpQhnvS3HRvs qEdT/Hhf69e6CYNNAEzmhprmBhsXhpsWx1vPTnWcm+xYGGo4Mdp8fKQJkARd 8FQgY/cR5BEAk5H2g3gGNulvKe+qLwI2OViQmRaljFCHRCiDjSL/xDBR4bbU uqLtzRW5nYf3dR9ZGR2MbNJXmwcPAU/QEU/C4gFPyDzhqY4ynMeFwYvEEU+i 4Um0IqmbkOYupv0EeASZBQSL86t4QiommHKCeLK02AVscuf8wP1Lw4+ujjGc 71+7uZBTMAj+t/hN3j86jU9h9QRHVzHj/4gB5Mvy13oHM+gENwE3kE1e310k A4SZoYprZg6vvM/zr11VZLIW8YCQCb1w/m75EhrhMeKEjBHGoBPmJGFgEyQO cidPIuCZlpM1lRSmtYSY8TGEEX4Z/HEwmRFYALjj3398iOhBPOkorIkwffR4 PeEUwkQERkj/FTZ0IZhg9QT7u/C1xIOPX5WJQkwvPGkVQ8E7fFk+9+npmd/7 xmfz2Dw2jz/0EaMXAJiEK4LN8sBEi7hwR8pgU8lU58GR5uKe2j0VuYlZCXJf nHRHinpxsPDyzKEbC0evzBy8MFF2baby3mLNDbpiQqiEApP5kltUJeXgGv0W 1lgDJmSHCTi/XoihxnxNb6CrjGnD6zevMfTrxRTmgnkB7CCeUGwytX9p8sC1 ycJrk8VXJqgrr00ePN0HbJI3XLOzs9ybm6JMNQTEpWljU7RWq1CvCrAoA+KV QQmygGwle79ZVmlSNEabpjwpp7Y6FzPtb7IiXrhMbzPNn3fY3vkMyxmSFw7J d1tV32crv/gknz38z27u9z7en7eJPjtln51y0BeX4iuhuJQ/OhVEf6L1yaP6 6FJ+dhveOwyv04337dYXuRn/9dbxP50ZbK/OaSjfUbgjo8SddiAxrixWVZds WHBHXvNF3k/XPs2QPc8QP/EIHnmFdzOl93yKh27tssP0MsP8xCl/gt1cTukT h+QJbTZ5mgESP0unRCwnT+yKx6AM5YMM5b10xa005c1U1aU42dko0byFP6EP GVIF9ilYvXL/drNfty2w1xbUbWF1h/n3GFndev8hfdCJWPmlVNO1dMstR+TN DNuFGN18esqC0z7vtA8lxh/Ra3cKeW5OcFion57tJxYECESBbEkQWxIMEhKs WDunC+gAbsuDOIIVUWyyoqCvol/4W+Z0rSpwVSyJwB/v2JFNVsCEG0jIiEuP LGZTs4tZGGVC2ASQBBQS6icSs80WbWycFcAkOSUG2AR4BMEEzlIZH/giIHCD +gjp48IzkAhGnJCiCYIJn4p9DAEk4YT4IZsAlayIH8DhB3IFgVxhEJeadUxJ KgxVy/gghYSLCe8glZSnEHPwL6X+WF6QkM0S034fuZSj14jDdFKjRmLSSq0G hUEpQr8JwROlOMSil8RG6IBNUuPDQXE2fVJMWKRZpZGxBQBKgX4iDkslCRWH +pvpcdxAJUAfwCl6GdedEl13sKivtRa0O9shZgdpxFythA1sAucYs3qnN61s 387Dpfkd9Yd6mo8ySyfAJrPD7XMjHbTa50bb5kfaFkbaZgebgE1mBxqm+o7N DzWcm+q8NNsDi1MTbdQw4f5jMwPHxjqrp/pqgFZGOw/1NZaiF54Ck45Dg22V o13Vfc3UwK722gN7MuPClaEGoV+MjmuRBfoSjEf2ZTaX57YfAu6gHCW9tXnA I93AJjSJDDXsR0IBNkFHPGGT8dZiJpuQNJM1M7vWe+HhzJwtjIGMWEAhsYw4 qotEw5NJwrTfpBfY5PbZfiydPFmaWOnpWvWbkOrJt+Z0rc+FxxtvEnSOVAJr NKFgVPrqrf4VMh+YBMcDLGDLFhAHNnS9unMSZ3aRPEekmDV+E6Qb8imkdWp1 htXSahVgZfTuX97e+PkdVSUh0SeAKpjDiBUTNJ789eOdH15cxu9P/i4QVj1I xAmpyzCpBCACgAKH+iJxwAXwm3x4fIZ4YUhN5F+/v48AwnTK//RuxSxPzfWC Z7/cQUIhM74of8rH22QcMZNBUPQE4IvYmgUPMakEbfX4WVgoIbRCohuxmvPX T7fQUI9Tv7ArDGnl977x2Tw2j83jD33E6NjR2pBEM2+n3Xys2IdtzCMN+VOt hTNtRQ0HMnKSFdtjRduihYt9e+F+/vbxwzfmDsICzrcWqm/OH4LFGq0HE8Im a1hjPW6AyEuYF6y5+NcwZ933AS3NVK4XVTpZl+fIpBhmeApmnSCGXKK9KkvT FTgEAKsn6EA5O3vw1FTFmamK89NV56cqL05WXp2uvjhcen6geLEzf6Fl92RN 9tGtZjvwSKwoLl0dGcWLMAakWdjZZk6WLjBfHHDMIppJCruelfRke/ojT/xD R8w7n/adV/0W5FG9cSvfORXvHIpPLvVnl/o7l/p7p/qHVX3vVHzvlG8gx1q9 9oje+6RAMR/syg9Ow5PsiNvZtv/jwcJ/fXm+vsR9eJ+zfLezLNu+NyV2T0Rg vVM66zVc9JgfOsMfp+qfJGseOtSPXJq7PtV9r+KRR/bcJXvtki3bRc/swqcZ AkrplJ6kCZ6kCkGPKYmepkmXAW3s8pvpipsZqusZ6mtpqguJssVowVwEZ0jr P6jxH9AE9GsCekHqgB51QIc2pEMX2qkL7dJzug3cHlpDZuG4TX4iyXA2Pfx0 ivlkogF0JtUMD49nhM+nWefTIkdiLU06mSskKDnQX8vdIhZsCZBs8Vf4+alY Qn4ATogS8QIElJhsEszjB3MohdJaHecrWCltUKJpQkATyrdavLB8gCLWe5Rg Ne0dQAMXuF6T/whIgjACeBIcsiWU7U/wJMysQTCJijZH2IyWcB1O6JJIeQJh KHpJADQAQJBBmDmJG4p4TLBigmzCDfUH0dUTPz4nQARfm4FyIj4gBlelEMgk HImYLZNylQoBCDalYraEnkUGbKIQsmX8EJBcEKoUcZSSUI2CGrFlVAtjrNq0 uPDUGHNarMWZFBllUCh5gRphiFHGk7EDZAKWUhxkUPEizYrEaENyrAnO0eEq EOzolVwRx18QukUpDiaTu9A+b9KIwrTi+EjDrmx7a/3Bo1UFzbUVztRomSBQ KQgCigE2MSr4GfHW3Cw74ElDdUl73UHAk/62Y2g/mRnumhtqnxtqo9U6N9SC AjaZGWgAzQ83nRhvOTnRCudTU+2wmBtumB2qB00PHJvsq4Hz/EgjMEjDwd0A I7g53lHdV1c81FQ+0lI50FBaU7g1JVxK+02CdXz/eKNgry++rnRnXcmOjiP5 XTX7u2ryu2v30YLFXlp53cf2gHrq8nrq4LwbwQQ00VYy3VlO/CZYIiGWE0SP Dad1rRe+FicMn6MrKQgmzLaumye6bi/2gG4c7wRUgYcPzg0+uTT67Mr4qxsz r2/OrtGLW3MkeBHZhJkLzxS5e8d5WURoM0FwAMECb86x+QqZAoTTrtAHAeyD KPT67lc8QR5hBqBgMQV7w5hZ88TJQqYE4wAu1A8vrv3wgrKWYK3kz2+WGO5y cm8Pt/qXSXsYqcWQNirmHDB4LTZrMZPfUcTBgQUReId//nTn3767/08fb//8 lurpwroJZSf5/v7Pn2//+cMN0F8+3fqHL3dg8af313H91+/v/fW7e/9Ex52s lFEAgt7dAMH7kEm/pNhBUAXhYs2sLfSe4JkupgCw3CEtYcRpQtgEay7Y3wX6 vW98No/NY/P4Qx8pVnGCieeMVRRuT2iu3D7cVDDbXTHTUTzfXTbfWdJYYM9N UeyIE+2IAzbJh7t04BG81f8VNrk5d3DDti4kjtsLh4g2ZJMNyeXXceZvssn1 2SoUUgliCBpSVvq7pn5hol8jwBCsjyCJYN3k1vwhHJgM+zhD+NzQgStTVZcn Ky+NV4CujFdcHau4Nl55Y7zq+ljlhZ6Ck825c7Xb2vbE5NpCE2PEGUmqtGhh mjnUa2bvDmPvD+N0xSpmHOFL3pjH25JfZCc+c0Q+y4j44NW896opAZi4FDSb yD+51Z/d6i8gmlBWpfjilK/XZ4dsjYBN3vkkhE0eZ1mBTf7PJ4v/7e3l5orM mgJPya6MA67kXXERB2KCG9zKWV/YJV/4A2CTNOPzdNNjt/6hW3sH2MSnfOxV vHDLXzmlQCjLlAVe/MQuepwufJQmfJgqvJ8ifJAqepQueZIhf+ZQLTvUy071 jTTV1WTZuTjRSRt3Jix4XB8wTIMJqF8T2EezCYBJN8UmQR264E59SJchFNRj YIP6DJwhs2A6WnEiSX8ySb8QrwHNxypOp+pP280nUsMWks1zybbpRFtLrHWv TGAKZokCtrC5W0KlAcFy7NT6e9kk8D/AJqRqQDapbHRhCOERpphsgh4TAZ29 GEKFJ24JCsZwky1SGTfcqgc2SUiMRDYxW7TAJkqVWCTm4HiuNS4SppHkt+AJ ihPqjxPMKDMOJwD+XlgIKD97KNAHCNmECqAHGIEdCYcS/ZSUznCh/nZe8Fcw AUnZajnFEQaVwBamTI42pceFZ9kTMjPiPcnRNp1MzmGpBcFAKApRILCJVs42 60QRJlmMVY1skhClB04BPFGKQ6hJ0QIWsAm8IRV0ohIgmKBXJTHalO1Obqop rz1YWFWSBw+VwmCMYgQ8gbMvPS5/h6eqcHdNxYGO+kO9LTWYezI31kPYZH4Y 1Low0nZirGN2sBFEtXUNNQKMgBZGm05PdyxOtsF6qr8WqWRmsA4gZaL36GhX 9UBrRU9jCZzh4UxPTe+xIgCT8fZDQCg9tYVFO9KMomCzlGVVBNlUId4EQ1We G5il9VAe4Enn0b2AJzShUGwy0FgA6m/cB2DSVbu74+iu9iM70AuPbIKjuvCM hEJKJ3AmQSfIHeh835BNsN2L2dAFbIJnBJPrCx2YwIjCuJN7Z/ofXxx5fm1y PZiAXtJFE5K3SMIWN6ybIGUgoaAw5QTxhKyxhoL38wgjhFxwBy5bGTu86ouH M5IInDHPkThNSF4Jxs2T2V9YjsGMeIwswVzFf3h/9+d3dzDTBNjkpzdLWC+g 8WTlZv6Hl/ANLzDbtMiwX9IBxYQURBhs0yLlEuKgZ7aB/cP7mwAm//L57j+v XkZtAmt8vgMMggJIQU758d0SCAiFAhbAHDruhHR5/fXDrX98TxHKn6iSxyWE CCKcrMVc4wVkzjAOFka3Ow4HxjwUfBb3seCCNRfkGtDvfeOzeWwem8cf+vAm atIjJdvSjZV5aXUlvs7DO2e6y0/0VywOVp3sK2suztidKt8RL9wRJ1js23tp vITc6hM2Wa8N6yZAIneOV6PunjiM2hBhNiyR/EoxZZ02YBMmpDDZZH3pZENn yhKdQU+avrCh6zq8D72DdZPVGcJl1ycqlsbKr4yUXAUNFV/qL7jYdwAW57v2 LtRvm63N7C1KKsuQpRlDM0wcbxhnl1VQGCmuiZF1puou74i7viPufqbtqS/i lc/6xmV+5zJ/9qg/uZWgDy7Fe6f8vUP2ziHDnTX68i02WSdgk7feFTZ579A/ zqTY5L+/OPd/vb/aWpl9rMhXnuso9qXtS08oTOTWAZtkmi9n2e45LA9TDcvp YY89xgdu3S2v6q5X+cCjeOaUPc+QLMPCrXjikj92yB5mSB+kSe6nSu6nSR+k yx6myx+ky++nye+mSO8kic/FCk/aODOmoDHgEeWWfsWWfuUWUjHp0QR2qyl1 rbAJ4klwlyGkB/FEH9JnZI9YhTMxiuMJmuMJWjjPJYgX05WnHfqTabqTycbF dNsZR9x8lqMjKWqnQRnDZyvZ/mI+SyINEf89bMLmBwCbcPn/QTYhHVyEUESi EKEohLAJ8siaiglqtWjit+ph9+fyAtUaMRnPZYs0AZjoDQqtTo6ZJvDlQ0JZ wSH+TBcJEz3Wd3mtqad8HdUVQpVLVrrOeIHkDNyhkPFkEo6MMrbz1UqhTMpF Lz8IyAWfwrR3hZCtEnPVEh4I6yZU6UTG0Sv5QBCx4Vpgk63OJG9a7C5vmisp Ui/hKrgBgCcAJoAnammITsExqHgWvTg2QgNgkhIXlpFkhbMtTK6RhUr5/huy idUoj7Fqk2LCqsvyAU86GqsPluQZFQI0pOikHJUwOFwryXYkluzdDnjSWlsJ VILGk5Hupsnepqm+pun+5tnBFiab0GDSNDvYAAyCGAJgcnKiFSAFiyOIJ8Am wx0HgUdg3d9S3llXCHgy139soKF0oqN6svPwcHPFWNvBziP70yOUwCYAJnBO DBPnZyZU7HE1Vea0Vee1H96DeNJzjNJgUyEI2KS3fm/3sT1dtTmdNbtGmgvQ bILCecKIJMQRjw4UMpJrvetkjUhPFxUHv1oxwenB2NCFfhNcIJhgFOOjC8Mv r09/i01e3ztBbCbIIL+RTeCOHUEGJ3fhm+CVzPIKmf2LDxFPsEPsw+OVLHic 34WdXcwERmKKxwIKSXVEWiHAQgiFHsZ1B/AEqGQlbPHtdcbErWureAK3+heJ /wK9HiSFZE3kIo78xf4xbLvCa0iyIeEU6uHb6395s0QVTd7fxAFfVJfX66s/ wWWfb1P1ke/vAZ785dMtQBIAkx/eXvseAOHttR/hE99d/+sqngDa/POnFQFN wHemR2ldIGHupFZCrCjENsJ8CgcOk1leIBz5RVzwgGnfPb8AZwxw3GSTzWPz 2Dx+/cjz2XxJ6l1Oc2VeavW+9MZy73RXyeJg5ZmRg6eHytvK7HvS5dvjeFuj 2Sd78y6MFmHFhCqOzB+6ffww4Ml6MSsja7SGTTakGAIgTELBl695duPXboRL qDVsQsRs9NrQOE98JSRfEsCEGX2CbAI6P7D/ykgR6OLggfMD+8705J1o3znX uPVE647JGndfWdJgRWp/WXLDbssOY2i2mpVnCj2SoOh0mKZ81nO58Xd3x93a HnHfa3jqNbzJNH7I1L/3aD57VIgeH13yD04ZsMl7h/SjW7Fen1zyT851cm2g 117RG4/4k0P20aECNnnoCwc2+V9vTf1vj0/WFblqCjxluY4ib2p+WnxBIv+o UzGTZb2yNeaOw3o/xfgkLey+y3DPrb/p09z2qO665I/s0qcZkkcu5UOX8oFD ed+uuJcuv5smv5Mme+BQ389Q3U6RLSWILsfwz9vYZ60h02FBEwbWiMZvQEVR Sb/Kb0Dt36cO6F1BkqAudXCHKqgdpA0AdegCOvWBXYagbkNwjyG41wBsEjJo 5kxEihfiVSeTtIvJulmHdNYpXbArTtjVJ9P1J9LNC2nWSUf8VGZ6uyd9H9zP C9katp9GGPTb2YT4voFN+LzA/3Q2YSIJk0rIhC6MXMSHcLFMztNoJZFRYQAm CYmR4VadTi9XqUUAJiCJlMflBWErF2AIgRomgKwHEyabMDe5dJUEY+tFNHTI pVyxMITUTUAUg8h4chlPLAqFXwbYBOspsInGE51cCNLKBEAocgH8FMFyUTCy CaBEhEGeHGXKsicAm2xzJoHiLVoAE60oVCUJBjaBMwCIVs42qvkRJllSjBGU HGtKjTfDwmqU0teEru/pwp4xYBOfPb6mqqDxaFlv+7Ft7mQFP9gg51l1UimH pZVwosNU+3f5Kg7k1B0s6mo8TNq6RjuPjXfXT/Q0TPcDiTTT4Sbt88PNWDqZ GaB6t7BQAngCYIL9XYAkVO9WzxE4A5ggp8BDNJhMdB4eaipHNoEF4MlgY1nl HpdVEWQU+RtFfpFqztZUS+H21PqyHc1Vua2HcjuO5HXX7uut299Xv6qG/FXt 7WvI663dM9x4AKkE8QSLJsgmpJUL27oASdBFgpyCU7k2ZJOzY3Xnx+sv0DyC rVxIKMzOLnSdMGPigU2eX5sEPAG9ujFDBGzyatUIT8ZwfUvEaUIQA0RMKMxY RiIsoxCowRgU5BQspnx4dBagA+cM44RhZmIjyZSHfTJkGEkEW7mws4uwyerm 9b+8vU2C4P/y9gbDz351NcEQdJWex7t2MBdzmBXBE6wEMacNrwmR/+qaf3X1 h+eXfnxxGQgFm8Go3+rFpR9eX8VuLiAUOGNzFwohBdjkR4aB/a8fbwOV/OuX e1SHGA0UQBzAJl+Wz4GAJv70eqVKgiUS0sSFIINlFBCxzzPbvQjI4Ht+9/w8 8A4iDOj3vvHZPDaPzeMPfRzab89xmXPcYZV7k+tK3d01O48PVJ4cKD8zUnVm uLy9wpGXAWzCyY4OPtGz59xwAbIJ3OHDrf7dk0c3xBNSH2GK2dBFNglurKmw rMcQJuCQp76BNn+DTQieMN3xhE3WN3RdXrWTIJ4gmCCboA8Fw03ODu4HHe/O Wezbc6p3z8nu3IXOnbOtWyfqvcPVGSOH7V3FcY154e0F0QPlyX2lCR1p+vpo SUeCfMIddmp71LXcuHv5Sfe2W+5mG55mapcz1S99yneZync++Sev4pNH/tEj /+CWvXdJ3zsl7xzij27Zen1wbSj5er3xil+7RR/tUmSTB14LsMnPZ7r/7c7M sULnSk+XM2lPUvSBBMFhh3Jma+SVHQl3XVH30iyP0ix3nMY7HuPNTP1Nr+a2 S/HQTg0EvmNX3rYrb2UobqbLb6TKr6fIrifLbqQql5Jkl2JFZ2zck5bQ46bg BWPQmI41omNhHxdNJaxeNQubuDrVQTSVBLepQlrhrPVv1/l36Pw79axOQ0C3 IRDUSymozxg0bGHPxIhPJqtOp2nHXKJhJ3/aLj3uUp3I0MwkaycTdENJ5jF7 TK8zqTrWkqUSRfFYRra/hPtb/SZr2AS1cv1/Rk/XmiauNTGL5IwLuB7YRKuT RsdYklNiQJZwnVojliv4coVQKuMLhKF0uWQFN0hb19/UhgUUPv6N/CDkESAO tVII6EGhCp9CFdDKUzKeVMIBPJGs0goFLGKOWspjggnV30XPKwOa0Cl4VOlE IwY68KTGZDsSvakxWx2JzkSbUcbTidlYN4EzsAmWTgBP0GxiC5PHWNVxNi3Q CjyrkoQgnuB7YvXEopeGG2TR4Zr4SEPuNmfd4ZLulqPtdQcj9HI5L1ArYUs5 /noZlRoPn16Qm4VxJ1g3GepsGO2sG+uqQzaZG2rBusnx0da5IbSc1AOSAJtg 4xasT021n53tAjyBzeGOgyOdh+ZHGhFV4Fm4prOusL+htL++ZLS1CvAEwATW wCbdNQVpEQodf4tesMUsDUyLkOd542qKshvKdzRV7myr3t1Vkw9s0t9wgO7p OtDfuA+FbNJ1JKe3Zs9IUwH6TWa6KnCYMKYxAqQwc+HRbPI36ybof8dMEzI9 mMzmIrSCNhNgEyro5HgnsMmDc4OPL448uzK+fHUCIOXF0tRXSKHndKEXngS+ b8gmTAs8iTUhw6mISDIjs4yCYII2ExBuUufH5wBDcDwXxqDgtC7S3IX9XSBk EPSeoK+EGrRFb65hkz+/vvHzO6pogn6Tn95ex+4y2qV+edVwAWSxRJcJbpEB vyv9V4ysE1I9QZs/SXvHp5h1FkIxyCagn15fI4O2vkfR9RGqREL3cf308SZA CgrWf353/cfVJEf8rH+k28MoQqGGd90hLVj0sN+LiB7Yx0XKInAZLIgnBZu1 kE3QsUIS5LHCAi8HzIF3gwvIUOLf+8Zn89g8No8/9FFf7t2/LTLXE1a2O6G5 KnOkJe/kUMXJgZIzwxVnhsvayjPyMmQ7E7jb49jznTlnhw4gm+D5/qlaYJP1 +hU2WeM3+ZXaCoEXhBHmQ4InG7781sI3wYRpPAFtOLxrwzCUy6thKMgj2NmF Q4PPDOw71bd3sTdvoSPneGfubNvW6ZasySbfRIN37JhrrMY5dtQBJNJflth9 ILptT3j3vqiRksTR0uSrO2Mu+MIvZYZfy7LezA5/uMP2JCfycbb+cab2RaZ6 2SN/7pa8y5J/zJZ/yJS990lB7zzid27RO5fonVP40S355JZ8dlH6siogkfe/ TTSbCJFN3tl1D7xmYJMvc03/fne2pTLrWJGvaEdagSt5f3pifoLgkF05nR15 cVv8bVfU/Qzro/Twmxn6Gw79Vbd6yaW64aQKJY8zlDftmhuUvV15JVl2MVF8 Pk50LkZ0KpK/GME7bmHPmoKn9UGTuoAJLUUlw8AmuoAhbUC/2r9H5d+p8OtU BXaqA9vVQCXBrRSYUGrT+rXr/Dr0/qBOA6ubwpOAHhpPevQB/cagCRv/eKLi TLpuyCUcdPJnHNITTtXxFMVkrGw8Wj4UremzqdsjjQ2RhjKLyicPjQry+7vY JJTHotkk4D/AJmtc8HjltwwmTCpBhYRSQnyAC4SiEImUYzAqY+OsScnRwCZm i1alFtFsIhBLuFxeEOngwjFcOCIYISUoeAvtW/kmmzBbv0BCNL/zAhFASLMW BrJg3WRlX8oFyRFJYIESU21dShFlhydSSdlyUbCcxhOtnGtSCcO1kkSbISPe mhJpssdZnQm2SL1cLQiW8vyRTVSSYGATvZILGGLSAHcIkFMserFZJ9LK2WvY BEsnQCWwMOskidEme3JkeUFOXXVxT8tRYBCLRioMYQGeqEUhBjkvTCXMzIgv 27eztrIA4AXjTkY6jiGbTPV9rZsAm8wPN2NPFxAHNnEBhsAZqOTMTCcQCuwj m2DHF5ZXgE0G2yqBRHqPFQGVAJuMtFAPB2haKc91RKo5as4Wg9APXSeVe101 RVl1pVubq3Z1HMnrOZbfV79/qLlouKV4qKVgoGk/sklv/cqoYTgPNexnNndh 4gkJYSThJr/Fb4JsQuLgsVZyfaEDGAQJhdRNgE1gnzR33T3dd//swKMLw0Ao Ty6NAqEQPEG/CbIJGdL129kEoYOEnpDiCKmhkKdwDZvouMeJxFgTef/wLLZs EcM7s3qCBRTkF8QQ4nxHWllDKH95e+sf3t/Fugno5/c3kU3o2sel1XwQwJNr OMYKe7TIWOA1Q4PXsAkiDDrfN6yb/Pz2OuhPL69QhEL7XChCoWsiwCbfvb6C AkLBMsoKmAB3vL/+p7dLP9AtZHS6/bW/vFlCO/xfKQi6hQ4RrIOQni7iOsGq B6me4JVrXPNIMYgnzMhFYrTHasvvfeOzeWwem8cf+qgr8xTnxO72mA5si6gp Su+r2zndXbA4WHpmpOL0YGlbeXpehjQniZeTxJ3r2IVsAvf59Jyuqgenj905 ASRymDoztDEyrCua3D2xMcWQji/mBcz1hhTzFYI2ajNbYzlZP7yLAAs2ca2p m2C5BKskK71bwwVzbTuBR2Zats+27oD1VPNWWE83ZY7VOoePZAxXpw1WpQxX pYxXZ4yUJQ0XJ/TvjezOsQzsjpg8ED9XkvIo2/Y4y/Z0q+2hx3TfoXnmM77a an7mUj5zADgo3voUb72yT1nyD17p+yzZu0zpu0zJW6/4jecXbAI88p1L8v2q Prjk79fpg1vB0MrD117xK5fwwyqb3PdQbHK3vfDnqyPNFZlHC9z7shLy0mJ3 J0blxfEq0+VjvvDT3sil9Ij79ogH6ZarqZpLqaqz6fKLGfJrGbJbqbI7yZIb Du2SXXMlVXU+QXY6RnjCxluwciYNgZP6gAld4JiGNaz0G5D59Un9+pR+fSq/ Prpi0qNmdalYnUr/DlVghzqIYhM1skkoCNkE8QTYpItmEwCTflNwrzGozxA4 ZuUCm5zN0E/4ZKNu8YJDsWhXLcRLx62C0XBBj0HYa5IM2PSD8eEtMaZ8DT8l 2F9Kx7WDgE2ENJsIf6VuQg/15fAC+NyAVTahLBgoEeEOOPMpYaiihBodHCL+ xdhheuYwJ4C3GlbCo5IWV7QhmwQEgrb4swAo/AFMlCohCHgkOsYSFx8BMoWp YUcq40qkXGQTmjVWiiYrlnbaY7IRm2whIhUTph0eAAT/RqyPUL8PJwC5A4sj Mtr5jnO6AEyUyq9zukBKuFLElvKAMoKBULQygV4h0in5CnGIlMeSCQKBJoxK ygBiM8jNapFByg1TCuMt2oRwnUYYImL7IZvIhQHoOgFIMai4NIwEww4SCgCL WkqDCd3TRRdNhGFasdUox86xSLMqPtKQFBNWnL+9puLAaE/zgZxMnZSLMfEa caiMy0qKNO7b6a0oyAE86Wo83NFwaLD1yEhH7WrppBHwZG6oZX6oeWG4+TiV ctI4M1CH9DHec2Si9+jccMPiZBua4nFnoLVirPvwzMCx0c5DQ+1VsJ7qPgo8 MtpaNd5+CAgF8KSvrhjYBB664wwqtp9eQClWzy/amXJov6emKLOhfHvrodyu mr09x/YBm9AqGGw+QONJfn/j3v66vZh+Ahqs34fDhFFYN0E2wVnB6+d0kYD4 NV54jGIEIZtcnm4mHVxYKMEaCqyRTchUYcCTe2f7H5wbBEJ5cnls+doEssmL W3MIJmSGMAEKpr2dOT14zZCuNWxCMITZu4WbGNdIHPSUHp0jAfE4p4vYScgA YSQUzEDBnq6f3qzkKqI1nsaWK9+/QHgBLf387jYa4SnXySfKk0687cyervVs wsx5JykqOHMMdkhVBWeO4cM1LWF/enWFMpu8u/EjPZQMIe7PtJcEeISwCYjZ 0IV+E2CTv5C3oid0oXvlz6+/9m5hyQMgghjeyQ4gBmwCm/zLd3fRWoJmE9L6 hbQCC6ywYJ8Y072ymQu/eWwem8ffPIYa9zRXeAq3Wou3WeuL0rqqMyfb8hcH SgBMzgyUdFe58jJkmdEh2bHs6eZt54BNpituw93+/KG7J47QdHAQdPfEobsn D949WXVv8SDozvG1DELIgkDHvZNHQPcXj4JwveYpfAnhGuab/E02oWo38PXo fjNco0GG2dYFC9iHC4CzqIz4qXLcp6Zy0a4TrJisoApdNwEkOd2ff7J7z/Gu 3Nm2HfCDDB5xgubadx7vzIXNqaatQ2UpoOGD6aM1jpFaR3d1UlNJZFtxRHuB ZTDXNL3deC7bdDcz/GlW5NMs/dMs3XKm7jnIp3np07zyat56Ne+86g8e5UfQ Rm73jy4F6INTvmb/s0cFeufSgt64tK+dGtArp+alU03JpXnh0iw7VM/symdO 1XO35qlb+swtfWlXvLRrXtj1t33hV7MiHvSW/fujhbpS16ED9uLc1DxHVF6a bU+isCxd0ecwH3dHXbNH386IupseuRinPB6nmE2WnUiRn05TXkpWXEmUn49X n4lRnoyUzVmEkwbOiCZ4UBnQr2T1Kf1RvSAVpXZVUNs6AZWsV4c2uEMXjKO6 aAV3GYLbtawOXUAXsIkldMjGHY0WjMUIT6Urzzo0pxzauRTFSKyw18brjuB1 2kRdUZKeJE17nLI2XFhjEeSyA9QcPznXX84LkHJZIo6fkO0v5LAEXBbQB49L VTHoPq4gNtyZ84PI1FyS0kjZw2mhEQPrCOvnbmFlBAcFU3mOq/Hu5OafTOvF 4VpUFPtqpWPV/UERCg4QBjbRaCWWcF1snNUaYYCFJVyr1Ullcp5cwafiSFbr HSSvZMP2LcI+OPUL2YSQEXw98s0FNJWA8G/EKolaKdRpJJT/fXUkFzwll3NR MilHJgFagf1QMT9QLgpVitgqMYCDwKgSg3BGFvzyCn4ghrkDHQCYqITBIIAF 2LFoxDQy+CsFARox7Acq+CyNONCgCDVruDpZkErkb1KFRplFoGiLOMIgiDZL QVa9AK7RSoPMGp5FIwzXiqw6aYReFh2mAvpwJNqOVuQ315S211fZE21yXhC8 uVYSYlQAoQSnxppK8rceKtndVlcx0FHbU1811HJkvLNusrt+urdhtr9ppq9x pq9+dqBhbrBxdqCeSjPpPzY7UIeuEzjPDtUfH2tenGhdHG+d7qmZ7j4621sL muk+OtV5eLztICwmO6q7juxvrdyDzV0UobRR0Se15TvDFGwlj6UTs8zKkMxk S2W+73DhtvqK3OZDeV21BQONJYONxUONRUNNB4abDow070dhAuNQw34MOiFZ J9jfRZLiSXMXARN0uxMRjzwIeOTiVBOACRZQAEywjwt7twiJgK4eb7+80Hbl ePv1U92oW2f7QHfODzy4PPLo6hgmntDxi8eZ0fAkXXENm2AQPBrbCW5syC9M MWcOEws8afqiaij3FtECD+gBDEJiUJjVk5XExqfnSRg9iVxElECawLAVLOXg HGNiCQH96/f3gUGwtEGi3hmzha8x4GUJiyAk7R3fHB5iExcGjsAHkexFdKlg DQUnD+OVVBDk84tkwDIZSrzynd9cxS6vlQLKx1s/rdpYgJj+5cu9v364BWDy p5dXfnpzjZhBaI/MdebIX3xInsXKCKAH+kqwzsKcEowgQ96QFF8QW0C/943P 5rF5bB5/6GOgPrejOrs8JwbYpPZAcuch30Tr3lMAJsPlwCYdFfa9dvm2eO72 BN5kYzaVez5TeZNKMDkE+ECXQqpAFKGcqAI2QW1YAVnDHSgmm5B9JpsQEllT RvmVlrCVWWGMGWJIKCBkEzwDkqyZgUy6vEjQCXDKhdGic8MFZwb2AZcBmACD zLRsH6vzDRx2wA8yesw7UutZ6MiZbd0Bm7AeKkkdKUsbqUobqkrtq0jqKY3t Lo4e2mcZy7cs5pgv7bDc3mp54jM/95qXM/UAJss+ABOKTV7RbPKOZpOPNJtQ xLEqJpggmyCMrMEWRBKKShzqlw71C4fqBfIIyKF67lIDlSy7Nc9c6idu6VOX 7KVdSbOJ4bYX2MT2bLj6v7691F69rabYU7HXke+KOeCMy0sSl6Qpuu1h857o a87Ym/YowJPFONWJBNVcqmIuWTYbJ5yP4MxbQmfNgmkTb8LIGdWGDFLhif49 cr8+ik1YvavqUbG6Vaw2ZWDrOv1dbALq1Ad2m4L7LCEDVvYgfIFEyWy8aDya PxzJ7bdxgE16bPyeaElPjAzYpDNB3RQtB+XxAjVcPxnHT8rxl3L9JTyWmO7v +u1sQrIaVwiFTxGKQLAxmxAxst0pJAEwIdN6SYGD2YVFyw/ndMGrFEoBkIgt 0hgXHxFhM5rC1FqdDDaBTeBMxbj/chIXqZWsc5R8ZRMEE7iGuFoAUkiKimi1 lQvNJtivpVGJ9FopCPCERJmIxSEoCTAFzSZyKUcqDFGI2cgmWhnfoBTp/z/2 3vO3jbRr87Qk5pyrisVM5ZxFkVQOtiXZyjnnLFk5Ouecc2q3c5CcOj35TfPO vDs7wAAL7AIL7P+yp+pId1fT7p5+MR+e54MKF27cLBaLlP2lfrjOdQ6lw8GI Vr0M8QQ2gCHxbho4BeSmtUAToCib0WEGhAm36iUgYBObSeqiFbEuvYuWOylZ jEuXGkdlJdsyk9icFFdeVrQv1R1p07BGDmHcjDLKpvNauZZccLekSDYt1gl4 srsgE9BjfqJnpKcBYATBxE2r7SZ5rNO0tygL8KSvbf/ceM/qZN/B6YHDM0NH ZodPLI4CmPCEMnZqZRQFVAICPAEqAWFvrrOHxs8fnrhwePLMyghQCeAJCNnk 2EzPyfl+YJPDU53Lw02LQ41r423rE+04nHF6oDY9hjErdrktYi8tyYym9hWk tu3L620oGe2oONBXvTBUvzrWtAYar1ufqDs4UYtschBejm1JOIcxBE9Iny6C J5cPDhIwEfommJe/fnQUa7q4Db/Hwi1S1oWbu+cO3D47DXjy4NI8sgmOiQc9 u7X+8u7htw+Pbw9hDJ26GFKLhQzyJXcIAyZkH9LIK2RPPoXFXfCNOH7x+xdX kU3QLiEFXQRMuJfbmCOc4U7yIJj1EE5UQRoiVwrHGiJTECEsYEMt+BROOQkZ v4hsglMLgURgjxyEF5McCrk5mYGCQw+Ry/D3/PxrP/0igfLPPzz6N6Cb7XZh XKuuP3wLePJv3z38l1+k+B+gkEqwvgvRgwTh8WJSx0UMEfJZNFDIZaS1MtLN 3/vBZ+fYOXaOf+hjYaB8ZaSivy4T2KSvOmW6I3h4ourCctPV9baLiw2TzZn7 cky70zQgePa+faT50ekuwBNYgSn40EfnNp50fXuhc0sCMCHcgRgS4pKEnMTz 5IwQT76s8vo134SYI0KvhEvo8y4JOfngVCfmZUjzLtjgS0SSG4car6zWXlqu Bp2cLAP6AAGYHBsrBjCZa8+Ybk4Zr0+YaEg8OJi3PhBc6s6Bda4uZakpfaUt c7k1fb4xcXF/9GKl93xl5LWqqG/3Rr/eE/O+LOpDkft9vgPZBMDkPScOTD5x c0zYH4FN8rbA5E9B+s/BUDYBMAlhE3LyY8D6kTdKAEk2/cwGUkku/TaXehug N/Ksm/m2d3nW1wH6dcDyNmB572Pe+2ybOa5v8mPuFsa9Wu3+/354MD9QMdRc 2FEdqA4k1eYm78s0N2RbZnyu0/kJdwJJ93PiH+bEXc1yX8x0HEu3HIzXrHol Bx0Rh23hq1bxCiNapkUcg1DhC5bweUsYwAhonsjK6Usw+U+xybxTMu+SAJgs eqRLXg5PQEfiFAejZauR0rUYxVq8ejlOMx+tWow3LiZZFtKssynMdDIzlUQD m1gBTBRhRkWYSRVh0oiMGrGBi5CIfieb4LyPX3AK6AswQTYhdgk+8/OrTMgm aHYI66+24yFbfYNBRnh0d5hdbiYu3gNsEhvndjgpC6WB88gmKrWYFGUR24Vv 2LXrizhJeAiYiCW70E8h9KTVSfUGubB8i6G0ACOwApvgTBN4SVs0XEGXXq7X STkwMcrNZiVtUVtpuExnMSiQTUBWowrwhDWpbUYlBj1orQSoBGAkxmHOiHej XQJCMEn0WhM8FKMTgwAcAE+cFrmXVSdGmqMd2ji3IS2OyUl15GVHBjI9/nRv WV5yeX5KSgwNbGIzSYBiAEzctAbuD3eLc1GAJ6DsZG99ZcHkYOvygYGGqkIP o2UNHJ6AAIX8adHwbndzJZDL6mTv2mTf6gS3Hp4ZOL4wAjq1MnZyeQSFYHJy eejE9kwT1Om10bPrY+fXx86ujJxaHDwx3w9ggjq9OAh4Ajo40T7XXwd4gmxy 8EDX4nhLbXlmlFXuoSQOY0SMVRlMdtaXZ7fvzx9p33ugt3puoHZlpHF1tHF1 rHZtvBbYBAU8cnC8HsBkbbQW8eTwZCMOPSF4goRCpsNjJ+EvC7qEL0k1F6zX joyASMwE55vgimxy9/zM/YtzACaPriwK2eTVvSPvHp3gxsRz+nnqIgmwk0En JMYekj0Jyb+HwMuXDgs28iIfROsEvujT0y08wS7BITxC3BMuHb9xi5RIkYIr gh7CYfE4/5H8ZvxhGA/B0STEKyEZk63E+nZknlgzJGyCX0Rqusg0RliFgxqF zYSRL7BgjLgwBGdAf/7IVXZhCAXWfwIuEEx1/I8/fssNSfnDt//+w2MhmxDE wMz7Xz8AT13/64dbsCcDFnFkCRmJIuicfIdETgiVkM7DJIzz937w2Tl2jp3j H/oYbwuuj++baM9r3R3bWRE/2pS9MlR+Zr7u0krzubnasfq0qmzjnnQt6PBw wd1jrUAlD0528GwyyHfK2mKTJwI2+Wrh1ovLg6AQEiFnvnpSiCdCt+U3fBkQ 8UfQLiHmCLAJKe7Cky+vjsAFaJcAj8Dm2aVB2Fxbr7+8UgM6v1B16sDuk9Pl JyZKQUAosB4ayl/ozJpsTOrZ4+ootQ3ui1ru8S12Zc+2pc93ZM63Zs43Z8zU J01VRU3tdq3tdp2sjLpfEf2kImZjT/SHPdGfyrwfS1zvt0q57B94AZh8zme/ y2d/4mRFMPkzDyZ/DnwFTIRsgif5xsLmD0EWtRmwbgSYd6g8K+hNkHkdZF4F 6Fd+CgRs8sZPvc+xvs+xb+a4H+fF3i2IfzjV8H9/uDU/UDnUXNS+P1gTTKnK jK/IstRkUxM5zmPBuKu+hOsZ0TfSvOcznCdTmeVE3XykbNYZvsDsWrLsmjWH zVnC56jweSpinhbNM+J5q3jWKgLN/FJfFnT9p2q6lrzy5UgFLzmCCehQjGw9 SroWJdtmE+1irGYh3rCcTCGbAJhMJFj2qcSMYpdZGWYGMFFFGNURwCYmrZQP xXOJEjXOW9RIlBqpTiP9KpuQiYQ/62tswmHOL2ul+OS75NdE2GQbKwAcwuAj NKNzuemoaAewSWJSFLCJ00UDlSCbgMgseKGEbEJy7qSai+AJXzMWhr8QqESn lxmMCrgnMggKMISIq2HTyhBY0EwxGRUmk4Ki1FZGa2cNTrvJ7bRQRqVFL6d0 csQTFLbGAjCBf3zYpMU6y/MyC7KT4DwQBICJ16oHQgE2SY2xuWk1rRXZjDIA B4eFc0PiPcakKEt6PJub5gYwQTYJZkaVBpP2FqXDxs2oLJpwj1XlYTS8dIAn cE8gIGATX0pkToq3v716carvwEhHkS/JZpQDmESyOsCfKJu+PD99oKOmr23/ /HDH0mjX4kjn0mjnynjXwem+o3NDJ5ZGttmEoxLUiZUhpBKMvcMZYBZgk/Nr Y2eWh4FNjs30HJ/tRfcEwAQJZW28bX6gfmGw4fBM96GZ7vnRpone/fkZbruB L+syS1I9xqr8lJbKwGhHxUx/7fxg3fJIwwpotGZ1rGZtrHp9vAYEYIJsgngC Wh2pATw5MtUUQigYPAmp7BJmTK4cGsKMyXUeRm4eHwcSuXNy8uaxMRByyu0T E4Akjy/MY9/g+xdm712YFYIJFnShaYIFXbxpshWEx4IuJBRkE+EoRjKNkVgq XxKKsI7rN6q/SHvhLY/mxRVgExCp7CKTTUjTYEzB/2XztjCDj7yA5gUBB3yq /2e+2xUmXMgPxpIqwi/okpABJViahcyCLgkaNAg+ZEVgIa26iLdChO/+POtk u/cXlnthgh4pBk7+5dPdP32885ftyq5/4jMp/8qXh/E1XVtgwvci/gWVYOUV znznG23BPwI3nYSE5eEkJtyxUov06cLuXnAGi7tIuRdJzfNTKW//vR98do6d Y+f4hz56a9IPTuyf7y/r3pfcvie2vyZ1rqfw5Ez1heUmYJPxxvT9PnNFph4E bIK+yTabDPBjR7Zqup5e6CY1XU8v9oV4JYRNhDASAiwET4RXflnoJcQTgjNC IYNgEdfTiwO4J/ETYX0Xosrd4203DjVeP9gAGzhzZbX2wuI+oJJz85WnZ/Yc myg5Ol4MPAI6OloEbALrWn9gqTtnpjVtoiEROAX+ZebaM4BWxusTOkqso/uj FxuTVqrj1vZ4LuyOvFed9Hpv/Ns9sR/Loj6UeT+UujfLnBtlzg+FDg5MCuyf CuyfCzgw+S6P/SmP/QM37X2LSv4SoP8KbBL8RTUXkkiIY8INZMw1vc9jQZug oHUjaH0XZN4GmXf57LsC29s868sA9TzX/NxveRmkXwWoN356M9u6mW3fyHY/ DsbeyY+/MbDv/9q4sTJaO9pe3llT2FCQVZURX55J7c9mhrOdyzlRp9OjzyS6 Tsey67GmxUjNuEcy5oiYYMOmqV0HTLumTOHT5vBpiivZmmEks0AWrOyAVQKa +qW+iiH/KTZBCdlkLUpyMFp6MFaxFqsgNV0L8cbVVGYpwzafxgKbjMWZanUi RrGVNzFzBV3hRjXHJjoNxuG32UQr/f1swr0rKN8S1nEJa6W2z/xiArtaI0UP BWu6yMxEdDRE4jAgBZvd5PFa4xO8QCWgmFgXsAlFa01mFQguUCh/MaCEAM6X 4xeRTbbj9uEEnZBK9AY53A3uaaE02AoY6SOkT5dRx7kqwCl8iZcZwybIJjYr nDECntDAJjoZsAnKouX26JWAGH5Ee1ait6W6HPDEqpdF2YyxTgtaJ4ASiV4m 1mnCmi5gE6tezBrFXlbFg4knLzuqwBedm+4CFfsTSgKJ5fkpuwtS0+JsVoMY fRNgEywhw1Ix4J0YhzHRS+8uyBjvb54d62qv3+1mdJRGBGzCf4UkI94JJzsb 9073Ns0Nti1whMKxyfpU77H54eOLQ8gmJ5ZgPwDi8IQv6CLjTo4vDZ5YGjy7 Ogpscm519NTiIIAJmiYIKdx+aej4XN/iUONMb83KRNvyRNvscMPqdEdzVa7L JHeaxB6TOIqSFaR5Gsqzh1p3T3NzGKuXhuqWh4FQqldGq1dH9wOecIQyVot4 AkIwWR7aD5wCL4FQjk43EzzB4IkQT0L6CeNYk+tHRzkeOT5OBi9i3gSoBM7A ii25nlxafHpl+RGPJCgEE9CT6yvPbx/EsAn6Jp+enfv8nEvBY94EYQSnKGI6 HoElZGrJl3jy1YBJiG8iLOUSlJBd/fT00ocnF2BFfff8CnAKCMPvWOjFQQqP JEJrA0uwEEyQGtAZQQogCRT8duJZCAvAEBOQShBbSJYE/wQCPng3/GPhvJBQ iG+CzgjBEyEE4Q/DejAyif5v/NRFEFfQ9SO8fPBXuAn/cbgY2ESYNwkJmyCb oP0h7CSMbxHrBFkDo+7kDOZKhJ2EhdmTHd9k59g5do7fPlr3xAObrI/vG2rI 6tgb112VONUeODpZeW6h/vx83VRLVm2ArswyAJscGSm8eagRJw8+PtP97CLH JlwKnteziz3PLnU/v9wDCgETwhq/ISGevLwyBCJsgkgSkklBPPkqmwCPfKnX 18eQU2AFPMHeXJiCRxi5tFx9bb3+1pHmM7N7AUlOTJUBkhwZK4IV8AT+dkCS Y2PFIIAUYJPVPj+cRLsEVoCUof3RfRWeA40x58bzXyzXvJmueNrme16Z9K4i 6buyhM+lsR+LvZvF7o1i19sS19tSF7DJxwL7R2STfPb7PPYHDkzYPwatACZ/ CXJU8jdehE0IhoCEHgqeAW3mWbk4SZ71bXDLKCF6lcdwgxED1Et+QuKrXPq1 j9nMZjeyHBtZnkeBuDv5CRe79vw/7+8dmmwda9/bUV3UkJ9dnZ1Skm7e52MH slzTaa6DCY5DUcya3TBlU4xZJb1sWB+za5DeNWbZNWneNWUWT1kkU5RkipZO M9IpkFWGmmS3NMHKxjlg+d9ikwUXp0W3DGu6tsq63BGrkWJgE8ybLMaoFmLU C/GGlRQa2GQ5yzmbZptMpJopsU0dTqkjeDYRcb6JWmzkkiP/CTYJLej6dTbZ zr9HCCaY/NynlzgmIf1+kU0iRFwKnpgm6JgAmERG2R1OCjt0AUoAUxD0IBVc ACZfTldENsF0ibDSTMePgyRgAuJMGT7njpMWsVUX5t+5uYoWDfopdtboclBc Ct6sBFFAKGZgFjUn3jfBvAnNDYiXw4bhGSQpkgVYAGoAGMnPSsxNjYH/C3gJ SAJsAivvdJhSoll0NEC0NsKiCbOZxCkxdDAzKj8nJpDp8aU5gU0KfXEgIJTy /NSi3ITkaNpJyT1WjYviwASEvkk8/Bva9JmJruwkT2tt2dRQ2/Rw+/7ygEkp dZiVWNkFNFSYk1hXkT/aXjPZ3TA70Lo81rU22YO+CbAJUAmvIWQTwBDMm+BE eG7e4hJ3/szKCIDJ2ZWRM8vDZ/g4PIZNQEAoJ2DPj19cHmmeGaib6N63PNl2 eL53qr8mN9nuNImchgibJjzZpd9XmNpVWzDSunu8Y+/CQM3SUC2wyfLIfmAT FDDIoYkGFOIJiATksb6LDIsnbBKCJxiNRzC5yQMIiEvEb883IaYJGbmIwxYf X1lEHkE2AT3izzy9uYZZeMybfPj2DNKHMHIinE4SMi8+JCMf0p6LREu+mjcJ YZMtX+bFVcAQWLG4CwX7z88uI6SgjcJ3GL6Dz/mkIbCwmzFmT0gmHUeWEDrA oIdgysldUhJGqsJIbATdE+EFKEASnM8CPxv+FpKFFyZTSDEYkgtXuMUXmAln oxBhky4UP3vx/l95LELI4voG//jNf/n+EfomJCdC2IT0ASbeBwbhcSVz5P/4 7trfPt4WAghaMMIEfYgv8/d+8Nk5do6d4x/6aCyNBjA5eqBusj3YVZkAmmjN XR8pPzlTfXaudro1p8ZPYU0XPJYDm9w73oZxeGCTh6c6nl3sRT2/1Itg8uJK bwiSENYQvgw5KSSUV1eHv8QT+LqQWEpIB7CfX17YwhM0UEDPLw9t3J56dW30 5dWRZ5cGgUqAQe4eb7u4tB+EiZLLKzVAKMcnS9cGg4AkoEMjBaDDo4WwrvcH 1vuDh4cLgFAOjxTCyeMTpefnK2GFk1dXauCf5c6R5utrdfcWyp+uVL2b3v2s JftJaczbgqifypN/Kor7sTDmc0Hkh0LPRqHrbaHzTZHrYwHHJp/yAUzs3+Vz YPIjsEnQyrHJtmPCsYmfY5M/AJsgifjNP26TyA/cnmeTbaFR8iZAv+ESJRSW bz3LNYOASl7lW18X2V4Vsi+AU3zMKx+zkW17l+V8m+V9GIi7lZdwpqXk//30 8OhU20hzeWtl3v7c1Ors1MI0c5XP3pvhHElg5yKZBadx2qLo0YX3m8P6HBFD TtEwGz5iDhsxhE1tDyWBzQQj3dI2jwg1zUimGTGvrYKuaazpYoWScQI2cchm EUycIOm8i8ubIJsseTnHZCVKDlqPkqxFile84iWvZClavhKvXUsyzsXo5uON cyk0sMl8hmMqie60SZ06Ea3ZYhMub8KPidepCZtIVDqJ6gs2ERIKealTb/Xs 0mgkX2UT3JAJ77yBIg0Jv/+yN1c44YvwiDCtTmqzmTwea1y8Jyk5Oj7eEx3t 5IPwJorSAEpwYxy1EoQdhUK0ZZQA2kjCOBjhJQc2+Xku/BabcEVcfLQEqUS3 vTGZlHxTYi5IgrMXt8Yp8kYJ7K182MTKZ0+wZxeyicmkMBkBZOQmPRCNjIHr jUrgEdakBlmNKlg9PCYkRloTPIyH0WHwBNjBIA+DDYCJi9JgWVe03QgckRZr d1qUlEbE6EWUNpzRh8e5DcAmednRACb+DDfmTfKzY+CkL9VTlJtY7E+Mcxud FOKGxs1oI1muYVeci0r00nFuS7TdALftaNgz0tOwNN3vpo02owwE571WbYzT BMAy0Fw11LJvort+caQD2GR9qhfwBNjk2MIgiDdQgFMGOTzhwQSoBAfBw8lj C/1nVoaBSk4vDQGhXFgbO7s8DFRy9ED3keku4BTOTJnrOzrTA3gyO1g/2FK+ PtO1MtW+dqCzozY/yqpy6iMYZZjXLN/jj2+t8vc3FA81l8z1Vy8O1i4N718e 3r8ysg8EbHJ0mgu/A4MQQoH98tB+EOAJmclIEvEh1gmp70I2ucGzCTomt09O 4kt0TwBMkErINBNO22yCQXgAkweX5oFQnlxfwVZdWNYF2tzuISws6AqZcoK0 EpKC/7K9cEjsPcRGEZZ1wVd8fHoevveHl1f/+I5DD2wmDEjCs8lWQH6LTfgL ECJC2ARnqcAXkfDIf/3DE8ySk+Q7aQuMbgj8HpJJJ4kVgicoYnyQb8QNfB3+ csSTr2ZSEH/IJBQ4Q+rcsO0w1ndxXMPPXvyXnx4Dm3BlXZ/u/ZNg9uK/ff/w v/30BMS5J9+F4gOBFHISR8NjMy6MovB4AmR0FUPueB7tEpI0ITchs+N32GTn 2Dl2jt8+uiqSptvzT801rg7v6a5KBA3VZyz2F52YqT69UDvRmlUdpHdn6gqT 5Gdm9z483XXzcBM81T8+2/Pi6tA353ueXuoVqBsVgiHAGgQ3yEvQ62sjQooh 78J5EH5EUOsFG7gMgAVODn57vu/JuV7cACg9Ot0FK+y5yy4Pwc/DEYoYeH93 a/L93QOAJ6+vjz0530cSJQAm8EchnpycLl/p9080Ja0OBEDrQ3kAKbABMDl1 YPf57tLLQxUXD+w/u1B9fGX/0fX9xw7XnD5UffFY/c0j9XcO1T4+XP/8WPPL Yy3/OlLyl87cH2uS3++OflfieVPufbs38k25612Z81Ox81OR41OhbbPI9q6I /Vxk/5hv/QxUUmj7vsD6fR79UwGLiPFjwPyT3/yHbf2ZK/Gi/hSw/NFv/inX 9KOPl5/eUoD5IWBFvfdpPvn1H3N1G9mat9natzn6N1m6VznG1z7z26Bts9AJ ZPQ6aHvmo7/JZJ/6XN8EI+8Ho27lxZzPjz/mjzm5L/d/Pjh7fbxtvq5oqr6k Ppi4O927P8ddnemsjrfsc2nqrcp2i6LTKOvTSfp04h6DqJeS9rCybqe8yyUf sUlGWPEoKx6xikCjTARo3CoGTTC/0KRNPMGKQLCZsktAeIa8nHZIDzhloDGb bNyhmHSB5FMu2axbtuBVzNpFCy7Jske64pWueMSgVa/kkFd00BOx4glf8YpW o2Wr8ZrVRONMrG4+yTydSI3FmccS6LFE60C02W2UOkxym1FBacRc6oRnE71W osXh71qJWi9V62TAJlq1JIRNfk1fggnxTUJEirhIEJ4bdKhXIKHgQBO5AqBG qlOJzTo5a9G6bZa4SEdynDcxxh3tZr0OysEYaKPKCL9QEaGRh6ukYQrxLqUk TC0Lg71SsgtPwooXwHlYddumDzYZ03OVbNwEE4Qs0isYAMRiUjFmNfKF1ay2 UVo7rYOVtWhAcJ6Cy+BirdSokXCZd94lgZewwvUguN7B6PEj+Fl4Sw+UQamc doPbYXTbDTZabdFLGaPcrBUDmzgtaoCIWKcl3k1nJnhwJmNGvNtuUppV4cAa fMMuSXI0XZATW+iLy03z5KS4ctMdwSyAFFdaPJWRaM3PAXKJtBolTkoW7dDG ugzRDp2XVQOwuBhtrIdOjXflZsSV5mf2tNXMjvfWVRVbdFJKL3UyWjuldrN6 eKuzYU9PU0V/677ZkfaVA73zo+1L451r092HZjlC2erTtTzMpd15x4ToBI8n JxYG0DQBEjm/Onrp4MS5lRFgExCWdQGYYA/htamOyZ79Bwbr5keb5kYaAU/8 KS5GE+62yCIZZXoMvb84vaM6v7uucLKrcqZv/2x/1cLg/qXhmpXR2tWx2vXt gi6s4AISAWH8hKROTsy2AZuQoSfYswuRhFgnSCuXDw4CmGD4HQ0UNE0AT9Ax IR26sIfwk6urj6+sPLy0BHp0eRn2sOL+6Y2DL24fAb26e2zz8Rkhm6CpgWeE AXks4iLeBxIBQgGyBubfEVuQTb6alMc7oPvw/slZ+CKhX4NfQZLsIdViQjYh pVkhwRCh8SFsIAwbdE9IMdj2fe4Iq55IN10UGbyOSY0/b8JvA8SAv+IaCvZ/ 3gTiuIWD2vE+WEiGQRhCLqTxl7CFF6Zd0OIROjWElQgxYaYeZz6S8rNf0QOC J6SLF1ZzYSCF8AsZjEKy8FgYtlPTtXPsHDvHbx8tpTGTrcHT802Hxqt69ye3 lEV17I2b6QoemaoENplqz6nJY8oztHnxEnhch0d9ABPsvvvy2siTC73PLvdt C/Y9qBB/hMCIkEpQQooJeRfZhPgpSCKvrsL5kZdXhoFBvjnbA2eeXugHwUtY 4QwI5yfeONQIunei/dsL/YAkL64MP704AMwCb10/2AAwcm6+8thEyYmpsuOT pYdHCwFMFntykEo4W2SylCvlGisCZgF4uTff9HCl7dGx7sdn++9f7L91ofva uY6rp1pun21/fLrt2+MtL480vT3Y8Ga17rv6lA9Vce/LIjdLvZulkRvAJuWe t+UuLmBS7PxQ5PhQZNsotr0rZgFSkE2+L7B9l88Am/yYb/1xK/Nu+UPQ8sfA lrbYJEj9Ec4HLD9t1XFRoO850d/7GdR7v3Ez1/guR/82R/cu1/DGZ3iRqeXA xE+9y2M3CuzvCuxv8myvA9YnOY5vfK6Hud47ud4rud4TvsiDOd7De7L/54Nz V0Zbp/bljdcW1QaTSlLdlZmOyjS2MsZY6VDVMPJWs7zDKBswyYcsikFK3sfI uq3STru00ykbYsXDViLRMCMaYUSj9M8ao7Y0yoTz2CIa4xQxzorGWfE4Ryvi CZt4EvDEIZ12yKadcgCTCadywilHNplxy+ZATjGwyZJbsuKRIJuA1t3h656I 9SjxwRjZoXjVwSTDwRTLTJxuLtF8IIkej7eMxFmG46jBGIvXKLPppaxOxmgk 3JQTtdjIPZyL9PCgrpVqORNEzBGEVv772eTLUe9k4HuIQqgEfRMcUAJsghkT PGnSymyUzuugYzy2hGhXUqwH1kgn7WJNdlpvNWvgAgImMiAa0S6VFAiFE0IK CDYIJiih9UOGs3BgovkZTLBqixUIyAJFzhA84QLvBgW8xDPIMrCC4HoXawRC weu5C8wKltFYaTVlkjOwp+CkgjUrrSYuJo8FXXEuKsHD8K26GNgDqrgoDWed 6LjICaOPcDPKnBQ34ElWkgPYxJ/B4Yk/w+lLg9UdzPJmJrFeVuWwSGGNsmu5 aLxVBYTisnJskhzrADzJSokCKpka7hzpbc5Ji9ErI1xWuEAHoBTtsjRU5A+2 VwObjPc1Lk/3LIx1zA23rkx2HpzpPbYwuJWF59twHecdEyKs6To+3396aQit k7PLwxfWxkA/l3XN9h450A1scmiq88TiwNJYy1R/zUTv/tnhhsPzvZ11BS6z 3G4QAZskuPTF2dHt1Xkd1XkjrbsnOiumuvfM9FXOD+zjDJQRrnYLwQQFMHJ8 phVtFCzoQhgBNjk5147BE+zZRUYxkuIudE+4LPzRUcSTG0dHCZ4IwYSwycOL i4Ah3/ySUFBw5tnNQy/vHH1z/8TbByffPToFJEIYBCRMmgjPCyu4sMsWCZsT iwQ3v8YmcAcs5cI8C7AJdgnDWwlv8mX9GF5AMASbYpEyLWHDLjKmBB/j4eEf Huy/tEh4P+UOaWlF+OJLMCEXAIkAj/zhLfw7wL/GZVhhD5ACzEIe7NGaERIT +TrSxQttHYQm0piLjJgnWRWCOfDuf//L8//jz88wTUMi/EJtD1u5/y+/HFyC 0IHwRQyXkKkowq7CcNnf+8Fn59g5do5/6APYZLgh+/D4fmCTkcas9j2xwCbj Ldnro7uBTWa6/LX51tI0dTBOPNuRQaaowwP/q+uj317se36lf1uw70W9uPKr YEKo5M31URB5GSKh1YJ48uh0FwAIsgnoxeUhZBP0U0Dw8u6x1jv8tMSbh5uu rtWBbh9tAR55fnkI8AQ2QCsAGqdn9hwdLwYGWer1rQ0GEUaARIBHzs5VwOb8 QhXwCyIMXH9tvf7R4Q5Oxzq/Od3zzfn+B+d77pzpuHuu7cG5tmenWt8ca95c rduY3Puyr/AdhyTeDyXe98WezSL3Rol7o9S9UebaKHVuFoPsACZvi9k3v2AT 9mc2CVI/Bi0/8QxC2OSngBleIpXAW1sZkwD9/ZaY7wJW1Fs/DXqTS73ymV/5 TC99phfZhle5lrcBZiOfm2xCKr6+9XsfZrtuZTmvZDpOpdlW02yL6Y6FwpT/ 8eD83cXBif35g/vz6wvTSjOidqez5cnU7ijdXoeympa1WOQdJtkgpRxm1ENW ZZ9V3mmVtNkkbQ5pPyMeYMSDjGSI1zAjGWGkQ7R4iBIPb2uE1wAVPkRHIL/A ZggohpWMWMWwjrKSMZt03C4bd8gBSXgw4dhkyq2Y8SrnPHJgk+VIBZeFd0uW PZJVLydgkyPR0uOx8hNJ6lOp+lPppuMZzNEM63yCcSbeMBlvHo8zD8eah2IB T+gok5zViAFMrFop1zNKLTarJQaVyMjNduesBL64S6rTynW/m0242ip+/OKv 2SUheRNhKZdMHo6QAhsc3c5DSpiNNkS7rUgloMQYd3yU02O3AJgAswCbGAGg ZMAmu4BNAEwUYiSRcGKXwFsgOAkv8YwGfROeUODPNGhlZIoiDjHBRsE2q4EV 8AiSBRoi1m0/BUgEwATZBE4is+C7cMYI3KeXw8edVgOsFN9S2KiT0BYlQ6ms lMptN3idJhutpg0yO6XGLDywCWxwygkIS7zgvNOiMqvC7WYZsAmti4j3mPzp Xl+qOzfNA2DiS7PnZXsKfFH5OVGAJ8AmmUn2aIfWzSgAZLhoPKsGSHFbdcAm 8ZHWOC8DKg6m97RWz473ttVXMEYVpZc5aA1Qks2iysuMba8t462TqpmR1sWJ zvmRtuWJjrXp7qPzA3zwZPD4Qj9QxnG+lOtn34TPwh+b6zs+13dqcfAMEAqP JxfXx8+tjJzmo/FHD3QDlWyJn724NNEKbAKEsjjeAntfksOmj3CaJB5KlhZl ri/Paq3yDzQWj7SWjbWXAp7M9lUuDHJ4ssq3DsbUCbLJ0elmMoQRg/DYRhio hEw8wcoukj3BmSYAIzhvERtz3YD1+Dg6JgRJfgEm52YfXFggjgkxTR5cXIQV Xj65toZs8vre8Vd3j208Pi2cb0Ky6iRsghJOM9nqAPzsAmnhBfrS9RBKGDaB DwIQAZiAkIxCoivC+Dzp6wV7kkNHx4EUU4VIOHYE214Jx5ogtvB9gIFHbmIu A6DjTxs3sJNVCJggs4CATQBDAEYQT5BQYA8fJ4kP4uwIWxwTUCJeiRBGkJ7Q HAkpRcM6NNjDNcAmQCjc3BNeeKXwPtvdw+DfBH7wz38IIRQkL5JJCUESMgnl 7/3gs3PsHDvHP/QBbNK3P22xr+zwxL7Z7oKefUnAJiONGStDJafma+Z6gvWF NmCT/ATpZHMyGQXy5Hzfy2vDTy70vrg6sK3+F1f7UF8t3/oqmxCRC0BfDcs/ OdcLPIKmCa7fnu9DNkEPhRvavlxzebka2eTKau3llRrACngJvxk4BSu4TkyV AYmsDgQWe3IOtKUBcAGhwBkAFkCSC4v74Mp7J9oBZO6f7ACWgVtxAxmPtt0/ 1v7Nya5vz/R8y1kzHXdPtDw62fLNieY3Rxo/rtV/mqx41xp4WpkEVPK5LOpz eTSwybsC50aB80Ox5z1HJc6NYsdGsf1dEYv6WMBi6+DP+VaeTZgf8pjv/ebv uSCJ6cdc00/bgpeg72ENcPo+YOYUpAFnvuPEfA5aP+dxepXLvApYXwesL3Pp Zzlm0Auf5WUu9SaP3SxwbOTb3/iZlzmW51mmm2nspUTLqXjT0XjzapxlNomZ S3eO5sb8880TL04tTtaXdlflNZX7yn3x5WlsWZKFYxOnqtqqaKEUnZSyzyzv t8j7KFkPI+1kpa0OSbNT0ktL+ihxHy3pBzHSQRQtHaQ4DfEa5jVAR/TTEQOc RIMMSIwasoqHWMkwKx2xyUbtchCACW+dyKfdytlI1QLIy3UPXnBLF5yiJbd4 PUp2JE51LF59LlV/McN02Udd8Vsv5rJnfY5TOY71DHYmzjAarR8HPElkRhOY sUQ22ihnVRGMSmTTSgFPKLWEUkvNKrFJJTaoJAa1RK+W6IBN1LLf75t8ySaY 6fhSIekSEjDZnpYI+60OwDFeOyBJcpw3JT4SNgAmMR6b22ZmLVrGpKYMSr1K jLaIUsLVcZEiLjgP4iq4ZOEIJnhGy7cXI44J13rLoMRmXBhvt9I6oBI7a+SC JDyGAG4AhmD5FqwEPbgsybZ1gr4J2it4PVCJga+Ug7ccjN5O65BW1IowrOly 2Q0xXjo+mgU8Yc1KB6X2MNxkRrtJCSvwCPYTBjaBTWqMI8FDw3+Q1SB2WGRW g8hulqbHs8X+hPzsGF+aA/AE2KTIHw1sEsj0wFqen5yRYAM2gSsBTyJtmmiH zs3qol2WKKcZCAWUnRpdUeofH2ibn+wv9KeZtRIEE2AlD60qD6Z0cZVde4e7 qhfGOpbGO4FNVqe6jsz1H1/cKtwCADn+tZoudEaOzvQAnpzmCeX86ijgCUDK yfn+IzybcEPhpzqXRpuPLfQfmuuZHqgd664CLU+2ddYWx9m1Vm24wyiKYuSl OdHNFb6+hsKh5pLRthJgk7n+qsUhzjfB3lwk+Q5IImwgjFEU0rALPRS0UXBS PGETbNIFhHJhtQ82xC4BAZvgQJMQMHl0fu7hxcX7FxZAwCMET+6dn0c2+ebq 6vNbh5FNAFLePjiJ5gWBkS/BBIQVWcK8PHwKgQKJA/a/wSYIF3gHQBIAIqwc I/PoyTgV0uZL2HyYBFjggR/rtUAhI91RhE0QYfABnrTJIqYDH1S/gUgC0AF8 QeqyvvRTvir4IMEZzG7wjXm3Au8k50JASdgNDESGrZAUP/5UglF4Eyzuwlnz gCf/519fgBBS8I8Ssgmm4xG1+CI0DqYwSAIrX4F2W5hYQXuFL0u7iY2Id9hk 59g5do7fPtp3x/fuSz3QUXBwrHK+t6irMqFtd8xAbcpif+HJueqFvvyGIjuw SUGibLQ+Hgcawgps8vzKILDJy2uD2xp4ea1/S1dDwQT05RmhPyKMvQsTKOQj iCSkpotUc2Ep191jrVdWai7MV11c2IeTE8nYRNgAoRwZKzo2UQJaGwwCj0y1 pIBG6uIAT+Cts3MVgCQAI/CngTBKDy/hPhhawQ4A33IjIHufnOt+fLrt4cnm Z0cbXx9t+mG98cfZ/Z+7CzcrU98UxXxfFv25NHKjyP22wAn6UOT+XOz5WMRV c20W84Pgi9jNQvZ9gfVDvvUTzyaf8hhgkx8AT4L0V/MmPwTMPwS39H0eUIn5 u4D5c5D+nEd/4sR8Clo/5XF6E2Rf+pkXuTSuz3Isz3KolwH2bb6Dy+DnO57n Mo/TjfeTdZeT6ZPR+mWnYhpYwCrpdSj7vIbuNPerwwdenFsbqy/tqCpo2Bss zIkry7CVJFvKo/UVbk2NTdnKKLut6k6jpMMg6jBGtFPidlbS4pA0OcTdlLgH REtAHKfQUtAAiOI0KFA/JeqzRPRaImAzwEgGgGUoUT8lHqDF8HLQKh1iZcOs bMTG1XSN2WGVTbrkBzyKOa9i3iOftYu4ufD28BWv9FiC5ly6+VI2c93H3PBb rwfZa0Hb5YD9nN95Jtd1Mhi5kGQBNplIoKZT7WOJ1sEYS6ROyiojbEqxXSO1 aaRWNUhmUUtMSrFByeGJUSM1qGV6pVSn+t1sov0Fm5AOXb+HTYjQNMFgu1oj RSqBFZMmsV57pJNxMAarWWPRK4ChONbg2UQhDuMtkjAkEaASIgQTuJhjLtgA lWi52i2AEZvVCMIpiqT1FrxkGT03Y5HHEBCABmAFsAYIQQOZBUkEOQVRhZAL yMB3P4PzcD1o6z56aZSXjomysrSapVSRLjMQioPW2Cm1zaigtRJKI4YNIAmW cgGnxLvpnOSozAQ3a+BME49V5aIVFk1YtENfEkgEPAlkuHxpdh5PvAW+aFB5 QVJVWVZBTmy0Q2szcS2F4VPom0Q6TG5WH+dlEqNtqfEuwJOm6rK5ib7BrgZ4 C8AE3rVxHk1EeizbVlPa11rV3bR7sr9hYbR9caxtZbLzMBc54QBku6brF2xy fNs3OTzdBQxycmHg9DaeXFgbO7cycmphAMgFC7oAT5bHWg7P9qzPdAGSzI00 ApuMdlUujrWX5MS5zFKunzAlzYqja0rSeuryB5uKgU0mu3bP9lUimyzzLbmw PReZvQgkgu4JFnfhABR4icETEEmdCH0THG6C/YRvHB0lSROhdSIEE9D98/P3 tgWEAmDy5NoaFncBm3x7fZ34JrBuPDqNDggZOyIEE9I3GOuLsMMwQRgMmJCT wljKlyKQgqYJ5lyICJ5gzl3YhRg79wpFcuhExA0RzhAhwXN8zsdKMFJSBY/r 8EzOg8kt9Be+pBL+8f4mhk3IZRgkxz2JbGDvLCEHCQegIIAgsOBLYYpEaKng B/H347wVvAAbEQOekOKuL4ez8JfhiJPbPDpdR+IgiRLyg0llFzYcxn+HndmL O8fOsXP8Lw8AE9Boo29laM9CX3HPvqTOiviuSi5yAmyyPFjUVOIsSVXlJ0i7 K9z3TrTjiJBvL/Q/A5S4PPDq+tC2Bl9dH9jS1a9gyK+FUAiYkI5bwlD82xtj oHc3x5FHkFCAR4AUQPdPtINuAYmscI7JpaX95+crsekWCDbnF6qwIfDxyVLM lSz35QKboGMCVHJhcR/8UWRw/GM+rgJg8uzSIGwAc0B3j7fdA0I50fbgdMf9 0+13T7c+PNn0+GTTxpHG9+v1f5rZ/4f+ks81GR9L4j8WxPy4O+5jifdVvv1l vv1NofNDoftzkee7QufnQsdmkYMbAQ88kmf9Pihgk6CQTbAzsJmr49pmkx/z LT/wAjD5nGf+FDR/Cpg/BCyo9wFqM0ijuCEmuRbOK/HTPJtQT7Mtr4IO0POA 44nPej/ddC1efcErO+RSLFrFY4bwHm1YhyGs3Sbv9OqaE22XR1ofHl/srSpo 31e4r8znz4wtzbIXp1jKY/QVXm21XdlsVXbZNO16UZs+os0Q3mqJaLaKGm2i eruok5Z20dJuCiQB9Vg49VLSXg5GeFk4DVik3eaILl7dFlEPCKGGEveCAGoY 6YBVBhpk5QAmvKRjdsmYTTTBRkyy4XMO8ZJHdjBGdSJJfz7DcsXH3gg6bwVs NwPstYD1aoAFNrkQcJ8Pes8UxCyl0JxvEmeeSLL2evX1ZolbGe5QiewqiQ2k ltg0MlYjp1QSs1Js4iQxqqVGtcygkv1+NtFovp43+VJK1VdqushEEtgAlWh1 csZqRCoBJcV64iIdXgftYs2MCZ7/1cAm6INo5OG8abKVKwFCwcy7kFDQNEFC MRuUWL4FDOK0W1wOymk3C6crkrEmLHDKdvkWYIVZJwPWcLFGt83ktBoQUmzb 15DiLtzAR7CmS1jrxYlSp6VEZqRG2RiNUSNiLSonq4PVblHhWEZcrXpZJGsA MAEleBhfSrQvNSrBQyFlgChthNUgyUiwAZsEs9wAJtkpbCDTDWCSnxNVEoyv KE7fXZCamWj3siq+pbAq0qZxMVoAECejjXFTwCZJMfb4SOvuopzB7sbFA0Nl BVmASKxZSRtkRkWYh1ZWFWf1tVR2NpQNtFVO9zfODjUtjrauc2Vd/cgmgB6/ ljc5xudKhGwCYALClsJHZ3qATdYn2lfG21Yn21em2g/P964d6Fwcb+ltKpkd bumqK02NtDiM4khGHmdX5ac52/fl9tYXDDUXjrWXTnPWCeDJvqXBfSvD1cgm IBKKBxIhVV5kTwwU0lX4q3kT9FBuHBvDvsGIJ1+CCejOmZm75+aIdYJsgu5J SN4EQx+ABj/Pav9l0oRgBXIHSDjTENkE23Ahnginn4QI709sF9JJmAjv8NUJ KSRXQlIY2G6L5EeIHxFio5DpJFhqRaq84Akf+1kJx6aHeCWESpBQhKl5dCJI b16SQA+psxJm84U+yFaj4O2LSWCEeC6Yjsf2YggmxPQh4+wJjhFAQz76b3+E ez4OmV0irOASjoMX/u2Ytfl7P/jsHDvHzvEPfXRXpXTsTRyszTw8vu/YdPVw Q2ZXZUJLWeRkmw/YZHWktKnUVZSs8MdENBcxt4+28FQyyPfp7X95bfjVdSLE E04vf0klr6+Nvr4+GjJyEQGEVHNhSy5sDoyffcMjycatCV6TT871YicuABPg kWtrdSBAEs4uWag6O7MXwATw5MzMHmAQ4BGAjotL+8/OVWC0ZK4zE8u34N0r q7W3jjSDHpzqBCrBCi74owBPMOYP+yfn+2APVILX3D/c/PB428NzHY8vdj28 0PHodPOjEw2fjzRtzFV+6sr/WJf1sSzhU17k54D3x4r4T7uj3xS7X/B4spHn +JDv/L7A8V2B4wM3zcT2sYAfZRJk3+cxPJtYP/IOCLDJdwHqO76miyvfyuXK ulA/5HFU8l3Q9Clg/OA3vM/ltOEzbuSa3uWa3vrNb/0W1JtcM+itn36dSz/P tgCYPM9lngVs3/is9zLo60nGi7GaE27JQSZsgZUcoCL6NWGtirAWXVgrq2hz 62vj6KOdVTcPTbfv9rdWFe4tzAxmxwGbFKVYymL1ezk2UXFswqrb9eIOo7jd LGqxRDTS4XXW8DpbRAct7URR0i6LpBNklnSZJd1mSY9AvWZJuzG80xTeaY6A tcMYBitACqqHFvcxkn6rtN8qA43ZFcgmw0zEoCVsyBw+Yok4HK8/lU5dzLFd 9Tuu+e3X/DZYbwftHJv4mSt+K7DJ5XzvlaKYk8HIxRRqOFI3HG0YiDI0WCQF ojC7LMyplrjUMrtSbFNKHBq5Q6MwK0SAJxaV1AxsohQblRKTSrZVHMWLYxC1 BKThWw3jni/64vTVPl0hPbu22ET9ixQ8tvnFifBS4Au1RKeTm0xqr5fLvyfG uJFNot2s02pyMAYzYMsWm2zZInIRlzHh9kqRRh6BMKLj9uFbYLKNKkY+8G42 KjmXhJPWbjV4nDTL6K3b89/5dsHcvEWHVU96c2G8HVgDkMRtN3nsZtgglbD8 KBOeXKRY94VIgrVeGEvBii9YzUZZempUwJcUF83aGQ1tlOmUEUAEwAuAIZgu cdNa1iAHQsGR7sAmmQkeYJO8rLh4j8lhkTkscptJalSGOSyKgpxYzML70uzA JsFsrz/DDXhSlp9cUZJRGkxKirIAm0TauLyJk9EAmzhotcdmiPMyACYIKRWl /sXpwYmhjlgPazWpGKPcpAwzKSNykt3tdWXdTbu7GsrGumun+urnhptXJjsP AXcs9J9YHODKur6s6Vrm/JSTiwOnAUO2wQTbdp3lBefhgsPTXWsIJhNtSxOt 6zNdC2PNB2e7x3v29TXtnuipK8yM4RPxco9FHG9X1Zend1YH+hryhluKxjk8 2T3bt3dpaB/pGIzBE2HbLuzchdVccAZnx8MG2QRWAibCPl3AI9ePjgKhoHty 7/Q0rF9lk9tnZm6dPnDn7CzWdH1zdRUjJ7DHPl3Pbx0GPNl8zLXkwsZc6JJ8 fHoeUQVJQRiBx8IqtEVIIp7k3LGaCz7FdQb+Gp6QsAlGV9ANEVowmEOBHyCc OE8C8sLZ6yHjEUmmAx/dyYM9vEUoBhtnEXsFLuPxhBM8yeOAdd47uIGVXUK7 BN0H4ShDYrKg4CEfW2DxXbC2eIQMW0E3BDsSo3GDe3RP0GdB1hB2MCYOiwC1 tuatYPwE78NH2n9OxGOXYBD8Xf/jby9gxYZdSE84rpGE/bH5mDD+zzHLjm+y c+wcO8dvHj01Wc27Ezuq0lZHqy+s9fbX5dQUeBsKvWONvtOzjQdHKhoL3eVp hmCMrLXU/vB0z5PzA88vj8D69OLgmxvj3NCQayMAKdsa4uq7ro68vj729uYE CDYgvBJnjqBDAS/hJFwJenFlGPbvbk3CSWyoBRfgSXgX7QwszbpxqJHMbYcV dW6+EhgEdGZ2L6AHvsQLYA8CSIEPAozcOdYKJPLwdBfc8Buu8dfAN2e7QTgY 5cm5Htg/PtP16HRniJ4caX52rPXFidbnJ1qeHWt8drz+5cnGVyt7H436H9XF fFNi3wja/xZ0/0d+FNehqyzyTZHrdb5jo8i9UeR6kUtvFtrfF9o/5tv5YYvs 562YCQNIEqIPfjNuPgYsmz7j+1zTpyD1Q5D6PmDh6rj85o+55k2fCcDkdQ6n Vz7TK5/5Za4FR5m8Ttds5preB5mNoPVt0PYyaH/qZ+/5bLeyrcdjtWsexWqk +oBNMqgPq9WE1elF9WZJPS2vtSqqnZoar6E60Xp+pPnq4mDP3pzm0vS2ypzd vqjSVKos2bw31rjPq6+3a1toVbtZ0aWXduok7XpJm1HSSkkbaWk9LWk1SdtM MlC7WU5EznRYuKBKF60CtVlVLbSimZI3WaTNZnGLSdRiimgzh7cad3WYw/qs oiG7dNAq6jGHdeh2denDeo3hY6x4NV57Dngkz30j6LwZdNwM2m4HbHf8tjsB 9k7AejfI3AkwN4NcWdfVoO1S0HUh6D6S41xIpsZijOMJdIdTs0cVnhu+i1Iq LGqVXad2aTVutdqpVNgVUpM4jFVJWY2EVUa4tWKPSkRHhNnDwtziCFYuNsjC lMowqUEsNkvD4FKTOMIgkeglco1ErZTqFFJS0yVs2EU2QjaRqyJkqnCQQhWu VGxJIgqTS8LUCpFJLweOYC26uEhHelJUaoI3IdrhdViABUCwwVy5AeBIEa6W 7dLIw2CjUkoVcrFCHqFSiDRKCdxHxfcNNqolOPfQrJHCxkHprEYVyA5UYtHC GYNSBLJoZTazhjWpYYXzuGFpndtpSYhzRXoYhtLQFiVlVpgMUqNebDZJLGap ySg2GUU0xSEJ4JLVDKyhgo2N0mHhmZ3Ww0s8CUgFPGUxSR02jddpiPaYPQ6g G5nNInfSKhej9jAaD6N2WZSsQUppIkzKcKdFEecyJXgs8W5LSqzNlx6VGM2Y NBF6dRgDH6SVlEkSF0MX5cXlZrlAvkxnZiqbnW7Py43M90cV5cWWFSUWBmOi PWo7I/Y6FV67zmPTRToMUU4jKNplAiXH2gpyk8b6mxen+yvL881aGQ0/wCiy GCIctKLAH99SX9JaX9LTsneoe9/0SNPCRPsiAMWBzkMLfUeXB48u9qPIiBMy hzFEx+e5dDyAycmFgZN8VgXwZHWsdX2iHeu7YL8y2gKa7Klr3Vcw1FaVFcd6 KJnXIo20SHMTrHUl6UPNJcPNpUONxRPte+b7a5cGOTAhwxYRTIS5eOwqDMLK Lqz7Alo5u9QNSEJmnRADBfAEjRLSQxj3D87NPr4wj8GTrYKuMwce8HbJg+1u XSigEtC319efXFsDAZ68vncc+2WBEA0QTISVXQgawugHqbAKiYSQqrCvsknI THlhFAVOAtFsPD5NugoLfRms4EKRke7o1KDD8qWBwufcbwsxisw3IXEVPtnx 6MsRhOS5nVgnfCeum4RNSDIF66PgJkA3//Gnb2ElbBJiavyyldbWSfJrhd26 iAki7BWMv4r0CsMfhkyEY03gq/Hb8Zcgc8EGzhBvKET/tHnrnzZu/fPm7X95 f+dfP9wF4ebfPu6wyc6xc+wcv3X01eUAm7RVpCwP77u43jfU6Ac22ZdrG6rL Onmgfn14L7DJ7nRjUaIa2OTRGcCKwf8lm8BJoZBNgDVAOAzx2aVBELxFNkAx G7en4LIn5/tQSDGAEjcPN4GAO4A4ADQAOlDkJWxOz+zBC2DFmAmAzO2jLfDx B6c6gUSQd+C2cE94iakZ4QBHBBN4+VU2eXGk+fWJtjen2l8db35xrOHt0fqN o/XPhwNPOtJeVka9KXR877f/a8D93wuiNku9b4vdL/Ptr/Ltm1yrrv8cmwCJ AJUQAaoAnnzMNX7kVvNHP9Zx0e8D9Gu+E9cLn/lFruVFLoV6m2X6kEu/D9o2 gra3QfvzgOOxz3Yx2XAqTjPvkEww4WPW8H5TWIdmV4Ne1GiUNFikDYy83qaq cWn3u3VVsZZT/XXfnl4cqAo0FKXUFiVzbJJGl6VYKuLN+6MM9U5dC6Nqtyg7 dBJQu0HaapQ0mUT1lLiOkbSaZW2ceCqxKFAd25t2ixze4iWrN0rqjeIGk6TR JGk2S1rM4lazqFkf1mYM6zCGtet3tWl3tet2dRp2jVglBzyylXjdsXTqXI79 StB1Ld99PWC/EbDd8rO3/dbbfuZOLnM3l7nnp+/66Vt+LnVyNcBeCjqBTQ5m 2ZfTrcMxhpF4qjvKuFcnygE2kYkppdSmUbi0CrdK5pSL7JIwuygsViVJNyiC jK4ymq2KtgZN6khRuEcUbpNFmGVhKvkuiSZMZIgI4xWhF0t1XDdgrUrKJVN0 MpyuLiSU388mMnEYiA+qc06H02pKjHFnJEenJUYCm0Q6KY/d7LaZAE+wgEqv EmEFF+KJQi7itcUmW2Vmigh40gYSYQxKwBPYuBiDk9YjhsBLOGlSSwBbgEcQ W+A8sgmIMindDnO01+pgDYxFY2O0lElh1ImNegkgBssogTLcTp3XY+A9ETUf OVEDlXjs8GuBoXQgABPKoITVpJWBWEpuZxQ2Wu62a6LdwAi6GLcxzm2M95hi XQavVe00yxwmKawuizzapk1wm+LdpjiXMTmKzk52+dK9XrvWqAkDdoD70CYx S8kCOd6iYGyeL9KX4cxKZTNT2EC2O+jzlhUmlBclwpqWSHvsMrdN5mY1blYL eOK16wmhxEfS6YmuvSU5I72NLXXlTsZg0sDNlVazlNKLUuLZun153a17+9ur BruqJoca5sZa58ZaFiZa1+d6jq8OH/sahnxVJ3gkwaHwsIJw/CKAydask/E2 ABMglKWxjqm+hs7akqqiTKdJGsXI3UZRnFVRGUwYbCoZbCweqC8ENpnp2U/Y ZE3QsEvIJgRP4AyxVE7MtgGVXFofAB4hY+IxaYJ9unDeIo5cJHkTLvy+zSbA KdxLPloibNWFjgmCCXAKbF7cPgJsAlBA5pugbYEpEnQ6hDQRYmd8OYdRSB9f ZuFDKsHwJsgL6NfgL0GRxsLEtUH7g/gIOHiRjDUMwRPim2BuhYxcxCZa2Olr 23R4SOZ9oEhLK9I0GNhEGJMX+iZY1kVGH/4Gm4SUeCF94O8kc+TRT0EEIxkT Pi9/f/tXwZ8D/+bwj3zpx9eX/7RxA96CLyVkhCsiCbFyMPAuFEdVHzkYATwh hAIr6u/94LNz7Bw7xz/00V/vayyLb92bvDBYcWGtd6w1rzrfs99vH6jJODRa tTa0p7U0qjzNkB+n+P1sAjCCbggaKHAZ6PnlIXiJMXN4C/v6Ao/AHvAETsK7 cDdACWAKDHrcOtKM/bVAgCEAICD0RBBJsHALhC7J5ZUauB4/e/9kByIJ3Byx CL4Rq9GAUBBPEEywkIwYKF9lk5fHW16faH19svn18cbXxxrerVS9mC5+Vp/w cn/sp1Lv93mOP/tt/xZw/kc+10D4daHzeZB9XeD4WBb1ocTzKmD9/WyC1gnw CKzIKZs+40aOccNn2sg1bfotmwF6M4/ZzLfyiRLqea7lWS71lNe3udSGj36f a90I2N4GHC8Djke59ttZzPE47ZJLMkSF9Zp2dZl3tRp2tRh2NRslwCb1Zkkd Jau1KvbZVRV21d4o40pz2afbp0ZrC1vLM6uCcWXZ3qJUS1GyaXecsSJSV2PX NFHKVkAPnbhDL2k3SltMcBNRHSWuBTaxyNoAQHi1UwpUB63EDZBLi0kK38t9 NaVqAFkUDSZ5vVFabxA16CPqtWEN2vBGTViDelerXjTAqqaijIdTzCcy6HO5 9stB1yW//VKO9bLPejOXvZXL3vFZ7/qYuz76no+677Pc51bqjo++5WOu5bIX /Y7zAdehHMdajmM4zjiSRA8ls3U2Za44PEot9WpkHrXErRC55eGx8rAkZcQe WtMe65hIi14KJJ/ak3uiPHsqzZWlU8XKxA5pOCMP0ynDZOpdYl14mD48XB8u 1kXItVwbXqNKalbJ9MALBjnBE6LfySYKaRhIoxKrZOHwJB/rtaUnxWSlxqYn RSGbIJ7YKC0WUOmUEUAl2/2BwwFMlAqJSilWgxRijZIbrahTisw8kiCbAG64 rUZgEHhp0cpAtF4B7wKqeG1mD2tCMwUugNXGDU+RAnTAl7pYo53WsRa1xSA1 qCPMOgltkjqs6miPOTGWAUV7KAej43t5Saxmldtm9DrMcL2N1sDKmIFNFBa9 DFaHVem2qT0OTYzHmBhlSfCaQXEuQ4xDF2PXRlpVHlrhpuRuizzOqU/ymJO9 Fg5PXMZErzkt1upL9aTFs6xJQukjrBaJjZKZ9RHJ0cai3KgifzSXOklmQYEM VzDLvbsgYU9hUlVpWqEvMjFS77FKXFY1sgnBE1BCFANskp0a2dFUMTHYWhxM s1NKp1UFPxW+xWvXlBeldTbt7gI1l430Vs+OtgCbzI01rxzoPLJtlCB9hHgo IUIwOTbbC0gCK+IJoRJAEtDySPPScNP6dM/MYPNga2VXXUm8UxtjVUZapA5d WCCRba3MGWgsGmkuHW/bM9VZCWwCYPJVNgmxToQ9u07OtQObAIlgNRfG4eHl lUNDsGKfLizlQkgBJMHZi8gmD3kP5ZuLC4/48i3SoQsJBdgEUye4f3nnKLDJ 5uMzOGZRONOEtMzCUq4vqUQ4soSACdmHtAJGoRFDunUhVmB1FmZP0KYRRuPJ rfC2WNmFbCK0RYR4QuwV0r8LwyYYsSdZD8x9IFZgvRM+yWN9F57kk/K3hEmT kPA7iWlgNRQSijCcTjDk19gEfwapPUOMImPrBSNRHuGvwl5bP70BbLz4+fl5 IBT4dizWQh4hV6LIjHiCJOQ3/9vn+//l0320S4hjgvu/94PPzrFz7Bz/0EdP TVZ9SWxbRcps3+6zy10T7QU1BZ66fHffvtSlvrL14b3dFQnAJv4oSUuJ7eHp HmQTWJ9dGkI24XR9ZFtc8ASgg2OWbTDBl1ivhUYJ1msBmHz3aAE2gAmAJN+c 64UV4AJAA3Djymot7AE3ADoAQ3Ba4pnZvSC8AM7AW3DZjUONgDMII3wQZgD9 ETRfSBUZUolQwCbYGQw2ACZPzvWgb/Klnp9qfnGq+eXJxjfHG94crH45ln+v KfHVbu/m7qg/Fnn/nO/8a9D2t6D9n/McGyWeF3m2p37mTaET2eRNnu3rbPI1 MAEeIWyCvgmwyVuf+W2u+bXf8sZPvQlQr4PM6zzrcz/zzE8/9dNP/PQ3fupx Lv0ol37rt73JZV/m2p7n2h/n2G5kMBeSTQfj9JOsqMvElUu1UxEtVEQzHdFk kjQYxXUmca1FUk3LKqyK3VZ5gU0xXJb5w/1zU01l/TUFdUUpe3Kj81JM+UnG khjdbo+myqaqp+SNJmm7QcqbJtJmM4CGBMCk2ippMctaLfJWxBNKAWqnOXF7 i7wF2YTHk0qtdJ9eUWdWN1g09SZljVZcpQzfKw2rVoW3W1TDHvNMom0lw7ue E30603omg76YY70WcFzNZa9kUdeyqLu57L1c9kEu8xD+ah/1yGcBPcix3M+h 7ubQN3PoqznMhVz72VzH0YB7Nds+kmAeTbGOpjs6Yy1FalGGUpwiEyVIwlMU YUGLvNZj7Em0rfvizhSmXQomXPDF3CxIvJYXdySJqnCxGVqVSxLGysIsmnC1 NkyqDYvQhYl0sAlXaSIMajGlkjAqqcHwM5sI8eR3solKHq6UhamVIqU0wsmn 4LPTEnLS4zOSo7Gmy20zgYARkE30KpFGjl25wjkPRSnVqOUatVSjkqjkIrWC m2CiVUR8ySYAHYAkCCawd9J6F2MAMIm0W0AIL0goJo3UpJF4bOaUOHe0i6YN csogM2pEFp2EMUrttDLKZUqIpuOjLF6nwWnVMCa5WS8GMWa5nVGzlBJWh1UD q41WwepktV6bKtqpjY8EMDEnRQGYGONculi7xkvLnWZunEesTZ3g0IFSvKZU rxkEm5RIU7LXlASbaEtOiiPaoWGNIlof7qRlVmOEmxbnJLOlgdi8TDds/GmO ILBJhgvO7ClIrNmdCWtuqj3arviqbxLjNgObpCU49xRnD/U09LTtj/NSjFnq ZFWsWcoYxelJ9rrKQEdDWUdjyWBX1dRgw/RQw9Rg3cJE6+HF/i/Z5MhC39d9 Ex5Gjs/1HTnQDQI8wfouYBPgkcWhRizogs3qZPdET93CaPtwe1WpLy7BoY2m 5V6TOM4qL83y9DcUAZWMte6e7KhY6K9aGtwnzJsgm3xpnRyfaYUV2wsjm+Bc eCzlQtMEs/DAJtePjqJ7gkgCPHKLN1DI+MVH5+eeXFp8zMMIzl5ENkGvBFaS OkE2effoFLbMItVcgAloW3zZzpfkTdAfIZuQSi180g7RV9kEwYF4NCR0Twaa kDg8cgq6HkgcsBdmUoRj3+Fd4cM/vITLMG8ixBZhmB0f4zFFjuK7Xf08NV44 wRCf/9HOwHAKFlltw87Df/llRJ3YIiHYgmfw5+HfSyL/QhuIby/8DfYHJsVd aJ2QFsHCbLtwAiMOfw8BE/j4v3669+/fPfiv3z/8988PgEqATQBVYLNT07Vz 7Bw7x28fhE2mu0tPLbRPd5XUF0fv99u7K5LmuooOjlQMVKdWZFkKE1RNRdYH p7oxb/L04hDwxbtbkxx3XA9lE0yagOACWJFKYPP88hAI2AFWeGvzzvTnh/Pw 1vWDDYgYgBtYlwX0ge1/MV1ycrockyNomgCwwMU4uAS4BiiDlGzhzfFbCI8g swiFbILVXMAjSCVIKBg5CdGTM43Pzja/PtX09lDNq6niZ82pD/Z43hd7vivx /q3Q/bcC59/y7X/Os/4pz/qu2A1ggmzyoTRys8j9Nt/+a2wCJBIiRBJCJQAp oNfAIwH6VYDmvBI//YzXtzyVPPYzoEd+5mGAeeBnnvudT32Ob3z2BwAm6fTp RNORWN1ClHbAEtZi2NViDm9hxE2MtJ4SAyM0cpaHpNYi5dlEjmwyUp75t2fX 5zoq+6rz9ucnFKU7gymmvCRDSay+3KuptKtqKXmDiaOSFoOk2SBuMksaaEmN VbLPKm40S5t4NVtknCh5CyXHfZMZxH0jqMEkqTUoqgFPVKIqhXi/QlSrDq/X iAad5oloej7RsZrmOZjhWUt3r6Q4rgVdV3y2K9nWqz4WiONqpuVahhn+0ofw h+fS3+RST3yWb3k94H2T2znU9WzqcjZ9Ntt6Kps9FvQspFLDcaaRRHo4xTaQ bKuiZMXSsGLJrgpNRKdLN5/pOVWYfLE07V5Z2r3i5FvZrutp7CO/90l+9O1M tis5rsBi9Ip3seIwWh2uAzZR7ZJod0l1YQptmFYTYVKJGKWIVYoNetn/jm8C bKKQcpETjULsdVCpCVE8myQAm8RH2ZFKbJQWB4WYtFLgEaASBBOjRqLVyLUa hVYj4/CEz5tww9+/YBPAEKAPrOxCKgEBhvz/7L1XdxtX1q1NMIDIqapQKBQK ORIESQBEBnPOOYpRWaIClQNJicpZViQlikmicnLbndt2u+0Obzjnu/jG+UNn Fba0jabkfnucm+4Lbs9RY6NQLBLQTT2ea60JkAIbxCaooAvOMCoxJctxcNq4 Py+QZzPTSguj0gGYqHP1mlwDKbYwcjsHuAEYImZpiV4r1pG5lDqbJoQcI7Ma 1SZWYTYoYQPw4rCQsDHrhFYm122W59vVBQ7CZ1O7DBI3J4OjixV7jfKAnYi4 dbE8fbGTKrKqCy0qv40IOoFQNHkmeZ5JEfYy8IMWXa5enWHSZrOaTI4QFDmJ 6pizMuqIF3JJvwmpMmKvL8lrrwm0VBXVJtxwjc3wAUzS2QTOFHq44gJruMje 0VS2Z/tgebyAVOXoyByjTqIjsq2cvLrEh9hkfLB+93j7xOaOic1tB3b2TB0c RT0m63yTz+pcKpARhGYInzkwBmBy+fgO2KBOE2ydnNgzcmjHwOGdg5Nbe0c6 K2P5Bgct8nIyo1JQYJIPNIT3bGoANoHjwbGGw5sbj25tBjxBc7rWsQnGE8Qm aA9scuXYKO4xQXYJmtMFVIIa4WF//9wE8krgCGyC2k8+yyYIT9AesQnyUFBN 18uHZ18vnn+3cgn3eiA2wVVVCB/Q/9jHCSPpBVp4znB6eOI/zyaIfTDjIPpA vwLdGVsnuOMex7uD8HlkN2AwSY8UQRiCLkgfO4ytk3WDtlBlF3qkx5O7MJ7g 69EY3o/5ID/lM6a44O/AJD17MV3r3BP0PaM/Hu1RTRroY3LKT20jsEeeDu5k T6cnDCaYVj71Tf70fh4whGcT+MPSmk022GRjbayN9Y/Xjr4kqumaGCy7cHjw 6LaGgfr8pogescmpXU3bOwLNEV2tX9Ndpls4P7x6dQtikxe3dwFcfJZNvnw4 CYJ3UQsJ8k1gD0dMDYAkyFuZm+27OFl3bm/1+X01sMHFWngUMJoDjGgFd5Eg JEH+CLobqiKDe8JLXL6FUAWZNUioqOyD0tgE7T9rmoDWrvWtXeIdk9f7q58N Bl/WOd5UWn5XavpDiemPJRyACei7Uv03SfpdlfVZkgUBpCA2eVduel9u/H9j E4QnLxIM0rMU9TxJgclyXLcU1y0CkiT0jxIs0krSvBQ3LcRM98OGq4XUjFt1 3KGYMEmGiYxetaCXzOqlhT2MuI3km016P7JJK53bwIjrWUmEyN5VH/7Ts3vH x9rGWhKdlYWVQXOikEj6NOVuVbVN0cjJ2mlRFwCIKrtHld2lzu4gstq12S26 7CZdVieZ05W6J4jvZNHm9mhFKeXyv4jIbldntakyW1WCPkVmtySzKzejT5qx mRIetBOnCrmLIeslULHpUpC7GDBc8Osv+Jm7McOdqP5WSHe7mJ6LMItJbqXU tBxjlgFMoh/AZC1CrUXIR3Hdg5juXkx3K0JfC2svFuvOBXXn4tZD+eR2h2pX Hr3dy+zwGYds5F5OfsSqPuPV3Qhb7yVc9yK2L/xwW+dS0jYX0M0VaZcjhidR bqGQ2B0ONJk5rzTHCHgiExBKgUiSIVZlSNUChVKglgu0MoFekmUQZ6tVuZhK /h/6TeSSLGCT3GyBViNz27iAzxUJ5AObFHltHrvBylEo0xCOKG1EJc1CXfCI TVKmCe+bKFORkapUur1Kmq1VS1BrCXJJrCxpM1BOk85hpAFDAE9wmwlukEdV XnCGUYpYtdSiVRXajdECd9Bt8Vn1nEbCqkUGTS5HiFLK5dtD9DKOATYR6bW5 INhbjSqPQ2s3A5J8kNNKWDilHlCCzHRyknwr3FZT5CDcnDTfJPc7iKhHF/fq kRL5LLz0W9U+o7zIoip2kEU2tdsgcbJin0UZdGtdnNRIwa0ErEZg0gjgrVi+ vqLYWhowl/hNcEwUGKrC9pqos6nM117lb6ssgpN2ToV9k3UtJxG/w+81AZVs He4YH2w16KSEItPCys2szEDnFhcYu5qS/R1lfFnXaCtik71bO47sGfg5l+RT Njl/5AOeoMouFM6IzBREK9N7NiE2mdo3dnLfGIDJkV2bJrd2d9dFC8zqPFYC bGIjsyv8xtHW5ARQ0kDdvqGayZHaQ+MNgCcndrShVvdPy7rWsQnsLx0ZRqVc nzomILQBGMFGycKl/YhNcEHXky+OraS1maDOdxBqNsEnn94/xbPJo/Nvly8C m2DfBBVWoVREnPaODZR0XyM9ojGdODDIpOuz/SbotuhdzCbpcfDpDSzoXeQm oHYSjELpdgNu5UhPY4fzeN4XIpSPRsZPQYRYnw4WRs/86UqHlPSLPwUTnLeS nmOSPgcYjwhO/xFMKCmkepiOGOj34lYX9DfjmcbYN1kHJusg5YdU+daPv/ip ER43xf+rH3w21sbaWP/W68B4bV9dfm+td1tP/MLhgemJtrG2YGucG28pOjxa OTvRsrOruDGkrS5UdZXSD88NITYBAQUAgKRa3Xk2eQW6B3ueTb5ePASCd9/O 7XmVquZCFVzv5veidnhUvgV8cXuqE5BkdncF6NTOMiAU1NiO2AQVbgGewObB 2QGUR4/6VpA5AndDhALQgc8gNgFhNkF79BJd+bExf3ztBpwHwBl7fG38yceu k9UrI6uXf9LjK6Mvrvc+Pt30bG/F86Hi5w3OL0tMfyi3fxfnvosZvo8xP5QY fizjfihlv0/qvqpzvio3va4wf1Xr/LrW+VW17esa+5d8sonxqzJjik0MvwSV GvjYxOR68a3uce2XqbKu9x/1PE4/Q3ZJgllLMI+TvBZjOtCjOA8mC0l2ocSw UMItlpgXkub5hPlW2HDORxx3yA/bZFtZ0TCVOajN6dcK+2hxn17WTgo7VVld mpxOSthOCZupnDo6t04viZLZ+1oSP76YO7mlc7gx2lFRUFbExfLVMa+q1Kms sMpqDZIWbW4bkdOuEHQqMztUWW3qzGZC0EAJGujMNiK7g8wBAaTAnTvht5A5 PbQIIKWTyGlVZTbLBY1SQYNEMJAj2K7KPGYWXyzU3YwYb0eNtyPcQql1Pm68 CxgSpO4EydsB8pafuBOiHyS4hQQ3H9XPR5iHEd2DELCDdiWqfRyhnoTJJ2Fi LaWFJDOfYO7E4IbaK8XU+aD2bIAGNjni0+6wKffk0bu9+t353G6fadahvJ6v nfOzC37DYhH3JGJ5VeZ5nLSuxE2LEXYxzDyOcS+Tppdx7mCyuM9jjRBSuyiD k2dSykyxWCBTZcrVmWplpgbYRCpgJAJWLFB9wiOAIT/HJmJZJkgi/YlN1Mpc uSRbLMw2GagCj6240BMPFYb9ngKP2W1j7WaapRWUSgR4gkwTRWoMl4Lvgsni 89alQqkkRybJBjYhVFJSLSHUYo2CH5+FarTY1AbABHgEjmiTghHAEJmZUdMq MeqXhzNmRmOg5FpZjplS0vJcRikpzrOXhwsCbrOJkhk0YgQmerVQr8rmSKHT QliMShMrtxqVNpPKwinMBnmekwY8yXfrXDaS7zHhFFZObqGz7Ex2nkniMYpB Aae62KUJe6hYPp30Mcl8Jp5Hxz1aUKlPH7Kr8zlJgVHmtyoLzHKXXmjTZtnp nGIP6bMpbLpsIyEwUZmsQsCpBS5WHE3hCbBJRcgGqFIdccDLurgb2KSjOlCf 8LjMhImRW/SKdYTC0VKfi/U6GMCT5tr4gT1jIb+NUmWZGL47RqvOdFs0DRWB wa7K4d7qLYMNO0aad4627NnSfnii/9ThccCTdXO6PssmF1Kpi8guAQGboGh4 YJPLx3fAEdjk2I5e0NT+saO7NgGYHNzOjyzev7mzKuS0U0KHNseiEeSx4taS vIlN9Tt6q3YPVOwbqgY8Oby58fiOVsQmM3u6QGllXb2YTZCTApuLh4euHBsF MEHCjglQCUBKejs84Anqggc8AQGYAJWA1m4dBzZZTvXCr6YskrUUlax93PA2 yq0Ta6kExvSyLtTlgT0L3P0BaIDdE9z5DhfgFhXMJj8HJum4kd69gp69MZug O+DJYKiUCxMKGreFW91x0Ak2TZDpgJ7z01NF/uP3j2GP3BlMN+kTd1M/8sHO QNnu+CEfQwd+qkf+CD75McQQ+xqLP/79JC7c5IKLu1AE/H99swZC44JxROM6 osEghoEo3QGB3/gfv19FI7lQERrmlE95ZN2crr+m7JLv397/4f38X75e4Cu7 vl5AkPKvfvDZWBtrY/1br+k9Hf31voGGgv66/FN7u84d7N07VF6er+yvdp3Y WndhsnNvf6w9YQA8aY5r7sz2P7uze+3Wzldz+57e3I4e+/muk9s7Xt/d9X5+ 76s7O17c2vqrpUO/eLj/3dyeN/d2w3kUYgIvYfP0xpZH5wdvn2y7drjh0mTN hf21J7bEj4yGT+8qByS5OFmH8hDRuOC7M933T/eiWVt4HDEIzRnGtVtojzdA LqilBUEQghFko6QFR/IXLN/bsXhn2+KtLYs3Ny/f3LJ6Y/Pj6+PPro09Bxi5 NPL8wqYX/GyuofdXRn81VfnLo6XvtvqftpueVet+VWn4Y43lu6juT3H2xxj7 H+WWv1ZY/lJl/b7c+GWl9X1KX6ar3PK+zMyr1PQ+aXyX4Hgl9Z/qbYJ5E9et 09sE/SG+JE6/AE5JMmtJ5lGUehTTPozrHyTY+SQ7X8rNlxqXk9xy0vioxHQj QJ1ySY7YRHsMqQARKnOABkwQdjHiDp2khRJ1keJOUtRBS9p10iatpJaW1bGq MoOyL+z565vl4+Ndm+ri7SWFrcmCEo+2xE2Ve+hKONrU5QZJmS6nhs6uo7Mb icxGZUarKqNDndGuymgkhE1UbgstadNJW7XiFk1OkzKzTZ3dpsruUGR1yDO7 FVl96pxNpOiyS3SnUPEwTC1GdYsRejECG2o5QoKWwsRSWLMUUiGthDQrIWKl mAQth0DUUki7GmNWY/qlKK/FCAN6FGFuJa3X4+arUeOlkOFCkD0f0INO+7Qz XmrKTZ50EVgXPcrLecprPtUXReTdIP0gBD/OPgjSCyHdMoBJlH0SNTyOsCsh 5mbCdtitbubkLmEGLcsAgpAqcjUyJSFVUlKJRiGSq7KEVGYWnSFTro8ykcqy PisJ37ouEIsyeAk/iFSKpDkCWiX1WLkCl7XY506GigryuDyn3mXTWY0ExygY SoamB39IXUmllijF2UpxjiJXoJZkUYpc7HrABmAEGSX4yEOKRsqRcjOtMsAF lMJhIK2MCmTRKY2UxECI4GjTy91mDatX6XQKhlHCRq9TsozCbCQYSsSLyNWq shgix6yXOUwqjpWbOKXdpHFZSY+d8tpIkJ2VOAwSByv0cCIvJ3bps/MMQq8u u9CQ7Tdmh62iCp+mxk+XedUVPqKygKgqJJEqC3iVAae4qJBV5TfJCo3SQk5W ZFQEbETATgYd2mIn7TNpLISQlQsYVYZOKTBps/JtKr7TxG+KFxjKi61lQUtl yNaQzGsu83VU+XvrwtVxr16VZdVJnAalhf4Q4+jkNHYDQAoB8rm4eMjb01E7 PtyukAi1qhxgGaNOZtSKg16up6W0t7Wsv618y2DTni2d+7Z1g47tGZg5OAp4 ggjl/Int51KDhdGZdJ1JgQkI9ZuAUGXXuUP8bGEQSjzh++L3bDo+MXBizyAf fbK7//COngNbO8uDFp9ZYSYyzYTAb9eMdVVMjDTvGamdGK7aNVixf7zu6M7W Y7tap/Z2gKb3dczs7zxzqPfs4b7ZQ92nDnTO7u/FjSfnDw6iiBPcbAJIMndu Ak0Phj0IzxBG1gnqgkd7ZJqgaV2wf3zzKHDK09snnt05+fzu1Ku5U7CBM3AN vAUXwP7NIu+bgN6vXkZGyTqawOEj6V3ncIR34Xqc546Lu9DU33RCwSVb6deg +3923hduXUmv+0qvccLp8OiBHzWtoPOocAvO4J9CaSCAAOgkjlkHRkDVVv/5 hycoJh73g6B7ItLB4fLpyYmI1NC7OKwEOyO47R2PCMbNJulaB1D4ZXp918d0 +5+aX7BXgqwTEE54RzVpgCr/+4/PMLCg6V643Osnx+frhb9+/VM7PN9v8stH G2yysTbWxvof19HtTYONhT01eX21+dO72y8eGZwYLK0NUAM17pPb6i8f6gE2 aYky9UGyNUkCmzy/O/H45nbAk5Ur/HM+8kQAOgA9gEfe3AMM2f7r5cOAJ18+ 2AdIkh77vnxp+OHZ/nszXV8cb716qP7Cvqrp7SUg4BE8+/fakWaAERDqbces kT6UGJVvIWEfBNVroStRlReKUMTeyvpG+OtbFq6NPro+vnxj8zL8bdfGV66O rV4dew5sAsdLI08vDD49P/Dq4tC7q2O/OlL6ert/rdv6pEH/ukb/mwrDH8oN wCY/JFjAkz+Xm3+oMP9Ya/tTjfVdpSUVa/JB71P6Eo7lH9jkHbBJknub4N6X sCCMJFj/JJssRMiFCDUf1c3H9XMJ/VyJYa6EW0oYFmL6uaj+RoA851WccMn2 GbPHtIIRbWYvldVBZLVROa1UbqMmp5MQdRCiNkrUSkuaaWmDXllvUJdzKmCT Pz1/eHS0Y6g+0VURbIh4yj1kuZuodJNVLk2FVV7OikrpbGCTejqnkchqUAma FIIWlaBFKWimZU20rFkrbabELWRusyoL3moSZbSIMnrkmeO0aL9NPeXTnwmY VuBPjTELYWohrAU2WeI72cmVCAVahWOYWAmrl0O8VsJkSnCSWgZFtMsRejmq W44yH9gEFOP1RdJys8R6I2G5FjdfiZguhgzng/qZfArYZMZLT+dppzzUSTd5 wqU555RddMuv5itvFhLAJg/DcBPDUtSwHDWsRlnEJkg349ajHk2nRZUvzqAl GWq5UK4UaaQ8m2ilEkIuUqqyRGRmtjZDrvwkY/Hn2IQf+ctLnJshyf3AJjJR piQnk9HI82zGQrcN2CTqz/fyYKK1mymzQW3QyXUkn36Yzia8JDnAJvJcgUqc CWwCVIJ6SQBDLHoCWSRAJSA4yTOLWgICKgGZtEoro0ZR7AbiA5hYGYWTU/Fs wih1WplOK4cNq5PrtVKWBklYrZglAYKEHC2CZ3sbK3OYNTZOZdZLTTqxhRHb 9GI7K7ZQWTZttoPOzGNzC82SQrO42C4vzVNW+jQV+aoSt7zUo4BNpU8NKs9X lXmVZXmKsjxluVdV4VNXFOjLffq4iwyY5QWcpICTFnCyQpMi4qaDDspvIwN2 yq2XcspMA5HBakACKyOKFXGVUUdVxFERsgGeVIXtdXF3U2l+e6W/qzrYUFbk YOUGTbZZK+LZhJEatSKbXmHTqxwmymnWApuE/c6GmvimvsZAgYVUZLOUmKOl 8GEtjLS1NjLQUdnbUjrUVb1rrA3hyeFdfSf3D506NIaKu7Bp8imboKT4s39P KOjM+cNbUFAjqvWamRyZ2jcEYHJ0Vx+AyZGdvUAoACMeg8SlF8G3WmBRAnbB mb0j9bsGq3Zvqt47Wje5ueHojtaTezqn9nZO7+uc2d+VUuepyS7Qmcm+dCq5 dGQYl3XdOrWdD4I/swvhCWKTux9fovhFPEYYHYE4AEwAPUDIQ0FsAnpxbxqO 8BKE8ASOrxbOvl3ia7qwb5LODum1Wwgl0PM/cjc+Gx+f3p8OZ3DdF3ZD8FCv 9FnEnyp9dBX6pelUkg4sGFsQE6GX62ZeIQBBIezwtJ+ehIIjET8NZE9nE8Qa 2M5AvwVnQaYXcWEkQf4I/N6fY5N159OLwZD5ghMVAT3QGGHUToJ5BBeh4Zlj eJoxGiyc3guP81n4RpW39//0jjdNUB0XruzamCG8sTbWxvrH6/jOlu29ib66 /IF639FtjVeODwGbNEfZ3gr7sc01Vw73Tm5Ktsb0NUXqthLq1qleYJPVG9tW rm99dGF4CR7gb/ITg9/P70VGCYDJm3s7v350AATAsnpldOniEBJQyfxs793p zlsnWq8fabxysO7i/mqgkvP7aq4carx1sgN4BPkaGD1gg+YPo256DCY4zDGd U3BfCargwj8FF6PMdzy2C88Qfnhh06PLI8so7uTi8NKFoeWLQ2uXR55cGnpy YdOT8wNr5/sBT55dGPhqZ/HzfudaI/uiRv+LKvb3ACblxu/j+h9LuO+T7PcV pm8rTd83Ov7U4npTZXlT+UFv0wjlHbBJufldqelNifFNCfc6yX1ZagAhPPks kvxjNnkYJh5GyBSbMJhNFuPsw4juXlh3M0hdKtRM5yknzcIxbeYQKegmMtvU gmZNZqMmu0Gd3aHJBTZpBYIgRS06WSOrqmEUlSbN1qrw//766eyuoeGG5EBt rDVZUOXRVLlVNSCnstIsLdMLS7RZlWRWDZXTQGY3EtnNRHaLJqdFk12jEdcS kgZC3KDObVBkNcsErbKMPkXmuDb3sFV+NlW+dS9huZ+wrJWaHifYpQi9GNbC kSeOME8lj5HC5OOw5nFIDVr5yCzLoCjFT+XifRY61fnOICqBTw26kbRcL7Fe L7FcTZgvRU3nQ4YzAWYqn5zOp6bzadCUV3vCQx5zaU7bROcc4kse2Y0C9Z2A FrHJasK0EudWIvqVMLMa1gOYrMW4Wwn7iTyy36EJKDJocYZGJtSoJKRUSUmU tERCykQqZZaYzMz5hE1+IhFp5jpJcSmXWCAV8eI7TTIFClGWkVYj38Sf5wh4 nR4Hg9mEYxR6SqYjpCk2yUZgksp8F6qluXIh75tolSJUu4UaSVD/COp/R6OD +aottUQHl2mkwCZmWmVnCZeRSpkmMmATjhSbaZmVkcGjuJ6WMgAjOpmBkRvg +ZwS6alcq0Fh0cvMOrGJFlkYiVUvARgxa3MttMimE1npXCsttNM5Tian0CT1 W2TFVlnMqSrPJ6sL6YZiQ3UBUV1I1BaRNYVEZQpMYF9bRNX6qfqAtj5I1wfo Oj8FZ8ry6TKfLu4mAmZZkUkasMgDFkWhSR7L0xXZVH67pjxoTfg4Bw2fRWAg +MYTvTqryEVWROxVUUdpwIzYpDriqE94mkq8TUlva00o4bcBmxg0OXa9HD4m sAl8XgvgmFmLMuKLvOZ42NvbWdPfXWdhlbRaaOSjIfkvpCTk7GpKDnZUjvTU 7BhpATzZPd6+f2vn4V29U5PDQB/INDmdqvL6DJsc+gybnN4/cmrfMLy8lMqO h+O5Q5un9w8jITwBAZvAHj6INUV8TkbkNcqby3wTQ7UgIJT9Yw2gozvaTkwA mHTP7O+Z3td1ck/HiYm2qb0dpya7PzVNgE2uHh9DbIKaTe6nYOTe2d0gABPk m6BRXagLPj1+EbknuL4L4QkWhhRkoDxLdZ28Xb4IbIIH+a7LUsQlXsgTQWyS Xm2V3rSebrugznrUvbJu/jC6YF1ayrpW+nQM+SyqpBd0YULBbJJu9CD35L++ WUOkgAwOxCnYpEhv9ED3XxfCjn2N9AhIuAxjDggPMUa1ZAiIPssm6XiCoQZZ MBhtkOeSypdfQUZJeiEZ7tkH4vjmHR9hD28h9wQHMn4sWltGdIOmisHF37y6 /c3LW9+9vvOnd3PIN9nIN9lYG2tj/TNrZm/n0e1NQ81+YJM9m8qvnhg+MFYN bNKRNB0aqbh6pO/QSFl7wgBs0pIgrh5vf3ZnN7DJ0tXNi6l0dXjOf3ln51cL kwAjr+7sfP7FFsCTt/f5Ki/gkXsznXenO+6f6r430wVUAhsQbG6fbLt9sh3e unGs9fZU5/3TvY8uDAFBIKBAA77QEDDc4Y4oA7XVowvW4QlmE8QgiGvQlfBT qJQLGSsoaB7N+Fq+NAJUsnh+06Ozg49m+xdO9z6+MLh8tm/lTN/TC4PPL25a ne2eP9b8ttf1qs3yttH4VZ3x15WGb0sNf64w/5A0/LnM9F2p4dsq0+9qzd+2 uf7Y5X1bY31T/ZPeVfF6y3OKGfDkTZnpdanxNbBJyWfY5HWMTjdQ0vT5mq6F KKrp0vM1XSUczyYp3+R+hLkd0l3xkzNe1RGHdJNaMKAR9JCZ7RpBo0pQr8pE bNIJVEIIG9Q5jZS4lpaVk6ISVrG7Ifl/fv/2ysFt/dWRnsrihoin2q2qditr Xcoah7zSLC7T5ySpzDJCUKHJrCOym7QivnyLEDaqshp5KhHVybPrpJktssx+ Tc64TjKTr70Q0N8MsXcj7FyETyQBmliJ6kDLYXqxmFoMkqth7bO4HoHJkzD1 OETwYFLMaylCpsQXfaXEDwpeiNKpTBPmUUy/EP8wCgCo5ErSfDlhuhDlzoUN Z4r1s0HmpI86kU8e91LH8sijHuKoW3PErZmxCGetuRdckmv5ytt+CtV08WwS 45bDzFIxvVysexxhgU3ul7imvdphNxnVZOlyM0iZkFTLKKlSK1EyYolWKtIo siREZi6VIVNm/zNgApJJs0Af8ET0AU+kwkyGlDuMTJ7N6HNaijx2UJ5T77bT DovWwmmMeiVLy/WUPAUmWQhMNHKhRparAURKmSaooAsnvJNyIcAIcIqVJRGb 8EqxiYEAANE4DBSAidfKwNGmV5tSmex6tZAlhByVa2TkRkZhZGQmEPCInn8+ R1kkNlZqpnMt2lyrTmRjxDYq20kLvazYx0mLTPKQVRFzqisLdFUFdDVQST5R k0/U+UBkvR9IRFNbBHiiqfIpK/MVdUUEnKzzEyA4Dy9Te7LUSyTziKhTEbRI i22KiFMN8lsVSR+TKNCXFBnaq4p66kPJQoOByOJIgZHK1ikFDoMk6NFGvEw4 T1fiNwGYgOri7oaEpyHu6aiLttVG7HoZRwj5si6dFD4RfGqzTg5g4jBRcMxz sIVec1VZYLC3IRpwalU5Ok2ugRIZtWKPRVNTUjDUVT3aWzvaW7N9uHlic8ee 8db9WzuO7RkAJEHVXDMHRz+LJ2cOri/oQkVcM3uH4PzFo9uATUB8cdfBsZnJ EWCTk3v54i4AE8AT2Ozf3F5oVQGb2OlckM+sGG6N7x1pPLil7eCW1gObmw9t bT22s/PUZP/M/r6pPd0nJjoATwBSTk32fLamC9gEj+pCRsl8ah4XilzEjgmw Cc43+QdsggQvgU2e350CNsF4spqaJ/xq4dyXj69gNkmHDryHd1FrfHpTPAIQ zCboPCrowndAQ4lx/wiCkXXzh9Mh5bNjvtY5Kek2CuYI7GKgzvf0FHs04wsn hqSe9lexjYI75RHaYBRCY4dRSwiuwkK/AkeToNui3vZUTuKHui90Ensun+qz Q7rQEXET+vNSqfEo1XEJdbugOi5EHAg3vnkHXyz8K9zghwP/ehGlwyO3BfWk oBHEuGUeAAfY5PfPb4K+fXUbGSgbbLKxNtbG+mfWiV2tUxPtI63Bnuq8ze3h y8eGpifagE3aEsbDo5XXjvYDm3SVmuoCRGNUde5Aw9qtnYhNVq9uRk/7z29t fz+/F1VwPbu5+fHVkac3tqTApOvWidZbJ9oQlcBLOD4407d4YRNKYF+7vhkA ASeSoJZ2zCDIMcH7D8VjHzeo/QTFNeLWeIQnSyloAv005fjOLgQsqCcFNZ7A BU9vbF29MrZ4YWjh7MDCbP/DmZ4HU11r5zetAKGc6n19cfjdldHV6Y6bu8vf 1Bvf1xt/U2f+psb8XTnvlfyY5H4s4f5SYf620vhNvfU3Tdbfdrl/15v3ptaW rrc1vHgzpcIMev2RTV59jk1SFsln2UT3KZssJ3SLcd1Cgn2Y6jeZSxruJw3w rA548iBuuBdlrxfTp33EdD4xoMzsV/Fs0klkApvUKQBPstrVwnaNsEmdXa/K rlXnVBK5SVVOhVG9sz7x///29d3p/Zvq4j1Vocoia7lbVeFSVrtU1Q5lhVlS phcCm1QSWZVqQZ06s4nMaSZyGhSZ1WJBqzyrRZrZJhNs0ubsc2hmA9zVuH2u zHm/xDoXMcyHmQWAkTC9FKFXkML0KihEPw5rn0Z1QCVPwuRaMfmkmHgCYBJU gRYjxKMIiQU4xitGL8R0D2MMoBmv1Jdwvcx6pcRyMW48FzGcCbGzxXo4niyg jnkJoJLDLjUSzyZm4WmL8LxTfCVP8UUhcT9IPwwxK3HjcsywEtEDnqyEGGCT J1HDXIl7xktv9THlOolelEFJhZRKpuVNE55NaGATeZZMkykCNlFkr6vmQiQi lgjW6aearpRjgmq6KJXEYdbnO8xeu6nQbcO+idNK2UykiVUZdHKGlNIaSQpM PrAJocglFCJSISFkOTq1BBklqNkEpJFmw0mLnnCadGg+MF/Zleo0YTVSxCZW Rm1lVMAmdlZjpuF8LqPKMZC58NDu5Cu1lBZGZmXlTpPKbVI7DQqPGS6W2xmx RZtjprLsutw8Tha2qSI2VdyuLsujqguZ+iJ9faGu0q2q8qgafURTAdns04Dq PYpan6K+UNVSTLVF6OYg2ejXtISoBr8aTtYVKmsLFHUFStjXF6kqCshknhrY JGyXRZyKqFsddalDLlV9wt7XGOqq8w80R7YNVG9qTeRZlEYq00zn6NUZHJll 1+d6OGmhTR3L11eGbDVRZ8o3yW8p9bXXRnqaS4qcOrMWkCplmugkRkoCHxyo xGqAz0u4rHSekw0HHK2NJR1NZSZGSSqytcpsYBMDmVOcz/W3lY/21g12lG8Z bNg93r5rtBnw5PCu3ukDIwAgQCWITT7V7IGfkOTUvmEkYBN4iWq6Lh/fAWwC x3NHtsweGkd4MrVvCKjkyM7ewzt6Th0Y7WuMuvQij0Fi04oMSkF1yL6lu/Lw 1q4j27omx1v2DDcc2to2s29gem/fyYlu0PTeHuCUmX29s5/zTVDwIuiLmW2I TVCbCWo8SVc6ngCYIKF6rXW+CdoAm6TjyUoq+uTZ3Ok3ixfQqC5cqbUuFx71 vKOyLswm2FXBlWDp+SboAuzFpJeKfRolv67T5OeqvD5b6IWYAsepo6HBOAgS tdsj1sCOBnr4B8HDP2ACnpOMR4ehPaIMXKaFZ/8iywP5Heva25FR8uk8rnXC k5CxTYM+BS4k+88/PEFGD0p7x74J38meKtzCbPLdl/AvAqwHUMmHxSMeQXko qAAMBzLiNvk/wtcIpPniC2CTP765h6LhN2q6NtbG2lj/4zq6vWl6TwefclLp 3tRQeO5A7+l9nR0l5s5Sy9Hx6hvHB49truqrtNX6NfVhxcxE1cr1raDFK+Or H2niybXNz25uRR0lT66NPjzbi5pK7kx1IB6ZO93z6PwgCKhk5TJPLqhxHgRY AZQBrAHIsHhxGHghNfjrA3RgAwXPIsapjrjZBDsmuDWed0NSYY6oXQVdgwcO IyFUWb2xZeXq+Aff5MzAo9N9CzM9zy8MrZ7qXZvpfXth+MuLI6tHWq+NxX5R bfh1jfHbavP3leYfy0x/Thj+FGH+XGL8S6Xl2xrzty2O37Q7f9nr/rLH9arW hvUaKcUmryvNryvMr8pNL8uML0u5FyXcu5/pN/kn2WSFxxMG2ORBQn8/ztyL 6+/G9Q/C9KM4PKhz83xSoeFCUHe+mB3VZg5qBN2EoCPFJjWyjBq5oEWR1azI alRlNaiza1TZFRphOSmudzLba2P/3y+fr1w6ubW9argxWVvsLHFqSl2achdR 4VCXW+RlbG6qpksAbFKr5I2YZqWgWSFoVWZsZbJ3c7mHHPLTRbprccudEts9 UMx4P8o9iBqWEqaVhGkpauBbzoPUarH2SYR5FmNBa0AoQeJpiPqgYuJpseZp UA1ajJGPYlSq8Z9a4EXziusexhn44LxSzhHoSqn5UtJ0Ps6djbKzIfZUMQM6 7iN5NvGSR/KIwx7NYbf68Eff5JxDdNkju56vugN44qcWQsxiWA9sshphH3/U 3ahtNl+3N2RtshAGYBNJDqWQ0GKlTqzUiyU6qYhAbEL+xCb/GEzS2UQi4vtN UMuJQaf22Lg8mxHYBKgkmO8CPHHZaLuZtHCaVLOJmFLl8lEmqVgTYBONXEjw 8YhiSimlUwnvRlqVHlmCM00ATFxmxm3Rw9HOkkAlgCeoF95ASDhS6jAQwCYW ndyk5X0EG6twGlV5VsJjJVwmlYNTuDily6iwsxInKwUwcehyXaw4DxDAqgy5 yZoCtraQrS9iW4qN7WFTa5BtKqQ7Akx7Ed1RpG3zadq8ys5CTbtP2R7Stofp 9rAWNi0BoqlIDWr2a1qDZFuIgpNtIS3smwOa6iJtiVcddysTHmU8T5XwasoK tZXFhv6m4MRo3db+ipHO5I7Bmt0j9TUJt02fy5ECA5HBGyhkpkMvCufpYj62 pMhYUWzlrZOYm6/pqg61VIfKQi6nQWmiREZKxFG5eo0QPrLbqrOwapDDrHXZ dMVFtvrqyFBvY9BnodU5jCYHvhC9Jttj0TRXFQ91VQ+0lw13V20bato10jQx 1nJge9fxvYMn9w9NTQ6fOjT2M2wy9imbYNME2ASJn+IFx+Pbzx/bdvbIltMH x07sGQQ2gePJvZsObO1MFnJeo8ymzTWqBT6jvK28cHKs7diO3gPj7XuGG/eN Nh/f1X1id8/JiR4glOm9vaCpPT2z+z/Tb3Ll2CiAyfWTm1EcPI5cBGEDBQmx CZohjMZ2Ievk036T9A1qjX95fwaPFwY8QTO73q9e/mwjCTqJ8hDx4F84iZhl XdAJggg88gvO45YTXCeWziPpnLLOQ1lX1pUuTCh4SBcihXWsgRvb0Qb3cWA2 QYVVaPYXjlxBnwIjT3pACUYP5L+kt5b897dPQYhQ0Fv/gE1wjgkuSMPhLIh3 4D7/67tnyATBU4JxUiQyU3Avybfv4Qu/9fs3t2GPir4+O0n4Q0f8l/PpXgkK N+G743/56F/94LOxNtbG+rdeUxPts5M923riPdV5A3W+6Yn26Ym2wVpPb6Xj yFjVzRObZnY2DtY4K/LlwCbHt5c+ujy2dHXzwqXR5VRZFDznL/FlUXw7CWjh XP+dqbYvjrfePNYCYAI8kjo5sHplFJDkxa3tr+7sBKHe+S8f7ANAANxITRve i0wN5IkgiwRt4AK0ASRBQh0lqPkd0QceDgwbXL6F4+YRm6A6rvS4xsUrY6kW +PHlS6OL5zYtnhlYnO1/cX7o8XTP2snut7OD7073r+ytuz5Y/Nsq43c1lj9V WX4oN/2l1PSXBPdjRP9ngJQq67d11u86PL/p9nzdl/em0/6yxor16qNeV1tf VZpBL1Ns8qIUxL1Nn9CV4pT3SeSh8HqX0H/cM2+Tujd8WRf9KkG/TOjWscl8 jLkXpW9H6VsReq6Yehhh5qPswxLzfInlRtR0I2GbMEsBT7rUgja1oEElqJRm lIkzGmSCehlvoDRocmrUOZWkqIZRVJjUw8nCv71ZXrpwfLQxOVATaYi44y4S VOqmypxEqUVRqufZpEwlKFdm1CoympSCDnXmAC3cYlZOu6UX/cStuOF+ifle wng3ZrgHJJIwLyRMD6Psg7B+IaJfjhuflFqXAyRoJUg9DtFrYd3TiO5ZVPcs Qj8La1OiXoTJ5yECtBynluLUYlyLtBDnwWQhqQc9SLLzCf38BzRjzsUMZ2OG MwAmEf1MMTPl1x4vJI/la47lE8fyKV5AKB7NIbeKZxMbzyaX3LJrXuUXPvWd As29QmI+QC0W06l+E2YlpFsqpm8Gudl8+kjC1e1mzBIBJcoipLnAJiDkmxCA JJpMMZmBmk14MJFm8R0lqY1YLBCJM7DEKcll2UpFjkKeLZdmySUfxOnUDhNj 5+g8K1fscxf7XD6nxWnR2k2EJdUIn8pkz0Fx8H/HJkqJViXTE3xgIqdVWlkS uSSAJCwpQ8GLwCk2A+Uy8+dZQmbVE4AnRq0S8ESvFpu0crdJ6+RIO6sCOTmN y6RxGdVAJQUObaFD6zYqrQzfS2Kjc52s2MEI8wySgF0dzdOWFLCVAVNL0Nge MrUVG5qKdI0F2pYiurNY31pAtOSrOwo0HT5Vp0/ZFyC7izQtfnW9T1aTJ2ko ULSFyI4IBce2ENEa1DQHAFJUzX51S0DTWqypLFQn8uTJPGVZAVFaQFT46ca4 paM6b6wrBmyye6RmS1/Zlt6ybQNVw13leWaFTsF3nZi0WRZtdp5Rnmo5scTz 2bjPkCjgkgVcaaGxuTJQk8xvrAgUOXWcRmjRSVkiR6fMMmqlHhtjNQDWqRxm ymmhHRYqFnJ3t1RWlQQMWikDF6dK2hycMuG3dTbEeltLAE+2ApuMNgOb7N/a cWR337E9Ayf2bUr3TWbTNmcOpqwT5J5MjiBIQWzCh56kck9A8O71U3uun957 6eTOM4c3I+tkZnIEBHgCbLKltzrg0Dp0IiuVbdZkJn3G7X21x1OB8ge3tE8M N8Lx2M6eqT0AJv1wPDnRCzr9cXrwpy0nwCYo5QRN60J1XIhE0BFN60IvUVkX Tjn5dE4XEirlgs3r+dNvHsw+nzu9dm8G2AT09P6p5/OzQChfrV1DxJHetI6B ArMJvERXrgs6wUnuWNg9QRej28JJXN+VPqRr3YQuhB641T19THF6ICNWeqEU FsIW5FCkj+pK5wtEELhXBXsuqMgK3RM5GqgDBYSsDezCoLshQoHz+DKcY5IO KQiFsFeCGljS/2C4GO6J2ARZJKgRHoEJKutCzIKhA5dsYTbBg7nSwYSfP/wV P5jrPwHQfr0EG5S6CC//67cr/+oHn421sTbWv/W6dnJkZk/7vuGK4eaikRb/ iZ3NF48M9FS7Bxt8uwdKzh7oOThe0xgzVBQRdSH59i7v5SMtN6e67s72L1wY mpvtmz/TP3+mb+50T6qCq+3msabrRxrg5YMzfQAsz25uBRJ5eXsHbN7c2/2p EICg7HhMGcgrQb7J+wf7cc8I8kqwdYIgBXko6V3wcMRzhpFXAmdQERdQCTJN 0PmlK9uXru24f2PbnWvjt2+MPbgy8hD+5jMDz2Z6vjzZ/btj3b/cWv2msfBt tffPJcY/l/BFXD+UGr8vNX1Xbvqm3PS7KuuvK83ftXr/NhD+c3/4+77iN9WW lzX2dL0CVdvfVNufl5melnDPQEnuRanpTaXtyzLzl3iwMKjkw3jhtwnD27gB zRl+E2NfRpiX5RwfaxKlnyb1LytMz8pNqwl2OaFfjDMPYsx8THc/St+LaO+G qbmQ7kGYeRRil8OmJxHrk6hrLea5lKc/bJANklkt6oxyVUZIneFXCyooQak6 I67IiCkECbUAcKOUESaYnC6/8dulq49mdm1vDPcm3L1xd0mRNupVx9zyhFMW MwrjWkFCk1GrzGxSZ/dqcrboJUec9Gyh6Zzf8rBAvVikWfITcHxUCHv1ckCz GiKeRKgnfIc7sRYln8Zgz59Zi2pBT6PaZ1H6gyL087D2xd/rWUj5NKR4ElI9 DqmXw+pH/AQA4iHf+G+4XcrdKjN+UW6+Vma+XGI8HmOnSs3Ho+yxMHM8rD9c RBzwKo7kK4/mK495lSe8iqmPOm4TnrAJpx2iWZfkfJ7ssld+NV9x0yf9okB2 r0j+IKhaChOPY9q1uO5mhL4QII8WMmM2TUyaa83O0mdnqiRyhVQuUUilSrFM lSNTAIlkEGoxP2FYlCnKyYCjUpajkGaLhXzUOwp8hyOcl4kzSY2IY1UUIZKK BHKRQC3L0qpz+WoiC+2zs8E8S7TQWey1esy0nSUsOjXITKtYjZSQ5agBZHIF qKxLLc/h6Uaaqdcp+Rm/OhXHaiwc5TDr3DbG49AD1LAUPH7nsoSI5Wdw8YVM ZqPOaNCxDMnQapZRW41at5XNt+vzbUyemXRxag+nchtUdp0s3yT3GiVuVuhi cjz6XB8n8psl5T5dZSFTH+BaIpaWiLm52NgSMnUEyc4g0VVMdocoEGxAcKbd r+4IaGADx7YiFf+SL+UiWorJtrAWNqDOGNMR1cHL1hAF55GaAsAm8nKftCxf UuqVVBSpWpKG/nrXQEPeeGdw50B812By16bSieFyEDyu10TcDlrEKQWcMtNG iRy0JFlgrYl4K4vdca856jFFPeZih6HUb24s8fY2RVur/E693EyJjaTQrBXD 14K4zKZX21gSCM5qILwOtr2hbFN3o9dhIBXZelJkZmWEPNOklzbXxYb66gZ7 avo6K7ePNO0aawGhKMaT+4eOTvQDjJw6OHb64NjsoXE4AokAgMAZwJbpAyOg qcnh6Um+2/3UvmEUwshP6zq0+cLhLRePbL05s+eLU3tvTE/w9V2HNqPe+ZN7 Bo9PDBzfOwj4s6m9pNCmcehFJm0OqCzs2DxQN7G5bd/Wjn1b2vdvbT+0s/vo bl6Hd3Yen+g5tX9wZoIPZERRjMAmCEwQoVw+OoKsE+SbIBjBSIKpBA0QTrdL 0ud0ITBBRVygl/dnQK/mToEAT57NnQYkgSMSsAkI954gPEGhh3gycPoIr/R+ eUwo6dEk6a306V4M4pF0TkGOSTqe4Je41Ap3haBGeGRtpPsmyIlAEIFxADkR 6X0imFYQoaQP9U1vqMefGleLYdME+Rq4Vx1ZMEh4IBj2TfCvRiVhnwZHovZ5 HIaCh4B9bFpZwb3wONYEVWrhLhIcBPmhZCvVhPL7N/DV3f7b75bTB3ahK//y 9QLikfTsRf7M1xu58BtrY22sf7TunNl2am8HAMhoawDY5PCWusvHNvXWePrr vJs7Qke3Newfqawp1pX6VLXFsuEm26mJqtN7qi8cbLyRGvl762QHKNXY3gl4 Mne6+8GZnsdXx1A7ydMbW4BKkF3y9v7Ep8JsAhsgCGCHB2cHli6NIAbBfSXp g7lwZddn+03SI07QGUQiqG1/XVnX8pXty9d2zF/feu/a+L3rYwtXRhYubno6 2/v8VPfXUz1f72t62Rd5VZf/tirvs2zymwrz72vs37f7fuwJ/tBb/MNA+F2t 7UX13+llFa/XVTbEJk+TaWxSYkICJMGhJ68S7Ouk4XWSexlnn0V0a2HtkxD1 OKpdDhFLxcSTOPO8jFsr4ZaiOmCTpYSer+mKM3Mf8eRehL4foRfC+uUI9zhi Xos61mLueyHbOTe9wyDpUGVWyDKSqoxyRlCmFJQrBWUKQakSICWrjMqtZCQR VVazk3lzZfrBsV3bqiObkgX9MW9dHlXj0tTalTUmSTWdXafJbCaytxnlk07y lEd33qu/4ePuFprvFVoe5Csf+pQLBSoAE8QmS371clCTmrtFroY0QCWYTRCe /I9s8jyseRZWr4XVq2ENfAkLYeJBhJxPsveT7K2k4UbScDVpuJTgLiQMR8K6 43HuRMxwImoANjlUoJ7Mkx/zqY77VCfyVVP5qmmvAumkTQiacYjOuCUXUmxy LV9xL6i+H1QDmDwMqhaCqkdB1WJQfRfuH2GO+9nNDjIuE1myBLRAAESigP9U cplKAmwiV2bKFRlqVa5SngPoAcQBRwATkEycDZACkkuy4CWhEmtJGYCJidOQ mlyFNJNSCxlSwqXmRHmsTIHDAFQCbAKE4jZpbXoCqMRIKQBMtHKhSpSpyM1Q iAUaeQ5IKc2SSQRKebZBr+YATGilidHYOK3Lqs+zs/BobWF5NmGIXHiuZuE5 XCexGuRGPWFgeJlY0sbRThOvQoe+yKkvsFIeo8rFyhw6iYUQ2qgsoBKfURS0 KWJuosRLlfvoprC5KWRqCnEtYVNLsbE5wLYEDJ0pNkECNumN0P0xBjYISUCt hcqWAgVsWoIEcAcgCcBIe4QGAZg0FKngDGxAQCiNfPuJstqvLPWKk57cmoC6 u8o23l60oy+8cyC2azCRUnL3UNne0Upgkx2DdaOdlSWFJpM6y6AQWIhsKyl0 6+XlAUdDorA84CzzO8oDrojHlCwwNiTzOmqDwCZFDspECU1ULrCJmeZbTiw6 OZ/zok+NNdMpHSYqXpzX0VRRGi1gCIlBK7Wwcj0p1FPCZMQNYNLfVdXZUjLW X7N9uBHYBNBgckf3kYn+Y3sGTh0aQ2wCOnVg9NT+EQCQUwdH/0k2uT61G9jk 1ul9AClXTuwEPOEdlskRuBX8IODJxFhLU7nPY5R5TAqbXuwxK+vLfJsHaneP tRzc0T25rWNya/vk1tYD29qATU7u6Ts9uWlmz2fYBARggqd1obIunLqIDZR0 9wTjCSKUz84QxlSCwAT0/O+pBOnN0oX3q5dRTDzigs+ySXqfyLoEk3XdJelF X+k/9Sm2pHempAvnqvzc2C5cDZUexY6tCtxvjp78Mc7g3nncV4IvSLdpMPvg dvt1Ue+YVvCwYhyJgtvn0xMVQdiaQV9v+p3TW1E+YssHpsBCc7oQm+CTaQGR 8PfDXw7sdgeuQTO7gGhw3OTfUnbJX79+hPAEscmf3s19//b+v/rBZ2NtrI31 b71WbhwANgEkGWsLgiZHq4BNxtuLgU36avO2dkV29SdrQ7pKP1nlF3dXMCd3 lE3tLD83WX/1SDNQyb1TPaD52d6FcwPLl4afXBt9emMc5y0CmKBSrndze0Cf sgkCk1Rk/D4ACiCI+TP9c7N9qNYLsQka0oWrvHDFF/JWEKfguBM8rQsHLKKp XCDEI7iyi7dRLm1Zurzl4ZXxucsjc5eHAEwWzg88PdX9Zrb3Nye73mwpf9zk fVnlel/t+Syb/AHApMkDbPJ9R+GPfaG/jSR4NqmyPk8TvHxRaX1TbX9Rbn5W anxWwj0vMb4sMwOb/CJp+kXS+CWACbJIEobXCcPLBPsiwT6NM6thajGgXgAF 1UvFmgeFivkC+WJQ84TPhWeXY8xn2eSLqOZWlJiLaBciDI8nUcta1PYwbLsT NJ/OZ3aZZJ1EVrUio0KVUanMqVRml8mzklJBXCKIy7KSypwSQtzuNj6bPbp0 YnJrRXQkGejyu3rsZJdF2W2S95vko2bFhE19yEWd8+quFhru+ph7efS8k1pw UUseet6rmPfKQUAoiE0Wi1SPihSLfuVSQLUcVK0Uq/jhwLzID3gS0T5N6WfZ JEo+i5JrfO4JuQhgEqbmw9TdOHs3YbiZ4K7G2AtR9mxEfzbKHi2mj0f0UzFu Jm48Ucwcylcf8ipPFGhO+tRTPvV0ik1mUpqyCadtuaft4nMu6cU82VWv4ka+ 8r5fPR9QPwyoFgKqxYBqKaU7CfZKmD5WpN/mpsvUEltOJpMlkOdKpCKJSCaW KERSZbZMkSmTZwCY4AKtlD+SpZILGVqp0yo0KhGACRwN8Nxrou1W2mIiNSqh WpHN0jIAE7NB7bExXru+0MmF8m2RAoffbXIZKSentTIajpQzKjEpzQY2UYoE KkkmpRKRylxgEwATipCYONKi01h1agujseoJu4Gyc6TdSJr0KgMt46MStWJW JzUZ5FazymakzHqNEUBGp7TpNU5O4zZqnIzczSryDIo8VuZlpT5OXsDJIw5l wkOU+7RVRUy1n6kqoKvyqdaIsS1ibA0ZWgL65kK6uVDbFmC6inm7pCesBSoB wQZeIrsE+SmwATwBtYe1QCUtxSQwCJAIMk1gD8ACPFKTLwPVFSiAViJ2YcIt bIxQQw3u3YOxA+Plk2Nlh7fVTo5XTgyV7N5UsmekYt9YFeDJSEfJvvHWzpqA m5WY1JlmItOkyQROiXjYulh+TSSvKuSpDudVBJ0lRaaGEm9zRQGwSVnQZqFF Zq2IbzwhczlSbAL60CnNOpWRVrGk1MQobRxRFitsayhzWXR6UszRvBgix2Mj WxtiPe3l7U2JTV0VWzfV7x5vBTbZs6X90K7eE/s28b7JoZ/Y5HRqMNc/zyZX ju+4dnIXsMmdswe+OL3v8vEdcMHxiQH+VofHEZ5s7qsOexmHQeq1qgFPfHai syG8O9X5Atq7uXX3SP2escZDOzpO7u37Od8EqASP6vpiZhsaJoxjTTChAI9g NsHVXAhMMJvgdvh1jkk6myAkefHgDNKrhXMIT5AJkp6l+Gn9FX65broXened w7JOn2IOKvRKd0zQL8VpJrhRHRVc4V549AyPy6XS66NwoCEWulV6EwoOT8R4 ks4m67rvsbGCc+pxszyyTtLjGtNvmx4Qj0cQrwOf9PldH6+Bzz6HYxZRDiOq 7EJ4gidxITxBOSaoR/6bd3fhJFwJbPLf366BEKT852/5aq6//WoxHU9+eD8H ePKvfvDZWBtrY/1br5dzJ0/v6zyytX5LZ3hzR2jvUPnFIwO7B0p6azydFY5N jQXbe2JNcSOwSUVhbmcZfXZ/3aXDzTenum5NdQJH8KHtF4ZWr4yuXd8MDPL6 7s6393d98ETu7np5e0fq5K7Pggn2TfDEYFSIhWNTUBc8XIDKtPDoYIQteAYX LvFCeIKnfqGuExRogo64susDnlwcX7449uji8MLFoQcXBhfO9T061/PidNdX 5/p/c7jl5abIkzrnywrbL2rcn2WT7xs9P7b5/tiW/02r94fe4v8cK/kHvgli k6dJA2aTr0pMX330Td4mjW+S/GDhFyUGAJPlMPkwCI/KSl5B1YJfOeeTzvlk i8U8m6wm9HxeYZxZjPE1XXNRHkzuwhN7mLoUk1+JKb6Iqu/xU610q2HD45Bx wc8thqz3Y45LQeOkQzVAZTWKM+pUwmpFdrk0s1QiKJNllSuFFWpxBSltMlG3 d47M7d+2tSw0UZscjhZss2p2WtX7XdqTBYYLIevNqP12zH4/yM359QuF1KKP WPaqVzzKVbdiPk9+3yOdy5MBmywWaRCbPCyQgRYK5Yt+xVJAAXiSIhTyA56E qbUwhfDkObBJhH7593oR0z2P0WsxeiVKL0a087wxpLsd199OGK4njZdj3NmI YTbCzkbZ46lSrukYdypmPBlkjhWSJwrJqUIC2GTaq57OU0575NNu2bRLNm0V nrLmnrGLzzullz3y617FF/nKOz753QLFfKHikV+5ElQ/DhFPwuTNiPZikAI2 2enVV1EyuzBTn50pFYrEQlGOWCiUZItkAqlcIFdkKGTZCExk4kyxUABsQmok RgOp16koQgriWNJuZW0WvdPOAJ5oSbGWEKUmA8uATfKdBj5cw2UM++zRQids nBzpNunsLGnSKoFNKFmORpKllvDVXMAmWrWYUOYCmHCsxmqmLbQa2ARAxkyr OH6AsIyj5XBbE6vkGBmAiYGVm00qm1XjNBJ2Fi6Wm7USMyW20WKnTuqgct06 sY+VFhnlIYsy5iBK8+iGENcU4ZpTagqxjQFdQ5G2JUi3Buk2v7alkGwtIjoD 2t4wOxDX98cYTCWooAuxCcITJDjf6FcDmyCLBIFJc5AAGKn0iMucwnJXblWe pNYnhzNhW05DmNzSXnBwvOzItupDWyoRmxzYXLVvtHzvSDlQCbDJ/vHq8e7S iZHG8e6KsoDRoROaNAIzAcr0GKSlRdbm0qL6eD6ACUBKZcjeXO5rKve1Vweb ygo9RpWFFgOecERuKnfyJzbhtHJgE5aSwj9KZ3NlWazAoJXoSSGACUvlcrQo GXF1t5V1tpRs6izfPFC7Y6QJ4cmBHd0ADjyYoGqulND04H++pgt0+dj2G9MT wCagm6f2Ap7MHho/d3QrCnYEQgEAGWovzTMr3SaFyyh3GWWlIetId8XEWMuh nd37t7QBm0yMNhzc3n5iond6b//PsQma04XwBGXE3011naxjE1TchUyTT9kk XaiyC+EJApM3D2ZffPRKEJW8fHiWjztZ4pPi361c+mrtGm5a/zSXJP1MOpt8 Vp9te/+0fyR9wjBmE9TDghvGcadJ+uBfbIKkT/dFfxsKi8fZiOtcifRI9/QQ k3UGyqeDwtIb8NMbWD6r9BAT1IaPzqcnp6RHN6LzH3tkUmmJv5hHQ7fgCPSR bqCgocFwxHiC9f1X8ygPBXgEsQm68r9+t/Jfv13h+01+tYTwBKWcwOZf/eCz sTbWxvq3Xs/vHT93sHdqd+uu/uRYWxCOZw/07B+p7K5ytZZY+uu8W7siHeU2 YJPqgKS32gBU8vDiCGj+7MDDc4OgJd4uGQcGeXNv9/v5CRDfSHJ3F+ooQY4J 6LP9JjhIMZ04kP0BxIHZBFAFXYlhBO3TUxpxEgoyRxCGgBChoHIvRCjYPXly eezxpdHVi8Orl4aXLw4une9dvtDzarbz63N9v9pb96o38LLe9abC9nW167Ns 8ueW/L92FAKb/LbR9U17wZ83RYFNXq5jkxSeAJg8LzM9SbCPY8xanEV48r40 FRNfZnpbanzzMfTkRSn3JK5bCpMLIc1C+OP43IBqvkD+oFCxBA/MwCZx/UKI WozpHsV08wAmER5M7oRI0LmE5HxCcj0mvx1VPYwQKyHdk2L9atCwWmx8FLbN RazXgsYpD7HXKO2hhK2qzHpxRq1IUCfLrFdkNaiy6zTZNWrR4arQxd763Unf kfr49pj3tEd7qZD9ImS9F7M/SNgXEtaFOD9u60GQeliofFSkXPYrFgukC/mi ea8MwGTeK3+Qr0iVdakeFSqBShCbLAWUwCYIT1ZDxAc8CZNrKTwBAZi8+IRN nseYZ3HmcVy3EtMtRpn5mP5+jAeTW0nuWtJ8KW46FzPORrnTUe5khD0R1p+K cqCpIDMd0E376ZkCYsanOeVVz3gUPJU4JNN2CYDJrDX3rF180SW96pHfzFN8 4VXezZff9ykeFihSn0i1GtA8CRI3I/TlkBbYZFc+W0XJrdkCYBOFSCKTyHKl gCfZQkmGQiXQ0kK1UqiSC1N1XHxZFzJNEJgApLCMGsDE7TS5HEa3k/W4DAa9 0pByTPRaqc1EFriNPifnd5sATBCbpHwTyqYnjJRCpxQhNlGJM9WybGAThpTR pJShFRaT1mbRAY+YKCWKXDRQCvRobTeSNiNhYhWAJ0ZWYTGqbGa106B06OV2 WmIhhRYyx0nn5rNSn17sN8njDnWlT1fnZ5uKTW1RW0NQ11Ssaw2z7RFDZ5Tt irBdYX17gGot0rQVqDqKNH1helNMPxhl+qK6dDBBXSftfjUWEApqQmkPa3uS BhAQSkORqtorLXXkxC1ZJfZswBNAElTc1Z1g+6qt2zqLDo2VHvsIJvtHS/eP VQCYwHH/eCUyTYBNJkbrdw7V7t/cMtASLbQqjeoMCylw6UUmTWahVd2Q9DYk 8sv81tpoXm3U1VJe0FDqba8OdNSEYgUmBytP801kKTZR84kwBsJq0MB3aGHV 1aXF7Y1lHhtt1Em0qkyDVgSQUuBh2psSvR0VwCbD3RXjHyu79m1pP7ij++T+ Ib4jHpkmB8fOHuJD4f95NoHjpaPbrp3c9UXKOrl9ZhLw5Or0bmAToB7EJsf2 DByd6G+rDdlZiZESuk2AJ9LSYsvWgVr4A/Zvbd8z1gia3Np6dGfXScCTia5P 2eTKsVFkneBhwgApt0/vuPdxkjD2ShCbIDzBY4Q/CylokjAQCsYTnk0e/B2V IH25euX96mVgEziivHgUbpIOKekZi+vKutYFyqfP+1onjBi4dz79tum/Jd03 WdcLjzEBGSIYMeAl5hoEINi8QGCCEAN5H3gSV/ooLdw+/+lwMDz+CzERpgmc 5448FNwsj0kE96ekT/TCkILwKj2WMWUDffBBUPAiLtzCMfHIQ0FCJV7pkfGI aOAtoBLEJrx+t/qBTZB7AsT09Yfek3/1g8/G2lgb6996LV+fvHC4/8xk98Hx GmCTHb3xk7taDm2uBSppThgH6vO3dUd7azz1EX1NUDpQZ7o72792ayc/Sfjq OJqCBQ/8z7/YhjpK3s19YBNEJSj3BI7/mE1QpRZucket68grQR0liFbQW4hT 8B7XbiE2gR9Z+ThADOEJZhPUaI/cE2SdPLsy/vTS6LOLo88Ary4MrF7ofXyp 79XpznfT7b/cUf6mu+htvfsXVfavq+yfZZP/7g7+rcsPbPK7Rvdvm/O+7yv+ st6xzjd5UfV3bLIa1SE24VtOQGWmV/xI4Q9ThUGrES0fgx7VrsZoeCAHrcbp 1Qi14FcCniwE1PAW/5QeoXk2ifJsMhf50AgPbHK6VHSmVHwlKbuVUD6IaVYj 9NMw8zTArgXYFT/3KGh8ELbcjVhvBI2zRcajbu0ug3REk9kjyWjJyWjIyuiS C7qUmRNe+ly1/3Rl0YX68Ex5wWKQexI2PQ4ZlwPs/2XvPp/iyNN9wW/LYMub rMryRUEB5b2loArvvYfCScIJKwkJhPBGEiDhvRUCIdt2pqeduqf7zJw59969 G3fP3Yjd+3rf7h+xT9YPZdeAus/diI2YeUHGNzKSrKyCVr+pTzy/5/fsmYmx 6fsOfM+BbZgYy7rwRU3IU9XlufhLT1SXVuIjkE0QTza1VMgWqEobCTzZNlC3 DYCUyB0jdd9C9MgTQrFyDgP5LZs8JzQHNhHsu4j57xtu0ZpbNO+WPHFJHrtk 0y7ZuEs24pQNOaX3LfiAmT9sE43YRMMWYr7JoI4zoueM6NijGtZwPH0IbBId MagIH4kKHVOETUZHPFRGzsZT51X0BTV9TUtb19K2dbQdPX3PwHhmZB4amYtO fMaOo7pJMoequHpJFhHOY3IYNEZIROiVsMthlEscLFQqo3PZEWxmOINGCAUu eFwqwISP0QAmwBO4log4CrlAFSdXxYnV8RKpmCURMuRilpBHiY8R6OOlpE2c hli4iJNiqBEebIIzwjFqCNiEGvIJlx7GZ0eKeHQ+h0LWTYRcYiyjCKOJ+Qwp zpQFtsNVyjCljCsX0sW8SDE/Ui6gRgkpcRA8UskPj8PD9RKaU8n16UTZVnmG SZJpEGSbRNlmYa5ZVGiTVnkV5R5pkY2Xa2DlaOk5GlqOllpkZJWY2KUmVrmZ XWPj+e38KjOnNOARtKAL8QR1miCSkDUUYllXYDVXjomVrqWi+kimnp5rPl3i BWbxp0a3FRru1LjvNnnvXvMRuZ6MbNJV5+mqSwKb9DQm9zalgk1Ol3U1Zrb5 03tv5LXUpPos0mjeVbBJnJDYYheunRo8zRGb5lACTFJs0VkJqnR3XF6yoTjd luMzquVsgImEGxbYPJki49GkPAbYBFgH/4DAEwmfBmzMy0jwunQyAYXPuoKz r+KcqzJhZJJLBTapLQGeJAFPrlVntAb27OpsKgA1DHTVDHbVQoAnY4GJ8P9f 6yZzg+1PhjrIzA51jN4mFnTBh8AZPh9+S19HjdskF7EvReGhIvZlpYgC/2lt ddkdjXmdjTmQ7mt5t5sL+9tKH7T/xzYBmCCbLI+1rQQ2E0ZFEzRvkayekEHr u0ihoMVdyCloky7gCcAE8vLvYfJqa4LcSRhsgnjy2bPHqIASvG0XaYrzC73O 95KQPe9ndHOmCz54SMrv95sgoZzZ1AsVUNDaKnJOIrk3F1kKQcUOtMkw+mRS LsE2IasnSDHnV3aRzAleiEUaJ7hHHvXFB/8YvPqLXAAWrJvgzyElgniCPII6 UMj82uQeNDKebJZHFRYklL99exBsE8QTJJSL+SYXx8VxcfyHx/pU6+Tt8vHe 0vttuTdK7S3lzp765N6GFH+uoSAx6nqpvavOV52lzXKKUozhVemSxeHyk5UO 4MnLABw+2+z5dL0raMkWkKT9XWB2CagEJWCTTuJV1HVy+jBxjQoln250o22E QRD7gekkaEw82vuXsE9gpRbCBdqJCzWSoCmK6A66CTYBdMDbUXcJepXcVZjo fw98+NZkDeTwccOz6brjqdrj6drnk1UHk6WH02Vvhgte3sn48lrCu2Ldpxkx X6XFfOGLApggm/wZbJIke++V/ZAs//e6hH8rNf9YqPk+X/NdofanSusX2bGn nSbJ8uNATpKJfpNXgbz4sKbrtVf+2ht14pVAXiSKjxNFRx6IELKmpWybmMSW XG4BfCc/dPIh+3bOtpm5ZWLs2TiglV0Hb93EItZ0ufBNJx7gCbZi4y5bOePe 8Alv+GwSZcnD2HITm00dO/j7WvaRCT+ySA7Mkl2LbNMqXTWL503ipybxYz0+ pcbG4tjDcawRFWdEyx/TC0YNotmE2DmvaiYxbj5F+9IoeGXgn+h4xzruiZl/ YsePbbw9Kxv+mG07a81MmVVdnoj5ZDL20lJcxKqKsqamwnklPnJVFbGuoaxp IlZUYZA1TfiqOhSyrg0nbBLgCbF0yvL7NhEcuoQAk12XcMcl3kiQrCVInrrE sw7xlEMy6ZROgE1csgcOab+RN2DiIZuMWkVjFuGAmjmq54zpuWNa9oiKMRJL HY6JHIqOGJOHjkeFTUVHPFJSnsTTFlT0JQ1jRU1Z1VA3NdRdPX3fwDw0sY7M 7AUH/7GN16fjNcfzUrgUFSVUi3FkAhGLxrgccvnK1U+ojBBcEAk2EfCBJ5Es RhhgRIQzpWKuEGfiGA3n0cVCtljAwjgUAItChscphcATsm4iwWl6tcygkmlj xSaVzGmMA5sYwCYynhSjw1dlCUYXsCJ59DBW5BVq6CcAEyFGk+BMjBVBp1zm cSlyKReEIuDRcIwq4tNlQjbYRMSnKqVcpZSjwGkSTriEEybHwuVYWCyfGOBu ktES4nnpZlm+S1nsic+zyrKMohyTqMAqKbSK802CfBOepaVla2n5emYRYMTG rXTwq52CEiOzyobV2vmVZna5gV6mp5XqKFVOnGx+J2sl4JQKB/9DAYV12hdv 4Wbp6RlaapaBAULJA7k48doUxbVsVVeZtb/BO3wjDTLYlNzXmHSnMQlsMtia Mdie1XcjtaPW3dPg7W7w9jT4eptSugmbeDvrfM1V3nZ/Wps/rbUmpTRTb1BQ ZexPACZS1idR3Ev6KDrYJM+n95rlSSZZslWRbI/OStQUpJgr8jzGOFzMDgGe yHgU4ImES5EATwB3AoYYo8gF4BSakBvpsWuKc71SnCbkhAJPIBz6J/HR3OJc T11ZCrLJ9ZpMsEl7wCa3Wkr72olJ7hAAyGgvWtN1CpO/s0mgTZ6wSW8DaROA ycxA65MHN58CSQbbZ+63QVYf9s2NdE7dbxm+TRhnaqCF+JxbDXWlKYZYYGxo jCg8Gg+NE0eW59ibazICNsntbMq9db1goL0M1U1GusrAJhO3qqbu1Jz2mww0 nKpksAmt6VoabUVN8WisCbljMARNNjmzxGsPXgKbzBMeeb7Yj558Nn/vaOn+ yerQ6/WRt5ugkrFglbzenoTAj2gUIxmwCemLYA58dFFW8CIu1N6O2urPvB3R IHgy45l6yv/MPl3kW8gCCtkCj/b7he/25LZXweu4kDjQn4229kKrrcjB7sGb DweziGw5CZ5Ef14owT3y5N7CqE0+eL58cEM9egwuyIVn6L8l4KbztZLgefFb 5H2yTT7wmWhe5GkTSuCZ0/EoYJP/DH9SwCZk/uULouvkH/3F5+K4OC6Of+pj dbx6+nbOUFvq3abEmxWW5hJDR5W9t9Fbm6vO90gBJiM9Jf48Y5qVn26h1OdG zw0UgU1erXW9Xe9CoCBWXv3a6t5O9JsEbp4J6hZ5t96FrlEL/KeBgFzerNx8 tdT2crEVcggeOZ9AfYQcZYIqKWiaCdqDi1zEhTpKzoQcB49ssjlRvTFetfik aWmuaX2mYfth3bPJ2jejlZ8Nl/94t/APLb53ReqXKZJPk0V/TBb/0Sv8S7Lo X3zCbxzs7xL4P6XK3qfJ/1ak+c81tvcFqh+KtN8X677Ii/+6VP/HEt2bDOWr 1OgXPvlRkvTYKwOSvE2LeZca89oX9SZZ8TZZ8SZJ/sojJc6+qJfwmEe8b+fv 2Xn7Dv6uDdswMHet2HMgDLw9UQIXkC0He9POWrcy4Lzv5h0k8Lft7EM3/5mL d+DgghF2LawtIx2yY2dv2VjbNtaug3PgxCD78AA4AmJhETEzIbsmxlMje87A emJkL1iwJRsfAhfLDsGKU7jqFC7Z8QUrD+4sWnkvjZy3ZuydFX9lxo5NnCML dmzDD+z8527Rto2/rGc+jg2bUFye01LnjAzI0w+ZN9IXjPRZTcRjVejjuCuP Yy/PqkIWdBErJuq+iXkAMTKfmVhgk6MATE6Hm3xoPCHi4O07hXtO0a5TvO0U bzrFay7JikvyxCmesQsnIQ7xhFMy5hQP24WjZnzMLAgEHzVhY0ZsHKiiYw5r GUMa+gM1dVAVORgXMRgbPqkInY4OexwTPhdHAZisaBlrOuaqmr6mJvYZ29Yx d/WsfSPrwMxedGAPTYw7Gka7mpMnptoxqpHPEjGoQhadRY+gR17hMq9KeGFS XkiUmCPgUok2EFoIXMRGCTSxUl28PEbGB0eAJuAliIhHdFijSX8ijMJnhSll mNuq1sdLTZoopzneY9fCGZwCjxHAEbC4HAqQh0ENYdCusughOIci4tHgvYHu bEqUiBkjYUUJmfBFOlrIUorZShFDjkUIGZejsVAF96oSuxrHD4nnX9UKwyxy epIyLENHQ93ohTZekZ1faMXyDaxSG7/SJSqzAzF4JRas2MwFelSbWdUWVqWZ WWVlV9s4lRZWtZ1bBRdWdrmFVWphlpgZkHI7t8wGBmFAyu1YrUdU6xHDJ+Rq 6QHacEvM/FILXqDnVDiFGfGR2XpGdZKsKlHqT1EMNHjvN/oGGn33ryU/uJE6 3JI+3JYx3J7Zfy35XpOPzN1GLwRu9jUk3a7z3KlPhB/RdUdNQmdtYpff112f 0lHry0tUiuihcs5l4ImYc1nOC7WoRNk+c7JL43XIEyxCOCe7FJleVX6GKdkd izOvCtmXosRUIRYq5IbCGeeGSHmRcj41XsaFgFlUUVhBhjs1wYBRQxQCehRO EzBDhKzQJLu6ssBTnueqKvQ0VqZ1XCts8Wd3XSvsbS653Vp2r73yfmfNUE/d SC+hD0QSMsgmCCYj3XUPOmpGu+tObdJ34/HdZsjMvRZAyuz9NsjK5O2FsZ7Z 4Y6ZoZvTAy3jgdnxA101PTeKC1KNKiktihcCMIkheEIpzrDeDCwwg4CV7rSV D3WXDXWXPOgqHuwsGu4pHb9TOd1fO93vfzhQ9+h+/cyDxtmhpqejNyCkTVDX yZkSCWAE7SpMvDR3a3e+D7Lz9M7+4r1nywNwPljqh4vDlfvPVwchR2sPjteH UKcJsgmoBEjyZncKzm/3poEknx/OgEqQLM4UMpAFzpdLSJKc2T0YLe4i34uI QXImuHUlmDnk5weXLcgE94CQC66Cl2+hL/9wgQo0aHEXuTEXWQ0JnjByZpIj KQikFbJN/qN1E9TnErz9LzmNES7I6gm5dovsoyc5g2ooaHYk+pxg75DPw3tR 5QXO5BhH9EvPJ3jvMlI9//anfdImf/vjLrpAi7v+0V98Lo6L4+L4pz72Zq8t DJVN38obakvrrLI25quJ/tMmX02OKi9B0tuYOnW3qr7QnGLmZVip9Xkxi8Pl L1c7wSZf7Nz+YvvW6ZZZH3rbiaIJkY/YBHWOnBFKsE1eL7cjnpwstJwPWtOF Fm6hEgkqpqCCCEIKqo+QQglOsE12pv1bkzXAk8XZxqXZhvXH/p2HtYeT1e9G y78YLv2pL//LawlvcmNfJos/84q+9om+8Yn+4hP94hV86+R8n4j/mCL9MT3q P5Xo/le/44f8+PfFuh9K9J/nxn1XYXpfY3uTrnyZogCYPE+UwPllYJOutynR YJNXXvkbX9TrRBnYBM4AEwDIM5dgx8IFj4BNDpw4nOEOqAReQgG8bNqYK0bq spGyaWXuubB9Fwb6eJ4AOsAPncSKr30re9fM3DEztyxEdqysPRsb2PLMiR0G GskPA8NEAr3naDtf9gpIxMxdNHEWjWwiJghnxYoR9y3cJTNxf8HIghzrWS90 TDgfG9nHZu6RhXdo4e3ZsAMHvmnFFnX0h8rQiegrMxrKopm9ZOXAed7InAeb GOhPdZTHcSEzcSFz6tB5bcSSngL/Iasm2raOCtkzMp5Z2CiHVs6BGTjAQteo Qf74N2wy75YSa7rc0mmXJGATyahTPGEVjQNMTPiYiQ8qGTNgo3ruSMAmwxr6 kIr6IACTQWX4VHTYw5jwGWXEk3jqopqBbLKiokE2NLQtLX0HeGJg7hmZyy7e dMAmHTpekZzp4NG0HJqAFilg0rgsKocZLuRFKETUaFGkTMgCkvDZkQAQuFDK cW2czKBWxCmEchFHzGfwWBEceig8gLPDY+W8aAkHLRxSRQsSHTqDSmbRRQNS wCZ2YyzaAVgiZKOOFSY9lEG9wqReYQNPqJe5jBAxFqkQMWPhy7OcGyfjKMVM SIyIEcWPlHJCJKzLEKKXRBRpUTASVDyfTphiEKUaRHlAEjsGKbByi2xYiZ1f YueVWLFSG3EGlZQDUpyCSoeg2soBlVSYmUCSGjvX7+LXJwiqwCZ2bqWDW2Hn lFlZxWbwCK3ASC+1catceJVbUO7AisysPD0NbIKYU2LhAUyKTDxIdYKkPlnR nKPpLbffr/cONiUDTE5zLXnwegrw5EFL2mBLGukRAAhIBAxCMKTC1l3thAu4 Dw+gl7r9STerPT31Kb0NaTdrvBWZBlM0M4Z/VcombCJiX44RUl1GhdehTnZF JdrEiTZpijsmy6fOStaCTaT8UCH7skwYKcJCxXzAY5gATCeky3jE0BOVHIuV sOOkHItGlpvq0EbjcF/MCRexw8Am8Gpeqrkk216R7/aX+m7UZoFNmmsywQt9 7RUIJmgP4eEuAiO/Y5OhgE0mbzcRNkEqudcy20/AZG6wHbI8cYvoix/rBp5M 9TeDTQie9DX1d1a31Gbl+nT6aJZSGG5UcqScK0kWeUNZcnt9LvpLwCb32gr6 2wsGbhbc7ygc6i6d6Kt+dL9hur8OAjZ5PNgwO3TtyQjYpHlhhNhMeGW8fXXi JvBkPdB1QqqEDDHxZO42wAQ8ggIkQSpBAZgQKtkYJvLBJsHVE4Inu6c8QTY5 U/gg8/v972eEQk6WDy67kJtufdQppHTOMwTp5sy8eLJ6Qu6jhSSCIEMWOxAo yHkowVtvBW/hRX6fJ4spwTYJnpNIPhzcgRLccoJsQs5SIdduBcMBzVsMXtyF Xj0DDdImJHbIDcF+J8H4gvzlq22SJH/7sJ8wnIEn/+gvPhfHxXFx/FMfL5Zv bj9sWByqnOrN665x+LNjK9MUd66n+HM1+R7pvZbs+dFrzeWuVAsv00aryZTN 9hfCW95s9Hy11wfECNiE6BwJwKQD9cK/W/+PbYJ+RDB5C/cDNkEhCyjBQQ0j SCXoGo1cRKu5UOMJqq2gizMhG+FRNwrwZHuqdmW2bnWmbvORf3+65nii6rPh sq+GSn+8lf1prfVVhvy1T/SlV/SNV/g9YRPhnxP537ux90nCn1JlP2fH/NcK E2GTPMIm78uMX+arvq+0/NLgfp0Wc5IcBSo59IgJm/jkYJM3yQqACZFA0eRl ggRy4pURRRMHn7AJfNV34odu4fMEETEGxSMmNhwO1E2AKsCNJW04ZNvKepZA lEv2bJxjjwBy5OIDPQh3ADqsxNKvXQImnH07B8wCJIEHXgRyDI/ZsedW7iFY wMzesmGbNmzDwl01spb1jBUDc83EXjdzVk2sZQNzJZAlPX1RS3umoT1TUffV 1EM988jMfW7lHZgxwNQOQMbEnlNTJpUhkFkddcXGXXPwli2ceQNjXk+f11Fn VWHT0ZdnYkMWNOGrRtq6hblhYayb6XsgKQN9z8Q4sLB2jYwtoIqeBmcI3P+w TRaxw/CeU7jrEO44RNsO0YZDtOoUg00W3NL5BNmsR/7QLUN1E7DJpFU0ATYx 8McMABPuqI4zomGNaJkjGsaIij5MbNIV8UAZPhgTNh0T/jg2ci6O8jSeFrAJ 87RuokF1EwZRNzGx902sJSf2yMLqN3J7TMLiKJYdo2rYVAmLLuYwcYwp5NPl YkacnKlSMGNkPKmAJeLRkVAAI9FSniZWGhslkAnZcB9swmWEwZnPCotX4HFR fIhShuniJD630axVOExxSU49OMVmUMIDxLIinIFjVC4rjEW7wqRcZlEusWmX +cwQHv2qgHlVikXIeRQZFi7FwmMEkdH8cDn3qox9OZp7VSOKMCuYHjXm0wvS jMIsizjfKS90ReXZpcUOXqGNk29m5puYRTZOuZNf6cKr3cJKB7/MCjDBqhw4 pNzCrbZzCZI4eaCSKhunwsqqsnMqHNxyO7sUVGJhFP0aVrGVXWrnljt5cC6y sEts3BIbr9whKLZghSZuqU1Q6ZI0psR2FZkGaj13qlxdJZaBuqTx1sx7dYkA EwIp104zcD0FFU3Iysgtf0JvrbunxnW9QNdeZgGPoAeQTXrqvWCT3obUW42E Ta6VuotTtUo8BGwi54dKsRAJJ0Sj4Cba4lITYpLskgSLGC4yvapUT1xaoipO RhOyLwm4VyESfgSqm8j4VAk3Qs6ngj70SiGQBHiS7NR5HRopRuHRroBNAlt7 RSQ748pynWCTqkIP8KTVn32jOgNQ0H296F57JbFqK2CTBx01gx+1SW8Dsb1w l3+os5a0CVk0mR341SbEnl0TvfPjROlkeqBl4u71yXs3Rm433r1Zeaul9Fpl WpIlCmyikdOjeKHReLjPpmiqSEUVHDjfbSu611YI6W8vGuoqG79dM91fP32P yMOBhseDTbMPrs8Ng01a5odPbbIy1oamMa5PdqCVXcGruYg7T/uQTQ6W+hFP yHIJgsnJ5ggkwJNftw4mg1Z2Qd7tP0SlE3L+e/Bird/aGfijQ0+QTVBPPQmN 4OaRj/atkJ/w0SaUYJucqaSc7w05s3Uw6lhH3+rJL+1nngm2CSkF8hmywnIG KcEbBQc3v5O7daFfHawPEkqoUILWdwU6TbbJVv3gosmZncGCP/x8zvf1w7/S T5+uoV25iCGMX57uIXxhk4vj4rg4/sPj5Wrns6ctG5P1M3eLb9e7/VmxRYmi 3kZvXb6uyBv1oKNg43FHZ50v3S4Am5SlCMc6048W2z7bufPFzu2TxdbT1Vkf 2t4/3+z8YqsLlUX+Z/JuDbWidCCeoHzUJoAO1EJC8oTsfycHL5J+OR/SJqh0 gnrh12b8gaJJzbPJqhdj5Z8/KP7D/aJv231vyrWvUkXvfIKvfcLvvULwyC9e wU8JvPce/o9eEdjkXwtU/63a+rdK8w/58d8Xan6utHxTov9TmeHPdc5gmzxP lJz45K9TFKhoQiRQNEE2eZEkBXqgWgmCCZCE5AmCyZ6dt2Vib5kZS6qwZXUY uOMoAT9244COFx7BCcSNv3Dhx04+Gl8IHnkW8AhRKwkMNzwm9uAlcgwwsXAO zexnRuaBgbFrYe/buPt2UAaIhrVjZsGdXSt728TcJJaHEWM+Ng1EA/6emrKn ouypqQd65jMLCAg7sPJ2bNi6ifVES3sYFzoZG/JQHTFnoK9asXUbb8XMmdfR 5zXUp+rIx7Ehj6KvzMWFLmoj1oy0TctpZefAxtkxM7cD69DWtJHL8aGBhpQI yIaOAvf3LKx90Jadu+sQQLbtwi27EGyy4hAtO8XzLgmyybRLMmYXjdiFIw7R uAkfN/LH9LxRLRdUMqxmDqsYo2oIfTSeNhJHGY4lbPIgJuxRLNEC/ySeOq+m L2mYyCZrGsa6FpTE2CEWdHEOzBz4jwWbzNg4gxZ+r0WMbKLj0pUCXhSOiXCO WMAEm8TKGOpolipapJBgaPkWyRCAiVKOy0UcZBYUnB0eI+WqY4SgEjhb9TFA EoBJgk3jdRk8dq1JEwVmkeJ0MY8m4ERijBAW9RKL8gmHegmjXRaxQwXMK0LW FWJ3KfZVEeuKlBuqwC7H8C6rhCEGWaQjluXT89PNoiJPdHFidJFLlm8XFTpE hXZhjolbaGUXmJj5RnqRmVXu4FW7BTUJogavzJ8gqgJNWLgVVm6lFYNUWIiF W5V2TrUTq7RxymysKhdWYmWexsaCFNtYRUTYhVY4c4rtnAILE+BTbOOWOvBa r7w5W91RaOoptfdVJQzWJY80pYzfSO/3J3aXWvuq3SPN6aMtGQ+upUBOYdLk 6w+ohFzKhYomyCYtxcaOCluwTYiX6n3ddd7uuuSehtROf3J7dXKHP90ejxE8 wa5KuVfhXylGRLPr5Wkepccq8lglyS5Fsis62RWT4dUYVXwx9yqPdYnPvizm hQu4oTz2FTGXGHci41GUYpYhTmRWSzUKvjqKl5pgiBYyMOplATMEbALPGGK5 RZnWmuKk2hJvdVHitar061XpIIW2upzbzaWDXbVDPXVD3f7fsslYwCYAE2ST iVuNaE3X6bKuwJoutKxrcawH8mS0C2zyaLDt4f3Wqf7m4dsN97trB7pqgCfV BQlugyROHBkrihAxP4FzrlfXUpvVc6MYeHK/o6y/rfhuSyGch7oqxm7VTNzx T90FmzQ87G98fP/a7IMbc0PNT4ZbFkZaFgMhhBKwCRoWDyRB23OhfboOnvTt zd/dfnIbgmCyt3AXkILWcZ0u5doYRjw52RgNnrqIcrrEa2cSNcWj6gmyCbk6 6/d33zq/f1dwR3zwsq7gTXo/+kZy76/f2eaLbIQn1RBMHghZ1ECPIQKQpQc0 O/786BPSJue3F4YE2+RM+8n57vhgbgR1kZwN2fYS3M5/vmgSvDqLHK1Cjno8 E+Sj4LktRHUJZPdq6f3rpR/frPz53drPn66jufB//fJiTdfFcXFcHL93vFi+ ebx0c+fRtcd9RX2NiQ25qnw3fqPMUpevLfYpHnTkb8919zSmZtgFGVZqiQ8f ak8+Xmr/Yu/uZ1u9r5bbUQUkoJJuyBdb3b9lE3LGYnC/CVLJmZAFlOCQNkEN 7+SmXuRQeOQUtCXXb9mE5AlqTtmaqdue8e8/rHo+UU6MNbmf/4f+vM/rrC8L Y9+kCL5MFnyfLPopCf/Rw/sFzgnYT0kCsMkvGYr/Wm7891r7z0WaHwvVYJO/ 1DreV1m/KlR/U258lxlH9psQNgm0nIBNUJBNEE+QPgAjKHANd8gLdL1t5qzp 6BsG2lJ86LIqbNfMPHbxX7hxQMeJW/AS4sJfOvETJ//EQQS9SsR1qhVQyUuX gHjGzju2cJ6bWM8MjAM9/cBMP7QyjwOTDY8d7CM7kec2Ftx8ZiZeheybqLsG yq6Gsqel7ukZ+wbmvom1Z+WCmDat3AUd9VF8+FRs6ENN5JyJMWdirhJlF/ay gbmgoz9VU57ER8zFhi7Ehy+pI5fBJnoqYGfbzNyxMDdN9HU9dVUbsawOB3YF 5BW+qotc00VuGKjw6raFuWsj2u137fiOHQebbNqF63Yh2GTJIXriEM05xY9c kkmHaNQmHLIKhmyCMR02oeeN63ijGs5IPGM4nj6qYo6pGGMq+mgcbSSWMqIM H44OG4oOI2CipgNMFtQM0iaBugnj134TE/vAzF5x42CT+ybeLYu4NJrjwulg E7VUpBDwhHy2gEcX8iKk/PAYMUUp50eJuWATMZ8BPAGbQOKjRZpYaZxCCGwB oSC58NnhYh6V5AnAJMVjBpIkOnTAE5tBqVGKokQsEUYRYZECdhiPfoVDBZj8 LzzaJzjjspgdAl+2ibCuiJiXpOwr0bxwoyzcEUtL0nJTTfxMqyDHLsx3iss8 stIEabFDUGjjldh5ZQ5+qZ1X4cTKHdxyJ7faza9NwIl4BPUeYa2LX23Hqqyc Sgu70squcWBwp9zKKjbRSywMgEmZnV3u4BQjlTjYpU4OpCSQbBOtwMYucfEK 7OzANac2WX6rynnP7wF9jLdmjTZnTrTljLdmT8H1tdTBBh/kfj3RaTJ8I23o eipk8PopT5BNgksniCe3/AldVQ4QSvCaLqKk0uDrbUjpqEnqqkvuqktpr0nu ay4oSTfZ4jER+xIgjhiwiIVFi2geqzjBIky0SZPsco9V6nVGg00SrIoYCRXn XMHZV6SCSBEvjM+5KuMTY+Il3AjQB6jEopHplUKFgJ5oU8EFwIRPJ0ongBcZ LyTZqazId4NNKgsSaoAnlWnNNZnt9blgk4GOauDJg86awZvVg90ftwmxoCtg k5Eu/3hvA7GB8J3rEEIod5sf3Wt+3E8IZWG0e360G/WbwBkJBWwy2tcEZ9R4 UpHrtKr4cuyqWkqNl1B0CmZesr6zqaC/s3qgvexuS9GdGwX9bSXD3VUTd+om +xqm7hJ52N/0aOD6zGDz3FDL3FDr4kjrwnAzBA06gZBbCiOeoJ24wCa7T/u2 5m5tzvai6gnYBPJseQAVTSBIKMgm5+smxPjFbWK3LjTlBGyC1nSRtQ/Ek496 4cyirzNFljNzFT9aN/no2z/6i9DfQNoEfVEPXrmE+uUhwS+R3SUkGZAUSJh8 tG4SvBALXZBPBhdNgptHyLrJmSH1wcQIHq1Crvgim+iDB6aQa71QzlDrzF8Y nOABK7/+47xe+v7lAgoI5c/vVtEmXRf7dF0cF8fF8fsH2OT1es/ezI1Hdwrv XfNeL9LlufiVGbFgk9KUmPvtuVuzXbeupWc6hJk2WqEHG25POVnp+Hy377PN 3tMttoic2uR36ibne+HffqiYoKAayqfrXcHru8iQQ0zIkSivPtwM7kBB/fLn Q9qEHHFC7Nk1V7836z98WH08Xv5yuOjze7l/6Mt+Vaw6yVF8liL8OkX0U4r4 5yT+eyfz50Q+ssl7r/Cv2TH/h9/x3/2O9/nxfy7W/lRq+Fud66dq2xf58V8W qj/PUb/NiH2Zojj2yoAnYJOXPvnr5KjTlpMk2ZskOWqHh5fQki1i7kngjPYZ RjaB876Dv2ligU02ddR1TQQE2QRUcmTHwCMgDpRXDj7ktRNHHoHAq69cApQ3 LgG8RMwKAZsYWc909AMt7YWVfmJlvLQxXtmZrx2sVw7WSzvzhYW4D+cjM/W5 MfIwkH0tdV9PB5vsGZi7Rua2ib1j4a6aWbOq8Km40IfqiCcW1qKTN2NmrBhZ izr6ko6+rGMsamgLqshlNWXDwCQSmGsP5y0jfdvEWNFGgETgvKgKXdYQKoHz hpEGKkEw2bGywCaQHTt/24Zv2QQbNsGaTbBsF4JNZu3CxzbBpF04bhMimzyw 4gCTSR1vUsub0HDH1KxxFWtCBWfGWDx9PI42qowciQkfVoQNK0IJmGgYCxr4 I5nLWtaqlrmqZQSt6frVJuuJwlkbp99ArOkqi+EmCFkmnK2WiaJwTMAjtsbi c0Jx9mUpL0QmYEZLecATFCSU2CiBXhVl1ERr42SqGDE8QGyxxacJOMTKLpmA oY0VA0yyUpzpXpvPbXRZVCZNVLwCB5uAXyRYJHwBBo9gtE94VIDJJRHrCo96 SUD/RMq6HMML08mYDrUg0ShLA5JY+Nk2PMeG59r5BQ682CUodeElDl5gqRVW 5eb7vcKmVEl9kqDOw69PFDQkCf0efo2LW+vGqh3sKjvb78LqXFiNnV1pokOK TLRiUImdXeXm1SQJqhL4JXZWuZtX5sKKHexCO6vAzoRzkYOdrA4tAOykyqpT pP70qJ4q28Oe/LH2rOHmtOHm9JGWjNHW7PH23LG2nMG6pHvV7r5qN8BkqCll 5EbaeFsW+AWE8uAGwZPBDwu6SJuQPIGgxV1gE7hD1k3uNKX21PtuVid21no7 an2tVd6exuz22qwsT7yMR9SYogUUMSeER7+kU9KBJz5nFPDEbRYn2qJSPfFp iWqtkiviwf/HKzJ4Eo8Am8hxKkgELdyKl3HBJsY4sSFOZNXIgSdROB2jXhZz wsEvYs5ljYKR7dMBT0pzHJX57hvVGa3+bLBJ7/Xivtby/ptV90EoYJPfqJsQ rSgdNcgmYz31RDt8kE0AJsgmcw9uPh3pmhvpBJvA+elYN5zRKEbgydCteuBJ W11OYZpJJaUaY9iQGEGYIZpVmmXrvl7U11La11x850bxvdbSwY6q0V6wSdPU XSLT964/GmieGWydfdA2N9S+MHxaN0Ht8Eglq+PtSCjAE2IbroBNdgJFk52n dyCgElQ9OVjqRyu7gqsnaE3Xma260JksmqARJ8gj/zN1k482s5MVkzNz4c/3 m5zf+Ou3Etwmj76io2704G4UVFgh+8TJ2sSZGgfphY/aJHjvL7RGC77tk90l v1UuIZ8//2pwleRMheXMoHn0u0ibkDwh14+dMdFv1U3OLiF7t/bT29Uf3yxD AtWT5Z/erqAf/9FffC6Oi+Pi+Kc+Xq52frp9+2Cu5eHtgoEbya2lpnw3vzBJ WpevK0+LHWjLAZv0NWfmuCXZDma2g/Gg1Qdvebd1+7OtXqJhZKP708AuwUQ2 IHDnJgIIWSU5Uy4hhfL6wyKuYJggm6DpJ8E2QaMYIWjcCUIKoANVTxBATncS /pCP1k2CczBXfzDrfz5d/WK87M1Q4Vd3s7/qST3KkZ9kSb9KFX6TIvxzqghs 8oOd8WcPL2AT4Q+Jgn/Njf0fjZ7/vcb2Q17cLyX6v1RawSY/VJjBJp/lxn2Z p/00W/UqNYYonXhlyCZvkhXvUmPg/DoAE8ImiUQrCgLInp0HAZ688MoOAkg5 TBDC/S0zZ93AAJtsGWg7RvoO0Z3BPgFoeEQnLhwVSiAvEUwCNjm0cp5Z2M+t nBcO3mu38E2CCPI6gJcTK3ZsYh/qGfta2p6G8tbBfm1jvrTQIa+sDLiG84mJ emKmvTTTjg2U57rw57qII30kUWcxMMAmu3rGtoGxCdAwMhf1tIexV6fjw+aM 9GUXfyVB8MhIW9YzFlSUJQ1tzcBa0TFWNDR4eJ/YcJi7a2btGBk7BggdsmqI 3LIyNyz0FUPkqpECWVCHblqZKFs21pad/SH8LTu+YcPXbYJVm2DJLly0C8Em j2yCCfCITTBuF40ATyz4lAEnYKIFoWBTemwazhrORDxjPJ4+RtiEMhodPqII gzwFmGiZixrGkhZsAjBhrmkZ61rmho65rWfuGog1Xc8s3EMrd80DDiK2Ju4y 4CUKllvIsIkxtUwYhXNFOFuMMwVYuIB1RYqFygQs0Ed8tCguSoAKJVFijlTA hJsmbYxJF0P0xUcLwSwyIbCFwqFfEfOp+ngpkCTNa83L9KT7bAk2tVEtj1fw oyVsmYAuwcJF7BAB4zJO/0RAB5hclnKuxokphmiOSy1MsShykzTFKYZCnx5g km5gZxhZOVZuoQtgwi+0c0sc3HI3v94nupYma0wRN3iF15JFAY9gcK6HCycH SFLr4ta7ebVOLsTv4FZbmOUGapmeUpckbARrJAnLHJxCC6PIyii2MktdXEix i1PkZINN8qz0XAvNn6Hoq3NNdGaOtqUNNCU9uJE8fjNrqitvoiNnCHjSkgEq GW7OHLqRMXo9bbI1c/RG+v0G74Om5LHWTAhhk+Y0eJJohL+Rev96ysD1lF+3 52pI6gsEbAIwIW1CmuXu9fQuvzdgE9/NGm9LZVJbVcqd5pKafHe8jIlRL8mw MBkvXMaPUAivJtokKe4Yj1XqscrcFpnPFZuRpDOqcAkejjEvSfgRYn44P7Cm S86nSLgREJWca9XKbTpCJfpYYZbPqlbgXMpVGS8S/CLmXhayrxKlk4IEouuk IOFaZTqE6Drx5/ZcK77bVjHYUTPcVfeg52P7dPU2DHXVIpsMf7DJQ6IdPgCT ey2PB1pn7hNruuBibujmk5Gu2aGOJyOdC+M9CxO9C5O9j4bap++3PHzQNtnf fL+rpud6cZZHHSuKiJdQ9NEsKeeKNopVle++faO4v63iXmvZXQIpJQPtFQRP 7oBNrgVscuPx/RZkkycPbiwMN6PVXGATNOVk+cPOXcCTzemu3Zlbh/P3duZu 780TJNmd70MLug4W+w8DHfHPlvqfr9w/DtgEhPJifeTv9ukKtMCjrbogqN8E 9cKf7zch5yqSTSXo+nxvO6kS8jE4B89zDF4Jdr7n/UzLPBnyfvAkRPgRfSxZ lEHWIL+loy/q6Ps8uf0vggDkzO7BZ0on5O5bELJBnlx2FayVM2AhNwc7P+cx eMvi4Mb84IfPL/0iO1MCk+J3Ak9uB+02jH7vVmDuSTBVPvz2L7b+5YtNtGnw n+Gf6A1RRoHzj28vbHJxXBwXx+8dr9c7Xiy3Hs5ffzpYNNKRfLvRVZOlKEgS lKbKCpJEvY1Jq9M3+tsycz2iPBeW4+Dcu5b0arX3xVLnm7UugMm7DYAGaoFv /3Sj7UO6T5dsBTTx+VYvBEARvKwLTAFe+GKrBwzyaqmVnMYIxnm7StqkDQUe eBUYB49CbthFJrjf5MX8aY6fXkc5enINcjjb+GymAc4oB4/rV5741+Zqn8/U vp2q+ma08pc7BV/XJ3yeGvVlsuxbr+hbr/A7L/6dj/+tj/etk/OzT/xzsuR7 j+AvGTH/Z13Cfyk1fZMW/XOB7q9l1n+rdv5SYftjruaLzPh3edrXOeqDRCnk 0Ct/kUzs2UXsuwUBUySITtzCE7fghRsHtoBHNi2cdRNry8rdcwsOkyRbdmzT xt10YJANO3fFzFzQU7eMrAM7/9ApOHTgx07hS7foJXxIQCWv7fxXNuyVjfva xn1j476wEkGTQYAkrwEyIJ0AWIgExh2inCTgR07ugZW5Z6Y/szCP7JwTJ3Zs YR2bmS+MjBcG+rGOBjnSUuFduybGhp62YaBtGOlrRsaSnvZYFTariXxqZCza uAt27pyF9chAI9pG4kPXNREgKYJINi6x4xbEwjkysw+NTLScbF9H29KH7poj dkwRm4awDUP4hily3RSx7WCu2+jrNuami7Ph4qw72XCedwueugVPXPickw+Z tfNnbBDBYyv+yMJ/aOZNm/iTBmxCzx3SYZBhHTYC0XLHAhmOo4+pmBMq5mgs bTg6YiQ6YlxJXYqNWImLWI2PXFP93SB7otnEwNo1siF7Js6hjb/kUj60yG5r +C1qbrmKbeVd1XA/iZNGyoVhhEo4EQJGpJBGlbHYKjlujJNqo4UQvVIcJwdf cHisMImAHqvgq2JFsTGCKBlXKmYJcAqXG8rhhAiFVINO5ksy5Od6CvMScjLt XrfaoBZEiSMleKhcGC7hXBUyLonZn0Rhl5T4FY0kzKqkZ7uiclzyXKcUkmMX 5tqEBS5pgZVTYGHlmRmQfAuzFIiRiDckS+p94uoErNbDq3Swq1zsWg+3IQGv tnHqXPyGBEGtk1efIGhIFFUGNt0qs7OrE/h1XhG8qzZJkG9jZZtouRZGiZtX 5sEhpQn8IifABIPr2lRZe7GuvyFhuDl5sjNnqisXzpCJjmwyIJSR1vShZhBH CmTwOrFL8FCAIcMt6SOtGShDH2CClnUNNPkgp+u7Gr33ACZ1njv+hNu17rv1 iXCGwB10k0hD6q26lFt1qbfq07v9aZ21QJWstqqMTn9egc8sY4cK6VflWIQC p7IjL2ljeB5rrMsU7TBEJViUyS5tilvnNCqUEiZG+0TMDQXCRAkoIvi/w74K PyqEFFUUWx/LN8YLLFqhzxXnMsvdFrk6miHlX+UxLuGcq1I8XKfkFWQ4irPd 5flJDRWZjZVZkObq3M7Gkjut1ffa/ffaask1XahDBNLfWQ3XhFN664Zu1Q/f bhi50zja1zR299r4veuQyYHmqfstBD3utz4GoQy2zwYGMi6MdC2Odi+N9axM 3IKLucH2mYHWh/eax281gnG6GvKTrQo5FhojCAOkROOhxhh2Q0lyX2tlz7WS Oy0Vd1rK+lrKJm43Pbx7fbrv2nRf48O7TY/vXZsduPFksOXJ4PX5oRtkswm5 rGvlA1XAJsQmXYECChoE/3yhHy7QWq8Xy4NkXq4OQU5WHhwuDz5fGUI9JkSt ZJeolbzemUQwQSFnLyKboGIEyALuB9uEpAo5SJEURzBkghd0/dYWxGfGoASP MgmeSn++8x3lTP0F1VBQUzm5dIpsMA/u2iCXRQU3p0NQKweyA7z0r98c/Jf3 x2ikO2pXOdN1fmYrMLRz1/kVXGc6QeAxclMytETtQ4ln48N0ks0P3ACebJIh h8WjKfBB00w2yWs0Ux4NQAlMPNn85Q+b//JHuAOfAL8aBLeC8o/+4nNxXBwX xz/1ATZ5udp+tNi8MlY+2ply70ZiU6EqPxEvSZHkJwo7/O7lyWvD3fklqYpM KzPdTL9V5z5Z7n650v12vZsommx2fbrZ+dlGx2cbNz/bbEd5s3qThAkxxGSj +8ud22i3YZAFWcXYf9xAAoS0CdqL+P93mzyfa0IkAZ6ggE2W5/yrMzXPHlW/ maj8eqjsp57cP9Q6v0xVfJUiB5t8BzZJ4n+bxPs2Cfvejf2SLPmXVPn7JDHY 5L/XOP+1QPunVMX7HNWfCw1/rbD/pcrxbYHhyyzV50XGr0otz31Ru27Rvkdy 5JW98MmPk6TIJi8ShKRNXiVHHSaIQCUbZjYIZTsw6n1RR1020JdNDFDJqoUF WbOynznw5y4hssmRQ3DiEp6g9VpO/I0DAkLB3kA+2ATlxIadBKaEoL15IfsQ y2mOXdgzG2vXRNsxUg/MDGSTIzPzyMQI2ITxQk+HAE+I91rYu2bWlpGxqqMs aiLn1REz8aFPtZQFM2vBwp4zMh7pqFOaiMW4qwCTbQMNfhHaBBhscmTlHgVs 8muri54OKtkxR26ZIjeNEVtmyqaFtmaibNgYG3bmhoO17mCt2pmrdtaag/3U xT9ViYM3Y8ceW7FHFuyhGZs2YVNG7qSBCyoZ13EgI0glOmxUh43pAje1nJF4 +nAsUTQZg8QGzjGRSwGYIJt8GGFPB5ug876Ze2DB4AyZdyiQTW7q8Vo938YL MQiuquRUpYwqFzMkfJqYTZMwGWCTOCkPbGKIlQBMNAqBXMAUciO5jBA+O1zE p0qFDFCJTMKWSzlCAYVB/4TLCZFLWXaLMjPVlpflzs10ZKfbkpzxGiVXiofJ +KExYkqsKDJWGK4WU40KlkvNSzGLs+zyDIsozYRnWQS5dlGuTZBl5mUaudkG eq6JUEmxg1vq4lUk8Ks9OECjxsMvszOrXNwqJ6faxa5wMKrtnGo7lyBJoMfE n4DXuPn1XlGjj4CMP0lYk4iDa2oSBVVeUaVXVOUTQ0AlQBJASmNWDJCkt8oK KhlpSZm4mUEkCCMoY+2Zo20ZZIZb0kibIJ6QNhlty4Qz/EjyBAmFdArwBAkF YEJ6BC5AKLdqXIRZ6pN7/RDgSVpPHcAko7suq7s+r7Mu11/odahFIsZVEfOq lBsmYF4Geli1Uq9DBTwBkoBNkl0aQIpaweUzLoFHpIEKiwQLA5hA5HhkrJSh jcHAJm5LVJJDCcn06Wx6oYh7Rci5xGNdkgkiYsQ0n1NVmuupKPD6S9PqyzOQ Tdr8BcCTWzcq7rbW3O8+hQlpE2J2/DmYoGVaiCcT/TcIngw0Tw+gAkrbbGDP rqdDHfPDnZDVydskT8AmU33XJ+9cG+mtb6vN9lkVoJIYQbhewYQLu0pQV+QD ntxpKQebBEo5/olbDZDJ2/XAE7DJ3P3mpw9aFz/0wqN2eMQTdEbru9BwE+AJ mgWPhsKja8jx0n3ACFIJ5NXa8Ov1kRdrI0erw8drRPWEaH7fnSaydy670+Sy LvT9GWxCrvVC4iA36SJVEnyTvCbVQDaDBK/7Ip8/Y5OP1k0+ahOy+kD2fQdP PyEnJ0LOVCVQ6SR4wRX6KHhX8I9wAaBAmwOjWYpo2VWwd4J71ckSzBmYkG8k SznBPS/BY1bIifCIG0gcH7UJGvv+l6934cn3n63CGRgC74Xr4JnyAaFsIZgE 8wTlH/3F5+K4OC6Of+rjzUbnq7Wbx0st24/8Ez3pD9pT2iqMGXZWngcv9IrB JksTTRN3SsAmaSZaioHSXWM/Xuw8WQZ6EOj4bAtCbM/1+WbH51s3Ud6sdny2 2YNU8vlWL1zAGTCyM+1fGS57ci8fsnC/aHGwGNQA9CAxgjzyMZj8nk2CYULa 5EzRBDACPIEglUDgYu1J3frjmmdTVW/HK/84WPpDe8ZXVfY/pMV8nRL1nVf8 XZLwu0T+t4nYN4ncHzw8sMkvKbKffJK/Zir/vdrx13wNPPZ9VtxPBfpfSi0/ l1u/KzL+KV//Nk/7pwr768z4Q6/8WZLseWDDLrJugmzyAtVNkqRHiZJ9lwDx ZMPC2bRxl/S0JQN9yUhfNNBAKACTLSfvyC0Cm4BQntn4YJNjJ35k5xFtJr9t k2MLh+h8D2TPyCCzazrNgZW5b2EATHYM1D0jjSid2NikTU4ghtMcmJjPLOwD C2dLT19Whc/Hhj6JDZ2ND3uqiXxqYDwxMGZ01IeayCl1xFLcVYDJMxvnyIGh zcFObRL4e4JLJzsWGgRUsmWhbtsYWzbGuoW2Yqat2wiVLFnoixbGopW5YGXM OXinKrFxH1k5jyzch2YgCWdCzw6Eg2AypmWP6rmj+l9hMgHRckbjqMMxEcOK 8DFl5HQ8dSqOMqGMWPmgEgh4BLKlI3boOmOTPRPniU0+aRTf0eK9FmmDRewQ hFokYdoYpjqGpYziKsTsaAGm4GFSJkvOo+tiRDZtNAQuZDidxwzlscOAJxgz VIBRwCYKORYdxZOJGVx2iFhIjVfyE+yq7DRHTrojO9WSnWJJtMWqolgSDL4h h8SIIjUSij2Ok2KW5rhj8z1x2Xa5T8vLsYoyTXiGnpNp4OaYsDwzv8DCL3bw Sl388gS8MlEIKQdH2FilNhbYpNLFqUng1bixWg9W5WQ2JokgDYlCv5uACZCk EfTh5tcmCep84lqvsNLDrwKbeIXliQIgSZkHB5vUZyjairS3qm3DzclTnVkz t/JnbxfA+XFv3sPu03JJMEwg4BHISGs6yZNAAeUjNkEwCS6dkHt2kTZBPDkt lARqKL3Vzp4qB/Ck15/UU5vU6/f11qX01KV116d312d0N+S012Q0V2WWpNvi xHQB/bKEEyLihGC0S3EylscaCx4BmyTa4jzWuCR7vFktBpgIWFdAJRDgCSAF LqS8MIWQolZwkE2cJlmyO74g0+ZzKRWiCDF2mcf8RILDk6HwQGGms6oouboo ua4svakqG2zSUpPXWpvf2VBy+0blQFctgklwSJsEV0yCbQKZGmghbTITmMOI dhV+8uAmwGRt6g4IBZwCDzzqb4EHJvqu9bWWV+a5bWpcKQyPlwByI5R4uFsr uVaeDja521Zxt6V8oK1yuLNmtBuEUgc2mem/DjZ5MtiCZi+e2aoLVU/AJogn KIgk+3N3gCegEmIu/EL/0eIAWTF5Sc6F3xgj9+ZC+wafzjfZmSJbTiDE4q5n M4ghZFM8wITkSXBR47xNyDnv5NDGM8NNgh/+qE2C9RGslfOvBrsAyYJ8F7m6 DP0NZ1rIERk+rI86LamgAZGICWQfPVrEBbggA0hBriGLL8HjGs+PgIeQQ0/Q DsNoTAm53RZZcPmQdRSyCBJMFZInaAR8ACNrZKEEYPLDpytwB+6TT/71TwAx cNnfVU9Q/tFffC6Oi+Pi+Kc+3m11g02OFpsPnlx7eCd7rDuz229PtzEzHez8 RGFrlf3pSN2jgcqy9JhUIzXdROupdYBNjhc7Xi4TxRGwyedbRAv851udpE0A JgRbNnuAJHAGqoAg5gcKgSQzd3JQ5u7mwY+Hs43gjvM2OQeT37TJGZggm5yB CbIJ/C5kk/1HdRC42J5v3Jr1P5+q+nS86g8DJd82p3xZYf06NeZPKYofvOLv E4Xfe/jfebjfJXDee/g/+0Q/eUXvk0T/lhP/PxoS/1Ox4bsMJaqb/FRk/KHI 8G0hxPg6W/VlifmzPN1JmhJs8iI56vB0WIn4OEEINnnhEqCttA5dArDJ80TJ nhMHnmxaOdsO3pqZtWJkgE0QTDYd2A7xJAETYllXYE3XsQN/bsNQs8lrO4T3 KrCgC4JWc53YMMQTYsdgE4sgiYFOxEjf+ZA9Mx1sAtk1Urd1kZA9AxVscmxm npiYLyHG0xwYGPtG5q6esaGhLMeFLcaFLcSFzwFP4sJmVBGz6sgZDeWxlshS XAh88pGThzYuPnbwADXEqPcAl1DpBPFk18rcIfpKiGxYGetW5rqNuWJlrNlZ y1bWvJk+b2HMW1mzJjqCCWmThwGbfIDJrzYheHIa9jhEy57UMiGjMREj0WFj 0WGTyohH8dTHKuojgElAJahcAiQBj5Ah13QhocyaJcNq3j2DqM+paLJJEyRh ZnGoJpquVXJUSmJGSbxUqMT5YBOcESbj0eKkmDoKj5VwwSbEii8sEudGCHkU mZgVo+DHxgjAJgoJU8ynKCQsbZwo0aHJSrbmpNpzUizZPpPHolTLWTLuVQnn igy76lHzUgzCZL3Ap+WnGQU5VkmuVZxjwvPMgkKrsNguKrEJi638YgsBkzI3 jmxSlSQCX5Q5OaV2dp1XVOcVNPiE9Yl4gxf3J2L+REFjsuRaqux6mrw5Q9GU Kqv28KsDGKlNFtelSiH+VGltiqQhM/pGXnxnmfFunYtYuNWRCQwZbU2duJkB F496cqe7suEmZOKDSkiYIIyQPEFCQWA5v6YruGgSrJJgmAQv7kI2IVRS7SSE UuvpqU3s9Xt7/L7uupTueoInHf6Mtuq06xWp1yvSk8zRUu5VEeuSgHmZzyBK J8Z4YaItHmDiMEQ5ibGMRBkFMIIzL4sChJHjkZAAT0LleES8nAX0sBukDqM0 1aPOTTNlJessWlyMXeWzLwu4YMkwpYSe7FIjm/hL01DdBGDS5i/oqC/qbiy9 11GNaiWkSn7tPemtO7+g67RoQqzpaiXWdA2cBvEEZWmsB2ACgYunw51zD25C Hg22Pej2d18vqin0OHVCBT8EeKKVMhTcEK9JAf8gAx3VYJP+1oqBtooHN6vG e/0PAzaZHbgB54XhZqSS4JzhCcre7G3UF49gAio5XroPZ3SBhAI2eb1+uk8X OXsRBQkFQk6Hh7zdnQaDwBd1+HqPOuIRT9D0E/iRXGr10c21gikRDApyh67f twlZ7DjDk4/WTc59sT9t5QjuTyEbOlBvOznBkBx6QhZKgkstZDMIvES+MbhR ndxZC/mCXNl1fhcvRBKkkvNBhZgPVRhCHwgj55ESzJO/fL0LL339Egj59Pt3 K+gO+S70GKqbIJv8/NUGWs0FZ1AJKqb8o7/4XBwXx8XxT318vnvr5Wr7i+XW 5ws3ntwvnLqde6cpITeBl2ZlgE1ulFtmBqtnH9Qgm2RamT21zqOFjufz7cfz LW/XOj9aNwGSEC8FhAIXr5bbn802jXekTHalzfblLg+Vro9Vbk5Ub0/VHj+9 EbygK1glwTB5udjy8ndtErwf13mYIJKgBV0Hj+uRTeBid/Hazlz90VTV5xNV X/cXf92U9EWZ5euU6D8lR71PEr9PFAJJfvBg33u4PyTwfkoSfJ/A/yFR+N9K jP/3zcz/rcL65zzN++z4H3I13+dpv83Xfltg+DpP9zIr/lW2CmzyLkdzlKw4 SVEcBAaXHHsCNnEHbOLCj13ETJNnbiEag/IsQbTj5G/ZMYDJop66aKCtWlhb Tt5ugmDPI3wGTzrwQ6fg2C164RKBTY7svCP4wm/DXlqxVzbstR17a8feOQI9 JqjzPcATNNBk38Qks2c+DajkmY11AEYwUDfUYRuq0C1N+LGF9cLCemlmvTSx gm2yq6VuqiLX4sJX48KW4yOW4iNmlSEzMVcfK0Nn4FpDmdNS4bwcH7qpo+xb WIc2DprzDix6Yecdf7ASyZMdYgMu9pads2ljr5npy2bGipW15sTWnNwlG3fB yl6wceZtnFkTY/YDTE5tYoZwp4zcwIIuDlrTdbqsS8Ma0zAh4xrGhIY+qSYy pgwbjw2fjot4GB/5WEWZVdOeaujrQSoBjCCPwHnPxIELhBS4BptM6/D+GCbY 5K4rpskqSZRFGPDL0aIwVTRTGy/SKEVgk2g+T8ZiC5nhfHqImBOpFHOAJ/FR fIWYLcQoMhFTGcWLjcbBJgo5RrSc4DQRFhEloOljhSlufbbPmptsy0m2ZCTq PaZobRRbjoVIWJdkrMtJ8ViGQZhpFKbr+alabrqGk65m5Zv4xVZhqU1YYuGX mHllVl45xI0DT0pdvDI3IIVf7uaVO7lVCXyicySR3+AVNiQJGn0CsMn1dHlD sqTMzi62MuEBf7K4IU1Wnybzp0iqfcJKr8CfKmnOj+uuMIJHQB+ztwsgj3vz 4BpUMnMrnyyXTHVmAUzgfvAKLiQRFFQrQTyBZyY6sgNmSQ8OqOS8UE4HxJ/T CuIJajlBSAnYxN3jT+jxJ3ZD6rzd9SlddamddRk3/enXKpJv1udU5Lq0CsDj JT7jElqvpZQwEiyxPqfGrpdDwCZAlWgRDWwiZF+FkDYBdEQJIuNkTJ2SBzZJ tMekJWoyvNrcNGOqJ16GRwi5IThAkh8OhNHH8osynahuQq7pullf1FFf3FFX dLe9ktjLN2AT5BHIR/tNULnkFCaDrQ8H24Abj/7eJqh0grpOlsd70dT4hdHu J0PEZMbJezfgkzubCspzHHY1HiMI08mZSn54nCAy2RrT2ZA/3F030FbZ31I2 2F451lM7dafh0d0mCCDlyeA11G+yHJi9iGooK4FG+DM82Zzu2nncCzYhYXKy 8gDOqIACF2S/ycmHaSZwPt09eGsCFU3QBVrT9WaXuAMSQd/tyeoJBGCCqifk FsFnKiZkJYWkBNkDQv740R29/kObfLSqcmbCO7mwCu24e6Y7Hq3jQqPbgQmI DEgWZPc6ue8uuUIM/ZbgmgtCB7nfLznKhNwTLLhBnhQKueUXiRr0gWicIpqo +GFqyTZax4WggYog53nyr9/AJ+yASv70av6b1ws/fr5GdqAgkpABgyCYfPsG /rWfQr57u/jLHzb/8vXFfJOL4+K4OH7v+HL/zuv1jjcbnUeLLUsjZQ/78gda fOXpcrBJQZIIbPJooPLJsB9skmKgZJjpXdW2w6ftYJPnT268XrlJ9JtsnO03 QQu60OR3NIsEKIGWcgFMtiZr9h83ACKIrbdWb57pN3m31oGE8ncw+V2bBMOE tEkwTJBNyNVcKARPFq/vzdYdTVR+Plb1h77Cr2rdnxcbv/YpvvHK3yeKfkwU /uTh/+jhvfcQ/SY/JQm/c/PeJ4n+rxrn/3O7CNnk2wzlnzJiv86M+2NW/J/y dH/I0YBNnqdGA0z+WGJ5mR57mCjZAUd8sMmxG2AiOA7Y5HTkItwP7Da868TX zKxFHXXJQF8xMzfs3G0Xf8eNA09AJcSCLgf+3Ck4tPHRFlL7hBqYR0bWCzP7 xMJ+beMCT958sAmqnhwFeHLaCP/3vfDPHVywyY6RuqkNB5sATHZ0kSc2zomV /crCfmVmvfrAkwMtbVcVuRUXsR4bthYbtqwMW4wJfaoMXVBFLOroy0bWkpE1 r6cDT4jhierwLT11DxBkZOzoaRCwycmHUg5pk10nBjCBbNjYRL+/gbZoYmy4 8TUnf8mBLTp48zZszsKeNbNmSJVY2NNm1rSJPWVkT5s+0m8yqqaNqqljKghl TBU5ER85CQGYnKqEOqemPNXSFvWMTd2vMCE73yGoxyRYK8NK1l0F/a5e2OdQ gE080jAN9xMx9xOFOEKlxLVKMdhEgRFruqRcqoRLiZNipniZRR1lUsvVMUKA SYwcUymFcTECuZQjFjKEOE3MjRCxw5RillklTUsw5PisWUnmHK8pzalO0Mn1 URwFNwRgAt8kUzS8ZBXHp2T6lIw0FbvAiFc45CUWvNSCFxs5hTpmsZ5RZmKX mzh5Rka+mVVoY5c4sQqPAMTRmCYL9MKLqhOwukTcn8Dze7DaBE6+kVLu5Pi9 oqaMqIZ0eZkbK7AyqryCcg+/Iglvyom5U2ef7MyY7cuf7MxE+hhvT0fruJ70 FYFERlpShm74QC6ohvKoJze4XBIslOBlXfBq4LGs8w0mpE2Cb360Qf5ufSIK ajlBF2CT3roESHdtQpc/qavO1+H3djek3/SntNamdzbltdVlpyfES7FQQAfY BHWRGOOFbnOM06gAmyTa4sAp8XK2gHUFgrpOUOD5aBEVbKJWcKxaEdgEkp6k zc8wQwzxXDE/VIKHi7khEOBJslMFNkHt8Ncrs1tr88EmnfXFkL5zNgGPoLpJ MExQy8lv2QS1nDx5cBO1nABMUBBPIMR8xpGup2PdY3ev3W4tu9mQV5hmihP/ v+y9VXAka7emd/ZuEhYzl0pYzCxm5m4xtJipuVsMLWwxM6uZNvSGH89/aC7G jpibufCETzg8YccYbyZsz3E4vDI/KXf+JfU+v89xxN4X+uKNjK8ys0oldV/k E+961/LVyGg6OSOI66US+6dGqFvLM+5U5wKYdDcX9bQU9rUVD3aUDneVj9yp mHxU9ewJFodHbYTJWiClTrDGwvge8GR78g7ACDJKCOsEXqLgCcYmK55sQhR3 eQh5KB8Pp4imW2jWCSGPtPuFqROPaYkX9gq+MAv/8yKzCeIR8uwPVNl1fow7 kYs/P0aEHGlHQIE6gKEvBj8RBU/IE9sJN8QjRUIUaBFgQryLXANG5OLJpV+k r7SJ6rUIPLnQPUE5dxDsgV9QzATei4Q4BQnABGVMfngNf/Ppr48nvzqa+PHN /O/eL/3SDz6X63Jdrl/1+rhz5/Va6/utzuP5+sWBgrH7mT3NCTX5+iQ7M83N r8jSDt7JnR2oLMvURmu9Y3W+9Xn6ncm6w5kmYBOAjlfLWJ+u18tNr0l9uoBN Pmx0AZug/PurpZaPm3cwlJiufX7WChj17LqwTxfhnvwEJrN1z+EldgbHkzM2 wUwTYojJFPDIKZvgewQmSLdRYy4iaQLHrael29O3N8dK9/pvvu299bEr/V2R /U2m7uuogG8jZb9xi34XLvx9uOB3EbzfRvC+d7L/ECP+IZz3uxjpf6iM+F/v 5f2bXMMPACZxim/igz7EKt7FKr5OVQGevM3UHcQFHscFfcgyHMcHbzkF204B sAkmjE2Eh/DSyQdt2ri7LiFQyUGUbMctWrGw5oFKjPQV6ymVrDm4K3i3rh07 f8vG3bSwN4zMFQ11ReO/oacth3mvKH021X7bWsqennpopB8BUNi5JwhMbDgL oB5ZVjbSvu0nHbt522basurGYtg1AJNtA2XXSHtu5zy3sV9YWC8AT3A2OdbT ttV+myrfDaXfapjPYvCN2cBrzwKuLKj81o3MbYdwxyVat/OWTMx5HdYfeEXt s6bx3THRtw20TR1lB74VmU3MzH0TY8/I2HbxMDCxsJYtLJxNqM901AUAExuA CW/axh03MZ/qaeNGBiAJTiXMYRNj2EgfMtCH9AwSm5yGTfo1jF6lf6/SrzfU ry/Utz/UZyDUZxC3S0bDfMdVvlNq/2mN/6wWa3S8hmsDG9fC2DIwt42sHQAT I3vHxNkysTeNrA0ja83AWFD5P5BT7gXSu7SCLruiyiZ3ir1DGX8lYn0h4lwJ kNA0wSKNQhLI44gpFBHTR8alaIOEhlCpWiFQBwrUwcKwQF6oghsSwAVCkUuY Ij6Fy/aW8/0UAopZKXEbg+OcmpRIY5Jblxyhi7GGONUSrZwhZ16TM69qZfR4 NTdBxU7WcTNMgjQDN1nNSFLSMnWsbD07R8fM0TFydXRQlpqSa+PcdAkKwgW3 3JiKIgRAH6d9usK5JRE8ok8XFnWPFACS5DnZcCyIFNSkh3YUmrtro8a60mce 5T57kD3akTrQFD95J2uiKwv5I+jYWx832o4ZKPByrCMdqGSoORnwBPXpQq26 iFw8AhOcSpJxYeQy0JSC8ARhCOIODypBJz3AhMibwBG5JyAUkO8oc3VWhHeU hbeWuFrhWBbVVBLZWhFffSu8tTK1rSq9sy6nLDdSG0SX87z5tCsi5nWMOIQU fYgA8ATYxG0OBjZRB3JErOuITcQcLzEePJELsCy8MoAJ0gazbTqxWSNMjFRn JZlzU23x4WEBQt8gCVVA/1LIuCKgXzEphQWZUcAm5TcTq26dlnUBnrRW5N5p uHWvqQD15kJgAvpch67zNV2jD36Kwz/DW3WBMCQZ6DjFk8HOhaGuxeE7s0Od 491No92NWGPhh7VAKDdT7S6tFP5HhQp8VRJKmMgnwR7cUJTc01Lc21rypOkW qLelcAA3UKYeV4MQnmB5E5xHUA/hhT9PxC8ONMJJIJT10fa96fsEmyAqAf3U rWsVg5Gj5T6ikzCCFJQ6QabJm51RVLiFXqLyLcQmaCYjekm0GkZ5eQ/3BI1K RIRC0MSF2fYL2eR8/t0DTAhjBaVI4AmfsE6Qz0LufEX04CUPZIQ9YAWZNYir KKUOXwn9CiiBQmALgRho1jzZB0H7zw2LR9+EPILEowDsrLMxfBTqFfxTDy6P 7IlH8ISclIf3/u2nbYJN0NU/fgV3IsFHLX33Ev75xgBPvjmZ+qUffC7X5bpc v+r1bqPxw2bzm9XGN6tNe1MVkw8zBtrimwpNmeG8TLegJDXsSXPq0lBNda4l VnsjWn2tLDlgfbjszUrH4XQdNqAEm1fS/ArwZKUFF2yasEEnyz+n10vNIMI0 8ZAHmxzP1ILIVV7oJMqVEP4IySi5QLvjwCYVSNuj5aCtp2Ub48UbI7cO+/Le Psn9uiv927Lw95n6ryIDvomQ/eAS/YhJ8KOb/4Ob98pM+028/FOM+I9pof+h Nu4/tqX9PjX0x8Tg7xOw4Pw3sYpv44K+Swj5MVn5Ok7xKhabtPg2MeRtUuiL mMB9l2TLLtgLl+5FBOxHKnbD5Rt28bpNtOkU7UbKtt3iTXi8dwjmDIwZA33O xFy0cVdcgmUnf97GmTEzp430aT0FaUrjO6nynlDemFRef6a+MaPxmtf7Lpn8 V63UDQdj08ncwwa7M47s7Ocu3rGDc2RlYlYI7oYcm/9McM+2nrIaen0l5NqW xhfOvHby37gEcMRqwyysY8AKvJPwphoIyGdD5b2u9FoLu4F0YKIfWZgg+PAT GxuDGjtnX+0H92MJegMWWoEfCpewr+HgHNrZB3bWno25a2WAVi2MFQtj2cpY smCNyBYs7HkLd9EpmrMLZqyCaYtgyiyYMPJGdex+E6vPxOw3swatnAEzCzRi 4w6amAMgAwOTnj6gow9oaYM6Zp+a1hPq3wN4EuY3EOaLsQkoxHtK6T2t9plW ec2qvJf1lBULdcVC2TRSdgzUAy3tWEM/UdMPtaxdDXPVwFky855Z4UcwHun8 2pX8drW40SjviNbWxWltAf5S+l8JOF8IeF8qZP56Jd8UJlJLWUEc/2AhJUxC 1wdxLSqxWSnUB3O0gaxQqb9SRg2T+YdKfZVyiiaQplHQjEq62yyMdQUgxYcH xYcHp8aqY12BJiU7WOwl5Xwp5VzVh7BSLMJ0myjdKkwxcRN0zAQNI1HDSDOx U/TMZC09SUNNVPunaml5Vl62lpFv5BTb+aUuEajYJSxy8gscvDwrK9/OKnTz Ctxc2GAB+bN4O4qTdBXbADSm7+eCnt3LQeVbAB1wcqQt/Wl7BhAHgAZCD1SX db4lF5DFcGs6CGXbB5tTz3jEU3CV7JsgAOkmDTch8OTx7ZiHFVGgJ1WxPTXx 6H5knXSVhSN1Yl6Js700HNRW4m6DY1lUa2lkS0lEa3lMU0lUW3lcS1lMQ3Fk bYE7N0Gpw7jvupzjzfP/Uki9qpQyo20quzYg3BzmNim1QSI5jypgevOZ3hzG FSHXS8C5IRH4hCqYmhCOPoxrCuU4NIJosyzZHZoTpytKs1TkuJxKcRDbO5Dj LaFd5fn8lZztnRKhr8hLyE92AZ7UlWU2VGTDsbEyp7E8va06G9gEYQjwCFHZ hTgFQQrofA/hP8vC49VcSKiZMODJwmAnUMny03sro/dnBjsAT2ZHuqYG2gBP 4GM76/Ky4q2WMGGomGoK4alltBChb0q4pq0is7u1pLu1uK+jbLCz4klTYXdz 0dj921OPa6a76+b7GhcHmpcGsfIt3DepXxhsWBpqBC0PgxqWBhuJcScHsw8B RuBIdOtCjgmq9TrBvZJDUrcuhCfP10/ZhOghjFIn5DmMBJUASqCWwugGhCfk iSdIqAaMGIBCGCUexOFxnjzKhAwsxHkCTDwGtROFWB6FXh6T3MnIgFiA3BMY bkCpeTgSXZQRlyH3hNwWjAANgkrQ8ETCQCFPKjk/Pp48IZH4nDMzZY3wRBBf eAAIuVHwGX1g7YLhDOIadJK4SrydHGP59AJY8tkv/eBzuS7X5fpVrw9bzW/W Gl6vNLxabjiarZ56lNnXEttWarsZJ82LlpamKR81Js8PVFVmGeN0XjGa6yWJ suX+oldLbYfTtf96NvGImSD08MAQpPO08jk22Zu4fV4XssnmRAmwyUFv7psz Nnmbrr2QTb5ycf+QHPhDvOxPGcp/bEj8T3dy/jpD9X18IOjTqYKREJtgYxZB sXAMAu24xCAAE8QmACk7bvm2Xbjnlmy7RFsO4ZqVN6ejzWipwCazRgbwyKSe Oqb1B41q/Sc0PuNqn3GV96Ta55nGd1rjM632ntf5Luj9lvT+Kwb/dRNlw0zd tNAOcRAA7jiVlYXwASMICyaCTXZNtC2dHxAHaFdPgUuvHDwAk1d27isbB9jk xMQAxDjSUbc1vtsaP0xavx2t367Of1dHOYIPgU+2sBCbIB3jPsuJgf7CzHxp Zb/AgeXEyQXBtzqws/dxPAFt2NlrdvaqnbViA7EXrdwFK28WF8YmVsGURTBp 4k+YeAMmVo+eBgIYGQQ2ASQxMvv19H4drV93SiUYmGBiDKjofWGU3hC/vmCf gRCfoVDfsTC/CaXftNp3VuO3oPMHMFk10i5kk30140DH3rQIli38STN7wEh/ YqDc14m7tOJGg6QlPKwqSmmV+8qZf8VnfyETX1eFsE0aEZCIKVhoCODpAzna ACZIr2BpA+gaOV2nYATyroeIvNUyf0Mww67mhhvFESaJy8gPNwuj7dKE8MDU mLDUGGVCeEhiREicK9AQygiReAfwr8o4VywqHrBJipmfbMS6BCM2iVfRUo3s JB09QUUBNknV09P1jHQdvcQlKbAJ8s3sPDP7poVz08YFMCl08YswD4V/y8XJ AzBxsG66ubdTgttumXrrYkdaU4ZbkkHAI1N3s3GXBGu9dQomrSkjJCuEwBA0 xMRDAB0DTSnIE4EjsAnanxc5/07gCSEPNkECNsFUjV06dU/wGfHAJh1YzMQF YNJRFgFqL4sEMMEiJ2VRDUXhgCedtxNby2OBTUB1RRHRpkAx7Yqc48X1/YLv fzWA62NRSRy6wHBTqEMfAmyiENCFLB8ew4vDuCrm+4BkIr9gOT00gB4WQDOG sK1KXrhelOgMBjYpTLWUZtozI41qEU3B9gKJqV/K2V5KCb0kK7YsJ64sP6Gq KLW2NAPwBI71pakttzPvNNx81FaCqrkethaT2QSBCQgZKD+1EX5QO/yg9nyf LtB0TwuKnJB9k4Wnd5fG7i+M3Zse6pjoawG6ARpqqcxJjzbB/1KVjK4NYOgU THMwNyta31mVM3in8klL0ePGgr62UtDko5pnT2pBgCezvYAkjcgfQWyyiOMJ YpPFwUY0mRHNOkEZE8I3gSN6ieVQcMeEqOYisvBEHRcaDQ9CG4AU5I8gPEGw QAxVRAiD6rs8SryIui+ijTDZNyGTyOfY5GcKuojyLXK65C9hE4/R8MRIRGSU oLcj8EEfCN8EfgVkDyHIItL3RCNiAjeIqe4e3EHkUAg8IXCGaPxF1Ibhb98k x0YQoZDLtIhCL/JAE8JGORtoctq/68c38BstkhMrxJ2oo9cv/eBzuS7X5fpV r4/bLS+Xa4FNXi7VP1+oe/Y4C7FJcZLiZqy8ODnkbk3c5OOSklRNvN47Vnuj KF4y333z+XzzwTOsputfySaEPDImBJh4nCGbJj/DJkAi53WeTbYmSzafFhz2 5b15kvOxI/XrEtebNM2FbPK1m/djnOyrCP73cbJ/Xxn5P3Zm/U2W5lNswHdx iu8Sgr5LwKjkm9jAr6IDnkdJQSeRssNwyWGE5HlM4NtE5XFM4G64FKhk2yXd ckr2IhSgfZvwwCHec4h2bMINM3deS5tRU6Z11AmV71Ol93CY14jad0xPGTdQ p3R+k1rfKa3frIG6aGIsm+jLRtqmmQ7axgaX0PdMNExG2iHwCFCAlblnpu9b GEc4lbxwcDFfw8pGbHJkYhwa6esan02tL1DJHjyfm+gnVvZLOxf0Au9FDGxC pE4O9FTQoYEGOjLSj4FZTIwX+LRH0HO480wvzSy4/4WJ+crCfg2fhn6ui4eZ OE4ucNOBA8MT0JaLt+nkrjs5aw5syiRik3m7YM4mmAY0MPEmjLwps2DGLu4z 0Ht1tD49DTb9BvqAnj6oZ/SqKaB+DRVpQEMFNhnWMofU9P5QSg/em2sQa8zl N6n0n1ZTMDDR+q8Z6ZsW1oaJcSGbHGjgN8XZxMqfsnAGTPRuI/W+VtipFjQZ JK3hYbcjQmwyHwXzr8TcL4Ll3towjlHFN4cJrSFCS6DAEsTWy2lqka9S6K0S eWulfqZAul5OMQXSbKFMt4YbZRDFWiRxFkmkWRhlEcc55CmRwZlxqoxYdUpE aJI7JN6hMAbTwyTeQYJrAdyrTo0w2SxIMnITdCxcwCb0OCUVwCRZz0hUUxPV lBQdLcOAsUmmjpGhpWXp6fkAJnZegZNfEiEuihAVR4oLIwUFEfySWHFVSlBD pvJ+uXOgMQGZI4hNUIEWEpxEbIJ8E2SXgABM+hpO55gQSEJcRSPgQUMtwDJp aH8hnhBUcr5PlweeAI90V8eBYAOE8ug2NvEEY5PKqHuVUcAmnaXujlKUNIno LI/sqojqKI9CYNJREdNcGtVeEddeEd9ahrFJfVFES3lsfqJdKaJKmNcE1KsC ynUx43qYlAFs4jaG2HXBumBxkIgp5vgBm/BY1yUCX5nIXy72V0goQRL/ECnF EMSyhHHdOmGCIzA7VluQYi5OtxamuJ0qaajAP0xICWDdUHC94cMTXdryvATU sKu6OA1ZJ8AmTRXpHbW5qLIL9ew6DyY/wyYeQXgPNpnDIyeAJ8vjD1YnHy1N PEDWCeDJeG9z752apvJswBNTKF8lo+kVTI2UZgpkZURq79XlPb1f3dta8rD+ Zk9LMWKTqcfYcaanHtgEq+nC2WR+4NQ6QWyyMNCA2ASNO9ma6AI8eb7UAwIe QWMZUTT+gDR48cXGaXsulHwnRjGiHsKEgYJEtA5GbEK4J8RVjznyRLkXkYs/ 3xCYnDo5zyYIE4i3ED2+iGw7OXh+nk3O4wl57DtZiB3gfvQ1EH0gIwPOw0v0 GxHOEdxJ0A25IzHZPUEb5Mh4/Cyy1QJU8g8/7BNTHRHd/O0nrKwLYQiiElSm hSq1iEIv5H0AX+CCXxz+RAtwnjRvcQ0/D3/MOSS4ARENuge5Kr/0g8/lulyX 61e9Pmw1v1isfrfeDGzyYrF+tid3qCMR2KQ0NRjY5GacorUsfPjuTWCTJJMf 4ElhnHj6Yc7xbCOwyWd9k58FEzKbkA2U816JB5ugM4RjciGY/H/yTTbGi7ZG C48Hbr55nPO+LfmrYifmm0TIvw7H2OQHlxDYBMAEYxMX9/sYyTdRwt8kKv6b mtj/7eGtf5NvBDb5hLPJp/igb+OCAEw+RMqOwkUnkRLEJgfh4pNoxZuEsPep mudxIQAm64AhdtGmQ7LllB7aREc28ZFDcmAXbZl5K3rmgoY2o6FOqfzGVD7j Gr8pI33aypqxsRctzGUr5i+s2jjrNs6WjbNj5+zbOAc2zpGVc2z5CRB2jLRd ABYDZUvvv2uiHdvYwCavXPxXTmwGCoAJUMmejrKr9V9Vem3p/A7NjFNXxcoC eEHC8iY4m7wAmXBhnILEQHplZZ/Kwn6JifUSZxMQnHmFNzRGvgnBJkc4myA8 Idhk1c6G32vBwpm3cOds/HmHcN4hnrEJMdPEyINjr5YKYDJgYGBeCVa4RR82 MHtV/r1KPPauogyoKYNqKuipljWsovcF+3XLb/TIrw8F+UyoqFNKyoyaOq/2 W9RSgEp2rOwtE3PVSgVtmai7AFw6+omW8VzDONQyD3TsDTMfscmgifHEQHmg EXSGcRq1/CZ7QKldapd7qYRfKIRfhgX4qIJpagVNK2cYZCy9mGGWU40yP63Y Syu6YZD52oKobiUzWsePMQhiDLxYA2x40XputJ4TbRLF22Qp7qCMqLDMGFVm jDojWp0epYq3KSzBTLXEN5h3LYh7zaUWJhp5SQZOop4NbBKvZcSr6QlqerKO kWpkJWlosaE+8UrfdD0928RO19KAUHLMrJsOXr6dm2fnFIQLqlJCGrI1rTf1 d0qsT2oi+xpie+qi+urjcE8kBQgFdQNGXskF6shAZV0gQJL+xiRU30UmFIJN 0Hh34BFgEzj2NSR9zjchU8l5D4Wo7AIq6amJ761NADZ5VBn9sBKbFH+/IvLB n7GJu7M8vKsiEtgEBGzSXh4NYALHztvxreUxrVhL4bim0ui6wnDQ7bz4eLtK RL8iY3mJaNeATQJ4vqYwzDpx6EOMYbJQKUfKowjZvkKuN26aAJtQAsT+wTKq MoCuD2ICm4TrRcAmmdHqW8mmkgxbQZIrza3XB7CBeoJ5voE8HwnzulJKL8qI KsyKLsmNAzYBNd3ObarIaK7MaK3K6qzLu9t4Cw1e9Kjm6r1TCTo3exGr6bqw TxcRPAFCmcXxBLQ8hrHJytSjxfH7M8OdgCegkUdNA/fqW2/npUbqdYEspdjf GMhWi/10MkpunKG3reTpvWpgE9BwV9novYrxB1hl12xvw0J/4+JgE+okTLDJ 0lADYhPAFgQmyD0BPEHzFoFK0ExGABOsyfDc44PFHmCTlxvDCEmATbC58JvD HkMYEZ4Ap7zbGyfog6jXItp2eeAJASPoSR4lUIj9hSNLLmQTAk9Q0RdR5UVu CPzPsokHnpAZgey5oI8ieg7DEV6Sc+6o1osoP0NFXx6JEnKxFtGjmNQWeI1c UUa2TuBONNKR2KOiLIQkRLCd7JsQlVo/voG/zxyaZvL9K/jjzAKnoE7CCHBg D/cAnnz7HP7+03AD3OwxMv6XfvC5XJfrcv2q19v1hpfLNR82W1+vNL5calge Khy7l3a3KrwqS3UrLiAvRt5QaB/oyKnMMqZaqYAnBbGiibsZh9P1h9O1OJi0 nGcTLB2/5Kl/lk3OWydkNvkcmKA2XB76C9lkfaxw82nBUX8+mU0+Ymwi/d4p /AET/wcX73sX99sIwbeRgq8jBb9PCf7vW1L/y0jVvyt3fx8f+F2c4lN84Dex CgQm78Ilx+Gi51HSF9EBz6Plx1EyYJOXscHfZBrfpWr2IxWAJzihiDbs4iNc z12yY6d03ybcsmB4smxiL5lYiyArZ8nOW3LwFh28LbzbMCYHf8fK27NxD+w8 oBIcTDgnZuRxYOCwpvZe1/pu4AI2QXmTlwAmDmwGypGJsa+n7mj8ttW+6xqf HSOVcFWOLSy4iuq+XpwJ4QbGGkAfZhZACtG8C530ELr5tZUDtAJfCfs0G5Z8 OXHxsMgJyTfZcHDWz2q6ALuATebMnFkLF7NO7KIZq3DChIVNRjTMAR19EK/d guOIgQka1jP6lP59OJsMKP0HlRTQkIryVMMcDKP2Kny6Zdf75DeeBvs+U9Om ldQ5NW1R7b+ipW4aGbtm1g4245J2yibGn9hkX00/q+niTZhY/UYasMlDNbcz lNWs4zVaxIVGrl163SS7GiK5ogzwUin8wiQ+YQIfjdBfJ6TaAvwdgRRnEMUV TItUsuJ03Hg9L9UqSjLx4nSsWB0TFG9gJ5t5iXZZklORHhmaHasGZcWo4UE3 K0YTbwuwhrC0Ur9g7tVg7nVgkwQDN8nITcatk1g1LU5FAzZJ1NKTdPRENTUu zDdB5ZeqpWXoGYAnmIFipOfYOMVR0uqUkMZs7eOqyP6GuMHm+OG2pNHO1NGu tOGO0yKuyTunIXcQEAqKt6OpJYTGOrNGOzKRUHEXoArBJmQDBfiis9jZVmB7 XB070pYBeAJw8bm8iQeYfA5PEJjA8YxNoohxJ8AmdysiUd6EYBO8sisSgQnm nlTEYon4slisrKsirrEkCtiktiCpNDMmRESRc7yF1CsAERLWjVAJ0xgqATax qBVKOQ/YRMTxk/B9RTxvqdAP2EQhoYQG0DXBLF0gA9gkwiAGNsmIUt1MMiI2 KUqJcKgkYUKKSkwDNpGyrgP+pEWbUMOu24Up5TcTm6vyWquyW25ngtqqs+80 3AQ2QTziASaITf48C1+HZeEvmm+CJjBibbt6WkAzfW2gpdF7KxMPV589Xpt+ gtyT6aGO6cG7zwbu9HRW376ZGGcPBTAxKFimQKZG4m9U0HJj9UAlQ12Vjxpu dTfd7G8rHLlTNvGwarqbPOikDtgEhJd1gWDTuDCAlXUBlWyMdcARCAWF4g/n HgGbAKogQgE22cetE4QkmM6quYBE4IhOEi+BWVA0Hk02QckLlCWBl4hEPKwT Ak+IdDxCGNDPuydkMCHziMdVlHMnmOJCNrkQTwge8RARRSF6fCGQISgDCUXX LywPI6IlRKNgDzZBDOUxL55I0BOjT1BzY8QgKBFPhOJJHbd+6g+MSrZ+9x6z Qs7GwZ+OXEQsgyq7gEeASj69mEFsggY1EqNPfukHn8t1uS7Xr3q9Xq17vVIH bPJuveXVcuP2RMXUo6y+1qSGW8aixCBgk+o8U09LRk2eNdPJTLPRCmNFY11p B8/qjmfrXy+3/ivZhFzTdWH2hOyh/IvB5GfYZH345n5PzutH2R/aU1BN14Vs 8pWL+97OeutgfYqR/GND4j9NNvxjc/KPicHfxQd+HSP/GCV7HyEFAZvgpgnm mwCbnACeRMoPw2UvE0JfJYadxIUexQQfRAVuu2SbDsmhQ3xoFz13y47dsn2H eNeOVXatW3kbNv6WQ7jlEm2CnMINpxCbBW8XHtoFB1b+gZV3aOYcWTjHVkxH JtaRkXGopx5o/fe12KSSVZUXgMm2gQLosW+iH5oZaNr7gQETsMmejrKnw69a GMAOiFyOzAw4eYKbLwSbvEA+iAnTS0zMl0bmCwMD9ArOm9mvzey3Fg7onZUL eo2DCQgIBUvTo6S8g3N8moX/KW+CTTbBkibMZSsTz8KfsskzE3tczxrVMoFK kIZ0DKCSQS1tSEd/amSNGdkj8FJFAQ0pMQ2G+Q9hogyGUPqD/PoCfPoDvIeD fMdD/KaUlHkVbUFNW9ZS17GuXPRtHE8uZJM9JW1Pw1w38RbN3HEjs89Afaz3 f6jm3Aljd5hETVZxvoZhFVwxSa5oFNeVAddVcl+N3E8vp9oUzPAQXlQYI17D TtRxk/TcFBMPlKjnJOqxWqwkAzvFzE02sRP1sGcm2+XJ9oB0d3B2tCo7SpkR HpruDs2MVCZY5LZgpkFOUfKvK3k3onRSwjeJ1zJiVNToMP+YUP8UPTNO6R8V 5BUZeCMmxCtJ5Z+uo6fq6Jlmdp6TVxYX0HbT3Fsbi3FHa8pIewrwyFB7Ul9L fE9TbG9zXHdtNLJL4IaBxoSh5iQ0RZEQghSMU3AqQb4JUAmI3I+LLCCOjiJH c775UVXMaEcW4AlAyuesE3Ii/nPxE2ATBCakmi4MTBCeAJjcxVMnXeURwCan YZPS8PayCFTThfImWCfh8rjOqqSOqsSm0uiG4siaW4lVN5MTnGoZ20tEuyph 3hAzr4sYGJ4AmNi0QaoAvoTjz2d6SwR+As4NYJMACRXYJEROCwugaQLophC2 WyeMswFaKvMTDcXpVmCT8szYFLdOJ2epJfRgvp+YcVXO8TKFCvLTwisLkkty 44BQGiqy22pyAEyaKtKbKzM66/KATQBDyKVc59nEwzc5bdX1sH7iHJ5M97bO ENbJcNf80zvLkw83ZnvWZ7phszB2b2H04fzTh08ft3TU3KzMj8+INlpCeNYQ rlFBD+Fd08sptxLMjxuxSfE9zbf6WguGOktG71VMPqqe7q49mxFfN9dfd2ad 1IOWh5rRTEZAEsQmqJ8wquYCAZWgkfHAJnvzT0AoCI/quAivhCjuwpyUDWxY PFxFxV3IPSHi4eScOMIWxCZE9oRoLEyeLE+Mkifjxs9k4S/s3EWOnHwuC38h nngk4skeCrk/MPJQyGVjyEM5mzxy2s7rc2xCLu4iKr7IkxnJ0fjzMxxxm2ad MDWIOLxH5ASJCLkjJ+XCkSgoXQLMgjcZPhUxnPGyputyXa7L9fPr1Urd69V6 YJOPW+1vVpv3Z2qmn+SM3stqK7EXJwXnREnLMjQP6pLqbzmy3Zx0O+NWjOhp Z+rhdP3JXOOblTZknSAwebPa8uZcTRfBJm9XWkE/zybk7Ak5+Q5I8rn8+3k2 +VzMhCyEJ+tjRWtD+TuPs14/zvm6K/2bUvdPbOIS/uASAJsAmIA+2tgfHZxP UeLfJCj+sTHpnxY6/qfHBb9NU36KD/wYLXsXLn7nFr8Pl36IkD6PlBy5RdiQ xHDJUYRk3yXesvI37cL9CPnLRNWLRNVBdNBeZOCWS7ZrF+3a4Db5kVt+4JTs OyWbFt6akQP37zpEu07xrku865bsh8ue24XHVv6RhQfHE5vgxMo7MnNe2vkv bLxjM+fQwNjXUnZUvlth3usaHxCACXDHnom2a8DiJNuAKhrfXYAXPQXw5NBE BxI5tLKOrKznds5LB++FnXtkYsINOJsAVqC8CcYmL0wsBCNAJa+MGKS8MbPf mDkIWBCb4GDCe2/jvbPzX1u5px6KFUu4YEl8O+rThWXhd22sHSs2XWXVylqx spZtuKzsBSt33sId19KfqqkjKtqImo6BiZoxqKINqCkjegZoCPBES3uqZ4zq GCPYbbiU1JEwyjAo1L9X4d0b4DWg8BkJ8R8Lo06E+k+E+C5qGEsafJaigbGp p23p6ftm9rqVtm6hbpuoWEJHTz/WMU60zD0NY0tNX9Sx5k2cSQun30i/r/bp Nojua/gdZnGdkZ8Z7GvmfWGVX7OE+amBTWRe1lB6tE6UaJSnmgJT9NwMMz/T IoBjOrAJAIWKmm7iphrYqUZWmomVomckailJWkqCWZxolaW5gjLCQ1Kdgcl2 RYojKNUZnGANsATS9TJ/jdhHJfCONymSTLx4HTNOQ49V02JUlKhQv8ggn+gQ n8hgr+gQ79hQH2CTWBxP8pyC6hRl+y3LvVJ3d3VsT23cw9sRTzvShtpSBloT B9qSkEa6gCxSxjszJrqygEqe1ET31sU+xYMnQ7iHMoQNNME03JICSAJsgpAE sclAUzLOKaeoQkAKnAG+AB4B7gA2edqeCaCBcvEeVEKcIbp1eQRPiGbChGmC giePq2IBTIB9HtyOvlsegakisqs8vL3U1VbiRnH4ttJwrENXCWwiGwrdHZXx qKarvTKhvjCiriC8Oj++Mje+6lZSEN9PxvSSsbykrBsc3y9lHF99iATYRK0Q iNl+XPoNCd+PjzXp8lVIaVjeREpRiHxUcqohiOlQ82IssrTIsLwEXUGKKTfO UpYRXZYV49JIw4SUMDE1gOOllND4lGuJEbrSvPiCzKi6skwQ8k0ay9MAT9pr ch60FCHTBISQBA03IWq6PPImACaITcbO2ARRyU+tuvAg/NLI3emB9qn+trmn d9amn2zM9sJxZerRzNDdhTE43nvSXnmnvqClMivRqbSEcFQiX63UH9jEHsou TLI+aiwY6iod6ioBjd2vnHx0OofxDE9qz3yT+uXh+pXhZjSNEZV1oZou4BHA E0ASoqUwsMnu3KPduce7GKE8PlzqOVkbQPl3DExwHnm1hSHJaQ5lYxiVdRHZ E1SahdADtf8legsTLYWRCLuEQBiiDIzczougFQ8SOUuazBNzGPGSqj8bmILT x+Ln2ATPgP+Zb0IQx/nJI4gyzpIgW6gjMfopqEcxMk08Wg2jVl0EoeDUsIGn 0TeJODy+3zxrnEVO4p/+RCIpT5R+EdxBjrf/3Xc7IHIUBTuPM8vvAUbeLqFx J4hQgDt+wNIl8797twz3/A1GVReMm0dnfukHn8t1uS7Xr3q9WGwErPhq+87H za73651bY1VTD/NG7mR1VYaXpymBTQqTQptLXF1VMRkufpyBmunkD7alnyx0 vFm583y+FY0vAeh4v9b2Dthkuen1UiPBIGQ2ebfaRmYTxCDnfRPyUHiyV4LC 70QE3sM62ZuoRMJnLF4Qft8YLiHsEjiDrs715e5MlB0NFHzoL3zfkfqm0Po+ z/A+UvoxQvSti/vJxf7OyfzWRf/GRfsbp+JDGP2TXfx1uOzflkf8H2v3/pep +t+VOV4mBx5FCF+4he9d4k/h8m8dkjdO0WuX8JVL+MIpOMZGmQj3ncJtl3Q3 ImAvJngvLmw7NnQjOng1UrFmEe+4AvbCFftuxYErYNcp3TDzt22iXbt41yYE 7TvEwCx7dtGRnWi9xTmycZFOHIIjG2/fzN01sncMrC0dY11NPTBdoEMz7chC Bx1bGYReWngvzFyk5yYO0vmTJ0b2az0Hk4HzxsgFvTZyXxm5by180GuQ9VSv rPx3NsFbq+C1VQCf89zMPTJzD828Y4fo2Ck5wn+RTSt/w8LftAjmQFbhgl0M gs20iTdl4GCgoaQ+VdHGNIxxLXNCxwI91VBHAE/UlKckjaooo0oAEP8JFXVS TYPjaKjfUPD1weBro0rvKS1lWkN5pvKdUfuu6OlrQCUGOoDJho66qaNu62nH ev9jvd8REJyBivUrszA2LMxZI33ewp5xCJ45BRNO4ZCV+1hL61KL29XiZpOs xizNUbOignzcIT5RemaUnhGjZSTqOel6frZOkKsVZBrZGSZWhhHExMWCl4kq vwSlX5LaP1lDTdHRUvX0NJAjIMUekOpQpLuDgVCASjLCw5JdwUmuYEsoSyn2 BpmCmXG2oDgdLV5HASXoqXFa/8gwr1iNn0NxFTYxat+I0BsguJQXIS5LCqpO VzbnG++Vh/fUxaNJiMjyQK4H4XegHr84X2Sg3DpqsYVi7Cgtgl6ie5CGW9PR BrgDvUSCtyN/BLXnIqfgib0HoSDThKwLewvDBp0hXqJuw4AnaORiR5Gj9Za1 Kc/UXuzqKovsLI1oLw7vKIFNVHtxRHtRFKitEFNrQSTS7WxXQ0FcdW5kdpRG J6PKmVcltCsSxnUR7ZpSzrPrQ8MUQi7NR8D0F3D9OSxvocBPIqLIRP6BUkqA 2DdI4q0LZbgNwmirJMEpy4wNK0w3FadYK7Pc5RnOBKtCzriqElE1Emowz0dE +SJURCvOjKsvzm4sza0pyGgsSwcqAbVWZXXU5nbW5YHuNRU8aisBHkEuCfAI AAuySwgNP8TY5CmOJ6imC4VNCDDB4vBnsxexAfFDnXPDXcAmSxMPcDzpAUJZ GLsPhLI8+fDZYDt8/sPWYvgO6dE6p1YEwKVV0ENEPrDJS7I+bsp73JTb03pz 9EH5+IOK0ftlk49vTz+pmumumu+tXuyvXRmsXxtp3HjauHw2Jp7o1rUx1rE5 3gkCSEHFXSgav7/waH/x8cHSEziCjlZ6nq/3v9gYAL3cHHy1NfR6e/jNDtDK yOvtERQ2QeSCKrvQOEJEHAgT0BAQIntCcApiFmS4ECF6uJOo+yII5TybILJA +W48wT3/4xsAE7j5GQpN4GcQfSygJDiqboLzSERzKsIj+JzQQz6yGFC5FBxx CthBzbsInEHFVx7xdvSoj3wNeM6HL4wXWf3U4Jfsd3i0BcYHJi4iRiA6aMEl 8qRFwhMhQvHkNMrff7v1d8A+79f++HYF9NfvVv/0YQ2O5/WHD2seDgthsvzS Dz6X63Jdrl/1er/R8XatDY7v1gE32tZGKsbuZo3dz71XHV2drcuPDbgZH1SV a2wqdqY5uIlmRm6EeKAldXeq8WS+9WQOm6L4egnDjben0+ExXWiO/CUFXR5g 8v8vmwCVIDaBI8KT1adFwCaH/bfe9d5625byptD2Ltf4PlL2MULyycX/5OR+ 52R/62J846L/wSb9Vsv90S3/yi356zzTfxqq+D9Xuv5ta9K79LCTKPGbSOkH t+Qrh/gbuxjY5I1T+MopOGUTh2DfIdhyiDcd4jWnZNUpXXHJVsLlK+EB607Z drhiJyJgJ1y+65bvuKSbdtGuQ7LrEO8BmNiEx07psUt6YBMd2lhnYh9aOUjH dj7BJtt65oaG9s+yCRlPXlp5LyxcEEDEczMHdAIwYubCEd+cngG9xpEEoxIT 75WJi4So5BWul2fC9hb+Cwv/uYV/bOUdYhVoggO7aN8u2rGLtmzCdZtwzSpY tQoWHRiVzNtEsxYBApNJPRuoBLHJqJoObIJ0IZuMqTABkiCNKynAJk/DvEdC vcaUPlNq/2dq/2mV75zGf8PE2jAxt4wMrJrLyNw1MHYM9BM99QTrPEbdN9B2 jPQNE2PNzJzSUadNrBmXcDpcPOYU9hlZD1SUJ9aguwZ5o158Wy+8qeMkaxmx Glq0nhFrYiWZuakmXqael6Pj5+kEOSZOtomdZWRlGpgZeF9frH0Wvk/VUJNV /mlaGlyFezJdgQAmiRZpvFkCSrIFAJ7E2wKiTBJrGFsr99fI/OwqXoxFkWbj JZsYoEQDDRgEjohTUszMVAsLzicZ6ek2DmKTmgxV6y3z/YoIxCbI4yDKsYie WmTWANAAIcQg2IQQ0XqLDCaITYirSGSsIHwQ8oeQIeU8m5BLvIguXsTnoM9E bPK4GnNP0OzFrhIX4Elbga2tyNle7Aa1FDhbClythe7mW862woi2wkjEJoQa CqLrQbdiS9Mdbo1AzryiYF+XMq/z/b8MFNKNSnmoXABswqP7clk+HJaXgO8r AjwR+AbKqMFyaqjcD9jEpRdEW6VJ7oCsOGVBmrEsw16R6SxKtuREa81BzDCB tyWYDWwipn6p4PqmRBjrirNqizIrcpNRny4Uh2+vyUF4cr+5ELUURuPggU1g QwaTn2eT6Z4WkEcWfmYQL+savbs4jvEIck9Wnz1ZffaYaN41/KjuSUdZQ1lq jDVQE0Azh3IsYVwgFG0APcmh6KpKG39U1ddeMHSneLqndupx1dSTqunu6rne msX+uuXB+tWhhrVhjE2IOYyITQgw2Zm6iybFA5i8XOnbX3iM2ORwuRvABAnw hCAUhCegV1t4QdfWaSIeuSdEHJ48MJFIuyM8ITwUZLLAkehCjN5InoFCfBRh oKA9POTjuHEalEBggjZneLKAuONCNvnLIeU3Z44DQAEBFB7TElEmBRVrEfET VLUF9xPVU+gLE0xBrssimIIcZiePLCHPVTw/Y5GcMUGfhgyUv/tmE9jkb7/a +NuPG3/zcR0JUAUJUQnClj99/VOynvhW6Av80g8+l+tyXa5f9fpm99679XbQ m5XWl4vNK4Olo3cyn97Nvl8TU59vKkoKyY8LLEvXNBTaM92CFBs7P0o60Jq2 M9lwNNN8NIP16Xq5gEYo1r9cqH+91Phm2RM6EG6Qk+8/AybkjAlRx+Uhgk0u ApOKCzsGrw8Vrw0WIULZHCkFwaWVp8Vrw0W73Xlvu4FNUt8WOd5kGXA2kX5y Cb5z8b5zcr51sr5xMv9ok/3GLPpNeMBXbukPqar/ujHh/9p+9N/2Fn6bp38e LXkXI3/vEr+zAM5I3wGbOISvHIIXDsEJ4IMdHs4FO8AmNtGKRbAEgo1TthYe sAp4EqnYjAzYigzYjgjYBjZxiHfs4n2n9NApOcST8scOyYlDAlRyYGXiYh1g 094xAZgcWnkHFh6wyaaWDmCCswntvA7NdNCRhQE6xtLxmJ5beScWLtKxmQM6 MnMOTewjJPwMEmDIG9wieWXmvTSfGSuANlYefMhzG+/kTMAjx1b+sYV/ZBUc 2gT7OGHtOSXbDvGGQ7xuF63ahcs2waKFP2cVzpj5gCRAH2MaBhJQCRKwCej0 pPoCNhnXUCc1tEk1bSzMH6gEBJtJjf+4yndc6TOp8n2m8pvFenNRt8zsLRNr BweTfRPrAI5oLiSWvqHvGuhbBvqaiblsYs4YWdMm9qRdMGEXDpp53XrWEwO7 x6p4ZA5oMYmrDYIiIy/LyE7S0xNMrEQzJ9nETTFwMrScXB2vQC/INmJgkmVg ZuoZGQAmWhrASEKoT4qagiAl38ordIoKnKK8aGVWRGiyTR6jF8QaRUk2BbBJ kiMw0iAyBTNChV4hghs2JS/OFgRsAgySYedmOni54aKiOEVBjBz2SEAlaVY2 bHLcworkkIYcXWex41FVdG99ApqWiKjEQ2Od2cAXCBzIeII4ApEIeklYIR4g Q1xFdgnsiQZcBJsgd8YDTD7HJmQe+Rk2QbMXkRCe3Cl1w7GzNALUURLeVuQG MEFs0loQ3loQ0VpwiiftRdGglpK46jx3/a2YmvyorBitTk4N5nvJWNd5/l9I uT7qIEGwjMtnApt4sxg3QFyOF5/rJeR6yUS+gVL/EJmPPozpNghjbNJElzwz NgzYpDTNWpHpKE6xFKfakp3BKpGPPYyrk9PlrCtS1jV9ELc4M6a6IK0yP6Wu OKWxPA3YpOV2JuBJW3U28k1QJ2FyKddfzianQfjuZgxSziInMwPtBJsAjOB4 0r0514eyJ3ByYezezHDnWE9TT1dFbXFSgjNUp6Br5FRDMCtE5BMmup4ZrbpT m/Wk5VZve+HI/fKJx1XPuqufddfM9tbO99ctDNQtDTYsDzV6gAkyTYjKLjTu 5GSxG9jkcKkbgcnxau/JWh8cYQ8bD/cE18jLjeEXG4AqT9/tjb/dHYOXb7ZH gTIQR5BHwBP9uBCboPgJvETGCgrOwycQjglZ5GQKgTmIPgAuEJWAvj6eAipB gW4Q3p/q1KFADgtwAXJSSC1zEZ6g84sXsgnKhv/+w8pZTAOBzDIq5SKmtwOb EHPbUWgdCZ7w8R5Z2M86Y6UlwoUh6AOYAuGJB5ugG8gz38khEbJIE97XiRZe QCIAJn//zdY/fLsNR+AUglD+5sM6wpMzNtkgey4Em1zmTS7X5bpcP7++3rkL YPJ+o+P1Suvz+calgZLxe9kD7WkP62KbC21laSpgk+IUZX2BLS9ammrn5EVK BlvT9p41AZvsTWKj4Z/PNeAcUXMyW4Pw5NXiBT4IuYLrQnghWnIhJDmvC9nk HJhUnAcT5Jss991a6S+ADQg4BWhlcbBgZbBwv7fwbXfh6+bUd8XuVxnGD5GK jxHyTy7xd4AnTt4nF+dbF+dPzoA/OOQ/uuXfwqWk0B9vmv7z2t3/fabxD+VO jE2iZRibmHnfu+Xv7MK3dsFrh+Clnf/cxj+yYU/pu3bJtk20ZhWugmziVYd0 3SVfdEmXw+Xr0QGb0YGAJ5tu6YZDBAiz55IeuqQHDvGBTQh48sIlw+ySc77J oZV7iHsTiE02NDQ4HpqZnxfryAJiH1tx2XhHVi7SoYUDOjBz9oysfRA8w5vY B2b2oRk7/9LGB72w8jESsfCOLdwjwBnAEPgEXIdnOgAesQr2rIJdm3DHJtyy CzdBLum6U7xkFy7YhPM24YyFN2XCkAToY0RJHQr1Hw6joDouoqALGSgg7B4c TDzwZFJLB02oqE9DfEeCfYBNYD+tpT7T+E+p/J4p/WZU/gsayoqOtmVgbhtY ewYGaF/PONAzDvX0IyPz0Mg4MGA2yqaBsWJkLRnZMxbulJkzbhM8tQn7TPxu I7fPKui3B/XYA9tM4ttadqGelWvmZJjZCSZGgpGRZGClGthZOnauhp2vYmdq 6ZnYnBF6lo6RrWdmG1ig5DC/DC0918S5ZeWXuCRl4TJsSGK8Nj9Wk+4KijOK gE0SLPJEa0CcVR5tkphDmMH864HcqzYlNy1SU5Wurc/WV6WpSuIDb0XL8iLE WU4+0ApQCSjFzAQBm9yMkuIFXaa7Ze4nNbFoEAlp+MgppJyVeJ0aHwg9ADRQ eh0RB2GREHsP04RAFeS2EE2DkcgYcp5KPicCas6DCfESVXahODyWOsGHMIIw Trkde68y5m5F9J3yqM7SqI6SyPbiCBxMzrNJTHWes74gqirPXZphj7HIg/k3 5JzrAtoXEo5XqJwVLGOJuX4Clg+bcYPN9GIDtnBuCDg3hNzrIu41hegGqumK sUrjHdKMmNDCdFNhsqEyy16SaipJt95KNjlUHH2AP/w7wj+igucl53gluFTl ufGV+Uk1RUn1pSnIOiGaCXfV599vLgQ2+Zf5JmRIeYbjCWh2sGMWr+lCeAI8 AngCbLI1348bKJh7ApdmR7qwJmCP6+HLRJoDVFJ/bQDNEMRUSn20CkqyO6Sz JutJW+GT1oKnD6omu2umemqne+tm++rnBrDuwYuDn2UTOKIIPMITrKxrrR94 5GilB7EJwhPCNyHKunA9fbU5gobFozmMqHMXQgwyRxB+B9k6IYdNUESFGDRP bjhMfjs5O4/MEWSawB6ZJohNzjyRBVQQhXAAMQgaJkhQyV/omxBvORsUMo+/ ZZkccvfoAEyMJvn773dxPFlEo0Nw2Fn0iJwTdV9kLiDGlKD3wpHgLI/KK/LY d6JV16mZ8m71r9+vApIgPMHY5ANGKyBkoBBs8scPa4TtQpSEoY/6pR98Ltfl uly/6vVxqwvVdAGbHM/Wz/cWjt7J7G5K7GlOulMZWZ1juJUQDKrKNeZEilOs rNwIcX9L6s5kw8Gzxt0JbDQ8EA3OFHUv5uteLTaQ2YTMHeROXBcWcRGOCUIP hCGISsjzFi9kEwJMdsbKz4MJNspkuATABPAEqASE9ouDxevDpQe9RQdd2Tvl 0W8K3K8zzR8ig76KCPzOJf3OJf7eKfjk4gKb/NEu+6Mz4LcRiu9jAj/GKt6l hPzPE7X/ZevBf9WS+Do+4G2U7KsI2Ueb8JNT+t4ufGcTvLHxX8HzvI1/bOMD m+xYRdtW0YZNtG4Vr1rFy1bxklU0ZxMuOMWrkfKtmMCtKMW6W7LqEG05JVsO 8bZDtOfExjLuO8S4h/JZNjmw8PZMnB0Da1vPBB1iQHFOJhYu9pEZM0SOLLgw 24WLdABggmvPxNo1MuEI2jezkYBBcJDBWAa7GRPnwMZF2rdz9860jRdubVoF 6xb+ioW3ZOYtmnnzFsGsmT9p5kwYOWMGzoieNaRjDCupwyjDfgYmQCsIRhCk ALOAMEhRUYZV/qARkqZ0jEkNbVxJATYBoeDJtIYyA1JTZjEwoa7q6Gs6OvAa /Fn29Iw9LX1PQ93XYMMWDw3MfRxMtg3MdQNr2cheNHLgn+OZhT9s4g+YeD0m Xq9VOOiSj4YrBxzB7UZhlYZZomfdtHKyrOwkEz3BQEvW0zMMrFw956aWk69i ZWvo2YAhOma+kX3LzC2w8AutgiwNPc/ALrIJK9yyqkhFVZTidkRAilWaYJYA mODTT4QJFhmwSbxVDnhiDmEpOFcCuVeizQE1BQkPq7CERUeRoypdDQCSbGLE avxQHVeGnZtmZYPyIyUVKWH12dq2Asu98nBgk976BJQ3QW1+EZugYDvedyuT 7JXAETkpyBAhB0yAWZCIUi7ELOfdFsJAIRIrcAZ9+PnKrs+xCZErIdiEjCro KjJNgE2IfsLYmaq4MzyJuVMeA3gCaiuMPM8mjYWRzSXRLaUxFVk2bKR7tFot 9QngXpOwrki5XoFiqkJMlfB8xVxfHtuHx/HFfRNvEc9bwL7GY34hF1xTB1Ls Gm6kWYzyJgVpxsIUXXmmpShFV5RqKM9xpEeGqMQ+pmBGmNg7VOwrZnypD2Rn x1tKs2Nu34qvKUpEeII6CQObtNfk3Gm4+bi9FCXf4dh7p/JfxiZT3c2ITeaG OmeHOmeGOwFPgE2QUbL67AngyfbCwMZsD2IT5J5M9LUAGcEXi3OEqGQUXSDD CP8J+detSm5uoqm9JutxW9Hg/crxx7UTT2qnumun+xpm+xvnBpoWBpsXz9V0 oW5dwCYoDk+4Jy/WBwBDgEcIEaYJgIkHmyChFl4oe4JGxgNcEA4I0X2LsE6I 4AkhwiJBc+ThiE6SS7nIws9PIyEkIaMKMaQDBBvCsEDDPpCfgs4jx4Tcn+q8 CNvljG6W8JZWnql51GiL6EUMZ84MFEzwnI+HR5aIAjOEPES3XmLiITkzApiA /wqInn7iLDKVEKVchFeCAino9/r9m2XME3m/9rcfNwgkIbMJUdn1+/erBOAQ 3+GyputyXa7L9c8uYJM3q62oputwunbqYW5fc2JXZXhvS0p3Y1JLibM0XV2Q GFKZpc8KFyaZGTnhov7mFIxNphv3JusATF7ghsjrpSacShpwXVCv5eGSXDgF Hgmgg8ATBCY/zyZ/Dibl58GEqONClV2rA4WITeb6iqbu54zXxgznGidS1C/y 7G+yLB8ig3E2kX3nlHzvFH5y8b918X5rEv3OJgU2+U18CJDIq0TFv7+X/X/v d/93/cW/vWn6EKtAbPK1TfTBJvxgE7zD4+EvrfwTK//Yyt81C3ctoi2LaMMi WjELF438OT1nxsyftQqW3ZKNyICNCPmaSwzadEnWbII1G2/LJdp2i7edoi2H 8IDIm1g92ASwgoe0b+YCpBxiYp/XgZGFNkd47RYmO+/Qxj1EiAGsYeXsWzl7 ZtYuyMTcBUjBtWNi7luwS9hVXGi/a+Pu2rk7f651G5YlWQYeMXKm9cwJLWNM Qx9SU4c1tEEto1/L6NXSQX04mxAkgoScFFTTNYKTC7DJYIgfAhMPNhlXU8dU FGATQoAnz5R+cxrqvJa2qKWv6pgbeuY6ziZbWvqulraroe2pqftq6oGauqej 7+oxMNk0sNaM7CUTZ8HEnXNIJs2CXh3nkZrx2MDtd8iGI4PHI4FNFJ0Gfo2a UaJl5JuY2RZmmpWZamakGWiZBka+gV1s4JUb+QUmboGZV2jhF9uEpQ5xmVNS 7pLCEfawASSBI1wC5USEZriDUx2KJKssHiDFJIk3y2JM0liLzKnhoyx8epSm syb3/u2YO6XulpuW6nR1YWxAlpMPVAKEAmCS4xZmuwRwLI4PrMvStd4yd5U4 HlRGdtfG9TUkApgAoQw0JXuwyVgnBhqAG8AjIII+yDl3sktyXsS7yHiC2IQs OEPk5ckBlp8fFk+eb0LUeqGrKAj/uDoWgQnBJph7cvvUNAE26SqLBjCBIx6E 98yb1Be4sbknxVFVeY6STGtekiHSJA7kXZdxrsp4N2Q8bxHHS8i+AUdgEwHP H9V0YWzCuSbkXJXyvgyR+ZjDmOEGQbxDitikOE1fkq6/laguSTeW59iL0szW UAYgjyGIFiL2krC+lLKuuXSSnARrRT7gSRxQQENZKhGHBzbpqs9Hcfh/QU0X sXl2BiZYWRfOJrMjp9YJwhC8uOvx5lzv1nz/2nT3GbA8nh7qGHxQA1+gqiA+ 3hFiDuWESf30ISyVnGJV89NjdG3VWYMPqp4+qhl9UjvWXTfZ2zADbDLYPD/U sjCAzTdBcXhy5GRroguxCbJO4HiCuyTAI0crPYfL3Ujna7qATZBjQrAJSp2Q S7YIPCGziUf2hIifoDg8ASkeoZWLpsPPIbsEHb86mvz6eIpgEzQAnYh4EMET gk1IvsnCzxMKyUNZQred1VatED2HyWxCbiyMt/zd+ocf9kDwwE8070WkQ0AT kRwhR9rRnHdyLh69l/BNPDoJI7MDtdsi7B5gkz/gIggFxU+Imi5Cf/jgGYRH U+PhQ37pB5/Ldbku1696fdy++2ql5c1a2+uV1v2p6tGujHu3w2tytN2NiQOt aXcqo6pzTWVp6tvZ+uxIcaKZme0WDrSk7U83H8227D+rP5qpO5lDWZKmV0sN Lxfqns/VXJgrIfcHJkjk+TxOJXM/pUtAKOTuwSZH0yQ2OcMTfHZJ5S6OJziS lG+Ple/CZrR8B7HJKZhg2h2/vT1auTpQvNwHbFIEGurK7Cx1VkfLq4ysBzbR cbbjZRqwSehXESHfu+TfuyQ/uITfYaF43o9GwQ9GwY9O6W9jg99FSN8kKP5U 7vqnzQf/eb713zUmfZMU+tYpfmsVfAA2sQreW/k4m/BeWngnFgxP9izCPato G2MT4bKJv6DnzGpZcybenIm7ZBWsOoFKJGtO8YZbsuoULdv4a3b+hlO47hCs OQSbLtG+lbVvZeJi7VvYSAAmGDVYADEwa+bAysf2ZhDWHevQRBy5BybOgZGD HeGliXtk5oEO7bxT4wN0hh67FjYmM4Yk27iwFLmZBdqxsJG2rextG2fbwUXa cnA3z7SCZ0lmTZwpHWNURRkK8+sP8X0c5N0T6tejpvaoab0aRp+BPWDiIjA5 bcaFR04ASbDku4qGqrxGVBie9Af5DKtgf6qnZxoJ9X0ahtVxPdPQn2kZE0rK SJD3VIjPnJqyrGWs6JjrBvaWgb2hpW9rGdtw1FCBTQ409H0NbVdFwU7qMTDZ MHHWzLwlC3/ewps088eMvD49t1vH6TULB5zyfpd8NDKszx7QouOUBvvkBF3P 1vrfcnDTzYxMKyvPzr1l5xdbBWUWQaVFiGAEVOGWVYbLQRXhcnh5y8TNN3IK LPwiqwBe1seFFcRpcqJUeIeuwESrPB73TQBMokySSKNEF0BRSryzYvWdNTmP axPaixxN+abqDIxNciNEmQ4e5pvYObnhwrwI8c0oaVliMLDJnVIXgMmTmlig EuARNMadmJCI2ATABLEJwpPxrhwQbBBBoJMEnsCeHIQniGbqXj68C91G9OzC rJOm5L7Gn/puIRtlsOXMLmnGgaWJjDDkzl2JRFwFB5NYfDxKogeboBvgEqIS BCZY5KQcYCTyThnGJnfO2KSjOKq9GPNKAEla8CZdcKzNdzQWR1Tn2+sLI6ry XUUZlpspphCxj5T9hYR7Xci6ymVc4TKuAp6wmTd4HF8W8xqbeY3Pvi5gX5UJ vYXsL4MlXhYly6Xnx1hF6dEhhekmAJOiVG1hsrYix1qUbgDkSXYFylnXTCEM pdQ3WOglZlwJFVGiLYqiTHflzdjqwoT60hRkmoCAUE7LutrL+u7cHjwbufh5 Nqkbf1Q/+ZiYugjHRhxMiLxJ28xAO7AJgAngCUEoi2P3F0bvrUw92l4Y2FkY RHgyM9yJtfAavwdscrfxVktVVqJbGSqlhMqo2iBGkMhbKaekx+r77lY+fVQ3 8rB27EndVG/jbH/L3GDr/FDbfH/jfH8D4AnZPQEkATABIdMEzYXfX8B6cyE2 2V98vLfwCESUeJEru56vDxLTT07nMG4MIx4huIPoskVmEwJPkKtCCOEJ2WEh hqSQk/Vnw9+xxlzAIwhM3u2NvtkZgZdoDDo89qPNWberJfQSPbTDHgVSPFIn ZFODoBLCeSHyJvASB4pVDzxBZV3EVHc0uASftLiNkumIHeATUGaf+OkoF0O2 QtDc9r//fpfoDAz0gTX+xVMzv4ebP6z+EWsRvPGnM5aBzR/xGrDfvcOTKchh ebvyhzM8+et3q0Al//DtNhAKgSRAKCh+8kfUlQtBDf7X+/7l7HcvMP3SDz6X 63Jdrl/1+uqg++X6nZOVjucrnRvj1YMdaV2V4cUJQYOtafAo0lnsKk9SVqVq atJ1OdGKBAs3I1zc05y6+6x5e6p+f7bpeKHpZKHx+ULdyXztyXz1yfzt4/lK YA0gDmAQYmrJ+eHvZ2xSfTJXBTqerTqaBh65DcIJBVAF8Qimw2c1ByQdwhlc e5NVuxO3QTvjldtjFVuj5aD9kaK9kaL90dJ9IJSh0vWB0o2hio3h2rWh2vme qqmH5ZMPKsbvVQx3lBRlO/OTTTddwdXO4Ca95EVB/GaM7kOk6pvIsB9csh+c wt+5+b9zc3+wM3408340cX9v5v/BJv69XfJ9ZMCP8SH/w4Oi/2f50X/sKvyU rP2YqHoRH3YQE/TKxn1l5760c1/YuM+t3GOs2S8fnvax538bf9fK2zSzV3Ro UjkLtKpjr+o5qwbOqom7AjLz1mzCNZcYgxSHcNUl3oiQbdl5WzbujlOw6xTA fsPKgeOqkblmYm3bebsuIVxdN7M2LGwglD2AESt/14Rhy46RDS9hDxsPwVuQ Nq0cEHwmvP1Crdv5oDUbb9XKXbFwls3Y5PpNpxBpwyEgrs66hKBph2DcxBxU +/eH+fSH+Q4q/bC0iMp/KMwXjqOwV/qNhlImVPRxJQ00qWZM6ViTeE0Xskuw Wi9gExV1MMx/REl/qqSPhtFH4QhEE0YdA4X6gUaDvcdCfKaU/s+UlPFgnxUV bU1Nx6RhrOsAPdjb8PcEVNEyVnVMAJYV/ame6WkLNu6yW7zkFi+4xDMO4YSV N+EUj9mFQzbhgEUwaBMPu2SjEYpWt7jewa+ycivM7DIjs0jPKNDRCw2MQiOz 0MwpsfFLncJSh6jYLix1iSojZVXRAXCsiJCWuiUFNsFNi6DILi51yysiAisj gquiQqujw27F6ysyXcn2wFRXSLIrOMUdEmeVx+BsYgpjhoivB/C+yIzXdtXn NJc66gtMVbnasvSwokRFfowkJ1KYZmdlODk5bn5BjLQiObg2U92Qo7tb5r5f EdFdG4dgBFHJhVl4cmfgC7sEk0u2iGou5JgQ5OLhifS3pPQ1J3sITpLP9zYl gYiZ8jibAMgk4gwSD4IvDwIwQfKwUcjduoi8CYBJZ7Gzo9B1pyTifnn0g4qY u6XRnXjepLkgvL0k+m5lYmtRVG2es7Ework4qqnA1XTLWXfTWZ3rqM5z3c6P KMtxR1jkEvZVPvOagO0l4vkLuH4Cnj9W0MX2plG/YDGuchhXpALvUAU9QHQ9 SOJlCmXYVKxoizAlIjA/WVecpv1/27uzoCjTfM/jHbUrCCTkniyyZyaQJOSe CZmAiqKgJIuIQCZ7sokiskmp7JCsyb6pKFZpbVZZ2mWVdlV3nT595vTUOXdz MVczczNXEzETMXM3d/N/84HXbPBUTM9cdF/8PvGPjBRFqaqIKr71PM/71JxP d13IdBXrqy/oKs9llp/WauNDkuQf6FXSGOF7irB3kuTHDMrI0zZVtdPeUXe+ uepMZ0PxjZbyrsaS7sbSnqYymoGWiuFr7qm+Zm+/Z6Snadg/I71N3BUnfU1j fU1cm1Ad3GzyDjRNDzTN3Gymmfu4Zf5Wq+9Ou2+owzfcsTjSuThy1Tfatb9u 0rM82ceG3X6yPt1/d+HWztLwzvLIvaU7bEllZbZ/YbJ7dNDT3VbhcZ3Lz9Wq EoQJMaHpKqkqNkyTEHHhhK6v7dLtLtdkf5Nv6MriUKfvzpWV0a6loVZqk7X9 JwlTmwRev8hWTChV7k1ff7jUv7v/GGF2KJ6GPkLvWZ6wR3V983CSu3vxHnfX CRXK0/vcogl1yjcPvYH3wrOr3tmwZREWGvwNjIH7uw5fHH94wYV93H+Cfu/M +/efU+DMPN0Zp26iPGELKOw7f/pZfscUv0GLLab4L0Y5eBz+1ZdL+88fXuHb ZH+BY5UtK9BH6LPYQXi2VsJuS2Fn4dlju/g7E+kNXyX0hm3TYgsc9GWwr5/t QOM3U7ET6PxxD/ZxyhN2bmXvKWHf7j34NzAu/vm7e+w4CWXIH75a+fnp6h+/ 2fj56RrN3tOD939x4HIJ/+mULX96vkWfS7+ePv0nysDH8z9+vkjzt/7GBwD+ rj3fHfxiq/vzzeufrXetjbkGW0+2X9LXnlOPcf+v9UJ/bW6rU9d8Xkuv5SeT zphkRVmRA578u17Pzqzn0+Urb20TtkeLbdx66wGTN1u5lhtZnrA2YXny/9km D8cvfzJV8+l07aOp2gfjrnvjtfcnGjZGGrbGPKtDzVM3qvoaizxl9stndGfz Us7alYWZkeWpMldCxG6x/fE5K7XJd9QmWbGvrYofrdIfreLX5ojf6STUJn/Q S382Rf5sjXmVffylPfbfV1j+t7f9v39c/49llu8Ltc+LtI9PJH1tkX3FhYmY 2uRLs+wzs/SxSbJrED0ySj4xy3fNsvsG8VZG+LomdC01nGY9jb5tFm5oReuZ Ypo1Gp141SilMNnKit7OjqE22bEp7nLf/0u2jOIto2TTKN7kGkFIr9smKf3U XbOU/ewu9QhVCdcmkkcG7pV95PDQp9w1cbPNfSL7ncVbhrfMJvcn+ocCZH9Y sLAq2WDNYhDPm6SzBvF0ZsRkethY6rER5dGhpI9YktCM0xv1samUY5Oq4Ikk Lk8mk4/R0BsvRYf/jAk7Ak9tQlVCQ3kyqQybolEJvGoarmVmKGfUoQtpgvnU 0DnVMZp5VcicMpiS5K4m4l668J5WeNc/VCirKaE0a6lha2mC9fRwCpPNDOFc RtiSSbxskfuMknmjZM4sm7copi2R05Yory1m0hozYT0+Zo0Ztca0WaQei6TJ LKk3imoNIjeNSewyS2ut8tqsKHdWFCVJtU1RbYusoR/aY2hc2VE01CaXrZH1 uUnc5CQ25CY3nUhpPplKc6OusLv+vDMntciuKrRzN5tkaWRZ6fJsrUKbFJqo eI9rk5Oaq43nO2qsrZX6xrJ0vk2cdnmhRURtUu6IZHeatDg1HeWZPS4b29DF twm98vebHJhfbxN++xZbPWGLKWyd5cBmMP5Xjvgz5MCMdJ5jE1gofJjwbXKn JZ+G5QlfKP5IORl4/ISPFDb8o7q4u06qs6lNel051CZ97hPdNTlXL2e3V9iu VuV0u091VDqaSi0tFVntlY62Cutem5RZGkqt9WXZ1CYlBYb0JKFC9KFCfITa RCYOEoZ/6G+To6xNJBHvxSiOJseFJUYfSYo5wtrEoZNRm3D3mxSm1ZzX1Dp1 tU5/mxRmVpzNLHSo1VFHkhRH1TEhseIPE+VBumSZJS3ynCONwqTVdY5erzU4 r9YX3/C3Cb32NpXd6qga666nPBnr84yy6fe8uRf+psfLTRN39ONm8+yghyag Tdr5NlncP2/iG+9eHOfyZGWqf3WiZ22ih9pka27wnu8Ot3qyOrq1wD1YeH3+ 5vJM38zo1ZGB5sHr7kbX+VM52tRkiTI+XJMsylRKDCpZySldZ92Fib7GmUFu 1Wa/Tbh1k9W/3NZFbcKe08Vduei/h5E7Gr/Yz9ZK+CcJ07AFFHrlD8h/eW/0 i+1Rrk38N8XTKzsazw7F8wdG+IUP9jwuvjj4nzrcJoEH5PlHEAdewri/s2tv 4YOtnjzbnaIv6dtHXraMQq8sW+hn+adj8ashgbuqAs/FByxk7O3y4p/TxaKA X4Lx/9TeYRN+AYU/eMJf9c7e8EshbChSfvnxEeWGP3OW/aswa+w3Z3nCnx/h j5CwnqLXvX7xHxI52BfP3zx6iz/hzm/o4n/9ga1cgWnD5cm3lCdrv/9y+Xf0 j+zxPL2iTQDg1z17MEBt8uX2jSdr13y3L3W5rfUXUrpqbFPd3P8mvdWcf7XC QmHSUpxZka+kNim0KXoa8jbGG+7Peh6vdD5ZaXuy0uoPkyZqkyesTZbfnCLh T5cEHjMJ+GHT3tLJYsMTX2NAmzQHhglrk0dzjf83bXJ35NLOeNXDCdfOOE0d hcn2WP3WeMvSrbqhK2Udl/NqzhnKT6Q7HSkWXZQ1Q5GrFBbEhpZHBa+fNn7h zHnmSP2tI+V1VtwrS+Qrs+SVWfjKIqQw+Ukv/T2NUf57S/QrW8xzk+LVadV/ vX7xf454/kPzuZ/KTN+XGD/NTfzGJn9qkfJt8oQ7ci72r5twbfLILN8xSu7q hBvpYWupAtYm65qI9XTheoZoLUO0kh6xqAn3ZUSsGCQb1shNWxS93rfHcNu9 LPJ1CgGznN6sGaU+bfhiRsRiRvhSZgT9cMMso9f7etndTMkDo/y+Tsq96mXs 9b5eemC2zfItE5WFbJPGKKXZoKE/9NCsGyXrJskGN1JuzNJN+rMM4lWDaFUv WtEJlzMjljLDlzLCZ6hKNKFj+ydERlVBQ4kfUpJMUo+oj02ogqZUwVPqY5PK YFYlNBQp3BtlyIT/8Pvb2iSU2sSrEkyrBLNqwZxaMJ8SvpAatpQu5P5epQkW 1CE+dehSmuCeVrSTIaa5nyGmMNnShG+khi2rjq2oQ6hNNtLDqUq2Kcr0kkWj aF4f4c0QTGrDpvXCWbNszhbptUbNZMXM2OOmHfET9rgRa/Rtk6LJJGy2Slrt ilaHwpMtb8ySN9DkRDfmxjTkHq91RNfYo1z2qFpHTBUVSnYUG5cjxp0T686J q6MwyUv2nEntcpoGq/JGG85Oes5P9dbd6rhUmqehNinOSzublWxSCU1qkSVN okk4Fi97N076zvkTaW3ugoA2UVbmx5XmRBZnyyhMLtgkl/Ji6gu5I/DtZRnX Ko09rqyB+hy+Tdj8VW3y1mMm/IEU6hG2B+ztbeIPkAMzerWQJrBQuA9eebNo EtgmgYXy623CFlP4pRN67amx99Q4/G1yor/2ZHdNbmdlVttF25VKx7XqvPZL dmoTT7mttSK7tdxCedJSYWsqs9SXWGpLbe7S7JrSHLshPlp6NFoaxNokQvAB a5PQEK5NpML3YyODuTaJ4drEoBaaU0X2TGlBdnzVBUNVUZrrgqa+VFdXqnf5 86TqvK7GadErw2NEH+iUokT5kVjxB6qokIwkYXZGTFmBseHSqfqKk531xZQn fJvQDLRUDF11jd9oYG0y1t8yNtDCPUqL20/l8Q62THPTPPPxXpWwoTZZuN22 cOdNm7Cz8AtjXT5642+TVe/A2mTv+lQftcnGzMD2/Mc7y8OPNiaoUO4t3dlY GFyZ7V/09sxPXJ8b6/q4t6m5zkl5kpYsUccJNIlCTXyEUSUpzdf3NJeOdtdO 9TXN32pfGub2dC0NtXB5MtrO9nSxSxjZWXgKkwdzPdQp21PXdhb7Hi4PBOYJ WzFhVzHyDxbmCmVzhFUJvbI3/A3yNJQnrCn4e0zY0klgnhwIE/6gCn8QnrUJ +/X8+gvLnFdf7nUEvVKJPP9k+unOOEsS9khhFhqUJ4EP7+UPlfPH4fkk+bce LMx2cL25Tv3psn9tZe9y+cAFFLZiwq56Z2/+9PI+u5ok8DYTiot/+ekTGuoO /v4UVj18AQVey0ivVFj0F0h/yXu18mL7T8+3AhODTxJu45b/UAnlxptncPnb JDBnDqcNW3ahz6VfzNrk9ZMFeqX5W3/jAwB/177Z6f/qbs/X9/ser16d7i9p v6RznUueoO89up3jnUV3PGeuX87qvGimPLlckHLGJC0wS7vc9rXROmoT/56u tifLe23yZKnhScC6yYFz7oE/fNMmK037SyeNrE1oDocJ3yZ8nrB5a5tsjVTu TLp2vQ2f0Fc461kbck90Ofsbz3RedriLDCW56rOWhNPG+FPGuEyNVKuMMEYH 24TvFYo+mM3WfHOp4Flu+ouc1NfZCT9Yo783SV6ahN+bI37KlPxskFOevNJJ fjDIvjdHvjDKf8hL/KXC+j+Gm//bUOO/NuS/LjPv2uOe2RRcnlhlX5qpUKSP /efWH+giHhpEj0yyR2YZa5NNrYCrEv9sUJjstwl9s+1LC5tPF1CeLOnFNIs6 0XpW9JYjdsMes2qNXLVxs2yW+wySBb14RhvuTQ+b14vpI0tUGXrZeqZk26jY 1Enpdcsgp9dtej006yZu1miMFDWyVRqD9K2zZqaRrJq4WTGJV4yiZaNoIUMw rw2d04bOpofMao7NpNEET6aGjKuDx1RBY/SqDqYqGUs+MqkKpmG3kEz592Jx w7Zm7c+UKmQq4Mld3M4u9d5MJYd6lWHTSsGsSjCvFixQmKSE+9RhS6nhK5oI mlVNxFq6cCNDvKuXPdRJqU3u+cNkM01AbUJhspoSuqEJ39JyYXLfKNsxyZcs kiltyLDqyGjaMa9RNOu/CH4mO2bWHkth4nXEj2XHDlmjb5kUnXnRHXlRbbmR rbkKT66iOUfRlKPwnDzemBftzlG4HApXTlTdieP1p+IaTiW482Kr7FFV2ZHu 3NjmAlXHeW1vhW2gynGn9uR487np9pKFaxeXuiu9vfWDbRe5dZNsZVl+RqFd ZVRGZCaGGVX0TeCxRMX7CfJ3qU081fntVWa2p6umMLni5HGnXX7eJrmQJXVm SalN6s4p2aLJ9SpLrzs78GYTGran6/+tTfgk4RdKWJiwkyaBj+1iO7v4AAmc t7fJX27oCgyTA23CP7nrwLAbGNkljCxP6F9Q3VXZ1CZ97rxeV971am7dpONS 9pVKO+UJtQmFCU3LxayWcnPbRQvfJm6nlbVJQa5GlSCKiwpje7rEwiMySbBU zNZN3pWJPoiLPkZtEh/1IbWJMUVk1Uhy9HJqk8vn9a5ijdupaSjLbLxoaLho qi01upyGunLbWXtinPS91NjgRMWHcZL3j4veU0YGmVPlecaES0XWxsr8jtoi ft2ETV9z+WBb5fA19wi3m6uZZrTfwx0/6efOm/jDpIULk79sk7088beJb/gK t6dr5JpvtMs3fn1x4sbSRC/b07U60bM+2bs61bvm7aM8ueu7/XBtbHd9nFs9 Wby1OjewPNO3NN1LrxN3Ogd7mjz1JWdP6dOVYmV0SGayJCMxwqSWlp7M6G4o HulyT/Y2+u5cWRpuW7zjoVkZaWNtwpZO+Od0sQ1dXJv4eh8s9R/Ik8+3h9nR ePYwYbZ08tnm8Odbo2xPF73hzp74HyDMFlCe7U6zLVhscYS1Bn+K5ECb8Lcx UpuwNRe2dMLfLH/gvMnrr1bYugnrCLat69nuFNvNxU7E+x/VtR74nC52spvd YxJ4FSNLErab6/Cwk/X7+bDKVmqoStgX9uPXayxD2IYufrmEhQkN/zjfwLtI KDf+/PohOyDPP/XX//Ws8Mft+UsVaehP/PaR94cvFtmyy79723l2tkrCDpX8 +eV9eg289p3Pk8D5izzxFwq1CffMLv+2rj98tfoT/QVi3QQAfhVVCbUJFcqn K1fGu4tayjNqi1SLt6pGrrDrns/01DhoKE+qz6WdNkrOmCSd1baVYffOrOfB fMvj5VbWJk+W/G2yVPd4qZZ/4lbgvH3dZKWZ5Qlrk/08aToYJnONbKGELxSq EjaH22R7rGp7rHprrGZ9uHquv7y/8URDsbbYHl9ojT1rjjttisvNiLakyPTJ InVShCouNENxNPPYb06FvjuUmfCi5sLzU7oXeemvHcmvsuJeWuS/NYm+M4l+ 1kn/aJD/aJC+1Il/qxN/Z5R/Z4p8aY/7Pi/pv3RX/K+pjv94rfQfLtu/OZ36 LEvxbZbimyzFVxbpZ/57Q6hN7mcIHuiEu0bprmmvTbYywrmTJv5hbbKmFa5q hf42EVCbzGnCZtJCZzVh3JjEPptiMTtywaaYt8rnrbJ5i+zuaeX6iTh6P6WP 8BqEcxYpvV8zyFYzJRtG+ZpOuuF/ZNYGdw+7YtN/G3vgrJjlyyY2siUjN4tG 6dLbhusRk5h6ZFEf4dOFL2QK5jPCptOCvalBNFMpRyfVRyZUH9GMKo9yO7ho lEHjyqBJZRDXI9QmyUHe5KBpViXsDfWIMoTbzRXQJvyjg8cCzptMJ4fNJgtm leFzqnCuTdThPmoTZahPGbKkDl3TRGxqxdsZkruZ0l29nNrkvla07V8xYcPa ZJ06JT1iK1PE1k1mdYJxTfBwatCYNnTSIPRapNM2xWxO7ExO7KQjdiw7ZtgW c9sa9bE5sj1X7smRNjkknlxZ2+mYK2fjOwsTmk9F1+XKqu3Smhx57Ymo+tPH 68/EVuVEX8pWVNqjak/Ftxen99dkj3rOTHc6Z7vK5q9fnO0q914pnWx3TrYX j3ZVD7SUleSmFWWrKgr0RQ61ITlcExusSxKkJ4Sojx9Jiny/MC+F2qSl0tBU rq0tTrlckFieF01VUmgRObNlpXY5tYn7TGLzhVT/E7qs/EF4ft2Evv//q86b vDVMAh/qxQrlwIoJ+8TABnlrm7zZ6PW2DV2HqoQbfq2EMuTweRM21Ca9bnvn RRM7ckJ5cqM6p6uKO29ytSqH8qS13NZWkd1WyeVJc5m1tdzSWm72XLQ2lVtZ m7hKsqhNKs5n2YxKZYI4ShYi86+YSMVBNIKwdyIEXJvE+9skVv5+YvRH1CaW NDG1yVl7QsW5DLczrbYktaE8o/mSwXPZ3FhhpjypLbPWOE3apJAE+XspscGq mKMKwTvREe+YUmSWNEW+TVlVnN1Uebqz7kJPM1clvc3lff4ZaKn4uP3yUHfD 0I1GmuEe7qnCI72No72N3puevXWTwbe1ye22BW5b1xXfcOf88NUFypPx60v+ NqFZHO9ZHef2dLE24XZ2zQ/eXbz96dbUo42JeyvDGwuDlCc0a/M313x3pkau 37zR2FLvPGVPTY0Pz0wSU5ioI48akiIunzXdaHDe6ayeHWxduNW8wF3IuNcm 7Dld/P0m/LoJt8troXdnsY/PE365JPDSk733G8OfbY6wKqFX1in8BfH8k4QD T77zPfIrYRLYJoF3wfPnTfYLZZGvCXpDVULfvdNQpLCtXK+/Wmbf4fO7s/g2 2X9zcN2E/yBfK2wVhpUO/6Qvtm7C2iRw6SRwK5f/CV07/kLZu7KErYaw34Qd MPnlx0eUJ//86gG7cnH/ccErfJjwz+9ip+DplT3168/+m0oOPAeYXx/50/Mt 9nH2bK4Du7wCl1EOr6RQoQT+Vv/w9drPT1f/1t/4AMDftaf3er/Y6qbXh762 oc4znjJtozNtddh9p+2M/2k5Bf21efTfffqvv/u89oxJlm8QtV0y+W5V3Z/1 PFxoZW3iD5NGapPH/jbh7yXhn7LF329y4LwJ3yafL3FXNwa0SVNgmNA8WeSe CUZ5QmHCYoSGhcnBNhl3rdyumOwq7K93NDu1l04kFmdFn7UezzdG5+ljHJnR 1lS5PkmcmSCKiw2NiwrKUATpQn9TIPpgMD32hcv5ssDy2xO6Vw71K3vS97aY F2bJC7PojzrZz3rZ74zSH4yyl0YZtcn3psjvso6/sMf94+Xs/9xb+Z/6Kn+p y/+p1PLCEf08O9LfJrLPuWsNuTvc37SJWfbQf+SEyxOtmIbaZF0jXE0LX04V LKUKFlP32oSSZDo1hM2oLmJUL5wwiqfMUjbTVvlDZ8bWWfWCI2bSJBkzCOmD c/boVaNiOVO6ZlAs66Srejm9X9HL142Rh2fRrKDx0ZjkCzRG2b81c5nhsxlh NDPa0Jn0kOn0EK/m2GRq0GTK0Qn1kTHVR2NclXzITdKR8eSjFCYTyUfHk46y WxGnuUPrRylJZug9RUrS0ZlkipS9wybT6jCuTdSh0/tXMQa2yZg6hKpkfn8W VIJFbrg2WUg6tqQMWUsNZ88ToL+T3G4ureiuJmIrjWuTdUqSlNBVf5twR07S wtY0e0dORlKPjGiCJnQCr1E0YRCO099Ym2ImN9abc5zCZIiqxBLJpj1P3npC 3nZS0XYqsjU/svmkouGE3J0rcedKXXly90mFOz/SnR/lzo9uLU7rLNf1u+1j 7WdnrjsXei+uDFZ5rzmnOp3eayXeqyVTV0qmOktphjor+5pL/OsmqspzxvM5 KfokQUr0R9r4kPTE0LT4YGqTsw5Vc9WpxvLMOmdqTZGyIj+uxKEosorPmiIu 2CQX86KrTsW5C5L815oYr1UaB+pz2EOD+fMm9J3/X7VucngfF/9sYX4TFx8p B64+GbtaxEokcAKrhD9vMtJREHgKnlXJgVPwg415NIEH4Q+3CTtvwh02qclq K9F3lBnpX1DdVXZqk+v+NrlWndt20dZYbGwpt3VU5VCb1BcbqU08ZaamMjO1 SUOp1eWkgrDVlOW6yk+cztOrEiTR8lC2bkJ5IpMGhwveFYa/KxW+T22ijBcc l72X5D8Lr1cJHDrZOUdieUF69XmV26muL9M0VWQ2VxoaK4x15YaaEkNtuSXP fJz+UWYqwzXxIdKQd+WhvzGqZbb0KKNaes6RVld+osNdNNB6qc9zkc+Tfs/F wbbK2111d/byhLuKcbinYaSnYZI7CM+dhZ+++ea8CX/kZP52K98mC/ttsug/ b8LahMJkbbKHLZpszt7cmLu5Pjvw5O70423v/dWRTd/HVCXrC4Obi7d2t2d8 0zeHbrb1XHVVleVl6+OpTehr1sSGpkQeyU6Tu4psN1srJnsbZwbq5wYbuDYZ bqU2YVXCniHMzpvQsPMmfJsErp6wbV00/JXx3IOFN4cpT2hYnrBO+fLeXp6w i06e7U6z+034suCfzcVfwnggTA6fiA9MG35LGFs32b8McYV6hD2t6+nOOL3h T5qwvVLse35+mxZfJQfOm/CbuPgwod+EfzpxwFmVvbWbH7+m3/nNHfFsuYSt mLA2YUsn7MwI3xr+r5k7WU9V8q+///RffvqE3rBfwJ5UzIcJf/qe3vB3Mv75 9cNfXj1gl7yzEyKBleEPinV2BJ7ecJ0ScP87f/zkcJ7806F9Yv4FlNU/fIVn CAMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPyd +j+Ypud+ "], {{0, 447.375}, {403.5, 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->{192., 192.}], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{229.62962962962985`, Automatic}, ImageSizeRaw->{403.5, 447.375}, PlotRange->{{0, 403.5}, {0, 447.375}}]}]], "Input", CellChangeTimes->{{3.8450299235787616`*^9, 3.845029947788061*^9}},ExpressionUUID->"52567fb8-8335-44b5-8fd3-\ 24d98b58ce41"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"exp", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0.000", ",", "0.000", ",", "0.000"}], "}"}], ",", RowBox[{"{", RowBox[{"1.824", ",", "0.505", ",", "0.491"}], "}"}], ",", RowBox[{"{", RowBox[{"1.848", ",", "1.034", ",", "1.006"}], "}"}], ",", RowBox[{"{", RowBox[{"0.996", ",", "1.312", ",", "1.277"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"2.503", ",", "2.021", ",", "1.967"}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{ RowBox[{"find", " ", "F", RowBox[{"(", "u", ")"}]}], ":", " ", "kexp"}], " ", "=", " ", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"dF", "/", "du"}], ")"}], " ", "|", " ", "u"}], "=", "0"}]}], " ", "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"dat", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"exp", "[", RowBox[{"[", RowBox[{";;", ",", "2"}], "]"}], "]"}], "+", RowBox[{"exp", "[", RowBox[{"[", RowBox[{";;", ",", "3"}], "]"}], "]"}]}], ")"}], "/", "2"}], ",", RowBox[{"Accumulate", "[", RowBox[{ RowBox[{"exp", "[", RowBox[{"[", RowBox[{";;", ",", "1"}], "]"}], "]"}], "*", "9.81"}], "]"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"F", "=", RowBox[{"Fit", "[", RowBox[{"dat", ",", RowBox[{"{", RowBox[{"1", ",", "u"}], "}"}], ",", "u"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"kexp", "=", " ", RowBox[{"D", "[", RowBox[{"F", ",", "u"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{ RowBox[{"ListPlot", "[", RowBox[{"dat", ",", RowBox[{"PlotStyle", "\[Rule]", "Red"}], ",", RowBox[{"PlotMarkers", "\[Rule]", RowBox[{"{", RowBox[{"Automatic", ",", "Small"}], "}"}]}]}], "]"}], ",", RowBox[{"Plot", "[", RowBox[{"F", ",", RowBox[{"{", RowBox[{"u", ",", RowBox[{"Min", "[", RowBox[{"dat", "[", RowBox[{"[", RowBox[{";;", ",", "1"}], "]"}], "]"}], "]"}], ",", RowBox[{"Max", "[", RowBox[{"dat", "[", RowBox[{"[", RowBox[{";;", ",", "1"}], "]"}], "]"}], "]"}]}], "}"}]}], "]"}], ",", RowBox[{"Frame", "->", "True"}], ",", "\[IndentingNewLine]", RowBox[{"FrameLabel", "->", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], " ", "}"}]}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.8122458946247807`*^9, 3.8122459117806697`*^9}, { 3.81224594830929*^9, 3.8122462868421164`*^9}, {3.81224633207593*^9, 3.8122464535289297`*^9}, {3.812246516009039*^9, 3.812246563090599*^9}, { 3.812246638940317*^9, 3.812246876774053*^9}, {3.8123470486670413`*^9, 3.812347051682555*^9}, {3.8123470966072025`*^9, 3.812347323132008*^9}, { 3.81234741007143*^9, 3.812347415966572*^9}, {3.8123475116907806`*^9, 3.812347520634344*^9}, {3.8123475758734417`*^9, 3.812347579567418*^9}, { 3.8123477492891097`*^9, 3.812347762488459*^9}, {3.8123478282231417`*^9, 3.8123478472209744`*^9}, {3.812348071175949*^9, 3.812348072474114*^9}, { 3.8123481259943905`*^9, 3.8123481287065563`*^9}, {3.8123481606590233`*^9, 3.8123481635272818`*^9}, {3.8129373002804165`*^9, 3.8129374795649176`*^9}, {3.8129375608148932`*^9, 3.8129376841051188`*^9}, {3.8129377388246346`*^9, 3.812937751721712*^9}, { 3.8129378361071234`*^9, 3.8129378848425455`*^9}, {3.812937928137231*^9, 3.8129379634791355`*^9}, {3.8129495347076764`*^9, 3.812949648561287*^9}, { 3.813036641561981*^9, 3.8130366693133364`*^9}, {3.8130366994018126`*^9, 3.8130367289095163`*^9}, {3.8130369029175572`*^9, 3.8130369077874956`*^9}, {3.8130369860345592`*^9, 3.8130369986950703`*^9}, {3.813037189128409*^9, 3.813037347406389*^9}, 3.8130411355834327`*^9, 3.813286451594322*^9, {3.8132864989355974`*^9, 3.8132865337790318`*^9}, {3.844483138153005*^9, 3.8444831681389923`*^9}, 3.844483354106944*^9, 3.844483398698422*^9, {3.844483994971035*^9, 3.8444840101237717`*^9}, {3.844484092329155*^9, 3.84448411700369*^9}, 3.844484171990526*^9, 3.844675854279398*^9, {3.84467617827621*^9, 3.8446761903121104`*^9}, {3.844676222865761*^9, 3.844676224552003*^9}, { 3.8446786076397953`*^9, 3.8446786124578333`*^9}, 3.84475268336024*^9, { 3.844850364811833*^9, 3.844850372198386*^9}, {3.8450064793377247`*^9, 3.845006480282358*^9}, {3.84500700161862*^9, 3.8450073048940306`*^9}, { 3.845007357672757*^9, 3.8450073921170864`*^9}}, CellLabel-> "In[347]:=",ExpressionUUID->"06749b51-4c55-4da0-bc75-3eeea2112fb0"] }, Closed]], Cell[CellGroupData[{ Cell["Modelling assignment (simplified)", "Subsubsection", CellChangeTimes->{{3.4734694905626*^9, 3.4734694918886003`*^9}, { 3.5992247695247765`*^9, 3.599224771911581*^9}, 3.6862337070346437`*^9, 3.686290215967782*^9, {3.6863951815146017`*^9, 3.6863951817946024`*^9}, { 3.686463495303398*^9, 3.6864634969434004`*^9}, {3.781589662579389*^9, 3.7815896660189276`*^9}, {3.8114746411244287`*^9, 3.811474684590746*^9}, { 3.8114747713265204`*^9, 3.811474773913365*^9}, {3.812346993584053*^9, 3.8123469970522747`*^9}, {3.8127829373218765`*^9, 3.812782941268284*^9}},ExpressionUUID->"45f28a15-b454-4ee2-8c91-\ 53218377cd97"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", " ", GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzs3XVcU20fBvAl3SAqGCCKhYgtFnYndnd3P+bH9rW7u7uwu7u7W8BAEJDc dnwX5yzPNmKwne36/uHnfR/YdnbY7vt3rnOHb4+hoX04LBZrpI34n9DuY2uM GNF9XEsX8f9pPWRk/75DevdqMGRU7769R1TswRX/x4bif0bwWSzJ//4HAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJnw4cMHLpfr7Oyc FwAAMqd58+byfwEAjCU4OFj8b82aNY19IAAA6RAYGCi+Mu3atauxL5Eh3V69 esVisfh8PgsAADInJCRE/G+1atWMfSAAYNF8fX3F/5YoUcLYBwIAkA4+Pj7i f5s1a2bsS2RIt6ioKBsbG3G/kwAAAJkzY8YMcYu6cOFCYx8IAFi0R48eidui GjVqGPtAAADSYdq0abI6ytiXyJBuv379YrFYhQsXNvaBAAAw3owZM8QtKnpD ADCuFy9eiNuiypUrG/tAAADSAXUUcyFVAAAwFPSGAGAKkCoAABOhjmIupAoA AIaC3hAATAFSBQBgItRRzIVUAQDAUNAbAoApQKoAAEyEOoq5kCoAABgKekMA MAVIFQCAiVBHMRdSBQAAQ0FvCACmAKkCADAR6ijmQqoAAGAo6A0BwBQgVQAA JkIdxVxIFcDQiPh3Z1YMaeDvZNt0e5zmT//cnNvU39XRs3S3La+SjXB4AFkI vaERpUbe3DS+Y40SeV1t+VYOOQtXaTdh+8PfIvFPEr9c2TiudakctkHTnwqN fZi6mVkLKfh5d9fhh+l6H1lwBoioGwdPvv1rkOdiDKQKkFbJLzZ1KeXp6Fak 2YJbsYSxjyazBD9ubz/yODU9DxF9Pz2ulo+zk3eVIYe/GKaLEH2+sO/SV+Y3 4caAOoq5kCqA4SR+vrRudLPirlyWlDVNqiB6t6CSlezHLOfWe2ONcZgAWQa9 oZGkfNg/sKy7a/FmgyZO/a9H9bzWZCvD9wysVSswB1/2/3gmnyqYUQtJxNxf 27NCseojwz6l55xnyRlIfLq2TfHC9Scd/2g5VT5SBUijmF0tHcmvnFWVxR9E xj6ejCOi767qVr54rbHHv6bnXQjujPUn61a294AL6QoktB5KzM059f0DWs+/ HCkwxPNZEtRRzIVUIXsRf46PqlU1OMjXlaxyVbBtPHyLlwluNOcO8xoh4vfB XoHFy5Txc+FSb4cuVRC+nlOeR/7cocXOGGMcKkCWMdfeUPBgUcuQyuWK5LRl 07RcsuaLw+XbOLh4ePkWKVWpTvPOA8fP3xh261NcNpSooi97OvjwrEpNuJNA /ofIY739qYaGxbOiDtr0UwVzaSH/Pl7Txj9X+RHHv6W3M8uqM0D8ujS5qod7 hRFhnw1y0WDykCroIrg7r1lI5bKFPW3oWzQ2h2dl4+DqmbdgQPkaTTsPnbnh 9MsY0247Moz4va2pPRXDVpz/lqGpAhH3YEWoX67gMaci0vuHSr0x0o9D/uFz 9j6TYqhDEnwNGxjknLv29Es/GHpSjcNc6yhLgFTBSBLf7+2uqHpZLE6uOtNP fUxg8tAzkUjSbCbfHlNUx1gFcWl39r/KOXhs6/yNFt9PyP6jBMhK5t4bCn9e nVLFWakOZ9vk8C9fJ7RT70HDR44cNqh3x2Y1gvI4cBU/t/UO7vy/4++y8Lsu +rS+oRubZVVrdYRSAxp/dVRx8pY3N3dBO6akCubQQhIx16ZUdnUoNerC74z0 aFl3Bog/NyZXdOTnC133ItGQz2uakCqkheDHpfEVHeXtFccxb1C1xm17DBg2 cvig3u3rl/a2k7d2bKfi7RbfiDLHy8O/9xY1ymfN5uWoPO7cL0aWocRv8d/R xbHsuCsxGTl+0ef9fUo6c9kORTpueW3Q1FH04+SAYja2RXru/8y8u4XGYu51 lDlDqmA0og8LK8sHLFjVXPnNTPqq5GNdXXWkClKilORURvZcALpZQG+YcKST G1Vo27faE0/zK8mR9/fP7lzGQxEuWPs0mXc9a+rxpEuDfTjiy4G8gy+rVoMJ d6ZXdBIfKb9gu07FuKaUKqQ8P7j/cZKOX2ByC5n4eEENV45rnRVvdBTRRjsD oi87Wubm8Hw67kvXCGkmQqqQRvEH2jpTwUGuvmdVb1QLf91b3zPQQd6S2RTr GxaRtR+dxEd7D70weDMl+nx6zzVdiQGRmpzC1O9Ewv3ZVZw5Hg3Xvtfe6BBx d/cefaPrvAqTk7Pkwj/lxeIaLmybgCFno5jaqmczC6ijzBZSBeNJDutMdWWc vIMumcugzNQrQ/Jz9KQKAGbKAnpD4dNpJeUj1Nsf0j5PXfjz+oJm+a0U9Xjh XofDDV62Jp7ulUsScvBKTn2iUTH+fX/5yImH31/Nq8g3oVQh7mjXfE22MHZy gy5E1Ik+fjyWfbXFOst3Y54B4vvedrnZLIcK0++Z94AFpAppJHgwoTg1qV4j VZAgoi+OKEGt1MJiO9da/jbrWhHi957WXm32G3r9j9R74wIrzH5p/NbP8Igf R7r7cFmONVfoWhGCiNzUOH/34wab3JAuwncrazuz2e71VunKWoFiAXWU2UKq YDwp5/t5kbf8uEXH3zeXtkZwa3QhLlIFsEwW0BuK3i+sRI2y0pkqSAi/He5d VF6Ps+xLT7hBN7gh4wT3xsmmXPEqztM2H1j0aXEV00kViIhNjZysG5tjqkB8 39fei8Pi+A6+pOuC3dhnQPRxRU0HFsuqxJjrhv0wmhakCmkkfP2/cjxdqYLY 34uDCnDkuYJXr1NZtaGI6NPyGna2rQ2dKsSf6p3Hqqw5pgqi8J2tcrJZ3EIj rusa/CR8NbeCtVs3I6UK4nr/0dQgcSfkWHX+M2MdAoNYQB1ltpAqGE/qxYF5 yG6KGzDpkdmkCnfGFkaqABbKAnpD0UfqGj0NqYJY6uuV9dzlc5P5RYdfNmSz ELerha3siasu+awtVfiytJrJpAp/r48qymOZY6pA/D7aLa+4S+PruXgxgTMQ f6qXt+RIAyfeM989IZAqpJHw7bwK+lKFf6k35ev5ZeHoUiL23IACHJaNgVMF weuFVe1ZPDNMFYhfBzt5if8uVsE6F5kkfod1zcNhGzFV+Ef83N5cMjrZPmRp Fo50MRMWUEeZLaQKxmOuqcLd/4ogVQALZQG9YXpTBckjVtd1ko9XsAqa+shg Fbno4yJyeRp+yHJtM+VFX5aFmEiq8Pfmf4GSOSFmmCok3x0fILk24wcveKej vjeNM5ByZahkMQ6WU53VH5k6l1wfpApplKZUgYje3FAxm8u6ydY/hj8QIvbC EOki3oZNFQSvl9aULDBjhqlC0s3RRSQnzLra0k/av8fE7+M9JV93o6YK//7F HuwgWZGInbP9fmauiJl9LKCOMltIFYwHqQKAubGA3jD9qYK4+Lsx0l++dCM7 Z5cjhirJhS9mlZFdEPBrrNC24q2ppArCL7vb55cdrdmlCsTPHaGu0vUtyszS fuliOmcg+Uwf6XIcHL/h13QNnGYwpApplKZU4V/c9qaKqVy2obsNPnkm9d2m 5rllJaEBUwXi9/nhgbLhXGaXKhCRmxtLFyfjV5yvPclMfrGifg7pYDkjpwr/ Yna2kC77yS87y/CrcZoVC6ijzBZSBeMxcKog/P34wLyBzSsV8XK24XGtHD0L lK7bZdzai590r0hFxL06umho65AS+d3t+RwO39Y5V6Gy9bpO2HDtm77mV/Dz 3s7pPRuULZDDwYpn7ZjTv1LrMZvuRtzSnSqIYl+fWj60cVEX2zprvmsGtqI/ r44vHdygsLNtk23klUfq91sbR7WoUMjT3souR+EaPRddjtTdIovfU9j8QS2r FPV2d7KxsnZwz1cipNWQBYefxWT6rhQR+yJs8Yi21Yrn93Sy5ts45SpUoXHf OYdfxGqLnkW/H+2d3a9ZpaLerrY88fm1c/UuUrFJ7xk77//S8iaI+FeHZ3Wv HZjX1ZbPt8/hV65h93FLdp04sap9kZY7tFUyKeHXNk/t3bBsIW83O/E79shX omaHMWuufDPf4b0mygJ6w4ykCuKr/5mlFTvpOrfcFU37jUn5emXD5J71yxT0 knyOHT3yl6zV8b/11yLU26LEqC+fPkq8OzOSXGiNHzz91oePlE8//ypeIK2p guDH7e0z+jYp75/H3d7Kyt49b/GQtiNWnP+s+6oz8cPZ1eO61A4qkNvFhm/t mMO3dL1uUzS/34mvtnYubCMfsFF78fOvpG/f/yiP3dDTQlLErdyxJcNaVyue R9yycPn2Hj4la7Ybtfzkm3itjyH+frywbkxokIddpQXvZW2hMPrxnsntqxT1 crS2cStQqf30Yx8z1GYI38yrKL2Ty/EZdk3LSBQDnQFh9POjiwbW83fxpi4A Ez+eXdK3XpCvu52tU85Cwa1Hrb/1U2/RHrO9mXS7UbZ7230Z2gDT5CFVSKM0 pQqCR5MC5MEot/iEB/oqNlHMs0MLBoeKyxAXWx7PyiGHb6nancauPveBdrPU v0/XtvaVj4WwbrzmnfzL8SNW5Qsl/PVg98w+TYKLSJ6Xw7Wyc8tTtFLTvrP2 PIzS+NALvh0fUU6+ETAvcOylT9Szhv9WadYSv1zdNL5NmZy2JXTWoomfLq4b 37lOKV8Pez6XZ+vqXaxyi4Fz9z/WfGm55IjbO6d1ruRtX2D4ddkbIf6+PTG/ V53A/K421k55SjUdveNpXEa+gZJIWdqucwuNvkV/0ETsvSVN8sp7Hpc2W9/L z+vPeOWDFkQ9PjSvT60CDg7tDmo2gak/7u+d3SMkv1PAxIfSVxI3v0dmdale PK+Lra2LV7HqnSbtevJH35sQfVwk6zo5PoMumvdSsZlkAXWU2UKqYDwGTBX+ Pt/Wp4wrh+3o33Dw/9Zu37ll+ZRe1fPJ6jfbAs3matlPiIi7v1S6RrtVvrqj Vh88c/7M4Y3TOgTKOiG2a6Wp17VeLKd8PDS0gjuHxfUo13XGhoPHj+1bNb5N STcOi+8dUMSVTZcqSIvBAfUKOZFv2kq1YhT+fnp4Qb/afo5kF2gtTRUE4afG VlJMyiYf6d/vhLYRZKJfV2fV8+azrP3bLLnwMV4oSoq8v2NYRelWeFyX/AGB MiVLBpWq0HHDu/QExqmfjowO8eJzXAOaDZm5bN2GNfNHNi8qO1ybAi2W3dfo GIlfl6bWyCmuROwKh07eGHbuwun9q/9rWshO9jfPVX/ZE43LFVH40UElHbnu 5Xst2Hvu5p2bF8M2Tutcxp3cVKMZXapAxD1c3bG4E989sGm/8bNmTx3ZpbqP HXXRV6L3rrdmeifONFlAb5ihVEGyznoxxWgF9y5H1WtrIvbu8rZFHfkeQc37 T5g1e8qITtXy2ZK/7hjUb997pRdKOd7NTa1RUKPS+KQlVUh4trlHkCvPpVjD 3v/NmD1tdPfafg7kS9gV6bTpOe2lgOjHxZmNC9iy7QvW7Ttl8doN6xaP71Ba 9m3l5a417TLVSqU+W9eumJO2I+YUHHVTUm7raSGVJL07MLyyJ49t51Or74xV W3duXTWjf72C9rJH5akz+Uy46psk4t6eXjm8SXFX8i/Al6YKxO/rc+p781QP huvdaru29Sm0Ez6ZGih7IvvQXbE0v2CIM5D688H+//Wq7mMvexrZBaDwW9jA ko7qT8zNVXf+Pd1XKsKn04PIQ264UUd6w1xIFdIoLalCyt1xivaLV2LyQ50F W8LLnQPKu3PZDgXrD5y9ZtvOLSum9anpI2vObHwaz7r8Q/krlvhgeai/vZbv BosbOOUx9WKin+cnVs0hPg77oq2nbT567vypfatGN/IjhyJ4N171XNFKij4f GlwhB1fb05JNN/H3w4W1o0NLepAnQHstKoy8MLORjw3bKleFThOWbtq5fd28 EaEl3KRfVXHFMnDPG7VKI+nrtS0T25XLRWYlHFmq8Pfphg7+tqrHwnapNv9J utNMwf3xsoV6WY5t99MsnknE3Zwvbp21nQBehXnS9Q0kgcGs7tXy2ZGNiL1K qpD07ca2yR0repHDVLjFJalCyputHQraqD+htW+bja90v4vUS4PySk8Y27PL UXNeKTazLKCOMltIFYzHUKlC/L25NcTX3bwCnXZ9UOoPiT/35teVjfti2ZUY fPKnet0k+rKtRU7Jz20rz3upCMOJ2IuDycHKXP9RN+gaScHHHW0lw1iti/Q6 +EXpuFM/7e1cQFGkKhf2RPTBvuUr1qpdNo/iXpVSxUhEHRzSqNOwUT0q56QW RLJusi3q/fa2+fnWuco26zls3PjhnavmpUYgcguNoBu2SsReG19G0js71Vr+ VunAiOhTfXw1ulfroKlpP+uJz9Y0z8tj2RTrc+iL0smKOtzZS3bE7JzNtqjM 7Et9vihEEtCw3ZpsUprwLfq+vz35EJsKc1QHJIo+rK7jwrYKGn9bpY9M+bC9 bV4ubapA/Lk2tbIr17P27OtRitdI+XSoXwDZm3Lzddyfxdtrg4IF9IYZSxX+ JYZ1dpVf/Km3eET05QkVXbi568+79VvxYU3+sK9XMbLB4Pl2OyxvL0Q/Hpw4 fEjiwNIO5NLsvIA+Gw4eooTd+qp4fr2pQvy9eTVzcN2rTb74XfHT1G8nhpch 96nn5A7d+kntgYKPe7sXsWHx8rfe9ErpvlP8tRHkYC22c7UFsvW+heF3TxwV O7ywpTd5tOWG7z5KOnbxRQyhp4VUkvxidePcHBbHq9maF8pZx9/na0PzyF7Z qmDXfV/lh5twYULTNoNGD6iTn/qz8SsteBt+vH8xW757QIOug8eOH9WjTkHq soadq/ORmPRdZQufzygla/h5gTT7exriDAifLWtdvW6Dav7OHPlx9j0bfWtS GTs2P0eRynUb1C7n4yhfTk9Stzfd9FFXapxwoJ2j7FftG2/R6B7NAFKFNNKf KiTcnxHsIG+8fHod1zW6JeHhojo5OCxu/rbblCN9Ivbhkoa5ZJ9Q22L9jkbK G7qUz7eOS74Gh2Y39pA1kVZV/jtIfTmOX35N5mMpT+ZWlnxk2R6h2yOUhmKF 72ydU/Y42yoL5Tu6ElFPzx4TPz5sU58A2bvjFuyy6gj1lTv54LvoX/K1iSHl qtepLL+Zo60WFX072MPfWtykVZl6XXmYWcrnQ33IJpqTq+GKZ/L3K3iyuF3z PqOGtShGtSucAsOvRd2aXtmF6+hXo33/UePG9m9ewpX6xjrUXqVjYQQ6isEj vDL0EwoSP9yQndcptcllfRxrTTkkP6/X3if8E33e0LZs5do1Aj2ptlE5VUi+ Pr1hjfr1g33kkQ+3+MT730/2K8Rn2eQODKnfoGaQt61SpMnz7RH2Q8dHg4hc U9uKbJ66HadNqkHCAuoos4VUwXgMkioQUSd6FxA3rZz8fU5p3CIiok/38yML XLd6q1VvzKdcHeoru6mmvs+78PUccp8lbuGxdzSOK/nhzAqSRtYu+H9PNfrf 2NN98stzAZoZEMKXs8ryNCpGOdHX5dXJZJtfoUOnkn51p5z8LL9sEUXupS7I 2Z7dT2i0yQlXhkvzEHaOLmFql99ExIYGsqqA49PntN6RamqI3yf7+okP27bC rCdqbznpeFdqKAUn/+DLip/GHuog+4FVzZXhKq+XemMEuZg0v9LC90o9qWxT Tm6JyRofBiLqYMdcbI1UgfhxoKM3h+vX/6zGO0p5PLUUVSjl7hqWzqsEyCgL 6A0zmCoIn1H3hskHKgpuUcTuNrk4XP8hFzXasOT7E0qQeSAnb6+TGj9XXM9m eF0FIvpEb18uJ0/XIxoDoASv5wWTSSbbo9Uu5Xrx780JpWzFT1h4+BW1tkax t6642W13QHkFCcGdsWRiq3VVAT0t5L+4q6MDrCVtXJs9mlfCf2+MLUG2nw6V 5qi3VX/2tCKLa15Aq04VClQatve1fJ4IEXOBSpNZ9k22pGs1MXGzHUK+rE3z nToX08n0GVDs8MfO2WHSwGK5Qyad/kJ+BkUx91a29JVfHrDdm20N136lIng0 mfpouXY4ZIY3DpEqpJHuVCHl25kpNeV3O7i56y9+oGNXSSL6zEB/8UeQ493t qMYsL+KP+EsmeyW2c81lr9X6efmdbNp1FYjova1luaxVvfWq3/2Uy4PJsosf suyL2kdeqfXTtq4C8WNzYzI0oa1FqTskdlUXaW5fkPpqSU1yFBK/8JALaqVI ypUh5KFxvBt2rlcwsMuae9HyI0x+MjuYvP2R3kUfRB8Wkuv0suxb79N5gZ5y sru7nnUVkq4Oo3b4sNeYAUFE7WtLxj3cYn0nt/fJ32Th9R/kzSXB98sz68g/ HixOvl4nddSXKef7k/vJc3yGXs2SbUTMggXUUWYLqYLxGCJVSLgqu47WSAZI xM/drcjmkO3WbKvSPWvRZ2qzNeUBdjIpp3uRgxw0LxoEL+ZKuwFOnt6n6Qox pdmHtOsqiJ/bk629Zk450ycnNQWiUNe9n9S73ZujCnLkR602yjdqR3NZ0cyv oXYdL/3p5kZk9+XQaFP6BrxKClmuJMnofETjqkb0fmElqoxV7uwVA741r3Zi dzQj0/38Q64oOhZy0h07Zw/NwORf6t1xRe3UUoXEK8PEZ8OqyuIPNKWz8Ok0 +UWcXf0NkYgVsoUF9IYZTBWI79RtGvXvyt/zA3w4LJsaK9TrYQnBg4nFqWFG Dk23ql/tZj5VSLk3vjiPxSs9k+52l+j9gmDqvSovM576aFppyZtxaLAhQqOp +b21CTUFSW3pwjRcU+tuISWvK4k5OL7DrtKWx7Ene5EXJiyHGstUVzBTmoTC 9Wq6+rnaaC/hm7nktRXbe8CF9BS8CYc7uLDSVipn+gz8+7O1CRn08Gxzhsy8 o9bHJD9fECLfb0Tn9Hfi14b61ODsgqO0zMtmMqQKaaScKuTsdSI2KTEhNir8 7cPLh9ZO7VmrADnjhsXzKNN54cUInR+UpFtjikmeilts/H26XySiDnQgKxy2 S8MNqrvW6E4VBLfHkF8dq7rrVG+IE783NZR9KTh+I2+qfQHTkCr8EzyeEkgO UNWsRUWf1zVwkYy6dGmzl/Yrm/pwckmyleQX/++2ypETEatqkt8ytkvlqdfV 7m8Q0dubkQMBbJvvpJs7pU3c3taOafz2piFV+Be3oxnZrGimCsrdgLVd/sar X6r9QvyNsYHylTxtqi2lK8hkhK/+R96yY/EqztO1F6Zls4A6ymwhVTCezKcK ROSmRtKGVVxjalshK+nyYB/yVXgqN8HjDneUtbQOjbeojdkSV36FycqvyTaV hp6IPthRWvBxvPufp7+cSDnTOyftugrkc8tv5NGmCqnXR5B3ouiLzvjdobJs gO3Z67Rq/5B8guw6WDYt92iuhKO4M8V2734yHQsBExEbG0pyfLZrx8M09yhE kYf7FZfMwLbK13qrYpMyImJdPdliYJ7d1Ue6pZzsQXZy7j2UjkR+M9ex2ryn GvM7BPfHl1JdrfHPQcloCG6xCbTly7/4XS3kUwpdOoVhbaBsYQG9YQZThX8x Wxop1lC3qrmKTP6I6D2txDWrtmD0X8zWxtTDxN/cE2ovl+lUIeFUr9xs7WsM Jod1cqaOWbFkQGxYF2kjZ1NvPU1ASfy5NL68ZGgvN0fNxU+VnzYt19Q6Wkgi 5mBHad7L9uh+QstyKYKH8liX4zvkivLpEr6mKlr6JdNTzvbNRTbdzXakY/se 4XP5Spx6bzhm8gyIJe9vTc6QcGq8SSPSkbyN+xMCqDyV608z2k7+iyfkq3NY 1d9gfnu9IVVII6VUgRbfr+HoJftufdPbhxI/t7dwkdZHeQZe0lKRpdwYWZCq +4qOu6f8W7pTBdGXlbWkPTo7d58zat9+eTPFztX3XIr64/SnCqJPS6qSN5k0 atGUm6NlX1lr9SESiod/W12bWgPHtfUelekhsdvIFJC+jVUsb5K+q2ylkUY6 N4CQvoM0pAopx7uSE/RoUgUinIpGJENQ6AZ+xp3pm48ar6Bza12l7kxclWHN Ky0soI4yW0gVjCfTqYLo89IQa7L4Wqt1MlfKxYF55Z2Ycn4u+n552cj+Q+ef +qLe1CffHEWmClYNNyn3EPJLZZZt0+1a9obTs7Ok4tYjbaqgEmjQvELKuX65 yWEUHQ6rZuKKO0/WTbdpht5ExKpa1M8bpWNPM+LHhga2ZF/xXktfQST9jvge q3YaUz6dmDuk/6iVV3+qPyr+aFfyXpxLl2OKNyEZTkHWy5wcVUbue6WaYYi+ P3kcoVQTJJ3oQW6XxNFCqSzSHBcJWcICesOMjlX4sbaO0liFRpvJ8cF/j3SS Xdtp+xgrfY6taq9RG3ST2VQhRb58lrZXV8ya5ZWb81r64L9hnaVVKtd/jNZr 1pSYyMiYZLUGLk3X1FpbSOLX1qayccq8CnPfaLt4F9wfT41I4OQZcEHpz6MY V8WvRNeWKcaZadwM1SnlVE8P6uq8tq5tK/5l9gxIJB9oK+uDtC6sJ/6AVqU+ afwqiz9qa/lSrw/3pe0azQRShTRSHqvg3mL5tVu3bt68cXxKCLV5Atup+uKX aRi8IwpfXdtGX2P0L/XaMPnHTnXvAt2pgvij/z5s9uB+o1ffiFL/UsQd6iBr RNk5ep7KQKpARKwmqyONWjTpbF/ZmH3VkZVqr/FtJTUigeXQYofy1I+E3aFk qiDfA0LlleVD2DSHn+qSfLSzC9UrNNiocUJUpClVONsnl/ZUIVJ+eopPpF+n U6nZZdk126F15+TkI52ooVT8qkvSuZSE5bCAOspsIVUwnsymCsSvTQ3JfNiu Lc1eOJQ/O1tQa81oTPFXe8aET5c3jm9X3kuxWlYD5VSBiKKG9nJ8hmkb6Kov VXhMRcz0qcK9cUV0pQqp8ll6dm0PqL7nv3takqeDH0yTXRO/NzUg+z271nvT vk5O8kny4l38dtIzQI+GZMO0FcObBXrIZ/66dD6q9CaIiM1NnBUXMVZeVfos OftRyw0S4TPZ5RSv1JhTj5/q8exDFKbwZQsL6A0zuq7Ci1ll5DcE2R7UKB3q UpZXbvy5J/o/x7/VPseZTBWoybncooOP6P8WvfspfbPiJk4WffIrL9Q+1pVO mq6ptbaQfw+2d05DHZ10vBt1ka+6jJl8XzMtqYJi90+rWqvTMWXqD3U3UvK2 tuoObDN3BiT0pwqSDwU1eIKdu995bQPThE+mlqR+TfNijPmQKqQR/boKwvdr G8i3n6JZpkSD0mh+69Dd2kuM+H1tyLH7aheW+lIFmiOPeXl82dAmAe5Uy8r2 yFiqII981WvR1JsjyQUHeKWmP9N61a80u4qjOn8qaW8rnalC9OaGei7YaQ84 aiN1E4ll3WKXjoUu/qUxVZAveJCxVEFSmuZLQz2fenGAN/VrRcbdM7so00As oI4yW0gVjCezqYLiApvl1OmI9j5IcaEu38BLQ0rkzU1jQwPd+Xb5Q3rO3rmx H/kI1VRB0SByS0x+rOWA9aYK1AQ+balCUZ2pwtWh2lIFpasWl3YHNF5Z9I6a GsevOE9zySFtiHAqhKd9O2mU+PHcisH1CznynPzrD1p8YFk7cpKIaqogfvtv N4XmVR2LaZW7Us+FZzSzBeoGIa/0zOfpWeQIspQF9IYZTBXk8ZzsO0gFf9Q9 J12333XIZKqQenmwtBRMV4GXsK+17OKBX3mR1hvhtNJ2Ta2lhVQa82vdZKvW m2FK6yOozRNT/OEMmioo1jVPQ4GfqTMglYZU4V9SmPxGpm2b/dqGGSvNcWbZ 0W1Sz3BIFdJI22qNoi9bW1DLPLFsy067r3vAuuICXPypO6CjIlN8kTn5ldch SU+qkPDhzLKBdQs68pyLNByy9NDiVuRYhYymCuvq0qYKxHf5CDNeuf+90t5C yxeLUh6HJpG8T1+q0CgDqYLiTaXhZKUpVbiQyVSBiNrYgAxXOXkGXtR2F0dp gBQn3+DLuNlDzwLqKLOFVMF4MpsqJB9sR41BsNGVjCu1v5y8g9Rn+xGxT3aM qudrx3YoEjp5z8NfksNQGgmrkiooJkbT7VNAMlqqIK4NFlUhF11wa7NXfeun 2APtpPPm2C6NNmodnKhJaS5yhsarCX/dWtO/ipcV161057lHX8ZKniHlPDWN Qz1VkLzDr6cm18urGCpOVil+zeeqTqVI2tvKhiyD1CdSgvFYQG+YsVRBMX+W pbIQTDy5ShZN25Smp81cqpB8rKur7JuY9jmuittk2pZk0ypT19SKZoNmJoiy WMXYAZW8OatShXDF6Ge9A7qyJ1VQdEIsm1b7tP1hRe/mV6Q+yEgVLJj2PSBE EXvbUbeWWdZB42/pGuSoNCifdhImRXyNSsVw7Fx9lF4ubamC8MeNlX0q5bLi epTtNv+4bNdJ+SQkQ6cKivZV8hMdV/0p56hFWSStR0SWpwryhSDEJ5tuHS2V Y8uOVEHyNyBjc12r3Qpuy3cIQqqgnQXUUWYLqYLxGCBVoFYa51dZrP2CV5Kh kn2Y2sp+xO8b85v4WIvb2uDRRz8pWlItqYJS9cjJp3WKnfFShX//Em5PLiM7 J7yiwy7FKt/ne7O0hmTUISdnkw3v0nOqFZUnO3d6L9+F4afGh+Tisbhe9WZd +q54VZ2pggQR93zfhCb+DkobIUsqjaJ9wxR7XCftIxct07tWEWQjC+gNM5Qq KIYKSb6FeQfK5/vH72wuKzozmNplLlVIoVIFrYtF0lCkqw6hu9M1KypzqcK5 vlSqoHsKsqJnUL1pllWpgvy6IA1TnLMnVVCMW9M1tUFprIJkHVCzy2aRKqSR rp0liV9Hu/tQE+atio28on3AYnJYZ2plV90rD8Zua0rdnik0+raiMNCfKgi+ Hh9bxZPL4uVpOPfqT0UTkHWpwrPppWgHPqlLvUGtsy3ZXVZpVemsSRUUB5yG KDN7UgVxbUoujM4t8t9drTMgrg+nzhPXf8xtzICgZwF1lNlCqmA8GUwVkl+c Ovde8supV4dRuzvovOAlfsrbX5smW+VD04iYS2NLSwY7WJUYdTVWpXTTlirI Z8CJn6nxVo3NmMkHGzFVEHeCESdHBbtLfoPjUWXUrgeRScLUmLdnF7YuJO7Z 7Ip23vhU9wBdDZI9m6hMRt+KXinh777IQ3NRxJGehaSbz1WZ+0T1bpneVIF8 r5HXV/cLzqk0IYLt0Vy+Abtirw2b6ss/67wcI/5EfscWENnDAnrDjKQKqQ8n B8o/yLyAiffl5WXKcWohfts6a8J1f45jIr+r33fO7AyIa1Qjyi8/97XOWIGI i/z+V9pgJR/r4kI1vL1P6/xmiX68/xCnaOUydU2ttAwAy6ndAe0NWdK+1tQK M9WWKq3SmkWpgtL50B8NZVOq8Ey+sLyOCWJKJ1T16s5MIFVII12pgqTuOTOg IPXF4xUaeI5uDwAJxd4lLHaOHie1N4yKWNK6/galbRX0pAqib/u7FOBLF49c 9EL1x1mWKihVj7rXfFa6plZdwzZrUoV/SYfaU4tT6FkuLNtSBflfz6rOWq1r 1iqV/bgfpJ0F1FFmC6mC8WQoVSB+7mhbX1b+KtZOlCykM0PrQjqKWpJXQbGg QNy5/rLpXU6hO9UnC2ibAaE0yI3t1fcs/cBSpVSBLhfI4lRBTPh5Swsv7wqN 6lUo7OXmYGPr6O5VsGyDruPXX/makTGuit6SxSk4/Jr2pyAit4TWoa5MiB+7 W+eQbcHZ96z6dYeWVIGIvrRmxzP1vaJ/31nZoQj1d2bx5XMblYbv8gLG3dXx 1oTPZgQ326z+R4YsYQG9YfpTBSJyRyi1gKC47m21S2mDAeFL+XIo/JJTHuq4 YSx4OLlCK/XFtTOZKiiNv+IWHHpFx/hm0buFNeqvlL6C0goubM/Oh7WvcPAv 9kTvqqOUSunMXVMnULtlSLelv6Ft8KzS+meqOWhWpQpK88R5gXqGfBg0Veij LVWQN9psz56ntM5sUcrlda3Zz1hIFdJId6ogFndlRDHq2prr2+uElvE4MbtC Hajf0lHSib6tqEE2RyqrqepOFUQR25pLr405+QZdVP9hlqUK/wS3x/hTQzVc 2h+Ip3245AhO9yK3pMrR9ZhyO5pFqYLScmFqZ5Hm2AyaKjzQcpBJhzvIdnfQ NVThX/KRjlQaYt9qr9bTaeksoI4yW0gVjCcjqULK/Umly1Mr8SptEszia1/r TF5h8cvPka+2E3+wvez2Eq/ktKfqD1ROFZQHtBI/NjagXpDj3fsU7d0yRaqg ti0l+eOsTRUEn/Z09feoMuex4TYCjjvQnroTx3ZpsF5bWh9/eWjRAGrJNyJi TR3Z/ASrmqs09lRXpArOncOUpj1/WVarwgyaO2vEr1P9C5NVj13r/WRIoTSU juUQPOuhlnumRNTBjnnL61pnCQzIAnrD9KYKom+7WntRn1S2e8P1qiscplwa JN/p27HqvKdano/4uaeNd2WNjcAzu7OkYhdDcSlfasItbSMAYk/1LhBIVb0p lwdTC+WybCr877m2nemfzKzgqzKYIXPX1MTv3S2ppkiy1b2WLkP4ZKpsXIik ulU+tKxKFf7F721NVsp6V3kxZKqgdXIDEbWpobXs09bhoPbB0clhncgR67p2 imAupApppDdVkEyunBBErUbIydv5IO29aCJyQwNqrSte6ZnaLnXlYxrUbwbp ShVEX5dXl13YWtVb/0ujpFCkCtTmOopHZipV+JesaOzYnl2ParkOlo9pYHt2 CVMZoppFqcK/PzuaU/O89C3JY8hUQWtiIF8kl+Mz9Ir2kcOKDdAztp+8hbCA OspsIVUwHsVWNuL2dIK2AFRZ6ouF1VwCFFkpEbWvHbWsOrfof3foN+/+ukLW Gzk32igfYCx6O4+80S2Zeav+OKVUoc5a5X3LiYj19alek2VXed4LmrZcKVWo uUpzYFpWpgrEn0sjA2w4+kYlp1fs4U7yxevZbnWWvdQ8z8TPk/2K2JeW1wiK sZB087UVqYLKRZmk97cL0gx5pM+/uZHsxNu3oVKFfym3RsvvIrC4eVtteq15 QSb4sqtdXvsqizDSLptYQG8o+rCwUppTBSL66oQKjtTXh+/X44jmZeLVofJ4 jMXzabftneYXTPBxWytvhxrLNYbXKxaB1DE+V0eqIG2QFKtI5m688plm4yGK PNLdz1bx9f6XfG24n/yQ7cpOvq0ZRhCxNyeWcyww5Ipyvim+pi5Ml9eqH5C2 FvLv2X5UAsPJ1+8cbQRC/N7eXHrH1LbKItW9brIsVRC9X0B9IqwbacsKyHeX yTOglCqw7NseoA+P/x7rKhso5jPwgo5ljL+tqE4etW2jzbqXg2AkpAppJHw9 p5zexQOSHs6oQI0ZZHs22/yJrp+OOdKZGs7J9R95g/bjSUSuld1ycKy7RrXF Sr08mEwVrEPVFyBUjJmkywbkqQLLpcsx9TxC0fppHdKqI1X4J3gyrRT5PWG7 NNtGP7Y/+cIA6T0yrv+om6qvn1WpgtKqKDbNd+rcnivlZA8P6jaOtimnaUwV tCYYxM9NjaQfD37JKTrCAsW4LrZ712OYl6qNBdRRZgupgvEkH5XPRmV79dd7 q0Tw+WCvojZq8z8FLxdWdaAa/LqrP2h2GaJPy6tLujDrkhOVRskT4avkCy96 dz6kHH0T0fdWdyxKdp/8KrKt05Le3H4kHXcQf66/j6KcLjn8nHpqLgrf0cqT TfUSmlmJ4P54Mjbg16CZDZd6g9qcyarhZpqVG6id4MQ9icbCv4LH04Iksw7d mqz/ZNCldVMfTStNLaou7pq9600//Vnx2inhV5a0K2zH8Wy7Vz5FUnnGbpHh V5XzfUHk5blN8lM1eLMdku6QiH14+0WytPfneHU6RFPgUmsh8crMUlQUos/r GrgoVnRku5butfLCh3jy0aLY10enN/Gx4uTrfeqP+ZXMJsoCekPh02ny3Rx0 pwqJb/f2D5JHCtYFO26nCQwkMcXK2k7yjzGL41au75rLn/5Sn+M/Lw9PbZiP z/UdcI5mnRZ5iCkutrUNyFHkIDT3h4jInS09lL5FTiW6LD7zNpYs94n4d6fm tixkw8nd8aBSWyf6sErpkDnulUbufxUnv0IQ/rq/sU8pZ45jrRUfVC4bFNfL Srcyiejbe4+/lrdYOltI0ecNjahZEHbBc57RVOk/tjWX3IHnFhx8Ue2+ovji qTy52gDt0DbhM/m4j+rLv6YnhxTcp3ar17f4TKbPgFKqwAuaTneRRPzc1VJy jtiuDdbpWuQh9Tq1vhw/WGMMjDlAqpBGgocTA6h83qHdQW3jHFOeL6hGjV5n OZSbeCNOs1sVvl1Wg2oYnGouo9nCWvRtTR3JB5hffOxN9eTg5qiC5CeyymJq RBfx4/ru0x+Eiq8Yi1d8zE3lsEwQcWFWA2pDatuWeyU/I/7cu/2KHDgpTwzY 3v0vUA1w0vOwAw/kb0AxE4zmC0zEnOhFDVfg+Q+9RHMF//d8f8lvsD1b7VSP I+O2k0tTcvLTLfGtWExc58QBGordFHQvXqucGCjdJhOFX9p9QZHqpJzpTdat NLvGKFIFlnXt1RqDTyXP9mFpiGQcr7icPqwroFTseWvfZKvGkBOgWEAdZbaQ KhiN8jhiFtd/4DmtE9+JxG/XNwwN8eJLB1ddVa3LU1+vrOdO7mfjWnP+I9Xb V8Kvu9p6c1hsx+CZ91V6MOXZcmzn0v03Xn0TEfnu1oG5PSrktM0dUJTaIset 8aqnby/Pb1yywz5ZW0n8Ot7bT7GAoEPxzqtuficPKSXy6pLWhey5VOzAKdBp 062nd88cvRUhb7yT5dvvSLoCjU7k7/62ZL/Nr7SQ5nZa0rGuZFGtcWtS9Elx Qm08iwbXatikeWhoy5YtW7Vu3aZd+46du/bsO2jExHnrjz74nt7Rrgl3ppSV D9KQdq5u/sF1m7UKbViliIeku+HkbrVDuQ5PPNHdk7pS4XhWG7vn7sfvEa+u bJ/aNtDV3rdEIfJSi5Ovy97Xr45PCCk16EISeU+B4x26+Z36/p8R6+pJKhHn emtU6mTBu3WNcrCVD4zFtnHPXzSoVICPm7Qb5Pp0D/uJzivbWEBv+PdwR1fq M6ctVUj99Wjv1NAi8l1M7P1bLrgepX2pL0UrRuHYevgUCypV3MdV+qXm+fWh nc0ct68NWcSzc/Q4oeV6QNHasXP30xyhL/qyo5V8igb5ZNZu+YqULBVQwMNa etPbq+1utZUkU1+tqOOmfMgcR59ytZq0bNmkRmAuW8lFrUvNJS/Vv8eKlcut AkdcEjf5RPzzje3KtN2l+I7qaSGFn7fLD9a+/MQbqkvHET9P9C4ofqu2gaMv x6qfLsUAa27hsXc0C3jFRQ03IF23DcUPlZ9hu+Y7dSw0YYAzoEgVxM1nN43G jYg+019yscH2bLKRJmVX+sWf6+vJLne0DwxnNqQKaRS3vy21eQOLV17rXFJx Q/J2RR15js/2qDnrpuadD6U+me1cbfZ91WhPFL6/o+RL6FBuym2NYTRK2yXa lJtw64/4yxH7aGWLMt2OiL/l8Uc6yZtIbs4a4/fd+/g9/MWlrZNaF3ex9wso SE0H8O156M3LsLFVS4+4SrY+yfIFcTn5Ouz5Iv5CJX8OG1yx9gLF8rSK4am0 gzWI32cHFyG/tjz/XmHhqmco/s7kcuJLal7+TvsjNAaTvZpdlqwXaXfvVdTB kskb6Vr5KkU+B9Sh9T5dKxQord3jUGXWQ/GvimLuLmhYbsBZRbn8Z3tTcoYL zVQ6pVSBxS8++rr6i4m+7WqTmyOptrod1rpOo+xIqLNhV399eoaDWRoLqKPM FlIFI0l4s72jr9Lq/uIm2TlfQNlK1arXVKheNbhsiYK5HRU7snn3P6/R7hIx 16ZX8+CQDXPwoA3XvvwVN/rC2Dcn57YqZCvZDGHCeY1UVPh2eU0n1Tqe7K4m nvn2iVpNiCz/Cvc9rlS8Jb3a0DKf8rFb5/AvV7VahcI5rDietWeu6K8Yl89i OxasM2DpZaqvEX7bKW19Zc1zsaEXVTtlwZetLeQXyTblJt9Ra70FHzc2lf/c LnjmQ5V+Oen66KJWrLSw9Qtdclej6NZJFHlySJA9/dNxc9edf1ftvkXK/Sny eZjKp9Kn6YKbPx4pDboWsy878UacykhFrzoTw95QN2uJPw+WNhafNb5v+50f 1QseIu7ewnq5OJqvJMHJVX/xw3RuegGZYu69oSDy7GjlgM3Kza9snVY9hoyf MW/JihXLFs2ZOqpP6xrFclBfRI5joboDl53/rK9cJGJvz6nlqeVzzPVqtOIp zWhR4a/L48rLD4btVnvBI5rikog+N1DeJHG82+76onnBnPB0VdM8PPpXZ7tX n32bprUgYq5Pq+qm2YZKH+MaPE6z0ZVMvl1QST7sieuQK5+4dXerveK1/Ij0 tJBS8Q8WN/AiN050LtV9+YX3ceLHi/5+vLi8S4ADm+1cekjYN40rI1HUid7y mSZc/wFn1WJs0Y+w7vJxaLziwy5pW+qelnx0FsdvhNZ1JA1yBhSpAlvMudzg PS/lbW/Sh6NjKov/JJwctebe0dPAp1zo7y19Gesqi2jyazOAVCEtUsNPDS8l Xw5Z/Jn067zzrdah6aJPGxsrjWyyyV935PoLb/6otCjEn1uza5JtGdutfL+1 Vz5JKjJR3LszC9sWtmNx3CqOOfOd7iMnfCIdbkl+Bx1z58tlz/Nsskk2bCHp 9rgAmvrGukDokjs/71LDe2QcK069LW8KiV87Q+U5MNvGI28eVyvboPE35ZUB EX1xSFGq9ZMkqJqtx7/U9zu7+JMVjU3BFjOPPPudIv6CJUfe2Tqskrj8tC3U ftNLzdDg773JZaivOztn6NbPam1v3K3x8nGgHK92dK+sneD+BNmiONzCuoc5 pN4eU1h+enjO3vk97XjeykFx8qultZ0VleWMB6pVk1KqwBHzrDHpxCfqI0LE Pd/Rp6S4F+LlC13/Qs96XnHUCjROzbdjpIIO5l5HmTOkCtmL+HN8VK2qwUG+ LloqWJ3YOXucpO/ukj+dmNEqwFU++oBvZ2clbiOtc1XoMv/cF/o788JvR4eW dVGq463z1Z96NlzSOAvfLgkhJ1Zw3CqMOKbR1KeGn5/TqoijSkVtk7/+xKMf klJlQ5LZDn51+i86+iKGWmng6cr2IaV9nJW7PnHR6F6ofK3B+yNEgicrO1Qv nd9R9bLC2rNI+eqtFt8XiCL2D61XNSiPvWoNb5OzWHDdcafk98YEX0+OD8mp 5dJE7Vzmar1LI1fX98d7vGVg5VwqHTvbqWjozNNf6crolLfbuxZVziHsC7dZ fEN6vzb13sQS5NPwc9eefkV2E1aRKsjOvEO+UiH1GtSp4OfM5bqWaLfg6g8t PW7K17Nz2hRXO7XW+eqMPfjWcItWQpqYa28oeLCoZUjlckVy0kRlSl8HnpWd o5uXX4kKtUJ7jpq9/uj98MR07FD46dTM0KJOqt9fG5/644+8VwslhO+39qlX rVQ+B/VreqscRSvVqlu3QZ+t7yVfltjT4+pUKOyhWouz7fMEVq474YzaQN7U iMuLOga5qTbMVl4hw3a90B7MJbw99F/d/LYqh2HrW2/sgTfarksS7i+onVP+ VbXzazr3muzyXk8LqfbniLi4oHOZHFRzIW7w7a3E543vEdRm+tF3aq8t+rSj X+3yBV1V3xrfza9M1fpTLiT++3tuUoOQsgXoXnnA7rTOhBB9XVtX2mfwg+nW bDDcGVCs1pizy4otA8p78LgOeYOq1q5TvZyfuFvlOPo3m3b8g96Gj5rHw3YN 3WGmg7mQKugiuDuvWUjlsv45rFka+K4FSlWqWmtEGM0AUtG3na1yqbU7XEfv wH6HlH855cvp2W1LulNfOaois8pZttOc05+0ZqxE7I3pVd3lLaBD4dZLlW5/ JL/a3NFfKQBhORRtv+y2NHVLvjm2KNkaWHnX+98Ntds177e2KyB/n/zcIWOO fRXI3szeQbXK+6u1kByn/KVCOq5WXziaiL6/YWBIXnkPwLWxt+FKftu/4ajt j9VnWcaeHl+/UjFP1bPLccxbsnKdwfvCRYIHS9rUqlgkB80rt1uuOUSLnujT ipqyxQyqLdW5uzbx++K48opRJk4BndY+lrXqqddnNawS6E1XWU6UD2VQWq2x 2JANyzoVd+LwXAqUrV6ntqQT4rC4biU7LrocofeoU8jRYpy8fc/gbo8u5lpH WQKkCmaESIx4eHr32kX/mzFj1vzlmw9ffR2tr5kTRD09vmnx7Flzl205/uiH Uvogin60f+mcBevCHkdpDY+Jvx+vH9y4fN7sOUvW7j7/knwxUfi55bNXKeKE 7ET8uT6pYu5yow/duHzq8J5tG1YvX7xg7uyZ06dNnTJ58qSJ48eOGNync/Pq xaVdmY5FmnVJjXp2ZtfaxXNmz1264eD1D7E6nyI54u6hdQtmz16waue5l8p/ DUHkze2L5izefPq1+txMIjU2/NWd80d2bli+4H8zps2Ys2Tj4RsfaWZwqr/3 pPB7x7evkRzYknV7zr/U+7eHrIDeMJOIxG93j22Tfo6Xrtt78XU2tyPJ3x+d 2rl2ydxZcxav2Xnm2a+0LNAi/PPm0r4Ny8QN4eK1ey++0vvNE/15dXrz4rmL 1h+4+SVTsV/yz2fn961fMmfG9Jni1mj/xWc/jbmRQdxZ2Zo7tnXX6Rvbm5kz oLSzpGS5fiL+4/VDG5eIO73/LV697eidrwlpighEHxZVlvYCRcfeMtfoFamC sSVFPj67h6rINh268ioqDe2J8Pez4xsWzVu88fCdcM34Ienb7YNrpSXFrvOv lBvH1PDrWxfOWbLl7Jt4um8AkfDpyq7l88QPu/AmfcM01Qhi3l47vHn5vJnT Z4rbu92nH3xL2zcuSxB/TvaSXqfbN9qsLxsU/HoUtm7BvKWbjz74ns51t1R2 lnwo+CeMfnVh79qFsyXt7tqdpx59T9vMDWotcttK87Enl26oo5gLqQKYjaRn y+p6OtdY+lrv9fTfJ/NrOLHTsiseQLqgNwRLJQrf0lQyI8S29qp0rfWYPmqp QsaI3i+sZCV5ig77zXSgwj+kCmABRF/WS5estm+wnm4VRcNQTxUyJvWOdBgv zTq6oA51FHMhVQDzQESfHVSYzy004npakgLpnaqcfTJclALQQ28IlkvwdlVd VzaLFzDhfpY1rYZIFVLujBXX92yPppuzMP4wOqQKYAEEr5bWdGaz+KWmPTbo 1l9KDJIqxJ3o4cVmcfL1OKZ1YXagoI5iLqQKYA6ImFN9JKNvnToeSUuoQMQc 7ODp3nYfzUpoAJmB3hAsmejzlmaebLb6ZjUGlPlUQRS+tZk7m+PVRn1fDzOD VAEsgvD9+kYebLZr441ZFBIaIFUQvl5YxY7FLzTgDKrONEAdxVxIFcAMEBFr 6kjXEOIWHqq5oZo6UcSRHgUdSk95gPkPYGjoDcGyETGXx5Sy43g0Wq+xYY1B JB9oY5uZVIH4fqhzXq5t0JjL6uvLmRukCmAhiN/nh5ew5Xg23/olK3IFIiKT qYLww7qG7hyXkHmPtO4uAspQRzEXUgUwA6J3C4LJBZDZziW7Ljn74S99wUgk fDg1u1kB2xx1lz1DpgCGh94QLJ7w66HeRe2clHe3M5zEPaGydeUl+9unO1VI ebW6oaddkd6H07WFHTMhVQDLIfi0r1thW+cqs+4ZfncFxfZc+vawpBV/b0Yl J6dy/13E1Ie0Qh3FXEgVwBwQv8+PDFLaxZFt512qdutew8bPmLtwybJlSxbO nf7f4K5Ngn2duCxrn9CVj7FaDmQJ9IYA4jr8+7kJ1XLmqjP/bqYWnNdEhK+s Se5GZ9NsR2y6Hpv4anO7grkqjzv73axnPlCQKoBFEUac/q+yp1eDxQ8NXN8J n0wtKdsklO3Z63S6okwi9t7C+nny1p93KwaRQtqhjmIupApgJojYpztG1s5n w9LBKneV/uvuRVtESQlGgd4QQCbl8/GJdYtVHLj/vcHGhQmirk8OpuJjtmut BWnOhxNe7xseElhr7JGPFjNIDakCWJzkD2HjaherNPTwR4OtF5sSfnJQcXIs LIvj3WrzuzTuRUv8ebihZ8WgZrMvRGKf7/RBHcVcSBXArCR/v39oyehuTasG +Hi62ltxODxrB498xYIbdh65cO+tcHPdmRxMBXpDAAXiz5Odk5ZeTMj083w/ MKhaGX9PG7ZqUMx1yhtQvtGcO3qqdlHEkVlTdj+xrNuFSBXAIomiH22bsOxK pmMF4Zv1nSsHFXCzUrs7xXfzLVmpw9pXeiZRCV9tnzz36FvDT8iwAKijmCsq KsrLy6tMmTJ5AQAgcxo3bixuURs1amTsAwEAi1axYkVxW1SlShVjHwgAQDrI 6qjly5cb+xIZ0k02VsHX11fXuHEAAEiDkJAQ8b/VqlUz9oEAgEWT1XUlSpQw 9oEAAKSDrI7CWAUmioqKsrGxKVmyZAIAQJYRCoUEoyQlJWXgbc6YMUPcoop7 Q4OfQACAtHv06JG4LapRo4axDwQAIB1kddSSJUuMfYkM6YZ1FQAADAXzAQHA FGBdBQBgItRRzIVUAQDAUNAbAoApQKoAAEyEOoq5kCoAABgKekMAMAVIFQCA iVBHMRdSBQAAQ0FvCACmAKkCADAR6ijmQqoAAGAo6A0BwBQgVQAAJkIdxVxI FQAADAW9IQCYAqQKAMBEqKOYC6kCAIChoDcEAFOAVAEAmAh1FHMhVQAAMBT0 hgBgCpAqAAAToY5iLqQKAACGgt4QAEwBUgUAYCLUUcyFVAEADGvDhg1r1qzZ smWLsQ/ECNAbAoApQKoAAEyEOoq5kCoAgGHZ2NiIWxU3NzdjH4gRoDcEAFOA VAEAmAh1FHMhVQAAw0KqgN4QAIwLqQIAMBHqKOYy5VSBIAhjHwIApBtSBfSG AGBcSBUAgIlQRzGXKacKAMBESBXQGwKAcSFVAAAmQh3FXCabKmCgAgBDIVVA bwgAxoVUAQCYCHUUc5lsqiAWHR1t7EMAgHRDqoDeEACMC6kCADAR6ijmMtlU ITEx8dGjR8Y+CgBIN6QK6A0BwLiQKgAAE6GOYi4TTBVkcx+ePn368OFDYx8L AKSbwVOF5OuzGlcpU9jTmpUBHL+RN1MNdSR6oTcEAFOAVAEAmAh1FHOZYKog 9vv370uXLiFVAGCirBqrkPxuTUM3NhkWsN1rDF+8TNXSJYvm/2/GxJG9mpby 5FOhgnf/88kGPhAd0BsCgClAqgAATIQ6irlMLVUgCEIkEt2+fRupAgBDZdkM CNGHRZXJtIDt2v5AnPbfJOKerAnNxxX/nkeXo38NfRw6oDcEAFOAVAEAmAh1 FHOZWqog9uXLl0tSSBUAmCjLUoXUmyP9OLJUwbH5jt+6t4khfu9u5cp2arXn j6EPQxf0hgBgCpAqAAAToY5iLlNLFZKTk69evYpUAYC5sipVEH1dXt1KFirY 1l//Xd/es8LXc8o7N9z0M1v3qEVvCACmAKkCADAR6ijmMrVUQdwPXqIgVQBg oixKFYjf25s5yEIFq+rLv4j0/b7w8ZRytVd81ft7BoXeEABMAVIFAGAi1FHM ZVKpwp8/fy4pQaoAwERZlCrEH+5IrtXIrzjvrf6wQPBg1cRdH7M3VEBvCAAm AakCADAR6ijmMpFUgZC6d+8eUgUApsuaVCH5bF8vWajAC5r+VGjQ5zYc9IYA YAqQKgAAE6GOYi4TSRXEwsPDL6lCqgDARFmSKihWauQW+e+ugOY3iMhdXZrO f2HcvAG9IQCYAqQKAMBEqKOYyxRSBYIgUlNTr127hlQBwAxkRaogeDy5BFca KnB8h11L1fwF4ueRrj5+Q6/S/Cg7oTcEAFOAVAEAmAh1FHOZQqog9ubNm0sa kCoAMFEWpAqid/Mr8qWhAtur79kkjZ//fbS4Xg6uZ4+TiYZ7zQxBbwgApgCp AgAwEeoo5jKFVCE+Pl4zUkCqAMBQhk8ViPDVta1l2z84N1vz/CPpw9uXD6+f 3LloeJPCjmwWy6nVnj8Ge8kMQm8IAKYAqQIAMBHqKOYybqpAEJKt5B8+fIhU AcBsGDxVIH5vo/aU1MG2/vrvhKFeMqPQGwKAKUCqAABMhDqKuYw+VuHHjx+0 kQJSBQCGMniqEH+og6ts+werckO3H6Ic3Ldj/aIJParllQ5j4Fde9CGbt5Gk gd4QAEwBUgUAYCLUUcxlxFSBIAihUHjjxg2kCgDmxNCpQtKZPrnJPSXLz32j sceDKHxHS082r+TUJyaw3SR6QwAwBUgVAICJUEcxl3HHKrx//15bpIBUAYCh DJwqpF4fUYDcU7LY+Pt0e0omHGjr7DfihpG3f5BCbwgApgCpAgAwEeoo5jJi qpCYmHj58mWkCgBmxrCpguDRpAByT8m8gy6l0P1K4v52fr1Pa+4MYQToDQHA FCBVAAAmQh3FXEZJFWSLND558kRHpIBUAYChDJoqCN/Oq8CT7Snp3iUsgfZX Xi9q1vtwnCFeLdPQGwKAKUCqAABMhDqKuYw1ViEqKkp3pIBUAYChDJkqiL6t rEnuKenQfEe00fd40Ae9IQCYAqQKAMBEqKOYK/tTBYIgRCLR7du3kSoAmCUD pgpE1Lam9rJQwbrWqm/G3+NBH/SGAGAKkCoAABOhjmIuo4xV+Pz5s95IAakC AEMZMFWIO9jeldr+Yc5rE9jjQR/0hiZJEPX87M5V82fPmrt0w8HrH+NMP54C yCSkCgCZlPLr+bldqxf+b9bcJev2XXodTbdaNBgc6ijmyv5UITk5+cqVK0gV AMyV4VKFpNO9c8lCBW7RcfeY0KGjNzQ1RMztJa387WUfIxmeZ/DwI1+Y8HEC yDCkCgAZJ/x+fnrjAnYsZfaFms44F8mA2xsMhzqKubI/VXj+/HlaIgWkCgAM ZbBUIeXy4PyyPSXZ3v3OJxvi2LIaekPTkvhwbjUXNs+tYPmaDRrWCPKyo9IF 64Ax1+KNfXQAWQepAkAGEVGnBxUlV3TiWllxlZIFqwKd937FaLcshTqKubI5 VYiJiUljpIBUAYChDJUqJF8Z4iMLFVh2zXfEGOTYshp6Q1OSdHdiKa+q/4W9 +0su85kaeWFKiIcsWbCrtfILakMwW0gVADIm7kzf/Fxb3/pjt9/8GJ1M/BNE vzw+t5W/rawcYbs0WPcZfUcWQh3FXNmWKhBSd+/eRaoAYN4MkyoQMUe6kNMf WBy/kTdTDXR0WQu9oekQhW9sXWf6PbXdSInvO0PdpZ8rh3YHk4xzZABZD6kC QEYQkRsaeJQaeSFKdc8p0fcj3QvIRi1wi094gCl0WQd1FHNl51iFb9++pT1S QKoAwFAGSBVEsU82tPfjywcd2pSfdPsPE24OoDc0HUT8p/ffaabAxu1t7Si5 4eTa9RgjZtUAZARSBYAMIKK3tQqe/CCF5idRe9vIhrpZ1VwZbvL7XDMX6ijm yrZUITU19dq1a0gVAMxeJlOFxqWK+XrYKq+uJxt1aO2ar3DJ+nPvm/QtAvSG pi/lfH8vNovt0nJXFOpCMFtIFQAyQPhm++IjkfR9Q+zulg6yPanmvsGijVkG dRRzZVuq8Pr163RFCkgVABjKgDtLMg56Q5NH/NrU0IZlW3b6Q5qbUQDmAqkC gIGl3hhRQLLYk03jLdHIpLMM6ijmyp5UIS4uLr2RAlIFAIZCqoDe0HSJPq+u 45Sz4epXyBTArCFVADCw1IsD83BYLF6ZWS8wVCHroI5iruxJFR48eIBUAcBC IFVAb2iq/j5eXM8neModbCoJ5g6pAoBhib6trGHFYlkFz8f8h6yEOoq5sidV uHLlClIFAHO1b9++GUrkSyEo/0dxU2Psw8wO6A1NVuLn80u7l3Jhs1hs+4JN Z5wNN+kFOgAyCakCgEER3zc2tGexPdvvx5I8WQp1FHMhVQCATJo7d6762oqq nJycBAKLuIhDb2iK4m4u7VzV14Gj/Jm08ut6IJwJ24oAZAhSBQBDEr5ZUMma 7RCyBAMVshjqKOZCqgAAmfT69WvdqULLli2NfYzZBL2h6UqNen5q9fA6PjbU riIeLXd+xy0nMFNIFYxGmPDjzb3zhzYvnT6q39jd73ENag6I6KPd83AdKs97 lmrsQzF7qKOYC6kCAGSeuA3RkSps2LDB2AeYTdAbmjoi9v7C+p6yjUutqiz+ gOEKYJ6QKmQ34veZKc1Dggq428iHRbFz9zmTZOzjAgOIvzK8iJV7vVVvLGLQ pZGhjmIupAoAkHljxozRkSqEh4cb+wCzCXpDLYTPVravVq5Ybnu27mEttNge XY7+JZ8o8cq0+pVK+3vaaDwR28ajQImyVTqv1zc+lfixu3UO6cMd2uxPyPK3 DmAMSBWynTA+OiYxNTH8/KhSfFmb5NrhEFaGzTjh243dQsoH5FGdvZZWTq32 /KGe6NnKdlXLFfemeSK+S75iZYIb/u+WjiEIRMy5QYXtCvYMw+C2bIE6irmQ KgBA5t28eVNb1x4YGGjso8s+6A11E4Tv75xPXtjZluu9cJmqpUsWLZg7c/Lo fq2C81BTFZSrQ/kTfdvbIY+iQrQu2m3r09g0jztIuTrUV/Jgq3rrf6JMBLOE VMFoEg+2c5S2Sw7Ntv1GA5Npwp8n+hTkUo29Vclu8zW6jcUL5s6aMmZAmyr5 7ajfs2u46YfaySeir4wI4Mm7DU6eJgtv/NQ7+ED4ZWfrPJ51lj7DqJNsgjqK uZAqAEDmEQSRM2dO2lRh7Nixxj667IPeUJ+47U2tyU+GTZ01ETpK7qR3e3sW taavDiWjjTc1tKLuNpWa8ig5XUeRcLC9k/iB9q33YawCmCekCsYiuDeuqPQa 2Lr26nCECoaQfLCdPdXaV16oa95ayucjA0tKkgWr6su/aP5eyqmeOchhbpx8 vU/F6n/puJuTK3iWGnUxGn/JbIM6irmQKgCAQfTq1Ys2Vbh8+bKxDy37oDfU Q/hmbgXyXpFVlcUf9YwuSDjXPx+HvjoUPp4SSN69sg5Z9jmdyyOknO2bi83i lZvzGiupgXlCqmAkwtdzykvbOH7F+e+wboshiL6tqC6bU8LilZn1Qk+jnXxj ZCEur/xcmqlwxI91dckwmlvkv7t6hymkvNnQLG+BDrs/o5/ITqijmAupAgAY xLFjxzQjBcvZU1IGvaEesXtaOZLVYbn/vdJXqhFRGxvYV6CtDn9uaGCT5nRC 49ERa2pbs6wrLcAWYWCukCoYh6xxkVy2Bk55bEF9X1ZKONrFXTbCgFt84gO9 JzVhT0uHEpMf0fxe0ske5FK93EKjdK2kICH8eqCbv1fdJU8SaV8k/PMv/Hmz Buoo5kKqAAAGkZycbG9vrxoqWNCekjLoDXVLOtUrJ1nU0Vd9qojwlXXK0P5e /MH2rrIn4pWd/TKd2UDK05nlrHkFB51Pw/hXAGZCqmAcf/a0cpIOsPcbeRN7 EBpEypUh+WWL6IhP6g39JzV6c9Pio+hOfurNkX7kE+UdeDFF13OIIo8PCMhZ YcLVGLqZD6mfdnWuN0H/WAfIENRRzJUNqYJQKLx///6lS5cup9ONmzcs6i4n ANOFhoaqpQqWs6ekDHpDnVKvDfPlkHeKRt/S37oL326fuPYJ3S2nM31yk+lE 0XH3aJ+I+HVmfJ3AEsHNR6y/+V2pwBR8OzogwM616uy7f+keBmAekCoYRdJp WXDK9up7Nn2LvYAWgvvji3HlWYD+kyr6sm/Ssrs0mYHwydSSsvl37Bxdj+lY UkcUeWJQoL2Nf9vpK1epWrF04ezx/ZoEuFoFTHqI65MsgjqKuZAqAIChbN26 VS1VsJw9JWXQG+oieDCxOFkd5ht0SeedIt1Sb4ygbjnlG3yZ/olSLw+mdptg O/rX7zNhzvLVK/43slWQh1tgtw2P47H2Fpg1pArGILg1upCkjWO7dTqMPSUN Qvjqf+XILCBnjxO0sxHSRvR+YSVydQanlrtjtL7et7B+AXYs3XhB059h+lxW QR3FXEgVAMBQoqOjuVz5BlCWtaekDHpDHeSrmLHYuXqdoq0OY88MrfffNX1D XAWPJ5eQfczYnt2Pa7vlRPy6sqBz1cK5HK04LDbX2tGzQKmabYfO3/8Qs2HB AiBVMALhy9llpW2cQ/Md2FPSIERflleXLbDIdm1/MI7uVxKu/ld36Fl9+z4S kWvrkmvx2NZb/13LX0f4cl5FWz2RQtpWBYIMQx3FXEgVAMCAqlevLu95LWpP SRn0htqJvq6oIdtUku3WkfY+Xvy1UQG56H+k8kTv5gdTt5xa7/2TFccKwHRI FbIWEfvq6MKBzcr7edhb27j6Bneef/F7avjqWtI2TnnXXCLp58urh9f/b2S3 xhX9iw84re1uu+D1omq5Ox5WH+GfeH9RowJOjt5Vhx8Lt8AdJYifmxqRAwcc W+yk294x8e7kMjla7NC38yMRvbMFuVIwP/0L/EJ2Qh3FXEgVAMCAFi9eLE8V LlvSnpIy6A21In5taUwu5ikZfqpRAia/29Y2P8++ydYofdVhxJra1C2nBht/ 4IYgAA2kClkn4eXuYVVz8W19G47fce31j9joD5eXtfZzLNalRw0H6WVrpQXv JZetoi+7+lYJKJDbxZpNdoqc/EOu0I7FEn1e39CVbVV7TaRqiyZ4SE0b4/qP uW15FXHsvjbOVGu/QXOAQern/d0KWlnXWh2uryP4G9bFg1zgtxRmL5g21FHM hVQBAAzo48eP5JWjhe0pKYPeUKu4/e1cZB8Nq6qz73z4KPPh3avHt87uXTmu bZAbh8WyrrHiq56bSET0juYO1BMt+YRbTgB0kCpkjeS3e/oGObHZbtVm3Pyj dCmbeHlIAXIhF17JqU9ULltFf+79r7qL9JqWX3HeW81Gi/ixt10uNs0jxdfN r9aH5pdMAWDn6HkqE4vRMFPiCWorSF7ZSVffy7uN10/vnD+wZlLHsh5c8Y9o dx9WlXxhQB6OBaczjII6irmQKgCAYQUGBopbldDQUGMfiBGgN9Qm8VTPnNT9 Ou2zVdOwS+TfI53Irct5pWe+wC0nAFpIFbJA4rNVTb3F17G2pcddj1W7O550 oK1sMBan4CjNDW6SLg6UrR7r3OGQ+lIwRMypPj7SH7Jz9zuvmRwQvw528uJY 4lx+xZ6SOnCLT3ig71JBcGeMP7lSsHf/C9icw7ShjmIupAoAYFiTJk0Styrr 16839oEYAXpDLVKvDvUh7xQV6b764CHK/l2blk3rX7+gvexH/+ndATz5XD9v ck/JwmPvoIMAoIdUwdBEX/e0zye+NGW71FjyQnMaQ/yuFjayy9Z+52kuW/8e aOskDUPLzFKLThOujSru6uQgbdZsWuyiWVdGsiWiTdD0p5YWKgjujStKZgG+ 7ZceUHQbuzevmDm4SRFHyTnj5Ne2D5CC8NmMUuRKwe6dw7CnsIlDHcVcSBUA wLDE33eW5e0pKYPekJ7g/gRqx3G/kTc1CnIi+nTfAhxOngEX9VWH1MZtsq3L LW48MEBaIVUwrNTnC6o5ia9i2c51Vn2gubwXPJoUwJVdth6hu2yV/zxnn7PK DVfKo2nlfDusmV1XutEBv8oizYUEhS9mlc3RdEuEpa0hI99RQzLAQDOpIWKv DC/KZefopnUfIIro05Kqsn0ktC35CKYEdRRzIVUAAINr3LixsQ/BONAb0hK+ lu84nqv3GbodwFIvDcqXQ/9NJOHTaUHkE3l0Pfp/9u46LIp1jwP4BiwddqBi C4qJdexWLOxu7DjqtfOx69jYrcfuRj2iKBYWdiGomCjSsTne3Z3ZJbYDZge+ nz/u89zDMDsOMO/v/c4bumpJgNwLqYI5id6saSzfQcDGe9EzdcstSsJX17PW 1m0lone1kfdseW12pa1IK3q7tkmJ9jsjU84PkC87wy0/NfMILCLmzMCSNeY+ znUZquSTf2NqT0kNuwaJ7k+rkKfr4VgdJyKidrahdou0bbXtO0IFS4c6irmQ KgCA2b1//57uS6AHWkN10nYcZ7n0PK52x3Hh9bEeXfbr2uFdErGmPrWnpFPX Q7pqSYBcDKmC+RDf93fOy5YPNOh7Sm1mIH6xqIaV9m6r4Mow+dIy6dZHkETu al+84ao3oj+iEGref56B5zO+lE++M7WKx5ir8Wb+J1k+ImpXW2pPSU1bA0nv WhUf3TFB3JFuzuSJrOutDscCvxYPdRRzIVUAADAXtIZqED/3KHYc17QVJPFz X5/uO3VtDkb82N5asadk6x2qu4wBgAJSBbMRhc6pLI8MOGUn3VE7ZCA+YGhx +box1vXXRGjotooez5LvEckpO5mcBEb8PN7HvfrsB7LBW5IPaxtYq4xk+POH /3h+bc+hF3TlrTlR3NHu1J6SvCYbItXe1Pjjg339dcYEyRcGFaAW+FXdYgMs EOoo5kKqAABgLmgN1Ujbcdy6wVrVScP6iz3U1UlxIjWzjwFACamCufCDxpIb EXDLTVHd3EFK+GxxTRuy26plSUXJp3UNreULLwwJEPz5Q8RdGVm2wthr1Nit pMNd7KjFHNN2tkl9tKBu5VFXcuVCAMkXBiv2lEx/SwwnCBpL7r6RlueAZUMd xVxIFQAAzAWtoaqUAOWO41UXmLKKefK5gfmpE1Vf+ELnicQRR+ZueYQiEnIn pApmIrw9sRS57WOBIQFqFoURvfNv7kJtcFN+aojmojXxgK88e7DtciRZNrHB q2T/U8pxCYJro4rKdzQoMe4G9dBKvD2tZtUJ1zPvYJk7pGUB2m+qTqKHMzzI BX7ZRUde1bmnJBF9eek/gXG58p5bDNRRzIVUAQDAXNAaqkjbcZxT5n93TOjk C66PKU6VmeWm6CwziR9HepbvfjhXvuUDQKpgLsq5Ceon5Qtfr/P5q8lf8uCU U2z0NS3dVv65/vJBW7xW2z+HLqpdtMPuz2mnEz9fSC5Ea9/9WIr0/xO/Lg73 qjnjjrpFCnMB0YPphmQBmqXtI6FpyccMkm5O8GqEtRdohjqKuZAqAACYC1rD zESPZlI7jrMLDb2kbvsHfU90f1oFak9JdbuMZUTEXh5RKm83hAqQayFVMA/h rQklyTST125PTKYvJoXMbdR4zqZx8u1u2fkHaN3FRnhttBtHPqJ/6NhGRRqt eZu+viWitlN7SzbZ8FkiCt/Z0aPl+te5bt8HivjVEm8qC8jT55QJyUraPhIs R1+dywHzH8/3dm6wBqECzVBHMRdSBQAAc0FrmIn4xaLqZHXIcup6OM6EEz2b X1XfMpOIvTqmnLVr9yOxCBUgt0KqYB5C5WAreX8/3VfEnw718W6/+WXIbPkq jCzHTgdkMSbx+9rSmYfUrPsiuj+N3OeBzbatNvdRpmSUf5YcycCtNDMoaEat Cn2Ofs21nVtJ+GrFZj92Prt+Gv8YJ75vb03tKclruvGL9hvKf7KkroNNA43L bUJ2QR3FXEgVAADMBa1hRuKX1H5r8pUaPxpfrYmezqvCpU7UdJO2zSKI+Psr WxXisF27H0WoALlXVqcKEknu6HxJ3q/8i+rhOrfdqezpp4YdHFSl2sgLUaLw VfXkX7eu+0+Y5E/ioxUtqvc//k3NzVFOcuCW+/u6SjAqujdFPuKB5eBeyr3G 1Ju5eGq/JHxNfWqAgWkrNRJft7With/ies58pK0/kfr23z5leSxeg7UIFWiH Ooq5kCoAAJgLWsMMUm//rxyVBbBcB5w3fnZs4tVR1PtCFsvGZ9cv9QW3JDHs wtLuno5sFovt2uNorNEfB8B4WZEqSMu548eP+/r65s+fX3ryfPny9enT5+PH j2b8CMsjejK3MhWNsp2qDlpzPODC/iX9qxcs1XN/hFC+WoIr2W/1Grlr16SG 5RouClE/lkr8dnltK9kMrgFnolWfYJKI1WQ6wS7UYUdYbi59hYqNPKVsux5N MfpEoueLvKlASNsKv6lfbm4eViufrIHhNVyHzYXohzqKuSw2Vbh58+adO7JU gSCI3BKJAwDDoTVMk/z++Kiq1IsiWc1dYfTlKKPeOiW/PTioAk95IhY7X80+ k+cvWUpZsnDerMmjB3VpVrWoPVtxSJ6ex0yYbgHAeGZPFe7evevh4cHj8fr2 7XvkyJF9+/bVrl1b9gbf2fnt27fm+hQLRPw671faipUO27XWhHOfyZ5/yvEe Dor/zsnXePFdjYMMJB/XNrBm5/Pdq34kfuLBTrYsln2NaTdz8yCr1I/n/1fL SXmnOaUGn/5q1Bq/gi+Xp9ZxZqf90Bw9ff+es1jZbCyaP3vqOL8erWuVdFYk 3yxeo3UmDKgDc0EdxVyWnCpImzChUCj9dqQKAMAIaA1la6bv7lfTq2xhBy4r M2tnt3JeDaYHJut1osTAOW3q1/Iq4WKlciId2Hl6HkeoALmaGVMFgiCkTzY2 m125cuWwsDDlf09OTi5atKj0U2rWrCk9xvQPsliCiDMz2lcqYGttX6hiy+Fr rkamLaNI/L46tU5BO0e3mj0XXvigbTwW8W1zi7yN173TkK0KAke6l+1/NNKE zXcZjPh+yK9W5fJFnVSf9lZORcp61Z1wIV6vE4merO/esE61MvltDG02WDaN 1iNUsASoo5jLclOF4Ju3bt0SiURJSUmNGjXyVjD4MQEAdOjUqVPWPVUsFlpD ALAE5koVJBLJ8OHDpacqVapUdHR0pq/6+fmRD/yQkBATPwgA4A/qKCaz2FRB 6v79+ykpKUlJSb179+6oMAMALF7x4sWRKgAA0MVcqcLEiROl57Gzs3vx4oXq Vzdu3EimCkuXLjXxgwAA/qCOYjKLTRWCg4Pv3r1LrqsQERERpvAOACyet7c3 UgUAALqYJVXYu3cvGRqsWrVK7QHbtm0jD/Dz8zPlgwAASKijmIspqQLdnSQA MABSBbovBAByNdNThYcPH/J4smVSS5cuLRSqXzJvyZIlZKrQokULoz8IAEAJ dRRzIVUAALNDqkD3hQBArmZiqiCtvipXrkwmBrt27dJ02JAhQ8hj2rVrZ+yV AgCkQR3FXEgVAMDskCrQfSEAkKuZmCqsWbOGjAsKFizI52vc2kC5hnbfvn2N vVIAgDSoo5gLqQIAmB1SBbovBAByNVNShW/fvjk6OpJxwfz58zUdlpCQwOFw yMMmTJhgwsUCAFBQRzEXUgUAyApIFfQnTvz85OrhDfPH9mpRvXSTZa80bVie GDTes/LMR6KM/5X4eWlS3UKOruU6rAyJz8l7xgOA3kxJFSZNmkRmBTweLyoq StNhly9fVm4lfODAARMuFgCAglSBuZAqAEBWQKqgF9HjNZ1qebgXdLRSVOfW DdZ8kKg7NPXhnGo8dv4hAYKM/51/tp8L+a22zTd/UfutAJDLGJ0qxMXFKQcq 9OvXT8uRU6dOVaYK4eHhJlwsAAAFqQJzWX6qIJFIPnz4gJ0lAZgFqYJBhN8C xlS0lpfnTt2PJaoeIHq1sr6D9Ks27fbGZvwKEX9rQYN8snHIVjUWv9Q0zgEA chOjU4UVK1Yos4KbN29qObJ8+fLkYQUKFCAIjJMCADNAqsBcFpsqSI+/f/++ SCTi8/nh4eFIFQAYBOsqGP6txM+97WWxAYvrOeNhpkkOfyQftrV2Zcu+alV7 +VvV5EAYtraJPduxy6E4jecXPVzSzLO8kSrUmXFD/c5yAGCJjEsVJBJJ8eLF yazA2dn59OnTZzTYuXOnMnwYMGCArhPj+ZM9hEHTalUw9j57Nl+aeYIdQLZD qsBcFpsqSN27d08oFAoEgoiICKQKAAyCVMGI75WEr6onH61g2+lgQoavEN8P 9yju4mQj+yKn1IRbaurr1AuDCrh03Bel+X2hMHi8O4dlJHbeQRcEGk8NAJbG uFQhMDDQiOfDmTNndJ0Yz5/swT8/MI+xt5nFKam2dQHIVkgVmMtiUwXp8fdC 7olEIqFQ+OTJk4cKTwHA4lWvXh2pgsH45wa4yko7q5pL36QbjkDEXPArW3XK 5v9V5Mq+6tj7VKrKtyZeHuZeduz1ZG2nlwiSkxKNlJTEx9QKAAYxLlUYNmyY so/5/PlzTYdJ6zo3NzfysLx58woEuvv8eP5kDzE/yfj7nCzAwjxAO6QKzGWx qUJwcPC9e7JUQfqgq1KlShkFozNYAMhOSBUMJgqd7SULDthFRlxNK9KTbk6s WH7Uf7GfNzaRj2TgNd/yLdOIBEm4f9Pi7Xd9RkEIACQjUgWCIAoXLkw+wN3d 3bUslXDp0iXlo37SpEnmuF7TiFKN7konJqUIsSaEvhAOQZZDqsBcFpsqSI8P CQkRiURxcXFDhgzprbAVAJjgypUrWfdUsVgmtYbEzx2tebIy3bbzoSTqv/Ef zfMu2ef4T+JPyvEe5LILVeY9zTD1lYg62qt0gxUvaR25eufOnTZt2jTPEVq0 aOHv70/n3QQwmRGpwocPH5RZwbBhw7Qc2blzZ/Iwa2vrr1+/mnyxJiJi9rTj GZ2AW9Vc+jpDbzcpKalv3750P4fU69+/f2qq6mi17CK8O7ms0RNZWE59z/Az nm/q1Kl031FzkrYd0hqAnh9NDoJUgbksNlW4oVhXQSKRSM+QdZcHAGAuprWG /DP9nOWVetON5A6RojerGxVru+OT7P8Ib/4tn5fMLpx+JMMfIvr8EI86Cx/z NZwzm8yePdvoUtMCVatWjd77CWAiI1KFU6dOKf8EDh8+rOmwiIgINptNHubn 52eOizVV3NEBpYoay91nQ1iGIvPFixf0PHf0ExYWRtd9/iN6vKh+cWNvtFuF sZfTT5WRlvfKPUxzDDc3N9p+OjkFUgXmsthUQTYDIuSeQCAgN5fMussDADAX 01pD4a0JJeU7RFZb+EJa5Uo+bm9brMHK1+TIBPGbZbWsZFWLbaeDyp0niejz fpUaLntG+0pm0mf19evXr+QI//33X1RUFN13FMAkRqQKc+fOVXaOfvz4oemw iRMnksfweLz379+b42ItzpMnT+h+Dqn37Nkzuu+NOX348IHuO2pO0rbjy5cv dN9UxkOqwFwWnSrIxypgoAIAMIVpraH41RJvWXDAKfO/O0Lix5GeJarNuq8Y 7Koc5Gtdf3UEGbRKvh3r49l0zWu95j6Inq7r2qCeker7LLmLtcEBmMOIVKFP nz5kXFCqVClNxyQkJDg5OZGHLVy4UO9z4/mTPYR3Frepb+x9btht/TPsLAl0 Q6rAXBabKkjduXtHJMIDDgAYw7TWUPJ5Q2PZiozsgkMv/QgYWrrcmMB0W0wK Agbnkw075pabEiJ7MIrCtrat0HZrmJ4PSezsBpCLGJEqtG/fnvx779y5s6Zj Fi5cSB7j6empz9YPCnj+ZA/sLAmMh1SBuZAqAIB5paSk/JLj82me7J/9TGwN Y/e2s5EVd7Y+40ZWLNH35K/0S5OLHs30lO8t6TrgHP9P4r05dSsOPPVd/8XL k7+/ffHcSC9ef0nEMukAzGFEquDr60v2LidOnKj2gO/fv5MDFezt7UNDQw26 Hjx/sgWR+OW18ff57XetuxMDZAekCsyFVAEAzItsEaS2bt1K97VkNxNbQ/6J nvbkuzlOvnY7IzMuKCOJ9G9M7i3ZetuTo/08vKffStBwHgDI5YxIFZQLJsyc OVP1qwRB9OjRgzzg9OnT5rtSAIA0SBWYC6kCAJgXUgWjW0PFJAeWQ8PVb1Qe fsnHusszB06BkqXc22x6gyHBAKCBEanCvn37yEf35MmTVb+6bt068qtr1641 32UCAGSAVIG5kCoAgHkhVTA+VQgcWYTNYvGqznmoZvKI8Ma44vKZyTyPUQE/ MSAYADQyIlX4/fu3jY1sDtZff/1FEBmeMGfPnuVyuWw2e/Pmzea+UgCANEgV mAupAgCYF1IFo1tDYfD4khxu2XHX1E5tEL+WbRHBLtBm0+tct2AFABjEiFRB avHixcoBCeSm3tIqcfr06Ww2u3jx4teuXcuaiwUAoCBVYC6kCgBgXkgVjG4N RSFTPUr0PxWtfhwC8Xt32/y1Zt6MxTAFANDOuFRBWrANHDiQfICXKFGiXr16 PB7PyclpypQp8fHxWXSpAABKSBWYC6kCAJgXUgW0hgBAL+NSBVJoaKj0UTZ8 +PCpU6eeOnUKeQIAZBvUUcyFVAEAzAupAlpDAKCXKakCAABdUEcxF1IFADAv pApoDQGAXkgVAICJUEcxF1IFADAvpApoDQGAXkgVLIIw/vPLO5eObF85Z/zw 5YFxWBMHQBfUUcyFVAEAzAupAlrD9CQJH++d27dx1dJFi1f47zl9OzxeQvcl AeR4SBXoJA7bP8rnr0rFXKzZLIpVzaWvxXRfF6MQqT+eXz2yw3/l0qX/+G8/ dCn0azJSmdwAdRRzIVUAAPNCqoDWkCL+fn15t4ouHFZ6bMcKXZZd/6FffS35 enRM87+qurtwWYbhuI8PFma8mJebezeu7VXMkaNyrENRrzotZ11NzIp7AEAL pAq04sf/ThAIE97927s4+cDhes54iIJWX+LvQav61ciX6bHPdqrgO/vk2xR9 z5J6e0mHhjXLF7AxsPVg2bXd/St9gCF66t+jUe1KRR1UGw9HN6+6beYHJWfB Tci1UEcxF1IFADAvpApoDWWEEQf6lLbWULXZVBx7WcMGmuoQsTcmeCorTMe6 I1auUVi9auXyJQtmTxk3uEvD0k6KF4PsvH1PJ6k9lfjXldHl04pV69I9t4bG YvQE5DRIFSyBJGJNfflDkOP+900B3VfDEKkvtnQqoanpYLFda0++9N2QRzb/ 3YaWzopv55brNn91utZjxdJFc6dPHNG7dZWCyo+0rrvyvboPEEedH1YmrfHg leu78ykmtZgf6ijmyoZUQermzZtBhgsNDc3SqwKArIBUAa3hnz9J92bXsGPz itQdMHfT/tOXrwYc2zq3f+2CVmnveIr7XTSgIOOf6auoC+3b7fmp/hvF0SHr u5SUfYadzy4Nx8hP5aS4iFJjrqkPHwCYDamCJUg82SePvCtccMhFvV+x52pE 3NWx5ckgxrlU3ba9Bg/169epYfk8aU2HPFhe/DhV/3OKny+oSn0/13PmIw1v K5PDjo/1dmZLj6kw7b6GY1KP97BTxhMTg/EjzRKoo5gLqQIAmBdSBbSG/Edz qzuV7rb1WcYuu/hbwLgqiqKMZdd6+3d9YwXi2+ZmPGqYQ9ONn7W8qEq5O8WT a1VnxTtNUyyIr5uaUi+luFXmPcVMZ8iRkCpYAP7VkUXl46dcehyLp/tiGEH4 eE4Va5Z18dZzz7xLTNc8JL098b96eZWLVLDs/lr5Ru9nt+DK8ELkt3JKjg/W MmREErmttROn0NBLGiILyce1DajGw6rG4ldoPLIG6ijmQqoAAOaFVCG3t4bE 932dynXYEa7udY/w2UJvKh5gFxp2Rd8xwakXBxcgy0JtgQH5CdfHuFeYEqJx 9lzK+YH5qFNVmf8MdSHkTEgV6Ce6P60ClxxftVvj2ClIJ+XysKLWJfse+aTu +Z30cHF9xTAzFrf8VM0P+YzEb5bWJIcqsAtrDAxIkk/rGuXtfDBWw5eTTvVx pUIF7yUIFbIK6ijmQqoAAOaFVCG3t4aSrzdO3dZUREs+rKHe9rALDdc3VRDd m1yWWvOs8twn2mtJYdC4GkMDNJaOwlsTS1Gn0jzOFYDpkCrQTvxuRW15b5bX ZEMk1m7RgyBoTMlyYwITNH1d9GJxTSqUZlk3WPNBr5tKfN/WypZscvL0Pqnx 3HKST+tbtPDX9MMSXB+jWHvTa3YoGo+sgjqKuZAqAIB5IVVAa6gN/1x/8nWP vc/OH/q9vxM/X1CNfNfEKTPprlD7wZKPNy6/0Lidg+jJ3MrkclucYqOv8Q26 cgDmQKpAN2Vv1qrWMv1H6+dm4nf/NG2zSVsAI/mySTEVjltR4woJGRCxh7pQ Ixwcff/9rb3JIWJCL9/9puECRA9neHCVEyl0tENgPNRRzIVUAQDMC6kCWkNt Uk70dJSPRe13SkeFp6BcR53Fdht51aQkQPJ+ZV3qVPn6n8FCjZBjIVWgW/yx Hi5k93eWXt1f+MOPiYrTPn5NeFcxbM2q1vK3+mQ1yecG5CenvNm22PLVhHko 4tfKiRQFhwRgocasgzqKuZAqAIB5IVVAa6iF6NGsilwWu0CH3R/1HBNMfN/e 2laRBJxVTQJEL/7pPP6yXkUe8W1rC1vqtVWnAzGY6Qw5FlIFmvGvDC/CZulc IBAMkjZuLU+/M/o89AXXRxcjYwjreqvDVdoc4tcxvz5bP+nRFkkiNzShhkk4 dz8aZ8S1g55QRzFX9qQK7969Q6oAkEsgVUBrqFlS0LgyXNuKYy7pv3hZ7KGu 1ABWpy6HYjN/GxF1pGfpjnt/6XM6IuZAZ0fyVDbNN5vy2grAwiFVyD7CqIcH 5w9qWaW4qy3PoWDFluN2P00Q3p9anitfPsZP+V6bHx328OqJnavn/j2wU5Pq pQuW7X0oMtPr9qSXBye0LOtq61CkzqgT+nR2cxlh8PiS8pDAseM+fR76ovvT ypOzFqyqLXyuMrYh9f7M6tVmPdZjKAnxa097e7LxsGuzMwqNRxZCHcVc2ZAq EAQhFApv3bqFVAEgN0CqgNZQAyLm2sTKeSoNO5m5lNYmbQCrXZsdmRdiSHm5 uV0h28Yal9fKKOls/3x67iQBwGxIFbKFJPquf78qLlyXKv1Wnn304XfCz5dn ZjUpmLfBsD5V5O/UXXsdVywQKArdNnJAv54dG3nkI1+3s9h52u5Iiw7EX8+P r+Gs3D3Ruv7qCMQKGRFfyS2G2QX6nlJJmNUQv1xUg7zX3PJTMy/OK/5+cXRF uxLjbugzlCThRC9q+we9l4kEI6GOYq7sGasg9fXrV6QKALkBUgW0huokvTow opoTm+1Yru3kvY9j9C3L0gawWnnPuf3ps0zkh3fP7v13xH9qVy8Xtv4bh/Ov KU7FraTX6ykAxkKqkOWIuAfrOpeyYVmX7LHnbbr1Xoiof31dqGjAob2acVRE 3J359V3k8QG33JR78nX/iN//jfeyd6nQslunhuXzWrM4eeosuIvJ+xkRv/Z1 lI02s64y57E+qyVKPq5rSM5aYBfqdyhc3np8/hT+6tGNM7sW+TUoas1i5x94 LlmPM6VeHlaYSqSrLlAd8wDmhDqKubInVSDkHj58iFQBIMdDqoDWMD1B9Jvg w0sH1ilszUpjXaztypA4/Qawkju+ayQty/Xbt1xEDUlmsTjuf9/ETGfI0ZAq ZC0iOmhmXRe2tFvaduu7TE8TSfiqv8jHnU3TjZ/VBqjCp/OryQ/hlJl0R/hH 8vVgt2Kle+59R4YThCA5GbGnCsmnjc3sZdv3DDqn10q/RNROHzutrQfLsfNB fdbXEd6eWJpMpPXYhghMhDqKubJtrIJUXFwcUgWAHA+pAlrDNKJHmwZ3a9es rkcBXqZyjp2vpf8rXX37tAGsnCKdV54+J3fm1LGDO1ZP9q3gIDtN0RH6bQuR dip2gUEX9Hk9BcBcSBWyUurTlY1d2SwWt0T/k99VeqXK3QKsamvcp0D8bkUd +TFcrzmPPh7oWqbBkscYmqBVyq3/leOy2IV7HNa092MmcUe6OZOtjU3dSYep 1uP0icN7N84fXLeALGK20W9biLQNidlFhl9JNfHfATqgjmKu7EwV/sibOaQK ADkbUgW0hmqIY9/9t2V8c3fbdMGCU7ONqotyp5duAGu+fpk3giS+7++cj5On 98lEfT4/7VQs526HsYI35HBIFbIMERf4dwXZQANOCb8L6t50p5wbkFc2XJ5b aXaoxiEHymFY3PL16pZtvv4NBidoJXq7uqEDi1O838nMq+toknxhUAFy1oL1 X6sytzTJd6dU5Oq5vk7ahsQs194nEnR/A5gEdRRzZXOqwOfz9d9lEqkCABMh VUBrqBGR8GxHrzLKYQtczxkPtdTS6QawOnbarzLmVfJlY1NXddOW1Z5ql+JU tq22q75dBMhZkCpklYQbEyrIRhmw8/ru+6buScK/Mc5dNlyeU2rCLS2D5dOm 6tvXW/ESo+q1Er/f1NKVbVt5UpA+E+fkBEFjS1Dr6FSZ91SlnRFcHlqk0sxH +mz/kLYhsX27PXq1N2AK1FHMlc2pgtSnT5+QKgDkYEgV0BpqxX+6uI5isqtV 3X/CNI9WSDeAVd1GkOKwfxq18Ndv97X4o92p9dOs66m8tgLIcZAqZA3R88U1 beRd1UozH6qNAhIDhrrJerPswsMuax0sH3eY3DOXXWBIAEbVa8N/vrKhM6dg 261v9V8PR/Rwhge1jk7pibdVf1Ipp/p5jQvS43zpNiTmNdazvQFToI5irmxO FQiCkEgkISEhSBUAciqkCmgNdUi8MoJ6icQuOipQY12XNoBV/UDV1P/+133N a72W404JGFKQrXxthRW8IcdDqpAl4s4OKCR/ktg29v+oroMp+bSlJZkV5NE1 WF4S6d9YPrCe66F1zFYuR8Ren+hl61Rr1i29hyn8Sbe2BYtdeKiadEf8dn3P CZf0WV8n6YxyQ2LvJfptNwQmQR3FXNk/VkHq9+/fSBUAciqkCmgNdRHemlCK Q76l87ukKVUQ3BinGMBaabZpG0EKg8eX5Gh5bQWQ0yBVyALEz30dncjRU802 qdvcgYgLGOZOPmocOuyL1toLJqKO9FDM+2+4Tm1EAX+E77a3L2xbfugZPVdo pEg++TemZtq59jxuylII/Guj3Kh2qPy0+wh/sgHqKObK/lSBIGSP2efPnyNV AMiRkCqgNdQp4VBne3JhBY0TW9MNYNVzI0ji5+V/NtxKUv2C6PGsStQK3oWG XsJYY8gFkCpkgdhDXchQwarawudq3lonBk+qxGMrYocvWvvB8YFjKlWtX8tV frhjl0NYQVYVEXVxlKd9Ud+dmffu1PmNP3e3s6eWQmi7+6c+YxxSQ3cuO6ma 7aTbkNhtVKBe2w2BiVBHMRctYxWkUlJSbty4gVQBIOdBqoDWUCdBwJD8smra uccxDa+R0g1gLTj4oj5briUEjvFsvDZCtZIXv1tRmzwVy6XnsXjTrhyAEZAq mJ/w5t/UQATHnidUnklEfND/GjRsUtWenLT1T5i2wfJJt6dU9Zp44/22VjY6 p4LlUkTc7Tl1XfI2XvZQTVKsQ/yxHtQ6OrxG6/UZBiJ+u7aJx5hrKqlBug2J 86psQwRZA3UUc9GVKkhFREQgVcg1xGG7Bjaq7VXcmcx807NyLuZZo27LeUF4 g5hDIFVAa6gLEbO3vWxRbdcuBzUMEk43gNW52xHdr/GImP/GlHeov1rNQoyS L5ua2ZCnsmu7S6/XVgBMh1TB/BIPdiL3AmC7jb6WaSIV8eP04Npd1q3s6iof hOU154mWwfJJd6ZVLTvkQgwhfja/qrzTalVl/rO0FIIc1JurJT5c0TS/U43J 11T2/klDxIS/+a5u+EDaOjpWNRa/1L0UguDV2qZ5io+8qlKFptuQ2MFXdRsi yBKoo5iLrlRB+sgUi8V3795FqpCrEAn3Z9e0UQYK7EKtlgR9wyTnHAapAlpD HYiYoz3yslncchOCNayWRfzY2UaxEWTr7Tr3Jxe829XZjWP916r3qqECEbW7 LTUW1rr+GjVDGQByIKQK5pdwwJesX9h5BpzL0ANNDl3RouawcxGnyYX9OO7j g2WVjejD4RlLr8VmfH4RsdfGe5UdfFa+RaHg6sii8v4vT7nNjeTL/l5tl77I zcsCJoWuaVXQ3nPEWW2LKaQ8X9OqxoSbalKFdHtKlptyT9dSCMSvwIlV7ThF R/ynEioQ37a2pPaU5DXZoG4hDcgCqKOYi8axClJRUVFIFXIZ4c2/qac9i124 70ntixkBIyFVQGv4R5yalKqxKk68PcWLx7IqMzxA07sfImp3OwdqMFP1hdrr ayI+dHPXktYslnXdlWp2qSS+7WhDnQqLbUHugVTB/ITXxxSjVn0tOepqIvVf ibj7K308Gi99mCztzRaXf92p+7HEP5KogLG16824nfBHEvvuzq3nP+RTHEQf /u3mXmboeUXxo9hekuXc9bAsfkh5tr5tLb9zubg2Sny0qmVBm5I997yKTVSR EB/z88v7p9cPLxtYI691ucl31byWEtwcX4raYyhP/7PaZ88JPp2dUNOZzWIX GXZZ5UjJ583NqXCbW2l2KBqPbII6irloTBXIEV6hoaFIFXKTuAOdqNeGHPdx N7DyTU6EVCGXt4bidzt8i/NYbLtiDfzW/vchY6lGxD1Y7VOEw87fYnWoxl29 JOHrGlFviFi85lu+aSqwBVGPjsz1LUc+UqzV7j4pfL7ImxrByrJpvzfWpH8Z AGMgVcgCCecGkvtKSruZhZpM2n7m0ult09qVLVBjUmA0Ie2EbiB3imQ5N51z YF3/Kh7d9r4X/Um9NbmC9BnEdvLqu2zr4i5lXL1n3U1UnpL4uqUFOQDC3nvM 5k2TmpXxnnLDkC0UcxQi7t6SJtQ+jjpxPdVuyBl/fnBR6gycUpq3/JEkhF1e P7RWPnIzoiJDVUMFweM5VawUjUeng4nqzgJZAHUUc9E7VkEqKSkJqUIuIlTu FccpNlp1YRzICZAq5O7WkPi5s03aNCeWjVu9AbM3Hjp35crFY9sX+jV043Fc qvrte6U5Uvh9b0Wrgml1pXXJdtPWbt/7L2Xfnp1b1i2bM2Gwb4Nyea3TPse6 9vK3mUOFlPDT472dlIdw3Aee/Ir3TZArIFXICqJ3m1tn7PRau/msuBsjTwEk 4av+Uj6SeCV77H4rq3GIX+kfiDYVhhyPzPAQknza1Nxe8WW7isNORubWuQ/E r2vT67joGSmwWNwq856q3KqUsMNDPHjKY9h56w5btnn3PkXzsXfXtg0rF04d 2atF1SJ2aZ/ELuwXkKlFSg47PqaaQ1rjUWbouR9oPLIH6ijmoj1VkAoLC0Oq kEuInsytTG3wVmDQBY3dCmA0pAq5vDUk4m4taJhfdWFWaaFdoErHiVuDv6pd 7JyIC5jWop63R2F7jr5lZTpWNZe+UVSYROyFKS3q1fIq4WKV+TC2XcHy1eo0 GrLvA6bIQo6GVCFrEPGhO0Y0KuXC4zkXr9l5yp6Hv9MeJZKI/X09XOxcyzQe tvHOT8V/J2Jvr+jokcepQPmmI7bej1Z98vBfbOlW3tW5WD2/zfdz8YKA/PMD XA155HsveZUWKoie+vdoWLuyu6u17u9UwS40+CJVjxLRZyY2r1ezUjHVpcXZ doXKV6/bePhBrK+QxVBHMRftqQJBECKR6Pbt20gVcgHJ+5V1qUe+S/ej2J05 h0KqgNbwjyQh4vaZfZtWLV04f/7CJSvWbvn3VGBoZEJufQkHkN2QKgAAE6GO Yi7aUwXSt2/fkCrkfGnzB1l2Pruicm8kn8MhVUBrCAD0QqoAAEyEOoq5LCFV IOQePnyIVCFnI37v7+RIdjd5jdZ/xBiynAqpAlpDAKAXUgUAYCLUUcxlCakC KT4+3uypglgsvn379pQpU549e2aWiwRTJJ3pl5dcHceqxuJXGApNvwcPHkyf Pj0kJEQiMWfGg1QBrSEA0AupAgAwEeoo5rKcVEHq9evXZkkVUlJSzp07N2TI kAIFCpC9m5s3b5r3UsFw/Ksj3chQgVsBu8ZbhICAAPIPpHDhwsOHD7948SKf b4Z9OZAqoDUEAHohVQAAJkIdxVwWlSoIBILg4GCjU4Xo6Og9e/Z06tTJzs4u 09KtSBXoJ7o3uSy1p2TxMdfVrgEP2UyZKig5ODh069Zt//79MTExRp8WqQJa QwCgF1IFAGAi1FHMZVGpglRkZKShqUJ4eLj0d69Ro0ZstsZtbpEqmI4gTFpd Ufx8QVVylzd2/oHnsKekRVBNFZS4XG6zZs3Wr1//6dMnQ0+LVAGtIQDQC6kC ADAR6ijmsqhUQdpvlUgk9+/f15kqSI988ODBrFmzvLy8NHWLkCqYF7kHqJRR 3y2JWFOf2lPSuevhWDNfGxhHS6qQXtWqVefNmyf9e9QzWUKqgNYQAOiFVAEA mAh1FHNZVKpAiomJ0ZQqCASCy5cvjxo1ys3NTZ/eUHq2YJqGDRseOXLkj3GD Fojv21vZkj8Iu9Y7fmTjnpJ03zaLZugfUYkSJcaNGxcYGCgUCrXcc6QKaA0B gF5IFQCAiVBHMZelpQpkj/XFixeqqcK1a9cqVqxoaD8IzIXNZm/YsIHcBtTg H2vsoS5O5GmsG6z5kJ17StJ703KqatWq3bp1S9M9R6qA1hAA6IVUAQCYCHUU c1laqkBKTU29efOm6lgFaX/2+fPnK1asaNKkCZfLNagflBdMQ6YKEjlDf6DJ 5wbkp/aUrL7wRbbuKUn3bbNoBv0FWVtbN2/efNWqVdJiVXuyhFQBrSEA0Aup AgAwEeoo5rLMVEHqw4cP2ldrjI+PP3ny5NChQ/WZDYF1FUx37Nixd+/eicVG ZAKC66OLkds/cMtNCcGekhZDn3UV3N3dR44cefbs2cTERD1Pi1QBrSEA0Aup AgAwEeoo5rLMVIEgCGnvVdom6nmwzgEMSBVMRw5RMGKgwh/R/WkVyJ8Lx21U IN/8lwZG0pQq6D8sQS2kCmgNAYBeSBUAgIlQRzGXZaYKpNTUVEO/JSEh4dSp U6oDGJAqmI7c/cGIGRDil4trUHtK5ut/NknX4URc0MqlF39l44KOuVemVMGI YQlqIVVAawgA9EKqAABMhDqKuSw2VTBmo4GM364cwGBlZYVUwXRisZhQMOT7 JB/XNeSRnUynzgdjdH1v6v2Z1essyt61F3KtgIAAcliC9On9+vVrE//olJAq oDUEAHohVQAAJkIdxVwWmyqYUYIc3VeRWxFRO33syD6mbcut33R0W4Wv/qnv UmPRS4QK2SIuLs7EYQlqIVVAawgA9EKqAABMhDqKuXJDqgA0In4f7EztKWlV 958w7XMnhK/XNnG2rrH4FUIFRkOqgNYQAOiFVAEAmAh1FHNZeKpgriHZQBPi 1/5OzmQPk1NyfLBQy6GCD8f8PG1ZVggVGA+pAlpDAKAXUgUAYCLUUcxl4akC MJs4bHV9W2opQK7H9PsaUgX+97s7xtQrJNsnwsp7CUIFpkOqgNYQAOiFVAEA mAh1FHMhVYCsIvoRNK9RXnbaFgN25dqOmbVoKWXJogVzpv09tJdPnTKuVopD rGoufY1QgemQKqA1BAB6IVUAACZCHcVcSBXA7N5s69uobrVyBWzTJQr6saq1 7A1CBcYLCgqaIffgwQO6ryW7oTUEAEuAVAEAmAh1FHMhVQAAMBe0hgBgCZAq AAAToY5iLqQKAADmgtYQACwBUgUAYCLUUcyFVAEAwFzQGgKAJUCqAABMhDqK uZAqAACYC1pDALAESBUAgIlQRzEXUgUAAHNBawgAlgCpAgAwEeoo5kKqAABg LmgNAcASIFUAACZCHcVcSBUAAMwFrSEAWAKkCgDARKijmAupAgCAuaA1BABL gFQBAJgIdRRzIVUAADAXtIYAYAmQKgAAE6GOYi6kCgAA5oLWEAAsAVIFAGAi 1FHMhVQBAMBc0BoCgCVAqgAATIQ6irmQKgAAmAtaQwCwBEgVAICJUEcxF1IF AABzQWsIAJYAqQIAMBHqKOZCqgAAYC5oDQHAEiBVAAAmQh3FXEgVAADMBa0h AFgCpAoAwESoo5grOjq6Xr16Pj4+fQB0GTdu3EZGGTlyJN33DHKXIUOGSJ+o fn5+dF8IAORq0qeQ9FnUqVMnui8EAMAAZB21bds2urvIYDByrEKpUqVYAABg msaNG0v/t1GjRnRfCADkamRdV7lyZbovBADAAGQdhbEKTBQdHV2jRg0fH58A AHWuX7/+i1EePHhA9z2D3Gv27NnSJ+r8+fPpvhAAyNUOHDggfRZ169aN7gsB ADAAWUdt3bqV7i4yGOwX1lUAADATzAcEAEuAdRUAgIlQRzEXUgUAAHNBawgA lgCpAgAwEeoo5kKqAABgLmgNAcASIFUAACZCHcVcSBUAAMwFrSEAWAKkCgDA RKijmAupAgCAuaA1BABLgFQBAJgIdRRzIVUAADAXtIYAYAmQKgAAE6GOYi6k CgAA5oLWEAAsAVIFAGAi1FHMhVQBAMBc0BoCgCVAqgAATIQ6irmQKgAAmAta QwCwBEgVAICJUEcxF1IFAABzQWsIAJYAqQIAMBHqKOZCqgAAYC5oDQHAEiBV AAAmQh3FXEgVAADMBa0hAFgCpAoAwESoo5gLqQIAgLmgNQQAS4BUAQCYCHUU cyFVAAAwF7SGAGAJkCoAABOhjmIupAoAAOaC1hAALAFSBQBgItRRzIVUAQDA XNAaAoAlQKoAAEyEOoq5kCoAAJgLWkMAsARIFQCAiVBHMRdSBcg64rBdgxrX 9irmyGEZwbnbkTi6/wUAhkFrCACWAKkCADAR6ijmQqoAWU788+LwslxFWMCr Omilf0br161dtWLJvKmjezRwt1ccZ992dxRB96UDGAatIQBYAqQKAMBEqKOY C6kCZAP+yV4OVFhgXX91hETzkYJPZ8ZUlSULvCYbIrUcpyI6OvqXHJ/PN/l6 AYyE1hAALAFSBQBgItRRzIVUAbKe5MvGJtZkqGDlveSVWPvR/DuTynGtaq94 p+O4jGxtbclP2Lp1qynXCmAKtIYAYAmQKgAAE6GOYi6kCpD1ks8NyMeWd/m5 lWY/Fuk8/EhXx8pzn+g8LgOkCmAJ0BoCgCVAqgAATIQ6irksNlUgCMypzykE N/92J9dr5JSZdEeo8/iYPR0rTb6r+7gMkCpYjp49e3bq1GnAgAF0XwgN0BoC gCVAqgAATIQ6irksNlWQEggEdF8CmIHo0cyK5FqNnOJjrute9EASeWyO/wND f/ZIFSwH+bPImzcv3RdCA7SGAGAJkCoAABOhjmIuy0wVCIKQSCRv3ryh+0LA dOI3y2pZyfv77EJDLqZk1ccgVbAcSBXQGgIAvZAqAAAToY5iLstMFaQiIyND Q0PpvgowmSRyQxMeGSrk6X0yQd0hycHTW43/L9W0z0GqYDmQKqA1BAB6IVUA ACZCHcVclpkqCASC4OBgpAo5APFzdzt7srvv1PlgjJrFMlIezPUu0PmAui8Z AqmC5UCqgNYQAOiFVAEAmAh1FHNZZqrw+vXroKAgpAo5QPyxHi5kb9/OZ+cP leRA+On4oLI8m+Zbvpq6OCdSBcuBVAGtIQDQC6kCADAR6ijmssBUIS4uLkgO qQLzpVwcUpDcU9Kq5pzg8A+kiPdvn98PPLF1Tt+a+bnSL9VZ8U5s6iflklSB EVujIFVAawgA9EKqAABMhDqKuSwqVSDkHj58iFQhh0jbU1ILbqVZj0Umf1RO SRVEvx4fmj+oRWU3Zxtr+8JVuyy8+l1C/Ly8oLdPg2plilT6XzADNkZBqoDW EADohVQBAJgIdRRzWVSqIPXt27cgBaQKTCd6OMOT2lOyVO/1J04pHD+8Z+Pi cR08nGTDGDju426Yoads9lSByP5hAcmvDoyuk59rV7bjvMP3IqLjfr4JWNiq fEv/u7vaO5CbaPgFZNkmGn/M909GqoDWEADohVQBAJgIdRRzWU6qIO3RCIXC W7duIVXIKcSvl9Yk95TkuI0K5Gf+MhF/c6Inl11g0IVkM3yYuVKF5OTk06dP Dxo0yNvb2wyXpTfxlwv/q+3K5hRovjwkLq1zL/m8qWW5CmXJBS9de51Qu4mG uZQpU2bEiBEBAQF8vspPyxBIFdAaAgC9kCoAABOhjmIuy0kVpN69exeUDlIF ZpN88m9M7SmZt+/pRDVHiO5Pq5Cn6+FYc3yaianCz58/d+3a1bFjR+V5ihcv btAZyBf9IpExkznEX8+O8JR+rmOdeSGZbpT0HpUnx3uwHDrsi9ZzMIFxow6U /3ZHR8fu3bsfOHAgNtaYHw5SBbSGAEAvpAoAwESoo5jLclKFxMTEoIyQKjAa EbWrrb327rAoZGoVn23fzTLs3rhUISwsbOXKlQ0aNGCz2ZmWezA0VZASi2WL Thrco095tKiuoyx78dkWobJqpSh0theZKtg02/RFoucpJRKJEcGC8h6mrXnB 5TZr1mz9+vWfPn0y9DxIFQAA6IJUAQCYCHUUc1lCqkB2f0JDQ5Eq5CRxR7tT e0rymmyIVNsdjj8+2Nc/XN+esnb6pwrSHndISMj06dM9PT1Vlo40PlWQ/hpL 5AzszsdfH1/BWvp5Ts03hqvZCUMQOLKoPPCwrvtPmCG3yohRE6qpQnrVqlWb N2+e9K9S5z8QqQJaQwCgF1IFAGAi1FHMZQmpglRUVFSQCqQKTJZ8YbBiT0nv Ja9M3jhSJ52pAp/Pv3jx4vDhwwsXLqyl75zeTUNIf4elHXmJREKOWNBTyr1p XrJMwcpz2r1UNV+XfN7Q2Fo+aqDKvKf6n1d6DTExMQZdv5Set6VEiRLjxo0L DAwUCoVqPx2pAlpDAKAXUgUAYCLUUcxFe6pAEIS0B3Tnzh2kCjmKIGhsCXJP SW75qSGmbxypk6ZUQdq53r9/f7du3RwcHPTsNRvH1dWVHB4gEOi9pYU4bE0D +SwRl4571U4EIX4f6OQkO4BTdvJd9V14tSQSiYeHR5b+e8l/cp8+fY4dO5aQ kGEVSaQKaA0BgF5IFQCAiVBHMRftqYJURESEaqSAVIHRRA+me5CrAbCLjrxq 0oYCelKbKvD5/C1btvj4+Ggf228WLi4uhIKe15wcOEoevbCL+gUkqTuA+L67 HRkqqNtEQ7vSpUtn9T9ZysHBwdfXd+/evelHaCBVQGsIAPRCqgAATIQ6irlo TxVSUlJu3LiBVCFnEb9a4k3uKcnO0+eUuu0fzE77DAjpr1lAQMC4cePKli2r f5e5jyE8PT0NW8qAiD3eM69skgjHbeRVdbMf/gifLqgun/7Azt//rNrYQeO5 CaJOnToGXb+U/nemYsWKkyZNunbtmtqBGUgV0BoCAL2QKgAAE6GOYi4aUwXy le6zZ8/URgpIFRhMEr66vjXZ/bTz2fXTLHs86KL/ao3v37/39/dv06aNjY2N lo6zoas1fv/+3bBFFRJP9ckjX3nCtfdJdZGB5POu9uQBLGcjtt/88eOHod+i fUQHOSxBent17geBVAGtIQDQC6kCADAR6ijmonesQnR0tKZIAakCc0nC19Tn kT3R7FmpUcaInSW1D2AwYmdJgwhvTywlX3nCqs6Kd6r3SPL5387UcpcsuzY7 fmRHNKM2VSCHJQQGBuq/XgRSBbSGAEAvpAoAwESoo5iLrlSB3IYvJCQEqUKO IwydU9mK6pLadj2akj2fakSqkF5YWNj69evTD2DI6lQhdm978pNs2u9TGYiQ +mJ18zJFC5HZDK/huo/m2X5TB+U91H9YgpbzIFUAAKALUgUAYCLUUcxF41gF aYdFS6SAVIGZUj+e/18tJ+WLbk6pwae/GrB3gfFMTBWUlAMYmjVrZq5rU0cS 6U9uGcmybrrxS4bQQBx5tJ9njb9XjfaUL3hpVW3Bc9lYBlHEuZ2XPmdlvODt 7W3osAS1kCqgNQQAeiFVAAAmQh3FXHSlCnw+/+bNm0gVchK/WpXLF3WyYmVm 5VSkrFfdCRfis/TTzZUqZJvYfzsoRgY09Q9XTIEg4h5t6FKufK8D799Ra1Nw io0JkvbxE0PmNW4w43a2rHxpKqQKaA0BgF5IFQCAiVBHMRddqYK0vdMeKSBV AIMwLlUQv11em1rSksUr2W7a5n17/OcMrFvYsUzPPW9S/6Se7eci/xrXc1LQ +xvL2nj5bHhl0giC7INUAa0hMEPqt8cX/924cunSf/x3n77zISFbplpBtkCq AABZRBTzNujotrXLlyxfs/Xw1Rc/zVqdoo5iLlpShdjYWJ2RAlIFMAjjUoU/ xK+zg925GYZ1WBdtMfe/b/JxCwkHfNN2qOC6td/w1KCtJWmFVAGtIVg8wYfT kxu78dI/gDiuVfqsD4nJll17IKshVQAA8yN+31nd3dOZnb7tsHVvOf3sR3NN d0YdxVzZnCoQcg8ePECqAObFvFRBih92bFLrCnlt7fKUqNxs0NJTL+OUrwol 304Or5yHZ5O3fLMRG4J/iOi8TEMhVUBrCJZN8vlwr+JUpmnFs+akKw/tq0z4 LxrBAvMhVQAAc0u4M6umAxVDW/PSz3nmunXa+c4swQLqKObK/rEKX79+1SdS QKoABmFkqpBDIVVAawiWjPhxsEt+jnPFbgtPPPocLy0DBVGhx2a3KkZViJyi /U8jV2A8pAoAYF6p96ZVtOK5Nfl7542wX6mSP+L491f9B1R2ogYu2Ndb+doM 78BQRzFXNqcKQqHw1q1bSBXA7JAqWA6kCmgNwYKJ3yyrXaDxskeZ1n4Vhu/y LUQWhzaN1n3AEgsMh1QBAMwq7nivwh7Dzn4TZ/ivRMy1CV7klF1OibHX+SZ/ DOoo5srmVOHt27d6RgpIFcAgSBUsB1IFtIZguSQRa1q3Stt3Jv1XPm5qZi9/ jDp0P8achVxALaQKAGBOKecG1x4fpK5pSLw8vLh8Ip2V95JXatoWw6COYq7s TBUSEhL0jxSQKoBBkCpYDqQKaA3BcokebV13PUHtlySfNzSR70zDa7v7N+ZA MBtSBQAwI8mXk2sPqcujpVIv+RWUjXTjekx/YPIcCNRRzJU9qQJByOqTx48f I1WALIJUwXIgVUBrCMzEP9tftqMtO9+gC6YPYwVaIVUAgGwifrGwumxhHuuG 6z6ZPHsOdRRzZdtYhR8/fhgUKSBVAIMgVbAcSBXQGgIzJR/rLlve27bV9u8Y qsBwSBUAIJuIHs2qyGWxOGUn3zN9uUbUUcyVDakCQRBisfjOnTtIFSDrIFWw HEgV0BoCI4mfzqsirQydO+z9gVCB6ZAqAEA2iT3QyYHF4laa9Qh7QORq2TNW ITw83NBIAakCGASpguVAqoDWEJhI/HZFbWsWp/S4oGS6LwVMhlQBALJH/Mne +dgsl7Y7P5tj8yDUUcyVPalCcHAwUgXIUkgVLAdSBbSGwECCkGkeXHaBrgcx +yEnQKoAANlB8mVHGye2TY0FoQKznA91FHNlT6pw8+ZNpAqQpZAqWA6kCmgN s58oKmT/madCui+DHpIvQcevfUo18Ry7O+Th5O+w24S1tlI+Bh68rGGNcNBK /O7y0bs/zPn7i1SBJoQgNvL57YuHt/4za9yI1cEY92PRkiP+O/TfB3O8YGci IurWycvhpv6KJt+cUI5rU3XmPXP9rqOOYi6kCsBQnz596pMOKx3lf0TCQAuk CmgNsxUR82DzoNqVmk+7YJbRlwxExN9f3b5Cxc7Lrn01clIr8fNU/2JWxXof /WrkLRR9vbqkU5UqXVbdZv6WlILo10HHd21YtXTJinVb9194EJmY9b9XRNTV WY3LVh+46X60mT4MqUI2E7/cOaR1HU83Z2tlLcJruO5jLn0mMYAw8vLCDpWr dV93L5bxzyxjJT3Z1LWiR7sFlz4ZPcqA/3i+t51TvaVPTIu100MdxVxIFYCh xGJx/vz5WVpt376d7svMjZAqoDVMRxKxb2iTOpWLO3G1/7Wq5+i7X2svlUh4 vLFLmcJ/Tb30LUe8IhfcX9GxvrdHYXu2yq2wyVvSq2b97v7P1QcH4q8XJ3i7 Fm4yN/C7wXdC8u1ILzfH6tOD442qriU/r89r6lai7aoQplfnxO+QzcP+Kmyd 6dbbl2496cCzBP3+cfzbS9rV865Q0E7lR8i2yVeqcs0Gvbe8Vv8T4ocdHFjB uaTvmpAYM9xHpArZLTXud6JAEPdyW6dC5M/eqsbiVznisUQHQcgK3wY1PQrZ GtNucNz/vqm1myz+8d+sRkVLdlj3UOszT/xmW9+GtbyKqWm9rF2Ke9ao22bR LfMM+qePJOrqjL/y5q839eJnIzLppHuzqjsU637gkzl/0VFHMRdSBWCuQYMG aW9Zvnz5Qvc15kZIFdAaqpJEXx1TQVmaWXn1X+Gf0fp1a1etWDJ/2phejUo5 KDpkti23ftNc9BG/g2bWdXWqOeMm03uzmYmjzg8tzUkrYMv02v44RmfZRvz6 b3xlO9vyAw5HGDKUXvBqfYsCJXoc+GjUOAdx5Ak/D/uCrf2fm+9VFT2E4Qf6 l9fch3GsPOKEAbdI/P3UQPe0HyGvfL9dT2J1vrcWRx7tV8raqcaESz9MfceN VIEm4peLqlvJfuZcj+kPzLAgfu4miNjpW0DRHrBdG/29VqXhWLNy+aI5k4b5 ehfmKY4r5HcpRfM5RR+PDCxnV7jdlld8/S6CiLszrVpa1sgp4rMi2KzTlWhG xAbPqOnAK9lj91s97wj1fVHn/Mrmq7cwJNG814M6irmQKgBznT59WkukULly ZbovMJdCqoDWUB3+uf6uilCh9vK3WvrIws8XxtdwkPWm66+J0Ni5Sn60tIEL J3/bbeE5sXJPOdJV0cHlek6+o6VEzkD4blOrvGwbj1EBP/ULWohfl0ZXLNR4 +WOjpsQS0VfGVbK1KjnknJ4fZ7lSQmZVk99xtmPxmq17DBrq179rs0r5eekb FdvKU27qP5wjYX9HG2WKNvOBvqFL8oP5tezZjrXn3tVzcIQGSBXoQcTs93WQ 9z1LjA1i+ntsCyD5vKGJokPv3O1IrJZDk17u7FHSSvonnKf3yQRNBxE/L470 sLEqO+KSIXO1BIEji1LZBsdt0LmcFmP/+SP+uMe3IMeq9KBT3/TNM1OfrW5W 2GPYOZMDUBWoo5gLqQIwV3JysnKRRlVTp06l+wJzKaQKaA3VIH5sa0l10ayq zH+m48W78MF0T65VjcUvNRxHRJ0ZXJLLcmq2UXPswGSSsH/qWpF3y1p7BKPy nR+3++Rhs/M0X/9a98u0pEfLGxfxGnv5l1FFsihsq09+NrtIv1PRTC+yxe9W 1bdjcQs1mnzkRVy636jUjwFzWxROG/5s7TXroZ49RfGrJd7Uj5BXb3W4Ab+m gmdL69ixOEW7HzRloRCkCvRIOts/n6z/yS44+AJWajSd6OEMD+oP0KHdHh3p JRF7ond+tpZ5c8I3G1rmZXOKDT5v0Cwj4veedlStySkz6U4OGqaQRvL1QJeC bLZz/eVP9BiwIBtVVaZYh21vsyI4Qx3FXEgVgNE6dOigKVWQ/grRfXW5FFIF tIZqpF7yo2Ybc8tPu69zeEHqyV7OnjMeqj9O8vVgN+nJuOX+d5vpw+41iDvc 1YmKYLyXGDg3W/RiSU0baQled4n26pD/Zrtv8ZI9/o1Qd5OJ+MhI7S/khC9X NZReo029Ve8YP3dceG9KOevCHberHf/Lf7WhdT7lGOyiw6/o9TtH/P63oz31 I6zzT5hhtyg5eEI5Loudr+32CKPvLVIFWghvjCshn/ji0v1oHN0XkwMQ37e2 pIb82Dbf/EVXzCaJWF3fqeU2DfPmBE+X1nVgsewarzcwjOZfHUENVeCUHB+c U0egiMPWNpI+s2yrzwrRnocRPy//XaVwvQX31A6nSv3x6YdBEylUoI5iLqQK wGi7du1SGyk4OTmJRDlxXDQTIFVAa6hKeHdyWXKWuc6FtOQSDnSpoOE44tfJ fkWl5+L9tTIsRw5UkEUwQxURTMVZjwx9khG/j3TPK/12+/or32jqlArD9/cq XbTl2qdq51akvNzg22mttvfr4vcbmzvLJjp3OWjcQAdLIno8y6t4v1Ma/yGS DxubOVBtC7fy3Cf6/ECSzw3IT63ZV1Xn0BzVT/y4samd9Pbm7bjX2F05kCrQ QfRkjpf8zbp9211RjP/DsABxR7o5U+OEtM2HUxC/WlK3iYbjxG/XNnKU/lHl 63nMwOVQRQ+mU+Ml2EX0TBWZKf7cwMLSp5ZNjQVPNI7HIH4HTa9dqPK4S2rH jYi/XxjV4u+rpt0j1FHMhVQBGO3nz59stupq6azOnTvTfWm5F1IFtIYqxM/m V7WiyrJhl3WXHJKvJ+etu6v2hUfq3SkeslPZNFqfU3dtE96aUIpjypuxpPMD ZSucsQt0O/RDTeknjDjYt7SNUw2/FZs2Z7Bp4/pVi6f5tSzraNvYX8vdJaJP 9pVVn+w8vY5bwAtZyY9A/zkz5+68Z9weFkTUtnb1l2rYmIE8IuZAJ0eybeG4 jb6uxwBowfUxxakfYdnJdw0fMU1E7W7nIP8FGPWfxiniWiFVoIHkw9oG8kUA eI39P+XQp1O2Sr4wiFqr0cp7ibY/UYro6bbZ+9WODCJ+HulRUPbMyt//jIGL C4pfL61JtV55+pwy88qEliU1cLTsucV2bbszUt3vL/H7xqy6Ljz3DrM2ZGw6 Nm/0X7NsztiuNQrwSo67YdpQBdRRDJYNqYJIJLpz505wcPANAz148ACvm0En adWkmipgT0kaIVVAa5iZJHxVPXLFLXY+g2u6DIjve9q7yN9c1V35PoeW7aLQ 2V7Um7FCfgH6LtSYQfyxHi7Ue/KnmVpR/ru9PUtl3jsxM7sWW7QMNha/XFJT vkaGY+eD2lZPyy6ip/OqcFnWTTYYuQ6BMC4qRnsdLH61uAbZr+BW0GP+zh/R /WnUjifsoiOvGlNjS75saia/x/bNNxnVP0WqkP2IX3vay6e9WNXUmlKBngRB Y8n5JCxupdmhpvQHRE/nV5P/BTv3OBZv2LdKIv0bU0sCOXT8l/FryGiXQsU4 3ApT72XOsyU/A6fWclbzGi89c6w7gTqKuZAqANP9888/qg+2z58/031duRdS BbSGmRDftrag1rpy0bCKd8rd2a3GXNS5uplsCTx5j5hbbso98zYPhKVUi+J3 K+pQy/y59DS0AqYoF07nFBt+JSndF4R3ppSz0hEpSItnn53fNd+O1GtjyFLf uuE6sw4XIYz8GZiaKugmiVzfiExi7Drs0712fFoIwc7b77RxKZroydzKXLI/ NeuREWU6UoXsl3S6b155l0zjkjBgiLSZB5r6qsTP40PaL82cnKpKvjzcTf7M 4jXbpHNxhswfsbsdtUKKjR4rOzCBlgct8Wt3W3IvnIL9TselP0wSua21s86m Q7/UVQfUUcyFVAGYLiwsLNNjzcvLi+6LytWQKqA1zIj4vV8xftyhvdpVvPmh i+rkb79H5wx90aOZnmSV6dTzeJKOg1W++dfjQ/MHtajs5mxjbV+4apeFV79L iJ+XF/T2aVCtTJFK/7OQRbhkL6mp5cns2+02dsdG4e2JpeVVNDtf7xPmnaSQ eH4QuegDp9TE24Z1d4nEdxfXjOlQq1Q+e2ubvOWajz/0NvUP/9HmIb5Na1Zw c+t+wJDN3tJkfaogln+CrF+hdWYIRfJxXUPq5aZjJ43L0euScrZ/HrJHVfJv I4YUI1XIUoJvd/fO7tfMy83F1saxsJfP/w6+SuIHjZVPe0m3dAyR+vN18Okd yyYNal+3fKXRlzWNPBK9XdOoSN/TmX/MKY/WtCvt7OTWcOJ5Y9fXYLC0cI5T fMx1NX8CxO+Lw8q4j76m868j/lRfcpUTbvmphnZ6FeO+ZMuurmDKyrSpkUFb JnWrV66AA4/n7F5/yNbHCYT47f5xXVvWreReuMU6zStUiEJnV6LaWN9/aVoz B3UUcyFVgBzA09MzfaowZcoUuq8oV0OqgNYwo8TT/fKSwyZtW2z5qlKniD6f GlrBhtdovc6B3sql0AzeGSH51YHRdfJz7cp2nHf4XkR03M83AQtblW/pf3dX e/kyfEZPNTA7IvrfjtTKgLzG/mrntup3ml1tyGyCna+vkW/L1Uu5NLQw9dNs t9eAHrPoy5X5bdxtrAo3HLft2uuouJiPt7f2rVRt6vWL1AoEti22ali6Xeep szxViDvURZ6LObXbrWUQB4WI2uVjR73cVPcLryfx22W1qD5VqQnBBo9WQKqQ VcQ/bqzs7uFolc97yLqLoZ9i4n88PTa5Xr6CzYf1kE97YRcccjFF9m730IgG XqWLuNooxozL0ga1P0fJpx1t87B5LbZm+uVK6+FJe8Mhua0cTgvn2IXkdzST 5Bcb2xXi5ut3Rme+nKRcOtW+00EDR3+lBCg3L/KaY9IkjGxCRN9Z08PDgZOn xuC1F559jY398ujA6JoeQ07fmEeubWRVfZGmHZtlEg53oYZmOHU+aGwkahrU UcyFVAFygOnTp6dPFbCnJL2QKqA1zID/n2JXLqtq06+HfyBFvH/7/P61k9vm DahdUFrrWNVYrDMmkO0aRi0I4ND9mN57wYu/XPhfbVc2p0Dz5SHphnRKPm9q Wa5CWbKAcu11wrg18cwu8VRfKoIxbW628Obf7tRygW6jr5lvGIbwzv/KpK0k qWdfl4gNWdW2mBXboeq481/TteqJF4aUL1++CDmdot5qbZtOaJPlqULimf6y XgmnzN9BevzaxR3tTr3cNG3xj5STvakRx9wq83QP8s4EqUJWIKJvLfcpZs2y KTfgcES6337J5y0tFduEuGScuS+Je7isiSub/H34R822NUTU0V6yoE7NZiHC Nzu6uMt61uwCfpcsYyxVtiGidirCOce2G55/UDQcYa+f3Ll8aN0kX08n6U1z 9NU9GEi526cRE+eEweNLchTZ3i1TFwzIcskvd/YuZ8vilen7b1i6ERyCe1Or VKhQkpxRpWOOgujhDMWGF/kHnqcla0cdxVxIFSAHuHfvnjJSwJ6StEOqgNYw PeHdSVQ3VAu9XsUlHO3uRB7OKTtZz+JQ/PXsCE/pL6RjnXkhmd7Yi+5PK8+l QooO+yxkEa5UZQRj4txsSfiqv6gIxtCBHVpP+3FdQ+q01g3W6rWqAhF/b3HD PGyWVZnBZ75n/Abi+5bm1FQBq2oLnxt7kVmcKhA/D3SW9grZ+Tvv/6bHB6Rc HFyQbXQYkI7o/lTFL6hNq+2G7lOIVMHsJD8uTajuKH38FOmy72OmH6z4+QJy NUB185ZSr1Mrkbj0OZU5liJiLw0n+63sIiMDVZMDciNdq1rLNO4Sm0Ol7Smp hT4rHUjC/qlLrSVj3XSTYWOHRI9nUaNF2IWH6rF5Ea1SX27pUJQjvVLfXeGZ fj1TTvSkQi9OibFBWvMp4pvyocz1nGnwvsbmgDqKuZAqQA5AEEThwoXJxyD2 lKQdUgW0humIFDPSpeVM99UnTikcP7x305LxvpVcZB0wtpseC+Url6/T/x1w yqNFdWU7lOf12RahUpOnbbVgY/AKXlklLYLhlBh3w6SXk4mHOlMrZLKcep7Q e2SHDoLLQ6kuM8u28yE9ZlaIP/3bRb4FetWZISoXIZunwdM/VtIka1MF4dMF 1a1Z7Dytt6r+DqkhuDFOMUikzP9MWg1d8kmxRCSLU3xskIGnQqpgZkn3F8ge JiyrsiMCVDNIafezovxpwmuyQXXeUtKJns5UwJdp/FHyrcmV8jg7sjX/Rcl2 5bU1IXNjqGRyd1zZ077GmL3KduPksYM7184Z2tRd/nCzqr38rc77wj8/kBr+ xbLvcdygl+/it8trU4GE5QxnU4/4eWFYGem1cksPvxSj8uvJP9uPHD/FLjhY 16LI/DN9FXGObYd/6djkB3UUcyFVgJxh+PDh5FMQe0rSDqkCWsM0kvcr61J7 ShYaekn1XU/inamVrdl59Zn6zz/X35Uqdng+u/QYWxB/fXwF2Wc7Nd8Yrqb0 FASOLKplXDIdlIsCyoq/C6YlAYKLg/OxFSGMuf6BxI+tLan3WOz8QwJ0xh7C V6sbySpUq4pT7qj554jfrSCLdtlqbMZnKFmZKkgid7bLw2YX6Lj7o17durQF RdlFhl8x7eVm3L4ONop3su32xhj2zUgVzImIPu9XSvZz5ZYbd01d7zL+SFf5 yhvqBxUoVoRhFxr+X/rfc8GTBbVK9dm6tJX8j8q6wZoPKr/B4ldLahbouNfI JUcYS3CdWm5FNjlOdRkAyfejvYqwuRX1eJeu3A9HPhrkqiGPGcmXTU2pv0CH 9ntpWrpQL5LIfZ1kcS+n+KBzamaEEL93+5DPbRfdG2sKqUVHZfe+isqknOyA Ooq5kCpAznDx4kXyKYg9JWmHVAGtoRLxdUsLqizTUM7IRgy46LMLeNp7bWkf q/MhnSt0pdyb5iUrJq08p91T17mTFpuNyU0qq8x7qr1yIkSpSYnGSkrVuxmT vFfOWnDuftTEnRuEwROoCcGybdnummdGsPjFQmqcN4tTbMx1HScVR2xuKRuL wi7Y65jakjz5bH/5W0R2gUHndWUo/F/vXzxX78mJUeW50v7czKvPNBzx8lOc UYGD5OuBroU4VmWGntNzAoL4jWKJRXaePidNXCWTf7oPNeXHiOXnkSqYDxET MEz+x8Qu1OeE2kdVcsAQ+Rqm3Iqz1PVzlQ8vXpt0eajo7domJdrvjEw5P0Ce l6rZoICIOTOwZI25j3PZmgqy6WkVqHUqNSyFkHq2X153fcZzpY1JM3RpBCJ6 Xwdq3oBN040mRZYSQYrRTUhSEl/Hnz4RdUy+MgfLqcUm1VzqT7rVcOzbqd2E KQPRo5kVqRvGLjpKzaScLIc6irmQKkDOIBAIHB0dsaekJUCqgNZQgfj9ry+1 p6Rdmx0/1JUzosezqrfQp2KTRPo3prrcLNvux3VMmBCHrWkgX4jRpeNetav2 E78PdJJ32ThlJ+vocks+rG2g+GTD8Zpt1nMqL/Fta0tq0oKdz05D59Fnlm5W vqGv6LSdVFHsszgldVToxO+TfeSrp1tXW/BMbVMuCJ5QipxurjtDSdtlzhg2 7fcaMZJXHL69bX6Oa+MVofoOm5ZEbmhCRV8O+kRl2qUbbsL1mvPEsHIIqYLZ 8O/PqCT/3ePVXKJ29Xwi5kRv+XB92Qqmav/SBFeGyf8W0g1lkETual+84ao3 oj+iEOpPNc/A8xmfa8l3plbxGHPVwG0LmE/8clF1KpwrMuI/tc96/pl+ZXRn kX/kPerSVLzKLTfFkHlWCSd756FWzq21TPdMCy1ED2dQI5iMoau5S74xXp4Z cEqNC1L7pBK/WuJN/gI30aOpTVsiRPpk7n/O8E1tTYY6irmQKkCO0a1bN+wp aQmQKqA1VEjb0MC6/hr1W2QnnRneYbU+FVu6dQJZNl2PaO/nJQeOki+Pxi7q F6B2VAPxfXc7MlRwGxWoo26SfN7R2b2osUr22Kc2TlG9pJgDnakIhtdwnV4L IWojejSrovlThXtTyilShRLjbmhLFcRvlteWd7DtW25Vv2pFyrXR5Bp29m13 6cxQJJGHx7ZtpV7Lv8o4slnsPJ6NNRzQqv3cqzoHt2SWdH9+HUe7SmMv6Xy5 p0T82tue2pXNHGt1KLqiSBXoRPw63I18ijn67FSbUMoiTPluBZo3qFWs+qfM MImfx/u4V5/9QDaMShlbZhjJIO04P55f23PoBXp296OT7IZQ4Zxrb/XLGUjC /TsPPharx63JMGjLkJVOUq8ML0Itu6p+BIr+RM+WNylhbAviVmbkBS1NFPFt Vzty0Y7qi16obUhlM8TIPSVr6zPiSfx6aU2kCmAcpAqQY+zfv//69et0XwUg VUBrqJD6n7Is0znLQCciansr5QyIjvu1vb4jYo/3lPcDOG4jr6qd2k6uwCfr B+Tvf9bg/mbWSDrTn3ozrc82mzql2+KCU2qimfZES1t7U1dUIVSMarD3UR8Z EN/2diD32+M19ldd387wqzLrugriyCN93G2K99gfYUgRknC8F7X0h+EzFtQQ BCjHKljVXGrgHgBIFcxD8nlzc3KDQwf1o8eJXyf6Uo85117HNazoJ/lEZqLs fPLVSIi4KyPLVhirWKEh6XAX+Udk2K0l9dGCupVHXVFdeS/HI37saEPtKanP iH0d0o0T0JWEZpA2xoHj/vdNi52CIglbVU/eLlrVUr9yJRF3YbAbx4BoUvxc Oc0t8zog2QR1FHMhVYAcIy4uTii0+O2EcwGkCmgNScLbyrLMHN3a1FO9FbPM ec20bhCWeKoPOXLVtfdJdZGB5POu9tTQVueuh+lY5FoNfuAoN2pTdR0bistJ vp5esP6ultUAhbeUr+ikXdLX5llzS/Jlo2LlM5ZT3zOaX2MpS3m1K9BJxV8d Tf1ymDq62PypAhF7Y7q3U/7ma54atlt76qWhhakUzWtOqO4fYeTxeRvua3kV yD/TV/kb33qHgb0rpApmQUTtpHq41vVWhav+fhGxV0aVtSZ/6tpW9Es84Ctf YMa2y5Fk2cQGr5L9TynHJQiujZIvHJuu15t4e1rNqhOux+e+TOHPn9hDXanf e16j9SYP2pJ8WKOYwMbOO+iCvp3ktC2H2AWHaBiBkg4RG7hi+eXsj4D+z959 hzWRrWEATwIEUJqKDcWOYlfsva6uFXvv2Mu6rt1Vn7V7d+29K6jYe++KFURR sYsFVGwgvaQNd5JJApIEQjKQOeH9/bHPvRoOYwhzvvPOKep5Lhbu2k8iTn74 T00mjReU+eu2Pr1wmlluRk/SMAzqKHIhVQAAdiFVQG+okKYs0zkxOEvtBc50 VxY7vzzT0yC+PYlZrq/9gbHs4+6uqtMRde32kPMk/qq1Bfqch0D9PDXUveOO jK5ddGaI6jw1W8+9Rm79qJZ8alA+5UDXuoPuvQpkYcpDEbVv90XFXP/TXVnp W1Se/dDIjp7dVCE+aHkrZ4faM/30mV6dlviWcpsIvXaFo34cHVCh6+6MNpaP 8u6g3OqUX3D4hSw+M0SqwAr1UarKWQa/oiLPj2nQtFllxbAtwx39kk8NVBzt J2yz9WPQwrounXamea366XCenofkN0rqx9mRVWrPvGPkbp+ESjg1yFk5aUvX nP4sSTzWV3VSonUXXz3f09TDi/Q5NiEl8c7Uag31OOWSdTH7ujEbSubtcUDL Py3p0aJ6yjVZfJdRl/Q6k0Z8bawy3+YJf9tiiv4RdRS5kCoAALuQKqA3lJO9 +a++ch6lQ48DbIxqo/d2URZIAtfx13WP2qK8OzKDMeuOPhrj3qSnK1qVdSnM PL1hY/8CdqQersB3Hnwqsz3I4vwmuTu2zzBUSInerTqW0MJ9xn22ulL5T1VZ bGc0x0B8bVxxJtipPj84/Ytknw8PqFisqCOfGYAbP42FxVQh6fnmTi553Eee +qK7KSrmw4uPmj+i1L3mtR+i+quYK+PL5fPck9GGjrK3yxsq32ud25LohlSB DdT3bW2VT3rLTUl/FoHs474+dfuuX9JeMa6zrJvRqFJ8lRmqWdYaPr5p0aYr X6VtS726S/EZlrzd3tn9tzUvODvpPnslXx1bXKB6y9k4u0a9V6F8vskKLfNN tEhzeFGe9jszmyYkerK4rkM9U4QK0ifzqjNn82o5koeKvDKxZgmXAop3k59/ gB7HN8slHumtPPkiSytGWIQ6ilxIFQCAXdu3b9+8ebO3t7epL8QE0BuqyULX NlNug2D922atm5xlVeqpfTybLr46FjCnPSzCqsX6X3fMk4YdHFDR44/lY5nZ +ZY1mCGv5N2p7efZW5NvANkb9ZMxuy57M5lHG3d7WhXrvB12ZrjDofSZ+swE p37H2Ns6IvUw84yOlkw+OcBR+8CAivKbWc+95/LZrRTHXfALDj0rH4BTETd2 HXhq4IQWtlKF5Jfbu7ralOrr+z6DykMUsqNbtSGnNAp06Qv12MWh58FMHm7G 3phUUejQJcNQIUXs90dJ1cLuiTezWt0jVWAD9W3Lb0Llo97Rv8y6oWLvzWtW b+Klt77dFU/CLSoyM9BFr7ynL7+t8fFQb3PC59vUmPsg3bqX5JPMTAaLyrOu X59Zp0K/g5+5kXbmPPGdycwhiIopbno9XM9M8uVRyo0vMj24Ron67t1RObK2 arwqk+RZ9PS/xnZCNjZSyTr1KkN+/kGnf32zEh4tb+322+JFPZjFfnk6+Sju NvGB+3b7ZzQNK82Kkbxd9ppkfSDqKHIhVQAAYAt6QxVZ6LrmylMSWdipUSl1 lUCGbUbt7qT81nlbrH2rehkV/WBdN7fyffaGvF7RyEo5LL5OjxPi/P9p1nim 5jggB0lf/1tPNQOg/n9vMipi4x9v6FzcgpdZqJCSfG6Ychoxy6s84o6rzvUQ ttmq6xpSswcL98m31ZlG8tvDYzxKNv9f4JcjfZjUIU9Hb7rWlbzd0a3OgEPh Bo6kWEkVkp5v7epq7dJh3cNIzSPjY2N+fv/8LvjmkZWjGha2chl+XmOqgvT5 IvUD0YzHIVTsw9UdXCx49l32Znz0pPpzzC8w8ESWP57ZnSrIZLli3Jt8dqjy 98iiwuQ7qthLFnFzQUv331YHJyedG6Y4U5JfYMiZpBTpp2NeHs0WPdCcyaJe 5GDh9sc1zcxBdbZK3pKlS3pM84vmxrIsExDfnVJOOf3epsMuY89mVYo51Eu5 i6p1h116HKlBfdvZQXkcj5YpKr9IDtk3qLw1z6r+f6YIFdLMcRMUG3xC/U+T hF+c1aRk7SlXv1yfwJyzY9VgeYgsRfbl+LA6HTe9zuhflHrvZmNXC4OgjiIX UgUAALagN1SSBC+oqT4G0nOvznkFWSS6PUm5xZ9dz0M6x1nSV/+rq/rmwlId pm/02bV2zuD6RezK9t71MiklSfUc3aLi5OshN5b+XqXduucmnW2cdGdyBdVp 5lY6D0Sg4t9fXNG/qmLhgF3HTLZGT10WbNNyA7vTMKIP92aefglK6XyCTv3c 30NZx/MEzg1Hr9jps3nJuLZl7Aq2WHQnipIEza7MPLgt0HNvyKNdg2rWm3bd 8JGU8alC/ON18oG+XgSuY69qPEJNuPGH8gkr/ZlrvUnH3Bwq/u35//pUtpe/ fQ5d92Y8vlFnaPx8vQ9lfQVRdqQKUqn08OHDnp6ezs7OdOMFChTo16/fhw8f WPwWXENFHuiZT3UQR7G2M3eeOn90w19tShVqMOdWFKW411gyn+R2i/Ys61W5 0oADodqGl8oXCooNOqFlqCx7t4JZ7MIv3Gnbm1xc98ae9VKt6ZefvMDS9Hsq 0reb8p7vNjXDkEBB+uJ/9ZTLHzLadzU5/PaW0fULyn9HreovyzALzj6pm/zy +A41Bi7a5rNt2eSulZycav91/ossdd6edcs1L14cnVC/xrDjGSzuSpGfzbOx JTM7x6qBqf5RqKPIhVQBAIAt6A3lksPOTavvyFePwkoMPPSRpfJQ8oA59p1n USGDvQKoHyeHlvx1jGjl0nrupXBFuR+r3I2dKRqLdVz32KRHSya9Ozqmmm3q lfKdavSa9M+iJUqLF86bPXXc0B6tPVztVMNWnl0n70yW+sYf68eM6u067GR7 v63YM0OZow6smukexyfd/6dWnl9+BHwnj1G+LxVPe1Pn9sv/3LHe9CvfjSlf jUsVqOh7S1oWFPD0JCj95810GVRiyMERlW3S/Evze/SZnOZHuOCfv6eMG9K9 VY1iedXfxqGrb8ahAvV1SxvF55RfaLDmeovMsZ4q3L17193dXSgU9u/f/8CB Az4+PnXr1pX/SxwcXr16xdZ34R7R0+VNU+9mcsJSXdc+jFX89KTB81Wn8PF4 NuUH73+v404n+7CqsRW/gKf3J62f0TjfLvQHKI/H9CzvEWo+qNhn3gPLC1Pf Zo+Zd6JYGtZGHx/AbLopbJ3Jcjxx+OVZjZzS/LzzVug4fvbCtPfjaX8M7/17 3dKO6h+86cbf9M3v9frW+X75ePLyuPfd+EAR0kqfq9fByf+88oijoZkNqpIv DC+saM6mxbpQE/2jUEeRi+OpAg4KBACC5PLe8PuhUXWrlndxsOSlZ2lXpGzl uuOPG33yluzD+paKwapV0zUZ1TzJbw5Nblshv41tvhJVWw5ZcuxZtPrFsvCj I6vmE1rnL99y1LqbX00VXSfdXtyxUd2qpfJZabxbmck8VBArJ3XwXYadYWui SJrWA2cxR4859j6su3XZ12tLe3kUzWtjX7RCgx7Td937ktqfx99Z0LSojZV9 iXp9FpwMMfZ8EKNShV8SjsxZlJ/qr/p3JNyY375RnaolnbL+I3Toti+T34WE EwMUK00sKkzzN2QmDYupAkVR9J2Nz+dXrVr1zZs3qZeYkODi4kJ/l9q1a9Ov Mf4bcRT103/d0IYl7YVCx5L1es7yfZxmWo3k5dbu5ext85dvPW7r/QxyIip8 Y+v8zVbrmiYvujK6ZLmBB8NMMYve9J6u6eJRuUyhPBq/h3zrfK4VqrVe7G/0 UEB0d6piXwt+/gEntG6GK326oU/T+jXcCtqkv4hMWTWUry4wGSrq/oahDUvY W+ctVLZ2xwkbroam3lDFT9d1LJXXKk/RGp7TfIP1OKdU8pCZRsZ37n1Ij7Ui 2SOX11FE42yqcOvWLX9/f7FYTH+5OfdWAGBG0BtmOyr63HDFss+8HTJZBJCL qQ71tK675Fl2pCayj9vbyx/n8YuOuGD8kaGgRdKVMYqd8B3bbTNsXQdbqYJM Jhs5ciTdVOnSpSMiItL9rZeXFzOyogs2I78RQDaSfdj0m3xbTUHxsVeTM395 LqXa4ceq6uwHplsViDqKXFxOFe7duycWi2NjY+fNmzdHZTgAkGDjxo3Zd1fh LPSGOUAWtq2dfEibt922cMQK2kiC5sjPOBSUHnMp04PWDSR+NN/DWh4rDDtr ym0uzVbi5dHyUEFYfU6ggUMgtlKFSZMm0e3Y2to+ffpU82/Xr1/PpApLliwx 8hsBZKvkwNnVrOSxwqhLmR3dm1vJj1myYnb/MNlEhRTUUSTjbKrg5+cXEBAg lUpDQ0Pt7e3VM43KAADnWVtbd+nSJfvuKpyF3jBHSF6uaenI51nVnP8Yi+Q0 xV8a7Sqgi+eBx39kY2UYf2d6NWsez/73rSY9k9MsUT/2dc9Hf8DdJ/kZnNmw kip4e3szpdfy5cu1vmDLli3MC7y8vIz5RgDZL9bvr0pCHt+x0y7k0dok3/7L zYLHL9R9r2kPNkUdRS4upwr+/v5SqVQsFtP/477KawDgvFq1aiFVgGwkfbut gzOfn6/jDgxp05GGrGlux7MsO+IsS8ey6ZT4YEHdvDxByRHnc+8Oc9ki+cGc 6kKeTY2Zd4zYR9T4VCEwMFAoFDJPc3RtcrV48WImVWjdurXB3wgghyTcm+1h y7MoO+5Kds3iIpcsTL6uTVC8/+GM97PMfqijyMXZVIHGzFWgKMrUIyQAyBqk Cqa+EPNHRV6ZVNVWUKiLj46DGHMnaeiuzgUFDo0WP8iJSb7S0H19S1hauo25 aPQ2nKAievpfYztBoQ5bXhs1EcfIVIGu3KpWrcokBjt27ND1smHDhjGv6dCh g6FXCpBzJO939yhuYeX+x1XDj7I1R7Lwg31cBHlr/31bjz0dsxnqKHIhVQAA 1iFVMPWF5AqSD4eGVLB1bLw40KRHQ3JIQtD/mjrZe0y+nJ1LH36V+GR9Bxer ol12hmAxCguon9en1MhToPnSgFgjf4RGpgorV65k4oJChQolJ+vc24G+1TMv 69+/v6FXCpCj4oNW/V7EqnjPPe9xdr1S8rO1bZzzVh5zOpwLGT3qKHIhVQAA 1iFVMPWF5BbS8AszGhVyabcqKNfvGUjFPVrbsUSx35bcyel5A8mv93lVLeA2 cN9b0+0abhaoiJvzmhYt233TExZiMmNShfDwcDs7OyYumDdvnq6XxcbGCgTK 0wD//PNPIy4WIEclvvAZXCm/+9CD7xGGpiQ829ajdNGmc65+50KkkII6imRI FQCAdUgVsvRV0riPjy7vXzdvfJ/WNcs0X/pc15nlcdcnVqw660G65yvU9/OT 6xe2c3LrtMzf9HMXTSD53cmZrSs1nHj8fa4d1FIxT7xHNqzeccGlz6Z5+kbF PvEeVa9y24U3vnGkMCWN9MfdtX1q1+qz+m4EO++gManC5MmTmaxAKBR++/ZN 18suXLig3kl77969RlwsQE6jYh5tH16ncvulN3/k4ntW/Iv9fzSp1mbWmVAO 9Z5IFciFVAEAWPTmzZtXr17RRSlSBb1IHq7sUse9ZCE7S1V1btV45XutRU5S 4JwaQr7zsHPpev/kkwMcmS+1abXxUy6tj2Q/H+3+e60fhwqjnCR9s2/ekuOv 4kycKYnDb26c5/0Es4oNIHm4deaqy6EGniKpjcGpQnR0tHqiwoABAzJ45bRp 09Spwtu3b424WACTEH2+vm7+bp1BvrmThR1ZuODQU649jUCqQC6kCgDAIqQK hvWG4vBz4ypZKcpz+56HtMzmlzxf1igv/bfWHbyjfv0bKubW/MYF5POQLT0W Pcut5REApGVwqvDvv/+qswI/P78MXlm+fHnmZQULFqRLNSMuFgBACakCuZAq AACLkCoY2htS3707ymMDnkXFmYHpH/fK3m9p68SX/61l3f+90kwOxG9WNc/D t+u2L1pX65EHh1Upb6jKvXfgoAUAkhiWKshkMldXVyYrcHBwOH78+Akdtm/f rg4fBg0alHGzuP/kCOnLtZ0rGfw2Vx13OtHU/wIApAok42yq4Ofnd//+falU KhKJ3r59+0bF1GMmAMgc9lUw4Gtlb5c3VMxWsOniG/vL31Bf9vdydbS3lv+l oPSft7TsL5V0ZkhBx84+33Q9L6S+bW0j5BnKqv6yEFT1AAQxLFW4cuWKATeI EydOZNws7j85QvL4n2oWBr/N1l334TAd4ACkCuTibKpAe/jwoVQqFYvFISEh ph4kAUAWIFUw5IuTTw1ykhd3lrWXvEwzHYH6ecarXPWpG/+qpKgX7foeS9L4 0rgLI0qWG38tIYPWJUnxcYaKTxRjejMASQxLFUaMGKEeZQYHB+t6GV2bFStW jHlZ/vz5RaJMdzTB/ScnyESJRrzNSVg/B1yAVIFcnE0V6NffvXuXmasQEhKC uQoABEGqYMgXS4JmV5EHB/yioy6nFunxfpMqlR9zKerj+uaKmQzCVpvC05XY srdrW7h23PERj/MAgGFAqkBRVJEiRZisoGTJkhlslXD+/Hl1+DB58mQ2rtcY lNiowTT2F9WPNDne4Lc5PkGE/gn0g1SBXFxOFQICAsRicWJioq+vr7dKJwDg vHz58iFVyDLq+7a2ilnCNqkzUZMf/FOrVL/D36mUxMO9mG0Xqv3z+JcqmPp2 sE+Zxv8+M9G52zKZbPDgwQ0AIEc0adLk4sWLmf5iGpAqvH//Xp0VjBgxIoNX du3aVbk4wcrq8+fP+n+LbCF9vshDfYhO1if+d0y/Ae6yZcsaNmxo6p+zFt26 dYuPN9kqheRjfe0Mfpct3Kb6/9JvBQcHt2jRwtTvKOQQ+ka0c+dOPT9pSBXI xdlU4datW/fv3xeJRJ8+fSpcuHAelZoAQAIOPMAyAeN6w+QTAxwUlXqL9cwJ kZKXK5oWb78tVP5/xH5/lJQf9MAvknYmQwoVcXqYe70FD1k8ki5roqOjbWxs DC42ASCrpk2blukvpgGpwrFjx9TfYv/+/bpe9u7dOz6fz7zMy8tL//azi/TN 2t9Luhiq9ODDMb+2V7duXdP8XDNDv+1v3rwxzZuckiI6P658MUPfZdcmi4J+ SRXS7vYJuYGnp6eenzSkCuTibKrg5+cXEBBAf21SUhL9v6+pZN91AgAYybje UHzrz1KKEyJrLHgqTUmRfdjavnjjZS+YWkz6cmkdxfM4my6+6pMnqYjTXpWb LH2S6armbBUaGnoLAHLEvXv3xOLMZyYZkCrMnTtXPQT4+vWrrpdNmjSJeY1Q KAwJCdG/fVJERUXdvn3b1D9nLUwYKWSHBw8emPodhRxCDwP1n2aDVIFcnE0V aIGBgSKRiP7y7Ls2AAAWGdcbSp8vriUPDgRl/7ojpr4e6F2ixt8Bqq0ZqZ+7 OijWR1g1WvGOWaEqCz/Ur2KLlS/0WPtARZ2c1KyhoZqO2vcJi2IBCGJAqtCv Xz8mLihdurSu18TGxtrb2zMvW7BggZ4t4/6TI6Qh2wc1Nfhtbj7zkuZGwAA5 DqkCuTibKly/fj0wMFAqldJfLpOhPwEAAhjXG8o+rmsm35GRX2j4+a/nhpdx G3clzRGTonNDC8inHasWqErebG5fof3mN3rlrjjZDSBXMSBV6NixI/ML37Vr V12vWbBgAfOaihUr6nH0gxLuPzkCJ0uCOUCqQC4upwrMCogMdiEGAOAUI3vD KO8O1vLyzqbdhNGVSvQ/+iPt3U/yYFZFRcXoNOhUckrcvTn1Kw0+9kXf+6P0 54dnwYZ6+i7CRHtBAoBBDEgVPD09mfHlpEmTtL7gy5cvzESFPHnyBAUFZeFq cP/JEcnf3jw1+G1+FhaNchs4AKkCuTibKtDu37+P5Q8AxImIiHiuEBUVlfmr zYuRvWHykd55FFU9X1Cgw/awXx/PycLWNmPOlmy75dHBAe61ZtyK1dEOAORy BqQK6g0TZs2apfm3FEX16tWLecHx48fZu1IAgFRIFciFVAEA2MX0CLTNmzeb +lpympG9oWqRAy9vkxUvNW5+CYd6KjIHQcFSpUv+vuGlabdoBAAOMyBV8PHx YW7dU6ZM0fzb1atXM3+7atUq9i4TAOAXSBXIhVQBANiFVMHwVOHK6KJ8Hk9Y fU6glpMixTcmuAoUkxXcx5z7jrmqAKCTAalCZGSktbV8DVaDBg3SLT49efKk hYUFn8/fuHEj21cKAJAKqQK5kCoAALuQKhjcG4pvTiwlsCg34arWpQ3SF/Ij IvgFf9/wQkvmAACgZkCqQFu0aJF6QgKzUTZdJc6YMYPP57u6ul69ejV7LhYA QAmpArmQKgAAu5AqGNwbSvynuZcYeCxC+zwEKnJne+c6s/yiME0BADJmWKog lUoHDx7M3MBLlCjRsGFDoVBob28/derUmJiYbLpUAAA1pArkQqoAAOxCqoDe EABMy7BUgREUFETfykaOHDlt2rRjx44hTwCAHIM6ilxIFQCAXUgV0BsCgGkZ kyoAAJgK6ihyIVUAAHYhVUBvCACmhVQBAEiEOopcSBUAgF1IFdAbAoBpIVUw PXHMx2d3zh/YumzOxJH/uxKNDXEA9IA6ilxIFQCAXUgV0BtCDpPFf3xw+Zjv 9nXLFs1bsCsgFuOXXA+pgslI3+wZ065B5eKOVnyekmXtJS+kpr4uMJgo4sX1 wzvWLV+y+N/Vm/ecuR8WJzP1JZkx1FHkQqoAAOxCqoDeEHKI6Iv/nrmDWlYq aM23KVKj3eDJi9bvPu7/UaTzC2ShvqNa1K/m6mDByxpBuSl3xantSB6v7dW0 bmWXvAKNF9oVq1L/93nXE3Lgnw+6IVUwneSYyFiROPb17r6uzO+HRcWZgahm iURF+m8c0aCIVbrbXJ4ybSfvfaJ3fCt5tKZn07oVi9jy098vM2HVeNX7tAGG NGTn0Gb1qpbQvIHzbYtUrNtyyumf5EfKqKPIhVQBANiFVAG9IWQ/yZdr//Wq aE9XqdYl2kzf/ygiK70lFXlpbHlVXcp3bDR22UqVFcuX/W/x/NlTxw/t2qi0 naoI5hcceiZRsx3pt9MjyqbWt0K3/tsfY6I3JyBVMDnZu5WNFKNRQck//HQn fcBZ4rd7B5a30Tnkt6s66siHrNx3JWE+3Qup7qkC1w4zVqhvuyuW/7d00T+z Jo8Z2KFWUWvVd7Co9PdDbd+Airo5uWpq0mHh6rnaP8JsJsOgjiIXUgUAYBdS BfSGkL1k367Nb13Ukv6sWZfruy3YkAUPSUd65VHVxl326ni+Jf1+Z0VnV/n3 ydt5d6TW1yQd7mWrKm3dJt3UkjyASSBVMLm4o/3yKSK5QsPO4heDPIn+f9dQ RAp8O9fabXsNGe41sHvLys7CtMGCTdWpfjH6339loWuaKsMAQfGxV5O1vyo5 9OzMxvn59Dd2GXVZx2tEF0cUVuYTgmJDT5tVlos6ilxIFQCAXUgV0BtCNhK9 3Te4grzY5TvUmXzhi2EPqGShq5soq1ubNlu+ZFCSJtz8s7yFVeOV77UuJJZ9 WNVY2Y6lx6LnZvO0jHxIFUwt+fJoF8W4z7HXoRhTXwxklfT18ka2PIvCTacc eBqd5uaX9OHc3NZFUidoWVX5O1DviSgS/6luFsrZX4NPZ7BKjPp+sHdBgUOP Azo+OVTkrg42qjR36j2x9lcRCnUUuXIgVaD5+fldz7qgoKBsvSoAyA5IFdAb QnaRfDgwoIxiGC90H3Puu8EPqBJODMjPPOmyarTyXYY7j4kujnCp8vcD7RF/ /LF+TspQodZihAocglTBxCQB0ysoBpB5Ouw0/BcVTER8b6qbVZHOW19pmyuQ /Hxd2wLq1WEuIy8m6dcoFb6xlXKqg0OPA9EZvjbKu6N9yw2fdNybRVfHFBOY aaiAOopgSBUAgF1IFdAbQragYm5Oq848oMrbcOljPStZbcQ3J5YSqGYYPMs4 DBBdGl1zjI55uKJr41T70VWZHYS5hRyCVMG0pK//rWupiP+arwvDgQGkkTz8 u4rrgGM/dMVBsvfrW+ZVLf2qOveRfve+mIM9HZivydN+57eMo6Zon671FzzV cW+mL68yM+dBUGLCDXPbswN1FLmQKgAAu5AqoDeEbEB9Pz64BFNJ2tZf+tSY x1OSh7OVNamF+4z7mRTE0vfXLjzXPldXEjjTXVnblpp408wemBEOqYJJUV+2 tFEEgJZ1lr7EHB7SUN+2dGiU4WGg1M+9XexU+xqMvabXzS/x7DDlXo16RE1x Ty/c+KDjAqSv/61nqVxIMSSjhRRkQh1FLqQKAMAupAroDYF1VOQZr5LMtABB 6fHX4o1pS/0YlScoacyDLumLJbWVtW2hYeewHx2nIFUwqZhDvRwVsV0lXYuH gMvE0d9+6tgnUUn6fJEHc/ezqDA9QJ+fscjvD+Ut3LLO/14ZETXJPm1oqTwm wr77/ijDG+Io1FHkQqoAAOxCqoDeENgmfji7KlPC8qwbr3xr1Izq1JpU++b0 4qAlXabo2p48bTth65qrFgn3PJjxImHIaUgVTCn54siifOUcHnObnw4KsjDV cQ62nXy0H5DzK8mDWRWVM8SqzNGyXCz2wp89/tO15CEtKnJ3Z+Xqi0y22iUU 6ihyIVUAAHYhVUBvCOyifhzoqdoczL6TdyYLcjNrLMJHVZM69T6sscU4Fb63 e5nuvlGZfg/qx66OysMpbX/fbtw1AeuQKuQQ8bdA33lDfqvm6mQjzFuo0m8T dj6OFQdMKy8fQPILe6nn8Iij3gddO75r9fxJw7q3qu1WuGTHTa/SzZtPCjk+ q2PFArZ5CtYY6J3+L4FbpI//qaYICaybrf2gR8wrfbm0jnKGWJlJtzV+uJLn /zWuMP6aPhFU3PH+qq12Gyw3LmHmJtRR5MqZVCEwMBCpAkAugVQBvSGwSha2 oaUtTxkqeO6OkCWG3dgxx6tjXbeiTrZCGyeXik37zfS+H6HfnNrYo33zMTVp 3k4+6XcjSwhe07agbetNnzMPCWKP9FEe/6Dz3EkwHaQK2U8WcXftgGqOFo7V Biw7+eB9ZOz3Zyf+bl4of+MR/aopBpBOfQ7HKl8rfbln0pCBfbq0rFpIOcGH l7fx8hfqR9ZUxLXZjfKrzhWQP87WcwdAMI3ofd0U+yrYd9ipz3SB1JldfJdR l9LttEtF+s2oY+888KQ+K9vUJ5bKt4l8bI4fEtRR5MqZVCE6OhqpAkAugVQB vSGwSfZxfQvlKlqesN74/yY0KSq0dCheycOjUgkn1QiFx7Ms3GrR7Z+Z1rdJ yrnZPJ5V/QX+oR/lwt6/enL34v41U7pUcuDzLOv9+zrzgCLpwogiTDuW1ecH Yz86rkGqkL2o6Puru5a25lmV6rUr7emD1Lfdno6q2KCjt5ZDBOIfrWpbkM+M L0dcYLbai707t669XZnm3bu1rFzQms+3r/rXpWhM/+GwuBMDnekfoqDsH9f1 2S2R+uGtmtnl0HnLS8Vt92Po2xdBt874/Du2dSkbHs/Oc49eCynuTSmn2mDn z1tmOaEFdRS5ciZVSFF0cEgVAHIDpAroDYFNUb5dVWeY0fKU6zjLN/Cbcqas KPz22l5lVZkD36Hh4gcZ17ji25PKCHgZ0W9/udR2BGUn3zXL2pZsSBWyERVx fVZ9Rz6P79x+8+t0k9Zlb5c3YNbbW7dY/1HrHB5ZyOqmislH/CJe5xPp1s54 lSneYd1j5ZNqcUKCGIkCp1Hf93Z1kv/8u+4J12uaVuxh1cwuXaxbbvikz0KK 4PnVlVvkFpZ/eMwR6ihy5ViqkJycnNXdFZAqAJAIqQJ6Q2BRmhyAX6DT5jdJ 6V8g/bCjk7Nq6rR1jbkPMlibK3k0t6ryLEjXnquOn5I7eeLYob1bl//V0U3+ ME1QYvz1zBf3prbDLzryosYlgckhVcg2SY+XNaOHlDyLEgOPak5+V5+MYllX 50b/1JctvynOnRSUmHA9/PSwCjWn3oxBkEAM8eP5Na14/HxtN7/Tb5ZW0vnh hZUzu6qO3nVSed89etBn0+LRzYrJQyjLOkv1ORZC9m5lIyaz4jn2OqSxK455 QB1FrhxLFWihoaFIFQDMHlIF9IbAopg9njbKyICuPF9qqzxl79Y0y6Oar1Cg 7xGdWy3KQpbVZ2pSLWdByj7t7OgkcB58KvMZvant8Jz6HonN9PWQ45AqZA8q +sofFawUgYDXGW0LjhJPDVJsj2BRebaWjf6VpK/+x2zdZ1GyQQO3+gseIpgj hyxse4d8fH7Bzjs/6LnyS3zrz9JMMqzlUyF6uqiu0MJ9ZqAeWyRQX7e1VW6x Y9tuh7lukYs6ilw5lipQFCWTyfz9/ZEqAJg3pAroDYE9sverGlupJiJ09NZ+ ODkVdaSv6pAIfv6BJ3XkAtTnTa2VqyW0nQUp/1b5u/pmvjcDFb65tTLpyNNh l5al42BySBWyReyNPytYKn7LPH3CtX3wk29MKCkfQGay6F1yb6obM9lHWG1W gHlOZDdPss97uxcWWJYdfkrvQb0kaHZl5QyxkhNvanwqxHenlC85Tq/jH6L3 93BgbrxWjVeZ7Ra5qKPIlZNzFWiRkZFIFQDMG1IF9IbAHunrf+tZKlMFp0Gn k3W8LPpgT9UecZbV5z3R+gyNitzjaad80KXtLEjp80UNf9fj+Afq596uynaE zdaGmmttSzakCtlAEryotjXzyHlWoNbMIO7c8GLyUIFfZMSFDOcfJJ0bVkiR A9p126eR7wFXSd9ube8scGr2b5D+SVDqLZxfaOhZza8TXR1XbdAJfY5/SDg9 pKByIUWNBU/Ndotc1FHkyslUgaLktcqTJ0+QKgCYMaQK6A2BPbKP65op5yrw i46+rOuBluzdiobKlwmKjb2qfcSTes651rMgE87+0Wvdm8xr1fgTA5UTIyxr LX5utrUt2ZAqsC/65CBmdbxNs7UftIVpstBNv9krflXzZbYwiPq5uzOzY6PL mCv6PKYG04sPmFfPzrby+PPfszA/S/ZpQ8sMZoilUOG7Bg4/mPkMsZQU0fXx JZRb5Jabcs8cz5RkoI4iVw7PVaAlJibeuHEDqQKAuUKqgN4QWJR4pLdyYgC/ wNCzOscfyacGKTcZFxQfd11bqpB6zrllDWPOgky+OqaYcpFw+ekB5lvbkg2p Atuo7z6d7ZmVSC03aDvcgYo+N6Ik85uRt5NPRIbDRCr6/AjlCFHn3CLgFGnY gX4lrV177XmXpXseFbG7c94MZojpTxI4s6Jyi1yXUZd0zVozA6ijyJXzqQLt 3bt3SBUAzBVSBfSGwCLp0wU1lUsghG236XxIJvb7QzVK8VikbQKB+K76nPNy U/Q6C1L25ez/NtxLP2NXEjCtvHKRcLExV8y4tiUbUgW2Re3rZq+afa4tlIu7 ObmykK+KHTI+JTApYJZHxUYNXBS/kMJWm7Ru0QDcQUXdmFHL3rnVysdZ3QMj 7li/fBnNENMkebVv8Z4XGp8w6culdZQLKfL1OxqXxcsgCeoocuV8qkBRlFQq vXv3LlIFALOEVAG9IbBJpNz/TX4a5HitsxDkxDcnllK8il9w6FktK7qlT+ap zjkvqteDLir6/MgKrdeHpauDpc8WeijbyT9Ar8XAYApIFVgm9vtD+Wto1/uI xtCSirn+V+MmzasrjmKxrPdfhguJRI8XN6gw7PSHAz2ZmMKpr1kPEskXH7S8 lbND7Zl+Ok/X0Snp4siiyhli1fWaISb7uLNTuf5HNdbPyMLWNRfylDNhvM16 i1zUUeQyyVwF2rdv35AqAJglpAroDYFVolt/lhFkVpgmnRzgxCyT6HdUyzHm sreqfRf0e9BFRZwbWS5vc429GGUfVjdR1baeeyLNubYlG1IFlsX5dmHOPeFr 7ltCfT0+tG631cu6K34FLarMeZTBJHnRkyUNS/fwDZfJf5cUv5OCUmlPBqBk +K3ikqTnmzu55HEfeeqL7okGVMyHFx+1nbwjvv2X8t4tKDtZjxli0g87Oxd2 7ntE4xZO/fDuqDw9WNh8Xfqs17ygjiKXSVIFZtvGoKAgpAoA5gepAnpDYJf0 zcrGtqrJ19q3/pYGL6hhqVjd8OdNLTMV5GdKqs6C7Jj5g67kl1s6FRFYN12T fk86Knzzbzbq2lbb4nLgBqQKLIvd62mtjOUGnfrlVywh6N/WtUecenec2cRU dXqg5P3+mUuupn+6nXB/bp1S3XYrfnUkAdMrKBYTWdZe8pL5taYiTg3/bfpd LCziiOSX27u62pTq6/s+o5woZEe3akNOaclqU8+U5BcZeTGznyoVc3deAwdB vt6HNfd0jDqgOuTHsubCZ+a9DwfqKHKZaq4CLS4uDqkCgPlBqoDeENiWeHd6 FcUUAUGJURe1bC4vCZ4vDxX4hXvu/6IlMqDCt7SxVdakdf73KsOalIoOXOtZ gm5M2ETjRHTZx42tlO1YVJ4dhJ0auQupAsvE18YVVz51LjXmsmoESUUHLGvn 3mxJYILo+nhXxd/b9zwUlyL7dm583YYzb8emULHv/G8GfVasmZB9OTHMzbWH r2rThaTzXszxkjatFSe6it7s6lGr556M92SAnJL0fGtXV2uXDuseRsZpiI35 +f3zu+CbR1aOaljYymX4eS1TFSSP/6nGhAo82867f2b4zSRfrsxpKo+lnHpp HhRBRfh2U4YKGS2DMxOoo8hlwlSB9vr1a6QKAGYGqQJ6Q2Bf4oPFDRWrsIVV ptxMlytI3m1tn5/Psyw1+Ji2TCFF+npZA+XZZjzh79t1TlUQfb3v+3fHskxu IGy88l260Y3o4Zxqyo0jedZdfLEWnMOQKrAt9tRg5lxJHs+icPPJW0+cP75l eodyBT0mX4mg0pwA69Bizt7VA6u59/AOkdDjykW15L9Pedy6zdv034BKThXH X0qzbihqX3dmawWrikPWbJndwa3yqDNZObUQsk3843UdXJSRQGYErmOvapkh lnRrknKDXB7feehZXVMVqIQP1zdPaFKUubU69jygsXuD9PWKRjaqG3jLjZ/N /BOCOopcJkwVKIqSSCS3b99GqgBgTpAqoDeE7CD7em5iDfkhk4Iivy+7F6ka 8cc98xnsbsMTluq+9bmWyjZF+uP24pbOfHUFLCzbacbqbd67lXx2bdu4auns iUM6NyzrZMlLfVnDFW9/CRUS3hweVyNvaiFddvipr5iswFlIFVgneb2xbYHU XyR5FlCs3b93fyrGeLK3yxtYqX95SvXa+UoxiEw9F5ZmWbLnzte/jC2pH77d nFRNCsv08Xmt8+hYyDlU9L0lLQsK9IsU6Hth6T9vavzckkNPT6yZR/0avn31 AQs27PBR33d3bt2wYtHMcf1/r+Vql+Y7OXbf//PX0CAp9Oz0huoPCU9QtNee UPP+lKCOIpdp5yrQwsPDkSoAmBOkCugNIZtQMUHbRzUoQo9eBI7lGnfq3adr i0oFrIRF6nutu/M9/RYIkacmt2rgUaFwnl8GQnqyarA8RNEgFXFiUquGtSsX d9B4bse3LVy+Zv1mI32xvwL3IFXIBvTv37ZRTUs7CoUOrrW7Tt0VGJn6yZe9 29Pf3dHWqWyzEevT/DLGP9zQu5qzff4yjQav9PuiGcNJQvYMrprfvmitfsv9 vpr3cnlipB73oReL8lP9U9ckSEN2DmlWr3qZAkIDbrs8h277VKFC3JU5bRvV rVoqn5XGq6ydy1av26T/lpfm+YFBHUUu06YKlEJgYCBSBQCzgVQBvSFkq6Qv jy/4blq5dOGi/63efvjasx/m/eQKDIFUAQBIhDqKXCafq0CLiYlBqmBmEv3m /97Qo3whG41nZHwb5zJVazceuO21eWasgFQBvSEAmBpSBQAgEeoocnEhVaC9 ePECqYIZknw62K946jwy64pDfIJjMFXW3CFVQG8IAKaFVAEASIQ6ilwcSRVE ItHNmzeRKpgdKnJne9XaMqua/zzCGcy5AVIF9IYAYFpIFQCARKijyMWRVIEW FhaWTalCSEgI/c9kpSnIImnqYb3WzdaGYpoCt3z9+jU0NJT1ZpEqoDcEANNC qgAAJEIdRS6OpAoURclkMn9/f7ZSBbq1gICAWbNmVa5cmf4H+vn5sXi1uQT9 QzG6ie/b2ynP2BU2XvUeoQLHnDt3jv7ReHh40PfwZ8+esfATV0CqgN4QAEwL qQIAkAh1FLk4kiowfv78aWSqIBKJzp8/P3r06KJFi6bdIhCpQlaxM8CMO9o3 H7Nfo2XtJS+ydXtGtkbEuQqTKqi5ublNmzbN399fJjMqAEKqgN4QAEwLqQIA kAh1FLm4kyowo8Lg4GADUoWoqKi9e/f27NnTzs4u/ZkDSBUMYuS4kpF0cWRR JlSwqDgzUPOcZjCxdKmCmouLy9ixYy9fviwWizNvRQNSBfSGAGBaSBUAgESo o8jFnVSBkZSU5Ofnp2eqEBYWtnbt2latWllYWGgdHCFVMJj60b8R8YL4zl9l mQMgBCUm3MCB6tyjK1VQc3JyGjhw4LFjxxISEvRvFqkCekMAMC2kCgBAItRR 5OJaqkB7//59BqkCPdp99OjRvHnzatasmfGAKC0PD4+JkBUzZsz48uVLijGp guTx3KpM2sMvNPRMFgalWcdkIPQnx9RvG2HoX3w9f4NsbW27du26e/fuqKio TH8cSBXQGwKAaSFVAAASoY4iF9dSBXp4KJVK7969q5kq3LlzZ8KECSVLltQ/ TACDWVlZBQcHUwqG/ShlIcsaWDGNOfQ8GM3GpyMj9HXSnxmTvme5goWFRevW rTds2BAbG6vrZ4FUAb0hAJgWUgUAIBHqKHJxLVVgfP/+XTNVSExMPHv27Pjx 48uWLWu6QVVuYWVl9fTpUyOWP1Dhm1srj3+wbbfjW05spXj58mXTvmlmj/5U tG7detWqVW/evMngB4FUAb0hAJgWUgUAIBHqKHJxMFVgHo4/evQog30VXr9+ vXr16rZt21pbW+szGpo4ceIRyIp//vnn69evEonEwGCB+rm3i3LnTGGT1R9y 5EzJkJAQU79thBk+fLg+vz5Fixb18vI6duxYXFycPj8IpAroDQHAtJAqAACJ UEeRi4OpAiM+Pl6fMyASEhLOnj07bty4MmXKZDAswm6NWSWVSo06qzH+xIAC yjMlPRY9z9YzJdVwuGRWZbxbY7169RYsWPDw4cOsvrFIFdAbAoBpIVUAABKh jiIXZ1OFFMW1Zen1GUxgQKqQw5Ivjy6mPFOywvQAnCnJUZqpgqOjY69evXx8 fL5//25ws0gV0BsCgGkhVQAAEqGOIhdnUwVjnjtrTmBAqpCzJPemujHHPwhc x13DmZJcpU4VKleuPG3atBs3bkgkLERASBXQGwKAaSFVAAASoY4iF2dTBbYw Exjo/5r6QnITafD8GpaKYSXfefCpbD1TEowRHBy8YcOGDx8+sNssUgX0hgBg WkgVAIBEqKPIxeVUAcvkCSV7t7KR8kxJ++77okx9OZDTkCqgNwQA00KqAAAk Qh1FLi6nCkAm6uvWtqozJdtu+4poKNdBqoDeEABMC6kCAJAIdRS5kCoA26L2 dbdnBpVWjVe+z5EzJYFTkCqgNwQA00KqAAAkQh1FLqQKwLKEU4OdlWdK1lzw NNMzJaXvDszd9ECcE1cGOQSpAnpDADAtpAoAQCLUUeRCqgDsEl0b5ypgzpR0 m+qf2YEC1NcDvcv33P8TyyTMCd0X5Ffw9vY29bXkNPSGAMAFSBUAgESoo8iF VAFYJQmYXkF5pmSxMVeSM34xFXVhVOn8PRAqgNlAbwgAXIBUAQBIhDqKXEgV gE3SJ/OqK8+UzNfvWFyGr6WiLo9zs3LqeSAKoQKYC/SGAMAFSBUAgESoo8iF VAFYJHn8TzUL5U6NLTZ8ziAtoGIClrUpLOA79TyIUAHMB3pDAOACpAoAQCLU UeRCqgDsibs8piSzpwKPZ91uxw/tcYEs7s2ZJT0r2vF5PL5Tr4NROXyRANkI vSEAcAFSBQAgEeoociFVAJYkvPIdUkHIU+MXqN1vyrzFS5QWL/jn7yljh3Rr Wd0lD1/1kny9D0Wb+roBWITeEAC4AKkCAJAIdRS5kCqAkeKuzPm9UZ0qJRwt eVnEz9f7MEIFMCvoDQGAC5AqAACJUEeRC6kCAABb0BsCABcgVQAAEqGOIhdS BQAAtqA3BAAuQKoAACRCHUUupAoAAGxBbwgAXIBUAQBIhDqKXEgVAADYgt4Q ALgAqQIAkAh1FLmQKgAAsAW9IQBwAVIFACAR6ihyIVUAAGALekMA4AKkCgBA ItRR5EKqAADAFvSGAMAFSBUAgESoo8iFVAEAgC3oDQGAC5AqAACJUEeRC6kC AABb0BsCABcgVQAAEqGOIhdSBQAAtqA3BAAuQKoAACRCHUUupAoAAGxBbwgA XIBUAQBIhDqKXEgVAADYgt4QALgAqQIAkAh1FLmQKgAAsAW9IQBwAVIFACAR 6ihyIVUAAGALekMA4AKkCgBAItRR5EKqAADAFvSGAMAFSBUAgESoo8gVERFh Y2Pj7u5uA/Are3v7/EQx9RsGYNO6dWv6vy1btjT1hQBArlaxYkX6vx4eHqa+ EACALGDqqNWrV5t6iAxZhlQBAIAtSBUAgAuQKgAAiZAqkAsrIAAA2IKZewDA BVgBAQAkQh1FLqQKAABsQW8IAFyAVAEASIQ6ilxIFQAA2ILeEAC4AKkCAJAI dRS5kCoAALAFvSEAcAFSBQAgEeoociFVAABgC3pDAOACpAoAQCLUUeRCqgAA wBb0hgDABUgVAIBEqKPIhVQBAIAt6A0BgAuQKgAAiVBHkQupAgAAW9AbAgAX IFUAABKhjiIXUgUAALagNwQALkCqAAAkQh1FLs6mChRFmfoSAACyBr0hAHAB UgUAIBHqKHJxNlWgxcXFmfoSAACyAL0hAHABUgUAIBHqKHJxNlUQi8XBwcGm vgoAgCxAbwgAXIBUAQBIhDqKXJxNFV69ehUUFGTqqwAAyAL0hgDABUgVAIBE qKPIxc1UITY29vr160gVAIAs6A0BgAuQKgAAiVBHkYtrqQKzSePDhw+RKgAA cdAbAgAXIFUAABKhjiIX11IF2tevX68rIFUAALKgNwQALkCqAAAkQh1FLk6l ChRFSSSSO3fuIFUAABKhNwQALkCqAAAkQh1FLk6lCrSQkJDrKkgVAIAs6A0B gAuQKgAAiVBHkYtTqUJCQsKNGzeQKgAAodAbAgAXIFUAABKhjiIXR1IFZpPG x48fX08DqQIAkAW9IQBwAVIFACAR6ihycSRVYK7k+q+QKgBAhhLDbu6aM7ht vWoV3cpUqN1h/JaASMqkF4TeEAC4AKkCAJAIdRS5uJAqUBQlk8nu3buHVAEA 9CQJv/a/rm75y3kuPPHsp4iSPFvoYcnj2Tde8VxqwqtCbwgAXIBUAQBIhDqK XFxIFWgfPny4rgGpAgBolfxqZ69SVtbuo898lSn+QPpiSR0r+l7Gs+nkE2XC C0NvCABcgFQBAEiEOopcXEgVkpKS/Pz8kCoAgD5kH/f1Lm7Bs/H450GS6s+o aL+F7atWqOG55FaUKddAoDcEAC5AqgAAJEIdRS7TpgrMJo3Pnj3TjBSQKgCA FpJX61o58XmC0mOvxJn6WjShNwQALkCqAAAkQh1FLpPPVYiKitIaKSBVAAAN srAdHfLxeTyrOktfmnL/BF3QGwIAFyBVAAASoY4ilwlTBUohICAAqQIA6IP6 eXpocYF894QW68Nkpr4abdAbAgAXIFUAABKhjiKXaecqfPz4UVekgFQBAH6V dP/vqootGfO03Rpu2hMkdUFvCABcgFQBAEiEOopcJkwVRCLRzZs3kSoAgD6S ghbVz8NThArttn/lZqiA3hAAOAGpAgCQCHUUuUyYKrx8+TKDSAGpAgDIUZKk qI8Pj85t62KhyBR4edvv4GqogN4QADgBqQIAkAh1FLlMlSrExsZmHCkgVQAA 6tvWNtY87fiFhp5NNPUFpofeEAC4AKkCAJAIdRS5cj5VYDZpfPDgAVIFAMgY FfXs8vFjcocWtCvAl4cJFuUGrj8i/5MTN98mmPr6NKA3BAAuQKoAACRCHUUu k8xV+PLlS6aRAlIFAFCThSyrr9iokV9k5MVkU1+NbugNAYALkCoAAIlQR5Er h1MFiqIkEsnt27eRKgCA3qhIn07MTo15Pff85OqmCinoDQGAG5AqAACJUEeR K+fnKrx580afSAGpAgCoJJ3zKqRY/2DVYPlbmamvJgPoDQGAC5AqAACJUEeR K4dThfj4eD0jhXSpwsePH88BAOeJxWL2bxyS+zPcFQdACMpNuSdhv332oDcE AC5AqgAAJEIdRa4cSxUoSj5r+dGjR4alCps3b9axETwAcAh9S2H97iF7v6ox s6lC/oEnubdDY1roDQGAC5AqABgt8dP9k7vW/Lt4ybL1u88GfeHwpk5mBHUU uXJyrsL379/1jxTUqUJUVNTw4cMHDRq0fPny5+zpoeDl5cVim3PnzmWavXz5 Mltt7tu3j2lzzZo1bLX56NGjHiqHDx9mq9lz584xbS5YsICtNmnbt29nmqU/ Ayw2S18k0yx92Wy1Sb+ZTJsEfVbp/8FWm8xnlb5O+heW3VtHlG9XO0VkYdN2 21cOb6qQgt6QLFT05fFuljzLmgufSU19LQDseo5UAcAIko9nZ7RwEaZ9amJb uuO/t7m8s5N5QB1FrpxJFSiKkkqld+/eNSBV+Pz5M/PbPHHiRBYviWnT1dWV xTa7dOnCNBsYGMhWm7t372banDlzJlttJiQkqO+RR44cYatZPz8/ps1+/fqx 1SaNvrEwzebPn5/FZumLZJqlL5utNuk3k7jPKv0/2GpT/VmlsdWmQvKlkUUV mypYenB+9IfekBxU5LmRZeQLa5AqgBlCqgBgMCri/Fh3a75NkcqN2nT4vZG7 sypd4Odrvf41+otshTqKXDk2V+H9+/dZihSQKjCQKiBVyO2pgiRodhVmU4Xi 466L2Gw5G6A3JAX1/cSQEgLFpxWpApghpAoABqIijg8qXbbbqltfVCVHwusD I6rYMrlC4aFn4k16eeYOdRS5ciZVSEpKunHjBlIFAyBVQKqQy1MF2cd1zZin BA69DsWw2HC2QG9IBurL4X7F7cq6FRMgVQDzhFQBwDDioH9+67nrfbqdocXP ltSzlpciFhVm3Of0rtGkQx1FrpxJFZ4+fZrVSAGpAgOpAlKFXJ4qxBzs6aBo U9hq42fOr2dEb0gC2SffHkWdmq+4sLypFVIFME9IFQAMI414+z5Ks9qQvvmv nqU8Vaj2z2OkCtkIdRS5ciZVoAduSBUMg1QBqULuThVE18YWV8xTp4d+T7k/ 9ENvyH2y0F2dCxVouylEFLa2GVIFMFNIFQBYRf3c1V7I4wnKTrrF9bWYZEMd RS6kCiy2iVQBqQJxn1WupwrS4PnV5Q8H6I588h0xa81mG/SGXCd9t6Wdc6HO Oz/IUmRIFcB8IVUAYJXk0dyqFnxnT++PMlNfinlDHUUupAostolUAakCcZ9V jqcKVPimVoqFjIJioy+TcFI0ekNuk7xe1yq/S899n+VVIVIFMGNIFQDYlBww o3Ke8iNOcfx4azOAOopcSBVYbBOpAlIF4j6rHE8V4o72cZK3xy84+DQRmy6j N+Qy8fMVTZ1cBxz9xlSFSBXAjCFVAGAN9ePypJqlu+x8S8CUSeKhjiIXUgUW 20SqgFSBuM8qt1MF8Y0JisP/+IUICRXQG3KY6MnSBg6lh5+JUD1pQqoAZgyp AgAbZNHPjs7rXNaG/nWyyO8xdPODaExWyF6oo8iFVIHFNpEqIFUg7rPK6VRB +myhh3xTBX6RYWfJCBXQG3JW0oP5dRzKj7ucZmdvpApgxpAqABhJ9vH03109 iljzean49nVm345BsJCNUEeRC6kCi20iVUCqQNxnlcupAhW+ubV8UwX5jssk 7Kkgh96QmxL8/67hUHmyX2zaP0SqAGYMqQIAK6jETwGH/x1Sp6CFssCxKP/X rURTX5UZQx1FLqQKLLaJVAGpAnGfVS6nCrGHezvSbVnXXfqcmDEfekMuirs1 tYpDzb/9E379Y6QKYMaQKpgIJYoKC759dv/m//6eMGrFzYTMvwKIIPly4S+P vMx8hfz9jsVm/hVgGNRR5EKqwGKbSBWQKhD3WeVwqpB0aZQLn8cvPODYT3Im G6I3NIYs5tW59X/1alG7aoWyZSs27DHz4AvjV75QMdcmVnSsu+Bhksa3Q6oA 5gupQg6TPts+rG29isUcrNQdobDJ6g84hDBbJYbd3DVncNt61Sq6lalQu8P4 LQGR2VgvSJ7/W1++vwLPovw0f0n2fZ9cDnUUuZAqsNgmUgWkCsR9VrmbKiRc GOHC59nW//c5SX03ekNDJYYcm9GyWIEag9defRcrSUm8PKa4gMcv3HNfuNYa Ufp0Q58mdSoXsxPw0rNyKlGpVoP2S+8pNuumIna2t9Z4jXY2PQ+TstQGIBNI FXJaUnRknEgU/WxLl8LMOnxLj0XkzLMjjyT82v+6uuUv57nwxLOfIkrC7MNk 33iF9jddFn5wbPN61Us5WWnc+S3silaoUbf55DOZ7sNIRezpYk9/Bb/wiIui bPg3gRzqKHLlQKoglUofPHhw/fr1G1lBvz4gIEAikYjFYicnJz6fnzdvXrop tq4KqQJSBaQKHE4VqKij/QryhdVmBZC1ehG9oSGomID/tSxo4dBg3j3lJlji 6+NdFad/FBl1KaPajfrp91cVS/XnTlC804o733+JoahvW9sIkSpAroNUwUSk zxbWVNyTLNxn3CcpEydK8qudvUpZWbuPPvOVmQ0ifbGkjiIvsOnkE5XRVyY+ XdbcTn3T5+drNOPsB42JbDrJ3q1sRH8bC7ep9/CzzS6oo8iFVIGtBlOQKiBV QKpgWKog+3Zrw5QRYxadCVV105Kni+vY5PGYfTeOravLIegNsy45eEWLfHx+ vrab36lv8LJPxyc2q+hef+DW4EzqPdF5r4LKDboFJUacj9F4gfjzwyuXtLro O66avPq3KDdk2wX6/1++Gvwd05XBTCBVMA3q5x7PvMz9aPx1PM7OFrKP+3oX t+DZePzzQN0/UNF+C9tXrVDDc8mtqIxnHEgeza2q3HeR79Rh56cs3fSpH9t/ F/J49t33Rxt48ZAp1FHkQqrAVoMpSBWQKiBVMChViDs+oIB8XGhR+e+Hilgh 4cHihvlcu+16S96zAPSGWRV/d1YNGx5PWHthsNiAL08zFSHLTwaxrwKYMaQK phF/cqCiP+MXGnoGOzVmB8mrda2c+DxB6bFXDHrskHRmcAEmieYXHHgyi01I 7s+oYMF37nOYoO2eiIM6ilxIFdhqMAWpAlIFpAoGpQoJZ4YU4vP4zp13hUll 0c8OTmlSpsbIA2+JfMqD3jBrxI8X1pbveuDQ2ee7QUVa0rlhhZgC0cJtyr2s 5RJIFcCMIVUwCfGNCSUUm7049jyIp9nZQBa2o0M++p5vVWfpS4Nu25Kg2VWY qQpZP8mBij43ooSFXaNlz8h75EEQ1FHkQqrAVoMpSBWQKiBVMChVSJF9u7ak R/UiBUtWqVmrUefxa66EEru6Hb1hVshCt/7uSNeHfOd+Rw0rwMV3J5dl9msU uI67lsUgCqkCmDGkCqYgeTSHGbLmab/jG55ms476eXpocfkt36bF+jCD1qsp N0aQs+/qq3XGgeTN7qENqlRv3n/+kecxaV6Q8Gxzl+LWJXrtfodMIVuhjiIX UgW2GkxBqoBUAamCYamCGUFvqD91fcgvNOS0YRtoSJ/Mq87s1cgvOPh0Vqcb I1UAM4ZUwQRk71c1VgxZhc3WhmKTFtYl3f+7quL9zdN2q/bTgTJDfd3a1oYp U2zabPmirQ0qcnfnvMpSxrKgR8+J85Zv2LR63ug25Zxcmk07GWrIUj3ICtRR 5EKqwFaDKUgVkCogVUCqgN5QT9TPS+PKKxIBfpFhZw1bfyx7u6Kh8qmTQ/f9 Ge77rfXLkSqA+UKqkPOoH7s65lEMRmsveYF7CtuSghbVV7y9vDzttn81bCZI 1P7uDkyfYdVwxVsdwY/43fEZnrVLO+e14vP4lrZOLhXqtRs8c9PFkDhMP8kJ qKPIxeVUwT/AH6kCUgWkCkgVCILeMFOUOCHi3R2fCfXyKTfMKuJ1zrBQgfqy pY3yqZNt220GFpkA5gmpQs6LP94/v2Ln4YozAzFJnjWUJCnq48Ojc9u6KI9u yNt+h4H3+4TTg5VnBllWnx+M4IebUEeRi7OpAj3Wu3PnjkQiEYlETKpQoEAB +mrZuiqkCkgVkCogVWAdesMMSR//U82Cp536CBB9UT99u9ozX2vVeNV7TDcG SAOpQrYShd/1nj2gZZVijjbWdkWqtPvL93l88vXxrvI1XYKSf/gpN3mhkr6/ uHl829LJQzrWL1957IVEHc1JXq1sWrT/8fQ7CiU+WNmhjIN9sSaTTn/OnXc4 +Sk/1jr6DH6hoWd1vaHaia6Nc1VuxFNuyl0sZeAo1FHk4n6qkJiY6OjoyFco Xry4kYPrR48eDVdQ35aY/xsWFmbMP3DMmDFp26xZsyb9f0+cOGHMpW7atIlu xMbGJt2lPnnyxOA279+/T7egHlAzQ3X6T3bu3GlwmyKRaNSoUXQj9Kco7aVO mDCBoox6ekjfUtK+q+p3ICQkxOA2r127lu4DQF82/X8PHTpkzKXSbyDdCP1m pr3UbPqsbtmyxeA2NT+rTLNjx441ZiIQfUlaP6v0P8HgNgmF3jBDsi+Bp48f k/OdVI8pFYV1Ju6R/8HxUwGfs/YRjD85yFn51Knmgqd46gSQFlKF7CL9emNZ T3c7ywK1hq0+GxT6M+br40NTGhYo1GpErwoWisHuMPlgVxa2b1TjKmWKOlnz lf2iPG3QOpKVhW5rn48vbL053Tp/SdDsykwMa1F+mn+unP1ART27zPQZhxa0 Yw6EtCg3cP0R+Z+cuPk2a9PcFMdCMoGEy+jLxG4KbfZQR5GLs6nCzZs37969 K5FI4uPjmVRBIBDQ//Xy8jLmYiIjIy0s0j8rc3Z2NnJtRevWrXka6H+yMW1u 2LBBs01bW9u4OMP2NZOLiIiwtLTUbNbHx8eYS9X6z/f09DSmTdry5cs1m7W3 t09ONrwzePv2rWabtLNnzxpzqd7e3pptZsdnNZt+WEbOWND6z6cv/ufPn8Y0 SyL0hvoR3/qztOKRkeHTUJOvji3OPHXKtQU3gG5IFbIDFXHrf+2KW/Gs3Qbt f5cmIZB93PSbaoc/x16HYtJ8iSw6cGlzJ8V42Kr+f280pxxQ3w72KcKX3wzn PUl3MxS/3NatpJAn347W6zyRhy2zRhayrL5iFx1+kZEXDasBpc8XeSh3980/ 4LjhlTRkM9RR5OJyqnDv3j2JREIPotVzFWhGjv5StI2qjBz90TZu3JiuTeOT ivDwcM2RmvGLCzp37sz66E/roNLIwS/t8+fP9E88XbN9+/Y1stmGDRuma9PI pCJFRwKQHZ9VI2OlFG2fVZ7RC2FiY2PTTlRg/Pbbb8a0SSj0hnqRvlxah9mp 0WXMFcNqZUnAtPLMr5yg2JireOoE8CukCqyTfT3/Z007+pZTtJvPh3RBpjR4 fg1mxJqnw87v6aZpJl0bV0IRgTr2O5b+6ToVdX5kKcVf8ouO1nI3pH4cHeAi sKyz9GWuno9FRfp0YnZqzOu5R+t5kJmSha5pKmTKE7sueyKxEQ9noY4iF2dT BT8/P39/f5FIFBMT4+DgoE4VjBz9pWgbVRk/+tNMAIxPKmgNGjRI1+y5c+eM bPPQoUOsj/40B5VsPafWHFYfPnzYyDY1PwDGJxWal2p8UpFNl6r5WXV0dExK SjKy2T59+qRrdtOmTUa2SSL0hvqgvu9ox9ww7LrtizaoCenThTWVT50KDDwZ z/IFAhAPqQLL4gPm17ej31LLcqPORWgMSSUP/66kiDmFzdeFacxHiD/SW3Hy gGWtxenOhki4NaVyPgc7xfMTm677tDwzkJ+fa1NjQS7fWjDpnFchZr5Hg+W6 jm7IGPVtR3sml+BZt970GaECd6GOIhcpqYK8duTzra2tjb+edKMqOzs740d/ KRoJwJkzZ4xv87///kvbZqFChSQSYyf60uNH5v1Uo4euxl9qukElPcQ2vs0U jVkQ9AcgPt7YAYTmMhAjN1VgpFuxQr8hxrepmQAYn4ClaHxWhw8fbnyb9Ac+ 3aV++fLF+GaJg95QHwmnBjELZA3eZVH2YXUT5VMn+66+hj25AjBnSBXYREWc 9iotTw0s3CZcjdXygpgD3eWRA0/7pALJozlVFFsuFB55Ke10BNGj+XVK99u8 pI2QuR+u1LwfSp8vrl2ws3d47r7JSe7PcFeENoJyU+4ZVgbHHOzpyPQZVvWX heTOvS8JgTqKXKSkCsxEBbbGqmlHVayM/mjLli1Tt8lWUhESEpJ2mMbWyQJe Xl5pm6WHrsa3SY9207bJSlJBi4uLs7W1VTfbuXNnVpr19PRUt2ltbW3kmgJG ugSAlaQi5dfPasGCBY2PlVJ+/azS6F8349ukL8zZ2VndZsOGDY1vk0ToDfUg vjulnGLGr0WF6QEGfaCpb9t/V94XbNps+ZK7620AbZAqsIf6eW6EYpUCv3C/ I5rzFGgJ54YVUZwpWenvB1ruaVTEjt8VwYHw9x2pXy95tap5iY7bwxJPD3JS 3BDLT0t/Q6R+nhhcymPuw9y9p0KK7P2qxsymCvkHnjTsIOLEs8OYyQ48i6pz H2MjHi5DHUUujqcKYrE4JiZGva/C+vXrWbmktKMqtkZ/abcBZCupoFWrVk3d LFsHVtI/C9ZHf+kGlawkFYy+ffuqm/X29malzcOHD7OeVKSkSQDYSipSfv2s /vHHH6y0mfaz6urqKpOxk9pPmDBB3ezy5ctZaZM46A0zl7rrlvOQM1k7F0wl +kAP5YQrq4YrDJsOC2DekCqwJjlgZmXF/EZh7cXPtC1EoH4e6VtQPmQVlJp4 U2sAILo4orD8BWmmMsjCdnR0bbL8pSRF4q/cJCbf4NO/Po9KuDOtmvu4yzFa WsxVony72jEpctttXw1KkUV+f5RUnilZ9q87OFOS01BHkYuzqcK1a9f8/f3T nixJj9SMOf8xLfWoisXRH6169ersJhW0efPmMW3SPyMjD2pUo0eRxYsXZ330 px5UsvucWj0LwsLCIjIykpU20y4DYSupSEmTALCYVKRNAO7fv89Ws+rP6owZ M9hqMyAgQH2p7969Y6tZsqA3zBQVodp1y6b9jh8G3dMSzgwpqDxTUnPXdABI QarAGurH/h75Ffcbu3bbtU6Mkr5Z2Vgxd4pf2Ouc9qBU8vBvxRmRgnJT7iqG tNT3w/1K1px9X76lkfpJ/C8zGVJSkh/Oq1tx+BnsK5h8aWRRxU/A0mOh1lgn U5IHsyoqz5QsOvKisftIQfZCHUUuzqYKV69epQcpEomE/vIqVarQF9mqVStW pn8zmFEVi6M/2vz581lPKoKDg5lhGv1bxlabtOnTp7M++lMPKtl9Tq2eBcHW +hcGswyExaQiJU0CwGJSkaL6rJYvX56tWClF9VmlPXv2jK026ctzc3Oj26xR owZbbRIHvWGmks4pJ6Ja1l5i2K7mouvjSyifOqlKdAD4FVIFdsg+bmzFLLfK 22FX+sMd5KgfR/ozY16eU5/D2vZckLcSurqJPDjgFxh2TkR/TfTF0eUqjFft 0BC/v5viW1jWWvxcfU9MejC/ftUxF7FrTIokaHYVZlOF4uOuG7QWRPpKeeoQ j5+v31GcKclxqKPIxdlUgX59wH15qkAPVWbPns3n89euXctiqsCMqtgd/T19 +pT1pIL+55crV471h7/MpbI7+lMPKll/Ts3MgmBrrwYGswyE3aQiRZEAsJtU pKg+qwsWLGCxTeYDULNmTRbbTMmeSyULesPMpO66VerPmwYlApLAme7Kp04u oy9nuoENFXFhyX9XolGaQ+6CVIEVqXu4WDXUdvgAFXVxTDkrJlTI29Fb5+yr uL2e1ooZWt0OJMgXNlQpNfCYel6C6OoYF8UCihITbihvinG3p9eu/ue1GNy4 UmQf1zVj9uZ16HXIoMUgso/rmyt3983b2Ufrxhi/SLy/YcHhUCytMxXUUeTi bKpA8/f3Z/Y8DAwMdHBw+PTpE4vPaulRFeujP2ZYzW5SQZs2bVp2FAb0+Jf1 0R89qMyO59TMLAgW92pIUSwDcXV1ZTepSFG8A6wnFUwCwG5Ww3xWWb9pM7M1 WJz/QBz0hplIs+vWgBMGnecifbGktvKpU/7+xzN96hTv92eVpth7AXIdpAqs EF0YzsytUs4y+BUVeX5Mg6bNKiuGrNYt1n/UeaNJPjVQcQKBsM3Wj0EL67p0 2pnmtdLgBTUUN7U8PQ/JV1BQP86OrFJ75h08VJeLOdiTWbAqbLXRoAMhqR/e HVVnSrbc8CmzzkDy/N/GVSdj7wXTQR1FLs6mCvTr7927JxaLJRIJ/d9JkybR /2XxquhR1bhx41hskDF79mx2kwqav7//5s2b2W2Ttnz5ctZHf/Sgkt2VGgz6 hzVs2DDWm501axa7SUWKIgFgPakg6J9Poy+VxfSPOOgNM6Hedcu23Q5ts4kz JQtdq3xuxbPz3JPZiuPkh/NqOTReiVABch2kCmygvm9rK1Qtt0p/pKHs474+ dfuuX9I+r2L5Qt3/vdK9pEt8dWwxgWKRw/DxTYs2XfkqbVvUt63KsyWbr/so k7zd3tn9tzUvcvm5Dyqia2OLK1a8WdZc+NSgNXOxR/o4MX2GZb1/X2fShOzD lt8LuCFUMCXUUeTibKpw7dq1hw8fJiUlxcbG9u7du2nTpp06derSpUsF9ri5 ubHYWva1Wb58eVIulaxmc/mlZvc/f/z48dl3V+Es9IYZS740UnH+Gs+q0Yp3 hgz1qS9b2yrPlBS2WJ/JU6fkR4vr57VuvNKg7wRANKQKbKC+bflNqFpvdSXt OJ+KvTevWb2Jl976dlc8SbeoODNQnhSIXnlPX35bY5aBJGA6c84Dn29TY+6D dCu3kk8yMxksKs+6fn1mnQr9Dn7GTYshDZ5fXTGPQ1DWwKF+wpkhqjMlK87S du5n2u8WurOTsyX26zEt1FHk4myqoD5ZMjo6ukaNGuXKlStbtiz9314AwHnO zs5dunTJvrsKZ6E3zJAkaLZiI3SDnzpRn7e0UU5lzaxATHq1u185IU/YeBVC BciFsjtVYOtIYo5LPjvUWTkkrTD5juqAB1nEzQUt3X9bHZycdG6Y4kAafoEh Z5JSpJ+OeXk0W/QgQaMd9SIHC7c/rmlmDvemuinujHlLli7pMc0P+8CoUOGb Wik2pBAU02MXHW3iTqtCBX6BwaczOv5BGn72Tw97+ic05R5CBVNCHUUujqcK IpGI/vKHDx/SLdD/NzAw8DUAcF6tWrWQKkB6sjDl6gXVY72skgQvrGXFU85l rblAVzCR9Mlv44g6BeSzZoVNVr/PFYMfgF9lR6pA12OHDx/29PRkDmYqUKBA v379Pnz4wOK34Boq8kDPfHzlPadY25k7T50/uuGvNqUKNZhzK4pKkb76X11L ZsTabtGeZb0qVxpwIFTbfUn5QkGxQSe07BYoe7eiIbPfTOFO296wti25GYg7 yqxe4BccfNqQjXhkn7e3Vx4jrggmdKQK4h8P905pVVzePVmUn+qPUMGkUEeR i7Opws2bN+/evcucAfHu3TtTD5IAIAuQKpj6Qjgp5kAPe/3moWoj+nRhWj0H ZX2v2FehoucfcxYtUVq8cN7saRO8erWtU8rBQvUSYdPVHxAqQG7EeqpAl2Tu 7u5CobB///4HDhzw8fGpW7cu/S0cHBxevXrF1nfhHtHT5U0d09x36NtKqa5r H8YqsgFp8HxmCoKcTfnB+9/rGJDKPqxqbMUv4OmtfdlWnG8XGx4vj8d0vyhM U0hDfGOC4hhhfiFDQgVZpP+KdkUEaX5yJVuNnLlA1WcsWTR/7ow/R/bv2KhC AaHqJRblpyFUMDHUUeRCqgAArEOqYOoL4SLRldGK49MsKs8OykKoIHm0pmeT ejXKOlvzssq66RqECpA7sZgq0GUYfWfj8/lVq1Z98+aN+s8TEhJcXFzo71K7 dm1z3qSX+um/bmjDkvZCoWPJej1n+T5Os0BB8nJr93L2tvnLtx639X4Gu8dS 4Rtb52+2WtdegfTNsWS5gQfDDNqN0HxJny30kIc2/CLDzmYhVJCF+Y5q3sDD vUgeQSZdhAaLCtMDECqYGOoociFVAADWIVUw9YVwkOTRnCrySQTCBssy24Yb AIzEVqogk8lGjhxJN1W6dOmIiIh0f+vl5cWMxvz9/Y38RgDpUOGbW8vDZEHZ SbcM2lMBiIQ6ilxIFQCAdUgVTH0h3CMLXdPUisfjO3X2+WK+TzUBOIKtVGHS pEl0O7a2tk+fPtX82/Xr1zOpwpIlS4z8RgDpxB7uLT8aw7ru0ucIonMR1FHk QqoAAKxDqmDqC+EcKsKnU14ez8J96j08dALIdqykCt7/Z++uw9rI1jCAE8Wl AjVqtKVKlXoX6tRdqLttd+u+t33qLrt1d9u6bt2oUOpuUKhTKBS3JDO9k8wk SBIIYSID7++Pfe6FYTIN4Zwz75zznV276NBgxYoVGg/YvHkzfcCQIUNy8kIA apIujSjKs+AV6nv8J4LovATjKO5CqgAALAoMDHz79u3EiRORKkAaZNjOdnYW vAKd937D+BDA8HKeKjx48EAsllexc3Nzk0g0LzZfuHAhnSo0b95c7xcC0CDh wrCiPAvrektfYVOMvAXjKO5CqgAALEKqgN5QA+LjuibWPIdm64IwkRXAGHKY KlCjLw8PDzox2L59u7bDBg8eTB/Ttm1bfa8UQB0Zday3M09cdca9RFNfChgZ xlHcZc6pwt27d6l+jfrxkJCQQCVT3zMBQNawAsLUF2JKKSH/Lf1z6Ng1t34o pyXEXx3tJizQcv1bPHMCMI4cpgqrVq2i4wIXF5fkZK2rlqimnj6sT58++l4p 5HlE2K31k4aNWnD2o7KLkL5YWNvKpub//ONMemFgChhHcZfZpgp+fn53795N SUmRSCTBwcFIFQA4BKmCqS/EdIhP65tZy28zxE03KFY7kJEX/6joWOn3s2FY +wBgLDlJFb59+2ZnZ0fHBXPmzNF2WGxsLJ/P7N03bty4HFws5GlxJ/oWoDcd /uuRIlZIeLiwQb7iXXa+Rw6dF2EcxV1mmypQAgICJArv37839U0SAGQDUoVs /ZQs7vOTywfXzvnDt3kNt8bay13HXR9b0WPGwwwDLTL8/MR6heycyrVfHhBj +ht38usWHxv5XmAjLvwkJWH3tgyu4eY143IYYeoLA8hLcpIqTJw4kc4KxGJx WFiYtsMuXLhgobRv374cXCzkaQlnB7rwLHgFO+z8JCOiXx6a9Jtb9eH/vk8x 9XWBaSBV4C5zThXu3r0rkUgSEhK2bNmyTqkoAJg9aiyKVEEn0kerOtWuUNLF TqgcnYsarQrReAee9GBmdTGv4OBzGcZayaf6OtI/atVswxczuHmXBB+f7FPe uVCZqjVrN+4xdUdAOIopABiZ3qlCdHS0aqJC3759MzlyypQpqlTh/fv3ObhY yNuIsGuLulUr7FyySo1aDTv8sfrKR+wUlIchVeAus00V6LoKycnJVAfn6Oio 6rnGAgAXZFLgKxfTuzeUfDs3upJI0cjZdz+sYSmp9NXyhrbyrbvb7opK/x0y 5tbcRgXk85CFNRe8xA08AOQgVVi6dKlqxOXn55fJke7u7vRhzs7OJGn6eVIA kAsgVeAus00Vbt265e/vT9dVePr06Uslw10nAEAO5aA3JMN3tZPHBhaCitMf ZFxNSoRs9nGSLzy1ENZZ8lY9OZAE/t3YhmfX5UC01vNLHyxsWtFdT+XrTr+h eWc5ADBH+qUKBEEUL16czgocHBxOnDhxUott27apwof+/ftnfloy8tDgKvq2 Pu6Ve27/ZAaTsMwfGnnIDZAqcJfZpgo3FHUVpFIp1cdRZzDc5QEAsCUnvSHx fkUDxWwFq077Y9N9hww92KO4o72l/Jv80uNuaRj6JZ0d6OzYYXcmBRElN8eW 5FvoiZd/4FkscgXgDv1ShStXrujRPpw8eTLz05JhW1qK9W19LET1lgchVdAB GnnIDZAqcJfZpgq3bt26fft2SkoKIgUA4Ioc9YbJp/s7yUd3Qs9Fb9I0e+TP s0PKVpu8YUIlgfy7dr2OJ6n9aNyFYSXL/nEtIbPTEykJ8XF6io9PRkMMwCH6 pQrDhg1T3WY+f/5c22HUwKxYsWL0Yfnz56eGalmdWJqkd+sTF58owfIKnaCR h1wAqQJ3mW2qQPH395dIJASBiBoAuCFHvaH08f+qyIMDXpERl1MH6fF+4yu5 j7oU9XldY8VMBnGzjd8yDLGJ92uaFG+3/bMJ28rXr19fy42onis0NNR07yuA nvRIFUiSLFy4MJ0VlCxZMpNSCefPn1eFDxMnTmTjenOC5ZtpamBM/eGbuu3R 4M2bNyZ5fxmy5Hj93+aElPT9E3VrcOfOHVO/oyzLJIgD3SFV4C5zThXu+N+R SrFZLQBwRo56QzJ8q49ilrBV5wPxzNeSH86uVar3kXDyV+KRHnTZhaqzn6Zr F8mwQ75ujZa+NN2S2KCgIB6Pp+/EW3NXvHhxk72zAPrSI1UICQlRfeyHDRuW yZGdO3emDxOJRF+/fs3xxeaMxH9SWb0n/lvY9zmZYcMBDw+PHDYaBkI1sx8+ fDDNm0x1Rsd72el96YJykwPS9VvLly9n8Z0xH48ePTLVLyjXQKrAXUgVAIBd VF+QX2HXrl2mvhZjy1lvmHyyr4N8XCJqso7eIVL6ZqWXa5utH+X/R+I3RrFk llc47UyGX2TEmcEV6s57ZMqNuBITE319fb1yI29v79mzZ5vwvQXQjx6pwvHj x1U3RwcPHtR2WHBwsCpFHDJkCBsXmzPSR/MbFtd3G+Ri5f+4kGH9xrJly6g/ fFO3PRr07t07OdlkTX3K+dHuxfR9m4v/tuBxuvH8gwcPWrRoYep3lGVdu3aN jtZeMhl0g1SBu5AqAAC76B6BsmnTJlNfi7HlrDeU3BpXSrFDZPV5L2S/fhEf trRxbbT8Nd0Kyt4sri2Uv61Wnfardp4kI84Mqfzb4mcosgUAaemRKsyaNUuV Knz//l3bYePHj6ePEYvFQUFBbFwsAAADqQJ3IVUAAHYhVdC3N5S9WlhLHhzw y0y4IyG//9uzRPW/7ilLM5I/d7ZVrI8QNVwZTK9QJb4d7l2xyarXOq19kD79 p2ujBnpq2HqhPzYdA+AOPVKF3r1700136dKltR0TGxtrb29PHzZv3jwdz0xG nRrvrW/r08BrxIEvKLClAzTykBsgVeAupAoAwC6kCvr2hsTntd7yiow8l6Hn v58b6lZu9JU0W0ymnBtUQD7tWLlAVRq4qU35NpsCdWwksekYQB6iR6rQrl07 +u+9c+fO2o6ZN28efUzFihV12PqBgZ0ljQKNPOQGSBW4C6kCALALqYLevWHU rraW8nfOqvWfIyuV6HPsR9oa7NKHMyoq9pZ06n86+Vfc3Zn1Kg04Hqr7jmsJ oW9fPNfTi9df4rC3GwB36JEqdOzYkW66x48fr/GA0NBQeqKCjY3N48ePs3E1 sp8fXurb+jx/ERyBh+g6QSMPuQBSBe5CqgAA7EKqoHdvmHy0pw392IhfoO22 T+kfzxGf1njTe0v6bH5yqG+FWtNuxWo5DwDkcXqkCqqCCTNmzFD/LkmSPXr0 oA84ceIEe1cKAJAKqQJ3IVUAAHYhVdC7N1QucrCw/W3lG7XGL+Fwd0XmwHcu Vbpkq/VvMFsVALTQI1XYvXs33XRPmjRJ/bv//PMP/d2///6bvcsEAEgHqQJ3 IVUAAHYhVdA/VbgysgjPwkJcbeYDDduHSW78WVyxaFZcYdS5cMxVBQCt9EgV IiMjLS3la7Dq169PkulamNOnTwsEAh6Pt2HDBravFAAgFVIF7kKqAADsQqqg d28ouTm2FF9Q9s+rGpc2yF7Lt4jgObda/9pkW5YDACfokSpQFixYoJqQQBDy NVjUKHHatGk8Hq948eJXr141zMUCADCQKnAXUgUAYBdSBb17Q2nAlAol+h2P 0DwPgYzc0aZg7Rl+UZimAACZ0y9VoAZsAwYMoBvwEiVKNGjQQCwW29vbT548 OSYmxkCXCgCgglSBu5AqAAC7kCqgNwQA09IvVaA9fvyYasqGDx8+ZcqU48eP I08AAKPBOIq7kCoAALuQKqA3BADTykmqAABgKhhHcRdSBQBgF1IF9IYAYFpI FUxPEvP55Z3z/25ZPnPs8CVXorF0DUAHGEdxlxFSBYqfn9/17Hv8+LFBrwoA DAGpAnpDddLo4ICz+zatXrZo4ZJV63ce93v9AyUnAQwGqYLJyAL3jmpdv7Kr o4hnwRB6LnotM/V1cZ80KtD/3OE9m1cvnT9n4VG8o7kUxlHchVQBANiFVAG9 YVpk1IOtvzcuYWXBsy7i4dWmU+f2zeu4OQktRC6efZdfC9VlPprs3faBTepW KWbHt8geQdXZT9O+ABl6+I8m9aqVzidSO9TS2d3Te+TBL4Sh3gcAY0KqYDrJ MZGxKZLYd3t60XsBWwgqTn+Ambf6Swi5snFS94ZlnIR8u5L1Og2ftnTTgbNP f2Qy+YOMODWxeYPqpameJnt4hYZeSEr32tdmt25Yy93ZUu1QkVPpGo16rH2G 3yzLMI7iLqQKAMAupAroDVUkwQcGlLe2sLDzGLz9UWTqo6X4oOMT6+fjWQiL tln9JEHHkxFhpwaVVAYLPOcm41asUlq5YtniBXP+mjR6QMd6JWyUTwj5rqOv pWg6U9yjefWsU8eRLs0X3AiVsPHvBTATSBVMjghe1VCRX/JLjvHT2BBBlpKC Tkz3KUnd0vPsKnRffDYwNnvrSOICZlRXZchWNQcvTdNnLF+yaO7MKWOGdG9c zlEVWNt12R+l6UQp77d2KKiae8Kz9xx74n0iK/9CyAjjKO5CqgAA7EKqgN6Q kXhvZk3q5p1fvO/RULWxIBl2tHdRaiwncBt5QdfNMqN3t2OeGPHy9z4ep/kg ybfrC32KyEeJTr5HYzUfIw2YXE6gPFOXfWFY8Qy5DFIFk4s71jsfHVsO/g83 oHpICTn2Z20n6lae51BrzPEQvdbMpVwaXogJAyybrPuseS4aEfVoU69y8r5F 7L3mk5ZjPv7zmzKfsKy/7C2WXxgMxlHchVQBANiFVAG9oQLxaVMLO+rtENZb FqhxnCa9P62C/NZeXHfJG52GaLLXizyZCa12nfZGZhIFxFwYXpJv1XKzephB SzzR25EJFYoOu6DrZAkAzkCqYGrJl0cWVdzPOvY4jK05sy3u0T9ti8n7B36h lsvv6Vvqkvy5q50V3dQL6y59l0k/k/Jkdg2R0GPWUy0LGqR3J5VlZjTYtd2B INqAMI7iLqQKAMAupAroDeXI0E3N5Q9/eAUHn9My+zfxcHcb+SdF3GzjN10G adEHOtsxU1lbbM78J5JO9CmgvUCa9MH0ivRUBV6RYRfwGBFyH6QKJia9N7W8 opGxabsjHPeg2ZP4bLWPi+Ie3r7BvHtaZqXpIuX6H8raFtoDA5o0YHL5klrW zP36RXxZ10RM9z62bXfiF2pIGEdxl3FShRcvXiBVAMgjkCqgN5ST3JlQRjGc s+m4V+NC1V+/kk/1c9ThIZJS0oVhhem5rKKGq4IzL6uYfLJ/9Qm3tdRKIIJW 1KfnsvIK9DsZn/UrA3ANUgXTkr1bWkcxsUrceK2WOfWgGRF6rF9JAb12pNOu jzlZaiB9OrsqnR/zy0z0z7x2jjRgap0+2tbM/Yo60MWeWf7QfONXhAqGhHEU dxknVUhKStJjugJSBQAuQqqA3lBOem+qOz0yzNf1gMZq3eTX9U3FisoG/U7p sAhBcnu8G/3USVhj/ssshpop7y5fDtTy1In8tqmFlXIhxb6fGCBCLoRUwaTI 0M0tFY2MsPZi3dZ3AU0WuKFlfh6d+XbYlbNNeVLzY36xkVeyqMtAfLl94Ym2 Ej8JpwcwtRq1rugDtmAcxV3GSRUoISEhSBUA8gKkCugN5cif+zox6xWEFcZe j1Ev1/hjT0cH+Xiv5KjLOswXkD6ZWYV+6iQoP+1+DjbzIn/u74ynTpDLIVUw qZjDPRTzsASV/nqInQd1R3zY2obOFCwsay96mbO3LjU/5hXsdyonk9JSro1W LqSo8r/H+IUaFsZR3GWcVIEkSZlM5u/vj1QBINdDqoDeUIH8caBrPqb6Nr9Y x82v0u0C/ivh7vSqYuo7RXv++1WHRz9E4LJ6zFOnEn/eUJ+FkHznf53+l8UU V1r8qf7Kp051lwXiMSLkSkgVTCn54vAi8kaGX2rsTewpqbuY/wYXo+/eefm7 /xuRs8iX/LlPWYjHoetB9WV4ssA13Uae0KWQprKwMP0LxSbEBoZxFHcZba4C JTw8HKkCQK6HVAG9ISPlyfza1hYMvrP37Os/mPyACD05uIzQgu/SbOl9nTYg J79ubE5vKqlxmzbiw+bWbv1O6PI0KuXa767MU6fKeOoEuRVSBSORhD3YP2dg i6rFnazEti6VWvy542ms5N4UxfIvXqEh55SNlSQq5PG1Ezv/mTt+cNdmnuUK lWy38W2G+9OkoBMz2lUsYG3jXL3frozfzAOIwFWNrJU59PCLOd2bJ/5kvwJ0 fmzdepvapg3kzzODyrZYr8sSC9mrhbWETO8zCJuEGhzGUdxltFSBJOV/0U+e PEGqAJC7IVVAb6giebelfWG+MliwsC7ff8/bJOLHlUk17fgO1UccfJeU9Tnk yMi9HZmnTk49j2R4ukTGPljcOJ9dhz26PNpSVWa34Jcc44fHiJBLIVUwPCLC f03fqo4Cx6p9l596GBIZG/7y5F+NXfI3Gta7quIu1Mn3iLL6n+zN3vED+/l2 aurhwmwlYGHbaMVrVaxJRlz7X0Nm7r9iov3MJ3kt8pQ+nFFJwIQKriMvJxEx b/5bM7lvi+qlXRysxDYFSlRrOWThsddxOs5gSL4yipn3IPZa/TFDeJAcuLOb q2WdJW91mKxGfFzjzfzOHLr9G539fxhkD8ZR3GXMuQqU+Ph4pAoAuRtSBfSG acU/WtnCJTVY4Bes2aCiU+FGEw6/y8Yzn7gTfZSLbRsvf/Lps9yn4LdP75zf v2pcW3c7eaX1dZ91euq0oCaeOkHuh1TBsMjo+/90Lm1pISrVY+fbNHUAybA9 HR2VsUG7XRrq1MY/+dvHmS5HWHTYBfqBfKz/rDr2dm6Nu3ZpWtnZksez95hw KTqPlXyRPpzB7PdrwXNqNW1J/+r5BKJ8pavWrO5exE6g6kGs3LpvfqFDyy29 O7kcU4in8qQrH+g+IyTw+b3LR9bP8K2en28hqDj9gQ7JDRm+s60NE4u32vo9 j/1WTAHjKO4ycqpACQwMRKoAkIshVUBvmEHCyy3dSolVw0JqzFh34tnP2XgS l3xpRFGeRWaEnote6/TUabUXnjpBHoBUwYDIiOsz6jnyLHgF22x6l2HCE/Fe ue+AZRMtSScR9I+XYqY/r/CQ84nU2c4OcXNtu/Yps4JLkpAgyXv3rkTQcqZy jiJ9dqrWe/GpV1F0o07Gv/9vTovCymiBX7jjjvdZNPey5/OqCzPtM/iuo6/p Mlkt5khPJ/onst7RGNiAcRR3GTlVIElSKpXevn0bqQJAboVUAb2hGjLyv6Gl BWmHdELXtqvuq28MoZHEf2IZphRCmX7rT56WO3Xy2KG9m5eO8SklL/ItKD/1 nk5PnXa0YZ46WflswVMnyL2QKhhM0tPl3k48qtUp0e9YqFojInu9yFNxOyvU Pr+eDN1Mb07AL/Hn9W9nBpevMfmmjo1hrhV/tCezNQ/VzA859U2tPU96PL+u jTKYdvTZ9CGzG3wieFVDOqPgFWiz8Liizzh98viR/dtWTe1WxYEn/7pu20Ik nR9aiKnuW23OM1T3NQKMo7jL+HMVKKGhoUgVAHIrpAroDdNLDjwwpIp9wSYL z51f7FM0NVvgOXhOuhiW9bMf2bM51einTvwSf1zP8HRJFryumR2/2KisNiNX UG73ZmEharDyPZ46Qe6FVMEwyOgrY8qLFI3RkLM/NSQBiaf7K1ZrZVoMVvZ2 SW1FmyYoWb9+uXrzHulYYCb3kr1bWkc5t8Cy/W6N88iS702tqJqvUHbiHe0z DcjvW3zoPSUt7LscyLD9AxlxrE8Rvl3HvZE6BDmSW+NK05E2v8yEO3mvgqYp YBzFXcZPFUiFhw8fIlUAyJWQKqA3TCP+0SqfwgJxxTFXFCPwlJAjw6ooHzhR bKtPvJrF2I54v7IB89Sp4IAzanXBZa8W1HLpcyJOh2tJPDdE+dSpKp46Qa6G VMEgYm+MKy+/+eXl77j7m6aGK/nGnyXld6H80uNuZXIPmrrqX1x1xj0UePkl 8Z9Ulim/wys0/KLmwID4uKaxpXJCg3sm89OiDnRlJj5YtdysNp+E/LmzjUNT nbZ/kD6ZWYX+PfEKD7uY57Mf48A4irtMMleBEhsbi1QBIFdCqoDeUEkSuK1D YT41/hvnlzrXlPxxbbp8TbJyxoJLp92fMhnekd+YycKanjpRpA9meHbercv2 D5Kb40oxT53c8NQJcjekCgYgfb7AU3FXK6g844HGFiTu3FDFxgPUPeiFTO9B k84NdlE0gnZdDqDAC9U6+40pyaQKggpaqygSIX83UhZfEPtsDdfS7CecHlCQ 7mFE9VcEqfUuxJd1LRsufqNLIZ7AZfWYGRROvkdjs/4BYAHGUdxlqlSB8ubN G6QKALkPUgX0hjTpq+UNban3w6bFpgxPhciomzNTgwVekf4no7SlAuTP/Z2V T51aqD91+vUr+ujwPtt02f5B+vh/lVVPnTIf8QNwHVIF9kWf6k9PdrLyXqNx VT/xcWMLRWvFy9cri3tQ8ueeDnTFxqKjrmCH21/S+9OYLX8thDXmv9B2xy+5 M8GNCR+EtRa+0nxYyrXRxZlCPB6znqoHFJJbf3Vd+EiXQjxfNzZn5kbYtN2p LcMAlmEcxV0mTBVSUlJu3ryJVCFvkAVuH+BVp0pxh3T12uiewcG1Ys16LWZf xyg/l0CqgN5Qjvx5xFfxvMiyxSYNYQAZdna4u/Kpk02rrRoOUYg/1a9AJk+d dCd7t7Su8qlTzyN46gS5G1IFtpHhuzvQAadl0/Wackwy+tww5nm7bfsspk+R 0eeHlaCPRRFAOeLTGm+mPxBU/kvrLT/5fVMLZhcfoecizdMNpPemMgEF3238 7RxMSiMj93ayYyZGeK3+iEI8RoJxFHeZMFWgfP78GalCnkLG3vufp3JVnHz1 XMuF179hInIug1QBvaFc9EF6Zaug3OQAzUPExPv/q84MEB37nNQcKyZfHVUs s6dO6ohPJxZtfaT28I/8uqGZ8qlTmx146gS5HFIFtkUd6EKHCsLq855ruJ2N uzmxspinjB0yX7SfdG9GzYoN6xdVtG3iZhs1lmjIW1IujyhCv3u8AgPPai2+ m3ioK7MgzrLtTo0leWQvF9QUMkPMoed1eVxF/ry26u+r6vPl4k/2ZSJtYc0F WuZFAPswjuIuE6YKdNnGe/fuIVXISyR+Y0ooK/IU7nNMl8XQwDFIFdAb/pJX uZrloXheJKy79J22/dV+HuqRTzFqE7fYrHGfR2nAFHfmqVPp8ZkVP1Od8sex PmXb7whTq88Vubdj6lOnTPckA8gFkCqwLHXhv13Po2rlFcmY6xMa/da4mg3d 5i0LzOweNOXpwvrlB5/58G93OqZw6nVMl2qzuRsZdbAbs0OPsLb2ogeJh7tb MzMa/qdxRgPx4Z/flGF1z8MxOrxy4p3JVetqSA2Sr6gibfcpWqJxMACMo7jL tHMVKFFRUUgV8pLofZ2Y+u/8kn/e0GUvOOAapAroDSmy53Pp7SCF1edqerCn QHxZ10Qx69W6y0FNw2rZi3nVs/PUiQw92reEfZvt6glF3Ik++ZVPnea/xFMn yO2QKrAsbn8n+iE5r9jvVzMEnOT3E4PqdPlneVcnxT1olZlPMrkHTXm2qEHp bvu/EfL7X0Xzxy819mbqGUkibz5tIX8e7sk00tattmpMmeXFezc2E9Nz4Cb5 a4qZybBtra2zMykt9uZkD1tNnYI0QLlNB7/YSJ12LgZ2YBzFXaZNFUhS/gf/ 8uVLpAp5heTGn8xUBb7r71fRTOdKSBXQG8qpCiI4+h7V9iCO/LGtlVj7syki aEV9ZqmtY4+snzolPP27RUG+Tatt6jUaEs8PLUyPV/llJmL7B8j9kCqwLHZf R3oJFS9f/9PpEs6Ex0ubew47HXyCbvH4JemMQBpycPoitXn1Cfdn1S7VZY+i LoOqAEBqiQAy4vTQFlP98+bgKOnORGZqmm1rDa24XPIlep2EVf3lbzWFw+TP A10c6D5D9Ns/WU5Kk3442LuUQGPyrZptJ59Lgu0fjAnjKO4y+VwFSlJSkp+f H1KFvCC1meY5DzyrtvE85ApIFdAbKiRcHa3YyJFXsNfRn5ofGSVf+0MeM9o2 Wx+iYfhHBK9qxExlFXmvyWz3SerYSP+lrYpQ57L22aK+Rjn+v8FMqMDL3+8U Wh7I/ZAqsExybbQr80yk1KjLyqCUjL63vHUF70UPElKu/0FvPGDf/XDcLyLs 3B91Gky/HfuLjA0OuPn4q2LNBBF6cnC54t32K4suJJ0fQm8vadV841eq2UoJ 3NmtVve9mddkyMXIHyf604sORDXmPtWQ/iZcHCH/JQjLjbmuMaomow51d6L7 DEH5qfcyX7UQ/2JHH3dLLeUypY+UWwah7oWxYRzFXeaQKlA+fPiAVCEPIIKW 11M+eex+CFs051JIFdAb0sjvx/oqxtmiimOuaNg6Uhq0vqUTz8K+weKnmh7N SZ/NZZY/WFhYdz6gdeFx0lf/XZNblqCfI1q33Kw2ACS+bGvDPL6SPxR8jfUP kPshVWBb7OkBhZjdcAWFGk/ccvL8ic1T25Z1rjnxSgT5i/i8ltnDwKHJzH3/ 9KtaoduuIOkv6dMFteQT8m3KdZmzcVnfSk4V/7iUpsZg1AG6pi3VRg5cvfl/ bctVHnE2T5eSJSMvjq6gyJIdGq96laHobuLDubWpN9O6+rRbsRrfJOLLFh+m fI58z6D32tIZacSzY/O7V7RT/Do11gGOOTeUyZAs+K6jr2F6mzFhHMVd5pAq kCRJEMTdu3eRKuRyabb+tW69Xa2cGuQSSBXQG6rEPVzRopDAwoLnWGfskbfx qd+QRdzf0Mvdip+vzsRzoRrGftLQq381dGTG8PImo0LXmWu27drD2L1z64ZV i/76s3+7eqXT7ldr3WLT1/QtiyT0+oLmLqoT8fK1XvcWu9hCrodUgXXSdxt8 CqS2SfI712Ktl/rTE7GI96rlWhYW4lI9drxVRKWJR3vaqQ4Xluy+4126BJX8 sb+Lk/KUYjff3e/Udq/JcyRBe3q5yYMFcbk+u14pOw0i4u7KdsUEPFuPkcc/ awyGiahHa9oX5avebYFriwkrN+9M7TO2bVy9ZNaEIZ29KhQUp/4O1atgEFGP N/d0U/0yLSw9/xcQgwGr8WAcxV3mkCqorsQQqQJ12h07dgQFBeX8VJBD6bf+ RRF206OGnXv37o2KimL3tEgV0BumlfL54mLf6gWF1Jg6X3mvjr0HDurXrWUt V1thPo9us08GZrjDJ0MPj25Sv4a7s1W60buOrJptUE4eTglY2rFR3WpuBcRq R4nyl65au2GnlQ9R1RtyLaQKBkDGPN46wqu0o1jsUNyz8+SdDyJTBzJE8N4+ FRytncp4D1t3J1z19fhH63tWLWif363hgFV+oepNjjRo7wCP/PZFavVe4fcd 06hosrAby3p6OPGpxtq5StMuvj3aNyzjILAp1Xz83ufq9/fx12a3auhZqZgd X71LyFKarSRkgdsGeNevWb6wjVrnI7B3rVSrfrPpF1FfwQgwjuIuM0kV6LKN T58+ZStVCAwMXL58eaNGjXg8eevg5+fH3sWCnuJP9s2PrX/Nyblz5+TdpUDQ okWLDRs2fPv2jZXTIlVAb6guOfzFtSPbVy9dMG/+klXrdhy9/jI8bxYkAzAK pArAbUTcx4DTu9YtXzh/4bK1O0/efh+NYWPegHEUd5lJqkBLSEi4ceOG3qkC QRABAQHTp0+vVKlShpgRqYIZSL48shgdKmRdRAeMgk4V0qpfv/6yZctyOLcH qQJ6QwAwLaQKAMBFGEdxl1mlChTqdia7qUJycjJ1czRixIgiRYpom+KEVIEV 9JQSPUnvTirL1E8uPvoalg6aA/VUQaVKlSqzZs168uSJHr90pAroDQHAtJAq AAAXYRzFXWaVKlD3L1Kp9M6dO7qkClFRUfv27evevbudnZ22OyOkCuySyWSk gj4/+3xuNbqcO6/ggNPY2c0sZJIqqJQqVWr8+PE3b96kfvs6nhapAnpDADAt pAoAwEUYR3GXWaUKtO/fv2eSKnz8+HHNmjVNmzYVCATa74Q0qAE5M2zYMKlU qm+qQASvashU1HXoepDl6oBahYeHm/ptM2vZ+gtycXGhPgPnzp1LSclipglS BfSGAGBaSBUAgIswjuIuc0sV6DvWR48eqacKV69e9fT0zNZ9ELCodu3a1G9H ppD932volpZW9HmsfbZ+N8oWPdTVfvjwwaTvWe5kb28/YcKE2FittZCRKqA3 BADTQqoAAFyEcRR3mVuqQKNuWDTOVYiKijp06NDAgQMLFSpkupuqPMqztic9 UYEgsr0nJBl1oIs9fRpRo1UhRttTEqkCu+rUqTN37tyHDx9m/hlAqoDeEABM C6kCAHARxlHcZZ6pAuXt27eZ1FWg7m0fPXq0YMECqsfk87PeovbYsWM/IGeu XLlCRwp6pAoJp/sXZPaUrDHvhfE2B4qLizP122bW9uzZk+XfjqOjY48ePXbt 2hUeHq7j245UAb0hAJgWUgUA4CKMo7jrh7mmChKJ5Pnz57ocqZrAULhwYW13 RqjWyAr9Jir8+pVy7XdXOvoRlJscYMQ9JXO0aUUekEm1xkqVKk2ePPnGjRtS abZ/YUgV0BsCgGkhVQAALsI4irvMNlX4pXjQnK3jqVvIx48fL1y4UH0CA1IF tuhzny69N7U8XVqTX2zUlWQDXJVGiBSylCFVsLS0bN269bp160JCQnJyWqQK 6A0BwLSQKgAAF2EcxV1mmyrk8JYwwwQGpAqs0G+uguzlgprMnpIF+p2Kz/JF oq8vX/TfDyQCRkCnCiVKlBg1atSZM2cSEtjZ8ROpAnpDADAtpAoAwEUYR3GX 2aYKbKEnMHz//t3UF5JnER/++U1M32Tad97/M6u0IOnejBp15xux9kJe9vXr 1xcvXrA+qQOpAnpDADAtpAoAwEUYR3FXrk8VwMTIsG2trel7TKsWm75lcf8q ebWsoWPN+S8RKnAZUgX0hgBgWkgVAICLMI7iLqQKYFBk5P7OzJ6SwnrLAjNf PiF5/XdjB1HNBa8QKnAaUgX0hgBgWkgVAICLMI7iLqQKYEjkj72dHOg7TH6p sTclmRyaEnJ4SEUrCyFCBc5DqoDeEABMC6kCAHARxlHchVQBDEgWuLKhFbPB gKDCtHtaUoXkUP+toxsUku8TIay1EKEC1yFVQG8IAKaFVAEAuAjjKO5CqgCG Iv1+fbZXfl7qxoXW5dqM/mv+IsbC+XNnTh0z1Ld13TJOQuUhQs9FrxEqcN2R I0c6KVy8eNHU12Js6A0BwBwgVQAALsI4iruQKgDr3mzu41WvejlnqzSJgm6E tRe/QagAHIbeEADMAVIFAOAijKO4C6kCAABb0BsCgDlAqgAAXIRxFHchVQAA YAt6QwAwB0gVAICLMI7iLqQKAABsQW8IAOYAqQIAcBHGUdyFVAEAgC3oDQHA HCBVAAAuwjiKu5AqAACwBb0hAJgDpAoAwEUYR3EXUgUAALagNwQAc4BUAQC4 COMo7kKqAADAFvSGAGAOkCoAABdhHMVdSBUAANiC3hAAzAFSBQDgIoyjuAup AgAAW9AbAoA5QKoAAFyEcRR3IVUAAGALekMAMAdIFQCAizCO4i6kCgAAbEFv CADmAKkCAHARxlHchVQBAIAt6A0BwBwgVQAALsI4iruQKgAAsAW9IQCYA6QK AMBFGEdxF1IFAAC2oDcEAHOAVAEAuAjjKO5CqgAAwBb0hgBgDpAqAAAXYRzF XUgVAADYgt4QAMwBUgUA4CKMo7gLqQIAAFvQGwKAOUCqAABchHEUd0VERDRq 1Kht27ZDAQAgZ4YNG0a1qCNGjDD1hQBAnvb7779TbVHXrl1NfSEAANlAj6O2 bNli6ltkyDZ6rkLp0qUtAAAgZ7y9van/enl5mfpCACBPo8d1Hh4epr4QAIBs oMdRmKvARREREXXq1Gnbtu1RAAADu3HjxldOOX/+fLb+gTNmzKBa1FmzZhno DQQA0MWOHTuotqh79+6mvhAAgGygx1GbN2829S0yZBvqKgAAsAXrAQHAHKCu AgBwEcZR3IVUAQCALegNAcAcIFUAAC7COIq7kCoAALAFvSEAmAOkCgDARRhH cRdSBQAAtqA3BABzgFQBALgI4yjuQqoAAMAW9IYAYA6QKgAAF2EcxV1IFQAA 2ILeEADMAVIFAOAijKO4C6kCAABb0BsCgDlAqgAAXIRxFHchVQAAYAt6QwAw B0gVAICLMI7iLqQKAABsQW8IAOYAqQIAcBHGUdxlzqmCVCo19SUAAGQDekMA MAdIFQCAizCO4i7zTBVIhaCgIFNfCABANqA3BABzgFQBALgI4yjuMs9UgRIa Gvr48WNTXwUAQDagNwQAc4BUAQC4COMo7jLDVIEkSalUevv2baQKAMAt6A0B wBwgVQAALsI4irvMMFWgBAYGXr9+HakCAHALekMAMAdIFQCAizCO4i4zTBXi 4+OvKyBVAABuQW8IAOYAqQIAcBHGUdxlVqkCSZLUf588eYJUAQC4CL0hAJgD pAoAwEUYR3GXWaUKlPDw8OtKSBUAgFvQGwKAOUCqAABchHEUd5lPqkCSpEwm 8/f3R6oAAGrI0H+H1SzjbMO3SMXLN+BsSnbPE3a8X/HUk1jmL1GuYuXqnda+ lrFxlegNAcAcIFUAAC7COIq7zCdVoISEhFxPA6kCAGSQ/PX6svbFhUwmIG6+ 6TuZnR8nvuzvVpin/Gn3wYdDklm9PPSGAGAOkCoAABdhHMVd5pMqJCYm3rhx A6kCAGQu6fzQQkwwIKj010Op7j8pC9natqAyU+CX+fN6PNvXht4QAMwBUgUA 4CKMo7jLHFIFukjj8+fPr6eHVAEA1Ehuji2lWsHg1P+MzpMNpG/XNHVUZgoW wurznrOy6CEd9IYAYA6QKgAAF2EcxV3mkCpQIiMjr6tBqgAAGUkf/VVJoCqL IG628ZtuSyCSny1pYJdakkFQdfZT9kMF9IYAYBaQKgAAF2EcxV0mTxVIkiQI IiAgAKkCAGRJ9nZJbZFdZY/SdLIgqDj9gS5LIBLvz65lbV2hRgVrJlQoN/lu NpZO6Ay9IQCYA6QKAMBFGEdxl8lTBcqnT5/UIwWkCgCghvi8rrGlTZsVS1uJ mSUQ/U5nvQQi7ubkKpb2Def9PbgYvXaCX2zkFXbLNDLQGwKAOUCqAABchHEU d5k8VUhJSbl58yZSBQDIGvljZzsbS+81geeGutAVEsRN13/NfAkEGXVpdDmR U7M1L25PcadnOPAK9D3JeqFGBfSGAGAOkCoAABdhHMVdJk8VXr9+rTFSQKoA ABnFHOnpJKq18FXy87nV6d0lBRWm3c9sKQP54/TgUsKCbbeGpLxcUJPZkdKu 076f2dqQUmfoDQHAHCBVAAAuwjiKu0ybKkRHR2uLFJAqAEAGieeGFBKWn3pP SkbuaMMsgXDse1L7Wgbi2yHfosLCXfd9IYiPa7yZH7FqsUnHEo/Zht4QAMwB UgUA4CKMo7jLVKkCqfDgwQOkCgCgmxS/MSWFrr9fTab+58VhheglEKIm674Q mo8nPu7q6CJ07XvsOylfO9HWhg4VRPVXBGn5iRxDbwgA5gCpAgBwEcZR3GXC uQrfvn3LJFJAqgAA6UgfzqgoLNDvlLwiguzFvBrMEgj53AWNhwduaJlP6Dbs vwj5vITYo75OdKggrDrnmQH2lKShNwQAc4BUAQC4COMo7jJJqkCSpEQiuXXr FlIFANCR7M3i2iK7znRFBPLnzrbMegaH3ieS1I9OebnCy0FcfszVaMVah6SL w4vQcxv4ZSb6Swx2kegNAcAcIFUAAC7COIq7TDVX4d27d5lHCkgVACAN4tMa b7Fl843Mjg8pl4YXZpZAeK/9nHFBQ9KjeXVsLD2m3o6j/7/Ef2IZek9JXtER lwyypyQNvSEAmAOkCgDARRhHcZdJUoW4uLgsIwWkCgCQigzf0dZGVG9ZIBMg yF7OZ3Z0ELhPCUi/BCLef3o1KxvPOQ8SmS/Ins+tRh/My9/neJwBLxO9IQCY A6QKAMBFGEdxl5FTBZKUP2d8/PgxUgUAyIaYwz0chVVmPlblB1G72lnSSyDs ex1PswSCjLk2toLYruHS5ynKLxEhfzcSMXtKdtwTaaDtHxTQGwKAOUCqAABc hHEUdxl/rkJYWJgukQJSBQBQSfxvsIuw1LibqRURUi6PUC2BWPNJuQSCjDw3 3E3o1HTN29TpC2TYtlbWdKhg2WzDV0OGCugNAcAsIFUAAC7COIq7jJkqkCQp k8nu3LmDVAEAskOxp2ShIecSU78ke7WAWQLBLzvpLp0hkN+P9XUVFGizJTjt Jg8xh7o7MntKpq6gMBD0hgBgDpAqAAAXYRzFXUaeqxAcHKxjpIBUAQAY0gfT KwodexyOSfvFqN3KJRB2vsfkcQPxeV/XwoLCXfelL96YeG5IIXpSg8Bj1hON m1CyB72hGUv8+uDs7nXLFy1atnbHSf8PsYYNmABMCqkCAHARxlHcZcxUITEx 8caNG0gVACBbZK8XeQqtW28PS7d4IeXKSGazSNFv/3wkZMFb2hQQuPY5+j39 EgfJrXGl6e0f+G7jbxtuT0kaekPzlPz+yLhGRZi9SGn8/NX7rb8fbdAFMQAm g1QBALgI4yjuMk6qQBdpfPbsme6RAlIFAFAgPq7xFot/++dD+mfLstcLazFL IMpMvPH8nyaOwtJDz0ZkuEuUPpnlIaC3fygy7GLSLwNDb2iGZB/2ditGfwgs hGIRP020YFdz8rWfCBYgF0KqAABchHEUdxltrkJERES2IgWkCgAgR4Ztb2Mj rDH/hSzDN6L3tGeWQFhVrV/TVlT+zytqT55l75bWZfaUzNfrWKzBLxa9odkh vu5sn4/vWKXnwhOPv8RIfv1K/v7w4PTmRYXMlIXig88iV4DcB6kCAHARxlHc ZYRUgSRJgiACAgKQKgBAdpFRB7s6CMpM9FdbvJByZVRRnvKhs6XHlNtxaj9M fFjtxUx7t2m364fhbx7RG5ob2fO5NVyarXgSn/7LKe82t3WmPz1WzTZ8RokF yG2QKgAAF2EcxV3Gmavw8ePH7EYKSBUA4Ncv8uehHvn4+fudSlT7luzNIk/m gbN1rdkP1A/4RYSs9mKmMwg9F73OONnBANAbmhnZ26XN22z8oCE1IN7/8xu9 4ahD7xMGXxoDYGRIFQCAizCO4i7jpAq3bt1CqgCQW8lkshs3bqxatWqlJhs2 bLhw4UJwcDB1WLZPTYSsa2orjwTeaPjZmL0drBSL4xsueZai4YeTH/zlwcQO FuI2OyKNMM8dvaGZkdzbsNovXuO3iOBVDUWKeS4d9hp+bQyAcSFVAAAuwjiK u4yTKvj5+SFVAMhloqKiDhw40KtXLycnJwsdWFpadujQYe/evbGxut3EpXy5 PMu7AM/Cgufcefdn9T0hJVd/L8bnOTZd/UbDfpFJwcd/r2qtenFeQZ9Vj2MM niugN+SQpGO+tvKPRqFhFzWFUgBchlQBALgI4yjuQqoAABq9e/cuMjJS/es/ f/7cvn27j4+PUCjUHB/oFi/s27dPW7xwZ3GHxg2ql3YSpf4Mz8rFvWaDZuOO h6cmA7K3i+sWbr0lOO00BtmbrQOae9WrWsJR/eL4tkUq1/HutPye4faXRG/I IXEHOsvnuti03RmOco2Q2yBVMDVSkpBg6L2MAXIfjKO4C6kCAGjUt2/fMmXK vHnzRvWV9+/ft2rVSluY4ODg0KZNmwULFmRYATFhwgQfHx9XV1f1H7G3t//r r79+/vxpwn8mu9Abcof04YyKAgueU5f9RijjCWBkSBWMLDny/eMbp/dtWDLj jwGdm9UuX9TeofXW72hbALIJ4yjuQqoAAOrCwsJEIvlUAUdHx8uXL1NfCQgI cHFxSZsJUOPVdu3aDRo0aMuWLc+fPyeILArpx8bG3r17d9OmTb/99luGbGHu 3LlJSbmhYh56Q86QvVxQU2ghcJ94Ozd88AAyQKpgXNLH2yZMnDb19/YV7Zit icTeaz5idxmA7MI4iruQKgCAunnz5qnu+gUCQfPmza2srFT/19fX9/79+zk5 PzXiHTx4MHUq1au4ubn9999/bF2/qaA35IqkW+PLCXiFfQ+H4WEi5EZIFUwj 5eqoYopYQVhnyVsj7DtkLuKvzW3fpL5HMVt+xpWHNoUreDZq1m/TqyzfjaRb 831qlXW24qX+NK/oqKvZLHuT+HBeXVvVz1OvXt2zbkPfDVm/PJgJjKO4C6kC AGQglUqLFi2qcZmDjY1NQEAAWy8UHBw8ePBgPj91GDJ58uQs5zyYM/SG3EB8 3OzjyC/UZe8XDn/YADKBVMEkyIjd7W0U8XvV2U/z4H2s9Muers6qVEBUtve2 Z9mtkkzGvjo4uqY9cxLLdruisvPD0dfGVRKrXn7goZDk7L06mB7GUdyFVAEA Mjh06JDGSIFy7do11l/uyZMn1NBX9RItWrTgbqUF9IZcQH4/5FtEVLL/cSx6 hlwLqYJJxB7rlU9+PywoNzlAw95EuZ/s5fyaTOklgfuEW4l6nSTh7EBlNCGs Me+FzukMGXqsXwnlDEi+69Bz2DOYizCO4i6kCgCQQaNGjbSlCpUrVw4JCTHE i27YsMHS0pJ+ldKlSz979swQr2Jo6A3NH/F5X9ci9p4z/eNMfSUAhoNUwRSS LgwrLL8d5pf443re3K82/nhvZqdpYfVs5AHpJF8ZVUw5g5HnMvSCju+k7P3W tgVV8yQE5acacLsnMCCMo7gLqQIA0IsOSFL+5HbTpk18Pp/HS7OykerY08iX L9/p06epH5HJ2JzfSZ3w8+fPLVu2pF+dMmDAgOjoaOpV6AvjBPSGRpDoN7dV g5ruLlbpPqOKz6lVQTcPz0b9tr7T+tFMer6iccHSff79pPuHl/xxbFStMi42 6dYLO/Q+kd0qj+SPM4NLpVYSscxfolzFytXarXqeB+dJg8EhVTABif+ksvJ2 gldoyDn9ntJzXYrfmJJ0SymsNlfPpk1ya1xpAV0umiL22arTLj3JT5c0tFf9 lIXAfUrenCySC2AcxV1IFQCARt28x8TE1KtXT1uqwFcoXLjwoUOHqJt9QoHF V6fOGRsbO3ToUIEC9VrU/46Li2M3vjAo9IbGI/1yqLdr6p2+ZcWBu5/HZP55 JMPODC9fuOnKp/oM+FO+3VzVuZRyzCryXvs5Wx9+4tvhXqrnb6Iy/Q+8x94T YEBIFYxP9nJ+Dfnsf16+Xsfy5tx76f1p5enkVFBxxkP97uqpc1QQlejSvR7d 2AqqzHyc9Ylib072sHL6rXf7UnQjyy81xi9vThbJBTCO4i4jpArUHcHDhw+v X79+I5vu+N+RShE1AhgcPRmA+u+lS5eEQiGdIainCra2th07dvz69Ss9f4Ct KQT0eeg/doIg4uPjp02bJhKJ6BBj8uTJHNp0Er2hEZGRO9qoynLVmP0kq6pc cffmNypSffyVSL0/t8lXRiqDgWwumyY+7uroovyb4pcceQnLL8CwkCoYHfFp bWNFi2TfaZ/+rQyXyZ7NqUYXVeC7Tbit3/oD2fO51cRFhp862NuBbi/zDTiT RdtOhp8eXFpUuMuOMzOr0i/PKzriEmeGDZABxlHchVQBAOj7eurmvU+fPqoF CBmChZIlS+7YsYP6k1TlCWwFC/RJ0s58SEhIGDt2LJ1vWFpabtmyhSuLINAb GpHs6eyqzIICyyx3hk96ub6ta5neBz9qmvdCRn/6FJ31J0x6d3I51QoG+17H dR61SoM2+uRPXe9b5X86PHsDyBGkCsYm3/5BsaOhtc+WUG50WCyTvVtalwkV io26ot/mC/JziAv0Oxl1f1oFurUVN93wLbO3U/ZhV6dCIrchZ76/Xca8PM+5 /+l4/f4NYHoYR3EXUgUA+KW4qX/x4oWDgwO90iFtIQVra+vOnTsHBgaSSoa+ EolEEhUV5evrS19M4cKF/f39qdaA3TUXhoDe0HjI8G2trej7dHGjv0My+1yk BO7sVqpY63UvNOYACc9Wteu6LotU4hf9DE2oitlEXqs/6fZZTHm50sshNZ/T f2YwgO6QKhhSSujd3TP7N/dwdbK1sXep2OKPHU9i4k72VWSHYq/VH1RNAxH/ 9dm1IxsXjO/Xpm65Sr9f0LL4ivx2oFvx1lvD03euZOTlaQ2L2DmVa788INb8 cwri4xpvevYYz2XQ2QQ9z7Hay9Kh28EoInRjM/pk8rKL2lvMlBcrvR2tqk65 GSv7vK4xM3nNqcfhGH3/FWByGEdxF1IFAKBrGkybNo2nply5cjt37qTXIKim KBj6Yuhg4fPnzzVq1KCDhSZNmkRGRtLXadBXzyH0hsYTx2zhZmEh9Fz0WvvH IiVwV49SYsfaw5dtSG/92n+Wz588qJmbrU3zjV+yTAiI9ysbiG0qVS1DP0Dj l53kr8sM36TH8+vaWrnXqGTLLH8oNfYmKpODwSFVMBBZmN+KHhXtxUW9xmy/ GRwlIZO+XF/WpljBBp2aFpGvjxLWXvKWbo4k/kvae9WrVaW4PTPFiV9c884Q 5I/j/YrxhTXmZ9gzQXJtNFM6xrr19nBzjxXI0C0+1nSokK/XUf3qSpChm1ta 27TdQf1jU84OZCZ42WsvjRvnP6OGtX3DxU+Tf5Fh29vY0O+zXcc9Eeb+boF2 GEdxF1IFAKDu1qmmwNXVNW2eYGtr6+vr+/r1azI9I1wMXbchOTmZageKFClC XYxAIFixYoX5NwjoDY0m6eLwIjzm4f/0B9o+GEmvt3UtkTrBQDPb1tuynrBM ftvcwsqq5fJl7Zj9T+18j2Vd9DH+7ozqVrZ1Z60eXoK+O+AVGnI+bxaHB+NC qmAAZOTtJa1cRTybKiOOf0rT6JDhuzvYM3ORPGY9ydAcET/OjSirCBaEtRe/ UQtAyajzw+U1BnnFfr+aIXCUBO0fVNmOl52pUSZDRu7taEe/B3rXlSAjdnew s2yyTl4JV/pklodAOS9M41QyMoJ6X8UF22x5L3/Dow52ZaaE5dkVKLkFxlHc hVQBAAiC2L59e9pIoVKlSvv3709MTEybJNBFFQx9Mar4gt68cunSpXSBBWdn 53fv3hn61XMIvaGxSO5MKMMU+y7x5w0txb4lfmPTbOWojX2H3Vk/BiR/7utk J26w8vWl34vRYYbot38+ZLHlRMz1cRXFDl4rn979qzJzHU49j2BqLhgBUgW2 Ed/Pj6tpT7U4rr7/ZpzbJH08s4riT5xfdtJd9XGrquCAXbdDGR/ix14f404H n9ZdDqoXAyB//ts9H7/oyMv6lSkwnpijvszkMetWW7/rN1CIPtTdUVx/eZBi q+uI7a3oBQ38MhPuqM/vIj7v715E6Nr7SKjidxF/sl8B+uXFWVbZAfOGcRR3 IVUAgOTkZE9PTzpPsLKyGjp0aHBwsMnXGtBVFCIiImrVqkWvgxg1ahTqKoCc 9KnyOZb+K3izJf5k3wKiqnOeJb9ZXJupR1ZmYqZLIMjIc8PdRPl9NgQlq2qY Wdi03Wn2E5khV0CqwK6Eh4saOVK3reJK46+pl3aV3PhTMRuJX3z0NU0Zp/L7 wurznqfrWBP8p1Uv6+6mmAAlarRKQ32Y6INdncqMvWnuOxoknB3ozNzVN16r 57yK+FP9Coqqz2PWgaRcHFaIPqNN90MZ23jJmzXN84nL/3E5iv5dJF0aUZRZ EFdvWaBZjxIgKxhHcRdSBQC4du2apaUlXUVh7969CQnyHtzk2y7QSyEIgjh8 +DB9eU5OTh8+fDDtVWUOvaFxEEHL69ObmVs4dD8UbfgXTL48sqhQ8cQsZm9H pkakbY8j2tcykN+P9ysudOm48yNBft3YnFk1of94GyB7kCqwiIy58qdiQoGw 0qRbGjYXID783UikyDgH/6exUSA+rfZSHFBg0H9pUofkR3Nquw85cXpcaXnk IHCforZdLfF5c6uiLTZkWo3WHCRfGcXsuiuqt1zPu/qki8OKiCpMu8+8B7KX C2rSaayImb6gknB/tqeNjefs+8qwQXKLfgup31CNeS/MuvgSZAnjKO5CqgAA vXr1EgqFAwYMCAoKoislUv81earwSzFdgWpA4uLivLy8+AqTJ0829UVlBr2h UZDfNjVnbu2tW28PM/wHVeI/qayw8LCLSWkLqIm07zxBfNnfrbCwaM9/vxH0 2gn6YjWuqgYwBKQK7Im7MVaRKfCL9j/5U0NzQ3xc21jeIPHy+WqrUph0qq+j IlhssUm1OkDyYmmjMr0Oh0kDl9VT3D479Tudfp0DGX1hRPmaMx+Y++qHX5Lb 491yelef4jempKjU2Juq1CV6T3s6jpWvckudF0b+vPxHebFT09WvVV+TPpxR kZ67hi12cgGMo7gLqQJAHkeSZIUKFfYf2J+UlESvLzBOVUZd0HMVqP9x5MgR S0tLPp9fsGBBU19UZtAbGkOa+3RxlsUN2CB7NqeqyIm+YZC9XaJcAuE24bbG JRCy4K1tCghLDjypWOwQf0q53hcDXjAepApskb1ZVl8RYopqLXip6YZZ8mim B101oeNebVUKpfenVZDf9wprKs8he7e6aekOO+WFCWP2dlDcPotbbkm3QCru xniPqhNvapgcYWbS3tVrr52bxTkCprgLiwy/mLrUIzXBteq4T1mOhvh2uJer sHCXvWlmfcleKWc1aG2UgUMwjuIupAoAedzXr18/fvxo5vUK4uLi3Nzc5A+D eLz4ePMdZKE3NAZ5jQNmCW3NBa8M//CfCFpRX2TTbucPxYA/dp9yCYRN98Ma KjpI365u6igqO+oC/VAz5dro4kxZyZJj/LSUlQRgG1IFliRe+Z3ewMWq2YbP GrpJ8tueTvQWiFYtN2vde4AIWdVQvgSCX2rcLfltL/Fha5tSzdcFKZqvlEvD C/PUqi7E+k2sWXv6HfPt7lRkL+bXUN7Vj9fzrl6+5YOoQN+TcWlOqypIo9o8 WBq4qVUBkdvQsz/SvNFEMP3eygtp/n7V7Od1QFYwjuIupAoAYP5IkpwyZQq9 CGL9+vWmvhyt0BsaQfLlkcw2DILyU+8Zvo9QrLcQe69hno1Jrv/BxASihiuD M95lJD9b3MBOXGn8DWYitPIRZSZLrgEMAKkCOxLODnJRNDeaN30hI88MYnaN FXutzmTiVOy+jor5CE79zyT/Ir7u7VKq4dKXzA24fDKU/PaZV3TUlRTlec+P rNZo4WNzL9Iop4hd6bv6YqOuZHlXT8RH/lT7Z8neLPIUOXQ9GJX2i/H/drWm G88iIy9Tb0zS4wX17KyqTrmZbpmJvHCNFdrYXATjKO5CqgAAqioKEon5Th58 8OCBra0tj8dr0qSJqa9FK/SGhie9O7kcfZ+urd46uxTbsItqLVROipC9W1qH eS5Xmn7smCrx/qya1lbV/7qrnMMgHysz2z84dj+EPSXBaJAqsEJVMIBfWsNT eDL81BDPkkUtdaiaknJ2oGJGg2XnA3FhR3uXrjXroer+m/y+uYViE0Ur6pvy L8g+7eteucWaN+bbH6dBfF7XhK5/wHMemOWGPETIpnatVwZliF+I4FWNxDZt dqQvkpNag1HcZmdk9I0JlS3tGy55mqH2RMTuDrb0y+fvfUxLWQvgEoyjuAup AgCYP3o/iBIlSvB4PBcXF1NfjlboDQ1O9nxudfo+nVdwwGkj7CkZd6JPfmHa SRGx+zspl0B0S7fhWdzNSVUsbevOT32+mDretrBpY4yykgAMpApsICN3tBZr m5kk+7Cre8NBk30Vmx8Iqsx8ktmAVXLjT8UcJ3GzRdsGlak8Md1WEslMLUdR w1XUiyQ+XuxVpc/hr2a9KlGFDNve2oZukfP5Hs0iOSW+7O1cvMmajHM6iC8b mllZNlmXYYUJEUJvrWFhIfQYNa9PSWHBNlveZ0xuog/3cKLbWPsu+zXV0gSu wTiKu5AqAABX9O3bl8eTP+6JiIgw9bVoht7Q0FKX0FrYdz0QlfUP5FTypRFF ha6/p5kUkWYJRIMV75XDYDLq0uhyIgevFS/TFCtXPUWTz47+yI2bBMgdkCqw gfi8tjHd3ojqp/6xy5HRt/7y9v7ftdOjFQsg+G7yfWepH/h+67jfNw1zFpQF DXl2jk5lRl6MTnf7q5yAJSg3+c7H4wOr1Jl+mysP3cmIvZ3s6UbOruMebcUq acTnPZ0L2Tbf+CVDU0iG7WhjI6q3TG1HysRjvkxdXqrn5xfvcyRUrRGNO6Gs smOc/YDA8DCO4i6kCgDACQRBbNy4kU4Vbt26ZerL0Qy9oYGR37f4KPeU9Nn6 3Rh7Sk4sIyzQ71SaB4uywGVMDTF+qbE36QyBDD81qKQwX8sNgWn7rLjjffIz ZSVTV1AAGANSBVbE/duVmV7v1PVAhLLBISNvzWvq0XVXcBJTN4WXv9+pxF/k T78Z3r9N8YvW0DDJ3iymN4/hF+t/4keGA4iQVfRDedvqv9Uu235LICeWPsiR 4bvbM6GC5sITqUdG3JzV0Iln23pbxpKW5PftbWyFlTTskCPfF0LAnL3Cn1ei 1N/XmOO9C9JtrKje8ozrKoCbMI7iLqQKAGD+6LIPt2/fFgrlA7OdO3ea+oo0 Q29oYFEHuiqHsI1WhRh+DCl9OstDaNd5X7qJtXEHOlszyUaXg/K4gfh2yLeo wLnDzvTTEZIvjyzKlJWsMO0+OjMwJsOlCgkJCY8ePXry5Ik51+FhC/FxfVPm r51fpMXsYw9ev7p9cFaHciVa/v0k4RcZxhRE4Bfvv/v63j/rV+m2K0jzXzqz CQTPpeu+b+oNV/zBLvSrWFebdI1D0/hl71Y0YGJeC/ueR7WtSEsMPr+4q7v8 X2jfYXd4hn+e7M3SupYW9r7H1Astkl/XN1GkLTaes+9rODnxZWtrpkOwsOt1 HNs/5A4YR3EXUgUAMASSJFnfrTI8PNzSUr5MfcaMGeyemS3oDQ0r4fQA5sGU sMa8F1k+/JcF/ztr48Mc3PkQQcvriSybb/yWvobYjT+Zqu+Kx2PEx50dnAVF ehzMsA5aGqAqK1nij+vYUxKMivVUgWrPT5w44eXlJRAwj49tbW2ppjglJXd/ tmP9JlVhiqMwbCoN2P1acQtMBK9sIFJ+2bJsn72BWt8L6ga5qZiXr9VmjWGo 5NpoV76FoHiPfR+4M+qVRdxZ2JRZfiBnVbb95OXrN29hbFq/ZsXCv8YO6tSw rBPzibFw7Hog/SIJSejV/zV0os5h2XD5W/WmOvl0fycLnlOz1a/Vv0dGP1jh 46x6eYH7yHPfMSEsN8A4iruQKgCAIVBDUOpvn55jwOI5CxYsSDVZ3bp1Y/G0 LEJvaFAp10YzFQ0E5SYHZNU7kN//7ene/WAOHvzJtyyzVF/uq8gamLhgzNVX G1rmE5YYcFLtCdzL+TWZspLOA88YoawkQBrspgofPnzw8vLi8/kjRowICAiI jIw8cuSIk5O8TN7w4cNZeQnzJftycV7XaoWtRVYF3b0HLDz1LnU9lCxwR49y 9tb5yzUbtSkgIrMYnYzY3rqA16o3mpst2asFnsV8Vj/jxL6IsqBdw1o2rudR zJZvkS28/L5HoulzJN5a2rNtiwaVXKxSv2tbrGqjFu3/2J+mKqb00f88XLvu /ZTmnSWjL87u2s7Hu0YJ+4wvz7Mp6vFby44TjmYs3ACcgnEUd5ltqnDz5s3b t28jVQDgIuqvnlBi5YSqvS/d3d2pJqtSpUqsnJZ16A0NSXpvannm4X/W26KT URdGlM7fLUehQuSejnZCDaXdVdOVLcQe9T3tRWVGXlB7GXn5crp4vIVDt3+j 9b4IAL2wmCpcvHjRwcHB0dGRGpWl/frff/9Nf8IzfB0AQG8YR3GX2aYKfn5+ d+7cSUlJSUhIuHTp0jml+QDAtisGcP78eervl61UQTXnoXbt2lSTJRQKzTNy nI/e0HBkz+ZUYx7+5+t9PC7TY8moy6PLiZy6/6uhvpfOYo765hOUHOOnNvdW 4jempOoxmaji+Bvq9doVW6Ux84J9thihrCRAOmylCqdOnaLaWz6fT43EMnzr 5cuX9Ec8909XAABjwTiKu8w2VaCOv3v3rkQiiYqKcnR0VE1wsgQAtmVvFqMO qCEoj8eLjo5mdwUE1ZjUrVuXfomfP3+yeGa2oDc0HOnT2VWV5cCbrP+ayQeL jLm3vGUhPs+p+6EchQrHexfkO/oejVf7DhG0oj6zmtqy+oy7mqqIfd7QjJnO IKw25xlW+4KxsZIq3L9/XyyWT7lZunSp+neTkpLoz3itWrVy8ioAACoYR3GX 2aYKfn5+/v7+EokkJSXl4sWLqrkK7wCAbafZNnjwYB6PFxUVxeKMAlKhatWq VJPl4uLC1mnZhd7QYOIuj1LND7BsvT3j1mwMIi7w7KLuFe148p3gehyK0v/1 iM+bfewthNXmPtcQCcT/21WRGdjUmf8oScMPpzydU0NZxE3cYjOmKoDR5TxV +P79e7FixaiTVKlSRWNLHh8fT3/GnZyccnClAACpMI7iLjNPFaiOjCCI4ODg QCVT334BQNZmzJhBz1VgfQVEiRIlqCarcePGrJyWdegNDSPh7f6B5cWpk2F4 BTx7T5qzcBFj4bzZf036fWCXptWK2ihLgvPy9TysdzUDybfr85vJq4vz8rff pqEou+Tm2FJ8C3uvFS81lHxP/nB6TA2b1GvN13zpwyhUDwPjymGqQDW5TZo0 oT/CZ86c0XjM69evVR9zaqSXg4sFAGBgHMVdZpsq3Lx5k04VqK4tODjY1DdJ ALlZINtmzJjB5/OjonLwqFgTqjWws7OjmqzevXuze2a2oDdkV9yVma0a1q5S wlGYrRU4dKhwJPuhQkrAss6NG9Qok1+U5lRWzuVqNGj65+E0u8wT71c2dGmx PjBt3iAL2jmkuXe9qiU1XCzPpnCl2r+1X3Qnd+/BB2Ykh6nC7t276c+uh4eH toVsJ0+epI+xtbXNwZUCAKTCOIq7kCoAAOupwvTp06mGJSYmht2WJDw8nK4C gVQBACATOUkVoqKinJ2d6cRg+/bt2g6bNm0afYyrq2sOrhQAIBXGUdyFVAEA WEenCtHRbO6nR7Ukfn5+QqEQqQIAQOZykipMmjSJjgucnZ2TkjRVDlGgTk4f 5uXllYMrBQBIhXEUdyFVAADWGSJVoJqCv//+m8eTr5tftWoVi2dmEXpDADAH eqcKVLtNLzSjzJo1S9thiYmJIhGzUmjq1Kk5u1gAAAbGUdyFVAEAWGeIVIHS u3dvHo9naWlpnttK/kJvCADmQe9UYcmSJUw1EB7v06dP2g47deqUqm7IyZMn c3axAAAMjKO4C6kCALCO9VSBagfi4+OdnZ2pgW6nTp3YOi3r0BsCgDnQL1WQ SCRFihShs4LWrVtncuSgQYNU4UNERERWJ064vqhnF/107b/mAWs7FOduxJdj U3ro+TZ3H7MvCPt4gBnAOIq7zD9VIAgiJCREVQXO1HdLAJA1Q6QK//33n1gs pkawc+bMYeu0rENvCADmQL9U4fTp06oZCLa2tkW0EwgE9GHe3t46nDhqVztL tb1RdOTU73SyXu9BniN7vcgz2/vlMAQVpt1HeANmAOMo7jLbVMHPz8//rr9E IpFKpcHBwUgVADjEEKnC8OHD6edihw8fZuu0rENvCADmQL9UoUePHvQ9pqWl 5c6dO3dpMXDgQNXd6KZNm3Q4MRH98eVz/bx49SVW89aWkFHKj/cv9H2bA79r rcsJYEQYR3GX2aYKlHv37kkkkpSUFKyAADAo1neWnDZtGnX7z0qqQG+VHh4e 7urqylMIDQ3N+WkNRL/eUBb3+cnlg2vn/OHbvIZb48WvtE1Djbs+tqLHjIcZ nieR4ecn1itk51Su/fKAGAy+AeCXXqlCcnKyqk5ju3btMjmydevW9GHW1tZR UVE5vljzQvVc1JD1mvl5/PixCd+WkJAQU78BrLl9+zZ1b2LCNxMygVSBu8w5 Vbh7965EIklMTNy3b58qIR8BAGw7ybZBgwYJBIK4uDiCIPRuOggFurjK+vXr hUIhn883aGOVc9nuDaWPVnWqXaGki51q2qqo0aoQjW9a0oOZ1cW8goPPpaT/ evKpvo70j1o12/BF//cbAHIPPVKFW7duqWYgrFu3Ttthnz9/pvfioYwZM4aN i80h4v0qL1uxfqwrTr2bIaht3ry5nqsIDO/KlSsmeYsTEhKsra1N/a9n04IF C0zyTkKWkCpwl9mmCn5+fvfu3UtMTIyOjnZ0dFS1A/kBgG2s99fUmFMgEERF ReXwcQAdLFDnqVGjBnVOPp+/bNkytpomQ9C7N5R8Oze6Er1Nm333w3HqB0hf LW9oS33Xsu2uDE8GyZhbcxsV4FPfE9Zc8BKPXwBAr1Rh7dq1qjb8zZs32g6b Nm0afQzVyH/8+JGNi80hImRdq0J69n7OtWZmLCewdetWb29vL/PToUOH79+/ m+QtJkly1KhRpn4DWNO8efO7d++a5J2ELCFV4C6zTRVu3rxJ/cknJydLJJIL Fy6cUzLcdQLkWdvZtmPHDuq/SUlJ9PoF/VBNB6mwevVqkUjE4/GKFi1qzssf fuWoNyTDd7WzVQzVK05Xq3hOhGz2cVI8HRTWWfJWPTmQBP7d2IZn1+WAtjUn ZOShwVXc9VW55/ZPmAQBwCF6pApDhw6l44IiRYpoa7oTEhLy5ctHHzZo0CCW LhYAgIFUgbvMNlWgjr9//z7Vf+VkBjUAmASdBtAzDfQ+CZ0qBAUFlSlThq6o sGLFCqnUrKtU56Q3JN6vaKCYrWDVaX9suu+QoQd7FHe0V5RQ55ced0ui/sNJ Zwc6O3bYHaYtxCHDtrQU6z33RFRveRAaYgAO0SNVaNCgAf0H361bN23HbNy4 kT7GyckpLCxM53OT8WEfQvTz4dOPRN3/EXmbNOab3m/z16iUrF8AwOCQKnCX 2aYKlDt37kgkEuquJCePOwHA+OhU4Zey1qLeJ4mPj+/fvz8dKbi7u4eHh7N3 jQaRo94w+XR/J8V0BM9Fb9JMRyB/nh1SttrkDRMqKXZys+t1XL1Sd9yFYSXL /nEtIZOzS5Pi4/QVnyhBIwzAJXqkCpUqVaITg4ULF2o8gBqSubm50cds3bo1 O5eDnSWNATtLQi6AVIG7zDlVCAgIoJ9LIlUA4ApVmJCTWQqqqQ67d++2sbGh qzQcOnTI/Is256g3lD7+XxV5cMArMuJy6kOjeL/xldxHXYr6vK6xYiaDuNnG bxlaROL9mibF223/bLrpBKQkMQeZRVLGsezLly+pX722Xe1ysTNnzpjk9we5 jx6pQoUKFegbTG2796oKL7Rr1y6bLXzchWnN9VwD79124R0N87NAHfFx3/Cm er7NTfptfmPuHSzkCUgVuMucU4U7/nfMfLYzAGSgygCpMafeIQA9Q+nu3bsl SpTg8/k8Hq9Xr16JiYnmP3MpR70hGb7VR7FKwarzgXjma8kPZ9cq1ftIOPkr 8UgPuuxC1dlP07WLZNghX7dGS1+acNwte7Wgpr5PyCwsLNtlLEBZvHhxvc/G dX5+fqb5JULuokeq4OPjQ38I//vvP/Xvfvv2jS6d7eHhERsbq34AAEDOIVXg LqQKAMAiuhLC9OnTJ02atHbtWv3OQDUa7969o8auPB5PKBS6u7uHhIQQBEEv iWL9mlmUs94w+WRfB/mYXtRkHb1DpPTNSi/XNls/yv+PxG9MSflGD7zCaWcy /CIjzgyuUHfeI5POEJYFrmlVsqi+Sg84EpP+fDt37uzfv3+/vGfcuHEJCZmt YwHQkR6pwuTJk+lU4fTp0xm+lZKSQp2K+hb1B/vhwwdWrxQAIBVSBe5CqgAA LCJJ8urVq5aW8iW0np7/b+/O46Kq/j+Ozwy7C67gHqZhappKiiQqlpi74l6p mUtZmkmlZpa/xze3/FpqpZlarrhkbqW5pGaBhl/TNC0VN3DFDdwQhGHm+hvm DkgMgwMMc+cMr+cfPgpnpuu1uedz3/ecz2lagE8wlK+xsbHyVpIG5cuXN1w9 HHyKQpbCjYbaveE1jTtENp78j+7BA/25bzpVb/nZCfkqqIuZ3sw4H8AzbFXW zpNSwk9Dn2o1/ShdtgBkV4BUITo6Wk4VJk6cmP3nhipu8ODBhp/Xrl3bcHG2 9ZECwEOkCuIiVQBgQ4VMFQxvv3LlyrPPPitHCl5eXsuXL3fw+QnZFW401B2f 9kxGcKCp/W60Vrq6pt9jjT/8I7M1o3RzaWfj+gi34Fmx8gnRx699ud5zs09Y sfZBurXpnZAWBdV6+OpLwvwdAChQqmC4/IaFhRneVbp06UOHDsk/PHbsWGho qOGHvXr1SkxMLJqDBQATUgVxkSoAsC15RDBYsGBBvt54586d3r17lyhRQn67 4W42KSnp0W9zJIUbDfUX54ZkdGRU+w7bfnXbsFr+I3/Jtno5bdvgCmrD77r4 j92fcWFMP72g05OdFpy26iLJzpJAsVKAVMEgISEhKChI/toHBgYGBAQY/qFB gwbr1q0rouMEgOxIFcRFqgDAtgqWKhiuEll7lgkaKTwo9Gh4a1ln4+5rnh1H vVH/sf4bbmRf95H+54R6xr0ly76yOfVB0v8mBtUftPGKtStDdDfPHfu7oP6J TaAHOyCSgqUKD4w1265duyZMmDBixIgZM2bs27dPlAVoAJwAqYK4SBUA2FZ+ UwVDyTpnzhx394eP0sPCwkSMFB4UejRMXd9Pnqih1lTovOjCv6cH6C/MCZH3 lmy/8K/vB9R9Zvxe+rADyFWBUwUAUBCpgrhIFQDYVr5SBcPFITAwMCtP0Gg0 06dPt8NBFpFCjoaZixxUJVvNijG7+CWv7WPMHDQ+NR/36zAvhhaNACwgVXAk +vvJ9wu40TJQzJAqiItUAYBtWZkqnD59euDAgWq1OitS8PHx+eWXX+x2nEWh sKnCL29UMZwP90YTD+ayU6Q2clQNjXGyQt03t11nTjIAi0gVlKNPvhqzf+f6 pV9OGTv8pS6tG9fyKVl9+M77j34jAFIFgZEqALCtvFMFvV6/bdu2sLAwjUaT vSFgSEjIxYsX7X+0tlXI0VC7Z3RNjcsTo3bnurRBdyJjiwi1T4d5J3LJHAAg C6mCYqSEXTPDx44fMySkumldn7riwE33lD4sQAykCuIiVQBgW5ZSBcO/durU ydfXN8cGA5UrV165cqVSR2tbhRwN0/ePq/vYwI0Juc9DkBKXdKrYbELULaYp AMgbqYLisnYDVnn3XnNL6aNRkv7c6lFd2zb3L++qypdSYStv/mu4k278NL5b aPBTlTxyvFLtVblBqw5Dvj3OOhPxkSqIi1QBgG1ZShVeeumlHIVAYGDg4sWL k5OTlTpUm2M0BOAISBUUp/t7UiPjbXSJzktZsvYgYxLHT4Mfy5yj6Nb4ta+W ZFq86NuF8+fO/u/HY4f3aFYlMzJwf+6ri7lvaZxydNqznlmJQvnW/7c7nm2K nAZ1lLhIFQDYlqVUYerUqfLPGzZsOHny5JiYGKWOsOgwGgJwBKQKStPHzm5p 3LXH4/l5l3K/OS5usjYyUqncgmedtXBSUk6veb2Bl0rlGjDV4tSDtJ2vVzL1 ZPIK+TKW0+tMqKPERaoAwLYspQqnTp36+eefExISlDowO2A0BOAISBUUJl39 pr3xcbrbszPPcNdrpI0cZZqr4NpsekweixVSo9/zd39izD5LExCky/OeN/Ws 8A5baWHNIARFHSUuO6QKBlFRUb/l3+HDh4v0qAAUhXztLOlkGA0Vok08Gbl+ 8Vczp0+b8cX8iM37z91leS2KNVIFhd3+vo+38f65yeR/uBoZ6U580lTurODa aNLfeZ6UOxHd/Yb9bHHbjDtr+5aRy4zSYSsIFZwMdZS4SBUA2BapAqOhHUm3 Diwc3rKqe46eHV41Q8OXHb5tbbmp+3veSyGB9auU0Kjyx7X5jFPZq2N9XMRr bYKe9itj1pZM7VWpbrPnwn+4QQkMOyBVUNb97cOMU/Rd6o4/wKRbI/35OSHy hdql/oQ/8zwp0pVlr775wx1Lv528ZbCvvP6hRMfF17iiOhnqKHGRKgCwLVIF RkN7SY9bM7huCYu3/CWfGrLmbH6aeKVfXt2vimm1rkpTtcPYmbMzzZr56fSp /5nw3oiBXZpVy+oT5lJn3P7cqmPpdvT4Jg+TDk3VzjOjr/PAEvZDqqAobfR7 tTMiSk3N0XvSlD4YxyBd+aa9l3zZ9B/zv8I0V0zdPaK6nP+6t7HUzxHioo4S F6kCANsiVWA0tI/7Bz9uaqxS1SWrB7zQZ9CwYa/0atvA51/TFtzrj96dj604 pfiv22ZuMV/5NUsTcNMu7pjYpqLa8BrfIdssvEb760hT4Wv4pAEbb/I8DXZF qqAk3d+TG2dMV1JXeX2HxWn8xYuUsLxbKTlk9Xs7yixpkRIiF31/zKpZHdro d2ubujMEfXqaUMHpUEeJi1QBgG2RKjAa2oP+7JchJVQan+B3Vh65mW0aQOr5 HZPbV3V5uEah7rh9qdZ+aPqfH9aX36ou9/LGJMsvlBI29K+sKdl9haW44M7K MC/TRIXHw/dYfQCAbZAq2Mu9szvmvtM7uE4l75Ily1YP6Pl/m+NSzn/ZOiOd VFcY8GPmVSQ5/mjUpoi5U8e+/mLHFk/VqNQkfFfivy8eSf+serd9nXIenj4B w9c73SP429+bWiFoqr2xyyxpuX/gw2YdvrZqq4yHF+lHdmeAkKijxEWqAMC2 SBUYDe0g/c8J9dx8O807npLLb6adXNDZN3Mlg9p38JZk6z5Uuraog2l1Q6nu KxLznF+QtLqHd6svzlkog7V7RvtpTKECU6Bhf6QKdnD/zMb3Q2t4lqoT9vH6 w/H3dLq7Jze+E1jer3NYM2Om6N3ru1uml+pOrJn4XvjIIb2C/UxrtjQ1Bv+U FUrqLm16q3HpzGuWyj10/hXnmt50b9PAisY/nrrSkK05rsdSwq7wht4trNsq Q3d8aoCraf3Z+3/QssIJUUeJyz6pwv79+0kVgGKCVIHRsOjp/p7UpFrfNRYb dekvLGxfOrP5Qd0PDlpXfCZtfLmcXNh7tlsQn3dVf291n6YTD1v4XMPhNZIr X3XV4TuZAg27I1UoYtrzP4xuVk6trhAy5ffsi6x0/0xuYurVWqLTklyuUMlH ZrUtb7zMeLScfTbjRlpK2DHqKe8abV4bP+717s/Wqe7X9JXlp5zrfvn+jtdM HWvK9o64eMso8frFU4d+XTfnnQ6Pe1o970B/dlYLN9NCilGR5LXOiDpKXPZJ FRISEkgVgGKCVIHRsMhJiUu7N590NK/C++HeY+pKr+2wqvpM3Tm8qlz5ugXP in3Ec7Pk4zt+i7VQBuvjZreUK191+f4/5LGQAigipApFKfXk0r41DV9xz6fH 7bmTIzhI3TRQvvJ4PGehlaD2yMdy6OjWYtZZvf7Sqt41nx659YqzrXnIJi3q bb8899ex1Pc2J/2lec97yJfWysO25zZRDcKjjhKXHVIFScq44h45coRUASgO SBUYDYte+p1riXlPAdCdmtFcfmSoqfVutDUdx7X73stsAtZkSmG2mJeufmtq dq4q2W05u6lDAaQKRUa6vvWNJ90N97Vln/v8mHleeXtFN+MyKregzyxN6df9 PcnYzFHl8fzc6MVhdTvNP+1cUxNySN8/ro7cCsE9cOzG3b9m2L3r5y3rl896 q3Vll4zVICN/tSb5la4v6VQiM6/Nq/ENBEYdJS77zFUwSE5OjoyMJFUAnB6p AqOhI5Di55u2c/DssMiaLc11Rz9+2rRe98nc1uve+2VMz08sLXn4l9vf9fZW 5f20EihapApFRH9haTdjhwDv5+ecziV71O4ZXTMjnHRtPNnylH7t7+/UMiaY 7uV9nui1wqouheJK/2tiA1N/xeYzTuU4Kfd+G1Xb1Xdwzl4LuZJufdfLdGkt 3WMVG+s4KeoocdktVTA4e/YsqQLg9EgVGA0dge74tGeMIYG7dV3A9GdnPmta r/vYW7+ZPTfTnfy8jf/wndZs5pC85VUfeSGFa7PpMfQohxJIFYqE/lJED+O3 2+3piX/m9nQ9bd8YfxdjNDn+QB4RZMrWwfJFwq3l7EctthKd7sQnTU157dP/ OWJ2Uu5EdKvUb+0daz4p6YcBFeRLq1eHRVcJFZwUdZS47JYqSJKk0+mio6NJ FQDnRqrAaOgI7q7rZ3yqVfKFhdY8CZTiF7STt39Q+w7ZmmO9rnTr94lB3uVe XH/Xiv9wWuSox+SFFC71rG0TCdgYqUJRuLd75OMZX251uR4rr+dyVyvd/vGV yhn3vRq/t6PymtIv3VzVo5TxIlE3z/TBCehjZweb8tonxvzP7M+qP/1Z2x7L blgTEaRsH1ZZDhXc28y94ORZTDFGHSUue85VMLh69SqpAuDcSBUYDR1A8rYh GQWoxu/NXdasvpVurpSLfJWqZMevjl00Oh8bc3jv1ohP33qhlpexoXtu9xE5 pR/8oJ4829fatcKA7ZEq2J50ZUnn0nKnwCFb7+XyAu3RKU095Be89nPefV/u //qW3L/QLdi5JyvoL33dVs5rNdVH5HJB1J38YUmkNVfWbHmta6DZQgo4D+oo cdkzVZDbNh46dIhUAXBipAqMhoqTEr/vW0GtUpfvssS6vgb3fhxYIWuz+Fy5 t/rinBUfpYuZ3sy0p2TFVzZbs1YYKAKkCjaXdX+sLtf/h1xCBd2Zr9rKq/7V FQbkvfWL7szc0MqlShgvOSW7RSQ672T+bP0VfV7dYs0FUZ+ceDO3RCZ9/1h/ U3eGpz8+SqjgvKijxGXnuQoGSUlJpAqAEyNVYDRUWvrx6YEeKnWZtnOtfKKV +sub1UyrFuoPW7Rpc4ZNP274PmLBJyOer5HR9NG18WRrtoXQX/yqjdwjUlWK dmJQDqmCzd1Z3bOk8avt1vpL8/n36ae+6ly/ho/xMlK65+q8vvv684u61uuz aNEgY2sFte/Q7XnPaxCYdHN1T1N/xbJ9rWmeoD+3sGu76SfMr7Xpf/1fQzlU sHYXSgiKOkpc9k8VDE6ePEmqADgrUgVGQ2XpL0eEVVSrK3RceNbKB1oPn4K5 1DHb/kEb82kLT5fa7+2zYndK6cayLvKDOZVH6Px4QgUohVTB1h7uZFDyxQ05 27YmH5zctm346FBj7FCi4+I8dp3RxS3q6t/pm3O664s7Gqc+PKKxo9Dubni5 vDwJrGRXK5on6M4t6VYt6L8nzS/cupOZk8By7aYLJ0IdJS5FUgWtVrt3715S BcApkSowGipJurr2xSoal5qDNl6x9qZe9/fkxqaCtdqbu822eUg/+EH96q/v sOZx4t31L5aV/+93Dfr0tDOvloaDI1WwNW30e7XlCU0l+677Vz9X3cW1g5p3 XxC9qKuxN4t7yJzzGd/91FM7Nv91O8dVSBszp13tTsbAUxdj2hvBrcWszNYK 9/+aPzEitw0rxZS8ZbCvHCp4tP368qMuyEkHprQo7R70WS5XzoyWj/IkMLXv 4JzddOFcqKPEpUiqYHD58mVSBcApkSowGipHd25pd1+Nd/DUg7k1U8vdwx7l 6goDfjR/n3ZPeOOX11mz/cP9n18z9Sh3afDRYWd9/AgRkCrYmu7kfwNNGyQ+ 8e7vWeGj9vzG4U2bjd6ZcHfDS2Xl7/7Ev9IfpJ9fO6h5l69OpBlece9uinyf LN2KHBvgF7bsvPyv2uh3a2myTW6Qbka9H9Lh8xNOc+VI3ja0spWb7OoTo6e1 9dGo3INnnc0lVDgzs8XDlWW3iuyA4Qioo8SlSKogGR04cIBUAXA+pAqMhkpJ OTSthbdn3eFb8rOVuXT1m/aepoI1bIV53zTp+opXX11lTZPyrJsElabm6D1W LJgAigqpgs1p94+tIy+BUHnWeXnOziMnj+xcMKpljbqD1p5Pf7j5i+szH2zb 8WW/Rs3Cd9yQ9BdW9qvhpvas1WXS+t1rxrSoXO/N7QlZ15KUbUPkR/legeN/ +jVidIv6vZbHOc1EBSnhuz6m5Q+qEn3WWpxgkJ7w15oJ7R8zpgburT6PMw8V 7u8bW9d05l0DphxzmjOEXFFHiUupuQoGt2/fJlUoNnSnFw9qHdighrdpYMjG 1bt6vYCgdv/5zWnbFRU3pAqMhorQX17/yuMe1XouOZO/+/lbq3uVVlk9STcP 6Ucy24mpfYcwSReKIlWwPf2l1X2rarLXL5oKweO3XzbOLdBGjqqR+Xtq72Zj d14zroLYPLBM1qvd/HovjvnXCqukLYMrZ+4941Kl4xeHrZ9i5ejun/3uldqu mX90dZnAN+Z89+PWbSZbNm1Ys2z+ZxNHvdyuoa9H1hnyCPnSbKed+7EbRzTy yvqgSn1WXXKayRzIDXWUuBRMFR4YRz1ShWJFuvvHR00fDiDqSi9M+y2eJ3pO hlSB0dD+pNu/T2zuXT5kxp/5LcuTNw+qaJqk29y6TdB1Z76ftvwfs8JWf2bm s/JCCpV37zW383kYgE2RKhSJlBOrRof6l/NwL1W1Uae35kVlK2Du7ZvSpkqJ EpUb9Ziw/mTWFopJB+f0blChVPlaLV+dHRlvftW4uHHEMz6lfBr2nLz9glP0 IEw/Mvfl0FZN61R0N3uG9Eiez32VtbmGdGPz2I7PBQfUKueW41XqktUaPtvm hdeXW9uNF2KhjhKXsqlCampqVFQUqUJxoo16+zFTnK+u3H9DAj3SnQ+pAqOh vaUc/fIF31JNxuzO/77vab+OND1hdHnqw0NWPAPTx6/o+US/782W9krxC9qZ FlJ4dfg2P0swANsjVQAgIuoocSmbKhicP3+eVKE4ub0yzLTvmsZvVKRZs3U4 AVIFRkO7Sju5qEd1L/8hGy5ZfnIlJZ2PuXAvlzv99D/ef9LFdEV6O+rRzwr1 F1b0rFKu13dmu9FLN1f1MC2kcAueHcv2D1AWqQIAEVFHiUvZVEGSJL1ev3// flKF4kIbOco0VUFTfYT5Dm5wBqQKjIb2k3Z6WR8/z8f6LM+rmYI2LqLv0/3X 57Io4eGekmqfV7c8shXC3QPTWpXVePdcbRYqPLi74aXymds/ZLSABxRFqgBA RNRR4lJ8roJBYmIiqUIxkf5XVjczQwmf/Og3QECkCoyGdpJ6ckkfP49K7Wcf uJFk5u6dmzfi4479vvGLEa2quPsO2pxk/gG641MDTP3EPDouvpHnqgXdtd8m PeejVqm8e6wyW2gh3VrXzxQqqKsM30lgCqWRKgAQEXWUuBRPFSQpozo7evQo qUIxoD/zWZCp706ZPt/TzcxJkSowGtpDyj/zu1c331QmV+qqr/2cS4qZun9c 5n5lqrIDfrQ0VUFKubDn2/A21eSLV+mwFWb9YPSxc9qYlnap3Fp9cZ71D1Aa qQIAEVFHiUvxVEGWkpISGRlJquDkpMvzQ00bQHh1XHyNbmZOilSB0bCoSXcO fNau0r+2eMuLpsaI3WY716Zd2v5es1IPX1Sy4Usfz120PMJk+ZJv582a+sFb Azo28yud7b9UqltEjjkNqRd3fNQqc1v2jK1tei6Nc4pm7hAZqQIAEVFHictB UgWD2NjYIkoVMqbC3r1rk49CYUiJK8JMNbx7a/M9iWF3t2/fTk62/ToUUgVG wyKm3fdebasjBZVKUyt878PbfP25iGFtghrXrujx6HeaK9V1WWaokBz5ccfg wKcfL59z4zOVyqNC7UaBLfvN+4edz6AQUgUAIqKOEpeDpAqSJOl0uujoaBum CleuXFm4cGGnTp3c3d2joqJsdagosHs/DjA9z3MNmHqcalt527Zt8/Ly6tGj R0RExK1bZjvlFRSpAqMhAGWRKgAQEXWUuBwkVZBdu3at8KnCiRMnpk+f3rx5 8+wPjkgVHEDqrjeqmVqkP/n+H7RIdwDbtm3L+o64uLiEhobOmzcvPj6+kB9L qsBoCEBZpAoAREQdJS7HSRXkto2HDx8uQKqg0+n27t07ZswYf3//XCetkioo L/1/Y54w7SlZY+SvrDp2BNlTheyCgoJmzJhx+vTpgn0sqQKjIQBlkSoAEBF1 lLgcJ1WQJSUlWZ8qpKSkbNq0aciQIT4+PhbWwJIq2IyUqWBv1/09qZFpW/iK gzbbY0/JAh9q8WEpVcjy1FNPffTRR4ZvYr5OJqkCoyEAZZEqABARdZS4HC1V MDh16lTeqYLhmJcuXdq9e3cvL6+874myhIWFzULhnDt3Tj7/en0B+izqY2cH m1qaeff6zmYr+PMiN+tQ+rQ5tHbt2ln5DfLz8wsPD4+KijKc0keeeVKFWYyG ABRFqgBARNRR4nK0VMFwJ6jVavfu3WueKpw5c2bmzJmtWrVSq9WW735QVAID A9PT0w1/QQVJFaQr37zgKX+OV/tvr9plEoHh/vfy5cvKnjTn4+PjM3To0C1b tqSmplo686QKjIYAlEWqAEBE1FHicrRUQRYfH2+eKpw7d+7rr7/u2rVriRIl lLupKr6aNGkiP6cuQKog3Vrds7T8MW4tZ8fZZ09Jw3HGxcUpe9Kcj7+/f3h4 +K5du9LSLPbGIFVgNASgLFIFACKijhKXA6YK8uL9gwcPWloBkZqaunPnznfe eadu3bpW3gqxAqLw2rVrZzjzBWutkLz5lYqmPSWbTLbjDu4XL15U+rQ5NCtX QLi5uYWGhn7++edW9m8kVZjFaAhAUaQKAEREHSUuB0wVZHfu3LFmD4i4uDhr JjDQrbHwdDqdXq/XarX5n6uQ9uuI6vL2Dy7+Y/ezp6TDyLtbY5UqVYYOHbpx 48akpKR8fSypAqMhAGWRKgAQEXWUuBw2VXhgXAdh/YvznsBAqlB48hQFvV6f 77kK6X+8/6SL8e9BU+3NXyyuxi8CbAORt1xThebNm0+ePPnQoUMFPnukCoyG AJRFqgBARNRR4nLkVKHANzVxcXHz5s3r0qVL1iYRpAqFp9fr5b4K1uwCkJ3u 2NQA056SFQZuuveol0u3f/vsk603bBIHFGi7imIkK1UoU6ZM3759ly9ffv36 9cJ/LKkCoyEAZZEqABARdZS4HDlVKLysCQxHjx5V+licRz7THv25L1q5yzeZ pXusuvmo997/Y0KT5lPs2HuhODtw4MC4ceOioqLS0225LoVUgdEQgLJIFQCI iDpKXI6cKjB93RlI1xZ1NM0Y8Wy3IP4Rf6Xa458GlwmYcoxQQWSkCoyGAJRF qgBARNRR4nLkVAFOQEpc1cO0p6Rr0Ken816QoD3xeRtvt4CpxwkVhEaqwGgI QFmkCgBERB0lLlIFFCXpxoowb/kOU1Nz9B5tHi9Ni1s7tJ6nypVQQXikCoyG AJRFqgBARNRR4iJVQBHSnZ4V7GnaWsCl7vg/LKQKqVf2fTuyRaWMfSJcn5lG qCA6UgVGQwDKIlUAICLqKHGRKqCopF/97T+ty6sfblno5d9p5IdTPjGZNmXS xPffHvZix+a1y7pmvsS16ScnCBVER6rAaAhAWaQKAEREHSUuUgXYXMzC/q2D Gvv7eGZLFKzj2mx6DKGC8NLT05ON8rsJqRNgNATgCEgVAIiIOkpcpAoAYCuM hgAcAakCABFRR4mLVAEAbIXREIAjIFUAICLqKHGRKgCArTAaAnAEpAoAREQd JS5SBQCwFUZDAI6AVAGAiKijxEWqAAC2wmgIwBGQKgAQEXWUuEgVAMBWGA0B OAJSBQAioo4SF6kCANgKoyEAR0CqAEBE1FHiIlUAAFthNATgCEgVAIiIOkpc pAoAYCuMhgAcAakCABFRR4mLVAEAbIXREIAjIFUAICLqKHGRKgCArTAaAnAE pAoAREQdJS5SBQCwFUZDAI6AVAGAiKijxEWqAAC2wmgIwBGQKgAQEXWUuEgV AMBWGA0BOAJSBQAioo4SF6kCANgKoyEAR0CqAEBE1FHiIlUAAFthNATgCEgV AIiIOkpcpAoAYCuMhgAcAakCABFRR4krLi7O29u7atWqLwAACqd///4BAQED BgxQ+kAAFGt9+vQxXIs6d+6s9IEAQD4EBwcb7kzfeOMNpW+RkW8xMTEqlcrN zU0FACickJAQw6+tW7dW+kAAFGuPP/644deGDRsqfSAAkA81a9Y0/Nq9e3el b5GRb2lpaREREevWrTsIACicw4cPZ/0KAEo5dOhQ1q8AIIpdu3YZ7kyPHTum 9C0yAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAABAPvw/QFGRDA== "], {{0, 421.}, {697., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->{144., 144.}], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{380.5555555555558, Automatic}, ImageSizeRaw->{697., 421.}, PlotRange->{{0, 697.}, {0, 421.}}]}]], "Input", CellChangeTimes->{{3.844849044401312*^9, 3.844849046205197*^9}, { 3.845029961898331*^9, 3.84502996335292*^9}},ExpressionUUID->"979c756d-f72a-4a05-bcd8-\ b7aaf69937f0"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Clear", "[", "F", "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"val", "=", RowBox[{"{", RowBox[{ RowBox[{"dmaj", "->", "0.006"}], ",", RowBox[{"P", "\[Rule]", "0.001"}], ",", RowBox[{"d", "\[Rule]", RowBox[{"dmaj", "-", RowBox[{ RowBox[{"2", "/", RowBox[{"Sqrt", "[", "3", "]"}]}], " ", "P"}]}]}], ",", " ", "\[IndentingNewLine]", RowBox[{"EE", "\[Rule]", RowBox[{"210", "*", RowBox[{"10", "^", "9"}]}]}], ",", RowBox[{"h", "->", "0.156"}], ",", RowBox[{"II", "\[Rule]", RowBox[{ SuperscriptBox["d", "4"], " ", RowBox[{"\[Pi]", "/", "64"}]}]}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]1", "=", RowBox[{ RowBox[{"-", " ", FractionBox[ RowBox[{"F", " ", SuperscriptBox["h", "2"]}], RowBox[{"2", " ", "EE", " ", "II"}]]}], "+", FractionBox[ RowBox[{"M", " ", "h"}], RowBox[{" ", RowBox[{"EE", " ", "II"}]}]]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"sol", "=", RowBox[{ RowBox[{"Solve", "[", RowBox[{ RowBox[{"\[Theta]1", "==", "0"}], ",", "M"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"w1", "=", RowBox[{ RowBox[{"(", " ", RowBox[{ FractionBox[ RowBox[{"F", " ", SuperscriptBox["h", "3"]}], RowBox[{"3", " ", "EE", " ", "II", "*", "4"}]], "-", FractionBox[ RowBox[{"M", " ", SuperscriptBox["h", "2"]}], RowBox[{"2", " ", "EE", " ", "II", "*", "4"}]]}], ")"}], "/.", " ", "sol"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"u", " ", "=", " ", RowBox[{"2", " ", "w1"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"ksim", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"F", "/", "u"}], " ", "//.", "val"}], ")"}], "/", "1000", "\[IndentingNewLine]", " "}]}]}]}]], "Input", CellChangeTimes->{{3.8129497521197233`*^9, 3.8129497948767295`*^9}, { 3.8129498481994433`*^9, 3.812950302056923*^9}, 3.81303889118769*^9, { 3.813038960614086*^9, 3.813038961545185*^9}, {3.8130389938462005`*^9, 3.813038996520574*^9}, {3.8130390304628077`*^9, 3.813039065011731*^9}, { 3.813039102876684*^9, 3.8130391337543135`*^9}, {3.813039281327712*^9, 3.8130393041717796`*^9}, {3.8132865883094273`*^9, 3.813286589923624*^9}, { 3.8444834066550198`*^9, 3.844483470263157*^9}, 3.844483845901438*^9, { 3.8444840728096666`*^9, 3.8444840857801*^9}, {3.8444841262147436`*^9, 3.8444841343018246`*^9}, {3.8448357097477417`*^9, 3.84483572216403*^9}, { 3.844849059234891*^9, 3.8448490828892474`*^9}, {3.8448491502206926`*^9, 3.844849438911809*^9}, {3.8448494729818006`*^9, 3.8448494909898376`*^9}, { 3.8448495444217443`*^9, 3.8448495819499073`*^9}, {3.8448496166017857`*^9, 3.84484970008974*^9}, {3.8448497362187977`*^9, 3.8448497502025537`*^9}, { 3.8448500068353634`*^9, 3.844850015382332*^9}, {3.8448501615942245`*^9, 3.844850196287755*^9}, {3.8448502527348604`*^9, 3.844850282445593*^9}, { 3.844850331914016*^9, 3.8448503364369287`*^9}, {3.8450081202099876`*^9, 3.845008134234742*^9}, {3.8450941857601767`*^9, 3.8450941975065546`*^9}}, CellLabel-> "In[352]:=",ExpressionUUID->"db707e5f-591f-4855-acc2-49096d8e3c4f"] }, Closed]], Cell[CellGroupData[{ Cell["Modelling assignment (numerical)", "Subsubsection", CellChangeTimes->{{3.473055512584*^9, 3.4730555529630003`*^9}, { 3.4730575328269997`*^9, 3.473057539222*^9}, {3.4734691424642*^9, 3.4734691605758*^9}, {3.4736023142902*^9, 3.4736023273162003`*^9}, { 3.568715518105007*^9, 3.568715523097016*^9}, 3.5994750893663483`*^9, 3.6297916561604834`*^9, {3.63073778491436*^9, 3.630737793931176*^9}, { 3.6624537703648133`*^9, 3.6624537732749796`*^9}, 3.685248933840145*^9, { 3.685267058363743*^9, 3.6852671273738394`*^9}, {3.685323461463516*^9, 3.6853234663335233`*^9}, {3.6858764211836576`*^9, 3.6858764235236607`*^9}, 3.6859482147140565`*^9, {3.686226212775403*^9, 3.6862262151354065`*^9}, { 3.686466369367293*^9, 3.686466390117322*^9}, {3.732333324403823*^9, 3.7323333512571926`*^9}, {3.7330531980857735`*^9, 3.733053200539534*^9}, { 3.765153863866486*^9, 3.76515386489231*^9}, {3.8118138435289817`*^9, 3.811813849823517*^9}, 3.8124375379704094`*^9, 3.8127675639334793`*^9, { 3.8127680161779313`*^9, 3.81276802796828*^9}, {3.812768121179119*^9, 3.8127681248014617`*^9}, 3.812768816838984*^9, {3.812782893145988*^9, 3.8127828965539527`*^9}, {3.844482705134335*^9, 3.844482705498743*^9}},ExpressionUUID->"ca977ddc-4dc9-4a99-bb79-\ 5080699989d4"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", " ", GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzs3XmcVWXh+HFmhmWQfVMBwRVwJ9wV9x1zgdyK3HPJJUgyU0p+Wmppam7f Erc0l8zSUsMlzQUlN1LTxFwTcUkREZVlgLn+BmFmLjCHucA89z7nzPv9Ry+D Z+Y+w7zuufd87nOes/YxI79xfHmLFi1+UFnzP984+ke7jBp19JkHdq75PweP +MGJJ4w47tghI0477oTjRm1zTEXNH55Y8z/DW7doseC/vwQAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAFh5s+45cYN11lqj2yoVLRpVVt6yddsOXVfrs94mW+2y3/AT R//q5ocmfTy31D8CAAAAACynuR+/cMvJW3QqWzx/Vfbot+Wu+x1yxLHfPfmU U046/ujhQ/fYesCqlfmjWq+6+aHn/GnSZ7lS/wQAAAAAsDzmv3L+Fi3rO1er HS9/p7qBYbnZ7z17+3nf/lqX8vqxbdba/+KnpitiAAAAAKTH3MdHrlmfuFrv +pv3ltG35r17/+nbdK5fJlbWcZuzn/yseJMFAAAAgJUy/7ULt2pZaA2rkfvk 4e9v3KZ+hVjFOt/9mwViAAAAAKRD9TuX79hqOWpYjZlPjBqQtwF/6y1/Pml+ MaYKAAAAACupesqVOy9nDfuy+o2Ltq3/mhYtB/70JTkMAAAAgBRYkRr25dx/ jFo3fz/9/X43PfxMAQAAAGBlrVANmz/p/M0XvxPl5IbuRAkAAAAAcVmxtWET Rq2TvzZs3xs/sZE+AAAAAPFboX3D3vrV4Lx9wyo2GfOveY18yex3Hv/dud8d tv1Gfbu1a92y1SqdV19rk50PGXHhH1+Y1siWY1XvP/37X5xy8K6D1l29U9tW 5eUtK9t367PB1nsf/sPL7375k2V+ce6Ltx659oxDtli9deVBf5yT9x0nXD/6 sF026t25bevKTr033v3o8+969YulHvd/E//wi+P32bJ/7y5tW1V26bvZ10++ 4uEpVY38nAAAAABEbQVq2Nznx2yad51k661+8cqyotSct+46Y48+bVq0aNNj w+333n+/PbfbcNU2dV9d3mnTo65/6fMGvzI3/ZnLDu7fbsGwyj7bf3vUORdc eP6PTz54q56taztc921/eN/7S1+kOe/jl+665OS9B3SqXcDWZlENy02f+Ovh G7RrsZT2A7837oO6bzRz0o3fGdipbKlR5avufvFzMxv9NwUAAAAgVstdw2a/ eOEOHfL2DBsw8pHPEgfnpk84d6fu5WUdNj167NMf1i0gq/rgqWuO/VrH2txU 1nHrH4+fvsTj5mY88eMtFz5Q+23GPPlpLu9vnv3Fzl1rv7jjzpe/lhfjZj03 9qjBfdoukbG+qmHVH9w74mvtax6uVYfV1u6/Xq+OLfOHlHXb9/oFu5/lPhk/ ZnCXBd+9ZfuaYf36dmmTP6zl+j94Qg8DAAAASKvlqmHzPhx/wZDeFXXDK3ru c+VLsxKHz3n5st26lrVot8XoJz5d6rvmpv3txP51Paq892F3fpQ/ZuZjI9db +EBlq33nviUfY17eNv7lfU95tP4Cxur3n/rrgxP/89pzt5+4SX3GanPQbW/e /d2NO6+x08n/98CrMxYuApvz/vhL9u9bn8Qq+p/+1MdPnrNtp9Y9dzj5yvtf mb4wss3/9OXbThrUvn4Z2d7XvueeAQAAAADptHgNa7nJSX+Y8OKb73382ay5 86tzX36Zmzf7s4/fff358Xdd/4tT9t2gU/3e+ZVr7v2TcZOXsY9W1b/O26pt ixatBp3zQsOjclNvPqBjfYta/0dP14+bPe7o7otWf1UM+NEzS21LNu+FMZvU VrlW213y1tJ5qvqdK3aq+8Eq1lx/4OaHX/P8UlFu5tNnbFKf5HptuknPPkN+ 8fjUJb/d/Dcv26luvVnbr9/wsZsGAAAAAKTS4jWsMJVrDRkz7r+zl/l9c/+7 aeiC6w3b7PJ/7yStpKr+76Xb1z92+Zojxs+t/eqp1+1duzlY+bo/+Mfcpb72 898Pq6xNXf1++HQDu/jP+euRXepT28kPNVywqt+8eNv6aLbukXdMXvqxFgx7 5/IdW9VP6MkGBwEAAAAQu8VrWFnH9bbfZ9hBhyx08IFD9xuy2+BBA3p1WGyL ra8WZHXbaMhJl973xlL3Ylz0bd+6bIc2X5WqkQ9+MDXJu78dukr9t2y51QWv 1u4ANu/5MZssnFZZ14NuayBkVY07ssuixWPla5z8aAN1au5j3+u75C76Dah6 8ITVa/cgq/zGbUl7glXdd3S32mGdDrs76bsBAAAAELXC9g2r/uK9F+69evSh m/dYIou1WWvfC55YOlbl3rtq9zYtllNZrxMfrr9Wcs5b4y783jHfOe03Ez5q aG3ZzL8e2WNRnSrrecJDDVyLOe+p09YroIbN++foDWuvuWyz302fJgyb+8T3 16r9bpUH3p68WRpA9lxyySXnfqXmP0o9FwCAZuqCCy5Y+JbsiiuuKPVcIO2W 756SuRkv3XziFp3LWuTrsNWYJz9ffNzscUcuXElVscHxv3vgwcI89Nikxvfj mvfxS/dc/v2hg1ZtXff4Zauf8GBDNeyZH/Wvy1zJNWz+i+cMrE18y6phT+a1 tWG/T1gSB5BJXbt2XXj8q/mPUs8FAKCZqqxctF1Qnz59Sj0XSLvlq2EL5GY8 /dPtOizWwyr6j3wsv4dVv33ZDgu/actB5/57fuK3Wh5z3n/q5rO/vU3vmqd/ 69W3OOQHx+3YqXZtWEINe/aM9dUwgCaghgEAlJwaBk1n+WtYjXmvXbJD3oZf Ndrtdc179Rc01l99WN77pIdXdsf5mW/ed/F3BvdusyCDbfXtc2595oOqL7+s +ttxq6lhAEWhhgEAlJwaBk1nhWrYl19+dtfhPRa7XrLt12+ov8wxLx0V/B0b NPO1O07fvc+CHcjarrv/uePeqt/jvtnWsJEjR1599dUTJkyYPn16ySYBNDNq GABAyalh0HRWsIZ9OeO2b7TPr2EV/X/0zLzav5z33I/rdqbvfOgfZ6zQzOa+ fedJX+u4oHhV9P76pRM/XXxezbaG5f+j9+zZc/fddx85cuQ111wzYcKETz9N mj3ASlHDAABKTg2DprOiNWzuhFHrlOeFmfI1R4yvuySy+p0rdqr9pmVdDvx9 45vj13zN5CcenPRZ7cDc/+7+znoLv0XlZmc9M3Op4WpYg3r16jVkyJCrr756 6tSpJZsikDlqGABAyalh0HRWuIY9evIa+TWs5dYXvla/XX7Vg8evXnchZevN z32x0b3D5jxx6voDz3p+4fKy3PS7j+y18LuXdR9+Z0OFSg1btvLy8t12200W A5qEGgYAUHJqGDSdFaxh1f+9dPtW+fFl3VH/yCteuWm3DM27kLLD4F+8MHuZ 3+7tsXt27nPSwwuTVe6TW4bVfnWrna+cUt3AV+TXsNWOb0Y1bNy4ceeff/6h hx66/vrrl5UttndbUhbbZpttjj322EsvvfTBBx987733crkV38gNaJ7UMACA klPDoOnkX9RYeA2ren5MXUL6qll97af/mpc/IPfx7w/snJdqWvY96LevJQWp ua/+eq9uLdcbNWHRgHkTz9ygtmO12v5X/22shnX/zv3Np4blmzVr1sSJE6+7 7roRI0bstNNOnTt3bjSO1ejUqdP+++9/8803z5ixYju6Ac1O8BpWNX7EWuXL PnY1ZpVv3pl0oAcAyAI1DJrO/Ncu3Lq+axVWw7549qfb5G+hX7HWcfd+suSX zXpiVP+K/BOVlj13Pv3O12ct+fhTn/zV0DVblXXY4zd11Su/Y7XoNPTmqUtP 6Yt//3Lnuil0+PZdi06Bcp9/9nnt4HnPnF43gTYH/mHJB66bwIvnbFpXw/a9 Mek+jXOf/MG6dTXsgFs+a/QfqQRyudx///vfSy+9dNttty3k1LF169ayGFCI 0DVsiRjWsl2PNQdsusW2O+yy+15Dvr7vfvvtv5R9t+nbOu94VtZp+188l3Sc BwDIBDUMms7cx7+fdwrSeA2b/+GjP9t11fxP8NttPnrCZw18UW7auGPXXqyH LXiA1TYbNuK8K6///R13/uGGy88+YZ8NOi8Y0n7whS/VX2iZ+/C6vSvrz4r6 n3DvR3nff/5HT/36iE065C08a7XL/71bXfMX740buceIumVicx+p39ms9T6/ nZbwc8375+i6hWit97j6fwnD5j4+cs3yxodFY8qUKZdeeul2221XSBZr06bN Kaec8u6775Z61kCkAtewRTGsrP36Q8+87sGXP5rT2CH2i2d/tm2H+oNYxVqH /em9hpYRAwBkiBoGTWbepPM3z7vkseWg0x74z/9mzm9g5PwZbz1x67mHbd4t P3BVrLrTmEc+SjwF+WLiBTt3a3Rrq/KeQ3/75mLXWVa/c9Ue7fJGrNJ/2Jjf 3f/4+L/dfsVpwzbuUlG53kGXXHx4/S7+Lfvu8b0zT9q9b5ctf/KP2jCXe/+q 3eoWDlRscObEeQ3N8MsvP7vzW13K6oaN/mfDw3If33RA3Vq0JTZJi9u0adMe f/zxq6666pRTTtl1111XW221pN9D69atNTGgQWFr2IIYVtFm/SNvfW2ZO0zW qn7vT4etlfdS1GHbnz0bx+XrQFP7/N5TNl5j1Y6tG98otRFlXb55R5Qr+wGW hxoGTWLu1Od+d/zAdku/YShv232dTbbcbqfdh+x/4MEHfWP/vXbacoPeHVou Pqiyz44nXPnE/xoKZ/m+eOmqA9duk/zmpNWaB17z8tJXt8x69pwtGphZiwVl 7NArn52eq558+Y6tF/uLNv2O/OM7i6aT+/yVG7+VvzCtrPsev3x62pKTrf78 1T+esHHe7MpW3f3cv09Z8nRs/vSXbjyiX96jlXXb+ZyH30vrBjWvv/76+eef P3DgwAb/fTUxYGlBa1jV+BFrd9/rN68nfGaxhJnP/Xz7jvUnxhV9vnlbg/da ATKk6oPHf75H9/wk1mat7Yd+YynDhh2w39f33n3HrTddu+vibxPbH3Bz0mUC AOmhhsFKmXXPiRuss9Ya3VdZ8jLGBGXlFa0q23fu3mvtDQYN3uMbR444+/Lf P/zKtMLOW778Kk39cfT+G3ZdIqe1aNNr8AlXPz01oadVf/j3s/fss1hHa7Xa diff9NKixV/V791y0Gq1q8Mq++51zt8/XHA+VP32tQf169Wpwc8QK9p1X6Pf vlf8p+YRqx4YsVHf1dovOaWFP2/rTj3X3eOiF2t+wNn3nrLx2j07tmpoWHnb bmtud85TqVkktrTXXnvtvPPOazCLaWJAvpA1rGr8iA13uuS1xj5b+Urug78c vU7ekbv9VmOe+rypJwTEqOpvx69W/+6uco+x7y87bs2b9q8//GiX1Re92W27 1zUfiGFA+qlhkEZzp7788J9uvOrSC86/4NKrbvzLE2/OaPzcZ9a7z9x1/WUL vmLs7//276lLlKc574z/3a8uuOTqP06YXNDVNSR47bXXGlwtpokBCwWsYVXj v7/10XcXdCuP2f+6aKe8uxWX9z7o5skFRTQg/eaMO6pr3fO/9U5XTC5kUeic ly7cfsFOF613vPxti0iBDFDDAEJYeBHlxhtvvHQTmzJlSqlnB5RMwBqWmzNj RqO75i8Y9+Ffj+uXt1J3lc3OnDDDUg9oLqrfuGibuiNAy61/+XqBKfyzPx3a qUXLrS54VToHskANAwgnl8uNGzduiy22yG9iFRUVhxxyyIQJE2r+ttQTBIot 8D0lGzfn35fu1jVvWVjPYTe8VfD1+kDq5abdtH/dhrItB53770Lj1rxnTu/f ZpMx/3LAADJBDQMIrcEmVmPQoEE33HDD7NkuToVmpLQ1LDf1/hPXz9sQu+3A H47/VJeH5uTzv3y7LohXbPjjhFuAN2DuIyevOeCHT4thQDYErGHzXhizSYEb iydp08RTAiidhU1siWsna3Tv3n306NHTp08v9QSBYihlDat65f/27Fa/LKxs tf2ufcOJLTQvs+77Tt0W+uXr/eDJwu9hNONPR293xuNVAecGUEThatgSMaxi le59+m2y+TY77LL7XkO+vu9+++2/lP12WHeV/DPEVQad0bRTAii5WbNmHXbY YUvX/wEDBrz++uulnh0QXMlqWG7agyM2zLu7cOXGpz78iWVh0MxUPXJyn9r7 iJf3PeVRcQtoroLVsNoY1nadvU/9zb3/+mBWY2+35rx8+R75H1eufsD1b/q4 EsigXC532WWXlZeXt1hcly5dHn744VLPDgirRDVs7mtj9+mR9z6rx5CrXi18 SQiQEXOfPG292vcfZT2PeyB5s4a5r979m3sK3WAfIH1C1bAFMaxlyzUPHPvi 54UMz338wMkb5O1iUbnpDx6d7uNKIMMeeeSRbt26LRHEKioqxo4dW+qpAQGV ooblpj8yapPK+kNNmw2/9+A077Og+Zn33E82qr16p6z74Xd/kTRw/lu/3r37 zldMrm6KB/3w6etH7b/52l3bd+63z/mPJ69J/eLFOy7/1Vcuu+VpxyggsEA1 bN4LYzbtvN0v/lXY1tBV//nN3t3zPq5c9etXv+bjSiDzJk+evM022yx91eT3 vve9efMsjoVsKn4Nm/fGdfuvlvc+q9seV0xycRQ0R/MnnbdZy9pjQedD/vhp wri5r/16zy6tt7zg1ZVeGjbvnXt+sG23vNXwrXe8PCmxzbz36FXLFl0ldOz9 s1b2oQGWLUwNm/fCmM02H/NcQe+0cp/8/fsb5+1i0WajEQ/5KABoJubPn//L X/6ydeu8xbFf2XPPPe2rD5lU5BqW+3T86V9rm3cmOuC7937kfRY0S9VvXrJd q9qDQfsDbv64wWPBvCl3nbBhZYuKjc96YSU/mZv75s3f6tdrs2GHf32D9rUP 22rbi95ouIbNefikRTualXX99p8Lur4IYCUEqWHzXjh7+wNv+rCQt1pzX79m 31XzPq7svtev/+PjSqCZeeWVV7beeuslgph99SGTilrD5v33xm/0rF+VUdZl 11+9NCf4owJRqp7y613r1iC03fu6/+WdreXmzZr+/qvP3Pfbnx2xZY8F11KW rzvqHyt1sU7uk4dPHbjOAde+WvVl9duX7bCowpV1PeKehq8eqho/Ys1FR6sO w251iw8guDBrw6o+mzG7gIvMc9MfPW3TvF0sWq9/8gMNf0QBkHENLhKzrz5k T/FqWO6zCaM3z7tdd6v1jr2noM8qgSzKfXj9kFVaFKi893cfWpl0nvvfn48Y sMUZT8xYcMyZ9dcja3fFab3bVe83eBiqeuLUdcobDHUAYQS7p2Tj5r352wNW z1sW1nX3y1/2cSXQrL3yyisbbrhh/ttR++pDxhSrhs2ffMvBa+QtC+u84y9f KGw/VyCLcp/cOqxDXexabfN9v1Fv2P777D544Jqd6vYUK+t+xD2JO+wXpGrK 089OXnil5dx/jKoNXS03O+/lBvcim/3IyX0XjWm985XvNMXm/QDLVqoalpvx xBmb5X9c2e/4cXaxAPhyxowZQ4YMWeIj2hEjRthXH7KhODXs86fO3qp9/TGk 5TpH/fkDp5fQnH1257e61C5EqNhg9D8beFdR9cH4C4esviBKdTzoD022eem8 f43ZZNF9LCv6/fDpBt/NfHHfd3oumlzLrS58baU37wdoXGlq2Py3bzqwV/4u Fjtf/KKPKwEWmj9//qmnnrpEENtnn31mz3akhNQrQg2rnnL78L4V9e+zOg7+ +T9nBnosIB1m3XtM3WbN5Wuf+kTCnmC596/de5UWq+zz2ya7rLr6jYu2WbRp WHmfkx9paIfo3Ic3D+1c2+43PedFMQwohlLUsM+e/MkW7fI+rlz3mLtcGg6w hGuvvbZly5Yt8uy9996CGKRd8Br2xcRzt+1Qf+CoWPPbf3rPsjBo5uY8fFLd pdNlvU54MPHdxLynT++/ShNeq5h77ze7Ldq6v2zVY+6d1dBDvvzzLWu3Ta3o f3rDq8cAmlrRa1j1O7cd2idvWVinHS54vqGjIgCPPfZY3YmzIAbZELaGVb9/ xxFr5WX0Dtv89JlCNv/JzZnx6SzrMSCr5v5j1Lp1MWyZe4JV/e34NbZpumsV cx/ftH+72suBvnXHZw2M+Oj2Q+tXrfU95dGGVo8BNL0i17Avnvnp1vm7WKx1 xB3v+7gSINGbb745YMAAQQwyI2QNm/X8BTt0qr9DUUWfb95W0AKP3Me3f3P9 I+5q4DwVyIJ5/xy9Yd3V050Ovv3TxJG592899sDL/t1kbfzzPw+v3a2s/QE3 T1vqeqDcpw+euPFaa/ZYmOrKVvvOfdZJAEVSzBpW/d6fvr1m/S4WLTpsd95E u1gANOKTTz7ZeeedBTHIhmA1LPe/u45ZN29ZWLstz3ry84K+cvazPx7Y+4i7 CxsMpM78f587qO7g0G7fG6cWbZOa2X87rnZ3/Mo9r/lgycfNffr3731tu1NO 2rFy0eqx4Xeq8kCxFK+Gzfzn+YM75n1c2Xf47VMsCwMoRFVV1VFHHSWIQQYE qmGzX7x4587177PKex1409uFre6Y+cyYLdqteuQ9YhhkVPUbF23bqvbgULnb b94t2jnY3AmnrrPoAs3WO17+9hKPm5t23wkbbX32A1d9fdG1lB2G3rL06jGA QIpUw6o/+PNR6+R9XNl+q7Of9qYLoHC5XO68887LD2I77bTTJ598Uup5Acsn RA3LfTTu+H6t6o8Oq2x25hMzCjqnrHr9d4eu1bJs1aP+WsjuYkAKVb9z5c5t ao8Orba75M2ixbB5L5y18aILg1pu+Yv/LB7oq9+97dB+W/904vu3HdRx4Zi2 e13r1mpA8RSlhs1+4Zc75u1iUb7GwbdMtlErwPK77bbbWrduXXc87d+//5tv vlnqSQHLoelr2JyXL9u9a/37rLLVD/jtm4Xck+2L1+48fcdVKxZs1XP0vWIY ZFTuf9fu3bb2+NBys/MmFe00rPqtXw1elOkrNvrJ84sdlub8+5Jd++zwy39X fXH34d3LklaPAQQUvoblPrzn2PXyPq5st/mP//GZ6g+wgiZMmNCtW7e6g2rN f9f8SaknBRSqiWtYbur9J61fn8hbVG562mOfLvN9Vm7WB/+6/7oxh23Ts3Vt PvvOfTZyhYxacFPHupuYVWxw5sRCWnnTPPK03+23yqLFEGuNfHxu3t/UHLc2 6LnXb16b9+Wch0/svfBaypabn78o1OVmz5pTrEkCzVjoGjbnpV/t2iVvWVjP b9z436IdggGyadKkSauuumrdobV169a///3vSz0poCBNWsOqXvn1Xt3r32e1 KOu4+WFnjslz1o/P/NEPf/D975147JHfOnDf3QcP6t+rQ97WFV99Tc9j7xfD IKNyH98yrGPdqVjvkx6uKtpDVz18Yq9Fh6cu3/5L3VEm99nT5+3Qfd2j71pw VeS8Z89Yf+G1lOXrjvrHV8FszkuX7DZoxKNuLQmEFrSG5T6697sD8j6ubPu1 08cv++NKAAqyRBCrce655+ZyDrEQuyasYbn/XT9klRYrqazXcQ847YSMqn7v mr3a1Z+MHXDz9Cb5rh88OGaf/t06rrrJgRc+8XHCW4/qKVfutOj6oJZb/PyV hcu+5r57/4+269Zl+/MnflXHqt++dPtFY9of/MfPF6wae+DkjdY65Lb3XDIJ BBewhlVNumKPbnm7WKy2/3VvWBYG0FSWDmJHHHFEVVXxPvUFVkCge0oCLGXm k6dvWL8atKzbUeOa4BLE3PQ7h/eoPckr63nUPTMaHFa/7KtFi/ZbnDj2D7dc 8cNhG3WqaL/56Q/XFrTZ9xzepXZuh/1l2nt/P2vHXpuOemS6z/aAIghVw3If /+2UDfJ3sdikwONa1efTZ2pmAAVZOogNHTpUEIOYqWFAeLk5H/3rzjF7rbHY ldFl3XY55/5Xp1WtXGya/+I5m9Z/24p+P3yqwZO3+a9esNUS12W3aNlrr19M mFb38Ln/Xb1H3gljWVll/6P/9I5TQaA4wtSwqlevGtIjb1lYj33Gvja38S/7 8svPHzh+gwNu/MjHAQAFEsQgXdQwIKTPxx2/Tud2rctbJCprtUrnTX40oaCz s4Z88dip9ZvhtBx07r8bvktl9bt/+PaadfdSq+gy8LBfPfbB4qmr6h+n9a8t Zu36Dbtg/FRXSAJFE6CG5T55+NSNK+uPt202HPHgtIL61rxJvxy82gE3TRXD AJaDIAYpooYBaTf3jRu+0eur3la+5vceS776snrav+4ae/GFl157x4TJMxs8 xat657HfXnzBpdffNfGDFa5zACukyWvYvDeu3W+1vGVh3ff6v1cKOyOrevlX O3fuNPTmpJ0YAUjyyiuvFB7Epk6dWuTpAXXUMCD9qsYd2aXmlK9y619Manhl GEDsmraG5T597IcD29afjLVe/6T7C1vpNX/Kn49dv01Zx2G3FraMDIDFFRjE rr322g022MDdJ6FU1DAg9aqeP2vTli3aDvrJ0zNLPRWAFdSUNWzeWzcM7Vl/ iXpZ190u+3chty2Z/fZ9P917jQUXlXf8xu/FMIAVtXQQGzZs2Pz59Z/aXnDB BQv//NFHHy3hPKE5U8OAdKv+6MHvD1yl1ZoH/+4NVzcC6dVkNSw3Y8KZm61S fwbWqt9xf/1wmWUrN+ejl/9+03nf2WnN2tVknQ687RMxDGAlLB3ETj311Jo/ z+Vyp512Wt0ffvOb3yz1TKGZUsOA9Jr/4YRLD+7XftXtf3jPZCkMSLWmqmFv 33xQ7/w7l7Td+ODTx+Q568ejzzj9tFO/d9JxRw0/aL89d9h8/TU6tWqxuM4H /2G6GAawkpYOYmPHjj3mmGPy/6RVq1Z2D4OSUMOAlKqefN3+aw0YMuq3z061 WRiQek1Vw77ZqcVKKut8yO3Tm+rHAmjWlg5iS7v44otLPU1ojtQwILXmzplj 8QKQEU1+T0kAYjBp0qRlB7H+/fvbSx+KTw0DACg5NQwgq8aPH7/s5WH20ofi U8MAAEpODQPIpMmTJ/fv33/ZNcxe+lB8ahgAQMmpYQDZM2nSpN69ey87hbWw lz6UghoGAFByahhAxjzzzDN1p9uNspc+FJkaBgBQcmoYQJY89NBD7dq1KzCF tbCXPhSdGgYAUHJqGECWXHrppe3bty+8hrWwlz4UlxoGAFByahhAxnz44Ycn nHBCWVlZgTXMXvpQTGoYAEDJqWEAmfTSSy/tsccehdQwe+lDMU2ZMuXtr9T8 R6nnAgDQTL3zzjsL35K9++67pZ4LAE0pl8vde++966+/fqNB7KKLLir1ZAEA AACgCcydO/fKK69c9l0m+/XrZy99AAAAADJj+vTpo0aNatmyZVIQs5c+AAAA ABnz+uuvDxs2rMEaZi99AADI99lnn1199dWjRo0amaDmry677LKa99ilnikA 0IhHH3100KBB9tIHAIAkL7zwQq9evRrdgHeh7373u/PmzSv1lKEZqTmrPfvs s48//vhjE5x44oljx479/PPPSz1TICLV1dU33HBDz549l72XflVV1XXXXXfM MccMT3D44Yf/7Gc/e++990ryUwAAQAgzZ87s27dvgSlsoREjRpR61iyHV155 ZVKet956q9QzolCTJ0/eeuutC3xi9urV67nnniv1lIG4fPHFF2eddVZlZeXC A8USe+lPnTp16SVkDerQocPf//73Ev4gAGTGjBkzLrnkkkMPPXRogmHDhh1/ /PE33njjrFmzSj1ZILOuueaa5UphNSoqKnxGnCJ1J0EL1Zz4lHpGFGT27NkD BgxYrudmz549a95dlHriQHSmTJly2GGHLTxQ5O+lf8ABBxR+hOnSpcvHH39c wp8CgAx4+eWXe/fuXeBLT69evSZMmFDqKQPZ9M1vfnO5TrcX+t3vflfqiVMo NSylrrvuuhV4bl5++eWlnjgQqWeeeWbw4MF1e+m//vrry3uEufDCC0v7I0Aq PPTQQ/fVeuSRR0o9HYjInDlz1l133eV66enYseOUKVNKPXEgg3bcccf8o80t t9wyviFLXEnx85//vNQTp1BqWEqddNJJy3uiWuOoo44q9cSBeOVyubvvvnvh /p8rkNz32WefUv8EkAJdu3ate9b06dOn1NOBiNx+++0r8P72Rz/6UaknDmTQ 4MGD8w81M2fObHDYHXfckT/s3HPPLfI8WWFqWEode+yx+b+40aNHT2zIxRdf nD9s+PDhpZ44kA7nn39+/tHjxBNPnLSUF154IX/M5ptvXupZQwqoYZDkrLPO WoEa5rMYIAQ1LPPUsJRaooZNnDixwWE1p6tqGLACal7K848eNS/0DQ7zCgLL Sw2DJGeeeWb+y8qYMWPebshTTz2VP2zPPfcs9cSBDFLDMk8NSyk1DAhKDYNA 1DBIskQNu++++xocNnXqVDUMCE0Nyzw1LKXUMCAoNQwCUcMgiRoGxEMNyzw1 LKXUMCAoNQwCUcMgiRoGxEMNyzw1LKXUMCAoNQwCUcMgiRoGxEMNyzw1LKXU MCAoNQwCUcMgiRoGxEMNyzw1LKXUMCAoNQwCUcMgiRoGxEMNyzw1LKXUMCAo NQwCUcMgiRoGxEMNyzw1LKXUMCAoNQwCUcMgiRoGxEMNyzw1LKXUMCAoNQwC UcMgiRoGxEMNyzw1LKXUMCAoNQwCUcMgiRoGxEMNyzw1LKXUMCAoNQwCUcMg iRoGxEMNyzw1LKXUMCDJ7Nmz+6y0Tp065R89unfv3uCw/DGtWrVa+ceFzCsv L6971lRUVJR6OhCRjh075r+s9OjRo8FhvXv3zh9Wczqz8g/96KOPlvrVG4iL GpZ5alhKqWFAkpoX6xYAQMGS1qGRr+ZU4owzznj66aerq6tLPRcITg3LPDUs pdQwIIkaBgDLRQ0rRM2p4sJ/rtVXX/3444+/995758yZU+pJQShqWOapYSml hgFJlqhhlUBM8p+eZWVlpZ4ONF8VFRVq2HKpq2F12rVrd9BBB918882ffPJJ qWcHi9Q8nQtp4ACNGjt2bKkPacByyK9hPuOA2NhFHyIxcuTIuiejGlaIpWtY nYqKil133fXyyy+fPHlyqadJc6eGAU1FDYN0UcMgZmoYREINW17LqGH5Bg4c ePbZZz///PO5XK7UU6Y5UsOApqKGQbqoYRAzNQwioYYtrwJrWJ2+ffuecsop Dz300Ny5c0s9d5qR/BrWpUuXAZCgrKws/5DVpk2bUs+IKPTo0UMNg5RSwyBm ahhEQg1bXstbw+p06tRp+PDht99++2effVbqH4Lsy69hNU/zUk+HeFXaRZ+G XHLJJWoYpJQaBjFTwyASatjyWuEaVqdVq1Z77733VVdd9f7775f6pyGz1DAK pIbRIDUM0ksNg5ipYRCJEDXs2WefvS+7VjKFLWHLLbc8//zzX375ZduL0bTu U8MojBpGg9QwSC81DGKmhkEkQtSwPffcs2mTUXOw7rrrjho16vHHH58/f36T /BZo5tQwCqSG0SA1DNJLDYOYqWEQCTUsNt27dz/qqKP+8pe/1LyTaZJfB82T GkaB1DAapIZBeqlhEDM1DCKhhkWr5hR1//33v/766z/66KMm+b3QrKhhFEgN o0FqGKSXGgYxU8MgEmpY/MrKyo455hhNjOWihlEgNYwGqWGQXmoYxEwNg0io YdGqOUUdMmTIFVdc8cYbbzTJ74VmRQ2jQGoYDVLDIL3UMIiZGgaRUMNi069f vxEjRtx///2zZs1qkl8HzZMaRoHUMBqkhkF6qWEQMzUMIqGGxcAyMJqcGkaB 1DAapIZBeqlhEDM1DCIRooaNGzdubHY1YQSzDIxw1DAKpIbRIDUM0ksNg5ip YRCJEDUs22reVKxMAbMMjOJQwyiQGkaD1DBILzUMYqaGQSTUsOW1YjXMMjCK TA2jQGoYDVLDIL3ya1iHDh32BGLSqlWrumdozduwUk8Hmq++ffuqYcul8Bpm GRglpIZRIDWMBqlhkF75NQwAaJQaVohGa5hlYMRADaNAahgNUsMgvdQwAFgu alghGqxhloERGzWMAv3zn/+cmGfSpEmlnhFRUMMgvdQwAFgualgh8muYZWBE K7+GdenSZQDA8ujRo0fdMUQNg3TJ5XJvr7TTTjst/zThqquuanBY/piNNtpo 5R8XMq9z5851z5pevXqVejoQkZNOOin/ZeXGG29scNhzzz2XP2zHHXdc+Yee PXt2qV+9U2Dw4MGWgRG//BoGsDLUMGiGzj333PzjwB133NHgsPwxrrWHQrin JCQ588wz819WktZrTZ06NX/YnnvuWeR5Nlvz588v9RSgcWoY0FTUMGiG1DAI ZGYeVxhBPjUMWHlqGNBU1DBohtQwAIpMDQPiMXjw4PxDzcyZMxscVvMmOX9Y zVvoIs8Tmptjjz02/0k3ceLEBodNmjQpf9jw4cOLPE8gpdQwAIpMDQPioYZB nNQwICg1DIAiU8OAeKhhECc1DAhKDQOgyNQwIB5qGMRJDQOCUsMAKDI1DIiH GgZxUsOAoNQwAIpMDQPioYZBnNQwICg1DIAiU8OAeKhhECc1DAhKDQOgyNQw IB5qGMRJDQOCUsMAKDI1DIiHGgZxUsOAoNQwAIpMDQPioYZBnNQwICg1DIAi U8OAeKhhmXf55Zdfkufmm28u9YwoiBoGBKWGAVBkahgQDzUs8yorK53LpJEa BgSlhgFQZGoYEA81LPPUsJRSw4Cg1DAAikwNA+KhhmWeGpZSahgQlBoGgXz/ +98/ttbpp59e6ulARNQwIB5qWOapYSmlhgFBqWEQSNeuXeueNX369Cn1dCAi ahgQDzUs82699dab8owbN67UM6IgahgQlBoGgahhkEQNA+KhhkGc1DAgKDUM AlHDIIkaBsRDDYM4qWFAUGoYBKKGQRI1DIiHGgZxUsOAoNQwCOT555+fWOvF F18s9XQgImoYEA81DOKkhgFBqWEAFJkaBsRDDYM4qWFAUGoYAEWmhgHxUMMg TmoYEJQaBkCRqWFAPNQwiJMaBgSlhgFQZGoYEA81DOKkhgFBqWEAFJkaBsRD DYM4qWFAUGoYAEWmhgHxUMMgTmoYEJQaBkCRqWFAPNQwiJMaBgSlhgFQZGoY EA81DOKkhgFBqWEAFJkaBsRDDYM4qWFAUGoYAEWmhgHxUMMgTmoYEJQaBkCR qWFAPNSwzHvggQfuyzNhwoRSz4iCqGFAUGoYAEWmhgHxUMMyr7Ky0rlMGqlh QFBqGABFpoYB8VDDMk8NSyk1DAhKDYNAbrjhhrG1brnlllJPByKihgHxUMMy Tw1LKTUMCEoNg0C6du1a96zp06dPqacDEVHDgHioYZmnhqWUGgYEpYZBIGoY JFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHD gHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHio YZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmn hqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWU GgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYE pYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZB IGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoY JFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHD gHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHio YZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmn hqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWU GgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYE pYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZB IGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoY JFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHD gHioYZmnhqWUGgYEpYZBIGoYJFHDgHioYZmnhqWUGgYEpYZBIGoYJFHDgHio YZmnhqWUGgYEpYZBIGoYJFHDgHioYZn30eI++eSTUs+IgqhhQFBqGASihkES NQyIhxoGcVLDgKDUMAhEDYMkahgQDzUM4qSGAUGpYRDIeuut17XWpptuWurp QETUMCAeahjESQ0DglLDACgyNQyIhxoGcVLDgKDUMACKTA0D4qGGQZzUMCAo NQyAIlPDgHioYRAnNQwISg0DoMjUMCAeahjESQ0DglLDACgyNQyIhxoGcVLD gKDUMACKTA0D4qGGQZzUMCAoNQyAIlPDgHioYRAnNQwISg0DoMjUMCAeahjE SQ0DglLDACgyNQyIhxoGcVLDgKDUMACKTA0D4qGGQZzUMCAoNQyAIlPDgHio YRAnNQwISg0DoMjUMCAealjmnXbaaSPzXHTRRaWeEQVRw4Cg1DAAikwNA+Kh hmVeZWWlc5k0UsOAoNQwAIpMDQPioYZlnhqWUmoYEJQaBkCRqWFAPNSwzFPD UkoNA4JSwyCQgw46aM9ahx12WKmnAxFRw4B4qGGZp4allBoGBKWGQSBdu3at e9b06dOn1NOBiKhhQDzUsMx74oknxud57rnnSj0jCqKGAUGpYRCIGgZJ1DAg HmoYxEkNA4JSwyAQNQySqGFAPNQwiJMaBgSlhkEgahgkUcOAeKhhECc1DAhK DYNAPv7446m1pk2bVurpQETUMCAeahjESQ0DglLDACgyNQyIhxoGcVLDgKDU MACKTA0D4qGGQZzUMCAoNQyAIlPDgHioYRAnNQwISg0DoMjUMCAeahjESQ0D glLDACgyNQyIhxoGcVLDgKDUMACKTA0D4qGGQZzUMCAoNQyAIlPDgHioYRAn NQwISg0DoMjUMCAeahjESQ0DglLDACgyNQyIhxoGcVLDgKDUMACKTA0D4qGG QZzUMCAoNQyAIlPDgHioYZl37bXXjs2TdL5DbNQwICg1DIAiU8OAeKhhmVdZ WelcJo3UMCAoNQyAIlPDgHioYZmnhqWUGgYEpYYBUGRqGBAPNSzz1LCUUsOA oNQwCGT06NEja51zzjmlng5ERA0D4qGGZZ4allJqGBCUGgaBdO3ate5Z06dP n1JPByKihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DU MEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEii hgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHx UMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMy Tw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1L KTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUM CEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoN g0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DU MEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEii hgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHx UMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMy Tw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1L KTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUM CEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoN g0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DU MEiihgHxUMMyTw1LKTUMCEoNg0DUMEiihgHxUMMyTw1LKTUMCEoNg0DUMEii hgHxUMMyr0uXLpV5tt1221LPiIKoYUBQahgEooZBEjUMiIcaBnFSw4Cg1DAI RA2DJGoYEA81DOKkhgFBqWEQiBoGSdQwIB5qGMRJDQOCUsMgkF122WVQrSFD hpR6OhARNQyIhxoGcVLDgKDUMACKTA0D4qGGQZzUMCAoNQyAIlPDgHioYRAn NQwISg0DoMjUMCAeahjESQ0DglLDACgyNQyIhxoGcVLDgKDUMACKTA0D4qGG QZzUMCAoNQyAIlPDgHioYRAnNQwISg0DoMjUMCAeahjESQ0DglLDACgyNQyI hxoGcVLDgKDUMACKTA0D4qGGQZzUMCAoNQyAIlPDgHioYRAnNQwISg0DoMjU MCAeahjESQ0DglLDACgyNQyIhxqWeYcccsjQPKNGjSr1jCiIGgYEpYYBUGRq GBAPNSzzKisrncukkRoGBKWGAVBkahgQDzUs89SwlFLDgKDUMACKTA0D4qGG ZZ4allJqGBCUGgaBbL311gNq7bLLLqWeDkREDQPioYZlnhqWUmoYEJQaBoF0 7dq17lnTp0+fUk8HIqKGAfFQwzJv8uTJb+d5//33Sz0jCqKGAUGpYRCIGgZJ 1DAgHmoYxEkNA4JSwyAQNQySqGFAPNQwiJMaBgSlhkEgvXv3rqzVr1+/Uk8H IqKGAfFQwyBOahgQlBoGQJGpYUA81DCIkxoGBKWGAVBkahgQDzUM4qSGAUGp YQAUmRoGxEMNgzipYUBQahgARaaGAfFQwyBOahgQlBoGQJGpYUA81DCIkxoG BKWGAVBkahgQDzUM4qSGAUGpYQAUmRoGxEMNgzipYUBQahgARaaGAfFQwyBO ahgQlBoGQJGpYUA81DCIkxoGBKWGAVBkahgQDzUM4qSGAUGpYQAUmRoGxEMN gzipYUBQahgARaaGAfFQwzJvzJgxZ+a58sorSz0jCqKGAUGpYQAUmRoGxEMN y7zKykrnMmmkhgFBqWEAFJkaBsRDDcs8NSyl1DAgKDUMgCJTw4B4qGGZp4al lBoGBKWGQSCHH3740FrHHXdcqacDEVHDgHioYZmnhqWUGgYEpYZBIF27dq17 1vTp06fU04GIqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JS wyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQ NQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQyS qGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFA PNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSw zFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPD UkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoN A4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JS wyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQ NQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQyS qGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFA PNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSw zFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPD UkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoN A4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JS wyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzFPDUkoNA4JSwyAQ NQySqGFAPNSwzFPDUkoNA4JSwyAQNQySqGFAPNSwzNt2220H5fnWt75V6hlR EDUMCEoNg0DUMEiihgHxUMMgTmoYEJQaBoGoYZBEDQPioYZBnNQwICg1DAI5 /PDDh9Y67rjjSj0diIgaBsRDDYM4qWFAUGoYAEWmhgHxUMMgTmoYEJQaBkCR qWFAPNQwiJMaBgSlhgFQZGoYEA81DOKkhgFBqWEAFJkaBsRDDYM4qWFAUGoY AEWmhgHxUMMgTmoYEJQaBkCRqWFAPNQwiJMaBgSlhgFQZGoYEA81DOKkhgFB qWEAFJkaBsRDDYM4qWFAUGoYAEWmhgHxUMMgTmoYEJQaBkCRqWFAPNQwiJMa BgSlhgFQZGoYEA81DOKkhgFBqWEAFJkaBsRDDcu8bbfddlCeb33rW6WeEQVR w4Cg1DAAikwNA+KhhmVeZWWlc5k0UsOAoNQwAIpMDQPioYZlnhqWUmoYEJQa BkCRqWFAPNSwzFPDUkoNA4JSwyCQ3r17V9bq169fqacDEVHDgHioYZmnhqWU GgYEpYZBIF27dq171vTp06fU04GIqGFAPNQwiJMaBgSlhkEgahgkUcOAeKhh ECc1DAhKDYNA1DBIooYB8VDDIE5qGBCUGgaBbL311gNq7bLLLqWeDkREDQPi oYZBnNQwICg1DIAiU8OAeKhhECc1DAhKDQOgyNQwIB5qGMRJDQOCUsMAKDI1 DIiHGgZxUsOAoNQwAIpMDQPioYZBnNQwICg1DIAiU8OAeKhhECc1DAhKDQOg yNQwIB5qGMRJDQOCUsMAKDI1DIiHGgZxUsOAoNQwAIpMDQPioYZBnNQwICg1 DIAiU8OAeKhhECc1DAhKDQOgyNQwIB5qGMRJDQOCUsMAKDI1DIiHGgZxUsOA oNQwAIpMDQPioYZl3lFHHTU8z+jRo0s9IwqihgFBqWEAFJkaBsRDDcu8yspK 5zJppIYBQalhABSZGgbEQw3LPDUspdQwICg1DIAiU8OAeKhhmaeGpZQaBgSl hkEgu+yyy6BaQ4YMKfV0ICJqGBAPNSzz1LCUUsOAoNQwCKRr1651z5o+ffqU ejoQETUMiIcalnlqWEqpYUBQahgEooZBEjUMiIcalnlqWEqpYUBQahgEooZB EjUMiIcalnlqWEqpYUBQahgEooZBEjUMiIcalnlqWEqpYUBQahgEooZBEjUM iIcalnlqWEqpYUBQahgEooZBEjUMiIcalnlqWEqpYUBQahgEooZBEjUMiIca lnlqWEqpYUBQahgEooZBEjUMiIcalnlqWEqpYUBQahgEooZBEjUMiIcalnlq WEqpYUBQahgEooZBEjUMiIcalnlqWEqpYUBQahgEooZBEjUMiIcalnlqWEqp YUBQahgEooZBEjUMiIcalnlqWEqpYUBQahgEooZBEjUMiIcalnlqWEqpYUBQ ahgEooZBEjUMiIcalnlqWEqpYUBQahgEooZBEjUMiIcalnlqWEqpYUBQahgE ooZBEjUMiIcalnlqWEqpYUBQahgEooZBEjUMiIcalnlqWEqpYUBQahgEooZB EjUMiIcalnlqWEqpYUBQahgEooZBEjUMiIcalnlqWEqpYUBQahgEooZBEjUM iIcalnlqWEqpYUBQahgEooZBEjUMiIcalnlqWEqpYUBQahgEooZBEjUMiIca lnlqWEqpYUBQahgEooZBEjUMiIcalnlqWEqpYUBQahgEooZBEjUMaEJ33nnn oJXQrl27/EPNwIEDGxy29tpr5w/r2bPnyjwoxVRWVpb/u2vbtm2pZ0RBunXr lv+LGzBgQIPDNthgg/xhXbp0WcnHff7550t9VAOKQQ2DQNQwSKKGAU1o7Nix LQCayPjx40t9VAOKQQ2DQNQwSKKGAU1IDQOakBoGzYQaBoGoYZBEDQOakBoG NCE1DOI3a9asypXWsmXL/Od+69atGxyWP6asrGzlHxcyz7MGkhT40lO5+POo vLx85R/6b3/7W6lfvYEmll/DLrjggpmwuCVeTQYOHFjqGRGdo48+Wg2DFKl5 2q5o8AaA5ihpHRqQXvk17JJLLin1dIhOpXtK0pj8+1eqYRA/NQwAlosaBtmj hrFsahiNUsMgXfJrWKtWrfoAMSkvL697hlZUVJR6OtB8tW/fXg2DDFPDWDY1 jEapYZAu+TXMUR1iYxd9iMTIkSPVMMgwNYxlU8NolBoG6aKGQczUMIiEGgbZ poaxbGoYjVLDIF3UMIiZGgaRUMMg29Qwlk0No1FqGKSLGgYxU8MgEmoYZJsa xrKpYTRKDYN0UcMgZmoYREINg2xTw1i2Qw45ZGieUaNGlXpGREcNg3RRwyBm ahhEQg2DbFPDgJWkhkG6qGEQMzUMIqGGQbapYcBKUsMgXdQwiNno0aNH1jrn nHNKPR1ovtQwyDY1DFhJahikixoGAI1SwyDb1DBgJalhkC5qGAA0Sg2DbFPD gJWkhkG6qGEA0Cg1DLJNDQNWkhoG6aKGAUCj1DDINjUMWElqGKSLGgYAjVLD INvya9hmm202HGA5rbvuumoYpIgaBgCNUsMg2/JrGMBKUsMgfmoYADRKDYNs U8OAJqSGQfzUMABolBoG2aaGAU1IDYP45dewtm3bDgIAltKjR4+6l0s1DLJn 6tSpE1fCwIED80+En3jiiQaHXXjhhfnDTjrppJV5UKBRQ4cOzX/S3XTTTQ0O ++Mf/5g/bO+9917Jx/38889LfVQDGpFfwwCARqlhwBIGDx6cf5SoeYPd4LA7 7rgjf9i5555b5HlCc5N/n8caEydObHDYpEmT8ocNHz68yPMEik8NA4DlooYB S1DDIE5qGJBEDQOA5aKGAUtQwzJvjTXW6JZnl112KfWMKIgaBizDzJX2//7f /8s/etx6660NDssfM3DgwJV/XACardNOOy3/ZeUvf/lLg8MmT56cP2y33XZb +Yeurq4u9Us3EBc1LPMqKyvzf3eD3H0sJdQwIKial/L8o0fNC32Dw7yCANBU zjzzzPyXlaT1WlOnTs0ftueeexZ5nkBzoIZlnhqWUmrY/2fvzuNkrv8Ajs8e WFpiXZENyZWSUs5SKnSgkg6lHAnpLlGRDtHhyFEUKiKUChWVDv2KDkei3FFy X4XkWLs7v7d5t19j7ezBfmY+3+++nn/8Hr/Gd77z/c73u/P9zGu+8x0ARlHD AEN27NixPc3OnTsjvTiARahhAOxBDfM8aphLUcMAGEUNAwxJSEhw/moSExMj vTiARahhAOxBDfM8aphLUcMAGEUNAwyhhgGhUMMA2IMa5nnnnHNO1SDXXXdd pJcI2UINA2AUNQwwhBoGhEINA2APahhgJ2oYAKOoYYAh1DAgFGoYAHtQwwA7 UcMAGEUNAwxp3bp10zRt27aN9OIAFqGGAbAHNQywEzUMgFHUMABAmFHDANiD GgbYiRoGwChqGAAgzKhhAOxBDQPsRA0DYBQ1DAAQZtQwAPaghgF2ooYBMIoa BgAIM2oYAHtQwwA7UcMAGEUNAwC327Nnz+bNmyO9FDlADQNgD2oYYCdqGACj qGEA4Grjx4+vWrXq3r17I70gOUANA2APahhgJ2oYAKOoYQDgUosWLWrQoIG8 LN9zzz2RXpacoYYBsAc1DLATNQyAUdQwAHCdnTt3du3aNSoqSl+Wly9fHukl yhlqGAB7UMMAO1HDABhFDQMAF0lJSRk5cmRCQoLzmty4ceNIL1SOUcMA2IMa BtiJGgbAKGoYALjF3Llz5RXYd7RQr9s2o4YBsAc1DLATNQyAUdQwALDf5s2b 27Zt6zvGqaeempycHOmlyzFqGAB7UMMAO1HDABhFDQMAmyUlJQ0cODA+Pv7Y FCaeeeaZSC/g8aCGAbAHNczzLr300oZBOnToEOklQrZQwwAYRQ0DAGvNmjWr atWqGXYwERsbu3nz5kgv4/GghgGwBzXM8+Li4ngv40bUMABGUcMAwEJ//PHH ddddF6qDqZtuuinSi3mcqGEA7EEN8zxqmEtRwwAYRQ0DAKvs37//qaeeSjd0 z9A333wT6YU9TtQwAPaghnkeNcylqGEAjKKGAYacccYZCWlq1qwZ6cWBO0yd OrVChQpZdjBx1llnRXphjx81DIA9qGGeRw1zKWoYAKOoYYAhCQkJzl9NYmJi pBcHtluxYkXTpk2zjGCOkSNHRnqRjx81DIA9qGGeRw1zKWoYAKOoYYAh1DDk yLfffnvyySdnGcFU4cKF//nnn0gv8vGjhgGwBzXM86hhLkUNA2AUNQwwhBqG nFq8ePEpp5ySZQoT99xzT6QX9oRQwwDYgxrmedQwl6KGATCKGgYYQg3DcVi7 du3pp5+eZQ1bvnx5pJf0hFDDANiDGuZ51DCXooYBMIoaBhhCDcPx2bJlS0xM TCYprHHjxpFexhNFDQNgD2qY51HDXIoaBsAoahhgCDUMx2fbtm3FihXLpIaF eqF2EWoYAHtQwzyPGuZS1DAARlHDAEOoYTgOBw8eTPe+LJ2yZcsmJydHejFP FDUMgD2oYZ5HDXMpahgAo6hhgCHUMByHdu3aObtNvnz5ypcvn66GPfPMM5Fe xlxADQNgD2qY51HDXIoaBsAoahhgCDUMOdWtWzdnnylYsOCXX34pN/bo0cO5 MTY2dvPmzZFezFxADQNgD2qY51HDXIoaBsAoahhgCDUMORKcwvLnz68pTA0c OFBvv/HGGyO4hLmIGgbAHtQwz6OGuRQ1DIBR1DDAEGoYsi84hYlJkyalm2Ds 2LExMTHffPNNRBYv11HDANiDGuZ51DCXooYBMIoaBhhCDUM2pUthod5hzZkz J8wLZg41DIA9qGGeRw1zKWoYAKOoYYAh1DBkR7oU1q5du0gvUThQwwDYgxrm edQwl6KGATCKGgYYQg1Dlu6+++7gV9dLLrkkKSkp0gsVDtQwAPaghnkeNcyl qGEAjKKGAYZQw5C5dGeFValS5a+//or0QoUJNQyAPahhnkcNcylqGACjqGGA IePGjRuVZuLEiZFeHNglXQorXrz4mjVrIr1Q4UMNA2APapjnUcNcihoGwChq GACEWboUFh8f//3330d6ocKKGgbAHtQwz6OGuRQ1DIBR1DAACKdjU5iXfiwy m6hhAOxBDfM8aphLUcMAGEUNA4CwIYUpahgAe1DDPI8a5lLUMABGUcMAIAyS kpI6dOhAClPUMAD2oIZ5HjXMpahhAIyihgGAadu3b7/oootIYQ5qGAB7UMM8 jxrmUtQwAEZRwwDAqF9//bVChQqksGDUMAD2oIZ5HjXMpahhAIyihgGAOTNm zChcuHDwS2jp0qXnzZsX6eWKMGoYAHtQwzyPGuZS1DAARlHDAMCQQYMGRUVF Bb9+1qhRY926dZFersijhgGwBzXM86hhLkUNA2AUNQwAcl1SUlLHjh19R2vS pMnu3bsjvWhWoIYBsAc1zPOoYS5FDQNgFDUMAHLXsdfMF507dz506FCkF80W 1DAA9qCGeR41zKWoYQCMooYBQC469pr5UVFRAwYMiPRy2YUaBsAe1DDPo4a5 FDUMgFHUMADILcdeM79gwYIffPBBpJfLOtQwAPaghnkeNcylqGEAjKKGAUCu GDx4cLpr5pctW3bhwoWRXi4bUcMA2IMa5nnUMJeihgEwihoGACcoKSmpQ4cO vqOdf/75mzZtivSiWYoaBsAe1DDPo4a5FDUMgFHUMAA4ERleM//GG2/ct29f pBfNXtQwAPaghnkeNcylqGEAjKKGAcBxO/aa+eKZZ56J9HLZjhoGwB7UMM+j hrkUNQyAUdQwADg+x14zPz4+fsqUKZFeLheghgGwBzXM86hhLkUNA2AUNQwA curgwYPPPfdcumvmX3755evWrYv0orkDNQyAPahhnkcNcylqGACjqGEAkH0H Dx4cMWJEuXLlgl8V4+PjR40aFelFcxNqGAB7UMM8jxrmUtQwAEZRwwAgOzLs YD5OCTsu1DAA9qCGeV737t3vDzJw4MBILxGyhRoGwChqGABkLlQH45Sw40YN A2APahhgJ2oYAKOoYQAQysGDB1955ZVjO5iPU8JODDUMgD2oYYCdqGEAjKKG AcCxMulgnBJ24qhhAOxBDQPsRA0DYBQ1DACChfpepOKUsFxBDQNgD2oYYCdq GACjqGEAoDI5H0xUqFBh7NixkV5Gj6CGAbAHNQywEzUMgFHUMADI/HywChUq jBkz5tChQ5FeTO+ghgGwBzUMsBM1DIBR1DAYk/T71Icuq1QsPqHKFY9/sjHZ +OMd/G3KfZdULBZfvOpVfT7fnHJC80rd+/vXrz9+c50yBfJf9urm1ONcoK2L 3h/QtVmVk2NL3znr4AktTzjlyrq7x+LFi3v16kUHCzNqGAB7UMMAO1HDABhF DctbDs66/+xKFcqVOCkmw7f+KioqJjZ/wfiiJcqUr1KzbuMWbbr0fPHNmUu2 JeXooVI3vn5lvDPLhBvf2Wm2q6T8OfLyk5zHK3Hr1F3HNZtDO5ZMG9ztiqon R/83q+MoQil7fvtiVM8bzj+lQNriuKOG5ca6u8bixYsff/zxypUrh/ozqF27 9ltvvUUHM4QaBsAe1DDATtQwAEZRw/KmQzuXvHN/3aJR6QtAdFxCuSpn165T 59wzK5U+KfqofytQpsGdI77bmt1zvA798EjlI80t9ty+v5o9Oyzp2/srHFng 2AteWJnTxzu0fGzH+qfGpXtKclaEUrfMfOzySoWPfuZcUMNyY90tJ+9u5syZ M3To0Ntuu61SpUrpd31nz4mNvemmm7777rtIL6/HUcMA2IMaBtiJGgbAKGpY 3pW86sW6+Y5s13z1n5m3dV/w9wsP7lj+2fAuDU+JDdr6+RKbD134T7bmv3f2 fWek3TV/jUd/PGBmNRx7ZnWtkJbfCpzTZ2HOTmUTqbtW/LDgj7//2TrvxcuL OaEwh0UoecOi75Zv3bt3/Sf3neU8u/bXsFxZd5skJSUtXbr03Xfffeqpp1q3 bl29evXo6HSNMr2SJUv27t1706ZNkV72PIEaBsAe1DDATtQwAEZRw/KwpDkP VjwSCPI3Hb01o/JxaMPMB2oXDjqLLLrUVa+uyFZqOrjukxe73nDtjd0Gf7Eh x23qOBxY+/FznVtfe9M9Q2ZvOqHvt+39oE1R53k5ziKUvHpA3bQYaH8NOyI3 1j3s0rWvM888MzY2OOJmJj4+vk2bNtOmTTtwwHSwxRHUMAD2oIYBdqKGATCK GpaHHT457EgyCFXDRMqGt68vHfytykINBizz8uWUDs1/tGraaWbHXYT2TrrO ZdcNC8iVdTfr2PO+st++HE4E279/f6RXKC+ihgGwBzUMsBM1DIBR1LA8LOXP YY2OfFUykxp2+ESnwQ0LBO0EUWU6zsze9yVdKfnXZ891vuR5vEXowPRbC6c9 XS6qYbmy7mbdeeedGeStTMXExFStWrVVq1a9e/eePHnyL7/8kpQUjtMVEQo1 DIA9qGGAnahhAIyihuVhKetfviSbNSwwbf6gvSCqTJcv3NJ3ci555Qt1TrgI HZzRPuG/E+pcVcNyY93NmjBhQkbF6yixsbHnnHNOx44dR4wYMW/ePL4FaRtq GAB7UMM879+j7du3L9JLhGyhhgEwihqWh+WkhvmT5gZfZMzny3fx8D9TQk/u bimrB9RLe2aOv4Z90rGEC2tYrqy7WRs2bDi2fVWvXv3666/v06fPu+++++uv v3Lql+WoYQDsQQ3zvLi4o342m/cybkENA2AUNSwPy1ENS17W77zgazPFXvD8 yuTwLWt4pfw2MBdq2Kd3uLKG5ca6G9esWbPWrVtr+1q6dCnty3WoYQDsQQ3z PGqYS1HDABhFDcvDclTDDi14rFpM0G6Qv8moLXaGklxADbO9hsHtqGEA7EEN 8zxqmEtRwwAYRQ3Lw3JSw1J3jGteKGgviKnS48esf1Vy3/q5459q26BcwfzZ +V7lv2s/f7XXHS3qVUssWSQuNiZ/wSIly9eo26zNff3e/GLV7mx8LTP133Xf jn3ilnpl47KXcf79Y/brfe5oXq/aqcUK5YstUKRkxfOu6PD0xJ92HDRYw/5d 8+mQu1tecHqJQvkLFCldsVaT9n3enLsp26c27V07+82n72x5YY3E4vH5Y2IL FC5Z4eyLru3y9Btfrd2bk8XM6bonL32xUeniCRkoXrxUucrNhy1Pd6Zg6l9T OlQ5tVTx4PsUL1Xz0bmcxQU/NQyATahhnkcNcylqGACjqGF5WA5qWMrGMVfG B8ewao/Oz6RqpOxa8ekrD15zdvG071ZmdZWxg79P796ojCxM/sQmD4+a+ePS Fb/++MmYR5qVD/4hy2BRcdV7fu8sQfLfy2cMv79FjYRsX/794O8fPnZ54uG5 xxSr3qz9Q08806f7HVefHZhBTOlG7a6pEpPdWYV8iGNqWOqu+cNbn1Ewg7Up em6ncUszHnw7Unf9NKZL/VMOb7GCp9Vreftd997d8YZLqxVznuNTGtz91i97 sl7W41z3lL3r5rzetXaRqOAljy7X6rXFu0Ju2uS/F/RtqCucr+INI37Y4pYz 5GAaNQyAPahhnkcNcylqGACjqGF5WLZrWOqOmZ0qBn1NMqpU64mbQkybtGx8 10srxh+VTLKoYf8sGHh5qcNX6I+p0Pa99cGnGKVsmn5H5Xy+jEQn3vP14Rp2 8Nexd15S4aR0j5dpwkrdM3+APmC+8tcO+WH7kUdM/Wf5xM7nxGd/VplJV8MO 7Pyq5wVF0i1n8AqVbvrST3tDzuy3CW0rHx7JFazW9rV524JOy9u3+v0H6xdP m2/8Od2mr8/kem4nuu6pW6a3r3BkV8j6p0UPft65tCxcvnN6L+D3m3AENQyA PahhnteiRYumQbp16xbpJUK2UMMAGEUNy8OyV8NS9ywceHnJoIqTv3KnD0Nf Mix1+8KZn85bvmrJRz3rHUkroWtY6tZp7coH8kpUsesnbT9mvnu+7Ob8lmV0 hTs+WLNZbNmy9a9/NeSkbJ0/47P5K1b9PO3hC07KJOM4Dq0e0+Jwn/FFlWox 5rdjT3BL2TjpxjJBv56ZKzWs1O1DBlyWEBUVX/GSdo8NHj1h0vjXXnzohtql ji59MRU6fLgtg8dK3fphx9MPn7kVVbLlm38c27pSd3/Xu47zZBes+dBXf2W8 xLmx7ql/f9blSBot0OS1TJ+dlN8G1ZeVLHz1m1yADMGoYQDsQQ0D7EQNA2AU NSwPy7qGHVj/9bC2ZxU+ksKii11w/7Q/snflp92TWjl5KmQN+/fre0//L78U bv3OngymSF71Yl1nKeOveiNUVUn9660WzpcQQyasg0teaBDoRlHFWozdkHGg S1k77OIjX2fMjRrmiy1YsNBpVz//9eajrrWWsnPe8FYVgotYdMV7Zqc/Pyxl 4/jrtEYWqD8g1O94Hlox+CLn2Y4ud9vUDKpabq176ubx1xZLW7OCl7z8R+jv wCYvPfxLpFGlbpu+O+Q0yJOoYQDsQQ0D7EQNA2AUNSwPO7qG5buw3w+rVq9a uWzJgjmzPhj7Uq87r65VKv+R7R5X7qI7h329IfsXfkqa+2Ba6ApZw/ZMuzXt S36x5zy9JMPUk7z02XPTro3lK9hyfIjznvxJX9+TmPZ4IRJW8uphl+g5VNGn 3//N/lBLnrpldFPn+hK5UsMKnNn1ow0Zrt3B1a9fc0rQmXeFm4896sS71F2f dDpNV6tg09Ghvp8q9s15qLJzylZMpXu/TlfVcnPdD3zf3bm2WEyVh78LNbcD cx86IzrweAdCLjfyJmoYAHtQwwA7UcMAGEUNy8OOrmGhRJdu0OnZ1z9dujPr n5A82qHFfc5OSyYhaljS3IeOBLNGw9ZlfJLRgY9vd05FyuS3LA8teKx65pe+ 3/PJHafqw0VXuP/bTLreoZ961TBwFf2MpW6Z2Drom6iFrn4z6LyulLXDGv13 rlbsBc+vyOSKYP7kVQPqHdmc6b+bmLvrnrLu1SZpX82MKnbt+Iy/Obvn4/an RPliaz3zS2bLjTyJGgbAHtQwwE7UMABGUcPysKNrWGytrm9MeW+KeHf0Pecf uQSXL1/1B2bvOo4elLysf+0sflPywNQ2zuWu8l340u8Z17BDCx6rltZnok7p 8nmIlJO85Omamf2mZOrWcS0K//fvJ13/zj+ZLHrKbwOdsGS8hsmUPzzinGrl iyrZ8RPnTKrg8+IKt5ka8owunXjVi3Wdk+h8cU1GHTmTLPfX/Z9ZXU5LC5mx NfssOvbbs6nbxl9zss9XsPErISon8jJqGAB7UMMAO1HDABhFDcvDQl83LGnl y5cXO3K6Uqiru2cueeULF2RRw4K/TBhT7dH5GZ/1lbzk6XPSZhRd6eHvQ1y2 LPnXvudmUsNSd4xvmZbeYqr2nJfZqW5hrmFHfanUl++ioWlX4kpZE7gGva55 hfu/zeKCbUnfP1zpyDXwT75latqXJU2se/KKAfUK/DddVKlb3t+ZbsKU34c1 igv8NMIOrp+PY1DDANiDGgbYiRoGwChqWB6W2VX0U/6c0CroclZRp7SaEOJH IUNKXvlCnSxqWMrvLzV0lqBQqEuCJX3f/Yy0yHPSNRPSZxfn8YLOo8og4xyc dWfptBXKV2/A6szWJtw1zL974nXOtetjqj++8L9ctXfKjc65czFVemRasQ77 663mzjW/Dn+zMu2a+0bWPXXn+7eUci6MVueF5Ud9HfLQ4qdqxvqiT73zs/S/ CgD4qWEAbEINA+xEDQNgFDUsD8v8NyVTt33UsYLz/T1fVLEmr6zK0aXDslHD /MmrBtZ3TjAq0XZ6Rj8q6d818bpCaQvRauL2kCcrZVrDUv4cfrGzsvkuHBLi W5n/TRzuGpb0zX3O9w6jz+j+w6FjFsMXXfHBuVn9mGfSV91OdU4Oi6n8yH+X WDO17kk/9T7LOWmvXKdPgrbe/v/dWyH68Pl+87L3A6TIa6hhAOxBDQPsRA0D YBQ1LA/LvIb5/am7//dQjaBflTypXv9FmV+56ijZqWH+1L8/ubN8WnMr3PS1 DKbaPa3tfxeZL1in38+ho1LmNezQoifOctpe7PnPLc/swu5hr2GHFj7u/AJA zNl9ftaKlfzLM7WOXAisWLuPs/pBz6NW8shXT42te+qmsc1PTptxoYuHrU3b ersC2yx/vQGruH4+MkQNA2APahhgJ2oYAKOoYXlYVjVM7FvYt07QBfUL1Owx J7MrsB8lWzXM70/d9W2vCwprNooq1WL06qOTz57vHq0VOHssukzLMasyO9Eo ixq28PEznSIUfdq9/8tsVuGvYfN6ONfRz99k1H8bImXNoAZBG+jSERuzWJDk Zf3Oc/JZvkbD/nvODa77vm/udy5VFn36vV8H3kCkbn7z6sI+X/xVb2zikmHI GDUMgD2oYYCdqGEAjKKG5WHZqGF+f9KK4ZcVPXIBsdgzunwa6sJd6WSzhvkP nyA2/5VbztQilq9c016TF2z8N8WfvHvtN2O61UmQm6NOrtV54soszkvLvIYl rx4Q9IOL+ZuM2pLJWoS9hgVd2Cv4G5F737upsLPMUad0DvVzmmmO+r2BU7t9 9d98TK57ytphFxdKm3WRK1/fkOJPWT2oQQFfVMm203Zlfl/kYdQwAPaghgF2 ooYBMIoalodlq4YdvurU+OtKH+lh0ae2eXdTdi6on/0aJg6unXRrxfwlqtY+ s8xJgdOYoqIOV7C4UtUb39Z73A9bsnH1qSyuon90WUq45YMMr1H23yoHF6FL R2Z1SlaIVcp+DUvdOqrJf19JjSrZ7mPnuvNHnxwWc1bvRZlfuS1p7oMV/ztT K6pYm/edNTS67rtndCybdnpYTPWeP+5d2KtGjC+64n3/y8HXapHXUMMA2IMa BtiJGgbAKGpYHpbNGnb4gvofdgi+oH6Jq0avyfp6UNmvYf8uGdGiXL7SV49c drifpOzftXX9mtWr127YsS8nV53Kooal/D7kwiMXQYtKaD15R8jQE1yEsgx5 oeSghu3/9I7/emN0uS6zggbhycufO//IJoo95+klmT4je99tfVLaNrp16u4j 62N03ZN/7Vc7vzPvKzteXy4660VFHkcNA2APahhgJ2oYAKOoYXnYUT81mPkX 6FJ3f/3gmUEX1I9vkPUF9bNZw5JWjWlZJtpX+MrXNx5XdDryeJnXMH/Kb4Ma BK1C/lpPLDwQYlbBRSi23oDVhmvYvs+7ltOzqwrWH3D0Je5T1o9qFu8sc/Tp 9/1vX+j5HJr/aDWNljFVHv4ueOXMrnvq9smtix85e/Dwelzy8h8ntjXhcdQw APaghgF2ooYBMIoaloelrB5Q70gNO3LR9YztW/DMBYWO7Ab5q9z5cWaXn/L7 k1c8f4FTwy4aui7DmSevHHzhSYF80+PHbHwbMtPHC/oFxgy/4pe6bfINJYKi TVzNB77M+Byp4EU/8tOMOZTdGpay/vWr9MpscbV6zzsmdu377pHqRy76Vfiy V0Kelpf8a199AqKKt3o7XQw0vO4Hf+xZPejkwaKtJm7n+vnIDDUMgD2oYZ5X uXLlxCBXXnllpJcI2UINA2AUNSwPS/r+Yef3AA9f8umxBVlclWr5sEuDLqgf dXL9J779K3T0OLSwl/NLhrG1+y/LKOIc+uGRyv9NE3/mDU+Men/WN9/PW/DT okU///zz4sVLlvyydNnylavX/LFhy85/DmZxstGhH515+fJlfFJT8upXLjs5 qAlFFanb/ZP16Spc8pYvHmtQ7MhU+RsMXH08X/oLqmG++EuHrsz4ZKyk1aOb lzo8WVTJK0YszzCZ7fnfQzWcE7uiijYZsTqj7ZS648N2gTPMokpfM/aPYxfY 7LqnrB99RdqlyaLLdvp0b9Z3QZ5GDQNgD2qY58XFxfFexo2oYQCMooblXcmr gk8N8/kKXDI84/O3jkhZ91bwBfV9UUVqdZm4PET5+HtSK+fS7VHFb/swo8kO zuxw9FfsMhGVP6FS3WvvG/7Fugy/o5m6460WzrlrUaU7fpLhVwpTNr7f/oz8 wbONLn5e274TZi9Zu2nL+uVzprzYsW7JfMWrn3nKkU7oK3RGk3ad21970ZXP /ZSDs8SSvr673JGZRJe6uOe01enG1/+uGN+28uGliT31qiEL/wk5qwPLRl5V 2plXXNXbJ/52dDdL3bNg4OUlD//uQJE6j34d4kc/za773i+7lQ/cL6ZqzxM9 zQ/eRw0DYA9qmOdRw1yKGgbAKGpY3pS04+cJXc+N9x0lqkSjx6av2J3puUCp 26a3Lx9z1N0KlLuwQ99xsxZv/DeopR1c/3G3GsHlpWCt+2euP/b0qH0L+jcs mt0e9t9inlz7wU+2pOt2B9ZN7VwtuO0Vqv3wZxsyPNXq0Pppd9U8KeTs81e8 YfSSJUeFwqhCp13U/tlJ8zZndiX8DBxc/8WAm88qcmT14hIbtn3s5Ukff/Xt N7Pee+WRa6oVln/LV+ayPl9szuoMrH3Lxt5+prPU0UWqtewx4v3Pv1/087yv 3ht2f7OKh0d5BSu3HjYvk7P1zK578srAVyzz131xJdfPR1aoYQDsQQ3zPGqY S1HDABhFDctbDs66/+xKFcqVOOnooBUsX+HSp1WsdN4js0Pkj9Rdsx84M39G 94wuWPHeLw9sm3R71cQShTJ6gOiCxctV65r+JLF/V0zuUis+g8lDiyp6xaj/ rtKesvGtNlXLFS8YncFk8niJ1e+ZmcFXFPf99mGfa6sXPXohowolXnLfW0t2 pzpXko8ufEaTroOm/bLzuC4cppJ3LvnghU6Nzzg5Nv3iRRU8tc4tz05bsSe7 l9j6d/WH/W6tU6bAsc/HSeUvbP/ijN+y9f1EU+u+97M7T432xV/5+iYuGYYs UcMA2IMa5nnUMJeihgEwihqGCEvd/WP/i4sXrf/Ep4sXfffVzKnvjH9z1Ihh Lw184bl+z/Z9+umn+vTp80Tvx3s+fF/XDjc3b3TWKXGBU61iaj61+AQSlTqw +adPJ73+8oDnXhjy2lvT5q7dk3bCWepf343p+/zoz1btzr0fRjz095ofZkx6 fcTg5/u/MGTk2Hc/W7jh3+PKRsm7f//xk0mjh77Yr++zzw96+c33v/p5Y87n lNvrnrpjcutiUVElb526K6eLgryIGgbAHtQwz6OGuRQ1DIBR1DBE1D8LXry0 eEzZmyZvzGZ7ObTly0fOL+TzFbphSoYXBkNEpPw54rKCvugK936d4UXdgHSo YQDsQQ3zPGqYS1HDABhFDUPkHFrzRsvS0VFFm4/Nbgs7LHXrqCb5fcXafZzx jzQiApJ/7XturC82N07YQ95ADQNgD2qY51HDXIoaBsAoahgi5cDi5+ofvlxY oWsn5ujLdYd+fuKs2ELNxnB5Kmvs+azzadG+go1f/iP3vlkKb6OGAbAHNczz qGEuRQ0DYBQ1DJGR8vsrl+qPG8Y1HZWDsHXo9zdaloxN7PTJLmKYJfYvfLp2 nC+q9G3T/2abIJuoYQDsQQ3zPGqYS1HDABhFDUNk7BrfIu23EaNKNn76iw0h fsIyWOrun0fdXLlA/sqdZ26nu0TC3qWTHm3TtFGjZjfd89z4/63Zk3xwy7eD rykf6/MVajBgGd+SRLZRwwDYgxrmedQwl6KGATCKGobIOPTzM7XyB+1WhSo2 vuOZ1z/+cfX2/cd82y75nw2LPx/3bPuGZfP7ClRq89aqbJQz5L6kHx6pEhP8 WhBbIH904P/E1+u3iMu4IQeoYQDsQQ3zPGqYS1HDABhFDUOkHFg5rm3VQr5j RBcoekqFKjVq1jrvvHPPqVGlwilF8kfpvxQof1W/2Vu5NFWk/DX26vzHbi9f voq3Tl6XHOmFg7tQwwDYgxrmedQwl6KGATCKGoZI2rtqet+bapWIzaCxHCW2 eM3WT0xZupvvR0ZSyu+jmhWNOmrDxJS68JGP/+QrksgpahgAe1DDPI8a5lLU MABGUcMQefs3zp86os9dNzate2b5UkXiYqOjomILFDq5dMUa9Zrd3K3PyGnz N+6P9DLisNSd3w29vX75IvnzFSpZueHNj781fxslDMeDGgbAHtQwz6OGuRQ1 DIBR1DAAQJhRwwDYgxrmedQwl6KGATCKGgYACDNqGAB7UMM8jxrmUtQwAEZR wwAAYUYNA2APapjnUcNcihoGwChqGAAgzKhhAOxBDfM8aphLUcMAGEUNAwCE GTUMgD2oYZ5HDXMpahgAo6hhAIAwo4YBsAc1zPOoYS5FDQNgFDUMABBm1DAA 9qCGeR41zKWoYQCMooYBAMKMGgbAHtQwz6OGuRQ1DIBR1DAAQJhRwwDYgxrm edQwl6KGATCKGgYACDNqGAB7UMM8jxrmUtQwAEZRwwAAYUYNA2APapjnUcNc ihoGwChqGAAgzKhhAOxBDfM8aphLUcMAGEUNAwCEGTUMgD2oYZ5HDXMpahgA o6hhAIAwo4YBsAc1zPOoYS5FDQNgFDUMABBm1DAA9qCGeR41zKWoYQCMooYB AMKMGgbAHtQwz6OGuRQ1DIBR1DAAQJhRwwDYgxrmedQwl6KGATCKGgYACDNq GAB7UMM8jxrmUtQwAEZRwwAAYUYNA2APapjnUcNcihoGwChqGAAgzKhhAOxB DfM8aphLUcMAGEUNAwCEGTUMgD2oYZ5HDXMpahgAo6hhAIAwo4YBsAc1zPOo YS5FDQNgFDUMABBm1DAA9qCGeR41zKWoYQCMooYBhgwePLhfmuHDh0d6cQCL UMMA2IMa5nnUMJeihgEwihoGGJKQkOD81SQmJkZ6cQCLUMMA2IMa5nnUMJei hgEwihoGGEINA0KhhgGwBzXM84YNGzY4yIQJEyK9RMgWahgAo6hhgCHUMCAU ahgAe1DDADtRwwAYRQ0DDKGGAaFQwwDYgxoG2IkaBsAoahhgCDUMCIUaBsAe 1DDATtQwAEZRwwBDvvjii0/SzJ49O9KLA1iEGgbAHtQwwE7UMABGUcMAAGFG DQNgD2oYYCdqGACjqGEAgDCjhgGwBzUMsBM1DIBR1DAAQJhRwwDYgxoG2Ika BsAoahgAIMyoYQDsQQ0D7EQNA2AUNQwAEGbUMAD2oIYBdqKGATCKGgYACDNq GAB7UMMAO1HDABhFDQMAhBk1DIA9qGGAnahhAIyihgEAwowaBsAe1DDATtQw AEZRwwAAYUYNA2APahhgJ2oYAKOoYQCAMKOGAbAHNQywEzUMgFHUMABAmFHD ANiDGuZ5CxcuXBBk2bJlkV4iZAs1DIBR1DAAQJhRwwDYgxrmeXFxcbyXcSNq GACjqGEAgDCjhgGwBzXM86hhLkUNA2AUNQww5KOPPno/zcyZMyO9OIBFqGEA 7EEN8zxqmEtRwwAYRQ0DDElISHD+ahITEyO9OIBFqGEA7EEN8zxqmEtRwwAY RQ0DDKGGAaFQwwDYgxrmed26desUpG/fvpFeImQLNQyAUdQwwBBqGBAKNQyA PahhgJ2oYQCMooYBhlDDgFCoYQDsQQ0D7EQNA2AUNQwwhBoGhEINA2APahhg J2oYAKOoYYAhI0aMGJxm9OjRkV4cwCLUMAD2oIYBdqKGATCKGgYACDNqGAB7 UMMAO1HDABhFDQMAhBk1DIA9qGGAnahhAIyihgEAwowaBsAe1DDATtQwAEZR wwAAYUYNA2APahhgJ2oYAKOoYQCAMKOGAbAHNQywEzUMgFHUMABAmFHDANiD GgbYiRoGwChqGAAgzKhhAOxBDQPsRA0DYBQ1DAAQZtQwAPaghgF2ooYBMIoa BgAIM2oYAHtQwwA7UcMAGEUNAwCEGTUMgD2oYYCdqGEAjKKGAQDCjBoGwB7U MM+Li4vjvYwbUcMAGEUNAwCEGTUMgD2oYZ5HDXMpahgAo6hhAIAwo4YBsAc1 zPOoYS5FDQNgFDUMMGTlypXL0qxatSrSiwNYhBoGwB7UMM+jhrkUNQyAUdQw wJCEhATnryYxMTHSiwNYhBoGwB7UMM+jhrkUNQyAUdQwwBBqGBAKNQyAPahh nkcNcylqGACjqGGAIdQwIBRqGAB7UMM8jxrmUtQwAEZRwwBDqGFAKNQwAPag hnkeNcylqGEAjKKGAYZQw4BQqGEA7EEN8zxqmEtRwwAYRQ0DDKGGAaFQwwDY gxrmedQwl6KGATCKGgYYQg0DQqGGAbAHNczzqGEuRQ0DYBQ1DDCEGgaEQg0D YA9qmOdRw1yKGgbAKGoYYAg1DAiFGgbAHtQwz6OGuRQ1DIBR1DDAEGoYEAo1 DIA9qGGeRw1zKWoYAKOoYYAh1DAgFGoYAHtQwzyPGuZS1DAARlHDAEOoYUAo 1DAA9qCGeR41zKWoYQCMooYBhlDDgFCoYQDsQQ3zPGqYS1HDABhFDQMMoYYB oVDDANiDGuZ51DCXooYBMIoaBhhCDQNCoYYBsAc1zPOoYS5FDQNgFDUMMIQa BoRCDQNgD2qY51HDXIoaBsAoahhgCDUMCIUaBsAe1DDPo4a5FDUMgFHUMMAQ ahgQCjUMgD2oYZ5HDXMpahgAo6hhgCHUMCAUahgAe1DDPI8a5lLUMABGUcMA Q6hhQCjUMAD2oIZ5HjXMpahhAIyihgGGUMOAUKhhAOxBDfM8aphLUcMAGEUN AwyhhgGhUMMA2IMa5nnUMJeihgEwihoGGEINA0KhhgGwBzXM86hhLkUNA2AU NQwwhBoGhEINA2APapjnUcNcihoGwChqGGAINQwIhRoGwB7UMM+jhrkUNQyA UdQwwBBqGBAKNQyAPahhnkcNcylqGACjqGGAIdQwIBRqGAB7UMM8jxrmUtQw AEZRwwBDqGFAKNQwAPaghnkeNcylqGEAjKKGAYZQw4BQqGEA7EEN8zxqmEtR wwAYRQ0DDKGGAaFQwwDYgxrmedQwl6KGATCKGgYYQg0DQqGGAbAHNczzqGEu RQ0DYBQ1DDCEGgaEQg0DYA9qmOdRw1yKGgbAKGoYYAg1DAiFGgbAHtQwz6OG uRQ1DIBR1DDAEGoYEAo1DIA9qGGeRw1zKWoYAKOoYYAh1DAgFGoYAHtQwzyP GuZS1DAARlHDAEOoYUAo1DAA9qCGeR41zKWoYQCMooYBhlDDgFCoYQDsQQ3z vGnTpr0f5Msvv4z0EiFbqGEAjKKGAYZQw4BQqGEA7EENA+xEDQNgFDUMMIQa BoRCDQNgD2oYYCdqGACjqGGAIdQwIBRqGAB7UMMAO1HDABhFDQMMWbly5bI0 q1ativTiABahhgGwBzUMsBM1DIBR1DAAQJhRwwDYgxoG2IkaBsAoahgAIMyo YQDsQQ0D7EQNA2AUNQwAEGbUMAD2oIYBdqKGATCKGgYACDNqGAB7UMMAO1HD ABhFDQMAhBk1DIA9qGGAnahhAIyihgEAwowaBsAe1DDATtQwAEZRwwAAYUYN A2APahhgJ2oYAKOoYQCAMKOGAbAHNQywEzUMgFHUMABAmFHDANiDGgbYiRoG wChqGAAgzKhhAOxBDQPsRA0DYBQ1DAAQZtQwAPaghnnetGnT3g/y5ZdfRnqJ kC3UMABGUcMAAGFGDQNgD2qY58XFxfFexo2oYQCMooYBAMKMGgbAHtQwz6OG uRQ1DIBR1DDAkBEjRgxOM3r06EgvDmARahgAe1DDPI8a5lLUMABGUcMAQxIS Epy/msTExEgvDmARahgAe1DDPI8a5lLUMABGUcMAQ6hhQCjUMAD2oIZ53vPP P/9skDFjxkR6iZAt1DAARlHDAEOoYUAo1DAA9qCGAXaihgEwihoGGEINA0Kh hgGwBzUMsBM1DIBR1DDAEGoYEAo1DIA9qGGAnahhAIyihgGGfPTRR++nmTlz ZqQXB7AINQyAPahhgJ2oYQCMooYBAMKMGgbAHtQwwE7UMABGUcMAAGFGDQNg D2oYYCdqGACjqGEAgDCjhgGwBzUMsBM1DIBR1DAAQJhRwwDYgxoG2IkaBsAo ahgAIMyoYQDsQQ0D7EQNA2AUNQwAEGbUMAD2oIYBdqKGATCKGgYACDNqGAB7 UMMAO1HDABhFDQMAhBk1DIA9qGGAnahhAIyihgEAwowaBsAe1DDATtQwAEZR wwAAYUYNA2APahhgJ2oYAKOoYQCAMKOGAbAHNczzli9fvizI2rVrI71EyBZq GACjqGEAgDCjhgGwBzXM8+Li4ngv40bUMABGUcMAAGFGDQNgD2qY51HDXIoa BsAoahhgyBdffPFJmtmzZ0d6cQCLUMMA2IMa5nnUMJeihgEwihoGGJKQkOD8 1SQmJkZ6cQCLUMMA2IMa5nnUMJeihgEwihoGGEINA0KhhgGwBzXM86hhLkUN A2AUNQwwhBoGhEINA2APapjnUcNcihoGwChqGGAINQwIhRoGwB7UMM+jhrkU NQyAUdQwwBBqGBAKNQyAPahhnkcNcylqGACjqGGAIdQwIBRqGAB7UMM8jxrm UtQwAEZRwwBDqGFAKNQwAPaghnkeNcylqGEAjKKGAYZQw4BQqGEA7EEN8zxq mEtRwwAYRQ0DDKGGAaFQwwDYgxrmedQwl6KGATCKGgYYQg0DQqGGAbAHNczz qGEuRQ0DYBQ1DDCEGgaEQg0DYA9qmOdRw1yKGgbAKGoYYAg1DAiFGgbAHtQw z6OGuRQ1DIBR1DDAEGoYEAo1DIA9qGGeRw1zKWoYAKOoYYAh1DAgFGoYAHtQ wzyPGuZS1DAARlHDAEOoYUAo1DAA9qCGeR41zKWoYQCMooYBhlDDgFCoYQDs QQ3zPGqYS1HDABhFDQMMoYYBoVDDANiDGuZ51DCXooYBMIoaBhhCDQNCoYYB sAc1zPOoYS5FDQNgFDUMMIQaBoRCDQNgD2qY51HDXIoaBsAoahhgCDUMCIUa BsAe1DDPo4a5FDUMgFHUMMAQahgQCjUMgD2oYZ5HDXMpahgAo6hhgCHUMCAU ahgAe1DDPI8a5lLUMABGUcMAQ6hhQCjUMAD2oIZ5HjXMpahhAIyihgGGUMOA UKhhAOxBDfM8aphLUcMAGEUNAwyhhgGhUMMA2IMa5nnUMJeihgEwihoGGEIN A0KhhgGwBzXM86hhLkUNA2AUNQwwhBoGhEINA2APapjnUcNcihoGwChqGGAI NQwIhRoGwB7UMM+jhrkUNQyAUdQwwBBqGBAKNQyAPahhnkcNcylqGACjqGGA IdQwIBRqGAB7UMM8jxrmUtQwAEZRwwBDqGFAKNQwAPaghnkeNcylqGEAjKKG AYZQw4BQqGEA7EEN8zxqmEtRwwAYRQ0DDKGGAaFQwwDYgxrmedQwl6KGATCK GgYYQg0DQqGGAbAHNczzqGEuRQ0DYBQ1DDCEGgaEQg0DYA9qmOdRw1yKGgbA KGoYYAg1DAiFGgbAHtQwz6OGuRQ1DIBR1DDAEGoYEAo1DIA9qGGet3DhwgVB li1bFuklQrZQwwAYRQ0DDKGGAaFQwwDYgxoG2IkaBsAoahhgCDUMCIUaBsAe 1DDATtQwAEZRwwBDqGFAKNQwAPaghgF2ooYBMIoaBhjyb5B9+/ZFenEAi1DD ANiDGgbYiRoGwChqGAAgzKhhAE5cSkrKv7mhfv36wS818sqT4WQTJ04MnuzJ J5/MlUcHEEr79u2D/+jmzJmT4WQLFy4Mnuymm246vodLTk6O9KsagLCihgEA wowaBuDEyUuHDwByyfjx4yP9qgYgu1JTU/84Yd27dw9+EXj11VcznCx4mho1 apz44wIA8qxu3boFH1bGjRuX4WQ//fRT8GSNGjU68Yfev39/pI/eAHIHNQxA LqKGAS7y77//Rvo1AwAANwl1HhoA16GGAchF1DDARahhAADkCDUM8IzgGlay ZMlzASCHypQp47yMUMMAF6GGAQCQI9QwwDOCa9j9998f6cUB4D7B19CmhgEu ElzDChcu3BQAABzjtNNOo4YB3kMNA3CCqGGASwXXsHP5nUcAADIib5OpYYD3 UMMAnCBqGOBS1DAAALJEDQM8iRoG4ARRwwCXooYBAJAlahjgSdQwACeIGga4 FDUMAIAsUcMAT6KGIZuGDRs2OMiECRMivUSwBTUMcClqGAAAWaKGAZ5EDUM2 xcXF+YLwvgkOahjgUtQwAACydHw1bOnSpY8hjGbMmGF0N3CjVatWRXqzRNi2 bdsyeX6oYcgmahhCoYYBLkUNAwAgS8dXw95//30fwoiacazg2pM3LVu2LJvP D/sPMkENQyjUMMClqGGAzR544IFOaXr06BHpxQHyLmqYK1AzjkUNo4YhV1DD EAo1DHApahhgs4SEBOcvNDExMdKLA+Rd1DBXoGYcixpGDUOumDhx4vggfC8b DmoY4FLUMMBm1DDAEsdXwzZu3Pg+wmjJkiVGdwM32rJlS6Q3S4Tt2bMnk+eH GgbgBFHDAJeihgE2o4YBluA3JQFPooYBOEHUMMClqGGAzahhgCWoYYAnUcMA nCBqGOBS1DDAZosWLVqQhm8AARFEDQM8iRoG4ARRwwCXooYBAJAlahjgSdQw ACeIGga4FDUMAIAsUcMAT6KGAThB1DDApYJrWHR0dAIAADhGgQIFqGGA9wTX MPkzj/QrDQD3KViwIDUMcKPgGgYAALJEDQM8I7iGAcAJooYBLmJnDZsyZYos 299///3iiy8WKFAgNja2WbNmBw4cOHjw4BtvvHHSSSfFxcU9+uijugr33HNP VFRUTEzMtGnTZIK9e/fWrl1b7iK3vPLKK3JLcnLyyy+/XKRIkejo6PPOO2/f vn0pKSlffvllvnz5ZD7t2rWTmaSmpvbr109ukYd76aWX/vnnn/3791999dUy E5n5kCFD9uzZk5SUJA8hd5GZlypVSmYrN37zzTd6r6ZNm+p8ZAnz588vtzz5 5JPyn7LYHTp0kJnILX369Nm4caPcOHny5NKlS8t8ZMq//vpLFmn79u1RAbVq 1dL1mjlzpsw5Pj6+U6dOMoE8nNxdl6dr164rV66UWz7//PNq1arJLYULF/7j jz9ka8piyzzljiVLltRHX7Rokay4PJasjsxH1uLVV1/Vx2rTps2qVatkGlmL evXqyTMv8//+++9lzjKfChUqRAfIUyrLs2XLlpgAeXrlFpng3Xff1Tm3bNlS HkVuWbBggWwpmbM8SxMnTpSnUZ5qmbPeUdZd5iOT6WwTExMPHTokj/XDDz/I XeTRGzRoIHOQW1avXn3rrbfKWsjMZSPKYssjyqPIf8odZRpZZlm7U045RW6R yXR51q1bp89P1apVZ8+eLQ8t8+nSpUv+gN69e8vOILOSW+RZlXt99NFH+lTL XqG70LZt22Q+skXk/8ucZRt9/PHH8kCbNm3q3r277HhyL7m7Pvozzzwj21Tm PHr0aPlPmc9VV12lt8yZM0cXqXjx4jIruVEG27I8MucBAwbIY+mTJtti165d gwcP1k0mM9T5dOzYUZ5AuWXWrFlyL1nmM888U+5VsGDBCRMm6EZ8/vnn5amQ ac4//3y5RR5r+vTpulnvuusuXa9evXrJfGSxZQll3eXZlr1U7iXTDBo0SHY5 mUY2kz5pVapUkceSxZ47d65u1muvvVa2hTyWbALdgn379tVdsW3btvpYTz31 1M6dO+VGefSEwM9fyh1ltvJYa9askbvIrOrWrSuPLjd+8MEHOp9u3brJvir3 euihh3QtHnnkkbVr18pk8kRVrFhR5lyoUCHZOWV55OFkGrmX3K5/YrJxdRe6 8cYb5YFkseU51F3ojjvukMeVW2Q3lmdGnliZTHZO2RXlEeXPVhZPNofuh7// /rtuiwsvvFAeSB590qRJ+my0aNHil19+kYf+7rvvLr/8cplGnvwPP/xQHk6m lB1GX09kg8qsIvtqiYighgGe4cYaJscpOQaddtppOkj4+uuvddwiB1w5iMuB Ug5hMsaLC5AxsBzg5MbrrrtOjmUypYyjdLwh4yi5RabRsaiMmvSAW716dZmP HATlQHn33XfrkfqJJ56Q8Y8c9GVYK0dSmUzGUTqfc889VwYbcosMLWSRZACv S1i+fHkZycijyzhKhus6HxnkyGPJjU8//bRONmbMGN0WMo6S+cgAQEaGhwJk JCYTyNH8/fffl+O4DLxluK7H7htuuEEmkBtHjBihowsZR+nAUgYDOgKRJZTH koWsUaOGjlvGjRsnSyijLxkM6zN5wQUXyEPLaEceQu/VuXNnmY/cKKust4wa NWpfwGWXXaZDehka7dixQ+4lIwcdk8goRWYr08jTq09jq1atZCayPEOHDtVp +vfvr+MWHUfJAsgtMviUJZT9UMZRsi3kdrnX7t27f/vtNx2PyUBa7iLPmCyh 3iIbRVZcZtWjRw8d1913330bNmyQ5ZkxY4YMg+XR5ZmUtwby6LI5ZCvLOwXZ YfR5lrGNPvM333yzTCCzklGlPoeyYDL6kuX54osv6tevL48l89HNIXeUcZQM oXUcJdPI7iEzkZlfdNFFuu5vvfWWrqnsbMuXL5d7ybMhT5puRHlro295zj77 bF1TT46jqGGAi8iLUoRPLc1I8+bN5cVEXm/l3be8sMtrqbx+6lFDXqV1yQ8G BK+LvHn3Bd6Mz5kzR4/O7du3l8OuvALLm275TzmU/PTTT/pKJa/M8vqvM5Gj QHKAPJb85wMPPCAv7HIvzWsyK7m7HETkXrJg8iZaBgPr16/Xo2HDhg1lAm1u 8k8yBz08yf+Rg7I+lhxDdQmHDBlSpkwZuaVZs2abN2+WW+SwLgd9uUXWWqfR JZe5yabRW0aPHq3zkRnK7TJzOaqWK1dObrn00ktXrFihk8lRWFdfDqDBT4us tSyY/K8e5TWmpQbIy3WlSpXklgsvvPDHH3/UR2/QoIEvkMXkGPrPP/8485E1 0mWbN2+eLzB+kCOd/tPUqVNlPvKMyXDo008/lSWU9WrZsqVusu+//17nLHNw 5iZzlvnLo8gEMnjTG2XO8nzKfCpXrvz222/rjXLE9wW+xjtlyhRnXYJXUB5L trJM4xzl5firayHzkeOyLI9soCeffFKXR8Y/zs4vz2fwrEqWLCkTyHFfNqL8 59atW+UZllvKli0rg0l/IPKMHDlSN0efPn1055SJtTXp4sk85dHloC8PJyMc 3ceuvvpq3aVlX5KnQiZ77733ZKXksR588EHdrDKZzFCHiLpHNW3aVB/r119/ 1SWUwaQ8abK+nTp10o0re7uuV4sWLYJ3oeA/kHbt2ul8vvzySx1eduvWTXe8 G2+8UaffsmWLbtY6deqk+8vS/Vn+95FHHtFB14QJE3QrPP7448WKFdOdQYZb +ug6H9kcOsRylkrmoI8lfwg6zYABA/RfZd8uUaKErFqTJk00i8mwSkbpWin1 XvKIzi6kc9YhqMxK/8CF7NJVqlSRG2UIJwMwvVF2S92l5c/WH/gIIN0fiAz5 5A9HppH3Ds4uXa1aNbnl4osv/vbbb/XvUUuv3Oj8uKf+gUT69RIRIH9KfgCe IH/OkX5FyTFd8o0bN+rBVA55Mq7wBypH7dq15cZzzjln+vTp/sBgoHPnzjoG kGGtjGDlqCcDJ60r/sAxUY6tJ598shwH5cCtR3wZW8rIUO4io83hw4fLxDKZ fiYr4+GxY8fKNDru1Y+G9f/LwVrHUTIE0iXcvn17q1at5Ba5vV+/fv7AiGLE iBF6MJUZ+gPDAz3K69z0jjVr1tRl/uuvv3RofeWVV8p/FilSxPk0XN4a6PhQ RkTBI0xdax3kOx8CLl26VMctN998s5YZGVDpo+tbA5nmmmuukfnoM+kPDA90 eWSa22+/XadxXvxvu+22uLg4eUJuuOEGHf7Jk6brdf755zuDeWeNdIDXs2dP HbfIOEpvl3c6pUqVkjvKCmoa8gfqkNySmJioH786i6TkORw0aJAOoZ1x1MCB A/UtRuvWrfVjwb179zrjKJ1GZpVuCPTuu+/qAEne++hz+MYbb+gbiiuuuOKX X37R7SK7k24O2aD69kSHfPouSW6ZO3euDHFlPvL06ohRdrbq1avrrvj555/r h4myOWQ3K1q0qGwOWTWZg37gHum/p1ymJ3UAwHGTd8Ty+inv1rt37+4PvHrL 21U9NMjRR1455Z3ygQDnLvIyK6//emjQsOMPRACtYXKglHs5hzyZ7Kqrrsrw oWWaLl26OMMGPXQ++OCDcvSXR5djujyoHNo2bdqk09SoUUP+U9/pp5tV//79 tdKMHj3aHziqylv+U089VZanZcuW+sZcjiAFCxaUOcuh0Mlf/rQ3+3KLHBnl 7voJzlNPPaXDD7nl9NNPlxvlrfry5ctl+p07d1auXFmPwumGBLpScsD68MMP 9XOxrl276kM4h7yGDRvqk7Z79+46deroUy2HdR2iyCrrPHUdZUpd92uvvVbX a8aMGTpuOffccz/77DOZTO5y3XXX6WQyNnPuK/PRI7vziZIOG7QqfP/993qK WpUqVWScoKOIbt266WJPnTpVD7vp1k5u1AWWe+lyLlu27IILLpAby5cv/9pr rzlPvk726quv6megWkGd+ch9ZeAhE8gYSW/funVr48aN5V6lS5eWranjNK1h smVlAJPhLiSP5Yzitm3bpgNO2d9kzjKKk4GQPtYHH3yg08jOmZIm3axatGih u7QMG3TOt9xyi56idvfdd2uflCdNR4MycfBfhP6ByF+K7Pnt27fX4ZC2SlkL GUzKuEVuvP7663Vz/Prrr3pZJNkcx66U9jq5l24LHcVpH5NRje4MOorbsWOH Ps+yq+sHsnJfWRJNYfrH8tJLL+m66yhO/mnw4MEyvYbitWvX6n4iozj9a9Vn RnchrXwyE7nRqWHybOg4fNy4cZUqVfIFzjOcP3++7kKyW+piy+YIfoocX3/9 tT6QvLzoo8hIRv6g5EbZkWbPnq3PgA7FZT5LlizZsmWLvqHIcB8AAMAoOeT9 8ccfcXFxcmCSkZuOW2TEdd5558kt1atXHz9+vH7KpjVMxjbOKfHpyDR6UNaP sWTOMgKUkaEc72QcJcMeHUY++eSTOtmIESOcA3q6WckcdByl/ymj5csvv1wW UsZRL7zwgo5A9KQsOeb26tUreMiqnybrx4jnnHOOngAmc9APpNq0aaPjKBl4 6DJPnjxZh9l33nlnhiulnyrqAEDHUXKjvFnQU9Rk5OAPHNzlKK8H96uvvlrH qDqOlX/SsZlTw/RTRZ3Pfffdp58q3nzzzTKNTL9u3TqdRsZRei+dg24F/c8e PXroWH3UqFF6o4ztixcvLrfIQHH79u06btFllnGREy3TbXodR8laDBw4UDf9 c889J0+yM47yB0ZNOo6Sp1G/5iD/G/wxt8z8nXfekY0l0zzwwAM61nr99dcr VKggtzRq1Eh2J+2cWsNkO+rXCo6l4yh9NnTHkEG77ISyFrVr1/7qq6+06cmy 6WTydkyfxhB7NwDkaXpakRxl7r//fv10w3mZ1XPD9PCkp3I5x2J5P66HTj1L XNx6660yEznq6Y8EyeuzvOXXw9Bll13mfOij7/SdR+/ataseOz788EP914ce ekiOv3JHeQhtVhs2bNBMUaNGDb2XLo++sOucn376aT28jh49Wg8NMhIoVaqU LE/wuWFaw+RQqPPRmejhWBcv+Nwwnfnw4cMTExPljhdffPGyZcv0XnLw0qOn ZgF/oIfox3m6Fu+9955O0KlTJ/3aqRwEZfmdGiartnv3bh3/yI1//vln8EbR o6T87/z583W95MCtnw19/vnnevpNzZo1p0+fLo/1119/yb/qaEfm7Nw3eIb6 maZMcMkll+hnkc5nmmefffaUKVP0e68yyNHFlqXVJ0TWKHh4IEd22Vh6MpLe op9p6sdq+m1ZeU769eunT6OeG6ZbxAl9qmTJkrrj6VaWkYM8wzLYKFOmzNCh Q/VeGid9gc80dZzjTxt0OfPRGiZ31GGDLHDz5s2dUZxuWT1VL3gUp59jOvuk zFnPDdNRnC5nx44d5V4ydHHODfv22291GvmrcfZDHXo5hS343DCd+b333iur GR8fL/fSaWQUp8+zM4rTWemYUNexe/fuOo0MluQh5Pb+/fvrB8Faw2R/ll1I R6cyikv3d+3MVs8Nkz8EGVrr/vnyyy/LxpIbGzduvHz5cplM/kDkj8UXuKax 3uvYXUg/05SH69mzpy6qLJgGXhl+L1y4UBZSlkcH1ULWUf80dDSou5BzblhU 4LvDOudp06bpt1Nlx5YnTfYHmbnu0r60c8P0RSM4YgMAEDYyjtJPS+vVq6dH ahkSnHfeeXJEk3HU1KlTNezop4py8JJbnIQVPH6W46AOJE4//XQ9zspo+aKL LtKRlYyj9PT+p556Sj+Bcs6x10+7dD76mZcOCfSbdHKXbdu26aeBpUuX1nPD 9PIL+nAyBvCnDcK1PjmLF3xumD9wqG3RooU8ugwMHnzwQX+gCDkXiJBxlA4w tLbpB3D+wDBYBgM6zYIFC+RGGQ3eddddeo793XffLXeRQcKcOXP0/HDnHHuV GkTHUXJHGZ3qeEwvoCE3tmrVSj/7c84xq1u3rjNuSRcMH330Uc1KEydO1CFf r169ihUrph1JS6B+z1RrmJ4Vpt+Hdc6Ql3vpuWHB59jLLWXLlpVbLr300jVr 1sg4R68ooout0+g2Cj4HT8ZR+mmpnhsm/zpq1CjZDfRcfRntyIPKvfRTRf2Q 13nHFPzxoo5FZQPJOy9ddxnl6jhKdkgZZfkD55hdeeWV6c6xP/ZcAgDARx99 JC+P8so/dOhQDVwXX3yxvnRPmDBBU1Xv3r31CKXfpPMFTuXyB44RderU0Rdb mVjenss0r732mk5TrVo1PabLO1y9Ra8bJuQwrV/zHz58uD6WHBb1uCaLoW+f ZcH0R0NOPvlkf+AYN3/+fB2K6HXD/IFzjHXOWkuE03NkmfVzn08//VTPZ5YB gx7pnDNq5J27P3Dgk2nSfeYlM9Q5yyqvX79eVm327NlyrNE7/v777zqZfkdP Bh76n4sWLdJHv+aaa3SZR44cqeOZ66+/Xs+C1pOy9AJoesUtf+ADPl/QmTl/ /vmnHnn1Agv6uY8+G3LE1E95ZG7OVwK1JcphXTeHfvVSF0krkNYSvfqZPvMN GjTQ+SxeslhPLZMNrR9Byo0y3nCGNDofPe7L+urBVJbQ2coytpE5y7Mkz5Ve CeGxxx7TFdHaKSs7Y8YMvUVTni9wBrg/EK90CWUUIc+GHO63bt36yCOP6DQd O3bU2ul8E1bP/fMHrnehjyV7hS5zQuBSWjLska3pD0SYwYMH67307ERZ8pdf fll3Ia2d/kDy0mlmzZqlgxPneheyS2vEGzNmjA48nO+ZyrBQ9wQZ6emfhowz dYA3btw4neayyy7TOQ8bNkzPPJR76WaVHVKncWqnXu9CyMBVl/CFF17QTe9c 76Jnz57y5OifRkLgR/eEBi7nGxyyWfVeeqE5uUUGXbrpZaPoh5K6S/sDHy/q yV1FixbdsmWLP3AWva57hQoVdBz43Xff6Qa68cYb/YHx2LPPPqvXqbjjjjtk N5PHkqfOaZILFy7UFdGvDOgoXejZiXJLo0aN9E9+0qRJ+vzI7qffqpA/H3nS 9IJ1sksHj9JlPvIEHntGHwAARumhyvnUae7cuXpYbNiwoYyRZOi1bNmyG264 QSeTg7hezEGvKCKccZQcFjUN6VhUx1FyWJSxpV7mQg7N9957r96rV69e/sC4 Tg61evR0TjYLHkfpKdx64JaxqJYQOaDL3XVU2blzZ71X8KfGeniVkaoOUJ1a ouMoOeDKY8kqbNiwQU+L0lO5dJpRo0bpLc5J+7KEOvKUEaY/MKg+66yzdNyi z4bQi+jKnGVYq6svD6Ejq27duum9Hn/8cV1THUfJvfSSwr7Aye062pHBsF5b rHr16v7AaEc2h66+Xn9VbpShrK7X888/7w+MM2UAo6Mveffx999/y70mTppY tNjhk+1lXKRDCxlH6TQyRNf10uuG6af8Oo0zOn344YdlY8l8vvrqKxlHyTaV O+rIyqmdlStX1v+UcZTeS8dRcsugQYN0CTt16rR69WpZbBmPOZtVxkI6AEv3 TVi9/qos5EUXXaSfMOo4SseQei2Xn3/++fLLL9f5zJw50x9om7I59Il1vhwK AHBoppBXS+eQ17hxY/0nrWHi0Ucf1Y+T5Jil00ycOFEPOnJc00OeXjMqNXBl ez33Q97G+gOfTH322Wd6qJL39XrRJzmGan4ZOXKkfkvROSgPGTJELwivV9GX e5UrV25/gIw3tD7JS72eaPTaa6857UvPz7nzzjt1mZ988kk5jsstH3/8sXP2 sh6C5ZCn4UKWUK9gptdD8KXVMP38SNdLbtELY8oYQ69uVKRIEXnzrmMJzQty wNI1lUOYHOtLlCjRvHlzHQ7pOeri9ttv17Opf/zxx/r168stBQsW/OGHH/yB I3758uV1RfScJb2ulC/om3TybOgtV1xxxeLFi/2BQ578f90c7733nk5Wt25d nUzWUY+VzmdeemydN2+edr8GDRpouFi5cmWbNm2cUZyeTCWbQ9ZC1kU/4PMH RnG+tMu2yzTyDOjzIwMSOdDLmsq47q677tLlkc2hy6M1TMiwR8/p0sO9TKPP htyo85FRnH5Lbtu2bY899piWLhnF6cdzeiEyIYMcPTFJv0kn66KXbdfv+ulY S2vY7t27ZfikyyzjBNn0+sMQunP26dNHx5Dt2rXTOcs+4NQwXebJkyfLnPWy G76gq78614WTG7t06aIfj+rI05dWw2RWl156qa7aiy++qF9JeOedd3RAUqVK Fb16gzy9ei8ZxWn3k01QuHBh2cf06q9aw3Sa5557Ts8PlEXVIWt8fLw+z7KL 6lroh6RyR1lCvZeeq+kPGsXJLfojCzJwPf3003XV9PxJHcX5At/g0JStV38V rVu31j1h6NCh+ufTsWNHzcIyFtXzDHUUpysifxRly5Z1PrOWKfWBGjVqpPu8 bAt9fmTr6ClqskPqteN0c+hiB39mfexXGAAAMMqXdkUCPXDLKC4q7deI9FPF FStW3HLLLXrFdRn16cBSxlF69JRDpBYhHUfJ2E/+dc+ePb/99puOIWUcpTVs 3bp1+qGz/hSUnimtlzCV+chhXb/OUKtWLZ2zHMr1BHU9Sso46quvvpLRjoyj evbs6Qu0Jh3WynxkHKXDbBk564A53TnYMufixYvr557vvvuu3CKHXRl4BI+j /MdcX1fmI4MBGZPIen3yySc6TnDGUTIfHZM4nyo2bNjQHxhGyrBW10IGivpx drpxlD/oU0V5a6Anhzuf9DmfKqYbR8lj6aeK4tlnn9W3Ku3bt9d1l1t0HCVv DXQcJfyBYb88+fqLTunGUc6nivL8yPBJN70MqHQcJW8NnHGUfqqYbhwlW8f5 WoHzHAb/GpF+eD1nzhwZYeo11mR4r1/i0EucyS16At7q1av1OZS3aXKL7I3y Nk3HY1rDdBylT1qhQoVkHfUkN3kroU+aLDOfKgJAOlOnTvUHzgl54okn9KSU Jk2a6D+9/fbbenB//PHHNf6kOzdM3uM7NWzs2LH65n3QoEH64cV5552n85E3 3Rou5IipFcuJG84Z4HrVJrlFf2XSH8h0+nM8em6YWLp0qR5QmjVrpkMLOSjr ZRxk4XWaLl266CFPDl76Bn/WrFnOuWF6EJTjuy/o3DBZZnks/UU8ubvOR8Yh uoT33Xeffo1R1qJq1aq6+hoB5EmTw40elDUd/PDDDzqBrI52Lec3JW+77bY1 a9ZoXtAa5ku7zJccHPWba7K+ell+5yrrzjfppkyZ4hzuV61apb8peeWVV8oy y3q98847WnLq1aunm0MP07KEekZZ2bJldSDhXIhMlkEeXTaH/qak3njsZ5oy itM5lytXLirw+5V6+Sbn3DB5Tr755hu5ReajZzHJJtOLtYpu3brpwd051Sfd uWE7duzQOqejOH/gK5Oym8l85Hb9xNCf9pmmPLo8n3r6vV5lPSpwXSmdRgY2 +puSGlJk3WVf0uVxrlynozi9Lpye4S8DRV0AbWj+QH7R5/Dll1/WsPP666/r vWRv1yCjn2lGpf2mpKya7IF6UtNbb72l89HfQtKCp0PoiRMn6s4pQ2J/2lcv 9V7XX3+9fiNVv9joC3ymqf3Q+U3J/v37yw4s655uFCdkUK1LeOGFF+qGdkZx sgNr4XzooYf0LrKo8qchk8kuXalSJXl+ZCeRXVqznq67fhNWFkk2il7iTMZa uu7OGXcyvFy2bJncS39TUm889jNNHcWtXbtW17RRo0b6Ca9zbpi8ZdBrjPzv f/+TNxe66Z3NoV8ZkE0vw/ucvLABAJAL9FCl54bJYXH27NmaIJxPFRcvXqzt Sw6X+ltOctjVcZSMEufMmaNX0tDP7PRTRX9gHKVDlGrVqslYyx+4MIgcsvV8 JD03zJ/2qaJMpl/GlPnI+E0/j9PTxeWYq/8ph90PPvjAH7icfu/evfVed9xx hxYq54KuzvV19WNomSZ4HKVrob/Nrb8pqavvnGOvv3wtd+zbt68OdJ0LRMh4 Wy8b4pxjP3nyZFlmmY/WMF/gmrf66O+9954v0NlkHKWjC61hcq8333xT7iVj OefjsO7du8uIRdZd7qU/6FmhQgX9eSYZDOu4Ra+vK0s4bNgwHdfpr17Kjc6n inKLflCuvynpjKNkAfQce1/gunD6TVLnVy/vuece/aKi86nigw8+KINVuUWW Rz/OltGOU8P07UzlypWd68vpvfTcMP2lct1kzqeKMuY5++yzowLXD9GPvJ1v whYvXly/ianXn3E+VfQHxlHBvykpt8imlDdx2r7SfaooT5q+LQIABJMXZz1e y5tlPbLMmDEjNuDWW2/VNvLCCy84fUA/MWnZsqW++5Y3wpprunXrpkHp3nvv 1ddt/RaYL+03JeVe48aN05doPdlMDi5ymNbjtbzB1w8sHnjgAf1NSTlM6/to Oazr678cXvU465xf3alTJ52z1hJf2jfp5Lgmhzw9jtx00036PloOoxqv5Aio j+VcdqB58+a6Xq+++qoeZ/Wrl/7AN9c0VTVt2lTPQ/7777+dU7n0VDc5vuh/ Okd5XUKhV9EXMiSoWrWqTONcRV/mr1lMbly9erU/cOzTY6jWEn/gVC6dszzh 2kamT5+uR8zatWvrSemyXjIG0MyiHy8KGbbpHbVB6Zk5vqDflHSuG1alSpWJ EyfqJdT0p73lXs6PGpx//vk6Hx0/7N+/Xx/otNNO0+tgrFy5Us/nkedEniu9 SNqTTz4pQxFZlxEjRmgj1YGiL3AxT/2wTLdOXFyc1jYZ1OkXP8uUKTNo0CDZ FZ3rXWjA0VajtdNZQln3s846S4/y+k06mbOeNiZ7kV79Ve7o/KiBDDz01LLH HntMd6E33nhD5+z8pqSWGVlTGT7p1V979OjhTzvdXeejO4xwThvr37+/fih5 ++23y8LIustYS5985+qv8gell+nQM+u0duoSyqBLb9Fra8is9HoXvqDfQpKd XD+3lSdTT3eXO/rSPrPWwaTsADqf66+/Xu81ZMgQveW5557TgeuAAQP0e68y uNVh2O7du/UW5zcldZQeFfjqpa6p7CS6PM5vSjo/DKHvCPQXSOVPQDeQfk/Z +QaHTKkfIsv7CN2F5A9T9w35Y9Gh2gUXXKA/PSCb9YorrtBf5ZAdRkezJUqU iAr8EjoAAGGjB8G1a9fqAbdevXo6bpGxnP6mtozKZIyn1011vqHwwQcf6ClY egkLoWcB7dq1y5d23TB/YGjh/Da3Xn9Vh6MyiNV76RVF9BeCdMAsh0X5T7lj um/SrVu3Tn8YSw7oci9/2m9z63xkHKWjCxk56/hn5syZOoSWQ7AecLXwyMx1 kF+kSBG9UopeRV/nIyuoSyj/pLfIYEDfCKQbR4kOHTro9VedDzedC0TIkE8/ O3OWUK91ptcN0xFjMB1ayMBMRyky+NQm6fympHOymTyWrqkTr5xxlHPdMHl0 GUfpZ3NRgTMBnCuK6Ll/UYFTufSktcGDB+u4RcdRMnN5evXn5ps1a6aXetiz Z4887fI0ylLpqFLGUXovHUfJNG+//bYv7WQzHf/Igv2/vXOP+6la1/7vJ5Kz ymZTohJZOr3aCSUVklJyqCTnRIRyKFROkQiRlFgORbSKWGwllVNRyqtUEhWt FrViVY5ZqwPz/a557d9Y0/Ngrb3f3aOV6/qjj2c0xj3vMeb8zfua97jHfauK UO3atVeuXMmoPXv2BB8gxFinGPRpAI/SfV+4cKEWRKuhbCo6vaL8qzpVobxh gE8JZTCTAzCnfjeGYRj/GmjSpIk2IxTlIm+Y3sPKog+GDh2qFsy0WrLnQ8B0 ypgqORhvXfma5A1Tn6eeekot2COZzttuu03v6pAPoXPnzirAh93X9zWf1Rql LPrKU6SWtm3balTIKzVhwgS5cbCq8AQlyPriiy/k2lKg1AlxvWws0fvvv69R WWKHUvFBS8kZPnx4yZIlpY+8YbRjkoI3DMnBX3cYb9iUKVOUex8epQOSdEO3 vHnzsmghi35IoqU/kxHgURynPW/ePMXhXHjhhdwpuchUUzuVKPGpooHB6rEC XIW7HLxhy5cvV8LzcuXKKZxJeeHEQLJ7w7JHgEsOhOSyyy5Lxwdalf2eNQlZ 15Kxf2p599131ZKFxcHBKleujBxVBtfpXfmaUpnK4CDwTLG4KBPKlc7kQ+Dq CsoqVKhQSJnFommUjgww06AhLE6SA4tbu3at5t6iRQuF3l1//fWSg/Lqw3QU cBVOworFRYks+i+99JIYWuvWreWGhRaK+ykZb/CG6VzwP/SGqaYkfbi6Jku3 dBw3FfKZhNi/4A3jpqhF2V8hWrQoTx2/WbG4cIIjZH8NsX9KRBbFxxOU7C54 w/ixIIclgurDb7WwuompOPYvizdMo3RkAIQs+vxY5ODlVvLTjuI0F+F2ZMln EhmGYRhGjiPEDgUetXTpUu1yaldRWzmqKZnKnKGIYh6lFnhUsohh4FHr1q2T xyzwqGS6VGiGuMRheJRow9atW+vUqZOOa0VBIdSYzK+rcj9JHiU5wf0ipofh vuSSSzDuRYoUUSB9FB8tTHrDkBPOUBzGG9awYUOlStPJC/pAa3VkIGTRPwyP SkKeJWj/jh07ojjHmtqzZxRR/coozqIPaeHqgUf16tULHoWo2rVrf/PNN1JJ pCW7N+xQPAqMGTNGJyZq1Kjx6aefRnGuWlWZPDyPUkvgUY8++qg+MbSrCEWE pKmmZCpzhiIUIRWPQkN4lDQMPGrWrFkqdi8eJXelsqmIRyXz6/73n33DMIxf M3hb8v4sUKAA39rKLblo0SIF9jRr1kz7JqNGjdKBRHnDdu7cqfCbfPnyvfba awrIwfooNuzOO+9UIUJ5w3Lnzq0CfDo2qFSTig2jBdqgKF/lgeftzf8qXLgw A6+//nodmfzyyy+V6+mss85SbJhK26Bh69atpeGwYcOChoo6Q+dSpUrpk3/T pk2MwvCpsPLxxx8vZ4K8YQiXuwN9MEwK7IGHKBSKljJlysirJvu+bds2ORMK FSqkqDP4gzZuzj//fB3Snz17tsxru3bt5NN79tlntXFTs2bNN954g0aUVE1J NJcxZWE19+LFi3/99ddR7A3TptXVV1+tllBTkmvJdaCoKu2ayRvGTHU4lNuq o5cYZYXWVK1adV9cOZS7fPHFF6fihBWqIElPpUIFM2fOlD8qpOXX0UvWTWV9 oAEiErA4mKHcHWPHjkUyA6E0CrEbPXq0YpaaNm2qXTyxOOaCProX0nDLli1i etw1RiksUN4wyMyQIUOiOApOdR7TmdgwNFQCDRpFG1AAApOK9zT79OmjeKSQ dpUJKgqO/5WOT+SpDmYUczZxrXvvvZcHdcqUKV27dg21kLg0opYtWyaHat26 dXViVCyOOzhixAhp2KJFC40SIeEZ7tatG4tGI7dJjHHNmjWiTDwAesjRUD8E HRngWvwe9QippiSjBg0apEW74YYbeOT0CGk1Tj/9dO1BL1myRBrWr19fCxuq Y/Tt21fXCjUl+RUrNuzzzz9XbFjIC6cfL8J5XFlSWnikIcb0gcVxaxCOYnwC pOLK4NxWGnk8gnNS6WRp0U++XLlyOnbKsuin2qhRI63h888/rw8KOXh1QkEF rXil6IwJ3eRM/plfh4ZhGIaRFRjB9957Tz6ZGjVqiOqsWLECI56Kk9Cq+qFo bSqTtSmKq5nDo8TQFBumYtBiTaIEcMsQYz9u3DhtUQ0cOFCsQLFhWEbVi8Qs QkVkFjH9alF9c5iekvmXKFHiwQcfFEmARyndQc+ePZVIQd4waIk4JPooqDuc 9YNNwaPScW1uiFAU0+Np06al4pwnHTp0UFXHfv366aClUlgwffniUvFGufb+ IF1iRBAh6fP2228rMSykS6OYoDS85557pCHcPn2w2LBUHGMvX9zKlSu1jEro iobacBdnE/FmDbUX+fTTT3MhvnFoEY9SbW4aw3a2YuwZtXTpUn10NGnSRHFx I0eOVIa3/v37S0M+OnTulZsC/1GIHcxK0QX6xIAF6aiLvGEI14a7VkMsd+rU qeJRV1xxxapVq5CDfHnDWHzRfm4K65OMDeNDQBrymabVgBKHGPtXX31VFaD0 wLDUig2DoOp8wZH4ARmGYfxyMW/ePF6k2Aje0rIIfNvqLT1x4kS19O7dW52T ecNUo1meEKyqTpztj+sFy+9x5plnatSiRYskBysmyQMGDFCL9ryUtl1s4aGH HgrfyHw18xovWbKkTreFvGFYDR1RxMpLTpbYIRS46667ZNYXLFhw2mmnITxf vnw7duxAFHZKo5TnP4rTkqulTZs2+hjHKKulR48eyqKPfZQ7C0OmJEtRpqYk GsrrEmpKXn311cqQNmXKlKJF/1a2pnnz5p9++qnok7J7oeSbb76peHu515CM taIlexb9uXPnyvbVrVtXDqV33nlHubMKFiyoyDpUgnRpoHKrooOSJ2DldT5R sUPah5LrLGTRR0+0RUNGXXvttZoIlEZOjJA3TPPKUlOSS7NK3bt316i7775b j0dwrx20FpISySqkECuvg59bt27t1atXyKigUckjA0hmIvLipuO8YdKwePHi onPakEXy0KFD5fKC9iiILuQNg9JIw5YtW0oOtDAkkRDGjx8vUsoo6I1qSurB YzoaFWL/VHYBMEoETyFzYNKkSaJGs2bN0kMOZdL9UuwfjQrI5x6F7K+DBg3i Wsjp3LmzDloOHjwYOQp1U3IPOa9CvgtaqlWrpp9Y9iz6/IrlEuzSpcuWLVui OE+FuDS3XulHIJAapT1rJMO69XO+4YYbtBrKG4YcfiwbN26MEln0YeC6HdC5 kP01ircy6am8YTVr1pSGIW8Yd2fdunVci2+NcFvnzJmjk7AKG0u7FpJhGIZx JCBTpdghTBWcR+lEsPKKi/7oo4+aNm0qd03yDIWMl3aNMa/JvGGYRZikeF2F ChUwtVG8M6UTE8qir00u5Q1DOGZdZjFk0U/GDvFnqVKltLNMe9++fSFsyIcV a4st8KhkbW61wEXlPwl5wxYvXowd371797Bhw3R1aKHoeuBRyqJPI1QtMD25 BFkZMYcZM2Zo7kqiq/yrcjGFnCdMUMQ7SxZ9bZwFKNMvAsUlQk1JlA9cQrvz Y8aMEYeEBOrQovKG0Thw4EDt5Ib8q5BbhcxB0TULxf4xSjnKuFbXrl21F5+s KQnvohH+o6CsdKbcPB8a+jPE/iXzhknDESNGKM9t+/btVVKKB0C57lMHxv7p dmgrE6YkyTVq1JCGrIa2RLk7a9eupVHViPTJo/MjLJEcZWFf2zAMw0iCt2UU x7SocAxvSz5Io9jEYI+CR0jOhI4dO8qUK5knjTpJJ9eBIli0f0TjmWeeqbRj Ib66ZcuW4Rij+ihDQpSJAOfqQ4YMUUwLL3le5uk45Ft7MbzqZTp1sJGBwYPX p08faahEZNrB+frrrzFVv//973UKjA9zZdHnw1/mAwMhQ6lQLtCuXTtpqDz/ jGLKOsa4dOlS5QUtWrToxx9/LIufrCkZxfkQNEoR4EjGKEufVq1abdy4UenU MGQqT4ARV5iNYnUYq5lu2bIl7HmFfR/J4e7o7Nh7772nCD0AR5IC8rMxVjrr nFpgcegMKwuVwWVwYXE33nijFvbRRx/V7dBJWMbqUGeUqCmpSCqMvjQMlcFp 0eLTPmDAgCg+x9ehQwct7MyZM7V3pqTo9FEyT0y8NCxevPiCBQuiDIvT1Vu3 bq3aTCE9RTgyoAQatKiiU5SJAOeZ4VpRvN0J7dEoOkttVQZnBQYPHiwN27Rp oz5z587N4g0L2V9ZllSmpqQecm6H/FowGWl49913S87kyZOlYe3atTW1UAuJ 2yTXHyxOTsXAkXQSloE8MBqlyuBcLlT8hJSKxb300kslSpTQMqoPHEkawuJE fmBxotl33HGH0koEFnfnnXdmqYWUypyPCCc4aBfLhaFJH1icHKoPPfRQqAwO dWcUD1XlypW1sPo0iDInOGBx8huHjCsXX3yxNBSnTScqg/OwXXLJJak41k5Z 9NEhBJuF08SGYRiGkWOQDSpTpozMos6ppeIjk+I/oRoR7Rhx7SrCAzUwO4+S WcSABraMOY5iHoVhldeod+/e6iZvGKMUbKba3JKsYLM9e/bIjqs2t4LEZPFD Fn0FSom3wKPkoQrViAKPCjUltasIQxs+fLiCu66//nrxlnHjxulyCIwSPCoV Z9GP4pweMEP1gYqInEONkrSWq0OxNH3xKBpheiLnfH0gNos37Lzzzosyu4qp AzOKaMXgEvJrKSRePEr3grujllCbO1A+rqh1DruK3FYdDlWef1q6dOmiLW+Y njRkeUVi+YYqW7ZsKo4GFI/icsEbxrdV4FFo2LRpU2nIqkofPot0NoSHRCdq 03Garyj+LgveMGkYanPzESENldAVyTxsyr2PnJo1a6bjkLCQ80TeMNbfu4qG YRjZoWJ/wRsGLr300ig2cFOmTFGLYsMwXh07dtR2D+9YeWlCXqkJEyboIzfk KChfvry2MxYtWqSWFi1a6JUeitRkryk5evToZE1JXvJK88W1FBsG6tSpI4Mi 50Yqk1dq7969yjaAHKyqds0WLFigU2AYlF27djFKNSWRDKPQtV588UXJadu2 rUxMyIfQqVMneAXz4pMf+y77pQ0gTJ5OpQVvWDKvlFqUlh8gGTkMwXBjyLS3 pZqSIKTl1xoqNixZilpGORUfINUZNHTg30rzzv+VHKV6SMWxYbpBwRumlVc+ BPSh5wcffPD9999jiEPVwsPkhQssToH9ig3jWhjZ5cuX0xK8Yan4sGEUc7aQ nkKxYay2Skin4tgwMSJdGhYnB8i2bdtCyiwUkx8pJNDQIYIo4w1LHZhXSntt 8qola0rWr18/yrhPNWrAgAHKq5CshZTFGzZt2jT14THTgYUqVaqIVWpPE8mw ONXLDnuaEydOlIahpiTETMcKdGAzsDhaeADUIm9YFFdtkBx5w6K4FpKelpEj R+7cuZOf6uLFi4sVKyZiqT4hERksTjdIsWEM7Nmzp+5FqCmpCuM69wEJF9GV fyzwz1BTkpurR6hJkyb6aSidLOCnobBJsTgpcKi8cEkWJw0VG6ZzyuvWrYsS 3rBUJp8JP4ezzz5bLWZxhmEYRs5DZjHUlAzVakIa2PXr1zdt2lSmasSIEdp9 CzwKQ689suz5OUVRKlasKDaompJqVNJ75deVHBFvzOJ5552nFrFcWJPMK/IV Y0/7Pffco2OM0DAd3BCPwuaOHTtWxxgDj4LphbxSYstz586N4hh7lYlPZfLr Mn1omFgcAjUR+G3gUWqpVKmSKApykLxjxw4svrbwlF83ilOGahk7dOggViAe FdJ8ZfeGBdbELEqXLi2utXr1ah20FI+ikQlKZyWhjWIepSgvPjFYLuRAOOX6 S/IoXSjkhUvW5pYc+RjRkH+INQVvWCqzqwjf05/iUXAkboq2zlVTElFaVaCN 8ijO5atdRaBgwijBo8I2tDooNiw6sKakdhVDTUnVckp6w4BrcxuGYWSHnCSy g4r9WLp0qV6bvLf5+lYtYL23dU5tf1w5mjdt/vz5w45SFH+6qgax3tu8mTWq Vq1avJB3794dkqJnqRwNFN2dHVxLzqt0nDdMCUhDFv2bb74ZDZPFdxQBLpeF MkQFOfz3+OOPT8c1JaPYQqG8RmHlpSGGUpIRKB4SxZZLniWZFXDqqafKACmO XVQklakcHcVWXi3hJJ3WR6fzlAJCWfTVLcS9FC5cmIWVt4TO4WDjNddcI68L jfxDpwV1L/bs2aPqPyJduqHQNuQUKFBAc4diha1Mrq6MCloczVGBW506dQqk S/qE7K9/+tOftAhKgSUr/2MMOUmScoK3E4vPqioNlJYa0iUNVeOAO5K816qe Ix9UFFct1Kh+/fopiK5ly5aSnD37q+KmDvoIzZ8/X8sILdQGX8iizyONhrSE 7K+CDjNqkYOcNWvWKHtDyKIfDjYyZWkYKLHK+mis9j31IEVxFghtFFapUkUP 2Jw5czQqmf1VLSH7axQ7YHUOUR7s6MATHFEcnZgvXz4WtnHjxlrGUaNGae6D Bw/WHf9rjPAYAJhqyP6qeyqWDuVTCQxEPffcc3qEunfvrl9Wlluv/d/kSdjo wOyv6rZixQppeNNNN0lD/Vr1fzWEPwNLf/311zVTsfSD3mLDMAzD+JkgO6Vd J8yitowFHXyTNZRB7Ny5s1gBPIr/hXkNZvFQ1YiyQ5lCZbvHjRsnshey6MPS FXQUYoc0SvRJ5yKDnKeeeko5PaA9srkKPwPwKDpv3769UqVKkqza3Bqbhbco owi8pX379iGLvkZlr0YUsuhHsXdIjIX/8u/su8YTJ0487rjjkCznlWpzp7Lh vPPO00FR6cYnhtrPP/98rb+C9lmNbt26ae7wKPEWeBSER/mKw/eOVozGLDwq WY1I3fh4kYbDhw+XhrojgbdIbPB2soxcLlmbWxrCo6RhyD+juYjaSSYtqkaU jk/CIifkTjlMNaLsQKDOj2ibUlTWWfQNwzAOBYUk7d69G1MlXxPvzxYtWuj/ yhuWyuRD4B3boEEDvYr5ttVJMbVHmY/ZKD7KJzm1a9eWnKlTp4ZE5VHiJF3q QG/Ynj17du3aFazMl19+qWthryUZDWUpbrnlFvWRN4w+8obJ1ZP8vgbMLtSU lH1XFv10nOZLPTHKYc9L7oJgngSFM4WdIGRixcLGHJxHJOQ///M/QxmdsCyy d1GGYyC5WrVqqXjfR+FnSoqeimOHJEcR4OC6666ToynLjZNRbtSokbopFRg9 Q01JZCI57HlVqVIl0CRBFE4s5dZbb0WZ3LlzyxtGezgJK28YPCSwuKQcuYbQ hHvH+gwcODAVR46NHz9eHZSILJXJh0DnsOelZQmPkLY+5aVhuBa2f//+kgMN kxx5w8JJutSB3jCeHzTRv/fFRQ2kNiRQd1MnYdFwypQp6la3bt0k7ypdunRw per2KVtIYHFSVVn005nK4FEi++uiRYtUYUq8MYji32GDDxbH9JEsb1g6jkVU Z8iSCjrwq5HO6hlcT1EiW4gKtbMar732miTryECUyaKfjjPyye+U5RGSFyuZ zyTKHGwEVatW1UVDLaQ777wzixD9RuRP5naINMobxkOl1ZA3jAuFSFEdGUg+ hzrRwI3jv6qFhJwQ++fsr4ZhGMaRgg42ikfJixJcIsGVwX+1yStvmAaqGlEq UbFRfya9YUiDt2jTM4qtKixFl3v88cdl98WjMIshBjuZnzPKEEL9W1RKWfQl p2/fvrK5CtqXN0ydlYgsFXvDGCWPU9JAIzbs2bVt21bJP+UNYyDMWRpeccUV KqcVihjCAbQ/HmV4y9tvv53KpEuVZCWjAIMGDdKoVq1apbNl0Q/bzVEmXaq4 jfLrhpD4VLwNrU+AsKv41FNPJZl8UIY57ty5EyF8HQRv2BtvvKGrh13FESNG SM6wYcOScnTTv4vBmsgbphQWUSb2L5XJoh9C4kHXrl21pSgmKXYkUs3UFPuX TuSF04dJ8IYtXbpUkpPeMAbyCAXiij6B1oYHxjzKMAwjO7J82PIiDZFXzZo1 kxOA72hF+cobxjfv1VdfHUJ9wlgFhum/UaZio0rpKeYnHKK89957ZWJCXimd pAv7R1F8ZF5ytm7dqtd+pUqV1OeFF16QnNatW0vDBx54QBqOHz8+uA72xcnV JUTEIH/+/OhTrFgxphC8YSptIw1DoecQGyZfQVgoxGJudLAxd+7cOscXStJg rJMn6WSUk665ZKwRX/0XXnihuoXYMGVSwqQqs4FKUacSJ+mijOspxK2hUgjI lzeMsTocmj4wAjydyIeg9Q+xfErY3qlTJ11O2QboEE7AhT1N/Vm6dGlpmOUR 0j6pvGF6YCS8SZMmyZqSjM2ypxllYsO05hKlk7DcWQRKw3AYExYnDUNeKZ2k 2xdXzJQ03R1lXdMjBAlUSzjY+Nvf/lYahl1XgQlqeLhfjILFKf6cR1rbnXpg 0HDo0KHSsEWLFpIQYsPkkAwLxcCPP/5YnDbcDmkob5j4VTI2LGxERpltVqm0 Y8cO9UnuaUoOtFmngMeMGaN7yq84eZvCT0Ne3+QJjv3xIUrJ0VndKFMZnBZ5 w8KvTOuDVnqcgvuUH4W2cSUnuaepFnhmuFNJeql90lAZ/J133tENUrWmyDAM wzByFhiptWvXynhVrVo1tIuHhM1K/iFv2HHHHTdnzhyxAlWZScXeMHE2yQne MMX8a7h8R/xDiU9TmYwitEA8JGfVqlUyiyq1DAMRu9B2rSiiJCvpvXhLnz59 RPnkDVOWdWmYzEggUcEvJ3OPKZ85c2Y6PsLZvn179QkZRbiErpiMDZO3R0IC n2dg2LNLZhSRnPvuu0/XPWhNybDdrBULu4ryhnG5adOmSU7nzp3VTTwqHSci C0xDld+jmIRrxUK1Ka3YihUrAkuRnLCryE3RGmbxrYn/BB6lD5NNmzapCLu8 YTSG8w49evRIjtVnQtg6lzeMsV9++SVywja0eBQaLlmyRHKCN0zPQ5T4ykBO vXr1tIzaVaTFsWGGYRjZoSz627dv52M5Fe/XhFAuPsP1Bj5oTUm1hJN048eP 11e/suinDqwpqZZWrVqp5YEHHgjJPGUIgi9i1KhRIZeXsugXLVo0il/jIW8Y BldygnstWVNSNmLw4MFbt25Fpblz55YsWTIdx7fLzuroZSouiq1RIW+YvCVR xsqn4iz6n3/++f44b1jFihVlWJU3LIprSqYyecPQUDUlldAyyqQv0KpiszZs 2BDFyZGgUqk4e8Obb74p6qKakkC2PktNSeSEyJyQRR86pGLWId8pcoJ7LRSO Cd6S/Zmaklqfiy++WHJCTcnUgbWQdINCmezs+S40hDVhFmj4ySefqLA4fcLt CCdhD1pTMkqcpFMWfeSELPqpA2tKqiVZC0kaMgtpKCufN29ebXfCc3TuNR3H /u1P1EJKHSLfRZa8YbNnzxYPUQ6KdKaQd3Swk7BZaiFFiSz6PNLy8SpvWDou Qqo+qimZytRC4rego5dMTXnD0LlZs2Za1f79+yv+jatLVW1BIvxQ+S5SmZqS SO7WrZta+AcUS3IgV/JJhj1r9TlULSTVlNRqdOjQYfPmzfvjlMIh30Uyb5hK fErsQfNdqEVZ9JkpD9Kll16qn4aSv0WJk7DOG2YYhmHkPAKP0p/hJJ2y6GME Qxb9LDxKLcn8q6qgFMVmMVmbe8WKFVG8cYnJTmWS3ypk+p/hUTLKyF++fDl/ IkeVfbhcoLUH5VFqyRKDjeFWqSzlDUsdeIYiyaOkITxKfEx5w+AJyqIPb1Gl clpCqD88al+cw/8f8qiDZtF/8sknxaPKlCmT5XYcNP9qqCmpJeJLZ8eOHUxN tbnVTaMUbKZtSu0XZ6/NHaoRKYs+Sw3hhEeJjx3qJGySR6lFtblTcRb9jz/+ mMuFLPpZeFTqwPyr0hAeJQ0Dj2rYsOFHH30UxXEI8kmm49g/baSaRxmGYRwG SpW5Z88eVT/k/ckHqY4WPv3009oJ6tq1qzxU8oYVKlRo9uzZ2DLteckITp8+ XW9dTFUqk+Yris30zJkzFfLUqlUr7aANGTJEjoJx48ZFsenEzsrAjRgxgk9+ 1YLEFGJfihUrpp0OecPow6texzO1z8LAnj17Ks4kpG3HqoYs+vKGYeWVx55P eJ0HlDcMToLy0lDpRunD8DD3LVu2RLFPD8aSio8xbtiwQcmXlEUKg6VNmXfe eUcaNmjQgBZUeuKJJ1SJu1mzZvAlrOSSJUsgA3RDHxWOARhNLaPEYvKOP/74 VCYfApgxYwYd8ufPjzHlKnv37l21atWVV16psJ9Zs2YpWkzeMMZu3LhR1X9k OpVFnw4wJQ2pXr06Eujz3nvvNWrUSNn4uR3caDTX0ctUvAWpJRKL054XozDf 0pA1QWYUHyLQ48HAe+65R/tTqhXOqGnTpmmJxOIYq3uh2CEkI//111+PMtlf U7ELUSyOZezVq5ceD2iYdtDq168vDVVGB+EQG9aZOwLJ4c+vv/56+PDhmhed 5WYUi9MGn6L+VBmcgc8++2wWbxjP//5MFn31gYHwcPLks+A8QqgkFseidevW LdRC0hJddtllmjvETGFmXELp5lgExdUrID8dh3LpIZf7lJZhw4apDyyOKagy OEyGbsjR4vNga4MysLgqVapwdWnI75Q+nTt3VrQVdI4OhQsXZnk3bdqkKNDy 5cunEyc4lEBDxRG4Osv42muvSbKy6O+LayHpEbrllltUJnXx4sXQVJTkB7tm zZqdO3fSqKqXgcXxk5Ec1ZREQx7pggULisGuW7eOITzYtWvX1vThyQrvPPfc c7X4YnqGYRiGkZOQWaxUqZLMomKHZM7EQMKuIpZatHb79u3QWvE6hXJh4xS0 H3YV4YSybhUqVFi2bBl9MKnwKOXZgIUqWCgcvRS3oVF5pRi4du1ahdOLtGB2 VZtSPIo+GOX27dvv2LEDEtK/f39VtZY3DA3h0tKQWSAZm6v8nFBNbZTv2rVL BbZgVjfffDNC6MMExVv69esnZqVdRURBKhhCI2slejx16lQlO1UKU3SuU6eO eIuy6CsRmVjBgAEDlM9k0qRJ+7LVlDz77LNphP8oZ36ypqRcRtBsHcxUbe5k IrJQU5KvD30awJHgUYziKlEcaQ+PErfRriIDf/e730lOly5d0BDhrKq06t69 +5dffkkf+M/pp5+uG8THggLmNapMmTLKWi9vGNfiI0gaqqakPjp0NoSHSjGE LJG8YVu3buWGKs+YUqnwaSANtavI1ZV/hgeGj47333+fPjxstWrVQgj3ev78 +VpqecO4HMQ45342hmEY/yKYPXt2FH/OYyP0um7cuLEMXIgN69mzp1rk7uDd myU2LB3nDdB5QEyeMnZiuaI4YGnBggWSk4wNkyF47LHHlHKhfv366vPwww8n a0rSUqRIEVECXvUaVbduXckJsWFYKGkobxhWIBkAIwaCCVNoTZbYMJ2kU4vc L4i6//77ZXCx8ps2bYpibxiMJXWI2DBdHTMUnBuae9iiwhbDfPbHBXEUG4aS ITbsjDPOkKXWTL/66iuZPJZXcfVBQySHGLPLL79czknmKGeXvGGMTcaGIbl8 +fKKiwtbVGJxDPnwww+bNGkiZjV27Fgp0LBhQ01E9ZKUVyp1YGyYNBSLowUW p2OM6AN9SrI48Pzzz6tF3rCQVypkvsLoL1y4MIrTxHXt2lWcLdyOkKw17GmG s7qq40CfEBsmFqeakhpVr149RfuPHz9eo7LHhkEbsnjDHn30UR385CaqGlGV KlUUJJ9lT5Or9+rVSy3a0+R28EjrcCi/LLlqYVZintljw2Ay0lAsDmSJDUvF KTV4dOkTKoPL16TYMD2uydgw3aA77rhDDtWwp9mnTx8xtDlz5sDWUrFzUoGU 8oZx9bJly0qOHhgmwgMsPh8SaHTo0EFhk/w0lHWEbm+//bbYl/KZhMrgPPwa FWLDtBqaOw8ho/g5qKbkiSeeCKlOsjign7NhGIZh5CRkFlVbJ8oEI9FSrVo1 paeAnTZq1EgFxOUNg9uE8kYhNkw7sxhKmcWQnzPsKqqmZKC1OtyXJaNIlIgN U4XxwKNOOukkVRiHQ959993SB2Km+PkssWE0howEig3DxCsNCNRi+vTpUewN 06fBQWPDVJsb6tKmTRtpqNgwiIRiw1KZXUUksyySA49SbBhUTRQ6xIbdd999 YsLwKIYcNDYs1PjmEpIsHsVAJSKLMrFh0I9hw4bp+EmI3HvooYcUH/Xcc8/J 9Qfb1F5tsja39pfDoYwQG6aIu1ScQFWl26GOyiQMSRZLCbFhPDCSLB7FwBtv vFFyFBtGS+vWrVVTEgJcuXJlhQ6uWbMmijNRHDQ2LB3X5paG4TPtuuuuC7Fh derUCbRW+mhXMZ3JKGIYhmEk0aVLlyZNmlxzzTV8I78cY+zYsXyf1q1bt3v3 7s888wy2FRt6ww030A3LMnPmTD60MQS0YF8mTpz46quv0tKjR4/atWtjjJDD W51uTzzxRMOGDZs2bdqpUyc6PPvssw8++GD9+vV5Uffu3Xv27Nl8jNOZPojC vDJqxowZ/fr1w14gp2fPnk8++eQrr7zCWITQ0q5dO/49d+5c7AhC0JA+fFOj IUZZGj7wwAOIZRaYvBYtWmC+sbOY9cWLFzMQheEnbdu2nTp1KgpMmTIFsVyu c+fO0hC7j4ZXXXUVarz44otLly4dPnw4klESQoKBxjiyJu3bt6cFK4bC9OGK aIgxoh2xv//970eMGFGvXj36MEH6IPyRRx6B5LCwXB1rDquhW8eOHVm066+/ /vHHH1+0aBHd0JnLNW/eHDnoM3nyZIagISSBP+fNm0fPZs2aoSHWmf9LC/pw FbpxRZaRbowNcpCJ5PHjxzNxOnB1Ls2oSZMm3XrrrY0bN0YOuqEMPfv3708L 3Zg1Lchh1syL2fHvJUuWsNTIRHLLli2lIStJH91E1pz7BcMZOHAgK89Kcjvo wygeM91W1pwWVox7EeRwd6ZNm8bqcVuZ3dChQ1l8ujGce0o3FEMI95o7Dn/j 1o8cOVIaMgtpyJ88QsjnUeRCtDCKITTyKCKEqfXq1YtLM4p/1KpVCw2541yI ud9+++0iZgIkBC7KKCYC/0E4y4hwbhbC+WnwUCGKX4Q0ZMrSkKujHrdj9OjR DGFqPO0sPldnEZBDHx5spo8cFp9L04cbpMeMiwYNmSmLxq9mZgz+wcOMcORw 01lnuqHPZZddxqPIAvJL5AHQwnbr1g3JGoUyPA+oSgsK8A9+7zTeddddPJxc Dn2QzKPIredngobMjnmxhmhIC7eDhWIUDx4a8gjRyATpgIZcC/2RjDQecoTQ jR8LjxkKoCE3iNv00ksvoSE9pSELNSvGmDFj4NLow8OA/vRBFHO84oorGAiF 5kenl8BhyicZhmEYxs8BmUUMnMwiZo4WqAXmCbOFpcaEwc2wjOIAoqMwKywg xhrzJ/OKqcUsYvUwi5g8OO2CBQsw5ciBhUIJWrVqhcnG3tHOP+gm4s3lGEX/ yy+/HLPItWQWb4rBQGjM/PnzEQ45bxxj4P0D0QcyDGHmT0RBa1EGiw+lkYaP PvqoNLzllltgRHSD5Lz++uuMgp1CfrDv4iTMi+kwdwb27duXC2Gp0RAhjBJj lIZQFFgikmlBK2gYwpk+NBXGgpKQT6gO9p1lZBYQAwgzxA8NBw0apE8MmB7r o6pSAQULFuRyXF3cD17H4qM29AYNEcVFEcKCMFNWlUVjptA8JsIiiLfAKuFj DIH/QF9p5L8wKMgnwhFCHyg6/2ZVIW8sBRpCbqUhw9GQq/MPpgkpgrgyTcge 7YjlBtGNR4U/YWUsDotGH2nIGkpDvlmgVSjJzaUPSrLg4mPcDvTRV4/kPP30 0/SB6XE7pCFzl4bcHdRjFJSYxacFQg6nYl4I51HUredLjVvGWBRm8Y/078kw DOOXBV6ViotW2skff/wRK4wNOvbYY3nVq8/QoUO1i8E7VgEbyXwIu3btUnXI fPnyMRCToUCpDz74QHsoWCvJ4QNZ4buKAFc+hCx7XliowoULM4oXuI5K/elP f1JseaVKlZT9CfMkDbPkldJJOu0WYSNOOOEEroWqX331lYr1hJqSGqU0X7Tw 8a4WhktDRYBz9VGjRqk+I0xm/fr16qYsAUDls5NZ9KWhIsBB2PNC8sknn8yQ Cy64QJuAqimpbn/84x937txJY6gpqVErV64M+z5qeeWVV7QteM4552DdGMUq 6SYCpZ4AoaYk/6ZPMq+Ugs2WLVumg5/MRccP0bxTp07qBtnQxlMyiz4zDaWo Qz6EDz/8sGbNmto2hYpE8faiAvJZSWV/BcoLl46PDKglueeFhtu2beMuMKR4 8eIDBw7U44FiukHJvHA6ogiRkIZZsuhzdRU81ZHAKFMLKZ1JoCHJCJSG2SuD C9wsOAMXKlSoUJcuXZRAI9wO5YWjUUcGaAk1JWGz0hCKEipM6cFT0YfowLxw zGLPnj0hi/7tt98uDVUZHECEJPmOO+7QTwPurXD3kC2E280QNExWBpeGIT0F fFVyxo4dy82iBYL6ySefsPiM1UlYNNeedchnosrgaBg2Sbt3765gM+SUKlUq PNLJ2L9UnM+EPiqelY6z6KvoZJbK4DRyd8466yz6nHvuuTzeymoLow6lqaS2 s78ahmEYOQ+ZxSSPklnE4GIiIRJnnHGGqj9j0Dt27ChWkDxDkTdvXswZpl9p rGQWA4/asGEDPIohZcqUUSVujPuAAQMUBAXNENuBeMgsZskrpWpEGNNNmzZd dNFF0A9MPBafa2FzlbAr8CjkKL9uKlObO4pjsHWwEb4dxaH1KkdYpEgR1BCl T+bXxbJjpkMWfXiUNIRHqQVmKMlK8coStWnTRp8Pb7/9tvowHdWvDOWrxKOY SKhGlISCyfk04Orbt29nMfVpEEqlhzMU8ChYLhomqxHpkGngUfCf7Pl1da9D fl14lA5IPvLII0kexeX0aUAfbtynn36qQgMlSpQ47rjjQm1u8Sj68JBIwySP Ul4UHpvy5cszi6pVq3JdkUZ4VDpTjSjKMD0khyz6oRpR2CKcO3cun0jiY0uW LNHJSm6iMni89957eobNowzDMLKjVq1a8obxyS8zzQep3sPyhiVN3qOPPqp3 9Q033KBTYCECHAul1Fs333yzznytWbNGozAWfKdHsTdMhgALpT7JCHD5vrp1 66Z8R9deey2Xxigna0rKURDOqckbRrc+ffpIjiLAmUXfvn1PPPHEVOyLk8n7 9ttvsexJBiJvGKhTp46OZyoCHJs7aNAgSR45cuTJJ5+sWaxbty6KeQKayC7L uRG8YZUrV9a8+MDPkydPvnz5brvtNpaLbjNmzFCOJq7FotHn66+/DnW3Q01J Wa7TTz9d8dWrVq2SI0XeMOY1f/58ORzOP/987pRGYbK1IG+88UYUm85w9FId VOgZnS+55BJ5Ld58802MZjpO76bTsoxq3749N5Fus2bNUgB89pqSMu5nnnmm 5v7++++jiVaVx0N54e6///50ohYSa3vllVdKjh6YZC0kaQgH0wHSYsWKMVxF D8PBxrvuuksnPUNeuHnz5knDZAS4EjIoMSxPUY8ePVRiMtSUbNeunR5gpSYD 8obxfOrYaQBk8sYbbxSLa926tea+dOlS+dCUChVRjz/+uK4eaiG1atUqFR8p Xbx4sebOM1CgQIF0HMYvRgR3UsosVUmIDqwpqXkxZcgP6xNYHD9DZbht2bKl zvzyYMt9miW7LxrCkXR4lpuimDexOESNHj1ajlkWKpz5DSdhpeHGjRuTtZCi +GBjOj7icffdd4vTPvnkk6eddhqNsErlTuEnzO3QQWn96FgTzYuekiNvGHJY KGmI5HLlyqVjZ/LChQuVEjBLLSSorw41/I9ecoZhGIbxP4TM4h/+8AeZxZCR AHMmFwQmbNq0aWH/S1aPFtGkkB1dTC9sY5UpU0a7P+vXr7/oootEPMaOHYuQ 7777LtSUhGYoOVhIen+o2tyYXVWigUcxPIotPgIxuNjlwYMHRzGTgQhJgWef fVZOEmUkgABoVxFOKxMMj4KKyMsHSxEdDWn5+/fvLzkTJ07U3OG3LBFyPvzw QzEi6Io2r2Hp4odYefGWZE3JVLw3+uCDD2obmkvoEyO7N6xFixZiIGFXEQoq XxzEW4crb7/99ihmaL169UonDn5GcYUs8SgIngqjwxvVBx6l+wU91ryaNGmi UfKGsc58Eegz5IEHHlA6iMsuu2zDhg3KqqGTsNlrc8OjNIoFD2nHJHncuHHi YxBgZRJGjlJPAOVFCXnhTj31VN2vZcuWqYPCD+jA3FXni7GvvvoqZIx5BR6l B4Y7Ym+YYRhGdvBti3Fp2rQpplOxtbzkb4jRtWtXXt1YQL6jdbgJUzVr1iw+ z7E1DRs2pJEvYgVs33PPPQqixj5id2bPns1nOH/SyCV4UTNQB9/4TqcPPGHq 1Kn33ntv27ZtMZfYGvrMnDmT/4UdbNOmDcZixowZc+fOpRsa0q19+/Zc+qmn nhozZoz0ufPOO6XhsGHD1DJ06FAuhEq0dOjQoXnz5phgroUotKIF24FKdEAU Zkga9u7dWxoOGjRIkfB97ukz6/lZNDJllEFn9GGyzJSB/KloZxTmWx4NuRAE o3PnzlwLDUePHq1AdCTTnw4PPfSQwphZOrgNo9CcFrphlH/729/SwkRatWrF wqIkQtAHDevXr48+LBT6I+rhhx9mNZhsjx49Ro0aNWnSpMmTJ3MVnTVDMqMY SwfksLA6mgfZQPLVV1/N1VlShZSzzkjmv6wVwrX4zAuVkIwQ5tKlS5dbbrmF 2fEnclgQZCKZFibFtaZMmcJd4HIogG4vvvgijdxxJsX077//fv7UkVg9HhMm TJCGrJ5Omyqcnht0xx130AE9uYlcCyW5HTqQS4u6devWjRbG8sBIQ2bEMqIP /9Zxhp49e6IMavft2xchXJ3OiOVaUKNpMXjaWWQ0hB9KQ/5X8qQkfInVYAhX Rw3ksETjx4/nOWQi3GguxO3Qj4U+3F9pqFnQB53nvzCfgffdd1+zGPxGdAqA 283NohvK63wlDwwLi3A6s7BoCGdDPZaRu8OFePYGDBjANK+77jomqAOngD/p g56ox7Vo161HMqN0iFjnAtBQPwSWBfVo4TaxMigzfsJ4CDwawp10KpMHiWe1 cePGLDi/ZYQznGVHbQTqoRoyZAirygPT4bYOPDBcjsaOHTvqieXuoAxXpA83 iMdM95QnVhryaElDHsVOnTohnLE6Ma3jtzpa+9hjj82JgYZc60i/Lw3DMIyj C9hE8TGZRTgPZhFzhsHCeGHKMVgYQWXSuOuuuzBVGHT6YytpgZBgzrBx2HHM IoZPZhEwhD6wOGTSDTmi2fAEiAeWHTm0YBMZBevDTKPD2LFjlWwEo8m1MLiY V7FT2CBD4D/wdhgCtnvkyJHI0QlHlKEF0y8NQ4oD9EFD5Ix9bOwrr7yCHBgv LbSLI7ECcAAMN43QUVFfeBSSUZv/hcVHMvxHZwOZO0KYLNxP+SWgNLSgEv9L cuisk4AsHUNoRDIa0gI9yH5SsmjRolyOPvATVv7RsY9yaaUEYYiSsXAhZa7Q asDidKKQrwZWDOEM15nHzl06owktTIQW6DEEDH24R7AOLsSfIRkLa6ijizA0 aQgxg9UoUwQTZ9GUp0LduLQWFjlci4dEGsKapCE3V7ksoM3cLH3OQNRphDXx YDCK2em7gLvP4vD80C4NeQC08txK1GNqTBBeSgvcT48HjxY3kVmwPkhmFGP5 k8ke6d+TYRjGLwu8e6N4y4BvUm2+1K5dO2TR1+4D5lWdlUU/FUeAqyRfyKI/ YcIEnbabOHGiWipWrKhRr776quSELPqYV12Ll7aupZN0qTjluM4M8t4+7rjj GHX88cdH8X7WypUrtVt0xRVXSI5qSqbj0jZqCbFDWCiFfL/00kslS5bUtteO HTuiOEhM2yXKoh/FGfslJ7nnpX0oyIa28xYvXqyjhXny5FFEzXfffRey6Efx ThAaZtnzUuJQRSUp5fjq1au1Cchc3nzzTXVToFQqDjb7/vvvkyfpQhZ9BXdd ddVVipZ55513FJSuWthSQFn0wRdffKGAIv2p2CH+fOutt6Rh9erVlX9+3bp1 GGLkFChQQAH5UeYkLD1XrFihbbgQO6QtsHCSLmTR37x5M7ZY84IwhCz6Wth5 8+ZppsmTdKphlMpk0edO0WHbtm3KSE8jJEGjtEmazsT+RZnK4OizatUqaRgS yyuLLE9ROD9bv379KN5f4yHX9JNZ9CV54cKFWbLoq6bAjz/+GCpRVq5cWVuH OgmbOrAyuOQoi344MkAfmB6PShQHySuLvpLx0iccGwyxf4888ogePHidJMNk 1Gf06NHaynz55ZcV98ijqD7JWkjafk1WBg9Z9PUIhQITTPm0005jQfLnz791 69bowMrgOnG8fPlytfCQKKMv0wk1Jf/whz8w6rXXXlN8IAuouMcoc4IjX758 2iDmJyM5yv6arAx+7bXXrl27lj5r1qxRTckstZC0sAqHMwzDMIycROBRMosw N1GCqlWrqtLQ+vXrb7zxRjU+9thjGoVZl/EKZyjEo2ApMouBR5UvX37RokVR bCjhipIDj4pick6LbG4yi74kqyBOiB3C7CrUH34FJxHNbtOmjQKKQtB+kkdJ jlgls1O8ExrqmOeuXbuUKQU5Kg6F+Vbl68CjuDqXkIaqhQQUMpeKE7nrYyGU m7/gggvUh+loVIcOHXQyRTqnDptFX/V34Jkh4DxUI2LB4TBcLmiI8uItLVu2 TGeSWohHMcFixYrRyJRVHWnLli3htup0RuBRXbt2lYahGhHMSgHwS5cuVU3J vHnzqgA9OmhVwzmUUL4KHiVWOXLkSF2LzyJl0YdHwTDVmDwJm06coVDZhXSc RV8aBh4Fy9VNhOTr1C2rpJOwu3fv1hkKGp1F3zAMIzsWLFiwd+/eHTt2PPzw wwrxvfTSS6PYLMobxhu1R48e8nTdfvvt+pznf8m8hpN0c+fOxW7SByumUfI1 0YJ9VAuvfTlJsEdJh0OU8IY9+OCDSmT03HPPyRtWpEgRqcrHsgzBlVdeKckT J06UPsH90r59e7X069cPnoBKy5YtUxItphYYiHTGQCh6Gf6QzuSVkuRwOLR7 9+4YOEV3V6hQgT6FCxfGVNGHdVOGKAwWhglDGY5eYpjk6nniiSeU+QG28NFH H9GIPjqiyNjgDcNoavqhpqTkhJN0LK8OotarV++DDz6gZfXq1XXr1tVkMYga eOGFF2rgQfMhRInSNtWrV1f5P8wr94VZqKYkN5rJNmjQILA45oXasLh0IgJc SeFUcxyZLAUG/bbbbtNkoTRyZaiFnjNnztRSq2gOLZ988kkUx4TrQqVKleJa 3CCxuHR8KI+7GcXUYsCAAbrc+PHjJTkcGQjul+ANg8DQAuEJpUuVF45Gbofk 6CQsktu2bSt9oA1ZvGGsKkvxzTffwL5SGW9YFLNBHk5JhsXpCMPdd98tOTz/ 0kdnkNPxIYI9e/Ygavr06arxdMYZZ6g65PLly7Wq8EyEoA9EWqOGDBnCajCq efPmOj87fPjwzZs36+o6NqjK4NGB+UzUwiJITqiF1Lt3b8lRZXD99mFxUlt+ rcOzOK2hakrqkRaL4xZUqVIldwz+rd9CksUxiw0bNkiyakoyWZZF96JJkyZr 165lsrC4yy+/PNyO4A1Ti4pnGYZhGEZOQjYIlqK92pUrV8qcwZY//PBDTN7H H3/crFmzdFygUAkiMILiUZhdecyixK6iXBlJb9jixYvFx6A9Eg4RimKjrIwi 6KASgUjW9hPAlIuBiHqVKFECOfyJZNHsdGZXkUZVbATiUcorpam9//77gUel 46OXixYtEv8ZPHiwcoped911MGquDkvR5eDJ+jQIu4ovvfQSbBCdYYbiG3Pm zEEIokaNGqVZVK1aVauRpTZ3lG1X8aDeMHiUyDCLqWWEdWhUyK8birmrNjca qqYkKt1///1Ku8pCnXjiicp9oRyn4dMAHqWDn0oQEXgULKVLly6aRa9evT7/ /HPWMOwqpuOMIjpVqj6lS5dmNRgI09M6o6H2RkeOHCnJCEQO14Jr6bay1Kop SaOck/ny5dMHV9hVvPjii7Uzm8UbxspD7HksJVzeMPTRrmI4CWsYhmEkwds+ il/yY8aM4VWJ9eGzF5PHS/7xxx/ntcx7mO9oXun0ScaG0QFiULlyZawJ3ehM BxnKggUL8uL9zW9+wyhasKoapdgwXtfYI7kFoA280vfs2cObHGORP3/+YcOG YToxTLNmzdLGzamnnrp7925sQfDAyBsWxbFhkoxRVgyVjDL69OzZ84svvuDq 2GKZKrBt2zYsEeZAozAQdGCymAxmwdWbN2/OtVBpyJAhmkWPHj0UYzZ37txy 5crJD4BJYmoYvuNiwJGiTGwYLALb2qhRI1aDPsOHD+e6DEGyPvkxedWqVVMi BUwka4icU045JR2naODqyEFz5LDy9ESZP//5z6xGgQIFaLn66qsx/Uxh9erV /Lto0aKMmjlzJi1M7aKLLqIPYzdv3ix/Hf8XyWXLlkUIF3rttdfkaMKYoi2j MKCwODRk1EMPPYQQlFQWOFrQVhwJsy7agML0SbK4V199NYpjwzDryEElaBiX Zi7ccVaVmUJ7WGdlB9VA9EEO/xXROumkk+jDTYTdce+YhfwtyiaXpTI4d61e vXpKcYb+PC0Il/sFLsda0cJTxHS4Ot3E4miUNwwkY8Mk+eWXX87iDRs3bhyL r7BJFp9rQcZ4VplaksXpRsPitPJ0pgW1mzRpogxakyZNkhsWChpItdLyw6NQ j0dI6SmYF8NZZ+Q8+OCDXH3Hjh38HhnFAzNo0KAtW7YwC66OqrTQjSXlJr77 7rt6wmvWrMmlEf7888/r4ezevTs6b9++/a677uKRRjj/2LBhA5L5YZ5++ums G5ojmV8HE9GDR7u8l8uWLWMNkYyGdIBGsqrS59Zbb+WRRs7SpUsvuOAC/X5f eeUVpRdWuGORIkXEBvnJ5IlRvXp1vV4Ci+MxVtoxZlGnTh3kwHKZI9NnarxG eIZp/DZGzr4dDcMwjKMdYVcR24p1w3SKt2DOVEEGdtq0aVNtjz7yyCOYaXom q01FsXMD0yYeFcWse926dfybIeeeey48ilEbN26ER2G4McSQCq5FY/CPJWPD Ao9CLFZY1OLkk0+G8UIk4JC9evUSj4KGIQebm+RRtCgRGawAHTDiyMFYY3C1 0abEp0ju06dPKhNjj2RaRo4cKZaiRGTIadeuHUK43Pz58+kDT5AcGp9++mlI I5OdMGGCWqpUqcKk6DN16lTUQ1Tnzp3lVevbt694y7Rp07hQFm/YWWedBXng 64MVYyUhpUyKFRDx5uqNGzdW5BWfIcpmP3DgQFWAuummm0TFhw4dumnTJtgp lF6kkRXQ9vHHH3/Mv+kDPVa02OzZs3W/OnbsyKVRMsSG8TWkHbolS5YoT2+Z MmU++eQTZqHKX4ULF4bYow/TT+4qqrQBnxj6CmjZsqXSjvEAVK1aVbuKb775 ppxdyWpT0lBrWKNGDYZwv6ZMmSI5zB0GxcK+/fbb0GPUhrXyMECzEXX22Wfr ETKJMgzDyI4WLVqk41NyHTp0iGJX1YIFC/TabN68uZKZ/xBDXhFBVp43cPCW dO3aVcVuunXrJiawatUqvf9r1aolCwVkYqL4wx9wUTpwdZ2Si+LCeUowjpkO Z6wUTa2akgq65hKSJg2DldeeF/93+PDh2obDRugUGNZfpWRCTckodmExnAuF M3Ga+3333SdjBLFRaBn6KJwpytSUpBsyozjASaoKiJo5c2bwlugqM2bMqFCh QipO+LlixQoFAkGl5LtTqkyNVf8oc5JO+jRs2JBLYFWx4CpAU7FixXnz5tGI YVUVRbpBacLYIC2K46thC6lM7BDtWFudckXOc889p5Cw4O383e9+pyOTAlfR HhzzlZwQO8Sa1K1bVzRs9OjRUUz5Qm7VJ554gj+5nDylyUdIVr5QoUJaOiiN HqpSpUqx5io9EDb4VOITcMe1R6YLIVnZX4sUKaLod/RULSSeojvvvFNP2vPP P6/NRFilwubl6tFTJDnZa0py71hnSAWPtBYN3quzseEkrJZaPxBlf4V5au7Q wnBcVLlnQ00lnYRNx7F/yiTPvLTCAtJ69OghTVRTUgFyOiCJqt98841+SvIP ly1bNjyByUcI4fwQpA//gM5Bn2CwqiB50UUXcfu4pzxCJUqUSMWnXLVxmeUR 4r/PPPOM5t69e3et4eTJk/VDqFmzJjRMP8bA0hVsFsB1NVM4tuSEWki8cBiF PhA2nbPQnrXUfv/99/VL1G/NMAzDMHIeisGW6QxRSTVq1EjFW6vQDJHJkK9D GUW0LxnImNiC5GDy1PjRRx9Vq1ZNDjf4TxQzGSy+Io7gUbK5IlGSlsVbIvmb N28Wj8LEjxo1SpcbN24cNCaVqM0t4y5WJg1DRgIlBgk8CmalbPxRpqakgs3E dhS+HtYHww3b19xVU5JurVu31tEDVSNCss5QKCRey6jZBTk03nzzzen4ZF8S 8vhBxVVBe+PGjdIHUh34z/4MdPU+ffoovwo8SksEt9e+J6Qa0qjdOsmHfOpP IRBXVZCUnFCbm5sCDWYWF198sT4NGAuPkrdKs9gfF5oMCx5lakoySrW5ozi4 S58GLPg777wjd6tobSqTUSRK8B8RzmXLlqXinBLt2rVT++zZsyWHsS+//HIU 53KpV69eiP3T9JP3yzAMwxDq16+fitP7qAhLFJ+C13tYNSVVJFEWIbzSsSMy Vdrzwgg2atRIsTqq8wiwhupz+eWXByaQBK9lZUgA2Ai5X0JNyQYNGuh7PxQp Puuss5IWM4BGaIP6hHwI9957r0K+L7vsss8//zyKWQHTpKVYsWKal2YkUqFp hgxR999/v7xqMJPSpUvTCFcJweRyAqQyNSVpVPRaUClLBLhcB2XLlpXrYNWq VepWvXp1mXjmqGRKat8bI0rkQ2A1dGkIiRIyhJqSDOR2SM5bb72VHK5FpsOW LVtCXim1r1y5UlcvX778jBkzxB+SsX/J26SItShRU7JMmTL6v+vWrZOck08+ ecyYMWoMJ2HF4nT3RbrCHQzpKfTnZ599pqRntIfgdh2moxECc9BbzxMCn9S1 xOJoCTUle/bsqevqqGMqTnWV9PIFoGGdOnWSvIubDqvUxmWLFi2kfMgWAotT IH3yp6FpqqYkfRYtWqR4RVY1f/78qTgISsQmmRcuLDLUJalbsjK4NGQ6RYsW TcUVxuX6i2IWl84kItO9VmceAP18QmXwYcOGaQ1HjhypTHqhpiSzk+s4JCJD meC4llglPUtlaiEhaurUqWeccUYqzkG3evVqTT+5Zx3mgnzVbI0yNSXTcS0k tcDilJHv3HPPDWVSw0lY/egkPOkwNAzDMAzj14ossWGwiyOtkWEYhvErRKNG jXS6bciQIfrsfeGFF2R6br755uwuCH2ZZokAB+3ateNTWqfb1E2xYXz21q5d O8p4n6JMVJha2rdvr+jlEAHeu3dvRXA1bdpU3+M7d+7UplXFihX5SA+hOEmZ ITtoyCvVv39/HbS89tprv/rqK8U+KUTnhBNOSLqeklObMGGC5sVwhQ9Nnjz5 9NNPT8cJuxQFrVNg6qbgIm1LSaB8aHPmzNFGEssiR8q0adMUTV29enWlC6Nb 1apVJUf+uhCiFlRauXKlOigfAnLmzZv3m9/8hpbKlStzpzT9xo0bq9uKFSvC 2BCUFSXySlWpUkX60FNXr1ChgtKOMS85J9Fchw1DfJF0k+dHchQBTsuGDRtq 1qzJHeTuTJ8+XWF7/fr1U7dx48Yd6hHKEgG+detWRWcVL15cCeRDbBiLxu3Q kxO2t/QPWs4++2zFfSkCnFE80oziKVIS2ih2ISqGqm3btuE2hd1DidJOaNIb dv311ys2rEuXLpL81ltv6f9ec801h3qEWrZsqT4LFy7UiqGGTt22bt1ac//0 00+T3jCVTlBnPdX82atXLyX8nzRpkpS89957VRm8QYMGSnzBTZEc5YVTjFn4 Uajl4YcfVh/tafK/hg0bJt/XlVdeuX79+v0HVklITkovBPmgtKeZipPHSp8n n3xSyWMvuugiecP4qWpPk9uqQ51BjnSLMt4w/cD1CM2dO/ess87i0rVq1dKp k71794ZQvTVr1hzUEWoYhmEYxq8V9oYZhmEYhmHkGJJ5wxRtZRiGYRg5gJ/W PnRxkdypQyB3/hNPOq3SNY98+PcA4h/e6H120fx5ch2se64jOBHD+F+BvWGG YRiGYRg5BnvDDMP4NeOnj4ZVy39Q70mMY/IWPLHK/e8cGPO6f9vUhiccmzWH T0D6uJNbz95+hObzq8O+7za/Mfm2yoUPWO48Z976/Ka9h4yQ/WH7+pm3lD/m vzofW+bKPtPf2rw7J7U2jJ8D9oYZhmEYhmHkGOwNMwzj1479f9n6/rzB9U/J c4Af7NSbJr379Q+HHrT3y5Vjrzsp4UjLf2qt24Y/u/yT7c7K/L+NfZ89Uadw whl20ajPDpJ4NYH9Xz5R62/VbdLHX3Tf0j8fvq9h/KvA3jDDMAzDMIwcg71h hmEcHdjzercKx4T3Xe5zB75/kPIiB2Dfxoery4N27ClXDX55s0ta/Hz47pXb SgfPY55qIz89rIfrr6vvO4c7k++cbou+cY5F41cDe8MMwzAMwzByDPaGGYZx lGDf549fni8cdyxx68K/Hrb7/m9fan/qMfQ8sca9r371jzxnxv8nfnijR7mM Oyx9fPO53x2664/rR11SMJX+t6smfHzo2D7D+NeDvWGGYRiGYRg5BnvDDMM4 WrB/65P1C4aTkpXufecwRx5/+uOMG07Klcp98rWPv78n51Q8ivHDyp5nZGL3 cpW98/VDObp++GhUzcLp3KfdMn+bw8KMXxfsDTMMwzAMw8gx2BtmGMZRg/3b nry6QDiOV3X4J4c4jrd/x/J7LiiYzl264cT1hw8gM/738MPybqdlosOOqXTf wX2Vf3l3SNUC6ePO7f2Gs+YbvzrYG2YYhmEYhpFjsDfMMIyjB/u2jKsVPjfz 1n7ii4NFF+15d2StYnaF5Ty+X9alTMYdlrvyA+uyn07d/Ubvc/OmC9cY8YHv jPErhL1hhmEYhmEYOQZ7wwzDOIqw79OR1UJpyYLXPZ0tB/ueNY9cWSKXXWFH BH9d1PHkjDssT/WRGw8M3dv/7cudzsidLn7N5M+cxc34VcLeMMMwDMMwjByD vWGGYRxN+HFNv7Mz2anSJzT/ffK83f5d/3d47X/Llbt0o0l2hR0R7H351pLp TOjeZY9tTrjD9n81u0XpXMeUaTnnK6cLM36lsDfMMAzDMAwjx2BvmGEYRxV+ WPH37FTpUre9mnF77d/+xuBLTkjbFXZE8d2LbUpk3GH56k3amnF87fv8qeuK 5zr2N92W7rAvzPjVwt4wwzAMwzCMHIO9YYZhHF34y8J2/55xuOQq13Pl35K1 7/9m2b3ViqZzl248eYNdYUcSe+a1LJa5O4UaTtdJ1h83jK1dNFeBCwe/s/dI 62cYPyPsDTMMwzAMw8gx2BtmGMZRhl2zmhbNvPZyn3v/Bz9se6XnfxSyK+yX gV1zmp3wX+6w9PE3Pb8riv66Zki1ArlOqDvu44NWmTSMXw3sDTMMwzAMw8gx 2BtmGMZRhv3bnrw6f3CHndXg+rMLpHOf0sSusF8Gdsy8IeOsTBdvM3/rit7n 5s110o3PfrHvH481jH9p2BtmGIZhGIaRY7A3zDCMow37Pn+05rGJb87cpzSZ YlfYLwX7v32mceHMSdbi519wap485TstzFb80zB+fbA3zDAMwzAMI8dgb5hh GEcdflo35PzcmTffMWfetfIvR1oj4+/Y//W0awv+3SOQr/J9K/ccaZ0MIydg b5hhGIZhGEaOwd4wwzCOPvz4dq/yx2RefYUa/277kVbI+Dv2bXn88ryZm3Ns lSFrvz/SGhlGzsDeMMMwDMMwjByDvWGGYRxt+OGzZ1udEfwtqfS/tXnBtQp/ Mdj/1aQr8wVnWI3RnzlfmHG0YNuB+Pbbb4+0RoZhGIZhGL9a2BtmGMZRhR82 Tm92Wp5UnuNPKJTOZKcqc8frPxxpvQzhgHOSuasM2/DTkdbIMAzDMAzDMIxf HewNMwzj6MH3nzx1Y9k8qbzl28xcP7/dv2fcYcecdd+7Px5p3YwY25+9vkhw hp036AM7wwzDMAzDMAzD+F9HuXLlTsjgnHPOOdLqGIZh/Fz46/pJjU/JnTqu 4q1zNv8URbueb1o043bJU3XEpz6Q90vArjk3nxCclBXvWW0npWEYhmEYhmEY hmEYxv8Eez8c3+DkY1L5Kt027wuFG+3/81P1C2TcYcfVmfCn/UdYRSOKvnuh TfFwgLVcjzd9gNUwDMMwDMMwDMMwDOO/j+8+eKx+yVyp/Od0fuHLv4eA7dv8 2KXHurDkLwl/eaVDqeAMO6XzUleTNAzDMAzDMAzDMAzD+O9iz5pHriyRK1Xw /9z50lcHnob8af3QC3KHwpKtX/juCGlo/Be+f61rmVyZG1Ky/ct/OdIKGYZh GIZhGIZhGIZh/Ith9+qRdYrnShc6v+cr27InBvtx9T0Vj8mEIpW+ffFfj4CG RsAPb/YsF5xhJ7aYt+dIK2QYhmEYhmEYhmEYhvGvhP073x52WbF0unCVXou/ PnhSsGQwUq4yXZf5ZN4RxI9v96qQ8U2mCl43/VsncjMMwzAMwzAMwzAMw/hn sf/b5QNrnPA3V1ifpd8c2q2y98VE1vZTOi91dNgRw/dv9CgXnGF5Lhr1mYt8 GoZhGIZhGIZhGIZh/HP46cuXuv9H4XQq/3ndXvnzYSOM9n87/bpQWDLXSe0X OnfYEcKO/2xVMuOXTKVL3vaq4/QMwzAMwzAMwzAMwzD+GexZO7Hp6XlTqVwl m0z/40//qPdPnwy/MHdwwhzf+JnDe8+Mnwd7/2+/ynlTAbnK3PH6D0daJ8Mw DMMwDMMwDMMwjF88vlv/TMfKReIQo1xl7/xnHCr7v5pQ59i/u2FyV+i6eIf9 YTmJH/783sx7apc6JpVErlL1hy/atOsfOjMNwzAMwzAMwzAMwzCOSuzb+6f3 FjzR46py+f/uUMlTsd3vPvj6+8O4tvbt/mzJI01Oy3OAHyZd9D86/Pb1z/c4 a9XPi/3bf9/hrLInFy90bDp1KOTKW7h46Uqd5u8+0soahmEYhmEYhmEYhmH8 knBVyQLHHMqhkvuEBk/+KZtH7Md3h9Q46fh8hxz1N0dMkX//P71fd/IqwzAM wzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAM wzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAM wzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAM wzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAM wzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAM wzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAM wzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAM wzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAM wzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAMwzAM wzAMwzAMw/hl4/8BYSpPwg== "], {{0, 218.25}, {406.5, 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->{288., 288.}], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{399.4444444444449, Automatic}, ImageSizeRaw->{406.5, 218.25}, PlotRange->{{0, 406.5}, {0, 218.25}}]}]], "Input", CellChangeTimes->{{3.8450206016034985`*^9, 3.8450206030681653`*^9}, { 3.8450299919463463`*^9, 3.8450299943527164`*^9}},ExpressionUUID->"0f12bf4c-be65-48f5-90af-\ d1502c9c3470"], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"value", " ", "rule"}], " ", "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"val", "=", RowBox[{"{", RowBox[{ RowBox[{"dmaj", "->", "0.006"}], ",", RowBox[{"P", "\[Rule]", "0.001"}], ",", RowBox[{"d", "\[Rule]", RowBox[{"dmaj", "-", RowBox[{ RowBox[{"2", "/", RowBox[{"Sqrt", "[", "3", "]"}]}], " ", "P"}]}]}], ",", " ", "\[IndentingNewLine]", RowBox[{"EE", "\[Rule]", RowBox[{"210", "*", RowBox[{"10", "^", "9"}]}]}], ",", RowBox[{"\[Nu]", "->", "0.3"}], ",", " ", RowBox[{"GG", "->", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"2", "+", RowBox[{"2", " ", "\[Nu]"}]}], ")"}]}]}], ",", " ", RowBox[{"h", "->", "0.156"}], ",", RowBox[{"A", "->", RowBox[{"\[Pi]", " ", RowBox[{ RowBox[{"(", RowBox[{"d", "/", "2"}], ")"}], "^", "2"}]}]}], ",", RowBox[{"II", "\[Rule]", RowBox[{ SuperscriptBox["d", "4"], " ", RowBox[{"\[Pi]", "/", "64"}]}]}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"coordinate", " ", "table"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "h"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"2", " ", "h"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"element", " ", "table"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ele", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"4", RowBox[{"{", RowBox[{"A", ",", "II", ",", "II"}], "}"}]}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "GG"}], "}"}], ",", RowBox[{"4", RowBox[{"{", RowBox[{"A", ",", "II", ",", "II"}], "}"}]}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"F", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "3", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"prb", "=", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"SOLVE", "[", "prb", "]"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"kfem", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"F", "/", RowBox[{"uX", "[", "3", "]"}]}], ")"}], "/.", "sol"}], " ", "//.", "val"}], ")"}], "/", "1000"}]}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{ 3.8450206254096174`*^9, {3.8450207827707567`*^9, 3.8450207949013977`*^9}, { 3.8450208376998544`*^9, 3.8450209743273697`*^9}, {3.8450210244423747`*^9, 3.8450213333704343`*^9}}, CellLabel-> "In[359]:=",ExpressionUUID->"cff39718-ccfd-41a6-89f4-18a129fdd102"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["DISPLACEMENT ANALYSIS (week 45)", "Subsection", CellChangeTimes->{{3.473055512584*^9, 3.4730555529630003`*^9}, { 3.4730575328269997`*^9, 3.473057539222*^9}, {3.4734691424642*^9, 3.4734691605758*^9}, {3.5681161575453596`*^9, 3.568116161819767*^9}, { 3.59922265025865*^9, 3.599222653363055*^9}, 3.629777520582675*^9, 3.629791653258878*^9, {3.630370559869874*^9, 3.6303705662970853`*^9}, { 3.6618219022583027`*^9, 3.6618219059243093`*^9}, 3.6852488995100965`*^9, 3.685281849223243*^9, {3.6853234590535126`*^9, 3.685323459673514*^9}, { 3.68587640866364*^9, 3.6858764117036448`*^9}, {3.6862101948897667`*^9, 3.6862101984397717`*^9}, {3.686235632357339*^9, 3.6862356325473394`*^9}, { 3.686290377128008*^9, 3.686290380228012*^9}, {3.6863951313545313`*^9, 3.6863951457345514`*^9}, {3.6883646955890894`*^9, 3.6883646971490917`*^9}, 3.7807552452476177`*^9},ExpressionUUID->"e57f6dce-b481-4cd3-af1e-\ 5887166e6535"], Cell[CellGroupData[{ Cell["Lecture example 2.1 (bar)", "Subsubsection", CellChangeTimes->{{3.4734694905626*^9, 3.4734694918886003`*^9}, { 3.5992247695247765`*^9, 3.599224771911581*^9}, 3.6862337070346437`*^9, 3.686290215967782*^9, {3.6863951815146017`*^9, 3.6863951817946024`*^9}, { 3.686463495303398*^9, 3.6864634969434004`*^9}, {3.781589662579389*^9, 3.7815896660189276`*^9}, 3.813654548711316*^9},ExpressionUUID->"ac6db227-cad1-471e-a9b7-\ d81d2315ce45"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4426465840284452`*^9, 3.4426465892856455`*^9}, { 3.442646804859646*^9, 3.442646838774046*^9}, {3.473469518159*^9, 3.473469542105*^9}, {3.567488659560421*^9, 3.567488679996457*^9}, { 3.6293857978759165`*^9, 3.6293858030083256`*^9}, {3.6293859164049253`*^9, 3.629386031689128*^9}, {3.6297796999883165`*^9, 3.629779712249938*^9}, { 3.6297797534184103`*^9, 3.629779757864418*^9}, {3.6297799558131657`*^9, 3.629779994220433*^9}, {3.6297821687834535`*^9, 3.629782179984273*^9}, { 3.6297822711976333`*^9, 3.6297823082320986`*^9}, {3.6297916313252397`*^9, 3.6297916340240445`*^9}, {3.62987105119119*^9, 3.629871103544882*^9}, { 3.630231689415316*^9, 3.6302317303497877`*^9}, {3.6305529893093967`*^9, 3.63055299723485*^9}, {3.6306697846790886`*^9, 3.630669836330779*^9}, { 3.6306698912116756`*^9, 3.6306699292913427`*^9}, 3.6611752627847633`*^9, { 3.68519377703102*^9, 3.6851937863110332`*^9}, 3.685193829331094*^9, { 3.685233503917756*^9, 3.685233516277773*^9}, {3.685233597647887*^9, 3.685233615337912*^9}, {3.6852337344080787`*^9, 3.685233778910141*^9}, { 3.685233822710202*^9, 3.685233869000267*^9}, {3.685234136752804*^9, 3.685234139506961*^9}, 3.685234415812765*^9, {3.685234451830825*^9, 3.6852344677197337`*^9}, 3.6852619909866486`*^9, {3.6852629455979853`*^9, 3.6852629685880175`*^9}, 3.6852672555340195`*^9, {3.685270602011979*^9, 3.685270662762064*^9}, 3.685270775492222*^9, {3.685271434203144*^9, 3.685271439133151*^9}, {3.6853411055772305`*^9, 3.685341119183009*^9}, { 3.6853412984732637`*^9, 3.6853413099869223`*^9}, {3.6853417310800076`*^9, 3.685341741111581*^9}, {3.6853446026382513`*^9, 3.685344638248288*^9}, { 3.685875619502535*^9, 3.685875662152595*^9}, 3.6858757765527554`*^9, { 3.6863576684041834`*^9, 3.6863576792341986`*^9}, {3.7180899126263156`*^9, 3.718089913795903*^9}, {3.7489256462117243`*^9, 3.7489256598803215`*^9}, { 3.7739889020672274`*^9, 3.773989039520363*^9}, {3.7739894819799957`*^9, 3.7739894972205*^9}, {3.773989556461751*^9, 3.7739895852199936`*^9}, { 3.7739896543035803`*^9, 3.7739896567672663`*^9}, 3.773989820725361*^9, { 3.7751892927335873`*^9, 3.7751893327009354`*^9}, {3.775194181779306*^9, 3.7751941952586517`*^9}, {3.775195003917308*^9, 3.7751950171287575`*^9}, { 3.7751951717513275`*^9, 3.775195192837899*^9}, {3.7751952404187474`*^9, 3.775195244147611*^9}, {3.7751952888153787`*^9, 3.7751953694673223`*^9}, { 3.7751954986380005`*^9, 3.775195534685109*^9}, {3.7752693540695815`*^9, 3.775269421669304*^9}, {3.775269453334443*^9, 3.7752695075204906`*^9}, { 3.775271836528426*^9, 3.7752718743181734`*^9}, 3.7815880621975713`*^9, { 3.843626210552447*^9, 3.843626213675267*^9}, {3.8449134953391237`*^9, 3.844913495991613*^9}, {3.844921269544427*^9, 3.8449212698872213`*^9}}, CellLabel->"In[7]:=",ExpressionUUID->"483baa6e-acb8-4f27-85f9-f45be5521345"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 2.2 (beam)", "Subsubsection", CellChangeTimes->{ 3.4734694944314003`*^9, 3.599224766420371*^9, 3.6862337099646473`*^9, 3.686290219307787*^9, {3.6862903012279015`*^9, 3.686290301967902*^9}, { 3.6863951855946074`*^9, 3.686395186494609*^9}, {3.6864635001634054`*^9, 3.6864635018334074`*^9}, {3.7751961858576307`*^9, 3.775196199867617*^9}, 3.7815896724252987`*^9, 3.8136545502104034`*^9},ExpressionUUID->"3c96428d-d680-4b67-bb90-\ 11251429a47c"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "f"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{ 3.442646896400446*^9, {3.629783307211053*^9, 3.629783319737875*^9}, { 3.6297833622479496`*^9, 3.6297833821535845`*^9}, {3.6297834663625326`*^9, 3.6297834719785423`*^9}, {3.629783540353462*^9, 3.629783541960265*^9}, { 3.629783803978326*^9, 3.629783888920475*^9}, {3.6297840054526796`*^9, 3.6297840056398797`*^9}, {3.6297840416291428`*^9, 3.629784042237544*^9}, { 3.629784285878772*^9, 3.629784299357196*^9}, {3.629784645038203*^9, 3.6297846906682825`*^9}, {3.6297850092208424`*^9, 3.629785101651005*^9}, { 3.629785975190139*^9, 3.629786017294613*^9}, {3.6297860683067026`*^9, 3.6297860840939302`*^9}, {3.629786362148819*^9, 3.6297864363425493`*^9}, { 3.629786900072529*^9, 3.629786945484209*^9}, 3.629786990225087*^9, { 3.629787120366516*^9, 3.6297871260449266`*^9}, {3.629787266780774*^9, 3.629787391144192*^9}, {3.6297874597063127`*^9, 3.629787510344002*^9}, 3.629788110882656*^9, {3.629788171800763*^9, 3.6297881758411703`*^9}, { 3.6297885659354553`*^9, 3.6297885755294724`*^9}, {3.6297892278758183`*^9, 3.629789232243826*^9}, {3.629789276625904*^9, 3.6297893332852035`*^9}, { 3.6297914556533313`*^9, 3.6297914630945444`*^9}, {3.629869949096054*^9, 3.629870013430567*^9}, {3.629870255714593*^9, 3.6298702559641933`*^9}, { 3.630553045404605*^9, 3.6305530553091717`*^9}, {3.6305893694622536`*^9, 3.630589404874316*^9}, {3.6306585642124243`*^9, 3.6306586027288923`*^9}, { 3.630658768962784*^9, 3.6306589911851745`*^9}, 3.630659024070032*^9, { 3.630673454818836*^9, 3.6306734854495883`*^9}, {3.630675026717631*^9, 3.6306750934294467`*^9}, {3.63067528213724*^9, 3.6306752822962494`*^9}, { 3.630675363622901*^9, 3.630675390674448*^9}, {3.630675423882347*^9, 3.6306754692369413`*^9}, 3.6306755736573396`*^9, {3.6306756175005193`*^9, 3.6306756249209433`*^9}, {3.630675655290681*^9, 3.6306756841903334`*^9}, { 3.630675727032784*^9, 3.6306757374963827`*^9}, {3.6306758978040085`*^9, 3.630675909644429*^9}, 3.630739547935058*^9, {3.6852523453938932`*^9, 3.68525240748398*^9}, {3.6852525490681486`*^9, 3.6852525670281763`*^9}, { 3.6852540883581915`*^9, 3.6852541237762175`*^9}, 3.6852541568981113`*^9, { 3.685261324675716*^9, 3.6852613495857506`*^9}, 3.685261974676626*^9, 3.685267244644004*^9, {3.6852714610531816`*^9, 3.6852714662331886`*^9}, { 3.685340224314878*^9, 3.6853402425549035`*^9}, {3.6858757975527844`*^9, 3.685875800692789*^9}, 3.685875976643035*^9, 3.6863952420746865`*^9, { 3.6866590821902657`*^9, 3.6866591337503376`*^9}, {3.686659210920446*^9, 3.6866592825905457`*^9}, 3.686659319650598*^9, {3.718089929604436*^9, 3.718089937596391*^9}, {3.748925556248083*^9, 3.748925596504529*^9}, { 3.7489256818595314`*^9, 3.7489256827028418`*^9}, {3.748925773478675*^9, 3.7489257778055353`*^9}, {3.748926055597584*^9, 3.748926062252592*^9}, { 3.763360933415641*^9, 3.7633609496266603`*^9}, {3.7633609815881844`*^9, 3.7633610764771547`*^9}, {3.7633613048089595`*^9, 3.7633613076362433`*^9}, {3.7633613893424907`*^9, 3.7633615331764507`*^9}, {3.763361607122345*^9, 3.76336160876289*^9}, { 3.7633623480857973`*^9, 3.7633623585366373`*^9}, 3.76336241391245*^9, { 3.775195572056567*^9, 3.7751955991593075`*^9}, {3.7751960880379295`*^9, 3.775196091370717*^9}, {3.775196129656457*^9, 3.775196168758065*^9}, { 3.780755351585566*^9, 3.7807553831661777`*^9}, {3.78158836354117*^9, 3.781588408369763*^9}, 3.781588456255967*^9}, CellLabel->"In[20]:=",ExpressionUUID->"861c745d-9e05-4717-b1a7-b06eb7ae4fa7"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 2.3 (bar)", "Subsubsection", CellChangeTimes->{ 3.4734695002813997`*^9, {3.599225569652184*^9, 3.599225577904598*^9}, 3.5992258478994727`*^9, 3.6862336460745583`*^9, 3.6862909162387624`*^9, { 3.6863755415162687`*^9, 3.686375541876269*^9}, {3.686463504573411*^9, 3.686463506573414*^9}, {3.7489255126802044`*^9, 3.7489255130397606`*^9}, 3.781589676163022*^9, 3.813654551736487*^9},ExpressionUUID->"4f9bdede-e333-45a9-a6fe-\ 45d4b8e8eee7"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", " ", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"a", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4426469450734453`*^9, 3.4426469473978453`*^9}, { 3.630367590488758*^9, 3.6303676088811903`*^9}, {3.630367651765666*^9, 3.630367669549697*^9}, 3.630368414310605*^9, {3.6307482430426474`*^9, 3.6307482456946526`*^9}, 3.685262022046692*^9, {3.6852621067368107`*^9, 3.6852621933569317`*^9}, {3.685262233936989*^9, 3.685262252827015*^9}, 3.685267210253956*^9, {3.6852715412232933`*^9, 3.685271546353301*^9}, { 3.6853429895189857`*^9, 3.6853430232739167`*^9}, 3.6858761692133045`*^9, { 3.68821224839828*^9, 3.6882123179983773`*^9}, {3.68821235531843*^9, 3.6882123899484777`*^9}, {3.7489257072597785`*^9, 3.7489257140861125`*^9}, {3.7489261900818295`*^9, 3.7489261918002853`*^9}, {3.843626233029293*^9, 3.843626236960007*^9}}, CellLabel-> "In[347]:=",ExpressionUUID->"e838b4dc-83fb-4c82-bcf9-99e8cc90e6b3"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 2.4 (beam)", "Subsubsection", CellChangeTimes->{ 3.4734694944314003`*^9, 3.599224766420371*^9, 3.6862337099646473`*^9, 3.686290219307787*^9, {3.6862903012279015`*^9, 3.686290301967902*^9}, { 3.686377587511134*^9, 3.686377589931137*^9}, 3.6864635125734224`*^9, { 3.74892551699196*^9, 3.748925517944848*^9}, 3.7815896811137877`*^9, 3.8136545553992853`*^9},ExpressionUUID->"d8b19f04-6789-4d09-a201-\ 2fa75b54d764"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "f"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{ 3.442646896400446*^9, {3.629783307211053*^9, 3.629783319737875*^9}, { 3.6297833622479496`*^9, 3.6297833821535845`*^9}, {3.6297834663625326`*^9, 3.6297834719785423`*^9}, {3.629783540353462*^9, 3.629783541960265*^9}, { 3.629783803978326*^9, 3.629783888920475*^9}, {3.6297840054526796`*^9, 3.6297840056398797`*^9}, {3.6297840416291428`*^9, 3.629784042237544*^9}, { 3.629784285878772*^9, 3.629784299357196*^9}, {3.629784645038203*^9, 3.6297846906682825`*^9}, {3.6297850092208424`*^9, 3.629785101651005*^9}, { 3.629785975190139*^9, 3.629786017294613*^9}, {3.6297860683067026`*^9, 3.6297860840939302`*^9}, {3.629786362148819*^9, 3.6297864363425493`*^9}, { 3.629786900072529*^9, 3.629786945484209*^9}, 3.629786990225087*^9, { 3.629787120366516*^9, 3.6297871260449266`*^9}, {3.629787266780774*^9, 3.629787391144192*^9}, {3.6297874597063127`*^9, 3.629787510344002*^9}, 3.629788110882656*^9, {3.629788171800763*^9, 3.6297881758411703`*^9}, { 3.6297885659354553`*^9, 3.6297885755294724`*^9}, {3.6297892278758183`*^9, 3.629789232243826*^9}, {3.629789276625904*^9, 3.6297893332852035`*^9}, { 3.6297914556533313`*^9, 3.6297914630945444`*^9}, {3.629869949096054*^9, 3.629870013430567*^9}, {3.629870255714593*^9, 3.6298702559641933`*^9}, { 3.630553045404605*^9, 3.6305530553091717`*^9}, {3.6305893694622536`*^9, 3.630589404874316*^9}, {3.6306585642124243`*^9, 3.6306586027288923`*^9}, { 3.630658768962784*^9, 3.6306589911851745`*^9}, 3.630659024070032*^9, { 3.630673454818836*^9, 3.6306734854495883`*^9}, {3.630675026717631*^9, 3.6306750934294467`*^9}, {3.63067528213724*^9, 3.6306752822962494`*^9}, { 3.630675363622901*^9, 3.630675390674448*^9}, {3.630675423882347*^9, 3.6306754692369413`*^9}, 3.6306755736573396`*^9, {3.6306756175005193`*^9, 3.6306756249209433`*^9}, {3.630675655290681*^9, 3.6306756841903334`*^9}, { 3.630675727032784*^9, 3.6306757374963827`*^9}, {3.6306758978040085`*^9, 3.630675909644429*^9}, 3.630739547935058*^9, {3.6852523453938932`*^9, 3.68525240748398*^9}, {3.6852525490681486`*^9, 3.6852525670281763`*^9}, { 3.6852540883581915`*^9, 3.6852541237762175`*^9}, 3.6852541568981113`*^9, { 3.685261324675716*^9, 3.6852613495857506`*^9}, 3.685261974676626*^9, 3.685267244644004*^9, {3.6852714610531816`*^9, 3.6852714662331886`*^9}, { 3.685340224314878*^9, 3.6853402425549035`*^9}, {3.6858757975527844`*^9, 3.685875800692789*^9}, 3.685875976643035*^9, {3.686377605391159*^9, 3.6863776382012053`*^9}, {3.6863791342332993`*^9, 3.6863791914533796`*^9}, {3.7180899777435303`*^9, 3.71808999856365*^9}, { 3.7489257406582375`*^9, 3.748925755701603*^9}, {3.7489258070801616`*^9, 3.7489258388695903`*^9}, {3.7489262268855066`*^9, 3.7489262540513067`*^9}}, CellLabel-> "In[351]:=",ExpressionUUID->"5f45d505-1ad8-4048-ae25-030194ab6a69"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 2.5 (bar truss)", "Subsubsection", CellChangeTimes->{ 3.473469503105*^9, {3.599225885667139*^9, 3.5992258876171427`*^9}, { 3.686233649684563*^9, 3.686233650204564*^9}, 3.686290918768766*^9, 3.686291030808923*^9, {3.6863793069335413`*^9, 3.6863793075335417`*^9}, 3.6864635148234253`*^9, {3.7489255222250147`*^9, 3.7489255231311374`*^9}, 3.781589684224475*^9, 3.813654557155057*^9},ExpressionUUID->"46035535-b76c-4219-8f83-\ 366bcafbefd6"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["8"], "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "F"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4426469547766457`*^9, 3.4426469592694454`*^9}, { 3.630368423748622*^9, 3.6303685192207894`*^9}, {3.6303685521992474`*^9, 3.6303685620584645`*^9}, 3.6303705303858223`*^9, {3.685262281457055*^9, 3.685262388467205*^9}, {3.6852624670373154`*^9, 3.685262481977336*^9}, { 3.68526278509776*^9, 3.685262791257769*^9}, 3.685267202483945*^9, { 3.6852715539533114`*^9, 3.685271559193319*^9}, {3.6853430782990637`*^9, 3.6853430894086995`*^9}, 3.686379355343609*^9, {3.6863831012088532`*^9, 3.6863831063588605`*^9}, {3.6863942094232407`*^9, 3.6863942663533206`*^9}, 3.6876000488420086`*^9, {3.718090012827323*^9, 3.718090016482974*^9}, { 3.748925864816631*^9, 3.7489258807657166`*^9}, {3.843626246579293*^9, 3.8436262504285946`*^9}, {3.8449133628999662`*^9, 3.844913386911138*^9}, { 3.844913441464127*^9, 3.844913441990646*^9}, {3.845031638049384*^9, 3.8450316385515203`*^9}}, CellLabel-> "In[355]:=",ExpressionUUID->"521601c3-aebc-40bf-9757-e783c91b0196"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 1 (bar)", "Subsubsection", CellChangeTimes->{{3.473061354483*^9, 3.473061370995*^9}, { 3.4730615048269997`*^9, 3.473061506814*^9}, {3.473061742094*^9, 3.473061762285*^9}, 3.567430050922524*^9, {3.567431829809649*^9, 3.5674318300904493`*^9}, {3.567431908886188*^9, 3.567431917965404*^9}, { 3.599224811863251*^9, 3.599224812268852*^9}, 3.686290397238036*^9, { 3.68646345367334*^9, 3.6864634569533443`*^9}, 3.6864663436772566`*^9, { 3.686650112822079*^9, 3.6866501251020966`*^9}, {3.748659544383794*^9, 3.7486595757163982`*^9}, 3.7489277809817677`*^9, {3.7815895992979193`*^9, 3.78158960472125*^9}},ExpressionUUID->"ab952dcb-b25f-448e-b30e-\ 94af7d232626"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"-", "P"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}], " ", ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"-", "P"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "3", "}"}], "]"}]}], "}"}]}], " ", "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4426465840284452`*^9, 3.4426465892856455`*^9}, { 3.442646804859646*^9, 3.442646838774046*^9}, {3.473061388457*^9, 3.473061428737*^9}, 3.4730617731*^9, 3.567431929993025*^9, { 3.567431974016302*^9, 3.5674320810480905`*^9}, {3.5674890909903803`*^9, 3.5674891595525007`*^9}, {3.6297906188366613`*^9, 3.6297907609373107`*^9}, 3.6297908204358153`*^9, 3.6297911125307283`*^9, {3.629791153356*^9, 3.629791155321604*^9}, {3.629791373097986*^9, 3.6297913814596004`*^9}, { 3.6305532313682413`*^9, 3.6305532595738544`*^9}, {3.685261672976204*^9, 3.685261743386302*^9}, {3.68526183461643*^9, 3.6852619078265324`*^9}, 3.6852620332367077`*^9, {3.68526207754677*^9, 3.685262079426772*^9}, 3.6852672173839655`*^9, {3.6852715282732754`*^9, 3.6852715335432825`*^9}, { 3.685346747734944*^9, 3.685346764006874*^9}, 3.6876002294042616`*^9, 3.7180838723321075`*^9, {3.7180865832241707`*^9, 3.718086588160243*^9}, { 3.7180925750564766`*^9, 3.718092591390044*^9}, {3.748928726767409*^9, 3.7489287311726236`*^9}, {3.780729074342733*^9, 3.780729082771414*^9}, { 3.843626263882229*^9, 3.84362626983366*^9}}, CellLabel->"In[26]:=",ExpressionUUID->"397dbb35-c74e-49bf-842c-02bd70a95eee"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 2 (bar)", "Subsubsection", CellChangeTimes->{{3.473061354483*^9, 3.473061370995*^9}, { 3.4730615048269997`*^9, 3.473061506814*^9}, 3.4730617526730003`*^9, 3.5674300455873146`*^9, 3.5674301547407064`*^9, {3.599224775421587*^9, 3.599224775795988*^9}, {3.686233712964652*^9, 3.686233737814687*^9}, 3.686463173752948*^9, 3.7486595944299035`*^9, 3.748927789073621*^9, 3.7815330113274517`*^9, {3.7815896166403522`*^9, 3.781589623495639*^9}},ExpressionUUID->"a798d9ba-06b4-43a5-9640-\ 6b2a1bd7068c"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{"f", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{"f", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4426465840284452`*^9, 3.4426465892856455`*^9}, { 3.442646804859646*^9, 3.442646838774046*^9}, {3.473061388457*^9, 3.473061428737*^9}, 3.4734695779694*^9, {3.56748861907835*^9, 3.567488647267599*^9}, {3.5674887133961153`*^9, 3.567488713786116*^9}, { 3.629779795335684*^9, 3.629779927389916*^9}, {3.6297874043730154`*^9, 3.6297874265094547`*^9}, {3.6305530716721077`*^9, 3.630553079300544*^9}, { 3.630675957233904*^9, 3.630675996863765*^9}, {3.6306760991857443`*^9, 3.6306761426832323`*^9}, {3.6307395810851164`*^9, 3.63073959471954*^9}, { 3.6852608074149914`*^9, 3.6852608342450294`*^9}, 3.685261964306611*^9, 3.685267237733994*^9, {3.6852714775732045`*^9, 3.6852714824832115`*^9}, { 3.68534178007981*^9, 3.6853418242453365`*^9}, {3.6853423481463013`*^9, 3.68534237731597*^9}, {3.685344715012679*^9, 3.685344741643202*^9}, 3.6876000739430437`*^9, {3.7180922647565174`*^9, 3.71809226971446*^9}, { 3.748929080700294*^9, 3.7489290819653716`*^9}, {3.8436262870648584`*^9, 3.8436262969539347`*^9}, {3.8436264562794814`*^9, 3.843626500380855*^9}}, CellLabel->"In[61]:=",ExpressionUUID->"ff8b8a78-adc1-4f7b-8059-023cae0034e7"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 3 (bar structure)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430866035033803`*^9, 3.4430866067013803`*^9}, 3.4742603622347393`*^9, { 3.47426082029274*^9, 3.4742608300977397`*^9}, {3.4742616255317397`*^9, 3.4742616631637397`*^9}, 3.47426171431174*^9, {3.569295755520348*^9, 3.569295758265953*^9}, {3.5999975352114353`*^9, 3.5999975364126377`*^9}, { 3.6862916156897416`*^9, 3.6862916164197426`*^9}, {3.6862917162198825`*^9, 3.6862917246998944`*^9}, 3.686463531723449*^9, 3.74865961226451*^9, 3.748927832766491*^9, {3.7490963641131907`*^9, 3.7490963727668962`*^9}, { 3.7491964861930313`*^9, 3.749196491176306*^9}, {3.7815331125223627`*^9, 3.781533115369457*^9}, {3.781589618662669*^9, 3.7815896259212723`*^9}},ExpressionUUID->"646251c6-9b4e-4f2d-b6f0-\ 5be710d8eb7c"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "F"}], ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "1", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", RowBox[{"uY", "[", "1", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430866305537806`*^9, 3.44308673150138*^9}, { 3.4742604996717396`*^9, 3.47426061596974*^9}, 3.4742609854677396`*^9, 3.569295818310458*^9, 3.569295934780263*^9, {3.631161797385408*^9, 3.63116192958797*^9}, 3.6311621282873344`*^9, {3.6314096475812645`*^9, 3.6314096645540943`*^9}, 3.63140970193176*^9, {3.6314296672834578`*^9, 3.6314296732582684`*^9}, {3.6314297131943383`*^9, 3.631429723193956*^9}, { 3.6320283190146666`*^9, 3.6320283335070925`*^9}, {3.632028523936627*^9, 3.632028541689458*^9}, {3.6630475834142756`*^9, 3.6630475933982935`*^9}, { 3.685322391232018*^9, 3.685322396442025*^9}, {3.685322434252078*^9, 3.68532247101213*^9}, {3.6853440662625723`*^9, 3.685344095349236*^9}, { 3.6853489765747485`*^9, 3.6853489802747536`*^9}, {3.6862916241397533`*^9, 3.6862916684598155`*^9}, {3.687415123418954*^9, 3.6874151238689547`*^9}, 3.687415669729719*^9, {3.718092479942563*^9, 3.7180924811749573`*^9}, { 3.748930241472967*^9, 3.748930250830176*^9}, {3.749096382599405*^9, 3.749096442697592*^9}, {3.7491965410236588`*^9, 3.749196620770857*^9}, { 3.8436263143314342`*^9, 3.843626318204549*^9}}, CellLabel->"In[34]:=",ExpressionUUID->"f8a7de49-96b9-47a4-a378-90baebf78a52"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 4 (torsion)", "Subsubsection", CellChangeTimes->{{3.473061354483*^9, 3.473061370995*^9}, { 3.4730615048269997`*^9, 3.473061506814*^9}, 3.4730617526730003`*^9, 3.5674300455873146`*^9, 3.5674301547407064`*^9, {3.599224775421587*^9, 3.599224775795988*^9}, {3.686233712964652*^9, 3.686233737814687*^9}, { 3.686462478831975*^9, 3.6864624804619775`*^9}, 3.7486595922331676`*^9, { 3.748927786339876*^9, 3.7489277952128067`*^9}, 3.7815332277192125`*^9, 3.781589632953864*^9, {3.8441379817131453`*^9, 3.844137982354335*^9}},ExpressionUUID->"57b7b91f-ded1-4700-9e57-\ f1c3373c53e9"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "G", "}"}], ",", RowBox[{"{", "J", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", RowBox[{"-", "M"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4426465840284452`*^9, 3.4426465892856455`*^9}, { 3.442646804859646*^9, 3.442646838774046*^9}, {3.473061388457*^9, 3.473061428737*^9}, 3.4734695779694*^9, {3.56748861907835*^9, 3.567488647267599*^9}, {3.5674887133961153`*^9, 3.567488713786116*^9}, { 3.629779795335684*^9, 3.629779927389916*^9}, {3.6297874043730154`*^9, 3.6297874265094547`*^9}, {3.6305530716721077`*^9, 3.630553079300544*^9}, { 3.630675957233904*^9, 3.630675996863765*^9}, {3.6306760991857443`*^9, 3.6306761426832323`*^9}, {3.6307395810851164`*^9, 3.63073959471954*^9}, { 3.6852608074149914`*^9, 3.6852608342450294`*^9}, 3.685261964306611*^9, 3.685267237733994*^9, {3.6852714775732045`*^9, 3.6852714824832115`*^9}, { 3.68534178007981*^9, 3.6853418242453365`*^9}, {3.6853423481463013`*^9, 3.68534237731597*^9}, {3.685344715012679*^9, 3.685344741643202*^9}, { 3.6864624845319834`*^9, 3.686462628752185*^9}, {3.6864627547623615`*^9, 3.686462780662398*^9}, 3.6876000630120287`*^9, {3.718092246482506*^9, 3.7180922478700595`*^9}, {3.7489289818638506`*^9, 3.7489289870503845`*^9}, {3.781590149446043*^9, 3.781590179328641*^9}, { 3.843704952609706*^9, 3.8437049533331747`*^9}}, CellLabel->"In[4]:=",ExpressionUUID->"0d60fba6-0116-48b8-95a5-a13112bced19"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 5 (torsion)", "Subsubsection", CellChangeTimes->{{3.473055608665*^9, 3.4730556508570004`*^9}, { 3.473057986849*^9, 3.473057995505*^9}, {3.473061553363*^9, 3.4730615754709997`*^9}, {3.4730617586879997`*^9, 3.4730617595109997`*^9}, 3.567430048036519*^9, {3.5674301970479803`*^9, 3.567430205846396*^9}, { 3.5992247831280007`*^9, 3.599224789570812*^9}, {3.6862337168646574`*^9, 3.6862337397746897`*^9}, {3.68629059311831*^9, 3.6862906012683215`*^9}, 3.748659597569113*^9, {3.748927802054665*^9, 3.7489278098343763`*^9}, 3.7815896377688107`*^9, {3.844137986637434*^9, 3.8441379873166914`*^9}},ExpressionUUID->"2155eafe-aa93-475a-97b7-\ 261c1d0b4817"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "G", "}"}], ",", RowBox[{"{", "J", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "G", "}"}], ",", RowBox[{"{", RowBox[{"J", "/", "2"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "G", "}"}], ",", RowBox[{"{", "J", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "4"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", RowBox[{"-", "M"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "3", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", "3", "]"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"3", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{ 3.442646896400446*^9, {3.473058050178*^9, 3.473058242583*^9}, { 3.473058273832*^9, 3.473058275781*^9}, {3.4730583246470003`*^9, 3.473058418342*^9}, {3.473058484495*^9, 3.47305848615*^9}, { 3.473061601906*^9, 3.473061685848*^9}, {3.5674302269220333`*^9, 3.5674302407904577`*^9}, {3.567488739432561*^9, 3.567488848804353*^9}, { 3.5674892287386227`*^9, 3.5674892390034404`*^9}, {3.62978936549926*^9, 3.6297895519507875`*^9}, {3.6297901935019145`*^9, 3.6297902812676687`*^9}, {3.6297915128898315`*^9, 3.62979152889546*^9}, 3.629791607815998*^9, {3.629870491103406*^9, 3.629870525875867*^9}, { 3.630569827149594*^9, 3.6305698469927287`*^9}, {3.6305700587188387`*^9, 3.6305700685033984`*^9}, 3.6305701178622217`*^9, {3.6305702743651733`*^9, 3.630570286132846*^9}, {3.6305884293266025`*^9, 3.6305884379378176`*^9}, { 3.630588892460216*^9, 3.6305889218974676`*^9}, {3.6305890060752153`*^9, 3.630589009351221*^9}, {3.6305890670869226`*^9, 3.6305890695517273`*^9}, { 3.6852609345251694`*^9, 3.6852609544951973`*^9}, {3.685260985325241*^9, 3.6852610561353397`*^9}, {3.6852611137454205`*^9, 3.685261294805674*^9}, 3.6852619439765825`*^9, 3.685267231203985*^9, {3.6852714918932247`*^9, 3.6852714982332335`*^9}, {3.685341844218479*^9, 3.6853419077321115`*^9}, { 3.685876041473126*^9, 3.6858760505831385`*^9}, 3.6862906560183983`*^9, { 3.686290701298462*^9, 3.6862907191684866`*^9}, 3.6876000892040653`*^9, { 3.718092295228528*^9, 3.7180923074823475`*^9}, {3.7489292021248746`*^9, 3.74892920353061*^9}, {3.781533396526548*^9, 3.78153339950194*^9}, { 3.781591297030265*^9, 3.7815913486728106`*^9}, {3.843704985687063*^9, 3.8437049926132603`*^9}}, CellLabel->"In[8]:=",ExpressionUUID->"1f2d5c25-9165-4e9e-b6f9-73a30b856bc0"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 6 (beam)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430866035033803`*^9, 3.4430866067013803`*^9}, 3.4742603622347393`*^9, { 3.47426082029274*^9, 3.4742608300977397`*^9}, {3.4742616255317397`*^9, 3.4742616631637397`*^9}, 3.47426171431174*^9, {3.569295755520348*^9, 3.569295758265953*^9}, {3.5999975352114353`*^9, 3.5999975364126377`*^9}, { 3.6862916156897416`*^9, 3.6862916164197426`*^9}, {3.6862917162198825`*^9, 3.6862917246998944`*^9}, 3.686463531723449*^9, 3.74865961226451*^9, 3.748927832766491*^9, {3.7490963641131907`*^9, 3.7490963727668962`*^9}, 3.7491964819596252`*^9, {3.7815334945350494`*^9, 3.781533497555529*^9}, 3.7815896401279874`*^9},ExpressionUUID->"6ce24b03-48ba-43e4-90bf-\ a8d3101ec791"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "M", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430866305537806`*^9, 3.44308673150138*^9}, { 3.4742604996717396`*^9, 3.47426061596974*^9}, 3.4742609854677396`*^9, 3.569295818310458*^9, 3.569295934780263*^9, {3.631161797385408*^9, 3.63116192958797*^9}, 3.6311621282873344`*^9, {3.6314096475812645`*^9, 3.6314096645540943`*^9}, 3.63140970193176*^9, {3.6314296672834578`*^9, 3.6314296732582684`*^9}, {3.6314297131943383`*^9, 3.631429723193956*^9}, { 3.6320283190146666`*^9, 3.6320283335070925`*^9}, {3.632028523936627*^9, 3.632028541689458*^9}, {3.6630475834142756`*^9, 3.6630475933982935`*^9}, { 3.685322391232018*^9, 3.685322396442025*^9}, {3.685322434252078*^9, 3.68532247101213*^9}, {3.6853440662625723`*^9, 3.685344095349236*^9}, { 3.6853489765747485`*^9, 3.6853489802747536`*^9}, {3.6862916241397533`*^9, 3.6862916684598155`*^9}, {3.687415123418954*^9, 3.6874151238689547`*^9}, 3.687415669729719*^9, {3.718092479942563*^9, 3.7180924811749573`*^9}, { 3.748930241472967*^9, 3.748930250830176*^9}, {3.749096382599405*^9, 3.749096442697592*^9}, {3.844921472716564*^9, 3.844921474569749*^9}}, CellLabel->"In[17]:=",ExpressionUUID->"da070766-924f-45e4-b55f-eb70f0022214"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 7 (beam)", "Subsubsection", CellChangeTimes->{{3.473055608665*^9, 3.4730556508570004`*^9}, { 3.473057986849*^9, 3.473057995505*^9}, {3.473061553363*^9, 3.4730615754709997`*^9}, {3.4730617586879997`*^9, 3.4730617595109997`*^9}, {3.473061806072*^9, 3.4730618092860003`*^9}, 3.567430053590129*^9, 3.5674302916621466`*^9, {3.59922479409482*^9, 3.5992247947344213`*^9}, 3.686233727874673*^9, 3.6862907545885363`*^9, 3.748659604009043*^9, 3.748927841186149*^9, 3.7815335810162077`*^9, 3.781589642518814*^9},ExpressionUUID->"17a98cbd-db5d-40e2-bfbc-\ 78858f27aaed"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"-", "f"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "f"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{ 3.442646896400446*^9, {3.473058050178*^9, 3.473058242583*^9}, { 3.473058273832*^9, 3.473058275781*^9}, {3.4730583246470003`*^9, 3.473058418342*^9}, {3.473058484495*^9, 3.47305848615*^9}, { 3.473061601906*^9, 3.473061685848*^9}, {3.4730618307860003`*^9, 3.473062130566*^9}, {3.5674305015137157`*^9, 3.567430508034527*^9}, 3.5674306789176273`*^9, {3.5674889411989174`*^9, 3.567489021180258*^9}, { 3.6297903068985133`*^9, 3.629790413571501*^9}, {3.629790456471576*^9, 3.629790478888816*^9}, {3.6297905091060686`*^9, 3.6297905324281096`*^9}, 3.6297915982999816`*^9, {3.629870281797838*^9, 3.629870287819449*^9}, { 3.629870322950711*^9, 3.629870429155697*^9}, {3.6307481815629396`*^9, 3.6307482184414043`*^9}, {3.6852614772659297`*^9, 3.685261629646143*^9}, { 3.6852619208965507`*^9, 3.685261929826563*^9}, 3.6852672248539762`*^9, { 3.6852715094232492`*^9, 3.6852715139832554`*^9}, 3.685330160876338*^9, 3.685330191642098*^9, {3.6853398909644113`*^9, 3.685339924654458*^9}, { 3.6858760739831715`*^9, 3.685876077853177*^9}, {3.686290816478623*^9, 3.6862908363386507`*^9}, {3.6868258114230947`*^9, 3.6868258331431255`*^9}, 3.6868273566352577`*^9, 3.687600102954085*^9, {3.718092325036801*^9, 3.7180923740498295`*^9}, {3.781533617217809*^9, 3.7815336197883067`*^9}, { 3.7821231819165497`*^9, 3.782123208959263*^9}}, CellLabel-> "In[331]:=",ExpressionUUID->"d74d738c-ba27-48c5-a341-1aa8e5f42489"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 8 (torsion)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430866035033803`*^9, 3.4430866067013803`*^9}, 3.4742603622347393`*^9, { 3.47426082029274*^9, 3.4742608300977397`*^9}, {3.4742616255317397`*^9, 3.4742616631637397`*^9}, 3.47426171431174*^9, {3.569295755520348*^9, 3.569295758265953*^9}, {3.5999975352114353`*^9, 3.5999975364126377`*^9}, { 3.6862916156897416`*^9, 3.6862916164197426`*^9}, {3.6862917162198825`*^9, 3.6862917246998944`*^9}, 3.686463531723449*^9, 3.74865961226451*^9, 3.748927832766491*^9, {3.7490963641131907`*^9, 3.7490963727668962`*^9}, { 3.7490967747450066`*^9, 3.749096780472579*^9}, {3.7815336996223044`*^9, 3.7815337022845984`*^9}, 3.7815896448290625`*^9, {3.8441379910390205`*^9, 3.8441379919430785`*^9}},ExpressionUUID->"7eae0b88-c2a1-4f99-b058-\ a42548d64d79"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "G", "}"}], ",", RowBox[{"{", "J", "}"}], ",", RowBox[{"{", RowBox[{"mx", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430866305537806`*^9, 3.44308673150138*^9}, { 3.4742604996717396`*^9, 3.47426061596974*^9}, 3.4742609854677396`*^9, 3.569295818310458*^9, 3.569295934780263*^9, {3.631161797385408*^9, 3.63116192958797*^9}, 3.6311621282873344`*^9, {3.6314096475812645`*^9, 3.6314096645540943`*^9}, 3.63140970193176*^9, {3.6314296672834578`*^9, 3.6314296732582684`*^9}, {3.6314297131943383`*^9, 3.631429723193956*^9}, { 3.6320283190146666`*^9, 3.6320283335070925`*^9}, {3.632028523936627*^9, 3.632028541689458*^9}, {3.6630475834142756`*^9, 3.6630475933982935`*^9}, { 3.685322391232018*^9, 3.685322396442025*^9}, {3.685322434252078*^9, 3.68532247101213*^9}, {3.6853440662625723`*^9, 3.685344095349236*^9}, { 3.6853489765747485`*^9, 3.6853489802747536`*^9}, {3.6862916241397533`*^9, 3.6862916684598155`*^9}, {3.687415123418954*^9, 3.6874151238689547`*^9}, 3.687415669729719*^9, {3.718092479942563*^9, 3.7180924811749573`*^9}, { 3.748930241472967*^9, 3.748930250830176*^9}, {3.749096382599405*^9, 3.749096442697592*^9}, {3.7490968050144415`*^9, 3.7490968972208242`*^9}, { 3.749097026819504*^9, 3.7490970589562917`*^9}, {3.749097163512662*^9, 3.7490972292810607`*^9}, {3.7815915177981358`*^9, 3.7815915255108027`*^9}, {3.7821132696934476`*^9, 3.7821133308199654`*^9}, {3.8437050177960253`*^9, 3.843705019761896*^9}}, CellLabel->"In[21]:=",ExpressionUUID->"2725262e-7cac-4fc4-b4f7-6ef30fbad0ee"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 9 (bar column)", "Subsubsection", CellChangeTimes->{{3.473061354483*^9, 3.473061370995*^9}, { 3.4730615048269997`*^9, 3.473061506814*^9}, 3.4730617526730003`*^9, 3.5674300455873146`*^9, 3.5674301547407064`*^9, {3.599224775421587*^9, 3.599224775795988*^9}, {3.686233712964652*^9, 3.686233737814687*^9}, 3.6862904664481325`*^9, 3.686458624014577*^9, 3.6864631774529533`*^9, { 3.686463277853094*^9, 3.6864632843931026`*^9}, 3.7486596081732283`*^9, 3.748927835906389*^9, 3.7815337684792995`*^9, 3.7815896564885364`*^9},ExpressionUUID->"f2619011-0099-44aa-a112-\ bd0888a70a31"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Rho]"}], " ", "g", " ", "A"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{"2", " ", "A"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "\[Rho]"}], " ", "g", " ", "2", " ", "A"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4426465840284452`*^9, 3.4426465892856455`*^9}, { 3.442646804859646*^9, 3.442646838774046*^9}, {3.473061388457*^9, 3.473061428737*^9}, 3.4734695779694*^9, {3.56748861907835*^9, 3.567488647267599*^9}, {3.5674887133961153`*^9, 3.567488713786116*^9}, { 3.629779795335684*^9, 3.629779927389916*^9}, {3.6297874043730154`*^9, 3.6297874265094547`*^9}, {3.6305530716721077`*^9, 3.630553079300544*^9}, { 3.630675957233904*^9, 3.630675996863765*^9}, {3.6306760991857443`*^9, 3.6306761426832323`*^9}, {3.6307395810851164`*^9, 3.63073959471954*^9}, { 3.6852608074149914`*^9, 3.6852608342450294`*^9}, 3.685261964306611*^9, 3.685267237733994*^9, {3.6852714775732045`*^9, 3.6852714824832115`*^9}, { 3.68534178007981*^9, 3.6853418242453365`*^9}, {3.6853423481463013`*^9, 3.68534237731597*^9}, {3.685344715012679*^9, 3.685344741643202*^9}, { 3.6862904953181734`*^9, 3.6862905374482317`*^9}, 3.6876001584241624`*^9, { 3.7180924232373037`*^9, 3.718092447557682*^9}, {3.7501367327242937`*^9, 3.750136741972226*^9}, {3.843626344394641*^9, 3.8436263512928257`*^9}}, CellLabel-> "In[347]:=",ExpressionUUID->"4f3a6059-85df-478b-97b7-343c77c0b241"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 10 (beam)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430866035033803`*^9, 3.4430866067013803`*^9}, 3.4742603622347393`*^9, { 3.47426082029274*^9, 3.4742608300977397`*^9}, {3.4742616255317397`*^9, 3.4742616631637397`*^9}, 3.47426171431174*^9, {3.569295755520348*^9, 3.569295758265953*^9}, {3.5999975352114353`*^9, 3.5999975364126377`*^9}, { 3.6862916156897416`*^9, 3.6862916164197426`*^9}, {3.6862917162198825`*^9, 3.6862917246998944`*^9}, 3.686463531723449*^9, 3.74865961226451*^9, 3.748927832766491*^9, {3.7815338262864575`*^9, 3.781533826392229*^9}, 3.7815896492407503`*^9},ExpressionUUID->"3f61a77a-69e7-4f30-89a4-\ 6e05e3d3f544"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "F"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430866305537806`*^9, 3.44308673150138*^9}, { 3.4742604996717396`*^9, 3.47426061596974*^9}, 3.4742609854677396`*^9, 3.569295818310458*^9, 3.569295934780263*^9, {3.631161797385408*^9, 3.63116192958797*^9}, 3.6311621282873344`*^9, {3.6314096475812645`*^9, 3.6314096645540943`*^9}, 3.63140970193176*^9, {3.6314296672834578`*^9, 3.6314296732582684`*^9}, {3.6314297131943383`*^9, 3.631429723193956*^9}, { 3.6320283190146666`*^9, 3.6320283335070925`*^9}, {3.632028523936627*^9, 3.632028541689458*^9}, {3.6630475834142756`*^9, 3.6630475933982935`*^9}, { 3.685322391232018*^9, 3.685322396442025*^9}, {3.685322434252078*^9, 3.68532247101213*^9}, {3.6853440662625723`*^9, 3.685344095349236*^9}, { 3.6853489765747485`*^9, 3.6853489802747536`*^9}, {3.6862916241397533`*^9, 3.6862916684598155`*^9}, {3.687415123418954*^9, 3.6874151238689547`*^9}, 3.687415669729719*^9, {3.718092479942563*^9, 3.7180924811749573`*^9}, { 3.748930241472967*^9, 3.748930250830176*^9}, {3.8449215311625195`*^9, 3.8449215374270306`*^9}}, CellLabel->"In[24]:=",ExpressionUUID->"6aada1bd-c708-45ac-93d8-9799c17fb40d"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture assignment 1 (bar)", "Subsubsection", CellChangeTimes->{{3.4730556702200003`*^9, 3.473055683948*^9}, { 3.473056486087*^9, 3.4730564925030003`*^9}, 3.473057491051*^9, { 3.473057733758*^9, 3.473057755476*^9}, {3.568116356788909*^9, 3.5681163731689377`*^9}, {3.5992231160658693`*^9, 3.59922314473872*^9}, { 3.5992232122508388`*^9, 3.5992232356352797`*^9}, {3.686463442653324*^9, 3.686463466683358*^9}, {3.686650104192067*^9, 3.686650133092108*^9}, { 3.687145505190199*^9, 3.687145516080214*^9}},ExpressionUUID->"a0549c96-a398-4b94-b874-\ 1c2a458232b4"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"-", "P"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.599224897569802*^9, 3.599224926773053*^9}, { 3.630748433394182*^9, 3.630748504265106*^9}, {3.6308320967004905`*^9, 3.6308321133874445`*^9}, {3.685263514118781*^9, 3.6852635972488976`*^9}, 3.685267287144063*^9, {3.6853444422720785`*^9, 3.685344490915861*^9}, { 3.6858763098135014`*^9, 3.6858763218235188`*^9}, {3.686226407525676*^9, 3.6862264116856813`*^9}, 3.686445942025214*^9, {3.6866501652021523`*^9, 3.6866502922323303`*^9}, {3.687145549690261*^9, 3.6871456288103724`*^9}, { 3.6871456605404167`*^9, 3.6871456854304514`*^9}, {3.6871477248733063`*^9, 3.6871477484933395`*^9}, {3.6876002810943336`*^9, 3.6876002969743567`*^9}, {3.7177363430128164`*^9, 3.7177363445132213`*^9}, 3.7177363780792713`*^9, {3.7180926677054143`*^9, 3.718092683617588*^9}, 3.749209170827799*^9, {3.8436263648599095`*^9, 3.84362636555094*^9}}, CellLabel->"In[42]:=",ExpressionUUID->"1eb18e35-e94c-4718-8482-218c256c0cbb"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture assignment 2 (bar)", "Subsubsection", CellChangeTimes->{{3.4730556702200003`*^9, 3.473055683948*^9}, { 3.473056486087*^9, 3.4730564925030003`*^9}, 3.473057491051*^9, { 3.473057733758*^9, 3.473057755476*^9}, {3.568116356788909*^9, 3.5681163731689377`*^9}, {3.5992231160658693`*^9, 3.59922314473872*^9}, { 3.5992232122508388`*^9, 3.5992232356352797`*^9}, {3.686463442653324*^9, 3.686463466683358*^9}, {3.686650104192067*^9, 3.686650133092108*^9}, { 3.687145505190199*^9, 3.6871455259302278`*^9}},ExpressionUUID->"790dafde-4d7d-449c-ba92-\ f169ce7c9add"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "f"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{"f", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.599224897569802*^9, 3.599224926773053*^9}, { 3.630748433394182*^9, 3.630748504265106*^9}, {3.6308320967004905`*^9, 3.6308321133874445`*^9}, {3.685263514118781*^9, 3.6852635972488976`*^9}, 3.685267287144063*^9, {3.6853444422720785`*^9, 3.685344490915861*^9}, { 3.6858763098135014`*^9, 3.6858763218235188`*^9}, {3.686226407525676*^9, 3.6862264116856813`*^9}, 3.686445942025214*^9, {3.6866501652021523`*^9, 3.6866502922323303`*^9}, {3.6871475873131137`*^9, 3.687147643883193*^9}, { 3.7177364622662153`*^9, 3.717736462375592*^9}, {3.7180927176352477`*^9, 3.71809271890223*^9}, {3.7492094902520704`*^9, 3.749209497640918*^9}, { 3.749209945982871*^9, 3.749209959901496*^9}, {3.8436263769876623`*^9, 3.8436263865111856`*^9}, {3.8452636947286882`*^9, 3.8452637103289824`*^9}}, CellLabel-> "In[354]:=",ExpressionUUID->"e4b5eea6-4803-4720-8db8-3b8edf0ece07"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 1 (bar structure)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430866035033803`*^9, 3.4430866067013803`*^9}, 3.4742603622347393`*^9, { 3.47426082029274*^9, 3.4742608300977397`*^9}, {3.4742616255317397`*^9, 3.4742616631637397`*^9}, 3.47426171431174*^9, {3.569295755520348*^9, 3.569295758265953*^9}, {3.5999975352114353`*^9, 3.5999975364126377`*^9}, { 3.6862916156897416`*^9, 3.6862916164197426`*^9}, {3.6862917162198825`*^9, 3.6862917246998944`*^9}, 3.686463531723449*^9, 3.74865961226451*^9, 3.748927832766491*^9, {3.7490963641131907`*^9, 3.7490963727668962`*^9}, { 3.7491964861930313`*^9, 3.749196491176306*^9}, 3.7815918364882617`*^9},ExpressionUUID->"d4146263-69e4-4ff6-bf66-\ 568e61194b13"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"P", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "1", "}"}], "]"}]}], "}"}], " ", ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"-", "P"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], " ", "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430866305537806`*^9, 3.44308673150138*^9}, { 3.4742604996717396`*^9, 3.47426061596974*^9}, 3.4742609854677396`*^9, 3.569295818310458*^9, 3.569295934780263*^9, {3.631161797385408*^9, 3.63116192958797*^9}, 3.6311621282873344`*^9, {3.6314096475812645`*^9, 3.6314096645540943`*^9}, 3.63140970193176*^9, {3.6314296672834578`*^9, 3.6314296732582684`*^9}, {3.6314297131943383`*^9, 3.631429723193956*^9}, { 3.6320283190146666`*^9, 3.6320283335070925`*^9}, {3.632028523936627*^9, 3.632028541689458*^9}, {3.6630475834142756`*^9, 3.6630475933982935`*^9}, { 3.685322391232018*^9, 3.685322396442025*^9}, {3.685322434252078*^9, 3.68532247101213*^9}, {3.6853440662625723`*^9, 3.685344095349236*^9}, { 3.6853489765747485`*^9, 3.6853489802747536`*^9}, {3.6862916241397533`*^9, 3.6862916684598155`*^9}, {3.687415123418954*^9, 3.6874151238689547`*^9}, 3.687415669729719*^9, {3.718092479942563*^9, 3.7180924811749573`*^9}, { 3.748930241472967*^9, 3.748930250830176*^9}, {3.749096382599405*^9, 3.749096442697592*^9}, {3.7491965410236588`*^9, 3.749196620770857*^9}, { 3.7815918948366385`*^9, 3.781592011660775*^9}, {3.8436263957540026`*^9, 3.8436264004187727`*^9}}, CellLabel->"In[49]:=",ExpressionUUID->"eba8ee99-0861-4368-bbe0-16b5b8582d89"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 2 (beam)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430866035033803`*^9, 3.4430866067013803`*^9}, 3.4742603622347393`*^9, { 3.47426082029274*^9, 3.4742608300977397`*^9}, {3.4742616255317397`*^9, 3.4742616631637397`*^9}, 3.47426171431174*^9, {3.569295755520348*^9, 3.569295758265953*^9}, {3.5999975352114353`*^9, 3.5999975364126377`*^9}, { 3.6862916156897416`*^9, 3.6862916164197426`*^9}, {3.6862917162198825`*^9, 3.6862917246998944`*^9}, 3.686463531723449*^9, 3.74865961226451*^9, 3.748927832766491*^9, {3.7490963641131907`*^9, 3.7490963727668962`*^9}, 3.7491964819596252`*^9, 3.781592336805994*^9},ExpressionUUID->"82267b86-1fd1-43e2-a101-\ 67e6d3e75cbc"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "f"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "1", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430866305537806`*^9, 3.44308673150138*^9}, { 3.4742604996717396`*^9, 3.47426061596974*^9}, 3.4742609854677396`*^9, 3.569295818310458*^9, 3.569295934780263*^9, {3.631161797385408*^9, 3.63116192958797*^9}, 3.6311621282873344`*^9, {3.6314096475812645`*^9, 3.6314096645540943`*^9}, 3.63140970193176*^9, {3.6314296672834578`*^9, 3.6314296732582684`*^9}, {3.6314297131943383`*^9, 3.631429723193956*^9}, { 3.6320283190146666`*^9, 3.6320283335070925`*^9}, {3.632028523936627*^9, 3.632028541689458*^9}, {3.6630475834142756`*^9, 3.6630475933982935`*^9}, { 3.685322391232018*^9, 3.685322396442025*^9}, {3.685322434252078*^9, 3.68532247101213*^9}, {3.6853440662625723`*^9, 3.685344095349236*^9}, { 3.6853489765747485`*^9, 3.6853489802747536`*^9}, {3.6862916241397533`*^9, 3.6862916684598155`*^9}, {3.687415123418954*^9, 3.6874151238689547`*^9}, 3.687415669729719*^9, {3.718092479942563*^9, 3.7180924811749573`*^9}, { 3.748930241472967*^9, 3.748930250830176*^9}, {3.749096382599405*^9, 3.749096442697592*^9}, {3.781592361414194*^9, 3.7815924103363485`*^9}, { 3.781951848659153*^9, 3.7819518491188927`*^9}}, CellLabel-> "In[327]:=",ExpressionUUID->"34f53e1a-9bd2-4391-a615-3f81eb2c2f05"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 3 (beam)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430866035033803`*^9, 3.4430866067013803`*^9}, 3.4742603622347393`*^9, { 3.47426082029274*^9, 3.4742608300977397`*^9}, {3.4742616255317397`*^9, 3.4742616631637397`*^9}, 3.47426171431174*^9, {3.569295755520348*^9, 3.569295758265953*^9}, {3.5999975352114353`*^9, 3.5999975364126377`*^9}, { 3.6862916156897416`*^9, 3.6862916164197426`*^9}, {3.6862917162198825`*^9, 3.6862917246998944`*^9}, 3.686463531723449*^9, 3.74865961226451*^9, 3.748927832766491*^9, {3.7490963641131907`*^9, 3.7490963727668962`*^9}, { 3.7490967747450066`*^9, 3.749096780472579*^9}, {3.781592696802644*^9, 3.781592697928481*^9}, 3.7815949582252836`*^9},ExpressionUUID->"f2f5a1f1-6567-40ca-a243-\ 3aa96b0564f9"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"-", "f"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"-", "f"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430866305537806`*^9, 3.44308673150138*^9}, { 3.4742604996717396`*^9, 3.47426061596974*^9}, 3.4742609854677396`*^9, 3.569295818310458*^9, 3.569295934780263*^9, {3.631161797385408*^9, 3.63116192958797*^9}, 3.6311621282873344`*^9, {3.6314096475812645`*^9, 3.6314096645540943`*^9}, 3.63140970193176*^9, {3.6314296672834578`*^9, 3.6314296732582684`*^9}, {3.6314297131943383`*^9, 3.631429723193956*^9}, { 3.6320283190146666`*^9, 3.6320283335070925`*^9}, {3.632028523936627*^9, 3.632028541689458*^9}, {3.6630475834142756`*^9, 3.6630475933982935`*^9}, { 3.685322391232018*^9, 3.685322396442025*^9}, {3.685322434252078*^9, 3.68532247101213*^9}, {3.6853440662625723`*^9, 3.685344095349236*^9}, { 3.6853489765747485`*^9, 3.6853489802747536`*^9}, {3.6862916241397533`*^9, 3.6862916684598155`*^9}, {3.687415123418954*^9, 3.6874151238689547`*^9}, 3.687415669729719*^9, {3.718092479942563*^9, 3.7180924811749573`*^9}, { 3.748930241472967*^9, 3.748930250830176*^9}, {3.749096382599405*^9, 3.749096442697592*^9}, {3.7490968050144415`*^9, 3.7490968972208242`*^9}, { 3.749097026819504*^9, 3.7490970589562917`*^9}, {3.749097163512662*^9, 3.7490972292810607`*^9}, {3.781592692454582*^9, 3.7815927014259567`*^9}}, CellLabel->"In[28]:=",ExpressionUUID->"6c6dc9ea-b67c-4ae8-a69c-8e6c081d4127"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["BAR AND BEAM TRUSSES (week 46)", "Subsection", CellChangeTimes->{{3.473055512584*^9, 3.4730555529630003`*^9}, { 3.4730575328269997`*^9, 3.473057539222*^9}, {3.4734691424642*^9, 3.4734691605758*^9}, {3.4736023142902*^9, 3.4736023273162003`*^9}, { 3.568715518105007*^9, 3.568715523097016*^9}, 3.5994750893663483`*^9, 3.6297916561604834`*^9, {3.63073778491436*^9, 3.630737793931176*^9}, { 3.6624537703648133`*^9, 3.6624537732749796`*^9}, 3.685248933840145*^9, { 3.685267058363743*^9, 3.6852671273738394`*^9}, {3.685323461463516*^9, 3.6853234663335233`*^9}, {3.6858764211836576`*^9, 3.6858764235236607`*^9}, 3.6859482147140565`*^9, {3.686226212775403*^9, 3.6862262151354065`*^9}, { 3.686466369367293*^9, 3.686466390117322*^9}, 3.780755249249569*^9},ExpressionUUID->"90110e2b-2bba-4fe1-ad63-\ fbb945a8861d"], Cell[CellGroupData[{ Cell["Lecture example 3.1 (wheel)", "Subsubsection", CellChangeTimes->{{3.473602371199*^9, 3.4736023715889997`*^9}, { 3.685267131203845*^9, 3.685267166633895*^9}, {3.6853471907792845`*^9, 3.6853471926053886`*^9}, {3.685856984206339*^9, 3.685856984847376*^9}, { 3.6858768613442736`*^9, 3.6858768630542765`*^9}, {3.6868022665986676`*^9, 3.68680227563868*^9}, 3.6868820268889236`*^9, {3.7492979552530766`*^9, 3.749297955306305*^9}, {3.7816768159404764`*^9, 3.7816768210478935`*^9}, 3.8136545438973055`*^9},ExpressionUUID->"04ec4067-2f90-4b8a-822a-\ c16840f1dadd"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Gamma]", "[", "i_", "]"}], ":=", RowBox[{"2", " ", "Pi", " ", FractionBox[ RowBox[{"i", "-", "1"}], RowBox[{"n", "-", "1"}]]}]}], ";", " ", RowBox[{"n", "=", " ", "13"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ele", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"n", ",", "i"}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"ele", "[", RowBox[{"[", "n", "]"}], "]"}], "=", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "F"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "n", "}"}], "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"L", " ", RowBox[{"{", RowBox[{ RowBox[{"Cos", "[", RowBox[{"\[Gamma]", "[", "i", "]"}], "]"}], ",", "0", ",", RowBox[{"-", RowBox[{"Sin", "[", RowBox[{"\[Gamma]", "[", "i", "]"}], "]"}]}]}], "}"}]}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", "n", "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"L", " ", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "n", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "n", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"MESH", "[", RowBox[{ RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], " ", "/.", " ", RowBox[{"L", "\[Rule]", "1"}]}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{ 3.630846597456928*^9, 3.685264004799468*^9, 3.6852673008640823`*^9, { 3.6858567510020003`*^9, 3.685856760982571*^9}, {3.685856798224701*^9, 3.685856802661955*^9}, {3.685856847204503*^9, 3.6858569177455378`*^9}, { 3.6868024557289324`*^9, 3.686802496398989*^9}, {3.6868026155691557`*^9, 3.68680269691927*^9}, {3.6868027380393276`*^9, 3.68680278261939*^9}, { 3.6882120677680273`*^9, 3.6882121209181013`*^9}, {3.7187135753209057`*^9, 3.718713579592114*^9}, {3.7492983158579273`*^9, 3.749298340371527*^9}, { 3.7492983865017643`*^9, 3.749298402224436*^9}, {3.8436270200326023`*^9, 3.8436270214183774`*^9}}, CellLabel-> "In[347]:=",ExpressionUUID->"3daf9c12-4dc0-4efa-a797-385d92db1da2"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 3.2 (bar truss)", "Subsubsection", CellChangeTimes->{{3.4736023747714*^9, 3.4736023781098003`*^9}, { 3.6868022785686846`*^9, 3.6868022850886936`*^9}, {3.7492979598334618`*^9, 3.749297959983119*^9}, 3.7816768292590213`*^9, 3.813654568310382*^9},ExpressionUUID->"a2a54fc6-e682-4f91-8779-\ aa4ad4b609af"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{ SubscriptBox["f", "x"], RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}], "/", RowBox[{"Sqrt", "[", "3", "]"}]}]}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", RowBox[{"uY", "[", "1", "]"}], ",", RowBox[{"uZ", "[", "1", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", RowBox[{"uY", "[", "2", "]"}], ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], " ", "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"ELEMENTFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.5995329860720997`*^9, 3.5995329864777007`*^9}, { 3.630659778315757*^9, 3.630659828048644*^9}, {3.6306598914627557`*^9, 3.6306599306656246`*^9}, {3.6306599731444993`*^9, 3.6306599829569163`*^9}, {3.662454347459821*^9, 3.6624543518500724`*^9}, { 3.68526405607954*^9, 3.6852640707595606`*^9}, {3.6852641077696123`*^9, 3.685264155179679*^9}, 3.6852673060840898`*^9, {3.6853472003408313`*^9, 3.6853472271923676`*^9}, {3.6858570860961666`*^9, 3.685857127369527*^9}, { 3.6858768949343204`*^9, 3.685876957124408*^9}, {3.685876989354453*^9, 3.6858770065044775`*^9}, {3.686802340768771*^9, 3.6868023465387793`*^9}, { 3.687096288077949*^9, 3.687096301137967*^9}, {3.6870963358880157`*^9, 3.6870963412180233`*^9}, {3.6870963927480955`*^9, 3.687096425488141*^9}, { 3.688212170418171*^9, 3.688212173478175*^9}, 3.688212222858244*^9, { 3.718713559287408*^9, 3.718713566112142*^9}, {3.749297987905261*^9, 3.7492980245735807`*^9}, {3.7492980614235954`*^9, 3.7492980977687564`*^9}, {3.782206132349878*^9, 3.7822061335202265`*^9}, { 3.8436270961386304`*^9, 3.843627097333571*^9}, {3.8436271305266886`*^9, 3.843627151571617*^9}, 3.8436272405109887`*^9, {3.8456989871179776`*^9, 3.845698997247012*^9}}, CellLabel-> "In[353]:=",ExpressionUUID->"2f47eb58-4030-4856-9411-3aece66167a8"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 3.3 (bar truss)", "Subsubsection", CellChangeTimes->{{3.4736023747714*^9, 3.4736023781098003`*^9}, { 3.6868022785686846`*^9, 3.6868022850886936`*^9}, {3.7492979598334618`*^9, 3.749297959983119*^9}, {3.749298956708169*^9, 3.749298956832679*^9}, 3.781676832387104*^9, 3.8136545700548353`*^9},ExpressionUUID->"cc7b3717-7417-496a-8f3d-\ 3fb4704f6361"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"4", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "F"}], ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "1", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", RowBox[{"uY", "[", "1", "]"}], ",", RowBox[{"uZ", "[", "1", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"-", "L"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], " ", "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.5995329860720997`*^9, 3.5995329864777007`*^9}, { 3.630659778315757*^9, 3.630659828048644*^9}, {3.6306598914627557`*^9, 3.6306599306656246`*^9}, {3.6306599731444993`*^9, 3.6306599829569163`*^9}, {3.662454347459821*^9, 3.6624543518500724`*^9}, { 3.68526405607954*^9, 3.6852640707595606`*^9}, {3.6852641077696123`*^9, 3.685264155179679*^9}, 3.6852673060840898`*^9, {3.6853472003408313`*^9, 3.6853472271923676`*^9}, {3.6858570860961666`*^9, 3.685857127369527*^9}, { 3.6858768949343204`*^9, 3.685876957124408*^9}, {3.685876989354453*^9, 3.6858770065044775`*^9}, {3.686802340768771*^9, 3.6868023465387793`*^9}, { 3.687096288077949*^9, 3.687096301137967*^9}, {3.6870963358880157`*^9, 3.6870963412180233`*^9}, {3.6870963927480955`*^9, 3.687096425488141*^9}, { 3.688212170418171*^9, 3.688212173478175*^9}, 3.688212222858244*^9, { 3.718713559287408*^9, 3.718713566112142*^9}, {3.74929896604405*^9, 3.7492989833939238`*^9}, {3.8436273131595716`*^9, 3.8436273200872927`*^9}}, CellLabel->"In[79]:=",ExpressionUUID->"aa61510f-0295-40bb-b7ce-f9d659a76512"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 3.4 (bar truss with weight)", "Subsubsection", CellChangeTimes->{{3.4736023809334*^9, 3.4736023838817997`*^9}, { 3.5994903030327234`*^9, 3.5994903034695244`*^9}, {3.6853473766519156`*^9, 3.68534737865203*^9}, {3.685853672480919*^9, 3.6858536765821533`*^9}, { 3.6868022874286966`*^9, 3.6868022924887037`*^9}, {3.7492993025153213`*^9, 3.749299305104885*^9}, 3.781676835642621*^9, 3.813654572540381*^9},ExpressionUUID->"af8f1778-ab40-45f7-8fab-\ 04e831aa75fc"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "g"}], " ", "\[Rho]", " ", "A"}], ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"4", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "g"}], " ", "\[Rho]", " ", "A"}], ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "g"}], " ", "\[Rho]", " ", "A"}], ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", RowBox[{"uY", "[", "1", "]"}], ",", RowBox[{"uZ", "[", "1", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"-", "L"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], " ", "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.599533126815547*^9, 3.5995331409959717`*^9}, 3.6307396312704043`*^9, 3.6307396739988794`*^9, {3.630836025642833*^9, 3.630836085484538*^9}, {3.630836488854447*^9, 3.630836496654461*^9}, 3.6308368035069995`*^9, {3.6308369760433025`*^9, 3.6308369779309063`*^9}, { 3.662454165465412*^9, 3.662454191552904*^9}, {3.662454222651683*^9, 3.662454226813921*^9}, {3.6624543747603827`*^9, 3.6624543876881227`*^9}, { 3.662454494804249*^9, 3.662454502145669*^9}, {3.66245471826503*^9, 3.6624547787554903`*^9}, {3.6852641852097206`*^9, 3.6852642984798794`*^9}, {3.6852643408999386`*^9, 3.685264378119991*^9}, { 3.6852645502702312`*^9, 3.685264617960326*^9}, 3.6852648770406895`*^9, 3.6852673115340977`*^9, {3.6853472486005917`*^9, 3.6853472870447903`*^9}, { 3.685853662587353*^9, 3.685853668746705*^9}, {3.6858543068252015`*^9, 3.6858543631444225`*^9}, {3.6858544153464084`*^9, 3.6858544248489523`*^9}, {3.685854612199668*^9, 3.68585466031842*^9}, { 3.6858547397759647`*^9, 3.68585487991298*^9}, 3.685854981820809*^9, { 3.6858553601754494`*^9, 3.685855394495413*^9}, {3.6858554257602005`*^9, 3.6858554351567383`*^9}, 3.685855479299263*^9, 3.685857039572506*^9, { 3.6858770228745003`*^9, 3.6858770304145107`*^9}, {3.6868025344690423`*^9, 3.686802551199066*^9}, {3.7187136081070504`*^9, 3.718713615262325*^9}, { 3.7492993295382905`*^9, 3.749299338359168*^9}, {3.7816717007186203`*^9, 3.781671716529733*^9}, {3.7816717645582705`*^9, 3.7816717684208107`*^9}, { 3.7816718160859756`*^9, 3.78167185015399*^9}, {3.781675787595458*^9, 3.7816757916358285`*^9}, {3.781676121441181*^9, 3.7816761521781797`*^9}, { 3.7816762322950416`*^9, 3.7816762329180937`*^9}}, CellLabel-> "In[376]:=",ExpressionUUID->"ac37362a-58fa-4ae4-a461-758c70cdca67"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 3.5 (bar truss)", "Subsubsection", CellChangeTimes->{{3.4736023870954*^9, 3.4736023880782003`*^9}, { 3.686803133189881*^9, 3.68680313979989*^9}, {3.7493008696860514`*^9, 3.749300872283139*^9}, 3.7816768482405543`*^9, 3.8136545744028063`*^9},ExpressionUUID->"1366a569-2c19-43a7-88b2-\ a5aff97dac26"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["8"], " ", "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "F"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], " ", "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.6306600640614586`*^9, 3.6306601546040177`*^9}, { 3.6308456164378166`*^9, 3.6308456316986895`*^9}, {3.6308456981184883`*^9, 3.6308457129413366`*^9}, {3.685264921820752*^9, 3.6852649870208435`*^9}, 3.685267316524104*^9, {3.6853473969490767`*^9, 3.6853474174332485`*^9}, { 3.6858513146140566`*^9, 3.6858513498080697`*^9}, {3.6858514489307394`*^9, 3.68585149492937*^9}, {3.6858571778094125`*^9, 3.6858571864289055`*^9}, { 3.685857242402107*^9, 3.6858572478604193`*^9}, {3.685948918693322*^9, 3.6859489357472973`*^9}, {3.686803185749954*^9, 3.6868031866399555`*^9}, 3.68707467207323*^9, {3.68818340772154*^9, 3.6881834195715566`*^9}, { 3.7493008921299095`*^9, 3.7493009208051314`*^9}, 3.7822063827282476`*^9, { 3.843627400259995*^9, 3.8436274049979663`*^9}}, CellLabel-> "In[372]:=",ExpressionUUID->"4d0166b0-9387-4bd7-89c0-076e550ce191"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 3.6 (beam)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, 3.4742603278827395`*^9, 3.599997507802187*^9, {3.686803855490892*^9, 3.6868038613709*^9}, {3.749305251848565*^9, 3.749305252514701*^9}, 3.781676851587085*^9, 3.813654578329666*^9},ExpressionUUID->"6344e062-11bf-4b4c-9819-\ a68f8723fc42"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", SubscriptBox["M", "X"], ",", SubscriptBox["M", "Y"], ",", SubscriptBox["M", "Z"]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", "2", "]"}], ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", RowBox[{"\[Theta]Z", "[", "2", "]"}]}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.6307391297295237`*^9, 3.6307392211768837`*^9}, {3.630739306337434*^9, 3.6307393066026344`*^9}, { 3.6309953372125454`*^9, 3.6309953654231586`*^9}, {3.6314281447479825`*^9, 3.631428157711605*^9}, {3.6852818902833004`*^9, 3.6852820246334887`*^9}, { 3.6853488211335306`*^9, 3.685348881403615*^9}, 3.6859400657682357`*^9, { 3.685940098898282*^9, 3.6859401628383713`*^9}, {3.686823595859993*^9, 3.6868236044800053`*^9}, {3.6868237633102274`*^9, 3.6868238153503003`*^9}, {3.6868238624603662`*^9, 3.6868238661803713`*^9}, {3.6868239160404415`*^9, 3.6868239182504444`*^9}, 3.6868258963232136`*^9, {3.686827477125427*^9, 3.6868274869154406`*^9}, { 3.6868298928588085`*^9, 3.6868299600989027`*^9}, {3.686829997168955*^9, 3.686830001768961*^9}, {3.686830345209442*^9, 3.686830357019459*^9}, 3.6872433057918*^9, {3.718713656692144*^9, 3.7187136665567756`*^9}, { 3.7493052762723045`*^9, 3.749305286552043*^9}, {3.845362321569311*^9, 3.8453623231959057`*^9}}, CellLabel-> "In[368]:=",ExpressionUUID->"43dbe5fe-dabe-4c97-a025-2571bf3000db"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 3.7 (beam truss)", "Subsubsection", CellChangeTimes->{ 3.4736023907458*^9, {3.685857331253189*^9, 3.685857333511318*^9}, { 3.6868042361114244`*^9, 3.686804266921468*^9}, {3.686804557371875*^9, 3.686804559021877*^9}, 3.6868275148554797`*^9, {3.6868278640159683`*^9, 3.6868278662759714`*^9}, {3.686833440723776*^9, 3.686833441233776*^9}, { 3.7493054218258686`*^9, 3.7493054228842597`*^9}, 3.7816768547516775`*^9, 3.8136545800987763`*^9},ExpressionUUID->"b096e6c6-845a-492c-a95a-\ 4fb6317a5909"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ SqrtBox["8"], "A"}], ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "4"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "F"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "4", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "1", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "3", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "4", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4426471603690453`*^9, 3.4426471631302457`*^9}, { 3.4426472722990456`*^9, 3.442647277993046*^9}, {3.5995355510048094`*^9, 3.599535561878029*^9}, {3.599535603124501*^9, 3.599535612765318*^9}, { 3.599535651375386*^9, 3.59953565340339*^9}, {3.5995357412315435`*^9, 3.599535743758748*^9}, {3.630660175133654*^9, 3.630660254849794*^9}, { 3.6306603153311*^9, 3.630660338434741*^9}, {3.630660379057212*^9, 3.6306603948600397`*^9}, {3.630661009484618*^9, 3.6306610155530286`*^9}, 3.630670043608343*^9, 3.630670095712435*^9, {3.630670238702286*^9, 3.6306702481403027`*^9}, 3.6306703136760173`*^9, {3.6306703609909005`*^9, 3.630670364220106*^9}, {3.630670712724718*^9, 3.6306707231143365`*^9}, { 3.6306708079472857`*^9, 3.630670827010519*^9}, 3.6306708585225744`*^9, { 3.6306708983182445`*^9, 3.630670913996272*^9}, {3.6306761609662476`*^9, 3.6306761733370695`*^9}, {3.63067620845092*^9, 3.6306762113213253`*^9}, { 3.6306762467982187`*^9, 3.6306762905997243`*^9}, {3.630676330529008*^9, 3.630676331011036*^9}, {3.6306763671129494`*^9, 3.6306763698429537`*^9}, { 3.630676420465043*^9, 3.6306764231326475`*^9}, {3.6306764703728*^9, 3.6306764729624043`*^9}, {3.630676677528345*^9, 3.6306767053561373`*^9}, { 3.630676791526959*^9, 3.6306768379036117`*^9}, {3.6306768958199244`*^9, 3.630676897726033*^9}, {3.630676972970337*^9, 3.630677054333991*^9}, { 3.630677103073778*^9, 3.630677259885748*^9}, {3.630677597256044*^9, 3.6306776002502155`*^9}, {3.6306776364472857`*^9, 3.630677654423314*^9}, 3.630677752663933*^9, {3.630677840639965*^9, 3.630677874770917*^9}, { 3.6306779394316154`*^9, 3.630677946925044*^9}, {3.6306785715691576`*^9, 3.6306785739452934`*^9}, 3.6306786235291295`*^9, {3.6306786600852203`*^9, 3.6306786777522306`*^9}, {3.6306787081499696`*^9, 3.630678710700115*^9}, 3.63067874452505*^9, {3.630678815472108*^9, 3.630678818058256*^9}, { 3.6306788505571146`*^9, 3.630678878144693*^9}, {3.630678913554718*^9, 3.6306789164848857`*^9}, {3.6306790844854946`*^9, 3.630679090509839*^9}, { 3.6306793817024946`*^9, 3.630679390282985*^9}, {3.6306795442287903`*^9, 3.630679557292903*^9}, {3.6306797455696335`*^9, 3.6306797496880407`*^9}, { 3.6306798004037294`*^9, 3.630679805567339*^9}, 3.6306798401057997`*^9, { 3.6306798976231003`*^9, 3.6306799315531597`*^9}, {3.6306799795856447`*^9, 3.630679983938052*^9}, {3.630680053966575*^9, 3.630680055744978*^9}, { 3.630680878337224*^9, 3.630680897384857*^9}, {3.6306809442005396`*^9, 3.630681004385445*^9}, 3.630681234298649*^9, {3.6306812983211613`*^9, 3.6306813178211956`*^9}, {3.630681380736106*^9, 3.6306814227937803`*^9}, { 3.63068146276105*^9, 3.6306814652102547`*^9}, {3.6306815644888287`*^9, 3.6306815933020797`*^9}, {3.630720976304243*^9, 3.6307209836986666`*^9}, { 3.6307487690755715`*^9, 3.6307487728819785`*^9}, 3.630748803988433*^9, { 3.6852650217308917`*^9, 3.685265067940956*^9}, {3.685265099931001*^9, 3.6852652070211515`*^9}, {3.6852653389013357`*^9, 3.6852653639113708`*^9}, {3.685265394731414*^9, 3.6852654097214346`*^9}, { 3.68526546322151*^9, 3.6852654876415443`*^9}, {3.6852656121717186`*^9, 3.685265614611722*^9}, {3.6853474309530215`*^9, 3.6853474625768304`*^9}, { 3.685347514999829*^9, 3.685347551195899*^9}, {3.6868043173415384`*^9, 3.686804321841545*^9}, {3.6868240868106804`*^9, 3.6868241248307333`*^9}, { 3.6868242154708605`*^9, 3.686824264370929*^9}, {3.686827541495517*^9, 3.6868275563555374`*^9}, {3.686828998137556*^9, 3.6868290052975664`*^9}, { 3.6868290364276094`*^9, 3.6868290370576105`*^9}, {3.68682943628817*^9, 3.6868294524381924`*^9}, 3.6868301898292246`*^9, {3.6868302591893215`*^9, 3.6868302852693577`*^9}, {3.6868305063896675`*^9, 3.6868305346297073`*^9}, {3.6868306680498943`*^9, 3.6868306720198994`*^9}, {3.686830857430159*^9, 3.6868308687101746`*^9}, { 3.686830928130258*^9, 3.6868310078503695`*^9}, {3.6868314158109407`*^9, 3.6868314643610086`*^9}, {3.68683153647111*^9, 3.68683154366112*^9}, { 3.6868315914711866`*^9, 3.68683159408119*^9}, {3.6868329475730853`*^9, 3.6868329607531037`*^9}, {3.6868333151836*^9, 3.6868334240137525`*^9}, { 3.6873493675893908`*^9, 3.687349401709439*^9}, {3.7187136898970966`*^9, 3.718713715995452*^9}, {3.7493054394649124`*^9, 3.7493055105699997`*^9}, { 3.8453604000207214`*^9, 3.8453604090409975`*^9}}, CellLabel-> "In[364]:=",ExpressionUUID->"8251b43c-716d-44cb-9233-f6b660c621bf"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 3.8 (beam truss)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430753426703997`*^9, 3.4430753634028*^9}, {3.47426033896474*^9, 3.4742603416977396`*^9}, {3.5999975136833973`*^9, 3.5999975146505995`*^9}, {3.6868055439132557`*^9, 3.6868055502232647`*^9}, {3.7493461185676284`*^9, 3.749346119918116*^9}, 3.781676858106331*^9, 3.8136545821401105`*^9},ExpressionUUID->"a543cc33-4336-458c-b9ac-\ 38382bcc6270"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "4"}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "f"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"4", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "4", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430753715772*^9, 3.4430754825088*^9}, { 3.4430755569208*^9, 3.4430756008816*^9}, {3.482309815778*^9, 3.482309848382*^9}, {3.4823099455699997`*^9, 3.4823099513576*^9}, { 3.56929642228712*^9, 3.569296444548359*^9}, {3.569296507151269*^9, 3.5692965075568695`*^9}, {3.63073932112626*^9, 3.630739489918556*^9}, { 3.630995402963306*^9, 3.6309954368552446`*^9}, {3.6314281883500595`*^9, 3.631428199145278*^9}, {3.6314352924094334`*^9, 3.6314353073722897`*^9}, 3.63143540494287*^9, {3.6314354351645985`*^9, 3.631435469928587*^9}, { 3.6314361236119757`*^9, 3.6314361416370068`*^9}, {3.631436260745819*^9, 3.63143628611127*^9}, {3.6314363180760984`*^9, 3.6314363593104568`*^9}, { 3.66304665456924*^9, 3.663046671120869*^9}, 3.6630468376199617`*^9, { 3.6852820757935605`*^9, 3.685282195043727*^9}, {3.68528223257378*^9, 3.6852822330137806`*^9}, 3.6852822830638504`*^9, {3.685282349023943*^9, 3.685282380023986*^9}, {3.685339954994501*^9, 3.6853400008045654`*^9}, { 3.685343309655297*^9, 3.6853433388039637`*^9}, {3.685343426847*^9, 3.6853434276050434`*^9}, {3.6853436016639986`*^9, 3.685343647949646*^9}, { 3.6853437337305527`*^9, 3.6853438255278034`*^9}, {3.6853439328389406`*^9, 3.685343938170246*^9}, {3.685348904793648*^9, 3.6853489098836555`*^9}, { 3.6859402067284327`*^9, 3.6859402438984847`*^9}, {3.6868244654612103`*^9, 3.686824488311242*^9}, {3.6868252329422846`*^9, 3.686825255772317*^9}, { 3.686825413982538*^9, 3.686825414442539*^9}, {3.686826512264076*^9, 3.6868265521841316`*^9}, {3.68682718670502*^9, 3.686827213915058*^9}, { 3.686828016566182*^9, 3.686828033276205*^9}, {3.687097869260163*^9, 3.687097935440255*^9}, {3.6870980229203777`*^9, 3.6870980233203783`*^9}, { 3.6870980591704283`*^9, 3.6870980676004405`*^9}, {3.7187137473195257`*^9, 3.7187138038023973`*^9}, {3.845360477272686*^9, 3.8453604822902565`*^9}, { 3.8453605493063335`*^9, 3.8453606192690086`*^9}, {3.845361215324304*^9, 3.845361235361309*^9}, {3.8453612848041935`*^9, 3.84536128532181*^9}}, CellLabel-> "In[352]:=",ExpressionUUID->"fc2d0584-5a25-40ce-81c7-0c31d1706b5e"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 3.9 (beam truss)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430753426703997`*^9, 3.4430753634028*^9}, 3.4430770141963997`*^9, 3.443078562593*^9, 3.47426035293174*^9, {3.5999975220450125`*^9, 3.599997523027814*^9}, 3.5999978261987467`*^9, {3.686828145056362*^9, 3.686828151906371*^9}, {3.7493463023636312`*^9, 3.749346303248435*^9}, 3.7816768644688873`*^9, 3.8136545839648857`*^9},ExpressionUUID->"8f056d97-bb18-4e32-95ff-\ cf93d0225084"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"\[Rho]", " ", "g", " ", "A"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"\[Rho]", " ", "g", " ", "A"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "4"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"\[Rho]", " ", "g", " ", "A"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"5", ",", "6"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "4", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "4", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "4", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "4", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "4", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "5", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"Simplify", "[", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "]"}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430753715772*^9, 3.4430754825088*^9}, { 3.4430755569208*^9, 3.4430756008816*^9}, {3.4430770228856*^9, 3.4430770663784*^9}, {3.4430771036935997`*^9, 3.4430771281387997`*^9}, { 3.4430774685931997`*^9, 3.4430774744588003`*^9}, {3.4430786065694*^9, 3.4430786485334*^9}, {3.4430786870186*^9, 3.4430787461582003`*^9}, { 3.4430787802130003`*^9, 3.4430788653578*^9}, 3.4431079599828*^9, 3.5692966782991695`*^9, {3.6309954787266397`*^9, 3.6309956503614564`*^9}, 3.630995762997899*^9, {3.630999594239033*^9, 3.6309996892864695`*^9}, { 3.630999729315759*^9, 3.6309998368659105`*^9}, {3.6309998709188585`*^9, 3.630999874489063*^9}, {3.631017698615719*^9, 3.6310178109671164`*^9}, 3.6310178626656065`*^9, {3.631428859525638*^9, 3.631428859837639*^9}, { 3.6314291231505013`*^9, 3.631429127019308*^9}, {3.663046895293263*^9, 3.663046912437693*^9}, 3.685282416044037*^9, {3.6852824488640823`*^9, 3.685282651514366*^9}, {3.6852827328444805`*^9, 3.6852827420044928`*^9}, { 3.6853439657068205`*^9, 3.685344025975268*^9}, {3.6853489200336695`*^9, 3.685348933904689*^9}, {3.685943614752954*^9, 3.685943675113406*^9}, 3.685943708622323*^9, {3.6859438982451687`*^9, 3.68594390368748*^9}, 3.6876683717940345`*^9, {3.718713833599187*^9, 3.7187138842394447`*^9}, { 3.845361812273614*^9, 3.8453618159642878`*^9}}, CellLabel-> "In[356]:=",ExpressionUUID->"cdf1f289-c316-4a9f-82cf-8f0d6e0d6b69"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 3.10 (point constraint)", "Subsubsection", CellChangeTimes->{{3.4736023870954*^9, 3.4736023880782003`*^9}, { 3.686803133189881*^9, 3.68680313979989*^9}, {3.6877787360664816`*^9, 3.687778744516493*^9}, {3.749366529547693*^9, 3.7493665407000628`*^9}, 3.781676870034504*^9, 3.8136545863810463`*^9},ExpressionUUID->"9e959ea2-867d-4525-882b-\ d29e5e0dc1e2"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["8"], " ", "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "F"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "1", "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "3", "}"}], "]"}]}], "}"}]}], " ", "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "1", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "3", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.6306600640614586`*^9, 3.6306601546040177`*^9}, { 3.6308456164378166`*^9, 3.6308456316986895`*^9}, {3.6308456981184883`*^9, 3.6308457129413366`*^9}, {3.685264921820752*^9, 3.6852649870208435`*^9}, 3.685267316524104*^9, {3.6853473969490767`*^9, 3.6853474174332485`*^9}, { 3.6858513146140566`*^9, 3.6858513498080697`*^9}, {3.6858514489307394`*^9, 3.68585149492937*^9}, {3.6858571778094125`*^9, 3.6858571864289055`*^9}, { 3.685857242402107*^9, 3.6858572478604193`*^9}, {3.685948918693322*^9, 3.6859489357472973`*^9}, {3.686803185749954*^9, 3.6868031866399555`*^9}, 3.68707467207323*^9, {3.687778757126511*^9, 3.6877787923465605`*^9}, { 3.6877788333266177`*^9, 3.6877788818766856`*^9}, {3.71871405291953*^9, 3.718714054088386*^9}, 3.749366549214879*^9, {3.813654820759766*^9, 3.813654831326769*^9}, {3.845361932934987*^9, 3.8453619368995056`*^9}, { 3.845699606178213*^9, 3.8456996129982157`*^9}}, CellLabel-> "In[362]:=",ExpressionUUID->"9ef4f1ca-b072-4104-aced-6fa259c0807b"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 1 (bar truss)", "Subsubsection", CellChangeTimes->{ 3.4736023951294003`*^9, 3.5687155591174793`*^9, 3.568715646113632*^9, { 3.568716073023982*^9, 3.5687160780315914`*^9}, {3.6872515142536955`*^9, 3.687251559133758*^9}, {3.7493853842792377`*^9, 3.749385399047465*^9}, { 3.7816769041974754`*^9, 3.7816769113974466`*^9}},ExpressionUUID->"a7855b87-1ae7-4316-a2ce-\ b4bd78a4299d"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["2"], " ", "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "F"}], ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", RowBox[{"uY", "[", "2", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.5687160920248156`*^9, 3.568716257291506*^9}, { 3.568716289255962*^9, 3.568716380609722*^9}, 3.568716503662739*^9, { 3.599475236864607*^9, 3.599475237098607*^9}, {3.599475354598014*^9, 3.5994754053605027`*^9}, {3.599475436248557*^9, 3.5994754807398353`*^9}, { 3.6307389947268867`*^9, 3.6307390535077896`*^9}, {3.6309861131038904`*^9, 3.6309862682907667`*^9}, {3.631424558159581*^9, 3.6314245891256356`*^9}, { 3.6624552319422064`*^9, 3.662455237062499*^9}, {3.6852667663533344`*^9, 3.68526684171344*^9}, {3.6852668915235095`*^9, 3.685266923413554*^9}, 3.685267343854143*^9, {3.6852713069429655`*^9, 3.685271332453001*^9}, { 3.6853478384253273`*^9, 3.6853478599305573`*^9}, {3.6853479070492525`*^9, 3.6853479227451506`*^9}, {3.6853479836976366`*^9, 3.685348000436594*^9}, { 3.6853487750034666`*^9, 3.685348793453492*^9}, {3.687251613563834*^9, 3.6872516458438797`*^9}, {3.6872517360540056`*^9, 3.6872517559340334`*^9}, {3.687251801344097*^9, 3.6872518129341135`*^9}, 3.687764819992582*^9, {3.7187068450918727`*^9, 3.7187068734418435`*^9}, { 3.7187069097555704`*^9, 3.7187069975866556`*^9}, {3.718707088907159*^9, 3.71870714984157*^9}, {3.718711566072616*^9, 3.718711566742806*^9}, { 3.7187116422917643`*^9, 3.7187116668400583`*^9}, {3.7493854176413813`*^9, 3.7493854269178114`*^9}, 3.78168233935231*^9, {3.845362733935738*^9, 3.8453627382703094`*^9}}, CellLabel-> "In[386]:=",ExpressionUUID->"551071de-b6ed-44ef-9cb5-e69458ea2268"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 2 (bar truss)", "Subsubsection", CellChangeTimes->{{3.4730556702200003`*^9, 3.473055683948*^9}, 3.473056485032*^9, {3.473057468587*^9, 3.4730574820360003`*^9}, { 3.473057735322*^9, 3.473057757075*^9}, {3.568116343591286*^9, 3.568116350923299*^9}, 3.599225584082209*^9, {3.686233658714576*^9, 3.68623369003462*^9}, {3.686881649358395*^9, 3.6868816504583964`*^9}, 3.6868819874788685`*^9, 3.7493858614730363`*^9, 3.7816769427733235`*^9},ExpressionUUID->"1d3efc12-5fa4-4c21-964c-\ eb635efd5985"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"-", "F"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "1", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "0", ",", SqrtBox["3"]}], "}"}], " ", RowBox[{"L", "/", "2"}]}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "1", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", SqrtBox["3"]}], "}"}], " ", RowBox[{"L", "/", "2"}]}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4426465840284452`*^9, 3.4426465892856455`*^9}, { 3.442646804859646*^9, 3.442646838774046*^9}, {3.473055767227*^9, 3.473055823053*^9}, {3.47305586863*^9, 3.4730558989110003`*^9}, { 3.47305599471*^9, 3.473056042217*^9}, {3.473056097182*^9, 3.473056121572*^9}, {3.473056174692*^9, 3.4730561975290003`*^9}, 3.5681165293612137`*^9, {3.63037058052431*^9, 3.630370666324461*^9}, { 3.6307483146155734`*^9, 3.6307483403244185`*^9}, 3.630748616273303*^9, 3.6308127119819813`*^9, {3.6852627002976418`*^9, 3.68526276365773*^9}, { 3.6852628237278147`*^9, 3.6852628743278856`*^9}, {3.685262904467928*^9, 3.6852629096179347`*^9}, 3.6852671878639245`*^9, {3.6852715879533587`*^9, 3.6852715933433666`*^9}, {3.6853468730631123`*^9, 3.685346888050969*^9}, { 3.6858762295833893`*^9, 3.6858762316433926`*^9}, {3.6862253153841467`*^9, 3.6862253158941474`*^9}, 3.6876683812140474`*^9, {3.7187140960610323`*^9, 3.718714111077124*^9}, 3.749385868033883*^9, {3.845362764372017*^9, 3.8453627744833603`*^9}}, CellLabel-> "In[347]:=",ExpressionUUID->"44fbae9f-4eaa-46bb-92bf-94172ce4786a"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 3 (bar truss)", "Subsubsection", CellChangeTimes->{ 3.4736023951294003`*^9, 3.5687155591174793`*^9, 3.568715646113632*^9, { 3.6868815758482924`*^9, 3.6868815760982924`*^9}, 3.686889220472929*^9, 3.7493874890874653`*^9, 3.781682296463123*^9, {3.781855276358662*^9, 3.781855276717953*^9}},ExpressionUUID->"69deffae-3ee5-46de-a1e7-\ 7ca7074aa3c7"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"4", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "4"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["8"], "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["8"], "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"4", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"-", "F"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.5994903546532145`*^9, 3.599490364216031*^9}, 3.6307213590619316`*^9, {3.630738624865837*^9, 3.6307387491980553`*^9}, { 3.6309858428724337`*^9, 3.6309858564292097`*^9}, {3.631423808625065*^9, 3.6314238370015144`*^9}, {3.6314238762667837`*^9, 3.631423951630516*^9}, { 3.631423984484174*^9, 3.631424057866702*^9}, {3.6314241085043917`*^9, 3.631424138362844*^9}, {3.631424437181369*^9, 3.631424444825382*^9}, { 3.6624550109105644`*^9, 3.6624550264764547`*^9}, {3.6852657216818714`*^9, 3.6852658115519977`*^9}, 3.6852658527220554`*^9, {3.685265899842121*^9, 3.6852659078121324`*^9}, {3.685266411802838*^9, 3.6852664266628585`*^9}, { 3.685266991293649*^9, 3.6852669921236506`*^9}, 3.6852673254041166`*^9, { 3.6852721451041393`*^9, 3.6852721511541476`*^9}, {3.685347608884199*^9, 3.6853476436001844`*^9}, {3.685856536245717*^9, 3.68585657196576*^9}, { 3.6872505724123764`*^9, 3.6872506068524246`*^9}, {3.6882143713671103`*^9, 3.6882143753371153`*^9}, {3.718714239126111*^9, 3.718714247335117*^9}, 3.7493875056264477`*^9, {3.782207206093835*^9, 3.782207237947917*^9}, { 3.7822072797858024`*^9, 3.78220728040416*^9}, {3.845362853947798*^9, 3.845362876601143*^9}}, CellLabel-> "In[394]:=",ExpressionUUID->"b1da8e1b-33a8-4ac5-bbcb-66e4dca7d5fa"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 4 (bar truss)", "Subsubsection", CellChangeTimes->{ 3.4736023963929996`*^9, 3.5687155615354834`*^9, 3.568715777809064*^9, { 3.687250675582521*^9, 3.6872506759525213`*^9}, 3.7493875867204103`*^9, 3.7816769485483294`*^9},ExpressionUUID->"34075cb1-343c-460a-88c4-\ 68ec0be886b4"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{"2", "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["8"], "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["8"], "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"-", "F"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "3", "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"-", "F"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "3", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.599490402935299*^9, 3.5994904112657137`*^9}, { 3.630738792534931*^9, 3.6307388569162445`*^9}, {3.6309859554658737`*^9, 3.630985968173601*^9}, {3.6314241627612867`*^9, 3.6314241702181*^9}, { 3.6314243851708775`*^9, 3.631424417384934*^9}, {3.662455117671671*^9, 3.6624551241230392`*^9}, {3.6852660658523536`*^9, 3.6852661629124894`*^9}, {3.6852663857928014`*^9, 3.6852663863328023`*^9}, 3.685266998253659*^9, 3.685267330414124*^9, {3.6852721611941614`*^9, 3.6852721665141687`*^9}, {3.685347693925063*^9, 3.6853477037476244`*^9}, { 3.6858561611452627`*^9, 3.685856189500884*^9}, {3.6872507131125736`*^9, 3.687250713872575*^9}, {3.6872507814626694`*^9, 3.687250785882675*^9}, 3.687250849802765*^9, {3.6882124939886236`*^9, 3.688212526268669*^9}, { 3.688214301197012*^9, 3.6882143190670366`*^9}, {3.688214395877144*^9, 3.6882144046271563`*^9}, {3.7187143026380863`*^9, 3.71871430527354*^9}, { 3.749387640068871*^9, 3.749387820647795*^9}, {3.749387863815189*^9, 3.7493878663924637`*^9}, {3.7493883843112373`*^9, 3.7493884004782734`*^9}, {3.845362911118657*^9, 3.845362919444826*^9}}, CellLabel-> "In[398]:=",ExpressionUUID->"f0249bc9-fd9b-48c5-96c0-c59262c1a265"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 5 (bar truss)", "Subsubsection", CellChangeTimes->{ 3.4736023963929996`*^9, 3.5687155615354834`*^9, 3.568715777809064*^9, { 3.687250675582521*^9, 3.6872506759525213`*^9}, {3.7493885566704636`*^9, 3.749388557692619*^9}, 3.7816769522847013`*^9},ExpressionUUID->"2ecac3f2-aa6f-4ad4-870f-\ 9b8b101e5711"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "F", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "F", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SLIDER", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", "0"}], "}"}], "/", RowBox[{"Sqrt", "[", "2", "]"}]}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", RowBox[{"-", RowBox[{"uX", "[", "2", "]"}]}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", RowBox[{"uY", "[", "2", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.599490402935299*^9, 3.5994904112657137`*^9}, { 3.630738792534931*^9, 3.6307388569162445`*^9}, {3.6309859554658737`*^9, 3.630985968173601*^9}, {3.6314241627612867`*^9, 3.6314241702181*^9}, { 3.6314243851708775`*^9, 3.631424417384934*^9}, {3.662455117671671*^9, 3.6624551241230392`*^9}, {3.6852660658523536`*^9, 3.6852661629124894`*^9}, {3.6852663857928014`*^9, 3.6852663863328023`*^9}, 3.685266998253659*^9, 3.685267330414124*^9, {3.6852721611941614`*^9, 3.6852721665141687`*^9}, {3.685347693925063*^9, 3.6853477037476244`*^9}, { 3.6858561611452627`*^9, 3.685856189500884*^9}, {3.6872507131125736`*^9, 3.687250713872575*^9}, {3.6872507814626694`*^9, 3.687250785882675*^9}, 3.687250849802765*^9, {3.6882124939886236`*^9, 3.688212526268669*^9}, { 3.688214301197012*^9, 3.6882143190670366`*^9}, {3.688214395877144*^9, 3.6882144046271563`*^9}, {3.7187143026380863`*^9, 3.71871430527354*^9}, { 3.7493885757300124`*^9, 3.749388577063839*^9}, {3.8166566373302507`*^9, 3.816656656323975*^9}, {3.8166567346888385`*^9, 3.81665677931625*^9}, { 3.8453626655378747`*^9, 3.8453626796353817`*^9}}, CellLabel-> "In[366]:=",ExpressionUUID->"3fb9607b-d3e9-4d08-87bd-7a07c360ecb9"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 6 (beam)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430866035033803`*^9, 3.4430866067013803`*^9}, 3.4742603622347393`*^9, { 3.47426082029274*^9, 3.4742608300977397`*^9}, {3.4742616255317397`*^9, 3.4742616631637397`*^9}, 3.47426171431174*^9, {3.569295755520348*^9, 3.569295758265953*^9}, {3.5999975352114353`*^9, 3.5999975364126377`*^9}, { 3.687250942322894*^9, 3.6872509424328947`*^9}, 3.7493906502671795`*^9, 3.7816769550324354`*^9},ExpressionUUID->"b19a534b-2312-4895-849e-\ 69e797be3684"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "M", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430866305537806`*^9, 3.44308673150138*^9}, { 3.4742604996717396`*^9, 3.47426061596974*^9}, 3.4742609854677396`*^9, 3.569295818310458*^9, 3.569295934780263*^9, {3.631161797385408*^9, 3.63116192958797*^9}, 3.6311621282873344`*^9, {3.6314096475812645`*^9, 3.6314096645540943`*^9}, 3.63140970193176*^9, {3.6314296672834578`*^9, 3.6314296732582684`*^9}, {3.6314297131943383`*^9, 3.631429723193956*^9}, { 3.6320283190146666`*^9, 3.6320283335070925`*^9}, {3.632028523936627*^9, 3.632028541689458*^9}, {3.6630475834142756`*^9, 3.6630475933982935`*^9}, { 3.685322391232018*^9, 3.685322396442025*^9}, {3.685322434252078*^9, 3.68532247101213*^9}, {3.6853440662625723`*^9, 3.685344095349236*^9}, { 3.6853489765747485`*^9, 3.6853489802747536`*^9}, {3.686826095733493*^9, 3.686826105143506*^9}, {3.6868399051501155`*^9, 3.686839921990139*^9}, { 3.688054329935155*^9, 3.6880543382251663`*^9}, {3.6880543698252106`*^9, 3.6880543877752357`*^9}, {3.6882145325073357`*^9, 3.6882145399873457`*^9}, {3.7187143215901136`*^9, 3.718714353277379*^9}, { 3.8456999632819347`*^9, 3.845699968724377*^9}}, CellLabel-> "In[373]:=",ExpressionUUID->"b236ba7e-762b-4859-8461-9e7a328c2d40"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 7 (beam truss)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430753426703997`*^9, 3.4430753634028*^9}, 3.4430770141963997`*^9, 3.443078562593*^9, {3.44308802647058*^9, 3.44308802862338*^9}, 3.4430884864209805`*^9, 3.4742603666167393`*^9, {3.4742616726697397`*^9, 3.4742616806897397`*^9}, {3.5692958958737946`*^9, 3.5692958988377995`*^9}, {3.569295988881158*^9, 3.569296010034795*^9}, { 3.599997563962286*^9, 3.5999975662086897`*^9}, {3.635944639658203*^9, 3.6359446423103547`*^9}, {3.6872515556737533`*^9, 3.6872515618937616`*^9}, {3.7494429231128583`*^9, 3.749442927280027*^9}, 3.7816769582607045`*^9},ExpressionUUID->"24e2890b-0a21-4cc4-9fc8-\ 456ed897be58"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"-", "f"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}], "]"}]}], "}"}]}], "\[IndentingNewLine]", "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "1", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430753715772*^9, 3.4430754825088*^9}, { 3.4430755569208*^9, 3.4430756008816*^9}, {3.4430770228856*^9, 3.4430770663784*^9}, {3.4430771036935997`*^9, 3.4430771281387997`*^9}, { 3.4430774685931997`*^9, 3.4430774744588003`*^9}, {3.4430786065694*^9, 3.4430786485334*^9}, {3.4430786870186*^9, 3.4430787461582003`*^9}, { 3.4430787802130003`*^9, 3.4430788653578*^9}, {3.44308803709418*^9, 3.44308814382938*^9}, 3.4430882520621805`*^9, {3.4430884926765804`*^9, 3.44308853431298*^9}, {3.44308857312578*^9, 3.44308861465298*^9}, { 3.44308875174578*^9, 3.44308883367698*^9}, {3.4430978705394*^9, 3.4430978736282*^9}, {3.4430979277134*^9, 3.4430979393822002`*^9}, { 3.4430980508598003`*^9, 3.4430980872702*^9}, 3.4430981291562*^9, { 3.443098164381*^9, 3.4430981837406*^9}, {3.47426170283774*^9, 3.4742617248677397`*^9}, {3.47426180789874*^9, 3.4742618173147397`*^9}, { 3.4742623531727395`*^9, 3.4742624016047397`*^9}, {3.47426320292614*^9, 3.4742632403381395`*^9}, {3.569296019192011*^9, 3.569296028832828*^9}, { 3.599998933913494*^9, 3.5999989383751016`*^9}, {3.631179114639793*^9, 3.63117926267826*^9}, {3.631594676962658*^9, 3.631594703420171*^9}, { 3.6315947654477186`*^9, 3.6315949120251026`*^9}, {3.6319316650810413`*^9, 3.6319318058040905`*^9}, 3.631931866615568*^9, {3.631932062036746*^9, 3.6319321508758273`*^9}, 3.6319322156545324`*^9, {3.663049740177524*^9, 3.663049740520725*^9}, {3.6630708620753193`*^9, 3.6630709010635495`*^9}, { 3.663070971023551*^9, 3.6630709989571486`*^9}, {3.6630713421047754`*^9, 3.663071385178239*^9}, {3.6630714466947575`*^9, 3.6630716997112293`*^9}, { 3.663071741692631*^9, 3.663071747530965*^9}, 3.663071826754496*^9, { 3.6630719093082175`*^9, 3.6630719334786005`*^9}, 3.6630720004264297`*^9, { 3.6630720439119167`*^9, 3.6630720452399926`*^9}, 3.6630722046621113`*^9, { 3.663072316609514*^9, 3.6630723357796106`*^9}, {3.663072507915456*^9, 3.663072508611496*^9}, 3.663072547565724*^9, 3.663073113769109*^9, { 3.6853229445327926`*^9, 3.6853230210528994`*^9}, {3.685323056282949*^9, 3.685323161783097*^9}, {3.685323269123247*^9, 3.685323355603368*^9}, { 3.6872530244958096`*^9, 3.687253101975918*^9}, {3.6872531330459614`*^9, 3.6872531935960464`*^9}, {3.7187117249668584`*^9, 3.718711833531047*^9}, { 3.8456999867368574`*^9, 3.845699988317232*^9}}, CellLabel-> "In[377]:=",ExpressionUUID->"dc895954-169a-4750-915b-f41ccda83ab0"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 8 (beam truss)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430753426703997`*^9, 3.4430753634028*^9}, 3.4430770141963997`*^9, 3.443078562593*^9, {3.44308802647058*^9, 3.44308802862338*^9}, 3.4742603649457397`*^9, {3.4742608481977396`*^9, 3.4742608866137395`*^9}, 3.47426161741074*^9, 3.4742616748697395`*^9, {3.4742617107707396`*^9, 3.4742617173167396`*^9}, {3.5692958422565002`*^9, 3.5692958450801053`*^9}, 3.663048262506669*^9, {3.685948886979508*^9, 3.6859488903577013`*^9}, { 3.6872510527730494`*^9, 3.687251057193055*^9}, {3.687251252123328*^9, 3.687251252683329*^9}, 3.7494431297541704`*^9, 3.7816769660781703`*^9},ExpressionUUID->"c3667a68-e7ca-4291-ac9d-\ 18e6c38e4d5f"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "f"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"4", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.6877640444614964`*^9, 3.6877641212116036`*^9}, { 3.68776429001184*^9, 3.687764295701848*^9}, {3.6877647461124783`*^9, 3.6877647522624865`*^9}, {3.7187144116052017`*^9, 3.7187144126379457`*^9}, 3.749443209431106*^9, {3.7494432660394864`*^9, 3.7494432878126545`*^9}, { 3.7494433209622188`*^9, 3.7494433235707397`*^9}, {3.749443371414667*^9, 3.749443441324872*^9}, {3.78168238511827*^9, 3.7816823960986876`*^9}, 3.845700011022395*^9},ExpressionUUID->"b776746e-6d49-4706-9119-\ 39097822d53f"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 9 (beam truss)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430753426703997`*^9, 3.4430753634028*^9}, 3.4430770141963997`*^9, 3.443078562593*^9, {3.44308802647058*^9, 3.44308802862338*^9}, 3.4430884864209805`*^9, 3.4742603666167393`*^9, {3.4742616726697397`*^9, 3.4742616806897397`*^9}, {3.5692958958737946`*^9, 3.5692958988377995`*^9}, {3.5999975569734735`*^9, 3.5999975589390774`*^9}, 3.6320291512877293`*^9, 3.6630482160341873`*^9, {3.6872512710533547`*^9, 3.687251271243355*^9}, 3.7494436416646442`*^9, 3.781676963693055*^9},ExpressionUUID->"51d131ee-67a9-4636-ad9d-\ 13a98091f5d8"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", RowBox[{"-", "M"}], ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430753715772*^9, 3.4430754825088*^9}, { 3.4430755569208*^9, 3.4430756008816*^9}, {3.4430770228856*^9, 3.4430770663784*^9}, {3.4430771036935997`*^9, 3.4430771281387997`*^9}, { 3.4430774685931997`*^9, 3.4430774744588003`*^9}, {3.4430786065694*^9, 3.4430786485334*^9}, {3.4430786870186*^9, 3.4430787461582003`*^9}, { 3.4430787802130003`*^9, 3.4430788653578*^9}, {3.44308803709418*^9, 3.44308814382938*^9}, 3.4430882520621805`*^9, {3.4430884926765804`*^9, 3.44308853431298*^9}, {3.44308857312578*^9, 3.44308861465298*^9}, { 3.44308875174578*^9, 3.44308883367698*^9}, {3.4430978705394*^9, 3.4430978736282*^9}, {3.4430979277134*^9, 3.4430979393822002`*^9}, { 3.4430980508598003`*^9, 3.4430980872702*^9}, 3.4430981291562*^9, { 3.443098164381*^9, 3.4430981837406*^9}, {3.47426170283774*^9, 3.4742617248677397`*^9}, {3.47426180789874*^9, 3.4742618173147397`*^9}, { 3.4742623531727395`*^9, 3.4742624016047397`*^9}, {3.47426320292614*^9, 3.4742632403381395`*^9}, {3.63117887908932*^9, 3.6311790673070855`*^9}, { 3.663048219091793*^9, 3.663048228171009*^9}, {3.6853228270926285`*^9, 3.6853228859927106`*^9}, {3.6853491659460135`*^9, 3.685349196806057*^9}, { 3.6868259927133484`*^9, 3.6868260462534237`*^9}, {3.686830047369025*^9, 3.6868301292391396`*^9}, {3.687251266343348*^9, 3.687251327153433*^9}, { 3.687251385463515*^9, 3.687251409943549*^9}, {3.7187144321161523`*^9, 3.7187144467486267`*^9}, {3.8457000367767353`*^9, 3.845700041904211*^9}},ExpressionUUID->"ff57579f-0e2f-4e31-bcea-\ 67385387fd87"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 10 (beam truss)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430753426703997`*^9, 3.4430753634028*^9}, 3.4430770141963997`*^9, 3.443078562593*^9, {3.44308802647058*^9, 3.44308802862338*^9}, 3.4742603649457397`*^9, {3.4742608481977396`*^9, 3.4742608866137395`*^9}, 3.47426161741074*^9, 3.4742616748697395`*^9, {3.4742617107707396`*^9, 3.4742617173167396`*^9}, {3.5692958422565002`*^9, 3.5692958450801053`*^9}, 3.663048262506669*^9, {3.685948886979508*^9, 3.6859488903577013`*^9}, { 3.6872510527730494`*^9, 3.687251057193055*^9}, {3.687251252123328*^9, 3.687251252683329*^9}, 3.7494431297541704`*^9, {3.749443719210291*^9, 3.7494437193642616`*^9}, 3.7816769685235043`*^9},ExpressionUUID->"7d514fff-755c-4326-b3ec-\ de636c4f38e0"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"-", "\[Rho]"}], " ", "g", " ", "A"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]", ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", "2", "]"}], ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", RowBox[{"\[Theta]Z", "[", "2", "]"}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.6877640444614964`*^9, 3.6877641212116036`*^9}, { 3.68776429001184*^9, 3.687764295701848*^9}, {3.6877647461124783`*^9, 3.6877647522624865`*^9}, {3.7187144116052017`*^9, 3.7187144126379457`*^9}, 3.749443209431106*^9, {3.7494432660394864`*^9, 3.7494432878126545`*^9}, { 3.7494433209622188`*^9, 3.7494433235707397`*^9}, {3.749443371414667*^9, 3.749443441324872*^9}, {3.7494437336634946`*^9, 3.7494439431297536`*^9}, { 3.7827239867413025`*^9, 3.7827239949775324`*^9}, {3.8457000545682287`*^9, 3.845700056399582*^9}}, CellLabel-> "In[381]:=",ExpressionUUID->"989079bc-533a-4008-80a6-d713153961a5"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 1 (bar truss)", "Subsubsection", CellChangeTimes->{ 3.4736023951294003`*^9, 3.5687155591174793`*^9, 3.568715646113632*^9, { 3.568716073023982*^9, 3.5687160780315914`*^9}, {3.6872515142536955`*^9, 3.687251559133758*^9}, {3.7493853842792377`*^9, 3.749385399047465*^9}, { 3.749441796531228*^9, 3.7494418003813972`*^9}},ExpressionUUID->"057d9994-ce67-4ba2-a08b-\ e7b213affa90"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["2"], " ", "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["2"], " ", "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "F"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "L"}], ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "L"}], ",", "0", ",", RowBox[{"-", "L"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.5687160920248156`*^9, 3.568716257291506*^9}, { 3.568716289255962*^9, 3.568716380609722*^9}, 3.568716503662739*^9, { 3.599475236864607*^9, 3.599475237098607*^9}, {3.599475354598014*^9, 3.5994754053605027`*^9}, {3.599475436248557*^9, 3.5994754807398353`*^9}, { 3.6307389947268867`*^9, 3.6307390535077896`*^9}, {3.6309861131038904`*^9, 3.6309862682907667`*^9}, {3.631424558159581*^9, 3.6314245891256356`*^9}, { 3.6624552319422064`*^9, 3.662455237062499*^9}, {3.6852667663533344`*^9, 3.68526684171344*^9}, {3.6852668915235095`*^9, 3.685266923413554*^9}, 3.685267343854143*^9, {3.6852713069429655`*^9, 3.685271332453001*^9}, { 3.6853478384253273`*^9, 3.6853478599305573`*^9}, {3.6853479070492525`*^9, 3.6853479227451506`*^9}, {3.6853479836976366`*^9, 3.685348000436594*^9}, { 3.6853487750034666`*^9, 3.685348793453492*^9}, {3.687251613563834*^9, 3.6872516458438797`*^9}, {3.6872517360540056`*^9, 3.6872517559340334`*^9}, {3.687251801344097*^9, 3.6872518129341135`*^9}, 3.687764819992582*^9, {3.7187068450918727`*^9, 3.7187068734418435`*^9}, { 3.7187069097555704`*^9, 3.7187069975866556`*^9}, {3.718707088907159*^9, 3.71870714984157*^9}, {3.718711566072616*^9, 3.718711566742806*^9}, { 3.7187116422917643`*^9, 3.7187116668400583`*^9}, {3.7493854176413813`*^9, 3.7493854269178114`*^9}, {3.749441819700017*^9, 3.7494419245989656`*^9}, 3.749441965485881*^9, 3.7819357730749607`*^9, {3.781935902267897*^9, 3.781936097661247*^9}, {3.7819362376254654`*^9, 3.7819362513074417`*^9}, { 3.7821146778259783`*^9, 3.7821146832883797`*^9}, 3.7821148222050138`*^9, { 3.81372032663393*^9, 3.8137204768311405`*^9}, {3.845362986582768*^9, 3.8453629917298937`*^9}}, CellLabel-> "In[385]:=",ExpressionUUID->"ae24aa20-f777-4f79-bdb4-5ec5debd5f88"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 2 (beam)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430753426703997`*^9, 3.4430753634028*^9}, 3.4430770141963997`*^9, 3.443078562593*^9, {3.44308802647058*^9, 3.44308802862338*^9}, 3.4742603649457397`*^9, {3.4742608481977396`*^9, 3.4742608866137395`*^9}, 3.47426161741074*^9, 3.4742616748697395`*^9, {3.4742617107707396`*^9, 3.4742617173167396`*^9}, {3.5692958422565002`*^9, 3.5692958450801053`*^9}, 3.663048262506669*^9, {3.685948886979508*^9, 3.6859488903577013`*^9}, { 3.6872510527730494`*^9, 3.687251057193055*^9}, {3.687251252123328*^9, 3.687251252683329*^9}, 3.7494431297541704`*^9, {3.7496252817526307`*^9, 3.749625294704818*^9}},ExpressionUUID->"31d3c914-ad8c-4041-8d85-\ 4116b386c82c"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", RowBox[{"-", "M"}], ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "1", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.6877640444614964`*^9, 3.6877641212116036`*^9}, { 3.68776429001184*^9, 3.687764295701848*^9}, {3.6877647461124783`*^9, 3.6877647522624865`*^9}, {3.7187144116052017`*^9, 3.7187144126379457`*^9}, 3.749443209431106*^9, {3.7494432660394864`*^9, 3.7494432878126545`*^9}, { 3.7494433209622188`*^9, 3.7494433235707397`*^9}, {3.749443371414667*^9, 3.749443441324872*^9}, 3.749625313401537*^9, {3.7496253451809697`*^9, 3.749625417524017*^9}, {3.7496254522709665`*^9, 3.74962545677078*^9}, { 3.7819356043819237`*^9, 3.781935701558897*^9}, {3.782114562195193*^9, 3.782114574586345*^9}, 3.782114607612635*^9, {3.8136570960177746`*^9, 3.8136571489819956`*^9}, {3.8453630029597063`*^9, 3.845363010391796*^9}},ExpressionUUID->"d7cab793-9905-42f1-8bae-\ 49952542829c"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 3 (bar truss)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430753426703997`*^9, 3.4430753634028*^9}, 3.4430770141963997`*^9, 3.443078562593*^9, {3.44308802647058*^9, 3.44308802862338*^9}, 3.4742603649457397`*^9, {3.4742608481977396`*^9, 3.4742608866137395`*^9}, 3.47426161741074*^9, 3.4742616748697395`*^9, {3.4742617107707396`*^9, 3.4742617173167396`*^9}, {3.5692958422565002`*^9, 3.5692958450801053`*^9}, 3.663048262506669*^9, {3.685948886979508*^9, 3.6859488903577013`*^9}, { 3.6872510527730494`*^9, 3.687251057193055*^9}, {3.687251252123328*^9, 3.687251252683329*^9}, 3.7494431297541704`*^9, {3.7496255621832447`*^9, 3.749625567303492*^9}, 3.7496260184131355`*^9, {3.781934826920578*^9, 3.7819348290625043`*^9}},ExpressionUUID->"f2346b90-9287-409f-9ef4-\ 6a1ce3467767"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["2"], "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"4", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "F"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "3", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "3", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.6877640444614964`*^9, 3.6877641212116036`*^9}, { 3.68776429001184*^9, 3.687764295701848*^9}, {3.6877647461124783`*^9, 3.6877647522624865`*^9}, {3.7187144116052017`*^9, 3.7187144126379457`*^9}, 3.749443209431106*^9, {3.7494432660394864`*^9, 3.7494432878126545`*^9}, { 3.7494433209622188`*^9, 3.7494433235707397`*^9}, {3.749443371414667*^9, 3.749443441324872*^9}, {3.7496256029666557`*^9, 3.74962560339828*^9}, { 3.7496256462863684`*^9, 3.7496256617061005`*^9}, {3.749625698223307*^9, 3.749625698650595*^9}, {3.7496258460992556`*^9, 3.749625873243788*^9}, { 3.749625970041043*^9, 3.7496259850327396`*^9}, {3.750742978267426*^9, 3.750742986015613*^9}, {3.7819348572480297`*^9, 3.7819350625944786`*^9}, { 3.8453630223965406`*^9, 3.8453630232233286`*^9}, {3.8453630619513955`*^9, 3.8453630781973004`*^9}}, CellLabel-> "In[402]:=",ExpressionUUID->"5ea9fcfc-5960-473f-9878-186ad9c8c6b8"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture assignment 1 (bar)", "Subsubsection", CellChangeTimes->{ 3.4736023951294003`*^9, 3.5687155591174793`*^9, 3.568715646113632*^9, { 3.568716073023982*^9, 3.5687160780315914`*^9}, {3.6872515142536955`*^9, 3.687251559133758*^9}, {3.7493853842792377`*^9, 3.749385399047465*^9}, { 3.749441796531228*^9, 3.7494418003813972`*^9}, {3.813895485422243*^9, 3.8138954899663353`*^9}},ExpressionUUID->"c0f72b1a-59d4-4e57-8c89-\ 28180830e03b"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["8"], " ", "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["8"], " ", "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["8"], " ", "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "4"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{ SqrtBox["8"], " ", "A"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "5"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "F", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "1", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", RowBox[{"uY", "[", "1", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "L"}], ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", RowBox[{"uY", "[", "2", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "L"}], ",", RowBox[{"-", "L"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", RowBox[{"uY", "[", "3", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", RowBox[{"-", "L"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "4", "]"}], ",", RowBox[{"uY", "[", "4", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "5", "]"}], ",", RowBox[{"uY", "[", "5", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ELEMENTFORM", "[", RowBox[{"{", RowBox[{ RowBox[{"ele", "[", RowBox[{"[", RowBox[{"2", ";;", "2"}], "]"}], "]"}], ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"ELEMENTFORM", "[", RowBox[{"{", RowBox[{ RowBox[{"ele", "[", RowBox[{"[", RowBox[{"3", ";;", "3"}], "]"}], "]"}], ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.5687160920248156`*^9, 3.568716257291506*^9}, { 3.568716289255962*^9, 3.568716380609722*^9}, 3.568716503662739*^9, { 3.599475236864607*^9, 3.599475237098607*^9}, {3.599475354598014*^9, 3.5994754053605027`*^9}, {3.599475436248557*^9, 3.5994754807398353`*^9}, { 3.6307389947268867`*^9, 3.6307390535077896`*^9}, {3.6309861131038904`*^9, 3.6309862682907667`*^9}, {3.631424558159581*^9, 3.6314245891256356`*^9}, { 3.6624552319422064`*^9, 3.662455237062499*^9}, {3.6852667663533344`*^9, 3.68526684171344*^9}, {3.6852668915235095`*^9, 3.685266923413554*^9}, 3.685267343854143*^9, {3.6852713069429655`*^9, 3.685271332453001*^9}, { 3.6853478384253273`*^9, 3.6853478599305573`*^9}, {3.6853479070492525`*^9, 3.6853479227451506`*^9}, {3.6853479836976366`*^9, 3.685348000436594*^9}, { 3.6853487750034666`*^9, 3.685348793453492*^9}, {3.687251613563834*^9, 3.6872516458438797`*^9}, {3.6872517360540056`*^9, 3.6872517559340334`*^9}, {3.687251801344097*^9, 3.6872518129341135`*^9}, 3.687764819992582*^9, {3.7187068450918727`*^9, 3.7187068734418435`*^9}, { 3.7187069097555704`*^9, 3.7187069975866556`*^9}, {3.718707088907159*^9, 3.71870714984157*^9}, {3.718711566072616*^9, 3.718711566742806*^9}, { 3.7187116422917643`*^9, 3.7187116668400583`*^9}, {3.7493854176413813`*^9, 3.7493854269178114`*^9}, {3.749441819700017*^9, 3.7494419245989656`*^9}, 3.749441965485881*^9, 3.7819357730749607`*^9, {3.781935902267897*^9, 3.781936097661247*^9}, {3.7819362376254654`*^9, 3.7819362513074417`*^9}, { 3.7821146778259783`*^9, 3.7821146832883797`*^9}, 3.7821148222050138`*^9, { 3.8138955244965224`*^9, 3.8138955957297707`*^9}, {3.8138956551350574`*^9, 3.8138957633475685`*^9}, {3.8138962336802006`*^9, 3.8138962811244354`*^9}, {3.8138963426340384`*^9, 3.813896345532611*^9}, { 3.8453631059466515`*^9, 3.8453631236393085`*^9}}, CellLabel-> "In[406]:=",ExpressionUUID->"27c1d618-1a89-4f59-bd85-e6706f88a1df"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture assignment 2 (beam modes)", "Subsubsection", CellChangeTimes->{{3.4730556702200003`*^9, 3.473055683948*^9}, { 3.473056486087*^9, 3.4730564925030003`*^9}, 3.473057491051*^9, { 3.473057733758*^9, 3.473057755476*^9}, {3.568116356788909*^9, 3.5681163731689377`*^9}, {3.5992231160658693`*^9, 3.59922314473872*^9}, { 3.5992232122508388`*^9, 3.5992232356352797`*^9}, {3.686463442653324*^9, 3.686463466683358*^9}, {3.686650104192067*^9, 3.686650133092108*^9}, { 3.687145505190199*^9, 3.687145516080214*^9}, 3.687843420025089*^9, { 3.687844034477949*^9, 3.6878440402179575`*^9}, 3.749626037950364*^9},ExpressionUUID->"6dfb6ecf-dccb-445a-bd3e-\ e6d0ba488d83"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "4", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "4", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "4"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.599224897569802*^9, 3.599224926773053*^9}, { 3.630748433394182*^9, 3.630748504265106*^9}, {3.6308320967004905`*^9, 3.6308321133874445`*^9}, {3.685263514118781*^9, 3.6852635972488976`*^9}, 3.685267287144063*^9, {3.6853444422720785`*^9, 3.685344490915861*^9}, { 3.6858763098135014`*^9, 3.6858763218235188`*^9}, {3.686226407525676*^9, 3.6862264116856813`*^9}, 3.686445942025214*^9, {3.6866501652021523`*^9, 3.6866502922323303`*^9}, {3.687145549690261*^9, 3.6871456288103724`*^9}, { 3.6871456605404167`*^9, 3.6871456854304514`*^9}, {3.6871477248733063`*^9, 3.6871477484933395`*^9}, {3.6876002810943336`*^9, 3.6876002969743567`*^9}, {3.6878434855451803`*^9, 3.6878435135952196`*^9}, {3.687843564595291*^9, 3.6878436187753673`*^9}, { 3.6878436496954107`*^9, 3.6878436701654387`*^9}, {3.6878437398065367`*^9, 3.68784375664756*^9}, {3.687843807367631*^9, 3.687843865017712*^9}, { 3.687843919977789*^9, 3.68784395615784*^9}, {3.68784404896797*^9, 3.687844288778305*^9}, {3.718714539745225*^9, 3.718714551424245*^9}, { 3.749628478053541*^9, 3.7496284875597725`*^9}, {3.749628572910929*^9, 3.749628589593005*^9}, {3.7496286353629065`*^9, 3.749628670951417*^9}, { 3.781857013524531*^9, 3.7818570155048494`*^9}, {3.7821088899305816`*^9, 3.782108928126272*^9}, {3.813896421945176*^9, 3.8138964501245933`*^9}, { 3.813896528364023*^9, 3.8138966240231323`*^9}}, CellLabel-> "In[353]:=",ExpressionUUID->"20285591-8fb7-4e30-b96e-1959c482c6c9"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["ELEMENT CONTRIBUTION (week 47)", "Subsection", CellChangeTimes->{{3.473055512584*^9, 3.4730555529630003`*^9}, { 3.4730575328269997`*^9, 3.473057539222*^9}, {3.4734691424642*^9, 3.4734691605758*^9}, {3.4736023142902*^9, 3.4736023273162003`*^9}, { 3.4742602258717394`*^9, 3.4742602349087396`*^9}, {3.4751533480335493`*^9, 3.4751533839809494`*^9}, {3.47515343117095*^9, 3.47515343786335*^9}, 3.5674893867449017`*^9, {3.5699074339440374`*^9, 3.56990745274207*^9}, { 3.6006660158694277`*^9, 3.600666019805653*^9}, 3.602250942577814*^9, 3.629791662634495*^9, {3.6320295978239136`*^9, 3.6320296124099393`*^9}, { 3.6635851600672674`*^9, 3.663585163393458*^9}, {3.6648540374888315`*^9, 3.664854043026841*^9}, 3.6852489400701537`*^9, {3.6853234787935405`*^9, 3.6853234813735437`*^9}, {3.685876461443714*^9, 3.6858764998137674`*^9}, 3.685948209559762*^9, {3.6862262245154195`*^9, 3.6862262259354215`*^9}, { 3.6862262694354825`*^9, 3.686226281325499*^9}, {3.6864664763474426`*^9, 3.6864664764774427`*^9}, 3.6874272730659637`*^9, 3.7807552526998787`*^9},ExpressionUUID->"0d9256a2-f7f3-431d-89f3-\ 78bbf6e76aad"], Cell[CellGroupData[{ Cell["Lecture example 4.1 (beam truss)", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430753426703997`*^9, 3.4430753634028*^9}, 3.4430770141963997`*^9, 3.4742603407157393`*^9, {3.600666351963651*^9, 3.6006663781981516`*^9}, 3.6321880085476494`*^9, 3.6636795657621937`*^9, {3.6874157308398046`*^9, 3.6874157382298145`*^9}, 3.7496288337503834`*^9, {3.7826597265262294`*^9, 3.7826597334403543`*^9}, 3.814443495200452*^9},ExpressionUUID->"d07d71e7-ee53-44b3-b0ce-\ b24f91dbe98c"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"{", RowBox[{"f", ",", "0"}], "}"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "4"}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"4", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "4", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430753715772*^9, 3.4430754825088*^9}, { 3.4430755569208*^9, 3.4430756008816*^9}, {3.4430770228856*^9, 3.4430770663784*^9}, {3.4430771036935997`*^9, 3.4430771281387997`*^9}, { 3.4430774685931997`*^9, 3.4430774744588003`*^9}, {3.631886640185182*^9, 3.6318867801798277`*^9}, {3.631886811395483*^9, 3.6318868532971563`*^9}, { 3.63188689538603*^9, 3.631886911126458*^9}, 3.632220880961799*^9, { 3.6635854561992054`*^9, 3.6635854723021264`*^9}, {3.685947722189886*^9, 3.6859480185078344`*^9}, {3.6859480495976124`*^9, 3.6859481066958785`*^9}, {3.6859482534012694`*^9, 3.6859482744204717`*^9}, {3.685948346996623*^9, 3.6859483521469173`*^9}, { 3.6859486889111795`*^9, 3.6859487382179995`*^9}, {3.6874157463798265`*^9, 3.687415778329871*^9}, {3.687415861979988*^9, 3.687415898030039*^9}, { 3.6874213041776075`*^9, 3.687421314837622*^9}, {3.7192403674228115`*^9, 3.7192403919520254`*^9}, {3.782546777291246*^9, 3.7825467872195435`*^9}, { 3.782546831048972*^9, 3.782546831764593*^9}, {3.845971506263998*^9, 3.8459715121775355`*^9}, 3.8459717242567663`*^9}, CellLabel-> "In[353]:=",ExpressionUUID->"939bc06a-f7a7-4a96-9759-92f73f9075c9"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 4.2 (bar)", "Subsubsection", CellChangeTimes->{{3.443679756257*^9, 3.4436797622318*^9}, 3.4436808360109997`*^9, 3.4751535594029493`*^9, {3.4751540447407494`*^9, 3.4751540450527496`*^9}, {3.6006660270400667`*^9, 3.600666027653102*^9}, 3.6006663585140257`*^9, 3.6321910383869467`*^9, 3.6636795589293823`*^9, { 3.6875207571905775`*^9, 3.687520761194807*^9}, {3.6876685148042345`*^9, 3.6876685204242425`*^9}, {3.749628860913476*^9, 3.7496288663579645`*^9}, 3.7826597403485346`*^9, 3.8144434967880983`*^9},ExpressionUUID->"a0674658-5e89-4600-8319-\ 12aa8cc67b4b"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{"fx", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"ELEMENTFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fx1", ",", "fx2"}], "}"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"ELEMENTFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"h", "/", "2"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"ux", "[", "1", "]"}], "+", RowBox[{"ux", "[", "2", "]"}]}], ")"}], "/", "2"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"F", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"ELEMENTFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4436798248501997`*^9, 3.4436798429618*^9}, { 3.443679898061*^9, 3.4436799888686*^9}, {3.4436801692514*^9, 3.4436801991098003`*^9}, 3.443680378775*^9, {3.4436804193974*^9, 3.4436804370566*^9}, 3.6006660683034267`*^9, {3.6318882390863276`*^9, 3.631888248789544*^9}, {3.6318888523390045`*^9, 3.6318889287011385`*^9}, { 3.631888959277192*^9, 3.6318889956252565`*^9}, 3.6318892166152444`*^9, { 3.6318892804661565`*^9, 3.6318892814801583`*^9}, {3.631889317734622*^9, 3.631889323959033*^9}, {3.631889414080391*^9, 3.6318894734852953`*^9}, { 3.6318895695658646`*^9, 3.631889576336276*^9}, {3.6318896192051516`*^9, 3.6318896215607557`*^9}, {3.63188970927971*^9, 3.631889709934911*^9}, { 3.632190742688033*^9, 3.6321907489713926`*^9}, {3.632190921438257*^9, 3.632190943394513*^9}, {3.6321912567764378`*^9, 3.632191262218749*^9}, { 3.6321913668477335`*^9, 3.6321913716630087`*^9}, {3.685952813676102*^9, 3.6859528607797966`*^9}, {3.68595290787049*^9, 3.6859533988145704`*^9}, { 3.685953517748373*^9, 3.6859535591427402`*^9}, 3.685965506548236*^9, { 3.6859655476582937`*^9, 3.6859655504682975`*^9}, {3.685965631278411*^9, 3.685965634198415*^9}, {3.6859658476887136`*^9, 3.6859659061787953`*^9}, { 3.685966268959303*^9, 3.685966274369311*^9}, 3.6860125052055483`*^9, { 3.6876698089360466`*^9, 3.687669930876217*^9}, {3.687669965616266*^9, 3.6876699690562706`*^9}, {3.6876701468865194`*^9, 3.6876702688366904`*^9}, 3.687671951523484*^9, {3.6876720519736247`*^9, 3.6876720974836884`*^9}, 3.6876721497037616`*^9, {3.6876721862038126`*^9, 3.687672192653822*^9}, { 3.6876722286538725`*^9, 3.6876723088439846`*^9}, {3.6876740255104027`*^9, 3.6876740281804066`*^9}, 3.687783855173648*^9, {3.7192404630234146`*^9, 3.71924049126862*^9}, {3.7192405358821263`*^9, 3.71924053705192*^9}, { 3.7496953028235073`*^9, 3.749695334586444*^9}, {3.749695376165814*^9, 3.7496953917239227`*^9}, {3.7496960024037757`*^9, 3.749696065497768*^9}, { 3.749697784760352*^9, 3.749697830785179*^9}, {3.7496985691783285`*^9, 3.749698670645958*^9}, {3.7496987302880983`*^9, 3.749698840003518*^9}, { 3.7496988707476287`*^9, 3.7496988714853306`*^9}, {3.749698980862912*^9, 3.7496989811998773`*^9}, {3.749699131496202*^9, 3.7496991327262955`*^9}, { 3.749699445865477*^9, 3.749699446539852*^9}, {3.7507384778141146`*^9, 3.7507385044172683`*^9}, {3.7507385421269417`*^9, 3.750738596583208*^9}, { 3.7507395748707404`*^9, 3.750739724038948*^9}, {3.750739770871624*^9, 3.7507397862119017`*^9}, {3.7507405496121025`*^9, 3.7507405783866396`*^9}, {3.782306271765029*^9, 3.7823063733701363`*^9}, { 3.7823091222468653`*^9, 3.7823092412262487`*^9}, {3.782309439102314*^9, 3.782309481698208*^9}, 3.7823095250542307`*^9, {3.8459767673739705`*^9, 3.8459768005929317`*^9}}, CellLabel-> "In[357]:=",ExpressionUUID->"323d8e92-b6e9-4d73-920d-0a1e9d4f99c8"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 4.3 (bar)", "Subsubsection", CellChangeTimes->{{3.443679756257*^9, 3.4436797622318*^9}, 3.4436808360109997`*^9, 3.4751535594029493`*^9, {3.4751540447407494`*^9, 3.4751540450527496`*^9}, {3.6006660270400667`*^9, 3.600666027653102*^9}, 3.6006663585140257`*^9, 3.6321910383869467`*^9, 3.6636795589293823`*^9, { 3.6875207571905775`*^9, 3.687520761194807*^9}, {3.6876685148042345`*^9, 3.6876685204242425`*^9}, {3.749628860913476*^9, 3.7496288663579645`*^9}, 3.7496994923944416`*^9, 3.782659742629477*^9, 3.8144434989369273`*^9},ExpressionUUID->"3c603fd4-7e6f-4b2e-a51c-\ ab4a03e4f614"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{ FractionBox["3", "4"], "f"}], ",", "f"}], "}"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"Table", "[", " ", RowBox[{ RowBox[{ RowBox[{"uX", "[", "2", "]"}], " ", "/.", " ", RowBox[{"SOLVE", "[", RowBox[{"Nest", "[", RowBox[{"REFINE", ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], ",", "i"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", "2"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.4436798248501997`*^9, 3.4436798429618*^9}, { 3.443679898061*^9, 3.4436799888686*^9}, {3.4436801692514*^9, 3.4436801991098003`*^9}, 3.443680378775*^9, {3.4436804193974*^9, 3.4436804370566*^9}, 3.6006660683034267`*^9, {3.6318882390863276`*^9, 3.631888248789544*^9}, {3.6318888523390045`*^9, 3.6318889287011385`*^9}, { 3.631888959277192*^9, 3.6318889956252565`*^9}, 3.6318892166152444`*^9, { 3.6318892804661565`*^9, 3.6318892814801583`*^9}, {3.631889317734622*^9, 3.631889323959033*^9}, {3.631889414080391*^9, 3.6318894734852953`*^9}, { 3.6318895695658646`*^9, 3.631889576336276*^9}, {3.6318896192051516`*^9, 3.6318896215607557`*^9}, {3.63188970927971*^9, 3.631889709934911*^9}, { 3.632190742688033*^9, 3.6321907489713926`*^9}, {3.632190921438257*^9, 3.632190943394513*^9}, {3.6321912567764378`*^9, 3.632191262218749*^9}, { 3.6321913668477335`*^9, 3.6321913716630087`*^9}, {3.685952813676102*^9, 3.6859528607797966`*^9}, {3.68595290787049*^9, 3.6859533988145704`*^9}, { 3.685953517748373*^9, 3.6859535591427402`*^9}, 3.685965506548236*^9, { 3.6859655476582937`*^9, 3.6859655504682975`*^9}, {3.685965631278411*^9, 3.685965634198415*^9}, {3.6859658476887136`*^9, 3.6859659061787953`*^9}, { 3.685966268959303*^9, 3.685966274369311*^9}, 3.6860125052055483`*^9, { 3.6876698089360466`*^9, 3.687669930876217*^9}, {3.687669965616266*^9, 3.6876699690562706`*^9}, {3.6876701468865194`*^9, 3.6876702688366904`*^9}, 3.687671951523484*^9, {3.6876720519736247`*^9, 3.6876720974836884`*^9}, 3.6876721497037616`*^9, {3.6876721862038126`*^9, 3.687672192653822*^9}, { 3.6876722286538725`*^9, 3.6876723088439846`*^9}, {3.6876740255104027`*^9, 3.6876740281804066`*^9}, 3.687783855173648*^9, {3.7192404630234146`*^9, 3.71924049126862*^9}, {3.7192405358821263`*^9, 3.71924053705192*^9}, { 3.78227789116995*^9, 3.7822779227195635`*^9}, {3.8459768392993765`*^9, 3.8459768404812975`*^9}, 3.8460364120366373`*^9}, CellLabel-> "In[366]:=",ExpressionUUID->"8a129f1d-5ec0-45d7-96b6-650935aa1b15"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 4.4 (bar)", "Subsubsection", CellChangeTimes->{{3.4436808247321997`*^9, 3.4436808395522003`*^9}, 3.4751539895323496`*^9, {3.4751540417611494`*^9, 3.4751540420731497`*^9}, 3.600666035355542*^9, 3.6006663929149933`*^9, {3.686013431566845*^9, 3.6860134351368504`*^9}, {3.6860208063026304`*^9, 3.6860208114126377`*^9}, {3.6874232808203745`*^9, 3.687423282180376*^9}, 3.687446328805478*^9, {3.749628870211012*^9, 3.749628871852614*^9}, { 3.749816417119692*^9, 3.749816418590285*^9}, 3.782547159187301*^9, 3.782659744976636*^9, 3.81444354223011*^9},ExpressionUUID->"44ed863c-5080-474d-95d6-\ 9c148cac3f55"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{"{", RowBox[{"A0", ",", RowBox[{ FractionBox["3", "4"], "A0"}]}], "}"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Rho]", " ", "A0", " ", "g"}], ",", RowBox[{ FractionBox["3", "4"], "\[Rho]", " ", "A0", " ", "g"}]}], "}"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{ FractionBox["3", "4"], "A0"}], ",", RowBox[{ FractionBox["1", "2"], "A0"}]}], "}"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ FractionBox["3", "4"], "\[Rho]", " ", "A0", " ", "g"}], ",", RowBox[{ FractionBox["1", "2"], "\[Rho]", " ", "A0", " ", "g"}]}], "}"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"L", "/", "2"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4436808471962*^9, 3.4436809538378*^9}, { 3.443681135921*^9, 3.443681156435*^9}, {3.632192381990796*^9, 3.6321926188293424`*^9}, {3.6321927007470284`*^9, 3.6321927357170277`*^9}, {3.6321928972667627`*^9, 3.632192927997444*^9}, 3.6322209654296303`*^9, {3.6860130801763535`*^9, 3.6860132972466574`*^9}, { 3.6860133889767857`*^9, 3.6860133917467895`*^9}, {3.6860197457211456`*^9, 3.68601975572116*^9}, {3.686019804991229*^9, 3.6860199044213676`*^9}, { 3.686020015301523*^9, 3.6860200192515287`*^9}, {3.6860200541415777`*^9, 3.6860200614015875`*^9}, {3.6860201084516535`*^9, 3.6860201149016623`*^9}, {3.686020160421726*^9, 3.6860202026517854`*^9}, { 3.6860202915619097`*^9, 3.6860203398219776`*^9}, {3.686020414092081*^9, 3.6860205028922057`*^9}, {3.686020554572278*^9, 3.6860205784923115`*^9}, { 3.686020624672376*^9, 3.686020626762379*^9}, {3.6860208020726247`*^9, 3.6860208282426615`*^9}, 3.6860244721438465`*^9, {3.6874232914403896`*^9, 3.687423300610402*^9}, {3.687423332360447*^9, 3.6874233917505302`*^9}, { 3.6874234416105995`*^9, 3.6874234966906767`*^9}, 3.6874235509507527`*^9, 3.6875206719957047`*^9, {3.687676427874962*^9, 3.6876765555951405`*^9}, { 3.7192405776545444`*^9, 3.7192405902995524`*^9}, {3.7498164629379354`*^9, 3.749816480975708*^9}, {3.749816637967845*^9, 3.7498167322446084`*^9}, { 3.750738747719742*^9, 3.7507387505315924`*^9}, {3.7823096747493467`*^9, 3.7823097091291466`*^9}, {3.845976894348507*^9, 3.845976902181108*^9}, 3.846036918752384*^9}, CellLabel-> "In[370]:=",ExpressionUUID->"687956f6-7506-4e7b-bf87-56cdfbb1f085"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 4.5 (beam)", "Subsubsection", CellChangeTimes->{ 3.4734694944314003`*^9, 3.599224766420371*^9, 3.6862337099646473`*^9, 3.686290219307787*^9, {3.6862903012279015`*^9, 3.686290301967902*^9}, { 3.6863951855946074`*^9, 3.686395186494609*^9}, {3.6864635001634054`*^9, 3.6864635018334074`*^9}, {3.749818305963309*^9, 3.749818306886223*^9}, 3.7826597504489408`*^9, 3.814443588350874*^9, 3.8144436267287855`*^9},ExpressionUUID->"f76f760a-2a03-4ddd-a3c9-\ 7cc25ceb4fab"], Cell[BoxData[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uz", "[", "1", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]y", "[", "1", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uz", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "fz"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ELEMENTFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uz", "[", "1", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]y", "[", "1", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uz", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"{", RowBox[{"fz1", ",", "fz2"}], "}"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ELEMENTFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "displacement", " ", "and", " ", "rotation", " ", "at", " ", "the", " ", "centerpoint", " ", "in", " ", "terms", " ", "of", " ", "the", " ", "end", " ", "point", " ", "values"}], "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"uc", "=", RowBox[{ FractionBox["1", "8"], " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", RowBox[{"uz", "[", "1", "]"}]}], "+", RowBox[{"4", " ", RowBox[{"uz", "[", "2", "]"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"\[Theta]y", "[", "1", "]"}]}], "+", RowBox[{"\[Theta]y", "[", "2", "]"}]}], ")"}]}]}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]c", "=", RowBox[{"-", FractionBox[ RowBox[{ RowBox[{ RowBox[{"-", "6"}], " ", RowBox[{"uz", "[", "1", "]"}]}], "+", RowBox[{"6", " ", RowBox[{"uz", "[", "2", "]"}]}], "+", RowBox[{"h", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Theta]y", "[", "1", "]"}], "+", RowBox[{"\[Theta]y", "[", "2", "]"}]}], ")"}]}]}], RowBox[{"4", " ", "h"}]]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uz", "[", "1", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]y", "[", "1", "]"}], ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"h", "/", "2"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "uc"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "\[Theta]c", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uz", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "Fz"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ELEMENTFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{ 3.442646896400446*^9, {3.629783307211053*^9, 3.629783319737875*^9}, { 3.6297833622479496`*^9, 3.6297833821535845`*^9}, {3.6297834663625326`*^9, 3.6297834719785423`*^9}, {3.629783540353462*^9, 3.629783541960265*^9}, { 3.629783803978326*^9, 3.629783888920475*^9}, {3.6297840054526796`*^9, 3.6297840056398797`*^9}, {3.6297840416291428`*^9, 3.629784042237544*^9}, { 3.629784285878772*^9, 3.629784299357196*^9}, {3.629784645038203*^9, 3.6297846906682825`*^9}, {3.6297850092208424`*^9, 3.629785101651005*^9}, { 3.629785975190139*^9, 3.629786017294613*^9}, {3.6297860683067026`*^9, 3.6297860840939302`*^9}, {3.629786362148819*^9, 3.6297864363425493`*^9}, { 3.629786900072529*^9, 3.629786945484209*^9}, 3.629786990225087*^9, { 3.629787120366516*^9, 3.6297871260449266`*^9}, {3.629787266780774*^9, 3.629787391144192*^9}, {3.6297874597063127`*^9, 3.629787510344002*^9}, 3.629788110882656*^9, {3.629788171800763*^9, 3.6297881758411703`*^9}, { 3.6297885659354553`*^9, 3.6297885755294724`*^9}, {3.6297892278758183`*^9, 3.629789232243826*^9}, {3.629789276625904*^9, 3.6297893332852035`*^9}, { 3.6297914556533313`*^9, 3.6297914630945444`*^9}, {3.629869949096054*^9, 3.629870013430567*^9}, {3.629870255714593*^9, 3.6298702559641933`*^9}, { 3.630553045404605*^9, 3.6305530553091717`*^9}, {3.6305893694622536`*^9, 3.630589404874316*^9}, {3.6306585642124243`*^9, 3.6306586027288923`*^9}, { 3.630658768962784*^9, 3.6306589911851745`*^9}, 3.630659024070032*^9, { 3.630673454818836*^9, 3.6306734854495883`*^9}, {3.630675026717631*^9, 3.6306750934294467`*^9}, {3.63067528213724*^9, 3.6306752822962494`*^9}, { 3.630675363622901*^9, 3.630675390674448*^9}, {3.630675423882347*^9, 3.6306754692369413`*^9}, 3.6306755736573396`*^9, {3.6306756175005193`*^9, 3.6306756249209433`*^9}, {3.630675655290681*^9, 3.6306756841903334`*^9}, { 3.630675727032784*^9, 3.6306757374963827`*^9}, {3.6306758978040085`*^9, 3.630675909644429*^9}, 3.630739547935058*^9, {3.6852523453938932`*^9, 3.68525240748398*^9}, {3.6852525490681486`*^9, 3.6852525670281763`*^9}, { 3.6852540883581915`*^9, 3.6852541237762175`*^9}, 3.6852541568981113`*^9, { 3.685261324675716*^9, 3.6852613495857506`*^9}, 3.685261974676626*^9, 3.685267244644004*^9, {3.6852714610531816`*^9, 3.6852714662331886`*^9}, { 3.685340224314878*^9, 3.6853402425549035`*^9}, {3.6858757975527844`*^9, 3.685875800692789*^9}, 3.685875976643035*^9, 3.6863952420746865`*^9, { 3.6866590821902657`*^9, 3.6866591337503376`*^9}, {3.686659210920446*^9, 3.6866592825905457`*^9}, 3.686659319650598*^9, {3.718089929604436*^9, 3.718089937596391*^9}, {3.748925556248083*^9, 3.748925596504529*^9}, { 3.7489256818595314`*^9, 3.7489256827028418`*^9}, {3.748925773478675*^9, 3.7489257778055353`*^9}, {3.748926055597584*^9, 3.748926062252592*^9}, { 3.7498183167074556`*^9, 3.749818323150751*^9}, {3.7498184776431103`*^9, 3.7498184970219464`*^9}, {3.7498186926216*^9, 3.749818695064655*^9}, { 3.7498187482508116`*^9, 3.749818753180888*^9}, {3.749818791697117*^9, 3.74981882272311*^9}, 3.7498188581034184`*^9, 3.7498188937280397`*^9, { 3.750738836526843*^9, 3.750738994287031*^9}, {3.750739479955144*^9, 3.7507394890626364`*^9}, {3.7507395263507853`*^9, 3.7507395564997435`*^9}, {3.7507398115497265`*^9, 3.7507398850637856`*^9}, {3.750740274597377*^9, 3.7507403074656067`*^9}, { 3.7507403555793552`*^9, 3.750740401349904*^9}, {3.750740465553377*^9, 3.750740508199918*^9}, 3.750740629952758*^9, {3.7823101737187147`*^9, 3.7823103634283786`*^9}, {3.7831513734176197`*^9, 3.783151373917719*^9}, { 3.84597697592216*^9, 3.8459769793091507`*^9}, 3.8464659305517035`*^9}, CellLabel-> "In[374]:=",ExpressionUUID->"bad6c838-7a3f-49c8-8104-a6e70be4cdbc"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 4.6 (interpolant)", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, 3.572946782433387*^9, 3.634567631130391*^9, 3.634610434326293*^9, 3.634611542343668*^9, {3.634787392185001*^9, 3.634787394985161*^9}, 3.634795742882633*^9, 3.666087688711194*^9, {3.688120833010166*^9, 3.6881208343201685`*^9}, 3.6883549869221854`*^9, {3.750742155818322*^9, 3.7507421678626738`*^9}, {3.750754289172721*^9, 3.750754291259711*^9}, 3.782547885570245*^9, 3.7826597579291844`*^9, 3.782721304434683*^9, 3.8144436320702477`*^9, {3.8464663445678425`*^9, 3.846466374442537*^9}},ExpressionUUID->"23ea6c7f-474e-4c6e-8b51-\ a45e2f8c7866"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"rule", " ", ":=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"X_", ",", "Y_", ",", "Z_"}], "}"}], ",", RowBox[{"{", RowBox[{"uX_", ",", "uY_", ",", "uZ_"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Theta]X_", ",", "\[Theta]Y_", ",", "\[Theta]Z_"}], "}"}]}], "}"}], ":>", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"X", ",", "Y", ",", "Z"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"Sin", "[", RowBox[{"3", "\[Pi]", " ", "X"}], "]"}], "*", RowBox[{ RowBox[{"Sin", "[", RowBox[{"2", " ", "\[Pi]", " ", "Y"}], "]"}], "/", "4"}]}]}], " ", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{"1", "/", "100"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"gr1", "=", RowBox[{"Grid", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"prb", "=", RowBox[{"Nest", "[", RowBox[{"REFINE", ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], ",", "i"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SHOW3D", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "1"}], "}"}], ",", RowBox[{"prb", "/.", "rule"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "2", ",", "4"}], "}"}]}], "]"}], "}"}], "]"}]}]}]}]], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, 3.603167701448481*^9, { 3.6305527201760035`*^9, 3.630552938770506*^9}, {3.6345676503834925`*^9, 3.6345676818222904`*^9}, {3.6345688863991885`*^9, 3.6345689891650667`*^9}, 3.6345692742413716`*^9, 3.6345693788933573`*^9, {3.6345695183433332`*^9, 3.6345696795895567`*^9}, {3.63461061365755*^9, 3.634610615326646*^9}, { 3.6354741435175705`*^9, 3.635474208878309*^9}, {3.6354742396790705`*^9, 3.635474258640155*^9}, 3.635474295701275*^9, {3.688274575490385*^9, 3.688274878281809*^9}, {3.688274942101898*^9, 3.6882749535919147`*^9}, 3.688275290273386*^9, {3.688275581803794*^9, 3.6882755933138103`*^9}, { 3.6882757272839975`*^9, 3.688275828054139*^9}, {3.688276055484457*^9, 3.688276151094591*^9}, {3.6883560558657007`*^9, 3.688356057165703*^9}, { 3.750742181859401*^9, 3.750742394560158*^9}, {3.750742464278206*^9, 3.750742602652133*^9}, {3.750742666621599*^9, 3.750742781282263*^9}, { 3.7507428986141744`*^9, 3.7507429101271343`*^9}, {3.7507438726858206`*^9, 3.7507438728732758`*^9}, {3.750744456061017*^9, 3.7507444566392927`*^9}, { 3.750748630754549*^9, 3.75074871214598*^9}, {3.7507487438586445`*^9, 3.7507487615926924`*^9}, {3.750748792204648*^9, 3.750748824596186*^9}, { 3.7507489437131753`*^9, 3.7507489584646425`*^9}, {3.750749079746468*^9, 3.7507491192701383`*^9}, {3.7507491666403217`*^9, 3.7507493557211375`*^9}, {3.750749421125845*^9, 3.7507494217237225`*^9}, 3.7507511396729794`*^9, {3.7507512988805475`*^9, 3.75075129961979*^9}, 3.7507514063557973`*^9, 3.7507515330491304`*^9, {3.750751649760004*^9, 3.7507516542298555`*^9}, {3.75075170995093*^9, 3.750751814674227*^9}, { 3.7507518464584923`*^9, 3.750751876000946*^9}, {3.750751909784737*^9, 3.750751911103073*^9}, {3.7507519609170337`*^9, 3.7507520338517213`*^9}, { 3.750752083476493*^9, 3.7507521400036263`*^9}, {3.7507522448110113`*^9, 3.7507522509192524`*^9}, {3.750752966812497*^9, 3.750753010021612*^9}, { 3.7507531146772323`*^9, 3.7507532007350483`*^9}, {3.7825688075418353`*^9, 3.782568829849742*^9}, {3.78256887440396*^9, 3.782568894783976*^9}, { 3.782568975147844*^9, 3.78256898558232*^9}, {3.7825690276350455`*^9, 3.7825690421707783`*^9}, {3.7827212969817934`*^9, 3.7827213073630805`*^9}, {3.845977158370861*^9, 3.8459773378385706`*^9}, { 3.8459773742237425`*^9, 3.84597737504911*^9}, {3.8459774081263466`*^9, 3.845977414089896*^9}, {3.8459774736110315`*^9, 3.845977768677133*^9}, { 3.845977803178728*^9, 3.845977944078887*^9}, {3.84597797594662*^9, 3.8459779761726456`*^9}, {3.845978489847187*^9, 3.845978575465848*^9}, { 3.845979198357986*^9, 3.8459792014115047`*^9}, {3.846129699782254*^9, 3.8461297072097025`*^9}, {3.8461297799809055`*^9, 3.8461297834001503`*^9}, {3.846129895498957*^9, 3.846129897368785*^9}, { 3.846129927577082*^9, 3.8461299938113775`*^9}, {3.846130026145954*^9, 3.846130035441529*^9}, 3.8461300940857067`*^9, {3.8461301434381013`*^9, 3.8461301780838146`*^9}, {3.8461302119307017`*^9, 3.846130214098791*^9}, { 3.8463094472379208`*^9, 3.846309464173218*^9}}, CellLabel-> "In[861]:=",ExpressionUUID->"5d3a9650-92bd-427c-9c8d-187c46056ca1"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"rule", " ", ":=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"X_", ",", "Y_", ",", "Z_"}], "}"}], ",", RowBox[{"{", RowBox[{"uX_", ",", "uY_", ",", "uZ_"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Theta]X_", ",", "\[Theta]Y_", ",", "\[Theta]Z_"}], "}"}]}], "}"}], ":>", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"X", ",", "Y", ",", "Z"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"Sin", "[", RowBox[{"3", "\[Pi]", " ", "X"}], "]"}], "*", RowBox[{ RowBox[{"Sin", "[", RowBox[{"2", " ", "\[Pi]", " ", "Y"}], "]"}], "/", "4"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{"1", "/", "100"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{"1", "/", "100"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "3", ",", "4"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"gr2", "=", RowBox[{"Grid", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"prb", "=", RowBox[{"Nest", "[", RowBox[{"REFINE", ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], ",", "i"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SHOW3D", "[", RowBox[{ RowBox[{"{", RowBox[{"DISP", ",", "1"}], "}"}], ",", RowBox[{"prb", "/.", "rule"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "2", ",", "4"}], "}"}]}], "]"}], "}"}], "]"}]}]}]}]], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, 3.603167701448481*^9, { 3.6305527201760035`*^9, 3.630552938770506*^9}, {3.6345676503834925`*^9, 3.6345676818222904`*^9}, {3.6345688863991885`*^9, 3.6345689891650667`*^9}, 3.6345692742413716`*^9, 3.6345693788933573`*^9, {3.6345695183433332`*^9, 3.6345696795895567`*^9}, {3.63461061365755*^9, 3.634610615326646*^9}, { 3.6354741435175705`*^9, 3.635474208878309*^9}, {3.6354742396790705`*^9, 3.635474258640155*^9}, 3.635474295701275*^9, {3.688274575490385*^9, 3.688274878281809*^9}, {3.688274942101898*^9, 3.6882749535919147`*^9}, 3.688275290273386*^9, {3.688275581803794*^9, 3.6882755933138103`*^9}, { 3.6882757272839975`*^9, 3.688275828054139*^9}, {3.688276055484457*^9, 3.688276151094591*^9}, {3.6883560558657007`*^9, 3.688356057165703*^9}, { 3.750742181859401*^9, 3.750742394560158*^9}, {3.750742464278206*^9, 3.750742602652133*^9}, {3.750742666621599*^9, 3.750742781282263*^9}, { 3.7507428986141744`*^9, 3.7507429101271343`*^9}, {3.7507438726858206`*^9, 3.7507438728732758`*^9}, {3.750744456061017*^9, 3.7507444566392927`*^9}, { 3.750748630754549*^9, 3.75074871214598*^9}, {3.7507487438586445`*^9, 3.7507487615926924`*^9}, {3.750748792204648*^9, 3.750748824596186*^9}, { 3.7507489437131753`*^9, 3.7507489584646425`*^9}, {3.750749079746468*^9, 3.7507491192701383`*^9}, {3.7507491666403217`*^9, 3.7507493557211375`*^9}, {3.750749421125845*^9, 3.7507494217237225`*^9}, 3.7507511396729794`*^9, {3.7507512988805475`*^9, 3.75075129961979*^9}, 3.7507514063557973`*^9, 3.7507515330491304`*^9, {3.750751649760004*^9, 3.7507516542298555`*^9}, {3.75075170995093*^9, 3.750751814674227*^9}, { 3.7507518464584923`*^9, 3.750751876000946*^9}, {3.750751909784737*^9, 3.750751911103073*^9}, {3.7507519609170337`*^9, 3.7507520338517213`*^9}, { 3.750752083476493*^9, 3.7507521400036263`*^9}, {3.7507522448110113`*^9, 3.7507522509192524`*^9}, {3.750752966812497*^9, 3.750753010021612*^9}, { 3.7507531146772323`*^9, 3.7507532007350483`*^9}, {3.7825688075418353`*^9, 3.782568829849742*^9}, {3.78256887440396*^9, 3.782568894783976*^9}, { 3.782568975147844*^9, 3.78256898558232*^9}, {3.7825690276350455`*^9, 3.7825690421707783`*^9}, {3.7827212969817934`*^9, 3.7827213073630805`*^9}, {3.845977158370861*^9, 3.8459773378385706`*^9}, { 3.8459773742237425`*^9, 3.84597737504911*^9}, {3.8459774081263466`*^9, 3.845977414089896*^9}, {3.8459774736110315`*^9, 3.845977768677133*^9}, { 3.845977803178728*^9, 3.845977944078887*^9}, {3.84597797594662*^9, 3.8459779761726456`*^9}, {3.845978489847187*^9, 3.845978575465848*^9}, { 3.845979198357986*^9, 3.8459792014115047`*^9}, {3.8461301712823725`*^9, 3.8461301891156464`*^9}, {3.8461302219613523`*^9, 3.846130224066016*^9}, { 3.8463095578732758`*^9, 3.8463095676117744`*^9}}, CellLabel-> "In[865]:=",ExpressionUUID->"d0dc6f00-9885-433b-b068-2f63e274f0d5"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"Grid", "[", RowBox[{"{", RowBox[{ RowBox[{"{", "gr1", "}"}], ",", RowBox[{"{", "gr2", "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.846130233977189*^9, 3.846130263374669*^9}}, CellLabel-> "In[869]:=",ExpressionUUID->"76a6f7fd-a82e-4e2a-8b30-3bda558afcb4"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 4.7 (bar)", "Subsubsection", CellChangeTimes->{ 3.4734694944314003`*^9, 3.599224766420371*^9, 3.6862337099646473`*^9, 3.686290219307787*^9, {3.6862903012279015`*^9, 3.686290301967902*^9}, { 3.6863951855946074`*^9, 3.686395186494609*^9}, {3.6864635001634054`*^9, 3.6864635018334074`*^9}, {3.749818305963309*^9, 3.749818306886223*^9}, 3.7825478821244354`*^9, {3.782547922460088*^9, 3.782547922845597*^9}, 3.7826597543701677`*^9, 3.8144436291920147`*^9, 3.846466349175765*^9},ExpressionUUID->"1c7baf83-e4c9-44bf-8b89-\ d48cac92465c"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "fz"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"h", "/", "2"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "3", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"3", ",", "4", ",", "5"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"F", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "3", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"uc1", "=", RowBox[{ RowBox[{ RowBox[{"3", "/", "8"}], RowBox[{"ux", "[", "1", "]"}]}], "+", RowBox[{ RowBox[{"6", "/", "8"}], RowBox[{"ux", "[", "2", "]"}]}], "-", RowBox[{ RowBox[{"1", "/", "8"}], RowBox[{"ux", "[", "3", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"uc2", "=", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "1"}], "/", "8"}], RowBox[{"ux", "[", "1", "]"}]}], "+", RowBox[{ RowBox[{"6", "/", "8"}], RowBox[{"ux", "[", "2", "]"}]}], "+", RowBox[{ RowBox[{"3", "/", "8"}], RowBox[{"ux", "[", "3", "]"}]}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"h", "/", "4"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"uc1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"h", "/", "2"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"3", RowBox[{"h", "/", "4"}]}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"uc2", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "3", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{ 3.442646896400446*^9, {3.629783307211053*^9, 3.629783319737875*^9}, { 3.6297833622479496`*^9, 3.6297833821535845`*^9}, {3.6297834663625326`*^9, 3.6297834719785423`*^9}, {3.629783540353462*^9, 3.629783541960265*^9}, { 3.629783803978326*^9, 3.629783888920475*^9}, {3.6297840054526796`*^9, 3.6297840056398797`*^9}, {3.6297840416291428`*^9, 3.629784042237544*^9}, { 3.629784285878772*^9, 3.629784299357196*^9}, {3.629784645038203*^9, 3.6297846906682825`*^9}, {3.6297850092208424`*^9, 3.629785101651005*^9}, { 3.629785975190139*^9, 3.629786017294613*^9}, {3.6297860683067026`*^9, 3.6297860840939302`*^9}, {3.629786362148819*^9, 3.6297864363425493`*^9}, { 3.629786900072529*^9, 3.629786945484209*^9}, 3.629786990225087*^9, { 3.629787120366516*^9, 3.6297871260449266`*^9}, {3.629787266780774*^9, 3.629787391144192*^9}, {3.6297874597063127`*^9, 3.629787510344002*^9}, 3.629788110882656*^9, {3.629788171800763*^9, 3.6297881758411703`*^9}, { 3.6297885659354553`*^9, 3.6297885755294724`*^9}, {3.6297892278758183`*^9, 3.629789232243826*^9}, {3.629789276625904*^9, 3.6297893332852035`*^9}, { 3.6297914556533313`*^9, 3.6297914630945444`*^9}, {3.629869949096054*^9, 3.629870013430567*^9}, {3.629870255714593*^9, 3.6298702559641933`*^9}, { 3.630553045404605*^9, 3.6305530553091717`*^9}, {3.6305893694622536`*^9, 3.630589404874316*^9}, {3.6306585642124243`*^9, 3.6306586027288923`*^9}, { 3.630658768962784*^9, 3.6306589911851745`*^9}, 3.630659024070032*^9, { 3.630673454818836*^9, 3.6306734854495883`*^9}, {3.630675026717631*^9, 3.6306750934294467`*^9}, {3.63067528213724*^9, 3.6306752822962494`*^9}, { 3.630675363622901*^9, 3.630675390674448*^9}, {3.630675423882347*^9, 3.6306754692369413`*^9}, 3.6306755736573396`*^9, {3.6306756175005193`*^9, 3.6306756249209433`*^9}, {3.630675655290681*^9, 3.6306756841903334`*^9}, { 3.630675727032784*^9, 3.6306757374963827`*^9}, {3.6306758978040085`*^9, 3.630675909644429*^9}, 3.630739547935058*^9, {3.6852523453938932`*^9, 3.68525240748398*^9}, {3.6852525490681486`*^9, 3.6852525670281763`*^9}, { 3.6852540883581915`*^9, 3.6852541237762175`*^9}, 3.6852541568981113`*^9, { 3.685261324675716*^9, 3.6852613495857506`*^9}, 3.685261974676626*^9, 3.685267244644004*^9, {3.6852714610531816`*^9, 3.6852714662331886`*^9}, { 3.685340224314878*^9, 3.6853402425549035`*^9}, {3.6858757975527844`*^9, 3.685875800692789*^9}, 3.685875976643035*^9, 3.6863952420746865`*^9, { 3.6866590821902657`*^9, 3.6866591337503376`*^9}, {3.686659210920446*^9, 3.6866592825905457`*^9}, 3.686659319650598*^9, {3.718089929604436*^9, 3.718089937596391*^9}, {3.748925556248083*^9, 3.748925596504529*^9}, { 3.7489256818595314`*^9, 3.7489256827028418`*^9}, {3.748925773478675*^9, 3.7489257778055353`*^9}, {3.748926055597584*^9, 3.748926062252592*^9}, { 3.7498183167074556`*^9, 3.749818323150751*^9}, {3.7498184776431103`*^9, 3.7498184970219464`*^9}, {3.7498186926216*^9, 3.749818695064655*^9}, { 3.7498187482508116`*^9, 3.749818753180888*^9}, {3.749818791697117*^9, 3.74981882272311*^9}, 3.7498188581034184`*^9, 3.7498188937280397`*^9, { 3.750738836526843*^9, 3.750738994287031*^9}, {3.750739479955144*^9, 3.7507394890626364`*^9}, {3.7507395263507853`*^9, 3.7507395564997435`*^9}, {3.7507398115497265`*^9, 3.7507398850637856`*^9}, {3.750740274597377*^9, 3.7507403074656067`*^9}, { 3.7507403555793552`*^9, 3.750740401349904*^9}, {3.750740465553377*^9, 3.750740508199918*^9}, 3.750740629952758*^9, {3.7823101737187147`*^9, 3.7823103634283786`*^9}, {3.7825479311322384`*^9, 3.7825479353423777`*^9}, {3.7825480262609863`*^9, 3.7825481716515837`*^9}, {3.7825482102779408`*^9, 3.7825482328803453`*^9}, {3.782548272115299*^9, 3.7825482752964735`*^9}, { 3.7825485180909595`*^9, 3.7825486234952216`*^9}, {3.7825488872315836`*^9, 3.7825490109806633`*^9}, 3.7825687734018755`*^9, {3.845977045530012*^9, 3.8459770616144032`*^9}}, CellLabel->"In[67]:=",ExpressionUUID->"ad75c77f-c7de-4ffc-ab58-89e712a9f392"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 1 (bar mode)", "Subsubsection", CellChangeTimes->{{3.443679756257*^9, 3.4436797622318*^9}, 3.4436808360109997`*^9, 3.4751535594029493`*^9, {3.4751540447407494`*^9, 3.4751540450527496`*^9}, {3.6006660270400667`*^9, 3.600666027653102*^9}, 3.6006663585140257`*^9, 3.6321910383869467`*^9, 3.6636795589293823`*^9, { 3.6875207571905775`*^9, 3.687520761194807*^9}, {3.6876685148042345`*^9, 3.6876685204242425`*^9}, {3.6877571565810146`*^9, 3.6877571643910255`*^9}, {3.750561911146058*^9, 3.7505619176163893`*^9}, { 3.750565926739056*^9, 3.7505659341120853`*^9}, {3.750752857204367*^9, 3.7507528581125317`*^9}, 3.782659794667615*^9, 3.782710363130872*^9},ExpressionUUID->"2ded337c-97ad-4e3b-9b7d-\ 60cc51bf5c30"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"fx1", ",", "fx2"}], "}"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}]}]], "Input", CellChangeTimes->{{3.4436808471962*^9, 3.4436809538378*^9}, { 3.443681135921*^9, 3.443681156435*^9}, {3.4436932592028*^9, 3.4436934237047997`*^9}, {3.4436935689876003`*^9, 3.4436937308064003`*^9}, {3.4436938048596*^9, 3.4436938539216003`*^9}, { 3.4436938933115997`*^9, 3.4436940028859997`*^9}, {3.4436940413868*^9, 3.4436943576768*^9}, 3.569906467788733*^9, {3.6006674027727537`*^9, 3.6006674063279576`*^9}, {3.6321937953686347`*^9, 3.6321940032435246`*^9}, {3.632194047502056*^9, 3.632194108361537*^9}, { 3.686023222242097*^9, 3.686023228422106*^9}, {3.686023420882375*^9, 3.6860235613925714`*^9}, 3.686023718102791*^9, {3.686023858792988*^9, 3.6860239212530756`*^9}, {3.68602400304319*^9, 3.68602400334319*^9}, { 3.6860240896433115`*^9, 3.686024121733356*^9}, {3.6860241698034234`*^9, 3.686024192163455*^9}, 3.6874464056255856`*^9, {3.687493904712118*^9, 3.687493919452962*^9}, {3.687493953807927*^9, 3.687494423111769*^9}, 3.6874944573877296`*^9, {3.6875150024245615`*^9, 3.6875150213786454`*^9}, { 3.6875151509430504`*^9, 3.68751525041674*^9}, {3.687515698320302*^9, 3.6875160210537477`*^9}, {3.6875160733507385`*^9, 3.6875161577225647`*^9}, {3.687516650114722*^9, 3.6875166670296893`*^9}, { 3.6875169150648556`*^9, 3.687516982734726*^9}, {3.6875170234790564`*^9, 3.6875170717578106`*^9}, {3.687517189607551*^9, 3.687517212350852*^9}, { 3.687517947316862*^9, 3.687517960002588*^9}, {3.6875181788311043`*^9, 3.687518188304646*^9}, {3.6875188353286533`*^9, 3.687518873331827*^9}, 3.687521331859447*^9, {3.687521459437744*^9, 3.6875214742015886`*^9}, { 3.6877571986110735`*^9, 3.6877574332014017`*^9}, {3.687757472451456*^9, 3.6877574820714703`*^9}, {3.7505619665169616`*^9, 3.750562136247263*^9}, { 3.7505628196815586`*^9, 3.750562890357929*^9}, {3.7505629425800385`*^9, 3.750562963411825*^9}, {3.750562995094347*^9, 3.7505630239120665`*^9}, { 3.7505630659334183`*^9, 3.750563112601778*^9}, 3.7505631636962347`*^9, { 3.750564042076792*^9, 3.750564152727738*^9}, {3.7505641857639956`*^9, 3.7505641906159678`*^9}, {3.7505659451563754`*^9, 3.750566085061419*^9}, { 3.7827103775705137`*^9, 3.78271042439074*^9}, {3.7827104673152027`*^9, 3.7827104865205307`*^9}, {3.845979224615173*^9, 3.8459792257243967`*^9}}, CellLabel-> "In[357]:=",ExpressionUUID->"b2f541ae-2092-4f1f-bc80-8efb3b66ae28"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 2 (torsion mode)", "Subsubsection", CellChangeTimes->{{3.443679756257*^9, 3.4436797622318*^9}, 3.4436808360109997`*^9, 3.4751535594029493`*^9, {3.4751540447407494`*^9, 3.4751540450527496`*^9}, {3.6006660270400667`*^9, 3.600666027653102*^9}, 3.6006663585140257`*^9, 3.6321910383869467`*^9, 3.6636795589293823`*^9, { 3.6875207571905775`*^9, 3.687520761194807*^9}, {3.6876685148042345`*^9, 3.6876685204242425`*^9}, {3.6877571565810146`*^9, 3.6877571643910255`*^9}, {3.750561911146058*^9, 3.7505619176163893`*^9}, { 3.7505659158975925`*^9, 3.7505659224119425`*^9}, {3.7507528109774723`*^9, 3.7507528118918147`*^9}, 3.7826597918875985`*^9},ExpressionUUID->"ae83be4a-f6c6-478c-abca-\ b0206c744db8"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"{", RowBox[{"G1", ",", "G2"}], "}"}], "}"}], ",", RowBox[{"{", "J", "}"}], ",", RowBox[{"{", RowBox[{"mx", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}]}], "Input", CellChangeTimes->{{3.4436808471962*^9, 3.4436809538378*^9}, { 3.443681135921*^9, 3.443681156435*^9}, {3.4436932592028*^9, 3.4436934237047997`*^9}, {3.4436935689876003`*^9, 3.4436937308064003`*^9}, {3.4436938048596*^9, 3.4436938539216003`*^9}, { 3.4436938933115997`*^9, 3.4436940028859997`*^9}, {3.4436940413868*^9, 3.4436943576768*^9}, 3.569906467788733*^9, {3.6006674027727537`*^9, 3.6006674063279576`*^9}, {3.6321937953686347`*^9, 3.6321940032435246`*^9}, {3.632194047502056*^9, 3.632194108361537*^9}, { 3.686023222242097*^9, 3.686023228422106*^9}, {3.686023420882375*^9, 3.6860235613925714`*^9}, 3.686023718102791*^9, {3.686023858792988*^9, 3.6860239212530756`*^9}, {3.68602400304319*^9, 3.68602400334319*^9}, { 3.6860240896433115`*^9, 3.686024121733356*^9}, {3.6860241698034234`*^9, 3.686024192163455*^9}, 3.6874464056255856`*^9, {3.687493904712118*^9, 3.687493919452962*^9}, {3.687493953807927*^9, 3.687494423111769*^9}, 3.6874944573877296`*^9, {3.6875150024245615`*^9, 3.6875150213786454`*^9}, { 3.6875151509430504`*^9, 3.68751525041674*^9}, {3.687515698320302*^9, 3.6875160210537477`*^9}, {3.6875160733507385`*^9, 3.6875161577225647`*^9}, {3.687516650114722*^9, 3.6875166670296893`*^9}, { 3.6875169150648556`*^9, 3.687516982734726*^9}, {3.6875170234790564`*^9, 3.6875170717578106`*^9}, {3.687517189607551*^9, 3.687517212350852*^9}, { 3.687517947316862*^9, 3.687517960002588*^9}, {3.6875181788311043`*^9, 3.687518188304646*^9}, {3.6875188353286533`*^9, 3.687518873331827*^9}, 3.687521331859447*^9, {3.687521459437744*^9, 3.6875214742015886`*^9}, { 3.6877571986110735`*^9, 3.6877574332014017`*^9}, {3.687757472451456*^9, 3.6877574820714703`*^9}, {3.7505619665169616`*^9, 3.750562136247263*^9}, { 3.7505628196815586`*^9, 3.750562890357929*^9}, {3.7505629425800385`*^9, 3.750562963411825*^9}, {3.750562995094347*^9, 3.7505630239120665`*^9}, { 3.7505630659334183`*^9, 3.750563112601778*^9}, 3.7505631636962347`*^9, { 3.750564042076792*^9, 3.750564152727738*^9}, {3.7505641857639956`*^9, 3.7505641906159678`*^9}, {3.75057898594298*^9, 3.7505790034143305`*^9}, { 3.7505790504251184`*^9, 3.7505790510513926`*^9}, {3.782710548970234*^9, 3.7827105902506247`*^9}, {3.845979247295101*^9, 3.84597924840653*^9}, 3.846030661989381*^9, 3.846466457378631*^9}, CellLabel-> "In[360]:=",ExpressionUUID->"70d8a0a1-c4a1-424a-9794-fe7bb6db3bcc"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 3 (bar mode)", "Subsubsection", CellChangeTimes->{{3.443679756257*^9, 3.4436797622318*^9}, 3.4436808360109997`*^9, 3.4751535594029493`*^9, {3.4751540447407494`*^9, 3.4751540450527496`*^9}, {3.6006660270400667`*^9, 3.600666027653102*^9}, 3.6006663585140257`*^9, 3.6321910383869467`*^9, 3.6636795589293823`*^9, { 3.6875207571905775`*^9, 3.687520761194807*^9}, {3.6876685148042345`*^9, 3.6876685204242425`*^9}, {3.6877571565810146`*^9, 3.6877571643910255`*^9}, {3.750561911146058*^9, 3.7505619176163893`*^9}, { 3.750565926739056*^9, 3.7505659341120853`*^9}, {3.750752857204367*^9, 3.7507528581125317`*^9}, 3.782659794667615*^9},ExpressionUUID->"13f9d46e-e7d9-4fde-beeb-\ 47d4086e7f62"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]1", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{"fx", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]2", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{"fx", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"h", "/", "2"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"ux", "[", "1", "]"}], "+", RowBox[{"ux", "[", "2", "]"}]}], ")"}], "/", "2"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}]}]], "Input", CellChangeTimes->{{3.4436808471962*^9, 3.4436809538378*^9}, { 3.443681135921*^9, 3.443681156435*^9}, {3.4436932592028*^9, 3.4436934237047997`*^9}, {3.4436935689876003`*^9, 3.4436937308064003`*^9}, {3.4436938048596*^9, 3.4436938539216003`*^9}, { 3.4436938933115997`*^9, 3.4436940028859997`*^9}, {3.4436940413868*^9, 3.4436943576768*^9}, 3.569906467788733*^9, {3.6006674027727537`*^9, 3.6006674063279576`*^9}, {3.6321937953686347`*^9, 3.6321940032435246`*^9}, {3.632194047502056*^9, 3.632194108361537*^9}, { 3.686023222242097*^9, 3.686023228422106*^9}, {3.686023420882375*^9, 3.6860235613925714`*^9}, 3.686023718102791*^9, {3.686023858792988*^9, 3.6860239212530756`*^9}, {3.68602400304319*^9, 3.68602400334319*^9}, { 3.6860240896433115`*^9, 3.686024121733356*^9}, {3.6860241698034234`*^9, 3.686024192163455*^9}, 3.6874464056255856`*^9, {3.687493904712118*^9, 3.687493919452962*^9}, {3.687493953807927*^9, 3.687494423111769*^9}, 3.6874944573877296`*^9, {3.6875150024245615`*^9, 3.6875150213786454`*^9}, { 3.6875151509430504`*^9, 3.68751525041674*^9}, {3.687515698320302*^9, 3.6875160210537477`*^9}, {3.6875160733507385`*^9, 3.6875161577225647`*^9}, {3.687516650114722*^9, 3.6875166670296893`*^9}, { 3.6875169150648556`*^9, 3.687516982734726*^9}, {3.6875170234790564`*^9, 3.6875170717578106`*^9}, {3.687517189607551*^9, 3.687517212350852*^9}, { 3.687517947316862*^9, 3.687517960002588*^9}, {3.6875181788311043`*^9, 3.687518188304646*^9}, {3.6875188353286533`*^9, 3.687518873331827*^9}, 3.687521331859447*^9, {3.687521459437744*^9, 3.6875214742015886`*^9}, { 3.6877571986110735`*^9, 3.6877574332014017`*^9}, {3.687757472451456*^9, 3.6877574820714703`*^9}, {3.7505619665169616`*^9, 3.750562136247263*^9}, { 3.7505628196815586`*^9, 3.750562890357929*^9}, {3.7505629425800385`*^9, 3.750562963411825*^9}, {3.750562995094347*^9, 3.7505630239120665`*^9}, { 3.7505630659334183`*^9, 3.750563112601778*^9}, 3.7505631636962347`*^9, { 3.750564042076792*^9, 3.750564152727738*^9}, {3.7505641857639956`*^9, 3.7505641906159678`*^9}, {3.7505659451563754`*^9, 3.750566085061419*^9}, { 3.782710654290349*^9, 3.78271071465012*^9}, {3.8459792649525595`*^9, 3.8459792700895824`*^9}}, CellLabel-> "In[363]:=",ExpressionUUID->"d81db08b-861d-4b1d-bef5-451786deceda"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 4 (torsion)", "Subsubsection", CellChangeTimes->{{3.443679756257*^9, 3.4436797622318*^9}, 3.4436808360109997`*^9, 3.4751535594029493`*^9, {3.4751540447407494`*^9, 3.4751540450527496`*^9}, {3.6006660270400667`*^9, 3.600666027653102*^9}, 3.6006663585140257`*^9, 3.6321910383869467`*^9, 3.6636795589293823`*^9, { 3.6875207571905775`*^9, 3.687520761194807*^9}, {3.6876685148042345`*^9, 3.6876685204242425`*^9}, {3.6877571565810146`*^9, 3.6877571643910255`*^9}, {3.750561911146058*^9, 3.7505619176163893`*^9}, { 3.7505659158975925`*^9, 3.7505659224119425`*^9}, {3.7505789254448276`*^9, 3.750578929759143*^9}, {3.750579770840417*^9, 3.7505797724359093`*^9}, { 3.7507529181246862`*^9, 3.7507529186404753`*^9}, 3.7826597975552855`*^9},ExpressionUUID->"ecffd08f-9467-4ae6-8d41-\ 82171df4036c"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"{", RowBox[{"G1", ",", "G2"}], "}"}], "}"}], ",", RowBox[{"{", "J", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", RowBox[{"-", "M"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}]}]], "Input", CellChangeTimes->{{3.4436808471962*^9, 3.4436809538378*^9}, { 3.443681135921*^9, 3.443681156435*^9}, {3.4436932592028*^9, 3.4436934237047997`*^9}, {3.4436935689876003`*^9, 3.4436937308064003`*^9}, {3.4436938048596*^9, 3.4436938539216003`*^9}, { 3.4436938933115997`*^9, 3.4436940028859997`*^9}, {3.4436940413868*^9, 3.4436943576768*^9}, 3.569906467788733*^9, {3.6006674027727537`*^9, 3.6006674063279576`*^9}, {3.6321937953686347`*^9, 3.6321940032435246`*^9}, {3.632194047502056*^9, 3.632194108361537*^9}, { 3.686023222242097*^9, 3.686023228422106*^9}, {3.686023420882375*^9, 3.6860235613925714`*^9}, 3.686023718102791*^9, {3.686023858792988*^9, 3.6860239212530756`*^9}, {3.68602400304319*^9, 3.68602400334319*^9}, { 3.6860240896433115`*^9, 3.686024121733356*^9}, {3.6860241698034234`*^9, 3.686024192163455*^9}, 3.6874464056255856`*^9, {3.687493904712118*^9, 3.687493919452962*^9}, {3.687493953807927*^9, 3.687494423111769*^9}, 3.6874944573877296`*^9, {3.6875150024245615`*^9, 3.6875150213786454`*^9}, { 3.6875151509430504`*^9, 3.68751525041674*^9}, {3.687515698320302*^9, 3.6875160210537477`*^9}, {3.6875160733507385`*^9, 3.6875161577225647`*^9}, {3.687516650114722*^9, 3.6875166670296893`*^9}, { 3.6875169150648556`*^9, 3.687516982734726*^9}, {3.6875170234790564`*^9, 3.6875170717578106`*^9}, {3.687517189607551*^9, 3.687517212350852*^9}, { 3.687517947316862*^9, 3.687517960002588*^9}, {3.6875181788311043`*^9, 3.687518188304646*^9}, {3.6875188353286533`*^9, 3.687518873331827*^9}, 3.687521331859447*^9, {3.687521459437744*^9, 3.6875214742015886`*^9}, { 3.6877571986110735`*^9, 3.6877574332014017`*^9}, {3.687757472451456*^9, 3.6877574820714703`*^9}, {3.7505619665169616`*^9, 3.750562136247263*^9}, { 3.7505628196815586`*^9, 3.750562890357929*^9}, {3.7505629425800385`*^9, 3.750562963411825*^9}, {3.750562995094347*^9, 3.7505630239120665`*^9}, { 3.7505630659334183`*^9, 3.750563112601778*^9}, 3.7505631636962347`*^9, { 3.750564042076792*^9, 3.750564152727738*^9}, {3.7505641857639956`*^9, 3.7505641906159678`*^9}, {3.7505791099855146`*^9, 3.7505791559679317`*^9}, {3.750579542389488*^9, 3.7505796130522037`*^9}, { 3.7505796720954795`*^9, 3.7505797072586193`*^9}, {3.750579765832862*^9, 3.750579766232874*^9}, 3.7507535393582745`*^9, {3.78271076552037*^9, 3.782710793460365*^9}, {3.7827108264003487`*^9, 3.782710861734082*^9}, { 3.845979291055648*^9, 3.8459792916633863`*^9}, 3.8464666143121386`*^9}, CellLabel-> "In[370]:=",ExpressionUUID->"67aadb41-e8e9-46fe-abd0-0b623ab79ccc"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 5 (bar)", "Subsubsection", CellChangeTimes->{{3.443679756257*^9, 3.4436797622318*^9}, 3.4436808360109997`*^9, 3.4751535594029493`*^9, {3.4751540447407494`*^9, 3.4751540450527496`*^9}, {3.6006660270400667`*^9, 3.600666027653102*^9}, 3.6006663585140257`*^9, 3.6321910383869467`*^9, 3.6636795589293823`*^9, { 3.6875207571905775`*^9, 3.687520761194807*^9}, {3.6876685148042345`*^9, 3.6876685204242425`*^9}, {3.6877571565810146`*^9, 3.6877571643910255`*^9}, {3.750561911146058*^9, 3.7505619176163893`*^9}, { 3.7505659158975925`*^9, 3.7505659224119425`*^9}, {3.7505789254448276`*^9, 3.750578929759143*^9}, {3.750579770840417*^9, 3.7505797907432437`*^9}, 3.782659803011798*^9, {3.7827111005215473`*^9, 3.7827111013316174`*^9}},ExpressionUUID->"89fc2b7d-250d-4fdb-9348-\ 8c68b312b2d9"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Rho]", " ", "A", " ", "g"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}]}]], "Input", CellChangeTimes->{{3.4436808471962*^9, 3.4436809538378*^9}, { 3.443681135921*^9, 3.443681156435*^9}, {3.4436932592028*^9, 3.4436934237047997`*^9}, {3.4436935689876003`*^9, 3.4436937308064003`*^9}, {3.4436938048596*^9, 3.4436938539216003`*^9}, { 3.4436938933115997`*^9, 3.4436940028859997`*^9}, {3.4436940413868*^9, 3.4436943576768*^9}, 3.569906467788733*^9, {3.6006674027727537`*^9, 3.6006674063279576`*^9}, {3.6321937953686347`*^9, 3.6321940032435246`*^9}, {3.632194047502056*^9, 3.632194108361537*^9}, { 3.686023222242097*^9, 3.686023228422106*^9}, {3.686023420882375*^9, 3.6860235613925714`*^9}, 3.686023718102791*^9, {3.686023858792988*^9, 3.6860239212530756`*^9}, {3.68602400304319*^9, 3.68602400334319*^9}, { 3.6860240896433115`*^9, 3.686024121733356*^9}, {3.6860241698034234`*^9, 3.686024192163455*^9}, 3.6874464056255856`*^9, {3.687493904712118*^9, 3.687493919452962*^9}, {3.687493953807927*^9, 3.687494423111769*^9}, 3.6874944573877296`*^9, {3.6875150024245615`*^9, 3.6875150213786454`*^9}, { 3.6875151509430504`*^9, 3.68751525041674*^9}, {3.687515698320302*^9, 3.6875160210537477`*^9}, {3.6875160733507385`*^9, 3.6875161577225647`*^9}, {3.687516650114722*^9, 3.6875166670296893`*^9}, { 3.6875169150648556`*^9, 3.687516982734726*^9}, {3.6875170234790564`*^9, 3.6875170717578106`*^9}, {3.687517189607551*^9, 3.687517212350852*^9}, { 3.687517947316862*^9, 3.687517960002588*^9}, {3.6875181788311043`*^9, 3.687518188304646*^9}, {3.6875188353286533`*^9, 3.687518873331827*^9}, 3.687521331859447*^9, {3.687521459437744*^9, 3.6875214742015886`*^9}, { 3.6877571986110735`*^9, 3.6877574332014017`*^9}, {3.687757472451456*^9, 3.6877574820714703`*^9}, {3.7505619665169616`*^9, 3.750562136247263*^9}, { 3.7505628196815586`*^9, 3.750562890357929*^9}, {3.7505629425800385`*^9, 3.750562963411825*^9}, {3.750562995094347*^9, 3.7505630239120665`*^9}, { 3.7505630659334183`*^9, 3.750563112601778*^9}, 3.7505631636962347`*^9, { 3.750564042076792*^9, 3.750564152727738*^9}, {3.7505641857639956`*^9, 3.7505641906159678`*^9}, {3.7505791099855146`*^9, 3.7505791559679317`*^9}, {3.750579542389488*^9, 3.7505796130522037`*^9}, { 3.7505796720954795`*^9, 3.7505797072586193`*^9}, {3.750579765832862*^9, 3.750579766232874*^9}, {3.750579802867135*^9, 3.7505798722541504`*^9}, 3.75075350410437*^9, {3.7827109362140217`*^9, 3.7827109631539116`*^9}, { 3.84597931608607*^9, 3.8459793172203665`*^9}}, CellLabel-> "In[374]:=",ExpressionUUID->"ca186689-2625-4785-af81-eb1bd496d0b9"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 6 (bar)", "Subsubsection", CellChangeTimes->{{3.443679756257*^9, 3.4436797622318*^9}, 3.4436808360109997`*^9, 3.4751535594029493`*^9, {3.4751540447407494`*^9, 3.4751540450527496`*^9}, {3.6006660270400667`*^9, 3.600666027653102*^9}, 3.6006663585140257`*^9, 3.6321910383869467`*^9, 3.6636795589293823`*^9, { 3.6875207571905775`*^9, 3.687520761194807*^9}, {3.6876685148042345`*^9, 3.6876685204242425`*^9}, {3.6877571565810146`*^9, 3.6877571643910255`*^9}, {3.750561911146058*^9, 3.7505619176163893`*^9}, { 3.7505659158975925`*^9, 3.7505659224119425`*^9}, {3.7505789254448276`*^9, 3.750578929759143*^9}, {3.750579770840417*^9, 3.7505797907432437`*^9}, 3.750580076696847*^9, 3.7826598053639565`*^9, 3.782711104411296*^9},ExpressionUUID->"f720aaca-2844-4acd-8217-\ 41877b76c96d"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Rho]", " ", "A", " ", SuperscriptBox["\[Omega]", "2"], RowBox[{"{", RowBox[{"0", ",", "L"}], "}"}]}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}]}]], "Input", CellChangeTimes->{{3.4436808471962*^9, 3.4436809538378*^9}, { 3.443681135921*^9, 3.443681156435*^9}, {3.4436932592028*^9, 3.4436934237047997`*^9}, {3.4436935689876003`*^9, 3.4436937308064003`*^9}, {3.4436938048596*^9, 3.4436938539216003`*^9}, { 3.4436938933115997`*^9, 3.4436940028859997`*^9}, {3.4436940413868*^9, 3.4436943576768*^9}, 3.569906467788733*^9, {3.6006674027727537`*^9, 3.6006674063279576`*^9}, {3.6321937953686347`*^9, 3.6321940032435246`*^9}, {3.632194047502056*^9, 3.632194108361537*^9}, { 3.686023222242097*^9, 3.686023228422106*^9}, {3.686023420882375*^9, 3.6860235613925714`*^9}, 3.686023718102791*^9, {3.686023858792988*^9, 3.6860239212530756`*^9}, {3.68602400304319*^9, 3.68602400334319*^9}, { 3.6860240896433115`*^9, 3.686024121733356*^9}, {3.6860241698034234`*^9, 3.686024192163455*^9}, 3.6874464056255856`*^9, {3.687493904712118*^9, 3.687493919452962*^9}, {3.687493953807927*^9, 3.687494423111769*^9}, 3.6874944573877296`*^9, {3.6875150024245615`*^9, 3.6875150213786454`*^9}, { 3.6875151509430504`*^9, 3.68751525041674*^9}, {3.687515698320302*^9, 3.6875160210537477`*^9}, {3.6875160733507385`*^9, 3.6875161577225647`*^9}, {3.687516650114722*^9, 3.6875166670296893`*^9}, { 3.6875169150648556`*^9, 3.687516982734726*^9}, {3.6875170234790564`*^9, 3.6875170717578106`*^9}, {3.687517189607551*^9, 3.687517212350852*^9}, { 3.687517947316862*^9, 3.687517960002588*^9}, {3.6875181788311043`*^9, 3.687518188304646*^9}, {3.6875188353286533`*^9, 3.687518873331827*^9}, 3.687521331859447*^9, {3.687521459437744*^9, 3.6875214742015886`*^9}, { 3.6877571986110735`*^9, 3.6877574332014017`*^9}, {3.687757472451456*^9, 3.6877574820714703`*^9}, {3.7505619665169616`*^9, 3.750562136247263*^9}, { 3.7505628196815586`*^9, 3.750562890357929*^9}, {3.7505629425800385`*^9, 3.750562963411825*^9}, {3.750562995094347*^9, 3.7505630239120665`*^9}, { 3.7505630659334183`*^9, 3.750563112601778*^9}, 3.7505631636962347`*^9, { 3.750564042076792*^9, 3.750564152727738*^9}, {3.7505641857639956`*^9, 3.7505641906159678`*^9}, {3.7505791099855146`*^9, 3.7505791559679317`*^9}, {3.750579542389488*^9, 3.7505796130522037`*^9}, { 3.7505796720954795`*^9, 3.7505797072586193`*^9}, {3.750579765832862*^9, 3.750579766232874*^9}, {3.750579802867135*^9, 3.7505798722541504`*^9}, 3.7505800846538973`*^9, {3.7505801357713585`*^9, 3.7505802043807445`*^9}, { 3.7505802503265038`*^9, 3.7505804196446767`*^9}, 3.7505805534015827`*^9, { 3.7507532856705427`*^9, 3.750753460826091*^9}, {3.782711115741482*^9, 3.782711142811342*^9}, {3.8459793347899704`*^9, 3.845979336014468*^9}}, CellLabel-> "In[378]:=",ExpressionUUID->"4033240f-3788-42b3-9443-2ad62b677427"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 7 (bar)", "Subsubsection", CellChangeTimes->{{3.443679756257*^9, 3.4436797622318*^9}, 3.4436808360109997`*^9, 3.4751535594029493`*^9, {3.4751540447407494`*^9, 3.4751540450527496`*^9}, {3.6006660270400667`*^9, 3.600666027653102*^9}, 3.6006663585140257`*^9, 3.6321910383869467`*^9, 3.6636795589293823`*^9, { 3.6875207571905775`*^9, 3.687520761194807*^9}, {3.6876685148042345`*^9, 3.6876685204242425`*^9}, {3.6877571565810146`*^9, 3.6877571643910255`*^9}, {3.750561911146058*^9, 3.7505619176163893`*^9}, { 3.7505659158975925`*^9, 3.7505659224119425`*^9}, {3.7505789254448276`*^9, 3.750578929759143*^9}, {3.750579770840417*^9, 3.7505797907432437`*^9}, 3.750580998214035*^9, 3.782659807563279*^9, {3.782711172559081*^9, 3.7827111734913597`*^9}},ExpressionUUID->"6e6d4dac-e66b-4531-aa28-\ 6e208a29b2e5"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Rho]", " ", "g", " ", "A"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], " ", ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"L", "/", "2"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], " ", ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], " ", "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"uX", "[", "3", "]"}], " ", "/.", " ", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}]}], "Input", CellChangeTimes->{{3.4436808471962*^9, 3.4436809538378*^9}, { 3.443681135921*^9, 3.443681156435*^9}, {3.4436932592028*^9, 3.4436934237047997`*^9}, {3.4436935689876003`*^9, 3.4436937308064003`*^9}, {3.4436938048596*^9, 3.4436938539216003`*^9}, { 3.4436938933115997`*^9, 3.4436940028859997`*^9}, {3.4436940413868*^9, 3.4436943576768*^9}, 3.569906467788733*^9, {3.6006674027727537`*^9, 3.6006674063279576`*^9}, {3.6321937953686347`*^9, 3.6321940032435246`*^9}, {3.632194047502056*^9, 3.632194108361537*^9}, { 3.686023222242097*^9, 3.686023228422106*^9}, {3.686023420882375*^9, 3.6860235613925714`*^9}, 3.686023718102791*^9, {3.686023858792988*^9, 3.6860239212530756`*^9}, {3.68602400304319*^9, 3.68602400334319*^9}, { 3.6860240896433115`*^9, 3.686024121733356*^9}, {3.6860241698034234`*^9, 3.686024192163455*^9}, 3.6874464056255856`*^9, {3.687493904712118*^9, 3.687493919452962*^9}, {3.687493953807927*^9, 3.687494423111769*^9}, 3.6874944573877296`*^9, {3.6875150024245615`*^9, 3.6875150213786454`*^9}, { 3.6875151509430504`*^9, 3.68751525041674*^9}, {3.687515698320302*^9, 3.6875160210537477`*^9}, {3.6875160733507385`*^9, 3.6875161577225647`*^9}, {3.687516650114722*^9, 3.6875166670296893`*^9}, { 3.6875169150648556`*^9, 3.687516982734726*^9}, {3.6875170234790564`*^9, 3.6875170717578106`*^9}, {3.687517189607551*^9, 3.687517212350852*^9}, { 3.687517947316862*^9, 3.687517960002588*^9}, {3.6875181788311043`*^9, 3.687518188304646*^9}, {3.6875188353286533`*^9, 3.687518873331827*^9}, 3.687521331859447*^9, {3.687521459437744*^9, 3.6875214742015886`*^9}, { 3.6877571986110735`*^9, 3.6877574332014017`*^9}, {3.687757472451456*^9, 3.6877574820714703`*^9}, {3.7505619665169616`*^9, 3.750562136247263*^9}, { 3.7505628196815586`*^9, 3.750562890357929*^9}, {3.7505629425800385`*^9, 3.750562963411825*^9}, {3.750562995094347*^9, 3.7505630239120665`*^9}, { 3.7505630659334183`*^9, 3.750563112601778*^9}, 3.7505631636962347`*^9, { 3.750564042076792*^9, 3.750564152727738*^9}, {3.7505641857639956`*^9, 3.7505641906159678`*^9}, {3.7505791099855146`*^9, 3.7505791559679317`*^9}, {3.750579542389488*^9, 3.7505796130522037`*^9}, { 3.7505796720954795`*^9, 3.7505797072586193`*^9}, {3.750579765832862*^9, 3.750579766232874*^9}, {3.750579802867135*^9, 3.7505798722541504`*^9}, 3.7505810501237736`*^9, {3.7505810840064735`*^9, 3.750581089755114*^9}, { 3.7827112012610683`*^9, 3.782711239831455*^9}, {3.8459793578950243`*^9, 3.8459793592882895`*^9}}, CellLabel-> "In[382]:=",ExpressionUUID->"64775a4c-73a6-4d2b-b5f7-126d1397bde3"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 8 (beam bending )", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430753426703997`*^9, 3.4430753634028*^9}, 3.4430770141963997`*^9, 3.4742603407157393`*^9, {3.600666351963651*^9, 3.6006663781981516`*^9}, 3.6321880085476494`*^9, 3.6636795657621937`*^9, {3.6874157308398046`*^9, 3.6874157382298145`*^9}, {3.6875990980906777`*^9, 3.687599101560683*^9}, { 3.687599789631646*^9, 3.6875997922216496`*^9}, 3.750510479053434*^9, { 3.7505811542400494`*^9, 3.7505811936995697`*^9}, {3.750753700420952*^9, 3.7507537086963844`*^9}, 3.782659810242653*^9},ExpressionUUID->"4e63966a-3ccd-4df9-adfc-\ 58e33ec8c761"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "M", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " ", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430753715772*^9, 3.4430754825088*^9}, { 3.4430755569208*^9, 3.4430756008816*^9}, {3.4430770228856*^9, 3.4430770663784*^9}, {3.4430771036935997`*^9, 3.4430771281387997`*^9}, { 3.4430774685931997`*^9, 3.4430774744588003`*^9}, {3.631886640185182*^9, 3.6318867801798277`*^9}, {3.631886811395483*^9, 3.6318868532971563`*^9}, { 3.63188689538603*^9, 3.631886911126458*^9}, 3.632220880961799*^9, { 3.6635854561992054`*^9, 3.6635854723021264`*^9}, {3.685947722189886*^9, 3.6859480185078344`*^9}, {3.6859480495976124`*^9, 3.6859481066958785`*^9}, {3.6859482534012694`*^9, 3.6859482744204717`*^9}, {3.685948346996623*^9, 3.6859483521469173`*^9}, { 3.6859486889111795`*^9, 3.6859487382179995`*^9}, {3.6874157463798265`*^9, 3.687415778329871*^9}, {3.687415861979988*^9, 3.687415898030039*^9}, { 3.6874213041776075`*^9, 3.687421314837622*^9}, {3.6875991104306955`*^9, 3.68759922084085*^9}, {3.687599258320902*^9, 3.687599276800928*^9}, { 3.6875994307911434`*^9, 3.687599436341151*^9}, {3.6875997994616594`*^9, 3.6875998920817895`*^9}, {3.68774648180365*^9, 3.6877465313837194`*^9}, { 3.7192413363579865`*^9, 3.719241337121456*^9}, {3.750510494907881*^9, 3.7505105614605274`*^9}, {3.750581226082611*^9, 3.7505812652141*^9}, { 3.7827112890602274`*^9, 3.782711335160014*^9}, {3.845979382846133*^9, 3.8459793841884236`*^9}}, CellLabel-> "In[386]:=",ExpressionUUID->"6fc8f471-7686-4996-8ee5-ff3e0dc65083"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 9 (shape functions )", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430753426703997`*^9, 3.4430753634028*^9}, 3.4430770141963997`*^9, 3.4742603407157393`*^9, {3.600666351963651*^9, 3.6006663781981516`*^9}, 3.6321880085476494`*^9, 3.6636795657621937`*^9, {3.6874157308398046`*^9, 3.6874157382298145`*^9}, {3.6875990980906777`*^9, 3.687599101560683*^9}, { 3.687599789631646*^9, 3.6875997922216496`*^9}, 3.750510479053434*^9, { 3.7505811542400494`*^9, 3.750581171579791*^9}, {3.7507537197785788`*^9, 3.750753725500464*^9}, 3.7826598126184177`*^9, {3.7827179828730965`*^9, 3.78271798737152*^9}},ExpressionUUID->"d73b733e-ba28-454e-b105-\ 7f6cd2aed1b5"], Cell[BoxData[{ RowBox[{ RowBox[{"SHAPES2", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "x", ",", "y"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "h"}]}], "}"}], ",", RowBox[{"{", RowBox[{"h", ",", RowBox[{"-", "h"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}]}], "}"}]}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SHAPES2", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "x", ",", "y"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"h", ",", RowBox[{"-", "h"}]}], "}"}], ",", RowBox[{"{", RowBox[{"h", ",", "0"}], "}"}]}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430753715772*^9, 3.4430754825088*^9}, { 3.4430755569208*^9, 3.4430756008816*^9}, {3.4430770228856*^9, 3.4430770663784*^9}, {3.4430771036935997`*^9, 3.4430771281387997`*^9}, { 3.4430774685931997`*^9, 3.4430774744588003`*^9}, {3.631886640185182*^9, 3.6318867801798277`*^9}, {3.631886811395483*^9, 3.6318868532971563`*^9}, { 3.63188689538603*^9, 3.631886911126458*^9}, 3.632220880961799*^9, { 3.6635854561992054`*^9, 3.6635854723021264`*^9}, {3.685947722189886*^9, 3.6859480185078344`*^9}, {3.6859480495976124`*^9, 3.6859481066958785`*^9}, {3.6859482534012694`*^9, 3.6859482744204717`*^9}, {3.685948346996623*^9, 3.6859483521469173`*^9}, { 3.6859486889111795`*^9, 3.6859487382179995`*^9}, {3.6874157463798265`*^9, 3.687415778329871*^9}, {3.687415861979988*^9, 3.687415898030039*^9}, { 3.6874213041776075`*^9, 3.687421314837622*^9}, {3.6875991104306955`*^9, 3.68759922084085*^9}, {3.687599258320902*^9, 3.687599276800928*^9}, { 3.6875994307911434`*^9, 3.687599436341151*^9}, {3.6875997994616594`*^9, 3.6875998920817895`*^9}, {3.68774648180365*^9, 3.6877465313837194`*^9}, { 3.7192413363579865`*^9, 3.719241337121456*^9}, {3.750510494907881*^9, 3.7505105614605274`*^9}, {3.750581351975045*^9, 3.7505814225991716`*^9}, { 3.7827179928861876`*^9, 3.78271805327505*^9}, {3.782718119954771*^9, 3.7827181456003895`*^9}, {3.78271818509567*^9, 3.782718225739417*^9}}, CellLabel-> "In[390]:=",ExpressionUUID->"f4358e0d-6acd-41ce-baa0-458206f7af24"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 10 (shape functions)", "Subsubsection", CellChangeTimes->{{3.4444393346048*^9, 3.4444393512032003`*^9}, { 3.6018122641967864`*^9, 3.6018122767548084`*^9}, 3.601814557276416*^9, 3.6022333243607655`*^9, 3.6022342077215185`*^9, 3.602234294504471*^9, { 3.6877467093739686`*^9, 3.6877467095139685`*^9}, {3.750581539743651*^9, 3.7505815398373814`*^9}, {3.750754308694276*^9, 3.7507543094107695`*^9}, 3.7826598179096603`*^9},ExpressionUUID->"549ba8ca-d820-453c-a0f8-\ 018e836dd0ac"], Cell[BoxData[{ RowBox[{ RowBox[{"ver", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "h"}], "/", "2"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"h", "/", "2"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "h"}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[CapitalOmega]", "=", RowBox[{"Triangle", "[", "ver", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"uu", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"SHAPES2", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "x", ",", "y"}], "}"}], ",", "ver"}], "]"}], ".", RowBox[{"{", RowBox[{"a", ",", RowBox[{"-", "a"}], ",", RowBox[{"2", " ", "a"}]}], "}"}]}], "]"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "uu"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "uu"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"Integrate", "[", RowBox[{"uu", ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], "\[CapitalOmega]"}], ",", RowBox[{"Assumptions", "\[Rule]", RowBox[{"h", ">", "0"}]}]}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4444394155376*^9, 3.4444394296400003`*^9}, 3.4444395284192*^9, {3.444439820422*^9, 3.4444398548044*^9}, { 3.6018122988912477`*^9, 3.6018124350014863`*^9}, {3.6018124741731553`*^9, 3.601812490865185*^9}, {3.6018125305516543`*^9, 3.6018125546536965`*^9}, { 3.6018126174282064`*^9, 3.6018126378642426`*^9}, {3.6018126786739144`*^9, 3.601812742306426*^9}, {3.6018128387457952`*^9, 3.6018128626918373`*^9}, { 3.6018129226895432`*^9, 3.601813010876498*^9}, {3.6018130418581524`*^9, 3.6018131642715673`*^9}, {3.601813205034439*^9, 3.601813425494026*^9}, { 3.601813512448579*^9, 3.601813555801055*^9}, {3.601813764309823*^9, 3.6018137710334344`*^9}, {3.6018140333322954`*^9, 3.6018140528791294`*^9}, {3.6018145657316303`*^9, 3.6018147404363375`*^9}, {3.601814774023196*^9, 3.601814782197611*^9}, { 3.6018148332097*^9, 3.6018149333774757`*^9}, {3.601814967806737*^9, 3.6018151916515293`*^9}, {3.601815244348422*^9, 3.601815250479233*^9}, { 3.601815514650097*^9, 3.6018155326057286`*^9}, {3.6018155739458013`*^9, 3.601815606721459*^9}, {3.6022335292451267`*^9, 3.6022335296819277`*^9}, { 3.6022335728472033`*^9, 3.602233829686054*^9}, 3.60223402070839*^9, { 3.6022340618924627`*^9, 3.6022340620172625`*^9}, {3.6022341439642067`*^9, 3.602234156849829*^9}, {3.602234204695113*^9, 3.602234217206335*^9}, { 3.602234290214463*^9, 3.602234302554085*^9}, {3.6022343660773964`*^9, 3.6022344318471117`*^9}, {3.6022344729843845`*^9, 3.6022344749343877`*^9}, {3.633919936325143*^9, 3.633919949520898*^9}, { 3.6877467564440346`*^9, 3.6877469222242665`*^9}, {3.6877517223390765`*^9, 3.687751726919083*^9}, 3.6877517582391267`*^9, {3.687751806249194*^9, 3.6877518650892763`*^9}, {3.6877519436493864`*^9, 3.6877519463393903`*^9}, {3.7827182789678555`*^9, 3.782718649002737*^9}}, CellLabel-> "In[392]:=",ExpressionUUID->"b174df43-0239-434e-8c90-a97da75f75ca"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 1 (bar)", "Subsubsection", CellChangeTimes->{{3.443679756257*^9, 3.4436797622318*^9}, 3.4436808360109997`*^9, 3.4751535594029493`*^9, {3.4751540447407494`*^9, 3.4751540450527496`*^9}, {3.6006660270400667`*^9, 3.600666027653102*^9}, 3.6006663585140257`*^9, 3.6321910383869467`*^9, 3.6636795589293823`*^9, { 3.6875207571905775`*^9, 3.687520761194807*^9}, {3.6876685148042345`*^9, 3.6876685204242425`*^9}, {3.6877571565810146`*^9, 3.6877571643910255`*^9}, 3.750581572797803*^9, {3.7505818362360835`*^9, 3.750581844249834*^9}, { 3.750581940696036*^9, 3.7505819445545454`*^9}, {3.750753999063446*^9, 3.7507539998866377`*^9}, {3.78270783583883*^9, 3.782707836291849*^9}},ExpressionUUID->"8a10cc41-d9ff-456f-9327-\ 10b5c120a45f"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{"fx1", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}], ",", RowBox[{"{", RowBox[{"fx2", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"h", "/", "2"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"ux", "[", "1", "]"}], "+", RowBox[{"ux", "[", "2", "]"}]}], ")"}], "/", "2"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}]}]], "Input", CellChangeTimes->{{3.4436808471962*^9, 3.4436809538378*^9}, { 3.443681135921*^9, 3.443681156435*^9}, {3.4436932592028*^9, 3.4436934237047997`*^9}, {3.4436935689876003`*^9, 3.4436937308064003`*^9}, {3.4436938048596*^9, 3.4436938539216003`*^9}, { 3.4436938933115997`*^9, 3.4436940028859997`*^9}, {3.4436940413868*^9, 3.4436943576768*^9}, 3.569906467788733*^9, {3.6006674027727537`*^9, 3.6006674063279576`*^9}, {3.6321937953686347`*^9, 3.6321940032435246`*^9}, {3.632194047502056*^9, 3.632194108361537*^9}, { 3.686023222242097*^9, 3.686023228422106*^9}, {3.686023420882375*^9, 3.6860235613925714`*^9}, 3.686023718102791*^9, {3.686023858792988*^9, 3.6860239212530756`*^9}, {3.68602400304319*^9, 3.68602400334319*^9}, { 3.6860240896433115`*^9, 3.686024121733356*^9}, {3.6860241698034234`*^9, 3.686024192163455*^9}, 3.6874464056255856`*^9, {3.687493904712118*^9, 3.687493919452962*^9}, {3.687493953807927*^9, 3.687494423111769*^9}, 3.6874944573877296`*^9, {3.6875150024245615`*^9, 3.6875150213786454`*^9}, { 3.6875151509430504`*^9, 3.68751525041674*^9}, {3.687515698320302*^9, 3.6875160210537477`*^9}, {3.6875160733507385`*^9, 3.6875161577225647`*^9}, {3.687516650114722*^9, 3.6875166670296893`*^9}, { 3.6875169150648556`*^9, 3.687516982734726*^9}, {3.6875170234790564`*^9, 3.6875170717578106`*^9}, {3.687517189607551*^9, 3.687517212350852*^9}, { 3.687517947316862*^9, 3.687517960002588*^9}, {3.6875181788311043`*^9, 3.687518188304646*^9}, {3.6875188353286533`*^9, 3.687518873331827*^9}, 3.687521331859447*^9, {3.687521459437744*^9, 3.6875214742015886`*^9}, { 3.6877571986110735`*^9, 3.6877574332014017`*^9}, {3.687757472451456*^9, 3.6877574820714703`*^9}, {3.750581876039261*^9, 3.750581930042222*^9}, { 3.7827078522971115`*^9, 3.7827079479570513`*^9}, {3.8459794422007084`*^9, 3.8459794470096245`*^9}}, CellLabel-> "In[398]:=",ExpressionUUID->"bd18828c-2f58-4e30-b582-171015f8e643"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 2 (beam bending )", "Subsubsection", CellChangeTimes->{{3.4430685047746*^9, 3.4430685067558002`*^9}, { 3.4430753426703997`*^9, 3.4430753634028*^9}, 3.4430770141963997`*^9, 3.4742603407157393`*^9, {3.600666351963651*^9, 3.6006663781981516`*^9}, 3.6321880085476494`*^9, 3.6636795657621937`*^9, {3.6874157308398046`*^9, 3.6874157382298145`*^9}, {3.6875990980906777`*^9, 3.687599101560683*^9}, { 3.687599789631646*^9, 3.6875997922216496`*^9}, 3.750510479053434*^9, { 3.7505811542400494`*^9, 3.750581171579791*^9}, {3.7507537197785788`*^9, 3.750753725500464*^9}, {3.750754355267947*^9, 3.7507543598680077`*^9}, 3.7826307999382095`*^9},ExpressionUUID->"a2506154-f78e-49eb-8843-\ ae6c67548dd3"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "f"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " ", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}]}], "Input", CellChangeTimes->{ 3.4426469719054456`*^9, {3.4430685207022*^9, 3.4430685918694*^9}, { 3.4430686602608*^9, 3.44306866271*^9}, {3.4430687542864*^9, 3.4430688359955997`*^9}, {3.4430753715772*^9, 3.4430754825088*^9}, { 3.4430755569208*^9, 3.4430756008816*^9}, {3.4430770228856*^9, 3.4430770663784*^9}, {3.4430771036935997`*^9, 3.4430771281387997`*^9}, { 3.4430774685931997`*^9, 3.4430774744588003`*^9}, {3.631886640185182*^9, 3.6318867801798277`*^9}, {3.631886811395483*^9, 3.6318868532971563`*^9}, { 3.63188689538603*^9, 3.631886911126458*^9}, 3.632220880961799*^9, { 3.6635854561992054`*^9, 3.6635854723021264`*^9}, {3.685947722189886*^9, 3.6859480185078344`*^9}, {3.6859480495976124`*^9, 3.6859481066958785`*^9}, {3.6859482534012694`*^9, 3.6859482744204717`*^9}, {3.685948346996623*^9, 3.6859483521469173`*^9}, { 3.6859486889111795`*^9, 3.6859487382179995`*^9}, {3.6874157463798265`*^9, 3.687415778329871*^9}, {3.687415861979988*^9, 3.687415898030039*^9}, { 3.6874213041776075`*^9, 3.687421314837622*^9}, {3.6875991104306955`*^9, 3.68759922084085*^9}, {3.687599258320902*^9, 3.687599276800928*^9}, { 3.6875994307911434`*^9, 3.687599436341151*^9}, {3.6875997994616594`*^9, 3.6875998920817895`*^9}, {3.68774648180365*^9, 3.6877465313837194`*^9}, { 3.7192413363579865`*^9, 3.719241337121456*^9}, {3.750510494907881*^9, 3.7505105614605274`*^9}, {3.750581351975045*^9, 3.7505814225991716`*^9}, { 3.7507543721196623`*^9, 3.7507544653364305`*^9}, {3.7826308120023527`*^9, 3.782630834826322*^9}}, CellLabel-> "In[401]:=",ExpressionUUID->"18f5637e-f583-47e1-aa91-8890c6873082"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 3 (shape functions)", "Subsubsection", CellChangeTimes->{{3.443679756257*^9, 3.4436797622318*^9}, 3.4436808360109997`*^9, 3.4751535594029493`*^9, {3.4751540447407494`*^9, 3.4751540450527496`*^9}, {3.6006660270400667`*^9, 3.600666027653102*^9}, 3.6006663585140257`*^9, 3.6321910383869467`*^9, 3.6636795589293823`*^9, { 3.6875207571905775`*^9, 3.687520761194807*^9}, {3.6876685148042345`*^9, 3.6876685204242425`*^9}, {3.749628860913476*^9, 3.7496288663579645`*^9}, 3.7496994923944416`*^9, {3.7507540809074497`*^9, 3.7507540866831155`*^9}, 3.782630877210558*^9, {3.782630929089062*^9, 3.782630933116787*^9}},ExpressionUUID->"0be269f7-d5f6-4951-9eb0-\ 81126e80da3a"], Cell[BoxData[{ RowBox[{ RowBox[{"NN", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", RowBox[{"2", "/", "3"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", RowBox[{"1", "/", "2"}]}], "}"}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{"1", ",", "\[Xi]", ",", "\[Eta]"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", "NN", "]"}]}], "Input", CellChangeTimes->{{3.4436798248501997`*^9, 3.4436798429618*^9}, { 3.443679898061*^9, 3.4436799888686*^9}, {3.4436801692514*^9, 3.4436801991098003`*^9}, 3.443680378775*^9, {3.4436804193974*^9, 3.4436804370566*^9}, 3.6006660683034267`*^9, {3.6318882390863276`*^9, 3.631888248789544*^9}, {3.6318888523390045`*^9, 3.6318889287011385`*^9}, { 3.631888959277192*^9, 3.6318889956252565`*^9}, 3.6318892166152444`*^9, { 3.6318892804661565`*^9, 3.6318892814801583`*^9}, {3.631889317734622*^9, 3.631889323959033*^9}, {3.631889414080391*^9, 3.6318894734852953`*^9}, { 3.6318895695658646`*^9, 3.631889576336276*^9}, {3.6318896192051516`*^9, 3.6318896215607557`*^9}, {3.63188970927971*^9, 3.631889709934911*^9}, { 3.632190742688033*^9, 3.6321907489713926`*^9}, {3.632190921438257*^9, 3.632190943394513*^9}, {3.6321912567764378`*^9, 3.632191262218749*^9}, { 3.6321913668477335`*^9, 3.6321913716630087`*^9}, {3.685952813676102*^9, 3.6859528607797966`*^9}, {3.68595290787049*^9, 3.6859533988145704`*^9}, { 3.685953517748373*^9, 3.6859535591427402`*^9}, 3.685965506548236*^9, { 3.6859655476582937`*^9, 3.6859655504682975`*^9}, {3.685965631278411*^9, 3.685965634198415*^9}, {3.6859658476887136`*^9, 3.6859659061787953`*^9}, { 3.685966268959303*^9, 3.685966274369311*^9}, 3.6860125052055483`*^9, { 3.6876698089360466`*^9, 3.687669930876217*^9}, {3.687669965616266*^9, 3.6876699690562706`*^9}, {3.6876701468865194`*^9, 3.6876702688366904`*^9}, 3.687671951523484*^9, {3.6876720519736247`*^9, 3.6876720974836884`*^9}, 3.6876721497037616`*^9, {3.6876721862038126`*^9, 3.687672192653822*^9}, { 3.6876722286538725`*^9, 3.6876723088439846`*^9}, {3.6876740255104027`*^9, 3.6876740281804066`*^9}, 3.687783855173648*^9, {3.7192404630234146`*^9, 3.71924049126862*^9}, {3.7192405358821263`*^9, 3.71924053705192*^9}, { 3.7507540971562033`*^9, 3.750754107865892*^9}, {3.7826309520901594`*^9, 3.782630970652353*^9}, {3.7826310098954353`*^9, 3.782631067716502*^9}, { 3.782631101283888*^9, 3.7826311363805866`*^9}, {3.7826311815765486`*^9, 3.7826311916774073`*^9}, {3.814583707300671*^9, 3.8145837384239798`*^9}}, CellLabel-> "In[360]:=",ExpressionUUID->"afa1fc1a-2999-4c59-a25f-8c2407de34c8"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture assignment 1 (torsion mode)", "Subsubsection", CellChangeTimes->{{3.443679756257*^9, 3.4436797622318*^9}, 3.4436808360109997`*^9, 3.4751535594029493`*^9, {3.4751540447407494`*^9, 3.4751540450527496`*^9}, {3.6006660270400667`*^9, 3.600666027653102*^9}, 3.6006663585140257`*^9, 3.6321910383869467`*^9, 3.6636795589293823`*^9, { 3.6875207571905775`*^9, 3.687520761194807*^9}, {3.6876685148042345`*^9, 3.6876685204242425`*^9}, {3.6877571565810146`*^9, 3.6877571643910255`*^9}, {3.6883874731431046`*^9, 3.688387474933107*^9}, 3.7505815813114414`*^9, {3.750755438325096*^9, 3.7507554390283165`*^9}},ExpressionUUID->"b45afb76-77f0-4e43-8d05-\ 6b43ab4909ff"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"TORSION", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "G", "}"}], ",", RowBox[{"{", "J", "}"}], ",", RowBox[{"{", RowBox[{"mx", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]x", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " ", "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4436808471962*^9, 3.4436809538378*^9}, { 3.443681135921*^9, 3.443681156435*^9}, {3.4436932592028*^9, 3.4436934237047997`*^9}, {3.4436935689876003`*^9, 3.4436937308064003`*^9}, {3.4436938048596*^9, 3.4436938539216003`*^9}, { 3.4436938933115997`*^9, 3.4436940028859997`*^9}, {3.4436940413868*^9, 3.4436943576768*^9}, 3.569906467788733*^9, {3.6006674027727537`*^9, 3.6006674063279576`*^9}, {3.6321937953686347`*^9, 3.6321940032435246`*^9}, {3.632194047502056*^9, 3.632194108361537*^9}, { 3.686023222242097*^9, 3.686023228422106*^9}, {3.686023420882375*^9, 3.6860235613925714`*^9}, 3.686023718102791*^9, {3.686023858792988*^9, 3.6860239212530756`*^9}, {3.68602400304319*^9, 3.68602400334319*^9}, { 3.6860240896433115`*^9, 3.686024121733356*^9}, {3.6860241698034234`*^9, 3.686024192163455*^9}, 3.6874464056255856`*^9, {3.687493904712118*^9, 3.687493919452962*^9}, {3.687493953807927*^9, 3.687494423111769*^9}, 3.6874944573877296`*^9, {3.6875150024245615`*^9, 3.6875150213786454`*^9}, { 3.6875151509430504`*^9, 3.68751525041674*^9}, {3.687515698320302*^9, 3.6875160210537477`*^9}, {3.6875160733507385`*^9, 3.6875161577225647`*^9}, {3.687516650114722*^9, 3.6875166670296893`*^9}, { 3.6875169150648556`*^9, 3.687516982734726*^9}, {3.6875170234790564`*^9, 3.6875170717578106`*^9}, {3.687517189607551*^9, 3.687517212350852*^9}, { 3.687517947316862*^9, 3.687517960002588*^9}, {3.6875181788311043`*^9, 3.687518188304646*^9}, {3.6875188353286533`*^9, 3.687518873331827*^9}, 3.687521331859447*^9, {3.687521459437744*^9, 3.6875214742015886`*^9}, { 3.6877571986110735`*^9, 3.6877574332014017`*^9}, {3.687757472451456*^9, 3.6877574820714703`*^9}, {3.688387486153123*^9, 3.688387516193165*^9}, { 3.6883875476732087`*^9, 3.688387572993244*^9}, {3.7507553475216866`*^9, 3.7507553604408283`*^9}, {3.7826275853572035`*^9, 3.782627646246913*^9}, { 3.845979484716564*^9, 3.8459794908477488`*^9}}, CellLabel-> "In[331]:=",ExpressionUUID->"59dea9ed-7ab7-4e79-b2ba-610933be4775"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture assignment 2 (shape functions)", "Subsubsection", CellChangeTimes->{{3.4444393346048*^9, 3.4444393512032003`*^9}, { 3.6018122641967864`*^9, 3.6018122767548084`*^9}, 3.601814557276416*^9, 3.6022333243607655`*^9, 3.6022342077215185`*^9, 3.602234294504471*^9, { 3.6022369605335536`*^9, 3.602236961547555*^9}, {3.687527219346206*^9, 3.6875272346562276`*^9}, 3.75058157548466*^9, {3.7507543123410654`*^9, 3.750754315688427*^9}, {3.7507559948336515`*^9, 3.750756000441642*^9}, 3.750759249725996*^9},ExpressionUUID->"e15399a2-85b8-4165-969d-\ 1138a54422ad"], Cell[BoxData[{ RowBox[{ RowBox[{"p\[Xi]", "=", RowBox[{"{", RowBox[{"1", ",", "\[Xi]", ",", SuperscriptBox["\[Xi]", "2"]}], "}"}]}], ";", " ", RowBox[{"\[Xi]p", "=", RowBox[{"{", RowBox[{"0", ",", RowBox[{"3", "/", "4"}], ",", "1"}], "}"}]}], ";", RowBox[{"NN", "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"Transpose", "[", RowBox[{"Table", "[", RowBox[{"p\[Xi]", ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "\[Xi]p"}], "}"}]}], "]"}], "]"}], "]"}], ".", "p\[Xi]"}]}], " ", ";"}], "\[IndentingNewLine]", RowBox[{"Grid", "[", RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"MatrixForm", "[", "NN", "]"}], ",", RowBox[{"Plot", "[", RowBox[{"NN", ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]}], "}"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4444394155376*^9, 3.4444394296400003`*^9}, 3.4444395284192*^9, {3.444439820422*^9, 3.4444398548044*^9}, { 3.6018122988912477`*^9, 3.6018124350014863`*^9}, {3.6018124741731553`*^9, 3.601812490865185*^9}, {3.6018125305516543`*^9, 3.6018125546536965`*^9}, { 3.6018126174282064`*^9, 3.6018126378642426`*^9}, {3.6018126786739144`*^9, 3.601812742306426*^9}, {3.6018128387457952`*^9, 3.6018128626918373`*^9}, { 3.6018129226895432`*^9, 3.601813010876498*^9}, {3.6018130418581524`*^9, 3.6018131642715673`*^9}, {3.601813205034439*^9, 3.601813425494026*^9}, { 3.601813512448579*^9, 3.601813555801055*^9}, {3.601813764309823*^9, 3.6018137710334344`*^9}, {3.6018140333322954`*^9, 3.6018140528791294`*^9}, {3.6018145657316303`*^9, 3.6018147404363375`*^9}, {3.601814774023196*^9, 3.601814782197611*^9}, { 3.6018148332097*^9, 3.6018149333774757`*^9}, {3.601814967806737*^9, 3.6018151916515293`*^9}, {3.601815244348422*^9, 3.601815250479233*^9}, { 3.601815514650097*^9, 3.6018155326057286`*^9}, {3.6018155739458013`*^9, 3.601815606721459*^9}, {3.6022335292451267`*^9, 3.6022335296819277`*^9}, { 3.6022335728472033`*^9, 3.602233829686054*^9}, 3.60223402070839*^9, { 3.6022340618924627`*^9, 3.6022340620172625`*^9}, {3.6022341439642067`*^9, 3.602234156849829*^9}, {3.602234204695113*^9, 3.602234217206335*^9}, { 3.602234290214463*^9, 3.602234302554085*^9}, {3.6022343660773964`*^9, 3.6022344318471117`*^9}, {3.6022344729843845`*^9, 3.6022344749343877`*^9}, {3.60224368525255*^9, 3.602243759976681*^9}, { 3.6022438108239717`*^9, 3.6022438300900054`*^9}, {3.6022438813984957`*^9, 3.6022440010195055`*^9}, {3.633396099666407*^9, 3.633396122759728*^9}, { 3.687757806321924*^9, 3.687757827621954*^9}, {3.6877578934920464`*^9, 3.687757986622176*^9}, {3.687761775217445*^9, 3.6877617775274477`*^9}, { 3.6877618193775063`*^9, 3.6877618329675255`*^9}, {3.687761863957569*^9, 3.687761882617595*^9}, {3.750758681375268*^9, 3.7507587395647845`*^9}, { 3.7507587895688*^9, 3.750758860911395*^9}, {3.7507588936535244`*^9, 3.7507589375808115`*^9}, {3.7507589762750683`*^9, 3.7507591141332903`*^9}, {3.750759149624155*^9, 3.7507591892088947`*^9}, { 3.8145833705035863`*^9, 3.8145834883848567`*^9}, {3.814583583956476*^9, 3.8145835917239513`*^9}, 3.814583663560208*^9}, CellLabel-> "In[334]:=",ExpressionUUID->"da043203-a9b6-4f2a-b851-60406af18e98"], Cell[BoxData[{ RowBox[{ RowBox[{"p\[Xi]", "=", RowBox[{"{", RowBox[{"1", ",", "\[Xi]", ",", SuperscriptBox["\[Xi]", "2"], ",", SuperscriptBox["\[Xi]", "3"]}], "}"}]}], ";", " ", RowBox[{"\[Xi]p", "=", RowBox[{"{", RowBox[{"0", ",", RowBox[{"1", "/", "4"}], ",", RowBox[{"3", "/", "4"}], ",", "1"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"NN", "=", RowBox[{ RowBox[{"Inverse", "[", RowBox[{"Transpose", "[", RowBox[{"Table", "[", RowBox[{"p\[Xi]", ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "\[Xi]p"}], "}"}]}], "]"}], "]"}], "]"}], ".", "p\[Xi]"}]}], " ", ";"}], "\[IndentingNewLine]", RowBox[{"Grid", "[", RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"MatrixForm", "[", "NN", "]"}], ",", RowBox[{"Plot", "[", RowBox[{"NN", ",", RowBox[{"{", RowBox[{"\[Xi]", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]}], "}"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4444394155376*^9, 3.4444394296400003`*^9}, 3.4444395284192*^9, {3.444439820422*^9, 3.4444398548044*^9}, { 3.6018122988912477`*^9, 3.6018124350014863`*^9}, {3.6018124741731553`*^9, 3.601812490865185*^9}, {3.6018125305516543`*^9, 3.6018125546536965`*^9}, { 3.6018126174282064`*^9, 3.6018126378642426`*^9}, {3.6018126786739144`*^9, 3.601812742306426*^9}, {3.6018128387457952`*^9, 3.6018128626918373`*^9}, { 3.6018129226895432`*^9, 3.601813010876498*^9}, {3.6018130418581524`*^9, 3.6018131642715673`*^9}, {3.601813205034439*^9, 3.601813425494026*^9}, { 3.601813512448579*^9, 3.601813555801055*^9}, {3.601813764309823*^9, 3.6018137710334344`*^9}, {3.6018140333322954`*^9, 3.6018140528791294`*^9}, {3.6018145657316303`*^9, 3.6018147404363375`*^9}, {3.601814774023196*^9, 3.601814782197611*^9}, { 3.6018148332097*^9, 3.6018149333774757`*^9}, {3.601814967806737*^9, 3.6018151916515293`*^9}, {3.601815244348422*^9, 3.601815250479233*^9}, { 3.601815514650097*^9, 3.6018155326057286`*^9}, {3.6018155739458013`*^9, 3.601815606721459*^9}, {3.6022335292451267`*^9, 3.6022335296819277`*^9}, { 3.6022335728472033`*^9, 3.602233829686054*^9}, 3.60223402070839*^9, { 3.6022340618924627`*^9, 3.6022340620172625`*^9}, {3.6022341439642067`*^9, 3.602234156849829*^9}, {3.602234204695113*^9, 3.602234217206335*^9}, { 3.602234290214463*^9, 3.602234302554085*^9}, {3.6022343660773964`*^9, 3.6022344318471117`*^9}, {3.6022344729843845`*^9, 3.6022344749343877`*^9}, {3.60224368525255*^9, 3.602243759976681*^9}, { 3.6022438108239717`*^9, 3.6022438300900054`*^9}, {3.6022438813984957`*^9, 3.6022440010195055`*^9}, {3.633396099666407*^9, 3.633396122759728*^9}, { 3.687757806321924*^9, 3.687757827621954*^9}, {3.6877578934920464`*^9, 3.687757986622176*^9}, {3.687761775217445*^9, 3.6877617775274477`*^9}, { 3.6877618193775063`*^9, 3.6877618329675255`*^9}, {3.687761863957569*^9, 3.687761882617595*^9}, {3.750758681375268*^9, 3.7507587395647845`*^9}, { 3.7507587895688*^9, 3.750758860911395*^9}, {3.7507588936535244`*^9, 3.7507589375808115`*^9}, {3.7507589762750683`*^9, 3.7507591141332903`*^9}, {3.750759149624155*^9, 3.7507591892088947`*^9}, { 3.8145833705035863`*^9, 3.814583436083416*^9}, {3.814583522389844*^9, 3.8145835235249233`*^9}, {3.8145836149888353`*^9, 3.814583642668388*^9}, 3.814583683772899*^9},ExpressionUUID->"263107da-a8e2-4e8c-b3c8-\ 7741d6726dbc"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["VIRTUAL WORK DENSITY (week 48)", "Subsection", CellChangeTimes->{{3.473055512584*^9, 3.4730555529630003`*^9}, { 3.4730575328269997`*^9, 3.473057539222*^9}, {3.4734691424642*^9, 3.4734691605758*^9}, {3.4736023142902*^9, 3.4736023273162003`*^9}, { 3.4742602258717394`*^9, 3.4742602349087396`*^9}, {3.4751533480335493`*^9, 3.4751533839809494`*^9}, {3.47515343117095*^9, 3.47515343786335*^9}, { 3.4758461893361397`*^9, 3.4758462006617393`*^9}, {3.4782569733691998`*^9, 3.4782570107312*^9}, {3.5728448971418185`*^9, 3.572844900293024*^9}, { 3.603075880189313*^9, 3.6030758835433187`*^9}, {3.629791676471719*^9, 3.6297916782189217`*^9}, 3.6308961507564125`*^9, {3.634543316694062*^9, 3.6345433204642773`*^9}, {3.666086967186925*^9, 3.6660869701250935`*^9}, 3.6852489657601895`*^9, 3.6853235104535847`*^9, {3.6860286322360067`*^9, 3.6860286394984217`*^9}, 3.6864666412776737`*^9, {3.6868402248605633`*^9, 3.6868402263805656`*^9}, {3.687427356936081*^9, 3.6874273664060946`*^9}, 3.687939586884596*^9, {3.687939626544651*^9, 3.687939633734661*^9}, { 3.6882673004189034`*^9, 3.6882673398789587`*^9}, {3.7199228770641465`*^9, 3.719922877811071*^9}, {3.7199229096438*^9, 3.719922910128081*^9}, 3.7807552561191516`*^9, {3.7834232601496735`*^9, 3.7834232654567776`*^9}},ExpressionUUID->"2c208a0f-b87b-4992-8af8-\ 855dba4e9995"], Cell[CellGroupData[{ Cell["Lecture example 5.1 (solid and tetrahedron)", "Subsubsection", CellChangeTimes->{{3.4461858096703997`*^9, 3.44618581577*^9}, { 3.4783088292724*^9, 3.4783088356372004`*^9}, 3.572946752325334*^9, 3.6345673551106033`*^9, {3.688120820670149*^9, 3.6881208288301606`*^9}, 3.688276291574788*^9, {3.688285903799246*^9, 3.688285922669272*^9}, 3.6883501802229247`*^9, {3.6883502258629885`*^9, 3.6883502442430143`*^9}, 3.75082511983012*^9, {3.7508252305521297`*^9, 3.7508252335474377`*^9}, { 3.751197450399726*^9, 3.751197451305794*^9}, {3.783411074091236*^9, 3.7834110789615927`*^9}, 3.8146803425169497`*^9},ExpressionUUID->"c45024b7-3eab-40d4-95bb-\ be3de4fc65af"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{"fx", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "h"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "1", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "h", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "3", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"ux", "[", "4", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4461842708238*^9, 3.4461843475914*^9}, { 3.4461843871998*^9, 3.4461844674119997`*^9}, {3.4461853601563997`*^9, 3.4461853767392*^9}, {3.4783088965084*^9, 3.4783088977564*^9}, { 3.6031676342279634`*^9, 3.603167637722369*^9}, 3.603167671480829*^9, { 3.6320425732995977`*^9, 3.6320427112184863`*^9}, {3.6320427413082075`*^9, 3.632042759953274*^9}, 3.632043223912811*^9, {3.6348908023085775`*^9, 3.634890812463158*^9}, {3.634890845456045*^9, 3.634890917799183*^9}, 3.634890949290984*^9, {3.6348910904570584`*^9, 3.6348910940192623`*^9}, 3.6348911383837996`*^9, {3.6348912352033377`*^9, 3.634891278477813*^9}, { 3.634891319326149*^9, 3.63489160012521*^9}, 3.634896592566805*^9, { 3.634896640266533*^9, 3.6348966674110856`*^9}, {3.634896714207762*^9, 3.6348967218161974`*^9}, {3.666087057906114*^9, 3.6660870797743645`*^9}, 3.6660871449200907`*^9, {3.6882762940547915`*^9, 3.6882765684451756`*^9}, { 3.6882766163452425`*^9, 3.68827669295635*^9}, {3.688276735226409*^9, 3.688276765026451*^9}, {3.6882859834593573`*^9, 3.688286297299796*^9}, 3.688286910641655*^9, {3.6882869529417143`*^9, 3.6882869797717524`*^9}, { 3.6882871732020226`*^9, 3.68828719274205*^9}, {3.688287227542099*^9, 3.688287280112172*^9}, 3.6882876142056417`*^9, {3.750825139372815*^9, 3.7508251589769144`*^9}, {3.750825315817686*^9, 3.7508253307108173`*^9}, { 3.7511974650681667`*^9, 3.751197716352787*^9}, {3.7511978729720216`*^9, 3.7511978959040065`*^9}, {3.7511979269437747`*^9, 3.7511979311928763`*^9}, {3.751198077432763*^9, 3.7511980786043634`*^9}, 3.783078234323082*^9, {3.7830783031733418`*^9, 3.783078359180637*^9}, { 3.7830784105145917`*^9, 3.783078444938653*^9}, {3.8146889352008*^9, 3.8146889476944675`*^9}}, CellLabel-> "In[358]:=",ExpressionUUID->"c463439f-c3de-4635-9a99-b33befdb6aa1"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 5.2 (solid and hexahedron)", "Subsubsection", CellChangeTimes->{{3.4461858096703997`*^9, 3.44618581577*^9}, { 3.4783088292724*^9, 3.4783088356372004`*^9}, 3.572946752325334*^9, 3.6345673551106033`*^9, {3.688120820670149*^9, 3.6881208288301606`*^9}, 3.688276291574788*^9, {3.688285903799246*^9, 3.688285922669272*^9}, 3.6883501802229247`*^9, 3.7511986771610527`*^9, {3.7834110986847677`*^9, 3.783411099436548*^9}, 3.8146803451275425`*^9},ExpressionUUID->"3c927c94-d2ab-4082-9467-\ fa050bc70d27"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"-", "\[Rho]"}], " ", "g"}]}], "}"}]}], "}"}], ",", RowBox[{"Hexahedron", "[", RowBox[{"{", RowBox[{ "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "5", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "5", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "5", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "5", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4461842708238*^9, 3.4461843475914*^9}, { 3.4461843871998*^9, 3.4461844674119997`*^9}, {3.4461853601563997`*^9, 3.4461853767392*^9}, {3.4783088965084*^9, 3.4783088977564*^9}, { 3.6031676342279634`*^9, 3.603167637722369*^9}, 3.603167671480829*^9, { 3.6320425732995977`*^9, 3.6320427112184863`*^9}, {3.6320427413082075`*^9, 3.632042759953274*^9}, 3.632043223912811*^9, {3.6348908023085775`*^9, 3.634890812463158*^9}, {3.634890845456045*^9, 3.634890917799183*^9}, 3.634890949290984*^9, {3.6348910904570584`*^9, 3.6348910940192623`*^9}, 3.6348911383837996`*^9, {3.6348912352033377`*^9, 3.634891278477813*^9}, { 3.634891319326149*^9, 3.63489160012521*^9}, 3.634896592566805*^9, { 3.634896640266533*^9, 3.6348966674110856`*^9}, {3.634896714207762*^9, 3.6348967218161974`*^9}, {3.666087057906114*^9, 3.6660870797743645`*^9}, 3.6660871449200907`*^9, {3.6882762940547915`*^9, 3.6882765684451756`*^9}, { 3.6882766163452425`*^9, 3.68827669295635*^9}, {3.688276735226409*^9, 3.688276765026451*^9}, {3.6882859834593573`*^9, 3.688286297299796*^9}, 3.688286910641655*^9, {3.6882869529417143`*^9, 3.6882869797717524`*^9}, { 3.6882871732020226`*^9, 3.68828719274205*^9}, {3.688287227542099*^9, 3.688287280112172*^9}, 3.6882876142056417`*^9, {3.6883502721530533`*^9, 3.6883503064231014`*^9}, {3.7511986882832193`*^9, 3.7511987004368563`*^9}}, CellLabel-> "In[361]:=",ExpressionUUID->"68f12e37-2dd0-4de9-aed1-fc01119f6012"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 5.3 (plane-strain and triangle element)", \ "Subsubsection", CellChangeTimes->{{3.4461858096703997`*^9, 3.44618581577*^9}, { 3.4783088292724*^9, 3.4783088356372004`*^9}, 3.572946752325334*^9, 3.6345673551106033`*^9, {3.688120820670149*^9, 3.6881208288301606`*^9}, 3.688276291574788*^9, 3.688354984092181*^9, 3.751261967695571*^9, { 3.7834111027722273`*^9, 3.783411104679905*^9}, 3.814680351038374*^9},ExpressionUUID->"7b0af50d-5e11-444f-97f9-\ ed2219a17358"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"TWODIM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"-", "F"}], ",", RowBox[{"-", "F"}], ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "1", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"TWODIM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], RowBox[{"F", "/", "L"}]}], ",", RowBox[{ RowBox[{"-", "2"}], RowBox[{"F", "/", "L"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], RowBox[{"F", "/", "L"}]}], ",", RowBox[{ RowBox[{"-", "2"}], RowBox[{"F", "/", "L"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", RowBox[{"uY", "[", "1", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FORMATTED", "[", RowBox[{"in", "=", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}]}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}]}]], "Input", CellChangeTimes->{{3.4461842708238*^9, 3.4461843475914*^9}, { 3.4461843871998*^9, 3.4461844674119997`*^9}, {3.4461853601563997`*^9, 3.4461853767392*^9}, {3.4783088965084*^9, 3.4783088977564*^9}, { 3.6031676342279634`*^9, 3.603167637722369*^9}, 3.603167671480829*^9, { 3.6320425732995977`*^9, 3.6320427112184863`*^9}, {3.6320427413082075`*^9, 3.632042759953274*^9}, 3.632043223912811*^9, {3.6348908023085775`*^9, 3.634890812463158*^9}, {3.634890845456045*^9, 3.634890917799183*^9}, 3.634890949290984*^9, {3.6348910904570584`*^9, 3.6348910940192623`*^9}, 3.6348911383837996`*^9, {3.6348912352033377`*^9, 3.634891278477813*^9}, { 3.634891319326149*^9, 3.63489160012521*^9}, 3.634896592566805*^9, { 3.634896640266533*^9, 3.6348966674110856`*^9}, {3.634896714207762*^9, 3.6348967218161974`*^9}, {3.666087057906114*^9, 3.6660870797743645`*^9}, 3.6660871449200907`*^9, {3.6882762940547915`*^9, 3.6882765684451756`*^9}, { 3.6882766163452425`*^9, 3.68827669295635*^9}, {3.688276735226409*^9, 3.688276765026451*^9}, {3.688355019432231*^9, 3.6883550314722476`*^9}, { 3.6883551544404364`*^9, 3.6883551602104445`*^9}, {3.6883552110305157`*^9, 3.688355271800601*^9}, {3.688355338290694*^9, 3.6883554434028425`*^9}, { 3.688355670915162*^9, 3.688355706495212*^9}, {3.6883557567952824`*^9, 3.688355771985304*^9}, {3.6883558263753796`*^9, 3.688355875705449*^9}, { 3.688355917685508*^9, 3.688355944935546*^9}, {3.688355980185595*^9, 3.6883559976156197`*^9}, 3.751261984426061*^9, {3.7512641011575675`*^9, 3.7512641694851646`*^9}, {3.7512642901286583`*^9, 3.7512642915971146`*^9}, 3.751264507540121*^9, 3.783414218776184*^9, {3.783757831523662*^9, 3.7837578322733045`*^9}, {3.7837578927129774`*^9, 3.7837579310887794`*^9}, {3.7837579756190605`*^9, 3.7837580915236235`*^9}, {3.7837581818942947`*^9, 3.7837581902867403`*^9}, {3.783762353708048*^9, 3.78376255351056*^9}, { 3.8146802996777163`*^9, 3.814680300132944*^9}, {3.814685012195855*^9, 3.8146850125628147`*^9}, {3.814685180121467*^9, 3.814685180907949*^9}, { 3.846911776086683*^9, 3.8469117866175575`*^9}, {3.8469118238043375`*^9, 3.846911833111084*^9}, {3.846911892049018*^9, 3.846911893443119*^9}, { 3.8469123232509823`*^9, 3.8469123275686464`*^9}, {3.8469130024289937`*^9, 3.8469130656745753`*^9}, {3.846913710841335*^9, 3.846913751027584*^9}, 3.846913924236359*^9, 3.847104821686632*^9, {3.84710526949061*^9, 3.847105282408266*^9}, {3.847106711744707*^9, 3.847106719029561*^9}}, CellLabel-> "In[370]:=",ExpressionUUID->"599edaf2-c9d8-4d72-85f0-6c4a747dfe16"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "point", " ", "force", " ", "is", " ", "a", " ", "tricky", " ", "concept", " ", "in", " ", "2", "D", " ", "and", " ", "3", "D", " ", "elasticity"}], "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "lets", " ", "refine", " ", "to", " ", "improve", " ", "the", " ", "solution"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"rule", " ", ":=", RowBox[{"{", RowBox[{ RowBox[{"\[CapitalEpsilon]", "\[Rule]", "100."}], ",", RowBox[{"\[Nu]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"t", "\[Rule]", RowBox[{"1", "/", "10"}]}], ",", RowBox[{"L", "\[Rule]", "1"}], ",", RowBox[{"F", "\[Rule]", "1"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"inr", "=", RowBox[{"in", " ", "/.", "rule"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"GraphicsGrid", "[", RowBox[{"Partition", "[", RowBox[{ RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"inr", "=", RowBox[{"REFINE", "[", "inr", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", " ", "=", RowBox[{"SOLVE", "[", "inr", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", RowBox[{"uY", "[", "1", "]"}]}], "}"}], "/.", "sol"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"DISP", "[", RowBox[{"inr", "/.", "sol"}], " ", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"i", ",", "1", ",", "4"}], "}"}]}], "]"}], ",", "2"}], "]"}], "]"}]}]}]], "Input", CellChangeTimes->{{3.4461842708238*^9, 3.4461843475914*^9}, { 3.4461843871998*^9, 3.4461844674119997`*^9}, {3.4461853601563997`*^9, 3.4461853767392*^9}, {3.4783088965084*^9, 3.4783088977564*^9}, { 3.6031676342279634`*^9, 3.603167637722369*^9}, 3.603167671480829*^9, { 3.6320425732995977`*^9, 3.6320427112184863`*^9}, {3.6320427413082075`*^9, 3.632042759953274*^9}, 3.632043223912811*^9, {3.6348908023085775`*^9, 3.634890812463158*^9}, {3.634890845456045*^9, 3.634890917799183*^9}, 3.634890949290984*^9, {3.6348910904570584`*^9, 3.6348910940192623`*^9}, 3.6348911383837996`*^9, {3.6348912352033377`*^9, 3.634891278477813*^9}, { 3.634891319326149*^9, 3.63489160012521*^9}, 3.634896592566805*^9, { 3.634896640266533*^9, 3.6348966674110856`*^9}, {3.634896714207762*^9, 3.6348967218161974`*^9}, {3.666087057906114*^9, 3.6660870797743645`*^9}, 3.6660871449200907`*^9, {3.6882762940547915`*^9, 3.6882765684451756`*^9}, { 3.6882766163452425`*^9, 3.68827669295635*^9}, {3.688276735226409*^9, 3.688276765026451*^9}, {3.688355019432231*^9, 3.6883550314722476`*^9}, { 3.6883551544404364`*^9, 3.6883551602104445`*^9}, {3.6883552110305157`*^9, 3.688355271800601*^9}, {3.688355338290694*^9, 3.6883554434028425`*^9}, { 3.688355670915162*^9, 3.688355706495212*^9}, {3.6883557567952824`*^9, 3.688355771985304*^9}, {3.6883558263753796`*^9, 3.688355875705449*^9}, { 3.688355917685508*^9, 3.688355944935546*^9}, {3.688355980185595*^9, 3.6883559976156197`*^9}, 3.751261984426061*^9, {3.7512641011575675`*^9, 3.7512641694851646`*^9}, {3.7512642310016947`*^9, 3.7512642523719397`*^9}, {3.7512643072493367`*^9, 3.751264404603403*^9}, { 3.7512644392433944`*^9, 3.751264488388084*^9}, {3.751264525832696*^9, 3.7512645459528985`*^9}, {3.751264611187366*^9, 3.751264611312291*^9}, { 3.783414205705018*^9, 3.783414229007724*^9}, {3.783757668975924*^9, 3.7837576824363685`*^9}, {3.7837577554202147`*^9, 3.7837577841634665`*^9}, {3.814685120272374*^9, 3.8146851323483553`*^9}, 3.8471048078340473`*^9}, CellLabel-> "In[375]:=",ExpressionUUID->"a79b5927-8ee8-478c-bbb4-18b4e17c2ab7"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 5.4 (plane stress and quadrilateral element)", \ "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, 3.572946782433387*^9, 3.634567631130391*^9, 3.634610434326293*^9, 3.634611542343668*^9, {3.634787392185001*^9, 3.634787394985161*^9}, 3.634795742882633*^9, 3.666087688711194*^9, {3.688120833010166*^9, 3.6881208343201685`*^9}, 3.6883549869221854`*^9, 3.7512646469199333`*^9, 3.783411107827134*^9, 3.814680353110828*^9},ExpressionUUID->"7510ddc5-952e-4b5d-a8e8-\ 754af37605aa"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"val", " ", ":=", RowBox[{"{", RowBox[{ RowBox[{"\[CapitalEpsilon]", "\[Rule]", "100."}], ",", RowBox[{"\[Nu]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"t", "\[Rule]", RowBox[{"1", "/", "10"}]}], ",", RowBox[{"L", "\[Rule]", "1"}], ",", RowBox[{"F", "\[Rule]", "10"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "7", ",", "6"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"2", ",", "3", ",", "8", ",", "7"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"3", ",", "4", ",", "9", ",", "8"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"4", ",", "5", ",", "10", ",", "9"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"F", "/", "L"}], ",", RowBox[{"F", "/", "L"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"5", ",", "10"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", RowBox[{"uY", "[", "2", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", " ", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", RowBox[{"uY", "[", "3", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"3", " ", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "4", "]"}], ",", RowBox[{"uY", "[", "4", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"4", " ", "L"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "5", "]"}], ",", RowBox[{"uY", "[", "5", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "7", "]"}], ",", RowBox[{"uY", "[", "7", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"2", " ", "L"}], ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "8", "]"}], ",", RowBox[{"uY", "[", "8", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"3", " ", "L"}], ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "9", "]"}], ",", RowBox[{"uY", "[", "9", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"4", " ", "L"}], ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "10", "]"}], ",", RowBox[{"uY", "[", "10", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "=", RowBox[{ RowBox[{"Nest", "[", RowBox[{"REFINE", ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], ",", "0"}], "]"}], " ", "/.", "val"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"MESH", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"sol", "=", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"uX", "[", "5", "]"}], "+", RowBox[{"uX", "[", "10", "]"}]}], ")"}], "/", "2."}], " ", "/.", "sol"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"DISP", "[", RowBox[{ RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], " ", "/.", "sol"}], "]"}]}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, 3.603167701448481*^9, { 3.6305527201760035`*^9, 3.630552938770506*^9}, {3.6345676503834925`*^9, 3.6345676818222904`*^9}, {3.6345688863991885`*^9, 3.6345689891650667`*^9}, 3.6345692742413716`*^9, 3.6345693788933573`*^9, {3.6345695183433332`*^9, 3.6345696795895567`*^9}, {3.63461061365755*^9, 3.634610615326646*^9}, { 3.6354741435175705`*^9, 3.635474208878309*^9}, {3.6354742396790705`*^9, 3.635474258640155*^9}, 3.635474295701275*^9, {3.688274575490385*^9, 3.688274878281809*^9}, {3.688274942101898*^9, 3.6882749535919147`*^9}, 3.688275290273386*^9, {3.688275581803794*^9, 3.6882755933138103`*^9}, { 3.6882757272839975`*^9, 3.688275828054139*^9}, {3.688276055484457*^9, 3.688276151094591*^9}, {3.6883560558657007`*^9, 3.688356057165703*^9}, { 3.7512647267871175`*^9, 3.7512647590610733`*^9}, {3.751264793990218*^9, 3.7512648301846685`*^9}, {3.751264872706222*^9, 3.7512649601231127`*^9}, { 3.751265019656413*^9, 3.75126528704638*^9}, 3.7512653434396305`*^9, { 3.7512653792436924`*^9, 3.751265396942418*^9}, {3.783136140195486*^9, 3.7831362067059755`*^9}, {3.7831362563945475`*^9, 3.7831363329253793`*^9}, {3.783136468046363*^9, 3.783136561717618*^9}, 3.783414420745185*^9, {3.7834144548624296`*^9, 3.7834145030225706`*^9}, { 3.783762907311827*^9, 3.7837629354147706`*^9}, {3.8146816513188615`*^9, 3.8146816736399136`*^9}, {3.8146817181289225`*^9, 3.814681745362296*^9}, { 3.814681777169162*^9, 3.8146818790183187`*^9}, {3.814682942052958*^9, 3.814682947975092*^9}, {3.8146835350411577`*^9, 3.814683599164892*^9}, { 3.8146836458256226`*^9, 3.814683675048786*^9}, {3.8146837237910833`*^9, 3.8146837328616557`*^9}, {3.814684161537176*^9, 3.8146841830522423`*^9}, { 3.8146842421259995`*^9, 3.814684242265738*^9}, {3.8146843153737974`*^9, 3.814684318971287*^9}, {3.814684425117116*^9, 3.814684479979563*^9}, { 3.8146847451409407`*^9, 3.8146847707141466`*^9}, {3.847104851703741*^9, 3.8471048787165112`*^9}}, CellLabel-> "In[744]:=",ExpressionUUID->"a675e422-157d-41aa-a15f-0718025b5f80"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 1 (plane stress)", "Subsubsection", CellChangeTimes->{{3.4736023870954*^9, 3.4736023880782003`*^9}, { 3.510384108059813*^9, 3.510384119371715*^9}, {3.6028138023903317`*^9, 3.6028138109828234`*^9}, 3.6028178176958942`*^9, {3.688120877010228*^9, 3.688120877130228*^9}, 3.6883571447492256`*^9, 3.7512851902667027`*^9, 3.783411128547967*^9},ExpressionUUID->"5886f5a4-c38c-40d8-a744-\ e5086353a1dc"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "4", ",", "3"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"uY", "[", "2", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"STRESS", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", " ", "\[Rule]", RowBox[{"1", "/", "2"}]}], ",", RowBox[{"\[Beta]", "\[Rule]", RowBox[{"1", "/", "2"}]}]}], "}"}]}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.5054687231944*^9, 3.5054687305576*^9}, { 3.5057268781428127`*^9, 3.505726878383263*^9}, {3.506238124130774*^9, 3.5062381889354486`*^9}, {3.506238242404757*^9, 3.506238242834897*^9}, { 3.510384295148356*^9, 3.5103843381089993`*^9}, {3.510384369917561*^9, 3.510384396077835*^9}, {3.510384452713147*^9, 3.5103844533633633`*^9}, { 3.602245412938677*^9, 3.6022454413953047`*^9}, {3.602249912726405*^9, 3.602249951757674*^9}, {3.6028138246736064`*^9, 3.602814240969417*^9}, 3.6028142716121693`*^9, {3.633942335687601*^9, 3.633942337802722*^9}, { 3.688357149319232*^9, 3.688357255839381*^9}, {3.783416782568739*^9, 3.7834168408032184`*^9}, {3.7834170282657995`*^9, 3.7834171589024577`*^9}, 3.847104941965269*^9, {3.8471053403222413`*^9, 3.8471053420873814`*^9}, { 3.8471061477820587`*^9, 3.8471061676783404`*^9}, {3.8471062981363697`*^9, 3.847106299416054*^9}}, CellLabel-> "In[753]:=",ExpressionUUID->"69f6452b-a8ed-486f-952c-ce3ad6d946ca"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 2 (plane strain)", "Subsubsection", CellChangeTimes->{{3.4736023870954*^9, 3.4736023880782003`*^9}, { 3.510384108059813*^9, 3.510384119371715*^9}, {3.6028138023903317`*^9, 3.6028138109828234`*^9}, 3.6028178176958942`*^9, {3.688120877010228*^9, 3.688120877130228*^9}, 3.6883571447492256`*^9, {3.6883582990628414`*^9, 3.688358302682847*^9}, 3.751285302493861*^9, 3.78341113205847*^9},ExpressionUUID->"8567c7cf-f100-4a72-8674-\ 472f3e3f4951"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"TWODIM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", RowBox[{"uY", "[", "1", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"STRESS", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.5054687231944*^9, 3.5054687305576*^9}, { 3.5057268781428127`*^9, 3.505726878383263*^9}, {3.506238124130774*^9, 3.5062381889354486`*^9}, {3.506238242404757*^9, 3.506238242834897*^9}, { 3.510384295148356*^9, 3.5103843381089993`*^9}, {3.510384369917561*^9, 3.510384396077835*^9}, {3.510384452713147*^9, 3.5103844533633633`*^9}, { 3.602245412938677*^9, 3.6022454413953047`*^9}, {3.602249912726405*^9, 3.602249951757674*^9}, {3.6028138246736064`*^9, 3.602814240969417*^9}, 3.6028142716121693`*^9, {3.633942335687601*^9, 3.633942337802722*^9}, { 3.688357149319232*^9, 3.688357255839381*^9}, 3.688358311082858*^9, { 3.688358494333115*^9, 3.6883585758232293`*^9}, {3.6883586324233084`*^9, 3.688358708503415*^9}, {3.7834174680762053`*^9, 3.7834175425331903`*^9}, { 3.783417678514696*^9, 3.7834176800013*^9}, {3.847106865163937*^9, 3.847106887141971*^9}}, CellLabel-> "In[759]:=",ExpressionUUID->"c62f5129-e111-4243-8bf5-555d76a6f8c9"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 3 (plane stress and quadrilateral element)", \ "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453405569973`*^9}, {3.688118092873827*^9, 3.688118092983827*^9}, 3.688359609384676*^9, 3.7512854740185995`*^9, 3.783411134459617*^9},ExpressionUUID->"710db05d-34a6-4b45-b675-\ f1b9e11eee83"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "4", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"F", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "4", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "4", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, 3.6308071837539654`*^9, { 3.6308072232376347`*^9, 3.6308072806925354`*^9}, {3.630807380891511*^9, 3.6308073810631113`*^9}, 3.630807416662374*^9, {3.6308074522148366`*^9, 3.6308074569416447`*^9}, {3.630808242239827*^9, 3.6308082648781223`*^9}, 3.6308084593562455`*^9, {3.6345433582074366`*^9, 3.634543372320244*^9}, { 3.6346116313217573`*^9, 3.6346116325178256`*^9}, {3.666087872613713*^9, 3.666087886573511*^9}, {3.6881181216838675`*^9, 3.688118174223941*^9}, { 3.688118207333987*^9, 3.6881182190740037`*^9}, {3.6881198165987434`*^9, 3.6881198365987716`*^9}, {3.688119917098884*^9, 3.6881199552489376`*^9}, { 3.6881200535590754`*^9, 3.688120067969095*^9}, {3.6881202600693645`*^9, 3.6881202623293676`*^9}, {3.6882115663473253`*^9, 3.6882116196673994`*^9}, {3.6882146169274535`*^9, 3.688214623197462*^9}, { 3.68821534280847*^9, 3.6882153918885384`*^9}, {3.6882155882088137`*^9, 3.688215596588825*^9}, {3.688215832739156*^9, 3.688216010999405*^9}, { 3.6882160560194683`*^9, 3.6882161733196325`*^9}, {3.688216240949727*^9, 3.688216241329728*^9}, {3.6883602152375245`*^9, 3.68836024784757*^9}, 3.688360344247705*^9, {3.6883608241383767`*^9, 3.688360825178378*^9}, { 3.751285580053713*^9, 3.751285833215563*^9}, {3.751285892965088*^9, 3.7512859156455746`*^9}, {3.751294088336151*^9, 3.7512940931475315`*^9}, { 3.783418071831477*^9, 3.7834181885242443`*^9}, 3.783418236823071*^9, { 3.783418291744519*^9, 3.7834182959590034`*^9}, 3.7834183333518777`*^9, { 3.8471069141248784`*^9, 3.8471069421181917`*^9}}, CellLabel-> "In[762]:=",ExpressionUUID->"1bd4ce6c-743f-4726-9dfc-085a3feec4b7"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 4 (plane-strain and triangle element)", "Subsubsection", CellChangeTimes->{{3.4461858096703997`*^9, 3.44618581577*^9}, { 3.4783088292724*^9, 3.4783088356372004`*^9}, {3.5729451980670743`*^9, 3.5729452013274803`*^9}, 3.634787589927311*^9, 3.688031803936941*^9, { 3.688117392322846*^9, 3.688117392412846*^9}, {3.6881180219237275`*^9, 3.688118024413731*^9}, 3.7512860362241287`*^9, 3.7834111369610033`*^9, 3.7834196335019827`*^9},ExpressionUUID->"300eb0dc-64c2-45ba-b5af-\ a178e79fcb39"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"TWODIM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "\[Rho]"}], " ", "g", " ", "t"}], ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "L"}], "/", "2"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"L", "/", "2"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", RowBox[{"uY", "[", "3", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4461842708238*^9, 3.4461843475914*^9}, { 3.4461843871998*^9, 3.4461844674119997`*^9}, {3.4461853601563997`*^9, 3.4461853767392*^9}, {3.4783088965084*^9, 3.4783088977564*^9}, { 3.572945229220329*^9, 3.572945297002448*^9}, {3.6346134851637907`*^9, 3.634613588842721*^9}, {3.6880313492463045`*^9, 3.688031391596364*^9}, { 3.688031580176628*^9, 3.688031647186722*^9}, {3.6880317197768235`*^9, 3.6880317538868713`*^9}, {3.6881176412631946`*^9, 3.6881176433231974`*^9}, { 3.751286068129795*^9, 3.7512860773364754`*^9}, {3.783421969943163*^9, 3.7834219716681995`*^9}, {3.7834220073531075`*^9, 3.7834220108029203`*^9}, { 3.7834220663980036`*^9, 3.783422078032855*^9}, {3.8471069825425653`*^9, 3.8471069845553446`*^9}}, CellLabel-> "In[770]:=",ExpressionUUID->"8a5ff242-1c67-424b-9b87-34e8de203265"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"(*", RowBox[{"convergence", " ", "test"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"rule", "=", " ", RowBox[{"{", RowBox[{ RowBox[{"\[Nu]", "\[Rule]", RowBox[{"1", "/", "3"}]}], ",", RowBox[{"L", "->", "1."}], ",", RowBox[{"g", "\[Rule]", "1"}], ",", RowBox[{"\[Rho]", "\[Rule]", "1"}], ",", RowBox[{"\[CapitalEpsilon]", "\[Rule]", "1"}], ",", RowBox[{"t", "\[Rule]", "1"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "=", RowBox[{"REFINE", "[", RowBox[{ RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], " ", "/.", "rule"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", " ", "=", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"i", ",", RowBox[{ RowBox[{"uY", "[", "3", "]"}], "/.", "sol"}]}], "}"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "4"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.783419604382059*^9, 3.7834196128121147`*^9}, { 3.783421277872789*^9, 3.7834212872728357`*^9}, {3.783421317972748*^9, 3.7834214038929396`*^9}, {3.7834214856429477`*^9, 3.7834215014228325`*^9}, 3.783421535693192*^9}, CellLabel-> "In[774]:=",ExpressionUUID->"8ce761f0-b050-46a9-9fe1-086480262105"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 5 (plane stress and triangle element)", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453610242333`*^9}, {3.688110133856064*^9, 3.6881101339760647`*^9}, { 3.6883582796828146`*^9, 3.6883582809828167`*^9}, 3.7512863987413254`*^9, 3.783411156488371*^9},ExpressionUUID->"63684da0-70fe-4ff0-832a-\ afea56e5df51"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"2", ",", "3", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "F"}], ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "3", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", RowBox[{"uY", "[", "3", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, {3.5729261320974627`*^9, 3.572926321762596*^9}, {3.6031687440128527`*^9, 3.6031687449332542`*^9}, { 3.6031687982229476`*^9, 3.603168824633794*^9}, 3.6320402368949633`*^9, { 3.63204174146702*^9, 3.632041851912337*^9}, {3.6345434606482954`*^9, 3.6345435150414066`*^9}, {3.6345436615827885`*^9, 3.6345436977558575`*^9}, {3.6346117997963934`*^9, 3.6346118340633535`*^9}, 3.634611896179906*^9, {3.634612071313923*^9, 3.634612092485134*^9}, { 3.6346126773445864`*^9, 3.6346126847480097`*^9}, {3.6351291866120987`*^9, 3.6351292015219517`*^9}, {3.6351292397031355`*^9, 3.635129328728227*^9}, 3.6351293922568607`*^9, {3.6351294387045174`*^9, 3.6351294417016892`*^9}, { 3.635129484220121*^9, 3.6351295151848917`*^9}, 3.635129702328596*^9, { 3.635134078836198*^9, 3.635134093755051*^9}, 3.6351342697581177`*^9, 3.6351343217400913`*^9, 3.6351343584501905`*^9, {3.666087996034772*^9, 3.6660880025491447`*^9}, {3.666088047506716*^9, 3.666088076054349*^9}, { 3.687939828704934*^9, 3.6879398594649773`*^9}, {3.687944819931922*^9, 3.687944926122071*^9}, {3.6879453317526383`*^9, 3.687945334232642*^9}, { 3.6880233804029846`*^9, 3.68802340568302*^9}, {3.6880234410630693`*^9, 3.6880234439030733`*^9}, {3.6880234879931355`*^9, 3.6880234991531506`*^9}, {3.688023679763404*^9, 3.68802371252345*^9}, 3.688023821443602*^9, {3.6880238794336834`*^9, 3.6880239003237123`*^9}, { 3.688023955023789*^9, 3.6880239983138494`*^9}, {3.688110144646079*^9, 3.6881101479260836`*^9}, {3.6881101891961412`*^9, 3.688110255926235*^9}, { 3.6881104170464606`*^9, 3.6881104221664677`*^9}, {3.688110496386572*^9, 3.6881105349266253`*^9}, {3.688110575236682*^9, 3.6881105779866858`*^9}, { 3.68811063814677*^9, 3.688110651326789*^9}, {3.6881108547670736`*^9, 3.6881108996871367`*^9}, {3.688110987457259*^9, 3.6881110692673736`*^9}, 3.6883594326044283`*^9, {3.72096758139988*^9, 3.720967715517316*^9}, { 3.720967872491661*^9, 3.7209679097843013`*^9}, {3.720967966700378*^9, 3.7209679852210083`*^9}, {3.75128641355925*^9, 3.7512864451014056`*^9}, { 3.844325968071072*^9, 3.8443259703209887`*^9}, {3.8443260004516954`*^9, 3.844326049912223*^9}, {3.844326107590131*^9, 3.844326122121071*^9}, { 3.844326314528557*^9, 3.844326368792054*^9}, {3.844326431967179*^9, 3.8443264487264233`*^9}}, CellLabel-> "In[776]:=",ExpressionUUID->"3e35784d-488c-4737-bd6c-ac58def8d95f"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 6 (plane stress and triangle element)", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453610242333`*^9}, {3.688110133856064*^9, 3.6881101339760647`*^9}, { 3.6883582796828146`*^9, 3.6883582809828167`*^9}, 3.6883596219646935`*^9, 3.75128645803424*^9, 3.783411159759368*^9},ExpressionUUID->"b42bda32-be8b-48e6-9b4b-\ 6731d72c622f"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "g"}], " ", "\[Rho]", " ", "t"}], " ", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"uY", "[", "1", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", " "}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, {3.5729261320974627`*^9, 3.572926321762596*^9}, {3.6031687440128527`*^9, 3.6031687449332542`*^9}, { 3.6031687982229476`*^9, 3.603168824633794*^9}, 3.6320402368949633`*^9, { 3.63204174146702*^9, 3.632041851912337*^9}, {3.6345434606482954`*^9, 3.6345435150414066`*^9}, {3.6345436615827885`*^9, 3.6345436977558575`*^9}, {3.6346117997963934`*^9, 3.6346118340633535`*^9}, 3.634611896179906*^9, {3.634612071313923*^9, 3.634612092485134*^9}, { 3.6346126773445864`*^9, 3.6346126847480097`*^9}, {3.6351291866120987`*^9, 3.6351292015219517`*^9}, {3.6351292397031355`*^9, 3.635129328728227*^9}, 3.6351293922568607`*^9, {3.6351294387045174`*^9, 3.6351294417016892`*^9}, { 3.635129484220121*^9, 3.6351295151848917`*^9}, 3.635129702328596*^9, { 3.635134078836198*^9, 3.635134093755051*^9}, 3.6351342697581177`*^9, 3.6351343217400913`*^9, 3.6351343584501905`*^9, {3.666087996034772*^9, 3.6660880025491447`*^9}, {3.666088047506716*^9, 3.666088076054349*^9}, { 3.687939828704934*^9, 3.6879398594649773`*^9}, {3.687944819931922*^9, 3.687944926122071*^9}, {3.6879453317526383`*^9, 3.687945334232642*^9}, { 3.6880233804029846`*^9, 3.68802340568302*^9}, {3.6880234410630693`*^9, 3.6880234439030733`*^9}, {3.6880234879931355`*^9, 3.6880234991531506`*^9}, {3.688023679763404*^9, 3.68802371252345*^9}, 3.688023821443602*^9, {3.6880238794336834`*^9, 3.6880239003237123`*^9}, { 3.688023955023789*^9, 3.6880239983138494`*^9}, {3.688110144646079*^9, 3.6881101479260836`*^9}, {3.6881101891961412`*^9, 3.688110255926235*^9}, { 3.6881104170464606`*^9, 3.6881104221664677`*^9}, {3.688110496386572*^9, 3.6881105349266253`*^9}, {3.688110575236682*^9, 3.6881105779866858`*^9}, { 3.68811063814677*^9, 3.688110651326789*^9}, {3.6881108547670736`*^9, 3.6881108996871367`*^9}, {3.688110987457259*^9, 3.6881110692673736`*^9}, 3.6883594326044283`*^9, {3.6883596508247337`*^9, 3.6883597232548356`*^9}, 3.6883597583558846`*^9, {3.751286472432746*^9, 3.7512864761907983`*^9}, 3.7512865090227356`*^9, {3.7834197868417845`*^9, 3.7834198677923117`*^9}, { 3.8471053803686666`*^9, 3.847105382502696*^9}}, CellLabel-> "In[780]:=",ExpressionUUID->"53fa162f-50ff-4da7-aabc-9b4337e07a7d"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 7 (plane strain and triangle element)", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453405569973`*^9}, {3.688118092873827*^9, 3.688118092983827*^9}, 3.688359609384676*^9, 3.7512866598973365`*^9, {3.75129147133146*^9, 3.7512914813759513`*^9}, 3.7834111629194775`*^9},ExpressionUUID->"26914f34-6575-4384-af2b-\ 1ab110afec8b"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"TWODIM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"p", " ", "t"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", RowBox[{"uY", "[", "1", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, 3.6308071837539654`*^9, { 3.6308072232376347`*^9, 3.6308072806925354`*^9}, {3.630807380891511*^9, 3.6308073810631113`*^9}, 3.630807416662374*^9, {3.6308074522148366`*^9, 3.6308074569416447`*^9}, {3.630808242239827*^9, 3.6308082648781223`*^9}, 3.6308084593562455`*^9, {3.6345433582074366`*^9, 3.634543372320244*^9}, { 3.6346116313217573`*^9, 3.6346116325178256`*^9}, {3.666087872613713*^9, 3.666087886573511*^9}, {3.6881181216838675`*^9, 3.688118174223941*^9}, { 3.688118207333987*^9, 3.6881182190740037`*^9}, {3.6881198165987434`*^9, 3.6881198365987716`*^9}, {3.688119917098884*^9, 3.6881199552489376`*^9}, { 3.6881200535590754`*^9, 3.688120067969095*^9}, {3.6881202600693645`*^9, 3.6881202623293676`*^9}, {3.6882115663473253`*^9, 3.6882116196673994`*^9}, {3.6882146169274535`*^9, 3.688214623197462*^9}, { 3.68821534280847*^9, 3.6882153918885384`*^9}, {3.6882155882088137`*^9, 3.688215596588825*^9}, {3.688215832739156*^9, 3.688216010999405*^9}, { 3.6882160560194683`*^9, 3.6882161733196325`*^9}, {3.688216240949727*^9, 3.688216241329728*^9}, {3.6883602152375245`*^9, 3.68836024784757*^9}, 3.688360344247705*^9, {3.6883608241383767`*^9, 3.688360825178378*^9}, { 3.7512866791330085`*^9, 3.751286699056904*^9}, {3.751291492092165*^9, 3.751291497700221*^9}, {3.7512915335138044`*^9, 3.751291586517207*^9}, { 3.7512916190093207`*^9, 3.7512916380520096`*^9}, {3.7512916689903793`*^9, 3.7512916870333033`*^9}, {3.8471054128556395`*^9, 3.8471054187332287`*^9}, 3.8471071079858847`*^9}, CellLabel-> "In[784]:=",ExpressionUUID->"b0ea01c9-8635-419e-a421-46a97ab5b23e"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 8 (plane stress and quadrilateral element)", \ "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453405569973`*^9}, {3.688118092873827*^9, 3.688118092983827*^9}, 3.688359609384676*^9, 3.7512866598973365`*^9, 3.7834111662861013`*^9},ExpressionUUID->"d5cfa3b0-d71d-4bd9-961d-\ b0c25d0ce0dd"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "4", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "f"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "4"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "4", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, 3.6308071837539654`*^9, { 3.6308072232376347`*^9, 3.6308072806925354`*^9}, {3.630807380891511*^9, 3.6308073810631113`*^9}, 3.630807416662374*^9, {3.6308074522148366`*^9, 3.6308074569416447`*^9}, {3.630808242239827*^9, 3.6308082648781223`*^9}, 3.6308084593562455`*^9, {3.6345433582074366`*^9, 3.634543372320244*^9}, { 3.6346116313217573`*^9, 3.6346116325178256`*^9}, {3.666087872613713*^9, 3.666087886573511*^9}, {3.6881181216838675`*^9, 3.688118174223941*^9}, { 3.688118207333987*^9, 3.6881182190740037`*^9}, {3.6881198165987434`*^9, 3.6881198365987716`*^9}, {3.688119917098884*^9, 3.6881199552489376`*^9}, { 3.6881200535590754`*^9, 3.688120067969095*^9}, {3.6881202600693645`*^9, 3.6881202623293676`*^9}, {3.6882115663473253`*^9, 3.6882116196673994`*^9}, {3.6882146169274535`*^9, 3.688214623197462*^9}, { 3.68821534280847*^9, 3.6882153918885384`*^9}, {3.6882155882088137`*^9, 3.688215596588825*^9}, {3.688215832739156*^9, 3.688216010999405*^9}, { 3.6882160560194683`*^9, 3.6882161733196325`*^9}, {3.688216240949727*^9, 3.688216241329728*^9}, {3.6883602152375245`*^9, 3.68836024784757*^9}, 3.688360344247705*^9, {3.6883608241383767`*^9, 3.688360825178378*^9}, { 3.7512866791330085`*^9, 3.751286699056904*^9}, {3.847105435228075*^9, 3.8471054957535906`*^9}, {3.8471057539628363`*^9, 3.847105756258417*^9}}, CellLabel-> "In[788]:=",ExpressionUUID->"ce2575e5-8de2-4dc8-8366-1927e114f1d5"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"convergence", " ", "test"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"rule", " ", ":=", RowBox[{"{", RowBox[{ RowBox[{"\[Nu]", "\[Rule]", RowBox[{"1", "/", "3."}]}], ",", RowBox[{"L", "\[Rule]", "1"}], ",", RowBox[{"\[CapitalEpsilon]", "\[Rule]", "10"}], ",", RowBox[{"f", "\[Rule]", "1"}], ",", RowBox[{"t", "\[Rule]", "0.1"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Table", "[", RowBox[{ RowBox[{"Simplify", "[", RowBox[{ RowBox[{"uX", "[", "4", "]"}], " ", "/.", " ", RowBox[{"SOLVE", "[", RowBox[{ RowBox[{"Nest", "[", RowBox[{"REFINE", ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], ",", "i"}], "]"}], " ", "/.", "rule"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", "4"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, 3.6308071837539654`*^9, { 3.6308072232376347`*^9, 3.6308072806925354`*^9}, {3.630807380891511*^9, 3.6308073810631113`*^9}, 3.630807416662374*^9, {3.6308074522148366`*^9, 3.6308074569416447`*^9}, {3.630808242239827*^9, 3.6308082648781223`*^9}, 3.6308084593562455`*^9, {3.6345433582074366`*^9, 3.634543372320244*^9}, { 3.6346116313217573`*^9, 3.6346116325178256`*^9}, {3.666087872613713*^9, 3.666087886573511*^9}, {3.6881181216838675`*^9, 3.688118174223941*^9}, { 3.688118207333987*^9, 3.6881182190740037`*^9}, {3.6881198165987434`*^9, 3.6881198365987716`*^9}, {3.688119917098884*^9, 3.6881199552489376`*^9}, { 3.6881200535590754`*^9, 3.688120067969095*^9}, {3.6881202600693645`*^9, 3.6881202623293676`*^9}, {3.6882115663473253`*^9, 3.6882116196673994`*^9}, {3.6882146169274535`*^9, 3.688214623197462*^9}, { 3.68821534280847*^9, 3.6882153918885384`*^9}, {3.6882155882088137`*^9, 3.688215596588825*^9}, {3.688215832739156*^9, 3.688216010999405*^9}, { 3.6882160560194683`*^9, 3.6882161733196325`*^9}, {3.688216240949727*^9, 3.688216241329728*^9}, {3.6883602152375245`*^9, 3.68836024784757*^9}, 3.688360344247705*^9, {3.6883608241383767`*^9, 3.688360825178378*^9}, { 3.7512866791330085`*^9, 3.751286699056904*^9}}, CellLabel-> "In[792]:=",ExpressionUUID->"2cd4096a-cacb-4010-b4e9-24ac115baae4"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 9 (simple structure)", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453610242333`*^9}, {3.6881165790617075`*^9, 3.6881165792117076`*^9}, { 3.7512867909464*^9, 3.7512867987070704`*^9}, {3.7834111712616377`*^9, 3.7834111782199583`*^9}},ExpressionUUID->"3cdd5512-1d3d-4dd6-9522-\ 260ef94d639f"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"2", ",", "3", ",", "1"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BAR", ",", RowBox[{"{", RowBox[{ RowBox[{"{", "\[CapitalEpsilon]", "}"}], ",", RowBox[{"{", "A", "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "4"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"-", "F"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "1", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", RowBox[{"uY", "[", "1", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, {3.5729261320974627`*^9, 3.572926321762596*^9}, {3.6031687440128527`*^9, 3.6031687449332542`*^9}, { 3.6031687982229476`*^9, 3.603168824633794*^9}, 3.6320402368949633`*^9, { 3.63204174146702*^9, 3.632041851912337*^9}, {3.6345434606482954`*^9, 3.6345435150414066`*^9}, {3.6345436615827885`*^9, 3.6345436977558575`*^9}, {3.6346117997963934`*^9, 3.6346118340633535`*^9}, 3.634611896179906*^9, {3.634612071313923*^9, 3.634612092485134*^9}, { 3.6346126773445864`*^9, 3.6346126847480097`*^9}, {3.6351291866120987`*^9, 3.6351292015219517`*^9}, {3.6351292397031355`*^9, 3.635129328728227*^9}, 3.6351293922568607`*^9, {3.6351294387045174`*^9, 3.6351294417016892`*^9}, { 3.635129484220121*^9, 3.6351295151848917`*^9}, 3.635129702328596*^9, { 3.635134078836198*^9, 3.635134093755051*^9}, 3.6351342697581177`*^9, 3.6351343217400913`*^9, 3.6351343584501905`*^9, {3.666087996034772*^9, 3.6660880025491447`*^9}, {3.666088047506716*^9, 3.666088076054349*^9}, { 3.687939828704934*^9, 3.6879398594649773`*^9}, {3.687944819931922*^9, 3.687944926122071*^9}, {3.6879453317526383`*^9, 3.687945334232642*^9}, { 3.6880233804029846`*^9, 3.68802340568302*^9}, {3.6880234410630693`*^9, 3.6880234439030733`*^9}, {3.6880234879931355`*^9, 3.6880234991531506`*^9}, {3.688023679763404*^9, 3.68802371252345*^9}, 3.688023821443602*^9, {3.6880238794336834`*^9, 3.6880239003237123`*^9}, { 3.688023955023789*^9, 3.6880239983138494`*^9}, {3.6881166034017415`*^9, 3.688116615111758*^9}, {3.6881167209119062`*^9, 3.68811687358212*^9}, 3.68811698795228*^9, {3.6881170302923393`*^9, 3.688117055682375*^9}, 3.6883625134880257`*^9, {3.75128680622136*^9, 3.751286818104207*^9}, 3.783420148452202*^9, 3.7834202121523533`*^9, {3.8471058794263525`*^9, 3.8471058855386677`*^9}, {3.847105939919419*^9, 3.8471059418634677`*^9}}, CellLabel-> "In[794]:=",ExpressionUUID->"6fced7f6-b0b6-44fb-a53d-020451bca118"] }, Closed]], Cell[CellGroupData[{ Cell["Exercise problem 10 (solid and tetrahedron element)", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453610242333`*^9}, {3.6033418125511665`*^9, 3.6033418347656054`*^9}, {3.6881170847524157`*^9, 3.6881170848324156`*^9}, {3.751286848540131*^9, 3.7512868486330724`*^9}, 3.783411174761882*^9},ExpressionUUID->"f29688d1-a637-4308-9237-\ 95d43b903cb4"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"SOLID", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Tetrahedron", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "F"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "1", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "L"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "1", "]"}], ",", RowBox[{"uY", "[", "1", "]"}], ",", RowBox[{"uZ", "[", "1", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " "}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, {3.5729261320974627`*^9, 3.572926321762596*^9}, {3.6031687440128527`*^9, 3.6031687449332542`*^9}, { 3.6031687982229476`*^9, 3.603168824633794*^9}, {3.60334189409951*^9, 3.603341934706382*^9}, {3.6033420186657295`*^9, 3.603342095355464*^9}, { 3.603342177583208*^9, 3.603342191280032*^9}, {3.6033424047196074`*^9, 3.6033424056868086`*^9}, {3.6033424414576716`*^9, 3.6033427834882727`*^9}, {3.6033428137835255`*^9, 3.603342919099311*^9}, { 3.6033430329795103`*^9, 3.6033430442739305`*^9}, {3.6308937722659883`*^9, 3.6308938790949755`*^9}, {3.630895187999675*^9, 3.630895358741975*^9}, 3.634613126106254*^9, {3.6346132226047735`*^9, 3.634613259930908*^9}, { 3.687865467869472*^9, 3.687865590772502*^9}, {3.687865713387515*^9, 3.687865720219906*^9}, {3.687866306081375*^9, 3.687866311132664*^9}, { 3.6881171221824675`*^9, 3.688117210052591*^9}, {3.688117280242689*^9, 3.6881173384027705`*^9}, {3.7512914164690323`*^9, 3.7512914264358044`*^9}, {3.7740745374419465`*^9, 3.774074540614051*^9}, 3.7740746751866093`*^9, {3.774088990817813*^9, 3.7740890894928274`*^9}, { 3.774089190613978*^9, 3.774089191916827*^9}, 3.77408927951208*^9, { 3.7741518143458586`*^9, 3.774151849722659*^9}, {3.774151930011162*^9, 3.774151930390722*^9}, 3.774164289798223*^9, {3.774166900868268*^9, 3.7741669037162633`*^9}, {3.7741669696447077`*^9, 3.774166969979418*^9}, { 3.7741670136923437`*^9, 3.7741670234041023`*^9}, {3.774167062886531*^9, 3.7741670937992363`*^9}, {3.774168362801942*^9, 3.774168364045298*^9}, { 3.774168410304835*^9, 3.774168552089986*^9}, 3.774168583189966*^9, { 3.7834202694421997`*^9, 3.7834203169122524`*^9}, {3.7834203932726946`*^9, 3.783420418092345*^9}}, CellLabel-> "In[798]:=",ExpressionUUID->"b40c30bc-e050-49e4-a561-2c93842433e1"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 1", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453610242333`*^9}, {3.6881165790617075`*^9, 3.6881165792117076`*^9}, {3.6883031146344156`*^9, 3.688303126044431*^9}, { 3.6883787332359533`*^9, 3.6883787339959545`*^9}, 3.7512917511657004`*^9},ExpressionUUID->"5a953b47-026c-4979-a41c-\ c13d5c9bda0c"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"2", ",", "4", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"F", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "4", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "4", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], " ", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, {3.5729261320974627`*^9, 3.572926321762596*^9}, {3.6031687440128527`*^9, 3.6031687449332542`*^9}, { 3.6031687982229476`*^9, 3.603168824633794*^9}, 3.6320402368949633`*^9, { 3.63204174146702*^9, 3.632041851912337*^9}, {3.6345434606482954`*^9, 3.6345435150414066`*^9}, {3.6345436615827885`*^9, 3.6345436977558575`*^9}, {3.6346117997963934`*^9, 3.6346118340633535`*^9}, 3.634611896179906*^9, {3.634612071313923*^9, 3.634612092485134*^9}, { 3.6346126773445864`*^9, 3.6346126847480097`*^9}, {3.6351291866120987`*^9, 3.6351292015219517`*^9}, {3.6351292397031355`*^9, 3.635129328728227*^9}, 3.6351293922568607`*^9, {3.6351294387045174`*^9, 3.6351294417016892`*^9}, { 3.635129484220121*^9, 3.6351295151848917`*^9}, 3.635129702328596*^9, { 3.635134078836198*^9, 3.635134093755051*^9}, 3.6351342697581177`*^9, 3.6351343217400913`*^9, 3.6351343584501905`*^9, {3.666087996034772*^9, 3.6660880025491447`*^9}, {3.666088047506716*^9, 3.666088076054349*^9}, { 3.687939828704934*^9, 3.6879398594649773`*^9}, {3.687944819931922*^9, 3.687944926122071*^9}, {3.6879453317526383`*^9, 3.687945334232642*^9}, { 3.6880233804029846`*^9, 3.68802340568302*^9}, {3.6880234410630693`*^9, 3.6880234439030733`*^9}, {3.6880234879931355`*^9, 3.6880234991531506`*^9}, {3.688023679763404*^9, 3.68802371252345*^9}, 3.688023821443602*^9, {3.6880238794336834`*^9, 3.6880239003237123`*^9}, { 3.688023955023789*^9, 3.6880239983138494`*^9}, {3.6881166034017415`*^9, 3.688116615111758*^9}, {3.6881167209119062`*^9, 3.68811687358212*^9}, 3.68811698795228*^9, {3.6881170302923393`*^9, 3.688117055682375*^9}, { 3.6883031354444447`*^9, 3.688303304504681*^9}, {3.6883033462647395`*^9, 3.6883033615747614`*^9}, {3.688303626345132*^9, 3.688303628435135*^9}, { 3.688303805025382*^9, 3.6883038634454637`*^9}, {3.6883048468268404`*^9, 3.688304864146865*^9}, {3.688304935576965*^9, 3.688305011527071*^9}, { 3.6883051211172247`*^9, 3.688305286687456*^9}, {3.688305381527589*^9, 3.6883054162776375`*^9}, 3.688305538647809*^9, {3.6883066712393947`*^9, 3.688306678589405*^9}, {3.6883073609303603`*^9, 3.6883073611403604`*^9}, { 3.7512941803923516`*^9, 3.751294216852568*^9}, 3.7513362298191566`*^9, { 3.7834079295612755`*^9, 3.7834080378411207`*^9}, {3.7834081631031685`*^9, 3.783408169935551*^9}, {3.78340822475251*^9, 3.7834082459425187`*^9}, { 3.8146981394704695`*^9, 3.8146981521078434`*^9}, {3.8471072176550417`*^9, 3.8471072447359686`*^9}}, CellLabel-> "In[802]:=",ExpressionUUID->"41209339-197c-446b-93ad-5a915622be32"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 2", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453610242333`*^9}, {3.6881165790617075`*^9, 3.6881165792117076`*^9}, {3.6883031146344156`*^9, 3.688303126044431*^9}, { 3.688378737315959*^9, 3.6883787409759645`*^9}, 3.7512917555706644`*^9},ExpressionUUID->"30587767-7755-4213-99e9-\ 5cb39b1e789e"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "f"}], ",", RowBox[{"-", "f"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"uY", "[", "2", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"uY", "[", "2", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, {3.5729261320974627`*^9, 3.572926321762596*^9}, {3.6031687440128527`*^9, 3.6031687449332542`*^9}, { 3.6031687982229476`*^9, 3.603168824633794*^9}, 3.6320402368949633`*^9, { 3.63204174146702*^9, 3.632041851912337*^9}, {3.6345434606482954`*^9, 3.6345435150414066`*^9}, {3.6345436615827885`*^9, 3.6345436977558575`*^9}, {3.6346117997963934`*^9, 3.6346118340633535`*^9}, 3.634611896179906*^9, {3.634612071313923*^9, 3.634612092485134*^9}, { 3.6346126773445864`*^9, 3.6346126847480097`*^9}, {3.6351291866120987`*^9, 3.6351292015219517`*^9}, {3.6351292397031355`*^9, 3.635129328728227*^9}, 3.6351293922568607`*^9, {3.6351294387045174`*^9, 3.6351294417016892`*^9}, { 3.635129484220121*^9, 3.6351295151848917`*^9}, 3.635129702328596*^9, { 3.635134078836198*^9, 3.635134093755051*^9}, 3.6351342697581177`*^9, 3.6351343217400913`*^9, 3.6351343584501905`*^9, {3.666087996034772*^9, 3.6660880025491447`*^9}, {3.666088047506716*^9, 3.666088076054349*^9}, { 3.687939828704934*^9, 3.6879398594649773`*^9}, {3.687944819931922*^9, 3.687944926122071*^9}, {3.6879453317526383`*^9, 3.687945334232642*^9}, { 3.6880233804029846`*^9, 3.68802340568302*^9}, {3.6880234410630693`*^9, 3.6880234439030733`*^9}, {3.6880234879931355`*^9, 3.6880234991531506`*^9}, {3.688023679763404*^9, 3.68802371252345*^9}, 3.688023821443602*^9, {3.6880238794336834`*^9, 3.6880239003237123`*^9}, { 3.688023955023789*^9, 3.6880239983138494`*^9}, {3.6881166034017415`*^9, 3.688116615111758*^9}, {3.6881167209119062`*^9, 3.68811687358212*^9}, 3.68811698795228*^9, {3.6881170302923393`*^9, 3.688117055682375*^9}, { 3.6883031354444447`*^9, 3.688303304504681*^9}, {3.6883033462647395`*^9, 3.6883033615747614`*^9}, {3.688303626345132*^9, 3.688303628435135*^9}, { 3.688303805025382*^9, 3.6883038634454637`*^9}, {3.6883048468268404`*^9, 3.688304864146865*^9}, {3.688304935576965*^9, 3.688305011527071*^9}, { 3.6883051211172247`*^9, 3.688305286687456*^9}, {3.688305381527589*^9, 3.6883054162776375`*^9}, 3.688305538647809*^9, {3.6883066712393947`*^9, 3.688306678589405*^9}, {3.6883073609303603`*^9, 3.6883073611403604`*^9}, { 3.688378751475979*^9, 3.688378833816094*^9}, {3.6883788682461424`*^9, 3.6883789212262163`*^9}, {3.6883789819763017`*^9, 3.688378982396302*^9}, { 3.7833974018587823`*^9, 3.7833975528131633`*^9}, {3.7833976076990547`*^9, 3.783397608621016*^9}, {3.783397654343261*^9, 3.7833977964806194`*^9}, { 3.783401424896967*^9, 3.7834014535857573`*^9}, {3.7834082711179733`*^9, 3.783408273574458*^9}, {3.8146983555164332`*^9, 3.814698378940027*^9}}, CellLabel-> "In[806]:=",ExpressionUUID->"5cf66b1d-9d3a-4a85-ab81-1308e900cb3a"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 3", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453610242333`*^9}, {3.6881165790617075`*^9, 3.6881165792117076`*^9}, {3.6883031146344156`*^9, 3.688303126044431*^9}, { 3.688378737315959*^9, 3.6883787409759645`*^9}, 3.7512917555706644`*^9, 3.751297603833567*^9},ExpressionUUID->"527269e9-00f7-4939-83c7-\ 891ea80819e4"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "\[Rho]"}], " ", "g", " ", "t"}], ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "3", "]"}], ",", RowBox[{"uY", "[", "3", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, {3.5729261320974627`*^9, 3.572926321762596*^9}, {3.6031687440128527`*^9, 3.6031687449332542`*^9}, { 3.6031687982229476`*^9, 3.603168824633794*^9}, 3.6320402368949633`*^9, { 3.63204174146702*^9, 3.632041851912337*^9}, {3.6345434606482954`*^9, 3.6345435150414066`*^9}, {3.6345436615827885`*^9, 3.6345436977558575`*^9}, {3.6346117997963934`*^9, 3.6346118340633535`*^9}, 3.634611896179906*^9, {3.634612071313923*^9, 3.634612092485134*^9}, { 3.6346126773445864`*^9, 3.6346126847480097`*^9}, {3.6351291866120987`*^9, 3.6351292015219517`*^9}, {3.6351292397031355`*^9, 3.635129328728227*^9}, 3.6351293922568607`*^9, {3.6351294387045174`*^9, 3.6351294417016892`*^9}, { 3.635129484220121*^9, 3.6351295151848917`*^9}, 3.635129702328596*^9, { 3.635134078836198*^9, 3.635134093755051*^9}, 3.6351342697581177`*^9, 3.6351343217400913`*^9, 3.6351343584501905`*^9, {3.666087996034772*^9, 3.6660880025491447`*^9}, {3.666088047506716*^9, 3.666088076054349*^9}, { 3.687939828704934*^9, 3.6879398594649773`*^9}, {3.687944819931922*^9, 3.687944926122071*^9}, {3.6879453317526383`*^9, 3.687945334232642*^9}, { 3.6880233804029846`*^9, 3.68802340568302*^9}, {3.6880234410630693`*^9, 3.6880234439030733`*^9}, {3.6880234879931355`*^9, 3.6880234991531506`*^9}, {3.688023679763404*^9, 3.68802371252345*^9}, 3.688023821443602*^9, {3.6880238794336834`*^9, 3.6880239003237123`*^9}, { 3.688023955023789*^9, 3.6880239983138494`*^9}, {3.6881166034017415`*^9, 3.688116615111758*^9}, {3.6881167209119062`*^9, 3.68811687358212*^9}, 3.68811698795228*^9, {3.6881170302923393`*^9, 3.688117055682375*^9}, { 3.6883031354444447`*^9, 3.688303304504681*^9}, {3.6883033462647395`*^9, 3.6883033615747614`*^9}, {3.688303626345132*^9, 3.688303628435135*^9}, { 3.688303805025382*^9, 3.6883038634454637`*^9}, {3.6883048468268404`*^9, 3.688304864146865*^9}, {3.688304935576965*^9, 3.688305011527071*^9}, { 3.6883051211172247`*^9, 3.688305286687456*^9}, {3.688305381527589*^9, 3.6883054162776375`*^9}, 3.688305538647809*^9, {3.6883066712393947`*^9, 3.688306678589405*^9}, {3.6883073609303603`*^9, 3.6883073611403604`*^9}, { 3.688378751475979*^9, 3.688378833816094*^9}, {3.6883788682461424`*^9, 3.6883789212262163`*^9}, {3.6883789819763017`*^9, 3.688378982396302*^9}, { 3.751297613252968*^9, 3.7512976494009695`*^9}, {3.751297683221142*^9, 3.7512977465343695`*^9}, {3.783408336117815*^9, 3.783408402637492*^9}, 3.7834084682286525`*^9, {3.7834085074770174`*^9, 3.783408514700861*^9}, { 3.783408609187885*^9, 3.7834086196732087`*^9}, {3.7834086672237244`*^9, 3.7834086691281414`*^9}, {3.783408830962015*^9, 3.7834088329216003`*^9}, { 3.847107338442585*^9, 3.847107340912531*^9}}, CellLabel-> "In[810]:=",ExpressionUUID->"83a877d9-448c-4ffb-a2df-930d30ed1515"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture assignment 1", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453610242333`*^9}, {3.6881165790617075`*^9, 3.6881165792117076`*^9}, {3.6883031146344156`*^9, 3.688303126044431*^9}, { 3.688378737315959*^9, 3.6883787409759645`*^9}, {3.6888905293623123`*^9, 3.6888905307023144`*^9}, 3.751336483704151*^9},ExpressionUUID->"47a33e95-4d1d-4fe9-8f96-\ e95239334923"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"h", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"h", " ", SubscriptBox["k", "1"]}], ",", RowBox[{"h", " ", SubscriptBox["k", "3"]}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "h", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "h"}], " ", SubscriptBox["k", "3"]}], ",", RowBox[{"h", " ", SubscriptBox["k", "2"]}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"STRESS", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, {3.5729261320974627`*^9, 3.572926321762596*^9}, {3.6031687440128527`*^9, 3.6031687449332542`*^9}, { 3.6031687982229476`*^9, 3.603168824633794*^9}, 3.6320402368949633`*^9, { 3.63204174146702*^9, 3.632041851912337*^9}, {3.6345434606482954`*^9, 3.6345435150414066`*^9}, {3.6345436615827885`*^9, 3.6345436977558575`*^9}, {3.6346117997963934`*^9, 3.6346118340633535`*^9}, 3.634611896179906*^9, {3.634612071313923*^9, 3.634612092485134*^9}, { 3.6346126773445864`*^9, 3.6346126847480097`*^9}, {3.6351291866120987`*^9, 3.6351292015219517`*^9}, {3.6351292397031355`*^9, 3.635129328728227*^9}, 3.6351293922568607`*^9, {3.6351294387045174`*^9, 3.6351294417016892`*^9}, { 3.635129484220121*^9, 3.6351295151848917`*^9}, 3.635129702328596*^9, { 3.635134078836198*^9, 3.635134093755051*^9}, 3.6351342697581177`*^9, 3.6351343217400913`*^9, 3.6351343584501905`*^9, {3.666087996034772*^9, 3.6660880025491447`*^9}, {3.666088047506716*^9, 3.666088076054349*^9}, { 3.687939828704934*^9, 3.6879398594649773`*^9}, {3.687944819931922*^9, 3.687944926122071*^9}, {3.6879453317526383`*^9, 3.687945334232642*^9}, { 3.6880233804029846`*^9, 3.68802340568302*^9}, {3.6880234410630693`*^9, 3.6880234439030733`*^9}, {3.6880234879931355`*^9, 3.6880234991531506`*^9}, {3.688023679763404*^9, 3.68802371252345*^9}, 3.688023821443602*^9, {3.6880238794336834`*^9, 3.6880239003237123`*^9}, { 3.688023955023789*^9, 3.6880239983138494`*^9}, {3.6881166034017415`*^9, 3.688116615111758*^9}, {3.6881167209119062`*^9, 3.68811687358212*^9}, 3.68811698795228*^9, {3.6881170302923393`*^9, 3.688117055682375*^9}, { 3.6883031354444447`*^9, 3.688303304504681*^9}, {3.6883033462647395`*^9, 3.6883033615747614`*^9}, {3.688303626345132*^9, 3.688303628435135*^9}, { 3.688303805025382*^9, 3.6883038634454637`*^9}, {3.6883048468268404`*^9, 3.688304864146865*^9}, {3.688304935576965*^9, 3.688305011527071*^9}, { 3.6883051211172247`*^9, 3.688305286687456*^9}, {3.688305381527589*^9, 3.6883054162776375`*^9}, 3.688305538647809*^9, {3.6883066712393947`*^9, 3.688306678589405*^9}, {3.6883073609303603`*^9, 3.6883073611403604`*^9}, { 3.688378751475979*^9, 3.688378833816094*^9}, {3.6883788682461424`*^9, 3.6883789212262163`*^9}, {3.6883789819763017`*^9, 3.688378982396302*^9}, { 3.688890539042326*^9, 3.6888906222624426`*^9}, {3.688890654752488*^9, 3.688890709112564*^9}, {3.7513389111022406`*^9, 3.751339063413638*^9}, { 3.751339125759699*^9, 3.751339127118745*^9}, {3.7513391918423934`*^9, 3.7513391939512653`*^9}, {3.751339426226322*^9, 3.751339427944371*^9}, { 3.7513394660450926`*^9, 3.7513394828220863`*^9}, {3.783410969479591*^9, 3.783411009923984*^9}, {3.8150998710943346`*^9, 3.8150998947619553`*^9}, { 3.847107393673952*^9, 3.8471073982072244`*^9}}, CellLabel-> "In[818]:=",ExpressionUUID->"63488b61-8cd0-46b8-a092-c5ee6e56c481"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture assignment 2", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453610242333`*^9}, {3.6881165790617075`*^9, 3.6881165792117076`*^9}, {3.6883031146344156`*^9, 3.688303126044431*^9}, { 3.688378737315959*^9, 3.6883787409759645`*^9}, {3.6888905293623123`*^9, 3.6888905307023144`*^9}, 3.7513403267221117`*^9},ExpressionUUID->"402f8a39-168c-4a3e-bcea-\ 7bc479d425f5"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "L", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"uY", "[", "2", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, {3.5729261320974627`*^9, 3.572926321762596*^9}, {3.6031687440128527`*^9, 3.6031687449332542`*^9}, { 3.6031687982229476`*^9, 3.603168824633794*^9}, 3.6320402368949633`*^9, { 3.63204174146702*^9, 3.632041851912337*^9}, {3.6345434606482954`*^9, 3.6345435150414066`*^9}, {3.6345436615827885`*^9, 3.6345436977558575`*^9}, {3.6346117997963934`*^9, 3.6346118340633535`*^9}, 3.634611896179906*^9, {3.634612071313923*^9, 3.634612092485134*^9}, { 3.6346126773445864`*^9, 3.6346126847480097`*^9}, {3.6351291866120987`*^9, 3.6351292015219517`*^9}, {3.6351292397031355`*^9, 3.635129328728227*^9}, 3.6351293922568607`*^9, {3.6351294387045174`*^9, 3.6351294417016892`*^9}, { 3.635129484220121*^9, 3.6351295151848917`*^9}, 3.635129702328596*^9, { 3.635134078836198*^9, 3.635134093755051*^9}, 3.6351342697581177`*^9, 3.6351343217400913`*^9, 3.6351343584501905`*^9, {3.666087996034772*^9, 3.6660880025491447`*^9}, {3.666088047506716*^9, 3.666088076054349*^9}, { 3.687939828704934*^9, 3.6879398594649773`*^9}, {3.687944819931922*^9, 3.687944926122071*^9}, {3.6879453317526383`*^9, 3.687945334232642*^9}, { 3.6880233804029846`*^9, 3.68802340568302*^9}, {3.6880234410630693`*^9, 3.6880234439030733`*^9}, {3.6880234879931355`*^9, 3.6880234991531506`*^9}, {3.688023679763404*^9, 3.68802371252345*^9}, 3.688023821443602*^9, {3.6880238794336834`*^9, 3.6880239003237123`*^9}, { 3.688023955023789*^9, 3.6880239983138494`*^9}, {3.6881166034017415`*^9, 3.688116615111758*^9}, {3.6881167209119062`*^9, 3.68811687358212*^9}, 3.68811698795228*^9, {3.6881170302923393`*^9, 3.688117055682375*^9}, { 3.6883031354444447`*^9, 3.688303304504681*^9}, {3.6883033462647395`*^9, 3.6883033615747614`*^9}, {3.688303626345132*^9, 3.688303628435135*^9}, { 3.688303805025382*^9, 3.6883038634454637`*^9}, {3.6883048468268404`*^9, 3.688304864146865*^9}, {3.688304935576965*^9, 3.688305011527071*^9}, { 3.6883051211172247`*^9, 3.688305286687456*^9}, {3.688305381527589*^9, 3.6883054162776375`*^9}, 3.688305538647809*^9, {3.6883066712393947`*^9, 3.688306678589405*^9}, {3.6883073609303603`*^9, 3.6883073611403604`*^9}, { 3.688378751475979*^9, 3.688378833816094*^9}, {3.6883788682461424`*^9, 3.6883789212262163`*^9}, {3.6883789819763017`*^9, 3.688378982396302*^9}, { 3.688890539042326*^9, 3.6888906222624426`*^9}, {3.688890654752488*^9, 3.688890709112564*^9}, {3.7513403335174685`*^9, 3.7513403654627843`*^9}, 3.783411034364565*^9, {3.847107446524934*^9, 3.847107453654496*^9}}, CellLabel-> "In[822]:=",ExpressionUUID->"428ccaad-d81f-426f-a677-7b211531d4d5"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["BEAM AND PLATE MODELS (week 49)", "Subsection", CellChangeTimes->{{3.473055512584*^9, 3.4730555529630003`*^9}, { 3.4730575328269997`*^9, 3.473057539222*^9}, {3.4734691424642*^9, 3.4734691605758*^9}, {3.4736023142902*^9, 3.4736023273162003`*^9}, { 3.4742602258717394`*^9, 3.4742602349087396`*^9}, {3.4751533480335493`*^9, 3.4751533839809494`*^9}, {3.47515343117095*^9, 3.47515343786335*^9}, { 3.4758461893361397`*^9, 3.4758462006617393`*^9}, {3.4782569733691998`*^9, 3.4782570107312*^9}, {3.4801235510838003`*^9, 3.480123567495*^9}, { 3.480123621705*^9, 3.480123624903*^9}, {3.574131782681972*^9, 3.574131786519579*^9}, {3.603722925089178*^9, 3.6037229351043954`*^9}, 3.629791681042527*^9, {3.634905179231354*^9, 3.634905187802844*^9}, { 3.6668793703995185`*^9, 3.666879373240728*^9}, 3.6852489702601957`*^9, { 3.6853235130135884`*^9, 3.685323515403592*^9}, {3.6860286448277264`*^9, 3.6860286455047655`*^9}, {3.686466654707692*^9, 3.686466688107739*^9}, { 3.686840182440504*^9, 3.6868401825505037`*^9}, 3.688364650699027*^9, 3.780755267207376*^9, {3.815546917621894*^9, 3.815546922914048*^9}},ExpressionUUID->"926355d9-01d9-4910-bc0d-\ e065ea3f5809"], Cell[CellGroupData[{ Cell["Lecture example 6.1a (Plate bending)", "Subsubsection", CellChangeTimes->{ 3.4710857577642*^9, {3.4710858112098*^9, 3.4710858239082003`*^9}, { 3.4710859049969997`*^9, 3.4710859061046*^9}, {3.4710892678536*^9, 3.4710892701*^9}, 3.4710893817648*^9, {3.4710894793115997`*^9, 3.4710895039596*^9}, {3.4710905118050003`*^9, 3.471090512741*^9}, { 3.4725252603414*^9, 3.472525264101*^9}, {3.4725253064862003`*^9, 3.4725253370934*^9}, {3.4747629998582*^9, 3.4747630055678*^9}, { 3.4752273878873997`*^9, 3.4752273904926*^9}, {3.4753663741484003`*^9, 3.4753664116352*^9}, {3.4753773567911997`*^9, 3.475377356916*^9}, 3.4753775870472*^9, {3.4754620951394*^9, 3.4754621031266003`*^9}, { 3.4779795207265997`*^9, 3.4779795250576*^9}, 3.537621939388029*^9, 3.537622934627954*^9, {3.5376230222229643`*^9, 3.537623029743394*^9}, { 3.537623460058007*^9, 3.537623470980632*^9}, {3.537624955779557*^9, 3.5376249594157653`*^9}, {3.6000028730424147`*^9, 3.6000028738224154`*^9}, 3.601272187572051*^9, 3.6018909318619084`*^9, 3.601891512682129*^9, 3.6018936089046106`*^9, {3.664878906157814*^9, 3.6648789098394203`*^9}, { 3.6983882168251424`*^9, 3.6983882190651455`*^9}, {3.729841498400111*^9, 3.729841511714019*^9}, {3.7298438456432447`*^9, 3.729843846549593*^9}, { 3.751956438263767*^9, 3.7519564399821167`*^9}, 3.783656434955984*^9, 3.815546950985428*^9, 3.8155533887795944`*^9, {3.8437124429895773`*^9, 3.84371244543067*^9}, {3.843781012544642*^9, 3.843781018971984*^9}, { 3.8437810984980755`*^9, 3.8437811060259047`*^9}},ExpressionUUID->"37c79142-2f6c-494c-bdcf-\ 21b911153eb3"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"val", "=", RowBox[{"{", RowBox[{ RowBox[{"L", "->", "5"}], ",", RowBox[{"H", "->", "5"}], ",", " ", RowBox[{"t", "->", "0.01"}], ",", RowBox[{"\[Nu]", "->", "0.3"}], ",", " ", RowBox[{"EE", "->", RowBox[{"210", "*", RowBox[{"10", "^", "9"}]}]}], ",", RowBox[{"\[Rho]", "->", " ", "8000"}], ",", RowBox[{"g", "->", "9.81"}], ",", RowBox[{"fz", "->", " ", RowBox[{"\[Rho]", " ", "g", " ", "t"}]}], ",", RowBox[{"DD", " ", "\[Rule]", " ", RowBox[{"EE", "*", RowBox[{ RowBox[{"t", "^", "3"}], "/", RowBox[{"(", RowBox[{"12", "*", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]", "^", "2"}]}], ")"}]}], ")"}]}]}]}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"wij", "=", RowBox[{ RowBox[{"16", FractionBox["fz", "DD"], FractionBox["1", RowBox[{"i", " ", "j", " ", SuperscriptBox["\[Pi]", "2"], " "}]], FractionBox[ RowBox[{ RowBox[{"Sin", "[", FractionBox[ RowBox[{"i", " ", "\[Pi]", " ", "x"}], "L"], "]"}], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"j", " ", "\[Pi]", " ", "y"}], "H"], "]"}]}], SuperscriptBox[ RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"\[Pi]", " ", "i"}], "L"], ")"}], "2"], "+", SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"\[Pi]", " ", "j"}], "H"], ")"}], "2"]}], ")"}], "2"]]}], " ", "//.", "val"}]}], ";"}], "\n", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"derived", " ", "terms"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Mxxij", "=", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"EE", "*", RowBox[{ RowBox[{"t", "^", "3"}], "/", RowBox[{"(", RowBox[{"12", "*", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]", "^", "2"}]}], ")"}]}], ")"}]}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "wij"}], "+", RowBox[{"\[Nu]", "*", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "wij"}]}]}], ")"}]}], " ", "//.", "val"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Myyij", "=", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"EE", "*", RowBox[{ RowBox[{"t", "^", "3"}], "/", RowBox[{"(", RowBox[{"12", "*", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]", "^", "2"}]}], ")"}]}], ")"}]}]}], ")"}]}], "*", RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "wij"}], "+", RowBox[{"\[Nu]", "*", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "wij"}]}]}], ")"}]}], "//.", "val"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Mxyij", "=", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"EE", "*", RowBox[{ RowBox[{"t", "^", "3"}], "/", RowBox[{"(", RowBox[{"12", "*", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]", "^", "2"}]}], ")"}]}], ")"}]}]}], ")"}]}], "*", RowBox[{"(", RowBox[{"1", "-", "\[Nu]"}], ")"}], "*", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "wij"}]}], "//.", "val"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Qxij", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "Mxxij"}], "+", RowBox[{ SubscriptBox["\[PartialD]", "y"], "Mxyij"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Qyij", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "Myyij"}], "+", RowBox[{ SubscriptBox["\[PartialD]", "x"], "Mxyij"}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "quantities", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "=", "21"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ws", "=", RowBox[{"ParallelSum", "[", RowBox[{"wij", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n", ",", "2"}], "}"}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"Mxxs", "=", RowBox[{"ParallelSum", "[", RowBox[{"Mxxij", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n", ",", "2"}], "}"}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"Myys", "=", RowBox[{"ParallelSum", "[", RowBox[{"Myyij", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n", ",", "2"}], "}"}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"Mxys", "=", RowBox[{"ParallelSum", "[", RowBox[{"Mxyij", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n", ",", "2"}], "}"}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"Qxs", "=", RowBox[{"ParallelSum", "[", RowBox[{"Qxij", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n", ",", "2"}], "}"}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"Qys", "=", RowBox[{"ParallelSum", "[", RowBox[{"Qyij", ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n", ",", "2"}], "}"}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fsize", "=", "12"}], ";"}], "\[IndentingNewLine]", RowBox[{"Grid", "[", RowBox[{"Partition", "[", RowBox[{ RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{"Plot3D", "[", RowBox[{"#1", ",", RowBox[{"Evaluate", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "0", ",", "L"}], "}"}], " ", "/.", "val"}], "]"}], ",", RowBox[{"Evaluate", "[", RowBox[{ RowBox[{"{", RowBox[{"y", ",", "0", ",", "H"}], "}"}], " ", "/.", "val"}], "]"}], ",", RowBox[{"Boxed", "\[Rule]", "False"}], ",", RowBox[{"Axes", "\[Rule]", "True"}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"GrayLevel", "[", ".25", "]"}], ",", RowBox[{"Specularity", "[", RowBox[{"White", ",", "10"}], "]"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotLabel", "\[Rule]", RowBox[{ RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], "[", RowBox[{"[", RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{"Lighting", "\[Rule]", "\"\\""}], ",", RowBox[{"SphericalRegion", "->", "True"}], ",", RowBox[{"BaseStyle", "->", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "->", "\"\\""}], ",", RowBox[{"FontSize", "\[Rule]", "fsize"}]}], "}"}]}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"Automatic", ",", "Automatic", ",", "All"}], "}"}]}]}], "]"}], "&"}], ",", RowBox[{"{", RowBox[{ "ws", ",", "Mxxs", ",", "Myys", ",", "Mxys", ",", "Qxs", ",", "Qys"}], "}"}]}], "]"}], ",", "3"}], "]"}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"ws", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"x", "->", RowBox[{"5", "/", "2"}]}], ",", RowBox[{"y", "->", RowBox[{"5", "/", "2"}]}]}], "}"}]}]}]}]], "Input", CellChangeTimes->{{3.601313951267284*^9, 3.6013140252114134`*^9}, { 3.601314093711134*^9, 3.601314270787045*^9}, {3.6013143804084377`*^9, 3.601314473337801*^9}, {3.6013149788098884`*^9, 3.6013149882323055`*^9}, { 3.601340614118454*^9, 3.6013407373898706`*^9}, {3.60134077135113*^9, 3.6013409616246643`*^9}, {3.6013410067087436`*^9, 3.601341086268883*^9}, { 3.601341120557743*^9, 3.6013411387473755`*^9}, {3.601341251847574*^9, 3.601341291128443*^9}, {3.6013413215796967`*^9, 3.6013413257449036`*^9}, { 3.601341393651823*^9, 3.6013416705991096`*^9}, {3.6013417051375704`*^9, 3.601341724809205*^9}, {3.601341773980491*^9, 3.6013417869285135`*^9}, { 3.6013418901538954`*^9, 3.6013418908246965`*^9}, {3.601341940869584*^9, 3.601342003316494*^9}, {3.6013420798502283`*^9, 3.6013420878374424`*^9}, { 3.6013421442471414`*^9, 3.601342212278861*^9}, {3.601342248658125*^9, 3.6013422850685887`*^9}, {3.6013423513687053`*^9, 3.601342444157668*^9}, { 3.601342521409004*^9, 3.6013425273526144`*^9}, {3.6013425640594788`*^9, 3.6013425781775036`*^9}, {3.6013426110779614`*^9, 3.601342686145293*^9}, { 3.601342786437869*^9, 3.601342789230274*^9}, {3.6013428577455945`*^9, 3.601342863018404*^9}, {3.6013429094284854`*^9, 3.6013429182581005`*^9}, { 3.601342961048976*^9, 3.6013429880838237`*^9}, {3.6013430210622816`*^9, 3.601343064882758*^9}, {3.6013434076309605`*^9, 3.601343573287651*^9}, { 3.6013436285273485`*^9, 3.6013436334881573`*^9}, {3.601343670600622*^9, 3.6013437385543413`*^9}, {3.6013437701443973`*^9, 3.601343787164027*^9}, { 3.6013438278332987`*^9, 3.6013438388625183`*^9}, {3.601343873104578*^9, 3.6013438948978167`*^9}, 3.6013439274550734`*^9, {3.6013439625551353`*^9, 3.6013440811621437`*^9}, {3.6013441228922167`*^9, 3.601344308672943*^9}, { 3.601344546900962*^9, 3.601344548523364*^9}, {3.6013446565379543`*^9, 3.601344663464366*^9}, 3.6013457077950006`*^9, {3.601345758151889*^9, 3.6013457699143095`*^9}, {3.6013553145229216`*^9, 3.6013553209642897`*^9}, {3.60135565822058*^9, 3.601355667418106*^9}, 3.601355795222416*^9, 3.6013558538517694`*^9, 3.6013558876107006`*^9, { 3.601356829699139*^9, 3.60135692696531*^9}, {3.601356987104416*^9, 3.601356998320835*^9}, {3.6013570424377127`*^9, 3.601357045932119*^9}, { 3.601357118269446*^9, 3.6013571225906534`*^9}, {3.601357369479273*^9, 3.601357370424327*^9}, {3.6013574497938666`*^9, 3.601357453105056*^9}, { 3.601357520199894*^9, 3.6013575282613544`*^9}, {3.601357806887291*^9, 3.601357809292429*^9}, {3.601357884232715*^9, 3.6013579135581255`*^9}, { 3.601357949952989*^9, 3.60135795026499*^9}, {3.601358031993533*^9, 3.6013580320871334`*^9}, {3.601362738657782*^9, 3.6013628080077486`*^9}, { 3.6013628827610245`*^9, 3.6013628841501036`*^9}, {3.6013629148928623`*^9, 3.601362918095045*^9}, {3.6013640636965103`*^9, 3.6013640711065235`*^9}, { 3.6013643582562275`*^9, 3.601364358396628*^9}, {3.6013677590224004`*^9, 3.601367794808863*^9}, {3.601375836845947*^9, 3.6013758526175747`*^9}, { 3.601375998711831*^9, 3.601376186863762*^9}, 3.6013762366902494`*^9, { 3.601376325984806*^9, 3.6013763393852296`*^9}, {3.6013764020037394`*^9, 3.6013765606092176`*^9}, {3.6013766141329117`*^9, 3.6013766244289303`*^9}, {3.6013766900894456`*^9, 3.6013767180602946`*^9}, {3.6013767498843503`*^9, 3.6013768530005317`*^9}, {3.601376884184986*^9, 3.6013769402046847`*^9}, { 3.601378062205456*^9, 3.6013780778678827`*^9}, {3.6013783095906897`*^9, 3.601378350774762*^9}, {3.601378416513278*^9, 3.6013784166380777`*^9}, 3.6013785842915726`*^9, {3.6013798010625095`*^9, 3.60137982408815*^9}, 3.6013804517240524`*^9, {3.601434409144231*^9, 3.6014344404222856`*^9}, { 3.601434482136759*^9, 3.6014345019331937`*^9}, {3.60143459105615*^9, 3.6014346522862577`*^9}, {3.6014346924875283`*^9, 3.601434697541937*^9}, 3.6014347466352234`*^9, 3.601434806554929*^9, {3.601434976907228*^9, 3.601434983474839*^9}, {3.6016460476287994`*^9, 3.601646052932809*^9}, { 3.6016460985940886`*^9, 3.601646257589568*^9}, {3.6016462884620223`*^9, 3.601646289413624*^9}, {3.6016463880837975`*^9, 3.601646389222599*^9}, { 3.601646486894371*^9, 3.601646499015592*^9}, {3.60164653785966*^9, 3.6016468795938606`*^9}, {3.6016469317759523`*^9, 3.6016469762204304`*^9}, {3.6016470902878304`*^9, 3.6016471621415567`*^9}, {3.6016472342604837`*^9, 3.6016472790325623`*^9}, {3.601647315411826*^9, 3.601647376548333*^9}, { 3.6016474226620145`*^9, 3.6016475634210615`*^9}, 3.6016475935447145`*^9, { 3.6016476532772193`*^9, 3.601647668346846*^9}, {3.60164773330536*^9, 3.601647950239341*^9}, {3.601648056647128*^9, 3.6016480580667305`*^9}, { 3.6016480924023905`*^9, 3.601648263472291*^9}, {3.664874573877735*^9, 3.6648746136450047`*^9}, {3.6648746564066796`*^9, 3.6648746796039205`*^9}, {3.6648747193371897`*^9, 3.6648748515150213`*^9}, {3.6648749886080627`*^9, 3.664875099338057*^9}, { 3.664875165372973*^9, 3.6648751726269855`*^9}, {3.664875246103115*^9, 3.6648752857739844`*^9}, {3.664875329500861*^9, 3.664875376176143*^9}, { 3.6648755553091326`*^9, 3.664875885761033*^9}, {3.6648759162587776`*^9, 3.664875947703576*^9}, {3.6648760365246973`*^9, 3.6648760568203335`*^9}, { 3.664876156364108*^9, 3.6648761571129093`*^9}, {3.664876208140599*^9, 3.6648763971817307`*^9}, {3.6648764385374036`*^9, 3.664876511280331*^9}, { 3.6648786999878516`*^9, 3.664878830528881*^9}, {3.6980482838405857`*^9, 3.698048333130655*^9}, {3.69804845097182*^9, 3.6980484527018223`*^9}, { 3.6980486250220633`*^9, 3.698048627152066*^9}, {3.6980487261522055`*^9, 3.6980487608222537`*^9}, 3.6980489255834846`*^9, 3.6980489586135306`*^9, { 3.698124529974787*^9, 3.6981247658751173`*^9}, {3.698124852985239*^9, 3.6981248604952497`*^9}, {3.6981248980953026`*^9, 3.698124970945404*^9}, { 3.6981251279956245`*^9, 3.6981251586756673`*^9}, {3.698127679572028*^9, 3.698127755282134*^9}, {3.698127800582197*^9, 3.698128047222543*^9}, { 3.698128134272664*^9, 3.698128145882681*^9}, {3.6981282586728387`*^9, 3.6981282606728415`*^9}, {3.6981283393629513`*^9, 3.6981283607929816`*^9}, {3.6981284771131444`*^9, 3.698128512633194*^9}, { 3.6981287316955023`*^9, 3.6981287361755085`*^9}, {3.698387961654785*^9, 3.6983879877048216`*^9}, {3.6983880189948654`*^9, 3.698388020214867*^9}, { 3.698388078564949*^9, 3.6983881242550125`*^9}, 3.6983882227651505`*^9, { 3.730025600824583*^9, 3.730025755981753*^9}, {3.73002587851016*^9, 3.7300259422515697`*^9}, {3.815553468916843*^9, 3.8155535416649694`*^9}, { 3.8437323336539035`*^9, 3.843732552037575*^9}, {3.8437339030736995`*^9, 3.8437339152566767`*^9}, {3.843733949469775*^9, 3.8437339750199604`*^9}, { 3.843800053536092*^9, 3.843800053834758*^9}, {3.8438001065299625`*^9, 3.843800254245796*^9}, {3.8438003242948375`*^9, 3.843800333335549*^9}, { 3.843885944038465*^9, 3.8438859447473164`*^9}, {3.843886309231366*^9, 3.8438863329819083`*^9}, 3.843886486115221*^9, {3.847349675824704*^9, 3.8473497338638105`*^9}, {3.8473502547068834`*^9, 3.847350292825791*^9}}, CellLabel-> "In[586]:=",ExpressionUUID->"34cfc013-b401-4158-a703-c8466468aaab"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 6.1b (Plate bending)", "Subsubsection", CellChangeTimes->{ 3.4710857577642*^9, {3.4710858112098*^9, 3.4710858239082003`*^9}, { 3.4710859049969997`*^9, 3.4710859061046*^9}, {3.4710892678536*^9, 3.4710892701*^9}, 3.4710893817648*^9, {3.4710894793115997`*^9, 3.4710895039596*^9}, {3.4710905118050003`*^9, 3.471090512741*^9}, { 3.4725252603414*^9, 3.472525264101*^9}, {3.4725253064862003`*^9, 3.4725253370934*^9}, {3.4747629998582*^9, 3.4747630055678*^9}, { 3.4752273878873997`*^9, 3.4752273904926*^9}, {3.4753663741484003`*^9, 3.4753664116352*^9}, {3.4753773567911997`*^9, 3.475377356916*^9}, 3.4753775870472*^9, {3.4754620951394*^9, 3.4754621031266003`*^9}, { 3.4779795207265997`*^9, 3.4779795250576*^9}, 3.537621939388029*^9, 3.537622934627954*^9, {3.5376230222229643`*^9, 3.537623029743394*^9}, { 3.537623460058007*^9, 3.537623470980632*^9}, {3.537624955779557*^9, 3.5376249594157653`*^9}, {3.6000028730424147`*^9, 3.6000028738224154`*^9}, 3.601272187572051*^9, 3.6018909318619084`*^9, 3.601891512682129*^9, 3.6018936089046106`*^9, {3.664878906157814*^9, 3.6648789098394203`*^9}, { 3.6983882168251424`*^9, 3.6983882190651455`*^9}, {3.729841498400111*^9, 3.729841511714019*^9}, {3.7298438456432447`*^9, 3.729843846549593*^9}, { 3.751956438263767*^9, 3.7519564399821167`*^9}, 3.783656434955984*^9, 3.815546950985428*^9, 3.8155533887795944`*^9, {3.8437124429895773`*^9, 3.8437124840677366`*^9}, {3.843781076002167*^9, 3.8437810767317696`*^9}, 3.843781115205649*^9},ExpressionUUID->"9449fa3a-50d4-4aa0-bd1d-\ d9eb66194680"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"val", "=", RowBox[{"{", RowBox[{ RowBox[{"L", "->", "5"}], ",", RowBox[{"H", "->", "5"}], ",", " ", RowBox[{"t", "->", "0.01"}], ",", RowBox[{"\[Nu]", "->", "0.3"}], ",", " ", RowBox[{"EE", "->", RowBox[{"210", "*", RowBox[{"10", "^", "9"}]}]}], ",", RowBox[{"\[Rho]", "->", " ", "8000"}], ",", RowBox[{"g", "->", "9.81"}], ",", RowBox[{"fz", "->", " ", RowBox[{"\[Rho]", " ", "g", " ", "t"}]}], ",", RowBox[{"DD", " ", "\[Rule]", " ", RowBox[{"EE", "*", RowBox[{ RowBox[{"t", "^", "3"}], "/", RowBox[{"(", RowBox[{"12", "*", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]", "^", "2"}]}], ")"}]}], ")"}]}]}]}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "triangulation", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"RM", "=", RowBox[{"DiscretizeRegion", "[", RowBox[{ RowBox[{ RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"L", ",", "H"}], "}"}]}], "]"}], " ", "/.", "val"}], ",", RowBox[{"MaxCellMeasure", "\[Rule]", RowBox[{"1", "/", "4"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"tri", "=", RowBox[{"MeshCells", "[", RowBox[{"RM", ",", "2"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"crd", "=", RowBox[{"MeshCoordinates", "[", "RM", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"BP", "=", RowBox[{ RowBox[{"MeshCells", "[", RowBox[{ RowBox[{"BoundaryMesh", "[", "RM", "]"}], ",", "0"}], "]"}], " ", "/.", " ", RowBox[{ RowBox[{"Point", "[", "a_", "]"}], "->", "a"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{"RM", ",", RowBox[{"Axes", "->", "True"}], ",", RowBox[{"AxesLabel", "->", RowBox[{"{", RowBox[{"X", ",", "Y"}], "}"}]}]}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"problem", " ", "desciption"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ele", "=", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "fz"}], "}"}]}], "}"}], ",", "#"}], "}"}], "&"}], ",", "tri"}], "]"}], " ", "//.", "val"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", "=", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Append", "[", RowBox[{"#1", ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", RowBox[{"First", "[", "#2", "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"First", "[", "#2", "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"First", "[", "#2", "]"}], "]"}], ",", "0"}], "}"}]}], "}"}], "&"}], ",", "crd"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"BP", ",", "2"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"sol", "=", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Max", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{";;", ",", "2", ",", "3"}], "]"}], "]"}], " ", "/.", "sol"}], "]"}]}]}]], "Input", CellChangeTimes->{{3.843712489561475*^9, 3.8437125191636505`*^9}, { 3.8437125669452877`*^9, 3.8437128861466413`*^9}, {3.8437129974672656`*^9, 3.843713013276997*^9}, {3.8437130877334933`*^9, 3.843713115525275*^9}, { 3.8437131610200434`*^9, 3.843713184083996*^9}, {3.8437132376823063`*^9, 3.8437133819533014`*^9}, {3.843713417383176*^9, 3.8437134591968803`*^9}, { 3.8437134969492474`*^9, 3.843714009759672*^9}, {3.8437140452435923`*^9, 3.843714111557973*^9}, {3.8437141639936004`*^9, 3.8437142958338394`*^9}, { 3.843714347828083*^9, 3.843714402241315*^9}, {3.843714446367948*^9, 3.843714483293212*^9}, {3.8437145134209394`*^9, 3.843714607114248*^9}, { 3.8437146421322346`*^9, 3.8437147443335323`*^9}, {3.843714859691022*^9, 3.843714880661008*^9}, 3.843727661110819*^9, {3.843727788123135*^9, 3.843727809991126*^9}, {3.8437278452671795`*^9, 3.843727866796069*^9}, { 3.8437279042833357`*^9, 3.8437279384702826`*^9}, {3.8437279917906923`*^9, 3.843728014300745*^9}, {3.843728058011294*^9, 3.843728070994938*^9}, { 3.843728283567544*^9, 3.843728295020647*^9}, 3.843728354372954*^9, { 3.8437284108832283`*^9, 3.84372844664116*^9}, {3.8437294169912252`*^9, 3.8437294179220486`*^9}, {3.8437297801112328`*^9, 3.843729783271413*^9}, { 3.843729818792511*^9, 3.8437298264312377`*^9}, {3.843729863878994*^9, 3.8437298922040176`*^9}, {3.8437299343862047`*^9, 3.8437299383156004`*^9}, {3.843730017696064*^9, 3.843730021118506*^9}, { 3.8437301229230814`*^9, 3.8437301232077713`*^9}, {3.8437301781460457`*^9, 3.843730179049358*^9}, {3.843730519602999*^9, 3.843730531038521*^9}, { 3.843730580731274*^9, 3.8437305815804663`*^9}, {3.8437307799694905`*^9, 3.8437307804542665`*^9}, {3.8437357974539785`*^9, 3.843735798798041*^9}, { 3.843739734808449*^9, 3.84373974053426*^9}, {3.8437397734028144`*^9, 3.8437397736272783`*^9}, {3.8437399266072054`*^9, 3.8437399307183466`*^9}, {3.8437785391874743`*^9, 3.843778614827943*^9}, { 3.8437797173996153`*^9, 3.8437798317379956`*^9}, {3.84378091552238*^9, 3.843780918197078*^9}, {3.843800344508738*^9, 3.8438003688560977`*^9}, 3.843800482587283*^9, 3.843885974191356*^9, {3.843886124599569*^9, 3.8438861258441687`*^9}, {3.843886202594633*^9, 3.8438862617074957`*^9}, { 3.843886373235973*^9, 3.843886456299819*^9}, {3.8438865015860643`*^9, 3.8438865027697735`*^9}, {3.8438865354952965`*^9, 3.843886536284978*^9}, { 3.8438865795954227`*^9, 3.843886580704484*^9}, {3.843886626985989*^9, 3.8438866287525787`*^9}, {3.8438869644711795`*^9, 3.8438869646956034`*^9}, {3.843887006314372*^9, 3.8438870254462175`*^9}, { 3.8443281903743467`*^9, 3.8443282152887535`*^9}, {3.8443285232627645`*^9, 3.8443285233494787`*^9}, {3.8473483626542854`*^9, 3.8473483635203133`*^9}, {3.847348432150258*^9, 3.8473484798076506`*^9}, { 3.8473486530499783`*^9, 3.8473488241207576`*^9}, {3.847348855019195*^9, 3.8473488704579573`*^9}, {3.847348968466106*^9, 3.84734897577304*^9}, 3.847350333010788*^9, {3.8476073840766*^9, 3.8476073845125904`*^9}},ExpressionUUID->"91501aa0-f25a-440c-b3c7-\ a382615d45f3"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 6.2 (Bernoulli beam)", "Subsubsection", CellChangeTimes->{{3.4467272483794003`*^9, 3.446727266257*^9}, { 3.4467288934652*^9, 3.4467289165844*^9}, 3.4467805293608*^9, 3.4801237733058*^9, 3.574414477473764*^9, {3.5744712109877467`*^9, 3.5744712119705486`*^9}, 3.574475230726144*^9, 3.6037233433571124`*^9, 3.6037234592185163`*^9, {3.6352279082028255`*^9, 3.635227913380121*^9}, { 3.688539891695098*^9, 3.6885398999051094`*^9}, {3.6886484594700756`*^9, 3.6886484600000763`*^9}, 3.688884553797928*^9, 3.6899058063129454`*^9, { 3.7515485745414057`*^9, 3.751548576271186*^9}, 3.7515486386973314`*^9, 3.783656417326279*^9, {3.8155469386680045`*^9, 3.815546938957738*^9}, 3.815553397450206*^9},ExpressionUUID->"8c134f70-39fe-416a-b6f1-\ 5c9ca9d94d73"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]y", ",", "\[CapitalIota]z"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "f"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4467277951594*^9, 3.4467279649186*^9}, 3.446728037053*^9, {3.4467281489206*^9, 3.4467281816806*^9}, { 3.4467282630708*^9, 3.4467282697788*^9}, 3.4467284401292*^9, { 3.446729203484*^9, 3.4467292383812*^9}, {3.4467877972641726`*^9, 3.4467877976385727`*^9}, {3.5009903487265353`*^9, 3.5009903595373354`*^9}, {3.574471092521138*^9, 3.574471133954811*^9}, { 3.5744712188033605`*^9, 3.5744712254177723`*^9}, 3.5744713020139065`*^9, { 3.635161887530303*^9, 3.635161992939332*^9}, {3.6352290663870697`*^9, 3.635229075675601*^9}, {3.6668796255250177`*^9, 3.6668796435240474`*^9}, { 3.66687967678995*^9, 3.666879688235605*^9}, {3.6668797952457256`*^9, 3.6668798335859184`*^9}, {3.6886484682900877`*^9, 3.6886486364603233`*^9}, {3.6886486728003745`*^9, 3.688648679270383*^9}, { 3.6886528872062745`*^9, 3.688652897196288*^9}, 3.6888859600498967`*^9, { 3.68990583810299*^9, 3.6899058599630203`*^9}, {3.689905992953207*^9, 3.6899060056432247`*^9}, {3.68990615938344*^9, 3.6899061621934433`*^9}, { 3.7515486229339185`*^9, 3.751548684687366*^9}, {3.7515488720040293`*^9, 3.7515489826437516`*^9}, 3.7515499027087545`*^9, {3.7837559270161324`*^9, 3.7837559294959693`*^9}}, CellLabel-> "In[358]:=",ExpressionUUID->"3780bf3b-c865-46c8-8c49-71c9a347affd"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 6.3 (Timoshenko beam)", "Subsubsection", CellChangeTimes->{{3.4467272483794003`*^9, 3.446727266257*^9}, { 3.4467288934652*^9, 3.4467289165844*^9}, {3.4467297578612003`*^9, 3.4467297741632*^9}, {3.4467805329332*^9, 3.4467805662392*^9}, { 3.4467837724681997`*^9, 3.4467837873974*^9}, 3.4467838747262*^9, 3.4467839094986*^9, 3.447032670762*^9, {3.4801243923636*^9, 3.4801244011152*^9}, {3.4803073076387997`*^9, 3.4803073429728003`*^9}, { 3.4803074085114*^9, 3.480307409541*^9}, 3.5744144418745017`*^9, { 3.574474905059972*^9, 3.5744749098179803`*^9}, {3.574475366572386*^9, 3.574475377196004*^9}, {3.574475410517663*^9, 3.5744754407037153`*^9}, { 3.5750081951129265`*^9, 3.5750082013529377`*^9}, {3.5750083550303583`*^9, 3.5750083766455946`*^9}, 3.5750084728950996`*^9, {3.575009984202676*^9, 3.575009988976284*^9}, 3.6352479511301355`*^9, {3.6884591450448647`*^9, 3.6884591463648667`*^9}, {3.688727247840191*^9, 3.6887272541001997`*^9}, 3.6893289340314417`*^9, {3.7515485682716866`*^9, 3.7515485694214697`*^9}, 3.7515487846118393`*^9, 3.783656420101801*^9, 3.8155469412280064`*^9, 3.815553400932724*^9},ExpressionUUID->"6a5a2994-0361-4a94-842a-\ 6023a686cc1a"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "\[CapitalEpsilon]", ",", "G", ",", "\[Kappa]y", ",", "\[Kappa]z"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "f"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Simplify", "[", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "]"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4467277951594*^9, 3.4467279649186*^9}, 3.446728037053*^9, {3.4467281489206*^9, 3.4467281816806*^9}, { 3.4467282630708*^9, 3.4467282697788*^9}, 3.4467284401292*^9, { 3.446729203484*^9, 3.4467292383812*^9}, {3.4467297972824*^9, 3.446729803382*^9}, {3.4467805759268*^9, 3.4467806372192*^9}, { 3.4467806779508*^9, 3.446780691866*^9}, {3.4467808153556004`*^9, 3.4467808238264*^9}, {3.446780991074*^9, 3.44678100956*^9}, { 3.4467817953710003`*^9, 3.4467817964318*^9}, {3.4467818981906*^9, 3.4467819034946003`*^9}, {3.4467819468626003`*^9, 3.4467819476893997`*^9}, {3.446782758593*^9, 3.4467827910098*^9}, { 3.4467831324002*^9, 3.4467831494354*^9}, {3.4467831885758*^9, 3.4467831999326*^9}, {3.446783237591*^9, 3.4467832606633997`*^9}, 3.4467834854126*^9, {3.4467837629365997`*^9, 3.4467838047914*^9}, { 3.4467838809194*^9, 3.4467839164094*^9}, {3.480125027756*^9, 3.4801250487692003`*^9}, {3.4801259920076*^9, 3.4801260243775997`*^9}, { 3.4801260961219997`*^9, 3.4801261021436*^9}, {3.480126160316*^9, 3.4801261608775997`*^9}, 3.505526673999*^9, {3.511162102146681*^9, 3.511162112239832*^9}, {3.511162320753841*^9, 3.5111624041098633`*^9}, { 3.511162434312612*^9, 3.511162472840623*^9}, {3.5111626521805363`*^9, 3.5111626570543423`*^9}, {3.51116384595252*^9, 3.511163855662384*^9}, { 3.5111642905929937`*^9, 3.5111643428283*^9}, {3.511233729147643*^9, 3.511233733164753*^9}, {3.511242946284502*^9, 3.511242951405178*^9}, { 3.511242986860924*^9, 3.511242993610053*^9}, 3.511246048004801*^9, { 3.511248741425228*^9, 3.511248833339509*^9}, {3.511249095932605*^9, 3.511249099139844*^9}, {3.511249136022367*^9, 3.51124917708092*^9}, 3.5112492464746103`*^9, {3.51124937632263*^9, 3.511249397605589*^9}, { 3.511250151212386*^9, 3.51125027339494*^9}, {3.5750082105413537`*^9, 3.575008231975791*^9}, {3.5750083848860655`*^9, 3.5750084021790547`*^9}, { 3.575008796623814*^9, 3.575008845002581*^9}, {3.5750096211900387`*^9, 3.575009637024066*^9}, 3.575009848997238*^9, {3.5750099980399003`*^9, 3.57501000368711*^9}, 3.60372584601431*^9, {3.6037259610957117`*^9, 3.6037259746053357`*^9}, {3.603726624861278*^9, 3.603726627762883*^9}, 3.603726713344633*^9, {3.635229174113231*^9, 3.6352293171044097`*^9}, { 3.635229499793859*^9, 3.6352295519208403`*^9}, {3.635230007209882*^9, 3.6352300146783085`*^9}, {3.636384703885615*^9, 3.6363847046646595`*^9}, 3.636384793773756*^9, {3.636384831710926*^9, 3.636384844731671*^9}, { 3.6363849893099403`*^9, 3.6363849901219864`*^9}, 3.636385066693366*^9, { 3.6363852523299837`*^9, 3.636385304345959*^9}, {3.636385347160408*^9, 3.63638536363135*^9}, {3.6363854535594935`*^9, 3.6363854692933936`*^9}, { 3.6668799699977207`*^9, 3.6668799701777306`*^9}, {3.6884591312548456`*^9, 3.6884591320848465`*^9}, 3.6887273240202975`*^9, {3.688727503870549*^9, 3.6887275481406116`*^9}, {3.6887276343007317`*^9, 3.688727686500805*^9}, { 3.6887280832313604`*^9, 3.688728102101387*^9}, {3.75154903601289*^9, 3.7515490548293667`*^9}, {3.751549466636806*^9, 3.75154949720774*^9}, { 3.7515497369297895`*^9, 3.75154973855445*^9}, {3.7837558673428497`*^9, 3.783755908301218*^9}, {3.78375598846976*^9, 3.783755998602437*^9}, { 3.783756155083074*^9, 3.7837561602273235`*^9}, {3.783756320971648*^9, 3.783756334041545*^9}}, CellLabel-> "In[362]:=",ExpressionUUID->"6dd4279e-8267-4656-8ca7-7ed757cc57b9"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 6.4 (Beam)", "Subsubsection", CellChangeTimes->{{3.4467272483794003`*^9, 3.446727266257*^9}, { 3.4467288934652*^9, 3.4467289165844*^9}, 3.4467805293608*^9, 3.4801237733058*^9, 3.574414477473764*^9, {3.5744712109877467`*^9, 3.5744712119705486`*^9}, 3.574475230726144*^9, 3.6037233433571124`*^9, 3.6037234592185163`*^9, {3.6352279082028255`*^9, 3.635227913380121*^9}, { 3.688539891695098*^9, 3.6885398999051094`*^9}, {3.6886484594700756`*^9, 3.6886484600000763`*^9}, 3.688884553797928*^9, 3.7515517983964925`*^9, { 3.7519415405413203`*^9, 3.751941553850751*^9}, 3.783656422487809*^9, 3.8155469430558276`*^9, 3.815553405680099*^9},ExpressionUUID->"1fc33e91-5581-46fa-9ffa-\ 7b37bf1dc09f"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]yy", ",", "\[CapitalIota]zz"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"\[Rho]", " ", "g", " ", "A"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"-", "F"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4467277951594*^9, 3.4467279649186*^9}, 3.446728037053*^9, {3.4467281489206*^9, 3.4467281816806*^9}, { 3.4467282630708*^9, 3.4467282697788*^9}, 3.4467284401292*^9, { 3.446729203484*^9, 3.4467292383812*^9}, {3.4467877972641726`*^9, 3.4467877976385727`*^9}, {3.5009903487265353`*^9, 3.5009903595373354`*^9}, {3.574471092521138*^9, 3.574471133954811*^9}, { 3.5744712188033605`*^9, 3.5744712254177723`*^9}, 3.5744713020139065`*^9, { 3.635161887530303*^9, 3.635161992939332*^9}, {3.6352290663870697`*^9, 3.635229075675601*^9}, {3.6668796255250177`*^9, 3.6668796435240474`*^9}, { 3.66687967678995*^9, 3.666879688235605*^9}, {3.6668797952457256`*^9, 3.6668798335859184`*^9}, {3.6886484682900877`*^9, 3.6886486364603233`*^9}, {3.6886486728003745`*^9, 3.688648679270383*^9}, { 3.6886528872062745`*^9, 3.688652897196288*^9}, 3.6888859600498967`*^9, { 3.751551808679706*^9, 3.75155182284762*^9}, {3.751941619782477*^9, 3.751941620157426*^9}, {3.751946092637025*^9, 3.7519461038531184`*^9}, { 3.751946558593465*^9, 3.7519465607179356`*^9}, 3.7519475642055492`*^9, { 3.7837569325364075`*^9, 3.783756939890103*^9}}, CellLabel-> "In[366]:=",ExpressionUUID->"dc291383-7e9d-455f-bb91-d9c874a292e0"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 6.5 (Beam)", "Subsubsection", CellChangeTimes->{{3.4467272483794003`*^9, 3.446727266257*^9}, { 3.4467288934652*^9, 3.4467289165844*^9}, 3.4467805293608*^9, 3.4801237733058*^9, 3.574414477473764*^9, {3.5744712109877467`*^9, 3.5744712119705486`*^9}, 3.574475230726144*^9, 3.6037233433571124`*^9, 3.6037234592185163`*^9, {3.6352279082028255`*^9, 3.635227913380121*^9}, { 3.688539891695098*^9, 3.6885398999051094`*^9}, {3.6886484594700756`*^9, 3.6886484600000763`*^9}, 3.688884553797928*^9, 3.7515517983964925`*^9, { 3.7519415405413203`*^9, 3.751941553850751*^9}, 3.7519451097491617`*^9, 3.7836564249177694`*^9, 3.81554694597066*^9, 3.8155534096196766`*^9},ExpressionUUID->"4686f710-87da-4c99-ac04-\ 58c2bd878b97"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "Iyy", ",", "Izz", ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"\[Rho]", " ", "g", " ", "A"}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"-", "F"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4467277951594*^9, 3.4467279649186*^9}, 3.446728037053*^9, {3.4467281489206*^9, 3.4467281816806*^9}, { 3.4467282630708*^9, 3.4467282697788*^9}, 3.4467284401292*^9, { 3.446729203484*^9, 3.4467292383812*^9}, {3.4467877972641726`*^9, 3.4467877976385727`*^9}, {3.5009903487265353`*^9, 3.5009903595373354`*^9}, {3.574471092521138*^9, 3.574471133954811*^9}, { 3.5744712188033605`*^9, 3.5744712254177723`*^9}, 3.5744713020139065`*^9, { 3.635161887530303*^9, 3.635161992939332*^9}, {3.6352290663870697`*^9, 3.635229075675601*^9}, {3.6668796255250177`*^9, 3.6668796435240474`*^9}, { 3.66687967678995*^9, 3.666879688235605*^9}, {3.6668797952457256`*^9, 3.6668798335859184`*^9}, {3.6886484682900877`*^9, 3.6886486364603233`*^9}, {3.6886486728003745`*^9, 3.688648679270383*^9}, { 3.6886528872062745`*^9, 3.688652897196288*^9}, 3.6888859600498967`*^9, { 3.751551808679706*^9, 3.75155182284762*^9}, {3.751941619782477*^9, 3.751941620157426*^9}, {3.751945123184829*^9, 3.751945181174547*^9}, { 3.7519452434075623`*^9, 3.751945272290078*^9}, {3.78375735423774*^9, 3.783757358657503*^9}, {3.8470005445228057`*^9, 3.847000548565008*^9}}, CellLabel-> "In[370]:=",ExpressionUUID->"dd4da3bc-3074-4577-8422-045cedd6ccd6"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 6.6 (beam - rigid body structure)", "Subsubsection", CellChangeTimes->{{3.4430796042548*^9, 3.4430796102452*^9}, 3.4742603575787396`*^9, 3.4742616369947395`*^9, 3.5999979378481426`*^9, { 3.5999980111214714`*^9, 3.5999980296387043`*^9}, {3.6311614587030363`*^9, 3.6311614593700743`*^9}, 3.632029553675836*^9, {3.689396083585063*^9, 3.6893960904050727`*^9}, 3.7515484775516677`*^9, 3.75154997734745*^9, 3.7519484958954897`*^9, 3.7836564274640584`*^9, 3.8155469477091866`*^9, 3.8155534134725084`*^9},ExpressionUUID->"1b1f9e4a-885d-4e09-9d09-\ 70732625e8cf"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"values", " ", "=", RowBox[{"{", RowBox[{ RowBox[{"\[CapitalEpsilon]", "\[Rule]", RowBox[{"210", " ", SuperscriptBox["10", "9"]}]}], ",", RowBox[{"G", "\[Rule]", RowBox[{"80", " ", SuperscriptBox["10", "9"]}]}], ",", RowBox[{"d", "\[Rule]", "0.0069"}], ",", RowBox[{"l", "\[Rule]", "0.408"}], ",", RowBox[{"w", "\[Rule]", "0.263"}], ",", RowBox[{"h", "\[Rule]", "0.17"}], ",", RowBox[{"F", "\[Rule]", "69."}], ",", RowBox[{"A", "\[Rule]", RowBox[{ FractionBox["\[Pi]", "4"], " ", SuperscriptBox["d", RowBox[{"2", " "}]]}]}], ",", RowBox[{"\[CapitalIota]", "\[Rule]", RowBox[{ FractionBox["\[Pi]", "64"], " ", SuperscriptBox["d", RowBox[{"4", " "}]]}]}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"conditions", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"uX", "[", RowBox[{"a_", ",", "b_", ",", "0"}], "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"uY", "[", RowBox[{"a_", ",", "b_", ",", "0"}], "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"uZ", "[", RowBox[{"a_", ",", "b_", ",", "0"}], "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"a_", ",", "b_", ",", "0"}], "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"\[Theta]Y", "[", RowBox[{"a_", ",", "b_", ",", "0"}], "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"\[Theta]Z", "[", RowBox[{"a_", ",", "b_", ",", "0"}], "]"}], "\[Rule]", "0"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"nf", " ", "=", "4"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ele", "=", RowBox[{"Join", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{"A", ",", "\[CapitalIota]", ",", "\[CapitalIota]"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"k", "-", "1"}], ")"}], " ", "4"}], "+", "j"}], ",", RowBox[{ RowBox[{"k", " ", "4"}], "+", "j"}]}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "nf"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "4"}], "}"}]}], "]"}], ",", "1"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"RIGID", ",", RowBox[{"{", "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"4", " ", RowBox[{"(", RowBox[{"nf", "+", "1"}], ")"}]}], "+", "k"}], ",", RowBox[{ RowBox[{"k", " ", "4"}], "+", "j"}]}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "nf"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "4"}], "}"}]}], "]"}], ",", "1"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{"F", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{"4", " ", RowBox[{"(", RowBox[{"nf", "+", "1"}], ")"}]}], "}"}], "]"}]}], "}"}], " ", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\t", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"Join", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", " ", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"l", " ", "i"}], ",", RowBox[{"w", " ", "j"}], ",", " ", RowBox[{"h", " ", "k"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", RowBox[{"i", ",", "j", ",", "k"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{"i", ",", "j", ",", "k"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{"i", ",", "j", ",", "k"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"i", ",", "j", ",", "k"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"i", ",", "j", ",", "k"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", RowBox[{"i", ",", "j", ",", "k"}], "]"}]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "0", ",", "nf"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", "1"}], "}"}]}], "]"}], ",", "2"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"l", "/", "2"}], ",", RowBox[{"w", " ", "/", "2"}], ",", " ", RowBox[{"h", " ", "k"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", RowBox[{ RowBox[{"1", "/", "2"}], ",", RowBox[{"1", "/", "2"}], ",", "k"}], "]"}], ",", RowBox[{"uY", "[", RowBox[{ RowBox[{"1", "/", "2"}], ",", RowBox[{"1", "/", "2"}], ",", "k"}], "]"}], ",", RowBox[{"uZ", "[", RowBox[{ RowBox[{"1", "/", "2"}], ",", RowBox[{"1", "/", "2"}], ",", "k"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{ RowBox[{"1", "/", "2"}], ",", RowBox[{"1", "/", "2"}], ",", "k"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{ RowBox[{"1", "/", "2"}], ",", RowBox[{"1", "/", "2"}], ",", "k"}], "]"}], ",", RowBox[{"\[Theta]Z", "[", RowBox[{ RowBox[{"1", "/", "2"}], ",", RowBox[{"1", "/", "2"}], ",", "k"}], "]"}]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "nf"}], "}"}]}], "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], " ", "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"MESH", "[", RowBox[{ RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], " ", "//.", "values"}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], " ", "=", RowBox[{"Nest", "[", RowBox[{"REFINE", ",", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], ",", "0"}], " ", "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"uX", "[", RowBox[{"1", ",", "1", ",", "nf"}], "]"}], "/.", RowBox[{"SOLVE", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], " ", "/.", "conditions"}], " ", "//.", "values"}], " ", "]"}]}]}]}]], "Input", CellChangeTimes->{{3.443079292748*^9, 3.4430793382064*^9}, { 3.4430793684236*^9, 3.4430793881731997`*^9}, {3.4430794204088*^9, 3.4430794617799997`*^9}, {3.569296747516491*^9, 3.5692968645634966`*^9}, { 3.6310179468433547`*^9, 3.6310182377682657`*^9}, {3.631018267938719*^9, 3.631018407574564*^9}, {3.631018540339905*^9, 3.6310187006200724`*^9}, { 3.6310187395072966`*^9, 3.631018771948152*^9}, {3.6310190134119625`*^9, 3.6310190168191576`*^9}, {3.631429199356635*^9, 3.631429218076668*^9}, { 3.6893458350311937`*^9, 3.6893459577513657`*^9}, {3.6893460398714805`*^9, 3.6893462549417815`*^9}, {3.689346285731825*^9, 3.689346285911825*^9}, { 3.689346318951871*^9, 3.689346322121876*^9}, {3.6893463858319645`*^9, 3.6893463941219764`*^9}, {3.689346435142034*^9, 3.689346442642044*^9}, { 3.689346474312089*^9, 3.6893465686422205`*^9}, {3.6893466254023004`*^9, 3.689346638932319*^9}, {3.6893466873223867`*^9, 3.689346858182626*^9}, { 3.6893468910926723`*^9, 3.6893469082926965`*^9}, {3.6893469521727576`*^9, 3.6893469539827604`*^9}, {3.6893469857528048`*^9, 3.689347147843032*^9}, { 3.6893471788430753`*^9, 3.68934728956323*^9}, {3.689347330433287*^9, 3.6893473448233075`*^9}, {3.689347387163367*^9, 3.6893473967833805`*^9}, { 3.6893474514434566`*^9, 3.6893474770034924`*^9}, {3.6893857480748863`*^9, 3.6893857887749434`*^9}, {3.6893858596150427`*^9, 3.6893859816952133`*^9}, {3.689386090635366*^9, 3.689386097865376*^9}, { 3.68938615076545*^9, 3.6893861585354605`*^9}, {3.68938621507554*^9, 3.689386383595776*^9}, {3.689386434555847*^9, 3.6893864380358524`*^9}, { 3.6893864819459133`*^9, 3.6893865483160067`*^9}, {3.6893865805360518`*^9, 3.689386642056138*^9}, {3.6893866742861834`*^9, 3.6893867054162264`*^9}, { 3.6893868039863644`*^9, 3.689386969346596*^9}, {3.689387001686641*^9, 3.6893870227266707`*^9}, {3.689387059276722*^9, 3.689387066556732*^9}, { 3.6893871257468147`*^9, 3.689387176566886*^9}, {3.6893872233469515`*^9, 3.689387230796962*^9}, {3.6893872859770393`*^9, 3.689387299427058*^9}, { 3.689387404277205*^9, 3.6893874210272284`*^9}, {3.68938779357775*^9, 3.689387991718027*^9}, {3.689388031778084*^9, 3.6893881673682733`*^9}, { 3.6893882189983454`*^9, 3.68938824341838*^9}, 3.689388626728916*^9, 3.6893961145451064`*^9, {3.6893961475851526`*^9, 3.689396182275201*^9}, { 3.6893962523252993`*^9, 3.6893963757754717`*^9}, {3.689411983278683*^9, 3.689412028968747*^9}, {3.6894216158540964`*^9, 3.6894216159540963`*^9}, { 3.6894216972442102`*^9, 3.6894217189342403`*^9}, 3.6894217537842894`*^9, { 3.6894217918243427`*^9, 3.6894218124343715`*^9}, 3.6894218453644176`*^9, { 3.689568802657915*^9, 3.689568814597932*^9}, {3.6895689717191515`*^9, 3.6895690521592646`*^9}, {3.68956987226142*^9, 3.6895698878614416`*^9}, { 3.6895699179914837`*^9, 3.689569924811493*^9}, 3.689569960271543*^9, { 3.751948524529109*^9, 3.7519485427907825`*^9}, {3.75194859479383*^9, 3.7519486427984543`*^9}, {3.751948682664075*^9, 3.751948711328912*^9}, { 3.751948759520702*^9, 3.7519487819842157`*^9}, {3.7843466918006372`*^9, 3.7843467600648937`*^9}, {3.7843468393498306`*^9, 3.7843468701197596`*^9}, {3.7843470773631077`*^9, 3.7843470788054256`*^9}, {3.784347449976926*^9, 3.78434745244143*^9}, { 3.847000745800007*^9, 3.847000751895419*^9}}, CellLabel-> "In[374]:=",ExpressionUUID->"64253c16-3a0a-4f4e-af18-4540bdfe8af3"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 6.7a (Plate bending)", "Subsubsection", CellChangeTimes->{{3.4467272483794003`*^9, 3.446727266257*^9}, { 3.4467288934652*^9, 3.446728896788*^9}, 3.4467805306712*^9, { 3.4801237484706*^9, 3.4801237489386*^9}, {3.5744708417194977`*^9, 3.5744708449019036`*^9}, {3.6042991711100636`*^9, 3.604299196992544*^9}, 3.60430729253247*^9, 3.6043261554004374`*^9, 3.604326368715212*^9, 3.6358539327435455`*^9, {3.688793491656571*^9, 3.6887934970465784`*^9}, { 3.751956180558316*^9, 3.751956191868157*^9}, {3.75195623634207*^9, 3.7519562479799566`*^9}, {3.7519565457228656`*^9, 3.751956553783457*^9}, 3.783656437998582*^9, 3.81554695268262*^9, 3.84735018462148*^9},ExpressionUUID->"879fae6a-a9ab-45eb-b98d-\ 521e94225884"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"val", "=", RowBox[{"{", RowBox[{ RowBox[{"L", "->", "5"}], ",", RowBox[{"H", "->", "1"}], ",", " ", RowBox[{"t", "->", "0.01"}], ",", RowBox[{"\[Nu]", "->", "0.3"}], ",", " ", RowBox[{"EE", "->", RowBox[{"210", "*", RowBox[{"10", "^", "9"}]}]}], ",", RowBox[{"\[Rho]", "->", " ", "8000"}], ",", RowBox[{"g", "->", "9.81"}], ",", RowBox[{"fz", "->", " ", RowBox[{"\[Rho]", " ", "g", " ", "t"}]}], ",", RowBox[{"DD", " ", "\[Rule]", " ", RowBox[{"EE", "*", RowBox[{ RowBox[{"t", "^", "3"}], "/", RowBox[{"(", RowBox[{"12", "*", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]", "^", "2"}]}], ")"}]}], ")"}]}]}]}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "Lets", " ", "start", " ", "with", " ", "the", " ", "building", " ", "blocks"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", "=", RowBox[{ RowBox[{"a", "[", "0", "]"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "L"}], ")"}], "2"], SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "L"}]}], ")"}], "2"]}]}], ",", "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}], "*", RowBox[{"EE", "/", RowBox[{"(", RowBox[{"1", "-", SuperscriptBox["\[Nu]", "2"]}], ")"}]}]}]}], ",", "\[IndentingNewLine]", RowBox[{"fz", "=", RowBox[{"\[Rho]", " ", "g", " ", "t"}]}], " ", ",", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", "=", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"L", ",", "H"}], "}"}]}], "]"}]}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]wint", "=", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["t", "3"], "/", "12"}], "*", "E\[Sigma]"}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], "fz"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Integrate", "[", RowBox[{ RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["\[CapitalOmega]", "OperatorCharacter"]}]}], StyleBox["]", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], RowBox[{ StyleBox["{", "OperatorCharacter"], RowBox[{ StyleBox[ RowBox[{"L", ">", "0"}], "OperatorCharacter"], ",", RowBox[{"H", ">", "0"}]}], "}"}]}], StyleBox["]", "OperatorCharacter"]}]}], StyleBox[";", "OperatorCharacter"], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"sol", "=", RowBox[{"SOLVE", "[", "\[Delta]WW", "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{"w", " ", "/.", "sol"}], ")"}], " ", "/.", RowBox[{"x", "->", RowBox[{"L", "/", "2"}]}]}], ")"}], "/.", "val"}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}]}]], "Input", CellChangeTimes->{{3.4467277951594*^9, 3.4467279649186*^9}, 3.446728037053*^9, {3.4467281489206*^9, 3.4467281816806*^9}, { 3.4467282630708*^9, 3.4467282697788*^9}, 3.4467284401292*^9, { 3.5744707871506023`*^9, 3.5744707892254057`*^9}, {3.5744708230306654`*^9, 3.5744708311270795`*^9}, {3.5744708665859413`*^9, 3.5744709163032293`*^9}, {3.5744709579553022`*^9, 3.5744709639145126`*^9}, {3.5744710148018017`*^9, 3.5744710339742355`*^9}, 3.6042992082891903`*^9, {3.6042992538197947`*^9, 3.6042992780501804`*^9}, { 3.6042993188655148`*^9, 3.6042993269519777`*^9}, {3.604305825073493*^9, 3.604305908252839*^9}, {3.6043059427600994`*^9, 3.6043059892481813`*^9}, { 3.604306056094299*^9, 3.604306314961153*^9}, {3.604308274382595*^9, 3.604308484499364*^9}, {3.604308525933037*^9, 3.604308791414303*^9}, { 3.6043089926234565`*^9, 3.604309008441884*^9}, {3.6043262260529613`*^9, 3.6043262636958275`*^9}, {3.6043262960190845`*^9, 3.6043263263143377`*^9}, {3.63585396708951*^9, 3.6358539860515947`*^9}, { 3.635854025494851*^9, 3.635854093723753*^9}, {3.63585412688665*^9, 3.635854205140126*^9}, 3.6358542470575237`*^9, 3.6885399659752016`*^9, { 3.688542406818619*^9, 3.688542488158733*^9}, {3.688542555158827*^9, 3.688542655038966*^9}, {3.68854276460912*^9, 3.688542769519127*^9}, { 3.6885435013701515`*^9, 3.688543502520153*^9}, {3.688543571200249*^9, 3.688543605190297*^9}, {3.6885436559003677`*^9, 3.6885437827205453`*^9}, { 3.6887935118365993`*^9, 3.688793540406639*^9}, {3.6887935912867103`*^9, 3.68879361258674*^9}, {3.68879369842686*^9, 3.6887937020868654`*^9}, { 3.688793804067008*^9, 3.68879381245702*^9}, {3.6887938523170757`*^9, 3.688793878327112*^9}, {3.6887939201671705`*^9, 3.6887939329171886`*^9}, { 3.688809028525826*^9, 3.68880903887584*^9}, {3.6888096953767595`*^9, 3.6888097390468206`*^9}, {3.6888099024470496`*^9, 3.6888099095570593`*^9}, {3.688810364147696*^9, 3.6888104325877914`*^9}, { 3.6888699116958637`*^9, 3.688869954045923*^9}, {3.688870212896285*^9, 3.6888702826463833`*^9}, {3.688870324776442*^9, 3.688870341366465*^9}, { 3.6888703736365104`*^9, 3.6888703737365103`*^9}, {3.688870541036745*^9, 3.6888706080368385`*^9}, {3.6888706877569504`*^9, 3.688870691966956*^9}, { 3.688871750438438*^9, 3.688871779498479*^9}, {3.688871834948556*^9, 3.68887184514857*^9}, 3.6888719193886747`*^9, 3.68887406629204*^9, { 3.688874175099601*^9, 3.6888742084784775`*^9}, {3.688874778973279*^9, 3.6888747878232913`*^9}, 3.6888750967337236`*^9, {3.688878647907729*^9, 3.688878680997775*^9}, 3.688878943988143*^9, 3.6888832221760635`*^9, { 3.689058349610656*^9, 3.689058356800666*^9}, 3.6890584103607407`*^9, 3.7519563404114923`*^9, {3.751956560312887*^9, 3.75195661920557*^9}, 3.751956913573533*^9, {3.784004645794924*^9, 3.7840046492856646`*^9}, { 3.7840046968502245`*^9, 3.784004782254335*^9}, 3.7840048288538294`*^9, { 3.843887100054741*^9, 3.843887188891218*^9}, 3.8470009504127674`*^9, { 3.847001174868622*^9, 3.8470011858230066`*^9}, 3.8470012159408216`*^9, 3.8472560095815067`*^9, {3.847256077905465*^9, 3.8472560917549553`*^9}, { 3.8473503722577996`*^9, 3.847350378284053*^9}, {3.847350455717604*^9, 3.8473505503373346`*^9}, {3.847350585546796*^9, 3.8473505889286203`*^9}, { 3.847350622175912*^9, 3.847350683869407*^9}, 3.847351026238633*^9, { 3.8476068496388903`*^9, 3.847606913948801*^9}},ExpressionUUID->"a8c4696d-4675-4104-a414-\ e169b65c882e"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 6.7b (Plate bending)", "Subsubsection", CellChangeTimes->{ 3.4710857577642*^9, {3.4710858112098*^9, 3.4710858239082003`*^9}, { 3.4710859049969997`*^9, 3.4710859061046*^9}, {3.4710892678536*^9, 3.4710892701*^9}, 3.4710893817648*^9, {3.4710894793115997`*^9, 3.4710895039596*^9}, {3.4710905118050003`*^9, 3.471090512741*^9}, { 3.4725252603414*^9, 3.472525264101*^9}, {3.4725253064862003`*^9, 3.4725253370934*^9}, {3.4747629998582*^9, 3.4747630055678*^9}, { 3.4752273878873997`*^9, 3.4752273904926*^9}, {3.4753663741484003`*^9, 3.4753664116352*^9}, {3.4753773567911997`*^9, 3.475377356916*^9}, 3.4753775870472*^9, {3.4754620951394*^9, 3.4754621031266003`*^9}, { 3.4779795207265997`*^9, 3.4779795250576*^9}, 3.537621939388029*^9, 3.537622934627954*^9, {3.5376230222229643`*^9, 3.537623029743394*^9}, { 3.537623460058007*^9, 3.537623470980632*^9}, {3.537624955779557*^9, 3.5376249594157653`*^9}, {3.6000028730424147`*^9, 3.6000028738224154`*^9}, 3.601272187572051*^9, 3.6018909318619084`*^9, 3.601891512682129*^9, 3.6018936089046106`*^9, {3.664878906157814*^9, 3.6648789098394203`*^9}, { 3.6983882168251424`*^9, 3.6983882190651455`*^9}, {3.729841498400111*^9, 3.729841511714019*^9}, {3.7298438456432447`*^9, 3.729843846549593*^9}, { 3.751956438263767*^9, 3.7519564399821167`*^9}, 3.783656434955984*^9, 3.815546950985428*^9, 3.8155533887795944`*^9, {3.8437124429895773`*^9, 3.8437124840677366`*^9}, {3.843781076002167*^9, 3.8437810767317696`*^9}, 3.843781115205649*^9, 3.8438873423636456`*^9, {3.8473502065568175`*^9, 3.847350210806963*^9}},ExpressionUUID->"e9590eee-4c98-4118-bbb1-\ dd41d7a4d61e"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"val", "=", RowBox[{"{", RowBox[{ RowBox[{"L", "->", "5"}], ",", RowBox[{"H", "->", "1"}], ",", " ", RowBox[{"t", "->", "0.01"}], ",", RowBox[{"\[Nu]", "->", "0.3"}], ",", " ", RowBox[{"EE", "->", RowBox[{"210", "*", RowBox[{"10", "^", "9"}]}]}], ",", RowBox[{"\[Rho]", "->", " ", "8000"}], ",", RowBox[{"g", "->", "9.81"}], ",", RowBox[{"fz", "->", " ", RowBox[{"\[Rho]", " ", "g", " ", "t"}]}], ",", RowBox[{"DD", " ", "\[Rule]", " ", RowBox[{"EE", "*", RowBox[{ RowBox[{"t", "^", "3"}], "/", RowBox[{"(", RowBox[{"12", "*", RowBox[{"(", RowBox[{"1", "-", RowBox[{"\[Nu]", "^", "2"}]}], ")"}]}], ")"}]}]}]}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", "triangulation", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"seg", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "1"}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"crd", " ", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "H"}], "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"L", ",", RowBox[{ RowBox[{"-", "H"}], "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"L", ",", RowBox[{"H", "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"H", "/", "2"}]}], "}"}]}], "}"}], " ", "//.", "val"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"mrk", "=", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"crdout", ",", "eleout", ",", "segout", ",", "mrkout"}], "}"}], "=", RowBox[{"TRIANGULATE", "[", RowBox[{ RowBox[{"{", RowBox[{"seg", ",", "mrk"}], "}"}], ",", "crd", ",", RowBox[{"1", "/", "6"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"BP", "=", RowBox[{"Union", "[", RowBox[{"Flatten", "[", RowBox[{"Pick", "[", RowBox[{"segout", ",", RowBox[{"mrkout", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"2", "|", "4"}], "->", "True"}], ",", RowBox[{ RowBox[{"1", "|", "3"}], "->", "False"}]}], "}"}]}]}], "]"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{ RowBox[{"MeshRegion", "[", RowBox[{"crdout", ",", "eleout"}], "]"}], ",", RowBox[{"Graphics", "[", RowBox[{"Point", "[", RowBox[{"crdout", "[", RowBox[{"[", "BP", "]"}], "]"}], "]"}], "]"}]}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"problem", " ", "desciption"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ele", "=", RowBox[{ RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"PLATE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"EE", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "fz"}], "}"}]}], "}"}], ",", "#"}], "}"}], "&"}], ",", "eleout"}], "]"}], " ", "//.", "val"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", "=", RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Append", "[", RowBox[{"#1", ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"uZ", "[", RowBox[{"First", "[", "#2", "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"\[Theta]X", "[", RowBox[{"First", "[", "#2", "]"}], "]"}], ",", RowBox[{"\[Theta]Y", "[", RowBox[{"First", "[", "#2", "]"}], "]"}], ",", "0"}], "}"}]}], "}"}], "&"}], ",", "crdout"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{"BP", ",", RowBox[{"2", ";;", "3"}]}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"sol", "=", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Max", "[", RowBox[{ RowBox[{"fun", "[", RowBox[{"[", RowBox[{";;", ",", "2", ",", "3"}], "]"}], "]"}], " ", "/.", "sol"}], "]"}]}]}]], "Input", CellChangeTimes->{{3.843712489561475*^9, 3.8437125191636505`*^9}, { 3.8437125669452877`*^9, 3.8437128861466413`*^9}, {3.8437129974672656`*^9, 3.843713013276997*^9}, {3.8437130877334933`*^9, 3.843713115525275*^9}, { 3.8437131610200434`*^9, 3.843713184083996*^9}, {3.8437132376823063`*^9, 3.8437133819533014`*^9}, {3.843713417383176*^9, 3.8437134591968803`*^9}, { 3.8437134969492474`*^9, 3.843714009759672*^9}, {3.8437140452435923`*^9, 3.843714111557973*^9}, {3.8437141639936004`*^9, 3.8437142958338394`*^9}, { 3.843714347828083*^9, 3.843714402241315*^9}, {3.843714446367948*^9, 3.843714483293212*^9}, {3.8437145134209394`*^9, 3.843714607114248*^9}, { 3.8437146421322346`*^9, 3.8437147443335323`*^9}, {3.843714859691022*^9, 3.843714880661008*^9}, 3.843727661110819*^9, {3.843727788123135*^9, 3.843727809991126*^9}, {3.8437278452671795`*^9, 3.843727866796069*^9}, { 3.8437279042833357`*^9, 3.8437279384702826`*^9}, {3.8437279917906923`*^9, 3.843728014300745*^9}, {3.843728058011294*^9, 3.843728070994938*^9}, { 3.843728283567544*^9, 3.843728295020647*^9}, 3.843728354372954*^9, { 3.8437284108832283`*^9, 3.84372844664116*^9}, {3.8437294169912252`*^9, 3.8437294179220486`*^9}, {3.8437297801112328`*^9, 3.843729783271413*^9}, { 3.843729818792511*^9, 3.8437298264312377`*^9}, {3.843729863878994*^9, 3.8437298922040176`*^9}, {3.8437299343862047`*^9, 3.8437299383156004`*^9}, {3.843730017696064*^9, 3.843730021118506*^9}, { 3.8437301229230814`*^9, 3.8437301232077713`*^9}, {3.8437301781460457`*^9, 3.843730179049358*^9}, {3.843730519602999*^9, 3.843730531038521*^9}, { 3.843730580731274*^9, 3.8437305815804663`*^9}, {3.8437307799694905`*^9, 3.8437307804542665`*^9}, {3.8437357974539785`*^9, 3.843735798798041*^9}, { 3.843739734808449*^9, 3.84373974053426*^9}, {3.8437397734028144`*^9, 3.8437397736272783`*^9}, {3.8437399266072054`*^9, 3.8437399307183466`*^9}, {3.8437785391874743`*^9, 3.843778614827943*^9}, { 3.8437797173996153`*^9, 3.8437798317379956`*^9}, {3.84378091552238*^9, 3.843780918197078*^9}, {3.843800344508738*^9, 3.8438003688560977`*^9}, 3.843800482587283*^9, 3.843885974191356*^9, {3.843886124599569*^9, 3.8438861258441687`*^9}, {3.843886202594633*^9, 3.8438862617074957`*^9}, { 3.843886373235973*^9, 3.843886456299819*^9}, {3.8438865015860643`*^9, 3.8438865027697735`*^9}, {3.8438865354952965`*^9, 3.843886536284978*^9}, { 3.8438865795954227`*^9, 3.843886580704484*^9}, {3.843886626985989*^9, 3.8438866287525787`*^9}, {3.8438869644711795`*^9, 3.8438869646956034`*^9}, {3.843887006314372*^9, 3.8438870254462175`*^9}, { 3.8438873515358677`*^9, 3.8438875392735586`*^9}, {3.843887597338445*^9, 3.8438876777781754`*^9}, {3.84388775598219*^9, 3.8438877747534003`*^9}, { 3.843887816092876*^9, 3.8438880757912474`*^9}, {3.843888113458597*^9, 3.8438881782660666`*^9}, {3.843888233176072*^9, 3.8438882810182943`*^9}, { 3.843888336735701*^9, 3.843888366047564*^9}, {3.8438884962978516`*^9, 3.8438885169893637`*^9}, {3.8438885470288663`*^9, 3.84388874907994*^9}, { 3.843888807202323*^9, 3.8438888219768677`*^9}, {3.8438889218946505`*^9, 3.843888935598253*^9}, {3.84388896808926*^9, 3.843889095417819*^9}, 3.847350727426014*^9, {3.8473508140933285`*^9, 3.847350928494855*^9}, { 3.847351133313609*^9, 3.8473511340464673`*^9}, 3.847351179416072*^9}, CellLabel-> "In[361]:=",ExpressionUUID->"17cb0a30-0d08-4ee7-a0f8-8b3adb006440"], Cell[BoxData[ GraphicsBox[{GraphicsComplexBox[CompressedData[" 1:eJxTTMoPSmViYGBQA2IQjQoe7IfQIg44+PZo6mF8NPUsaOq/2KPyP9ijqudB 0/8PTf0PVPUNjFD1C6DibGj6+dDsZ0aVb2Bx8PEGgYNQ9Zxw9QeKr1YfEOF1 aAAzUvYHXmSxLz7P4VCqvvA064FtUPWCaOaxOWwzbTk17c5piH0NcHmo/fxw 9eEtWZc4bvE7LHOVECkxOAQ176d93u1tubfNrkDUv/lsnwPmH4TqfwIPjy/f /8UuSPtpH9Cz79/3NTvQ4oeBwWRT/OTiT4IOU5YdbV93bSnUfUKo7j0g5HAj c/uxHpZL9j2mOYeSo57bB9S+fRR0eP5+VHdD1TsIOFwLPnaG+c95tPhnYGiX m/0vnfm6/adDJ5kMfh7cr6J3fUdi02Wougv2APDfjw8= "], {Hue[0.6, 0.3, 0.95], EdgeForm[Hue[0.6, 0.3, 0.75]], TagBox[ PolygonBox[{{30, 24, 20}, {6, 12, 16}, {26, 33, 8}, {10, 7, 25}, {27, 33, 26}, {28, 25, 26}, {13, 16, 15}, {8, 11, 28}, {10, 25, 12}, {28, 5, 12}, {16, 12, 15}, {6, 10, 12}, {9, 18, 19}, {13, 9, 19}, {17, 19, 18}, {18, 14, 17}, {12, 5, 15}, {21, 19, 17}, {30, 31, 29}, {16, 19, 21}, {18, 24, 35}, {16, 13, 19}, {17, 6, 21}, {16, 21, 6}, {2, 29, 31}, {22, 30, 32}, {22, 14, 35}, {18, 23, 24}, {18, 9, 23}, {20, 24, 23}, {26, 25, 7}, {26, 8, 28}, {34, 37, 1}, {5, 28, 11}, {12, 25, 28}, {26, 7, 27}, {32, 29, 3}, {32, 3, 22}, {35, 30, 22}, {30, 20, 31}, {29, 32, 30}, {38, 36, 37}, {34, 8, 33}, {18, 35, 14}, {37, 34, 33}, {30, 35, 24}, {38, 33, 27}, {38, 4, 36}, {1, 37, 36}, {33, 38, 37}, {27, 4, 38}}], Annotation[#, "Geometry"]& ]}], PointBox[{{0., -0.5}, {5., -0.5}, {5., 0.5}, {0., 0.5}, {5., 0.}, {0., 0.}}]}]], "Output", CellChangeTimes->{3.847606726862914*^9}, CellLabel-> "Out[367]=",ExpressionUUID->"8b6ebcd3-7513-486e-b5f3-52fb2be765d6"], Cell[BoxData["0.06890031233702264`"], "Output", CellChangeTimes->{3.847606730791971*^9}, CellLabel-> "Out[372]=",ExpressionUUID->"ac38b698-4eef-4c25-98fb-dbd7529b3582"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 6.8 (Plate bending)", "Subsubsection", CellChangeTimes->{{3.4467272483794003`*^9, 3.446727266257*^9}, { 3.4467288934652*^9, 3.446728896788*^9}, 3.4467805306712*^9, { 3.4801237484706*^9, 3.4801237489386*^9}, {3.5744708417194977`*^9, 3.5744708449019036`*^9}, {3.6042991711100636`*^9, 3.604299196992544*^9}, 3.60430729253247*^9, 3.6043261554004374`*^9, 3.604326368715212*^9, 3.6358539327435455`*^9, {3.6887937711269617`*^9, 3.688793777686971*^9}, { 3.751956230687197*^9, 3.751956232420846*^9}, {3.7519588554399524`*^9, 3.7519588723107996`*^9}, 3.7836564411191063`*^9, 3.8155469543000364`*^9},ExpressionUUID->"c2229eba-015d-4dab-9e9b-\ 7c32d569ba81"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ "Lets", " ", "start", " ", "with", " ", "the", " ", "building", " ", "blocks"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", "=", RowBox[{ RowBox[{ RowBox[{"uZ", "[", "2", "]"}], " ", RowBox[{"(", RowBox[{"3", "-", RowBox[{"2", RowBox[{"x", "/", "L"}]}]}], ")"}], SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "L"}], ")"}], "2"]}], "-", RowBox[{ RowBox[{"\[Theta]Y", "[", "2", "]"}], "L", SuperscriptBox[ RowBox[{"(", RowBox[{"x", "/", "L"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"x", "/", "L"}], "-", "1"}], ")"}]}]}]}], ",", "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}], "*", RowBox[{"\[CapitalEpsilon]", "/", RowBox[{"(", RowBox[{"1", "-", SuperscriptBox["\[Nu]", "2"]}], ")"}]}]}]}], ",", "\[IndentingNewLine]", RowBox[{"fz", "=", RowBox[{"\[Rho]", " ", "g", " ", "t"}]}], " ", ",", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", "=", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "h"}], "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"L", ",", RowBox[{"h", "/", "2"}]}], "}"}]}], "]"}]}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]wint", "=", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["t", "3"], "/", "12"}], "*", "E\[Sigma]"}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], "fz"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Integrate", "[", RowBox[{ RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["\[CapitalOmega]", "OperatorCharacter"]}]}], StyleBox["]", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], RowBox[{ StyleBox["{", "OperatorCharacter"], RowBox[{ StyleBox[ RowBox[{"L", ">", "0"}], "OperatorCharacter"], ",", RowBox[{"h", ">", "0"}]}], "}"}]}], StyleBox["]", "OperatorCharacter"]}]}], StyleBox[";", "OperatorCharacter"], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", " ", "/.", " ", RowBox[{"SOLVE", "[", "\[Delta]WW", "]"}]}], " ", "/.", RowBox[{"x", "\[Rule]", "L"}]}]}]}], "]"}], " ", "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4467277951594*^9, 3.4467279649186*^9}, 3.446728037053*^9, {3.4467281489206*^9, 3.4467281816806*^9}, { 3.4467282630708*^9, 3.4467282697788*^9}, 3.4467284401292*^9, { 3.5744707871506023`*^9, 3.5744707892254057`*^9}, {3.5744708230306654`*^9, 3.5744708311270795`*^9}, {3.5744708665859413`*^9, 3.5744709163032293`*^9}, {3.5744709579553022`*^9, 3.5744709639145126`*^9}, {3.5744710148018017`*^9, 3.5744710339742355`*^9}, 3.6042992082891903`*^9, {3.6042992538197947`*^9, 3.6042992780501804`*^9}, { 3.6042993188655148`*^9, 3.6042993269519777`*^9}, {3.604305825073493*^9, 3.604305908252839*^9}, {3.6043059427600994`*^9, 3.6043059892481813`*^9}, { 3.604306056094299*^9, 3.604306314961153*^9}, {3.604308274382595*^9, 3.604308484499364*^9}, {3.604308525933037*^9, 3.604308791414303*^9}, { 3.6043089926234565`*^9, 3.604309008441884*^9}, {3.6043262260529613`*^9, 3.6043262636958275`*^9}, {3.6043262960190845`*^9, 3.6043263263143377`*^9}, {3.63585396708951*^9, 3.6358539860515947`*^9}, { 3.635854025494851*^9, 3.635854093723753*^9}, {3.63585412688665*^9, 3.635854205140126*^9}, 3.6358542470575237`*^9, 3.6885399659752016`*^9, { 3.688542406818619*^9, 3.688542488158733*^9}, {3.688542555158827*^9, 3.688542655038966*^9}, {3.68854276460912*^9, 3.688542769519127*^9}, { 3.6885435013701515`*^9, 3.688543502520153*^9}, {3.688543571200249*^9, 3.688543605190297*^9}, {3.6885436559003677`*^9, 3.6885437827205453`*^9}, 3.688715150969486*^9, {3.6887155365000257`*^9, 3.688715884650513*^9}, { 3.688716631661559*^9, 3.6887166460915794`*^9}, {3.688716690951642*^9, 3.6887167116016707`*^9}, {3.688720675138956*^9, 3.6887209105792856`*^9}, { 3.6887209479293375`*^9, 3.6887210602094946`*^9}, {3.6888832605361176`*^9, 3.68888326246612*^9}, 3.6888836255766287`*^9, 3.688884209877446*^9, { 3.6890594302881937`*^9, 3.6890594382482047`*^9}, {3.689396676065892*^9, 3.6893966924259157`*^9}, {3.703313836517067*^9, 3.7033138458826027`*^9}, { 3.703313876916377*^9, 3.70331397260585*^9}, {3.703314040231718*^9, 3.703314055920616*^9}, {3.7033141329970245`*^9, 3.7033141886852093`*^9}, { 3.703314226755387*^9, 3.7033142874298573`*^9}, {3.7033144069136915`*^9, 3.7033144174202924`*^9}, 3.703314511466672*^9, {3.70331455707228*^9, 3.7033146861866646`*^9}, {3.7033147266539793`*^9, 3.7033147542205563`*^9}, {3.7033147870404334`*^9, 3.7033148567674217`*^9}, {3.7519589825190053`*^9, 3.751958992688488*^9}, { 3.7519590463789845`*^9, 3.7519591954850564`*^9}, {3.7519592534400897`*^9, 3.751959255720559*^9}, {3.751959316050466*^9, 3.751959322736043*^9}, { 3.7519593624767447`*^9, 3.7519593674601803`*^9}, {3.784004021508711*^9, 3.784004045138651*^9}, {3.7840040801209717`*^9, 3.7840041253037786`*^9}, { 3.7840041599964066`*^9, 3.784004302649433*^9}, {3.784004345016542*^9, 3.7840043675617743`*^9}, {3.784004486581006*^9, 3.784004525427271*^9}, { 3.843887245378562*^9, 3.8438872460182486`*^9}, {3.8470012669991064`*^9, 3.847001288793158*^9}}, CellLabel-> "In[385]:=",ExpressionUUID->"9fd8aeac-74aa-4061-93da-798dddcd1b61"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture example 6.9 (Plate bending)", "Subsubsection", CellChangeTimes->{{3.4467272483794003`*^9, 3.446727266257*^9}, { 3.4467288934652*^9, 3.446728896788*^9}, 3.4467805306712*^9, { 3.4801237484706*^9, 3.4801237489386*^9}, {3.5744708417194977`*^9, 3.5744708449019036`*^9}, {3.6042991711100636`*^9, 3.604299196992544*^9}, 3.60430729253247*^9, 3.6043261554004374`*^9, 3.604326368715212*^9, 3.6358539327435455`*^9, {3.688793491656571*^9, 3.6887934970465784`*^9}, { 3.751956180558316*^9, 3.751956191868157*^9}, {3.75195623634207*^9, 3.7519562479799566`*^9}, {3.7519565457228656`*^9, 3.751956553783457*^9}, 3.751968367989352*^9, 3.7836564454267206`*^9, 3.8155469570423107`*^9},ExpressionUUID->"54147c15-0909-4942-aeee-\ d20353cb7d9d"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"n", "=", "4"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", "=", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"x", "^", "i"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"y", "^", "i"}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", "n"}], "}"}]}], "]"}]}], "]"}], "]"}], ".", RowBox[{"Array", "[", RowBox[{"a", ",", RowBox[{"n", "*", RowBox[{"(", RowBox[{"n", "+", "1"}], ")"}]}]}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"\[Phi]", "=", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"x", "^", "i"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"y", "^", "i"}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", "n"}], "}"}]}], "]"}]}], "]"}], "]"}], ".", RowBox[{"Array", "[", RowBox[{"b", ",", RowBox[{"n", "*", RowBox[{"(", RowBox[{"n", "+", "1"}], ")"}]}]}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"Outer", "[", RowBox[{"Times", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"x", "^", "i"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"y", "^", "i"}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", "n"}], "}"}]}], "]"}]}], "]"}], "]"}], ".", RowBox[{"Array", "[", RowBox[{"c", ",", RowBox[{"n", "*", RowBox[{"(", RowBox[{"n", "+", "1"}], ")"}]}]}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"E\[Sigma]", "=", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Nu]"}], ")"}], "/", "2"}]}], "}"}]}], "}"}], "*", RowBox[{"\[CapitalEpsilon]", "/", RowBox[{"(", RowBox[{"1", "-", SuperscriptBox["\[Nu]", "2"]}], ")"}]}]}]}], ",", "\[IndentingNewLine]", RowBox[{"fz", "=", RowBox[{"\[Rho]", " ", "g", " ", "t"}]}], " ", ",", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", "=", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "h"}], "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"L", ",", RowBox[{"h", "/", "2"}]}], "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"rule", "=", RowBox[{"{", RowBox[{ RowBox[{"L", "\[Rule]", "1"}], ",", RowBox[{"h", "\[Rule]", "1"}], ",", RowBox[{"t", "\[Rule]", "1"}], ",", RowBox[{"\[CapitalEpsilon]", "\[Rule]", "1"}], ",", RowBox[{"\[Nu]", "\[Rule]", "0"}], ",", RowBox[{"\[Rho]", " ", "\[Rule]", "1"}], ",", RowBox[{"g", "\[Rule]", "1"}]}], "}"}]}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]wint1", "=", RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Theta]"}]}], ",", RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Phi]"}], ",", " ", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Phi]"}], "-", RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Theta]"}]}]}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["t", "3"], "/", "12"}], "*", "E\[Sigma]"}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Theta]"}]}], ",", RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Phi]"}], ",", " ", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "\[Phi]"}], "-", RowBox[{ SubscriptBox["\[PartialD]", "y"], "\[Theta]"}]}]}], "}"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wint2", "=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "w"}], "-", "\[Phi]"}], ",", " ", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "w"}], "+", "\[Theta]"}]}], "}"}], "]"}], ".", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "y"], "w"}], "-", "\[Phi]"}], ",", " ", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "x"], "w"}], "+", "\[Theta]"}]}], "}"}]}]}], "*", "t", "*", "G"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], "fz"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", " ", "=", RowBox[{ RowBox[{"Integrate", "[", RowBox[{ RowBox[{"\[Delta]wint1", "+", "\[Delta]wint2", "+", "\[Delta]wext"}], ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["\[CapitalOmega]", "OperatorCharacter"]}]}], StyleBox["]", "OperatorCharacter"]}], "/.", StyleBox[" ", "OperatorCharacter"], StyleBox["rule", "OperatorCharacter"]}]}], StyleBox[" ", "OperatorCharacter"], StyleBox[";", "OperatorCharacter"], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Limit", "[", RowBox[{ RowBox[{ RowBox[{"w", "/.", RowBox[{"SOLVE", "[", "\[Delta]WW", "]"}]}], " ", "/.", RowBox[{"x", "\[Rule]", "1"}]}], ",", RowBox[{"G", "\[Rule]", "Infinity"}]}], "]"}]}]}], "]"}]}], "Input", CellChangeTimes->{{3.6888689611245327`*^9, 3.6888691441747894`*^9}, { 3.688869175904834*^9, 3.6888691949848604`*^9}, {3.688869303295012*^9, 3.6888694251851826`*^9}, {3.688869534825336*^9, 3.6888695373653393`*^9}, { 3.6888695909654145`*^9, 3.688869620615456*^9}, {3.6888696695055246`*^9, 3.688869671645528*^9}, {3.688869703665572*^9, 3.688869771185667*^9}, { 3.6888698131457253`*^9, 3.688869843195768*^9}, 3.688869999545987*^9, 3.6888701516861997`*^9, {3.688870779087078*^9, 3.6888708600371914`*^9}, { 3.6888713003778076`*^9, 3.688871303197812*^9}, {3.6888713416978655`*^9, 3.688871422407979*^9}, {3.6888714741080513`*^9, 3.688871476638055*^9}, 3.6888751073437386`*^9, {3.6888752493389473`*^9, 3.6888752569189587`*^9}, { 3.688875289049003*^9, 3.688875320839048*^9}, {3.6888754299492006`*^9, 3.688875430949202*^9}, {3.6888786937177925`*^9, 3.688878750267872*^9}, { 3.6888787903179283`*^9, 3.6888788206179705`*^9}, {3.6888790860283422`*^9, 3.68887909127835*^9}, {3.6890585394429307`*^9, 3.6890585586029577`*^9}, { 3.689058611933032*^9, 3.689058636633067*^9}, 3.6890586753831205`*^9, 3.6890587218131857`*^9, {3.6890588371733475`*^9, 3.6890588479333625`*^9}, 3.6890593143580313`*^9, {3.68939651006566*^9, 3.689396570005744*^9}, 3.7519567199003897`*^9, {3.7519567531116476`*^9, 3.7519568500887613`*^9}, { 3.7519568810345116`*^9, 3.7519569775584803`*^9}, {3.751957015846347*^9, 3.7519570979991937`*^9}, {3.751957130663088*^9, 3.7519571335374126`*^9}, { 3.751968386812757*^9, 3.75196845897968*^9}, {3.751968516184675*^9, 3.7519685359147015`*^9}, {3.7519685671571083`*^9, 3.7519685887613487`*^9}, 3.751968621441209*^9, {3.7519686521214466`*^9, 3.751968677631068*^9}, { 3.7519688415746813`*^9, 3.751968856055916*^9}, 3.751969316157104*^9, { 3.751969494310449*^9, 3.751969521850837*^9}, 3.751969706308375*^9, { 3.784004998001523*^9, 3.784005426568697*^9}, {3.784005472174257*^9, 3.7840054916320624`*^9}, {3.7840056133743753`*^9, 3.7840056607331967`*^9}, {3.784005783232899*^9, 3.7840060277781363`*^9}, { 3.7840060844339232`*^9, 3.784006092863429*^9}, {3.7840086605295753`*^9, 3.7840086646764107`*^9}, {3.7840088463216295`*^9, 3.784008912717235*^9}, { 3.7840094669899406`*^9, 3.7840094842853155`*^9}, {3.784009633514021*^9, 3.784009747383206*^9}, {3.7840098033288107`*^9, 3.7840098562826834`*^9}, { 3.784009941620722*^9, 3.784009942275926*^9}, {3.78436765790169*^9, 3.784367716911665*^9}, 3.843624472027237*^9}, CellLabel-> "In[386]:=",ExpressionUUID->"b239ad9c-f1a8-450e-b440-b1370ab6df24"] }, Closed]], Cell[CellGroupData[{ Cell["Example problem 1 (Beam)", "Subsubsection", CellChangeTimes->{{3.4467272545257998`*^9, 3.4467272551809998`*^9}, { 3.4470326830236*^9, 3.4470326987172003`*^9}, {3.4470327910732*^9, 3.4470328568272*^9}, {3.4470332885104*^9, 3.4470332996644*^9}, 3.4803955556906*^9, 3.4803956288746*^9, 3.5741318501832905`*^9, { 3.688907262668313*^9, 3.688907263698314*^9}, {3.7518564487888465`*^9, 3.7518564599036164`*^9}, {3.7838338276407895`*^9, 3.7838338318801365`*^9}},ExpressionUUID->"06d87d1e-c189-48e7-85cc-\ c10522dc594b"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{ SuperscriptBox["t", "2"], ",", RowBox[{ SuperscriptBox["t", "4"], "/", "12"}], ",", RowBox[{ SuperscriptBox["t", "4"], "/", "12"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Rho]", " ", "g", " ", RowBox[{ SuperscriptBox["t", "2"], "/", SqrtBox["2"]}]}], ",", "0", ",", RowBox[{ RowBox[{"-", "\[Rho]"}], " ", "g", " ", RowBox[{ SuperscriptBox["t", "2"], "/", SqrtBox["2"]}]}]}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", "0", ",", RowBox[{"uZ", "[", "2", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4470329272144003`*^9, 3.447032945326*^9}, { 3.4470329838892*^9, 3.4470330443859997`*^9}, {3.4470330828556004`*^9, 3.4470331057096*^9}, {3.4470331580632*^9, 3.447033193756*^9}, { 3.4470333076984*^9, 3.4470334514368*^9}, {3.635213204984849*^9, 3.6352134019321136`*^9}, {3.6352137922734404`*^9, 3.635213850699782*^9}, 3.6352139351176105`*^9, {3.635216913411959*^9, 3.6352169164011297`*^9}, { 3.6352170892600174`*^9, 3.635217143791136*^9}, {3.635217414188602*^9, 3.6352174172177753`*^9}, {3.6352178017787704`*^9, 3.6352178041859083`*^9}, {3.6352181563510513`*^9, 3.6352181607243013`*^9}, {3.6352491991145163`*^9, 3.635249202022682*^9}, { 3.6889072794883366`*^9, 3.6889073638684545`*^9}, {3.6889079728927164`*^9, 3.6889081550629716`*^9}, {3.688908283083151*^9, 3.688908284333153*^9}, { 3.6889087666538277`*^9, 3.688908766843828*^9}, 3.688910125975731*^9, { 3.7518564811558094`*^9, 3.7518566618666534`*^9}, {3.7518566958830357`*^9, 3.7518567325936937`*^9}, {3.783929980295684*^9, 3.7839299896483116`*^9}, { 3.8472567453558064`*^9, 3.8472567535519166`*^9}}, CellLabel-> "In[367]:=",ExpressionUUID->"c567820b-9382-42e3-a513-84befbb46216"] }, Closed]], Cell[CellGroupData[{ Cell["Example problem 2 (Beam)", "Subsubsection", CellChangeTimes->{{3.4467272545257998`*^9, 3.4467272551809998`*^9}, { 3.4470326830236*^9, 3.4470326987172003`*^9}, {3.4470327910732*^9, 3.4470328568272*^9}, {3.4470332885104*^9, 3.4470332996644*^9}, 3.4803955556906*^9, 3.4803956288746*^9, 3.5741318501832905`*^9, { 3.688907262668313*^9, 3.688907263698314*^9}, 3.7518932843166037`*^9, { 3.7518933408411922`*^9, 3.7518933456566167`*^9}, 3.7836564660188074`*^9},ExpressionUUID->"c89e5e5c-d7a8-4c24-9948-\ a0d9d4db5953"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"b", " ", "t"}], ",", RowBox[{ FractionBox["1", "12"], "b", " ", SuperscriptBox["t", "3"]}], ",", RowBox[{ FractionBox["1", "12"], "b", " ", SuperscriptBox["t", "3"]}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "f"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Theta]Y", "[", "2", "]"}], "/.", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}]}], "Input", CellChangeTimes->{{3.4470329272144003`*^9, 3.447032945326*^9}, { 3.4470329838892*^9, 3.4470330443859997`*^9}, {3.4470330828556004`*^9, 3.4470331057096*^9}, {3.4470331580632*^9, 3.447033193756*^9}, { 3.4470333076984*^9, 3.4470334514368*^9}, {3.635213204984849*^9, 3.6352134019321136`*^9}, {3.6352137922734404`*^9, 3.635213850699782*^9}, 3.6352139351176105`*^9, {3.635216913411959*^9, 3.6352169164011297`*^9}, { 3.6352170892600174`*^9, 3.635217143791136*^9}, {3.635217414188602*^9, 3.6352174172177753`*^9}, {3.6352178017787704`*^9, 3.6352178041859083`*^9}, {3.6352181563510513`*^9, 3.6352181607243013`*^9}, {3.6352491991145163`*^9, 3.635249202022682*^9}, { 3.6889072794883366`*^9, 3.6889073638684545`*^9}, {3.6889079728927164`*^9, 3.6889081550629716`*^9}, {3.688908283083151*^9, 3.688908284333153*^9}, { 3.6889087666538277`*^9, 3.688908766843828*^9}, 3.688910125975731*^9, { 3.751893291788067*^9, 3.751893317183008*^9}, 3.8473364489315867`*^9}, CellLabel-> "In[388]:=",ExpressionUUID->"07e0744f-6fb2-44dd-883e-ce6c29b2dcd8"] }, Closed]], Cell[CellGroupData[{ Cell["Example problem 3 (Offset beam)", "Subsubsection", CellChangeTimes->{{3.4467272545257998`*^9, 3.4467272551809998`*^9}, { 3.4470326830236*^9, 3.4470326987172003`*^9}, {3.4470327910732*^9, 3.4470328568272*^9}, {3.4470332885104*^9, 3.4470332996644*^9}, { 3.4470334831672*^9, 3.4470335040243998`*^9}, 3.4803956534896*^9, 3.5741318548008986`*^9, {3.6889072673183193`*^9, 3.688907271408325*^9}, { 3.751893349010321*^9, 3.7518933577588253`*^9}, 3.783656468810971*^9},ExpressionUUID->"4fc4d6d7-84bf-4246-bf25-\ a0eaf8bf2318"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"b", " ", "t"}], ",", RowBox[{ RowBox[{"-", FractionBox["1", "2"]}], "b", " ", SuperscriptBox["t", "2"]}], ",", "0", ",", RowBox[{ FractionBox["1", "3"], "b", " ", SuperscriptBox["t", "3"]}], ",", RowBox[{ FractionBox["1", "12"], "t", " ", SuperscriptBox["b", "3"]}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "f"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"\[Theta]Y", "[", "2", "]"}], ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Limit", "[", RowBox[{ RowBox[{ RowBox[{"\[Theta]Y", "[", "2", "]"}], "/.", RowBox[{"Simplify", "[", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "]"}]}], ",", RowBox[{"G", "->", "Infinity"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.4470329272144003`*^9, 3.447032945326*^9}, { 3.4470329838892*^9, 3.4470330443859997`*^9}, {3.4470330828556004`*^9, 3.4470331057096*^9}, {3.4470331580632*^9, 3.447033193756*^9}, { 3.4470333076984*^9, 3.4470334514368*^9}, {3.4470335907448*^9, 3.4470337472284*^9}, 3.44703378562*^9, {3.4470338403448*^9, 3.4470338832448*^9}, {3.5009899888969355`*^9, 3.5009900696893353`*^9}, { 3.5009902954525356`*^9, 3.5009902982761354`*^9}, 3.6352139588569684`*^9, { 3.635214007900773*^9, 3.6352140369384346`*^9}, {3.6352140679872103`*^9, 3.6352140708653746`*^9}, {3.635214275357071*^9, 3.635214297510338*^9}, { 3.6352176507351313`*^9, 3.6352176938575983`*^9}, {3.6352178267371984`*^9, 3.6352178285643024`*^9}, 3.6352179455099916`*^9, 3.635218172539977*^9, { 3.6352207575538316`*^9, 3.6352207626921253`*^9}, 3.6352234981135826`*^9, { 3.635223537819854*^9, 3.6352235603151407`*^9}, {3.6352235942730827`*^9, 3.635223606775798*^9}, 3.6352251520741835`*^9, {3.635249218964651*^9, 3.6352492226188602`*^9}, {3.635657579376608*^9, 3.6356575800946493`*^9}, { 3.6889088012238765`*^9, 3.688908893854006*^9}, {3.688908934494063*^9, 3.688908937814068*^9}, {3.688909226634472*^9, 3.6889092820245495`*^9}, { 3.688910060225639*^9, 3.688910062965643*^9}, 3.688910160135779*^9, { 3.751894760101399*^9, 3.751894792757862*^9}, {3.7838359055206103`*^9, 3.7838359465220375`*^9}, {3.783836305336522*^9, 3.7838363114717083`*^9}, { 3.7838363477005816`*^9, 3.783836348060169*^9}, {3.7838364074593997`*^9, 3.783836420910056*^9}, {3.7838365299155955`*^9, 3.7838365382980537`*^9}, { 3.783836574768899*^9, 3.783836597736317*^9}, {3.7838366295476255`*^9, 3.7838366616299777`*^9}, {3.7838366999366465`*^9, 3.783836723233356*^9}, { 3.7838367999954214`*^9, 3.7838368378984604`*^9}, 3.78383690243846*^9, 3.7838369415092535`*^9, {3.7838369753099723`*^9, 3.7838369926991367`*^9}, { 3.7838371245212994`*^9, 3.7838371258219757`*^9}, {3.783837325882361*^9, 3.783837329968996*^9}, {3.7838373731734457`*^9, 3.7838373794530525`*^9}, { 3.783837481853959*^9, 3.7838375447020855`*^9}, {3.783838264184908*^9, 3.783838264872538*^9}, {3.7838383113670483`*^9, 3.7838383403305244`*^9}, { 3.7838383728032694`*^9, 3.7838384186898136`*^9}, {3.7838384833916388`*^9, 3.7838385153372774`*^9}, 3.7838385925375953`*^9, {3.8472568545139713`*^9, 3.847256874358624*^9}, {3.8472604549785748`*^9, 3.847260468094096*^9}, { 3.84733603151758*^9, 3.847336037571719*^9}, {3.8473362203040733`*^9, 3.84733625102029*^9}}, CellLabel-> "In[384]:=",ExpressionUUID->"cf69e33d-a513-40da-b809-2f8370dd7666"] }, Closed]], Cell[CellGroupData[{ Cell["Example problem 4 (Thin slab mode)", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453405569973`*^9}, {3.688118092873827*^9, 3.688118092983827*^9}, 3.688359609384676*^9, 3.7512854740185995`*^9, {3.7518966277446337`*^9, 3.7518966313635087`*^9}, {3.7518966840466094`*^9, 3.7518966964430327`*^9}, 3.783656471044837*^9},ExpressionUUID->"fe17b329-43a7-4b7e-88ca-\ a8201bf90e6d"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "\[Nu]"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", " ", ",", "4", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{ RowBox[{"-", RowBox[{"{", RowBox[{"F", ",", "F"}], "}"}]}], "/", "h"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "4"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"uY", "[", "2", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "h", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "h", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"uY", "[", "2", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, 3.6308071837539654`*^9, { 3.6308072232376347`*^9, 3.6308072806925354`*^9}, {3.630807380891511*^9, 3.6308073810631113`*^9}, 3.630807416662374*^9, {3.6308074522148366`*^9, 3.6308074569416447`*^9}, {3.630808242239827*^9, 3.6308082648781223`*^9}, 3.6308084593562455`*^9, {3.6345433582074366`*^9, 3.634543372320244*^9}, { 3.6346116313217573`*^9, 3.6346116325178256`*^9}, {3.666087872613713*^9, 3.666087886573511*^9}, {3.6881181216838675`*^9, 3.688118174223941*^9}, { 3.688118207333987*^9, 3.6881182190740037`*^9}, {3.6881198165987434`*^9, 3.6881198365987716`*^9}, {3.688119917098884*^9, 3.6881199552489376`*^9}, { 3.6881200535590754`*^9, 3.688120067969095*^9}, {3.6881202600693645`*^9, 3.6881202623293676`*^9}, {3.6882115663473253`*^9, 3.6882116196673994`*^9}, {3.6882146169274535`*^9, 3.688214623197462*^9}, { 3.68821534280847*^9, 3.6882153918885384`*^9}, {3.6882155882088137`*^9, 3.688215596588825*^9}, {3.688215832739156*^9, 3.688216010999405*^9}, { 3.6882160560194683`*^9, 3.6882161733196325`*^9}, {3.688216240949727*^9, 3.688216241329728*^9}, {3.6883602152375245`*^9, 3.68836024784757*^9}, 3.688360344247705*^9, {3.6883608241383767`*^9, 3.688360825178378*^9}, { 3.751285580053713*^9, 3.751285833215563*^9}, {3.751285892965088*^9, 3.7512859156455746`*^9}, {3.751294088336151*^9, 3.7512940931475315`*^9}, 3.751896678757072*^9, {3.7518967088560967`*^9, 3.751896750956246*^9}, { 3.7518967904976397`*^9, 3.751896825142912*^9}, {3.8159731458788314`*^9, 3.815973164019205*^9}, {3.8473364663331127`*^9, 3.84733646779469*^9}}, CellLabel-> "In[392]:=",ExpressionUUID->"1c709a4f-52f6-4e4d-af69-77eae3f48b97"] }, Closed]], Cell[CellGroupData[{ Cell["Example problem 5 (Thin slab mode)", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453405569973`*^9}, {3.688118092873827*^9, 3.688118092983827*^9}, 3.688359609384676*^9, 3.7512854740185995`*^9, {3.7518966277446337`*^9, 3.7518966313635087`*^9}, {3.7518966840466094`*^9, 3.7518966964430327`*^9}, 3.7518999074620028`*^9, 3.783656481356152*^9},ExpressionUUID->"8490e351-5fda-4e31-983e-\ aa318e1c69d4"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"PLANE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "0"}], "}"}], ",", RowBox[{"{", "t", "}"}]}], "}"}], ",", RowBox[{"Polygon", "[", RowBox[{"{", RowBox[{"1", ",", "2", " ", ",", "4", ",", "3"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{ RowBox[{"-", RowBox[{"{", RowBox[{"F", ",", "F"}], "}"}]}], "/", "h"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"2", ",", "4"}], "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", " ", "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", RowBox[{"uY", "[", "2", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "h", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "h", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"uX", "[", "2", "]"}]}], ",", RowBox[{"uY", "[", "2", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", RowBox[{"uY", "[", "2", "]"}]}], "}"}], "/.", " ", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, 3.6308071837539654`*^9, { 3.6308072232376347`*^9, 3.6308072806925354`*^9}, {3.630807380891511*^9, 3.6308073810631113`*^9}, 3.630807416662374*^9, {3.6308074522148366`*^9, 3.6308074569416447`*^9}, {3.630808242239827*^9, 3.6308082648781223`*^9}, 3.6308084593562455`*^9, {3.6345433582074366`*^9, 3.634543372320244*^9}, { 3.6346116313217573`*^9, 3.6346116325178256`*^9}, {3.666087872613713*^9, 3.666087886573511*^9}, {3.6881181216838675`*^9, 3.688118174223941*^9}, { 3.688118207333987*^9, 3.6881182190740037`*^9}, {3.6881198165987434`*^9, 3.6881198365987716`*^9}, {3.688119917098884*^9, 3.6881199552489376`*^9}, { 3.6881200535590754`*^9, 3.688120067969095*^9}, {3.6881202600693645`*^9, 3.6881202623293676`*^9}, {3.6882115663473253`*^9, 3.6882116196673994`*^9}, {3.6882146169274535`*^9, 3.688214623197462*^9}, { 3.68821534280847*^9, 3.6882153918885384`*^9}, {3.6882155882088137`*^9, 3.688215596588825*^9}, {3.688215832739156*^9, 3.688216010999405*^9}, { 3.6882160560194683`*^9, 3.6882161733196325`*^9}, {3.688216240949727*^9, 3.688216241329728*^9}, {3.6883602152375245`*^9, 3.68836024784757*^9}, 3.688360344247705*^9, {3.6883608241383767`*^9, 3.688360825178378*^9}, { 3.751285580053713*^9, 3.751285833215563*^9}, {3.751285892965088*^9, 3.7512859156455746`*^9}, {3.751294088336151*^9, 3.7512940931475315`*^9}, 3.751896678757072*^9, {3.7518967088560967`*^9, 3.751896750956246*^9}, { 3.7518967904976397`*^9, 3.751896825142912*^9}, {3.751899927321224*^9, 3.751900002203864*^9}, {3.7519002440328183`*^9, 3.751900246714067*^9}, { 3.8159731914390793`*^9, 3.815973191858983*^9}, {3.8473365772163486`*^9, 3.8473365787478848`*^9}, {3.847336624344222*^9, 3.847336684715886*^9}, { 3.847336724869244*^9, 3.847336732903336*^9}}, CellLabel-> "In[406]:=",ExpressionUUID->"6da7377f-94c4-4a7a-983a-3dcd4d437691"] }, Closed]], Cell[CellGroupData[{ Cell["Example problem 6 (Plate strip bending)", "Subsubsection", CellChangeTimes->{{3.4467272483794003`*^9, 3.446727266257*^9}, { 3.4467288934652*^9, 3.446728896788*^9}, 3.4467805306712*^9, { 3.4801237484706*^9, 3.4801237489386*^9}, {3.5744708417194977`*^9, 3.5744708449019036`*^9}, {3.6042991711100636`*^9, 3.604299196992544*^9}, 3.60430729253247*^9, {3.604310202140381*^9, 3.6043102048235855`*^9}, { 3.6889933424974422`*^9, 3.688993352477456*^9}, 3.6889988585223417`*^9, { 3.689480870769858*^9, 3.6894808898298845`*^9}, {3.7519025257121596`*^9, 3.7519025506918354`*^9}, {3.7519382063290777`*^9, 3.751938208231679*^9}, 3.783656483282949*^9},ExpressionUUID->"a9aada3a-1eb1-41ad-b1ad-\ e8254f34d504"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ "Lets", " ", "start", " ", "with", " ", "the", " ", "building", " ", "blocks"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", "=", RowBox[{ RowBox[{"a", "[", "0", "]"}], RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "L"}]}], ")"}], RowBox[{"x", "/", "L"}]}]}], " ", ",", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", "=", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "H"}], "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"L", ",", RowBox[{"H", "/", "2"}]}], "}"}]}], "]"}]}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]w", ":=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["t", "3"], " ", "\[CapitalEpsilon]"}], RowBox[{"12", RowBox[{"(", RowBox[{"1", "-", SuperscriptBox["\[Nu]", "2"]}], ")"}]}]], RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", FractionBox[ RowBox[{"1", "-", "\[Nu]"}], "2"]}], "}"}]}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}]}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], " ", "fz"}]}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Integrate", "[", RowBox[{"\[Delta]w", ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["\[CapitalOmega]", "OperatorCharacter"]}]}], StyleBox["]", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], RowBox[{ StyleBox["{", "OperatorCharacter"], RowBox[{ StyleBox[ RowBox[{"L", ">", "0"}], "OperatorCharacter"], ",", RowBox[{"H", ">", "0"}]}], "}"}]}], StyleBox["]", "OperatorCharacter"]}]}], StyleBox[";", "OperatorCharacter"], StyleBox["\[IndentingNewLine]", "OperatorCharacter"], "\[IndentingNewLine]", RowBox[{"w", " ", "/.", " ", RowBox[{"SOLVE", "[", "\[Delta]WW", "]"}]}]}]}], " ", "]"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4467277951594*^9, 3.4467279649186*^9}, 3.446728037053*^9, {3.4467281489206*^9, 3.4467281816806*^9}, { 3.4467282630708*^9, 3.4467282697788*^9}, 3.4467284401292*^9, { 3.5744707871506023`*^9, 3.5744707892254057`*^9}, {3.5744708230306654`*^9, 3.5744708311270795`*^9}, {3.5744708665859413`*^9, 3.5744709163032293`*^9}, {3.5744709579553022`*^9, 3.5744709639145126`*^9}, {3.5744710148018017`*^9, 3.5744710339742355`*^9}, 3.6042992082891903`*^9, {3.6042992538197947`*^9, 3.6042992780501804`*^9}, { 3.6042993188655148`*^9, 3.6042993269519777`*^9}, {3.604305825073493*^9, 3.604305908252839*^9}, {3.6043059427600994`*^9, 3.6043059892481813`*^9}, { 3.604306056094299*^9, 3.604306314961153*^9}, {3.604308274382595*^9, 3.604308484499364*^9}, {3.604308525933037*^9, 3.604308791414303*^9}, { 3.6043089926234565`*^9, 3.604309008441884*^9}, {3.6043109233452473`*^9, 3.604311002296986*^9}, {3.6043110410942545`*^9, 3.604311044713461*^9}, { 3.604311077301918*^9, 3.6043113010219107`*^9}, 3.604311474057415*^9, { 3.6043115724311876`*^9, 3.6043115749739923`*^9}, {3.6043116205416718`*^9, 3.6043116224136753`*^9}, {3.6043116548617325`*^9, 3.604311738571479*^9}, { 3.6043119619326715`*^9, 3.6043119879847174`*^9}, {3.604312252108781*^9, 3.6043122715620155`*^9}, {3.604312318159297*^9, 3.604312461367549*^9}, { 3.6043125259828625`*^9, 3.6043125318016725`*^9}, {3.6043125750605483`*^9, 3.6043125754037495`*^9}, {3.6043127726660957`*^9, 3.604312785458118*^9}, { 3.636082009030026*^9, 3.6360821021793537`*^9}, {3.6360821353592515`*^9, 3.6360821994179153`*^9}, {3.6360822411353016`*^9, 3.636082308140134*^9}, { 3.636082428925042*^9, 3.6360824672832365`*^9}, 3.636082772513695*^9, { 3.6364550263262777`*^9, 3.636455043447257*^9}, 3.63645529332755*^9, 3.6364553732171187`*^9, {3.636455466633462*^9, 3.6364555214936*^9}, 3.6673026911198535`*^9, {3.688993360197467*^9, 3.6889934094075356`*^9}, { 3.6889934413475804`*^9, 3.6889934979176598`*^9}, {3.6889986435220413`*^9, 3.6889988109722757`*^9}, {3.689070158580252*^9, 3.6890701724702716`*^9}, { 3.7519025738975544`*^9, 3.751902597349186*^9}, {3.7519026561196384`*^9, 3.751902756450328*^9}, {3.7519060333921175`*^9, 3.7519060589399147`*^9}, { 3.783930236365265*^9, 3.7839303127654667`*^9}, {3.783930391905014*^9, 3.783930403087326*^9}, {3.7839304333343906`*^9, 3.7839305514885445`*^9}, 3.7839305989226093`*^9, {3.8159733122740855`*^9, 3.8159733753139997`*^9}}, CellLabel-> "In[411]:=",ExpressionUUID->"52b03267-438e-4587-8441-7f9fd45cf796"] }, Closed]], Cell[CellGroupData[{ Cell["Example problem 7 (Plate bending)", "Subsubsection", CellChangeTimes->{{3.4467272483794003`*^9, 3.446727266257*^9}, { 3.4467288934652*^9, 3.446728896788*^9}, 3.4467805306712*^9, { 3.4801237484706*^9, 3.4801237489386*^9}, {3.5744708417194977`*^9, 3.5744708449019036`*^9}, {3.6042991711100636`*^9, 3.604299196992544*^9}, { 3.6043065528927712`*^9, 3.6043065559659767`*^9}, {3.688968109956272*^9, 3.6889681207962875`*^9}, 3.6890360320853367`*^9, {3.7519062113337307`*^9, 3.7519062159805574`*^9}, {3.75193819029403*^9, 3.7519381958375883`*^9}, 3.7836564856389265`*^9},ExpressionUUID->"941469ca-46dd-4afe-8144-\ e08121fd0ca7"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ "Lets", " ", "start", " ", "with", " ", "the", " ", "building", " ", "blocks"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", "=", RowBox[{ RowBox[{"a", "[", "0", "]"}], RowBox[{"(", RowBox[{"x", "/", "L"}], ")"}], RowBox[{"(", RowBox[{"y", "/", "L"}], " ", ")"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", "=", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"L", ",", "L"}], "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"fz", "=", "0"}]}], " ", "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]w", ":=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["t", "3"], " ", "\[CapitalEpsilon]"}], RowBox[{"12", RowBox[{"(", RowBox[{"1", "-", SuperscriptBox["\[Nu]", "2"]}], ")"}]}]], RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", FractionBox[ RowBox[{"1", "-", "\[Nu]"}], "2"]}], "}"}]}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}]}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], " ", "fz"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]Wint", "=", RowBox[{"Integrate", "[", RowBox[{"\[Delta]w", ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["\[CapitalOmega]", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], StyleBox[ RowBox[{"Assumptions", "->", RowBox[{"L", ">", "0"}]}], "OperatorCharacter"]}], StyleBox["]", "OperatorCharacter"]}]}], StyleBox[";", "OperatorCharacter"], StyleBox["\[IndentingNewLine]", "OperatorCharacter"], "\[IndentingNewLine]", RowBox[{"\[Delta]Wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"w", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"x", "\[Rule]", "L"}], ",", RowBox[{"y", "\[Rule]", "L"}]}], "}"}]}], "]"}], " ", "F"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", " ", "=", RowBox[{"\[Delta]Wint", StyleBox["+", "OperatorCharacter"], "\[Delta]Wext"}]}], StyleBox[";", "OperatorCharacter"], "\[IndentingNewLine]", RowBox[{"w", " ", "/.", " ", RowBox[{"SOLVE", "[", "\[Delta]WW", "]"}]}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.4467277951594*^9, 3.4467279649186*^9}, 3.446728037053*^9, {3.4467281489206*^9, 3.4467281816806*^9}, { 3.4467282630708*^9, 3.4467282697788*^9}, 3.4467284401292*^9, { 3.5744707871506023`*^9, 3.5744707892254057`*^9}, {3.5744708230306654`*^9, 3.5744708311270795`*^9}, {3.5744708665859413`*^9, 3.5744709163032293`*^9}, {3.5744709579553022`*^9, 3.5744709639145126`*^9}, {3.5744710148018017`*^9, 3.5744710339742355`*^9}, 3.6042992082891903`*^9, {3.6042992538197947`*^9, 3.6042992780501804`*^9}, { 3.6042993188655148`*^9, 3.6042993269519777`*^9}, {3.604305825073493*^9, 3.604305908252839*^9}, {3.6043059427600994`*^9, 3.6043059892481813`*^9}, { 3.604306056094299*^9, 3.6043063458024073`*^9}, {3.604306388328082*^9, 3.604306585777629*^9}, {3.604306680859796*^9, 3.604306773664359*^9}, { 3.604306839636875*^9, 3.604306873239334*^9}, 3.604306909462598*^9, { 3.604307205047517*^9, 3.6043072143295326`*^9}, {3.604307265248022*^9, 3.6043072677752266`*^9}, 3.6043076582751126`*^9, 3.604308261886973*^9, { 3.635813960588502*^9, 3.635814073105937*^9}, {3.6358141191235695`*^9, 3.6358142680160856`*^9}, {3.6358143868928847`*^9, 3.6358145222866287`*^9}, {3.6358146212522893`*^9, 3.635814628802721*^9}, { 3.63581467179718*^9, 3.6358147952282405`*^9}, {3.6358148277330995`*^9, 3.635814923941602*^9}, {3.6358150940673327`*^9, 3.635815217771408*^9}, { 3.6889681964363937`*^9, 3.6889682630364866`*^9}, {3.6889682991865377`*^9, 3.688968367456633*^9}, {3.6889684003766794`*^9, 3.688968447666745*^9}, { 3.6889684883368025`*^9, 3.6889686700270567`*^9}, {3.68896870852711*^9, 3.688968718287124*^9}, {3.688968776057205*^9, 3.68896880792725*^9}, { 3.688968844597301*^9, 3.688968918827405*^9}, {3.7519062551015606`*^9, 3.751906260748067*^9}, {3.751906299952424*^9, 3.7519063104824934`*^9}, { 3.7519063665825987`*^9, 3.75190642764285*^9}, {3.783930642613084*^9, 3.7839308159304037`*^9}, {3.7839308465681953`*^9, 3.783930850174042*^9}, { 3.7839309476635942`*^9, 3.7839309516495805`*^9}, {3.815973475164554*^9, 3.81597367961854*^9}, {3.815973734328734*^9, 3.8159737931784654`*^9}, { 3.8159741021382065`*^9, 3.8159741042433434`*^9}, {3.8470010525091505`*^9, 3.8470010567080564`*^9}}, CellLabel-> "In[412]:=",ExpressionUUID->"0b273499-0e1f-4068-93da-57acf338c957"] }, Closed]], Cell[CellGroupData[{ Cell["Example problem 8 (Plate bending)", "Subsubsection", CellChangeTimes->{{3.4467272483794003`*^9, 3.446727266257*^9}, { 3.4467288934652*^9, 3.446728896788*^9}, 3.4467805306712*^9, { 3.4801237484706*^9, 3.4801237489386*^9}, {3.5744708417194977`*^9, 3.5744708449019036`*^9}, {3.6042991711100636`*^9, 3.604299196992544*^9}, { 3.6043065528927712`*^9, 3.6043065559659767`*^9}, {3.688968109956272*^9, 3.6889681207962875`*^9}, 3.6890360320853367`*^9, {3.7519062113337307`*^9, 3.7519062159805574`*^9}, {3.75193819029403*^9, 3.7519381958375883`*^9}, 3.7519382655155926`*^9, 3.783656487685109*^9},ExpressionUUID->"68f43034-54a5-4ec6-8c02-\ 8f5d029ef4d1"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "Lets", " ", "start", " ", "with", " ", "the", " ", "building", " ", "blocks"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", "=", RowBox[{ RowBox[{"a", "[", "0", "]"}], RowBox[{"Sin", "[", RowBox[{"Pi", " ", RowBox[{"x", "/", "L"}]}], " ", "]"}], RowBox[{"Sin", "[", RowBox[{"Pi", " ", RowBox[{"y", "/", "L"}]}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", "=", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"L", ",", "L"}], "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"fz", "=", "0"}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]w", ":=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["t", "3"], " ", "\[CapitalEpsilon]"}], RowBox[{"12", RowBox[{"(", RowBox[{"1", "-", SuperscriptBox["\[Nu]", "2"]}], ")"}]}]], RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", FractionBox[ RowBox[{"1", "-", "\[Nu]"}], "2"]}], "}"}]}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}]}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], " ", "fz"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]Wint", "=", RowBox[{"Integrate", "[", RowBox[{"\[Delta]w", ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["\[CapitalOmega]", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], StyleBox[ RowBox[{"Assumptions", "->", RowBox[{"L", ">", "0"}]}], "OperatorCharacter"]}], StyleBox["]", "OperatorCharacter"]}]}], StyleBox[";", "OperatorCharacter"], "\[IndentingNewLine]", StyleBox["\[IndentingNewLine]", "OperatorCharacter"], RowBox[{"\[Delta]Wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"w", " ", "/.", RowBox[{"{", RowBox[{ RowBox[{"x", "\[Rule]", RowBox[{"L", "/", "2"}]}], ",", RowBox[{"y", "\[Rule]", RowBox[{"L", "/", "2"}]}]}], "}"}]}], "]"}], " ", "F"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", " ", "=", RowBox[{"\[Delta]Wint", StyleBox["+", "OperatorCharacter"], "\[Delta]Wext"}]}], StyleBox[";", "OperatorCharacter"], "\[IndentingNewLine]", " ", RowBox[{"w", " ", "/.", " ", RowBox[{"SOLVE", "[", "\[Delta]WW", "]"}]}]}]}], "]"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4467277951594*^9, 3.4467279649186*^9}, 3.446728037053*^9, {3.4467281489206*^9, 3.4467281816806*^9}, { 3.4467282630708*^9, 3.4467282697788*^9}, 3.4467284401292*^9, { 3.5744707871506023`*^9, 3.5744707892254057`*^9}, {3.5744708230306654`*^9, 3.5744708311270795`*^9}, {3.5744708665859413`*^9, 3.5744709163032293`*^9}, {3.5744709579553022`*^9, 3.5744709639145126`*^9}, {3.5744710148018017`*^9, 3.5744710339742355`*^9}, 3.6042992082891903`*^9, {3.6042992538197947`*^9, 3.6042992780501804`*^9}, { 3.6042993188655148`*^9, 3.6042993269519777`*^9}, {3.604305825073493*^9, 3.604305908252839*^9}, {3.6043059427600994`*^9, 3.6043059892481813`*^9}, { 3.604306056094299*^9, 3.6043063458024073`*^9}, {3.604306388328082*^9, 3.604306585777629*^9}, {3.604306680859796*^9, 3.604306773664359*^9}, { 3.604306839636875*^9, 3.604306873239334*^9}, 3.604306909462598*^9, { 3.604307205047517*^9, 3.6043072143295326`*^9}, {3.604307265248022*^9, 3.6043072677752266`*^9}, 3.6043076582751126`*^9, 3.604308261886973*^9, { 3.635813960588502*^9, 3.635814073105937*^9}, {3.6358141191235695`*^9, 3.6358142680160856`*^9}, {3.6358143868928847`*^9, 3.6358145222866287`*^9}, {3.6358146212522893`*^9, 3.635814628802721*^9}, { 3.63581467179718*^9, 3.6358147952282405`*^9}, {3.6358148277330995`*^9, 3.635814923941602*^9}, {3.6358150940673327`*^9, 3.635815217771408*^9}, { 3.6889681964363937`*^9, 3.6889682630364866`*^9}, {3.6889682991865377`*^9, 3.688968367456633*^9}, {3.6889684003766794`*^9, 3.688968447666745*^9}, { 3.6889684883368025`*^9, 3.6889686700270567`*^9}, {3.68896870852711*^9, 3.688968718287124*^9}, {3.688968776057205*^9, 3.68896880792725*^9}, { 3.688968844597301*^9, 3.688968918827405*^9}, {3.7519062551015606`*^9, 3.751906260748067*^9}, {3.751906299952424*^9, 3.7519063104824934`*^9}, { 3.7519063665825987`*^9, 3.75190642764285*^9}, {3.751938280407312*^9, 3.7519383053581076`*^9}, 3.751938346439109*^9, {3.7519383810733995`*^9, 3.751938384180049*^9}, {3.783930910689376*^9, 3.7839310542359285`*^9}, { 3.81597383462962*^9, 3.8159738993084717`*^9}, {3.8159740098488607`*^9, 3.8159740393184023`*^9}, {3.8159740785486064`*^9, 3.8159740846078568`*^9}, 3.8470010260834103`*^9}, CellLabel-> "In[413]:=",ExpressionUUID->"06922c0f-e063-4c32-8d36-1167417b97c1"] }, Closed]], Cell[CellGroupData[{ Cell["Example problem 9 (Plate bending)", "Subsubsection", CellChangeTimes->{{3.4467272483794003`*^9, 3.446727266257*^9}, { 3.4467288934652*^9, 3.446728896788*^9}, 3.4467805306712*^9, { 3.4801237484706*^9, 3.4801237489386*^9}, {3.5744708417194977`*^9, 3.5744708449019036`*^9}, {3.6042991711100636`*^9, 3.604299196992544*^9}, 3.60430729253247*^9, {3.6889689555874567`*^9, 3.6889689557074566`*^9}, { 3.7519381865838604`*^9, 3.751938204137138*^9}, 3.7836564905245705`*^9},ExpressionUUID->"5abad74f-33af-443f-99f5-\ d19b8342ffce"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "Lets", " ", "start", " ", "with", " ", "the", " ", "building", " ", "blocks"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", "=", RowBox[{ RowBox[{"a", "[", "0", "]"}], " ", FractionBox["x", "L"], RowBox[{"(", RowBox[{"1", "-", FractionBox["x", "L"]}], ")"}], " ", FractionBox["y", "L"], RowBox[{"(", RowBox[{"1", "-", FractionBox["y", "L"]}], ")"}]}]}], " ", ",", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", "=", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"L", ",", "L"}], "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"fz", "=", RowBox[{"\[Rho]", " ", "g", " ", "t"}]}]}], " ", "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]w", ":=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["t", "3"], " ", "\[CapitalEpsilon]"}], RowBox[{"12", RowBox[{"(", RowBox[{"1", "-", SuperscriptBox["\[Nu]", "2"]}], ")"}]}]], RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", FractionBox[ RowBox[{"1", "-", "\[Nu]"}], "2"]}], "}"}]}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}]}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], " ", "fz"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"Integrate", "[", RowBox[{"\[Delta]w", ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["\[CapitalOmega]", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], StyleBox[ RowBox[{"Assumptions", "->", RowBox[{"L", ">", "0"}]}], "OperatorCharacter"]}], StyleBox["]", "OperatorCharacter"]}]}], StyleBox[";", "OperatorCharacter"], "\[IndentingNewLine]", " ", RowBox[{"w", " ", "/.", " ", RowBox[{"SOLVE", "[", "\[Delta]WW", "]"}]}]}]}], " ", "]"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4467277951594*^9, 3.4467279649186*^9}, 3.446728037053*^9, {3.4467281489206*^9, 3.4467281816806*^9}, { 3.4467282630708*^9, 3.4467282697788*^9}, 3.4467284401292*^9, { 3.5744707871506023`*^9, 3.5744707892254057`*^9}, {3.5744708230306654`*^9, 3.5744708311270795`*^9}, {3.5744708665859413`*^9, 3.5744709163032293`*^9}, {3.5744709579553022`*^9, 3.5744709639145126`*^9}, {3.5744710148018017`*^9, 3.5744710339742355`*^9}, 3.6042992082891903`*^9, {3.6042992538197947`*^9, 3.6042992780501804`*^9}, { 3.6042993188655148`*^9, 3.6042993269519777`*^9}, {3.604305825073493*^9, 3.604305908252839*^9}, {3.6043059427600994`*^9, 3.6043059892481813`*^9}, { 3.604306056094299*^9, 3.604306314961153*^9}, {3.604308274382595*^9, 3.604308484499364*^9}, {3.604308525933037*^9, 3.604308791414303*^9}, { 3.6043089926234565`*^9, 3.604309008441884*^9}, 3.635815254775525*^9, { 3.635815306485482*^9, 3.635815357946426*^9}, {3.6358153975456905`*^9, 3.635815400293848*^9}, {3.6889689965775137`*^9, 3.6889691458577228`*^9}, { 3.751938473097871*^9, 3.7519385148872175`*^9}, {3.783931151742539*^9, 3.7839311993580637`*^9}, {3.8159741664284697`*^9, 3.8159742181680007`*^9}, 3.8159742487689466`*^9}, CellLabel-> "In[414]:=",ExpressionUUID->"e6f471e0-3d83-437a-8fae-181bb450ee51"] }, Closed]], Cell[CellGroupData[{ Cell["Example problem 10 (Virtual work)", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453405569973`*^9}, {3.688118092873827*^9, 3.688118092983827*^9}, 3.688359609384676*^9, {3.6889572756379094`*^9, 3.6889572763479104`*^9}, 3.6889779027443466`*^9, {3.7518965140882363`*^9, 3.7518965226800327`*^9}, { 3.751938750101478*^9, 3.7519387588305473`*^9}, 3.783656492774307*^9},ExpressionUUID->"e844a71f-e968-461e-bf7f-\ 9a12d5d89cab"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Theta]Y", "[", RowBox[{"x_", ",", "y_"}], "]"}], "=", RowBox[{ RowBox[{"(", RowBox[{"y", "/", "L"}], ")"}], RowBox[{"(", RowBox[{"1", "-", RowBox[{"x", "/", "L"}]}], ")"}], RowBox[{"\[Theta]Y", "[", "3", "]"}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]Wext", "=", RowBox[{ RowBox[{"-", "M"}], "*", RowBox[{"\[Delta]", "[", RowBox[{"\[Theta]Y", "[", RowBox[{ RowBox[{"L", "/", "4"}], ",", RowBox[{"L", "/", "2"}]}], "]"}], "]"}]}]}]}]}]], "Input", CellChangeTimes->{{3.4467277951594*^9, 3.4467279649186*^9}, 3.446728037053*^9, {3.4467281489206*^9, 3.4467281816806*^9}, { 3.4467282630708*^9, 3.4467282697788*^9}, 3.4467284401292*^9, { 3.5744707871506023`*^9, 3.5744707892254057`*^9}, {3.5744708230306654`*^9, 3.5744708311270795`*^9}, {3.5744708665859413`*^9, 3.5744709163032293`*^9}, {3.5744709579553022`*^9, 3.5744709639145126`*^9}, {3.5744710148018017`*^9, 3.5744710339742355`*^9}, 3.6042992082891903`*^9, {3.6042992538197947`*^9, 3.6042992780501804`*^9}, { 3.6042993188655148`*^9, 3.6042993269519777`*^9}, {3.604305825073493*^9, 3.604305908252839*^9}, {3.6043059427600994`*^9, 3.6043059892481813`*^9}, { 3.604306056094299*^9, 3.604306314961153*^9}, {3.604308274382595*^9, 3.604308484499364*^9}, {3.604308525933037*^9, 3.604308791414303*^9}, { 3.6043089926234565`*^9, 3.604309008441884*^9}, {3.6043262260529613`*^9, 3.6043262636958275`*^9}, {3.6043262960190845`*^9, 3.6043263263143377`*^9}, {3.63585396708951*^9, 3.6358539860515947`*^9}, { 3.635854025494851*^9, 3.635854093723753*^9}, {3.63585412688665*^9, 3.635854205140126*^9}, 3.6358542470575237`*^9, 3.6885399659752016`*^9, { 3.688542406818619*^9, 3.688542488158733*^9}, {3.688542555158827*^9, 3.688542655038966*^9}, {3.68854276460912*^9, 3.688542769519127*^9}, { 3.6885435013701515`*^9, 3.688543502520153*^9}, {3.688543571200249*^9, 3.688543605190297*^9}, {3.6885436559003677`*^9, 3.6885437827205453`*^9}, { 3.6887935118365993`*^9, 3.688793540406639*^9}, {3.6887935912867103`*^9, 3.68879361258674*^9}, {3.68879369842686*^9, 3.6887937020868654`*^9}, { 3.688793804067008*^9, 3.68879381245702*^9}, {3.6887938523170757`*^9, 3.688793878327112*^9}, {3.6887939201671705`*^9, 3.6887939329171886`*^9}, { 3.688809028525826*^9, 3.68880903887584*^9}, {3.6888096953767595`*^9, 3.6888097390468206`*^9}, {3.6888099024470496`*^9, 3.6888099095570593`*^9}, {3.688810364147696*^9, 3.6888104325877914`*^9}, { 3.6888699116958637`*^9, 3.688869954045923*^9}, {3.688870212896285*^9, 3.6888702826463833`*^9}, {3.688870324776442*^9, 3.688870341366465*^9}, { 3.6888703736365104`*^9, 3.6888703737365103`*^9}, {3.688870541036745*^9, 3.6888706080368385`*^9}, {3.6888706877569504`*^9, 3.688870691966956*^9}, { 3.688871750438438*^9, 3.688871779498479*^9}, {3.688871834948556*^9, 3.68887184514857*^9}, 3.6888719193886747`*^9, 3.68887406629204*^9, { 3.688874175099601*^9, 3.6888742084784775`*^9}, {3.688874778973279*^9, 3.6888747878232913`*^9}, 3.6888750967337236`*^9, {3.688878647907729*^9, 3.688878680997775*^9}, 3.688878943988143*^9, 3.6888832221760635`*^9, { 3.6890362896656976`*^9, 3.6890363834158287`*^9}, {3.689036421615882*^9, 3.689036777676381*^9}, {3.689036812336429*^9, 3.6890368524464855`*^9}, { 3.689036899906552*^9, 3.6890369232465844`*^9}, {3.689036953746627*^9, 3.6890369796866636`*^9}, {3.6890370404767485`*^9, 3.689037048086759*^9}, { 3.689037094946825*^9, 3.6890371147668524`*^9}, {3.751938808135952*^9, 3.751938824684553*^9}, {3.751938860243642*^9, 3.751939111448078*^9}, 3.7839312396799526`*^9}, CellLabel->"In[38]:=",ExpressionUUID->"1bfb282e-7a1f-4d60-8484-db4ba445bb93"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 1 (Beam bending and bar modes)", "Subsubsection", CellChangeTimes->{{3.4467272545257998`*^9, 3.4467272551809998`*^9}, { 3.4470326830236*^9, 3.4470326987172003`*^9}, {3.4470327910732*^9, 3.4470328568272*^9}, {3.4470332885104*^9, 3.4470332996644*^9}, 3.4803955556906*^9, 3.4803956288746*^9, 3.5741318501832905`*^9, { 3.688907262668313*^9, 3.688907263698314*^9}, {3.7518564487888465`*^9, 3.7518564599036164`*^9}, {3.7839176334545565`*^9, 3.7839176645245857`*^9}},ExpressionUUID->"1fc5d506-4000-4796-b4d5-\ 7fe30d5095b9"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ele", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"BEAM", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\[CapitalEpsilon]", ",", "G"}], "}"}], ",", RowBox[{"{", RowBox[{ SuperscriptBox["t", "2"], ",", RowBox[{ SuperscriptBox["t", "4"], "/", "12"}], ",", RowBox[{ SuperscriptBox["t", "4"], "/", "12"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "f"}], " ", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"FORCE", ",", RowBox[{"{", RowBox[{ RowBox[{"f", " ", "L"}], ",", RowBox[{ RowBox[{"-", "f"}], " ", "L"}], " ", ",", "0"}], "}"}], ",", RowBox[{"Point", "[", RowBox[{"{", "2", "}"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"fun", " ", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"L", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"uX", "[", "2", "]"}], ",", RowBox[{"uY", "[", "2", "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"\[Theta]Z", "[", "2", "]"}]}], "}"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"STANDARDFORM", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FORMATTED", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", RowBox[{"{", RowBox[{"ele", ",", "fun"}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.4470329272144003`*^9, 3.447032945326*^9}, { 3.4470329838892*^9, 3.4470330443859997`*^9}, {3.4470330828556004`*^9, 3.4470331057096*^9}, {3.4470331580632*^9, 3.447033193756*^9}, { 3.4470333076984*^9, 3.4470334514368*^9}, {3.635213204984849*^9, 3.6352134019321136`*^9}, {3.6352137922734404`*^9, 3.635213850699782*^9}, 3.6352139351176105`*^9, {3.635216913411959*^9, 3.6352169164011297`*^9}, { 3.6352170892600174`*^9, 3.635217143791136*^9}, {3.635217414188602*^9, 3.6352174172177753`*^9}, {3.6352178017787704`*^9, 3.6352178041859083`*^9}, {3.6352181563510513`*^9, 3.6352181607243013`*^9}, {3.6352491991145163`*^9, 3.635249202022682*^9}, { 3.6889072794883366`*^9, 3.6889073638684545`*^9}, {3.6889079728927164`*^9, 3.6889081550629716`*^9}, {3.688908283083151*^9, 3.688908284333153*^9}, { 3.6889087666538277`*^9, 3.688908766843828*^9}, 3.688910125975731*^9, { 3.7518564811558094`*^9, 3.7518566618666534`*^9}, {3.7518566958830357`*^9, 3.7518567325936937`*^9}, {3.7839084427375174`*^9, 3.7839085027275615`*^9}, {3.7839122952361803`*^9, 3.7839123747779207`*^9}, {3.7839124503183956`*^9, 3.783912461712295*^9}}, CellLabel-> "In[415]:=",ExpressionUUID->"052d16ad-1cbb-457d-af5d-492ff2813a89"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 2 (Plate bending mode)", "Subsubsection", CellChangeTimes->{{3.4467272483794003`*^9, 3.446727266257*^9}, { 3.4467288934652*^9, 3.446728896788*^9}, 3.4467805306712*^9, { 3.4801237484706*^9, 3.4801237489386*^9}, {3.5744708417194977`*^9, 3.5744708449019036`*^9}, {3.6042991711100636`*^9, 3.604299196992544*^9}, 3.60430729253247*^9, {3.604310202140381*^9, 3.6043102048235855`*^9}, { 3.6889933424974422`*^9, 3.688993352477456*^9}, 3.6889988585223417`*^9, { 3.689480870769858*^9, 3.6894808898298845`*^9}, {3.7518654678504887`*^9, 3.751865474661203*^9}, {3.7519386265381956`*^9, 3.7519386622978053`*^9}},ExpressionUUID->"d386b5ca-3b6b-4461-a7db-\ b6a6a647c5e9"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "Lets", " ", "start", " ", "with", " ", "the", " ", "building", " ", "blocks"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", "=", " ", RowBox[{ RowBox[{"a", "[", "0", "]"}], " ", RowBox[{"Sin", "[", RowBox[{"Pi", " ", RowBox[{"x", "/", "L"}]}], "]"}], RowBox[{"Sin", "[", RowBox[{"Pi", " ", RowBox[{"y", "/", "L"}]}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", "=", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"L", ",", "L"}], "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"fz", "=", " ", RowBox[{"f", " ", RowBox[{"Sin", "[", RowBox[{"Pi", " ", RowBox[{"x", "/", "L"}]}], "]"}], RowBox[{"Sin", "[", RowBox[{"Pi", " ", RowBox[{"y", "/", "L"}]}], "]"}]}]}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]w", ":=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["t", "3"], " ", "\[CapitalEpsilon]"}], RowBox[{"12", RowBox[{"(", RowBox[{"1", "-", SuperscriptBox["\[Nu]", "2"]}], ")"}]}]], RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", FractionBox[ RowBox[{"1", "-", "\[Nu]"}], "2"]}], "}"}]}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}]}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], " ", "fz"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"Integrate", "[", RowBox[{"\[Delta]w", ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["\[CapitalOmega]", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], StyleBox[ RowBox[{"Assumptions", "->", RowBox[{"L", ">", "0"}]}], "OperatorCharacter"]}], StyleBox["]", "OperatorCharacter"]}]}], StyleBox[";", "OperatorCharacter"], "\[IndentingNewLine]", " ", RowBox[{"w", " ", "/.", " ", RowBox[{"SOLVE", "[", "\[Delta]WW", "]"}]}]}]}], " ", "]"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4467277951594*^9, 3.4467279649186*^9}, 3.446728037053*^9, {3.4467281489206*^9, 3.4467281816806*^9}, { 3.4467282630708*^9, 3.4467282697788*^9}, 3.4467284401292*^9, { 3.5744707871506023`*^9, 3.5744707892254057`*^9}, {3.5744708230306654`*^9, 3.5744708311270795`*^9}, {3.5744708665859413`*^9, 3.5744709163032293`*^9}, {3.5744709579553022`*^9, 3.5744709639145126`*^9}, {3.5744710148018017`*^9, 3.5744710339742355`*^9}, 3.6042992082891903`*^9, {3.6042992538197947`*^9, 3.6042992780501804`*^9}, { 3.6042993188655148`*^9, 3.6042993269519777`*^9}, {3.604305825073493*^9, 3.604305908252839*^9}, {3.6043059427600994`*^9, 3.6043059892481813`*^9}, { 3.604306056094299*^9, 3.604306314961153*^9}, {3.604308274382595*^9, 3.604308484499364*^9}, {3.604308525933037*^9, 3.604308791414303*^9}, { 3.6043089926234565`*^9, 3.604309008441884*^9}, {3.6043109233452473`*^9, 3.604311002296986*^9}, {3.6043110410942545`*^9, 3.604311044713461*^9}, { 3.604311077301918*^9, 3.6043113010219107`*^9}, 3.604311474057415*^9, { 3.6043115724311876`*^9, 3.6043115749739923`*^9}, {3.6043116205416718`*^9, 3.6043116224136753`*^9}, {3.6043116548617325`*^9, 3.604311738571479*^9}, { 3.6043119619326715`*^9, 3.6043119879847174`*^9}, {3.604312252108781*^9, 3.6043122715620155`*^9}, {3.604312318159297*^9, 3.604312461367549*^9}, { 3.6043125259828625`*^9, 3.6043125318016725`*^9}, {3.6043125750605483`*^9, 3.6043125754037495`*^9}, {3.6043127726660957`*^9, 3.604312785458118*^9}, { 3.636082009030026*^9, 3.6360821021793537`*^9}, {3.6360821353592515`*^9, 3.6360821994179153`*^9}, {3.6360822411353016`*^9, 3.636082308140134*^9}, { 3.636082428925042*^9, 3.6360824672832365`*^9}, 3.636082772513695*^9, { 3.6364550263262777`*^9, 3.636455043447257*^9}, 3.63645529332755*^9, 3.6364553732171187`*^9, {3.636455466633462*^9, 3.6364555214936*^9}, 3.6673026911198535`*^9, {3.688993360197467*^9, 3.6889934094075356`*^9}, { 3.6889934413475804`*^9, 3.6889934979176598`*^9}, {3.6889986435220413`*^9, 3.6889988109722757`*^9}, {3.689070158580252*^9, 3.6890701724702716`*^9}, { 3.75186550410758*^9, 3.7518656604145575`*^9}, {3.751865728032886*^9, 3.751865773303449*^9}, {3.7518658124036255`*^9, 3.7518658214955225`*^9}, { 3.7518658552375374`*^9, 3.7518658598771863`*^9}, {3.7518659717099*^9, 3.751866085179107*^9}, 3.7839177034967346`*^9, 3.7839185417062864`*^9, { 3.7839185739816604`*^9, 3.783918629207261*^9}, {3.7839452946382055`*^9, 3.783945323002612*^9}, {3.815974299934433*^9, 3.8159743434080467`*^9}}, CellLabel-> "In[420]:=",ExpressionUUID->"ac1a67ba-bfe0-430b-b91e-14f788cde5d9"] }, Closed]], Cell[CellGroupData[{ Cell["Home assignment 3 (Plate bending mode)", "Subsubsection", CellChangeTimes->{{3.4467272483794003`*^9, 3.446727266257*^9}, { 3.4467288934652*^9, 3.446728896788*^9}, 3.4467805306712*^9, { 3.4801237484706*^9, 3.4801237489386*^9}, {3.5744708417194977`*^9, 3.5744708449019036`*^9}, {3.6042991711100636`*^9, 3.604299196992544*^9}, 3.60430729253247*^9, {3.604310202140381*^9, 3.6043102048235855`*^9}, { 3.6889933424974422`*^9, 3.688993352477456*^9}, 3.6889988585223417`*^9, { 3.689480870769858*^9, 3.6894808898298845`*^9}, {3.7518654678504887`*^9, 3.751865474661203*^9}, {3.7519386265381956`*^9, 3.7519386622978053`*^9}, { 3.7838621732103148`*^9, 3.783862173777651*^9}},ExpressionUUID->"d9fce155-0184-43be-9153-\ 088286050608"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ "Lets", " ", "start", " ", "with", " ", "the", " ", "building", " ", "blocks"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", "=", " ", RowBox[{ RowBox[{"a", "[", "0", "]"}], " ", SuperscriptBox["x", "2"], SuperscriptBox["y", "2"]}]}], ",", "\[IndentingNewLine]", RowBox[{"\[Nu]", "=", "0"}], ",", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", "=", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"L", ",", "L"}], "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"fz", "=", RowBox[{"\[Rho]", " ", "g", " ", "t"}]}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]w", ":=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["t", "3"], " ", "\[CapitalEpsilon]"}], RowBox[{"12", RowBox[{"(", RowBox[{"1", "-", SuperscriptBox["\[Nu]", "2"]}], ")"}]}]], RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", FractionBox[ RowBox[{"1", "-", "\[Nu]"}], "2"]}], "}"}]}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}]}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], " ", "fz"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", "=", RowBox[{"Integrate", "[", RowBox[{"\[Delta]w", ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["\[CapitalOmega]", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], StyleBox[ RowBox[{"Assumptions", "->", RowBox[{"L", ">", "0"}]}], "OperatorCharacter"]}], StyleBox["]", "OperatorCharacter"]}]}], StyleBox[";", "OperatorCharacter"], StyleBox["\[IndentingNewLine]", "OperatorCharacter"], "\[IndentingNewLine]", " ", RowBox[{"SOLVE", "[", "\[Delta]WW", "]"}]}]}], "]"}], "\[IndentingNewLine]"}]}]], "Input", CellChangeTimes->{{3.4467277951594*^9, 3.4467279649186*^9}, 3.446728037053*^9, {3.4467281489206*^9, 3.4467281816806*^9}, { 3.4467282630708*^9, 3.4467282697788*^9}, 3.4467284401292*^9, { 3.5744707871506023`*^9, 3.5744707892254057`*^9}, {3.5744708230306654`*^9, 3.5744708311270795`*^9}, {3.5744708665859413`*^9, 3.5744709163032293`*^9}, {3.5744709579553022`*^9, 3.5744709639145126`*^9}, {3.5744710148018017`*^9, 3.5744710339742355`*^9}, 3.6042992082891903`*^9, {3.6042992538197947`*^9, 3.6042992780501804`*^9}, { 3.6042993188655148`*^9, 3.6042993269519777`*^9}, {3.604305825073493*^9, 3.604305908252839*^9}, {3.6043059427600994`*^9, 3.6043059892481813`*^9}, { 3.604306056094299*^9, 3.604306314961153*^9}, {3.604308274382595*^9, 3.604308484499364*^9}, {3.604308525933037*^9, 3.604308791414303*^9}, { 3.6043089926234565`*^9, 3.604309008441884*^9}, {3.6043109233452473`*^9, 3.604311002296986*^9}, {3.6043110410942545`*^9, 3.604311044713461*^9}, { 3.604311077301918*^9, 3.6043113010219107`*^9}, 3.604311474057415*^9, { 3.6043115724311876`*^9, 3.6043115749739923`*^9}, {3.6043116205416718`*^9, 3.6043116224136753`*^9}, {3.6043116548617325`*^9, 3.604311738571479*^9}, { 3.6043119619326715`*^9, 3.6043119879847174`*^9}, {3.604312252108781*^9, 3.6043122715620155`*^9}, {3.604312318159297*^9, 3.604312461367549*^9}, { 3.6043125259828625`*^9, 3.6043125318016725`*^9}, {3.6043125750605483`*^9, 3.6043125754037495`*^9}, {3.6043127726660957`*^9, 3.604312785458118*^9}, { 3.636082009030026*^9, 3.6360821021793537`*^9}, {3.6360821353592515`*^9, 3.6360821994179153`*^9}, {3.6360822411353016`*^9, 3.636082308140134*^9}, { 3.636082428925042*^9, 3.6360824672832365`*^9}, 3.636082772513695*^9, { 3.6364550263262777`*^9, 3.636455043447257*^9}, 3.63645529332755*^9, 3.6364553732171187`*^9, {3.636455466633462*^9, 3.6364555214936*^9}, 3.6673026911198535`*^9, {3.688993360197467*^9, 3.6889934094075356`*^9}, { 3.6889934413475804`*^9, 3.6889934979176598`*^9}, {3.6889986435220413`*^9, 3.6889988109722757`*^9}, {3.689070158580252*^9, 3.6890701724702716`*^9}, { 3.75186550410758*^9, 3.7518656604145575`*^9}, {3.751865728032886*^9, 3.751865773303449*^9}, {3.7518658124036255`*^9, 3.7518658214955225`*^9}, { 3.7518658552375374`*^9, 3.7518658598771863`*^9}, {3.7518659717099*^9, 3.751866085179107*^9}, {3.783862187507926*^9, 3.783862723887079*^9}, 3.7838627567987103`*^9, {3.7838627975110397`*^9, 3.7838628317624273`*^9}, { 3.783862870605214*^9, 3.7838628960456295`*^9}, 3.78386294016465*^9, { 3.78386393060279*^9, 3.7838639355638156`*^9}, {3.783917730098337*^9, 3.783917864130623*^9}, {3.7839179089804335`*^9, 3.783917919226283*^9}, { 3.783918219871359*^9, 3.783918223138747*^9}, {3.7839183372149825`*^9, 3.783918352411933*^9}, {3.783918438427128*^9, 3.7839184537026205`*^9}, { 3.7840383415148354`*^9, 3.7840383772831526`*^9}, {3.815974451228001*^9, 3.815974500478052*^9}, 3.847338411001088*^9}, CellLabel-> "In[422]:=",ExpressionUUID->"77f56344-0784-4625-ba25-15c6ec57d9c9"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture assignment 1 (Beam bending mode)", "Subsubsection", CellChangeTimes->{{3.4783105840072002`*^9, 3.4783105927276*^9}, { 3.5728449762183576`*^9, 3.572844979151163*^9}, {3.5728453343325863`*^9, 3.5728453405569973`*^9}, {3.688118092873827*^9, 3.688118092983827*^9}, 3.688359609384676*^9, 3.7512866598973365`*^9, {3.751873567770299*^9, 3.75187357623706*^9}, {3.751938639882143*^9, 3.751938642396762*^9}, { 3.7519661121438475`*^9, 3.7519661395436525`*^9}, {3.7838631173771544`*^9, 3.783863122546702*^9}},ExpressionUUID->"9b9200ed-b9b5-4860-a625-\ 7ee79cd823fd"], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ "Lets", " ", "start", " ", "with", " ", "the", " ", "building", " ", "blocks"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", "=", " ", RowBox[{ RowBox[{"a", "[", "0", "]"}], " ", RowBox[{"x", "^", "2"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"A", "=", RowBox[{"b", " ", "t"}]}], ",", "\[IndentingNewLine]", RowBox[{"Iyy", "=", RowBox[{"b", " ", RowBox[{ SuperscriptBox["t", "3"], "/", "12"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", "0", "}"}], ",", RowBox[{"{", "L", "}"}]}], "}"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"fz", "=", " ", RowBox[{ RowBox[{"-", "\[Rho]"}], " ", "g", " ", "A"}]}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]wint", "=", RowBox[{ RowBox[{"-", RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], "}"}], "]"}]}], "\[CapitalEpsilon]", " ", "Iyy", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Delta]wext", "=", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], " ", "fz"}]}], " ", ";", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Integrate", "[", RowBox[{ RowBox[{"\[Delta]wint", "+", "\[Delta]wext"}], ",", RowBox[{"x", StyleBox["\[Element]", "OperatorCharacter"], StyleBox["\[CapitalOmega]", "OperatorCharacter"]}]}], StyleBox["]", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], StyleBox[ RowBox[{"L", ">", "0"}], "OperatorCharacter"]}], StyleBox["]", "OperatorCharacter"]}]}], StyleBox[";", "OperatorCharacter"], RowBox[{"SOLVE", "[", "\[Delta]WW", "]"}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.4461905586956*^9, 3.4461905700524*^9}, { 3.4461906058543997`*^9, 3.4461906595184*^9}, {3.4461909080108*^9, 3.4461909084944*^9}, 3.4783106355184*^9, {3.572845003159605*^9, 3.5728450179796305`*^9}, {3.572845143575452*^9, 3.572845224321193*^9}, { 3.5728452678452697`*^9, 3.5728452910893106`*^9}, 3.6308071837539654`*^9, { 3.6308072232376347`*^9, 3.6308072806925354`*^9}, {3.630807380891511*^9, 3.6308073810631113`*^9}, 3.630807416662374*^9, {3.6308074522148366`*^9, 3.6308074569416447`*^9}, {3.630808242239827*^9, 3.6308082648781223`*^9}, 3.6308084593562455`*^9, {3.6345433582074366`*^9, 3.634543372320244*^9}, { 3.6346116313217573`*^9, 3.6346116325178256`*^9}, {3.666087872613713*^9, 3.666087886573511*^9}, {3.6881181216838675`*^9, 3.688118174223941*^9}, { 3.688118207333987*^9, 3.6881182190740037`*^9}, {3.6881198165987434`*^9, 3.6881198365987716`*^9}, {3.688119917098884*^9, 3.6881199552489376`*^9}, { 3.6881200535590754`*^9, 3.688120067969095*^9}, {3.6881202600693645`*^9, 3.6881202623293676`*^9}, {3.6882115663473253`*^9, 3.6882116196673994`*^9}, {3.6882146169274535`*^9, 3.688214623197462*^9}, { 3.68821534280847*^9, 3.6882153918885384`*^9}, {3.6882155882088137`*^9, 3.688215596588825*^9}, {3.688215832739156*^9, 3.688216010999405*^9}, { 3.6882160560194683`*^9, 3.6882161733196325`*^9}, {3.688216240949727*^9, 3.688216241329728*^9}, {3.6883602152375245`*^9, 3.68836024784757*^9}, 3.688360344247705*^9, {3.6883608241383767`*^9, 3.688360825178378*^9}, { 3.7512866791330085`*^9, 3.751286699056904*^9}, {3.7518735943577967`*^9, 3.7518736772780695`*^9}, {3.7519661481666827`*^9, 3.7519662902266593`*^9}, {3.7519663327325573`*^9, 3.7519663367628913`*^9}, {3.751966376173849*^9, 3.751966446798154*^9}, { 3.7838636295979414`*^9, 3.783863868422082*^9}, {3.7838639059018145`*^9, 3.783863908964238*^9}, {3.7838639679153423`*^9, 3.7838639734000444`*^9}, { 3.783864105610245*^9, 3.783864283265831*^9}, {3.7839179884119616`*^9, 3.783918035772231*^9}, {3.783918127450878*^9, 3.78391814927584*^9}, { 3.7840383839991336`*^9, 3.784038405187052*^9}, {3.7843645384447894`*^9, 3.7843645390069814`*^9}, {3.7843645808725567`*^9, 3.7843646011455536`*^9}, {3.7843646898444138`*^9, 3.784364693345668*^9}, { 3.7843647342699285`*^9, 3.784364738577711*^9}, {3.7843647781334476`*^9, 3.784364845748866*^9}, {3.7843648766378193`*^9, 3.784364887768874*^9}, { 3.784370077763171*^9, 3.7843701161273317`*^9}, {3.847338938839561*^9, 3.8473389418309765`*^9}}, CellLabel-> "In[359]:=",ExpressionUUID->"3aa55d27-a8ca-4892-b171-91d8c97c6718"] }, Closed]], Cell[CellGroupData[{ Cell["Lecture assignment 2 (Plate bending mode)", "Subsubsection", CellChangeTimes->{{3.4736023747714*^9, 3.4736023781098003`*^9}, { 3.6868022785686846`*^9, 3.6868022850886936`*^9}, {3.7492979598334618`*^9, 3.749297959983119*^9}, 3.751966534292943*^9, {3.7838632193963895`*^9, 3.7838632250490403`*^9}},ExpressionUUID->"fe04c3e5-5fd2-4888-81b9-\ fb87f417174c"], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "Lets", " ", "start", " ", "with", " ", "the", " ", "building", " ", "blocks"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"w", "=", " ", RowBox[{ RowBox[{"a", "[", "0", "]"}], " ", SuperscriptBox["x", "2"]}]}], ",", "\[IndentingNewLine]", StyleBox[ RowBox[{"fz", "=", RowBox[{ RowBox[{"-", "\[Rho]"}], " ", "g", " ", "t"}]}], FontColor->GrayLevel[0]], StyleBox[",", FontColor->GrayLevel[0]], "\[IndentingNewLine]", RowBox[{"\[CapitalOmega]", "=", RowBox[{"Rectangle", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"-", "b"}], "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"L", ",", RowBox[{"b", "/", "2"}]}], "}"}]}], "]"}]}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Delta]w", ":=", RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"\[Delta]", "[", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}], "]"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["t", "3"], " ", "\[CapitalEpsilon]"}], RowBox[{"12", RowBox[{"(", RowBox[{"1", "-", SuperscriptBox["\[Nu]", "2"]}], ")"}]}]], RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\[Nu]", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Nu]", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", FractionBox[ RowBox[{"1", "-", "\[Nu]"}], "2"]}], "}"}]}], "}"}]}], ")"}], ".", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "x"}]], "w"}], ",", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"y", ",", "y"}]], "w"}], ",", RowBox[{"2", " ", RowBox[{ SubscriptBox["\[PartialD]", RowBox[{"x", ",", "y"}]], "w"}]}]}], "}"}]}]}], "+", RowBox[{ RowBox[{"\[Delta]", "[", "w", "]"}], " ", "fz"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"\[Delta]WW", " ", "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Integrate", "[", RowBox[{"\[Delta]w", ",", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], StyleBox["\[Element]", "OperatorCharacter"], StyleBox["\[CapitalOmega]", "OperatorCharacter"]}]}], StyleBox["]", "OperatorCharacter"]}], StyleBox[",", "OperatorCharacter"], StyleBox[ RowBox[{"{", RowBox[{ RowBox[{"L", ">", "0"}], ",", RowBox[{"b", ">", "0"}]}], "}"}], "OperatorCharacter"]}], StyleBox["]", "OperatorCharacter"]}]}], StyleBox[";", "OperatorCharacter"], StyleBox["\[IndentingNewLine]", "OperatorCharacter"], "\[IndentingNewLine]", RowBox[{"SOLVE", "[", "\[Delta]WW", "]"}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.5995329860720997`*^9, 3.5995329864777007`*^9}, { 3.630659778315757*^9, 3.630659828048644*^9}, {3.6306598914627557`*^9, 3.6306599306656246`*^9}, {3.6306599731444993`*^9, 3.6306599829569163`*^9}, {3.662454347459821*^9, 3.6624543518500724`*^9}, { 3.68526405607954*^9, 3.6852640707595606`*^9}, {3.6852641077696123`*^9, 3.685264155179679*^9}, 3.6852673060840898`*^9, {3.6853472003408313`*^9, 3.6853472271923676`*^9}, {3.6858570860961666`*^9, 3.685857127369527*^9}, { 3.6858768949343204`*^9, 3.685876957124408*^9}, {3.685876989354453*^9, 3.6858770065044775`*^9}, {3.686802340768771*^9, 3.6868023465387793`*^9}, { 3.687096288077949*^9, 3.687096301137967*^9}, {3.6870963358880157`*^9, 3.6870963412180233`*^9}, {3.6870963927480955`*^9, 3.687096425488141*^9}, { 3.688212170418171*^9, 3.688212173478175*^9}, 3.688212222858244*^9, { 3.718713559287408*^9, 3.718713566112142*^9}, {3.749297987905261*^9, 3.7492980245735807`*^9}, {3.7492980614235954`*^9, 3.7492980977687564`*^9}, {3.7519665466649914`*^9, 3.751966597028448*^9}, { 3.7519666286772346`*^9, 3.751966815242736*^9}, {3.7519668678711214`*^9, 3.751966880290109*^9}, {3.7838632121004066`*^9, 3.7838635234782686`*^9}, { 3.7838635706344037`*^9, 3.7838635939551997`*^9}, {3.783918089393834*^9, 3.783918095087676*^9}, {3.7839181658238006`*^9, 3.783918170518629*^9}, { 3.7840384239125705`*^9, 3.784038429895836*^9}, 3.7843683088109984`*^9, { 3.8159706335005927`*^9, 3.815970673200989*^9}, {3.815970713445261*^9, 3.8159707468098154`*^9}, {3.8159745383278017`*^9, 3.8159746407077513`*^9}, 3.8473392648401303`*^9}, CellLabel-> "In[360]:=",ExpressionUUID->"926567af-ecc0-47ad-8426-ae891278a942"] }, Closed]] }, Open ]] }, Open ]] }, AutoGeneratedPackage->Automatic, WindowSize->{902.75, 433.25}, WindowMargins->{{10.25, Automatic}, {-45.25, Automatic}}, PrintingCopies->1, PrintingPageRange->{Automatic, Automatic}, PrivateNotebookOptions->{"VersionedStylesheet"->{"Default.nb"[8.] -> False}}, TaggingRules->Association["TryRealOnly" -> False], Magnification:>1.25 Inherited, FrontEndVersion->"12.3 for Microsoft Windows (64-bit) (July 9, 2021)", StyleDefinitions->"Default.nb", ExpressionUUID->"53ad4b5b-c0e7-4ba6-a97e-9cfcbe252b16" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[567, 22, 1386, 21, 199, "Title",ExpressionUUID->"88382003-a489-4214-981a-b19c8fc5cd6f", InitializationCell->True], Cell[CellGroupData[{ Cell[1978, 47, 914, 15, 83, "Section",ExpressionUUID->"859fc4d6-3e37-4527-8708-d6f26cb14938"], Cell[CellGroupData[{ Cell[2917, 66, 156, 2, 66, "Subsection",ExpressionUUID->"0171a1b3-fb2d-42a2-bd92-b19f365f5e59"], Cell[3076, 70, 31650, 715, 2125, "Input",ExpressionUUID->"715d2836-a01e-46f9-a8ca-16a5c3559784", InitializationCell->True], Cell[34729, 787, 154, 3, 30, "Input",ExpressionUUID->"c1619a3b-9e0a-4122-a84a-afa9f4c247e7"] }, Closed]], Cell[CellGroupData[{ Cell[34920, 795, 88, 0, 44, "Subsection",ExpressionUUID->"14bff46d-d9b4-4c59-a85c-39c5e3833072"], Cell[35011, 797, 33129, 973, 1118481054, "Input",ExpressionUUID->"871c79ec-c023-4224-9a21-8ff510ab39ba", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[68177, 1775, 87, 0, 44, "Subsection",ExpressionUUID->"59204ca0-aed9-4646-8944-b2dccdb43133"], Cell[68267, 1777, 38463, 1011, 2743, "Input",ExpressionUUID->"f4d5668b-213e-4e58-b3e4-76d4d357bf0e", InitializationCell->True], Cell[CellGroupData[{ Cell[106755, 2792, 4483, 127, 414, "Input",ExpressionUUID->"69d07010-b5e6-4363-b202-b8b71cea0156"], Cell[111241, 2921, 553, 13, 37, "Output",ExpressionUUID->"0dbd8707-c780-4240-8511-785694daf797"], Cell[111797, 2936, 368, 7, 54, "Output",ExpressionUUID->"b1b051b3-0f28-4c81-a4f0-c7435c3507cc"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[112214, 2949, 92, 0, 44, "Subsection",ExpressionUUID->"269b94a2-3c36-4801-aa85-b9e440f89437"], Cell[112309, 2951, 7120, 206, 645, "Input",ExpressionUUID->"e22b2738-9656-4c24-88eb-8c6e25c4cd2a", InitializationCell->True] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[119478, 3163, 1136, 18, 65, "Section",ExpressionUUID->"0fefe5cf-08d5-4448-baaa-762ae96d5490"], Cell[CellGroupData[{ Cell[120639, 3185, 273, 4, 66, "Subsection",ExpressionUUID->"5f39b92f-6ed6-4f54-8a18-b163a9fbf46e"], Cell[120915, 3191, 844, 21, 102, "Input",ExpressionUUID->"835439a7-defd-4b59-91fb-e8a8e6c62d56"] }, Closed]], Cell[CellGroupData[{ Cell[121796, 3217, 379, 6, 44, "Subsection",ExpressionUUID->"5f35c5d8-75b9-4c3e-afd2-8ed229241084"], Cell[122178, 3225, 14812, 355, 865, "Input",ExpressionUUID->"8e09dea8-84c1-47df-be19-131f7e0085b1", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[137027, 3585, 459, 7, 44, "Subsection",ExpressionUUID->"0c696525-6a47-44b6-9318-c7d51eaa387b"], Cell[137489, 3594, 4944, 81, 124, "Input",ExpressionUUID->"b9c705a8-445f-4657-84c2-c1d3f2236053", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[142470, 3680, 273, 4, 44, "Subsection",ExpressionUUID->"617fee82-5339-4433-b2ea-7c017ec32180"], Cell[142746, 3686, 20958, 521, 1174, "Input",ExpressionUUID->"5c9e340e-54a3-430e-82cb-281cacd25c16", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[163741, 4212, 324, 5, 44, "Subsection",ExpressionUUID->"f56b2ac8-cab7-470a-be8d-9c9e7cd3fcc3"], Cell[164068, 4219, 10145, 222, 554, "Input",ExpressionUUID->"5f9b25ca-8981-4567-bf86-568617bd7edd", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[174250, 4446, 375, 6, 44, "Subsection",ExpressionUUID->"3819b5bb-d58e-4ad7-8e44-7b48483e846e"], Cell[174628, 4454, 4952, 77, 124, "Input",ExpressionUUID->"2e83dfa3-81b9-4e4f-a211-b0fb5976d36f", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[179617, 4536, 425, 6, 44, "Subsection",ExpressionUUID->"5d932a2f-c019-4b60-9ed9-fe899f00e190"], Cell[180045, 4544, 5002, 78, 124, "Input",ExpressionUUID->"6f8837b5-2fdc-43e1-9c61-7880a239736c", InitializationCell->True] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[185096, 4628, 1138, 18, 65, "Section",ExpressionUUID->"4c6109cb-e593-46e3-a139-4669208fc351"], Cell[CellGroupData[{ Cell[186259, 4650, 555, 8, 66, "Subsection",ExpressionUUID->"8a70552f-e2dc-4412-b5c7-3bd18722cfbc"], Cell[186817, 4660, 15310, 346, 650, "Input",ExpressionUUID->"cf45f3c2-2687-4d02-9504-4a90af5aa24f", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[202164, 5011, 631, 9, 44, "Subsection",ExpressionUUID->"debcad87-da3a-4e2e-a103-34624f90af84"], Cell[202798, 5022, 16004, 331, 931, "Input",ExpressionUUID->"78684957-754e-4e50-84ad-586bff8b35b4", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[218839, 5358, 477, 7, 44, "Subsection",ExpressionUUID->"84152048-f45f-40cc-a3f6-dc52ab3117f8"], Cell[219319, 5367, 16144, 373, 881, "Input",ExpressionUUID->"e74b906d-da35-489d-a1fc-1d2f3d3d9be0", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[235500, 5745, 583, 8, 44, "Subsection",ExpressionUUID->"1ebd92d6-229f-45b2-b877-802f0299f5f5"], Cell[236086, 5755, 6852, 116, 266, "Input",ExpressionUUID->"c2d06905-f0f7-4f81-9b5a-214d32163cd5", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[242975, 5876, 637, 9, 44, "Subsection",ExpressionUUID->"52e90378-2725-4be9-8979-7b06a5fd2e8d"], Cell[243615, 5887, 6904, 117, 266, "Input",ExpressionUUID->"0390560e-402e-48e0-8f5c-8df6e7f0b902", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[250556, 6009, 691, 10, 44, "Subsection",ExpressionUUID->"6c376952-fac1-4159-879c-013113f73a28"], Cell[251250, 6021, 6958, 118, 266, "Input",ExpressionUUID->"19da0d15-9e3f-4b43-a6a1-61ae362f6205", InitializationCell->True] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[258257, 6145, 1135, 18, 65, "Section",ExpressionUUID->"54f083a4-e547-4438-9570-056f2caae5e6"], Cell[CellGroupData[{ Cell[259417, 6167, 279, 5, 67, "Subsection",ExpressionUUID->"0c0f521b-0eb3-40c7-95da-df289d6a1d5f", InitializationCell->True], Cell[259699, 6174, 40134, 792, 2350, "Input",ExpressionUUID->"0cb3af68-a57d-4559-920b-e008c5bf0a0d", InitializationCell->True], Cell[299836, 6968, 25668, 501, 1278, "Input",ExpressionUUID->"0ffd5e57-8dc5-4855-813b-c367bea097ca"], Cell[325507, 7471, 18117, 303, 513, "Input",ExpressionUUID->"e175473f-ea66-4d0e-ac6e-cad27683bdb0"], Cell[343627, 7776, 34788, 755, 2186, "Input",ExpressionUUID->"4b8af7ff-6d80-42d3-88c9-80eeb1ea0d36"] }, Closed]], Cell[CellGroupData[{ Cell[378452, 8536, 355, 6, 46, "Subsection",ExpressionUUID->"0f83a6ca-7317-47e0-bd58-1d0cefab53c2", InitializationCell->True], Cell[378810, 8544, 14273, 208, 145, "Input",ExpressionUUID->"6542c2af-84f4-49b1-a896-7e7109492be5", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[393120, 8757, 277, 5, 46, "Subsection",ExpressionUUID->"25fa91a7-f41b-4c5f-80db-51a36e371564", InitializationCell->True], Cell[393400, 8764, 18524, 345, 675, "Input",ExpressionUUID->"0325f1b0-6271-4d26-ae61-69e920e4fb38", InitializationCell->True], Cell[411927, 9111, 16394, 284, 584, "Input",ExpressionUUID->"5ceb03b1-241f-4252-809c-3d9733aaf892"] }, Closed]], Cell[CellGroupData[{ Cell[428358, 9400, 276, 5, 46, "Subsection",ExpressionUUID->"25330b3c-1c67-4ecf-a350-259919d8b277", InitializationCell->True], Cell[428637, 9407, 12728, 194, 120, "Input",ExpressionUUID->"12db8b42-d2e3-4c2e-81a4-6bd17081bd31", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[441402, 9606, 298, 5, 46, "Subsection",ExpressionUUID->"1ae58f4d-7917-4290-b99f-0ab85e83fa50", InitializationCell->True], Cell[441703, 9613, 21715, 438, 789, "Input",ExpressionUUID->"308bd0fb-ea03-4640-b505-509a7e3ec1df", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[463455, 10056, 408, 7, 46, "Subsection",ExpressionUUID->"ac6b7c15-d796-423a-8eaf-cb24e82eeabc", InitializationCell->True], Cell[463866, 10065, 18853, 350, 798, "Input",ExpressionUUID->"b401ad7f-c7ae-4ce1-a7d0-5b714e4a4746", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[482756, 10420, 333, 6, 46, "Subsection",ExpressionUUID->"6705bf0f-ad49-4a74-b56c-0d42d9cfb8fb", InitializationCell->True], Cell[483092, 10428, 20655, 372, 747, "Input",ExpressionUUID->"58c0cf67-d568-43df-a47a-d6a484b58379", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[503784, 10805, 409, 7, 46, "Subsection",ExpressionUUID->"3376c320-e494-46bf-b16d-fd120eb52a1c", InitializationCell->True], Cell[504196, 10814, 14234, 208, 145, "Input",ExpressionUUID->"9f0cc23e-c7e3-4816-981c-62eacc75215f", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[518467, 11027, 378, 6, 46, "Subsection",ExpressionUUID->"e505a055-6236-49ba-88bc-9b4075b4f240", InitializationCell->True], Cell[518848, 11035, 19609, 343, 575, "Input",ExpressionUUID->"39cecadb-96f8-4479-b5c7-019becb2b201", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[538494, 11383, 383, 6, 46, "Subsection",ExpressionUUID->"f96e1dd6-07a7-4ad7-acd3-cc1da94b096e", InitializationCell->True], Cell[538880, 11391, 14511, 218, 124, "Input",ExpressionUUID->"02e84c34-68cc-4422-9a0f-4fcb555fe128", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[553428, 11614, 437, 7, 46, "Subsection",ExpressionUUID->"6fa600ec-bd9f-4db3-8ba7-a6ead366e9e4", InitializationCell->True], Cell[553868, 11623, 14090, 204, 124, "Input",ExpressionUUID->"1129d375-9937-4b0c-a8b4-b496026881e0", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[567995, 11832, 534, 8, 46, "Subsection",ExpressionUUID->"01b5306e-a024-43d3-a64b-7daaf3bdba65"], Cell[568532, 11842, 77924, 1363, 2209, "Input",ExpressionUUID->"e0c51d33-0184-40a1-9827-18a89d3fcc9b", InitializationCell->True], Cell[646459, 13207, 86684, 1517, 2889, "Input",ExpressionUUID->"1c57eba7-984b-454e-b945-0098caff056c"], Cell[733146, 14726, 87072, 1665, 4412, "Input",ExpressionUUID->"97bdb39f-7c6b-4373-b312-324f0332ee17"] }, Closed]], Cell[CellGroupData[{ Cell[820255, 16396, 532, 8, 46, "Subsection",ExpressionUUID->"5372c928-9605-4d37-8dc0-2d0c8517e463"], Cell[820790, 16406, 388303, 7476, 22777, "Input",ExpressionUUID->"ce13df80-681c-4976-9bbc-0695ad8c1e09", InitializationCell->True] }, Open ]], Cell[CellGroupData[{ Cell[1209130, 23887, 454, 7, 67, "Subsection",ExpressionUUID->"ca6c0971-8260-4bb1-aed4-43cf882f4a24", InitializationCell->True], Cell[1209587, 23896, 14279, 208, 145, "Input",ExpressionUUID->"cf106cfb-02c3-458f-a432-09bbaa6702d5", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[1223903, 24109, 357, 5, 46, "Subsection",ExpressionUUID->"05313855-32eb-45b1-825b-7f813b0b51be"], Cell[1224263, 24116, 91325, 1708, 2880, "Input",ExpressionUUID->"c601cabf-ce99-413e-9d60-665ffda487a5", InitializationCell->True], Cell[1315591, 25826, 84840, 1570, 2494, "Input",ExpressionUUID->"941f9c1e-0467-48c8-a088-ebccd20fd09e"], Cell[1400434, 27398, 169697, 3471, 8593, "Input",ExpressionUUID->"3eb15a26-d9b4-475e-816a-3761c48eca68"] }, Closed]], Cell[CellGroupData[{ Cell[1570168, 30874, 302, 5, 46, "Subsection",ExpressionUUID->"79ff8809-dd23-4702-9a6a-3bf6de8d911d"], Cell[1570473, 30881, 69257, 1218, 1876, "Input",ExpressionUUID->"1bfa20c4-e333-4b90-a6c2-b60816a7d438", InitializationCell->True], Cell[1639733, 32101, 58291, 986, 1497, "Input",ExpressionUUID->"5cd6d089-820c-43b2-af82-711b1fa800d9"] }, Open ]], Cell[CellGroupData[{ Cell[1698061, 33092, 584, 8, 67, "Subsection",ExpressionUUID->"b67e0cca-173f-4918-86e0-d212f0f8e753"], Cell[1698648, 33102, 46850, 650, 100, "Input",ExpressionUUID->"a61aa1e5-6c40-42e7-970e-48534fc1b8b4", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[1745535, 33757, 328, 5, 46, "Subsection",ExpressionUUID->"3f6bc05e-9d59-4b45-adb6-280037b626c8"], Cell[1745866, 33764, 420036, 9117, 24115, "Input",ExpressionUUID->"edd5553b-5fa9-4254-bbf0-238a178b7cff"] }, Closed]], Cell[CellGroupData[{ Cell[2165939, 42886, 480, 7, 46, "Subsection",ExpressionUUID->"3fec6ff7-868f-42b4-8b18-e46b6a7b1cab"], Cell[2166422, 42895, 23854, 428, 593, "Input",ExpressionUUID->"d11ac109-89e5-4d86-9842-7be03bb4725f"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[2190325, 43329, 1060, 17, 65, "Section",ExpressionUUID->"9827d023-eddb-4909-b805-26e15433ab72"], Cell[CellGroupData[{ Cell[2191410, 43350, 224, 4, 67, "Subsection",ExpressionUUID->"29461c8d-0ff5-4fc7-8c1d-e70d2a164dd7"], Cell[2191637, 43356, 59434, 1320, 3534, "Input",ExpressionUUID->"1f23d366-38cf-4fdd-8e27-a7ba9a73dc22", InitializationCell->True], Cell[2251074, 44678, 110372, 2579, 7848, "Input",ExpressionUUID->"35612e81-b0f0-4445-800a-eeda8ead9d4a"] }, Closed]], Cell[CellGroupData[{ Cell[2361483, 47262, 505, 8, 46, "Subsection",ExpressionUUID->"84a1810e-3f34-4e4b-9ab1-7e94b4cdf330", InitializationCell->True], Cell[2361991, 47272, 14335, 209, 145, "Input",ExpressionUUID->"84fc137a-1814-43a0-a99f-cdc83ec44e91", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[2376363, 47486, 275, 4, 46, "Subsection",ExpressionUUID->"20f297b3-bf2f-4515-b6ee-092700415b39"], Cell[2376641, 47492, 41256, 865, 2151, "Input",ExpressionUUID->"4d4c97f9-892f-4657-adc0-8db844da1157", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[2417934, 48362, 227, 4, 46, "Subsection",ExpressionUUID->"ed41aa29-22c7-4d0d-84b2-1f8337f98b20"], Cell[2418164, 48368, 31368, 632, 1532, "Input",ExpressionUUID->"423f3769-3340-4f19-82a7-b53b039cf05d", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[2449569, 49005, 274, 4, 46, "Subsection",ExpressionUUID->"0a8784d4-503a-4d3c-b7df-91232860acda"], Cell[2449846, 49011, 19880, 324, 431, "Input",ExpressionUUID->"b35a9185-8750-4656-a44e-028f90a52a2d", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[2469763, 49340, 307, 5, 46, "Subsection",ExpressionUUID->"4a83d903-fff4-4744-aa7e-a18a3e82ec90"], Cell[2470073, 49347, 33019, 675, 1580, "Input",ExpressionUUID->"840e941d-81a2-4261-a512-1ef088e26675", InitializationCell->True], Cell[2503095, 50024, 24098, 452, 889, "Input",ExpressionUUID->"94be9ac1-804c-4c21-bfe9-f24914de4b8b"] }, Closed]], Cell[CellGroupData[{ Cell[2527230, 50481, 226, 4, 46, "Subsection",ExpressionUUID->"ea1acd62-479c-4ad6-824b-7b581beec004"], Cell[2527459, 50487, 30499, 619, 1440, "Input",ExpressionUUID->"23c44407-89d7-49c3-8402-db98f08de967", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[2557995, 51111, 330, 5, 46, "Subsection",ExpressionUUID->"86fd674a-5cf8-425e-9838-f6b1c24994b0"], Cell[2558328, 51118, 95687, 1815, 4167, "Input",ExpressionUUID->"1268ceed-469b-40e1-868a-eeb97f8bcf68", InitializationCell->True], Cell[2654018, 52935, 235983, 5434, 17042, "Input",ExpressionUUID->"d990fa64-d965-4e29-9c59-b5555456e043"] }, Closed]], Cell[CellGroupData[{ Cell[2890038, 58374, 527, 8, 46, "Subsection",ExpressionUUID->"04462f9f-e715-4713-8a04-a5c3d934cd66", InitializationCell->True], Cell[2890568, 58384, 14385, 210, 145, "Input",ExpressionUUID->"0eff7b2c-7b11-4884-baf9-c3916ffec121", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[2904990, 58599, 381, 6, 46, "Subsection",ExpressionUUID->"16424e4c-b557-40ab-a156-4211ca37baa7"], Cell[2905374, 58607, 62634, 1051, 1650, "Input",ExpressionUUID->"3f23569e-19b7-498c-90fe-ac251be3f35d", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[2968045, 59663, 429, 6, 46, "Subsection",ExpressionUUID->"45ebb470-e7a9-441d-bef7-8be05910bc1d"], Cell[2968477, 59671, 66219, 1105, 1630, "Input",ExpressionUUID->"117c0ca4-532b-4c80-b984-5aae860e39e2", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[3034733, 60781, 199, 3, 46, "Subsection",ExpressionUUID->"410f6a81-8c7a-41cd-94e3-8503e0e4f664"], Cell[3034935, 60786, 122705, 2357, 5478, "Input",ExpressionUUID->"714e8f10-d6ae-4aae-9c9b-1edf0cec46c5", InitializationCell->True], Cell[3157643, 63145, 27103, 655, 1969, "Input",ExpressionUUID->"93793ff8-843b-44a4-ae78-021f7fa68b70"], Cell[3184749, 63802, 81493, 1394, 2109, "Input",ExpressionUUID->"ad5cd93e-7679-404b-95f5-f8587e8e8f84"], Cell[3266245, 65198, 65431, 1087, 1514, "Input",ExpressionUUID->"36da5ee8-c081-4034-82cc-77b43ee6cf2c"], Cell[3331679, 66287, 88996, 1920, 5616, "Input",ExpressionUUID->"88c3f936-3b11-434c-bb05-97e011bf5282"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[3420724, 68213, 1058, 17, 65, "Section",ExpressionUUID->"ccf8b197-f437-4be7-a518-6e1f1f2ea080"], Cell[CellGroupData[{ Cell[3421807, 68234, 279, 4, 62, "Subsection",ExpressionUUID->"6bf300f2-b919-4630-b02f-5e8f2a256dfd"], Cell[3422089, 68240, 55595, 1220, 3810, "Input",ExpressionUUID->"8c877f05-ab7f-4546-96d0-9f87dcd7faf5", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[3477721, 69465, 583, 9, 40, "Subsection",ExpressionUUID->"77210dc9-9440-4101-86c4-8373a5004ce6", InitializationCell->True], Cell[3478307, 69476, 14437, 210, 145, "Input",ExpressionUUID->"20a8e7b5-46a0-428a-a7ca-ea695f616c57", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[3492781, 69691, 253, 4, 40, "Subsection",ExpressionUUID->"640869b2-f9d5-43c0-94d5-f8518fe4e81a"], Cell[3493037, 69697, 43164, 930, 2524, "Input",ExpressionUUID->"9917111a-b82b-483a-b43a-888e173b84e8", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[3536238, 70632, 277, 4, 40, "Subsection",ExpressionUUID->"5b9b2344-6d28-41c7-a30d-1943c6764594"], Cell[3536518, 70638, 27918, 546, 1289, "Input",ExpressionUUID->"7a3e4ae7-d95b-47bb-85dd-24623cf64400", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[3564473, 71189, 303, 5, 40, "Subsection",ExpressionUUID->"2201b58f-dad0-41eb-9809-747a032c8c90"], Cell[3564779, 71196, 27703, 543, 1267, "Input",ExpressionUUID->"af03442a-e0f0-45b5-b640-b53fb5e99224", InitializationCell->True], Cell[3592485, 71741, 98753, 2322, 8142, "Input",ExpressionUUID->"e1dec4b3-4115-45d3-be49-0be3b9702bd9"] }, Closed]], Cell[CellGroupData[{ Cell[3691275, 74068, 269, 4, 40, "Subsection",ExpressionUUID->"f6cfb6ce-9abf-4d3e-b8c0-ef164529365e"], Cell[3691547, 74074, 114123, 2663, 5835, "Input",ExpressionUUID->"491bae6e-a5df-4b54-83fe-c75123523470"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[3805719, 76743, 1057, 17, 65, "Section",ExpressionUUID->"657d6ff8-7686-44a2-b63b-fef1894f6835"], Cell[CellGroupData[{ Cell[3806801, 76764, 239, 4, 62, "Subsection",ExpressionUUID->"9a0b5f7d-b858-4edd-bcd6-6d923bcb25ae"], Cell[3807043, 76770, 37963, 796, 2881, "Input",ExpressionUUID->"9827ba0c-f14a-44a8-a693-bdba463b97ad", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[3845043, 77571, 314, 5, 40, "Subsection",ExpressionUUID->"d99e426c-6455-459f-b463-1d4642751703"], Cell[3845360, 77578, 16529, 274, 381, "Input",ExpressionUUID->"3f4dd650-a4b6-418a-9799-78367e3945b1", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[3861926, 77857, 236, 4, 40, "Subsection",ExpressionUUID->"c021cc63-b183-4f96-8540-adfef1ccd063"], Cell[3862165, 77863, 29500, 613, 1862, "Input",ExpressionUUID->"a26deb09-9e51-4dbf-acba-0dffcb8dacec", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[3891702, 78481, 210, 4, 40, "Subsection",ExpressionUUID->"02c99945-5048-4fc6-90b3-fe31246f5f65"], Cell[3891915, 78487, 25210, 477, 1239, "Input",ExpressionUUID->"046f5f3b-31d4-41a0-9a97-ff1a42c41e38", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[3917162, 78969, 308, 5, 40, "Subsection",ExpressionUUID->"eed16c42-4b72-40f7-933a-709d06a62f0f"], Cell[3917473, 78976, 28119, 576, 1527, "Input",ExpressionUUID->"33d30078-cc3d-4d5c-a4e8-d5dbdede8fdd", InitializationCell->True], Cell[3945595, 79554, 3387, 93, 316, "Input",ExpressionUUID->"01855d71-763c-460a-b439-176235fd4af7"] }, Closed]], Cell[CellGroupData[{ Cell[3949019, 79652, 314, 5, 40, "Subsection",ExpressionUUID->"3b20f4a3-9a10-4b9f-838d-56dbb413c268"], Cell[3949336, 79659, 14252, 221, 217, "Input",ExpressionUUID->"a143894d-97eb-4fc0-9a36-2d93d0212ba8", InitializationCell->True] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[3963637, 79886, 1007, 16, 65, "Section",ExpressionUUID->"d1b2a4b7-b851-477f-bec8-f9861ea8da3e"], Cell[CellGroupData[{ Cell[3964669, 79906, 431, 7, 67, "Subsection",ExpressionUUID->"ffeac167-9361-4429-95a4-0272e369e589"], Cell[3965103, 79915, 19552, 469, 1606, "Input",ExpressionUUID->"649234a4-34ab-42d1-a5e4-6f7bf669327e", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[3984692, 80389, 86, 0, 46, "Subsection",ExpressionUUID->"008c559b-cf80-4a8c-b950-b9601f7ba0b6"], Cell[3984781, 80391, 15190, 404, 1118481054, "Input",ExpressionUUID->"63ee557b-078f-4e76-a040-efcb45c49c52", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[4000008, 80800, 163, 3, 46, "Subsection",ExpressionUUID->"35f9c0f9-59f8-4daa-bbce-6d9e5feb8eca"], Cell[4000174, 80805, 149107, 3561, 10996, "Input",ExpressionUUID->"42d273ec-45a6-4362-beeb-c92eb51e9932", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[4149318, 84371, 214, 4, 46, "Subsection",ExpressionUUID->"a68cf54f-3908-4207-b6c2-e2fb00414d9f"], Cell[4149535, 84377, 22240, 487, 1624, "Input",ExpressionUUID->"1306deec-76f6-46a2-93e3-831fdf4aa5f9", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[4171812, 84869, 316, 5, 46, "Subsection",ExpressionUUID->"ec2c7712-6aa8-458d-8e5f-914811d43f19"], Cell[4172131, 84876, 16363, 356, 1179, "Input",ExpressionUUID->"28919976-0232-4a4a-92be-b11521f57c6f", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[4188531, 85237, 362, 6, 46, "Subsection",ExpressionUUID->"05d1a658-f72c-486f-8e29-1c0c62b4a747"], Cell[4188896, 85245, 11181, 244, 1118481054, "Input",ExpressionUUID->"f4a53cb2-aa33-4e7e-9481-fa85a4104ee5", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[4200114, 85494, 219, 4, 46, "Subsection",ExpressionUUID->"ba47b52f-9cc2-4be0-8141-e1ab59eca28a"], Cell[4200336, 85500, 32333, 640, 3118, "Input",ExpressionUUID->"54f77baf-834d-40bc-962c-1df46c275e82", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[4232706, 86145, 271, 4, 46, "Subsection",ExpressionUUID->"923244d4-cd19-419f-84b5-91ad3160cf11"], Cell[4232980, 86151, 74157, 1703, 5409, "Input",ExpressionUUID->"6ecadde8-ad0e-42ff-a3d9-ff07b146b3fd", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[4307174, 87859, 86, 0, 46, "Subsection",ExpressionUUID->"3d4d5ab8-5457-4359-9752-7ace1683ea66"], Cell[4307263, 87861, 49163, 1259, 4302, "Input",ExpressionUUID->"077b31cc-233b-4faf-af08-b1fe74f0d421"] }, Closed]], Cell[CellGroupData[{ Cell[4356463, 89125, 438, 7, 46, "Subsection",ExpressionUUID->"0cf95315-5399-437e-b49e-c54ac4203061"], Cell[4356904, 89134, 69579, 1759, 4803, "Input",ExpressionUUID->"9fb3c6dd-bdc9-4023-ac32-c5ef1cb7aca5", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[4426520, 90898, 416, 6, 46, "Subsection",ExpressionUUID->"160ac8b6-0f7a-49c6-a200-2b47d976864a"], Cell[4426939, 90906, 105400, 2758, 8987, "Input",ExpressionUUID->"a5147753-f023-4240-ab92-c832e4ae5a97", InitializationCell->True], Cell[4532342, 93666, 35368, 792, 2705, "Input",ExpressionUUID->"8307f05d-cacc-43b0-a667-951101fb4a88", InitializationCell->True], Cell[4567713, 94460, 14596, 244, 506, "Input",ExpressionUUID->"50704ae4-b225-41d4-9b74-1eae9c894d7d", InitializationCell->True] }, Closed]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[4582370, 94711, 883, 14, 88, "Title",ExpressionUUID->"ff4fd310-395d-483b-a385-9262eaf541db"], Cell[CellGroupData[{ Cell[4583278, 94729, 1215, 17, 67, "Subsection",ExpressionUUID->"1c2ad8e4-55df-4d57-9f3c-d5df39881552"], Cell[4584496, 94748, 48417, 799, 280, "Input",ExpressionUUID->"a0c4ff3a-3e33-4a9d-ac5b-9ef3cb4364e7"], Cell[4632916, 95549, 4109, 103, 428, "Input",ExpressionUUID->"d8f1317d-d14e-4729-aa68-571e856ce307"] }, Closed]], Cell[CellGroupData[{ Cell[4637062, 95657, 1280, 18, 46, "Subsection",ExpressionUUID->"55e4f9da-9f26-4426-b3ca-c2eaf1561303"], Cell[4638345, 95677, 467, 8, 35, "Input",ExpressionUUID->"351ed351-a109-4211-8056-73a3d14714f0"] }, Closed]], Cell[CellGroupData[{ Cell[4638849, 95690, 1326, 19, 46, "Subsection",ExpressionUUID->"91363db0-9e12-41a1-9dc6-4b2a2ed40703"], Cell[4640178, 95711, 561, 9, 35, "Input",ExpressionUUID->"fa8ac702-ecb2-46fe-b6dd-abee06bf34d1"] }, Closed]], Cell[CellGroupData[{ Cell[4640776, 95725, 1381, 20, 46, "Subsection",ExpressionUUID->"5068d9e7-3d74-4f0c-8917-35f620b3d606"], Cell[4642160, 95747, 276, 6, 35, "Input",ExpressionUUID->"0a958e5d-178a-4fbb-9bee-e75538197c4d"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[4642485, 95759, 927, 14, 88, "Title",ExpressionUUID->"a4d07bda-386c-4147-8949-2d16a7e38fc2"], Cell[CellGroupData[{ Cell[4643437, 95777, 1339, 19, 67, "Subsection",ExpressionUUID->"26a0e207-cdc1-4165-8be3-adf109f96469"], Cell[CellGroupData[{ Cell[4644801, 95800, 266, 4, 56, "Subsubsection",ExpressionUUID->"beff35e0-db9c-4115-83a5-fe3bd9c72370"], Cell[4645070, 95806, 2310, 40, 56, "Input",ExpressionUUID->"82b3efc2-6bb9-4e06-a831-a581297e9cd5"], Cell[4647383, 95848, 2723, 50, 56, "Input",ExpressionUUID->"220b5cf6-939b-4624-82fc-1d448a11a7d2"], Cell[4650109, 95900, 3063, 59, 56, "Input",ExpressionUUID->"db6e53ee-3185-4c35-a060-4c2c3960cadb"] }, Closed]], Cell[CellGroupData[{ Cell[4653209, 95964, 270, 4, 45, "Subsubsection",ExpressionUUID->"cdd99db5-8666-4302-8515-913bb1a6313b"], Cell[4653482, 95970, 694, 20, 56, "Input",ExpressionUUID->"1725c647-4f9c-49d0-a45b-a8ea26e92db3"] }, Closed]], Cell[CellGroupData[{ Cell[4654213, 95995, 320, 5, 45, "Subsubsection",ExpressionUUID->"deaa1804-8901-4753-b24f-eefcd2c5135b"], Cell[4654536, 96002, 1049, 29, 107, "Input",ExpressionUUID->"ebd79481-f6b0-43a0-ab31-430e97161f6d"] }, Closed]], Cell[CellGroupData[{ Cell[4655622, 96036, 326, 5, 45, "Subsubsection",ExpressionUUID->"b62ccebe-0bd1-47e2-89fb-e72a041260aa"], Cell[4655951, 96043, 986, 24, 56, "Input",ExpressionUUID->"b131437e-cf1b-4c1f-abed-aace00b2891c"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[4656986, 96073, 1399, 20, 46, "Subsection",ExpressionUUID->"efd0b1df-98d3-429f-9f61-0554e5b7fda7"], Cell[CellGroupData[{ Cell[4658410, 96097, 268, 4, 56, "Subsubsection",ExpressionUUID->"2f6bd55d-333f-45fe-bb20-912ec7ed2edf"], Cell[4658681, 96103, 2556, 43, 31, "Input",ExpressionUUID->"1761ef45-e737-40c4-bb87-617517283619"] }, Closed]], Cell[CellGroupData[{ Cell[4661274, 96151, 282, 4, 45, "Subsubsection",ExpressionUUID->"8274c0a0-4338-4bbc-97c8-b1f410862c2d"], Cell[4661559, 96157, 2327, 61, 108, "Input",ExpressionUUID->"b6aa2776-54a6-460b-a154-ed882c8b2d3c"] }, Closed]], Cell[CellGroupData[{ Cell[4663923, 96223, 418, 6, 45, "Subsubsection",ExpressionUUID->"38381475-c1e0-49fa-b66e-3a2e159443d8"], Cell[4664344, 96231, 2466, 65, 150, "Input",ExpressionUUID->"b2d2e567-805d-4daa-b55f-96e2e0f89a05"] }, Closed]], Cell[CellGroupData[{ Cell[4666847, 96301, 372, 6, 45, "Subsubsection",ExpressionUUID->"16d8b5fc-c220-45ce-96b6-b5d2a9ae6b97"], Cell[4667222, 96309, 4852, 108, 85, "Input",ExpressionUUID->"b9bf1c07-b634-412f-b557-607cf36ba9b3"] }, Closed]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[4672135, 96424, 688, 11, 88, "Title",ExpressionUUID->"662fb6d2-1542-4110-a411-74af252f2ddf"], Cell[CellGroupData[{ Cell[4672848, 96439, 1041, 15, 67, "Subsection",ExpressionUUID->"44d3756d-7928-4bfe-8691-d3a11e8f50ca"], Cell[CellGroupData[{ Cell[4673914, 96458, 661, 9, 56, "Subsubsection",ExpressionUUID->"77046139-e971-4f72-9fa0-ff643348e08e"], Cell[CellGroupData[{ Cell[4674600, 96471, 6793, 150, 392, "Input",ExpressionUUID->"d18f22c0-e634-4475-a194-898b117fce72"], Cell[4681396, 96623, 5905, 171, 280, "Output",ExpressionUUID->"b6077496-bf8b-4bf0-80f9-98aff1e602fe"], Cell[4687304, 96796, 1125, 34, 96, "Output",ExpressionUUID->"bd7bfdce-1932-4254-ae3e-fbcd742bbd4d"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[4688478, 96836, 689, 10, 45, "Subsubsection",ExpressionUUID->"8d1c9a9e-cf7e-495e-a89b-2f2dfa8e76d9"], Cell[4689170, 96848, 5586, 113, 297, "Input",ExpressionUUID->"74a282c9-dbdf-42c1-bc90-eb641d708739"] }, Closed]], Cell[CellGroupData[{ Cell[4694793, 96966, 641, 9, 45, "Subsubsection",ExpressionUUID->"b43d2788-23c9-4e1c-8556-0e634c7e8537"], Cell[4695437, 96977, 1609834, 26396, 336, "Input",ExpressionUUID->"52567fb8-8335-44b5-8fd3-24d98b58ce41"], Cell[6305274, 123375, 5122, 117, 346, "Input",ExpressionUUID->"06749b51-4c55-4da0-bc75-3eeea2112fb0"] }, Closed]], Cell[CellGroupData[{ Cell[6310433, 123497, 641, 9, 45, "Subsubsection",ExpressionUUID->"45f28a15-b454-4ee2-8c91-53218377cd97"], Cell[6311077, 123508, 133986, 2202, 344, "Input",ExpressionUUID->"979c756d-f72a-4a05-bcd8-b7aaf69937f0"], Cell[6445066, 125712, 3732, 90, 459, "Input",ExpressionUUID->"db707e5f-591f-4855-acc2-49096d8e3c4f"] }, Closed]], Cell[CellGroupData[{ Cell[6448835, 125807, 1299, 18, 45, "Subsubsection",ExpressionUUID->"ca977ddc-4dc9-4a99-bb79-5080699989d4"], Cell[6450137, 125827, 83190, 1369, 324, "Input",ExpressionUUID->"0f12bf4c-be65-48f5-90af-d1502c9c3470"], Cell[6533330, 127198, 4816, 135, 565, "Input",ExpressionUUID->"cff39718-ccfd-41a6-89f4-18a129fdd102"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[6538195, 127339, 950, 13, 46, "Subsection",ExpressionUUID->"e57f6dce-b481-4cd3-af1e-5887166e6535"], Cell[CellGroupData[{ Cell[6539170, 127356, 455, 7, 56, "Subsubsection",ExpressionUUID->"ac6db227-cad1-471e-a9b7-d81d2315ce45"], Cell[6539628, 127365, 5167, 106, 274, "Input",ExpressionUUID->"483baa6e-acb8-4f27-85f9-f45be5521345"] }, Closed]], Cell[CellGroupData[{ Cell[6544832, 127476, 485, 8, 45, "Subsubsection",ExpressionUUID->"3c96428d-d680-4b67-bb90-11251429a47c"], Cell[6545320, 127486, 5329, 101, 230, "Input",ExpressionUUID->"861c745d-9e05-4717-b1a7-b06eb7ae4fa7"] }, Closed]], Cell[CellGroupData[{ Cell[6550686, 127592, 480, 8, 45, "Subsubsection",ExpressionUUID->"4f9bdede-e333-45a9-a6fe-45d4b8e8eee7"], Cell[6551169, 127602, 3094, 80, 274, "Input",ExpressionUUID->"e838b4dc-83fb-4c82-bcf9-99e8cc90e6b3"] }, Closed]], Cell[CellGroupData[{ Cell[6554300, 127687, 450, 7, 45, "Subsubsection",ExpressionUUID->"d8b19f04-6789-4d09-a201-2fa75b54d764"], Cell[6554753, 127696, 4658, 92, 253, "Input",ExpressionUUID->"5f45d505-1ad8-4048-ae25-030194ab6a69"] }, Closed]], Cell[CellGroupData[{ Cell[6559448, 127793, 481, 8, 45, "Subsubsection",ExpressionUUID->"46035535-b76c-4219-8f83-366bcafbefd6"], Cell[6559932, 127803, 3540, 91, 333, "Input",ExpressionUUID->"521601c3-aebc-40bf-9757-e783c91b0196"] }, Closed]], Cell[CellGroupData[{ Cell[6563509, 127899, 705, 10, 45, "Subsubsection",ExpressionUUID->"ab952dcb-b25f-448e-b30e-94af7d232626"], Cell[6564217, 127911, 4055, 101, 319, "Input",ExpressionUUID->"397dbb35-c74e-49bf-842c-02bd70a95eee"] }, Closed]], Cell[CellGroupData[{ Cell[6568309, 128017, 539, 8, 45, "Subsubsection",ExpressionUUID->"a798d9ba-06b4-43a5-9640-6b2a1bd7068c"], Cell[6568851, 128027, 3623, 88, 274, "Input",ExpressionUUID->"ff8b8a78-adc1-4f7b-8059-023cae0034e7"] }, Closed]], Cell[CellGroupData[{ Cell[6572511, 128120, 869, 12, 45, "Subsubsection",ExpressionUUID->"646251c6-9b4e-4f2d-b6f0-5be710d8eb7c"], Cell[6573383, 128134, 3936, 95, 319, "Input",ExpressionUUID->"f8a7de49-96b9-47a4-a378-90baebf78a52"] }, Closed]], Cell[CellGroupData[{ Cell[6577356, 128234, 621, 9, 45, "Subsubsection",ExpressionUUID->"57b7b91f-ded1-4700-9e57-f1c3373c53e9"], Cell[6577980, 128245, 3147, 74, 252, "Input",ExpressionUUID->"0d60fba6-0116-48b8-95a5-a13112bced19"] }, Closed]], Cell[CellGroupData[{ Cell[6581164, 128324, 699, 10, 45, "Subsubsection",ExpressionUUID->"2155eafe-aa93-475a-97b7-261c1d0b4817"], Cell[6581866, 128336, 5066, 123, 340, "Input",ExpressionUUID->"1f2d5c25-9165-4e9e-b6f9-73a30b856bc0"] }, Closed]], Cell[CellGroupData[{ Cell[6586969, 128464, 808, 11, 45, "Subsubsection",ExpressionUUID->"6ce24b03-48ba-43e4-90bf-a8d3101ec791"], Cell[6587780, 128477, 3310, 77, 252, "Input",ExpressionUUID->"da070766-924f-45e4-b55f-eb70f0022214"] }, Closed]], Cell[CellGroupData[{ Cell[6591127, 128559, 609, 9, 45, "Subsubsection",ExpressionUUID->"17a98cbd-db5d-40e2-bfbc-78858f27aaed"], Cell[6591739, 128570, 4184, 101, 297, "Input",ExpressionUUID->"d74d738c-ba27-48c5-a341-1aa8e5f42489"] }, Closed]], Cell[CellGroupData[{ Cell[6595960, 128676, 891, 12, 45, "Subsubsection",ExpressionUUID->"7eae0b88-c2a1-4f99-b058-a42548d64d79"], Cell[6596854, 128690, 3099, 68, 164, "Input",ExpressionUUID->"2725262e-7cac-4fc4-b4f7-6ef30fbad0ee"] }, Closed]], Cell[CellGroupData[{ Cell[6599990, 128763, 622, 9, 45, "Subsubsection",ExpressionUUID->"f2619011-0099-44aa-a112-bd0888a70a31"], Cell[6600615, 128774, 3851, 96, 274, "Input",ExpressionUUID->"4f3a6059-85df-478b-97b7-343c77c0b241"] }, Closed]], Cell[CellGroupData[{ Cell[6604503, 128875, 731, 10, 45, "Subsubsection",ExpressionUUID->"3f61a77a-69e7-4f30-89a4-6e05e3d3f544"], Cell[6605237, 128887, 4011, 99, 297, "Input",ExpressionUUID->"6aada1bd-c708-45ac-93d8-9799c17fb40d"] }, Closed]], Cell[CellGroupData[{ Cell[6609285, 128991, 588, 9, 45, "Subsubsection",ExpressionUUID->"a0549c96-a398-4b94-b874-1c2a458232b4"], Cell[6609876, 129002, 2782, 68, 252, "Input",ExpressionUUID->"1eb18e35-e94c-4718-8482-218c256c0cbb"] }, Closed]], Cell[CellGroupData[{ Cell[6612695, 129075, 590, 9, 45, "Subsubsection",ExpressionUUID->"790dafde-4d7d-449c-ba92-f169ce7c9add"], Cell[6613288, 129086, 3399, 86, 321, "Input",ExpressionUUID->"e4b5eea6-4803-4720-8db8-3b8edf0ece07"] }, Closed]], Cell[CellGroupData[{ Cell[6616724, 129177, 792, 11, 45, "Subsubsection",ExpressionUUID->"d4146263-69e4-4ff6-bf66-568e61194b13"], Cell[6617519, 129190, 4283, 104, 368, "Input",ExpressionUUID->"eba8ee99-0861-4368-bbe0-16b5b8582d89"] }, Closed]], Cell[CellGroupData[{ Cell[6621839, 129299, 757, 11, 45, "Subsubsection",ExpressionUUID->"82267b86-1fd1-43e2-a101-67e6d3e75cbc"], Cell[6622599, 129312, 3108, 72, 225, "Input",ExpressionUUID->"34f53e1a-9bd2-4391-a615-3f81eb2c2f05"] }, Closed]], Cell[CellGroupData[{ Cell[6625744, 129389, 833, 12, 45, "Subsubsection",ExpressionUUID->"f2f5a1f1-6567-40ca-a243-3aa96b0564f9"], Cell[6626580, 129403, 4227, 101, 297, "Input",ExpressionUUID->"6c6dc9ea-b67c-4ae8-a69c-8e6c081d4127"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[6630856, 129510, 844, 12, 46, "Subsection",ExpressionUUID->"90110e2b-2bba-4fe1-ad63-fbb945a8861d"], Cell[CellGroupData[{ Cell[6631725, 129526, 583, 8, 56, "Subsubsection",ExpressionUUID->"04ec4067-2f90-4b8a-822a-c16840f1dadd"], Cell[6632311, 129536, 3601, 103, 392, "Input",ExpressionUUID->"3daf9c12-4dc0-4efa-a797-385d92db1da2"] }, Closed]], Cell[CellGroupData[{ Cell[6635949, 129644, 335, 5, 45, "Subsubsection",ExpressionUUID->"a2a54fc6-e682-4f91-8779-aa4ad4b609af"], Cell[6636287, 129651, 3136, 72, 226, "Input",ExpressionUUID->"2f47eb58-4030-4856-9411-3aece66167a8"] }, Closed]], Cell[CellGroupData[{ Cell[6639460, 129728, 385, 6, 45, "Subsubsection",ExpressionUUID->"cc7b3717-7417-496a-8f3d-3fb4704f6361"], Cell[6639848, 129736, 4334, 111, 369, "Input",ExpressionUUID->"aa61510f-0295-40bb-b7ce-f9d659a76512"] }, Closed]], Cell[CellGroupData[{ Cell[6644219, 129852, 498, 7, 45, "Subsubsection",ExpressionUUID->"af8f1778-ab40-45f7-8fab-04e831aa75fc"], Cell[6644720, 129861, 5290, 129, 345, "Input",ExpressionUUID->"ac37362a-58fa-4ae4-a461-758c70cdca67"] }, Closed]], Cell[CellGroupData[{ Cell[6650047, 129995, 332, 5, 45, "Subsubsection",ExpressionUUID->"1366a569-2c19-43a7-88b2-a5aff97dac26"], Cell[6650382, 130002, 3438, 89, 353, "Input",ExpressionUUID->"4d0166b0-9387-4bd7-89c0-076e550ce191"] }, Closed]], Cell[CellGroupData[{ Cell[6653857, 130096, 370, 6, 45, "Subsubsection",ExpressionUUID->"6344e062-11bf-4b4c-9819-a68f8723fc42"], Cell[6654230, 130104, 3381, 82, 274, "Input",ExpressionUUID->"43dbe5fe-dabe-4c97-a025-2571bf3000db"] }, Closed]], Cell[CellGroupData[{ Cell[6657648, 130191, 535, 8, 45, "Subsubsection",ExpressionUUID->"b096e6c6-845a-492c-a95a-4fb6317a5909"], Cell[6658186, 130201, 7822, 158, 377, "Input",ExpressionUUID->"8251b43c-716d-44cb-9233-f6b660c621bf"] }, Closed]], Cell[CellGroupData[{ Cell[6666045, 130364, 491, 8, 45, "Subsubsection",ExpressionUUID->"a543cc33-4336-458c-b9ac-38382bcc6270"], Cell[6666539, 130374, 5696, 131, 345, "Input",ExpressionUUID->"fc2d0584-5a25-40ce-81c7-0c31d1706b5e"] }, Closed]], Cell[CellGroupData[{ Cell[6672272, 130510, 528, 8, 45, "Subsubsection",ExpressionUUID->"8f056d97-bb18-4e32-95ff-cf93d0225084"], Cell[6672803, 130520, 6266, 156, 393, "Input",ExpressionUUID->"cdf1f289-c316-4a9f-82cf-8f0d6e0d6b69"] }, Closed]], Cell[CellGroupData[{ Cell[6679106, 130681, 390, 6, 45, "Subsubsection",ExpressionUUID->"9e959ea2-867d-4525-882b-d29e5e0dc1e2"], Cell[6679499, 130689, 4120, 105, 401, "Input",ExpressionUUID->"9ef4f1ca-b072-4104-aced-6fa259c0807b"] }, Closed]], Cell[CellGroupData[{ Cell[6683656, 130799, 415, 7, 45, "Subsubsection",ExpressionUUID->"a7855b87-1ae7-4316-a2ce-b4bd78a4299d"], Cell[6684074, 130808, 4087, 99, 353, "Input",ExpressionUUID->"551071de-b6ed-44ef-9cb5-e69458ea2268"] }, Closed]], Cell[CellGroupData[{ Cell[6688198, 130912, 538, 8, 45, "Subsubsection",ExpressionUUID->"1d3efc12-5fa4-4c21-964c-eb635efd5985"], Cell[6688739, 130922, 4181, 109, 387, "Input",ExpressionUUID->"44fbae9f-4eaa-46bb-92bf-94172ce4786a"] }, Closed]], Cell[CellGroupData[{ Cell[6692957, 131036, 381, 6, 45, "Subsubsection",ExpressionUUID->"69deffae-3ee5-46de-a1e7-7ca7074aa3c7"], Cell[6693341, 131044, 5606, 147, 483, "Input",ExpressionUUID->"b1da8e1b-33a8-4ac5-bbcb-66e4dca7d5fa"] }, Closed]], Cell[CellGroupData[{ Cell[6698984, 131196, 309, 5, 45, "Subsubsection",ExpressionUUID->"34075cb1-343c-460a-88c4-68ec0be886b4"], Cell[6699296, 131203, 4567, 117, 435, "Input",ExpressionUUID->"f0249bc9-fd9b-48c5-96c0-c59262c1a265"] }, Closed]], Cell[CellGroupData[{ Cell[6703900, 131325, 337, 6, 45, "Subsubsection",ExpressionUUID->"2ecac3f2-aa6f-4ad4-870f-9b8b101e5711"], Cell[6704240, 131333, 6393, 170, 607, "Input",ExpressionUUID->"3fb9607b-d3e9-4d08-87bd-7a07c360ecb9"] }, Closed]], Cell[CellGroupData[{ Cell[6710670, 131508, 581, 8, 45, "Subsubsection",ExpressionUUID->"b19a534b-2312-4895-849e-69e797be3684"], Cell[6711254, 131518, 4177, 103, 321, "Input",ExpressionUUID->"b236ba7e-762b-4859-8461-9e7a328c2d40"] }, Closed]], Cell[CellGroupData[{ Cell[6715468, 131626, 760, 11, 45, "Subsubsection",ExpressionUUID->"24e2890b-0a21-4cc4-9fc8-456ed897be58"], Cell[6716231, 131639, 5222, 114, 321, "Input",ExpressionUUID->"dc895954-169a-4750-915b-f41ccda83ab0"] }, Closed]], Cell[CellGroupData[{ Cell[6721490, 131758, 779, 11, 45, "Subsubsection",ExpressionUUID->"c3667a68-e7ca-4291-ac9d-18e6c38e4d5f"], Cell[6722272, 131771, 3386, 92, 321, "Input",ExpressionUUID->"b776746e-6d49-4706-9119-39097822d53f"] }, Closed]], Cell[CellGroupData[{ Cell[6725695, 131868, 684, 10, 45, "Subsubsection",ExpressionUUID->"51d131ee-67a9-4636-ad9d-13a98091f5d8"], Cell[6726382, 131880, 4453, 105, 321, "Input",ExpressionUUID->"ff57579f-0e2f-4e31-bcea-67385387fd87"] }, Closed]], Cell[CellGroupData[{ Cell[6730872, 131990, 832, 12, 45, "Subsubsection",ExpressionUUID->"7d514fff-755c-4326-b3ec-de636c4f38e0"], Cell[6731707, 132004, 3478, 91, 321, "Input",ExpressionUUID->"989079bc-533a-4008-80a6-d713153961a5"] }, Closed]], Cell[CellGroupData[{ Cell[6735222, 132100, 412, 7, 45, "Subsubsection",ExpressionUUID->"057d9994-ce67-4ba2-a08b-e7b213affa90"], Cell[6735637, 132109, 4499, 107, 364, "Input",ExpressionUUID->"ae24aa20-f777-4f79-bdb4-5ec5debd5f88"] }, Closed]], Cell[CellGroupData[{ Cell[6740173, 132221, 796, 11, 45, "Subsubsection",ExpressionUUID->"31d3c914-ad8c-4041-8d85-4116b386c82c"], Cell[6740972, 132234, 3612, 94, 321, "Input",ExpressionUUID->"d7cab793-9905-42f1-8bae-49952542829c"] }, Closed]], Cell[CellGroupData[{ Cell[6744621, 132333, 877, 12, 45, "Subsubsection",ExpressionUUID->"f2346b90-9287-409f-9ef4-6a1ce3467767"], Cell[6745501, 132347, 4133, 109, 401, "Input",ExpressionUUID->"5ea9fcfc-5960-473f-9878-186ad9c8c6b8"] }, Closed]], Cell[CellGroupData[{ Cell[6749671, 132461, 457, 7, 45, "Subsubsection",ExpressionUUID->"c0f72b1a-59d4-4e57-8c89-28180830e03b"], Cell[6750131, 132470, 6735, 172, 528, "Input",ExpressionUUID->"27c1d618-1a89-4f59-bd85-e6706f88a1df"] }, Closed]], Cell[CellGroupData[{ Cell[6756903, 132647, 691, 10, 45, "Subsubsection",ExpressionUUID->"6dfb6ecf-dccb-445a-bd3e-e6d0ba488d83"], Cell[6757597, 132659, 3645, 85, 226, "Input",ExpressionUUID->"20285591-8fb7-4e30-b96e-1959c482c6c9"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[6761291, 132750, 1156, 16, 46, "Subsection",ExpressionUUID->"0d9256a2-f7f3-431d-89f3-78bbf6e76aad"], Cell[CellGroupData[{ Cell[6762472, 132770, 540, 8, 56, "Subsubsection",ExpressionUUID->"d07d71e7-ee53-44b3-b0ce-b24f91dbe98c"], Cell[6763015, 132780, 4721, 119, 345, "Input",ExpressionUUID->"939bc06a-f7a7-4a96-9759-92f73f9075c9"] }, Closed]], Cell[CellGroupData[{ Cell[6767773, 132904, 608, 9, 45, "Subsubsection",ExpressionUUID->"a0674658-5e89-4600-8319-12aa8cc67b4b"], Cell[6768384, 132915, 8566, 207, 535, "Input",ExpressionUUID->"323d8e92-b6e9-4d73-920d-0a1e9d4f99c8"] }, Closed]], Cell[CellGroupData[{ Cell[6776987, 133127, 630, 9, 45, "Subsubsection",ExpressionUUID->"3c603fd4-7e6f-4b2e-a51c-ab4a03e4f614"], Cell[6777620, 133138, 4056, 90, 224, "Input",ExpressionUUID->"8a129f1d-5ec0-45d7-96b6-650935aa1b15"] }, Closed]], Cell[CellGroupData[{ Cell[6781713, 133233, 654, 10, 45, "Subsubsection",ExpressionUUID->"44ed863c-5080-474d-95d6-9c148cac3f55"], Cell[6782370, 133245, 4837, 119, 295, "Input",ExpressionUUID->"687956f6-7506-4e7b-bf87-56cdfbb1f085"] }, Closed]], Cell[CellGroupData[{ Cell[6787244, 133369, 505, 8, 45, "Subsubsection",ExpressionUUID->"f76f760a-2a03-4ddd-a3c9-7cc25ceb4fab"], Cell[6787752, 133379, 11093, 272, 727, "Input",ExpressionUUID->"bad6c838-7a3f-49c8-8104-a6e70be4cdbc"] }, Closed]], Cell[CellGroupData[{ Cell[6798882, 133656, 697, 10, 45, "Subsubsection",ExpressionUUID->"23ea6c7f-474e-4c6e-8b51-a45e2f8c7866"], Cell[6799582, 133668, 7078, 152, 416, "Input",ExpressionUUID->"5d3a9650-92bd-427c-9c8d-187c46056ca1"], Cell[6806663, 133822, 7254, 161, 440, "Input",ExpressionUUID->"d0dc6f00-9885-433b-b068-2f63e274f0d5"], Cell[6813920, 133985, 347, 9, 60, "Input",ExpressionUUID->"76a6f7fd-a82e-4e2a-8b30-3bda558afcb4"] }, Closed]], Cell[CellGroupData[{ Cell[6814304, 133999, 578, 9, 45, "Subsubsection",ExpressionUUID->"1c7baf83-e4c9-44bf-8b89-d48cac92465c"], Cell[6814885, 134010, 10014, 229, 607, "Input",ExpressionUUID->"ad75c77f-c7de-4ffc-ab58-89e712a9f392"] }, Closed]], Cell[CellGroupData[{ Cell[6824936, 134244, 762, 11, 45, "Subsubsection",ExpressionUUID->"2ded337c-97ad-4e3b-9b7d-60cc51bf5c30"], Cell[6825701, 134257, 4024, 81, 202, "Input",ExpressionUUID->"b2f541ae-2092-4f1f-bc80-8efb3b66ae28"] }, Closed]], Cell[CellGroupData[{ Cell[6829762, 134343, 750, 11, 45, "Subsubsection",ExpressionUUID->"ae83be4a-f6c6-478c-abca-b0206c744db8"], Cell[6830515, 134356, 4034, 83, 202, "Input",ExpressionUUID->"70d8a0a1-c4a1-424a-9794-fe7bb6db3bcc"] }, Closed]], Cell[CellGroupData[{ Cell[6834586, 134444, 740, 11, 45, "Subsubsection",ExpressionUUID->"13f9d46e-e7d9-4fde-beeb-47d4086e7f62"], Cell[6835329, 134457, 4929, 107, 274, "Input",ExpressionUUID->"d81db08b-861d-4b1d-bef5-451786deceda"] }, Closed]], Cell[CellGroupData[{ Cell[6840295, 134569, 845, 12, 45, "Subsubsection",ExpressionUUID->"ecffd08f-9467-4ae6-8d41-82171df4036c"], Cell[6841143, 134583, 4601, 94, 297, "Input",ExpressionUUID->"67aadb41-e8e9-46fe-abd0-0b623ab79ccc"] }, Closed]], Cell[CellGroupData[{ Cell[6845781, 134682, 839, 12, 45, "Subsubsection",ExpressionUUID->"89fc2b7d-250d-4fdb-9348-8c68b312b2d9"], Cell[6846623, 134696, 4310, 86, 274, "Input",ExpressionUUID->"ca186689-2625-4785-af81-eb1bd496d0b9"] }, Closed]], Cell[CellGroupData[{ Cell[6850970, 134787, 835, 12, 45, "Subsubsection",ExpressionUUID->"f720aaca-2844-4acd-8217-41877b76c96d"], Cell[6851808, 134801, 4581, 91, 254, "Input",ExpressionUUID->"4033240f-3788-42b3-9443-2ad62b677427"] }, Closed]], Cell[CellGroupData[{ Cell[6856426, 134897, 859, 12, 45, "Subsubsection",ExpressionUUID->"6e6d4dac-e66b-4531-aa28-6e208a29b2e5"], Cell[6857288, 134911, 4746, 101, 250, "Input",ExpressionUUID->"64775a4c-73a6-4d2b-b5f7-126d1397bde3"] }, Closed]], Cell[CellGroupData[{ Cell[6862071, 135017, 692, 10, 45, "Subsubsection",ExpressionUUID->"4e63966a-3ccd-4df9-adfc-58e33ec8c761"], Cell[6862766, 135029, 3619, 84, 274, "Input",ExpressionUUID->"6fc8f471-7686-4996-8ee5-ff3e0dc65083"] }, Closed]], Cell[CellGroupData[{ Cell[6866422, 135118, 742, 10, 45, "Subsubsection",ExpressionUUID->"d73b733e-ba28-454e-b105-7f6cd2aed1b5"], Cell[6867167, 135130, 2535, 54, 83, "Input",ExpressionUUID->"f4358e0d-6acd-41ce-baa0-458206f7af24"] }, Closed]], Cell[CellGroupData[{ Cell[6869739, 135189, 517, 7, 45, "Subsubsection",ExpressionUUID->"549ba8ca-d820-453c-a0f8-018e836dd0ac"], Cell[6870259, 135198, 3391, 73, 252, "Input",ExpressionUUID->"b174df43-0239-434e-8c90-a97da75f75ca"] }, Closed]], Cell[CellGroupData[{ Cell[6873687, 135276, 779, 11, 45, "Subsubsection",ExpressionUUID->"8a10cc41-d9ff-456f-9327-10b5c120a45f"], Cell[6874469, 135289, 4529, 102, 250, "Input",ExpressionUUID->"bd18828c-2f58-4e30-b582-171015f8e643"] }, Closed]], Cell[CellGroupData[{ Cell[6879035, 135396, 739, 10, 45, "Subsubsection",ExpressionUUID->"a2506154-f78e-49eb-8843-ae6c67548dd3"], Cell[6879777, 135408, 3368, 77, 226, "Input",ExpressionUUID->"18f5637e-f583-47e1-aa91-8890c6873082"] }, Closed]], Cell[CellGroupData[{ Cell[6883182, 135490, 716, 10, 45, "Subsubsection",ExpressionUUID->"0be269f7-d5f6-4951-9eb0-81126e80da3a"], Cell[6883901, 135502, 2901, 50, 60, "Input",ExpressionUUID->"afa1fc1a-2999-4c59-a25f-8c2407de34c8"] }, Closed]], Cell[CellGroupData[{ Cell[6886839, 135557, 696, 10, 45, "Subsubsection",ExpressionUUID->"b45afb76-77f0-4e43-8d05-6b43ab4909ff"], Cell[6887538, 135569, 3679, 76, 250, "Input",ExpressionUUID->"59dea9ed-7ab7-4e79-b2ba-610933be4775"] }, Closed]], Cell[CellGroupData[{ Cell[6891254, 135650, 587, 8, 45, "Subsubsection",ExpressionUUID->"e15399a2-85b8-4165-969d-1138a54422ad"], Cell[6891844, 135660, 3393, 64, 88, "Input",ExpressionUUID->"da043203-a9b6-4f2a-b851-60406af18e98"], Cell[6895240, 135726, 3532, 68, 88, "Input",ExpressionUUID->"263107da-a8e2-4e8c-b3c8-7741d6726dbc"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[6898821, 135800, 1383, 19, 46, "Subsection",ExpressionUUID->"2c208a0f-b87b-4992-8af8-855dba4e9995"], Cell[CellGroupData[{ Cell[6900229, 135823, 692, 10, 56, "Subsubsection",ExpressionUUID->"c45024b7-3eab-40d4-95bb-be3de4fc65af"], Cell[6900924, 135835, 4178, 92, 274, "Input",ExpressionUUID->"c463439f-c3de-4635-9a99-b33befdb6aa1"] }, Closed]], Cell[CellGroupData[{ Cell[6905139, 135932, 540, 8, 45, "Subsubsection",ExpressionUUID->"3c927c94-d2ab-4082-9467-fa050bc70d27"], Cell[6905682, 135942, 5370, 130, 440, "Input",ExpressionUUID->"68f12e37-2dd0-4de9-aed1-fc01119f6012"] }, Closed]], Cell[CellGroupData[{ Cell[6911089, 136077, 499, 8, 45, "Subsubsection",ExpressionUUID->"7b0af50d-5e11-444f-97f9-ed2219a17358"], Cell[6911591, 136087, 6859, 159, 464, "Input",ExpressionUUID->"599edaf2-c9d8-4d72-85f0-6c4a747dfe16"], Cell[6918453, 136248, 4031, 80, 297, "Input",ExpressionUUID->"a79b5927-8ee8-478c-bbb4-18b4e17c2ab7"] }, Closed]], Cell[CellGroupData[{ Cell[6922521, 136333, 552, 9, 45, "Subsubsection",ExpressionUUID->"7510ddc5-952e-4b5d-a8e8-754af37605aa"], Cell[6923076, 136344, 10251, 267, 773, "Input",ExpressionUUID->"a675e422-157d-41aa-a15f-0718025b5f80"] }, Closed]], Cell[CellGroupData[{ Cell[6933364, 136616, 433, 6, 45, "Subsubsection",ExpressionUUID->"5886f5a4-c38c-40d8-a744-e5086353a1dc"], Cell[6933800, 136624, 3291, 82, 274, "Input",ExpressionUUID->"69f6452b-a8ed-486f-952c-ce3ad6d946ca"] }, Closed]], Cell[CellGroupData[{ Cell[6937128, 136711, 482, 7, 45, "Subsubsection",ExpressionUUID->"8567c7cf-f100-4a72-8674-472f3e3f4951"], Cell[6937613, 136720, 2762, 67, 226, "Input",ExpressionUUID->"c62f5129-e111-4243-8bf5-555d76a6f8c9"] }, Closed]], Cell[CellGroupData[{ Cell[6940412, 136792, 437, 7, 45, "Subsubsection",ExpressionUUID->"710db05d-34a6-4b45-b675-f1b9e11eee83"], Cell[6940852, 136801, 4569, 103, 345, "Input",ExpressionUUID->"1bd4ce6c-743f-4726-9dfc-085a3feec4b7"] }, Closed]], Cell[CellGroupData[{ Cell[6945458, 136909, 526, 7, 45, "Subsubsection",ExpressionUUID->"300eb0dc-64c2-45ba-b5af-a178e79fcb39"], Cell[6945987, 136918, 3015, 78, 274, "Input",ExpressionUUID->"8a5ff242-1c67-424b-9b87-34e8de203265"], Cell[6949005, 136998, 1676, 44, 202, "Input",ExpressionUUID->"8ce761f0-b050-46a9-9fe1-086480262105"] }, Closed]], Cell[CellGroupData[{ Cell[6950718, 137047, 460, 6, 45, "Subsubsection",ExpressionUUID->"63684da0-70fe-4ff0-832a-afea56e5df51"], Cell[6951181, 137055, 5025, 107, 321, "Input",ExpressionUUID->"3e35784d-488c-4737-bd6c-ac58def8d95f"] }, Closed]], Cell[CellGroupData[{ Cell[6956243, 137167, 485, 7, 45, "Subsubsection",ExpressionUUID->"b42bda32-be8b-48e6-9b4b-6731d72c622f"], Cell[6956731, 137176, 4654, 99, 274, "Input",ExpressionUUID->"53fa162f-50ff-4da7-aabc-9b4337e07a7d"] }, Closed]], Cell[CellGroupData[{ Cell[6961422, 137280, 483, 7, 45, "Subsubsection",ExpressionUUID->"26914f34-6575-4384-af2b-1ab110afec8b"], Cell[6961908, 137289, 4413, 101, 297, "Input",ExpressionUUID->"b0ea01c9-8635-419e-a421-46a97ab5b23e"] }, Closed]], Cell[CellGroupData[{ Cell[6966358, 137395, 439, 7, 45, "Subsubsection",ExpressionUUID->"d5cfa3b0-d71d-4bd9-961d-b0c25d0ce0dd"], Cell[6966800, 137404, 4480, 105, 321, "Input",ExpressionUUID->"ce2575e5-8de2-4dc8-8366-1927e114f1d5"], Cell[6971283, 137511, 2685, 53, 107, "Input",ExpressionUUID->"2cd4096a-cacb-4010-b4e9-24ac115baae4"] }, Closed]], Cell[CellGroupData[{ Cell[6974005, 137569, 441, 6, 45, "Subsubsection",ExpressionUUID->"3cdd5512-1d3d-4dd6-9522-260ef94d639f"], Cell[6974449, 137577, 5177, 117, 369, "Input",ExpressionUUID->"6fced7f6-b0b6-44fb-a53d-020451bca118"] }, Closed]], Cell[CellGroupData[{ Cell[6979663, 137699, 487, 7, 45, "Subsubsection",ExpressionUUID->"f29688d1-a637-4308-9237-95d43b903cb4"], Cell[6980153, 137708, 4795, 109, 345, "Input",ExpressionUUID->"b40c30bc-e050-49e4-a561-2c93842433e1"] }, Closed]], Cell[CellGroupData[{ Cell[6984985, 137822, 455, 7, 45, "Subsubsection",ExpressionUUID->"5a953b47-026c-4979-a41c-c13d5c9bda0c"], Cell[6985443, 137831, 5789, 125, 345, "Input",ExpressionUUID->"41209339-197c-446b-93ad-5a915622be32"] }, Closed]], Cell[CellGroupData[{ Cell[6991269, 137961, 453, 7, 45, "Subsubsection",ExpressionUUID->"30587767-7755-4213-99e9-5cb39b1e789e"], Cell[6991725, 137970, 5940, 127, 345, "Input",ExpressionUUID->"5cf66b1d-9d3a-4a85-ab81-1308e900cb3a"] }, Closed]], Cell[CellGroupData[{ Cell[6997702, 138102, 475, 7, 45, "Subsubsection",ExpressionUUID->"527269e9-00f7-4939-83c7-891ea80819e4"], Cell[6998180, 138111, 5247, 106, 274, "Input",ExpressionUUID->"83a877d9-448c-4ffb-a2df-930d30ed1515"] }, Closed]], Cell[CellGroupData[{ Cell[7003464, 138222, 508, 8, 45, "Subsubsection",ExpressionUUID->"47a33e95-4d1d-4fe9-8f96-e95239334923"], Cell[7003975, 138232, 5472, 111, 297, "Input",ExpressionUUID->"63488b61-8cd0-46b8-a092-c5ee6e56c481"] }, Closed]], Cell[CellGroupData[{ Cell[7009484, 138348, 510, 8, 45, "Subsubsection",ExpressionUUID->"402f8a39-168c-4a3e-bcea-7bc479d425f5"], Cell[7009997, 138358, 4699, 92, 226, "Input",ExpressionUUID->"428ccaad-d81f-426f-a677-7b211531d4d5"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[7014745, 138456, 1209, 17, 46, "Subsection",ExpressionUUID->"926355d9-01d9-4910-bc0d-e065ea3f5809"], Cell[CellGroupData[{ Cell[7015979, 138477, 1644, 24, 56, "Subsubsection",ExpressionUUID->"37c79142-2f6c-494c-bdcf-21b911153eb3"], Cell[7017626, 138503, 16569, 366, 870, "Input",ExpressionUUID->"34cfc013-b401-4158-a703-c8466468aaab"] }, Closed]], Cell[CellGroupData[{ Cell[7034232, 138874, 1617, 23, 45, "Subsubsection",ExpressionUUID->"9449fa3a-50d4-4aa0-bd1d-d9eb66194680"], Cell[7035852, 138899, 7463, 170, 464, "Input",ExpressionUUID->"91501aa0-f25a-440c-b3c7-a382615d45f3"] }, Closed]], Cell[CellGroupData[{ Cell[7043352, 139074, 799, 11, 45, "Subsubsection",ExpressionUUID->"8c134f70-39fe-416a-b6f1-5c9ca9d94d73"], Cell[7044154, 139087, 3077, 72, 250, "Input",ExpressionUUID->"3780bf3b-c865-46c8-8c49-71c9a347affd"] }, Closed]], Cell[CellGroupData[{ Cell[7047268, 139164, 1236, 17, 45, "Subsubsection",ExpressionUUID->"6a5a2994-0361-4a94-842a-6023a686cc1a"], Cell[7048507, 139183, 5408, 105, 274, "Input",ExpressionUUID->"6dd4279e-8267-4656-8ca7-7ed757cc57b9"] }, Closed]], Cell[CellGroupData[{ Cell[7053952, 139293, 741, 11, 45, "Subsubsection",ExpressionUUID->"1fc33e91-5581-46fa-9ffa-7b37bf1dc09f"], Cell[7054696, 139306, 3370, 81, 274, "Input",ExpressionUUID->"dc291383-7e9d-455f-bb91-d9c874a292e0"] }, Closed]], Cell[CellGroupData[{ Cell[7058103, 139392, 766, 11, 45, "Subsubsection",ExpressionUUID->"4686f710-87da-4c99-ac04-58c2bd878b97"], Cell[7058872, 139405, 3438, 82, 274, "Input",ExpressionUUID->"dd4da3bc-3074-4577-8422-045cedd6ccd6"] }, Closed]], Cell[CellGroupData[{ Cell[7062347, 139492, 600, 8, 45, "Subsubsection",ExpressionUUID->"1b1f9e4a-885d-4e09-9d09-70732625e8cf"], Cell[7062950, 139502, 11943, 276, 756, "Input",ExpressionUUID->"64253c16-3a0a-4f4e-af18-4540bdfe8af3"] }, Closed]], Cell[CellGroupData[{ Cell[7074930, 139783, 764, 11, 45, "Subsubsection",ExpressionUUID->"879fae6a-a9ab-45eb-b98d-521e94225884"], Cell[7075697, 139796, 8911, 200, 481, "Input",ExpressionUUID->"a8c4696d-4675-4104-a414-e169b65c882e"] }, Closed]], Cell[CellGroupData[{ Cell[7084645, 140001, 1693, 24, 45, "Subsubsection",ExpressionUUID->"e9590eee-4c98-4118-bbb1-dd41d7a4d61e"], Cell[CellGroupData[{ Cell[7086363, 140029, 8876, 208, 512, "Input",ExpressionUUID->"17cb0a30-0d08-4ee7-a0f8-8b3adb006440"], Cell[7095242, 140239, 1609, 28, 124, "Output",ExpressionUUID->"8b6ebcd3-7513-486e-b5f3-52fb2be765d6"], Cell[7096854, 140269, 172, 3, 40, "Output",ExpressionUUID->"ac38b698-4eef-4c25-98fb-dbd7529b3582"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[7097075, 140278, 698, 10, 45, "Subsubsection",ExpressionUUID->"c2229eba-015d-4dab-9e9b-7c32d569ba81"], Cell[7097776, 140290, 7749, 174, 363, "Input",ExpressionUUID->"9fd8aeac-74aa-4061-93da-798dddcd1b61"] }, Closed]], Cell[CellGroupData[{ Cell[7105562, 140469, 769, 11, 45, "Subsubsection",ExpressionUUID->"54147c15-0909-4942-aeee-d20353cb7d9d"], Cell[7106334, 140482, 9700, 243, 508, "Input",ExpressionUUID->"b239ad9c-f1a8-450e-b440-b1370ab6df24"] }, Closed]], Cell[CellGroupData[{ Cell[7116071, 140730, 540, 8, 45, "Subsubsection",ExpressionUUID->"06d87d1e-c189-48e7-85cc-c10522dc594b"], Cell[7116614, 140740, 3655, 91, 319, "Input",ExpressionUUID->"c567820b-9382-42e3-a513-84befbb46216"] }, Closed]], Cell[CellGroupData[{ Cell[7120306, 140836, 538, 8, 45, "Subsubsection",ExpressionUUID->"c89e5e5c-d7a8-4c24-9948-a0d9d4db5953"], Cell[7120847, 140846, 3031, 75, 248, "Input",ExpressionUUID->"07e0744f-6fb2-44dd-883e-ce6c29b2dcd8"] }, Closed]], Cell[CellGroupData[{ Cell[7123915, 140926, 545, 8, 45, "Subsubsection",ExpressionUUID->"4fc4d6d7-84bf-4246-bf25-a0eaf8bf2318"], Cell[7124463, 140936, 4983, 103, 275, "Input",ExpressionUUID->"cf69e33d-a513-40da-b809-2f8370dd7666"] }, Closed]], Cell[CellGroupData[{ Cell[7129483, 141044, 514, 7, 45, "Subsubsection",ExpressionUUID->"fe17b329-43a7-4b7e-88ca-a8201bf90e6d"], Cell[7130000, 141053, 4831, 111, 345, "Input",ExpressionUUID->"1c709a4f-52f6-4e4d-af69-77eae3f48b97"] }, Closed]], Cell[CellGroupData[{ Cell[7134868, 141169, 542, 8, 45, "Subsubsection",ExpressionUUID->"8490e351-5fda-4e31-983e-aa318e1c69d4"], Cell[7135413, 141179, 5431, 128, 393, "Input",ExpressionUUID->"6da7377f-94c4-4a7a-983a-3dcd4d437691"] }, Closed]], Cell[CellGroupData[{ Cell[7140881, 141312, 728, 10, 45, "Subsubsection",ExpressionUUID->"a9aada3a-1eb1-41ad-b1ad-e8254f34d504"], Cell[7141612, 141324, 6460, 142, 361, "Input",ExpressionUUID->"52b03267-438e-4587-8441-7f9fd45cf796"] }, Closed]], Cell[CellGroupData[{ Cell[7148109, 141471, 652, 9, 45, "Subsubsection",ExpressionUUID->"941469ca-46dd-4afe-8144-e08121fd0ca7"], Cell[7148764, 141482, 6388, 144, 431, "Input",ExpressionUUID->"0b273499-0e1f-4068-93da-57acf338c957"] }, Closed]], Cell[CellGroupData[{ Cell[7155189, 141631, 678, 10, 45, "Subsubsection",ExpressionUUID->"68f43034-54a5-4ec6-8c02-8f5d029ef4d1"], Cell[7155870, 141643, 6695, 149, 480, "Input",ExpressionUUID->"06922c0f-e063-4c32-8d36-1167417b97c1"] }, Closed]], Cell[CellGroupData[{ Cell[7162602, 141797, 548, 8, 45, "Subsubsection",ExpressionUUID->"5abad74f-33af-443f-99f5-d19b8342ffce"], Cell[7163153, 141807, 5118, 123, 439, "Input",ExpressionUUID->"e6f471e0-3d83-437a-8fae-181bb450ee51"] }, Closed]], Cell[CellGroupData[{ Cell[7168308, 141935, 565, 8, 45, "Subsubsection",ExpressionUUID->"e844a71f-e968-461e-bf7f-9a12d5d89cab"], Cell[7168876, 141945, 3917, 67, 107, "Input",ExpressionUUID->"1bfb282e-7a1f-4d60-8484-db4ba445bb93"] }, Closed]], Cell[CellGroupData[{ Cell[7172830, 142017, 562, 8, 45, "Subsubsection",ExpressionUUID->"1fc5d506-4000-4796-b4d5-7fe30d5095b9"], Cell[7173395, 142027, 3725, 93, 305, "Input",ExpressionUUID->"052d16ad-1cbb-457d-af5d-492ff2813a89"] }, Closed]], Cell[CellGroupData[{ Cell[7177157, 142125, 705, 10, 45, "Subsubsection",ExpressionUUID->"d386b5ca-3b6b-4461-a7db-b6a6a647c5e9"], Cell[7177865, 142137, 6591, 143, 409, "Input",ExpressionUUID->"ac1a67ba-bfe0-430b-b91e-14f788cde5d9"] }, Closed]], Cell[CellGroupData[{ Cell[7184493, 142285, 757, 11, 45, "Subsubsection",ExpressionUUID->"d9fce155-0184-43be-9153-088286050608"], Cell[7185253, 142298, 6742, 141, 436, "Input",ExpressionUUID->"77f56344-0784-4625-ba25-15c6ec57d9c9"] }, Closed]], Cell[CellGroupData[{ Cell[7192032, 142444, 591, 8, 45, "Subsubsection",ExpressionUUID->"9b9200ed-b9b5-4860-a625-7ee79cd823fd"], Cell[7192626, 142454, 5014, 102, 335, "Input",ExpressionUUID->"3aa55d27-a8ca-4892-b171-91d8c97c6718"] }, Closed]], Cell[CellGroupData[{ Cell[7197677, 142561, 371, 5, 45, "Subsubsection",ExpressionUUID->"fe04c3e5-5fd2-4888-81b9-fb87f417174c"], Cell[7198051, 142568, 5575, 131, 435, "Input",ExpressionUUID->"926567af-ecc0-47ad-8426-ae891278a942"] }, Closed]] }, Open ]] }, Open ]] } ] *)