(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 10.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 98434, 2010] NotebookOptionsPosition[ 94962, 1949] NotebookOutlinePosition[ 95363, 1965] CellTagsIndexPosition[ 95320, 1962] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"Clear", "[", RowBox[{ "EIv", ",", "\[Mu]v", ",", "Lv", ",", "Mv", ",", "Eq1", ",", "Eq2", ",", "Eq3", ",", "Eq4", ",", "Eq5", ",", "Eq6"}], "]"}], "\[IndentingNewLine]", "ClearAll", "\[IndentingNewLine]", "Clear", "\ \[IndentingNewLine]", RowBox[{ RowBox[{"b", "=", "100"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Iz", "=", RowBox[{ RowBox[{ RowBox[{"b", "^", "4"}], "/", "12"}], "*", RowBox[{"10", "^", RowBox[{"(", RowBox[{"-", "12"}], ")"}]}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Ey", "=", RowBox[{"200", "*", RowBox[{"10", "^", "9"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Rho]", "=", "8000"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"EIv", "=", RowBox[{"Ey", "*", "Iz"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"\[Mu]v", "=", RowBox[{"\[Rho]", "*", "b", "*", RowBox[{"b", "/", RowBox[{"(", RowBox[{"10", "^", "6"}], ")"}]}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Lv", "=", "4"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Mv", "=", "500"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "1"], "[", "x_", "]"}], ":=", RowBox[{ RowBox[{ SubscriptBox["c", "1"], "*", RowBox[{"Cos", "[", RowBox[{"\[Beta]", "*", "x"}], "]"}]}], "+", RowBox[{ SubscriptBox["c", "2"], "*", RowBox[{"Sin", "[", RowBox[{"\[Beta]", "*", "x"}], "]"}]}], "+", RowBox[{ SubscriptBox["c", "3"], "*", RowBox[{"Cosh", "[", RowBox[{"\[Beta]", "*", "x"}], "]"}]}], "+", RowBox[{ SubscriptBox["c", "4"], "*", RowBox[{"Sinh", "[", RowBox[{"\[Beta]", "*", "x"}], "]"}]}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "2"], "[", "x_", "]"}], ":=", RowBox[{ RowBox[{ SubscriptBox["d", "1"], "*", RowBox[{"Cos", "[", RowBox[{"\[Beta]", "*", "x"}], "]"}]}], "+", RowBox[{ SubscriptBox["d", "2"], "*", RowBox[{"Sin", "[", RowBox[{"\[Beta]", "*", "x"}], "]"}]}], "+", RowBox[{ SubscriptBox["d", "3"], "*", RowBox[{"Cosh", "[", RowBox[{"\[Beta]", "*", "x"}], "]"}]}], "+", RowBox[{ SubscriptBox["d", "4"], "*", RowBox[{"Sinh", "[", RowBox[{"\[Beta]", "*", "x"}], "]"}]}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Omega]", "[", "\[Beta]_", "]"}], "=", RowBox[{ RowBox[{"\[Beta]", "^", "2"}], "*", RowBox[{"Sqrt", "[", RowBox[{"EI", "/", "\[Mu]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["\[Psi]l", "1"], "[", "x_", "]"}], "=", RowBox[{"D", "[", RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "1"], "[", "x", "]"}], ",", "x"}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["\[Psi]l", "2"], "[", "x_", "]"}], "=", RowBox[{"D", "[", RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "2"], "[", "x", "]"}], ",", "x"}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["\[Psi]ll", "1"], "[", "x_", "]"}], "=", RowBox[{"D", "[", RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "1"], "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "2"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["\[Psi]ll", "2"], "[", "x_", "]"}], "=", RowBox[{"D", "[", RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "2"], "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "2"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["\[Psi]lll", "1"], "[", "x_", "]"}], "=", RowBox[{"D", "[", RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "1"], "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "3"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["\[Psi]lll", "2"], "[", "x_", "]"}], "=", RowBox[{"D", "[", RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "2"], "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "3"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["\[Psi]llll", "1"], "[", "x_", "]"}], "=", RowBox[{"D", "[", RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "1"], "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "4"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Psi]llll", "2"], "[", "x_", "]"}], "=", RowBox[{"D", "[", RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "2"], "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "4"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Eq1", "=", RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "1"], "[", "0", "]"}], "\[Equal]", "0"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Eq2", "=", RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "2"], "[", RowBox[{"L", "/", "2"}], "]"}], "\[Equal]", "0"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Eq3", "=", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "1"], "[", RowBox[{"L", "/", "2"}], "]"}], "-", RowBox[{ SubscriptBox["\[Psi]", "2"], "[", "0", "]"}]}], "\[Equal]", "0"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Eq4", "=", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Psi]l", "1"], "[", RowBox[{"L", "/", "2"}], "]"}], "-", RowBox[{ SubscriptBox["\[Psi]l", "2"], "[", "0", "]"}]}], "\[Equal]", "0"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Eq5", "=", RowBox[{ RowBox[{ SubscriptBox["\[Psi]ll", "1"], "[", "0", "]"}], "\[Equal]", "0"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Eq6", "=", RowBox[{ RowBox[{ SubscriptBox["\[Psi]ll", "2"], "[", RowBox[{"L", "/", "2"}], "]"}], "\[Equal]", "0"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Eq7", "=", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Psi]ll", "1"], "[", RowBox[{"L", "/", "2"}], "]"}], "-", RowBox[{ SubscriptBox["\[Psi]ll", "2"], "[", "0", "]"}]}], "\[Equal]", "0"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Eq8", "=", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "M"}], "*", RowBox[{"\[Omega]", "[", "\[Beta]", "]"}], "*", RowBox[{"\[Omega]", "[", "\[Beta]", "]"}], "*", RowBox[{ SubscriptBox["\[Psi]", "1"], "[", RowBox[{"L", "/", "2"}], "]"}]}], "+", RowBox[{"EI", "*", RowBox[{ SubscriptBox["\[Psi]lll", "2"], "[", "0", "]"}]}], "-", RowBox[{"EI", "*", RowBox[{ SubscriptBox["\[Psi]lll", "1"], "[", RowBox[{"L", "/", "2"}], "]"}]}]}], "\[Equal]", "0"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SistEquac", "=", RowBox[{"{", RowBox[{ "Eq1", ",", "Eq2", ",", "Eq3", ",", "Eq4", ",", "Eq5", ",", "Eq6", ",", "Eq7", ",", "Eq8"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"b", ",", "matrizcoef"}], "}"}], "=", RowBox[{ RowBox[{"CoefficientArrays", "[", RowBox[{"SistEquac", ",", RowBox[{"{", RowBox[{ SubscriptBox["c", "1"], ",", SubscriptBox["c", "2"], ",", SubscriptBox["c", "3"], ",", SubscriptBox["c", "4"], ",", SubscriptBox["d", "1"], ",", SubscriptBox["d", "2"], ",", SubscriptBox["d", "3"], ",", SubscriptBox["d", "4"]}], "}"}]}], "]"}], "//", "Normal"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", "matrizcoef", "]"}]}], "Input", CellChangeTimes->{{3.7063656290075827`*^9, 3.706366020441964*^9}, { 3.706366068255639*^9, 3.7063662725036187`*^9}, {3.7063663037283473`*^9, 3.7063664523561864`*^9}, {3.7063664948421855`*^9, 3.706366495526519*^9}, { 3.706366552448177*^9, 3.7063665660783367`*^9}, {3.7063666030716763`*^9, 3.706366673617967*^9}, {3.706366931803173*^9, 3.706366996572131*^9}, { 3.7063671145121045`*^9, 3.7063672535890617`*^9}, 3.7063672842803516`*^9, { 3.706367572756341*^9, 3.7063675860059156`*^9}, {3.706472048162837*^9, 3.706472143561285*^9}, {3.706472177358692*^9, 3.706472237810467*^9}, { 3.7064723630646763`*^9, 3.7064723734283586`*^9}, {3.706472484898199*^9, 3.706472531504073*^9}, {3.7064729966770897`*^9, 3.706473192879792*^9}, { 3.7064737086779585`*^9, 3.7064737152302713`*^9}, {3.7064737849116*^9, 3.706473806111703*^9}, 3.7064739472803774`*^9, {3.706474142530161*^9, 3.706474167877846*^9}, {3.706474216947692*^9, 3.706474220862213*^9}, { 3.706474257806007*^9, 3.7064742581799436`*^9}, {3.70647442681894*^9, 3.706474443599592*^9}, {3.7064745772651834`*^9, 3.706474592692074*^9}, { 3.7064748035378094`*^9, 3.706474807344342*^9}, {3.7064749767274666`*^9, 3.7064749946493807`*^9}, 3.706475057794907*^9, {3.7064753674466763`*^9, 3.7064753690200853`*^9}, {3.7064754261590633`*^9, 3.706475427829973*^9}, { 3.7064756026876335`*^9, 3.706475609482561*^9}, 3.7065223650339994`*^9, 3.706522532331672*^9, {3.7065232851802177`*^9, 3.7065232876158504`*^9}, 3.70652735623326*^9, 3.7065275488539033`*^9, 3.7068698846002445`*^9, 3.7068699353410687`*^9}, CellLabel-> "In[463]:=",ExpressionUUID->"90c4888e-eb22-4862-b667-46aa7cb46259"], Cell[BoxData["ClearAll"], "Output", CellChangeTimes->{{3.7063658887549987`*^9, 3.7063659182859187`*^9}, { 3.7063659666667023`*^9, 3.706366008444791*^9}, {3.706366072843356*^9, 3.706366099077593*^9}, 3.7063661448651237`*^9, {3.7063661908481197`*^9, 3.7063662738911123`*^9}, {3.706366304893347*^9, 3.70636634010874*^9}, { 3.7063663897367897`*^9, 3.706366531896325*^9}, {3.706366567578878*^9, 3.7063666764442596`*^9}, 3.706366948291458*^9, 3.706367103018876*^9, 3.7063671569181266`*^9, 3.706367255808803*^9, 3.7063672860434093`*^9, { 3.70636740712354*^9, 3.7063674454909763`*^9}, {3.7063674759055643`*^9, 3.706367484000049*^9}, {3.7063675434418645`*^9, 3.706367594758151*^9}, { 3.7063677090656548`*^9, 3.7063677179100103`*^9}, 3.7063678962475586`*^9, 3.706368092710245*^9, {3.706368144739829*^9, 3.7063681501155095`*^9}, { 3.706368325958972*^9, 3.7063684489295397`*^9}, 3.7063685918787193`*^9, 3.706368712566142*^9, {3.7063687513966303`*^9, 3.706368872125106*^9}, { 3.7063689175177865`*^9, 3.7063689422320127`*^9}, {3.7063689836370955`*^9, 3.7063690058702755`*^9}, {3.7063691181955533`*^9, 3.7063691388686347`*^9}, 3.70636917808317*^9, {3.706369217255042*^9, 3.706369344899928*^9}, 3.706369916952623*^9, {3.7063699630670185`*^9, 3.7063699700174303`*^9}, 3.7063701205366335`*^9, 3.706370181585146*^9, 3.706370636159452*^9, 3.7064721109894714`*^9, 3.706472145463337*^9, {3.706472191513211*^9, 3.706472206227422*^9}, 3.7064722553500986`*^9, 3.7064723749635086`*^9, { 3.7064725193639297`*^9, 3.706472589850506*^9}, {3.7064728096890297`*^9, 3.706472818241002*^9}, {3.706472848572774*^9, 3.7064729287814727`*^9}, 3.7064729602785277`*^9, {3.706473158711328*^9, 3.7064732498656125`*^9}, 3.706473717962571*^9, 3.706473808051237*^9, 3.7064738449972286`*^9, 3.706473879319541*^9, 3.7064739487262907`*^9, {3.7064741704945087`*^9, 3.706474191052341*^9}, {3.7064742227873273`*^9, 3.7064742595651236`*^9}, 3.7064744872074566`*^9, {3.7064745176000757`*^9, 3.7064745455090513`*^9}, { 3.7064745944412327`*^9, 3.7064746455428553`*^9}, 3.7064746837798815`*^9, { 3.706474809046687*^9, 3.706474878868527*^9}, 3.7064749328860598`*^9, { 3.7064749787904367`*^9, 3.7064750833473167`*^9}, {3.7064752222284217`*^9, 3.706475277228671*^9}, 3.7064753188547077`*^9, {3.7064753705217357`*^9, 3.7064753975110054`*^9}, {3.7064754315091534`*^9, 3.706475463085252*^9}, { 3.70647561095267*^9, 3.7064756566693034`*^9}, 3.706521772598197*^9, { 3.7065220781260386`*^9, 3.7065221603495007`*^9}, {3.706522235872806*^9, 3.706522251236725*^9}, {3.7065223668033595`*^9, 3.706522419067748*^9}, 3.706522494534246*^9, {3.7065225345187197`*^9, 3.706522577253888*^9}, { 3.706522635865285*^9, 3.7065226955166597`*^9}, {3.7065227301301155`*^9, 3.70652274826168*^9}, 3.706522865534769*^9, {3.706522919490949*^9, 3.7065229276821427`*^9}, {3.706523209014064*^9, 3.706523250969928*^9}, 3.706523288879591*^9, {3.706523318883741*^9, 3.706523342258904*^9}, 3.706527357364447*^9, 3.7065274079655905`*^9, {3.7065275554960594`*^9, 3.7065275811008606`*^9}, 3.706869886397094*^9, 3.70686993684147*^9, 3.7068700220245323`*^9, {3.810308133710785*^9, 3.8103081556550245`*^9}, { 3.8103082641375713`*^9, 3.8103083434633355`*^9}, {3.810308399653139*^9, 3.8103084332808666`*^9}}, CellLabel-> "Out[464]=",ExpressionUUID->"ebb655a1-3995-44d1-8bb5-dff2f1edcc1d"], Cell[BoxData["Clear"], "Output", CellChangeTimes->{{3.7063658887549987`*^9, 3.7063659182859187`*^9}, { 3.7063659666667023`*^9, 3.706366008444791*^9}, {3.706366072843356*^9, 3.706366099077593*^9}, 3.7063661448651237`*^9, {3.7063661908481197`*^9, 3.7063662738911123`*^9}, {3.706366304893347*^9, 3.70636634010874*^9}, { 3.7063663897367897`*^9, 3.706366531896325*^9}, {3.706366567578878*^9, 3.7063666764442596`*^9}, 3.706366948291458*^9, 3.706367103018876*^9, 3.7063671569181266`*^9, 3.706367255808803*^9, 3.7063672860434093`*^9, { 3.70636740712354*^9, 3.7063674454909763`*^9}, {3.7063674759055643`*^9, 3.706367484000049*^9}, {3.7063675434418645`*^9, 3.706367594758151*^9}, { 3.7063677090656548`*^9, 3.7063677179100103`*^9}, 3.7063678962475586`*^9, 3.706368092710245*^9, {3.706368144739829*^9, 3.7063681501155095`*^9}, { 3.706368325958972*^9, 3.7063684489295397`*^9}, 3.7063685918787193`*^9, 3.706368712566142*^9, {3.7063687513966303`*^9, 3.706368872125106*^9}, { 3.7063689175177865`*^9, 3.7063689422320127`*^9}, {3.7063689836370955`*^9, 3.7063690058702755`*^9}, {3.7063691181955533`*^9, 3.7063691388686347`*^9}, 3.70636917808317*^9, {3.706369217255042*^9, 3.706369344899928*^9}, 3.706369916952623*^9, {3.7063699630670185`*^9, 3.7063699700174303`*^9}, 3.7063701205366335`*^9, 3.706370181585146*^9, 3.706370636159452*^9, 3.7064721109894714`*^9, 3.706472145463337*^9, {3.706472191513211*^9, 3.706472206227422*^9}, 3.7064722553500986`*^9, 3.7064723749635086`*^9, { 3.7064725193639297`*^9, 3.706472589850506*^9}, {3.7064728096890297`*^9, 3.706472818241002*^9}, {3.706472848572774*^9, 3.7064729287814727`*^9}, 3.7064729602785277`*^9, {3.706473158711328*^9, 3.7064732498656125`*^9}, 3.706473717962571*^9, 3.706473808051237*^9, 3.7064738449972286`*^9, 3.706473879319541*^9, 3.7064739487262907`*^9, {3.7064741704945087`*^9, 3.706474191052341*^9}, {3.7064742227873273`*^9, 3.7064742595651236`*^9}, 3.7064744872074566`*^9, {3.7064745176000757`*^9, 3.7064745455090513`*^9}, { 3.7064745944412327`*^9, 3.7064746455428553`*^9}, 3.7064746837798815`*^9, { 3.706474809046687*^9, 3.706474878868527*^9}, 3.7064749328860598`*^9, { 3.7064749787904367`*^9, 3.7064750833473167`*^9}, {3.7064752222284217`*^9, 3.706475277228671*^9}, 3.7064753188547077`*^9, {3.7064753705217357`*^9, 3.7064753975110054`*^9}, {3.7064754315091534`*^9, 3.706475463085252*^9}, { 3.70647561095267*^9, 3.7064756566693034`*^9}, 3.706521772598197*^9, { 3.7065220781260386`*^9, 3.7065221603495007`*^9}, {3.706522235872806*^9, 3.706522251236725*^9}, {3.7065223668033595`*^9, 3.706522419067748*^9}, 3.706522494534246*^9, {3.7065225345187197`*^9, 3.706522577253888*^9}, { 3.706522635865285*^9, 3.7065226955166597`*^9}, {3.7065227301301155`*^9, 3.70652274826168*^9}, 3.706522865534769*^9, {3.706522919490949*^9, 3.7065229276821427`*^9}, {3.706523209014064*^9, 3.706523250969928*^9}, 3.706523288879591*^9, {3.706523318883741*^9, 3.706523342258904*^9}, 3.706527357364447*^9, 3.7065274079655905`*^9, {3.7065275554960594`*^9, 3.7065275811008606`*^9}, 3.706869886397094*^9, 3.70686993684147*^9, 3.7068700220245323`*^9, {3.810308133710785*^9, 3.8103081556550245`*^9}, { 3.8103082641375713`*^9, 3.8103083434633355`*^9}, {3.810308399653139*^9, 3.8103084332838564`*^9}}, CellLabel-> "Out[465]=",ExpressionUUID->"ef73a572-3c52-4527-9a1c-47c26b955237"], Cell[BoxData["80"], "Output", CellChangeTimes->{{3.7063658887549987`*^9, 3.7063659182859187`*^9}, { 3.7063659666667023`*^9, 3.706366008444791*^9}, {3.706366072843356*^9, 3.706366099077593*^9}, 3.7063661448651237`*^9, {3.7063661908481197`*^9, 3.7063662738911123`*^9}, {3.706366304893347*^9, 3.70636634010874*^9}, { 3.7063663897367897`*^9, 3.706366531896325*^9}, {3.706366567578878*^9, 3.7063666764442596`*^9}, 3.706366948291458*^9, 3.706367103018876*^9, 3.7063671569181266`*^9, 3.706367255808803*^9, 3.7063672860434093`*^9, { 3.70636740712354*^9, 3.7063674454909763`*^9}, {3.7063674759055643`*^9, 3.706367484000049*^9}, {3.7063675434418645`*^9, 3.706367594758151*^9}, { 3.7063677090656548`*^9, 3.7063677179100103`*^9}, 3.7063678962475586`*^9, 3.706368092710245*^9, {3.706368144739829*^9, 3.7063681501155095`*^9}, { 3.706368325958972*^9, 3.7063684489295397`*^9}, 3.7063685918787193`*^9, 3.706368712566142*^9, {3.7063687513966303`*^9, 3.706368872125106*^9}, { 3.7063689175177865`*^9, 3.7063689422320127`*^9}, {3.7063689836370955`*^9, 3.7063690058702755`*^9}, {3.7063691181955533`*^9, 3.7063691388686347`*^9}, 3.70636917808317*^9, {3.706369217255042*^9, 3.706369344899928*^9}, 3.706369916952623*^9, {3.7063699630670185`*^9, 3.7063699700174303`*^9}, 3.7063701205366335`*^9, 3.706370181585146*^9, 3.706370636159452*^9, 3.7064721109894714`*^9, 3.706472145463337*^9, {3.706472191513211*^9, 3.706472206227422*^9}, 3.7064722553500986`*^9, 3.7064723749635086`*^9, { 3.7064725193639297`*^9, 3.706472589850506*^9}, {3.7064728096890297`*^9, 3.706472818241002*^9}, {3.706472848572774*^9, 3.7064729287814727`*^9}, 3.7064729602785277`*^9, {3.706473158711328*^9, 3.7064732498656125`*^9}, 3.706473717962571*^9, 3.706473808051237*^9, 3.7064738449972286`*^9, 3.706473879319541*^9, 3.7064739487262907`*^9, {3.7064741704945087`*^9, 3.706474191052341*^9}, {3.7064742227873273`*^9, 3.7064742595651236`*^9}, 3.7064744872074566`*^9, {3.7064745176000757`*^9, 3.7064745455090513`*^9}, { 3.7064745944412327`*^9, 3.7064746455428553`*^9}, 3.7064746837798815`*^9, { 3.706474809046687*^9, 3.706474878868527*^9}, 3.7064749328860598`*^9, { 3.7064749787904367`*^9, 3.7064750833473167`*^9}, {3.7064752222284217`*^9, 3.706475277228671*^9}, 3.7064753188547077`*^9, {3.7064753705217357`*^9, 3.7064753975110054`*^9}, {3.7064754315091534`*^9, 3.706475463085252*^9}, { 3.70647561095267*^9, 3.7064756566693034`*^9}, 3.706521772598197*^9, { 3.7065220781260386`*^9, 3.7065221603495007`*^9}, {3.706522235872806*^9, 3.706522251236725*^9}, {3.7065223668033595`*^9, 3.706522419067748*^9}, 3.706522494534246*^9, {3.7065225345187197`*^9, 3.706522577253888*^9}, { 3.706522635865285*^9, 3.7065226955166597`*^9}, {3.7065227301301155`*^9, 3.70652274826168*^9}, 3.706522865534769*^9, {3.706522919490949*^9, 3.7065229276821427`*^9}, {3.706523209014064*^9, 3.706523250969928*^9}, 3.706523288879591*^9, {3.706523318883741*^9, 3.706523342258904*^9}, 3.706527357364447*^9, 3.7065274079655905`*^9, {3.7065275554960594`*^9, 3.7065275811008606`*^9}, 3.706869886397094*^9, 3.70686993684147*^9, 3.7068700220245323`*^9, {3.810308133710785*^9, 3.8103081556550245`*^9}, { 3.8103082641375713`*^9, 3.8103083434633355`*^9}, {3.810308399653139*^9, 3.810308433286848*^9}}, CellLabel-> "Out[471]=",ExpressionUUID->"e0291cd0-b818-4f1a-b4a6-02faa64bc068"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"-", "\[Beta]"}], " ", RowBox[{"Sin", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "1"]}], "+", RowBox[{"\[Beta]", " ", RowBox[{"Cos", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "2"]}], "+", RowBox[{"\[Beta]", " ", RowBox[{"Sinh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "3"]}], "+", RowBox[{"\[Beta]", " ", RowBox[{"Cosh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "4"]}]}]], "Output", CellChangeTimes->{{3.7063658887549987`*^9, 3.7063659182859187`*^9}, { 3.7063659666667023`*^9, 3.706366008444791*^9}, {3.706366072843356*^9, 3.706366099077593*^9}, 3.7063661448651237`*^9, {3.7063661908481197`*^9, 3.7063662738911123`*^9}, {3.706366304893347*^9, 3.70636634010874*^9}, { 3.7063663897367897`*^9, 3.706366531896325*^9}, {3.706366567578878*^9, 3.7063666764442596`*^9}, 3.706366948291458*^9, 3.706367103018876*^9, 3.7063671569181266`*^9, 3.706367255808803*^9, 3.7063672860434093`*^9, { 3.70636740712354*^9, 3.7063674454909763`*^9}, {3.7063674759055643`*^9, 3.706367484000049*^9}, {3.7063675434418645`*^9, 3.706367594758151*^9}, { 3.7063677090656548`*^9, 3.7063677179100103`*^9}, 3.7063678962475586`*^9, 3.706368092710245*^9, {3.706368144739829*^9, 3.7063681501155095`*^9}, { 3.706368325958972*^9, 3.7063684489295397`*^9}, 3.7063685918787193`*^9, 3.706368712566142*^9, {3.7063687513966303`*^9, 3.706368872125106*^9}, { 3.7063689175177865`*^9, 3.7063689422320127`*^9}, {3.7063689836370955`*^9, 3.7063690058702755`*^9}, {3.7063691181955533`*^9, 3.7063691388686347`*^9}, 3.70636917808317*^9, {3.706369217255042*^9, 3.706369344899928*^9}, 3.706369916952623*^9, {3.7063699630670185`*^9, 3.7063699700174303`*^9}, 3.7063701205366335`*^9, 3.706370181585146*^9, 3.706370636159452*^9, 3.7064721109894714`*^9, 3.706472145463337*^9, {3.706472191513211*^9, 3.706472206227422*^9}, 3.7064722553500986`*^9, 3.7064723749635086`*^9, { 3.7064725193639297`*^9, 3.706472589850506*^9}, {3.7064728096890297`*^9, 3.706472818241002*^9}, {3.706472848572774*^9, 3.7064729287814727`*^9}, 3.7064729602785277`*^9, {3.706473158711328*^9, 3.7064732498656125`*^9}, 3.706473717962571*^9, 3.706473808051237*^9, 3.7064738449972286`*^9, 3.706473879319541*^9, 3.7064739487262907`*^9, {3.7064741704945087`*^9, 3.706474191052341*^9}, {3.7064742227873273`*^9, 3.7064742595651236`*^9}, 3.7064744872074566`*^9, {3.7064745176000757`*^9, 3.7064745455090513`*^9}, { 3.7064745944412327`*^9, 3.7064746455428553`*^9}, 3.7064746837798815`*^9, { 3.706474809046687*^9, 3.706474878868527*^9}, 3.7064749328860598`*^9, { 3.7064749787904367`*^9, 3.7064750833473167`*^9}, {3.7064752222284217`*^9, 3.706475277228671*^9}, 3.7064753188547077`*^9, {3.7064753705217357`*^9, 3.7064753975110054`*^9}, {3.7064754315091534`*^9, 3.706475463085252*^9}, { 3.70647561095267*^9, 3.7064756566693034`*^9}, 3.706521772598197*^9, { 3.7065220781260386`*^9, 3.7065221603495007`*^9}, {3.706522235872806*^9, 3.706522251236725*^9}, {3.7065223668033595`*^9, 3.706522419067748*^9}, 3.706522494534246*^9, {3.7065225345187197`*^9, 3.706522577253888*^9}, { 3.706522635865285*^9, 3.7065226955166597`*^9}, {3.7065227301301155`*^9, 3.70652274826168*^9}, 3.706522865534769*^9, {3.706522919490949*^9, 3.7065229276821427`*^9}, {3.706523209014064*^9, 3.706523250969928*^9}, 3.706523288879591*^9, {3.706523318883741*^9, 3.706523342258904*^9}, 3.706527357364447*^9, 3.7065274079655905`*^9, {3.7065275554960594`*^9, 3.7065275811008606`*^9}, 3.706869886397094*^9, 3.70686993684147*^9, 3.7068700220245323`*^9, {3.810308133710785*^9, 3.8103081556550245`*^9}, { 3.8103082641375713`*^9, 3.8103083434633355`*^9}, {3.810308399653139*^9, 3.8103084332908354`*^9}}, CellLabel-> "Out[477]=",ExpressionUUID->"f4f9f00d-b117-4c76-8c45-f4866bc21b3e"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"-", "\[Beta]"}], " ", RowBox[{"Sin", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "1"]}], "+", RowBox[{"\[Beta]", " ", RowBox[{"Cos", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "2"]}], "+", RowBox[{"\[Beta]", " ", RowBox[{"Sinh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "3"]}], "+", RowBox[{"\[Beta]", " ", RowBox[{"Cosh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "4"]}]}]], "Output", CellChangeTimes->{{3.7063658887549987`*^9, 3.7063659182859187`*^9}, { 3.7063659666667023`*^9, 3.706366008444791*^9}, {3.706366072843356*^9, 3.706366099077593*^9}, 3.7063661448651237`*^9, {3.7063661908481197`*^9, 3.7063662738911123`*^9}, {3.706366304893347*^9, 3.70636634010874*^9}, { 3.7063663897367897`*^9, 3.706366531896325*^9}, {3.706366567578878*^9, 3.7063666764442596`*^9}, 3.706366948291458*^9, 3.706367103018876*^9, 3.7063671569181266`*^9, 3.706367255808803*^9, 3.7063672860434093`*^9, { 3.70636740712354*^9, 3.7063674454909763`*^9}, {3.7063674759055643`*^9, 3.706367484000049*^9}, {3.7063675434418645`*^9, 3.706367594758151*^9}, { 3.7063677090656548`*^9, 3.7063677179100103`*^9}, 3.7063678962475586`*^9, 3.706368092710245*^9, {3.706368144739829*^9, 3.7063681501155095`*^9}, { 3.706368325958972*^9, 3.7063684489295397`*^9}, 3.7063685918787193`*^9, 3.706368712566142*^9, {3.7063687513966303`*^9, 3.706368872125106*^9}, { 3.7063689175177865`*^9, 3.7063689422320127`*^9}, {3.7063689836370955`*^9, 3.7063690058702755`*^9}, {3.7063691181955533`*^9, 3.7063691388686347`*^9}, 3.70636917808317*^9, {3.706369217255042*^9, 3.706369344899928*^9}, 3.706369916952623*^9, {3.7063699630670185`*^9, 3.7063699700174303`*^9}, 3.7063701205366335`*^9, 3.706370181585146*^9, 3.706370636159452*^9, 3.7064721109894714`*^9, 3.706472145463337*^9, {3.706472191513211*^9, 3.706472206227422*^9}, 3.7064722553500986`*^9, 3.7064723749635086`*^9, { 3.7064725193639297`*^9, 3.706472589850506*^9}, {3.7064728096890297`*^9, 3.706472818241002*^9}, {3.706472848572774*^9, 3.7064729287814727`*^9}, 3.7064729602785277`*^9, {3.706473158711328*^9, 3.7064732498656125`*^9}, 3.706473717962571*^9, 3.706473808051237*^9, 3.7064738449972286`*^9, 3.706473879319541*^9, 3.7064739487262907`*^9, {3.7064741704945087`*^9, 3.706474191052341*^9}, {3.7064742227873273`*^9, 3.7064742595651236`*^9}, 3.7064744872074566`*^9, {3.7064745176000757`*^9, 3.7064745455090513`*^9}, { 3.7064745944412327`*^9, 3.7064746455428553`*^9}, 3.7064746837798815`*^9, { 3.706474809046687*^9, 3.706474878868527*^9}, 3.7064749328860598`*^9, { 3.7064749787904367`*^9, 3.7064750833473167`*^9}, {3.7064752222284217`*^9, 3.706475277228671*^9}, 3.7064753188547077`*^9, {3.7064753705217357`*^9, 3.7064753975110054`*^9}, {3.7064754315091534`*^9, 3.706475463085252*^9}, { 3.70647561095267*^9, 3.7064756566693034`*^9}, 3.706521772598197*^9, { 3.7065220781260386`*^9, 3.7065221603495007`*^9}, {3.706522235872806*^9, 3.706522251236725*^9}, {3.7065223668033595`*^9, 3.706522419067748*^9}, 3.706522494534246*^9, {3.7065225345187197`*^9, 3.706522577253888*^9}, { 3.706522635865285*^9, 3.7065226955166597`*^9}, {3.7065227301301155`*^9, 3.70652274826168*^9}, 3.706522865534769*^9, {3.706522919490949*^9, 3.7065229276821427`*^9}, {3.706523209014064*^9, 3.706523250969928*^9}, 3.706523288879591*^9, {3.706523318883741*^9, 3.706523342258904*^9}, 3.706527357364447*^9, 3.7065274079655905`*^9, {3.7065275554960594`*^9, 3.7065275811008606`*^9}, 3.706869886397094*^9, 3.70686993684147*^9, 3.7068700220245323`*^9, {3.810308133710785*^9, 3.8103081556550245`*^9}, { 3.8103082641375713`*^9, 3.8103083434633355`*^9}, {3.810308399653139*^9, 3.810308433298808*^9}}, CellLabel-> "Out[478]=",ExpressionUUID->"f2f6f177-d43e-4d9c-8266-220267451222"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], " ", RowBox[{"Cos", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "1"]}], "-", RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Sin", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "2"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Cosh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "3"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Sinh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "4"]}]}]], "Output", CellChangeTimes->{{3.7063658887549987`*^9, 3.7063659182859187`*^9}, { 3.7063659666667023`*^9, 3.706366008444791*^9}, {3.706366072843356*^9, 3.706366099077593*^9}, 3.7063661448651237`*^9, {3.7063661908481197`*^9, 3.7063662738911123`*^9}, {3.706366304893347*^9, 3.70636634010874*^9}, { 3.7063663897367897`*^9, 3.706366531896325*^9}, {3.706366567578878*^9, 3.7063666764442596`*^9}, 3.706366948291458*^9, 3.706367103018876*^9, 3.7063671569181266`*^9, 3.706367255808803*^9, 3.7063672860434093`*^9, { 3.70636740712354*^9, 3.7063674454909763`*^9}, {3.7063674759055643`*^9, 3.706367484000049*^9}, {3.7063675434418645`*^9, 3.706367594758151*^9}, { 3.7063677090656548`*^9, 3.7063677179100103`*^9}, 3.7063678962475586`*^9, 3.706368092710245*^9, {3.706368144739829*^9, 3.7063681501155095`*^9}, { 3.706368325958972*^9, 3.7063684489295397`*^9}, 3.7063685918787193`*^9, 3.706368712566142*^9, {3.7063687513966303`*^9, 3.706368872125106*^9}, { 3.7063689175177865`*^9, 3.7063689422320127`*^9}, {3.7063689836370955`*^9, 3.7063690058702755`*^9}, {3.7063691181955533`*^9, 3.7063691388686347`*^9}, 3.70636917808317*^9, {3.706369217255042*^9, 3.706369344899928*^9}, 3.706369916952623*^9, {3.7063699630670185`*^9, 3.7063699700174303`*^9}, 3.7063701205366335`*^9, 3.706370181585146*^9, 3.706370636159452*^9, 3.7064721109894714`*^9, 3.706472145463337*^9, {3.706472191513211*^9, 3.706472206227422*^9}, 3.7064722553500986`*^9, 3.7064723749635086`*^9, { 3.7064725193639297`*^9, 3.706472589850506*^9}, {3.7064728096890297`*^9, 3.706472818241002*^9}, {3.706472848572774*^9, 3.7064729287814727`*^9}, 3.7064729602785277`*^9, {3.706473158711328*^9, 3.7064732498656125`*^9}, 3.706473717962571*^9, 3.706473808051237*^9, 3.7064738449972286`*^9, 3.706473879319541*^9, 3.7064739487262907`*^9, {3.7064741704945087`*^9, 3.706474191052341*^9}, {3.7064742227873273`*^9, 3.7064742595651236`*^9}, 3.7064744872074566`*^9, {3.7064745176000757`*^9, 3.7064745455090513`*^9}, { 3.7064745944412327`*^9, 3.7064746455428553`*^9}, 3.7064746837798815`*^9, { 3.706474809046687*^9, 3.706474878868527*^9}, 3.7064749328860598`*^9, { 3.7064749787904367`*^9, 3.7064750833473167`*^9}, {3.7064752222284217`*^9, 3.706475277228671*^9}, 3.7064753188547077`*^9, {3.7064753705217357`*^9, 3.7064753975110054`*^9}, {3.7064754315091534`*^9, 3.706475463085252*^9}, { 3.70647561095267*^9, 3.7064756566693034`*^9}, 3.706521772598197*^9, { 3.7065220781260386`*^9, 3.7065221603495007`*^9}, {3.706522235872806*^9, 3.706522251236725*^9}, {3.7065223668033595`*^9, 3.706522419067748*^9}, 3.706522494534246*^9, {3.7065225345187197`*^9, 3.706522577253888*^9}, { 3.706522635865285*^9, 3.7065226955166597`*^9}, {3.7065227301301155`*^9, 3.70652274826168*^9}, 3.706522865534769*^9, {3.706522919490949*^9, 3.7065229276821427`*^9}, {3.706523209014064*^9, 3.706523250969928*^9}, 3.706523288879591*^9, {3.706523318883741*^9, 3.706523342258904*^9}, 3.706527357364447*^9, 3.7065274079655905`*^9, {3.7065275554960594`*^9, 3.7065275811008606`*^9}, 3.706869886397094*^9, 3.70686993684147*^9, 3.7068700220245323`*^9, {3.810308133710785*^9, 3.8103081556550245`*^9}, { 3.8103082641375713`*^9, 3.8103083434633355`*^9}, {3.810308399653139*^9, 3.8103084333017983`*^9}}, CellLabel-> "Out[479]=",ExpressionUUID->"c10ec21d-bdaf-4972-8231-3910ca4f4fe4"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], " ", RowBox[{"Cos", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "1"]}], "-", RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Sin", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "2"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Cosh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "3"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Sinh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "4"]}]}]], "Output", CellChangeTimes->{{3.7063658887549987`*^9, 3.7063659182859187`*^9}, { 3.7063659666667023`*^9, 3.706366008444791*^9}, {3.706366072843356*^9, 3.706366099077593*^9}, 3.7063661448651237`*^9, {3.7063661908481197`*^9, 3.7063662738911123`*^9}, {3.706366304893347*^9, 3.70636634010874*^9}, { 3.7063663897367897`*^9, 3.706366531896325*^9}, {3.706366567578878*^9, 3.7063666764442596`*^9}, 3.706366948291458*^9, 3.706367103018876*^9, 3.7063671569181266`*^9, 3.706367255808803*^9, 3.7063672860434093`*^9, { 3.70636740712354*^9, 3.7063674454909763`*^9}, {3.7063674759055643`*^9, 3.706367484000049*^9}, {3.7063675434418645`*^9, 3.706367594758151*^9}, { 3.7063677090656548`*^9, 3.7063677179100103`*^9}, 3.7063678962475586`*^9, 3.706368092710245*^9, {3.706368144739829*^9, 3.7063681501155095`*^9}, { 3.706368325958972*^9, 3.7063684489295397`*^9}, 3.7063685918787193`*^9, 3.706368712566142*^9, {3.7063687513966303`*^9, 3.706368872125106*^9}, { 3.7063689175177865`*^9, 3.7063689422320127`*^9}, {3.7063689836370955`*^9, 3.7063690058702755`*^9}, {3.7063691181955533`*^9, 3.7063691388686347`*^9}, 3.70636917808317*^9, {3.706369217255042*^9, 3.706369344899928*^9}, 3.706369916952623*^9, {3.7063699630670185`*^9, 3.7063699700174303`*^9}, 3.7063701205366335`*^9, 3.706370181585146*^9, 3.706370636159452*^9, 3.7064721109894714`*^9, 3.706472145463337*^9, {3.706472191513211*^9, 3.706472206227422*^9}, 3.7064722553500986`*^9, 3.7064723749635086`*^9, { 3.7064725193639297`*^9, 3.706472589850506*^9}, {3.7064728096890297`*^9, 3.706472818241002*^9}, {3.706472848572774*^9, 3.7064729287814727`*^9}, 3.7064729602785277`*^9, {3.706473158711328*^9, 3.7064732498656125`*^9}, 3.706473717962571*^9, 3.706473808051237*^9, 3.7064738449972286`*^9, 3.706473879319541*^9, 3.7064739487262907`*^9, {3.7064741704945087`*^9, 3.706474191052341*^9}, {3.7064742227873273`*^9, 3.7064742595651236`*^9}, 3.7064744872074566`*^9, {3.7064745176000757`*^9, 3.7064745455090513`*^9}, { 3.7064745944412327`*^9, 3.7064746455428553`*^9}, 3.7064746837798815`*^9, { 3.706474809046687*^9, 3.706474878868527*^9}, 3.7064749328860598`*^9, { 3.7064749787904367`*^9, 3.7064750833473167`*^9}, {3.7064752222284217`*^9, 3.706475277228671*^9}, 3.7064753188547077`*^9, {3.7064753705217357`*^9, 3.7064753975110054`*^9}, {3.7064754315091534`*^9, 3.706475463085252*^9}, { 3.70647561095267*^9, 3.7064756566693034`*^9}, 3.706521772598197*^9, { 3.7065220781260386`*^9, 3.7065221603495007`*^9}, {3.706522235872806*^9, 3.706522251236725*^9}, {3.7065223668033595`*^9, 3.706522419067748*^9}, 3.706522494534246*^9, {3.7065225345187197`*^9, 3.706522577253888*^9}, { 3.706522635865285*^9, 3.7065226955166597`*^9}, {3.7065227301301155`*^9, 3.70652274826168*^9}, 3.706522865534769*^9, {3.706522919490949*^9, 3.7065229276821427`*^9}, {3.706523209014064*^9, 3.706523250969928*^9}, 3.706523288879591*^9, {3.706523318883741*^9, 3.706523342258904*^9}, 3.706527357364447*^9, 3.7065274079655905`*^9, {3.7065275554960594`*^9, 3.7065275811008606`*^9}, 3.706869886397094*^9, 3.70686993684147*^9, 3.7068700220245323`*^9, {3.810308133710785*^9, 3.8103081556550245`*^9}, { 3.8103082641375713`*^9, 3.8103083434633355`*^9}, {3.810308399653139*^9, 3.8103084333047886`*^9}}, CellLabel-> "Out[480]=",ExpressionUUID->"765db071-78b1-48dd-8a86-93a917707c99"], Cell[BoxData[ RowBox[{ RowBox[{ SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Sin", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "1"]}], "-", RowBox[{ SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Cos", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "2"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Sinh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "3"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Cosh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "4"]}]}]], "Output", CellChangeTimes->{{3.7063658887549987`*^9, 3.7063659182859187`*^9}, { 3.7063659666667023`*^9, 3.706366008444791*^9}, {3.706366072843356*^9, 3.706366099077593*^9}, 3.7063661448651237`*^9, {3.7063661908481197`*^9, 3.7063662738911123`*^9}, {3.706366304893347*^9, 3.70636634010874*^9}, { 3.7063663897367897`*^9, 3.706366531896325*^9}, {3.706366567578878*^9, 3.7063666764442596`*^9}, 3.706366948291458*^9, 3.706367103018876*^9, 3.7063671569181266`*^9, 3.706367255808803*^9, 3.7063672860434093`*^9, { 3.70636740712354*^9, 3.7063674454909763`*^9}, {3.7063674759055643`*^9, 3.706367484000049*^9}, {3.7063675434418645`*^9, 3.706367594758151*^9}, { 3.7063677090656548`*^9, 3.7063677179100103`*^9}, 3.7063678962475586`*^9, 3.706368092710245*^9, {3.706368144739829*^9, 3.7063681501155095`*^9}, { 3.706368325958972*^9, 3.7063684489295397`*^9}, 3.7063685918787193`*^9, 3.706368712566142*^9, {3.7063687513966303`*^9, 3.706368872125106*^9}, { 3.7063689175177865`*^9, 3.7063689422320127`*^9}, {3.7063689836370955`*^9, 3.7063690058702755`*^9}, {3.7063691181955533`*^9, 3.7063691388686347`*^9}, 3.70636917808317*^9, {3.706369217255042*^9, 3.706369344899928*^9}, 3.706369916952623*^9, {3.7063699630670185`*^9, 3.7063699700174303`*^9}, 3.7063701205366335`*^9, 3.706370181585146*^9, 3.706370636159452*^9, 3.7064721109894714`*^9, 3.706472145463337*^9, {3.706472191513211*^9, 3.706472206227422*^9}, 3.7064722553500986`*^9, 3.7064723749635086`*^9, { 3.7064725193639297`*^9, 3.706472589850506*^9}, {3.7064728096890297`*^9, 3.706472818241002*^9}, {3.706472848572774*^9, 3.7064729287814727`*^9}, 3.7064729602785277`*^9, {3.706473158711328*^9, 3.7064732498656125`*^9}, 3.706473717962571*^9, 3.706473808051237*^9, 3.7064738449972286`*^9, 3.706473879319541*^9, 3.7064739487262907`*^9, {3.7064741704945087`*^9, 3.706474191052341*^9}, {3.7064742227873273`*^9, 3.7064742595651236`*^9}, 3.7064744872074566`*^9, {3.7064745176000757`*^9, 3.7064745455090513`*^9}, { 3.7064745944412327`*^9, 3.7064746455428553`*^9}, 3.7064746837798815`*^9, { 3.706474809046687*^9, 3.706474878868527*^9}, 3.7064749328860598`*^9, { 3.7064749787904367`*^9, 3.7064750833473167`*^9}, {3.7064752222284217`*^9, 3.706475277228671*^9}, 3.7064753188547077`*^9, {3.7064753705217357`*^9, 3.7064753975110054`*^9}, {3.7064754315091534`*^9, 3.706475463085252*^9}, { 3.70647561095267*^9, 3.7064756566693034`*^9}, 3.706521772598197*^9, { 3.7065220781260386`*^9, 3.7065221603495007`*^9}, {3.706522235872806*^9, 3.706522251236725*^9}, {3.7065223668033595`*^9, 3.706522419067748*^9}, 3.706522494534246*^9, {3.7065225345187197`*^9, 3.706522577253888*^9}, { 3.706522635865285*^9, 3.7065226955166597`*^9}, {3.7065227301301155`*^9, 3.70652274826168*^9}, 3.706522865534769*^9, {3.706522919490949*^9, 3.7065229276821427`*^9}, {3.706523209014064*^9, 3.706523250969928*^9}, 3.706523288879591*^9, {3.706523318883741*^9, 3.706523342258904*^9}, 3.706527357364447*^9, 3.7065274079655905`*^9, {3.7065275554960594`*^9, 3.7065275811008606`*^9}, 3.706869886397094*^9, 3.70686993684147*^9, 3.7068700220245323`*^9, {3.810308133710785*^9, 3.8103081556550245`*^9}, { 3.8103082641375713`*^9, 3.8103083434633355`*^9}, {3.810308399653139*^9, 3.810308433308775*^9}}, CellLabel-> "Out[481]=",ExpressionUUID->"ffde1d3f-f4fe-481f-8764-bbd02d8428b0"], Cell[BoxData[ RowBox[{ RowBox[{ SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Sin", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "1"]}], "-", RowBox[{ SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Cos", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "2"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Sinh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "3"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Cosh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "4"]}]}]], "Output", CellChangeTimes->{{3.7063658887549987`*^9, 3.7063659182859187`*^9}, { 3.7063659666667023`*^9, 3.706366008444791*^9}, {3.706366072843356*^9, 3.706366099077593*^9}, 3.7063661448651237`*^9, {3.7063661908481197`*^9, 3.7063662738911123`*^9}, {3.706366304893347*^9, 3.70636634010874*^9}, { 3.7063663897367897`*^9, 3.706366531896325*^9}, {3.706366567578878*^9, 3.7063666764442596`*^9}, 3.706366948291458*^9, 3.706367103018876*^9, 3.7063671569181266`*^9, 3.706367255808803*^9, 3.7063672860434093`*^9, { 3.70636740712354*^9, 3.7063674454909763`*^9}, {3.7063674759055643`*^9, 3.706367484000049*^9}, {3.7063675434418645`*^9, 3.706367594758151*^9}, { 3.7063677090656548`*^9, 3.7063677179100103`*^9}, 3.7063678962475586`*^9, 3.706368092710245*^9, {3.706368144739829*^9, 3.7063681501155095`*^9}, { 3.706368325958972*^9, 3.7063684489295397`*^9}, 3.7063685918787193`*^9, 3.706368712566142*^9, {3.7063687513966303`*^9, 3.706368872125106*^9}, { 3.7063689175177865`*^9, 3.7063689422320127`*^9}, {3.7063689836370955`*^9, 3.7063690058702755`*^9}, {3.7063691181955533`*^9, 3.7063691388686347`*^9}, 3.70636917808317*^9, {3.706369217255042*^9, 3.706369344899928*^9}, 3.706369916952623*^9, {3.7063699630670185`*^9, 3.7063699700174303`*^9}, 3.7063701205366335`*^9, 3.706370181585146*^9, 3.706370636159452*^9, 3.7064721109894714`*^9, 3.706472145463337*^9, {3.706472191513211*^9, 3.706472206227422*^9}, 3.7064722553500986`*^9, 3.7064723749635086`*^9, { 3.7064725193639297`*^9, 3.706472589850506*^9}, {3.7064728096890297`*^9, 3.706472818241002*^9}, {3.706472848572774*^9, 3.7064729287814727`*^9}, 3.7064729602785277`*^9, {3.706473158711328*^9, 3.7064732498656125`*^9}, 3.706473717962571*^9, 3.706473808051237*^9, 3.7064738449972286`*^9, 3.706473879319541*^9, 3.7064739487262907`*^9, {3.7064741704945087`*^9, 3.706474191052341*^9}, {3.7064742227873273`*^9, 3.7064742595651236`*^9}, 3.7064744872074566`*^9, {3.7064745176000757`*^9, 3.7064745455090513`*^9}, { 3.7064745944412327`*^9, 3.7064746455428553`*^9}, 3.7064746837798815`*^9, { 3.706474809046687*^9, 3.706474878868527*^9}, 3.7064749328860598`*^9, { 3.7064749787904367`*^9, 3.7064750833473167`*^9}, {3.7064752222284217`*^9, 3.706475277228671*^9}, 3.7064753188547077`*^9, {3.7064753705217357`*^9, 3.7064753975110054`*^9}, {3.7064754315091534`*^9, 3.706475463085252*^9}, { 3.70647561095267*^9, 3.7064756566693034`*^9}, 3.706521772598197*^9, { 3.7065220781260386`*^9, 3.7065221603495007`*^9}, {3.706522235872806*^9, 3.706522251236725*^9}, {3.7065223668033595`*^9, 3.706522419067748*^9}, 3.706522494534246*^9, {3.7065225345187197`*^9, 3.706522577253888*^9}, { 3.706522635865285*^9, 3.7065226955166597`*^9}, {3.7065227301301155`*^9, 3.70652274826168*^9}, 3.706522865534769*^9, {3.706522919490949*^9, 3.7065229276821427`*^9}, {3.706523209014064*^9, 3.706523250969928*^9}, 3.706523288879591*^9, {3.706523318883741*^9, 3.706523342258904*^9}, 3.706527357364447*^9, 3.7065274079655905`*^9, {3.7065275554960594`*^9, 3.7065275811008606`*^9}, 3.706869886397094*^9, 3.70686993684147*^9, 3.7068700220245323`*^9, {3.810308133710785*^9, 3.8103081556550245`*^9}, { 3.8103082641375713`*^9, 3.8103083434633355`*^9}, {3.810308399653139*^9, 3.8103084333137913`*^9}}, CellLabel-> "Out[482]=",ExpressionUUID->"41dcdf05-aec5-4839-9280-b80d5f7420c3"], Cell[BoxData[ RowBox[{ RowBox[{ SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Cos", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "1"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Sin", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "2"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Cosh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "3"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Sinh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["c", "4"]}]}]], "Output", CellChangeTimes->{{3.7063658887549987`*^9, 3.7063659182859187`*^9}, { 3.7063659666667023`*^9, 3.706366008444791*^9}, {3.706366072843356*^9, 3.706366099077593*^9}, 3.7063661448651237`*^9, {3.7063661908481197`*^9, 3.7063662738911123`*^9}, {3.706366304893347*^9, 3.70636634010874*^9}, { 3.7063663897367897`*^9, 3.706366531896325*^9}, {3.706366567578878*^9, 3.7063666764442596`*^9}, 3.706366948291458*^9, 3.706367103018876*^9, 3.7063671569181266`*^9, 3.706367255808803*^9, 3.7063672860434093`*^9, { 3.70636740712354*^9, 3.7063674454909763`*^9}, {3.7063674759055643`*^9, 3.706367484000049*^9}, {3.7063675434418645`*^9, 3.706367594758151*^9}, { 3.7063677090656548`*^9, 3.7063677179100103`*^9}, 3.7063678962475586`*^9, 3.706368092710245*^9, {3.706368144739829*^9, 3.7063681501155095`*^9}, { 3.706368325958972*^9, 3.7063684489295397`*^9}, 3.7063685918787193`*^9, 3.706368712566142*^9, {3.7063687513966303`*^9, 3.706368872125106*^9}, { 3.7063689175177865`*^9, 3.7063689422320127`*^9}, {3.7063689836370955`*^9, 3.7063690058702755`*^9}, {3.7063691181955533`*^9, 3.7063691388686347`*^9}, 3.70636917808317*^9, {3.706369217255042*^9, 3.706369344899928*^9}, 3.706369916952623*^9, {3.7063699630670185`*^9, 3.7063699700174303`*^9}, 3.7063701205366335`*^9, 3.706370181585146*^9, 3.706370636159452*^9, 3.7064721109894714`*^9, 3.706472145463337*^9, {3.706472191513211*^9, 3.706472206227422*^9}, 3.7064722553500986`*^9, 3.7064723749635086`*^9, { 3.7064725193639297`*^9, 3.706472589850506*^9}, {3.7064728096890297`*^9, 3.706472818241002*^9}, {3.706472848572774*^9, 3.7064729287814727`*^9}, 3.7064729602785277`*^9, {3.706473158711328*^9, 3.7064732498656125`*^9}, 3.706473717962571*^9, 3.706473808051237*^9, 3.7064738449972286`*^9, 3.706473879319541*^9, 3.7064739487262907`*^9, {3.7064741704945087`*^9, 3.706474191052341*^9}, {3.7064742227873273`*^9, 3.7064742595651236`*^9}, 3.7064744872074566`*^9, {3.7064745176000757`*^9, 3.7064745455090513`*^9}, { 3.7064745944412327`*^9, 3.7064746455428553`*^9}, 3.7064746837798815`*^9, { 3.706474809046687*^9, 3.706474878868527*^9}, 3.7064749328860598`*^9, { 3.7064749787904367`*^9, 3.7064750833473167`*^9}, {3.7064752222284217`*^9, 3.706475277228671*^9}, 3.7064753188547077`*^9, {3.7064753705217357`*^9, 3.7064753975110054`*^9}, {3.7064754315091534`*^9, 3.706475463085252*^9}, { 3.70647561095267*^9, 3.7064756566693034`*^9}, 3.706521772598197*^9, { 3.7065220781260386`*^9, 3.7065221603495007`*^9}, {3.706522235872806*^9, 3.706522251236725*^9}, {3.7065223668033595`*^9, 3.706522419067748*^9}, 3.706522494534246*^9, {3.7065225345187197`*^9, 3.706522577253888*^9}, { 3.706522635865285*^9, 3.7065226955166597`*^9}, {3.7065227301301155`*^9, 3.70652274826168*^9}, 3.706522865534769*^9, {3.706522919490949*^9, 3.7065229276821427`*^9}, {3.706523209014064*^9, 3.706523250969928*^9}, 3.706523288879591*^9, {3.706523318883741*^9, 3.706523342258904*^9}, 3.706527357364447*^9, 3.7065274079655905`*^9, {3.7065275554960594`*^9, 3.7065275811008606`*^9}, 3.706869886397094*^9, 3.70686993684147*^9, 3.7068700220245323`*^9, {3.810308133710785*^9, 3.8103081556550245`*^9}, { 3.8103082641375713`*^9, 3.8103083434633355`*^9}, {3.810308399653139*^9, 3.8103084333179035`*^9}}, CellLabel-> "Out[483]=",ExpressionUUID->"c2e2aa01-8472-4647-9c00-ccffab53d037"], Cell[BoxData[ RowBox[{ RowBox[{ SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Cos", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "1"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Sin", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "2"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Cosh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "3"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Sinh", "[", RowBox[{"x", " ", "\[Beta]"}], "]"}], " ", SubscriptBox["d", "4"]}]}]], "Output", CellChangeTimes->{{3.7063658887549987`*^9, 3.7063659182859187`*^9}, { 3.7063659666667023`*^9, 3.706366008444791*^9}, {3.706366072843356*^9, 3.706366099077593*^9}, 3.7063661448651237`*^9, {3.7063661908481197`*^9, 3.7063662738911123`*^9}, {3.706366304893347*^9, 3.70636634010874*^9}, { 3.7063663897367897`*^9, 3.706366531896325*^9}, {3.706366567578878*^9, 3.7063666764442596`*^9}, 3.706366948291458*^9, 3.706367103018876*^9, 3.7063671569181266`*^9, 3.706367255808803*^9, 3.7063672860434093`*^9, { 3.70636740712354*^9, 3.7063674454909763`*^9}, {3.7063674759055643`*^9, 3.706367484000049*^9}, {3.7063675434418645`*^9, 3.706367594758151*^9}, { 3.7063677090656548`*^9, 3.7063677179100103`*^9}, 3.7063678962475586`*^9, 3.706368092710245*^9, {3.706368144739829*^9, 3.7063681501155095`*^9}, { 3.706368325958972*^9, 3.7063684489295397`*^9}, 3.7063685918787193`*^9, 3.706368712566142*^9, {3.7063687513966303`*^9, 3.706368872125106*^9}, { 3.7063689175177865`*^9, 3.7063689422320127`*^9}, {3.7063689836370955`*^9, 3.7063690058702755`*^9}, {3.7063691181955533`*^9, 3.7063691388686347`*^9}, 3.70636917808317*^9, {3.706369217255042*^9, 3.706369344899928*^9}, 3.706369916952623*^9, {3.7063699630670185`*^9, 3.7063699700174303`*^9}, 3.7063701205366335`*^9, 3.706370181585146*^9, 3.706370636159452*^9, 3.7064721109894714`*^9, 3.706472145463337*^9, {3.706472191513211*^9, 3.706472206227422*^9}, 3.7064722553500986`*^9, 3.7064723749635086`*^9, { 3.7064725193639297`*^9, 3.706472589850506*^9}, {3.7064728096890297`*^9, 3.706472818241002*^9}, {3.706472848572774*^9, 3.7064729287814727`*^9}, 3.7064729602785277`*^9, {3.706473158711328*^9, 3.7064732498656125`*^9}, 3.706473717962571*^9, 3.706473808051237*^9, 3.7064738449972286`*^9, 3.706473879319541*^9, 3.7064739487262907`*^9, {3.7064741704945087`*^9, 3.706474191052341*^9}, {3.7064742227873273`*^9, 3.7064742595651236`*^9}, 3.7064744872074566`*^9, {3.7064745176000757`*^9, 3.7064745455090513`*^9}, { 3.7064745944412327`*^9, 3.7064746455428553`*^9}, 3.7064746837798815`*^9, { 3.706474809046687*^9, 3.706474878868527*^9}, 3.7064749328860598`*^9, { 3.7064749787904367`*^9, 3.7064750833473167`*^9}, {3.7064752222284217`*^9, 3.706475277228671*^9}, 3.7064753188547077`*^9, {3.7064753705217357`*^9, 3.7064753975110054`*^9}, {3.7064754315091534`*^9, 3.706475463085252*^9}, { 3.70647561095267*^9, 3.7064756566693034`*^9}, 3.706521772598197*^9, { 3.7065220781260386`*^9, 3.7065221603495007`*^9}, {3.706522235872806*^9, 3.706522251236725*^9}, {3.7065223668033595`*^9, 3.706522419067748*^9}, 3.706522494534246*^9, {3.7065225345187197`*^9, 3.706522577253888*^9}, { 3.706522635865285*^9, 3.7065226955166597`*^9}, {3.7065227301301155`*^9, 3.70652274826168*^9}, 3.706522865534769*^9, {3.706522919490949*^9, 3.7065229276821427`*^9}, {3.706523209014064*^9, 3.706523250969928*^9}, 3.706523288879591*^9, {3.706523318883741*^9, 3.706523342258904*^9}, 3.706527357364447*^9, 3.7065274079655905`*^9, {3.7065275554960594`*^9, 3.7065275811008606`*^9}, 3.706869886397094*^9, 3.70686993684147*^9, 3.7068700220245323`*^9, {3.810308133710785*^9, 3.8103081556550245`*^9}, { 3.8103082641375713`*^9, 3.8103083434633355`*^9}, {3.810308399653139*^9, 3.8103084333229475`*^9}}, CellLabel-> "Out[484]=",ExpressionUUID->"fe92be3a-bb9b-4ea3-858c-e431bf9416f4"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "EI"}], " ", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], " ", SubscriptBox["c", "1"]}], "-", RowBox[{ SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], " ", SubscriptBox["c", "2"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Sinh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], " ", SubscriptBox["c", "3"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Cosh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], " ", SubscriptBox["c", "4"]}]}], ")"}]}], "-", FractionBox[ RowBox[{"EI", " ", "M", " ", SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Cos", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], " ", SubscriptBox["c", "1"]}], "+", RowBox[{ RowBox[{"Sin", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], " ", SubscriptBox["c", "2"]}], "+", RowBox[{ RowBox[{"Cosh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], " ", SubscriptBox["c", "3"]}], "+", RowBox[{ RowBox[{"Sinh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], " ", SubscriptBox["c", "4"]}]}], ")"}]}], "\[Mu]"], "+", RowBox[{"EI", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", SuperscriptBox["\[Beta]", "3"]}], " ", SubscriptBox["d", "2"]}], "+", RowBox[{ SuperscriptBox["\[Beta]", "3"], " ", SubscriptBox["d", "4"]}]}], ")"}]}]}], "\[Equal]", "0"}]], "Output", CellChangeTimes->{{3.7063658887549987`*^9, 3.7063659182859187`*^9}, { 3.7063659666667023`*^9, 3.706366008444791*^9}, {3.706366072843356*^9, 3.706366099077593*^9}, 3.7063661448651237`*^9, {3.7063661908481197`*^9, 3.7063662738911123`*^9}, {3.706366304893347*^9, 3.70636634010874*^9}, { 3.7063663897367897`*^9, 3.706366531896325*^9}, {3.706366567578878*^9, 3.7063666764442596`*^9}, 3.706366948291458*^9, 3.706367103018876*^9, 3.7063671569181266`*^9, 3.706367255808803*^9, 3.7063672860434093`*^9, { 3.70636740712354*^9, 3.7063674454909763`*^9}, {3.7063674759055643`*^9, 3.706367484000049*^9}, {3.7063675434418645`*^9, 3.706367594758151*^9}, { 3.7063677090656548`*^9, 3.7063677179100103`*^9}, 3.7063678962475586`*^9, 3.706368092710245*^9, {3.706368144739829*^9, 3.7063681501155095`*^9}, { 3.706368325958972*^9, 3.7063684489295397`*^9}, 3.7063685918787193`*^9, 3.706368712566142*^9, {3.7063687513966303`*^9, 3.706368872125106*^9}, { 3.7063689175177865`*^9, 3.7063689422320127`*^9}, {3.7063689836370955`*^9, 3.7063690058702755`*^9}, {3.7063691181955533`*^9, 3.7063691388686347`*^9}, 3.70636917808317*^9, {3.706369217255042*^9, 3.706369344899928*^9}, 3.706369916952623*^9, {3.7063699630670185`*^9, 3.7063699700174303`*^9}, 3.7063701205366335`*^9, 3.706370181585146*^9, 3.706370636159452*^9, 3.7064721109894714`*^9, 3.706472145463337*^9, {3.706472191513211*^9, 3.706472206227422*^9}, 3.7064722553500986`*^9, 3.7064723749635086`*^9, { 3.7064725193639297`*^9, 3.706472589850506*^9}, {3.7064728096890297`*^9, 3.706472818241002*^9}, {3.706472848572774*^9, 3.7064729287814727`*^9}, 3.7064729602785277`*^9, {3.706473158711328*^9, 3.7064732498656125`*^9}, 3.706473717962571*^9, 3.706473808051237*^9, 3.7064738449972286`*^9, 3.706473879319541*^9, 3.7064739487262907`*^9, {3.7064741704945087`*^9, 3.706474191052341*^9}, {3.7064742227873273`*^9, 3.7064742595651236`*^9}, 3.7064744872074566`*^9, {3.7064745176000757`*^9, 3.7064745455090513`*^9}, { 3.7064745944412327`*^9, 3.7064746455428553`*^9}, 3.7064746837798815`*^9, { 3.706474809046687*^9, 3.706474878868527*^9}, 3.7064749328860598`*^9, { 3.7064749787904367`*^9, 3.7064750833473167`*^9}, {3.7064752222284217`*^9, 3.706475277228671*^9}, 3.7064753188547077`*^9, {3.7064753705217357`*^9, 3.7064753975110054`*^9}, {3.7064754315091534`*^9, 3.706475463085252*^9}, { 3.70647561095267*^9, 3.7064756566693034`*^9}, 3.706521772598197*^9, { 3.7065220781260386`*^9, 3.7065221603495007`*^9}, {3.706522235872806*^9, 3.706522251236725*^9}, {3.7065223668033595`*^9, 3.706522419067748*^9}, 3.706522494534246*^9, {3.7065225345187197`*^9, 3.706522577253888*^9}, { 3.706522635865285*^9, 3.7065226955166597`*^9}, {3.7065227301301155`*^9, 3.70652274826168*^9}, 3.706522865534769*^9, {3.706522919490949*^9, 3.7065229276821427`*^9}, {3.706523209014064*^9, 3.706523250969928*^9}, 3.706523288879591*^9, {3.706523318883741*^9, 3.706523342258904*^9}, 3.706527357364447*^9, 3.7065274079655905`*^9, {3.7065275554960594`*^9, 3.7065275811008606`*^9}, 3.706869886397094*^9, 3.70686993684147*^9, 3.7068700220245323`*^9, {3.810308133710785*^9, 3.8103081556550245`*^9}, { 3.8103082641375713`*^9, 3.8103083434633355`*^9}, {3.810308399653139*^9, 3.8103084333319106`*^9}}, CellLabel-> "Out[492]=",ExpressionUUID->"eccab789-298d-4da7-af36-c54d6ac5f7ff"], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "1", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", RowBox[{"Cos", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], RowBox[{"Sin", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], RowBox[{"Cosh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], RowBox[{"Sinh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}, { RowBox[{"Cos", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], RowBox[{"Sin", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], RowBox[{"Cosh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], RowBox[{"Sinh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}], RowBox[{"-", "1"}], "0", RowBox[{"-", "1"}], "0"}, { RowBox[{ RowBox[{"-", "\[Beta]"}], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], RowBox[{"\[Beta]", " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], RowBox[{"\[Beta]", " ", RowBox[{"Sinh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], RowBox[{"\[Beta]", " ", RowBox[{"Cosh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], "0", RowBox[{"-", "\[Beta]"}], "0", RowBox[{"-", "\[Beta]"}]}, { RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], "0", SuperscriptBox["\[Beta]", "2"], "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", RowBox[{ RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], RowBox[{ RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Cosh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Sinh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}]}, { RowBox[{ RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], RowBox[{ RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Cosh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Sinh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], SuperscriptBox["\[Beta]", "2"], "0", RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], "0"}, { RowBox[{ RowBox[{"-", FractionBox[ RowBox[{"EI", " ", "M", " ", SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], "\[Mu]"]}], "-", RowBox[{"EI", " ", SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}]}], RowBox[{ RowBox[{"EI", " ", SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Cos", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], "-", FractionBox[ RowBox[{"EI", " ", "M", " ", SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Sin", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], "\[Mu]"]}], RowBox[{ RowBox[{"-", FractionBox[ RowBox[{"EI", " ", "M", " ", SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Cosh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], "\[Mu]"]}], "-", RowBox[{"EI", " ", SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Sinh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}]}], RowBox[{ RowBox[{ RowBox[{"-", "EI"}], " ", SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Cosh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], "-", FractionBox[ RowBox[{"EI", " ", "M", " ", SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Sinh", "[", FractionBox[ RowBox[{"L", " ", "\[Beta]"}], "2"], "]"}]}], "\[Mu]"]}], "0", RowBox[{ RowBox[{"-", "EI"}], " ", SuperscriptBox["\[Beta]", "3"]}], "0", RowBox[{"EI", " ", SuperscriptBox["\[Beta]", "3"]}]} }, GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.7063658887549987`*^9, 3.7063659182859187`*^9}, { 3.7063659666667023`*^9, 3.706366008444791*^9}, {3.706366072843356*^9, 3.706366099077593*^9}, 3.7063661448651237`*^9, {3.7063661908481197`*^9, 3.7063662738911123`*^9}, {3.706366304893347*^9, 3.70636634010874*^9}, { 3.7063663897367897`*^9, 3.706366531896325*^9}, {3.706366567578878*^9, 3.7063666764442596`*^9}, 3.706366948291458*^9, 3.706367103018876*^9, 3.7063671569181266`*^9, 3.706367255808803*^9, 3.7063672860434093`*^9, { 3.70636740712354*^9, 3.7063674454909763`*^9}, {3.7063674759055643`*^9, 3.706367484000049*^9}, {3.7063675434418645`*^9, 3.706367594758151*^9}, { 3.7063677090656548`*^9, 3.7063677179100103`*^9}, 3.7063678962475586`*^9, 3.706368092710245*^9, {3.706368144739829*^9, 3.7063681501155095`*^9}, { 3.706368325958972*^9, 3.7063684489295397`*^9}, 3.7063685918787193`*^9, 3.706368712566142*^9, {3.7063687513966303`*^9, 3.706368872125106*^9}, { 3.7063689175177865`*^9, 3.7063689422320127`*^9}, {3.7063689836370955`*^9, 3.7063690058702755`*^9}, {3.7063691181955533`*^9, 3.7063691388686347`*^9}, 3.70636917808317*^9, {3.706369217255042*^9, 3.706369344899928*^9}, 3.706369916952623*^9, {3.7063699630670185`*^9, 3.7063699700174303`*^9}, 3.7063701205366335`*^9, 3.706370181585146*^9, 3.706370636159452*^9, 3.7064721109894714`*^9, 3.706472145463337*^9, {3.706472191513211*^9, 3.706472206227422*^9}, 3.7064722553500986`*^9, 3.7064723749635086`*^9, { 3.7064725193639297`*^9, 3.706472589850506*^9}, {3.7064728096890297`*^9, 3.706472818241002*^9}, {3.706472848572774*^9, 3.7064729287814727`*^9}, 3.7064729602785277`*^9, {3.706473158711328*^9, 3.7064732498656125`*^9}, 3.706473717962571*^9, 3.706473808051237*^9, 3.7064738449972286`*^9, 3.706473879319541*^9, 3.7064739487262907`*^9, {3.7064741704945087`*^9, 3.706474191052341*^9}, {3.7064742227873273`*^9, 3.7064742595651236`*^9}, 3.7064744872074566`*^9, {3.7064745176000757`*^9, 3.7064745455090513`*^9}, { 3.7064745944412327`*^9, 3.7064746455428553`*^9}, 3.7064746837798815`*^9, { 3.706474809046687*^9, 3.706474878868527*^9}, 3.7064749328860598`*^9, { 3.7064749787904367`*^9, 3.7064750833473167`*^9}, {3.7064752222284217`*^9, 3.706475277228671*^9}, 3.7064753188547077`*^9, {3.7064753705217357`*^9, 3.7064753975110054`*^9}, {3.7064754315091534`*^9, 3.706475463085252*^9}, { 3.70647561095267*^9, 3.7064756566693034`*^9}, 3.706521772598197*^9, { 3.7065220781260386`*^9, 3.7065221603495007`*^9}, {3.706522235872806*^9, 3.706522251236725*^9}, {3.7065223668033595`*^9, 3.706522419067748*^9}, 3.706522494534246*^9, {3.7065225345187197`*^9, 3.706522577253888*^9}, { 3.706522635865285*^9, 3.7065226955166597`*^9}, {3.7065227301301155`*^9, 3.70652274826168*^9}, 3.706522865534769*^9, {3.706522919490949*^9, 3.7065229276821427`*^9}, {3.706523209014064*^9, 3.706523250969928*^9}, 3.706523288879591*^9, {3.706523318883741*^9, 3.706523342258904*^9}, 3.706527357364447*^9, 3.7065274079655905`*^9, {3.7065275554960594`*^9, 3.7065275811008606`*^9}, 3.706869886397094*^9, 3.70686993684147*^9, 3.7068700220245323`*^9, {3.810308133710785*^9, 3.8103081556550245`*^9}, { 3.8103082641375713`*^9, 3.8103083434633355`*^9}, {3.810308399653139*^9, 3.8103084333378906`*^9}}, CellLabel-> "Out[495]//MatrixForm=",ExpressionUUID->"ed3e2b6e-6407-42f9-a755-\ 9fad0c81dfa1"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"matrizcoef", "=", RowBox[{"matrizcoef", "/.", RowBox[{"{", RowBox[{ RowBox[{"L", "\[Rule]", "Lv"}], ",", RowBox[{"\[Mu]", "->", "\[Mu]v"}], ",", RowBox[{"M", "\[Rule]", "Mv"}], ",", RowBox[{"EI", "\[Rule]", "EIv"}]}], "}"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", "matrizcoef", "]"}]}], "Input", CellChangeTimes->{{3.7064743893899856`*^9, 3.7064744041221933`*^9}, { 3.706474452135716*^9, 3.7064745432774963`*^9}, {3.7064746193279634`*^9, 3.7064746204478693`*^9}, {3.7064746602521734`*^9, 3.7064746822436867`*^9}}, CellLabel-> "In[496]:=",ExpressionUUID->"2b13f1b8-252c-4b8f-b1ee-4bb7d165476f"], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "1", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", RowBox[{"Cos", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], RowBox[{"Sin", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], RowBox[{"Cosh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], RowBox[{"Sinh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}, { RowBox[{"Cos", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], RowBox[{"Sin", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], RowBox[{"Cosh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], RowBox[{"Sinh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], RowBox[{"-", "1"}], "0", RowBox[{"-", "1"}], "0"}, { RowBox[{ RowBox[{"-", "\[Beta]"}], " ", RowBox[{"Sin", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], RowBox[{"\[Beta]", " ", RowBox[{"Cos", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], RowBox[{"\[Beta]", " ", RowBox[{"Sinh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], RowBox[{"\[Beta]", " ", RowBox[{"Cosh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], "0", RowBox[{"-", "\[Beta]"}], "0", RowBox[{"-", "\[Beta]"}]}, { RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], "0", SuperscriptBox["\[Beta]", "2"], "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", RowBox[{ RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], " ", RowBox[{"Cos", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], RowBox[{ RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], " ", RowBox[{"Sin", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Cosh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Sinh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}]}, { RowBox[{ RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], " ", RowBox[{"Cos", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], RowBox[{ RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], " ", RowBox[{"Sin", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Cosh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], RowBox[{ SuperscriptBox["\[Beta]", "2"], " ", RowBox[{"Sinh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], SuperscriptBox["\[Beta]", "2"], "0", RowBox[{"-", SuperscriptBox["\[Beta]", "2"]}], "0"}, { RowBox[{ RowBox[{ RowBox[{"-", FractionBox["31250000", "3"]}], " ", SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Cos", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], "-", RowBox[{ FractionBox["5000000", "3"], " ", SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Sin", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}]}], RowBox[{ RowBox[{ FractionBox["5000000", "3"], " ", SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Cos", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], "-", RowBox[{ FractionBox["31250000", "3"], " ", SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Sin", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}]}], RowBox[{ RowBox[{ RowBox[{"-", FractionBox["31250000", "3"]}], " ", SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Cosh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], "-", RowBox[{ FractionBox["5000000", "3"], " ", SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Sinh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}]}], RowBox[{ RowBox[{ RowBox[{"-", FractionBox["5000000", "3"]}], " ", SuperscriptBox["\[Beta]", "3"], " ", RowBox[{"Cosh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], "-", RowBox[{ FractionBox["31250000", "3"], " ", SuperscriptBox["\[Beta]", "4"], " ", RowBox[{"Sinh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}]}], "0", RowBox[{"-", FractionBox[ RowBox[{"5000000", " ", SuperscriptBox["\[Beta]", "3"]}], "3"]}], "0", FractionBox[ RowBox[{"5000000", " ", SuperscriptBox["\[Beta]", "3"]}], "3"]} }, GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{ 3.706474487360545*^9, {3.7064745177596893`*^9, 3.706474545657657*^9}, { 3.706474594608888*^9, 3.7064746456902523`*^9}, 3.706474683903524*^9, { 3.7064748091853666`*^9, 3.7064748790142884`*^9}, 3.706474933031165*^9, { 3.7064749789549847`*^9, 3.7064750834889145`*^9}, {3.706475222399358*^9, 3.706475277411801*^9}, 3.7064753190758643`*^9, {3.7064753707018633`*^9, 3.706475397685132*^9}, {3.7064754317088385`*^9, 3.706475463270425*^9}, { 3.7064756111367874`*^9, 3.7064756568544006`*^9}, 3.706521772770074*^9, { 3.706522078454168*^9, 3.706522160499133*^9}, {3.7065222360196624`*^9, 3.7065222513773518`*^9}, {3.7065223669439974`*^9, 3.7065224192083745`*^9}, 3.7065224946905003`*^9, {3.7065225346587796`*^9, 3.706522577394495*^9}, { 3.706522635990287*^9, 3.7065226956260624`*^9}, {3.706522730239483*^9, 3.706522748386667*^9}, 3.706522865670892*^9, {3.706522919625351*^9, 3.7065229278021107`*^9}, {3.706523209153144*^9, 3.7065232510880127`*^9}, { 3.706523289038659*^9, 3.7065233423995523`*^9}, 3.706527357500493*^9, 3.7065274081098747`*^9, {3.70652755564015*^9, 3.706527581232918*^9}, 3.7068698866470895`*^9, 3.706869937060214*^9, 3.70687002216514*^9, { 3.8103081339446115`*^9, 3.8103081558175573`*^9}, {3.8103082643010187`*^9, 3.810308343591844*^9}, {3.810308399793601*^9, 3.810308433398618*^9}}, CellLabel-> "Out[497]//MatrixForm=",ExpressionUUID->"c6f7cd4f-fca4-43b7-905a-\ ec94a8cab915"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"EqTranscendental", "=", RowBox[{"Det", "[", "matrizcoef", "]"}]}]], "Input", CellChangeTimes->{{3.706369202271945*^9, 3.7063693280883737`*^9}, { 3.706472543259468*^9, 3.7064725757710657`*^9}}, CellLabel-> "In[498]:=",ExpressionUUID->"6d79e6cb-a992-4d5b-9b6c-6c5358d9eb62"], Cell[BoxData[ RowBox[{ FractionBox["1250000", "3"], " ", SuperscriptBox["\[Beta]", "10"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "256"}], " ", RowBox[{"Cos", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], " ", RowBox[{"Cosh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], " ", RowBox[{"Sinh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], "+", RowBox[{"400", " ", "\[Beta]", " ", RowBox[{"Cosh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], " ", SuperscriptBox[ RowBox[{"Sin", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], "2"], " ", RowBox[{"Sinh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}]}], "-", RowBox[{"400", " ", "\[Beta]", " ", RowBox[{"Cos", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], " ", RowBox[{"Sin", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], " ", SuperscriptBox[ RowBox[{"Sinh", "[", RowBox[{"2", " ", "\[Beta]"}], "]"}], "2"]}]}], ")"}]}]], "Output", CellChangeTimes->{ 3.7064746457062654`*^9, 3.706474683922538*^9, {3.7064748092711267`*^9, 3.7064748790287027`*^9}, 3.7064749330476894`*^9, {3.7064749790515804`*^9, 3.706475083507428*^9}, {3.706475222466339*^9, 3.7064752774313135`*^9}, 3.7064753190958796`*^9, {3.706475370802038*^9, 3.7064753977071476`*^9}, { 3.706475431822469*^9, 3.7064754632924385`*^9}, {3.70647561124391*^9, 3.7064756568754168`*^9}, 3.7065217729566154`*^9, {3.7065220784697924`*^9, 3.706522160499133*^9}, {3.7065222360356703`*^9, 3.7065222513929787`*^9}, { 3.7065223670962543`*^9, 3.7065224192240105`*^9}, 3.706522494706126*^9, { 3.706522534752531*^9, 3.706522577410123*^9}, {3.7065226360119963`*^9, 3.706522695641668*^9}, {3.706522730255124*^9, 3.7065227484022903`*^9}, 3.7065228656865287`*^9, {3.7065229196722136`*^9, 3.7065229278511047`*^9}, { 3.7065232092112036`*^9, 3.7065232511460533`*^9}, {3.706523289132409*^9, 3.7065233424151573`*^9}, 3.7065273575130005`*^9, 3.7065274081293907`*^9, { 3.7065275556551585`*^9, 3.7065275812499285`*^9}, 3.706869886772089*^9, 3.7068699371539516`*^9, 3.7068700222745175`*^9, {3.810308133996437*^9, 3.8103081558762836`*^9}, {3.810308264353845*^9, 3.8103083436346807`*^9}, { 3.8103083998424287`*^9, 3.810308433441473*^9}}, CellLabel-> "Out[498]=",ExpressionUUID->"c49820fa-e028-4e0d-a3c0-43f76bc17d74"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"EqTranscendental", "/", RowBox[{"(", RowBox[{"1250000", "*", RowBox[{"\[Beta]", "^", "10"}]}], ")"}]}], ",", RowBox[{"{", RowBox[{"\[Beta]", ",", "0", ",", "10"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "8"}], ",", "8"}], "}"}]}], "}"}]}], ",", RowBox[{"LabelStyle", "->", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "16"}], "}"}]}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\[Beta]", ",", "det"}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.706369131507039*^9, 3.7063691761655455`*^9}, { 3.706472774841433*^9, 3.7064728813607745`*^9}, 3.7064748205704966`*^9, { 3.706475180207288*^9, 3.7064752762657223`*^9}, 3.706475317420931*^9, 3.7065220986710043`*^9, {3.810308086483238*^9, 3.810308154207941*^9}, { 3.8103082397525835`*^9, 3.81030843208893*^9}}, CellLabel-> "In[499]:=",ExpressionUUID->"63f372ce-3d53-4a19-b18a-d8476e3cee39"], Cell[BoxData[ GraphicsBox[{{{}, {}, TagBox[ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ 1.], LineBox[CompressedData[" 1:eJwBYQKe/SFib1JlAgAAACUAAAACAAAAnX5iBjFkiz5p9vaREEOvvcTTIExX IGk/kX8yyDZOar//xr6DICB5P6KNBw3ETYq/DpK2sArYgj9BukBrUZedv53A jR8FIIk/3cBVSopNqr8s72SO/2ePP3ceOZaKjLS/3Q6e/vzXkj/lF1ETJJe9 vySmCTb6+5U/hHGzQkgjxL9sPXVt9x+ZP51ChRFnTcq/s9TgpPRDnD+aDSWM 9qTQv/prTNzxZ58/wLifLWyM1L+gAdyJ90WhP1c8fAsT3di/RM2RJfbXoj+L 1NxI6Zbdv+iYR8H0aaQ/udz6OfZc4b+MZP1c8/ulP28I6bQMI+S/0/tolPAf qT89qNH870zqv3bHHjDvsao/jzK4W7ew7b8ak9TL7UOsP9Mrg0+EpPC/YipA A+tnrz8rcMZvm4v0vwL7es/0fLA/pyZnbYSm9r/U4FUd9EWxP2kn80On2/i/ eKwLufLXsj/CAG/+iZT9v0qS5gbyoLM/5OssESAMAMAceMFU8Wm0P3FSdkEO WwHAwEN38O/7tT9rmWtRFiAEwAfb4iftH7k/saOe+1xGCsDYwL117Oi5P112 3yhb8AvAqqaYw+uxuj8A/wK3RKcNwE5yTl/qQ7w/viTYmt2dEMCWCbqW52e/ P+YocqsafxTAtHdKcnMYwD9c8SsxSYcVwJzqNxnzfMA/67zjcsSVFsBu0BJn 8kXBP6Lt5xOExRjAEpzIAvHXwj9vHpgqPW8dwPsOtqlwPMM/zQvqQeqoHsDk gaNQ8KDDP1M48bWa6B/A0TkVABiowz8AAAAAAAAgwCQFNW0= "]], LineBox[{{0.53820253917635, -8.}, { 0.5394773384103873, -7.197583131555567}, { 0.5456865654368539, -3.0436955689839165`}, {0.5581050194897873, 6.300427110869019}, {0.5601632969798146, 8.}}], LineBox[{{6.283180451991658, 8.}, {6.283180451992081, -8.}}], LineBox[{{9.424738519672669, 8.}, {9.424738519672669, -8.}}], LineBox[{{3.1412351415112956`, 8.}, {3.141235356829069, -8.}}], LineBox[{{1.5706391862303513`, 8.}, {1.5708366595094851`, -8.}}], LineBox[{{2.03090088840208, -8.}, {2.0309253349430136`, 8.}}], LineBox[{{4.712368579278448, 8.}, {4.71236857957207, -8.}}], LineBox[{{3.575210591997465, -8.}, {3.5752106265274457`, 8.}}], LineBox[{{7.853958929604905, 8.}, {7.8539589296049055`, -8.}}], LineBox[{{8.26524231211991, -8.}, {8.26524231211991, 8.}}], LineBox[{{5.134380454935305, -8.}, {5.134380454986957, 8.}}], LineBox[{{6.698610598095977, -8.}, {6.698610598096052, 8.}}], LineBox[{{9.83317115206994, -8.}, {9.83317115206994, 8.}}]}, Annotation[#, "Charting`Private`Tag$9840#1"]& ]}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{ FormBox[ TagBox["\[Beta]", HoldForm], TraditionalForm], FormBox["det", TraditionalForm]}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{True, True}, {True, True}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], ImagePadding->All, LabelStyle->{FontSize -> 16}, Method->{ "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0, 10}, {-8, 8}}, PlotRangeClipping->True, PlotRangePadding->{{0, 0}, {0, 0}}, Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{ 3.7064728183505945`*^9, {3.7064728486688385`*^9, 3.706472928907544*^9}, 3.70647296043312*^9, {3.7064731588609457`*^9, 3.706473249991719*^9}, 3.7064737181307526`*^9, 3.7064738082414103`*^9, 3.706473845179356*^9, 3.706473879634598*^9, 3.7064739488713937`*^9, 3.70647417059608*^9, { 3.7064742229693327`*^9, 3.7064742597252393`*^9}, 3.706474487568164*^9, { 3.7064745179678545`*^9, 3.7064745458577986`*^9}, {3.706474594817539*^9, 3.706474645779798*^9}, 3.7064746839806414`*^9, {3.706474809319643*^9, 3.7064748791012545`*^9}, 3.7064749331168833`*^9, {3.7064749791046147`*^9, 3.7064750835804844`*^9}, {3.7064752225632744`*^9, 3.706475277533386*^9}, 3.7064753191894455`*^9, {3.7064753708555784`*^9, 3.7064753978074713`*^9}, { 3.7064754318745203`*^9, 3.706475463381936*^9}, {3.7064756113014493`*^9, 3.706475656957465*^9}, 3.7065217737115135`*^9, {3.706522078548277*^9, 3.706522160577263*^9}, {3.7065222361004176`*^9, 3.706522251456933*^9}, { 3.7065223671275043`*^9, 3.706522419286501*^9}, 3.7065224947530003`*^9, { 3.706522534799406*^9, 3.706522577472621*^9}, {3.706522636066389*^9, 3.7065226957041607`*^9}, {3.706522730286357*^9, 3.7065227484491777`*^9}, 3.7065228657516727`*^9, {3.706522919734743*^9, 3.7065229279136057`*^9}, { 3.7065232092812557`*^9, 3.7065232512121077`*^9}, {3.7065232891792855`*^9, 3.7065233424776716`*^9}, 3.70652735755455*^9, 3.706527408198818*^9, { 3.7065275557026215`*^9, 3.7065275813107786`*^9}, 3.706869887615859*^9, 3.706869937200943*^9, 3.7068700223373394`*^9, {3.810308134217697*^9, 3.810308155946054*^9}, {3.8103082645531816`*^9, 3.8103083437054434`*^9}, { 3.810308399929139*^9, 3.8103084335194817`*^9}}, CellLabel-> "Out[499]=",ExpressionUUID->"cc341f32-7bc4-44ff-a9a2-aeb8d7d5b2e3"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"raiz", "=", RowBox[{"FindRoot", "[", RowBox[{ RowBox[{"EqTranscendental", "\[Equal]", "0"}], ",", RowBox[{"{", RowBox[{"\[Beta]", ",", "0.8"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.706368471157977*^9, 3.7063684785159082`*^9}, { 3.706368525066246*^9, 3.706368590657777*^9}, 3.706368711175528*^9, { 3.7063688689688473`*^9, 3.706368870977652*^9}, {3.706368935366739*^9, 3.7063689409920025`*^9}, {3.706368981767687*^9, 3.706369004100423*^9}, 3.7063691153181133`*^9, {3.706472907830927*^9, 3.706472921737553*^9}, { 3.7064732147747207`*^9, 3.706473215264942*^9}, {3.706474836208194*^9, 3.7064748525604906`*^9}, {3.7064750167009935`*^9, 3.706475017969355*^9}, { 3.7064750713931046`*^9, 3.7064750718446584`*^9}, 3.7064753849274464`*^9, { 3.706475447973426*^9, 3.7064754483808875`*^9}, {3.7064756238344965`*^9, 3.7064756373090553`*^9}, {3.7065220752354136`*^9, 3.70652207568204*^9}, { 3.7065221185147147`*^9, 3.706522148014846*^9}, {3.7065222338490124`*^9, 3.7065222345501127`*^9}, {3.706522379985079*^9, 3.7065223803322372`*^9}}, CellLabel-> "In[500]:=",ExpressionUUID->"371b31fe-f952-43b2-8512-a2b1338b0003"], Cell[BoxData[ RowBox[{"{", RowBox[{"\[Beta]", "\[Rule]", "0.5499438395751107`"}], "}"}]], "Output", CellChangeTimes->{ 3.7063685921503153`*^9, 3.7063687127422667`*^9, {3.7063687516001897`*^9, 3.706368872335783*^9}, {3.70636891770842*^9, 3.706368942403648*^9}, { 3.7063689838062143`*^9, 3.706369006032392*^9}, {3.706369118368176*^9, 3.7063691390053253`*^9}, 3.7063691782588253`*^9, {3.7063692175022163`*^9, 3.706369345080085*^9}, 3.706369917137536*^9, {3.7063699632679744`*^9, 3.7063699701871676`*^9}, 3.7063701207214775`*^9, 3.706370181769532*^9, 3.706370636338154*^9, 3.706472112016121*^9, 3.7064721456834927`*^9, { 3.7064721916342955`*^9, 3.7064722066111946`*^9}, 3.7064722555112514`*^9, 3.7064723751350727`*^9, {3.706472519526558*^9, 3.7064725900015936`*^9}, { 3.7064728097926154`*^9, 3.7064728183831224`*^9}, {3.706472848705365*^9, 3.706472928920052*^9}, 3.7064729604481297`*^9, {3.706473158923966*^9, 3.706473250005219*^9}, 3.706473718144242*^9, 3.7064738082564206`*^9, 3.7064738451938686`*^9, 3.706473879648099*^9, 3.706473948885905*^9, 3.706474170612097*^9, {3.7064742231782603`*^9, 3.706474259788785*^9}, 3.7064744876967297`*^9, {3.7064745181004314`*^9, 3.7064745459837046`*^9}, { 3.7064745949421244`*^9, 3.706474645847842*^9}, 3.7064746839976573`*^9, { 3.7064748093551664`*^9, 3.7064748791402807`*^9}, 3.7064749331544285`*^9, { 3.706474979145644*^9, 3.7064750836155047`*^9}, {3.7064752226073036`*^9, 3.7064752775874248`*^9}, 3.706475319231476*^9, {3.706475370899607*^9, 3.7064753978254805`*^9}, {3.7064754319135323`*^9, 3.7064754634224653`*^9}, {3.706475611341978*^9, 3.706475656975479*^9}, 3.7065217738806477`*^9, {3.706522078595149*^9, 3.706522160608527*^9}, { 3.7065222361004176`*^9, 3.70652225147256*^9}, {3.706522367174378*^9, 3.706522419302125*^9}, 3.706522494768625*^9, {3.7065225348150315`*^9, 3.706522577488247*^9}, {3.706522636082031*^9, 3.706522695719805*^9}, { 3.706522730301985*^9, 3.706522748464796*^9}, 3.7065228657688007`*^9, { 3.706522919734743*^9, 3.706522927929249*^9}, {3.706523209303267*^9, 3.7065232512301116`*^9}, {3.70652328919493*^9, 3.7065233424932823`*^9}, 3.706527357572555*^9, 3.70652740821681*^9, {3.7065275557201033`*^9, 3.7065275813307743`*^9}, 3.7068698878346024`*^9, 3.70686993721657*^9, 3.706870022352974*^9, {3.8103081342556477`*^9, 3.8103081559839206`*^9}, { 3.810308264610979*^9, 3.810308343745393*^9}, {3.810308399970002*^9, 3.810308433560273*^9}}, CellLabel-> "Out[500]=",ExpressionUUID->"45400c72-66bd-45b5-a03c-4fb0beb0dd9c"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SubscriptBox["f", "1"], "=", RowBox[{ RowBox[{"\[Omega]", "[", "0.5499", "]"}], "/", RowBox[{"(", RowBox[{"2", "*", "Pi"}], ")"}]}]}]], "Input", CellChangeTimes->{{3.706472948128917*^9, 3.706472968905251*^9}, { 3.706473227496274*^9, 3.7064732478396063`*^9}, {3.706474874160778*^9, 3.7064748896399155`*^9}, {3.706475026633426*^9, 3.706475030649768*^9}, { 3.7064750795361814`*^9, 3.7064750816265574`*^9}, {3.7064753923555517`*^9, 3.7064753954900703`*^9}, {3.7064754598080397`*^9, 3.7064754617898045`*^9}, 3.706475652540087*^9, {3.706522132220145*^9, 3.7065221590801287`*^9}, { 3.706522245590342*^9, 3.706522250050214*^9}, {3.70652238778449*^9, 3.706522391253316*^9}, {3.7065225503630266`*^9, 3.706522555441555*^9}, { 3.7065233121953173`*^9, 3.706523331923524*^9}, {3.7065273926095333`*^9, 3.70652739469378*^9}, {3.706527567823597*^9, 3.7065275741641736`*^9}, { 3.7068699907435045`*^9, 3.7068699933689384`*^9}}, CellLabel-> "In[501]:=",ExpressionUUID->"f7749738-56ef-4768-adf0-4ee56526527a"], Cell[BoxData[ RowBox[{"0.04812686483310767`", " ", SqrtBox[ FractionBox["EI", "\[Mu]"]]}]], "Output", CellChangeTimes->{ 3.706472960469646*^9, {3.7064731589489746`*^9, 3.7064732500277357`*^9}, 3.706473718167761*^9, 3.7064738082879443`*^9, 3.7064738452178926`*^9, 3.706473879674116*^9, 3.70647394890942*^9, 3.7064741706386113`*^9, { 3.7064742232353*^9, 3.7064742598353167`*^9}, 3.7064744878196135`*^9, { 3.7064745182185163`*^9, 3.706474546100788*^9}, {3.7064745950617113`*^9, 3.706474645900886*^9}, 3.706474684025667*^9, {3.7064748093831863`*^9, 3.7064748791543007`*^9}, 3.7064749331699233`*^9, {3.7064749791571503`*^9, 3.70647508363302*^9}, {3.706475222626319*^9, 3.706475277607438*^9}, 3.7064753192479877`*^9, {3.706475370915119*^9, 3.706475397842496*^9}, { 3.706475431928543*^9, 3.7064754634394794`*^9}, {3.7064756113559885`*^9, 3.7064756569899883`*^9}, 3.7065217738962746`*^9, {3.7065220786107936`*^9, 3.706522160624134*^9}, {3.706522236116038*^9, 3.70652225147256*^9}, { 3.7065223671900215`*^9, 3.706522419302125*^9}, 3.7065224947842517`*^9, { 3.706522534830659*^9, 3.706522577515329*^9}, {3.706522636082031*^9, 3.70652269573543*^9}, {3.706522730317627*^9, 3.706522748464796*^9}, 3.7065228657688007`*^9, {3.7065229197503414`*^9, 3.706522927929249*^9}, { 3.7065232093212657`*^9, 3.7065232512461233`*^9}, {3.706523289211794*^9, 3.706523342519926*^9}, 3.7065273575860577`*^9, 3.7065274082318125`*^9, { 3.7065275557336116`*^9, 3.7065275813477983`*^9}, 3.7068698878658557`*^9, 3.70686993721657*^9, 3.706870022352974*^9, {3.810308134267567*^9, 3.8103081560308466`*^9}, {3.810308264665799*^9, 3.810308343755355*^9}, { 3.810308400024822*^9, 3.8103084336021276`*^9}}, CellLabel-> "Out[501]=",ExpressionUUID->"e6df2a0c-1be0-4bce-af3c-dec7310b0697"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SubscriptBox["f", "1"], "/.", RowBox[{"{", RowBox[{ RowBox[{"EI", "\[Rule]", "EIv"}], ",", RowBox[{"\[Mu]", "\[Rule]", "\[Mu]v"}]}], "}"}]}]], "Input", CellChangeTimes->{{3.706474892952285*^9, 3.70647492965219*^9}}, CellLabel-> "In[502]:=",ExpressionUUID->"91fb4cd5-50c2-4570-b2cf-ebe17dc396f1"], Cell[BoxData["6.946514591661863`"], "Output", CellChangeTimes->{ 3.706522494799876*^9, {3.706522534830659*^9, 3.70652257753335*^9}, { 3.7065226360976796`*^9, 3.70652269573543*^9}, {3.706522730333235*^9, 3.706522748488787*^9}, 3.7065228657978992`*^9, {3.706522919765976*^9, 3.7065229279448643`*^9}, {3.70652320933928*^9, 3.7065232512611337`*^9}, { 3.7065232892274323`*^9, 3.706523342539567*^9}, 3.706527357599564*^9, 3.7065274082498474`*^9, {3.7065275557491407`*^9, 3.7065275813668013`*^9}, 3.706869887943982*^9, 3.7068699372322135`*^9, 3.7068700223685913`*^9, { 3.810308134314377*^9, 3.8103081560756903`*^9}, {3.8103082647236032`*^9, 3.8103083437974157`*^9}, {3.8103084000746856`*^9, 3.8103084336441164`*^9}}, CellLabel-> "Out[502]=",ExpressionUUID->"fa829b9d-9e37-4e51-a91a-ecaaa6b0bcdb"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"\[Omega]", "[", "0.5499", "]"}], "/.", RowBox[{"{", RowBox[{ RowBox[{"EI", "\[Rule]", "EIv"}], ",", RowBox[{"\[Mu]", "\[Rule]", "\[Mu]v"}]}], "}"}]}]], "Input", CellChangeTimes->{{3.706522463473525*^9, 3.7065224923633895`*^9}, { 3.706522571317488*^9, 3.7065225759722977`*^9}, {3.7065233357516356`*^9, 3.7065233408829746`*^9}, {3.70652740226723*^9, 3.7065274064490857`*^9}, { 3.706527577098678*^9, 3.7065275795228295`*^9}, {3.706870003248933*^9, 3.706870006462098*^9}}, CellLabel-> "In[503]:=",ExpressionUUID->"42435f7f-3244-4a6b-bdf4-803921e590cf"], Cell[BoxData["43.646238418438415`"], "Output", CellChangeTimes->{{3.706522636113262*^9, 3.7065226957666636`*^9}, { 3.706522730348877*^9, 3.7065227485017867`*^9}, 3.706522865802992*^9, { 3.7065229197956285`*^9, 3.706522927960501*^9}, {3.706523209359291*^9, 3.7065232512771635`*^9}, {3.706523289243065*^9, 3.7065233425552025`*^9}, 3.7065273576135745`*^9, 3.7065274082653613`*^9, {3.7065275557606297`*^9, 3.7065275813828115`*^9}, 3.7068698879752593`*^9, 3.70686993724782*^9, 3.7068700223842154`*^9, {3.810308134357319*^9, 3.810308156117473*^9}, { 3.810308264738555*^9, 3.8103083438363533`*^9}, {3.810308400121499*^9, 3.810308433683717*^9}}, CellLabel-> "Out[503]=",ExpressionUUID->"b894acf9-6028-4f3e-a312-1163b7693d32"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SubscriptBox["\[Omega]semassa", "1"], "=", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"Pi", "/", "Lv"}], ")"}], "^", "2"}], "*", RowBox[{"Sqrt", "[", RowBox[{"EIv", "/", "\[Mu]v"}], "]"}]}], "//", "N"}]}]], "Input", CellChangeTimes->{{3.7065225952693925`*^9, 3.706522690477044*^9}, { 3.7065232489004745`*^9, 3.7065232499852448`*^9}}, CellLabel-> "In[504]:=",ExpressionUUID->"0f97894f-688d-4e4a-9da9-8adf5cb08628"], Cell[BoxData["89.03466809006338`"], "Output", CellChangeTimes->{ 3.706522865818619*^9, {3.7065229198037868`*^9, 3.706522927976119*^9}, { 3.7065232093753023`*^9, 3.7065232512901545`*^9}, {3.7065232892586737`*^9, 3.7065233425708323`*^9}, 3.7065273576275845`*^9, 3.7065274082803516`*^9, { 3.7065275557736387`*^9, 3.7065275814008265`*^9}, 3.706869888022106*^9, 3.706869937263464*^9, 3.7068700223998404`*^9, {3.8103081344011736`*^9, 3.81030815616332*^9}, {3.810308264793373*^9, 3.8103083438483157`*^9}, { 3.8103084001653523`*^9, 3.810308433731557*^9}}, CellLabel-> "Out[504]=",ExpressionUUID->"e9c825c7-9653-4df6-924f-0f12c55abfc6"] }, Open ]] }, WindowSize->{1141.2, 574.8}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, FrontEndVersion->"12.1 for Microsoft Windows (64-bit) (June 19, 2020)", StyleDefinitions->"Default.nb", ExpressionUUID->"5a6ff506-8c62-4aaf-8081-eb7126e0e501" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[580, 22, 9503, 280, 956, "Input",ExpressionUUID->"90c4888e-eb22-4862-b667-46aa7cb46259"], Cell[10086, 304, 3450, 47, 32, "Output",ExpressionUUID->"ebb655a1-3995-44d1-8bb5-dff2f1edcc1d"], Cell[13539, 353, 3447, 47, 32, "Output",ExpressionUUID->"ef73a572-3c52-4527-9a1c-47c26b955237"], Cell[16989, 402, 3442, 47, 32, "Output",ExpressionUUID->"e0291cd0-b818-4f1a-b4a6-02faa64bc068"], Cell[20434, 451, 4002, 65, 32, "Output",ExpressionUUID->"f4f9f00d-b117-4c76-8c45-f4866bc21b3e"], Cell[24439, 518, 4000, 65, 32, "Output",ExpressionUUID->"f2f6f177-d43e-4d9c-8266-220267451222"], Cell[28442, 585, 4103, 69, 32, "Output",ExpressionUUID->"c10ec21d-bdaf-4972-8231-3910ca4f4fe4"], Cell[32548, 656, 4103, 69, 32, "Output",ExpressionUUID->"765db071-78b1-48dd-8a86-93a917707c99"], Cell[36654, 727, 4081, 68, 32, "Output",ExpressionUUID->"ffde1d3f-f4fe-481f-8764-bbd02d8428b0"], Cell[40738, 797, 4083, 68, 32, "Output",ExpressionUUID->"41dcdf05-aec5-4839-9280-b80d5f7420c3"], Cell[44824, 867, 4083, 68, 32, "Output",ExpressionUUID->"c2e2aa01-8472-4647-9c00-ccffab53d037"], Cell[48910, 937, 4083, 68, 32, "Output",ExpressionUUID->"fe92be3a-bb9b-4ea3-858c-e431bf9416f4"], Cell[52996, 1007, 5497, 112, 59, "Output",ExpressionUUID->"eccab789-298d-4da7-af36-c54d6ac5f7ff"], Cell[58496, 1121, 9159, 220, 218, "Output",ExpressionUUID->"ed3e2b6e-6407-42f9-a755-9fad0c81dfa1"] }, Open ]], Cell[CellGroupData[{ Cell[67692, 1346, 707, 16, 63, "Input",ExpressionUUID->"2b13f1b8-252c-4b8f-b1ee-4bb7d165476f"], Cell[68402, 1364, 6553, 172, 186, "Output",ExpressionUUID->"c6f7cd4f-fca4-43b7-905a-ec94a8cab915"] }, Open ]], Cell[CellGroupData[{ Cell[74992, 1541, 305, 6, 44, "Input",ExpressionUUID->"6d79e6cb-a992-4d5b-9b6c-6c5358d9eb62"], Cell[75300, 1549, 2475, 51, 48, "Output",ExpressionUUID->"c49820fa-e028-4e0d-a3c0-43f76bc17d74"] }, Open ]], Cell[CellGroupData[{ Cell[77812, 1605, 1199, 30, 80, "Input",ExpressionUUID->"63f372ce-3d53-4a19-b18a-d8476e3cee39"], Cell[79014, 1637, 5363, 101, 236, "Output",ExpressionUUID->"cc341f32-7bc4-44ff-a9a2-aeb8d7d5b2e3"] }, Open ]], Cell[CellGroupData[{ Cell[84414, 1743, 1201, 20, 44, "Input",ExpressionUUID->"371b31fe-f952-43b2-8512-a2b1338b0003"], Cell[85618, 1765, 2604, 38, 32, "Output",ExpressionUUID->"45400c72-66bd-45b5-a03c-4fb0beb0dd9c"] }, Open ]], Cell[CellGroupData[{ Cell[88259, 1808, 1068, 19, 44, "Input",ExpressionUUID->"f7749738-56ef-4768-adf0-4ee56526527a"], Cell[89330, 1829, 1831, 28, 60, "Output",ExpressionUUID->"e6df2a0c-1be0-4bce-af3c-dec7310b0697"] }, Open ]], Cell[CellGroupData[{ Cell[91198, 1862, 341, 9, 28, "Input",ExpressionUUID->"91fb4cd5-50c2-4570-b2cf-ebe17dc396f1"], Cell[91542, 1873, 824, 12, 32, "Output",ExpressionUUID->"fa829b9d-9e37-4e51-a91a-ecaaa6b0bcdb"] }, Open ]], Cell[CellGroupData[{ Cell[92403, 1890, 613, 13, 28, "Input",ExpressionUUID->"42435f7f-3244-4a6b-bdf4-803921e590cf"], Cell[93019, 1905, 750, 11, 32, "Output",ExpressionUUID->"b894acf9-6028-4f3e-a312-1163b7693d32"] }, Open ]], Cell[CellGroupData[{ Cell[93806, 1921, 483, 13, 44, "Input",ExpressionUUID->"0f97894f-688d-4e4a-9da9-8adf5cb08628"], Cell[94292, 1936, 654, 10, 32, "Output",ExpressionUUID->"e9c825c7-9653-4df6-924f-0f12c55abfc6"] }, Open ]] } ] *)