VecLepQrk: 15TeVLQ.nb

File 15TeVLQ.nb, 138.1 KB (added by Joydeep Roy, 6 years ago)

This is an example Mathematica notebook that loads the model and calculates Feynman rules.

Line 
1(* Content-type: application/vnd.wolfram.mathematica *)
2
3(*** Wolfram Notebook File ***)
4(* http://www.wolfram.com/nb *)
5
6(* CreatedBy='Mathematica 11.1' *)
7
8(*CacheID: 234*)
9(* Internal cache information:
10NotebookFileLineBreakTest
11NotebookFileLineBreakTest
12NotebookDataPosition[ 158, 7]
13NotebookDataLength[ 138488, 2713]
14NotebookOptionsPosition[ 129761, 2576]
15NotebookOutlinePosition[ 130105, 2591]
16CellTagsIndexPosition[ 130062, 2588]
17WindowFrame->Normal*)
18
19(* Beginning of Notebook Content *)
20Notebook[{
21Cell[BoxData[
22 RowBox[{"Quit", "[", "]"}]], "Input",
23 CellChangeTimes->{{3.4921467751527157`*^9, 3.492146776183146*^9}},
24 CellLabel->"In[19]:=",ExpressionUUID->"35fb9169-6165-45f2-bb47-d2b5a30fdac3"],
25
26Cell[CellGroupData[{
27
28Cell["Load Feynrules", "Section",
29 CellChangeTimes->{{3.7101820508363366`*^9,
30 3.710182056146993*^9}},ExpressionUUID->"d3c1a50a-7a32-4ff7-9e5b-\
31f82af6c85fb6"],
32
33Cell[CellGroupData[{
34
35Cell[BoxData[
36 RowBox[{"$FeynRulesPath", "=",
37 RowBox[{
38 "SetDirectory", "[",
39 "\"\<C:\\\\Users\\\\Joyroy15\\\\Desktop\\\\Research\\\\Research with \
40Yu\\\\Leptoquark_Models\\\\feynrules-current\>\"", "]"}]}]], "Input",
41 CellChangeTimes->{{3.41265862251538*^9, 3.412658649947229*^9}, {
42 3.423415585782702*^9, 3.423415597189939*^9}, {3.4234163173467493`*^9,
43 3.4234163227881193`*^9}, {3.7090007559382133`*^9, 3.7090007919104977`*^9}, {
44 3.709000903039165*^9, 3.70900090377494*^9}},
45 CellLabel->"In[1]:=",ExpressionUUID->"f0518695-6cd4-402e-98f3-cd0a888e3378"],
46
47Cell[BoxData["\<\"C:\\\\Users\\\\Joyroy15\\\\Desktop\\\\Research\\\\Research \
48with Yu\\\\Leptoquark_Models\\\\feynrules-current\"\>"], "Output",
49 CellChangeTimes->{
50 3.7090007988933597`*^9, 3.7090009049111643`*^9, 3.709002757182743*^9,
51 3.7090028541370153`*^9, 3.709046479007363*^9, 3.7095635088808727`*^9,
52 3.7095635937246113`*^9, 3.709606834438501*^9, 3.7099108244300857`*^9,
53 3.709953245493742*^9, 3.7100000947474627`*^9, 3.710018048796711*^9,
54 3.7100194144694424`*^9, 3.7101045019109755`*^9, 3.710104614002838*^9,
55 3.7101047191195784`*^9, 3.7101048841920485`*^9, 3.7101740382172933`*^9,
56 3.71018206536942*^9, 3.710213462483958*^9, 3.7102139088774676`*^9,
57 3.7102140167081594`*^9, 3.710214596476961*^9, 3.710215191172785*^9,
58 3.7102154105680304`*^9, 3.7102155077197137`*^9, 3.710215757438155*^9,
59 3.710216261440168*^9, 3.7102162971387486`*^9, 3.7102166166124625`*^9,
60 3.7107150952436256`*^9, 3.710715387862335*^9, 3.7107154432635236`*^9,
61 3.710715593975668*^9, 3.710715738134115*^9, 3.710715798335558*^9,
62 3.71071588408706*^9, 3.7107162282491426`*^9, 3.7107165196272526`*^9,
63 3.7107165993561373`*^9, 3.710716663868831*^9, 3.710716869316869*^9,
64 3.7107171893172607`*^9, 3.710717259112995*^9, 3.710717829988202*^9,
65 3.7107183367135572`*^9, 3.7107184049821177`*^9, 3.710718444161071*^9,
66 3.7107186149690714`*^9, 3.710718703374365*^9, 3.710718901283065*^9,
67 3.710758780589957*^9, 3.7107592747016897`*^9, 3.710760223763931*^9,
68 3.710761183295255*^9, 3.710772140242649*^9, 3.7107723457670207`*^9,
69 3.7107723910199113`*^9, 3.7107725979889345`*^9, 3.7107728934481955`*^9, {
70 3.710773052648634*^9, 3.7107730721894684`*^9}, 3.710773148619192*^9,
71 3.710773259988822*^9, 3.7107734056399174`*^9, 3.710773607412631*^9,
72 3.7107739130636716`*^9, 3.710774550405507*^9, 3.7107763360092754`*^9,
73 3.71077813526503*^9, 3.7107783239234753`*^9, 3.710843558838518*^9,
74 3.7108451225677023`*^9, 3.7113000908265576`*^9, 3.711300219168351*^9,
75 3.711300274785056*^9, 3.7113005157052546`*^9, 3.7113014382107973`*^9,
76 3.711315756872567*^9, 3.711315833078271*^9, 3.7113160180672655`*^9,
77 3.711320707125144*^9, 3.711328526633577*^9, 3.7113286701454544`*^9,
78 3.7113287041379457`*^9, 3.7113296753640003`*^9, 3.711367876039989*^9,
79 3.7113679806143026`*^9, 3.7113680350102673`*^9, 3.7113682079746284`*^9,
80 3.7113683872808332`*^9, 3.711377614540615*^9, 3.711377786755968*^9,
81 3.7113780273107767`*^9, 3.7113781614598265`*^9, 3.7113784559053173`*^9,
82 3.7113785403040285`*^9, 3.711378924927848*^9, 3.711379021723223*^9,
83 3.7113791575951433`*^9, 3.7113801344601483`*^9, 3.711380211848833*^9,
84 3.7113808523842278`*^9, 3.7113811853791018`*^9, 3.7113812307246733`*^9,
85 3.7113812891933928`*^9, 3.711381393012928*^9, 3.7113821466520147`*^9,
86 3.7113823115545673`*^9, 3.7114109884359164`*^9, 3.71141168369543*^9,
87 3.7114220743177547`*^9, 3.7114223359718814`*^9, 3.711422457779241*^9,
88 3.7114225926953883`*^9, 3.7114227387630377`*^9, 3.7114228546720862`*^9,
89 3.7114229171101823`*^9, 3.711423356904958*^9, 3.711423621093189*^9,
90 3.711423888094798*^9, 3.7114706459176445`*^9, 3.7114708239904947`*^9,
91 3.711471069228612*^9, 3.711718745316383*^9, 3.711733871064354*^9,
92 3.714779009142174*^9, 3.727754416726856*^9, 3.727754531305581*^9,
93 3.7278345262496915`*^9, 3.727834779912624*^9, 3.728801631348674*^9,
94 3.7288176752659464`*^9, 3.728831849714325*^9, 3.7288319300216637`*^9,
95 3.728832053883459*^9, 3.728832483933361*^9, 3.7288325371883974`*^9,
96 3.7288326123773785`*^9, 3.7288326804096785`*^9, 3.7288327417268915`*^9,
97 3.7288332179772673`*^9, 3.7288334922701693`*^9, 3.7288336099419317`*^9,
98 3.728833688191868*^9, 3.728833868207281*^9, 3.728834302726115*^9,
99 3.728834589918804*^9, 3.7288347687389307`*^9, 3.728835380285824*^9,
100 3.7313925413957744`*^9, 3.731635089081555*^9, 3.731643259143752*^9,
101 3.7316434077853003`*^9, 3.734257003793642*^9, 3.7342574454838624`*^9,
102 3.7342577083908997`*^9, 3.7342579704005966`*^9, 3.734258073886767*^9,
103 3.73425822628549*^9, 3.745205743610037*^9, 3.7452059875200534`*^9,
104 3.745206110135985*^9, 3.745206823102724*^9, 3.7452138982903147`*^9},
105 CellLabel->"Out[1]=",ExpressionUUID->"b0f19208-0c95-4885-b5bd-90dc83ca6599"]
106}, Open ]],
107
108Cell[CellGroupData[{
109
110Cell[BoxData[
111 RowBox[{"<<", "FeynRules`"}]], "Input",
112 CellChangeTimes->{{3.547535564344927*^9, 3.547535564971527*^9}},
113 CellLabel->"In[2]:=",ExpressionUUID->"99a894d2-6aa4-443c-b8a0-97d67849d48a"],
114
115Cell[CellGroupData[{
116
117Cell[BoxData["\<\" - FeynRules - \"\>"], "Print",
118 CellChangeTimes->{
119 3.7101047223702517`*^9, 3.7101048902589264`*^9, 3.7101740388074245`*^9,
120 3.7101820654994287`*^9, 3.7102134626589947`*^9, 3.7102139091276107`*^9,
121 3.710214016833184*^9, 3.7102145966069865`*^9, 3.7102151913028107`*^9,
122 3.7102154108430834`*^9, 3.710215507879747*^9, 3.710215757563178*^9,
123 3.7102162615801964`*^9, 3.710216297408803*^9, 3.710216616732487*^9,
124 3.7107150954486666`*^9, 3.7107153880423737`*^9, 3.710715443363544*^9,
125 3.7107155940806684`*^9, 3.71071573823912*^9, 3.71071579843057*^9,
126 3.7107158842620807`*^9, 3.7107162283425035`*^9, 3.710716519727272*^9,
127 3.7107165994561405`*^9, 3.710716663968853*^9, 3.7107168694068875`*^9,
128 3.7107171894322653`*^9, 3.710717259218348*^9, 3.7107178300982428`*^9,
129 3.7107183368185787`*^9, 3.710718405072132*^9, 3.7107184442760944`*^9,
130 3.7107186156742115`*^9, 3.71071870349939*^9, 3.710718901383087*^9,
131 3.710758780719983*^9, 3.710759274796708*^9, 3.7107602241039953`*^9,
132 3.710761183648739*^9, 3.7107721404596467`*^9, 3.710772345852022*^9,
133 3.7107723913399715`*^9, 3.7107725980901165`*^9, 3.7107728935882206`*^9, {
134 3.7107730527436533`*^9, 3.710773072289486*^9}, 3.7107731487142096`*^9,
135 3.7107732600776386`*^9, 3.7107734057619085`*^9, 3.7107736075426583`*^9,
136 3.710773913148673*^9, 3.7107745504955244`*^9, 3.710776336119282*^9,
137 3.710778135430046*^9, 3.7107783240534663`*^9, 3.7108435590335393`*^9,
138 3.710845122724235*^9, 3.7113000910566015`*^9, 3.7113002192783732`*^9,
139 3.711300274885126*^9, 3.7113005157952747`*^9, 3.711301438380816*^9,
140 3.7113157574840555`*^9, 3.7113158497147255`*^9, 3.711316018167286*^9,
141 3.711320707325183*^9, 3.711328526808626*^9, 3.711328670260462*^9,
142 3.7113287042479687`*^9, 3.711329675469021*^9, 3.711367876368185*^9,
143 3.711367980719307*^9, 3.711368035135292*^9, 3.7113682080796504`*^9,
144 3.711368387410859*^9, 3.711377614700598*^9, 3.711377786895996*^9,
145 3.711378027425785*^9, 3.711378161589856*^9, 3.7113784560503283`*^9,
146 3.71137854042912*^9, 3.7113789250428705`*^9, 3.711379021903257*^9,
147 3.7113791577001605`*^9, 3.7113801345754347`*^9, 3.711380214154272*^9,
148 3.711380852509256*^9, 3.7113811854841204`*^9, 3.711381230824678*^9,
149 3.71138128928841*^9, 3.7113813933479986`*^9, 3.711382146828144*^9,
150 3.711382311654971*^9, 3.711410988717021*^9, 3.7114116845368824`*^9,
151 3.711422074532405*^9, 3.7114223360869427`*^9, 3.7114224579082313`*^9,
152 3.7114225927954445`*^9, 3.7114227388685703`*^9, 3.7114228547821307`*^9,
153 3.7114229172202444`*^9, 3.7114233570155144`*^9, 3.711423621198264*^9,
154 3.711423888214839*^9, 3.711470646092678*^9, 3.711470824375555*^9,
155 3.7114710693435965`*^9, 3.7117187482469654`*^9, 3.7117338716444683`*^9,
156 3.714779012659619*^9, 3.7277544174269915`*^9, 3.7277545442960863`*^9,
157 3.727834563903821*^9, 3.727834780320803*^9, 3.728801631553663*^9,
158 3.728817675542366*^9, 3.7288318501393943`*^9, 3.7288319301266727`*^9,
159 3.728832054008481*^9, 3.728832484388434*^9, 3.7288325373677316`*^9,
160 3.7288326124773965`*^9, 3.728832680504695*^9, 3.728832742057358*^9,
161 3.7288332181172967`*^9, 3.728833492390175*^9, 3.7288336100369325`*^9,
162 3.728833688506276*^9, 3.7288338683273053`*^9, 3.728834303149663*^9,
163 3.728834590043825*^9, 3.728834768828949*^9, 3.7288353806458983`*^9,
164 3.731392541654812*^9, 3.731635092618065*^9, 3.7316432606438*^9,
165 3.7316434082336216`*^9, 3.7342574559076395`*^9, 3.734257727930956*^9,
166 3.7342579708449965`*^9, 3.7342580881344748`*^9, 3.734258226696579*^9,
167 3.7452057440031114`*^9, 3.7452059880057755`*^9, 3.745206110296891*^9,
168 3.745206832644657*^9, 3.7452138989200253`*^9},
169 CellLabel->
170 "During evaluation of \
171In[2]:=",ExpressionUUID->"32452b76-43d1-43b0-b85c-5c4fe04243c1"],
172
173Cell[BoxData[
174 InterpretationBox[
175 RowBox[{"\<\"Version: \"\>", "\[InvisibleSpace]", "\<\"2.3.29\"\>",
176 "\[InvisibleSpace]",
177 RowBox[{"\<\" (\"\>", " ", "\<\"06 July 2017\"\>"}],
178 "\[InvisibleSpace]", "\<\").\"\>"}],
179 SequenceForm["Version: ", "2.3.29", " (" "06 July 2017", ")."],
180 Editable->False]], "Print",
181 CellChangeTimes->{
182 3.7101047223702517`*^9, 3.7101048902589264`*^9, 3.7101740388074245`*^9,
183 3.7101820654994287`*^9, 3.7102134626589947`*^9, 3.7102139091276107`*^9,
184 3.710214016833184*^9, 3.7102145966069865`*^9, 3.7102151913028107`*^9,
185 3.7102154108430834`*^9, 3.710215507879747*^9, 3.710215757563178*^9,
186 3.7102162615801964`*^9, 3.710216297408803*^9, 3.710216616732487*^9,
187 3.7107150954486666`*^9, 3.7107153880423737`*^9, 3.710715443363544*^9,
188 3.7107155940806684`*^9, 3.71071573823912*^9, 3.71071579843057*^9,
189 3.7107158842620807`*^9, 3.7107162283425035`*^9, 3.710716519727272*^9,
190 3.7107165994561405`*^9, 3.710716663968853*^9, 3.7107168694068875`*^9,
191 3.7107171894322653`*^9, 3.710717259218348*^9, 3.7107178300982428`*^9,
192 3.7107183368185787`*^9, 3.710718405072132*^9, 3.7107184442760944`*^9,
193 3.7107186156742115`*^9, 3.71071870349939*^9, 3.710718901383087*^9,
194 3.710758780719983*^9, 3.710759274796708*^9, 3.7107602241039953`*^9,
195 3.710761183648739*^9, 3.7107721404596467`*^9, 3.710772345852022*^9,
196 3.7107723913399715`*^9, 3.7107725980901165`*^9, 3.7107728935882206`*^9, {
197 3.7107730527436533`*^9, 3.710773072289486*^9}, 3.7107731487142096`*^9,
198 3.7107732600776386`*^9, 3.7107734057619085`*^9, 3.7107736075426583`*^9,
199 3.710773913148673*^9, 3.7107745504955244`*^9, 3.710776336119282*^9,
200 3.710778135430046*^9, 3.7107783240534663`*^9, 3.7108435590335393`*^9,
201 3.710845122724235*^9, 3.7113000910566015`*^9, 3.7113002192783732`*^9,
202 3.711300274885126*^9, 3.7113005157952747`*^9, 3.711301438380816*^9,
203 3.7113157574840555`*^9, 3.7113158497147255`*^9, 3.711316018167286*^9,
204 3.711320707325183*^9, 3.711328526808626*^9, 3.711328670260462*^9,
205 3.7113287042479687`*^9, 3.711329675469021*^9, 3.711367876368185*^9,
206 3.711367980719307*^9, 3.711368035135292*^9, 3.7113682080796504`*^9,
207 3.711368387410859*^9, 3.711377614700598*^9, 3.711377786895996*^9,
208 3.711378027425785*^9, 3.711378161589856*^9, 3.7113784560503283`*^9,
209 3.71137854042912*^9, 3.7113789250428705`*^9, 3.711379021903257*^9,
210 3.7113791577001605`*^9, 3.7113801345754347`*^9, 3.711380214154272*^9,
211 3.711380852509256*^9, 3.7113811854841204`*^9, 3.711381230824678*^9,
212 3.71138128928841*^9, 3.7113813933479986`*^9, 3.711382146828144*^9,
213 3.711382311654971*^9, 3.711410988717021*^9, 3.7114116845368824`*^9,
214 3.711422074532405*^9, 3.7114223360869427`*^9, 3.7114224579082313`*^9,
215 3.7114225927954445`*^9, 3.7114227388685703`*^9, 3.7114228547821307`*^9,
216 3.7114229172202444`*^9, 3.7114233570155144`*^9, 3.711423621198264*^9,
217 3.711423888214839*^9, 3.711470646092678*^9, 3.711470824375555*^9,
218 3.7114710693435965`*^9, 3.7117187482469654`*^9, 3.7117338716444683`*^9,
219 3.714779012659619*^9, 3.7277544174269915`*^9, 3.7277545442960863`*^9,
220 3.727834563903821*^9, 3.727834780320803*^9, 3.728801631553663*^9,
221 3.728817675542366*^9, 3.7288318501393943`*^9, 3.7288319301266727`*^9,
222 3.728832054008481*^9, 3.728832484388434*^9, 3.7288325373677316`*^9,
223 3.7288326124773965`*^9, 3.728832680504695*^9, 3.728832742057358*^9,
224 3.7288332181172967`*^9, 3.728833492390175*^9, 3.7288336100369325`*^9,
225 3.728833688506276*^9, 3.7288338683273053`*^9, 3.728834303149663*^9,
226 3.728834590043825*^9, 3.728834768828949*^9, 3.7288353806458983`*^9,
227 3.731392541654812*^9, 3.731635092618065*^9, 3.7316432606438*^9,
228 3.7316434082336216`*^9, 3.7342574559076395`*^9, 3.734257727930956*^9,
229 3.7342579708449965`*^9, 3.7342580881344748`*^9, 3.734258226696579*^9,
230 3.7452057440031114`*^9, 3.7452059880057755`*^9, 3.745206110296891*^9,
231 3.745206832644657*^9, 3.74521389893565*^9},
232 CellLabel->
233 "During evaluation of \
234In[2]:=",ExpressionUUID->"514f8a91-04bd-49f8-9983-ff16a621b96a"],
235
236Cell[BoxData["\<\"Authors: A. Alloul, N. Christensen, C. Degrande, C. Duhr, \
237B. Fuks\"\>"], "Print",
238 CellChangeTimes->{
239 3.7101047223702517`*^9, 3.7101048902589264`*^9, 3.7101740388074245`*^9,
240 3.7101820654994287`*^9, 3.7102134626589947`*^9, 3.7102139091276107`*^9,
241 3.710214016833184*^9, 3.7102145966069865`*^9, 3.7102151913028107`*^9,
242 3.7102154108430834`*^9, 3.710215507879747*^9, 3.710215757563178*^9,
243 3.7102162615801964`*^9, 3.710216297408803*^9, 3.710216616732487*^9,
244 3.7107150954486666`*^9, 3.7107153880423737`*^9, 3.710715443363544*^9,
245 3.7107155940806684`*^9, 3.71071573823912*^9, 3.71071579843057*^9,
246 3.7107158842620807`*^9, 3.7107162283425035`*^9, 3.710716519727272*^9,
247 3.7107165994561405`*^9, 3.710716663968853*^9, 3.7107168694068875`*^9,
248 3.7107171894322653`*^9, 3.710717259218348*^9, 3.7107178300982428`*^9,
249 3.7107183368185787`*^9, 3.710718405072132*^9, 3.7107184442760944`*^9,
250 3.7107186156742115`*^9, 3.71071870349939*^9, 3.710718901383087*^9,
251 3.710758780719983*^9, 3.710759274796708*^9, 3.7107602241039953`*^9,
252 3.710761183648739*^9, 3.7107721404596467`*^9, 3.710772345852022*^9,
253 3.7107723913399715`*^9, 3.7107725980901165`*^9, 3.7107728935882206`*^9, {
254 3.7107730527436533`*^9, 3.710773072289486*^9}, 3.7107731487142096`*^9,
255 3.7107732600776386`*^9, 3.7107734057619085`*^9, 3.7107736075426583`*^9,
256 3.710773913148673*^9, 3.7107745504955244`*^9, 3.710776336119282*^9,
257 3.710778135430046*^9, 3.7107783240534663`*^9, 3.7108435590335393`*^9,
258 3.710845122724235*^9, 3.7113000910566015`*^9, 3.7113002192783732`*^9,
259 3.711300274885126*^9, 3.7113005157952747`*^9, 3.711301438380816*^9,
260 3.7113157574840555`*^9, 3.7113158497147255`*^9, 3.711316018167286*^9,
261 3.711320707325183*^9, 3.711328526808626*^9, 3.711328670260462*^9,
262 3.7113287042479687`*^9, 3.711329675469021*^9, 3.711367876368185*^9,
263 3.711367980719307*^9, 3.711368035135292*^9, 3.7113682080796504`*^9,
264 3.711368387410859*^9, 3.711377614700598*^9, 3.711377786895996*^9,
265 3.711378027425785*^9, 3.711378161589856*^9, 3.7113784560503283`*^9,
266 3.71137854042912*^9, 3.7113789250428705`*^9, 3.711379021903257*^9,
267 3.7113791577001605`*^9, 3.7113801345754347`*^9, 3.711380214154272*^9,
268 3.711380852509256*^9, 3.7113811854841204`*^9, 3.711381230824678*^9,
269 3.71138128928841*^9, 3.7113813933479986`*^9, 3.711382146828144*^9,
270 3.711382311654971*^9, 3.711410988717021*^9, 3.7114116845368824`*^9,
271 3.711422074532405*^9, 3.7114223360869427`*^9, 3.7114224579082313`*^9,
272 3.7114225927954445`*^9, 3.7114227388685703`*^9, 3.7114228547821307`*^9,
273 3.7114229172202444`*^9, 3.7114233570155144`*^9, 3.711423621198264*^9,
274 3.711423888214839*^9, 3.711470646092678*^9, 3.711470824375555*^9,
275 3.7114710693435965`*^9, 3.7117187482469654`*^9, 3.7117338716444683`*^9,
276 3.714779012659619*^9, 3.7277544174269915`*^9, 3.7277545442960863`*^9,
277 3.727834563903821*^9, 3.727834780320803*^9, 3.728801631553663*^9,
278 3.728817675542366*^9, 3.7288318501393943`*^9, 3.7288319301266727`*^9,
279 3.728832054008481*^9, 3.728832484388434*^9, 3.7288325373677316`*^9,
280 3.7288326124773965`*^9, 3.728832680504695*^9, 3.728832742057358*^9,
281 3.7288332181172967`*^9, 3.728833492390175*^9, 3.7288336100369325`*^9,
282 3.728833688506276*^9, 3.7288338683273053`*^9, 3.728834303149663*^9,
283 3.728834590043825*^9, 3.728834768828949*^9, 3.7288353806458983`*^9,
284 3.731392541654812*^9, 3.731635092618065*^9, 3.7316432606438*^9,
285 3.7316434082336216`*^9, 3.7342574559076395`*^9, 3.734257727930956*^9,
286 3.7342579708449965`*^9, 3.7342580881344748`*^9, 3.734258226696579*^9,
287 3.7452057440031114`*^9, 3.7452059880057755`*^9, 3.745206110296891*^9,
288 3.745206832644657*^9, 3.74521389893966*^9},
289 CellLabel->
290 "During evaluation of \
291In[2]:=",ExpressionUUID->"50e09a48-e77f-4316-9e43-d569abdbbd5a"],
292
293Cell[BoxData["\<\" \"\>"], "Print",
294 CellChangeTimes->{
295 3.7101047223702517`*^9, 3.7101048902589264`*^9, 3.7101740388074245`*^9,
296 3.7101820654994287`*^9, 3.7102134626589947`*^9, 3.7102139091276107`*^9,
297 3.710214016833184*^9, 3.7102145966069865`*^9, 3.7102151913028107`*^9,
298 3.7102154108430834`*^9, 3.710215507879747*^9, 3.710215757563178*^9,
299 3.7102162615801964`*^9, 3.710216297408803*^9, 3.710216616732487*^9,
300 3.7107150954486666`*^9, 3.7107153880423737`*^9, 3.710715443363544*^9,
301 3.7107155940806684`*^9, 3.71071573823912*^9, 3.71071579843057*^9,
302 3.7107158842620807`*^9, 3.7107162283425035`*^9, 3.710716519727272*^9,
303 3.7107165994561405`*^9, 3.710716663968853*^9, 3.7107168694068875`*^9,
304 3.7107171894322653`*^9, 3.710717259218348*^9, 3.7107178300982428`*^9,
305 3.7107183368185787`*^9, 3.710718405072132*^9, 3.7107184442760944`*^9,
306 3.7107186156742115`*^9, 3.71071870349939*^9, 3.710718901383087*^9,
307 3.710758780719983*^9, 3.710759274796708*^9, 3.7107602241039953`*^9,
308 3.710761183648739*^9, 3.7107721404596467`*^9, 3.710772345852022*^9,
309 3.7107723913399715`*^9, 3.7107725980901165`*^9, 3.7107728935882206`*^9, {
310 3.7107730527436533`*^9, 3.710773072289486*^9}, 3.7107731487142096`*^9,
311 3.7107732600776386`*^9, 3.7107734057619085`*^9, 3.7107736075426583`*^9,
312 3.710773913148673*^9, 3.7107745504955244`*^9, 3.710776336119282*^9,
313 3.710778135430046*^9, 3.7107783240534663`*^9, 3.7108435590335393`*^9,
314 3.710845122724235*^9, 3.7113000910566015`*^9, 3.7113002192783732`*^9,
315 3.711300274885126*^9, 3.7113005157952747`*^9, 3.711301438380816*^9,
316 3.7113157574840555`*^9, 3.7113158497147255`*^9, 3.711316018167286*^9,
317 3.711320707325183*^9, 3.711328526808626*^9, 3.711328670260462*^9,
318 3.7113287042479687`*^9, 3.711329675469021*^9, 3.711367876368185*^9,
319 3.711367980719307*^9, 3.711368035135292*^9, 3.7113682080796504`*^9,
320 3.711368387410859*^9, 3.711377614700598*^9, 3.711377786895996*^9,
321 3.711378027425785*^9, 3.711378161589856*^9, 3.7113784560503283`*^9,
322 3.71137854042912*^9, 3.7113789250428705`*^9, 3.711379021903257*^9,
323 3.7113791577001605`*^9, 3.7113801345754347`*^9, 3.711380214154272*^9,
324 3.711380852509256*^9, 3.7113811854841204`*^9, 3.711381230824678*^9,
325 3.71138128928841*^9, 3.7113813933479986`*^9, 3.711382146828144*^9,
326 3.711382311654971*^9, 3.711410988717021*^9, 3.7114116845368824`*^9,
327 3.711422074532405*^9, 3.7114223360869427`*^9, 3.7114224579082313`*^9,
328 3.7114225927954445`*^9, 3.7114227388685703`*^9, 3.7114228547821307`*^9,
329 3.7114229172202444`*^9, 3.7114233570155144`*^9, 3.711423621198264*^9,
330 3.711423888214839*^9, 3.711470646092678*^9, 3.711470824375555*^9,
331 3.7114710693435965`*^9, 3.7117187482469654`*^9, 3.7117338716444683`*^9,
332 3.714779012659619*^9, 3.7277544174269915`*^9, 3.7277545442960863`*^9,
333 3.727834563903821*^9, 3.727834780320803*^9, 3.728801631553663*^9,
334 3.728817675542366*^9, 3.7288318501393943`*^9, 3.7288319301266727`*^9,
335 3.728832054008481*^9, 3.728832484388434*^9, 3.7288325373677316`*^9,
336 3.7288326124773965`*^9, 3.728832680504695*^9, 3.728832742057358*^9,
337 3.7288332181172967`*^9, 3.728833492390175*^9, 3.7288336100369325`*^9,
338 3.728833688506276*^9, 3.7288338683273053`*^9, 3.728834303149663*^9,
339 3.728834590043825*^9, 3.728834768828949*^9, 3.7288353806458983`*^9,
340 3.731392541654812*^9, 3.731635092618065*^9, 3.7316432606438*^9,
341 3.7316434082336216`*^9, 3.7342574559076395`*^9, 3.734257727930956*^9,
342 3.7342579708449965`*^9, 3.7342580881344748`*^9, 3.734258226696579*^9,
343 3.7452057440031114`*^9, 3.7452059880057755`*^9, 3.745206110296891*^9,
344 3.745206832644657*^9, 3.74521389893966*^9},
345 CellLabel->
346 "During evaluation of \
347In[2]:=",ExpressionUUID->"3ee1fead-5554-4e6e-996d-5f0f8c61ba2c"],
348
349Cell[BoxData["\<\"Please cite:\"\>"], "Print",
350 CellChangeTimes->{
351 3.7101047223702517`*^9, 3.7101048902589264`*^9, 3.7101740388074245`*^9,
352 3.7101820654994287`*^9, 3.7102134626589947`*^9, 3.7102139091276107`*^9,
353 3.710214016833184*^9, 3.7102145966069865`*^9, 3.7102151913028107`*^9,
354 3.7102154108430834`*^9, 3.710215507879747*^9, 3.710215757563178*^9,
355 3.7102162615801964`*^9, 3.710216297408803*^9, 3.710216616732487*^9,
356 3.7107150954486666`*^9, 3.7107153880423737`*^9, 3.710715443363544*^9,
357 3.7107155940806684`*^9, 3.71071573823912*^9, 3.71071579843057*^9,
358 3.7107158842620807`*^9, 3.7107162283425035`*^9, 3.710716519727272*^9,
359 3.7107165994561405`*^9, 3.710716663968853*^9, 3.7107168694068875`*^9,
360 3.7107171894322653`*^9, 3.710717259218348*^9, 3.7107178300982428`*^9,
361 3.7107183368185787`*^9, 3.710718405072132*^9, 3.7107184442760944`*^9,
362 3.7107186156742115`*^9, 3.71071870349939*^9, 3.710718901383087*^9,
363 3.710758780719983*^9, 3.710759274796708*^9, 3.7107602241039953`*^9,
364 3.710761183648739*^9, 3.7107721404596467`*^9, 3.710772345852022*^9,
365 3.7107723913399715`*^9, 3.7107725980901165`*^9, 3.7107728935882206`*^9, {
366 3.7107730527436533`*^9, 3.710773072289486*^9}, 3.7107731487142096`*^9,
367 3.7107732600776386`*^9, 3.7107734057619085`*^9, 3.7107736075426583`*^9,
368 3.710773913148673*^9, 3.7107745504955244`*^9, 3.710776336119282*^9,
369 3.710778135430046*^9, 3.7107783240534663`*^9, 3.7108435590335393`*^9,
370 3.710845122724235*^9, 3.7113000910566015`*^9, 3.7113002192783732`*^9,
371 3.711300274885126*^9, 3.7113005157952747`*^9, 3.711301438380816*^9,
372 3.7113157574840555`*^9, 3.7113158497147255`*^9, 3.711316018167286*^9,
373 3.711320707325183*^9, 3.711328526808626*^9, 3.711328670260462*^9,
374 3.7113287042479687`*^9, 3.711329675469021*^9, 3.711367876368185*^9,
375 3.711367980719307*^9, 3.711368035135292*^9, 3.7113682080796504`*^9,
376 3.711368387410859*^9, 3.711377614700598*^9, 3.711377786895996*^9,
377 3.711378027425785*^9, 3.711378161589856*^9, 3.7113784560503283`*^9,
378 3.71137854042912*^9, 3.7113789250428705`*^9, 3.711379021903257*^9,
379 3.7113791577001605`*^9, 3.7113801345754347`*^9, 3.711380214154272*^9,
380 3.711380852509256*^9, 3.7113811854841204`*^9, 3.711381230824678*^9,
381 3.71138128928841*^9, 3.7113813933479986`*^9, 3.711382146828144*^9,
382 3.711382311654971*^9, 3.711410988717021*^9, 3.7114116845368824`*^9,
383 3.711422074532405*^9, 3.7114223360869427`*^9, 3.7114224579082313`*^9,
384 3.7114225927954445`*^9, 3.7114227388685703`*^9, 3.7114228547821307`*^9,
385 3.7114229172202444`*^9, 3.7114233570155144`*^9, 3.711423621198264*^9,
386 3.711423888214839*^9, 3.711470646092678*^9, 3.711470824375555*^9,
387 3.7114710693435965`*^9, 3.7117187482469654`*^9, 3.7117338716444683`*^9,
388 3.714779012659619*^9, 3.7277544174269915`*^9, 3.7277545442960863`*^9,
389 3.727834563903821*^9, 3.727834780320803*^9, 3.728801631553663*^9,
390 3.728817675542366*^9, 3.7288318501393943`*^9, 3.7288319301266727`*^9,
391 3.728832054008481*^9, 3.728832484388434*^9, 3.7288325373677316`*^9,
392 3.7288326124773965`*^9, 3.728832680504695*^9, 3.728832742057358*^9,
393 3.7288332181172967`*^9, 3.728833492390175*^9, 3.7288336100369325`*^9,
394 3.728833688506276*^9, 3.7288338683273053`*^9, 3.728834303149663*^9,
395 3.728834590043825*^9, 3.728834768828949*^9, 3.7288353806458983`*^9,
396 3.731392541654812*^9, 3.731635092618065*^9, 3.7316432606438*^9,
397 3.7316434082336216`*^9, 3.7342574559076395`*^9, 3.734257727930956*^9,
398 3.7342579708449965`*^9, 3.7342580881344748`*^9, 3.734258226696579*^9,
399 3.7452057440031114`*^9, 3.7452059880057755`*^9, 3.745206110296891*^9,
400 3.745206832644657*^9, 3.74521389893966*^9},
401 CellLabel->
402 "During evaluation of \
403In[2]:=",ExpressionUUID->"5d8270a1-ac50-4e39-b6d5-a91604265303"],
404
405Cell[BoxData["\<\" - Comput.Phys.Commun.185:2250-2300,2014 \
406(arXiv:1310.1921);\"\>"], "Print",
407 CellChangeTimes->{
408 3.7101047223702517`*^9, 3.7101048902589264`*^9, 3.7101740388074245`*^9,
409 3.7101820654994287`*^9, 3.7102134626589947`*^9, 3.7102139091276107`*^9,
410 3.710214016833184*^9, 3.7102145966069865`*^9, 3.7102151913028107`*^9,
411 3.7102154108430834`*^9, 3.710215507879747*^9, 3.710215757563178*^9,
412 3.7102162615801964`*^9, 3.710216297408803*^9, 3.710216616732487*^9,
413 3.7107150954486666`*^9, 3.7107153880423737`*^9, 3.710715443363544*^9,
414 3.7107155940806684`*^9, 3.71071573823912*^9, 3.71071579843057*^9,
415 3.7107158842620807`*^9, 3.7107162283425035`*^9, 3.710716519727272*^9,
416 3.7107165994561405`*^9, 3.710716663968853*^9, 3.7107168694068875`*^9,
417 3.7107171894322653`*^9, 3.710717259218348*^9, 3.7107178300982428`*^9,
418 3.7107183368185787`*^9, 3.710718405072132*^9, 3.7107184442760944`*^9,
419 3.7107186156742115`*^9, 3.71071870349939*^9, 3.710718901383087*^9,
420 3.710758780719983*^9, 3.710759274796708*^9, 3.7107602241039953`*^9,
421 3.710761183648739*^9, 3.7107721404596467`*^9, 3.710772345852022*^9,
422 3.7107723913399715`*^9, 3.7107725980901165`*^9, 3.7107728935882206`*^9, {
423 3.7107730527436533`*^9, 3.710773072289486*^9}, 3.7107731487142096`*^9,
424 3.7107732600776386`*^9, 3.7107734057619085`*^9, 3.7107736075426583`*^9,
425 3.710773913148673*^9, 3.7107745504955244`*^9, 3.710776336119282*^9,
426 3.710778135430046*^9, 3.7107783240534663`*^9, 3.7108435590335393`*^9,
427 3.710845122724235*^9, 3.7113000910566015`*^9, 3.7113002192783732`*^9,
428 3.711300274885126*^9, 3.7113005157952747`*^9, 3.711301438380816*^9,
429 3.7113157574840555`*^9, 3.7113158497147255`*^9, 3.711316018167286*^9,
430 3.711320707325183*^9, 3.711328526808626*^9, 3.711328670260462*^9,
431 3.7113287042479687`*^9, 3.711329675469021*^9, 3.711367876368185*^9,
432 3.711367980719307*^9, 3.711368035135292*^9, 3.7113682080796504`*^9,
433 3.711368387410859*^9, 3.711377614700598*^9, 3.711377786895996*^9,
434 3.711378027425785*^9, 3.711378161589856*^9, 3.7113784560503283`*^9,
435 3.71137854042912*^9, 3.7113789250428705`*^9, 3.711379021903257*^9,
436 3.7113791577001605`*^9, 3.7113801345754347`*^9, 3.711380214154272*^9,
437 3.711380852509256*^9, 3.7113811854841204`*^9, 3.711381230824678*^9,
438 3.71138128928841*^9, 3.7113813933479986`*^9, 3.711382146828144*^9,
439 3.711382311654971*^9, 3.711410988717021*^9, 3.7114116845368824`*^9,
440 3.711422074532405*^9, 3.7114223360869427`*^9, 3.7114224579082313`*^9,
441 3.7114225927954445`*^9, 3.7114227388685703`*^9, 3.7114228547821307`*^9,
442 3.7114229172202444`*^9, 3.7114233570155144`*^9, 3.711423621198264*^9,
443 3.711423888214839*^9, 3.711470646092678*^9, 3.711470824375555*^9,
444 3.7114710693435965`*^9, 3.7117187482469654`*^9, 3.7117338716444683`*^9,
445 3.714779012659619*^9, 3.7277544174269915`*^9, 3.7277545442960863`*^9,
446 3.727834563903821*^9, 3.727834780320803*^9, 3.728801631553663*^9,
447 3.728817675542366*^9, 3.7288318501393943`*^9, 3.7288319301266727`*^9,
448 3.728832054008481*^9, 3.728832484388434*^9, 3.7288325373677316`*^9,
449 3.7288326124773965`*^9, 3.728832680504695*^9, 3.728832742057358*^9,
450 3.7288332181172967`*^9, 3.728833492390175*^9, 3.7288336100369325`*^9,
451 3.728833688506276*^9, 3.7288338683273053`*^9, 3.728834303149663*^9,
452 3.728834590043825*^9, 3.728834768828949*^9, 3.7288353806458983`*^9,
453 3.731392541654812*^9, 3.731635092618065*^9, 3.7316432606438*^9,
454 3.7316434082336216`*^9, 3.7342574559076395`*^9, 3.734257727930956*^9,
455 3.7342579708449965`*^9, 3.7342580881344748`*^9, 3.734258226696579*^9,
456 3.7452057440031114`*^9, 3.7452059880057755`*^9, 3.745206110296891*^9,
457 3.745206832644657*^9, 3.745213898955291*^9},
458 CellLabel->
459 "During evaluation of \
460In[2]:=",ExpressionUUID->"3a919dad-d3cb-498d-9db8-d740c52163f5"],
461
462Cell[BoxData["\<\" - Comput.Phys.Commun.180:1614-1641,2009 \
463(arXiv:0806.4194).\"\>"], "Print",
464 CellChangeTimes->{
465 3.7101047223702517`*^9, 3.7101048902589264`*^9, 3.7101740388074245`*^9,
466 3.7101820654994287`*^9, 3.7102134626589947`*^9, 3.7102139091276107`*^9,
467 3.710214016833184*^9, 3.7102145966069865`*^9, 3.7102151913028107`*^9,
468 3.7102154108430834`*^9, 3.710215507879747*^9, 3.710215757563178*^9,
469 3.7102162615801964`*^9, 3.710216297408803*^9, 3.710216616732487*^9,
470 3.7107150954486666`*^9, 3.7107153880423737`*^9, 3.710715443363544*^9,
471 3.7107155940806684`*^9, 3.71071573823912*^9, 3.71071579843057*^9,
472 3.7107158842620807`*^9, 3.7107162283425035`*^9, 3.710716519727272*^9,
473 3.7107165994561405`*^9, 3.710716663968853*^9, 3.7107168694068875`*^9,
474 3.7107171894322653`*^9, 3.710717259218348*^9, 3.7107178300982428`*^9,
475 3.7107183368185787`*^9, 3.710718405072132*^9, 3.7107184442760944`*^9,
476 3.7107186156742115`*^9, 3.71071870349939*^9, 3.710718901383087*^9,
477 3.710758780719983*^9, 3.710759274796708*^9, 3.7107602241039953`*^9,
478 3.710761183648739*^9, 3.7107721404596467`*^9, 3.710772345852022*^9,
479 3.7107723913399715`*^9, 3.7107725980901165`*^9, 3.7107728935882206`*^9, {
480 3.7107730527436533`*^9, 3.710773072289486*^9}, 3.7107731487142096`*^9,
481 3.7107732600776386`*^9, 3.7107734057619085`*^9, 3.7107736075426583`*^9,
482 3.710773913148673*^9, 3.7107745504955244`*^9, 3.710776336119282*^9,
483 3.710778135430046*^9, 3.7107783240534663`*^9, 3.7108435590335393`*^9,
484 3.710845122724235*^9, 3.7113000910566015`*^9, 3.7113002192783732`*^9,
485 3.711300274885126*^9, 3.7113005157952747`*^9, 3.711301438380816*^9,
486 3.7113157574840555`*^9, 3.7113158497147255`*^9, 3.711316018167286*^9,
487 3.711320707325183*^9, 3.711328526808626*^9, 3.711328670260462*^9,
488 3.7113287042479687`*^9, 3.711329675469021*^9, 3.711367876368185*^9,
489 3.711367980719307*^9, 3.711368035135292*^9, 3.7113682080796504`*^9,
490 3.711368387410859*^9, 3.711377614700598*^9, 3.711377786895996*^9,
491 3.711378027425785*^9, 3.711378161589856*^9, 3.7113784560503283`*^9,
492 3.71137854042912*^9, 3.7113789250428705`*^9, 3.711379021903257*^9,
493 3.7113791577001605`*^9, 3.7113801345754347`*^9, 3.711380214154272*^9,
494 3.711380852509256*^9, 3.7113811854841204`*^9, 3.711381230824678*^9,
495 3.71138128928841*^9, 3.7113813933479986`*^9, 3.711382146828144*^9,
496 3.711382311654971*^9, 3.711410988717021*^9, 3.7114116845368824`*^9,
497 3.711422074532405*^9, 3.7114223360869427`*^9, 3.7114224579082313`*^9,
498 3.7114225927954445`*^9, 3.7114227388685703`*^9, 3.7114228547821307`*^9,
499 3.7114229172202444`*^9, 3.7114233570155144`*^9, 3.711423621198264*^9,
500 3.711423888214839*^9, 3.711470646092678*^9, 3.711470824375555*^9,
501 3.7114710693435965`*^9, 3.7117187482469654`*^9, 3.7117338716444683`*^9,
502 3.714779012659619*^9, 3.7277544174269915`*^9, 3.7277545442960863`*^9,
503 3.727834563903821*^9, 3.727834780320803*^9, 3.728801631553663*^9,
504 3.728817675542366*^9, 3.7288318501393943`*^9, 3.7288319301266727`*^9,
505 3.728832054008481*^9, 3.728832484388434*^9, 3.7288325373677316`*^9,
506 3.7288326124773965`*^9, 3.728832680504695*^9, 3.728832742057358*^9,
507 3.7288332181172967`*^9, 3.728833492390175*^9, 3.7288336100369325`*^9,
508 3.728833688506276*^9, 3.7288338683273053`*^9, 3.728834303149663*^9,
509 3.728834590043825*^9, 3.728834768828949*^9, 3.7288353806458983`*^9,
510 3.731392541654812*^9, 3.731635092618065*^9, 3.7316432606438*^9,
511 3.7316434082336216`*^9, 3.7342574559076395`*^9, 3.734257727930956*^9,
512 3.7342579708449965`*^9, 3.7342580881344748`*^9, 3.734258226696579*^9,
513 3.7452057440031114`*^9, 3.7452059880057755`*^9, 3.745206110296891*^9,
514 3.745206832644657*^9, 3.7452138989578*^9},
515 CellLabel->
516 "During evaluation of \
517In[2]:=",ExpressionUUID->"9edc3f9c-4082-4b7b-ade8-66623645dd51"],
518
519Cell[BoxData["\<\" \"\>"], "Print",
520 CellChangeTimes->{
521 3.7101047223702517`*^9, 3.7101048902589264`*^9, 3.7101740388074245`*^9,
522 3.7101820654994287`*^9, 3.7102134626589947`*^9, 3.7102139091276107`*^9,
523 3.710214016833184*^9, 3.7102145966069865`*^9, 3.7102151913028107`*^9,
524 3.7102154108430834`*^9, 3.710215507879747*^9, 3.710215757563178*^9,
525 3.7102162615801964`*^9, 3.710216297408803*^9, 3.710216616732487*^9,
526 3.7107150954486666`*^9, 3.7107153880423737`*^9, 3.710715443363544*^9,
527 3.7107155940806684`*^9, 3.71071573823912*^9, 3.71071579843057*^9,
528 3.7107158842620807`*^9, 3.7107162283425035`*^9, 3.710716519727272*^9,
529 3.7107165994561405`*^9, 3.710716663968853*^9, 3.7107168694068875`*^9,
530 3.7107171894322653`*^9, 3.710717259218348*^9, 3.7107178300982428`*^9,
531 3.7107183368185787`*^9, 3.710718405072132*^9, 3.7107184442760944`*^9,
532 3.7107186156742115`*^9, 3.71071870349939*^9, 3.710718901383087*^9,
533 3.710758780719983*^9, 3.710759274796708*^9, 3.7107602241039953`*^9,
534 3.710761183648739*^9, 3.7107721404596467`*^9, 3.710772345852022*^9,
535 3.7107723913399715`*^9, 3.7107725980901165`*^9, 3.7107728935882206`*^9, {
536 3.7107730527436533`*^9, 3.710773072289486*^9}, 3.7107731487142096`*^9,
537 3.7107732600776386`*^9, 3.7107734057619085`*^9, 3.7107736075426583`*^9,
538 3.710773913148673*^9, 3.7107745504955244`*^9, 3.710776336119282*^9,
539 3.710778135430046*^9, 3.7107783240534663`*^9, 3.7108435590335393`*^9,
540 3.710845122724235*^9, 3.7113000910566015`*^9, 3.7113002192783732`*^9,
541 3.711300274885126*^9, 3.7113005157952747`*^9, 3.711301438380816*^9,
542 3.7113157574840555`*^9, 3.7113158497147255`*^9, 3.711316018167286*^9,
543 3.711320707325183*^9, 3.711328526808626*^9, 3.711328670260462*^9,
544 3.7113287042479687`*^9, 3.711329675469021*^9, 3.711367876368185*^9,
545 3.711367980719307*^9, 3.711368035135292*^9, 3.7113682080796504`*^9,
546 3.711368387410859*^9, 3.711377614700598*^9, 3.711377786895996*^9,
547 3.711378027425785*^9, 3.711378161589856*^9, 3.7113784560503283`*^9,
548 3.71137854042912*^9, 3.7113789250428705`*^9, 3.711379021903257*^9,
549 3.7113791577001605`*^9, 3.7113801345754347`*^9, 3.711380214154272*^9,
550 3.711380852509256*^9, 3.7113811854841204`*^9, 3.711381230824678*^9,
551 3.71138128928841*^9, 3.7113813933479986`*^9, 3.711382146828144*^9,
552 3.711382311654971*^9, 3.711410988717021*^9, 3.7114116845368824`*^9,
553 3.711422074532405*^9, 3.7114223360869427`*^9, 3.7114224579082313`*^9,
554 3.7114225927954445`*^9, 3.7114227388685703`*^9, 3.7114228547821307`*^9,
555 3.7114229172202444`*^9, 3.7114233570155144`*^9, 3.711423621198264*^9,
556 3.711423888214839*^9, 3.711470646092678*^9, 3.711470824375555*^9,
557 3.7114710693435965`*^9, 3.7117187482469654`*^9, 3.7117338716444683`*^9,
558 3.714779012659619*^9, 3.7277544174269915`*^9, 3.7277545442960863`*^9,
559 3.727834563903821*^9, 3.727834780320803*^9, 3.728801631553663*^9,
560 3.728817675542366*^9, 3.7288318501393943`*^9, 3.7288319301266727`*^9,
561 3.728832054008481*^9, 3.728832484388434*^9, 3.7288325373677316`*^9,
562 3.7288326124773965`*^9, 3.728832680504695*^9, 3.728832742057358*^9,
563 3.7288332181172967`*^9, 3.728833492390175*^9, 3.7288336100369325`*^9,
564 3.728833688506276*^9, 3.7288338683273053`*^9, 3.728834303149663*^9,
565 3.728834590043825*^9, 3.728834768828949*^9, 3.7288353806458983`*^9,
566 3.731392541654812*^9, 3.731635092618065*^9, 3.7316432606438*^9,
567 3.7316434082336216`*^9, 3.7342574559076395`*^9, 3.734257727930956*^9,
568 3.7342579708449965`*^9, 3.7342580881344748`*^9, 3.734258226696579*^9,
569 3.7452057440031114`*^9, 3.7452059880057755`*^9, 3.745206110296891*^9,
570 3.745206832644657*^9, 3.745213899020301*^9},
571 CellLabel->
572 "During evaluation of \
573In[2]:=",ExpressionUUID->"c7e969ad-d4d7-44c5-856c-4a4935d8d568"],
574
575Cell[BoxData["\<\"http://feynrules.phys.ucl.ac.be\"\>"], "Print",
576 CellChangeTimes->{
577 3.7101047223702517`*^9, 3.7101048902589264`*^9, 3.7101740388074245`*^9,
578 3.7101820654994287`*^9, 3.7102134626589947`*^9, 3.7102139091276107`*^9,
579 3.710214016833184*^9, 3.7102145966069865`*^9, 3.7102151913028107`*^9,
580 3.7102154108430834`*^9, 3.710215507879747*^9, 3.710215757563178*^9,
581 3.7102162615801964`*^9, 3.710216297408803*^9, 3.710216616732487*^9,
582 3.7107150954486666`*^9, 3.7107153880423737`*^9, 3.710715443363544*^9,
583 3.7107155940806684`*^9, 3.71071573823912*^9, 3.71071579843057*^9,
584 3.7107158842620807`*^9, 3.7107162283425035`*^9, 3.710716519727272*^9,
585 3.7107165994561405`*^9, 3.710716663968853*^9, 3.7107168694068875`*^9,
586 3.7107171894322653`*^9, 3.710717259218348*^9, 3.7107178300982428`*^9,
587 3.7107183368185787`*^9, 3.710718405072132*^9, 3.7107184442760944`*^9,
588 3.7107186156742115`*^9, 3.71071870349939*^9, 3.710718901383087*^9,
589 3.710758780719983*^9, 3.710759274796708*^9, 3.7107602241039953`*^9,
590 3.710761183648739*^9, 3.7107721404596467`*^9, 3.710772345852022*^9,
591 3.7107723913399715`*^9, 3.7107725980901165`*^9, 3.7107728935882206`*^9, {
592 3.7107730527436533`*^9, 3.710773072289486*^9}, 3.7107731487142096`*^9,
593 3.7107732600776386`*^9, 3.7107734057619085`*^9, 3.7107736075426583`*^9,
594 3.710773913148673*^9, 3.7107745504955244`*^9, 3.710776336119282*^9,
595 3.710778135430046*^9, 3.7107783240534663`*^9, 3.7108435590335393`*^9,
596 3.710845122724235*^9, 3.7113000910566015`*^9, 3.7113002192783732`*^9,
597 3.711300274885126*^9, 3.7113005157952747`*^9, 3.711301438380816*^9,
598 3.7113157574840555`*^9, 3.7113158497147255`*^9, 3.711316018167286*^9,
599 3.711320707325183*^9, 3.711328526808626*^9, 3.711328670260462*^9,
600 3.7113287042479687`*^9, 3.711329675469021*^9, 3.711367876368185*^9,
601 3.711367980719307*^9, 3.711368035135292*^9, 3.7113682080796504`*^9,
602 3.711368387410859*^9, 3.711377614700598*^9, 3.711377786895996*^9,
603 3.711378027425785*^9, 3.711378161589856*^9, 3.7113784560503283`*^9,
604 3.71137854042912*^9, 3.7113789250428705`*^9, 3.711379021903257*^9,
605 3.7113791577001605`*^9, 3.7113801345754347`*^9, 3.711380214154272*^9,
606 3.711380852509256*^9, 3.7113811854841204`*^9, 3.711381230824678*^9,
607 3.71138128928841*^9, 3.7113813933479986`*^9, 3.711382146828144*^9,
608 3.711382311654971*^9, 3.711410988717021*^9, 3.7114116845368824`*^9,
609 3.711422074532405*^9, 3.7114223360869427`*^9, 3.7114224579082313`*^9,
610 3.7114225927954445`*^9, 3.7114227388685703`*^9, 3.7114228547821307`*^9,
611 3.7114229172202444`*^9, 3.7114233570155144`*^9, 3.711423621198264*^9,
612 3.711423888214839*^9, 3.711470646092678*^9, 3.711470824375555*^9,
613 3.7114710693435965`*^9, 3.7117187482469654`*^9, 3.7117338716444683`*^9,
614 3.714779012659619*^9, 3.7277544174269915`*^9, 3.7277545442960863`*^9,
615 3.727834563903821*^9, 3.727834780320803*^9, 3.728801631553663*^9,
616 3.728817675542366*^9, 3.7288318501393943`*^9, 3.7288319301266727`*^9,
617 3.728832054008481*^9, 3.728832484388434*^9, 3.7288325373677316`*^9,
618 3.7288326124773965`*^9, 3.728832680504695*^9, 3.728832742057358*^9,
619 3.7288332181172967`*^9, 3.728833492390175*^9, 3.7288336100369325`*^9,
620 3.728833688506276*^9, 3.7288338683273053`*^9, 3.728834303149663*^9,
621 3.728834590043825*^9, 3.728834768828949*^9, 3.7288353806458983`*^9,
622 3.731392541654812*^9, 3.731635092618065*^9, 3.7316432606438*^9,
623 3.7316434082336216`*^9, 3.7342574559076395`*^9, 3.734257727930956*^9,
624 3.7342579708449965`*^9, 3.7342580881344748`*^9, 3.734258226696579*^9,
625 3.7452057440031114`*^9, 3.7452059880057755`*^9, 3.745206110296891*^9,
626 3.745206832644657*^9, 3.745213899020301*^9},
627 CellLabel->
628 "During evaluation of \
629In[2]:=",ExpressionUUID->"3215d37b-1ea4-4917-8ee4-7ae8d60fd052"],
630
631Cell[BoxData["\<\" \"\>"], "Print",
632 CellChangeTimes->{
633 3.7101047223702517`*^9, 3.7101048902589264`*^9, 3.7101740388074245`*^9,
634 3.7101820654994287`*^9, 3.7102134626589947`*^9, 3.7102139091276107`*^9,
635 3.710214016833184*^9, 3.7102145966069865`*^9, 3.7102151913028107`*^9,
636 3.7102154108430834`*^9, 3.710215507879747*^9, 3.710215757563178*^9,
637 3.7102162615801964`*^9, 3.710216297408803*^9, 3.710216616732487*^9,
638 3.7107150954486666`*^9, 3.7107153880423737`*^9, 3.710715443363544*^9,
639 3.7107155940806684`*^9, 3.71071573823912*^9, 3.71071579843057*^9,
640 3.7107158842620807`*^9, 3.7107162283425035`*^9, 3.710716519727272*^9,
641 3.7107165994561405`*^9, 3.710716663968853*^9, 3.7107168694068875`*^9,
642 3.7107171894322653`*^9, 3.710717259218348*^9, 3.7107178300982428`*^9,
643 3.7107183368185787`*^9, 3.710718405072132*^9, 3.7107184442760944`*^9,
644 3.7107186156742115`*^9, 3.71071870349939*^9, 3.710718901383087*^9,
645 3.710758780719983*^9, 3.710759274796708*^9, 3.7107602241039953`*^9,
646 3.710761183648739*^9, 3.7107721404596467`*^9, 3.710772345852022*^9,
647 3.7107723913399715`*^9, 3.7107725980901165`*^9, 3.7107728935882206`*^9, {
648 3.7107730527436533`*^9, 3.710773072289486*^9}, 3.7107731487142096`*^9,
649 3.7107732600776386`*^9, 3.7107734057619085`*^9, 3.7107736075426583`*^9,
650 3.710773913148673*^9, 3.7107745504955244`*^9, 3.710776336119282*^9,
651 3.710778135430046*^9, 3.7107783240534663`*^9, 3.7108435590335393`*^9,
652 3.710845122724235*^9, 3.7113000910566015`*^9, 3.7113002192783732`*^9,
653 3.711300274885126*^9, 3.7113005157952747`*^9, 3.711301438380816*^9,
654 3.7113157574840555`*^9, 3.7113158497147255`*^9, 3.711316018167286*^9,
655 3.711320707325183*^9, 3.711328526808626*^9, 3.711328670260462*^9,
656 3.7113287042479687`*^9, 3.711329675469021*^9, 3.711367876368185*^9,
657 3.711367980719307*^9, 3.711368035135292*^9, 3.7113682080796504`*^9,
658 3.711368387410859*^9, 3.711377614700598*^9, 3.711377786895996*^9,
659 3.711378027425785*^9, 3.711378161589856*^9, 3.7113784560503283`*^9,
660 3.71137854042912*^9, 3.7113789250428705`*^9, 3.711379021903257*^9,
661 3.7113791577001605`*^9, 3.7113801345754347`*^9, 3.711380214154272*^9,
662 3.711380852509256*^9, 3.7113811854841204`*^9, 3.711381230824678*^9,
663 3.71138128928841*^9, 3.7113813933479986`*^9, 3.711382146828144*^9,
664 3.711382311654971*^9, 3.711410988717021*^9, 3.7114116845368824`*^9,
665 3.711422074532405*^9, 3.7114223360869427`*^9, 3.7114224579082313`*^9,
666 3.7114225927954445`*^9, 3.7114227388685703`*^9, 3.7114228547821307`*^9,
667 3.7114229172202444`*^9, 3.7114233570155144`*^9, 3.711423621198264*^9,
668 3.711423888214839*^9, 3.711470646092678*^9, 3.711470824375555*^9,
669 3.7114710693435965`*^9, 3.7117187482469654`*^9, 3.7117338716444683`*^9,
670 3.714779012659619*^9, 3.7277544174269915`*^9, 3.7277545442960863`*^9,
671 3.727834563903821*^9, 3.727834780320803*^9, 3.728801631553663*^9,
672 3.728817675542366*^9, 3.7288318501393943`*^9, 3.7288319301266727`*^9,
673 3.728832054008481*^9, 3.728832484388434*^9, 3.7288325373677316`*^9,
674 3.7288326124773965`*^9, 3.728832680504695*^9, 3.728832742057358*^9,
675 3.7288332181172967`*^9, 3.728833492390175*^9, 3.7288336100369325`*^9,
676 3.728833688506276*^9, 3.7288338683273053`*^9, 3.728834303149663*^9,
677 3.728834590043825*^9, 3.728834768828949*^9, 3.7288353806458983`*^9,
678 3.731392541654812*^9, 3.731635092618065*^9, 3.7316432606438*^9,
679 3.7316434082336216`*^9, 3.7342574559076395`*^9, 3.734257727930956*^9,
680 3.7342579708449965`*^9, 3.7342580881344748`*^9, 3.734258226696579*^9,
681 3.7452057440031114`*^9, 3.7452059880057755`*^9, 3.745206110296891*^9,
682 3.745206832644657*^9, 3.745213899020301*^9},
683 CellLabel->
684 "During evaluation of \
685In[2]:=",ExpressionUUID->"6bd2e081-0001-470a-b726-a90d61a827af"],
686
687Cell[BoxData["\<\"The FeynRules palette can be opened using the command \
688FRPalette[].\"\>"], "Print",
689 CellChangeTimes->{
690 3.7101047223702517`*^9, 3.7101048902589264`*^9, 3.7101740388074245`*^9,
691 3.7101820654994287`*^9, 3.7102134626589947`*^9, 3.7102139091276107`*^9,
692 3.710214016833184*^9, 3.7102145966069865`*^9, 3.7102151913028107`*^9,
693 3.7102154108430834`*^9, 3.710215507879747*^9, 3.710215757563178*^9,
694 3.7102162615801964`*^9, 3.710216297408803*^9, 3.710216616732487*^9,
695 3.7107150954486666`*^9, 3.7107153880423737`*^9, 3.710715443363544*^9,
696 3.7107155940806684`*^9, 3.71071573823912*^9, 3.71071579843057*^9,
697 3.7107158842620807`*^9, 3.7107162283425035`*^9, 3.710716519727272*^9,
698 3.7107165994561405`*^9, 3.710716663968853*^9, 3.7107168694068875`*^9,
699 3.7107171894322653`*^9, 3.710717259218348*^9, 3.7107178300982428`*^9,
700 3.7107183368185787`*^9, 3.710718405072132*^9, 3.7107184442760944`*^9,
701 3.7107186156742115`*^9, 3.71071870349939*^9, 3.710718901383087*^9,
702 3.710758780719983*^9, 3.710759274796708*^9, 3.7107602241039953`*^9,
703 3.710761183648739*^9, 3.7107721404596467`*^9, 3.710772345852022*^9,
704 3.7107723913399715`*^9, 3.7107725980901165`*^9, 3.7107728935882206`*^9, {
705 3.7107730527436533`*^9, 3.710773072289486*^9}, 3.7107731487142096`*^9,
706 3.7107732600776386`*^9, 3.7107734057619085`*^9, 3.7107736075426583`*^9,
707 3.710773913148673*^9, 3.7107745504955244`*^9, 3.710776336119282*^9,
708 3.710778135430046*^9, 3.7107783240534663`*^9, 3.7108435590335393`*^9,
709 3.710845122724235*^9, 3.7113000910566015`*^9, 3.7113002192783732`*^9,
710 3.711300274885126*^9, 3.7113005157952747`*^9, 3.711301438380816*^9,
711 3.7113157574840555`*^9, 3.7113158497147255`*^9, 3.711316018167286*^9,
712 3.711320707325183*^9, 3.711328526808626*^9, 3.711328670260462*^9,
713 3.7113287042479687`*^9, 3.711329675469021*^9, 3.711367876368185*^9,
714 3.711367980719307*^9, 3.711368035135292*^9, 3.7113682080796504`*^9,
715 3.711368387410859*^9, 3.711377614700598*^9, 3.711377786895996*^9,
716 3.711378027425785*^9, 3.711378161589856*^9, 3.7113784560503283`*^9,
717 3.71137854042912*^9, 3.7113789250428705`*^9, 3.711379021903257*^9,
718 3.7113791577001605`*^9, 3.7113801345754347`*^9, 3.711380214154272*^9,
719 3.711380852509256*^9, 3.7113811854841204`*^9, 3.711381230824678*^9,
720 3.71138128928841*^9, 3.7113813933479986`*^9, 3.711382146828144*^9,
721 3.711382311654971*^9, 3.711410988717021*^9, 3.7114116845368824`*^9,
722 3.711422074532405*^9, 3.7114223360869427`*^9, 3.7114224579082313`*^9,
723 3.7114225927954445`*^9, 3.7114227388685703`*^9, 3.7114228547821307`*^9,
724 3.7114229172202444`*^9, 3.7114233570155144`*^9, 3.711423621198264*^9,
725 3.711423888214839*^9, 3.711470646092678*^9, 3.711470824375555*^9,
726 3.7114710693435965`*^9, 3.7117187482469654`*^9, 3.7117338716444683`*^9,
727 3.714779012659619*^9, 3.7277544174269915`*^9, 3.7277545442960863`*^9,
728 3.727834563903821*^9, 3.727834780320803*^9, 3.728801631553663*^9,
729 3.728817675542366*^9, 3.7288318501393943`*^9, 3.7288319301266727`*^9,
730 3.728832054008481*^9, 3.728832484388434*^9, 3.7288325373677316`*^9,
731 3.7288326124773965`*^9, 3.728832680504695*^9, 3.728832742057358*^9,
732 3.7288332181172967`*^9, 3.728833492390175*^9, 3.7288336100369325`*^9,
733 3.728833688506276*^9, 3.7288338683273053`*^9, 3.728834303149663*^9,
734 3.728834590043825*^9, 3.728834768828949*^9, 3.7288353806458983`*^9,
735 3.731392541654812*^9, 3.731635092618065*^9, 3.7316432606438*^9,
736 3.7316434082336216`*^9, 3.7342574559076395`*^9, 3.734257727930956*^9,
737 3.7342579708449965`*^9, 3.7342580881344748`*^9, 3.734258226696579*^9,
738 3.7452057440031114`*^9, 3.7452059880057755`*^9, 3.745206110296891*^9,
739 3.745206832644657*^9, 3.745213899020301*^9},
740 CellLabel->
741 "During evaluation of \
742In[2]:=",ExpressionUUID->"41affcc9-c221-4d6a-b22e-355e4978f954"]
743}, Open ]]
744}, Open ]]
745}, Open ]],
746
747Cell[CellGroupData[{
748
749Cell["The Leptoquark Model", "Title",
750 CellChangeTimes->{{3.7096075210997148`*^9,
751 3.7096075284782085`*^9}},ExpressionUUID->"f94cc9ed-8330-40b3-be25-\
752b202d3edd878"],
753
754Cell[CellGroupData[{
755
756Cell["Load Model", "Section",
757 CellChangeTimes->{{3.7107178481081667`*^9,
758 3.7107178587195625`*^9}},ExpressionUUID->"3c0a92d1-e1ed-45c6-9b66-\
7596871fb2e8bb2"],
760
761Cell[CellGroupData[{
762
763Cell[BoxData[
764 RowBox[{"SetDirectory", "[",
765 RowBox[{"$FeynRulesPath", "<>", "\"\</Models/LeptoQuark/1.5TeVLQ\>\""}],
766 "]"}]], "Input",
767 CellChangeTimes->{{3.419073170860696*^9, 3.419073182827229*^9},
768 3.709001016568925*^9, {3.7096080278578*^9, 3.7096080358659167`*^9}, {
769 3.734257662039132*^9, 3.7342576698115473`*^9}, {3.745206045962655*^9,
770 3.7452060464064007`*^9}},
771 CellLabel->"In[3]:=",ExpressionUUID->"7ac78549-10ee-41be-9b70-ecfcb38ff72a"],
772
773Cell[BoxData["\<\"C:\\\\Users\\\\Joyroy15\\\\Desktop\\\\Research\\\\Research \
774with Yu\\\\Leptoquark_Models\\\\feynrules-current\\\\Models\\\\LeptoQuark\\\\\
7751.5TeVLQ\"\>"], "Output",
776 CellChangeTimes->{3.7452057774561014`*^9, 3.7452059397003827`*^9,
777 3.7452059996411285`*^9, 3.7452060488200417`*^9, 3.7452060831973767`*^9,
778 3.7452061283485727`*^9, 3.7452068414974327`*^9, 3.7452139296716375`*^9},
779 CellLabel->"Out[3]=",ExpressionUUID->"06781cf3-fffb-4f4c-875d-56621aea5985"]
780}, Open ]],
781
782Cell[CellGroupData[{
783
784Cell[BoxData[
785 RowBox[{"LoadModel", "[",
786 RowBox[{"\"\<SM.fr\>\"", ",", "\"\<1.5TeVLQModel.fr\>\""}], "]"}]], "Input",
787 CellChangeTimes->{{3.4022069973481913`*^9, 3.402207011768662*^9},
788 3.4022081212072697`*^9, {3.402208250379383*^9, 3.402208254043104*^9},
789 3.4027466057480917`*^9, {3.403240270135737*^9, 3.403240277228945*^9},
790 3.403266503388291*^9, {3.403267649630335*^9, 3.40326765417397*^9}, {
791 3.403269919787421*^9, 3.403269921965273*^9}, {3.403347551273425*^9,
792 3.403347555049163*^9}, 3.4044490490588417`*^9, {3.411744339876704*^9,
793 3.411744340012457*^9}, {3.4121886924550533`*^9, 3.412188699157571*^9},
794 3.412188808811866*^9, 3.4121888580521603`*^9, {3.412450464077868*^9,
795 3.412450464378695*^9}, {3.413715097460478*^9, 3.41371509757642*^9}, {
796 3.41440825334604*^9, 3.414408254159686*^9}, {3.41862573831756*^9,
797 3.4186257392223186`*^9}, {3.4190731862389174`*^9, 3.419073187003003*^9}, {
798 3.419073336802393*^9, 3.4190733374513063`*^9}, {3.4190828041801767`*^9,
799 3.4190828048079023`*^9}, 3.542453089813714*^9, 3.547534567644828*^9, {
800 3.7096076691299367`*^9, 3.709607672055648*^9}, {3.709911299201873*^9,
801 3.7099113058929944`*^9}, 3.7342571106785393`*^9, 3.734257325986532*^9, {
802 3.7452054843029385`*^9, 3.7452054851355467`*^9}},
803 CellLabel->"In[4]:=",ExpressionUUID->"842fe880-943f-4306-8db4-ba8ac672cdf8"],
804
805Cell[CellGroupData[{
806
807Cell[BoxData["\<\"Merging model-files...\"\>"], "Print",
808 CellChangeTimes->{3.734257478863845*^9, 3.7342577350649037`*^9,
809 3.734258093109705*^9, 3.734258230623472*^9, 3.745205830748646*^9,
810 3.7452059454191127`*^9, 3.7452060044104004`*^9, 3.7452060608861265`*^9,
811 3.74520610002676*^9, 3.745206131703656*^9, 3.745206842446583*^9,
812 3.7452139456924653`*^9},
813 CellLabel->
814 "During evaluation of \
815In[4]:=",ExpressionUUID->"07a776cb-8e3a-40b2-aa81-5d7c7254f6b7"],
816
817Cell[BoxData["\<\"This model implementation was created by\"\>"], "Print",
818 CellChangeTimes->{3.734257478863845*^9, 3.7342577350649037`*^9,
819 3.734258093109705*^9, 3.734258230623472*^9, 3.745205830748646*^9,
820 3.7452059454191127`*^9, 3.7452060044104004`*^9, 3.7452060608861265`*^9,
821 3.74520610002676*^9, 3.745206131703656*^9, 3.745206842446583*^9,
822 3.7452139456924653`*^9},
823 CellLabel->
824 "During evaluation of \
825In[4]:=",ExpressionUUID->"718ac68f-0394-41f2-83a7-3cd96d55e84e"],
826
827Cell[BoxData["\<\"J. Roy\"\>"], "Print",
828 CellChangeTimes->{3.734257478863845*^9, 3.7342577350649037`*^9,
829 3.734258093109705*^9, 3.734258230623472*^9, 3.745205830748646*^9,
830 3.7452059454191127`*^9, 3.7452060044104004`*^9, 3.7452060608861265`*^9,
831 3.74520610002676*^9, 3.745206131703656*^9, 3.745206842446583*^9,
832 3.7452139457080927`*^9},
833 CellLabel->
834 "During evaluation of \
835In[4]:=",ExpressionUUID->"1a2d2f3a-2bb3-42fd-9de1-9fa3a094a573"],
836
837Cell[BoxData[
838 InterpretationBox[
839 RowBox[{"\<\"Model Version: \"\>", "\[InvisibleSpace]", "\<\"1.0\"\>"}],
840 SequenceForm["Model Version: ", "1.0"],
841 Editable->False]], "Print",
842 CellChangeTimes->{3.734257478863845*^9, 3.7342577350649037`*^9,
843 3.734258093109705*^9, 3.734258230623472*^9, 3.745205830748646*^9,
844 3.7452059454191127`*^9, 3.7452060044104004`*^9, 3.7452060608861265`*^9,
845 3.74520610002676*^9, 3.745206131703656*^9, 3.745206842446583*^9,
846 3.7452139457080927`*^9},
847 CellLabel->
848 "During evaluation of \
849In[4]:=",ExpressionUUID->"03b3ffa4-fc87-469c-bd77-8f2830e12c7e"],
850
851Cell[BoxData["\<\"For more information, type ModelInformation[].\"\>"], \
852"Print",
853 CellChangeTimes->{3.734257478863845*^9, 3.7342577350649037`*^9,
854 3.734258093109705*^9, 3.734258230623472*^9, 3.745205830748646*^9,
855 3.7452059454191127`*^9, 3.7452060044104004`*^9, 3.7452060608861265`*^9,
856 3.74520610002676*^9, 3.745206131703656*^9, 3.745206842446583*^9,
857 3.7452139457080927`*^9},
858 CellLabel->
859 "During evaluation of \
860In[4]:=",ExpressionUUID->"45ac5026-319c-4c26-9791-6b9c339ca6ed"],
861
862Cell[BoxData["\<\"\"\>"], "Print",
863 CellChangeTimes->{3.734257478863845*^9, 3.7342577350649037`*^9,
864 3.734258093109705*^9, 3.734258230623472*^9, 3.745205830748646*^9,
865 3.7452059454191127`*^9, 3.7452060044104004`*^9, 3.7452060608861265`*^9,
866 3.74520610002676*^9, 3.745206131703656*^9, 3.745206842446583*^9,
867 3.7452139457080927`*^9},
868 CellLabel->
869 "During evaluation of \
870In[4]:=",ExpressionUUID->"de7fc3b9-603e-4ba9-90eb-e27f4f41699e"],
871
872Cell[BoxData["\<\" - Loading particle classes.\"\>"], "Print",
873 CellChangeTimes->{3.734257478863845*^9, 3.7342577350649037`*^9,
874 3.734258093109705*^9, 3.734258230623472*^9, 3.745205830748646*^9,
875 3.7452059454191127`*^9, 3.7452060044104004`*^9, 3.7452060608861265`*^9,
876 3.74520610002676*^9, 3.745206131703656*^9, 3.745206842446583*^9,
877 3.7452139457080927`*^9},
878 CellLabel->
879 "During evaluation of \
880In[4]:=",ExpressionUUID->"bb66fac0-327b-4686-b475-34edf56b7065"],
881
882Cell[BoxData["\<\" - Loading gauge group classes.\"\>"], "Print",
883 CellChangeTimes->{3.734257478863845*^9, 3.7342577350649037`*^9,
884 3.734258093109705*^9, 3.734258230623472*^9, 3.745205830748646*^9,
885 3.7452059454191127`*^9, 3.7452060044104004`*^9, 3.7452060608861265`*^9,
886 3.74520610002676*^9, 3.745206131703656*^9, 3.745206842446583*^9,
887 3.7452139458396473`*^9},
888 CellLabel->
889 "During evaluation of \
890In[4]:=",ExpressionUUID->"3aae46c1-fa3a-47b0-b4e4-b9ac98a4946e"],
891
892Cell[BoxData["\<\" - Loading parameter classes.\"\>"], "Print",
893 CellChangeTimes->{3.734257478863845*^9, 3.7342577350649037`*^9,
894 3.734258093109705*^9, 3.734258230623472*^9, 3.745205830748646*^9,
895 3.7452059454191127`*^9, 3.7452060044104004`*^9, 3.7452060608861265`*^9,
896 3.74520610002676*^9, 3.745206131703656*^9, 3.745206842446583*^9,
897 3.745213945861763*^9},
898 CellLabel->
899 "During evaluation of \
900In[4]:=",ExpressionUUID->"e00e11e7-25ee-438f-a54f-06e3996063ab"],
901
902Cell[BoxData[
903 InterpretationBox[
904 RowBox[{"\<\"\\nModel \"\>",
905 "\[InvisibleSpace]", "\<\"1.5 TeV Leptoquark Model\"\>",
906 "\[InvisibleSpace]", "\<\" loaded.\"\>"}],
907 SequenceForm["\nModel ", "1.5 TeV Leptoquark Model", " loaded."],
908 Editable->False]], "Print",
909 CellChangeTimes->{3.734257478863845*^9, 3.7342577350649037`*^9,
910 3.734258093109705*^9, 3.734258230623472*^9, 3.745205830748646*^9,
911 3.7452059454191127`*^9, 3.7452060044104004`*^9, 3.7452060608861265`*^9,
912 3.74520610002676*^9, 3.745206131703656*^9, 3.745206842446583*^9,
913 3.7452139460245314`*^9},
914 CellLabel->
915 "During evaluation of \
916In[4]:=",ExpressionUUID->"40a02ad9-d682-43d3-a27f-976c1a5d2a54"]
917}, Open ]]
918}, Open ]]
919}, Open ]],
920
921Cell[CellGroupData[{
922
923Cell["Additional Feynman rules", "Section",
924 CellChangeTimes->{{3.518892294504589*^9, 3.518892300256538*^9}, {
925 3.710176124355085*^9,
926 3.710176147375454*^9}},ExpressionUUID->"218e265c-8c3e-40d4-a7ce-\
92705631f9cbbdf"],
928
929Cell[CellGroupData[{
930
931Cell[BoxData["LLQ"], "Input",
932 CellChangeTimes->{{3.7099543760288477`*^9, 3.7099543797053165`*^9}},
933 CellLabel->"In[5]:=",ExpressionUUID->"dcc62cca-dcd0-4b6f-9c02-f038d40a4127"],
934
935Cell[BoxData[
936 RowBox[{
937 RowBox[{
938 SubscriptBox[
939 SubscriptBox["C", "LQ"],
940 RowBox[{"ff1", ",", "ff2"}]], ".",
941 RowBox[{"(",
942 RowBox[{
943 RowBox[{
944 RowBox[{
945 SubscriptBox[
946 OverscriptBox["dq", "\<\"-\"\>"],
947 RowBox[{"sp1", ",", "ff1", ",", "aa"}]], ".",
948 SubscriptBox["l",
949 RowBox[{"sp2", ",", "ff2"}]]}], " ",
950 SubscriptBox[
951 RowBox[{
952 TemplateBox[{"\[Gamma]","mu"},
953 "Superscript"], ".",
954 SubscriptBox["P", "\<\"-\"\>"]}],
955 RowBox[{"sp1", ",", "sp2"}]]}], "+",
956 RowBox[{
957 RowBox[{
958 SubscriptBox[
959 OverscriptBox["uq", "\<\"-\"\>"],
960 RowBox[{"sp1", ",", "ff1", ",", "aa"}]], ".",
961 SubscriptBox["vl",
962 RowBox[{"sp2", ",", "ff2"}]]}], " ",
963 SubscriptBox[
964 RowBox[{
965 TemplateBox[{"\[Gamma]","mu"},
966 "Superscript"], ".",
967 SubscriptBox["P", "\<\"-\"\>"]}],
968 RowBox[{"sp1", ",", "sp2"}]]}]}], ")"}], ".",
969 SubscriptBox["LtQk",
970 RowBox[{"mu", ",", "aa"}]]}], "+",
971 RowBox[{
972 SubsuperscriptBox["LtQk",
973 RowBox[{"mu", ",", "aa"}], "\[Dagger]"], ".",
974 RowBox[{"(",
975 RowBox[{
976 RowBox[{
977 RowBox[{
978 SubscriptBox[
979 OverscriptBox["l", "\<\"-\"\>"],
980 RowBox[{"r$3421", ",", "ff2"}]], ".",
981 SubscriptBox["dq",
982 RowBox[{"r$3422", ",", "ff1", ",", "aa"}]]}], " ",
983 SubscriptBox[
984 RowBox[{
985 TemplateBox[{"\[Gamma]","mu"},
986 "Superscript"], ".",
987 SubscriptBox["P", "\<\"-\"\>"]}],
988 RowBox[{"r$3421", ",", "r$3422"}]]}], "+",
989 RowBox[{
990 RowBox[{
991 SubscriptBox[
992 OverscriptBox["vl", "\<\"-\"\>"],
993 RowBox[{"r$3423", ",", "ff2"}]], ".",
994 SubscriptBox["uq",
995 RowBox[{"r$3424", ",", "ff1", ",", "aa"}]]}], " ",
996 SubscriptBox[
997 RowBox[{
998 TemplateBox[{"\[Gamma]","mu"},
999 "Superscript"], ".",
1000 SubscriptBox["P", "\<\"-\"\>"]}],
1001 RowBox[{"r$3423", ",", "r$3424"}]]}]}], ")"}], ".",
1002 SubscriptBox[
1003 SubscriptBox["C", "LQ"],
1004 RowBox[{"ff1", ",", "ff2"}]]}]}]], "Output",
1005 CellChangeTimes->{
1006 3.7099543822972746`*^9, 3.710000124694659*^9, 3.710018108452047*^9,
1007 3.7100194536518025`*^9, 3.710104582601265*^9, 3.710104675639188*^9,
1008 3.710104905317482*^9, {3.7101740756467285`*^9, 3.710174089078467*^9},
1009 3.7101820747599745`*^9, {3.7101821093412466`*^9, 3.7101821169518633`*^9},
1010 3.7102134810606318`*^9, 3.7102135203531127`*^9, 3.7102140420054126`*^9,
1011 3.710214660490622*^9, 3.710215214152623*^9, 3.710215435459756*^9,
1012 3.7102155300456705`*^9, 3.710216345027583*^9, 3.7102166603108025`*^9,
1013 3.7107158242274294`*^9, 3.710715898199094*^9, 3.7107162422972555`*^9,
1014 3.710716532422307*^9, 3.710716674799245*^9, 3.710716888103088*^9,
1015 3.7107172017746305`*^9, 3.7107172718036566`*^9, 3.7107178759998293`*^9,
1016 3.710718347948429*^9, 3.7107184563015594`*^9, 3.710718623582868*^9,
1017 3.710718714500655*^9, 3.710718911843858*^9, 3.7107588016980352`*^9,
1018 3.7107592872840824`*^9, 3.7107602366505904`*^9, 3.710761191859598*^9,
1019 3.710772159279621*^9, 3.7107726079463205`*^9, 3.7107729035258055`*^9,
1020 3.710773079887212*^9, 3.7107731619999013`*^9, 3.7107732685709457`*^9,
1021 3.7107734168774776`*^9, 3.7107736276519313`*^9, 3.7107739272265453`*^9,
1022 3.710774560810104*^9, 3.7107763452014513`*^9, 3.7107781497053823`*^9,
1023 3.7107783547988863`*^9, 3.710843578530382*^9, 3.7108451392370267`*^9,
1024 3.7113002384617214`*^9, 3.711300286282915*^9, 3.7113005284516373`*^9,
1025 3.711301476788836*^9, 3.711315932256013*^9, 3.7113287133868694`*^9,
1026 3.7113296908101377`*^9, 3.711368221558215*^9, 3.7113778025921965`*^9,
1027 3.7113801447052307`*^9, 3.7113802217925625`*^9, 3.711381210325421*^9,
1028 3.7114229324796133`*^9, 3.711423903524974*^9, 3.7117187685716248`*^9,
1029 3.711733908484167*^9, 3.714779038049245*^9, 3.7277545615837145`*^9,
1030 3.7278345855529275`*^9, 3.7278347987660885`*^9, 3.728801650885491*^9,
1031 3.7288176989812016`*^9, 3.728835385106996*^9, 3.731392575043318*^9,
1032 3.731635120607944*^9, 3.7316432706789255`*^9, 3.7316434934671974`*^9,
1033 3.7342574873746734`*^9, 3.734257740425616*^9, {3.7342579760006638`*^9,
1034 3.7342579990034637`*^9}, 3.73425809871819*^9, 3.7342582312164774`*^9,
1035 3.7342582999898114`*^9, 3.745206145399847*^9, 3.7452068430325823`*^9,
1036 3.745213300205385*^9, 3.745213946178269*^9},
1037 CellLabel->"Out[5]=",ExpressionUUID->"0e66b283-1b56-45e8-aa93-5104d097628b"]
1038}, Open ]],
1039
1040Cell[CellGroupData[{
1041
1042Cell[BoxData["LLQqcd"], "Input",
1043 CellChangeTimes->{3.711733933162474*^9, 3.7277545663458595`*^9},
1044 CellLabel->"In[6]:=",ExpressionUUID->"5ae8bf37-7631-4622-84bc-8a13fb413d39"],
1045
1046Cell[BoxData[
1047 RowBox[{
1048 RowBox[{
1049 SuperscriptBox["MLQ", "2"], " ",
1050 RowBox[{
1051 SubsuperscriptBox["LtQk",
1052 RowBox[{"mu", ",", "aa"}], "\[Dagger]"], ".",
1053 SubscriptBox["LtQk",
1054 RowBox[{"mu", ",", "aa"}]]}]}], "-",
1055 RowBox[{"\[ImaginaryI]", " ",
1056 SubscriptBox["g", "s"], " ",
1057 RowBox[{
1058 SubsuperscriptBox["LtQk",
1059 RowBox[{"mu", ",", "cc1"}], "\[Dagger]"], ".",
1060 RowBox[{"(",
1061 RowBox[{
1062 RowBox[{"-",
1063 RowBox[{
1064 SubscriptBox["\<\"\[PartialD]\"\>", "nu"], "[",
1065 SubscriptBox["G",
1066 RowBox[{"mu", ",", "aa"}]], "]"}]}], "+",
1067 RowBox[{
1068 SubscriptBox["\<\"\[PartialD]\"\>", "mu"], "[",
1069 SubscriptBox["G",
1070 RowBox[{"nu", ",", "aa"}]], "]"}], "+",
1071 RowBox[{
1072 SubscriptBox["g", "s"], " ",
1073 SubscriptBox["f",
1074 RowBox[{"aa", ",", "bb$3430", ",", "cc$3430"}]], " ",
1075 SubscriptBox["G",
1076 RowBox[{"mu", ",", "bb$3430"}]], " ",
1077 SubscriptBox["G",
1078 RowBox[{"nu", ",", "cc$3430"}]]}]}], ")"}], ".",
1079 SubsuperscriptBox["T",
1080 RowBox[{"cc1", ",", "cc2"}], "aa"], ".",
1081 SubscriptBox["LtQk",
1082 RowBox[{"nu", ",", "cc2"}]]}]}], "+",
1083 RowBox[{
1084 FractionBox["1", "2"], " ",
1085 RowBox[{"(",
1086 RowBox[{
1087 RowBox[{"-",
1088 RowBox[{
1089 SubscriptBox["\<\"\[PartialD]\"\>", "nu"], "[",
1090 SubsuperscriptBox["LtQk",
1091 RowBox[{"mu", ",", "aa"}], "\[Dagger]"], "]"}]}], "+",
1092 RowBox[{
1093 SubscriptBox["\<\"\[PartialD]\"\>", "mu"], "[",
1094 SubsuperscriptBox["LtQk",
1095 RowBox[{"nu", ",", "aa"}], "\[Dagger]"], "]"}], "+",
1096 RowBox[{"\[ImaginaryI]", " ",
1097 SubscriptBox["g", "s"], " ",
1098 SubscriptBox["G",
1099 RowBox[{"mu", ",", "a$3426"}]], " ",
1100 SubsuperscriptBox["LtQk",
1101 RowBox[{"nu", ",", "i$3426"}], "\[Dagger]"], " ",
1102 SubsuperscriptBox["T",
1103 RowBox[{"i$3426", ",", "aa"}], "a$3426"]}], "-",
1104 RowBox[{"\[ImaginaryI]", " ",
1105 SubscriptBox["g", "s"], " ",
1106 SubscriptBox["G",
1107 RowBox[{"nu", ",", "a$3427"}]], " ",
1108 SubsuperscriptBox["LtQk",
1109 RowBox[{"mu", ",", "i$3427"}], "\[Dagger]"], " ",
1110 SubsuperscriptBox["T",
1111 RowBox[{"i$3427", ",", "aa"}], "a$3427"]}]}], ")"}], " ",
1112 RowBox[{"(",
1113 RowBox[{
1114 RowBox[{"-",
1115 RowBox[{
1116 SubscriptBox["\<\"\[PartialD]\"\>", "nu"], "[",
1117 SubscriptBox["LtQk",
1118 RowBox[{"mu", ",", "aa"}]], "]"}]}], "+",
1119 RowBox[{
1120 SubscriptBox["\<\"\[PartialD]\"\>", "mu"], "[",
1121 SubscriptBox["LtQk",
1122 RowBox[{"nu", ",", "aa"}]], "]"}], "-",
1123 RowBox[{"\[ImaginaryI]", " ",
1124 SubscriptBox["g", "s"], " ",
1125 SubscriptBox["G",
1126 RowBox[{"mu", ",", "a$3428"}]], " ",
1127 SubscriptBox["LtQk",
1128 RowBox[{"nu", ",", "i$3428"}]], " ",
1129 SubsuperscriptBox["T",
1130 RowBox[{"aa", ",", "i$3428"}], "a$3428"]}], "+",
1131 RowBox[{"\[ImaginaryI]", " ",
1132 SubscriptBox["g", "s"], " ",
1133 SubscriptBox["G",
1134 RowBox[{"nu", ",", "a$3429"}]], " ",
1135 SubscriptBox["LtQk",
1136 RowBox[{"mu", ",", "i$3429"}]], " ",
1137 SubsuperscriptBox["T",
1138 RowBox[{"aa", ",", "i$3429"}], "a$3429"]}]}], ")"}]}]}]], "Output",
1139 CellChangeTimes->{{3.7288326935566297`*^9, 3.7288327072716684`*^9},
1140 3.728832750905893*^9, 3.728833229634508*^9, 3.7288335072354107`*^9,
1141 3.7288336953233695`*^9, 3.728833879361171*^9, 3.7288343109499145`*^9,
1142 3.728834600899084*^9, 3.7288347979858775`*^9, 3.7288353851320167`*^9,
1143 3.731635120686998*^9, 3.731643270816023*^9, 3.7316434936142983`*^9,
1144 3.734257487498803*^9, 3.7342577405537167`*^9, 3.734257976032915*^9,
1145 3.734258098950385*^9, 3.7342582312656*^9, 3.7342583000317*^9,
1146 3.74520614553675*^9, 3.7452068430703354`*^9, 3.745213310749683*^9,
1147 3.745213946209465*^9},
1148 CellLabel->"Out[6]=",ExpressionUUID->"00d55f52-8bf3-4702-a430-52cb964d10e8"]
1149}, Open ]],
1150
1151Cell[CellGroupData[{
1152
1153Cell[BoxData[
1154 RowBox[{"Expand", "[", "LLQqcd", "]"}]], "Input",
1155 CellChangeTimes->{{3.711300288388316*^9, 3.7113002926393137`*^9}, {
1156 3.711367903561936*^9, 3.7113679100687*^9}, {3.711377809318362*^9,
1157 3.7113778119448533`*^9}, {3.711411594626872*^9, 3.711411599352292*^9},
1158 3.711733927666424*^9, 3.727754585065027*^9},
1159 CellLabel->"In[7]:=",ExpressionUUID->"90e0aab2-2f48-48a7-a061-6c154ba92329"],
1160
1161Cell[BoxData[
1162 RowBox[{
1163 RowBox[{
1164 FractionBox["1", "2"], " ",
1165 RowBox[{
1166 SubscriptBox["\<\"\[PartialD]\"\>", "nu"], "[",
1167 SubscriptBox["LtQk",
1168 RowBox[{"mu", ",", "aa"}]], "]"}], " ",
1169 RowBox[{
1170 SubscriptBox["\<\"\[PartialD]\"\>", "nu"], "[",
1171 SubsuperscriptBox["LtQk",
1172 RowBox[{"mu", ",", "aa"}], "\[Dagger]"], "]"}]}], "-",
1173 RowBox[{
1174 FractionBox["1", "2"], " ",
1175 RowBox[{
1176 SubscriptBox["\<\"\[PartialD]\"\>", "mu"], "[",
1177 SubscriptBox["LtQk",
1178 RowBox[{"nu", ",", "aa"}]], "]"}], " ",
1179 RowBox[{
1180 SubscriptBox["\<\"\[PartialD]\"\>", "nu"], "[",
1181 SubsuperscriptBox["LtQk",
1182 RowBox[{"mu", ",", "aa"}], "\[Dagger]"], "]"}]}], "-",
1183 RowBox[{
1184 FractionBox["1", "2"], " ",
1185 RowBox[{
1186 SubscriptBox["\<\"\[PartialD]\"\>", "nu"], "[",
1187 SubscriptBox["LtQk",
1188 RowBox[{"mu", ",", "aa"}]], "]"}], " ",
1189 RowBox[{
1190 SubscriptBox["\<\"\[PartialD]\"\>", "mu"], "[",
1191 SubsuperscriptBox["LtQk",
1192 RowBox[{"nu", ",", "aa"}], "\[Dagger]"], "]"}]}], "+",
1193 RowBox[{
1194 FractionBox["1", "2"], " ",
1195 RowBox[{
1196 SubscriptBox["\<\"\[PartialD]\"\>", "mu"], "[",
1197 SubscriptBox["LtQk",
1198 RowBox[{"nu", ",", "aa"}]], "]"}], " ",
1199 RowBox[{
1200 SubscriptBox["\<\"\[PartialD]\"\>", "mu"], "[",
1201 SubsuperscriptBox["LtQk",
1202 RowBox[{"nu", ",", "aa"}], "\[Dagger]"], "]"}]}], "+",
1203 RowBox[{
1204 SuperscriptBox["MLQ", "2"], " ",
1205 RowBox[{
1206 SubsuperscriptBox["LtQk",
1207 RowBox[{"mu", ",", "aa"}], "\[Dagger]"], ".",
1208 SubscriptBox["LtQk",
1209 RowBox[{"mu", ",", "aa"}]]}]}], "-",
1210 RowBox[{"\[ImaginaryI]", " ",
1211 SubscriptBox["g", "s"], " ",
1212 RowBox[{
1213 SubsuperscriptBox["LtQk",
1214 RowBox[{"mu", ",", "cc1"}], "\[Dagger]"], ".",
1215 RowBox[{"(",
1216 RowBox[{
1217 RowBox[{"-",
1218 RowBox[{
1219 SubscriptBox["\<\"\[PartialD]\"\>", "nu"], "[",
1220 SubscriptBox["G",
1221 RowBox[{"mu", ",", "aa"}]], "]"}]}], "+",
1222 RowBox[{
1223 SubscriptBox["\<\"\[PartialD]\"\>", "mu"], "[",
1224 SubscriptBox["G",
1225 RowBox[{"nu", ",", "aa"}]], "]"}], "+",
1226 RowBox[{
1227 SubscriptBox["g", "s"], " ",
1228 SubscriptBox["f",
1229 RowBox[{"aa", ",", "bb$3435", ",", "cc$3435"}]], " ",
1230 SubscriptBox["G",
1231 RowBox[{"mu", ",", "bb$3435"}]], " ",
1232 SubscriptBox["G",
1233 RowBox[{"nu", ",", "cc$3435"}]]}]}], ")"}], ".",
1234 SubsuperscriptBox["T",
1235 RowBox[{"cc1", ",", "cc2"}], "aa"], ".",
1236 SubscriptBox["LtQk",
1237 RowBox[{"nu", ",", "cc2"}]]}]}], "-",
1238 RowBox[{
1239 FractionBox["1", "2"], " ", "\[ImaginaryI]", " ",
1240 SubscriptBox["g", "s"], " ",
1241 RowBox[{
1242 SubscriptBox["\<\"\[PartialD]\"\>", "nu"], "[",
1243 SubscriptBox["LtQk",
1244 RowBox[{"mu", ",", "aa"}]], "]"}], " ",
1245 SubscriptBox["G",
1246 RowBox[{"mu", ",", "a$3431"}]], " ",
1247 SubsuperscriptBox["LtQk",
1248 RowBox[{"nu", ",", "i$3431"}], "\[Dagger]"], " ",
1249 SubsuperscriptBox["T",
1250 RowBox[{"i$3431", ",", "aa"}], "a$3431"]}], "+",
1251 RowBox[{
1252 FractionBox["1", "2"], " ", "\[ImaginaryI]", " ",
1253 SubscriptBox["g", "s"], " ",
1254 RowBox[{
1255 SubscriptBox["\<\"\[PartialD]\"\>", "mu"], "[",
1256 SubscriptBox["LtQk",
1257 RowBox[{"nu", ",", "aa"}]], "]"}], " ",
1258 SubscriptBox["G",
1259 RowBox[{"mu", ",", "a$3431"}]], " ",
1260 SubsuperscriptBox["LtQk",
1261 RowBox[{"nu", ",", "i$3431"}], "\[Dagger]"], " ",
1262 SubsuperscriptBox["T",
1263 RowBox[{"i$3431", ",", "aa"}], "a$3431"]}], "+",
1264 RowBox[{
1265 FractionBox["1", "2"], " ", "\[ImaginaryI]", " ",
1266 SubscriptBox["g", "s"], " ",
1267 RowBox[{
1268 SubscriptBox["\<\"\[PartialD]\"\>", "nu"], "[",
1269 SubscriptBox["LtQk",
1270 RowBox[{"mu", ",", "aa"}]], "]"}], " ",
1271 SubscriptBox["G",
1272 RowBox[{"nu", ",", "a$3432"}]], " ",
1273 SubsuperscriptBox["LtQk",
1274 RowBox[{"mu", ",", "i$3432"}], "\[Dagger]"], " ",
1275 SubsuperscriptBox["T",
1276 RowBox[{"i$3432", ",", "aa"}], "a$3432"]}], "-",
1277 RowBox[{
1278 FractionBox["1", "2"], " ", "\[ImaginaryI]", " ",
1279 SubscriptBox["g", "s"], " ",
1280 RowBox[{
1281 SubscriptBox["\<\"\[PartialD]\"\>", "mu"], "[",
1282 SubscriptBox["LtQk",
1283 RowBox[{"nu", ",", "aa"}]], "]"}], " ",
1284 SubscriptBox["G",
1285 RowBox[{"nu", ",", "a$3432"}]], " ",
1286 SubsuperscriptBox["LtQk",
1287 RowBox[{"mu", ",", "i$3432"}], "\[Dagger]"], " ",
1288 SubsuperscriptBox["T",
1289 RowBox[{"i$3432", ",", "aa"}], "a$3432"]}], "+",
1290 RowBox[{
1291 FractionBox["1", "2"], " ", "\[ImaginaryI]", " ",
1292 SubscriptBox["g", "s"], " ",
1293 RowBox[{
1294 SubscriptBox["\<\"\[PartialD]\"\>", "nu"], "[",
1295 SubsuperscriptBox["LtQk",
1296 RowBox[{"mu", ",", "aa"}], "\[Dagger]"], "]"}], " ",
1297 SubscriptBox["G",
1298 RowBox[{"mu", ",", "a$3433"}]], " ",
1299 SubscriptBox["LtQk",
1300 RowBox[{"nu", ",", "i$3433"}]], " ",
1301 SubsuperscriptBox["T",
1302 RowBox[{"aa", ",", "i$3433"}], "a$3433"]}], "-",
1303 RowBox[{
1304 FractionBox["1", "2"], " ", "\[ImaginaryI]", " ",
1305 SubscriptBox["g", "s"], " ",
1306 RowBox[{
1307 SubscriptBox["\<\"\[PartialD]\"\>", "mu"], "[",
1308 SubsuperscriptBox["LtQk",
1309 RowBox[{"nu", ",", "aa"}], "\[Dagger]"], "]"}], " ",
1310 SubscriptBox["G",
1311 RowBox[{"mu", ",", "a$3433"}]], " ",
1312 SubscriptBox["LtQk",
1313 RowBox[{"nu", ",", "i$3433"}]], " ",
1314 SubsuperscriptBox["T",
1315 RowBox[{"aa", ",", "i$3433"}], "a$3433"]}], "+",
1316 RowBox[{
1317 FractionBox["1", "2"], " ",
1318 SubsuperscriptBox["g", "s", "2"], " ",
1319 SubscriptBox["G",
1320 RowBox[{"mu", ",", "a$3431"}]], " ",
1321 SubscriptBox["G",
1322 RowBox[{"mu", ",", "a$3433"}]], " ",
1323 SubscriptBox["LtQk",
1324 RowBox[{"nu", ",", "i$3433"}]], " ",
1325 SubsuperscriptBox["LtQk",
1326 RowBox[{"nu", ",", "i$3431"}], "\[Dagger]"], " ",
1327 SubsuperscriptBox["T",
1328 RowBox[{"i$3431", ",", "aa"}], "a$3431"], " ",
1329 SubsuperscriptBox["T",
1330 RowBox[{"aa", ",", "i$3433"}], "a$3433"]}], "-",
1331 RowBox[{
1332 FractionBox["1", "2"], " ",
1333 SubsuperscriptBox["g", "s", "2"], " ",
1334 SubscriptBox["G",
1335 RowBox[{"mu", ",", "a$3433"}]], " ",
1336 SubscriptBox["G",
1337 RowBox[{"nu", ",", "a$3432"}]], " ",
1338 SubscriptBox["LtQk",
1339 RowBox[{"nu", ",", "i$3433"}]], " ",
1340 SubsuperscriptBox["LtQk",
1341 RowBox[{"mu", ",", "i$3432"}], "\[Dagger]"], " ",
1342 SubsuperscriptBox["T",
1343 RowBox[{"i$3432", ",", "aa"}], "a$3432"], " ",
1344 SubsuperscriptBox["T",
1345 RowBox[{"aa", ",", "i$3433"}], "a$3433"]}], "-",
1346 RowBox[{
1347 FractionBox["1", "2"], " ", "\[ImaginaryI]", " ",
1348 SubscriptBox["g", "s"], " ",
1349 RowBox[{
1350 SubscriptBox["\<\"\[PartialD]\"\>", "nu"], "[",
1351 SubsuperscriptBox["LtQk",
1352 RowBox[{"mu", ",", "aa"}], "\[Dagger]"], "]"}], " ",
1353 SubscriptBox["G",
1354 RowBox[{"nu", ",", "a$3434"}]], " ",
1355 SubscriptBox["LtQk",
1356 RowBox[{"mu", ",", "i$3434"}]], " ",
1357 SubsuperscriptBox["T",
1358 RowBox[{"aa", ",", "i$3434"}], "a$3434"]}], "+",
1359 RowBox[{
1360 FractionBox["1", "2"], " ", "\[ImaginaryI]", " ",
1361 SubscriptBox["g", "s"], " ",
1362 RowBox[{
1363 SubscriptBox["\<\"\[PartialD]\"\>", "mu"], "[",
1364 SubsuperscriptBox["LtQk",
1365 RowBox[{"nu", ",", "aa"}], "\[Dagger]"], "]"}], " ",
1366 SubscriptBox["G",
1367 RowBox[{"nu", ",", "a$3434"}]], " ",
1368 SubscriptBox["LtQk",
1369 RowBox[{"mu", ",", "i$3434"}]], " ",
1370 SubsuperscriptBox["T",
1371 RowBox[{"aa", ",", "i$3434"}], "a$3434"]}], "-",
1372 RowBox[{
1373 FractionBox["1", "2"], " ",
1374 SubsuperscriptBox["g", "s", "2"], " ",
1375 SubscriptBox["G",
1376 RowBox[{"mu", ",", "a$3431"}]], " ",
1377 SubscriptBox["G",
1378 RowBox[{"nu", ",", "a$3434"}]], " ",
1379 SubscriptBox["LtQk",
1380 RowBox[{"mu", ",", "i$3434"}]], " ",
1381 SubsuperscriptBox["LtQk",
1382 RowBox[{"nu", ",", "i$3431"}], "\[Dagger]"], " ",
1383 SubsuperscriptBox["T",
1384 RowBox[{"i$3431", ",", "aa"}], "a$3431"], " ",
1385 SubsuperscriptBox["T",
1386 RowBox[{"aa", ",", "i$3434"}], "a$3434"]}], "+",
1387 RowBox[{
1388 FractionBox["1", "2"], " ",
1389 SubsuperscriptBox["g", "s", "2"], " ",
1390 SubscriptBox["G",
1391 RowBox[{"nu", ",", "a$3432"}]], " ",
1392 SubscriptBox["G",
1393 RowBox[{"nu", ",", "a$3434"}]], " ",
1394 SubscriptBox["LtQk",
1395 RowBox[{"mu", ",", "i$3434"}]], " ",
1396 SubsuperscriptBox["LtQk",
1397 RowBox[{"mu", ",", "i$3432"}], "\[Dagger]"], " ",
1398 SubsuperscriptBox["T",
1399 RowBox[{"i$3432", ",", "aa"}], "a$3432"], " ",
1400 SubsuperscriptBox["T",
1401 RowBox[{"aa", ",", "i$3434"}], "a$3434"]}]}]], "Output",
1402 CellChangeTimes->{3.728834919257449*^9, 3.7288353852020288`*^9,
1403 3.7316351208110905`*^9, 3.7316432708910823`*^9, 3.7316434936763425`*^9,
1404 3.734257487546836*^9, 3.7342577406357794`*^9, 3.7342579760659313`*^9,
1405 3.734258098999922*^9, 3.734258231312629*^9, 3.73425830008674*^9,
1406 3.7452061456237006`*^9, 3.7452068431015844`*^9, 3.745213311466691*^9,
1407 3.745213946262839*^9},
1408 CellLabel->"Out[7]=",ExpressionUUID->"7c59a2d1-260e-4813-9633-9baedad97220"]
1409}, Open ]],
1410
1411Cell[CellGroupData[{
1412
1413Cell[BoxData[
1414 RowBox[{"FeynmanRules", "[", "LLQ", "]"}]], "Input",
1415 CellChangeTimes->{{3.7107763476721935`*^9, 3.7107763532523384`*^9}},
1416 CellLabel->"In[8]:=",ExpressionUUID->"1159c70f-9390-4e41-affc-c016a1695ff5"],
1417
1418Cell[CellGroupData[{
1419
1420Cell[BoxData[
1421 StyleBox["\<\"Starting Feynman rule calculation.\"\>",
1422 StripOnInput->False,
1423 LineColor->RGBColor[1, 0.5, 0],
1424 FrontFaceColor->RGBColor[1, 0.5, 0],
1425 BackFaceColor->RGBColor[1, 0.5, 0],
1426 GraphicsColor->RGBColor[1, 0.5, 0],
1427 FontWeight->Bold,
1428 FontColor->RGBColor[1, 0.5, 0]]], "Print",
1429 CellChangeTimes->{3.7107763543548746`*^9, 3.7107781519007854`*^9,
1430 3.7107783549589005`*^9, 3.7108435786153817`*^9, 3.7108451394353456`*^9,
1431 3.711300307547175*^9, 3.7113159419846754`*^9, 3.711328722122781*^9,
1432 3.711378192787717*^9, 3.7114229327672997`*^9, 3.7114239048384657`*^9,
1433 3.7117187689344997`*^9, 3.711733908724595*^9, 3.714779038386984*^9,
1434 3.727754598152893*^9, 3.7278345859539304`*^9, 3.727834799006135*^9,
1435 3.7288016510755353`*^9, 3.728817722606468*^9, 3.7288332449638357`*^9,
1436 3.7288353852770295`*^9, 3.7313925817982397`*^9, 3.731635120869128*^9,
1437 3.7316432709611316`*^9, 3.731643493745391*^9, 3.7342574876226544`*^9,
1438 3.734257740678814*^9, 3.734257976101457*^9, 3.73425809905322*^9,
1439 3.7342582313602047`*^9, 3.7342583001327844`*^9, 3.74520614571465*^9,
1440 3.7452068431328316`*^9, 3.74521331258537*^9, 3.7452139465949097`*^9},
1441 CellLabel->
1442 "During evaluation of \
1443In[8]:=",ExpressionUUID->"d37edca3-67af-4c15-b86f-416e9371724f"],
1444
1445Cell[BoxData["\<\"Expanding the Lagrangian...\"\>"], "Print",
1446 CellChangeTimes->{3.7107763543548746`*^9, 3.7107781519007854`*^9,
1447 3.7107783549589005`*^9, 3.7108435786153817`*^9, 3.7108451394353456`*^9,
1448 3.711300307547175*^9, 3.7113159419846754`*^9, 3.711328722122781*^9,
1449 3.711378192787717*^9, 3.7114229327672997`*^9, 3.7114239048384657`*^9,
1450 3.7117187689344997`*^9, 3.711733908724595*^9, 3.714779038386984*^9,
1451 3.727754598152893*^9, 3.7278345859539304`*^9, 3.727834799006135*^9,
1452 3.7288016510755353`*^9, 3.728817722606468*^9, 3.7288332449638357`*^9,
1453 3.7288353852770295`*^9, 3.7313925817982397`*^9, 3.731635120869128*^9,
1454 3.7316432709611316`*^9, 3.731643493745391*^9, 3.7342574876226544`*^9,
1455 3.734257740678814*^9, 3.734257976101457*^9, 3.73425809905322*^9,
1456 3.7342582313602047`*^9, 3.7342583001327844`*^9, 3.74520614571465*^9,
1457 3.7452068431328316`*^9, 3.74521331258537*^9, 3.7452139465949097`*^9},
1458 CellLabel->
1459 "During evaluation of \
1460In[8]:=",ExpressionUUID->"40610d7c-cbae-45b0-9846-827e2021b08e"],
1461
1462Cell[BoxData["\<\"Collecting the different structures that enter the \
1463vertex.\"\>"], "Print",
1464 CellChangeTimes->{3.7107763543548746`*^9, 3.7107781519007854`*^9,
1465 3.7107783549589005`*^9, 3.7108435786153817`*^9, 3.7108451394353456`*^9,
1466 3.711300307547175*^9, 3.7113159419846754`*^9, 3.711328722122781*^9,
1467 3.711378192787717*^9, 3.7114229327672997`*^9, 3.7114239048384657`*^9,
1468 3.7117187689344997`*^9, 3.711733908724595*^9, 3.714779038386984*^9,
1469 3.727754598152893*^9, 3.7278345859539304`*^9, 3.727834799006135*^9,
1470 3.7288016510755353`*^9, 3.728817722606468*^9, 3.7288332449638357`*^9,
1471 3.7288353852770295`*^9, 3.7313925817982397`*^9, 3.731635120869128*^9,
1472 3.7316432709611316`*^9, 3.731643493745391*^9, 3.7342574876226544`*^9,
1473 3.734257740678814*^9, 3.734257976101457*^9, 3.73425809905322*^9,
1474 3.7342582313602047`*^9, 3.7342583001327844`*^9, 3.74520614571465*^9,
1475 3.7452068431328316`*^9, 3.74521331258537*^9, 3.745213946764213*^9},
1476 CellLabel->
1477 "During evaluation of \
1478In[8]:=",ExpressionUUID->"a63c17ba-3c96-4dc6-a822-bdc6529c14d1"],
1479
1480Cell[BoxData[
1481 InterpretationBox[
1482 RowBox[{
1483 "4", "\[InvisibleSpace]", "\<\" possible non-zero vertices have been found \
1484-> starting the computation: \"\>", "\[InvisibleSpace]",
1485 DynamicBox[ToBoxes[FeynRules`FR$FeynmanRules, StandardForm],
1486 ImageSizeCache->{7., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
1487 "\[InvisibleSpace]", "4", "\[InvisibleSpace]", "\<\".\"\>"}],
1488 SequenceForm[
1489 4, " possible non-zero vertices have been found -> starting the \
1490computation: ",
1491 Dynamic[FeynRules`FR$FeynmanRules], " / ", 4, "."],
1492 Editable->False]], "Print",
1493 CellChangeTimes->{3.7107763543548746`*^9, 3.7107781519007854`*^9,
1494 3.7107783549589005`*^9, 3.7108435786153817`*^9, 3.7108451394353456`*^9,
1495 3.711300307547175*^9, 3.7113159419846754`*^9, 3.711328722122781*^9,
1496 3.711378192787717*^9, 3.7114229327672997`*^9, 3.7114239048384657`*^9,
1497 3.7117187689344997`*^9, 3.711733908724595*^9, 3.714779038386984*^9,
1498 3.727754598152893*^9, 3.7278345859539304`*^9, 3.727834799006135*^9,
1499 3.7288016510755353`*^9, 3.728817722606468*^9, 3.7288332449638357`*^9,
1500 3.7288353852770295`*^9, 3.7313925817982397`*^9, 3.731635120869128*^9,
1501 3.7316432709611316`*^9, 3.731643493745391*^9, 3.7342574876226544`*^9,
1502 3.734257740678814*^9, 3.734257976101457*^9, 3.73425809905322*^9,
1503 3.7342582313602047`*^9, 3.7342583001327844`*^9, 3.74520614571465*^9,
1504 3.7452068431328316`*^9, 3.74521331258537*^9, 3.745213946764213*^9},
1505 CellLabel->
1506 "During evaluation of \
1507In[8]:=",ExpressionUUID->"3fb83c47-fc94-4250-9c76-122e87e80ca0"],
1508
1509Cell[BoxData[
1510 InterpretationBox[
1511 RowBox[{"4", "\[InvisibleSpace]", "\<\" vertices obtained.\"\>"}],
1512 SequenceForm[4, " vertices obtained."],
1513 Editable->False]], "Print",
1514 CellChangeTimes->{3.7107763543548746`*^9, 3.7107781519007854`*^9,
1515 3.7107783549589005`*^9, 3.7108435786153817`*^9, 3.7108451394353456`*^9,
1516 3.711300307547175*^9, 3.7113159419846754`*^9, 3.711328722122781*^9,
1517 3.711378192787717*^9, 3.7114229327672997`*^9, 3.7114239048384657`*^9,
1518 3.7117187689344997`*^9, 3.711733908724595*^9, 3.714779038386984*^9,
1519 3.727754598152893*^9, 3.7278345859539304`*^9, 3.727834799006135*^9,
1520 3.7288016510755353`*^9, 3.728817722606468*^9, 3.7288332449638357`*^9,
1521 3.7288353852770295`*^9, 3.7313925817982397`*^9, 3.731635120869128*^9,
1522 3.7316432709611316`*^9, 3.731643493745391*^9, 3.7342574876226544`*^9,
1523 3.734257740678814*^9, 3.734257976101457*^9, 3.73425809905322*^9,
1524 3.7342582313602047`*^9, 3.7342583001327844`*^9, 3.74520614571465*^9,
1525 3.7452068431328316`*^9, 3.74521331258537*^9, 3.7452139474238405`*^9},
1526 CellLabel->
1527 "During evaluation of \
1528In[8]:=",ExpressionUUID->"0a813d16-b8ab-4bcb-9b08-bd8b772cbca0"]
1529}, Open ]],
1530
1531Cell[BoxData[
1532 RowBox[{"{",
1533 RowBox[{
1534 RowBox[{"{",
1535 RowBox[{
1536 RowBox[{"{",
1537 RowBox[{
1538 RowBox[{"{",
1539 RowBox[{
1540 OverscriptBox["l", "\<\"-\"\>"], ",", "1"}], "}"}], ",",
1541 RowBox[{"{",
1542 RowBox[{"dq", ",", "2"}], "}"}], ",",
1543 RowBox[{"{",
1544 RowBox[{
1545 SuperscriptBox["LtQk", "\[Dagger]"], ",", "3"}], "}"}]}], "}"}], ",",
1546 RowBox[{"\[ImaginaryI]", " ",
1547 SubscriptBox[
1548 SubscriptBox["C", "LQ"],
1549 RowBox[{
1550 SubscriptBox["\<\"f\"\>", "2"], ",",
1551 SubscriptBox["\<\"f\"\>", "1"]}]], " ",
1552 SubscriptBox["\[Delta]",
1553 RowBox[{
1554 SubscriptBox["\<\"m\"\>", "2"], ",",
1555 SubscriptBox["\<\"m\"\>", "3"]}]], " ",
1556 SubscriptBox[
1557 RowBox[{
1558 TemplateBox[{"\[Gamma]",SubscriptBox["\"\[Mu]\"", "3"]},
1559 "Superscript"], ".",
1560 SubscriptBox["P", "\<\"-\"\>"]}],
1561 RowBox[{
1562 SubscriptBox["\<\"s\"\>", "1"], ",",
1563 SubscriptBox["\<\"s\"\>", "2"]}]]}]}], "}"}], ",",
1564 RowBox[{"{",
1565 RowBox[{
1566 RowBox[{"{",
1567 RowBox[{
1568 RowBox[{"{",
1569 RowBox[{
1570 OverscriptBox["vl", "\<\"-\"\>"], ",", "1"}], "}"}], ",",
1571 RowBox[{"{",
1572 RowBox[{"uq", ",", "2"}], "}"}], ",",
1573 RowBox[{"{",
1574 RowBox[{
1575 SuperscriptBox["LtQk", "\[Dagger]"], ",", "3"}], "}"}]}], "}"}], ",",
1576 RowBox[{"\[ImaginaryI]", " ",
1577 SubscriptBox[
1578 SubscriptBox["C", "LQ"],
1579 RowBox[{
1580 SubscriptBox["\<\"f\"\>", "2"], ",",
1581 SubscriptBox["\<\"f\"\>", "1"]}]], " ",
1582 SubscriptBox["\[Delta]",
1583 RowBox[{
1584 SubscriptBox["\<\"m\"\>", "2"], ",",
1585 SubscriptBox["\<\"m\"\>", "3"]}]], " ",
1586 SubscriptBox[
1587 RowBox[{
1588 TemplateBox[{"\[Gamma]",SubscriptBox["\"\[Mu]\"", "3"]},
1589 "Superscript"], ".",
1590 SubscriptBox["P", "\<\"-\"\>"]}],
1591 RowBox[{
1592 SubscriptBox["\<\"s\"\>", "1"], ",",
1593 SubscriptBox["\<\"s\"\>", "2"]}]]}]}], "}"}], ",",
1594 RowBox[{"{",
1595 RowBox[{
1596 RowBox[{"{",
1597 RowBox[{
1598 RowBox[{"{",
1599 RowBox[{
1600 OverscriptBox["dq", "\<\"-\"\>"], ",", "1"}], "}"}], ",",
1601 RowBox[{"{",
1602 RowBox[{"l", ",", "2"}], "}"}], ",",
1603 RowBox[{"{",
1604 RowBox[{"LtQk", ",", "3"}], "}"}]}], "}"}], ",",
1605 RowBox[{"\[ImaginaryI]", " ",
1606 SubscriptBox[
1607 SubscriptBox["C", "LQ"],
1608 RowBox[{
1609 SubscriptBox["\<\"f\"\>", "1"], ",",
1610 SubscriptBox["\<\"f\"\>", "2"]}]], " ",
1611 SubscriptBox["\[Delta]",
1612 RowBox[{
1613 SubscriptBox["\<\"m\"\>", "1"], ",",
1614 SubscriptBox["\<\"m\"\>", "3"]}]], " ",
1615 SubscriptBox[
1616 RowBox[{
1617 TemplateBox[{"\[Gamma]",SubscriptBox["\"\[Mu]\"", "3"]},
1618 "Superscript"], ".",
1619 SubscriptBox["P", "\<\"-\"\>"]}],
1620 RowBox[{
1621 SubscriptBox["\<\"s\"\>", "1"], ",",
1622 SubscriptBox["\<\"s\"\>", "2"]}]]}]}], "}"}], ",",
1623 RowBox[{"{",
1624 RowBox[{
1625 RowBox[{"{",
1626 RowBox[{
1627 RowBox[{"{",
1628 RowBox[{
1629 OverscriptBox["uq", "\<\"-\"\>"], ",", "1"}], "}"}], ",",
1630 RowBox[{"{",
1631 RowBox[{"vl", ",", "2"}], "}"}], ",",
1632 RowBox[{"{",
1633 RowBox[{"LtQk", ",", "3"}], "}"}]}], "}"}], ",",
1634 RowBox[{"\[ImaginaryI]", " ",
1635 SubscriptBox[
1636 SubscriptBox["C", "LQ"],
1637 RowBox[{
1638 SubscriptBox["\<\"f\"\>", "1"], ",",
1639 SubscriptBox["\<\"f\"\>", "2"]}]], " ",
1640 SubscriptBox["\[Delta]",
1641 RowBox[{
1642 SubscriptBox["\<\"m\"\>", "1"], ",",
1643 SubscriptBox["\<\"m\"\>", "3"]}]], " ",
1644 SubscriptBox[
1645 RowBox[{
1646 TemplateBox[{"\[Gamma]",SubscriptBox["\"\[Mu]\"", "3"]},
1647 "Superscript"], ".",
1648 SubscriptBox["P", "\<\"-\"\>"]}],
1649 RowBox[{
1650 SubscriptBox["\<\"s\"\>", "1"], ",",
1651 SubscriptBox["\<\"s\"\>", "2"]}]]}]}], "}"}]}], "}"}]], "Output",
1652 CellChangeTimes->{3.710776354751342*^9, 3.710778152415888*^9,
1653 3.7107783552989855`*^9, 3.710843579050485*^9, 3.710845139752278*^9,
1654 3.711300307952273*^9, 3.711315942389225*^9, 3.7113287225728874`*^9,
1655 3.711378193151088*^9, 3.7114229331923685`*^9, 3.7114239051655755`*^9,
1656 3.711718769258724*^9, 3.711733909209688*^9, 3.71477903862015*^9,
1657 3.727754598708003*^9, 3.7278345864862843`*^9, 3.727834799541683*^9,
1658 3.728801651470622*^9, 3.7288177232198944`*^9, 3.728833245328906*^9,
1659 3.7288353855920906`*^9, 3.731392582334627*^9, 3.7316351213444676`*^9,
1660 3.731643271841752*^9, 3.731643494154684*^9, 3.7342574880359755`*^9,
1661 3.7342577410911813`*^9, 3.7342579763947763`*^9, 3.734258099546606*^9,
1662 3.7342582317604694`*^9, 3.734258300771294*^9, 3.7452061463722725`*^9,
1663 3.745206843518321*^9, 3.7452133148750987`*^9, 3.7452139474548216`*^9},
1664 CellLabel->"Out[8]=",ExpressionUUID->"ef9fdd18-ab09-4118-a92a-d51e503beb66"]
1665}, Open ]],
1666
1667Cell[CellGroupData[{
1668
1669Cell[BoxData[
1670 RowBox[{"FeynmanRules", "[", "LLQqcd", "]"}]], "Input",
1671 CellChangeTimes->{{3.7107763476721935`*^9, 3.7107763532523384`*^9}, {
1672 3.711328741409523*^9, 3.711328744445941*^9}, {3.7113679254857116`*^9,
1673 3.7113679268695507`*^9}, {3.7113780510537663`*^9, 3.7113780540108566`*^9}},
1674 CellLabel->"In[9]:=",ExpressionUUID->"a8742e42-7437-483f-b943-a4ca55b5b971"],
1675
1676Cell[CellGroupData[{
1677
1678Cell[BoxData[
1679 StyleBox["\<\"Starting Feynman rule calculation.\"\>",
1680 StripOnInput->False,
1681 LineColor->RGBColor[1, 0.5, 0],
1682 FrontFaceColor->RGBColor[1, 0.5, 0],
1683 BackFaceColor->RGBColor[1, 0.5, 0],
1684 GraphicsColor->RGBColor[1, 0.5, 0],
1685 FontWeight->Bold,
1686 FontColor->RGBColor[1, 0.5, 0]]], "Print",
1687 CellChangeTimes->{
1688 3.711328745465444*^9, 3.711329699980115*^9, 3.7113679281864166`*^9,
1689 3.7113680081828775`*^9, 3.7113680552268877`*^9, 3.7113684128777037`*^9,
1690 3.7113776524537706`*^9, 3.7113780552486835`*^9, {3.7113781877874975`*^9,
1691 3.7113781982399774`*^9}, 3.711380230661878*^9, 3.711380873614834*^9,
1692 3.7113821645997453`*^9, 3.711422933292902*^9, 3.7114236458941717`*^9,
1693 3.7114239051955833`*^9, 3.7114706984097724`*^9, 3.7114708648443575`*^9,
1694 3.711471095291935*^9, 3.711718769283713*^9, 3.711733909264696*^9,
1695 3.714779038640664*^9, 3.7277546052607327`*^9, 3.7278345865662994`*^9,
1696 3.727834799601706*^9, 3.728801651765664*^9, 3.7288177285618787`*^9,
1697 3.728832830643709*^9, 3.728833249307537*^9, 3.728834929819727*^9,
1698 3.7288353856421022`*^9, 3.7316351214485455`*^9, 3.731643271964839*^9,
1699 3.731643494181702*^9, 3.7342574880790305`*^9, 3.7342577411322374`*^9,
1700 3.7342579764383526`*^9, 3.7342580995956416`*^9, 3.7342582317954826`*^9,
1701 3.7342583008313475`*^9, 3.745206146452227*^9, 3.745206843556088*^9,
1702 3.745213315175928*^9, 3.745213947535775*^9},
1703 CellLabel->
1704 "During evaluation of \
1705In[9]:=",ExpressionUUID->"4da87593-a37c-416f-afbb-270221b8334f"],
1706
1707Cell[BoxData["\<\"Expanding the Lagrangian...\"\>"], "Print",
1708 CellChangeTimes->{
1709 3.711328745465444*^9, 3.711329699980115*^9, 3.7113679281864166`*^9,
1710 3.7113680081828775`*^9, 3.7113680552268877`*^9, 3.7113684128777037`*^9,
1711 3.7113776524537706`*^9, 3.7113780552486835`*^9, {3.7113781877874975`*^9,
1712 3.7113781982399774`*^9}, 3.711380230661878*^9, 3.711380873614834*^9,
1713 3.7113821645997453`*^9, 3.711422933292902*^9, 3.7114236458941717`*^9,
1714 3.7114239051955833`*^9, 3.7114706984097724`*^9, 3.7114708648443575`*^9,
1715 3.711471095291935*^9, 3.711718769283713*^9, 3.711733909264696*^9,
1716 3.714779038640664*^9, 3.7277546052607327`*^9, 3.7278345865662994`*^9,
1717 3.727834799601706*^9, 3.728801651765664*^9, 3.7288177285618787`*^9,
1718 3.728832830643709*^9, 3.728833249307537*^9, 3.728834929819727*^9,
1719 3.7288353856421022`*^9, 3.7316351214485455`*^9, 3.731643271964839*^9,
1720 3.731643494181702*^9, 3.7342574880790305`*^9, 3.7342577411322374`*^9,
1721 3.7342579764383526`*^9, 3.7342580995956416`*^9, 3.7342582317954826`*^9,
1722 3.7342583008313475`*^9, 3.745206146452227*^9, 3.745206843556088*^9,
1723 3.745213315175928*^9, 3.7452139475387745`*^9},
1724 CellLabel->
1725 "During evaluation of \
1726In[9]:=",ExpressionUUID->"8178fea3-be60-408b-b4f6-fc1f863f3c0a"],
1727
1728Cell[BoxData["\<\"Collecting the different structures that enter the \
1729vertex.\"\>"], "Print",
1730 CellChangeTimes->{
1731 3.711328745465444*^9, 3.711329699980115*^9, 3.7113679281864166`*^9,
1732 3.7113680081828775`*^9, 3.7113680552268877`*^9, 3.7113684128777037`*^9,
1733 3.7113776524537706`*^9, 3.7113780552486835`*^9, {3.7113781877874975`*^9,
1734 3.7113781982399774`*^9}, 3.711380230661878*^9, 3.711380873614834*^9,
1735 3.7113821645997453`*^9, 3.711422933292902*^9, 3.7114236458941717`*^9,
1736 3.7114239051955833`*^9, 3.7114706984097724`*^9, 3.7114708648443575`*^9,
1737 3.711471095291935*^9, 3.711718769283713*^9, 3.711733909264696*^9,
1738 3.714779038640664*^9, 3.7277546052607327`*^9, 3.7278345865662994`*^9,
1739 3.727834799601706*^9, 3.728801651765664*^9, 3.7288177285618787`*^9,
1740 3.728832830643709*^9, 3.728833249307537*^9, 3.728834929819727*^9,
1741 3.7288353856421022`*^9, 3.7316351214485455`*^9, 3.731643271964839*^9,
1742 3.731643494181702*^9, 3.7342574880790305`*^9, 3.7342577411322374`*^9,
1743 3.7342579764383526`*^9, 3.7342580995956416`*^9, 3.7342582317954826`*^9,
1744 3.7342583008313475`*^9, 3.745206146452227*^9, 3.745206843556088*^9,
1745 3.745213315175928*^9, 3.745213948097667*^9},
1746 CellLabel->
1747 "During evaluation of \
1748In[9]:=",ExpressionUUID->"637d031c-8a95-4608-b0f0-ac21dbc77847"],
1749
1750Cell[BoxData[
1751 InterpretationBox[
1752 RowBox[{
1753 "2", "\[InvisibleSpace]", "\<\" possible non-zero vertices have been found \
1754-> starting the computation: \"\>", "\[InvisibleSpace]",
1755 DynamicBox[ToBoxes[FeynRules`FR$FeynmanRules, StandardForm],
1756 ImageSizeCache->{7., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
1757 "\[InvisibleSpace]", "2", "\[InvisibleSpace]", "\<\".\"\>"}],
1758 SequenceForm[
1759 2, " possible non-zero vertices have been found -> starting the \
1760computation: ",
1761 Dynamic[FeynRules`FR$FeynmanRules], " / ", 2, "."],
1762 Editable->False]], "Print",
1763 CellChangeTimes->{
1764 3.711328745465444*^9, 3.711329699980115*^9, 3.7113679281864166`*^9,
1765 3.7113680081828775`*^9, 3.7113680552268877`*^9, 3.7113684128777037`*^9,
1766 3.7113776524537706`*^9, 3.7113780552486835`*^9, {3.7113781877874975`*^9,
1767 3.7113781982399774`*^9}, 3.711380230661878*^9, 3.711380873614834*^9,
1768 3.7113821645997453`*^9, 3.711422933292902*^9, 3.7114236458941717`*^9,
1769 3.7114239051955833`*^9, 3.7114706984097724`*^9, 3.7114708648443575`*^9,
1770 3.711471095291935*^9, 3.711718769283713*^9, 3.711733909264696*^9,
1771 3.714779038640664*^9, 3.7277546052607327`*^9, 3.7278345865662994`*^9,
1772 3.727834799601706*^9, 3.728801651765664*^9, 3.7288177285618787`*^9,
1773 3.728832830643709*^9, 3.728833249307537*^9, 3.728834929819727*^9,
1774 3.7288353856421022`*^9, 3.7316351214485455`*^9, 3.731643271964839*^9,
1775 3.731643494181702*^9, 3.7342574880790305`*^9, 3.7342577411322374`*^9,
1776 3.7342579764383526`*^9, 3.7342580995956416`*^9, 3.7342582317954826`*^9,
1777 3.7342583008313475`*^9, 3.745206146452227*^9, 3.745206843556088*^9,
1778 3.745213315175928*^9, 3.745213948113289*^9},
1779 CellLabel->
1780 "During evaluation of \
1781In[9]:=",ExpressionUUID->"42bf05c8-356f-4723-94cf-e1bf429c2681"],
1782
1783Cell[BoxData[
1784 InterpretationBox[
1785 RowBox[{"2", "\[InvisibleSpace]", "\<\" vertices obtained.\"\>"}],
1786 SequenceForm[2, " vertices obtained."],
1787 Editable->False]], "Print",
1788 CellChangeTimes->{
1789 3.711328745465444*^9, 3.711329699980115*^9, 3.7113679281864166`*^9,
1790 3.7113680081828775`*^9, 3.7113680552268877`*^9, 3.7113684128777037`*^9,
1791 3.7113776524537706`*^9, 3.7113780552486835`*^9, {3.7113781877874975`*^9,
1792 3.7113781982399774`*^9}, 3.711380230661878*^9, 3.711380873614834*^9,
1793 3.7113821645997453`*^9, 3.711422933292902*^9, 3.7114236458941717`*^9,
1794 3.7114239051955833`*^9, 3.7114706984097724`*^9, 3.7114708648443575`*^9,
1795 3.711471095291935*^9, 3.711718769283713*^9, 3.711733909264696*^9,
1796 3.714779038640664*^9, 3.7277546052607327`*^9, 3.7278345865662994`*^9,
1797 3.727834799601706*^9, 3.728801651765664*^9, 3.7288177285618787`*^9,
1798 3.728832830643709*^9, 3.728833249307537*^9, 3.728834929819727*^9,
1799 3.7288353856421022`*^9, 3.7316351214485455`*^9, 3.731643271964839*^9,
1800 3.731643494181702*^9, 3.7342574880790305`*^9, 3.7342577411322374`*^9,
1801 3.7342579764383526`*^9, 3.7342580995956416`*^9, 3.7342582317954826`*^9,
1802 3.7342583008313475`*^9, 3.745206146452227*^9, 3.745206843556088*^9,
1803 3.745213315175928*^9, 3.7452139496709247`*^9},
1804 CellLabel->
1805 "During evaluation of \
1806In[9]:=",ExpressionUUID->"8c1e3868-3e52-4936-b50f-6e4677010ff6"]
1807}, Open ]],
1808
1809Cell[BoxData[
1810 RowBox[{"{",
1811 RowBox[{
1812 RowBox[{"{",
1813 RowBox[{
1814 RowBox[{"{",
1815 RowBox[{
1816 RowBox[{"{",
1817 RowBox[{"G", ",", "1"}], "}"}], ",",
1818 RowBox[{"{",
1819 RowBox[{"LtQk", ",", "2"}], "}"}], ",",
1820 RowBox[{"{",
1821 RowBox[{
1822 SuperscriptBox["LtQk", "\[Dagger]"], ",", "3"}], "}"}]}], "}"}], ",",
1823 RowBox[{
1824 RowBox[{
1825 RowBox[{"-", "\[ImaginaryI]"}], " ",
1826 SubscriptBox["g", "s"], " ",
1827 SubsuperscriptBox["\<\"p\"\>", "1",
1828 SubscriptBox["\<\"\[Mu]\"\>", "3"]], " ",
1829 SubscriptBox["\[Eta]",
1830 RowBox[{
1831 SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
1832 SubscriptBox["\<\"\[Mu]\"\>", "2"]}]], " ",
1833 SubsuperscriptBox["T",
1834 RowBox[{
1835 SubscriptBox["\<\"m\"\>", "3"], ",",
1836 SubscriptBox["\<\"m\"\>", "2"]}],
1837 SubscriptBox["\<\"a\"\>", "1"]]}], "-",
1838 RowBox[{"\[ImaginaryI]", " ",
1839 SubscriptBox["g", "s"], " ",
1840 SubsuperscriptBox["\<\"p\"\>", "2",
1841 SubscriptBox["\<\"\[Mu]\"\>", "3"]], " ",
1842 SubscriptBox["\[Eta]",
1843 RowBox[{
1844 SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
1845 SubscriptBox["\<\"\[Mu]\"\>", "2"]}]], " ",
1846 SubsuperscriptBox["T",
1847 RowBox[{
1848 SubscriptBox["\<\"m\"\>", "3"], ",",
1849 SubscriptBox["\<\"m\"\>", "2"]}],
1850 SubscriptBox["\<\"a\"\>", "1"]]}], "+",
1851 RowBox[{"\[ImaginaryI]", " ",
1852 SubscriptBox["g", "s"], " ",
1853 SubsuperscriptBox["\<\"p\"\>", "1",
1854 SubscriptBox["\<\"\[Mu]\"\>", "2"]], " ",
1855 SubscriptBox["\[Eta]",
1856 RowBox[{
1857 SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
1858 SubscriptBox["\<\"\[Mu]\"\>", "3"]}]], " ",
1859 SubsuperscriptBox["T",
1860 RowBox[{
1861 SubscriptBox["\<\"m\"\>", "3"], ",",
1862 SubscriptBox["\<\"m\"\>", "2"]}],
1863 SubscriptBox["\<\"a\"\>", "1"]]}], "+",
1864 RowBox[{"\[ImaginaryI]", " ",
1865 SubscriptBox["g", "s"], " ",
1866 SubsuperscriptBox["\<\"p\"\>", "3",
1867 SubscriptBox["\<\"\[Mu]\"\>", "2"]], " ",
1868 SubscriptBox["\[Eta]",
1869 RowBox[{
1870 SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
1871 SubscriptBox["\<\"\[Mu]\"\>", "3"]}]], " ",
1872 SubsuperscriptBox["T",
1873 RowBox[{
1874 SubscriptBox["\<\"m\"\>", "3"], ",",
1875 SubscriptBox["\<\"m\"\>", "2"]}],
1876 SubscriptBox["\<\"a\"\>", "1"]]}], "+",
1877 RowBox[{"\[ImaginaryI]", " ",
1878 SubscriptBox["g", "s"], " ",
1879 SubsuperscriptBox["\<\"p\"\>", "2",
1880 SubscriptBox["\<\"\[Mu]\"\>", "1"]], " ",
1881 SubscriptBox["\[Eta]",
1882 RowBox[{
1883 SubscriptBox["\<\"\[Mu]\"\>", "2"], ",",
1884 SubscriptBox["\<\"\[Mu]\"\>", "3"]}]], " ",
1885 SubsuperscriptBox["T",
1886 RowBox[{
1887 SubscriptBox["\<\"m\"\>", "3"], ",",
1888 SubscriptBox["\<\"m\"\>", "2"]}],
1889 SubscriptBox["\<\"a\"\>", "1"]]}], "-",
1890 RowBox[{"\[ImaginaryI]", " ",
1891 SubscriptBox["g", "s"], " ",
1892 SubsuperscriptBox["\<\"p\"\>", "3",
1893 SubscriptBox["\<\"\[Mu]\"\>", "1"]], " ",
1894 SubscriptBox["\[Eta]",
1895 RowBox[{
1896 SubscriptBox["\<\"\[Mu]\"\>", "2"], ",",
1897 SubscriptBox["\<\"\[Mu]\"\>", "3"]}]], " ",
1898 SubsuperscriptBox["T",
1899 RowBox[{
1900 SubscriptBox["\<\"m\"\>", "3"], ",",
1901 SubscriptBox["\<\"m\"\>", "2"]}],
1902 SubscriptBox["\<\"a\"\>", "1"]]}]}]}], "}"}], ",",
1903 RowBox[{"{",
1904 RowBox[{
1905 RowBox[{"{",
1906 RowBox[{
1907 RowBox[{"{",
1908 RowBox[{"G", ",", "1"}], "}"}], ",",
1909 RowBox[{"{",
1910 RowBox[{"G", ",", "2"}], "}"}], ",",
1911 RowBox[{"{",
1912 RowBox[{"LtQk", ",", "3"}], "}"}], ",",
1913 RowBox[{"{",
1914 RowBox[{
1915 SuperscriptBox["LtQk", "\[Dagger]"], ",", "4"}], "}"}]}], "}"}], ",",
1916 RowBox[{
1917 RowBox[{
1918 SubsuperscriptBox["g", "s", "2"], " ",
1919 SubscriptBox["f",
1920 RowBox[{
1921 SubscriptBox["\<\"a\"\>", "1"], ",",
1922 SubscriptBox["\<\"a\"\>", "2"], ",", "Gluon$1"}]], " ",
1923 SubscriptBox["\[Eta]",
1924 RowBox[{
1925 SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
1926 SubscriptBox["\<\"\[Mu]\"\>", "4"]}]], " ",
1927 SubscriptBox["\[Eta]",
1928 RowBox[{
1929 SubscriptBox["\<\"\[Mu]\"\>", "2"], ",",
1930 SubscriptBox["\<\"\[Mu]\"\>", "3"]}]], " ",
1931 SubsuperscriptBox["T",
1932 RowBox[{
1933 SubscriptBox["\<\"m\"\>", "4"], ",",
1934 SubscriptBox["\<\"m\"\>", "3"]}], "Gluon$1"]}], "-",
1935 RowBox[{
1936 SubsuperscriptBox["g", "s", "2"], " ",
1937 SubscriptBox["f",
1938 RowBox[{
1939 SubscriptBox["\<\"a\"\>", "1"], ",",
1940 SubscriptBox["\<\"a\"\>", "2"], ",", "Gluon$1"}]], " ",
1941 SubscriptBox["\[Eta]",
1942 RowBox[{
1943 SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
1944 SubscriptBox["\<\"\[Mu]\"\>", "3"]}]], " ",
1945 SubscriptBox["\[Eta]",
1946 RowBox[{
1947 SubscriptBox["\<\"\[Mu]\"\>", "2"], ",",
1948 SubscriptBox["\<\"\[Mu]\"\>", "4"]}]], " ",
1949 SubsuperscriptBox["T",
1950 RowBox[{
1951 SubscriptBox["\<\"m\"\>", "4"], ",",
1952 SubscriptBox["\<\"m\"\>", "3"]}], "Gluon$1"]}], "-",
1953 RowBox[{"\[ImaginaryI]", " ",
1954 SubsuperscriptBox["g", "s", "2"], " ",
1955 SubscriptBox["\[Eta]",
1956 RowBox[{
1957 SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
1958 SubscriptBox["\<\"\[Mu]\"\>", "3"]}]], " ",
1959 SubscriptBox["\[Eta]",
1960 RowBox[{
1961 SubscriptBox["\<\"\[Mu]\"\>", "2"], ",",
1962 SubscriptBox["\<\"\[Mu]\"\>", "4"]}]], " ",
1963 SubsuperscriptBox["T",
1964 RowBox[{
1965 SubscriptBox["\<\"m\"\>", "4"], ",", "Colour$1"}],
1966 SubscriptBox["\<\"a\"\>", "1"]], " ",
1967 SubsuperscriptBox["T",
1968 RowBox[{"Colour$1", ",",
1969 SubscriptBox["\<\"m\"\>", "3"]}],
1970 SubscriptBox["\<\"a\"\>", "2"]]}], "+",
1971 RowBox[{"\[ImaginaryI]", " ",
1972 SubsuperscriptBox["g", "s", "2"], " ",
1973 SubscriptBox["\[Eta]",
1974 RowBox[{
1975 SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
1976 SubscriptBox["\<\"\[Mu]\"\>", "2"]}]], " ",
1977 SubscriptBox["\[Eta]",
1978 RowBox[{
1979 SubscriptBox["\<\"\[Mu]\"\>", "3"], ",",
1980 SubscriptBox["\<\"\[Mu]\"\>", "4"]}]], " ",
1981 SubsuperscriptBox["T",
1982 RowBox[{
1983 SubscriptBox["\<\"m\"\>", "4"], ",", "Colour$1"}],
1984 SubscriptBox["\<\"a\"\>", "1"]], " ",
1985 SubsuperscriptBox["T",
1986 RowBox[{"Colour$1", ",",
1987 SubscriptBox["\<\"m\"\>", "3"]}],
1988 SubscriptBox["\<\"a\"\>", "2"]]}], "-",
1989 RowBox[{"\[ImaginaryI]", " ",
1990 SubsuperscriptBox["g", "s", "2"], " ",
1991 SubscriptBox["\[Eta]",
1992 RowBox[{
1993 SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
1994 SubscriptBox["\<\"\[Mu]\"\>", "4"]}]], " ",
1995 SubscriptBox["\[Eta]",
1996 RowBox[{
1997 SubscriptBox["\<\"\[Mu]\"\>", "2"], ",",
1998 SubscriptBox["\<\"\[Mu]\"\>", "3"]}]], " ",
1999 SubsuperscriptBox["T",
2000 RowBox[{"Colour$1", ",",
2001 SubscriptBox["\<\"m\"\>", "3"]}],
2002 SubscriptBox["\<\"a\"\>", "1"]], " ",
2003 SubsuperscriptBox["T",
2004 RowBox[{
2005 SubscriptBox["\<\"m\"\>", "4"], ",", "Colour$1"}],
2006 SubscriptBox["\<\"a\"\>", "2"]]}], "+",
2007 RowBox[{"\[ImaginaryI]", " ",
2008 SubsuperscriptBox["g", "s", "2"], " ",
2009 SubscriptBox["\[Eta]",
2010 RowBox[{
2011 SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
2012 SubscriptBox["\<\"\[Mu]\"\>", "2"]}]], " ",
2013 SubscriptBox["\[Eta]",
2014 RowBox[{
2015 SubscriptBox["\<\"\[Mu]\"\>", "3"], ",",
2016 SubscriptBox["\<\"\[Mu]\"\>", "4"]}]], " ",
2017 SubsuperscriptBox["T",
2018 RowBox[{"Colour$1", ",",
2019 SubscriptBox["\<\"m\"\>", "3"]}],
2020 SubscriptBox["\<\"a\"\>", "1"]], " ",
2021 SubsuperscriptBox["T",
2022 RowBox[{
2023 SubscriptBox["\<\"m\"\>", "4"], ",", "Colour$1"}],
2024 SubscriptBox["\<\"a\"\>", "2"]]}]}]}], "}"}]}], "}"}]], "Output",
2025 CellChangeTimes->{3.728817753549929*^9, 3.728832831701731*^9,
2026 3.7288332547905903`*^9, 3.7288349363473926`*^9, 3.728835392179028*^9,
2027 3.7316351227924924`*^9, 3.7316432741784115`*^9, 3.7316434956307297`*^9,
2028 3.7342574895115433`*^9, 3.734257742541518*^9, 3.734257976501457*^9,
2029 3.7342581013321486`*^9, 3.7342582331165266`*^9, 3.7342583023142385`*^9,
2030 3.745206148463097*^9, 3.7452068448052397`*^9, 3.745213317551347*^9,
2031 3.7452139496865573`*^9},
2032 CellLabel->"Out[9]=",ExpressionUUID->"6ead2a79-d6ca-4c87-85cd-afd65367f4f1"]
2033}, Open ]],
2034
2035Cell[CellGroupData[{
2036
2037Cell[BoxData[
2038 RowBox[{
2039 RowBox[{"FeynmanRules", "[", "LTotal", "]"}], ";"}]], "Input",
2040 CellChangeTimes->{{3.709954398591937*^9, 3.709954407192892*^9}, {
2041 3.710213613108117*^9, 3.7102136156913843`*^9}, 3.7117339487969275`*^9},
2042 CellLabel->"In[10]:=",ExpressionUUID->"8c54b549-72be-47d1-aff9-d38857f578dc"],
2043
2044Cell[CellGroupData[{
2045
2046Cell[BoxData[
2047 StyleBox["\<\"Starting Feynman rule calculation.\"\>",
2048 StripOnInput->False,
2049 LineColor->RGBColor[1, 0.5, 0],
2050 FrontFaceColor->RGBColor[1, 0.5, 0],
2051 BackFaceColor->RGBColor[1, 0.5, 0],
2052 GraphicsColor->RGBColor[1, 0.5, 0],
2053 FontWeight->Bold,
2054 FontColor->RGBColor[1, 0.5, 0]]], "Print",
2055 CellChangeTimes->{3.728835395815031*^9, 3.731392596479482*^9,
2056 3.7316351270204988`*^9, 3.7316432813444986`*^9, 3.7316435001549463`*^9,
2057 3.7342574938339496`*^9, 3.734257746744557*^9, 3.7342579765418077`*^9,
2058 3.7342581068339353`*^9, 3.734258236964346*^9, 3.7342583062685843`*^9,
2059 3.745206153849001*^9, 3.745206848613058*^9, 3.7452133231887884`*^9,
2060 3.745213955662648*^9},
2061 CellLabel->
2062 "During evaluation of \
2063In[10]:=",ExpressionUUID->"09955134-be66-4c6e-b845-bab065c2b989"],
2064
2065Cell[BoxData["\<\"Expanding the Lagrangian...\"\>"], "Print",
2066 CellChangeTimes->{3.728835395815031*^9, 3.731392596479482*^9,
2067 3.7316351270204988`*^9, 3.7316432813444986`*^9, 3.7316435001549463`*^9,
2068 3.7342574938339496`*^9, 3.734257746744557*^9, 3.7342579765418077`*^9,
2069 3.7342581068339353`*^9, 3.734258236964346*^9, 3.7342583062685843`*^9,
2070 3.745206153849001*^9, 3.745206848613058*^9, 3.7452133231887884`*^9,
2071 3.745213955662648*^9},
2072 CellLabel->
2073 "During evaluation of \
2074In[10]:=",ExpressionUUID->"35fa9836-d05a-49dd-b724-dae8cdf1b5ec"],
2075
2076Cell[BoxData[
2077 InterpretationBox[
2078 RowBox[{"\<\"Expanding the indices over \"\>", "\[InvisibleSpace]", "2",
2079 "\[InvisibleSpace]", "\<\" cores\"\>"}],
2080 SequenceForm["Expanding the indices over ", 2, " cores"],
2081 Editable->False]], "Print",
2082 CellChangeTimes->{3.728835395815031*^9, 3.731392596479482*^9,
2083 3.7316351270204988`*^9, 3.7316432813444986`*^9, 3.7316435001549463`*^9,
2084 3.7342574938339496`*^9, 3.734257746744557*^9, 3.7342579765418077`*^9,
2085 3.7342581068339353`*^9, 3.734258236964346*^9, 3.7342583062685843`*^9,
2086 3.745206153849001*^9, 3.745206848613058*^9, 3.7452133231887884`*^9,
2087 3.7452139556782694`*^9},
2088 CellLabel->
2089 "During evaluation of \
2090In[10]:=",ExpressionUUID->"04bc99a0-7df9-4d1a-b968-e81f92eade9a"],
2091
2092Cell[BoxData["\<\"Collecting the different structures that enter the \
2093vertex.\"\>"], "Print",
2094 CellChangeTimes->{3.728835395815031*^9, 3.731392596479482*^9,
2095 3.7316351270204988`*^9, 3.7316432813444986`*^9, 3.7316435001549463`*^9,
2096 3.7342574938339496`*^9, 3.734257746744557*^9, 3.7342579765418077`*^9,
2097 3.7342581068339353`*^9, 3.734258236964346*^9, 3.7342583062685843`*^9,
2098 3.745206153849001*^9, 3.745206848613058*^9, 3.7452133231887884`*^9,
2099 3.7452139640197887`*^9},
2100 CellLabel->
2101 "During evaluation of \
2102In[10]:=",ExpressionUUID->"b79ba44d-8477-4239-9fa9-327c7afc73b5"],
2103
2104Cell[BoxData[
2105 InterpretationBox[
2106 RowBox[{
2107 "42", "\[InvisibleSpace]", "\<\" possible non-zero vertices have been found \
2108-> starting the computation: \"\>", "\[InvisibleSpace]",
2109 DynamicBox[ToBoxes[FeynRules`FR$FeynmanRules, StandardForm],
2110 ImageSizeCache->{14., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
2111 "\[InvisibleSpace]", "42", "\[InvisibleSpace]", "\<\".\"\>"}],
2112 SequenceForm[
2113 42, " possible non-zero vertices have been found -> starting the \
2114computation: ",
2115 Dynamic[FeynRules`FR$FeynmanRules], " / ", 42, "."],
2116 Editable->False]], "Print",
2117 CellChangeTimes->{3.728835395815031*^9, 3.731392596479482*^9,
2118 3.7316351270204988`*^9, 3.7316432813444986`*^9, 3.7316435001549463`*^9,
2119 3.7342574938339496`*^9, 3.734257746744557*^9, 3.7342579765418077`*^9,
2120 3.7342581068339353`*^9, 3.734258236964346*^9, 3.7342583062685843`*^9,
2121 3.745206153849001*^9, 3.745206848613058*^9, 3.7452133231887884`*^9,
2122 3.7452139640822315`*^9},
2123 CellLabel->
2124 "During evaluation of \
2125In[10]:=",ExpressionUUID->"ff7d65a8-0f0c-46c7-b242-6e53eb2ffa7f"],
2126
2127Cell[BoxData[
2128 InterpretationBox[
2129 RowBox[{"37", "\[InvisibleSpace]", "\<\" vertices obtained.\"\>"}],
2130 SequenceForm[37, " vertices obtained."],
2131 Editable->False]], "Print",
2132 CellChangeTimes->{3.728835395815031*^9, 3.731392596479482*^9,
2133 3.7316351270204988`*^9, 3.7316432813444986`*^9, 3.7316435001549463`*^9,
2134 3.7342574938339496`*^9, 3.734257746744557*^9, 3.7342579765418077`*^9,
2135 3.7342581068339353`*^9, 3.734258236964346*^9, 3.7342583062685843`*^9,
2136 3.745206153849001*^9, 3.745206848613058*^9, 3.7452133231887884`*^9,
2137 3.7452139691150746`*^9},
2138 CellLabel->
2139 "During evaluation of \
2140In[10]:=",ExpressionUUID->"1d964e75-ab19-459e-8613-5c1cdfee292f"]
2141}, Open ]]
2142}, Open ]]
2143}, Open ]],
2144
2145Cell[CellGroupData[{
2146
2147Cell["Generating the UFO model files", "Section",
2148 CellChangeTimes->{{3.518892302672626*^9,
2149 3.518892305688608*^9}},ExpressionUUID->"e1654e2f-f511-4bf1-9a49-\
2150f8cca4af45c3"],
2151
2152Cell[CellGroupData[{
2153
2154Cell[BoxData[
2155 RowBox[{"WriteUFO", "[", "LTotal", "]"}]], "Input",
2156 CellChangeTimes->{{3.500890697245646*^9, 3.500890704222636*^9}, {
2157 3.5008908901215143`*^9, 3.5008908903708687`*^9}, {3.518892235767663*^9,
2158 3.518892237775363*^9}, {3.540113570516355*^9, 3.54011357075742*^9}, {
2159 3.5502935101903954`*^9, 3.550293511961158*^9}, 3.709954477716484*^9,
2160 3.710213694658132*^9},
2161 CellLabel->"In[11]:=",ExpressionUUID->"348a8e5d-4734-4aaa-9dc8-679dbf7b5093"],
2162
2163Cell[CellGroupData[{
2164
2165Cell[BoxData["\<\" --- Universal FeynRules Output (UFO) v 1.1 ---\"\>"], \
2166"Print",
2167 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2168 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2169 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2170 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2171 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2172 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2173 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2174 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2175 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2176 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2177 3.745206864479308*^9, 3.7452133576234627`*^9, 3.745213972900631*^9},
2178 CellLabel->
2179 "During evaluation of \
2180In[11]:=",ExpressionUUID->"976f0759-89be-4a8a-87a0-95698bb6ecea"],
2181
2182Cell[BoxData[
2183 StyleBox["\<\"Starting Feynman rule calculation.\"\>",
2184 StripOnInput->False,
2185 LineColor->RGBColor[1, 0.5, 0],
2186 FrontFaceColor->RGBColor[1, 0.5, 0],
2187 BackFaceColor->RGBColor[1, 0.5, 0],
2188 GraphicsColor->RGBColor[1, 0.5, 0],
2189 FontWeight->Bold,
2190 FontColor->RGBColor[1, 0.5, 0]]], "Print",
2191 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2192 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2193 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2194 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2195 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2196 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2197 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2198 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2199 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2200 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2201 3.745206864479308*^9, 3.7452133576234627`*^9, 3.745213973902576*^9},
2202 CellLabel->
2203 "During evaluation of \
2204In[11]:=",ExpressionUUID->"1b19db9b-ad87-4836-a9d3-04ebedb7f186"],
2205
2206Cell[BoxData["\<\"Expanding the Lagrangian...\"\>"], "Print",
2207 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2208 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2209 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2210 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2211 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2212 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2213 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2214 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2215 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2216 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2217 3.745206864479308*^9, 3.7452133576234627`*^9, 3.745213973924711*^9},
2218 CellLabel->
2219 "During evaluation of \
2220In[11]:=",ExpressionUUID->"90f35811-0b69-4400-9524-5398fe064dfa"],
2221
2222Cell[BoxData[
2223 InterpretationBox[
2224 RowBox[{"\<\"Expanding the indices over \"\>", "\[InvisibleSpace]", "2",
2225 "\[InvisibleSpace]", "\<\" cores\"\>"}],
2226 SequenceForm["Expanding the indices over ", 2, " cores"],
2227 Editable->False]], "Print",
2228 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2229 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2230 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2231 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2232 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2233 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2234 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2235 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2236 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2237 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2238 3.745206864479308*^9, 3.7452133576234627`*^9, 3.745213973924711*^9},
2239 CellLabel->
2240 "During evaluation of \
2241In[11]:=",ExpressionUUID->"0bdec706-03b3-4598-a425-763afce5fd53"],
2242
2243Cell[BoxData["\<\"Collecting the different structures that enter the \
2244vertex.\"\>"], "Print",
2245 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2246 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2247 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2248 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2249 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2250 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2251 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2252 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2253 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2254 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2255 3.745206864479308*^9, 3.7452133576234627`*^9, 3.7452139822891607`*^9},
2256 CellLabel->
2257 "During evaluation of \
2258In[11]:=",ExpressionUUID->"82472fbd-a3a6-4b36-9f15-c3afef7b365a"],
2259
2260Cell[BoxData[
2261 InterpretationBox[
2262 RowBox[{
2263 "42", "\[InvisibleSpace]", "\<\" possible non-zero vertices have been found \
2264-> starting the computation: \"\>", "\[InvisibleSpace]",
2265 DynamicBox[ToBoxes[FeynRules`FR$FeynmanRules, StandardForm],
2266 ImageSizeCache->{14., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
2267 "\[InvisibleSpace]", "42", "\[InvisibleSpace]", "\<\".\"\>"}],
2268 SequenceForm[
2269 42, " possible non-zero vertices have been found -> starting the \
2270computation: ",
2271 Dynamic[FeynRules`FR$FeynmanRules], " / ", 42, "."],
2272 Editable->False]], "Print",
2273 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2274 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2275 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2276 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2277 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2278 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2279 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2280 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2281 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2282 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2283 3.745206864479308*^9, 3.7452133576234627`*^9, 3.7452139823410625`*^9},
2284 CellLabel->
2285 "During evaluation of \
2286In[11]:=",ExpressionUUID->"6ce9dbe3-b79a-4b91-8526-a4281b95ce78"],
2287
2288Cell[BoxData[
2289 InterpretationBox[
2290 RowBox[{"37", "\[InvisibleSpace]", "\<\" vertices obtained.\"\>"}],
2291 SequenceForm[37, " vertices obtained."],
2292 Editable->False]], "Print",
2293 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2294 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2295 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2296 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2297 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2298 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2299 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2300 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2301 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2302 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2303 3.745206864479308*^9, 3.7452133576234627`*^9, 3.7452139882960863`*^9},
2304 CellLabel->
2305 "During evaluation of \
2306In[11]:=",ExpressionUUID->"f596fde5-9fb3-4ed2-9c18-e661e1071d7d"],
2307
2308Cell[BoxData[
2309 InterpretationBox[
2310 RowBox[{"\<\"Flavor expansion of the vertices: \"\>", "\[InvisibleSpace]",
2311 DynamicBox[ToBoxes[FeynRules`FR$Count1, StandardForm],
2312 ImageSizeCache->{14., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
2313 "\[InvisibleSpace]", "37"}],
2314 SequenceForm["Flavor expansion of the vertices: ",
2315 Dynamic[FeynRules`FR$Count1], " / ", 37],
2316 Editable->False]], "Print",
2317 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2318 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2319 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2320 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2321 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2322 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2323 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2324 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2325 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2326 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2327 3.745206864479308*^9, 3.7452133576234627`*^9, 3.7452139898136272`*^9},
2328 CellLabel->
2329 "During evaluation of \
2330In[11]:=",ExpressionUUID->"6e72916d-05c2-4439-8b52-93b430fe7472"],
2331
2332Cell[BoxData["\<\" - Saved vertices in InterfaceRun[ 1 ].\"\>"], "Print",
2333 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2334 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2335 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2336 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2337 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2338 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2339 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2340 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2341 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2342 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2343 3.745206864479308*^9, 3.7452133576234627`*^9, 3.745213998681135*^9},
2344 CellLabel->
2345 "During evaluation of \
2346In[11]:=",ExpressionUUID->"f6b04e63-d8f3-4893-b778-3e0d9a6d99f1"],
2347
2348Cell[BoxData[
2349 StyleBox["\<\"Computing the squared matrix elements relevant for the 1->2 \
2350decays: \"\>",
2351 StripOnInput->False,
2352 LineColor->RGBColor[1, 0.5, 0],
2353 FrontFaceColor->RGBColor[1, 0.5, 0],
2354 BackFaceColor->RGBColor[1, 0.5, 0],
2355 GraphicsColor->RGBColor[1, 0.5, 0],
2356 FontWeight->Bold,
2357 FontColor->RGBColor[1, 0.5, 0]]], "Print",
2358 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2359 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2360 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2361 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2362 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2363 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2364 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2365 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2366 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2367 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2368 3.745206864479308*^9, 3.7452133576234627`*^9, 3.7452139987345157`*^9},
2369 CellLabel->
2370 "During evaluation of \
2371In[11]:=",ExpressionUUID->"7c8e2dc0-55bd-4b98-90db-7c13d017d016"],
2372
2373Cell[BoxData[
2374 InterpretationBox[
2375 RowBox[{
2376 DynamicBox[ToBoxes[PRIVATE`mycounter, StandardForm],
2377 ImageSizeCache->{21., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
2378 "\[InvisibleSpace]", "84"}],
2379 SequenceForm[
2380 Dynamic[PRIVATE`mycounter], " / ", 84],
2381 Editable->False]], "Print",
2382 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2383 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2384 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2385 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2386 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2387 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2388 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2389 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2390 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2391 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2392 3.745206864479308*^9, 3.7452133576234627`*^9, 3.745213998818797*^9},
2393 CellLabel->
2394 "During evaluation of \
2395In[11]:=",ExpressionUUID->"cbc2835b-56f3-46a3-8eb3-4481a9a0655f"],
2396
2397Cell[BoxData[
2398 InterpretationBox[
2399 RowBox[{"\<\"Squared matrix elent compute in \"\>", "\[InvisibleSpace]",
2400 "0.984375`", "\[InvisibleSpace]", "\<\" seconds.\"\>"}],
2401 SequenceForm["Squared matrix elent compute in ", 0.984375, " seconds."],
2402 Editable->False]], "Print",
2403 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2404 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2405 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2406 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2407 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2408 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2409 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2410 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2411 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2412 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2413 3.745206864479308*^9, 3.7452133576234627`*^9, 3.7452140225636344`*^9},
2414 CellLabel->
2415 "During evaluation of \
2416In[11]:=",ExpressionUUID->"df9dd602-7e6f-4a36-9b09-ff65e23417df"],
2417
2418Cell[BoxData[
2419 InterpretationBox[
2420 RowBox[{
2421 DynamicBox[ToBoxes[PRIVATE`mycounter, StandardForm],
2422 ImageSizeCache->{21., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
2423 "\[InvisibleSpace]", "102"}],
2424 SequenceForm[
2425 Dynamic[PRIVATE`mycounter], " / ", 102],
2426 Editable->False]], "Print",
2427 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2428 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2429 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2430 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2431 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2432 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2433 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2434 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2435 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2436 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2437 3.745206864479308*^9, 3.7452133576234627`*^9, 3.7452140226136055`*^9},
2438 CellLabel->
2439 "During evaluation of \
2440In[11]:=",ExpressionUUID->"b5a74225-41a7-4dcc-9bc6-188eac1d41fc"],
2441
2442Cell[BoxData[
2443 InterpretationBox[
2444 RowBox[{"\<\"Decay widths computed in \"\>", "\[InvisibleSpace]",
2445 "1.921875`", "\[InvisibleSpace]", "\<\" seconds.\"\>"}],
2446 SequenceForm["Decay widths computed in ", 1.921875, " seconds."],
2447 Editable->False]], "Print",
2448 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2449 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2450 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2451 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2452 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2453 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2454 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2455 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2456 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2457 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2458 3.745206864479308*^9, 3.7452133576234627`*^9, 3.745214027974749*^9},
2459 CellLabel->
2460 "During evaluation of \
2461In[11]:=",ExpressionUUID->"32c20ee6-8d25-409e-bad9-3b24e49c7779"],
2462
2463Cell[BoxData["\<\"Preparing Python output.\"\>"], "Print",
2464 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2465 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2466 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2467 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2468 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2469 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2470 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2471 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2472 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2473 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2474 3.745206864479308*^9, 3.7452133576234627`*^9, 3.745214027974749*^9},
2475 CellLabel->
2476 "During evaluation of \
2477In[11]:=",ExpressionUUID->"9b53d977-7f69-4f25-a8d2-36c7d63a4bd4"],
2478
2479Cell[BoxData["\<\" - Splitting vertices into building blocks.\"\>"], \
2480"Print",
2481 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2482 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2483 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2484 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2485 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2486 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2487 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2488 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2489 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2490 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2491 3.745206864479308*^9, 3.7452133576234627`*^9, 3.745214028282024*^9},
2492 CellLabel->
2493 "During evaluation of \
2494In[11]:=",ExpressionUUID->"c558916e-effd-416a-a864-21758d06a691"],
2495
2496Cell[BoxData[
2497 InterpretationBox[
2498 RowBox[{"\<\"Splitting of vertices distributed over \"\>",
2499 "\[InvisibleSpace]", "2", "\[InvisibleSpace]", "\<\" kernels.\"\>"}],
2500 SequenceForm["Splitting of vertices distributed over ", 2, " kernels."],
2501 Editable->False]], "Print",
2502 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2503 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2504 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2505 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2506 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2507 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2508 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2509 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2510 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2511 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2512 3.745206864479308*^9, 3.7452133576234627`*^9, 3.745214028323316*^9},
2513 CellLabel->
2514 "During evaluation of \
2515In[11]:=",ExpressionUUID->"c04d1bfc-ef88-4341-b056-25574b1da1b4"],
2516
2517Cell[BoxData[
2518 InterpretationBox[
2519 RowBox[{"\<\" - Optimizing: \"\>", "\[InvisibleSpace]",
2520 DynamicBox[ToBoxes[PRIVATE`PY$SplitVertexCounter, StandardForm],
2521 ImageSizeCache->{21., {0., 8.}}], "\[InvisibleSpace]", "\<\"/\"\>",
2522 "\[InvisibleSpace]", "113", "\[InvisibleSpace]", "\<\" .\"\>"}],
2523 SequenceForm[" - Optimizing: ",
2524 Dynamic[PRIVATE`PY$SplitVertexCounter], "/", 113, " ."],
2525 Editable->False]], "Print",
2526 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2527 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2528 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2529 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2530 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2531 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2532 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2533 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2534 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2535 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2536 3.745206864479308*^9, 3.7452133576234627`*^9, 3.745214031732518*^9},
2537 CellLabel->
2538 "During evaluation of \
2539In[11]:=",ExpressionUUID->"f58e8ee5-fae5-4fe0-9e2c-66becae9a9ed"],
2540
2541Cell[BoxData["\<\" - Writing files.\"\>"], "Print",
2542 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2543 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2544 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2545 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2546 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2547 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2548 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2549 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2550 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2551 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2552 3.745206864479308*^9, 3.7452133576234627`*^9, 3.7452140319642887`*^9},
2553 CellLabel->
2554 "During evaluation of \
2555In[11]:=",ExpressionUUID->"9ad08d87-fbe2-4fcf-b9dd-c75d0e8f690d"],
2556
2557Cell[BoxData["\<\"Done!\"\>"], "Print",
2558 CellChangeTimes->{3.7102137001206026`*^9, 3.710214741650037*^9,
2559 3.71021556665554*^9, 3.710216399184409*^9, 3.7102167304448795`*^9,
2560 3.7107167464121084`*^9, 3.7107187859238625`*^9, 3.710718930916628*^9,
2561 3.7107731157979097`*^9, 3.710778183925301*^9, 3.710778383075246*^9,
2562 3.7108436071704035`*^9, 3.7108451590203466`*^9, 3.7114239461215115`*^9,
2563 3.711718797632494*^9, 3.711733971891038*^9, 3.714779084832465*^9,
2564 3.7278349547146196`*^9, 3.7288352887263126`*^9, 3.728835415335994*^9,
2565 3.731392673708617*^9, 3.7316351470807395`*^9, 3.731643302329402*^9,
2566 3.731643543080432*^9, 3.734257509373849*^9, 3.734257798668664*^9,
2567 3.734258129140753*^9, 3.7342582531532164`*^9, 3.7452061716858068`*^9,
2568 3.745206864479308*^9, 3.7452133576234627`*^9, 3.7452140326355553`*^9},
2569 CellLabel->
2570 "During evaluation of \
2571In[11]:=",ExpressionUUID->"940f16a5-5a18-4602-88c8-c9a74b219adf"]
2572}, Open ]]
2573}, Open ]]
2574}, Open ]]
2575}, Open ]]
2576},
2577WindowSize->{674, 652},
2578WindowMargins->{{Automatic, 105}, {-27, Automatic}},
2579FrontEndVersion->"11.3 for Microsoft Windows (64-bit) (March 6, 2018)",
2580StyleDefinitions->"Default.nb"
2581]
2582(* End of Notebook Content *)
2583
2584(* Internal cache information *)
2585(*CellTagsOutline
2586CellTagsIndex->{}
2587*)
2588(*CellTagsIndex
2589CellTagsIndex->{}
2590*)
2591(*NotebookFileOutline
2592Notebook[{
2593Cell[558, 20, 199, 3, 28, "Input",ExpressionUUID->"35fb9169-6165-45f2-bb47-d2b5a30fdac3"],
2594Cell[CellGroupData[{
2595Cell[782, 27, 161, 3, 67, "Section",ExpressionUUID->"d3c1a50a-7a32-4ff7-9e5b-f82af6c85fb6"],
2596Cell[CellGroupData[{
2597Cell[968, 34, 568, 10, 86, "Input",ExpressionUUID->"f0518695-6cd4-402e-98f3-cd0a888e3378"],
2598Cell[1539, 46, 4265, 58, 52, "Output",ExpressionUUID->"b0f19208-0c95-4885-b5bd-90dc83ca6599"]
2599}, Open ]],
2600Cell[CellGroupData[{
2601Cell[5841, 109, 198, 3, 28, "Input",ExpressionUUID->"99a894d2-6aa4-443c-b8a0-97d67849d48a"],
2602Cell[CellGroupData[{
2603Cell[6064, 116, 3797, 54, 22, "Print",ExpressionUUID->"32452b76-43d1-43b0-b85c-5c4fe04243c1"],
2604Cell[9864, 172, 4067, 61, 22, "Print",ExpressionUUID->"514f8a91-04bd-49f8-9983-ff16a621b96a"],
2605Cell[13934, 235, 3846, 55, 22, "Print",ExpressionUUID->"50e09a48-e77f-4316-9e43-d569abdbbd5a"],
2606Cell[17783, 292, 3780, 54, 22, "Print",ExpressionUUID->"3ee1fead-5554-4e6e-996d-5f0f8c61ba2c"],
2607Cell[21566, 348, 3791, 54, 22, "Print",ExpressionUUID->"5d8270a1-ac50-4e39-b6d5-a91604265303"],
2608Cell[25360, 404, 3844, 55, 22, "Print",ExpressionUUID->"3a919dad-d3cb-498d-9db8-d740c52163f5"],
2609Cell[29207, 461, 3842, 55, 22, "Print",ExpressionUUID->"9edc3f9c-4082-4b7b-ade8-66623645dd51"],
2610Cell[33052, 518, 3781, 54, 22, "Print",ExpressionUUID->"c7e969ad-d4d7-44c5-856c-4a4935d8d568"],
2611Cell[36836, 574, 3811, 54, 22, "Print",ExpressionUUID->"3215d37b-1ea4-4917-8ee4-7ae8d60fd052"],
2612Cell[40650, 630, 3781, 54, 22, "Print",ExpressionUUID->"6bd2e081-0001-470a-b726-a90d61a827af"],
2613Cell[44434, 686, 3848, 55, 22, "Print",ExpressionUUID->"41affcc9-c221-4d6a-b22e-355e4978f954"]
2614}, Open ]]
2615}, Open ]]
2616}, Open ]],
2617Cell[CellGroupData[{
2618Cell[48343, 748, 167, 3, 96, "Title",ExpressionUUID->"f94cc9ed-8330-40b3-be25-b202d3edd878"],
2619Cell[CellGroupData[{
2620Cell[48535, 755, 159, 3, 67, "Section",ExpressionUUID->"3c0a92d1-e1ed-45c6-9b66-6871fb2e8bb2"],
2621Cell[CellGroupData[{
2622Cell[48719, 762, 459, 8, 28, "Input",ExpressionUUID->"7ac78549-10ee-41be-9b70-ecfcb38ff72a"],
2623Cell[49181, 772, 479, 6, 52, "Output",ExpressionUUID->"06781cf3-fffb-4f4c-875d-56621aea5985"]
2624}, Open ]],
2625Cell[CellGroupData[{
2626Cell[49697, 783, 1354, 19, 28, "Input",ExpressionUUID->"842fe880-943f-4306-8db4-ba8ac672cdf8"],
2627Cell[CellGroupData[{
2628Cell[51076, 806, 465, 8, 22, "Print",ExpressionUUID->"07a776cb-8e3a-40b2-aa81-5d7c7254f6b7"],
2629Cell[51544, 816, 483, 8, 22, "Print",ExpressionUUID->"718ac68f-0394-41f2-83a7-3cd96d55e84e"],
2630Cell[52030, 826, 449, 8, 22, "Print",ExpressionUUID->"1a2d2f3a-2bb3-42fd-9de1-9fa3a094a573"],
2631Cell[52482, 836, 589, 12, 22, "Print",ExpressionUUID->"03b3ffa4-fc87-469c-bd77-8f2830e12c7e"],
2632Cell[53074, 850, 491, 9, 22, "Print",ExpressionUUID->"45ac5026-319c-4c26-9791-6b9c339ca6ed"],
2633Cell[53568, 861, 443, 8, 22, "Print",ExpressionUUID->"de7fc3b9-603e-4ba9-90eb-e27f4f41699e"],
2634Cell[54014, 871, 473, 8, 22, "Print",ExpressionUUID->"bb66fac0-327b-4686-b475-34edf56b7065"],
2635Cell[54490, 881, 476, 8, 22, "Print",ExpressionUUID->"3aae46c1-fa3a-47b0-b4e4-b9ac98a4946e"],
2636Cell[54969, 891, 472, 8, 22, "Print",ExpressionUUID->"e00e11e7-25ee-438f-a54f-06e3996063ab"],
2637Cell[55444, 901, 679, 14, 41, "Print",ExpressionUUID->"40a02ad9-d682-43d3-a27f-976c1a5d2a54"]
2638}, Open ]]
2639}, Open ]]
2640}, Open ]],
2641Cell[CellGroupData[{
2642Cell[56184, 922, 218, 4, 67, "Section",ExpressionUUID->"218e265c-8c3e-40d4-a7ce-05631f9cbbdf"],
2643Cell[CellGroupData[{
2644Cell[56427, 930, 177, 2, 28, "Input",ExpressionUUID->"dcc62cca-dcd0-4b6f-9c02-f038d40a4127"],
2645Cell[56607, 934, 4488, 102, 122, "Output",ExpressionUUID->"0e66b283-1b56-45e8-aa93-5104d097628b"]
2646}, Open ]],
2647Cell[CellGroupData[{
2648Cell[61132, 1041, 176, 2, 28, "Input",ExpressionUUID->"5ae8bf37-7631-4622-84bc-8a13fb413d39"],
2649Cell[61311, 1045, 3905, 102, 175, "Output",ExpressionUUID->"00d55f52-8bf3-4702-a430-52cb964d10e8"]
2650}, Open ]],
2651Cell[CellGroupData[{
2652Cell[65253, 1152, 404, 6, 28, "Input",ExpressionUUID->"90e0aab2-2f48-48a7-a061-6c154ba92329"],
2653Cell[65660, 1160, 8827, 247, 708, "Output",ExpressionUUID->"7c59a2d1-260e-4813-9633-9baedad97220"]
2654}, Open ]],
2655Cell[CellGroupData[{
2656Cell[74524, 1412, 215, 3, 28, "Input",ExpressionUUID->"1159c70f-9390-4e41-affc-c016a1695ff5"],
2657Cell[CellGroupData[{
2658Cell[74764, 1419, 1270, 23, 22, "Print",ExpressionUUID->"d37edca3-67af-4c15-b86f-416e9371724f"],
2659Cell[76037, 1444, 1025, 15, 22, "Print",ExpressionUUID->"40610d7c-cbae-45b0-9846-827e2021b08e"],
2660Cell[77065, 1461, 1056, 16, 22, "Print",ExpressionUUID->"a63c17ba-3c96-4dc6-a822-bdc6529c14d1"],
2661Cell[78124, 1479, 1532, 27, 22, "Print",ExpressionUUID->"3fb83c47-fc94-4250-9c76-122e87e80ca0"],
2662Cell[79659, 1508, 1138, 19, 22, "Print",ExpressionUUID->"0a813d16-b8ab-4bcb-9b08-bd8b772cbca0"]
2663}, Open ]],
2664Cell[80812, 1530, 4887, 133, 145, "Output",ExpressionUUID->"ef9fdd18-ab09-4118-a92a-d51e503beb66"]
2665}, Open ]],
2666Cell[CellGroupData[{
2667Cell[85736, 1668, 370, 5, 28, "Input",ExpressionUUID->"a8742e42-7437-483f-b943-a4ca55b5b971"],
2668Cell[CellGroupData[{
2669Cell[86131, 1677, 1507, 27, 22, "Print",ExpressionUUID->"4da87593-a37c-416f-afbb-270221b8334f"],
2670Cell[87641, 1706, 1264, 19, 22, "Print",ExpressionUUID->"8178fea3-be60-408b-b4f6-fc1f863f3c0a"],
2671Cell[88908, 1727, 1295, 20, 22, "Print",ExpressionUUID->"637d031c-8a95-4608-b0f0-ac21dbc77847"],
2672Cell[90206, 1749, 1771, 31, 22, "Print",ExpressionUUID->"42bf05c8-356f-4723-94cf-e1bf429c2681"],
2673Cell[91980, 1782, 1377, 23, 22, "Print",ExpressionUUID->"8c1e3868-3e52-4936-b50f-6e4677010ff6"]
2674}, Open ]],
2675Cell[93372, 1808, 8605, 223, 182, "Output",ExpressionUUID->"6ead2a79-d6ca-4c87-85cd-afd65367f4f1"]
2676}, Open ]],
2677Cell[CellGroupData[{
2678Cell[102014, 2036, 309, 5, 28, "Input",ExpressionUUID->"8c54b549-72be-47d1-aff9-d38857f578dc"],
2679Cell[CellGroupData[{
2680Cell[102348, 2045, 792, 17, 22, "Print",ExpressionUUID->"09955134-be66-4c6e-b845-bab065c2b989"],
2681Cell[103143, 2064, 547, 9, 22, "Print",ExpressionUUID->"35fa9836-d05a-49dd-b724-dae8cdf1b5ec"],
2682Cell[103693, 2075, 731, 14, 22, "Print",ExpressionUUID->"04bc99a0-7df9-4d1a-b968-e81f92eade9a"],
2683Cell[104427, 2091, 582, 10, 22, "Print",ExpressionUUID->"b79ba44d-8477-4239-9fa9-327c7afc73b5"],
2684Cell[105012, 2103, 1063, 21, 41, "Print",ExpressionUUID->"ff7d65a8-0f0c-46c7-b242-6e53eb2ffa7f"],
2685Cell[106078, 2126, 664, 13, 22, "Print",ExpressionUUID->"1d964e75-ab19-459e-8613-5c1cdfee292f"]
2686}, Open ]]
2687}, Open ]]
2688}, Open ]],
2689Cell[CellGroupData[{
2690Cell[106803, 2146, 175, 3, 67, "Section",ExpressionUUID->"e1654e2f-f511-4bf1-9a49-f8cca4af45c3"],
2691Cell[CellGroupData[{
2692Cell[107003, 2153, 460, 7, 28, "Input",ExpressionUUID->"348a8e5d-4734-4aaa-9dc8-679dbf7b5093"],
2693Cell[CellGroupData[{
2694Cell[107488, 2164, 969, 15, 22, "Print",ExpressionUUID->"976f0759-89be-4a8a-87a0-95698bb6ecea"],
2695Cell[108460, 2181, 1192, 22, 22, "Print",ExpressionUUID->"1b19db9b-ad87-4836-a9d3-04ebedb7f186"],
2696Cell[109655, 2205, 947, 14, 22, "Print",ExpressionUUID->"90f35811-0b69-4400-9524-5398fe064dfa"],
2697Cell[110605, 2221, 1129, 19, 22, "Print",ExpressionUUID->"0bdec706-03b3-4598-a425-763afce5fd53"],
2698Cell[111737, 2242, 982, 15, 22, "Print",ExpressionUUID->"82472fbd-a3a6-4b36-9f15-c3afef7b365a"],
2699Cell[112722, 2259, 1463, 26, 41, "Print",ExpressionUUID->"6ce9dbe3-b79a-4b91-8526-a4281b95ce78"],
2700Cell[114188, 2287, 1064, 18, 22, "Print",ExpressionUUID->"f596fde5-9fb3-4ed2-9c18-e661e1071d7d"],
2701Cell[115255, 2307, 1293, 22, 22, "Print",ExpressionUUID->"6e72916d-05c2-4439-8b52-93b430fe7472"],
2702Cell[116551, 2331, 961, 14, 22, "Print",ExpressionUUID->"f6b04e63-d8f3-4893-b778-3e0d9a6d99f1"],
2703Cell[117515, 2347, 1230, 23, 22, "Print",ExpressionUUID->"7c8e2dc0-55bd-4b98-90db-7c13d017d016"],
2704Cell[118748, 2372, 1182, 22, 22, "Print",ExpressionUUID->"cbc2835b-56f3-46a3-8eb3-4481a9a0655f"],
2705Cell[119933, 2396, 1162, 19, 22, "Print",ExpressionUUID->"df9dd602-7e6f-4a36-9b09-ff65e23417df"],
2706Cell[121098, 2417, 1186, 22, 22, "Print",ExpressionUUID->"b5a74225-41a7-4dcc-9bc6-188eac1d41fc"],
2707Cell[122287, 2441, 1146, 19, 22, "Print",ExpressionUUID->"32c20ee6-8d25-409e-bad9-3b24e49c7779"],
2708Cell[123436, 2462, 944, 14, 22, "Print",ExpressionUUID->"9b53d977-7f69-4f25-a8d2-36c7d63a4bd4"],
2709Cell[124383, 2478, 968, 15, 22, "Print",ExpressionUUID->"c558916e-effd-416a-a864-21758d06a691"],
2710Cell[125354, 2495, 1159, 19, 22, "Print",ExpressionUUID->"c04d1bfc-ef88-4341-b056-25574b1da1b4"],
2711Cell[126516, 2516, 1318, 22, 22, "Print",ExpressionUUID->"f58e8ee5-fae5-4fe0-9e2c-66becae9a9ed"],
2712Cell[127837, 2540, 942, 14, 22, "Print",ExpressionUUID->"9ad08d87-fbe2-4fcf-b9dd-c75d0e8f690d"],
2713Cell[128782, 2556, 927, 14, 22, "Print",ExpressionUUID->"940f16a5-5a18-4602-88c8-c9a74b219adf"]
2714}, Open ]]
2715}, Open ]]
2716}, Open ]]
2717}, Open ]]
2718}
2719]
2720*)
2721