Commit 4327009e authored by Reyesrivera, Jose's avatar Reyesrivera, Jose
Browse files

add plots for 2jets

parent bb04c9f7
No preview for this file type
No preview for this file type
......@@ -10,10 +10,10 @@
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
NotebookDataLength[ 13440, 368]
NotebookOptionsPosition[ 11289, 333]
NotebookOutlinePosition[ 11641, 349]
CellTagsIndexPosition[ 11598, 346]
NotebookDataLength[ 112258, 3060]
NotebookOptionsPosition[ 108659, 3002]
NotebookOutlinePosition[ 109011, 3018]
CellTagsIndexPosition[ 108968, 3015]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
......@@ -42,293 +42,2962 @@ Cell[BoxData[
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"Needs", "[", "\"\<X`\>\"", "]"}], "\[IndentingNewLine]",
RowBox[{"<<", "helicityvec`"}]}], "Input",
CellChangeTimes->{{3.779639534042067*^9, 3.779639561284994*^9}},
CellLabel->"In[1]:=",ExpressionUUID->"ec90fe77-07b4-4ed1-b03c-078c2d13f994"],
Cell[CellGroupData[{
Cell[BoxData["\<\"\\!\\(\\*TemplateBox[List[\\\"\\\\\\\"Package-X v2.1.1, by \
Hiren H. Patel\\\\\\\\nFor more information, see the \\\\\\\"\\\", \
TemplateBox[List[\\\"\\\\\\\"guide\\\\\\\"\\\", \\\"paclet:X/guide/PackageX\\\
\"], \\\"HyperlinkPaclet\\\"]], \\\"RowDefault\\\"]\\)\"\>"], "Print",
CellChangeTimes->{3.77963956193819*^9, 3.779640733886427*^9,
3.779652767315526*^9, 3.779652799856619*^9},
CellLabel->
"During evaluation of \
In[1]:=",ExpressionUUID->"7d49fdc6-f96b-4582-8feb-b358afd25604"],
Cell[BoxData["\<\"helicityvec by J.G. Reyes v1. August 2019\"\>"], "Print",
CellChangeTimes->{3.77963956193819*^9, 3.779640733886427*^9,
3.779652767315526*^9, 3.779652799867577*^9},
CellLabel->
"During evaluation of \
In[1]:=",ExpressionUUID->"77069de4-5d73-4ec9-9214-e56f297bce01"]
}, Open ]]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"$Assumptions", "=",
RowBox[{"{",
RowBox[{
RowBox[{"Element", "[",
RowBox[{
RowBox[{"{",
RowBox[{
"ki", ",", "k1", ",", "k2", ",", "k3", ",", "k4", ",", " ",
"\[Theta]1", ",", "\[Theta]2", ",", "\[Theta]3", ",", "\[Theta]4",
",", " ", "\[Phi]1", ",", "\[Phi]2", ",", "\[Phi]3", ",", "\[Phi]4",
",", "p", ",", "MT2", ",", "GS", ",", "EL", ",", "Alfas", ",", "a1",
",", "S", ",", "T", ",", "U", ",", "MT", ",", "MH", ",", "MH2", ",",
"\[Eta]4", ",", "\[Eta]3", ",", "\[Beta]"}], "}"}], ",", "Reals"}],
"]"}], ",",
RowBox[{"ki", ">", "0"}], " ", ",",
RowBox[{"MT2", ">", "0"}], ",",
RowBox[{"MT", ">", "0"}], ",",
RowBox[{"MH2", ">", "0"}], ",", " ",
RowBox[{"MH", ">", "0"}], ",",
RowBox[{"k4", ">", "0"}], ",",
RowBox[{"p", ">", "0"}], ",",
RowBox[{"k3", ">", "0"}], ",",
RowBox[{"k1", ">", "0"}], ",",
RowBox[{"k2", ">", "0"}], ",",
RowBox[{"rS", ">", "0"}], ",",
RowBox[{"kT4", ">", "0"}], ",",
RowBox[{"kT3", ">", "0"}], ",",
RowBox[{"\[Beta]", ">", "0"}], ",",
RowBox[{"S", ">",
RowBox[{"MH", "^", "2"}]}]}], "}"}]}], ";"}]], "Input",
CellChangeTimes->{{3.779638797404049*^9, 3.779638797726428*^9}},
CellLabel->"In[3]:=",ExpressionUUID->"5d0ea240-67dd-49bc-b50f-db3cf34e44fc"],
Cell[BoxData[{
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"NotebookDirectory", "[", "]"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{
RowBox[{"ParentDirectory", "[", "]"}], ",",
"\"\</helicities/0jets\>\""}], "]"}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"zjetspp", "=",
RowBox[{"Import", "[", "\"\<ggH_++.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"zjetspm", "=",
RowBox[{"Import", "[", "\"\<ggH_+-.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"zjetsmp", "=",
RowBox[{"Import", "[", "\"\<ggH_-+.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"zjetsmm", "=",
RowBox[{"Import", "[", "\"\<ggH_--.m\>\"", "]"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"zjetsppV", "=",
RowBox[{"Import", "[", "\"\<ggH_++_vel.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"zjetspmV", "=",
RowBox[{"Import", "[", "\"\<ggH_+-_vel.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"zjetsmpV", "=",
RowBox[{"Import", "[", "\"\<ggH_-+_vel.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"zjetsmmV", "=",
RowBox[{"Import", "[", "\"\<ggH_--_vel.m\>\"", "]"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"NotebookDirectory", "[", "]"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{
RowBox[{"ParentDirectory", "[", "]"}], ",",
"\"\</helicities/0jets\>\""}], "]"}], "]"}],
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{
RowBox[{"ParentDirectory", "[", "]"}], ",",
"\"\</helicities/1jets\>\""}], "]"}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetsppp", "=",
RowBox[{"Import", "[", "\"\<ggHg_+++.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetsppm", "=",
RowBox[{"Import", "[", "\"\<ggHg_++-.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetspmp", "=",
RowBox[{"Import", "[", "\"\<ggHg_+-+.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetsmpp", "=",
RowBox[{"Import", "[", "\"\<ggHg_-++.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetspmm", "=",
RowBox[{"Import", "[", "\"\<ggHg_+--.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetsmpm", "=",
RowBox[{"Import", "[", "\"\<ggHg_-+-.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetsmmp", "=",
RowBox[{"Import", "[", "\"\<ggHg_--+.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"ojetsmmm", "=",
RowBox[{"Import", "[", "\"\<ggHg_---.m\>\"", "]"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetspppV", "=",
RowBox[{"Import", "[", "\"\<ggHg_+++_vel.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetsppmV", "=",
RowBox[{"Import", "[", "\"\<ggHg_++-_vel.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetspmpV", "=",
RowBox[{"Import", "[", "\"\<ggHg_+-+_vel.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetsmppV", "=",
RowBox[{"Import", "[", "\"\<ggHg_-++_vel.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetspmmV", "=",
RowBox[{"Import", "[", "\"\<ggHg_+--_vel.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetsmpmV", "=",
RowBox[{"Import", "[", "\"\<ggHg_-+-_vel.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetsmmpV", "=",
RowBox[{"Import", "[", "\"\<ggHg_--+_vel.m\>\"", "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"ojetsmmmV", "=",
RowBox[{"Import", "[", "\"\<ggHg_---_vel.m\>\"", "]"}]}], ";"}]}], "Input",\
CellChangeTimes->{{3.7796351899715853`*^9, 3.779635219723063*^9}, {
3.779635262192771*^9, 3.779635281649795*^9}, {3.779635379233115*^9,
3.779635624139512*^9}, {3.77963573169842*^9, 3.779635839416141*^9}},
CellLabel->"In[4]:=",ExpressionUUID->"d7b76967-dca2-4367-8a21-339155e2fa1b"],
Cell[BoxData[{
RowBox[{
RowBox[{"VelSub", ":=", "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]",
RowBox[{"S", "\[Rule]",
RowBox[{"(",
RowBox[{"4", "*",
RowBox[{"MT", "^", "2"}], "*",
RowBox[{"(",
RowBox[{"1", "/",
RowBox[{"(",
RowBox[{"1", "-",
RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}], ")"}]}], ")"}]}],
"\[IndentingNewLine]", "}"}]}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"FundConst", ":=",
RowBox[{"{", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Alfas", "\[Rule]", "0.118"}], ",",
RowBox[{"EL", "\[Rule]", "1"}], ",",
RowBox[{"c", "\[Rule]", "1"}], ",",
RowBox[{"SW", "\[Rule]", "0.472"}], ",",
RowBox[{"MH", "\[Rule]", "125"}], ",",
RowBox[{"MW", "\[Rule]", "80.4"}], ",",
RowBox[{"MT", "\[Rule]", "173"}], ",",
RowBox[{"GS", "\[Rule]", "1.22"}], ",",
RowBox[{"c1", "\[Rule]",
RowBox[{"1", "/", "2"}]}], ",",
RowBox[{"c2", "\[Rule]",
RowBox[{
RowBox[{"-", "1"}], "/", "2"}]}]}], "\[IndentingNewLine]", "}"}]}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{
"Defines", " ", "the", " ", "center", " ", "of", " ", "mass", " ",
RowBox[{"frame", "."}]}], " ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"CMSFrame", "=",
RowBox[{"{",
RowBox[{
RowBox[{"k1x", "\[Rule]", " ", "0"}], ",",
RowBox[{"k1y", "\[Rule]", " ", "0"}], ",",
RowBox[{"k1z", "\[Rule]", " ",
RowBox[{"rS", "/", "2"}]}], ",",
RowBox[{"k2x", "\[Rule]", " ", "0"}], ",",
RowBox[{"k2y", "\[Rule]", " ", "0"}], ",",
RowBox[{"k2z", "\[Rule]", " ",
RowBox[{
RowBox[{"-", "rS"}], "/", "2"}]}], ",",
RowBox[{"k5x", "\[Rule]", " ",
RowBox[{"-",
RowBox[{"(",
RowBox[{"k4x", "+", "k3x"}], ")"}]}]}], ",",
RowBox[{"k5y", "\[Rule]", " ",
RowBox[{"-",
RowBox[{"(",
RowBox[{"k4y", "+", "k3y"}], ")"}]}]}], ",",
RowBox[{"k5z", "\[Rule]", " ",
RowBox[{"-",
RowBox[{"(",
RowBox[{"k4z", " ", "+", "k3z"}], ")"}]}]}]}], "}"}]}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{"Returns", " ", "vector", " ",
RowBox[{"(",
RowBox[{"E", ",", "px", ",", "py", ",", "pz"}], ")"}], " ", "in", " ",
"Euclidean", " ", "coordinates"}], " ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"vec4xyz", "[",
RowBox[{"m_", ",", "kx_", ",", "ky_", ",", "kz_"}], "]"}], ":=",
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"k", "=",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"kx", "^", "2"}], " ", "+",
RowBox[{"ky", "^", "2"}], " ", "+",
RowBox[{"kz", "^", "2"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"k", "^", "2"}], " ", "+", " ",
RowBox[{"m", "^", "2"}]}], "]"}], ",", "kx", ",", "ky", ",", "kz"}],
"}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{"Returns", " ", "vector", " ",
RowBox[{"(",
RowBox[{"E", ",", "px", ",", "py", ",", "pz"}], ")"}], " ", "in", " ",
"Collider", " ", "coordinates"}], " ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"vec4Tep", "[",
RowBox[{"m_", ",", "kT_", ",", "\[Eta]_", ",", "\[Phi]_"}], "]"}], ":=",
RowBox[{"Block", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"k", "=",
RowBox[{"kT", " ",
RowBox[{"Cosh", "[", "\[Eta]", "]"}]}]}], ",",
RowBox[{"kx", "=", " ",
RowBox[{"kT", " ",
RowBox[{"Cos", "[", "\[Phi]", "]"}]}]}], ",",
RowBox[{"ky", "=", " ",
RowBox[{"kT", " ",
RowBox[{"Sin", "[", "\[Phi]", "]"}]}]}], ",",
RowBox[{"kz", " ", "=", " ",
RowBox[{"kT", " ",
RowBox[{"Sinh", "[", "\[Eta]", "]"}]}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"k", "^", "2"}], " ", "+", " ",
RowBox[{"m", "^", "2"}]}], "]"}], ",", "kx", ",", "ky", ",", "kz"}],
"}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{
"Definition", " ", "of", " ", "the", " ", "four", " ", "vector", " ", "of",
" ", "particle", " ", "3", " ",
RowBox[{"(", "Higgs", ")"}]}], " ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"vecetaphi3", "=",
RowBox[{
RowBox[{"vec4Tep", "[",
RowBox[{"MH", ",", "kT3", ",", "\[Eta]3", ",", "\[Phi]3"}], "]"}], "//",
"Simplify"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{
"Definition", " ", "of", " ", "the", " ", "four", " ", "vector", " ", "of",
" ", "particle", " ", "4", " ",
RowBox[{"(",
RowBox[{"outgoing", " ", "gluon"}], ")"}]}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"vecetaphi4", "=",
RowBox[{"(",
RowBox[{
RowBox[{"vec4Tep", "[",
RowBox[{"0", ",", "kT4", ",", "\[Eta]4", ",", "\[Phi]4"}], "]"}], "//",
"Simplify"}], ")"}]}], ";"}], "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"Transformation", " ", "of", " ", "momentum", " ", "variables", " ",
"from", " ", "Euclidean", " ", "to", " ", "Collider", " ", "coordinates",
" ", "for", " ", "particles", " ", "3"}], ",", "4."}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"vecsubetaphi", "=",
RowBox[{"{",
RowBox[{
RowBox[{"k4x", "\[Rule]", " ",
RowBox[{"vecetaphi4", "[",
RowBox[{"[", "2", "]"}], "]"}]}], ",",
RowBox[{"k4y", "\[Rule]", " ",
RowBox[{"vecetaphi4", "[",
RowBox[{"[", "3", "]"}], "]"}]}], ",",
RowBox[{"k4z", "\[Rule]", " ",
RowBox[{"vecetaphi4", "[",
RowBox[{"[", "4", "]"}], "]"}]}], ",",
RowBox[{"k3x", "\[Rule]", " ",
RowBox[{"vecetaphi3", "[",
RowBox[{"[", "2", "]"}], "]"}]}], ",",
RowBox[{"k3y", "\[Rule]", " ",
RowBox[{"vecetaphi3", "[",
RowBox[{"[", "3", "]"}], "]"}]}], ",",
RowBox[{"k3z", "\[Rule]", " ",
RowBox[{"vecetaphi3", "[",
RowBox[{"[", "4", "]"}], "]"}]}]}], "}"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"KinRules", "[",
RowBox[{"m1_", ",", "m2_", ",", "m3_", ",", "m4_"}], "]"}], ":=", " ",
RowBox[{"{",
RowBox[{
RowBox[{"k1", "\[Rule]",
RowBox[{
RowBox[{"(",
RowBox[{"1", "/",
RowBox[{"(",
RowBox[{"2",
RowBox[{"Sqrt", "[", "S", "]"}]}], ")"}]}], ")"}], "*",
RowBox[{"Sqrt", "[",
RowBox[{"Kallen\[Lambda]", "[",
RowBox[{"S", ",",
RowBox[{"m1", "^", "2"}], ",",
RowBox[{"m2", "^", "2"}]}], "]"}], "]"}]}]}], ",",
RowBox[{"k2", "->",
RowBox[{
RowBox[{"(",
RowBox[{"1", "/",
RowBox[{"(",
RowBox[{"2",
RowBox[{"Sqrt", "[", "S", "]"}]}], ")"}]}], ")"}], "*",
RowBox[{"Sqrt", "[",
RowBox[{"Kallen\[Lambda]", "[",
RowBox[{"S", ",",
RowBox[{"m1", "^", "2"}], ",",
RowBox[{"m2", "^", "2"}]}], "]"}], "]"}]}]}], ",", " ",
RowBox[{"k3", "->",
RowBox[{
RowBox[{"(",
RowBox[{"1", "/",
RowBox[{"(",
RowBox[{"2",
RowBox[{"Sqrt", "[", "S", "]"}]}], ")"}]}], ")"}], "*",
RowBox[{"Sqrt", "[",
RowBox[{"Kallen\[Lambda]", "[",
RowBox[{"S", ",",
RowBox[{"m3", "^", "2"}], ",",
RowBox[{"m4", "^", "2"}]}], "]"}], "]"}]}]}], ",",
"\[IndentingNewLine]",
RowBox[{"k4", "->",
RowBox[{
RowBox[{"(",
RowBox[{"1", "/",
RowBox[{"(",
RowBox[{"2",
RowBox[{"Sqrt", "[", "S", "]"}]}], ")"}]}], ")"}], "*",
RowBox[{"Sqrt", "[",
RowBox[{"Kallen\[Lambda]", "[",
RowBox[{"S", ",",
RowBox[{"m3", "^", "2"}], ",",
RowBox[{"m4", "^", "2"}]}], "]"}], "]"}]}]}]}], "}"}]}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"kinrules", "=",
RowBox[{
RowBox[{"KinRules", "[",
RowBox[{"0", ",", "0", ",", "MH", ",", "0"}], "]"}], "//",
"Simplify"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"k1vec", "=",
RowBox[{
RowBox[{
RowBox[{"vec4xyz", "[",
RowBox[{"0", ",", "k1x", ",", "k1y", ",", "k1z"}], "]"}], "/.",
"CMSFrame"}], "//", "Simplify"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"k2vec", "=",
RowBox[{
RowBox[{
RowBox[{"vec4xyz", "[",
RowBox[{"0", ",", "k2x", ",", "k2y", ",", "k2z"}], "]"}], "/.",
"CMSFrame"}], "//", "Simplify"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"kvec1", "=",
RowBox[{
RowBox[{
RowBox[{"k1vec", "/.", " ", "vecsubetaphi"}], "/.",
RowBox[{"rS", "\[Rule]",
RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"kvec2", "=",
RowBox[{
RowBox[{
RowBox[{"k2vec", "/.", " ", "vecsubetaphi"}], "/.",
RowBox[{"rS", "\[Rule]",
RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"kvec3", "=",
RowBox[{
RowBox[{
RowBox[{"vec4M", "[",
RowBox[{"MH", ",", "k3", ",", "\[Theta]3", ",", "\[Phi]3"}], "]"}], "//.",
"kinrules"}], "//", "Simplify"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"kvec4", "=",
RowBox[{
RowBox[{
RowBox[{"vec4M", "[",
RowBox[{"0", ",", "k4", ",", "\[Theta]4", ",", "\[Phi]4"}], "]"}], "//.",
"kinrules"}], "//", "Simplify"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"SS", "=",
RowBox[{"MyPair", "[",
RowBox[{
RowBox[{"kvec1", "+", "kvec2"}], ",",
RowBox[{"kvec1", "+", "kvec2"}]}], "]"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"TT", "=",
RowBox[{"MyPair", "[",
RowBox[{
RowBox[{"kvec4", "-", "kvec2"}], ",",
RowBox[{"kvec4", "-", "kvec2"}]}], "]"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"UU", "=",
RowBox[{"MyPair", "[",
RowBox[{
RowBox[{"kvec1", "-", "kvec4"}], ",",
RowBox[{"kvec1", "-", "kvec4"}]}], "]"}]}],
";"}], "\[IndentingNewLine]"}], "Input",
CellChangeTimes->{{3.779635969502471*^9, 3.779636032668161*^9}, {
3.779636070338065*^9, 3.779636089586961*^9}, {3.779636127506967*^9,
3.779636161454482*^9}, {3.779636299077375*^9, 3.779636302228191*^9}, {
3.779636523524314*^9, 3.779636556557905*^9}, {3.779636955912983*^9,
3.7796370535861692`*^9}, {3.779637119136038*^9, 3.779637125339582*^9}, {
3.779637161749466*^9, 3.7796371831483917`*^9}, {3.779637213778425*^9,
3.779637282059991*^9}, {3.779637393565974*^9, 3.779637424125772*^9}, {
3.7796380152156897`*^9, 3.7796380158546886`*^9}, 3.7796380632274313`*^9, {
3.7796382216643343`*^9, 3.779638240589849*^9}, {3.7796386164009533`*^9,
3.779638711862108*^9}, {3.779638813641624*^9, 3.7796388284302998`*^9}, {
3.7796408009027557`*^9, 3.779640811600585*^9}, {3.779640860910718*^9,
3.779640863344008*^9}, {3.779645656896225*^9, 3.779645659004375*^9}},
CellLabel->"In[32]:=",ExpressionUUID->"cbc22efa-decc-497a-9b30-3d83accfa7ac"],
Cell[BoxData[
RowBox[{"Kinematics", ":=",
RowBox[{"{", "\[IndentingNewLine]",
RowBox[{
RowBox[{"T", "\[Rule]", "TT"}], ",",
RowBox[{"U", "\[Rule]", "UU"}], ",",
RowBox[{"\[Phi]4", "\[Rule]", "0"}], ",",
RowBox[{"\[Phi]3", "\[Rule]", "0"}], ",",
RowBox[{"\[Theta]3", "\[Rule]",
RowBox[{"Pi", "/", "2"}]}], ",",
RowBox[{"\[Theta]4", "\[Rule]",
RowBox[{"Pi", "/", "2"}]}], ",",
RowBox[{"\[Eta]3", "\[Rule]",
RowBox[{"-",
RowBox[{"Log", "[",
RowBox[{"Tan", "[",
RowBox[{"\[Theta]3", "/", "2"}], "]"}], "]"}]}]}], ",",
RowBox[{"\[Eta]4", "\[Rule]",
RowBox[{"-",
RowBox[{"Log", "[",
RowBox[{"Tan", "[",
RowBox[{"\[Theta]4", "/", "2"}], "]"}], "]"}]}]}], ",",
RowBox[{"kT3", "\[Rule]",
RowBox[{"k3", "*",
RowBox[{"Cosh", "[", "\[Eta]3", "]"}]}]}], ",",
RowBox[{"kT4", "\[Rule]",
RowBox[{"k4", "*",
RowBox[{"Cosh", "[", "\[Eta]4", "]"}]}]}]}], "\[IndentingNewLine]",
"}"}]}]], "Input",
CellChangeTimes->{{3.779637438812982*^9, 3.779637465684292*^9}, {
3.779637502965968*^9, 3.779637541139387*^9}, {3.779638077074128*^9,
3.779638122031776*^9}, {3.779639046841374*^9, 3.7796391364973383`*^9}, {
3.779639187821389*^9, 3.779639212489912*^9}, {3.779639393945671*^9,
3.779639465518195*^9}},
CellLabel->"In[51]:=",ExpressionUUID->"7ea9f282-595c-4ec8-9993-bd70daad86ee"],
Cell[BoxData[
RowBox[{
RowBox[{"(*", " ",
RowBox[{
RowBox[{"for", " ", "g", " ", "g"}], " ", "->", " ", "H"}], " ", "*)"}],
"\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}],
"\[IndentingNewLine]",
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{
RowBox[{"ParentDirectory", "[", "]"}], ",", "\"\</plots/0jets\>\""}],
"]"}], "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"(*", " ", "++", " ", "*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"re", "=",
RowBox[{
RowBox[{
RowBox[{"Re", "[", "zjetspp", "]"}], "//.",
RowBox[{"S", "\[Rule]", "sqrtS"}]}], "//.", "FundConst"}]}], ";"}],
"\[IndentingNewLine]",
RowBox[{
RowBox[{"im", "=",
RowBox[{
RowBox[{
RowBox[{"Im", "[", "zjetspp", "]"}], "//.",
RowBox[{"S", "\[Rule]", "sqrtS"}]}], "//.", "FundConst"}]}], ";"}],
"\[IndentingNewLine]",
RowBox[{
RowBox[{"plot01", "=",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"{",
RowBox[{"re", ",", "im"}], "}"}], ",",
RowBox[{"{",
RowBox[{"sqrtS", ",", "125", ",",
RowBox[{"4", "*", "173"}]}], "}"}], ",",
RowBox[{"PlotLabels", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\<Real\>\"", ",", "\"\<Imaginary\>\""}], "}"}]}], ",",
RowBox[{"AxesLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Sqrt", "[", "S", "]"}], ",", "\"\<Amp[++]\>\""}],
"}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Export", "[",
RowBox[{"\"\<ggH_++.png\>\"", ",", "plot01", ",",
RowBox[{"ImageSize", "\[Rule]", "600"}]}], "]"}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{
RowBox[{"reV", "=",
RowBox[{
RowBox[{"Re", "[", "zjetsppV", "]"}], "//.", "FundConst"}]}], ";"}],
"\[IndentingNewLine]",
RowBox[{
RowBox[{"imV", "=",
RowBox[{
RowBox[{"Im", "[", "zjetsppV", "]"}], "//.", "FundConst"}]}], ";"}],