(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 11.3' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 241629, 7610] NotebookOptionsPosition[ 239108, 7564] NotebookOutlinePosition[ 239444, 7579] CellTagsIndexPosition[ 239401, 7576] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"$LoadFeynArts", "=", "True"}], ";"}], "\[IndentingNewLine]", RowBox[{"<<", "FeynCalc`"}]}], "Input", CellLabel->"In[1]:=",ExpressionUUID->"a1b97fab-8c38-4309-92ca-5f79e2692d03"], Cell[CellGroupData[{ Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"FeynCalc \"\>", "Text", StripOnInput->False, FontWeight->Bold], "\[InvisibleSpace]", StyleBox["\<\"9.2.0. For help, use the \"\>", "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox[ TagBox[ ButtonBox[ RowBox[{"documentation", " ", "center"}], BaseStyle->"Link", ButtonData:>"paclet:FeynCalc/", ButtonNote->"paclet:FeynCalc/"], DisplayForm], "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox["\<\", check out the \"\>", "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox[ TagBox[ ButtonBox["wiki", BaseStyle->"Hyperlink", ButtonData:>{ URL["https://github.com/FeynCalc/feyncalc/wiki"], None}, ButtonNote->"https://github.com/FeynCalc/feyncalc/wiki"], DisplayForm], "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox["\<\" or write to the \"\>", "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox[ TagBox[ ButtonBox[ RowBox[{"mailing", " ", RowBox[{"list", "."}]}], BaseStyle->"Hyperlink", ButtonData:>{ URL["http://www.feyncalc.org/forum/"], None}, ButtonNote->"http://www.feyncalc.org/forum/"], DisplayForm], "Text", StripOnInput->False]}], SequenceForm[ Style["FeynCalc ", "Text", Bold], Style["9.2.0. For help, use the ", "Text"], Style[ DisplayForm[ ButtonBox[ "documentation center", BaseStyle -> "Link", ButtonData :> "paclet:FeynCalc/", ButtonNote -> "paclet:FeynCalc/"]], "Text"], Style[", check out the ", "Text"], Style[ DisplayForm[ ButtonBox["wiki", ButtonData :> { URL["https://github.com/FeynCalc/feyncalc/wiki"], None}, BaseStyle -> "Hyperlink", ButtonNote -> "https://github.com/FeynCalc/feyncalc/wiki"]], "Text"], Style[" or write to the ", "Text"], Style[ DisplayForm[ ButtonBox["mailing list.", ButtonData :> { URL["http://www.feyncalc.org/forum/"], None}, BaseStyle -> "Hyperlink", ButtonNote -> "http://www.feyncalc.org/forum/"]], "Text"]], Editable->False], TraditionalForm]], "Print", CellLabel-> "During evaluation of \ In[1]:=",ExpressionUUID->"bf0b66d1-9077-41a7-9b74-cfeaf5fd3489"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"See also the supplied \"\>", "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox[ TagBox[ ButtonBox[ RowBox[{"examples", "."}], BaseStyle->"Hyperlink", ButtonFunction:>SystemOpen[ FileNameJoin[{FeynCalc`$FeynCalcDirectory, "Examples"}]], Evaluator->Automatic, Method->"Preemptive"], DisplayForm], "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox["\<\" If you use FeynCalc in your research, please cite\"\>", "Text", StripOnInput->False]}], SequenceForm[ Style["See also the supplied ", "Text"], Style[ DisplayForm[ ButtonBox[ "examples.", BaseStyle -> "Hyperlink", ButtonFunction :> SystemOpen[ FileNameJoin[{FeynCalc`$FeynCalcDirectory, "Examples"}]], Evaluator -> Automatic, Method -> "Preemptive"]], "Text"], Style[" If you use FeynCalc in your research, please cite", "Text"]], Editable->False], TraditionalForm]], "Print", CellLabel-> "During evaluation of \ In[1]:=",ExpressionUUID->"de4fa1f8-bd41-477c-96d5-35aba9dbe20c"], Cell[BoxData[ FormBox[ StyleBox["\<\" \[Bullet] V. Shtabovenko, R. Mertig and F. Orellana, Comput. \ Phys. Commun., 207C, 432-444, 2016, arXiv:1601.01167\"\>", "Text", StripOnInput->False], TraditionalForm]], "Print", CellLabel-> "During evaluation of \ In[1]:=",ExpressionUUID->"112e68da-f5b1-4dac-bb08-aa0e9dddd747"], Cell[BoxData[ FormBox[ StyleBox["\<\" \[Bullet] R. Mertig, M. B\[ODoubleDot]hm, and A. Denner, \ Comput. Phys. Commun., 64, 345-359, 1991.\"\>", "Text", StripOnInput->False], TraditionalForm]], "Print", CellLabel-> "During evaluation of \ In[1]:=",ExpressionUUID->"cdf6a13b-21cf-46c1-a895-f9227b87f53c"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"FeynArts \"\>", "Text", StripOnInput->False, FontWeight->Bold], "\[InvisibleSpace]", StyleBox["\<\"3.1 patched for use with FeynCalc, for documentation use \ the \"\>", "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox[ TagBox[ ButtonBox["manual", BaseStyle->"Hyperlink", ButtonFunction:>SystemOpen[ First[ FileNames[{"*.pdf", "*.PDF"}, FileNameJoin[{FeynCalc`$FeynArtsDirectory, "manual"}]]]], Evaluator->Automatic, Method->"Preemptive"], DisplayForm], "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox["\<\" or visit \"\>", "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox[ TagBox[ ButtonBox[ RowBox[{"www", ".", "feynarts", ".", "de", "."}], BaseStyle->"Hyperlink", ButtonData:>{ URL["http://www.feynarts.de/"], None}, ButtonNote->"www.feynarts.de/"], DisplayForm], "Text", StripOnInput->False]}], SequenceForm[ Style["FeynArts ", "Text", Bold], Style[ "3.1 patched for use with FeynCalc, for documentation use the ", "Text"], Style[ DisplayForm[ ButtonBox[ "manual", BaseStyle -> "Hyperlink", ButtonFunction :> SystemOpen[ First[ FileNames[{"*.pdf", "*.PDF"}, FileNameJoin[{FeynCalc`$FeynArtsDirectory, "manual"}]]]], Evaluator -> Automatic, Method -> "Preemptive"]], "Text"], Style[" or visit ", "Text"], Style[ DisplayForm[ ButtonBox["www.feynarts.de.", ButtonData :> { URL["http://www.feynarts.de/"], None}, BaseStyle -> "Hyperlink", ButtonNote -> "www.feynarts.de/"]], "Text"]], Editable->False], TraditionalForm]], "Print", CellLabel-> "During evaluation of \ In[1]:=",ExpressionUUID->"6b049811-1034-4fcc-aae0-2e0998fd13b6"] }, Open ]] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"$FAVerbose", "=", "0"}], ";"}]], "Input", CellLabel->"In[3]:=",ExpressionUUID->"8e92dd96-d0a1-44fe-a3c9-d02ad89dd8f8"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"SetOptions", "[", RowBox[{"InitializeModel", ",", RowBox[{"ModelEdit", "\[RuleDelayed]", RowBox[{"(", RowBox[{"M$ClassesDescription", "=", RowBox[{"M$ClassesDescription", "/.", RowBox[{"MZ", "\[Rule]", "MZc"}]}]}], ")"}]}]}], "]"}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"InitializeModel", "[", RowBox[{ RowBox[{"{", RowBox[{"SM", ",", "UnitarySM"}], "}"}], ",", RowBox[{"GenericModel", "\[Rule]", RowBox[{"{", RowBox[{"Lorentz", ",", "UnitaryLorentz"}], "}"}]}]}], "]"}], ";"}], "\[IndentingNewLine]"}], "\n", RowBox[{ RowBox[{ RowBox[{"NoElectronHCoupling", "=", RowBox[{"ExcludeFieldPoints", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"FieldPoint", "[", "0", "]"}], "[", RowBox[{ RowBox[{"-", RowBox[{"F", "[", RowBox[{"2", ",", RowBox[{"{", "1", "}"}]}], "]"}]}], ",", RowBox[{"F", "[", RowBox[{"1", ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"S", "[", "3", "]"}]}], "]"}], ",", RowBox[{ RowBox[{"FieldPoint", "[", "0", "]"}], "[", RowBox[{ RowBox[{"-", RowBox[{"F", "[", RowBox[{"2", ",", RowBox[{"{", "1", "}"}]}], "]"}]}], ",", RowBox[{"F", "[", RowBox[{"2", ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"S", "[", "1", "]"}]}], "]"}], ",", RowBox[{ RowBox[{"FieldPoint", "[", "0", "]"}], "[", RowBox[{ RowBox[{"-", RowBox[{"F", "[", RowBox[{"2", ",", RowBox[{"{", "1", "}"}]}], "]"}]}], ",", RowBox[{"F", "[", RowBox[{"2", ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"S", "[", "2", "]"}]}], "]"}]}], "}"}]}]}], ";"}], "\n"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"part", "=", RowBox[{"InsertFields", "[", RowBox[{ RowBox[{"CreateTopologies", "[", RowBox[{"0", ",", RowBox[{"2", "\[Rule]", "3"}]}], "]"}], ",", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"F", "[", RowBox[{"2", ",", RowBox[{"{", "1", "}"}]}], "]"}], ",", RowBox[{"-", RowBox[{"F", "[", RowBox[{"2", ",", RowBox[{"{", "1", "}"}]}], "]"}]}]}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"F", "[", RowBox[{"3", ",", RowBox[{"{", "3", "}"}]}], "]"}], ",", RowBox[{"-", RowBox[{"F", "[", RowBox[{"3", ",", RowBox[{"{", "3", "}"}]}], "]"}]}], ",", RowBox[{"S", "[", "1", "]"}]}], "}"}]}], ",", RowBox[{"Restrictions", "\[Rule]", "NoElectronHCoupling"}], ",", RowBox[{"InsertionLevel", "\[Rule]", RowBox[{"{", "Classes", "}"}]}], ",", RowBox[{"Model", "\[Rule]", RowBox[{"{", RowBox[{"SM", ",", "UnitarySM"}], "}"}]}], ",", RowBox[{"GenericModel", "\[Rule]", RowBox[{"{", RowBox[{"Lorentz", ",", "UnitaryLorentz"}], "}"}]}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"Paint", "[", RowBox[{"part", ",", RowBox[{"PaintLevel", "\[Rule]", RowBox[{"{", "Classes", "}"}]}]}], "]"}], ";"}], "\[IndentingNewLine]"}], "\n", RowBox[{ RowBox[{"listdiag", "=", RowBox[{"FCFAConvert", "[", RowBox[{ RowBox[{"CreateFeynAmp", "[", "part", "]"}], ",", RowBox[{"SMP", "\[Rule]", "True"}], ",", RowBox[{"ChangeDimension", "\[Rule]", "4"}], ",", RowBox[{"IncomingMomenta", "\[Rule]", RowBox[{"{", RowBox[{"p1", ",", "p2"}], "}"}]}], ",", RowBox[{"OutgoingMomenta", "\[Rule]", RowBox[{"{", RowBox[{"k1", ",", "k2", ",", "k3"}], "}"}]}], ",", RowBox[{"DropSumOver", "\[Rule]", "True"}], ",", RowBox[{"List", "\[Rule]", "False"}], ",", RowBox[{"UndoChiralSplittings", "\[Rule]", "True"}]}], "]"}]}], ";"}], "\n", RowBox[{"diag1", "=", RowBox[{"listdiag", "[", RowBox[{"[", "5", "]"}], "]"}]}], "\n", RowBox[{"diag2", "=", RowBox[{"listdiag", "[", RowBox[{"[", "4", "]"}], "]"}]}], "\n", RowBox[{"diag3", "=", RowBox[{"listdiag", "[", RowBox[{"[", "3", "]"}], "]"}]}], "\n", RowBox[{"diag4", "=", RowBox[{"listdiag", "[", RowBox[{"[", "2", "]"}], "]"}]}], "\n", RowBox[{"diag5", "=", RowBox[{"listdiag", "[", RowBox[{"[", "1", "]"}], "]"}]}]}], "Input", CellLabel->"In[37]:=",ExpressionUUID->"36350ffd-541c-4b69-b7ed-08a87fc0239a"], Cell[BoxData[ FormBox[ GraphicsBox[{InsetBox[ GraphicsBox[ TagBox[ TooltipBox[ {Thickness[0.005], LineBox[{{-1.8189894035458565`*^-12, 15.000000000001819`}, { 5.500000000001819, 9.999999999998181}}], PolygonBox[{{3.1939640440375663`, 12.096396323602212`}, { 2.0369668383639086`, 12.607627647039411`}, {2.575105073560959, 13.199579705756165`}}], InsetBox[ TagBox[ StyleBox[ TagBox["e", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {2.3121571693057157, 11.957892886236287}, \ {1, 1}], LineBox[{{-1.8189894035458565`*^-12, 5.}, {5.499999999994543, 9.999999999998181}}], PolygonBox[{{2.3060359559624337`, 7.096396323602212}, { 3.4630331616360914`, 7.60762764703941}, {2.924894926439041, 8.199579705756165}}], InsetBox[ TagBox[ StyleBox[ TagBox["e", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {3.1878428306942843, 6.957892886236287}, \ {-1, 1}], LineBox[{{20., 17.00000000000182}, {15.499999999998181`, 13.5}}], PolygonBox[{{18.223611330425797`, 15.618364368108953`}, { 17.030812424168236`, 15.197376518841578`}, {17.52196491498017, 14.565894744940517`}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {17.40319204905187, 15.868695936933303}, \ {1, -1}], LineBox[{{20., 9.999999999998181}, {15.499999999998181`, 13.499999999998181`}}], PolygonBox[{{17.276388669574203`, 12.118364368108953`}, { 18.469187575831764`, 11.697376518841578`}, {17.97803508501983, 11.065894744940517`}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {18.096807950948126, 12.368695936933307}, \ {-1, -1}], {Dashing[{0.030000000000000002`, 0.030000000000000002`}], LineBox[{{20., 2.999999999998181}, {12., 9.999999999998181}}]}, InsetBox[ TagBox[ StyleBox[ TagBox["H", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {15.748744009770927, 6.126450296881059}, \ {1, 1}], LineBox[CompressedData[" 1:eJxF1HtMjWEcB/CnRDFMLp3T/dT7SC61dZ4cl5jfiBBJYwpZHceznVzOkbFw 5pJIMWU55klzScZIczs6mMvGVuNRyCVrttIm5HJKuXTi9fDH493evfts7973 eX6/3/cJM1pSVnkihKaL++/T9UUV1yhA/y4Mp/UL/B5yYev3ps1jMOwIYjmH mXBtmCM8GcPHW+ZEIxXOiJzpWIMh2mtERTQRdhb267JhcK/Q5LvVCEDaDvDe LlxU9K6WC6fuy7ucjSF2+pmqw0wYYvOWpWF4c3G3w0SFG3PyW8ZjME2c8kxP hGvtg+YOxFDv8nqDkLDVPXxeiwLOktE36/hIQEM0M2quK3A7sTe+jAlridVQ qkB15nqrmQpf7H8yao8CJ04ExBmIcOPHsZ3bFZjVaavyRMKRL+sn7lWg98Xn 13UcAzpiNPgeU+C1dnlrKRNOXUM87ihQ8z6riVJhnz3n57UpsKhtf4ueCD9O 68kcisEyPHegqiqAiu8dWBGHoezHrdUPubDLcaUsHcO6ae6+R5jwY0f25I0Y co8HvzJR4dk98YWiPpuqU5piiHDqSp6xFcOFlAm/fqvhgM6uvW8wCzdVjONc 2OmVEpiIof3LtSWMCWu3TcvBGJKo3UKpsJW2V/1UoPXu0SxChJttI1m9ArGN B2ciJDzk08recwosttf1ecTDACVHJahFCrRnJ1QxJuzTEXpppwJbkp0LKf1v 3+iYXj35/35M+9obqqqT38v1NNk518n/adOzihnTyfVsbZh9llKdXK+zbWkD ITq5n+vWWk8PpJP7bdYsnVPGQmU9ahLuzzeQUFkvl3f/rnoeIut5yL4r0kxD ZL0HV7rfeqAQ2Y/4fm+nlLJg2a90jzFz9CRY9lN/KmHSAx4k+90ZER5vpEFy HjJcfU/1qIFyXs6VPCgoYYFynmy+waFRJFDOm2Wq96YaHiDn0XahssBIA+S8 Jn3tjvut+st5xqb8JaXMX857xIauQwbiL/OQl3yp/CnXyrx8u9ocvY5qZZ66 /Z50+CCtzFsxf15dzjQyj8PSxpnjiEbm9cPRR4MbuJ/Mc7kls8FM/WTeB3T/ PQ9GyPPgD7YEmaw= "]], InsetBox[ TagBox[ StyleBox[ TagBox["Z", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {8.75, 9.0548}, {0, 1}], LineBox[CompressedData[" 1:eJwt03tI01EUB/BfMk1r+MChFIWv1UznMku3bOTPIh9pCm3qMIlRmlIzxQfY mjofC7GJZkYrBY0Up+0PjWUzahjONiVTw2ik5iiKycwmM8tX9f1Ff9x7+HAP 51zu4QZcKDib40QQRAQWFQlXagsmCToVmSTBKznqGwsnVzM8XGHmSH5cJWze M+fsDU/HFi4/heX+ufIg2N+2tnMBZg9Y64/BhjXvVK8DJDEZliHJgjt6czPD 4RW+j+IGlV/uro+D87j7Tg3C7I1PtjS4r34s2gGH+095iWH+wnFexD6SsOZu WXJh3aMqZTEsSW+IL4TtgcpELXX+m8eUUf3ePG9ahj2DCjYaYDavfy54P0mo ZZon3XCZ21K8CG4ZGcgfg9VTndoKWNY6Llil+rMUjla4rn1IHRJCEkJpz3Af TPt2eSoHtjr7DelhieauvAue7KdFmWDDnx2Or3A2U2GdgDWCW1xWKEmo2kdN Zqpe+YvrF2HLGr/nC2z+XpN2DxaesTt+wfKAw05G2JD04AqDRRIi7fkWG9z2 8fUWD9Y99qBvZ5PEEU9Z7yWY7TKcvhuurT5R2waXiaO4LFisuWoyw+oZqW84 nED8oO/CXPgpG6NcuEOQV5kJM9ctMbGwq/cdzn1Yp0jnp1L1xDEZ72CJWUrP pvKzIzRueJcSzrmkKrguOrE5Eu5c9dJ1wyU1gtMi2GJMCXwPb8420YqouR06 WeAehj7bjDM1MHOueCAJ7uwp0jXCQmFFsRJmq5z8VPC0z0vjOGyZ5yy1w1ml kSN0Dt6btpfRC2tNH57FwZvVy7GDcPDwgvQaXJam6pqAk9+qbz+ERS6LfUvU fRJ9Sw2wneGy4oO5KOdVlbMwT9/ongDzPweuL1Ln0c2Dcnio3Gb/CZtvvrLq 4X//4eD/GEr+BTqrHLY= "]], InsetBox[ TagBox[ StyleBox[ TagBox["Z", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {13.258784489160853, 12.241215510839147}, \ {1, -1}], {PointSize[0.04], PointBox[{5.5, 10.}], PointBox[{15.5, 13.5}], PointBox[{12., 10.}]}, InsetBox[ TagBox[ StyleBox[ TagBox[ RowBox[{"T1", " ", "C1", " ", "N1"}], DisplayForm], FontFamily->"Helvetica", FontSize->7.997355371900827], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 7.997355371900827]& ], {10., -0.5}, {0, -1}]}, "\"afbf/cgdgeh/fhgh.m\"", TooltipStyle->"TextStyling"], Annotation[#, "afbf/cgdgeh/fhgh.m", "Tooltip"]& ], AspectRatio->1, PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[ GraphicsBox[ TagBox[ TooltipBox[ {Thickness[0.005], LineBox[{{-1.8189894035458565`*^-12, 15.000000000001819`}, { 4.500000000001819, 10.}}], PolygonBox[{{2.6513788389734696`, 12.0540235122517}, { 1.5513035025276638`, 12.678390595099321`}, {2.1459388195253966`, 13.21356238039728}}], InsetBox[ TagBox[ StyleBox[ TagBox["e", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {1.7026940733168925, 12.067904665985203}, \ {1, 1}], LineBox[{{1.8189894035458565`*^-12, 5.}, {4.499999999998181, 9.999999999994543}}], PolygonBox[{{1.8486211610265302`, 7.0540235122517005`}, { 2.948696497472336, 7.678390595099319}, {2.354061180474603, 8.21356238039728}}], InsetBox[ TagBox[ StyleBox[ TagBox["e", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {2.7973059266831077, 7.067904665985203}, \ {-1, 1}], LineBox[{{20.000000000010914`, 17.000000000003638`}, { 13.000000000010914`, 14.500000000003638`}}], PolygonBox[{{17.0650451469569, 15.951801838198893`}, { 15.800420294243834`, 15.924894926439041`}, {16.06948941184236, 15.171501397163173`}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {15.978678584652856, 16.604899962972}, \ {0, -1}], LineBox[{{20.00000000000182, 10.}, {10.850000000004002`, 8.399999999997817}}], PolygonBox[{{14.833968014904519`, 9.096650144682757}, { 15.947132081550652`, 9.69737117871423}, {16.08493188864031, 8.909328531920254}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {18.456615936095204, 10.641830480045524}, \ {0, -1}], {Dashing[{0.030000000000000002`, 0.030000000000000002`}], LineBox[{{20., 3.}, {13., 14.500000000001819`}}]}, InsetBox[ TagBox[ StyleBox[ TagBox["H", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {18.105237768820935, 5.054643110918325}, \ {1, 1}], LineBox[CompressedData[" 1:eJwV1AtQTFEYB/BbQzZ5bG3rVWqzxRVqs8VKcbNNs/KKTVa2oVVUWEvTeGyj ktkar3aYJIMaoaTHbqTIo8wII7v0YBtGG7VWJJqMsOR/zsydO79zzj3nO+c7 53opdq9LtKcoahke8qZooVB4w4ehTC0oPIZihRWdOAY/0b8rsPdCPcelQQHT c4LrhLAyUKtbCGs1NQ5y2PY0s8QRVgV1x+8n/Yuu8kzeDGU1ykY08MnOgKkl MHtz1uUceGePsicFVt0PqVDDkqruIAEskZ7qSoTP+H5hDfEZiil57R0JR9Ws PlJH7Jc5YR6Zb+09kxrmPU6O4cDDvVKPZXA9pY+2g2Nr2wKdYN3Pc1m/sZ7D ieHlr2cgHkczm7RHNpjKS2F22kM9F77T2PfnICxq81cvhJt/FduvhSWefg4J MM+q7qDh+uD8GwVwZqYhxg7OFc3jGmBXudf6TrwFyRFKe9T7lbVXVsPMswWh AvhyKUeZDZujZt6Xwh4b4r5KSf9r62UpcNXfw708WNuj/rQXpsN+qPoQtyy3 2rILHlerdNbDkl7PNXHEGvn5NPiJE29vOBxdVsFfBFu13LxZsECWUfnLk6G+ pfrHOpF27pjGbFir6kodIvNuW6xxgRmp9r0Frng7dKjUg6G2fG690AuPEgvS xLBqIyMahFkcx2TLdMw/q0M/jqw7/GZeHqwb+L5PCNsk6SmhsPmA3emtcNJq /mC/O/YrusB2Fi5+3vjyIiyKFbsayfc/d5WvgpMi3/jYkTx+cJUNuyH+d9Sg L8nbinz/C3DSq+TZy+EWd6H/YlhnHGjZCNusL9xap2F8U/Z2OdzTdCVHAVtv pbqtg6OV15v6p2IfH2VkhcJRN69Up8GCpvS4GbC2kF1gm4J4nMcHjIYT2oRv jsCqgI76PsSnq22vY8P08REFOTcmgYK6NBn2uWowwFTOUN8i+MWSW4o2eOUC fr9pEkM13haxLCR/HyurDsHFZZaJDhhfZVRzfGFzFysiAGbnGzd1chHP9fj5 CSSepY4bjsLmwu70czBNB5UEw2zl3R1Gcq4lwsGPrhjnzqmd/+D05qKVWpjm 8Qv5uDfDNZbI+XBx1z46BA4MGbvkOYehyjoaHkTA7VVqcTyc1Hq8UAzL/zSH DbjArJiMQHLv5u4x7IdpTWq+O/xtBMUZeSc/B2/mPywNdLk= "]], InsetBox[ TagBox[ StyleBox[ TagBox["\[Gamma]", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {7.296285762278508, 8.30177786904283}, \ {0, 1}], LineBox[{{13., 14.500000000003638`}, {10.850000000002183`, 8.400000000004184}}], PolygonBox[{{12.124449430433645`, 12.015879779369872`}, { 11.348297383319775`, 11.017086507585889`}, {12.102803755812939`, 10.751153933674365`}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {11.067943903294498, 11.96524436195358}, \ {1, 0}], {PointSize[0.04], PointBox[{4.5, 10.}], PointBox[{13., 14.5}], PointBox[{10.85, 8.4}]}, InsetBox[ TagBox[ StyleBox[ TagBox[ RowBox[{"T2", " ", "C1", " ", "N2"}], DisplayForm], FontFamily->"Helvetica", FontSize->7.997355371900827], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 7.997355371900827]& ], {10., -0.5}, {0, -1}]}, "\"afbf/cgdheg/fhgh.m\"", TooltipStyle->"TextStyling"], Annotation[#, "afbf/cgdheg/fhgh.m", "Tooltip"]& ], AspectRatio->1, PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[ GraphicsBox[ TagBox[ TooltipBox[ {Thickness[0.005], LineBox[{{-1.8189894035458565`*^-12, 15.000000000001819`}, { 4.500000000001819, 10.}}], PolygonBox[{{2.6513788389734696`, 12.0540235122517}, { 1.5513035025276638`, 12.678390595099321`}, {2.1459388195253966`, 13.21356238039728}}], InsetBox[ TagBox[ StyleBox[ TagBox["e", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {1.7026940733168925, 12.067904665985203}, \ {1, 1}], LineBox[{{1.8189894035458565`*^-12, 5.}, {4.499999999998181, 9.999999999994543}}], PolygonBox[{{1.8486211610265302`, 7.0540235122517005`}, { 2.948696497472336, 7.678390595099319}, {2.354061180474603, 8.21356238039728}}], InsetBox[ TagBox[ StyleBox[ TagBox["e", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {2.7973059266831077, 7.067904665985203}, \ {-1, 1}], LineBox[{{20.000000000010914`, 17.000000000003638`}, { 13.000000000010914`, 14.500000000003638`}}], PolygonBox[{{17.0650451469569, 15.951801838198893`}, { 15.800420294243834`, 15.924894926439041`}, {16.06948941184236, 15.171501397163173`}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {15.978678584652856, 16.604899962972}, \ {0, -1}], LineBox[{{20.00000000000182, 10.}, {10.850000000004002`, 8.399999999997817}}], PolygonBox[{{14.833968014904519`, 9.096650144682757}, { 15.947132081550652`, 9.69737117871423}, {16.08493188864031, 8.909328531920254}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {18.456615936095204, 10.641830480045524}, \ {0, -1}], {Dashing[{0.030000000000000002`, 0.030000000000000002`}], LineBox[{{20., 3.}, {13., 14.500000000001819`}}]}, InsetBox[ TagBox[ StyleBox[ TagBox["H", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {18.105237768820935, 5.054643110918325}, \ {1, 1}], LineBox[CompressedData[" 1:eJwV1AtQTFEYB/BbQzZ5bG3rVWqzxRVqs8VKcbNNs/KKTVa2oVVUWEvTeGyj ktkar3aYJIMaoaTHbqTIo8wII7v0YBtGG7VWJJqMsOR/zsydO79zzj3nO+c7 53opdq9LtKcoahke8qZooVB4w4ehTC0oPIZihRWdOAY/0b8rsPdCPcelQQHT c4LrhLAyUKtbCGs1NQ5y2PY0s8QRVgV1x+8n/Yuu8kzeDGU1ykY08MnOgKkl MHtz1uUceGePsicFVt0PqVDDkqruIAEskZ7qSoTP+H5hDfEZiil57R0JR9Ws PlJH7Jc5YR6Zb+09kxrmPU6O4cDDvVKPZXA9pY+2g2Nr2wKdYN3Pc1m/sZ7D ieHlr2cgHkczm7RHNpjKS2F22kM9F77T2PfnICxq81cvhJt/FduvhSWefg4J MM+q7qDh+uD8GwVwZqYhxg7OFc3jGmBXudf6TrwFyRFKe9T7lbVXVsPMswWh AvhyKUeZDZujZt6Xwh4b4r5KSf9r62UpcNXfw708WNuj/rQXpsN+qPoQtyy3 2rILHlerdNbDkl7PNXHEGvn5NPiJE29vOBxdVsFfBFu13LxZsECWUfnLk6G+ pfrHOpF27pjGbFir6kodIvNuW6xxgRmp9r0Frng7dKjUg6G2fG690AuPEgvS xLBqIyMahFkcx2TLdMw/q0M/jqw7/GZeHqwb+L5PCNsk6SmhsPmA3emtcNJq /mC/O/YrusB2Fi5+3vjyIiyKFbsayfc/d5WvgpMi3/jYkTx+cJUNuyH+d9Sg L8nbinz/C3DSq+TZy+EWd6H/YlhnHGjZCNusL9xap2F8U/Z2OdzTdCVHAVtv pbqtg6OV15v6p2IfH2VkhcJRN69Up8GCpvS4GbC2kF1gm4J4nMcHjIYT2oRv jsCqgI76PsSnq22vY8P08REFOTcmgYK6NBn2uWowwFTOUN8i+MWSW4o2eOUC fr9pEkM13haxLCR/HyurDsHFZZaJDhhfZVRzfGFzFysiAGbnGzd1chHP9fj5 CSSepY4bjsLmwu70czBNB5UEw2zl3R1Gcq4lwsGPrhjnzqmd/+D05qKVWpjm 8Qv5uDfDNZbI+XBx1z46BA4MGbvkOYehyjoaHkTA7VVqcTyc1Hq8UAzL/zSH DbjArJiMQHLv5u4x7IdpTWq+O/xtBMUZeSc/B2/mPywNdLk= "]], InsetBox[ TagBox[ StyleBox[ TagBox["Z", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {7.296285762278508, 8.30177786904283}, \ {0, 1}], LineBox[{{13., 14.500000000003638`}, {10.850000000002183`, 8.400000000004184}}], PolygonBox[{{12.124449430433645`, 12.015879779369872`}, { 11.348297383319775`, 11.017086507585889`}, {12.102803755812939`, 10.751153933674365`}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {11.067943903294498, 11.96524436195358}, \ {1, 0}], {PointSize[0.04], PointBox[{4.5, 10.}], PointBox[{13., 14.5}], PointBox[{10.85, 8.4}]}, InsetBox[ TagBox[ StyleBox[ TagBox[ RowBox[{"T2", " ", "C2", " ", "N3"}], DisplayForm], FontFamily->"Helvetica", FontSize->7.997355371900827], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 7.997355371900827]& ], {10., -0.5}, {0, -1}]}, "\"afbf/cgdheg/fhgh.m\"", TooltipStyle->"TextStyling"], Annotation[#, "afbf/cgdheg/fhgh.m", "Tooltip"]& ], AspectRatio->1, PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[ GraphicsBox[ TagBox[ TooltipBox[ {Thickness[0.005], LineBox[{{-1.8189894035458565`*^-12, 15.000000000001819`}, { 5.500000000001819, 9.999999999998181}}], PolygonBox[{{3.1939640440375663`, 12.096396323602212`}, { 2.0369668383639086`, 12.607627647039411`}, {2.575105073560959, 13.199579705756165`}}], InsetBox[ TagBox[ StyleBox[ TagBox["e", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {2.3121571693057157, 11.957892886236287}, \ {1, 1}], LineBox[{{-1.8189894035458565`*^-12, 5.}, {5.499999999994543, 9.999999999998181}}], PolygonBox[{{2.3060359559624337`, 7.096396323602212}, { 3.4630331616360914`, 7.60762764703941}, {2.924894926439041, 8.199579705756165}}], InsetBox[ TagBox[ StyleBox[ TagBox["e", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {3.1878428306942843, 6.957892886236287}, \ {-1, 1}], LineBox[{{20.00000000000182, 17.000000000003638`}, { 11.500000000003638`, 10.000000000005457`}}], PolygonBox[{{16.21315814137023, 13.88142435171666}, { 15.03255895748533, 13.42734774253016}, {15.541124759774211`, 12.80980355403652}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {15.369453758065294, 14.091691865206428}, \ {1, -1}], LineBox[{{20., 10.000000000001819`}, {15.499999999998181`, 6.5}}], PolygonBox[{{17.276388669574203`, 7.881635631891048}, { 17.97803508501983, 8.934105255059483}, {18.469187575831764`, 8.302623481158422}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {17.40319204905187, 8.868695936933307}, \ {1, -1}], {Dashing[{0.030000000000000002`, 0.030000000000000002`}], LineBox[{{20., 2.999999999998181}, {15.499999999998181`, 6.499999999998181}}]}, InsetBox[ TagBox[ StyleBox[ TagBox["H", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {17.943322797569394, 5.171357882589224}, \ {-1, -1}], LineBox[CompressedData[" 1:eJw903tIU1EcB/CrRSkSlqDOmbp1T1rqhnpdKSr+oKSoYC6QtKh0tLutwkdp WVauh0usSPHRji0rZyWGEb2UmvTQzPSkZi+ll0jhswfRw2q4jv1xLlwuHy73 nt85v+9Prs1aq3PlOC6B3tNPw4CTXsHA/b8QaDZPSLoItduqeW8VCPKzeo9W YerU2KTaFAS3uzPztCJ1/5ePs3Yg4PX2n0qB2qQKSSpEkF6f6OFwLgTuq3JH dQECZYa55jGhjtgDh/UIPG3q46cwtWVxeUMSgqvpjRd1InU6F3NSiuDoyqAW QaCOiRsbG+dh9psymwtHXdp05stdHryKlsX0EETXa3maa+XheVWb3oqpz30Y jjDzUGfASqNIPTk0JDHx0PTQaFEJ1L2zXv0t4YFUzmhx4aYtNegv8JAS3n7n CeFpPWGO/i4eLO3Lb2FMbfKXqn7z4AiZ6tSJ1KU2SV4Igsnrv+ZGCdTJKR65 yQjGO95XTDkXACez37ibiaBhyjO1i1Cb3O2aAwhyQgs0Fkw9OHxMsh+BtSQx WydSu326nLANQWNn2tkogdqgjpetRtC7ouOx0ymn9e1Vz5QjmPlC+44Q6sHQ /oPfeHjq1tqHMXW9Maf9IQ/hVa11okg9okhqPcfDQNmm9YJAHWP4oy3mIax7 ur8y4Jrh0FAhDyciz18gRMbexyriN2AsY98fKY9XiKKM/V/72SoXBBlbv7Jg 6RKOk7H6NLbV96txEKu/PMcUpBKC2P5GI9039pBAtv91ce/VRjGQnc+P74kv XblAdn6vA+e+O40D2PneGHHdGi0EsPPfdzmvnJD5rD9y5c7iLeJ81j+vOZNF Dqc/629CY1hPBfZn/T9yk9QqBH+WD1ePXRGPiJTlx6zMP5khSlm+7N2vmx1O P5a/mkv3iizYj+Vzze66a9GCH8vvFUgf7iUSlu/stm8PtosSlv+J4cLR2ZyE zYe52exVi33Z/KSOyr3jBF82X/a0TV/7iA+bv0Udwd1G0YfNp+PZdH+92fz+ A1Udgug= "]], InsetBox[ TagBox[ StyleBox[ TagBox["\[Gamma]", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {8.5, 10.9452}, {0, -1}], LineBox[{{11.499999999992724`, 10.000000000003638`}, { 15.499999999992724`, 6.500000000005457}}], PolygonBox[{{13.048453983175873`, 8.645102764721111}, { 13.688144173676719`, 7.553866557396137}, {14.214947859971534`, 8.15592791316164}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {13.084117857803797, 7.68830612320434}, \ {1, 1}], {PointSize[0.04], PointBox[{5.5, 10.}], PointBox[{11.5, 10.}], PointBox[{15.5, 6.5}]}, InsetBox[ TagBox[ StyleBox[ TagBox[ RowBox[{"T3", " ", "C1", " ", "N4"}], DisplayForm], FontFamily->"Helvetica", FontSize->7.997355371900827], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 7.997355371900827]& ], {10., -0.5}, {0, -1}]}, "\"afbf/cgdheh/fggh.m\"", TooltipStyle->"TextStyling"], Annotation[#, "afbf/cgdheh/fggh.m", "Tooltip"]& ], AspectRatio->1, PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[ GraphicsBox[ TagBox[ TooltipBox[ {Thickness[0.005], LineBox[{{-1.8189894035458565`*^-12, 15.000000000001819`}, { 5.500000000001819, 9.999999999998181}}], PolygonBox[{{3.1939640440375663`, 12.096396323602212`}, { 2.0369668383639086`, 12.607627647039411`}, {2.575105073560959, 13.199579705756165`}}], InsetBox[ TagBox[ StyleBox[ TagBox["e", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {2.3121571693057157, 11.957892886236287}, \ {1, 1}], LineBox[{{-1.8189894035458565`*^-12, 5.}, {5.499999999994543, 9.999999999998181}}], PolygonBox[{{2.3060359559624337`, 7.096396323602212}, { 3.4630331616360914`, 7.60762764703941}, {2.924894926439041, 8.199579705756165}}], InsetBox[ TagBox[ StyleBox[ TagBox["e", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {3.1878428306942843, 6.957892886236287}, \ {-1, 1}], LineBox[{{20.00000000000182, 17.000000000003638`}, { 11.500000000003638`, 10.000000000005457`}}], PolygonBox[{{16.21315814137023, 13.88142435171666}, { 15.03255895748533, 13.42734774253016}, {15.541124759774211`, 12.80980355403652}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {15.369453758065294, 14.091691865206428}, \ {1, -1}], LineBox[{{20., 10.000000000001819`}, {15.499999999998181`, 6.5}}], PolygonBox[{{17.276388669574203`, 7.881635631891048}, { 17.97803508501983, 8.934105255059483}, {18.469187575831764`, 8.302623481158422}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {17.40319204905187, 8.868695936933307}, \ {1, -1}], {Dashing[{0.030000000000000002`, 0.030000000000000002`}], LineBox[{{20., 2.999999999998181}, {15.499999999998181`, 6.499999999998181}}]}, InsetBox[ TagBox[ StyleBox[ TagBox["H", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {17.943322797569394, 5.171357882589224}, \ {-1, -1}], LineBox[CompressedData[" 1:eJw903tIU1EcB/CrRSkSlqDOmbp1T1rqhnpdKSr+oKSoYC6QtKh0tLutwkdp WVauh0usSPHRji0rZyWGEb2UmvTQzPSkZi+ll0jhswfRw2q4jv1xLlwuHy73 nt85v+9Prs1aq3PlOC6B3tNPw4CTXsHA/b8QaDZPSLoItduqeW8VCPKzeo9W YerU2KTaFAS3uzPztCJ1/5ePs3Yg4PX2n0qB2qQKSSpEkF6f6OFwLgTuq3JH dQECZYa55jGhjtgDh/UIPG3q46cwtWVxeUMSgqvpjRd1InU6F3NSiuDoyqAW QaCOiRsbG+dh9psymwtHXdp05stdHryKlsX0EETXa3maa+XheVWb3oqpz30Y jjDzUGfASqNIPTk0JDHx0PTQaFEJ1L2zXv0t4YFUzmhx4aYtNegv8JAS3n7n CeFpPWGO/i4eLO3Lb2FMbfKXqn7z4AiZ6tSJ1KU2SV4Igsnrv+ZGCdTJKR65 yQjGO95XTDkXACez37ibiaBhyjO1i1Cb3O2aAwhyQgs0Fkw9OHxMsh+BtSQx WydSu326nLANQWNn2tkogdqgjpetRtC7ouOx0ymn9e1Vz5QjmPlC+44Q6sHQ /oPfeHjq1tqHMXW9Maf9IQ/hVa11okg9okhqPcfDQNmm9YJAHWP4oy3mIax7 ur8y4Jrh0FAhDyciz18gRMbexyriN2AsY98fKY9XiKKM/V/72SoXBBlbv7Jg 6RKOk7H6NLbV96txEKu/PMcUpBKC2P5GI9039pBAtv91ce/VRjGQnc+P74kv XblAdn6vA+e+O40D2PneGHHdGi0EsPPfdzmvnJD5rD9y5c7iLeJ81j+vOZNF Dqc/629CY1hPBfZn/T9yk9QqBH+WD1ePXRGPiJTlx6zMP5khSlm+7N2vmx1O P5a/mkv3iizYj+Vzze66a9GCH8vvFUgf7iUSlu/stm8PtosSlv+J4cLR2ZyE zYe52exVi33Z/KSOyr3jBF82X/a0TV/7iA+bv0Udwd1G0YfNp+PZdH+92fz+ A1Udgug= "]], InsetBox[ TagBox[ StyleBox[ TagBox["Z", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {8.5, 10.9452}, {0, -1}], LineBox[{{11.499999999992724`, 10.000000000003638`}, { 15.499999999992724`, 6.500000000005457}}], PolygonBox[{{13.048453983175873`, 8.645102764721111}, { 13.688144173676719`, 7.553866557396137}, {14.214947859971534`, 8.15592791316164}}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->9.996694214876033], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 9.996694214876033]& ], {13.084117857803797, 7.68830612320434}, \ {1, 1}], {PointSize[0.04], PointBox[{5.5, 10.}], PointBox[{11.5, 10.}], PointBox[{15.5, 6.5}]}, InsetBox[ TagBox[ StyleBox[ TagBox[ RowBox[{"T3", " ", "C2", " ", "N5"}], DisplayForm], FontFamily->"Helvetica", FontSize->7.997355371900827], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 7.997355371900827]& ], {10., -0.5}, {0, -1}]}, "\"afbf/cgdheh/fggh.m\"", TooltipStyle->"TextStyling"], Annotation[#, "afbf/cgdheh/fggh.m", "Tooltip"]& ], AspectRatio->1, PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[ TagBox[ StyleBox[ TagBox["e", DisplayForm], FontFamily->"Helvetica", FontSize->11.996033057851239`], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[ TagBox[ StyleBox[ TagBox["e", DisplayForm], FontFamily->"Helvetica", FontSize->11.996033057851239`], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[ TagBox[ StyleBox[ TagBox["\[RightArrow]", DisplayForm], FontFamily->"Helvetica", FontSize->11.996033057851239`], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->11.996033057851239`], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[ TagBox[ StyleBox[ TagBox["t", DisplayForm], FontFamily->"Helvetica", FontSize->11.996033057851239`], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[ TagBox[ StyleBox[ TagBox["H", DisplayForm], FontFamily->"Helvetica", FontSize->11.996033057851239`], StyleForm[#, FontFamily -> "Helvetica", FontSize -> 11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]}, AspectRatio->1.0999999999999999`, ImageSize->{288, 288}, PlotRange->{{0, 66}, {0, 72.6}}], TraditionalForm]], "Print", CellLabel-> "During evaluation of \ In[37]:=",ExpressionUUID->"c831f9e0-30d3-4275-8489-cb4ed094e3ed"], Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"(", RowBox[{"\<\"e\"\>", " ", SubscriptBox["m", "W"], " ", FormBox[ SuperscriptBox[ OverscriptBox["g", "_"], RowBox[{ FormBox[ FormBox[ FormBox["Lor1", TraditionalForm], TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["Lor2", TraditionalForm], TraditionalForm], TraditionalForm]}]], TraditionalForm], " ", FormBox[ SuperscriptBox[ OverscriptBox["g", "_"], RowBox[{ FormBox[ FormBox[ FormBox["Lor2", TraditionalForm], TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["Lor4", TraditionalForm], TraditionalForm], TraditionalForm]}]], TraditionalForm], " ", FormBox[ SuperscriptBox[ OverscriptBox["g", "_"], RowBox[{ FormBox[ FormBox[ FormBox["Lor3", TraditionalForm], TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["Lor4", TraditionalForm], TraditionalForm], TraditionalForm]}]], TraditionalForm], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["p2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor1", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["6", TraditionalForm]]}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}], RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}]], "+", FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor1", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["7", TraditionalForm]]}], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], "-", FractionBox["1", "2"]}], ")"}]}], RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor3", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["7", TraditionalForm]]}], " ", SubscriptBox["\[Delta]", RowBox[{ FormBox[ FormBox["Col3", TraditionalForm], TraditionalForm], FormBox[ FormBox["Col4", TraditionalForm], TraditionalForm]}]], " ", RowBox[{"(", RowBox[{ FractionBox["1", "2"], "-", RowBox[{ FractionBox["2", "3"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]}], ")"}]}], RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]], "-", FractionBox[ RowBox[{"2", " ", "\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor3", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["6", TraditionalForm]]}], " ", SubscriptBox["\[Delta]", RowBox[{ FormBox[ FormBox["Col3", TraditionalForm], TraditionalForm], FormBox[ FormBox["Col4", TraditionalForm], TraditionalForm]}]], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}], RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}], ")"}], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}], ")"}]}], ")"}]}], TraditionalForm]], "Output", CellLabel->"Out[43]=",ExpressionUUID->"552c2499-d1ac-4470-94f8-392ac5100744"], Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"(", RowBox[{"\[ImaginaryI]", " ", FormBox[ SuperscriptBox[ OverscriptBox["g", "_"], RowBox[{ FormBox[ FormBox[ FormBox["Lor1", TraditionalForm], TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["Lor2", TraditionalForm], TraditionalForm], TraditionalForm]}]], TraditionalForm], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["p2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor1", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["6", TraditionalForm]]}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}], RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}]], "+", FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor1", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["7", TraditionalForm]]}], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], "-", FractionBox["1", "2"]}], ")"}]}], RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor2", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["7", TraditionalForm]]}], " ", RowBox[{"(", RowBox[{ FractionBox["1", "2"], "-", RowBox[{ FractionBox["2", "3"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]}], ")"}]}], RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]], "-", FractionBox[ RowBox[{"2", " ", "\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor2", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["6", TraditionalForm]]}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}], RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(", FormBox[ FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], TraditionalForm], ")"}], "+", SubscriptBox["m", "t"]}], ")"}], ".", RowBox[{"(", RowBox[{"-", FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", SubscriptBox["m", "t"], " ", SubscriptBox["\[Delta]", RowBox[{ FormBox[ FormBox["Col3", TraditionalForm], TraditionalForm], FormBox[ FormBox["Col4", TraditionalForm], TraditionalForm]}]]}], RowBox[{"2", " ", SubscriptBox["m", "W"], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "t", "2"]}], ")"}], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}], ")"}]}], ")"}]}], TraditionalForm]], "Output", CellLabel->"Out[44]=",ExpressionUUID->"6c3eac03-e94d-468e-b873-7b3473374f15"], Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"(", RowBox[{"\[ImaginaryI]", " ", FormBox[ SuperscriptBox[ OverscriptBox["g", "_"], RowBox[{ FormBox[ FormBox[ FormBox["Lor1", TraditionalForm], TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["Lor2", TraditionalForm], TraditionalForm], TraditionalForm]}]], TraditionalForm], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["p2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor1", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["6", TraditionalForm]]}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}], RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}]], "+", FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor1", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["7", TraditionalForm]]}], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], "-", FractionBox["1", "2"]}], ")"}]}], RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{"-", FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", SubscriptBox["m", "t"]}], RowBox[{"2", " ", SubscriptBox["m", "W"], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(", FormBox[ FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], TraditionalForm], ")"}], "+", SubscriptBox["m", "t"]}], ")"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor2", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["7", TraditionalForm]]}], " ", SubscriptBox["\[Delta]", RowBox[{ FormBox[ FormBox["Col3", TraditionalForm], TraditionalForm], FormBox[ FormBox["Col4", TraditionalForm], TraditionalForm]}]], " ", RowBox[{"(", RowBox[{ FractionBox["1", "2"], "-", RowBox[{ FractionBox["2", "3"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]}], ")"}]}], RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]], "-", FractionBox[ RowBox[{"2", " ", "\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor2", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["6", TraditionalForm]]}], " ", SubscriptBox["\[Delta]", RowBox[{ FormBox[ FormBox["Col3", TraditionalForm], TraditionalForm], FormBox[ FormBox["Col4", TraditionalForm], TraditionalForm]}]], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}], RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "t", "2"]}], ")"}], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}], ")"}]}], ")"}]}], TraditionalForm]], "Output", CellLabel->"Out[45]=",ExpressionUUID->"10044ca9-4432-4c0d-8e2e-166923725abb"], Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"(", RowBox[{"\[ImaginaryI]", " ", FormBox[ SuperscriptBox[ OverscriptBox["g", "_"], RowBox[{ FormBox[ FormBox[ FormBox["Lor1", TraditionalForm], TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["Lor2", TraditionalForm], TraditionalForm], TraditionalForm]}]], TraditionalForm], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["p2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor1", TraditionalForm], TraditionalForm]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{"-", FractionBox["2", "3"]}], " ", "\[ImaginaryI]", " ", "\<\"e\"\>", " ", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor2", TraditionalForm], TraditionalForm]]}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(", FormBox[ FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], TraditionalForm], ")"}], "+", SubscriptBox["m", "t"]}], ")"}], ".", RowBox[{"(", RowBox[{"-", FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", SubscriptBox["m", "t"], " ", SubscriptBox["\[Delta]", RowBox[{ FormBox[ FormBox["Col3", TraditionalForm], TraditionalForm], FormBox[ FormBox["Col4", TraditionalForm], TraditionalForm]}]]}], RowBox[{"2", " ", SubscriptBox["m", "W"], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], ")"}], "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "t", "2"]}], ")"}]}], ")"}]}], TraditionalForm]], "Output", CellLabel->"Out[46]=",ExpressionUUID->"bc44c673-360d-426a-9d4e-c9065054075f"], Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"(", RowBox[{"\[ImaginaryI]", " ", FormBox[ SuperscriptBox[ OverscriptBox["g", "_"], RowBox[{ FormBox[ FormBox[ FormBox["Lor1", TraditionalForm], TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["Lor2", TraditionalForm], TraditionalForm], TraditionalForm]}]], TraditionalForm], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["p2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor1", TraditionalForm], TraditionalForm]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{"-", FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", SubscriptBox["m", "t"]}], RowBox[{"2", " ", SubscriptBox["m", "W"], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(", FormBox[ FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], TraditionalForm], ")"}], "+", SubscriptBox["m", "t"]}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{"-", FractionBox["2", "3"]}], " ", "\[ImaginaryI]", " ", "\<\"e\"\>", " ", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["Lor2", TraditionalForm], TraditionalForm]], " ", SubscriptBox["\[Delta]", RowBox[{ FormBox[ FormBox["Col3", TraditionalForm], TraditionalForm], FormBox[ FormBox["Col4", TraditionalForm], TraditionalForm]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], ")"}], "2"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "t", "2"]}], ")"}]}], ")"}]}], TraditionalForm]], "Output", CellLabel->"Out[47]=",ExpressionUUID->"e697861e-5b9d-4b90-9d6c-6a977a1e63b0"] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"ClearScalarProducts", ";"}], "\n"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SP", "[", RowBox[{"p1", ",", "p1"}], "]"}], "=", RowBox[{"me", "^", "2"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"SP", "[", RowBox[{"p2", ",", "p2"}], "]"}], "=", RowBox[{"me", "^", "2"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SP", "[", RowBox[{"p1", ",", "p2"}], "]"}], "=", RowBox[{ RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", RowBox[{"me", "^", "2"}]}]}], ")"}], "/", "2"}]}], ";"}], "\n"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SP", "[", RowBox[{"k1", ",", "k1"}], "]"}], "=", RowBox[{"mt", "^", "2"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"SP", "[", RowBox[{"k2", ",", "k2"}], "]"}], "=", RowBox[{"mt", "^", "2"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"SP", "[", RowBox[{"k3", ",", "k3"}], "]"}], "=", RowBox[{"mh", "^", "2"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"SP", "[", RowBox[{"k1", ",", "k2"}], "]"}], "=", RowBox[{ RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", RowBox[{"mt", "^", "2"}]}]}], ")"}], "/", "2"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"SP", "[", RowBox[{"k1", ",", "k3"}], "]"}], "=", RowBox[{ RowBox[{"(", RowBox[{"s2", "-", RowBox[{"mt", "^", "2"}], "-", RowBox[{"mh", "^", "2"}]}], ")"}], "/", "2"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{ RowBox[{"SP", "[", RowBox[{"k2", ",", "k3"}], "]"}], "=", RowBox[{ RowBox[{"(", RowBox[{"s1", "-", RowBox[{"mt", "^", "2"}], "-", RowBox[{"mh", "^", "2"}]}], ")"}], "/", "2"}]}], ";"}], "\n"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"diag1", "=", RowBox[{"diag1", "/.", RowBox[{"{", RowBox[{ RowBox[{"Lor1", "\[Rule]", "\[Mu]"}], ",", RowBox[{"Lor2", "\[Rule]", "\[Nu]"}], ",", RowBox[{"Lor3", "\[Rule]", "\[Alpha]"}], ",", RowBox[{"Lor4", "\[Rule]", "\[Beta]"}]}], "}"}]}]}], ";"}], "\n", RowBox[{ RowBox[{"diag1C", "=", RowBox[{ RowBox[{"ComplexConjugate", "[", "diag1", "]"}], "/.", RowBox[{"{", RowBox[{ RowBox[{"\[Mu]", "\[Rule]", "\[Mu]lin"}], ",", RowBox[{"\[Nu]", "\[Rule]", "\[Nu]lin"}], ",", RowBox[{"\[Alpha]", "\[Rule]", "\[Alpha]lin"}], ",", RowBox[{"\[Beta]", "\[Rule]", "\[Beta]lin"}]}], "}"}]}]}], ";"}]}], "Input", CellLabel->"In[48]:=",ExpressionUUID->"75f5a1b7-3a2a-46be-959a-5699a91aa3e4"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"M12", "=", RowBox[{ RowBox[{"diag1", " ", "diag1C"}], "//", "Contract"}]}]], "Input", CellLabel->"In[60]:=",ExpressionUUID->"4d7ef8ff-1509-40c9-8a45-b41e9059d1a0"], Cell[BoxData[ FormBox[ RowBox[{ FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], RowBox[{ SuperscriptBox["\<\"e\"\>", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["p2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["\[Mu]", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["6", TraditionalForm]]}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}], RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}]], "+", FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["\[Mu]", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["7", TraditionalForm]]}], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], "-", FractionBox["1", "2"]}], ")"}]}], RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{ RowBox[{"-", FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["7", TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["\[Mu]lin", TraditionalForm], TraditionalForm]]}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}], RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}]]}], "-", FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["6", TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["\[Mu]lin", TraditionalForm], TraditionalForm]]}], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], "-", FractionBox["1", "2"]}], ")"}]}], RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["p2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "e"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["\[Mu]", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["7", TraditionalForm]]}], " ", SubscriptBox["\[Delta]", RowBox[{ FormBox[ FormBox["Col3", TraditionalForm], TraditionalForm], FormBox[ FormBox["Col4", TraditionalForm], TraditionalForm]}]], " ", RowBox[{"(", RowBox[{ FractionBox["1", "2"], "-", RowBox[{ FractionBox["2", "3"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]}], ")"}]}], RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]], "-", FractionBox[ RowBox[{"2", " ", "\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["\[Mu]", TraditionalForm], TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["6", TraditionalForm]]}], " ", SubscriptBox["\[Delta]", RowBox[{ FormBox[ FormBox["Col3", TraditionalForm], TraditionalForm], FormBox[ FormBox["Col4", TraditionalForm], TraditionalForm]}]], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}], RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}], " ", RowBox[{ RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ RowBox[{"-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}], ".", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{"2", " ", "\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["7", TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["\[Mu]lin", TraditionalForm], TraditionalForm]]}], " ", SubscriptBox["\[Delta]", RowBox[{ FormBox[ FormBox["Col3", TraditionalForm], TraditionalForm], FormBox[ FormBox["Col4", TraditionalForm], TraditionalForm]}]], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}], RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]], "-", FractionBox[ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ", RowBox[{ SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox["6", TraditionalForm]], ".", SuperscriptBox[ OverscriptBox["\[Gamma]", "_"], FormBox[ FormBox["\[Mu]lin", TraditionalForm], TraditionalForm]]}], " ", SubscriptBox["\[Delta]", RowBox[{ FormBox[ FormBox["Col3", TraditionalForm], TraditionalForm], FormBox[ FormBox["Col4", TraditionalForm], TraditionalForm]}]], " ", RowBox[{"(", RowBox[{ FractionBox["1", "2"], "-", RowBox[{ FractionBox["2", "3"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]}], ")"}]}], RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}], ")"}], ".", RowBox[{"(", RowBox[{ FormBox["\<\"\[CurlyPhi]\"\>", TraditionalForm], FormBox["\<\"(\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\",\"\>", TraditionalForm], FormBox[ SubscriptBox["m", "t"], TraditionalForm], FormBox["\<\")\"\>", TraditionalForm]}], ")"}]}]}]}], TraditionalForm]], "Output", CellLabel->"Out[60]=",ExpressionUUID->"dbf33654-8835-4756-921e-398767b609a7"] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"res", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{"M12", "//", "FermionSpinSum"}], ")"}], "/.", RowBox[{"DiracTrace", "\[Rule]", "Tr"}]}], ")"}], "//", "Contract"}]}], ";"}]], "Input", CellLabel->"In[62]:=",ExpressionUUID->"57adc50c-c7ad-44cf-afaa-c8e0a4d613e8"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FreeQ2", "[", RowBox[{"res", ",", RowBox[{"{", RowBox[{"DiracTrace", ",", "LorentzIndex"}], "}"}]}], "]"}]], "Input", CellLabel->"In[63]:=",ExpressionUUID->"576938d9-ef82-4f25-85b3-c5159cf82db3"], Cell[BoxData[ FormBox["True", TraditionalForm]], "Output", CellLabel->"Out[63]=",ExpressionUUID->"8360a97b-1fa1-4994-b79f-6afe94b02f1f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["res"], "Input", CellLabel->"In[64]:=",ExpressionUUID->"4c3c8af6-4656-4971-a69d-eaf9ce3e337d"], Cell[BoxData[ FormBox[ RowBox[{ FractionBox[ RowBox[{"320", " ", SuperscriptBox["mt", "2"], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"160", " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"80", " ", RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"320", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"320", " ", SuperscriptBox["me", "2"], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"160", " ", "s", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"80", " ", RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"320", " ", SuperscriptBox["me", "2"], " ", SuperscriptBox["mt", "2"], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"160", " ", SuperscriptBox["mt", "2"], " ", "s", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"80", " ", SuperscriptBox["mt", "2"], " ", RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"160", " ", SuperscriptBox["me", "2"], " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"80", " ", "s", " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"40", " ", RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"80", " ", SuperscriptBox["me", "2"], " ", RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"40", " ", "s", " ", RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"160", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"160", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"256", " ", SuperscriptBox["mt", "2"], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"128", " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"64", " ", RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"256", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"256", " ", SuperscriptBox["me", "2"], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"128", " ", "s", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"64", " ", RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"256", " ", SuperscriptBox["me", "2"], " ", SuperscriptBox["mt", "2"], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"128", " ", SuperscriptBox["mt", "2"], " ", "s", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"64", " ", SuperscriptBox["mt", "2"], " ", RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"128", " ", SuperscriptBox["me", "2"], " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"64", " ", "s", " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"32", " ", RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"64", " ", SuperscriptBox["me", "2"], " ", RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"32", " ", "s", " ", RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"128", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "+", FractionBox[ RowBox[{"128", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"]}]], "-", FractionBox[ RowBox[{"56", " ", SuperscriptBox["mt", "2"], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "+", FractionBox[ RowBox[{"28", " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "-", FractionBox[ RowBox[{"14", " ", RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "+", FractionBox[ RowBox[{"32", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "-", FractionBox[ RowBox[{"128", " ", SuperscriptBox["me", "2"], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "+", FractionBox[ RowBox[{"64", " ", "s", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "-", FractionBox[ RowBox[{"32", " ", RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "+", FractionBox[ RowBox[{"200", " ", SuperscriptBox["me", "2"], " ", SuperscriptBox["mt", "2"], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "-", FractionBox[ RowBox[{"100", " ", SuperscriptBox["mt", "2"], " ", "s", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "+", FractionBox[ RowBox[{"50", " ", SuperscriptBox["mt", "2"], " ", RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "-", FractionBox[ RowBox[{"100", " ", SuperscriptBox["me", "2"], " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "+", FractionBox[ RowBox[{"50", " ", "s", " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "-", FractionBox[ RowBox[{"25", " ", RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "+", FractionBox[ RowBox[{"50", " ", SuperscriptBox["me", "2"], " ", RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "-", FractionBox[ RowBox[{"25", " ", "s", " ", RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "+", FractionBox[ RowBox[{"100", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "+", FractionBox[ RowBox[{"100", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"9", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "+", FractionBox[ RowBox[{"8", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}]}], "-", RowBox[{"2", " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}]}]}], ")"}], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "2"]}]], "+", FractionBox[ RowBox[{"4", " ", SuperscriptBox["mt", "2"], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "-", FractionBox[ RowBox[{"2", " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "+", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "e", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "+", FractionBox[ RowBox[{"8", " ", SuperscriptBox["me", "2"], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "-", FractionBox[ RowBox[{"4", " ", "s", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "+", FractionBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "t", "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "-", FractionBox[ RowBox[{"20", " ", SuperscriptBox["me", "2"], " ", SuperscriptBox["mt", "2"], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "+", FractionBox[ RowBox[{"10", " ", SuperscriptBox["mt", "2"], " ", "s", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "-", FractionBox[ RowBox[{"5", " ", SuperscriptBox["mt", "2"], " ", RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "+", FractionBox[ RowBox[{"10", " ", SuperscriptBox["me", "2"], " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "-", FractionBox[ RowBox[{"5", " ", "s", " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "+", FractionBox[ RowBox[{"5", " ", RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "-", FractionBox[ RowBox[{"5", " ", SuperscriptBox["me", "2"], " ", RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "+", FractionBox[ RowBox[{"5", " ", "s", " ", RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "-", FractionBox[ RowBox[{"10", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "-", FractionBox[ RowBox[{"10", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "-", FractionBox[ RowBox[{"5", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}]}], "-", RowBox[{"2", " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}]}]}], ")"}], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "4"]}]], "+", FractionBox[ RowBox[{ SuperscriptBox["me", "2"], " ", SuperscriptBox["mt", "2"], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "6"]}]], "-", FractionBox[ RowBox[{ SuperscriptBox["mt", "2"], " ", "s", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"2", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "6"]}]], "+", FractionBox[ RowBox[{ SuperscriptBox["mt", "2"], " ", RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"4", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "6"]}]], "-", FractionBox[ RowBox[{ SuperscriptBox["me", "2"], " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"2", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "6"]}]], "+", FractionBox[ RowBox[{"s", " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"4", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "6"]}]], "-", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"s", "-", RowBox[{"2", " ", SuperscriptBox["me", "2"]}]}], ")"}], " ", "s3", " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"8", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "6"]}]], "+", FractionBox[ RowBox[{ SuperscriptBox["me", "2"], " ", RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"4", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "6"]}]], "-", FractionBox[ RowBox[{"s", " ", RowBox[{"(", RowBox[{"s3", "-", RowBox[{"2", " ", SuperscriptBox["mt", "2"]}]}], ")"}], " ", "N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"8", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "6"]}]], "+", FractionBox[ RowBox[{"N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"2", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "6"]}]], "+", FractionBox[ RowBox[{"N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", FormBox[ RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], TraditionalForm], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"2", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "6"]}]], "+", FractionBox[ RowBox[{"N", " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"-", OverscriptBox[ FormBox["k1", TraditionalForm], "_"]}], "-", OverscriptBox[ FormBox["k2", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k2", TraditionalForm], "_"], "+", OverscriptBox[ FormBox["k3", TraditionalForm], "_"]}], ")"}], "2"], "-", SubsuperscriptBox["m", "Z", "2"]}]], ")"}], "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}]}], "-", RowBox[{"2", " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k1", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p1", TraditionalForm], "_"], TraditionalForm]}], ")"}], " ", RowBox[{"(", RowBox[{ FormBox[ OverscriptBox[ FormBox["k2", TraditionalForm], "_"], TraditionalForm], FormBox["\<\"\[CenterDot]\"\>", TraditionalForm], FormBox[ OverscriptBox[ FormBox["p2", TraditionalForm], "_"], TraditionalForm]}], ")"}]}]}], ")"}], " ", SubsuperscriptBox["m", "W", "2"], " ", SuperscriptBox["\<\"e\"\>", "6"]}], RowBox[{"4", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"cos", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"sin", "("}], SubscriptBox["\[Theta]", "W"], ")"}], ")"}], "6"]}]]}], TraditionalForm]], "Output", CellLabel->"Out[64]=",ExpressionUUID->"3e3cfa32-221b-43b5-84a6-80f1364cda8f"] }, Open ]] }, WindowSize->{808, 911}, WindowMargins->{{876, Automatic}, {201, Automatic}}, FrontEndVersion->"11.3 for Linux x86 (64-bit) (March 6, 2018)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[580, 22, 216, 4, 55, "Input",ExpressionUUID->"a1b97fab-8c38-4309-92ca-5f79e2692d03"], Cell[CellGroupData[{ Cell[821, 30, 2386, 66, 29, "Print",ExpressionUUID->"bf0b66d1-9077-41a7-9b74-cfeaf5fd3489"], Cell[3210, 98, 1171, 32, 29, "Print",ExpressionUUID->"de4fa1f8-bd41-477c-96d5-35aba9dbe20c"], Cell[4384, 132, 327, 7, 52, "Print",ExpressionUUID->"112e68da-f5b1-4dac-bb08-aa0e9dddd747"], Cell[4714, 141, 312, 7, 28, "Print",ExpressionUUID->"cdf6a13b-21cf-46c1-a895-f9227b87f53c"], Cell[5029, 150, 1945, 56, 50, "Print",ExpressionUUID->"6b049811-1034-4fcc-aae0-2e0998fd13b6"] }, Open ]] }, Open ]], Cell[7001, 210, 154, 3, 31, "Input",ExpressionUUID->"8e92dd96-d0a1-44fe-a3c9-d02ad89dd8f8"], Cell[CellGroupData[{ Cell[7180, 217, 4656, 135, 538, "Input",ExpressionUUID->"36350ffd-541c-4b69-b7ed-08a87fc0239a"], Cell[11839, 354, 31862, 748, 296, "Print",ExpressionUUID->"c831f9e0-30d3-4275-8489-cb4ed094e3ed"], Cell[43704, 1104, 8862, 302, 310, "Output",ExpressionUUID->"552c2499-d1ac-4470-94f8-392ac5100744"], Cell[52569, 1408, 8309, 275, 275, "Output",ExpressionUUID->"6c3eac03-e94d-468e-b873-7b3473374f15"], Cell[60881, 1685, 8599, 285, 270, "Output",ExpressionUUID->"10044ca9-4432-4c0d-8e2e-166923725abb"], Cell[69483, 1972, 5160, 181, 109, "Output",ExpressionUUID->"bc44c673-360d-426a-9d4e-c9065054075f"], Cell[74646, 2155, 5138, 181, 109, "Output",ExpressionUUID->"e697861e-5b9d-4b90-9d6c-6a977a1e63b0"] }, Open ]], Cell[79799, 2339, 2627, 88, 354, "Input",ExpressionUUID->"75f5a1b7-3a2a-46be-959a-5699a91aa3e4"], Cell[CellGroupData[{ Cell[82451, 2431, 194, 4, 31, "Input",ExpressionUUID->"4d7ef8ff-1509-40c9-8a45-b41e9059d1a0"], Cell[82648, 2437, 13802, 463, 429, "Output",ExpressionUUID->"dbf33654-8835-4756-921e-398767b609a7"] }, Open ]], Cell[96465, 2903, 349, 10, 31, "Input",ExpressionUUID->"57adc50c-c7ad-44cf-afaa-c8e0a4d613e8"], Cell[CellGroupData[{ Cell[96839, 2917, 232, 5, 31, "Input",ExpressionUUID->"576938d9-ef82-4f25-85b3-c5159cf82db3"], Cell[97074, 2924, 138, 2, 34, "Output",ExpressionUUID->"8360a97b-1fa1-4994-b79f-6afe94b02f1f"] }, Open ]], Cell[CellGroupData[{ Cell[97249, 2931, 108, 1, 31, "Input",ExpressionUUID->"4c3c8af6-4656-4971-a69d-eaf9ce3e337d"], Cell[97360, 2934, 141732, 4627, 7041, "Output",ExpressionUUID->"3e3cfa32-221b-43b5-84a6-80f1364cda8f"] }, Open ]] } ] *) (* End of internal cache information *)