(************** Content-type: application/mathematica ************** CreatedBy='Mathematica 5.0' Mathematica-Compatible Notebook This notebook can be used with any Mathematica-compatible application, such as Mathematica, MathReader or Publicon. The data for the notebook starts with the line containing stars above. To get the notebook into a Mathematica-compatible application, do one of the following: * Save the data starting with the line of stars above into a file with a name ending in .nb, then open the file inside the application; * Copy the data starting with the line of stars above to the clipboard, then use the Paste menu command inside the application. Data for notebooks contains only printable 7-bit ASCII and can be sent directly in email or through ftp in text mode. Newlines can be CR, LF or CRLF (Unix, Macintosh or MS-DOS style). NOTE: If you modify the data for this notebook not in a Mathematica- compatible application, you must delete the line below containing the word CacheID, otherwise Mathematica-compatible applications may try to use invalid cache data. For more information on notebooks and Mathematica-compatible applications, contact Wolfram Research: web: http://www.wolfram.com email: info@wolfram.com phone: +1-217-398-0700 (U.S.) Notebook reader applications are available free of charge from Wolfram Research. *******************************************************************) (*CacheID: 232*) (*NotebookFileLineBreakTest NotebookFileLineBreakTest*) (*NotebookOptionsPosition[ 322540, 6017]*) (*NotebookOutlinePosition[ 323186, 6039]*) (* CellTagsIndexPosition[ 323142, 6035]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell[BoxData[{\(Clear[U, V, T]\), "\[IndentingNewLine]", \(U = {u1, u2, u3};\), "\[IndentingNewLine]", \(V = {v1, v2, v3};\), "\[IndentingNewLine]", RowBox[{\(T = {t1[u1, u2, u3], t2[u1, u2, u3], t3[u1, u2, u3]};\), "\[IndentingNewLine]"}], "\[IndentingNewLine]", \(Fhat := Transpose[{\[PartialD]\_u1\ T, \[PartialD]\_u2\ T, \[PartialD]\_u3\ T}];\), "\[IndentingNewLine]", \(MatrixForm[ Fhat]\), "\[IndentingNewLine]", RowBox[{\(Eigensystem[Fhat]\), "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Eigensystem", "[", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "1", "0", "0"}, {"0", "0", "0", "0", "1", "0"}, {"0", "0", "0", "0", "0", "1"}, {"1", "0", "0", "0", "0", "0"}, {"0", "1", "0", "0", "0", "0"}, {"0", "0", "1", "0", "0", "0"} }], "\[NoBreak]", ")"}], Function[ BoxForm`e$, MatrixForm[ BoxForm`e$]]], "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", \(F = {v1, v2, v3, t1[u1, u2, u3], t2[u1, u2, u3], t3[u1, u2, u3]};\), "\[IndentingNewLine]", \(FluxMatrix = Transpose[{\[PartialD]\_u1\ F, \[PartialD]\_u2\ F, \[PartialD]\_u3\ F, \[PartialD]\_v1\ F, \[PartialD]\_v2\ F, \[PartialD]\_v3\ F}];\), "\[IndentingNewLine]", \(MatrixForm[ FluxMatrix]\), "\[IndentingNewLine]", \({EVal1, EVal2, EVal3, EVal4, EVal5, EVal6} = Eigenvalues[FluxMatrix]\), "\[IndentingNewLine]", \({EVec1, EVec2, EVec3, EVec4, EVec5, EVec6} = Eigenvectors[FluxMatrix]\)}], "Input"], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}, { RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}, { RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]} }], "\[NoBreak]", ")"}], Function[ BoxForm`e$, MatrixForm[ BoxForm`e$]]]], "Output"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "1"}], "]"}], ",", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "2"}], "]"}], ",", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "3"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{ FractionBox["1", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]], RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "1"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}]}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "1"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}]}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "1"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], ")"}]}], ")"}]}]}], ",", RowBox[{"-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "1"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}]}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "1"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], ")"}]}]}], ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{ FractionBox["1", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]], RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "2"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}]}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "2"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}]}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "2"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], ")"}]}], ")"}]}]}], ",", RowBox[{"-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "2"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}]}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "2"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], ")"}]}]}], ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{ FractionBox["1", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]], RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}]}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}]}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], ")"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], ")"}]}], ")"}]}]}], ",", RowBox[{"-", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}]}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], ")"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], ")"}]}]}], ",", "1"}], "}"}]}], "}"}]}], "}"}]], "Output"], Cell[BoxData[ \({{\(-1\), \(-1\), \(-1\), 1, 1, 1}, {{0, 0, \(-1\), 0, 0, 1}, {0, \(-1\), 0, 0, 1, 0}, {\(-1\), 0, 0, 1, 0, 0}, {0, 0, 1, 0, 0, 1}, {0, 1, 0, 0, 1, 0}, {1, 0, 0, 1, 0, 0}}}\)], "Output"], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "1", "0", "0"}, {"0", "0", "0", "0", "1", "0"}, {"0", "0", "0", "0", "0", "1"}, { RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], "0", "0", "0"}, { RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], "0", "0", "0"}, { RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], "0", "0", "0"} }], "\[NoBreak]", ")"}], Function[ BoxForm`e$, MatrixForm[ BoxForm`e$]]]], "Output"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"\[Sqrt]", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "1"}], "]"}]}]}], ",", RowBox[{"\[Sqrt]", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "1"}], "]"}]}], ",", RowBox[{"-", RowBox[{"\[Sqrt]", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "2"}], "]"}]}]}], ",", RowBox[{"\[Sqrt]", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "2"}], "]"}]}], ",", RowBox[{"-", RowBox[{"\[Sqrt]", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "3"}], "]"}]}]}], ",", RowBox[{"\[Sqrt]", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{\(#1\^3\), "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{\(#1\^2\), " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t3", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{"#1", " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "-", RowBox[{ RowBox[{ SuperscriptBox["t2", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t1", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}], "+", RowBox[{ RowBox[{ SuperscriptBox["t1", TagBox[\((0, 0, 1)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t2", TagBox[\((0, 1, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}], " ", RowBox[{ SuperscriptBox["t3", TagBox[\((1, 0, 0)\), Derivative], MultilineFunction->None], "[", \(u1, u2, u3\), "]"}]}]}], "&"}], ",", "3"}], "]"}]}]}], "}"}]], "Output"], Cell[BoxData[ RowBox[{\(Eigenvectors::"eivec"\), \(\(:\)\(\ \)\), "\<\"Unable to find \ eigenvector for eigenvalue \\!\\(-\\@\\(Root[\\(\\(\\(\\(\\(\\(\\(\\(\ \[LeftSkeleton] 24 \[RightSkeleton]\\)\\) + \ \\(\\(\\(\\(\\(\\(\\*SuperscriptBox[\\\"t1\\\", TagBox[\\((0, 0, 1)\\), \ Derivative], Rule[MultilineFunction, None]]\\)\\)[\\(\\(u1, u2, \ u3\\)\\)]\\)\\)\\\\ \\(\\(\\(\\(\\*SuperscriptBox[\\\"t2\\\", TagBox[\\((0, \ 1, 0)\\), Derivative], Rule[MultilineFunction, None]]\\)\\)[\\(\\(u1, u2, \ u3\\)\\)]\\)\\)\\\\ \\(\\(\\(\\(\\*SuperscriptBox[\\\"t3\\\", TagBox[\\((1, \ 0, 0)\\), Derivative], Rule[MultilineFunction, None]]\\)\\)[\\(\\(u1, u2, \ u3\\)\\)]\\)\\)\\)\\)\\)\\) &\\)\\), 1\\)\\)]\\)\\). \ \\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ \\\", ButtonFrame->None, ButtonData:>\\\"General::eivec\\\"]\\)\"\>"}]], \ "Message"], Cell[BoxData[ RowBox[{\(Eigenvectors::"eivec"\), \(\(:\)\(\ \)\), "\<\"Unable to find \ eigenvector for eigenvalue \\!\\(\\@\\(Root[\\(\\(\\(\\(\\(\\(\\(\\(\ \[LeftSkeleton] 24 \[RightSkeleton]\\)\\) + \ \\(\\(\\(\\(\\(\\(\\*SuperscriptBox[\\\"t1\\\", TagBox[\\((0, 0, 1)\\), \ Derivative], Rule[MultilineFunction, None]]\\)\\)[\\(\\(u1, u2, \ u3\\)\\)]\\)\\)\\\\ \\(\\(\\(\\(\\*SuperscriptBox[\\\"t2\\\", TagBox[\\((0, \ 1, 0)\\), Derivative], Rule[MultilineFunction, None]]\\)\\)[\\(\\(u1, u2, \ u3\\)\\)]\\)\\)\\\\ \\(\\(\\(\\(\\*SuperscriptBox[\\\"t3\\\", TagBox[\\((1, \ 0, 0)\\), Derivative], Rule[MultilineFunction, None]]\\)\\)[\\(\\(u1, u2, \ u3\\)\\)]\\)\\)\\)\\)\\)\\) &\\)\\), 1\\)\\)]\\)\\). \ \\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ \\\", ButtonFrame->None, ButtonData:>\\\"General::eivec\\\"]\\)\"\>"}]], \ "Message"], Cell[BoxData[ RowBox[{\(Eigenvectors::"eivec"\), \(\(:\)\(\ \)\), "\<\"Unable to find \ eigenvector for eigenvalue \\!\\(-\\@\\(Root[\\(\\(\\(\\(\\(\\(\\(\\(\ \[LeftSkeleton] 24 \[RightSkeleton]\\)\\) + \ \\(\\(\\(\\(\\(\\(\\*SuperscriptBox[\\\"t1\\\", TagBox[\\((0, 0, 1)\\), \ Derivative], Rule[MultilineFunction, None]]\\)\\)[\\(\\(u1, u2, \ u3\\)\\)]\\)\\)\\\\ \\(\\(\\(\\(\\*SuperscriptBox[\\\"t2\\\", TagBox[\\((0, \ 1, 0)\\), Derivative], Rule[MultilineFunction, None]]\\)\\)[\\(\\(u1, u2, \ u3\\)\\)]\\)\\)\\\\ \\(\\(\\(\\(\\*SuperscriptBox[\\\"t3\\\", TagBox[\\((1, \ 0, 0)\\), Derivative], Rule[MultilineFunction, None]]\\)\\)[\\(\\(u1, u2, \ u3\\)\\)]\\)\\)\\)\\)\\)\\) &\\)\\), 2\\)\\)]\\)\\). \ \\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ \\\", ButtonFrame->None, ButtonData:>\\\"General::eivec\\\"]\\)\"\>"}]], \ "Message"], Cell[BoxData[ RowBox[{\(General::"stop"\), \(\(:\)\(\ \)\), "\<\"Further output of \ \\!\\(Eigenvectors :: \\\"eivec\\\"\\) will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", \ ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], "Message"], Cell[BoxData[ \({{0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0}}\)], "Output"] }, Open ]] }, FrontEndVersion->"5.0 for Microsoft Windows", ScreenRectangle->{{0, 1024}, {0, 695}}, WindowSize->{1003, 599}, WindowMargins->{{-2, Automatic}, {Automatic, 17}} ] (******************************************************************* Cached data follows. If you edit this Notebook file directly, not using Mathematica, you must remove the line containing CacheID at the top of the file. The cache data will then be recreated when you save this file from within Mathematica. *******************************************************************) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[1776, 53, 1749, 33, 423, "Input"], Cell[3528, 88, 2084, 53, 79, "Output"], Cell[5615, 143, 253062, 4432, 2597, "Output"], Cell[258680, 4577, 237, 4, 48, "Output"], Cell[258920, 4583, 2306, 59, 127, "Output"], Cell[261229, 4644, 58153, 1314, 812, "Output"], Cell[319385, 5960, 876, 13, 44, "Message"], Cell[320264, 5975, 875, 13, 29, "Message"], Cell[321142, 5990, 876, 13, 44, "Message"], Cell[322021, 6005, 337, 5, 22, "Message"], Cell[322361, 6012, 163, 2, 29, "Output"] }, Open ]] } ] *) (******************************************************************* End of Mathematica Notebook file. *******************************************************************)