C3taurewrite.nb

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

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

(* CreatedBy='Mathematica 12.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[    221818,       6949]
NotebookOptionsPosition[    217535,       6868]
NotebookOutlinePosition[    217901,       6884]
CellTagsIndexPosition[    217858,       6881]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[{
 RowBox[{
  RowBox[{"D3RootList", " ", "=", " ", 
   RowBox[{
    FractionBox["1", 
     SqrtBox["2"]], 
    RowBox[{"Flatten", "[", 
     RowBox[{
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"If", "[", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{
             RowBox[{"a", "^", "2"}], "+", 
             RowBox[{"b", "^", "2"}], "+", 
             RowBox[{"c", "^", "2"}]}], "\[Equal]", "2"}], ")"}], ",", 
          RowBox[{"{", 
           RowBox[{"a", ",", "b", ",", "c"}], "}"}], ",", "Nothing"}], "]"}], 
        ",", 
        RowBox[{"{", 
         RowBox[{"a", ",", 
          RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"b", ",", 
          RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"c", ",", 
          RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "]"}], ",", "2"}], 
     "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"C3ShortRoots", " ", "=", " ", 
   RowBox[{
    SqrtBox["2"], 
    RowBox[{"Flatten", "[", 
     RowBox[{
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"If", "[", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{
             RowBox[{"a", "^", "2"}], "+", 
             RowBox[{"b", "^", "2"}], "+", 
             RowBox[{"c", "^", "2"}]}], "\[Equal]", "1"}], ")"}], ",", 
          RowBox[{"{", 
           RowBox[{"a", ",", "b", ",", "c"}], "}"}], ",", "Nothing"}], "]"}], 
        ",", 
        RowBox[{"{", 
         RowBox[{"a", ",", 
          RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"b", ",", 
          RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"c", ",", 
          RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "]"}], ",", "2"}], 
     "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"C3Roots", " ", "=", " ", 
   RowBox[{"Join", "[", 
    RowBox[{"D3RootList", ",", "C3ShortRoots"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"C3Coroots", " ", "=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"2", 
      RowBox[{"a", "/", 
       RowBox[{"a", ".", "a"}]}]}], ",", 
     RowBox[{"{", 
      RowBox[{"a", ",", "C3Roots"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"C3Lattice", " ", "=", " ", 
   RowBox[{
    SqrtBox["2"], 
    RowBox[{"Tuples", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"Range", "[", 
        RowBox[{
         RowBox[{"-", "2"}], ",", "2"}], "]"}], ",", 
       RowBox[{"Range", "[", 
        RowBox[{
         RowBox[{"-", "2"}], ",", "2"}], "]"}], ",", 
       RowBox[{"Range", "[", 
        RowBox[{
         RowBox[{"-", "2"}], ",", "2"}], "]"}]}], "}"}], "]"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"C3LatticeSmall", " ", "=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"If", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"a", ".", "a"}], "<", "5"}], ",", "a", ",", "Nothing"}], 
      "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"a", ",", "C3Lattice"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"C3LatticeSmallest", " ", "=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"If", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"a", ".", "a"}], "<", "4"}], ",", "a", ",", "Nothing"}], 
      "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"a", ",", "C3Lattice"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Sigma]", "=", 
   RowBox[{"{", 
    RowBox[{"\[Sigma]1", ",", "\[Sigma]2", ",", "\[Sigma]3"}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Lambda]", " ", "=", " ", 
   RowBox[{
    SqrtBox["2"], 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"1", "/", "2"}], ",", 
      RowBox[{"1", "/", "2"}], ",", 
      RowBox[{"1", "/", "2"}]}], "}"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"F", "[", 
   RowBox[{"{", 
    RowBox[{"v1_", ",", "v2_", ",", "v3_"}], "}"}], "]"}], ":=", 
  RowBox[{"F", "[", 
   RowBox[{"v1", ",", "v2", ",", "v3"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"F", "[", 
   RowBox[{"v1_", ",", "v2_", ",", "v3_"}], "]"}], ":=", 
  RowBox[{
   RowBox[{"1", "/", 
    RowBox[{"(", 
     RowBox[{"Product", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"If", "[", 
         RowBox[{
          RowBox[{
           RowBox[{"a", ".", 
            RowBox[{"{", 
             RowBox[{"v1", ",", "v2", ",", "v3"}], "}"}]}], "\[Equal]", "1"}],
           ",", 
          RowBox[{"-", 
           RowBox[{"a", ".", "\[Sigma]"}]}], ",", "1"}], "]"}], 
        RowBox[{"If", "[", 
         RowBox[{
          RowBox[{
           RowBox[{"a", ".", 
            RowBox[{"{", 
             RowBox[{"v1", ",", "v2", ",", "v3"}], "}"}]}], "\[Equal]", "2"}],
           ",", 
          RowBox[{
           RowBox[{
            RowBox[{"(", 
             RowBox[{"-", 
              RowBox[{"a", ".", "\[Sigma]"}]}], ")"}], "^", "2"}], 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"1", "+", 
              RowBox[{"a", ".", "\[Sigma]"}]}], ")"}], "^", "2"}]}], ",", 
          "1"}], "]"}]}], ",", 
       RowBox[{"{", 
        RowBox[{"a", ",", "C3Roots"}], "}"}]}], "]"}], ")"}]}], "//", 
   "Cancel"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"$Assumptions", " ", "=", " ", 
   RowBox[{
    RowBox[{
    "1", ">", "\[Sigma]1", ">", "\[Sigma]2", ">", "\[Sigma]3", ">", "0"}], "&&", 
    RowBox[{"\[Epsilon]", ">", "0"}]}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.821155976633778*^9, 3.821156054807572*^9}, {
   3.821156134511345*^9, 3.821156135070259*^9}, 3.821156226824308*^9, 
   3.82115682035006*^9},
 CellLabel->
  "In[312]:=",ExpressionUUID->"a94d2ef0-0b61-496a-b228-14b4c1bdd880"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"Tau", "[", "t_", "]"}], ":=", 
  RowBox[{"Sum", "[", 
   RowBox[{
    RowBox[{"If", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{"1", "/", "2"}], 
         RowBox[{"a", ".", "a"}]}], "+", "i"}], "\[LessEqual]", "1"}], ",", 
      RowBox[{
       SuperscriptBox["\[Epsilon]", 
        RowBox[{
         RowBox[{
          RowBox[{"1", "/", "2"}], 
          RowBox[{"a", ".", "a"}]}], "+", "i"}]], 
       SuperscriptBox[
        SubscriptBox["\[Xi]", "1"], 
        RowBox[{
         SqrtBox["2"], 
         RowBox[{"a", "[", 
          RowBox[{"[", "1", "]"}], "]"}]}]], 
       SuperscriptBox[
        SubscriptBox["\[Xi]", "2"], 
        RowBox[{
         SqrtBox["2"], 
         RowBox[{"a", "[", 
          RowBox[{"[", "2", "]"}], "]"}]}]], 
       SuperscriptBox[
        SubscriptBox["\[Xi]", "3"], 
        RowBox[{
         SqrtBox["2"], 
         RowBox[{"a", "[", 
          RowBox[{"[", "3", "]"}], "]"}]}]], 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"t", "/", "\[Kappa]"}], ")"}], 
        RowBox[{
         RowBox[{
          RowBox[{"1", "/", "2"}], 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"a", "+", "\[Sigma]"}], ")"}], ".", 
           RowBox[{"(", 
            RowBox[{"a", "+", "\[Sigma]"}], ")"}]}]}], "+", "i"}]], 
       RowBox[{"f", "[", "a", "]"}], 
       RowBox[{"If", "[", 
        RowBox[{
         RowBox[{"i", "\[Equal]", "0"}], ",", "1", ",", 
         RowBox[{
          SubscriptBox["Z", "i"], "[", 
          RowBox[{"\[Sigma]", "+", "a"}], "]"}]}], "]"}]}], ",", "0"}], "]"}],
     ",", 
    RowBox[{"{", 
     RowBox[{"a", ",", "C3Lattice"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"i", ",", "0", ",", "1"}], "}"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   SubscriptBox["Tau", "\[Lambda]"], "[", "t_", "]"}], ":=", 
  RowBox[{"Sum", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"If", "[", 
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"1", "/", "2"}], 
          RowBox[{
           RowBox[{"(", "a", ")"}], ".", 
           RowBox[{"(", "a", ")"}]}]}], "+", 
         RowBox[{"\[Lambda]", ".", "a"}], "+", "i"}], "<", "1"}], ",", 
       RowBox[{
        SuperscriptBox["\[Epsilon]", 
         RowBox[{
          RowBox[{
           RowBox[{"1", "/", "2"}], 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"a", "+", "\[Lambda]"}], ")"}], ".", 
            RowBox[{"(", 
             RowBox[{"a", "+", "\[Lambda]"}], ")"}]}]}], "+", "i"}]], 
        SuperscriptBox[
         SubscriptBox["\[Xi]", "1"], 
         RowBox[{
          SqrtBox["2"], 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"a", "[", 
             RowBox[{"[", "1", "]"}], "]"}], "+", 
            RowBox[{"\[Lambda]", "[", 
             RowBox[{"[", "1", "]"}], "]"}]}], ")"}]}]], 
        SuperscriptBox[
         SubscriptBox["\[Xi]", "2"], 
         RowBox[{
          SqrtBox["2"], 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"a", "[", 
             RowBox[{"[", "2", "]"}], "]"}], "+", 
            RowBox[{"\[Lambda]", "[", 
             RowBox[{"[", "2", "]"}], "]"}]}], ")"}]}]], 
        SuperscriptBox[
         SubscriptBox["\[Xi]", "3"], 
         RowBox[{
          SqrtBox["2"], 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"a", "[", 
             RowBox[{"[", "3", "]"}], "]"}], "+", 
            RowBox[{"\[Lambda]", "[", 
             RowBox[{"[", "3", "]"}], "]"}]}], ")"}]}]], 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"t", "/", "\[Kappa]"}], ")"}], 
         RowBox[{
          RowBox[{
           RowBox[{"1", "/", "2"}], 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"a", "+", "\[Lambda]", "+", "\[Sigma]"}], ")"}], ".", 
            RowBox[{"(", 
             RowBox[{"a", "+", "\[Lambda]", "+", "\[Sigma]"}], ")"}]}]}], "+",
           "i"}]], 
        RowBox[{"f", "[", 
         RowBox[{"a", "+", "\[Lambda]"}], "]"}], 
        RowBox[{"If", "[", 
         RowBox[{
          RowBox[{"i", "\[Equal]", "0"}], ",", "1", ",", 
          RowBox[{
           SubscriptBox["Z", "i"], "[", 
           RowBox[{"\[Sigma]", "+", "a", "+", "\[Lambda]"}], "]"}]}], "]"}]}],
        ",", "0"}], "]"}], "//", "Simplify"}], ",", 
    RowBox[{"{", 
     RowBox[{"a", ",", "C3Lattice"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"i", ",", "0", ",", "1"}], "}"}]}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.8200517283499947`*^9, 3.8200517432042303`*^9}, {
  3.8200517771392803`*^9, 3.820051907529811*^9}, {3.820052055725904*^9, 
  3.8200521208229113`*^9}, {3.820053160789454*^9, 3.820053160927554*^9}, {
  3.820054386978191*^9, 3.8200543937918367`*^9}},
 CellLabel->"In[47]:=",ExpressionUUID->"41cee26a-dddd-4136-8a68-b9e4d92758c4"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Tau", "[", "t", "]"}]], "Input",
 CellChangeTimes->{{3.820051745778528*^9, 3.820051748776634*^9}},
 CellLabel->"In[49]:=",ExpressionUUID->"f556d312-b9d8-4e35-9649-8fad94bd0e86"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   SuperscriptBox[
    RowBox[{"(", 
     FractionBox["t", "\[Kappa]"], ")"}], 
    RowBox[{
     FractionBox["1", "2"], " ", 
     RowBox[{"(", 
      RowBox[{
       SuperscriptBox["\[Sigma]1", "2"], "+", 
       SuperscriptBox["\[Sigma]2", "2"], "+", 
       SuperscriptBox["\[Sigma]3", "2"]}], ")"}]}]], " ", 
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}]}], "+", 
  FractionBox[
   RowBox[{"\[Epsilon]", " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["t", "\[Kappa]"], ")"}], 
     RowBox[{
      FractionBox["1", "2"], " ", 
      RowBox[{"(", 
       RowBox[{
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", 
            SqrtBox["2"]}], "+", "\[Sigma]1"}], ")"}], "2"], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}], ")"}]}]], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", 
        SqrtBox["2"]}], ",", "0", ",", "0"}], "}"}], "]"}]}], 
   SubsuperscriptBox["\[Xi]", "1", "2"]], "+", 
  RowBox[{"\[Epsilon]", " ", 
   SuperscriptBox[
    RowBox[{"(", 
     FractionBox["t", "\[Kappa]"], ")"}], 
    RowBox[{
     FractionBox["1", "2"], " ", 
     RowBox[{"(", 
      RowBox[{
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          SqrtBox["2"], "+", "\[Sigma]1"}], ")"}], "2"], "+", 
       SuperscriptBox["\[Sigma]2", "2"], "+", 
       SuperscriptBox["\[Sigma]3", "2"]}], ")"}]}]], " ", 
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{
      SqrtBox["2"], ",", "0", ",", "0"}], "}"}], "]"}], " ", 
   SubsuperscriptBox["\[Xi]", "1", "2"]}], "+", 
  FractionBox[
   RowBox[{"\[Epsilon]", " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["t", "\[Kappa]"], ")"}], 
     RowBox[{
      FractionBox["1", "2"], " ", 
      RowBox[{"(", 
       RowBox[{
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", 
            SqrtBox["2"]}], "+", "\[Sigma]2"}], ")"}], "2"], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}], ")"}]}]], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{"0", ",", 
       RowBox[{"-", 
        SqrtBox["2"]}], ",", "0"}], "}"}], "]"}]}], 
   SubsuperscriptBox["\[Xi]", "2", "2"]], "+", 
  RowBox[{"\[Epsilon]", " ", 
   SuperscriptBox[
    RowBox[{"(", 
     FractionBox["t", "\[Kappa]"], ")"}], 
    RowBox[{
     FractionBox["1", "2"], " ", 
     RowBox[{"(", 
      RowBox[{
       SuperscriptBox["\[Sigma]1", "2"], "+", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          SqrtBox["2"], "+", "\[Sigma]2"}], ")"}], "2"], "+", 
       SuperscriptBox["\[Sigma]3", "2"]}], ")"}]}]], " ", 
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{"0", ",", 
      SqrtBox["2"], ",", "0"}], "}"}], "]"}], " ", 
   SubsuperscriptBox["\[Xi]", "2", "2"]}], "+", 
  FractionBox[
   RowBox[{"\[Epsilon]", " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["t", "\[Kappa]"], ")"}], 
     RowBox[{
      FractionBox["1", "2"], " ", 
      RowBox[{"(", 
       RowBox[{
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", 
            SqrtBox["2"]}], "+", "\[Sigma]3"}], ")"}], "2"]}], ")"}]}]], " ", 
    
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{"0", ",", "0", ",", 
       RowBox[{"-", 
        SqrtBox["2"]}]}], "}"}], "]"}]}], 
   SubsuperscriptBox["\[Xi]", "3", "2"]], "+", 
  RowBox[{"\[Epsilon]", " ", 
   SuperscriptBox[
    RowBox[{"(", 
     FractionBox["t", "\[Kappa]"], ")"}], 
    RowBox[{
     FractionBox["1", "2"], " ", 
     RowBox[{"(", 
      RowBox[{
       SuperscriptBox["\[Sigma]1", "2"], "+", 
       SuperscriptBox["\[Sigma]2", "2"], "+", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          SqrtBox["2"], "+", "\[Sigma]3"}], ")"}], "2"]}], ")"}]}]], " ", 
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{"0", ",", "0", ",", 
      SqrtBox["2"]}], "}"}], "]"}], " ", 
   SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
  RowBox[{"\[Epsilon]", " ", 
   SuperscriptBox[
    RowBox[{"(", 
     FractionBox["t", "\[Kappa]"], ")"}], 
    RowBox[{"1", "+", 
     RowBox[{
      FractionBox["1", "2"], " ", 
      RowBox[{"(", 
       RowBox[{
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}], ")"}]}]}]], " ", 
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}], " ", 
   RowBox[{
    SubscriptBox["Z", "1"], "[", 
    RowBox[{"{", 
     RowBox[{"\[Sigma]1", ",", "\[Sigma]2", ",", "\[Sigma]3"}], "}"}], 
    "]"}]}]}]], "Output",
 CellChangeTimes->{3.8200517490016737`*^9, 3.820053606936796*^9, 
  3.820054402119605*^9},
 CellLabel->"Out[49]=",ExpressionUUID->"d4e39492-1d90-467b-9636-b8d50699e3eb"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  SubscriptBox["Tau", "\[Lambda]"], "[", "t", "]"}]], "Input",
 CellChangeTimes->{{3.820051912674458*^9, 3.8200519131746397`*^9}},
 CellLabel->"In[50]:=",ExpressionUUID->"0d675db7-3811-439c-b2e7-cb8091d72654"],

Cell[BoxData[
 RowBox[{
  FractionBox[
   RowBox[{
    SuperscriptBox["\[Epsilon]", 
     RowBox[{"3", "/", "4"}]], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["t", "\[Kappa]"], ")"}], 
     RowBox[{
      FractionBox["1", "4"], " ", 
      RowBox[{"(", 
       RowBox[{"3", "-", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        RowBox[{"2", " ", 
         SuperscriptBox["\[Sigma]1", "2"]}], "-", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        RowBox[{"2", " ", 
         SuperscriptBox["\[Sigma]2", "2"]}], "-", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        RowBox[{"2", " ", 
         SuperscriptBox["\[Sigma]3", "2"]}]}], ")"}]}]], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}]}], "}"}], "]"}]}], 
   RowBox[{
    SubscriptBox["\[Xi]", "1"], " ", 
    SubscriptBox["\[Xi]", "2"], " ", 
    SubscriptBox["\[Xi]", "3"]}]], "+", 
  FractionBox[
   RowBox[{
    SuperscriptBox["\[Epsilon]", 
     RowBox[{"3", "/", "4"}]], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["t", "\[Kappa]"], ")"}], 
     RowBox[{
      FractionBox["1", "4"], " ", 
      RowBox[{"(", 
       RowBox[{"3", "+", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        RowBox[{"2", " ", 
         SuperscriptBox["\[Sigma]1", "2"]}], "-", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        RowBox[{"2", " ", 
         SuperscriptBox["\[Sigma]2", "2"]}], "-", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        RowBox[{"2", " ", 
         SuperscriptBox["\[Sigma]3", "2"]}]}], ")"}]}]], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       FractionBox["1", 
        SqrtBox["2"]], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
    SubscriptBox["\[Xi]", "1"]}], 
   RowBox[{
    SubscriptBox["\[Xi]", "2"], " ", 
    SubscriptBox["\[Xi]", "3"]}]], "+", 
  FractionBox[
   RowBox[{
    SuperscriptBox["\[Epsilon]", 
     RowBox[{"3", "/", "4"}]], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["t", "\[Kappa]"], ")"}], 
     RowBox[{
      FractionBox["1", "4"], " ", 
      RowBox[{"(", 
       RowBox[{"3", "-", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        RowBox[{"2", " ", 
         SuperscriptBox["\[Sigma]1", "2"]}], "+", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        RowBox[{"2", " ", 
         SuperscriptBox["\[Sigma]2", "2"]}], "-", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        RowBox[{"2", " ", 
         SuperscriptBox["\[Sigma]3", "2"]}]}], ")"}]}]], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       FractionBox["1", 
        SqrtBox["2"]], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
    SubscriptBox["\[Xi]", "2"]}], 
   RowBox[{
    SubscriptBox["\[Xi]", "1"], " ", 
    SubscriptBox["\[Xi]", "3"]}]], "+", 
  FractionBox[
   RowBox[{
    SuperscriptBox["\[Epsilon]", 
     RowBox[{"3", "/", "4"}]], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["t", "\[Kappa]"], ")"}], 
     RowBox[{
      FractionBox["1", "2"], " ", 
      RowBox[{"(", 
       RowBox[{
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], ")"}]}]], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       FractionBox["1", 
        SqrtBox["2"]], ",", 
       FractionBox["1", 
        SqrtBox["2"]], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
    SubscriptBox["\[Xi]", "1"], " ", 
    SubscriptBox["\[Xi]", "2"]}], 
   SubscriptBox["\[Xi]", "3"]], "+", 
  FractionBox[
   RowBox[{
    SuperscriptBox["\[Epsilon]", 
     RowBox[{"3", "/", "4"}]], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["t", "\[Kappa]"], ")"}], 
     RowBox[{
      FractionBox["1", "4"], " ", 
      RowBox[{"(", 
       RowBox[{"3", "-", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        RowBox[{"2", " ", 
         SuperscriptBox["\[Sigma]1", "2"]}], "-", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        RowBox[{"2", " ", 
         SuperscriptBox["\[Sigma]2", "2"]}], "+", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        RowBox[{"2", " ", 
         SuperscriptBox["\[Sigma]3", "2"]}]}], ")"}]}]], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       FractionBox["1", 
        SqrtBox["2"]]}], "}"}], "]"}], " ", 
    SubscriptBox["\[Xi]", "3"]}], 
   RowBox[{
    SubscriptBox["\[Xi]", "1"], " ", 
    SubscriptBox["\[Xi]", "2"]}]], "+", 
  FractionBox[
   RowBox[{
    SuperscriptBox["\[Epsilon]", 
     RowBox[{"3", "/", "4"}]], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["t", "\[Kappa]"], ")"}], 
     RowBox[{
      FractionBox["1", "2"], " ", 
      RowBox[{"(", 
       RowBox[{
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}], ")"}]}]], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       FractionBox["1", 
        SqrtBox["2"]], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       FractionBox["1", 
        SqrtBox["2"]]}], "}"}], "]"}], " ", 
    SubscriptBox["\[Xi]", "1"], " ", 
    SubscriptBox["\[Xi]", "3"]}], 
   SubscriptBox["\[Xi]", "2"]], "+", 
  FractionBox[
   RowBox[{
    SuperscriptBox["\[Epsilon]", 
     RowBox[{"3", "/", "4"}]], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["t", "\[Kappa]"], ")"}], 
     RowBox[{
      FractionBox["1", "2"], " ", 
      RowBox[{"(", 
       RowBox[{
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}], ")"}]}]], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       FractionBox["1", 
        SqrtBox["2"]], ",", 
       FractionBox["1", 
        SqrtBox["2"]]}], "}"}], "]"}], " ", 
    SubscriptBox["\[Xi]", "2"], " ", 
    SubscriptBox["\[Xi]", "3"]}], 
   SubscriptBox["\[Xi]", "1"]], "+", 
  RowBox[{
   SuperscriptBox["\[Epsilon]", 
    RowBox[{"3", "/", "4"}]], " ", 
   SuperscriptBox[
    RowBox[{"(", 
     FractionBox["t", "\[Kappa]"], ")"}], 
    RowBox[{
     FractionBox["1", "2"], " ", 
     RowBox[{"(", 
      RowBox[{
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          FractionBox["1", 
           SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"], "+", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          FractionBox["1", 
           SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"], "+", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          FractionBox["1", 
           SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}], ")"}]}]], " ", 
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{
      FractionBox["1", 
       SqrtBox["2"]], ",", 
      FractionBox["1", 
       SqrtBox["2"]], ",", 
      FractionBox["1", 
       SqrtBox["2"]]}], "}"}], "]"}], " ", 
   SubscriptBox["\[Xi]", "1"], " ", 
   SubscriptBox["\[Xi]", "2"], " ", 
   SubscriptBox["\[Xi]", "3"]}]}]], "Output",
 CellChangeTimes->{
  3.8200519140791883`*^9, {3.8200520692979717`*^9, 3.820052124329382*^9}, 
   3.820053163621766*^9, 3.8200536086053343`*^9, 3.820054403714715*^9},
 CellLabel->"Out[50]=",ExpressionUUID->"ab0c9e4b-2483-4181-9496-c1de3a2f1d86"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"Tau", "[", "t", "]"}], "^", "2"}], 
   RowBox[{
    RowBox[{"op", "[", "t", "]"}], "[", 
    RowBox[{
     SubscriptBox["Tau", "\[Lambda]"], "[", "t", "]"}], "]"}]}], "//", 
  "Factor"}]], "Input",
 CellChangeTimes->{{3.820052165897141*^9, 3.8200521786884604`*^9}, {
  3.820053104904099*^9, 3.820053112013493*^9}},
 CellLabel->"In[54]:=",ExpressionUUID->"c6c66148-6648-4095-938d-d8220888a58d"],

Cell[BoxData[
 RowBox[{
  FractionBox["1", 
   RowBox[{
    SuperscriptBox["\[Kappa]", "2"], " ", 
    SubsuperscriptBox["\[Xi]", "1", "6"], " ", 
    SubsuperscriptBox["\[Xi]", "2", "6"], " ", 
    SubsuperscriptBox["\[Xi]", "3", "6"]}]], 
  RowBox[{"2", " ", 
   SuperscriptBox["\[Epsilon]", 
    RowBox[{"3", "/", "2"}]], " ", 
   SuperscriptBox[
    RowBox[{"(", 
     FractionBox["t", "\[Kappa]"], ")"}], 
    RowBox[{
     RowBox[{
      RowBox[{"-", 
       SqrtBox["2"]}], " ", "\[Sigma]1"}], "-", 
     RowBox[{
      SqrtBox["2"], " ", "\[Sigma]2"}], "-", 
     RowBox[{
      SqrtBox["2"], " ", "\[Sigma]3"}]}]], " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "2"], "+", 
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"]}], "-", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}]], " ", "\[Sigma]1", " ", 
      "\[Sigma]2", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"]}], "+", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", "\[Sigma]1", " ", 
      "\[Sigma]2", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]1"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]2"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "4"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "2"], "+", 
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "-", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}]], " ", "\[Sigma]1", " ", 
      "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]1", " ", "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]1"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "2"], "+", 
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "-", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "2"], "+", 
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}]], " ", "\[Sigma]2", " ", 
      "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "2"], "+", 
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]2", " ", "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]1"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "-", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]1"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]1", " ", "\[Sigma]2", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]1"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "-", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]1"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]1", " ", "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]1"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]2", " ", "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]1"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]2"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "-", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]2"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]1", " ", "\[Sigma]2", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]2"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]2"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]1", " ", "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "-", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]2"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]2", " ", "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]2"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]3"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]3"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", "\[Sigma]1", " ", 
      "\[Sigma]2", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]3"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "-", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]3"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", "\[Sigma]1", " ", 
      "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "-", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]3"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", "\[Sigma]2", " ", 
      "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]3"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]1", " ", "\[Sigma]2", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]1", " ", "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]2", " ", "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "-", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]2", " ", "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]1"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]1"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]2", " ", "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]1"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]2"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "2", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "-", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]1", " ", "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]2"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]2"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]1", " ", "\[Sigma]3", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]2"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]3", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]3"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]3", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]3"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "4"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]3"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "4"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "4"]}], "-", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]], " ", 
      "\[Sigma]1", " ", "\[Sigma]2", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "4"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "4"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]3"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "4"]}], "+", 
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]3"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      "\[Sigma]1", " ", "\[Sigma]2", " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "4"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["3", "4"], "+", 
        FractionBox["\[Sigma]1", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox["\[Sigma]2", 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        FractionBox[
         RowBox[{"3", " ", "\[Sigma]3"}], 
         SqrtBox["2"]], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]3", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "4"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]], " ", 
      SuperscriptBox["\[Sigma]2", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "4"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "-", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox["1", 
             SqrtBox["2"]], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]2"}], ")"}], "2"], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]3"}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           FractionBox["1", 
            SqrtBox["2"]], "+", "\[Sigma]3"}], ")"}], "2"]}]], " ", 
      SuperscriptBox["\[Sigma]1", "2"], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", 
           SqrtBox["2"]]}], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]], ",", 
         FractionBox["1", 
          SqrtBox["2"]]}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "4"], " ", 
      SubsuperscriptBox["\[Xi]", "3", "4"]}]}], ")"}], " ", 
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{
      RowBox[{"\[Epsilon]", " ", 
       SuperscriptBox[
        RowBox[{"(", 
         FractionBox["t", "\[Kappa]"], ")"}], 
        RowBox[{
         FractionBox[
          SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
         FractionBox[
          SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
         RowBox[{
          FractionBox["1", "2"], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SqrtBox["2"]}], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
       "\[Kappa]", " ", 
       RowBox[{"f", "[", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0", ",", 
          RowBox[{"-", 
           SqrtBox["2"]}]}], "}"}], "]"}], " ", 
       SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
       SubsuperscriptBox["\[Xi]", "2", "2"]}], "+", 
      RowBox[{"\[Epsilon]", " ", 
       SuperscriptBox[
        RowBox[{"(", 
         FractionBox["t", "\[Kappa]"], ")"}], 
        RowBox[{
         FractionBox[
          SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
         RowBox[{
          FractionBox["1", "2"], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SqrtBox["2"]}], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
         FractionBox[
          SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", "\[Kappa]", " ", 
       RowBox[{"f", "[", 
        RowBox[{"{", 
         RowBox[{"0", ",", 
          RowBox[{"-", 
           SqrtBox["2"]}], ",", "0"}], "}"}], "]"}], " ", 
       SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
       SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
      RowBox[{"\[Epsilon]", " ", 
       SuperscriptBox[
        RowBox[{"(", 
         FractionBox["t", "\[Kappa]"], ")"}], 
        RowBox[{
         RowBox[{
          FractionBox["1", "2"], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SqrtBox["2"]}], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
         FractionBox[
          SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
         FractionBox[
          SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", "\[Kappa]", " ", 
       RowBox[{"f", "[", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", 
           SqrtBox["2"]}], ",", "0", ",", "0"}], "}"}], "]"}], " ", 
       SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
       SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
      RowBox[{
       SuperscriptBox[
        RowBox[{"(", 
         FractionBox["t", "\[Kappa]"], ")"}], 
        RowBox[{
         FractionBox[
          SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
         FractionBox[
          SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
         FractionBox[
          SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", "\[Kappa]", " ", 
       RowBox[{"f", "[", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}], " ", 
       SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
       SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
       SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
      RowBox[{"\[Epsilon]", " ", 
       SuperscriptBox[
        RowBox[{"(", 
         FractionBox["t", "\[Kappa]"], ")"}], 
        RowBox[{
         RowBox[{
          FractionBox["1", "2"], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             SqrtBox["2"], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
         FractionBox[
          SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
         FractionBox[
          SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", "\[Kappa]", " ", 
       RowBox[{"f", "[", 
        RowBox[{"{", 
         RowBox[{
          SqrtBox["2"], ",", "0", ",", "0"}], "}"}], "]"}], " ", 
       SubsuperscriptBox["\[Xi]", "1", "4"], " ", 
       SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
       SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
      RowBox[{"\[Epsilon]", " ", 
       SuperscriptBox[
        RowBox[{"(", 
         FractionBox["t", "\[Kappa]"], ")"}], 
        RowBox[{
         FractionBox[
          SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
         RowBox[{
          FractionBox["1", "2"], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             SqrtBox["2"], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
         FractionBox[
          SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", "\[Kappa]", " ", 
       RowBox[{"f", "[", 
        RowBox[{"{", 
         RowBox[{"0", ",", 
          SqrtBox["2"], ",", "0"}], "}"}], "]"}], " ", 
       SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
       SubsuperscriptBox["\[Xi]", "2", "4"], " ", 
       SubsuperscriptBox["\[Xi]", "3", "2"]}], "+", 
      RowBox[{"\[Epsilon]", " ", 
       SuperscriptBox[
        RowBox[{"(", 
         FractionBox["t", "\[Kappa]"], ")"}], 
        RowBox[{
         FractionBox[
          SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
         FractionBox[
          SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
         RowBox[{
          FractionBox["1", "2"], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             SqrtBox["2"], "+", "\[Sigma]3"}], ")"}], "2"]}]}]], " ", 
       "\[Kappa]", " ", 
       RowBox[{"f", "[", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0", ",", 
          SqrtBox["2"]}], "}"}], "]"}], " ", 
       SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
       SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
       SubsuperscriptBox["\[Xi]", "3", "4"]}], "+", 
      RowBox[{"t", " ", "\[Epsilon]", " ", 
       SuperscriptBox[
        RowBox[{"(", 
         FractionBox["t", "\[Kappa]"], ")"}], 
        RowBox[{
         FractionBox[
          SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
         FractionBox[
          SuperscriptBox["\[Sigma]2", "2"], "2"], "+", 
         FractionBox[
          SuperscriptBox["\[Sigma]3", "2"], "2"]}]], " ", 
       RowBox[{"f", "[", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}], " ", 
       SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
       SubsuperscriptBox["\[Xi]", "2", "2"], " ", 
       SubsuperscriptBox["\[Xi]", "3", "2"], " ", 
       RowBox[{
        SubscriptBox["Z", "1"], "[", 
        RowBox[{"{", 
         RowBox[{"\[Sigma]1", ",", "\[Sigma]2", ",", "\[Sigma]3"}], "}"}], 
        "]"}]}]}], ")"}], "2"]}]}]], "Output",
 CellChangeTimes->{
  3.820053099496067*^9, {3.820053157181657*^9, 3.820053184366346*^9}, {
   3.820054411673678*^9, 3.820054434421173*^9}},
 CellLabel->"Out[54]=",ExpressionUUID->"e4d989c3-7974-4390-9bba-d0b6e2240f18"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"Coefficient", "[", 
   RowBox[{
    RowBox[{"Coefficient", "[", 
     RowBox[{
      RowBox[{"Coefficient", "[", 
       RowBox[{
        RowBox[{"Coefficient", "[", 
         RowBox[{"%", ",", "\[Epsilon]", ",", 
          RowBox[{"3", "/", "2"}]}], "]"}], ",", 
        SubscriptBox["\[Xi]", "1"], ",", 
        RowBox[{"-", "2"}]}], "]"}], ",", 
      SubscriptBox["\[Xi]", "2"], ",", 
      RowBox[{"-", "2"}]}], "]"}], ",", 
    SubscriptBox["\[Xi]", "3"], ",", "0"}], "]"}], "//", 
  "Simplify"}]], "Input",
 CellChangeTimes->{{3.820053255272637*^9, 3.820053328402773*^9}, 
   3.820054427126408*^9},
 CellLabel->"In[55]:=",ExpressionUUID->"7857bc7a-ef43-4c6a-bc87-fac69701e9cc"],

Cell[BoxData[
 RowBox[{"2", " ", 
  SuperscriptBox[
   RowBox[{"(", 
    FractionBox["t", "\[Kappa]"], ")"}], 
   RowBox[{
    FractionBox["3", "2"], "-", 
    RowBox[{
     SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
    RowBox[{"2", " ", 
     SuperscriptBox["\[Sigma]1", "2"]}], "-", 
    RowBox[{
     SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
    RowBox[{"2", " ", 
     SuperscriptBox["\[Sigma]2", "2"]}], "+", 
    RowBox[{"2", " ", 
     SuperscriptBox["\[Sigma]3", "2"]}]}]], " ", 
  SuperscriptBox["\[Sigma]3", "2"], " ", 
  SuperscriptBox[
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}], "2"], " ", 
  RowBox[{"f", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", 
      FractionBox["1", 
       SqrtBox["2"]]}], ",", 
     RowBox[{"-", 
      FractionBox["1", 
       SqrtBox["2"]]}], ",", 
     RowBox[{"-", 
      FractionBox["1", 
       SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
  RowBox[{"f", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", 
      FractionBox["1", 
       SqrtBox["2"]]}], ",", 
     RowBox[{"-", 
      FractionBox["1", 
       SqrtBox["2"]]}], ",", 
     FractionBox["1", 
      SqrtBox["2"]]}], "}"}], "]"}]}]], "Output",
 CellChangeTimes->{{3.820053291082036*^9, 3.8200533290578623`*^9}, {
  3.8200544189812393`*^9, 3.820054439020466*^9}},
 CellLabel->"Out[55]=",ExpressionUUID->"e963da24-c7e5-443c-96bd-ad3f4b5b93c2"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", 
      SqrtBox["2"]}], ",", 
     RowBox[{"-", 
      SqrtBox["2"]}], ",", "0"}], "}"}], "+", "\[Lambda]"}], "//", 
  "Simplify"}]], "Input",
 CellChangeTimes->{{3.820053366654305*^9, 3.820053377970675*^9}},
 CellLabel->
  "In[215]:=",ExpressionUUID->"e9386e4e-5912-408e-ae5d-7ea7c8cfe82e"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"-", 
    FractionBox["1", 
     SqrtBox["2"]]}], ",", 
   RowBox[{"-", 
    FractionBox["1", 
     SqrtBox["2"]]}], ",", 
   FractionBox["1", 
    SqrtBox["2"]]}], "}"}]], "Output",
 CellChangeTimes->{{3.820053367636923*^9, 3.820053378255958*^9}},
 CellLabel->
  "Out[215]=",ExpressionUUID->"068fe3cf-d430-467e-966f-77857ee56412"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"mTau", "[", "t_", "]"}], ":=", " ", 
  RowBox[{
   RowBox[{
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["t", "\[Kappa]"], ")"}], 
     RowBox[{
      FractionBox["1", "2"], " ", 
      RowBox[{"(", 
       RowBox[{
        SuperscriptBox["\[Sigma]1", "2"], "+", 
        SuperscriptBox["\[Sigma]2", "2"], "+", 
        SuperscriptBox["\[Sigma]3", "2"]}], ")"}]}]], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}]}], "+", 
   FractionBox[
    RowBox[{" ", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["1", "2"], " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SqrtBox["2"]}], "+", "\[Sigma]1"}], ")"}], "2"], "+", 
          SuperscriptBox["\[Sigma]2", "2"], "+", 
          SuperscriptBox["\[Sigma]3", "2"]}], ")"}]}]], " ", "\[Epsilon]", 
      " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          SqrtBox["2"]}], ",", "0", ",", "0"}], "}"}], "]"}]}]}], 
    SubsuperscriptBox["\[Xi]", "1", "2"]], "+", 
   FractionBox[
    RowBox[{" ", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox["1", "2"], " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["\[Sigma]1", "2"], "+", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SqrtBox["2"]}], "+", "\[Sigma]2"}], ")"}], "2"], "+", 
          SuperscriptBox["\[Sigma]3", "2"]}], ")"}]}]], " ", "\[Epsilon]", 
      " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{"0", ",", 
         RowBox[{"-", 
          SqrtBox["2"]}], ",", "0"}], "}"}], "]"}]}]}], 
    SubsuperscriptBox["\[Xi]", "2", "2"]]}]}]], "Input",
 CellChangeTimes->{{3.8200536566074047`*^9, 3.820053662368085*^9}, {
  3.820053713328238*^9, 3.820053721389045*^9}, {3.820054057782703*^9, 
  3.820054058226462*^9}, {3.820054448600348*^9, 3.820054464917252*^9}},
 CellLabel->"In[56]:=",ExpressionUUID->"f5305035-b719-4a2d-99e2-4ebb74cc657d"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"op", "[", "t", "]"}], "[", 
   RowBox[{
    RowBox[{"op", "[", "t", "]"}], "[", 
    RowBox[{"mTau", "[", "t", "]"}], "]"}], "]"}], "//", "Factor"}]], "Input",\

 CellChangeTimes->{{3.820053414581918*^9, 3.820053422173208*^9}, {
  3.820053724963979*^9, 3.8200537441587973`*^9}, {3.820053993927389*^9, 
  3.820053994347129*^9}},
 CellLabel->"In[57]:=",ExpressionUUID->"8358d475-bc9b-49a1-804d-0d49f8940d9e"],

Cell[BoxData[
 RowBox[{
  FractionBox["1", 
   RowBox[{"2", " ", 
    SubsuperscriptBox["\[Xi]", "1", "4"], " ", 
    SubsuperscriptBox["\[Xi]", "2", "4"]}]], 
  RowBox[{
   SuperscriptBox["\[Epsilon]", "2"], " ", 
   SuperscriptBox[
    RowBox[{"(", 
     FractionBox["t", "\[Kappa]"], ")"}], 
    RowBox[{
     SuperscriptBox["\[Sigma]1", "2"], "+", 
     RowBox[{
      FractionBox["1", "2"], " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", 
          SqrtBox["2"]}], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
     SuperscriptBox["\[Sigma]2", "2"], "+", 
     RowBox[{
      FractionBox["1", "2"], " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", 
          SqrtBox["2"]}], "+", "\[Sigma]2"}], ")"}], "2"]}], "+", 
     RowBox[{"2", " ", 
      SuperscriptBox["\[Sigma]3", "2"]}]}]], " ", 
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{
      SqrtBox["2"], "-", 
      RowBox[{"2", " ", "\[Sigma]1"}]}], ")"}], "2"], " ", 
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{
      SqrtBox["2"], "-", 
      RowBox[{"2", " ", "\[Sigma]2"}]}], ")"}], "2"], " ", 
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{"\[Sigma]1", "-", "\[Sigma]2"}], ")"}], "2"], " ", 
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}], " ", 
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{"0", ",", 
      RowBox[{"-", 
       SqrtBox["2"]}], ",", "0"}], "}"}], "]"}], " ", 
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"-", 
       SqrtBox["2"]}], ",", "0", ",", "0"}], "}"}], "]"}], " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"\[Epsilon]", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", 
             SqrtBox["2"]}], "+", "\[Sigma]2"}], ")"}], "2"]}]}]], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{"0", ",", 
         RowBox[{"-", 
          SqrtBox["2"]}], ",", "0"}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"]}], "+", 
     RowBox[{"\[Epsilon]", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        RowBox[{
         FractionBox["1", "2"], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", 
             SqrtBox["2"]}], "+", "\[Sigma]1"}], ")"}], "2"]}], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"]}]], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          SqrtBox["2"]}], ",", "0", ",", "0"}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"]}], "+", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["t", "\[Kappa]"], ")"}], 
       RowBox[{
        FractionBox[
         SuperscriptBox["\[Sigma]1", "2"], "2"], "+", 
        FractionBox[
         SuperscriptBox["\[Sigma]2", "2"], "2"]}]], " ", 
      RowBox[{"f", "[", 
       RowBox[{"{", 
        RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}], " ", 
      SubsuperscriptBox["\[Xi]", "1", "2"], " ", 
      SubsuperscriptBox["\[Xi]", "2", "2"]}]}], ")"}]}]}]], "Output",
 CellChangeTimes->{{3.820053736771282*^9, 3.820053753825735*^9}, 
   3.820053997253508*^9, 3.820054062587039*^9, 3.820054468288784*^9},
 CellLabel->"Out[57]=",ExpressionUUID->"070892cb-9c5c-4861-bb96-0b4b60b6e8b2"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"Coefficient", "[", 
   RowBox[{
    RowBox[{"Coefficient", "[", 
     RowBox[{
      RowBox[{"Coefficient", "[", 
       RowBox[{
        RowBox[{"Coefficient", "[", 
         RowBox[{"%", ",", "\[Epsilon]", ",", "2"}], "]"}], ",", 
        SubscriptBox["\[Xi]", "1"], ",", 
        RowBox[{"-", "2"}]}], "]"}], ",", 
      SubscriptBox["\[Xi]", "2"], ",", 
      RowBox[{"-", "2"}]}], "]"}], ",", 
    SubscriptBox["\[Xi]", "3"], ",", "0"}], "]"}], "//", 
  "Simplify"}]], "Input",
 CellChangeTimes->{{3.820053774952919*^9, 3.820053776190236*^9}},
 CellLabel->"In[58]:=",ExpressionUUID->"af42ec4e-688e-472b-869b-f156e62c0ce2"],

Cell[BoxData[
 RowBox[{
  FractionBox["1", "2"], " ", 
  SuperscriptBox[
   RowBox[{"(", 
    FractionBox["t", "\[Kappa]"], ")"}], 
   RowBox[{"2", "-", 
    RowBox[{
     SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
    RowBox[{"2", " ", 
     SuperscriptBox["\[Sigma]1", "2"]}], "-", 
    RowBox[{
     SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
    RowBox[{"2", " ", 
     SuperscriptBox["\[Sigma]2", "2"]}], "+", 
    RowBox[{"2", " ", 
     SuperscriptBox["\[Sigma]3", "2"]}]}]], " ", 
  SuperscriptBox[
   RowBox[{"(", 
    RowBox[{
     SqrtBox["2"], "-", 
     RowBox[{"2", " ", "\[Sigma]1"}]}], ")"}], "2"], " ", 
  SuperscriptBox[
   RowBox[{"(", 
    RowBox[{
     SqrtBox["2"], "-", 
     RowBox[{"2", " ", "\[Sigma]2"}]}], ")"}], "2"], " ", 
  SuperscriptBox[
   RowBox[{"(", 
    RowBox[{"\[Sigma]1", "-", "\[Sigma]2"}], ")"}], "2"], " ", 
  SuperscriptBox[
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}], "2"], " ", 
  RowBox[{"f", "[", 
   RowBox[{"{", 
    RowBox[{"0", ",", 
     RowBox[{"-", 
      SqrtBox["2"]}], ",", "0"}], "}"}], "]"}], " ", 
  RowBox[{"f", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", 
      SqrtBox["2"]}], ",", "0", ",", "0"}], "}"}], "]"}]}]], "Output",
 CellChangeTimes->{3.820053777071286*^9, 3.82005400252907*^9, 
  3.820054065959352*^9, 3.820054471522587*^9},
 CellLabel->"Out[58]=",ExpressionUUID->"3c10c02e-7850-43e4-a65e-70e4d84e5c19"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  FractionBox[
   RowBox[{"2", " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["t", "\[Kappa]"], ")"}], 
     RowBox[{
      FractionBox["3", "2"], "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]], " ", 
    SuperscriptBox["\[Sigma]3", "2"], " ", 
    SuperscriptBox[
     RowBox[{"f", "[", 
      RowBox[{"{", 
       RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}], "2"], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       FractionBox["1", 
        SqrtBox["2"]]}], "}"}], "]"}]}], 
   RowBox[{
    FractionBox["1", "2"], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["t", "\[Kappa]"], ")"}], 
     RowBox[{"2", "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{
       SqrtBox["2"], "-", 
       RowBox[{"2", " ", "\[Sigma]1"}]}], ")"}], "2"], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{
       SqrtBox["2"], "-", 
       RowBox[{"2", " ", "\[Sigma]2"}]}], ")"}], "2"], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"\[Sigma]1", "-", "\[Sigma]2"}], ")"}], "2"], " ", 
    SuperscriptBox[
     RowBox[{"f", "[", 
      RowBox[{"{", 
       RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}], "2"], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{"0", ",", 
       RowBox[{"-", 
        SqrtBox["2"]}], ",", "0"}], "}"}], "]"}], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", 
        SqrtBox["2"]}], ",", "0", ",", "0"}], "}"}], "]"}]}]], "//", 
  "Cancel"}]], "Input",
 CellChangeTimes->{{3.820054512218457*^9, 3.820054518945898*^9}},
 CellLabel->"In[59]:=",ExpressionUUID->"f044d7eb-75fb-469a-aa68-398c4d8807e2"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   FractionBox[
    RowBox[{"4", " ", 
     SuperscriptBox["\[Sigma]3", "2"], " ", 
     RowBox[{"f", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"-", 
         FractionBox["1", 
          SqrtBox["2"]]}], ",", 
        RowBox[{"-", 
         FractionBox["1", 
          SqrtBox["2"]]}], ",", 
        RowBox[{"-", 
         FractionBox["1", 
          SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
     RowBox[{"f", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"-", 
         FractionBox["1", 
          SqrtBox["2"]]}], ",", 
        RowBox[{"-", 
         FractionBox["1", 
          SqrtBox["2"]]}], ",", 
        FractionBox["1", 
         SqrtBox["2"]]}], "}"}], "]"}]}], 
    RowBox[{
     SqrtBox[
      FractionBox["t", "\[Kappa]"]], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{
        SqrtBox["2"], "-", 
        RowBox[{"2", " ", "\[Sigma]1"}]}], ")"}], "2"], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{
        SqrtBox["2"], "-", 
        RowBox[{"2", " ", "\[Sigma]2"}]}], ")"}], "2"], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"\[Sigma]1", "-", "\[Sigma]2"}], ")"}], "2"], " ", 
     RowBox[{"f", "[", 
      RowBox[{"{", 
       RowBox[{"0", ",", 
        RowBox[{"-", 
         SqrtBox["2"]}], ",", "0"}], "}"}], "]"}], " ", 
     RowBox[{"f", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"-", 
         SqrtBox["2"]}], ",", "0", ",", "0"}], "}"}], "]"}]}]], "/.", 
   RowBox[{"f", "\[Rule]", "F"}]}], "//", "Simplify"}]], "Input",
 CellChangeTimes->{{3.820054524978601*^9, 3.8200545372203083`*^9}},
 CellLabel->"In[62]:=",ExpressionUUID->"c8a777a5-3bfa-4335-bfdf-661409fdf6fb"],

Cell[BoxData[
 FractionBox["1", 
  RowBox[{"4", " ", 
   SqrtBox[
    FractionBox["t", "\[Kappa]"]]}]]], "Output",
 CellChangeTimes->{{3.820054528264866*^9, 3.82005453764078*^9}},
 CellLabel->"Out[62]=",ExpressionUUID->"9300f130-3632-4609-ae88-2a3f1cdcbb7c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(", 
   RowBox[{
    RowBox[{
     RowBox[{"-", 
      SuperscriptBox["2", 
       RowBox[{"1", "+", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
        RowBox[{"2", " ", 
         SqrtBox["2"], " ", "\[Sigma]2"}]}]]}], " ", 
     SuperscriptBox["\[Sigma]1", "4"], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       RowBox[{"2", " ", 
        SqrtBox["2"], " ", "\[Sigma]2"}], "-", 
       RowBox[{"2", " ", 
        SuperscriptBox["\[Sigma]2", "2"]}]}], ")"}]}], "+", 
    RowBox[{
     SuperscriptBox["2", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", 
        SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
       RowBox[{"2", " ", 
        SqrtBox["2"], " ", "\[Sigma]2"}]}]], " ", 
     SuperscriptBox["\[Sigma]1", "3"], " ", 
     RowBox[{"(", 
      RowBox[{
       SqrtBox["2"], "-", 
       RowBox[{"2", " ", "\[Sigma]2"}]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       RowBox[{"2", " ", 
        SuperscriptBox["\[Sigma]2", "2"]}]}], ")"}]}], "-", 
    RowBox[{
     SuperscriptBox["2", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", 
        SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
       RowBox[{"2", " ", 
        SqrtBox["2"], " ", "\[Sigma]2"}]}]], " ", "\[Sigma]1", " ", 
     "\[Sigma]2", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       RowBox[{
        SqrtBox["2"], " ", "\[Sigma]2"}]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       RowBox[{"2", " ", 
        SuperscriptBox["\[Sigma]2", "2"]}]}], ")"}]}], "+", 
    RowBox[{
     SuperscriptBox["2", 
      RowBox[{"2", " ", 
       SqrtBox["2"], " ", 
       RowBox[{"(", 
        RowBox[{"\[Sigma]1", "+", "\[Sigma]2"}], ")"}]}]], " ", 
     SuperscriptBox["\[Sigma]2", "2"], " ", 
     RowBox[{"(", 
      RowBox[{"1", "-", 
       RowBox[{"2", " ", 
        SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
       RowBox[{"2", " ", 
        SuperscriptBox["\[Sigma]2", "2"]}]}], ")"}]}], "+", 
    RowBox[{
     SuperscriptBox["2", 
      RowBox[{"2", " ", 
       SqrtBox["2"], " ", 
       RowBox[{"(", 
        RowBox[{"\[Sigma]1", "+", "\[Sigma]2"}], ")"}]}]], " ", 
     SuperscriptBox["\[Sigma]1", "2"], " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", 
        SqrtBox["2"], " ", "\[Sigma]2"}], "-", 
       RowBox[{"12", " ", 
        SuperscriptBox["\[Sigma]2", "2"]}], "+", 
       RowBox[{"4", " ", 
        SqrtBox["2"], " ", 
        SuperscriptBox["\[Sigma]2", "3"]}], "+", 
       RowBox[{"4", " ", 
        SuperscriptBox["\[Sigma]2", "4"]}]}], ")"}]}]}], ")"}], "//", 
  "FullSimplify"}]], "Input",
 CellChangeTimes->{{3.820053802652206*^9, 3.820053811263753*^9}},
 CellLabel->"In[29]:=",ExpressionUUID->"38574f94-a8c9-4ce8-a68d-c14dfb307245"],

Cell[BoxData[
 RowBox[{
  SuperscriptBox["2", 
   RowBox[{"2", " ", 
    SqrtBox["2"], " ", 
    RowBox[{"(", 
     RowBox[{"\[Sigma]1", "+", "\[Sigma]2"}], ")"}]}]], " ", 
  SuperscriptBox[
   RowBox[{"(", 
    RowBox[{"\[Sigma]1", "-", "\[Sigma]2"}], ")"}], "2"], " ", 
  RowBox[{"(", 
   RowBox[{"1", "+", 
    RowBox[{"2", " ", "\[Sigma]2", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", 
        SqrtBox["2"]}], "+", "\[Sigma]2"}], ")"}]}], "+", 
    RowBox[{
     SuperscriptBox["\[Sigma]1", "2"], " ", 
     RowBox[{"(", 
      RowBox[{"2", "+", 
       RowBox[{"4", " ", "\[Sigma]2", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", 
           SqrtBox["2"]}], "+", "\[Sigma]2"}], ")"}]}]}], ")"}]}], "-", 
    RowBox[{"2", " ", "\[Sigma]1", " ", 
     RowBox[{"(", 
      RowBox[{
       SqrtBox["2"], "+", 
       RowBox[{"2", " ", "\[Sigma]2", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "2"}], "+", 
          RowBox[{
           SqrtBox["2"], " ", "\[Sigma]2"}]}], ")"}]}]}], ")"}]}]}], 
   ")"}]}]], "Output",
 CellChangeTimes->{{3.820053803775486*^9, 3.82005381196173*^9}},
 CellLabel->"Out[29]=",ExpressionUUID->"81a06e07-461f-4f88-8904-5a2a5450764b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(", 
   RowBox[{"1", "+", 
    RowBox[{"2", " ", "\[Sigma]2", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", 
        SqrtBox["2"]}], "+", "\[Sigma]2"}], ")"}]}], "+", 
    RowBox[{
     SuperscriptBox["\[Sigma]1", "2"], " ", 
     RowBox[{"(", 
      RowBox[{"2", "+", 
       RowBox[{"4", " ", "\[Sigma]2", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", 
           SqrtBox["2"]}], "+", "\[Sigma]2"}], ")"}]}]}], ")"}]}], "-", 
    RowBox[{"2", " ", "\[Sigma]1", " ", 
     RowBox[{"(", 
      RowBox[{
       SqrtBox["2"], "+", 
       RowBox[{"2", " ", "\[Sigma]2", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "2"}], "+", 
          RowBox[{
           SqrtBox["2"], " ", "\[Sigma]2"}]}], ")"}]}]}], ")"}]}]}], ")"}], "//",
   "FullSimplify"}]], "Input",
 CellChangeTimes->{{3.8200538192904387`*^9, 3.8200538221117287`*^9}},
 CellLabel->"In[30]:=",ExpressionUUID->"8384bd6f-50c9-4228-8622-244981e4d218"],

Cell[BoxData[
 RowBox[{"1", "+", 
  RowBox[{"2", " ", "\[Sigma]2", " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", 
      SqrtBox["2"]}], "+", "\[Sigma]2"}], ")"}]}], "+", 
  RowBox[{
   SuperscriptBox["\[Sigma]1", "2"], " ", 
   RowBox[{"(", 
    RowBox[{"2", "+", 
     RowBox[{"4", " ", "\[Sigma]2", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", 
         SqrtBox["2"]}], "+", "\[Sigma]2"}], ")"}]}]}], ")"}]}], "-", 
  RowBox[{"2", " ", "\[Sigma]1", " ", 
   RowBox[{"(", 
    RowBox[{
     SqrtBox["2"], "+", 
     RowBox[{"2", " ", "\[Sigma]2", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "2"}], "+", 
        RowBox[{
         SqrtBox["2"], " ", "\[Sigma]2"}]}], ")"}]}]}], ")"}]}]}]], "Output",
 CellChangeTimes->{3.820053822574551*^9},
 CellLabel->"Out[30]=",ExpressionUUID->"aa89816f-bdcc-4954-b4a3-c292db83baac"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{
    SuperscriptBox["4", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]1"}], "-", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "+", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]2"}], "-", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "-", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]], " ", 
    SuperscriptBox["t", 
     RowBox[{
      FractionBox["3", "2"], "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]], " ", 
    SuperscriptBox["\[Sigma]3", "2"], " ", 
    SuperscriptBox[
     RowBox[{"f", "[", 
      RowBox[{"{", 
       RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}], "2"], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}]}], "}"}], "]"}], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       RowBox[{"-", 
        FractionBox["1", 
         SqrtBox["2"]]}], ",", 
       FractionBox["1", 
        SqrtBox["2"]]}], "}"}], "]"}]}], "/.", 
   RowBox[{"f", "\[Rule]", "F"}]}], "//", "Simplify"}]], "Input",
 CellChangeTimes->{{3.820053851431223*^9, 3.820053859316206*^9}},
 CellLabel->
  "In[324]:=",ExpressionUUID->"0047a174-2d63-4e2d-879c-a634591bbff8"],

Cell[BoxData[
 RowBox[{"-", 
  FractionBox[
   RowBox[{
    SuperscriptBox["4", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]1"}], "-", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "+", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]2"}], "-", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "-", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]], " ", 
    SuperscriptBox["t", 
     RowBox[{
      FractionBox["3", "2"], "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]]}], 
   RowBox[{
    SuperscriptBox["\[Sigma]1", "2"], " ", 
    SuperscriptBox["\[Sigma]2", "2"], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"\[Sigma]1", "+", "\[Sigma]2"}], ")"}], "2"], " ", 
    RowBox[{"(", 
     RowBox[{"\[Sigma]1", "-", "\[Sigma]3"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"\[Sigma]2", "-", "\[Sigma]3"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"\[Sigma]1", "+", "\[Sigma]3"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"\[Sigma]2", "+", "\[Sigma]3"}], ")"}]}]]}]], "Output",
 CellChangeTimes->{{3.8200538535514193`*^9, 3.820053859730713*^9}, 
   3.821156132328269*^9, {3.8211562084462633`*^9, 3.821156236484929*^9}, 
   3.8211568273834476`*^9},
 CellLabel->
  "Out[324]=",ExpressionUUID->"d0cea4cc-f857-407f-bf03-0428c7ae7b6e"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"F", "[", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"-", 
     FractionBox["1", 
      SqrtBox["2"]]}], ",", 
    RowBox[{"-", 
     FractionBox["1", 
      SqrtBox["2"]]}], ",", 
    RowBox[{"-", 
     FractionBox["1", 
      SqrtBox["2"]]}]}], "}"}], "]"}]], "Input",
 CellChangeTimes->{{3.8211562125406*^9, 3.8211562127838097`*^9}},
 CellLabel->
  "In[287]:=",ExpressionUUID->"1cad002e-a013-4edf-84de-b1384d43d22e"],

Cell[BoxData[
 FractionBox["1", 
  RowBox[{"\[Sigma]1", " ", "\[Sigma]2", " ", 
   RowBox[{"(", 
    RowBox[{"\[Sigma]1", "+", "\[Sigma]2"}], ")"}], " ", "\[Sigma]3", " ", 
   RowBox[{"(", 
    RowBox[{"\[Sigma]1", "+", "\[Sigma]3"}], ")"}], " ", 
   RowBox[{"(", 
    RowBox[{"\[Sigma]2", "+", "\[Sigma]3"}], ")"}]}]]], "Output",
 CellChangeTimes->{{3.82115621349687*^9, 3.8211562334622307`*^9}},
 CellLabel->
  "Out[287]=",ExpressionUUID->"cd80cc8d-2ddf-4387-9284-14b44ea967c8"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{
    SuperscriptBox["2", 
     RowBox[{
      RowBox[{"-", "5"}], "+", 
      RowBox[{"2", " ", 
       SqrtBox["2"], " ", "\[Sigma]1"}], "-", 
      RowBox[{"4", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "+", 
      RowBox[{"2", " ", 
       SqrtBox["2"], " ", "\[Sigma]2"}], "-", 
      RowBox[{"4", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "-", 
      RowBox[{"4", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]], " ", 
    SuperscriptBox["t", 
     RowBox[{"2", "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{
       SqrtBox["2"], "-", 
       RowBox[{"2", " ", "\[Sigma]1"}]}], ")"}], "2"], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{
       SqrtBox["2"], "-", 
       RowBox[{"2", " ", "\[Sigma]2"}]}], ")"}], "2"], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"\[Sigma]1", "-", "\[Sigma]2"}], ")"}], "2"], " ", 
    SuperscriptBox[
     RowBox[{"f", "[", 
      RowBox[{"{", 
       RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}], "2"], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{"0", ",", 
       RowBox[{"-", 
        SqrtBox["2"]}], ",", "0"}], "}"}], "]"}], " ", 
    RowBox[{"f", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", 
        SqrtBox["2"]}], ",", "0", ",", "0"}], "}"}], "]"}]}], "/.", 
   RowBox[{"f", "\[Rule]", "F"}]}], "//", "Simplify"}]], "Input",
 CellChangeTimes->{3.820053866759226*^9, 3.8200540797310266`*^9},
 CellLabel->
  "In[325]:=",ExpressionUUID->"17dea985-35b5-4b06-84cb-1ed000fad0cf"],

Cell[BoxData[
 RowBox[{"-", 
  FractionBox[
   RowBox[{
    SuperscriptBox["2", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      RowBox[{"2", " ", 
       SqrtBox["2"], " ", "\[Sigma]1"}], "-", 
      RowBox[{"4", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "+", 
      RowBox[{"2", " ", 
       SqrtBox["2"], " ", "\[Sigma]2"}], "-", 
      RowBox[{"4", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "-", 
      RowBox[{"4", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]], " ", 
    SuperscriptBox["t", 
     RowBox[{"2", "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]]}], 
   RowBox[{
    SuperscriptBox["\[Sigma]1", "2"], " ", 
    SuperscriptBox["\[Sigma]2", "2"], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"\[Sigma]1", "+", "\[Sigma]2"}], ")"}], "2"], " ", 
    RowBox[{"(", 
     RowBox[{"\[Sigma]1", "-", "\[Sigma]3"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"\[Sigma]2", "-", "\[Sigma]3"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"\[Sigma]1", "+", "\[Sigma]3"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"\[Sigma]2", "+", "\[Sigma]3"}], ")"}]}]]}]], "Output",
 CellChangeTimes->{3.820053867742023*^9, 3.8200540805049686`*^9, 
  3.821156239378592*^9, 3.821156830849492*^9},
 CellLabel->
  "Out[325]=",ExpressionUUID->"bb20551c-5c69-44f6-8617-568b54696661"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"%33", "/", "%45"}], "//", "Cancel"}]], "Input",
 CellChangeTimes->{{3.820054084759035*^9, 3.820054092037538*^9}},
 CellLabel->"In[46]:=",ExpressionUUID->"d171a64c-7470-49ac-9079-a324b9962f35"],

Cell[BoxData[
 FractionBox["1", 
  RowBox[{"2", " ", 
   SqrtBox["t"]}]]], "Output",
 CellChangeTimes->{3.820054092502047*^9},
 CellLabel->"Out[46]=",ExpressionUUID->"c7c87db0-2b9e-4893-b520-46e1d3cf709d"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  FractionBox[
   RowBox[{
    SuperscriptBox["4", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]1"}], "-", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "+", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]2"}], "-", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "-", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]], " ", 
    SuperscriptBox["t", 
     RowBox[{
      FractionBox["3", "2"], "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]]}], 
   RowBox[{
    SuperscriptBox["2", 
     RowBox[{
      RowBox[{"-", "3"}], "-", 
      RowBox[{"4", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "-", 
      RowBox[{"4", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "-", 
      RowBox[{"4", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]], " ", 
    SuperscriptBox["t", 
     RowBox[{"2", "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]1", "2"]}], "-", 
      RowBox[{
       SqrtBox["2"], " ", "\[Sigma]2"}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]2", "2"]}], "+", 
      RowBox[{"2", " ", 
       SuperscriptBox["\[Sigma]3", "2"]}]}]], " "}]], "//", 
  "Simplify"}]], "Input",
 CellChangeTimes->{{3.8200538970199623`*^9, 3.820053906007045*^9}},
 CellLabel->"In[35]:=",ExpressionUUID->"a703c8b3-6aaa-4a7e-a951-9e38395aa5d8"],

Cell[BoxData[
 FractionBox[
  SuperscriptBox["2", 
   RowBox[{"1", "+", 
    RowBox[{"2", " ", 
     SqrtBox["2"], " ", "\[Sigma]1"}], "+", 
    RowBox[{"2", " ", 
     SqrtBox["2"], " ", "\[Sigma]2"}]}]], 
  SqrtBox["t"]]], "Output",
 CellChangeTimes->{3.8200539063719397`*^9},
 CellLabel->"Out[35]=",ExpressionUUID->"b2e3d593-184d-4e4c-af50-b9d0c887b75c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"1", "/", 
     RowBox[{"(", 
      RowBox[{"2", " ", 
       RowBox[{"4", "!"}]}], " ", ")"}]}], 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"f", "[", 
         RowBox[{"a", "[", 
          RowBox[{"[", "1", "]"}], "]"}], "]"}], 
        RowBox[{"f", "[", 
         RowBox[{"a", "[", 
          RowBox[{"[", "2", "]"}], "]"}], "]"}], 
        RowBox[{"f", "[", 
         RowBox[{"a", "[", 
          RowBox[{"[", "3", "]"}], "]"}], "]"}], 
        RowBox[{"f", "[", 
         RowBox[{"a", "[", 
          RowBox[{"[", "4", "]"}], "]"}], "]"}], 
        RowBox[{"(", "\[IndentingNewLine]", 
         RowBox[{
          RowBox[{
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "1", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "1", "]"}], "]"}]}]}], "-", 
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "2", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "2", "]"}], "]"}]}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"a", "[", 
                  RowBox[{"[", "1", "]"}], "]"}], "-", 
                 RowBox[{"a", "[", 
                  RowBox[{"[", "2", "]"}], "]"}]}], ")"}], ".", 
               "\[Sigma]"}]}], ")"}], "^", "2"}], 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "1", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "1", "]"}], "]"}]}]}], "-", 
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "3", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "3", "]"}], "]"}]}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"a", "[", 
                  RowBox[{"[", "1", "]"}], "]"}], "-", 
                 RowBox[{"a", "[", 
                  RowBox[{"[", "3", "]"}], "]"}]}], ")"}], ".", 
               "\[Sigma]"}]}], ")"}], "^", "2"}], 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "3", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "3", "]"}], "]"}]}]}], "-", 
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "2", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "2", "]"}], "]"}]}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"a", "[", 
                  RowBox[{"[", "3", "]"}], "]"}], "-", 
                 RowBox[{"a", "[", 
                  RowBox[{"[", "2", "]"}], "]"}]}], ")"}], ".", 
               "\[Sigma]"}]}], ")"}], "^", "2"}]}], "+", 
          "\[IndentingNewLine]", "\[IndentingNewLine]", 
          RowBox[{
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "1", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "1", "]"}], "]"}]}]}], "-", 
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "2", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "2", "]"}], "]"}]}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"a", "[", 
                  RowBox[{"[", "1", "]"}], "]"}], "-", 
                 RowBox[{"a", "[", 
                  RowBox[{"[", "2", "]"}], "]"}]}], ")"}], ".", 
               "\[Sigma]"}]}], ")"}], "^", "2"}], 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "1", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "1", "]"}], "]"}]}]}], "-", 
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "4", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "4", "]"}], "]"}]}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"a", "[", 
                  RowBox[{"[", "1", "]"}], "]"}], "-", 
                 RowBox[{"a", "[", 
                  RowBox[{"[", "4", "]"}], "]"}]}], ")"}], ".", 
               "\[Sigma]"}]}], ")"}], "^", "2"}], 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "4", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "4", "]"}], "]"}]}]}], "-", 
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "2", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "2", "]"}], "]"}]}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"a", "[", 
                  RowBox[{"[", "4", "]"}], "]"}], "-", 
                 RowBox[{"a", "[", 
                  RowBox[{"[", "2", "]"}], "]"}]}], ")"}], ".", 
               "\[Sigma]"}]}], ")"}], "^", "2"}]}], "+", 
          "\[IndentingNewLine]", "\[IndentingNewLine]", 
          RowBox[{
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "1", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "1", "]"}], "]"}]}]}], "-", 
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "3", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "3", "]"}], "]"}]}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"a", "[", 
                  RowBox[{"[", "1", "]"}], "]"}], "-", 
                 RowBox[{"a", "[", 
                  RowBox[{"[", "3", "]"}], "]"}]}], ")"}], ".", 
               "\[Sigma]"}]}], ")"}], "^", "2"}], 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "1", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "1", "]"}], "]"}]}]}], "-", 
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "4", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "4", "]"}], "]"}]}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"a", "[", 
                  RowBox[{"[", "1", "]"}], "]"}], "-", 
                 RowBox[{"a", "[", 
                  RowBox[{"[", "4", "]"}], "]"}]}], ")"}], ".", 
               "\[Sigma]"}]}], ")"}], "^", "2"}], 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "3", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "3", "]"}], "]"}]}]}], "-", 
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "4", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "4", "]"}], "]"}]}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"a", "[", 
                  RowBox[{"[", "3", "]"}], "]"}], "-", 
                 RowBox[{"a", "[", 
                  RowBox[{"[", "4", "]"}], "]"}]}], ")"}], ".", 
               "\[Sigma]"}]}], ")"}], "^", "2"}]}], "+", 
          "\[IndentingNewLine]", "\[IndentingNewLine]", 
          RowBox[{
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "4", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "4", "]"}], "]"}]}]}], "-", 
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "2", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "2", "]"}], "]"}]}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"a", "[", 
                  RowBox[{"[", "4", "]"}], "]"}], "-", 
                 RowBox[{"a", "[", 
                  RowBox[{"[", "2", "]"}], "]"}]}], ")"}], ".", 
               "\[Sigma]"}]}], ")"}], "^", "2"}], 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "3", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "3", "]"}], "]"}]}]}], "-", 
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "2", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "2", "]"}], "]"}]}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"a", "[", 
                  RowBox[{"[", "3", "]"}], "]"}], "-", 
                 RowBox[{"a", "[", 
                  RowBox[{"[", "2", "]"}], "]"}]}], ")"}], ".", 
               "\[Sigma]"}]}], ")"}], "^", "2"}], 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "3", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "3", "]"}], "]"}]}]}], "-", 
              RowBox[{
               RowBox[{"1", "/", "2"}], 
               RowBox[{
                RowBox[{"a", "[", 
                 RowBox[{"[", "4", "]"}], "]"}], ".", 
                RowBox[{"a", "[", 
                 RowBox[{"[", "4", "]"}], "]"}]}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"a", "[", 
                  RowBox[{"[", "3", "]"}], "]"}], "-", 
                 RowBox[{"a", "[", 
                  RowBox[{"[", "4", "]"}], "]"}]}], ")"}], ".", 
               "\[Sigma]"}]}], ")"}], "^", "2"}]}]}], "\[IndentingNewLine]", 
         "\[IndentingNewLine]", ")"}]}], "//", "Cancel"}], ",", 
      RowBox[{"{", 
       RowBox[{"a", ",", "RHStable"}], "}"}]}], "]"}]}], "//", "Total"}], "//",
   "Cancel"}]], "Input",
 CellChangeTimes->{{3.820053952358583*^9, 3.820053958556736*^9}},
 CellLabel->"In[39]:=",ExpressionUUID->"5a069288-c7e5-43d5-bec4-6e7e1212de1a"],

Cell[BoxData[
 RowBox[{
  FractionBox["1", "2"], " ", 
  SuperscriptBox[
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", 
     RowBox[{
      SqrtBox["2"], " ", "\[Sigma]1"}]}], ")"}], "2"], " ", 
  SuperscriptBox[
   RowBox[{"(", 
    RowBox[{
     RowBox[{
      SqrtBox["2"], " ", "\[Sigma]1"}], "-", 
     RowBox[{
      SqrtBox["2"], " ", "\[Sigma]2"}]}], ")"}], "2"], " ", 
  SuperscriptBox[
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", 
     RowBox[{
      SqrtBox["2"], " ", "\[Sigma]2"}]}], ")"}], "2"], " ", 
  SuperscriptBox[
   RowBox[{"f", "[", 
    RowBox[{"{", 
     RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}], "2"], " ", 
  RowBox[{"f", "[", 
   RowBox[{"{", 
    RowBox[{"0", ",", 
     RowBox[{"-", 
      SqrtBox["2"]}], ",", "0"}], "}"}], "]"}], " ", 
  RowBox[{"f", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", 
      SqrtBox["2"]}], ",", "0", ",", "0"}], "}"}], "]"}]}]], "Output",
 CellChangeTimes->{3.82005396243314*^9},
 CellLabel->"Out[39]=",ExpressionUUID->"a7e61800-f0d5-4413-9f5b-ed7b8766b1e5"]
}, Open  ]]
},
WindowSize->{1920, 1037},
WindowMargins->{{0, Automatic}, {Automatic, 18}},
Magnification:>1.45 Inherited,
FrontEndVersion->"12.0 for Linux x86 (64-bit) (April 8, 2019)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[558, 20, 5854, 184, 515, "Input",ExpressionUUID->"a94d2ef0-0b61-496a-b228-14b4c1bdd880"],
Cell[6415, 206, 4864, 145, 232, "Input",ExpressionUUID->"41cee26a-dddd-4136-8a68-b9e4d92758c4"],
Cell[CellGroupData[{
Cell[11304, 355, 201, 3, 45, "Input",ExpressionUUID->"f556d312-b9d8-4e35-9649-8fad94bd0e86"],
Cell[11508, 360, 5034, 162, 258, "Output",ExpressionUUID->"d4e39492-1d90-467b-9636-b8d50699e3eb"]
}, Open  ]],
Cell[CellGroupData[{
Cell[16579, 527, 233, 4, 45, "Input",ExpressionUUID->"0d675db7-3811-439c-b2e7-cb8091d72654"],
Cell[16815, 533, 9401, 312, 408, "Output",ExpressionUUID->"ab0c9e4b-2483-4181-9496-c1de3a2f1d86"]
}, Open  ]],
Cell[CellGroupData[{
Cell[26253, 850, 453, 12, 45, "Input",ExpressionUUID->"c6c66148-6648-4095-938d-d8220888a58d"],
Cell[26709, 864, 144015, 4532, 5529, "Output",ExpressionUUID->"e4d989c3-7974-4390-9bba-d0b6e2240f18"]
}, Open  ]],
Cell[CellGroupData[{
Cell[170761, 5401, 719, 19, 45, "Input",ExpressionUUID->"7857bc7a-ef43-4c6a-bc87-fac69701e9cc"],
Cell[171483, 5422, 1404, 47, 79, "Output",ExpressionUUID->"e963da24-c7e5-443c-96bd-ad3f4b5b93c2"]
}, Open  ]],
Cell[CellGroupData[{
Cell[172924, 5474, 373, 12, 58, "Input",ExpressionUUID->"e9386e4e-5912-408e-ae5d-7ea7c8cfe82e"],
Cell[173300, 5488, 382, 13, 75, "Output",ExpressionUUID->"068fe3cf-d430-467e-966f-77857ee56412"]
}, Open  ]],
Cell[173697, 5504, 2298, 69, 102, "Input",ExpressionUUID->"f5305035-b719-4a2d-99e2-4ebb74cc657d"],
Cell[CellGroupData[{
Cell[176020, 5577, 453, 11, 45, "Input",ExpressionUUID->"8358d475-bc9b-49a1-804d-0d49f8940d9e"],
Cell[176476, 5590, 3658, 114, 159, "Output",ExpressionUUID->"070892cb-9c5c-4861-bb96-0b4b60b6e8b2"]
}, Open  ]],
Cell[CellGroupData[{
Cell[180171, 5709, 662, 17, 45, "Input",ExpressionUUID->"af42ec4e-688e-472b-869b-f156e62c0ce2"],
Cell[180836, 5728, 1433, 46, 74, "Output",ExpressionUUID->"3c10c02e-7850-43e4-a65e-70e4d84e5c19"]
}, Open  ]],
Cell[182284, 5777, 2792, 92, 124, "Input",ExpressionUUID->"f044d7eb-75fb-469a-aa68-398c4d8807e2"],
Cell[CellGroupData[{
Cell[185101, 5873, 1720, 57, 135, "Input",ExpressionUUID->"c8a777a5-3bfa-4335-bfdf-661409fdf6fb"],
Cell[186824, 5932, 258, 6, 111, "Output",ExpressionUUID->"9300f130-3632-4609-ae88-2a3f1cdcbb7c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[187119, 5943, 2867, 88, 109, "Input",ExpressionUUID->"38574f94-a8c9-4ce8-a68d-c14dfb307245"],
Cell[189989, 6033, 1225, 38, 61, "Output",ExpressionUUID->"81a06e07-461f-4f88-8904-5a2a5450764b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[191251, 6076, 1002, 30, 58, "Input",ExpressionUUID->"8384bd6f-50c9-4228-8622-244981e4d218"],
Cell[192256, 6108, 865, 27, 56, "Output",ExpressionUUID->"aa89816f-bdcc-4954-b4a3-c292db83baac"]
}, Open  ]],
Cell[CellGroupData[{
Cell[193158, 6140, 1878, 61, 116, "Input",ExpressionUUID->"0047a174-2d63-4e2d-879c-a634591bbff8"],
Cell[195039, 6203, 1671, 48, 89, "Output",ExpressionUUID->"d0cea4cc-f857-407f-bf03-0428c7ae7b6e"]
}, Open  ]],
Cell[CellGroupData[{
Cell[196747, 6256, 440, 15, 80, "Input",ExpressionUUID->"1cad002e-a013-4edf-84de-b1384d43d22e"],
Cell[197190, 6273, 480, 11, 73, "Output",ExpressionUUID->"cd80cc8d-2ddf-4387-9284-14b44ea967c8"]
}, Open  ]],
Cell[CellGroupData[{
Cell[197707, 6289, 1911, 59, 95, "Input",ExpressionUUID->"17dea985-35b5-4b06-84cb-1ed000fad0cf"],
Cell[199621, 6350, 1609, 46, 120, "Output",ExpressionUUID->"bb20551c-5c69-44f6-8617-568b54696661"]
}, Open  ]],
Cell[CellGroupData[{
Cell[201267, 6401, 227, 4, 45, "Input",ExpressionUUID->"d171a64c-7470-49ac-9079-a324b9962f35"],
Cell[201497, 6407, 205, 5, 75, "Output",ExpressionUUID->"c7c87db0-2b9e-4893-b520-46e1d3cf709d"]
}, Open  ]],
Cell[CellGroupData[{
Cell[201739, 6417, 1778, 54, 94, "Input",ExpressionUUID->"a703c8b3-6aaa-4a7e-a951-9e38395aa5d8"],
Cell[203520, 6473, 357, 10, 87, "Output",ExpressionUUID->"b2e3d593-184d-4e4c-af50-b9d0c887b75c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[203914, 6488, 12538, 338, 475, "Input",ExpressionUUID->"5a069288-c7e5-43d5-bec4-6e7e1212de1a"],
Cell[216455, 6828, 1064, 37, 69, "Output",ExpressionUUID->"a7e61800-f0d5-4413-9f5b-ed7b8766b1e5"]
}, Open  ]]
}
]
*)