DMsimp: DMsimp_s_spin1.nb

File DMsimp_s_spin1.nb, 312.4 KB (added by mawatari, 4 years ago)

Mathematica notebook for the DMsimp s-channel spin-1 model

Line 
1(* Content-type: application/vnd.wolfram.mathematica *)
2
3(*** Wolfram Notebook File ***)
4(* http://www.wolfram.com/nb *)
5
6(* CreatedBy='Mathematica 9.0' *)
7
8(*CacheID: 234*)
9(* Internal cache information:
10NotebookFileLineBreakTest
11NotebookFileLineBreakTest
12NotebookDataPosition[       157,          7]
13NotebookDataLength[    319721,       6599]
14NotebookOptionsPosition[    297333,       6012]
15NotebookOutlinePosition[    297670,       6027]
16CellTagsIndexPosition[    297627,       6024]
17WindowFrame->Normal*)
18
19(* Beginning of Notebook Content *)
20Notebook[{
21Cell[BoxData[
22 RowBox[{"Quit", "[", "]"}]], "Input",
23 CellChangeTimes->{{3.6035389591727333`*^9, 3.6035389606320753`*^9}, {
24  3.608281672604871*^9, 3.608281673651908*^9}, {3.6097575541555*^9,
25  3.609757557300255*^9}}],
26
27Cell[BoxData[
28 RowBox[{
29  RowBox[{"$FeynRulesPath", "=",
30   RowBox[{
31   "SetDirectory", "[", "\"\<~/Documents/feynrules-current_3_7\>\"", "]"}]}],
32  ";"}]], "Input",
33 CellChangeTimes->{{3.60353897829296*^9, 3.603539043421093*^9}, {
34   3.633332218679607*^9, 3.6333322194542303`*^9}, 3.633333796845446*^9, {
35   3.64301873415166*^9, 3.64301873665499*^9}, {3.6452720966860647`*^9,
36   3.645272098076991*^9}, {3.647076372652458*^9, 3.647076373114575*^9}}],
37
38Cell[CellGroupData[{
39
40Cell[BoxData[
41 RowBox[{"<<", "FeynRules`"}]], "Input",
42 CellChangeTimes->{{3.603539048879374*^9, 3.603539054382785*^9}, {
43  3.630748915770712*^9, 3.630748916976617*^9}}],
44
45Cell[CellGroupData[{
46
47Cell[BoxData["\<\" - FeynRules - \"\>"], "Print",
48 CellChangeTimes->{
49  3.6110361274817457`*^9, 3.611036216598939*^9, 3.6110367049806023`*^9,
50   3.611045876569394*^9, 3.611046056835099*^9, 3.61104651117745*^9,
51   3.616920484813521*^9, 3.616921485363764*^9, 3.616922083363084*^9,
52   3.6169222498253803`*^9, 3.61692247671194*^9, 3.6169225850237217`*^9,
53   3.626081965782981*^9, 3.627485432509675*^9, 3.62762805295048*^9,
54   3.6276356752872562`*^9, 3.627800213057104*^9, 3.6307489184278393`*^9,
55   3.63333222790595*^9, 3.6333337902040663`*^9, 3.633347976246666*^9,
56   3.6334297893921328`*^9, 3.633759461568802*^9, 3.633759633282177*^9,
57   3.633759726730798*^9, {3.633759792106916*^9, 3.633759815923191*^9},
58   3.633761293839384*^9, 3.6337670547127237`*^9, 3.635682215184022*^9,
59   3.635682934883945*^9, 3.635760127197874*^9, 3.635760175783587*^9,
60   3.6376406863896637`*^9, 3.637640726419091*^9, 3.637640758629774*^9,
61   3.637640958230589*^9, 3.637641405244493*^9, 3.637641495220693*^9,
62   3.637642208784834*^9, 3.637642569793989*^9, 3.6376426520030203`*^9,
63   3.637648124759632*^9, 3.639376994064643*^9, 3.639377077882502*^9,
64   3.639377201190076*^9, 3.639377317501244*^9, 3.639377410990694*^9,
65   3.639377513942395*^9, 3.639377585687583*^9, 3.639379644215146*^9,
66   3.639379726261013*^9, 3.639388637108721*^9, 3.639388668138874*^9,
67   3.639988974910592*^9, 3.640510185967122*^9, 3.641476026156052*^9,
68   3.641539935478367*^9, 3.6416348653469257`*^9, 3.641727097245332*^9,
69   3.64178949804799*^9, 3.641789770803505*^9, 3.6430232558014317`*^9, {
70   3.6430251332931433`*^9, 3.643025158675023*^9}, 3.643025218786581*^9,
71   3.645272106771387*^9, 3.645273267771743*^9, 3.6452749191028843`*^9,
72   3.645770337337294*^9, 3.645780123516604*^9, 3.645780416101548*^9,
73   3.64602634578681*^9, 3.6463709293456306`*^9, 3.646371738253957*^9,
74   3.646377062533774*^9, 3.646388598051454*^9, 3.646733866316379*^9,
75   3.646733955464802*^9, 3.647076458494377*^9, 3.647347856687975*^9,
76   3.649403273138598*^9, 3.649404335728375*^9}],
77
78Cell[BoxData[
79 InterpretationBox[
80  RowBox[{"\<\"Version: \"\>", "\[InvisibleSpace]", "\<\"2.3.7\"\>",
81   "\[InvisibleSpace]",
82   RowBox[{"\<\" (\"\>", " ", "\<\"27 July 2015\"\>"}],
83   "\[InvisibleSpace]", "\<\").\"\>"}],
84  SequenceForm["Version: ", "2.3.7", " (" "27 July 2015", ")."],
85  Editable->False]], "Print",
86 CellChangeTimes->{
87  3.6110361274817457`*^9, 3.611036216598939*^9, 3.6110367049806023`*^9,
88   3.611045876569394*^9, 3.611046056835099*^9, 3.61104651117745*^9,
89   3.616920484813521*^9, 3.616921485363764*^9, 3.616922083363084*^9,
90   3.6169222498253803`*^9, 3.61692247671194*^9, 3.6169225850237217`*^9,
91   3.626081965782981*^9, 3.627485432509675*^9, 3.62762805295048*^9,
92   3.6276356752872562`*^9, 3.627800213057104*^9, 3.6307489184278393`*^9,
93   3.63333222790595*^9, 3.6333337902040663`*^9, 3.633347976246666*^9,
94   3.6334297893921328`*^9, 3.633759461568802*^9, 3.633759633282177*^9,
95   3.633759726730798*^9, {3.633759792106916*^9, 3.633759815923191*^9},
96   3.633761293839384*^9, 3.6337670547127237`*^9, 3.635682215184022*^9,
97   3.635682934883945*^9, 3.635760127197874*^9, 3.635760175783587*^9,
98   3.6376406863896637`*^9, 3.637640726419091*^9, 3.637640758629774*^9,
99   3.637640958230589*^9, 3.637641405244493*^9, 3.637641495220693*^9,
100   3.637642208784834*^9, 3.637642569793989*^9, 3.6376426520030203`*^9,
101   3.637648124759632*^9, 3.639376994064643*^9, 3.639377077882502*^9,
102   3.639377201190076*^9, 3.639377317501244*^9, 3.639377410990694*^9,
103   3.639377513942395*^9, 3.639377585687583*^9, 3.639379644215146*^9,
104   3.639379726261013*^9, 3.639388637108721*^9, 3.639388668138874*^9,
105   3.639988974910592*^9, 3.640510185967122*^9, 3.641476026156052*^9,
106   3.641539935478367*^9, 3.6416348653469257`*^9, 3.641727097245332*^9,
107   3.64178949804799*^9, 3.641789770803505*^9, 3.6430232558014317`*^9, {
108   3.6430251332931433`*^9, 3.643025158675023*^9}, 3.643025218786581*^9,
109   3.645272106771387*^9, 3.645273267771743*^9, 3.6452749191028843`*^9,
110   3.645770337337294*^9, 3.645780123516604*^9, 3.645780416101548*^9,
111   3.64602634578681*^9, 3.6463709293456306`*^9, 3.646371738253957*^9,
112   3.646377062533774*^9, 3.646388598051454*^9, 3.646733866316379*^9,
113   3.646733955464802*^9, 3.647076458494377*^9, 3.647347856687975*^9,
114   3.649403273138598*^9, 3.649404335769599*^9}],
115
116Cell[BoxData["\<\"Authors: A. Alloul, N. Christensen, C. Degrande, C. Duhr, \
117B. Fuks\"\>"], "Print",
118 CellChangeTimes->{
119  3.6110361274817457`*^9, 3.611036216598939*^9, 3.6110367049806023`*^9,
120   3.611045876569394*^9, 3.611046056835099*^9, 3.61104651117745*^9,
121   3.616920484813521*^9, 3.616921485363764*^9, 3.616922083363084*^9,
122   3.6169222498253803`*^9, 3.61692247671194*^9, 3.6169225850237217`*^9,
123   3.626081965782981*^9, 3.627485432509675*^9, 3.62762805295048*^9,
124   3.6276356752872562`*^9, 3.627800213057104*^9, 3.6307489184278393`*^9,
125   3.63333222790595*^9, 3.6333337902040663`*^9, 3.633347976246666*^9,
126   3.6334297893921328`*^9, 3.633759461568802*^9, 3.633759633282177*^9,
127   3.633759726730798*^9, {3.633759792106916*^9, 3.633759815923191*^9},
128   3.633761293839384*^9, 3.6337670547127237`*^9, 3.635682215184022*^9,
129   3.635682934883945*^9, 3.635760127197874*^9, 3.635760175783587*^9,
130   3.6376406863896637`*^9, 3.637640726419091*^9, 3.637640758629774*^9,
131   3.637640958230589*^9, 3.637641405244493*^9, 3.637641495220693*^9,
132   3.637642208784834*^9, 3.637642569793989*^9, 3.6376426520030203`*^9,
133   3.637648124759632*^9, 3.639376994064643*^9, 3.639377077882502*^9,
134   3.639377201190076*^9, 3.639377317501244*^9, 3.639377410990694*^9,
135   3.639377513942395*^9, 3.639377585687583*^9, 3.639379644215146*^9,
136   3.639379726261013*^9, 3.639388637108721*^9, 3.639388668138874*^9,
137   3.639988974910592*^9, 3.640510185967122*^9, 3.641476026156052*^9,
138   3.641539935478367*^9, 3.6416348653469257`*^9, 3.641727097245332*^9,
139   3.64178949804799*^9, 3.641789770803505*^9, 3.6430232558014317`*^9, {
140   3.6430251332931433`*^9, 3.643025158675023*^9}, 3.643025218786581*^9,
141   3.645272106771387*^9, 3.645273267771743*^9, 3.6452749191028843`*^9,
142   3.645770337337294*^9, 3.645780123516604*^9, 3.645780416101548*^9,
143   3.64602634578681*^9, 3.6463709293456306`*^9, 3.646371738253957*^9,
144   3.646377062533774*^9, 3.646388598051454*^9, 3.646733866316379*^9,
145   3.646733955464802*^9, 3.647076458494377*^9, 3.647347856687975*^9,
146   3.649403273138598*^9, 3.6494043357711353`*^9}],
147
148Cell[BoxData["\<\" \"\>"], "Print",
149 CellChangeTimes->{
150  3.6110361274817457`*^9, 3.611036216598939*^9, 3.6110367049806023`*^9,
151   3.611045876569394*^9, 3.611046056835099*^9, 3.61104651117745*^9,
152   3.616920484813521*^9, 3.616921485363764*^9, 3.616922083363084*^9,
153   3.6169222498253803`*^9, 3.61692247671194*^9, 3.6169225850237217`*^9,
154   3.626081965782981*^9, 3.627485432509675*^9, 3.62762805295048*^9,
155   3.6276356752872562`*^9, 3.627800213057104*^9, 3.6307489184278393`*^9,
156   3.63333222790595*^9, 3.6333337902040663`*^9, 3.633347976246666*^9,
157   3.6334297893921328`*^9, 3.633759461568802*^9, 3.633759633282177*^9,
158   3.633759726730798*^9, {3.633759792106916*^9, 3.633759815923191*^9},
159   3.633761293839384*^9, 3.6337670547127237`*^9, 3.635682215184022*^9,
160   3.635682934883945*^9, 3.635760127197874*^9, 3.635760175783587*^9,
161   3.6376406863896637`*^9, 3.637640726419091*^9, 3.637640758629774*^9,
162   3.637640958230589*^9, 3.637641405244493*^9, 3.637641495220693*^9,
163   3.637642208784834*^9, 3.637642569793989*^9, 3.6376426520030203`*^9,
164   3.637648124759632*^9, 3.639376994064643*^9, 3.639377077882502*^9,
165   3.639377201190076*^9, 3.639377317501244*^9, 3.639377410990694*^9,
166   3.639377513942395*^9, 3.639377585687583*^9, 3.639379644215146*^9,
167   3.639379726261013*^9, 3.639388637108721*^9, 3.639388668138874*^9,
168   3.639988974910592*^9, 3.640510185967122*^9, 3.641476026156052*^9,
169   3.641539935478367*^9, 3.6416348653469257`*^9, 3.641727097245332*^9,
170   3.64178949804799*^9, 3.641789770803505*^9, 3.6430232558014317`*^9, {
171   3.6430251332931433`*^9, 3.643025158675023*^9}, 3.643025218786581*^9,
172   3.645272106771387*^9, 3.645273267771743*^9, 3.6452749191028843`*^9,
173   3.645770337337294*^9, 3.645780123516604*^9, 3.645780416101548*^9,
174   3.64602634578681*^9, 3.6463709293456306`*^9, 3.646371738253957*^9,
175   3.646377062533774*^9, 3.646388598051454*^9, 3.646733866316379*^9,
176   3.646733955464802*^9, 3.647076458494377*^9, 3.647347856687975*^9,
177   3.649403273138598*^9, 3.64940433577249*^9}],
178
179Cell[BoxData["\<\"Please cite:\"\>"], "Print",
180 CellChangeTimes->{
181  3.6110361274817457`*^9, 3.611036216598939*^9, 3.6110367049806023`*^9,
182   3.611045876569394*^9, 3.611046056835099*^9, 3.61104651117745*^9,
183   3.616920484813521*^9, 3.616921485363764*^9, 3.616922083363084*^9,
184   3.6169222498253803`*^9, 3.61692247671194*^9, 3.6169225850237217`*^9,
185   3.626081965782981*^9, 3.627485432509675*^9, 3.62762805295048*^9,
186   3.6276356752872562`*^9, 3.627800213057104*^9, 3.6307489184278393`*^9,
187   3.63333222790595*^9, 3.6333337902040663`*^9, 3.633347976246666*^9,
188   3.6334297893921328`*^9, 3.633759461568802*^9, 3.633759633282177*^9,
189   3.633759726730798*^9, {3.633759792106916*^9, 3.633759815923191*^9},
190   3.633761293839384*^9, 3.6337670547127237`*^9, 3.635682215184022*^9,
191   3.635682934883945*^9, 3.635760127197874*^9, 3.635760175783587*^9,
192   3.6376406863896637`*^9, 3.637640726419091*^9, 3.637640758629774*^9,
193   3.637640958230589*^9, 3.637641405244493*^9, 3.637641495220693*^9,
194   3.637642208784834*^9, 3.637642569793989*^9, 3.6376426520030203`*^9,
195   3.637648124759632*^9, 3.639376994064643*^9, 3.639377077882502*^9,
196   3.639377201190076*^9, 3.639377317501244*^9, 3.639377410990694*^9,
197   3.639377513942395*^9, 3.639377585687583*^9, 3.639379644215146*^9,
198   3.639379726261013*^9, 3.639388637108721*^9, 3.639388668138874*^9,
199   3.639988974910592*^9, 3.640510185967122*^9, 3.641476026156052*^9,
200   3.641539935478367*^9, 3.6416348653469257`*^9, 3.641727097245332*^9,
201   3.64178949804799*^9, 3.641789770803505*^9, 3.6430232558014317`*^9, {
202   3.6430251332931433`*^9, 3.643025158675023*^9}, 3.643025218786581*^9,
203   3.645272106771387*^9, 3.645273267771743*^9, 3.6452749191028843`*^9,
204   3.645770337337294*^9, 3.645780123516604*^9, 3.645780416101548*^9,
205   3.64602634578681*^9, 3.6463709293456306`*^9, 3.646371738253957*^9,
206   3.646377062533774*^9, 3.646388598051454*^9, 3.646733866316379*^9,
207   3.646733955464802*^9, 3.647076458494377*^9, 3.647347856687975*^9,
208   3.649403273138598*^9, 3.649404335773806*^9}],
209
210Cell[BoxData["\<\"    - Comput.Phys.Commun.185:2250-2300,2014 \
211(arXiv:1310.1921);\"\>"], "Print",
212 CellChangeTimes->{
213  3.6110361274817457`*^9, 3.611036216598939*^9, 3.6110367049806023`*^9,
214   3.611045876569394*^9, 3.611046056835099*^9, 3.61104651117745*^9,
215   3.616920484813521*^9, 3.616921485363764*^9, 3.616922083363084*^9,
216   3.6169222498253803`*^9, 3.61692247671194*^9, 3.6169225850237217`*^9,
217   3.626081965782981*^9, 3.627485432509675*^9, 3.62762805295048*^9,
218   3.6276356752872562`*^9, 3.627800213057104*^9, 3.6307489184278393`*^9,
219   3.63333222790595*^9, 3.6333337902040663`*^9, 3.633347976246666*^9,
220   3.6334297893921328`*^9, 3.633759461568802*^9, 3.633759633282177*^9,
221   3.633759726730798*^9, {3.633759792106916*^9, 3.633759815923191*^9},
222   3.633761293839384*^9, 3.6337670547127237`*^9, 3.635682215184022*^9,
223   3.635682934883945*^9, 3.635760127197874*^9, 3.635760175783587*^9,
224   3.6376406863896637`*^9, 3.637640726419091*^9, 3.637640758629774*^9,
225   3.637640958230589*^9, 3.637641405244493*^9, 3.637641495220693*^9,
226   3.637642208784834*^9, 3.637642569793989*^9, 3.6376426520030203`*^9,
227   3.637648124759632*^9, 3.639376994064643*^9, 3.639377077882502*^9,
228   3.639377201190076*^9, 3.639377317501244*^9, 3.639377410990694*^9,
229   3.639377513942395*^9, 3.639377585687583*^9, 3.639379644215146*^9,
230   3.639379726261013*^9, 3.639388637108721*^9, 3.639388668138874*^9,
231   3.639988974910592*^9, 3.640510185967122*^9, 3.641476026156052*^9,
232   3.641539935478367*^9, 3.6416348653469257`*^9, 3.641727097245332*^9,
233   3.64178949804799*^9, 3.641789770803505*^9, 3.6430232558014317`*^9, {
234   3.6430251332931433`*^9, 3.643025158675023*^9}, 3.643025218786581*^9,
235   3.645272106771387*^9, 3.645273267771743*^9, 3.6452749191028843`*^9,
236   3.645770337337294*^9, 3.645780123516604*^9, 3.645780416101548*^9,
237   3.64602634578681*^9, 3.6463709293456306`*^9, 3.646371738253957*^9,
238   3.646377062533774*^9, 3.646388598051454*^9, 3.646733866316379*^9,
239   3.646733955464802*^9, 3.647076458494377*^9, 3.647347856687975*^9,
240   3.649403273138598*^9, 3.649404335775343*^9}],
241
242Cell[BoxData["\<\"    - Comput.Phys.Commun.180:1614-1641,2009 \
243(arXiv:0806.4194).\"\>"], "Print",
244 CellChangeTimes->{
245  3.6110361274817457`*^9, 3.611036216598939*^9, 3.6110367049806023`*^9,
246   3.611045876569394*^9, 3.611046056835099*^9, 3.61104651117745*^9,
247   3.616920484813521*^9, 3.616921485363764*^9, 3.616922083363084*^9,
248   3.6169222498253803`*^9, 3.61692247671194*^9, 3.6169225850237217`*^9,
249   3.626081965782981*^9, 3.627485432509675*^9, 3.62762805295048*^9,
250   3.6276356752872562`*^9, 3.627800213057104*^9, 3.6307489184278393`*^9,
251   3.63333222790595*^9, 3.6333337902040663`*^9, 3.633347976246666*^9,
252   3.6334297893921328`*^9, 3.633759461568802*^9, 3.633759633282177*^9,
253   3.633759726730798*^9, {3.633759792106916*^9, 3.633759815923191*^9},
254   3.633761293839384*^9, 3.6337670547127237`*^9, 3.635682215184022*^9,
255   3.635682934883945*^9, 3.635760127197874*^9, 3.635760175783587*^9,
256   3.6376406863896637`*^9, 3.637640726419091*^9, 3.637640758629774*^9,
257   3.637640958230589*^9, 3.637641405244493*^9, 3.637641495220693*^9,
258   3.637642208784834*^9, 3.637642569793989*^9, 3.6376426520030203`*^9,
259   3.637648124759632*^9, 3.639376994064643*^9, 3.639377077882502*^9,
260   3.639377201190076*^9, 3.639377317501244*^9, 3.639377410990694*^9,
261   3.639377513942395*^9, 3.639377585687583*^9, 3.639379644215146*^9,
262   3.639379726261013*^9, 3.639388637108721*^9, 3.639388668138874*^9,
263   3.639988974910592*^9, 3.640510185967122*^9, 3.641476026156052*^9,
264   3.641539935478367*^9, 3.6416348653469257`*^9, 3.641727097245332*^9,
265   3.64178949804799*^9, 3.641789770803505*^9, 3.6430232558014317`*^9, {
266   3.6430251332931433`*^9, 3.643025158675023*^9}, 3.643025218786581*^9,
267   3.645272106771387*^9, 3.645273267771743*^9, 3.6452749191028843`*^9,
268   3.645770337337294*^9, 3.645780123516604*^9, 3.645780416101548*^9,
269   3.64602634578681*^9, 3.6463709293456306`*^9, 3.646371738253957*^9,
270   3.646377062533774*^9, 3.646388598051454*^9, 3.646733866316379*^9,
271   3.646733955464802*^9, 3.647076458494377*^9, 3.647347856687975*^9,
272   3.649403273138598*^9, 3.6494043357768087`*^9}],
273
274Cell[BoxData["\<\" \"\>"], "Print",
275 CellChangeTimes->{
276  3.6110361274817457`*^9, 3.611036216598939*^9, 3.6110367049806023`*^9,
277   3.611045876569394*^9, 3.611046056835099*^9, 3.61104651117745*^9,
278   3.616920484813521*^9, 3.616921485363764*^9, 3.616922083363084*^9,
279   3.6169222498253803`*^9, 3.61692247671194*^9, 3.6169225850237217`*^9,
280   3.626081965782981*^9, 3.627485432509675*^9, 3.62762805295048*^9,
281   3.6276356752872562`*^9, 3.627800213057104*^9, 3.6307489184278393`*^9,
282   3.63333222790595*^9, 3.6333337902040663`*^9, 3.633347976246666*^9,
283   3.6334297893921328`*^9, 3.633759461568802*^9, 3.633759633282177*^9,
284   3.633759726730798*^9, {3.633759792106916*^9, 3.633759815923191*^9},
285   3.633761293839384*^9, 3.6337670547127237`*^9, 3.635682215184022*^9,
286   3.635682934883945*^9, 3.635760127197874*^9, 3.635760175783587*^9,
287   3.6376406863896637`*^9, 3.637640726419091*^9, 3.637640758629774*^9,
288   3.637640958230589*^9, 3.637641405244493*^9, 3.637641495220693*^9,
289   3.637642208784834*^9, 3.637642569793989*^9, 3.6376426520030203`*^9,
290   3.637648124759632*^9, 3.639376994064643*^9, 3.639377077882502*^9,
291   3.639377201190076*^9, 3.639377317501244*^9, 3.639377410990694*^9,
292   3.639377513942395*^9, 3.639377585687583*^9, 3.639379644215146*^9,
293   3.639379726261013*^9, 3.639388637108721*^9, 3.639388668138874*^9,
294   3.639988974910592*^9, 3.640510185967122*^9, 3.641476026156052*^9,
295   3.641539935478367*^9, 3.6416348653469257`*^9, 3.641727097245332*^9,
296   3.64178949804799*^9, 3.641789770803505*^9, 3.6430232558014317`*^9, {
297   3.6430251332931433`*^9, 3.643025158675023*^9}, 3.643025218786581*^9,
298   3.645272106771387*^9, 3.645273267771743*^9, 3.6452749191028843`*^9,
299   3.645770337337294*^9, 3.645780123516604*^9, 3.645780416101548*^9,
300   3.64602634578681*^9, 3.6463709293456306`*^9, 3.646371738253957*^9,
301   3.646377062533774*^9, 3.646388598051454*^9, 3.646733866316379*^9,
302   3.646733955464802*^9, 3.647076458494377*^9, 3.647347856687975*^9,
303   3.649403273138598*^9, 3.6494043357782507`*^9}],
304
305Cell[BoxData["\<\"http://feynrules.phys.ucl.ac.be\"\>"], "Print",
306 CellChangeTimes->{
307  3.6110361274817457`*^9, 3.611036216598939*^9, 3.6110367049806023`*^9,
308   3.611045876569394*^9, 3.611046056835099*^9, 3.61104651117745*^9,
309   3.616920484813521*^9, 3.616921485363764*^9, 3.616922083363084*^9,
310   3.6169222498253803`*^9, 3.61692247671194*^9, 3.6169225850237217`*^9,
311   3.626081965782981*^9, 3.627485432509675*^9, 3.62762805295048*^9,
312   3.6276356752872562`*^9, 3.627800213057104*^9, 3.6307489184278393`*^9,
313   3.63333222790595*^9, 3.6333337902040663`*^9, 3.633347976246666*^9,
314   3.6334297893921328`*^9, 3.633759461568802*^9, 3.633759633282177*^9,
315   3.633759726730798*^9, {3.633759792106916*^9, 3.633759815923191*^9},
316   3.633761293839384*^9, 3.6337670547127237`*^9, 3.635682215184022*^9,
317   3.635682934883945*^9, 3.635760127197874*^9, 3.635760175783587*^9,
318   3.6376406863896637`*^9, 3.637640726419091*^9, 3.637640758629774*^9,
319   3.637640958230589*^9, 3.637641405244493*^9, 3.637641495220693*^9,
320   3.637642208784834*^9, 3.637642569793989*^9, 3.6376426520030203`*^9,
321   3.637648124759632*^9, 3.639376994064643*^9, 3.639377077882502*^9,
322   3.639377201190076*^9, 3.639377317501244*^9, 3.639377410990694*^9,
323   3.639377513942395*^9, 3.639377585687583*^9, 3.639379644215146*^9,
324   3.639379726261013*^9, 3.639388637108721*^9, 3.639388668138874*^9,
325   3.639988974910592*^9, 3.640510185967122*^9, 3.641476026156052*^9,
326   3.641539935478367*^9, 3.6416348653469257`*^9, 3.641727097245332*^9,
327   3.64178949804799*^9, 3.641789770803505*^9, 3.6430232558014317`*^9, {
328   3.6430251332931433`*^9, 3.643025158675023*^9}, 3.643025218786581*^9,
329   3.645272106771387*^9, 3.645273267771743*^9, 3.6452749191028843`*^9,
330   3.645770337337294*^9, 3.645780123516604*^9, 3.645780416101548*^9,
331   3.64602634578681*^9, 3.6463709293456306`*^9, 3.646371738253957*^9,
332   3.646377062533774*^9, 3.646388598051454*^9, 3.646733866316379*^9,
333   3.646733955464802*^9, 3.647076458494377*^9, 3.647347856687975*^9,
334   3.649403273138598*^9, 3.6494043357795773`*^9}],
335
336Cell[BoxData["\<\" \"\>"], "Print",
337 CellChangeTimes->{
338  3.6110361274817457`*^9, 3.611036216598939*^9, 3.6110367049806023`*^9,
339   3.611045876569394*^9, 3.611046056835099*^9, 3.61104651117745*^9,
340   3.616920484813521*^9, 3.616921485363764*^9, 3.616922083363084*^9,
341   3.6169222498253803`*^9, 3.61692247671194*^9, 3.6169225850237217`*^9,
342   3.626081965782981*^9, 3.627485432509675*^9, 3.62762805295048*^9,
343   3.6276356752872562`*^9, 3.627800213057104*^9, 3.6307489184278393`*^9,
344   3.63333222790595*^9, 3.6333337902040663`*^9, 3.633347976246666*^9,
345   3.6334297893921328`*^9, 3.633759461568802*^9, 3.633759633282177*^9,
346   3.633759726730798*^9, {3.633759792106916*^9, 3.633759815923191*^9},
347   3.633761293839384*^9, 3.6337670547127237`*^9, 3.635682215184022*^9,
348   3.635682934883945*^9, 3.635760127197874*^9, 3.635760175783587*^9,
349   3.6376406863896637`*^9, 3.637640726419091*^9, 3.637640758629774*^9,
350   3.637640958230589*^9, 3.637641405244493*^9, 3.637641495220693*^9,
351   3.637642208784834*^9, 3.637642569793989*^9, 3.6376426520030203`*^9,
352   3.637648124759632*^9, 3.639376994064643*^9, 3.639377077882502*^9,
353   3.639377201190076*^9, 3.639377317501244*^9, 3.639377410990694*^9,
354   3.639377513942395*^9, 3.639377585687583*^9, 3.639379644215146*^9,
355   3.639379726261013*^9, 3.639388637108721*^9, 3.639388668138874*^9,
356   3.639988974910592*^9, 3.640510185967122*^9, 3.641476026156052*^9,
357   3.641539935478367*^9, 3.6416348653469257`*^9, 3.641727097245332*^9,
358   3.64178949804799*^9, 3.641789770803505*^9, 3.6430232558014317`*^9, {
359   3.6430251332931433`*^9, 3.643025158675023*^9}, 3.643025218786581*^9,
360   3.645272106771387*^9, 3.645273267771743*^9, 3.6452749191028843`*^9,
361   3.645770337337294*^9, 3.645780123516604*^9, 3.645780416101548*^9,
362   3.64602634578681*^9, 3.6463709293456306`*^9, 3.646371738253957*^9,
363   3.646377062533774*^9, 3.646388598051454*^9, 3.646733866316379*^9,
364   3.646733955464802*^9, 3.647076458494377*^9, 3.647347856687975*^9,
365   3.649403273138598*^9, 3.649404335780909*^9}],
366
367Cell[BoxData["\<\"The FeynRules palette can be opened using the command \
368FRPalette[].\"\>"], "Print",
369 CellChangeTimes->{
370  3.6110361274817457`*^9, 3.611036216598939*^9, 3.6110367049806023`*^9,
371   3.611045876569394*^9, 3.611046056835099*^9, 3.61104651117745*^9,
372   3.616920484813521*^9, 3.616921485363764*^9, 3.616922083363084*^9,
373   3.6169222498253803`*^9, 3.61692247671194*^9, 3.6169225850237217`*^9,
374   3.626081965782981*^9, 3.627485432509675*^9, 3.62762805295048*^9,
375   3.6276356752872562`*^9, 3.627800213057104*^9, 3.6307489184278393`*^9,
376   3.63333222790595*^9, 3.6333337902040663`*^9, 3.633347976246666*^9,
377   3.6334297893921328`*^9, 3.633759461568802*^9, 3.633759633282177*^9,
378   3.633759726730798*^9, {3.633759792106916*^9, 3.633759815923191*^9},
379   3.633761293839384*^9, 3.6337670547127237`*^9, 3.635682215184022*^9,
380   3.635682934883945*^9, 3.635760127197874*^9, 3.635760175783587*^9,
381   3.6376406863896637`*^9, 3.637640726419091*^9, 3.637640758629774*^9,
382   3.637640958230589*^9, 3.637641405244493*^9, 3.637641495220693*^9,
383   3.637642208784834*^9, 3.637642569793989*^9, 3.6376426520030203`*^9,
384   3.637648124759632*^9, 3.639376994064643*^9, 3.639377077882502*^9,
385   3.639377201190076*^9, 3.639377317501244*^9, 3.639377410990694*^9,
386   3.639377513942395*^9, 3.639377585687583*^9, 3.639379644215146*^9,
387   3.639379726261013*^9, 3.639388637108721*^9, 3.639388668138874*^9,
388   3.639988974910592*^9, 3.640510185967122*^9, 3.641476026156052*^9,
389   3.641539935478367*^9, 3.6416348653469257`*^9, 3.641727097245332*^9,
390   3.64178949804799*^9, 3.641789770803505*^9, 3.6430232558014317`*^9, {
391   3.6430251332931433`*^9, 3.643025158675023*^9}, 3.643025218786581*^9,
392   3.645272106771387*^9, 3.645273267771743*^9, 3.6452749191028843`*^9,
393   3.645770337337294*^9, 3.645780123516604*^9, 3.645780416101548*^9,
394   3.64602634578681*^9, 3.6463709293456306`*^9, 3.646371738253957*^9,
395   3.646377062533774*^9, 3.646388598051454*^9, 3.646733866316379*^9,
396   3.646733955464802*^9, 3.647076458494377*^9, 3.647347856687975*^9,
397   3.649403273138598*^9, 3.649404335782366*^9}]
398}, Open  ]]
399}, Open  ]],
400
401Cell[BoxData[
402 RowBox[{
403  RowBox[{"SetDirectory", "[",
404   RowBox[{"$FeynRulesPath", "<>", "\"\</Models/DMsimp\>\""}], "]"}],
405  ";"}]], "Input",
406 CellChangeTimes->{{3.603539061006528*^9, 3.603539075359961*^9}, {
407   3.606550370901471*^9, 3.606550372067235*^9}, {3.608280713549712*^9,
408   3.608280720038208*^9}, {3.608280848612903*^9, 3.608280850051903*^9}, {
409   3.610078232055901*^9, 3.610078244162396*^9}, {3.611032810906569*^9,
410   3.611032811729677*^9}, 3.611046032505571*^9, {3.611046080564261*^9,
411   3.6110460835240393`*^9}, {3.616920451742062*^9, 3.616920454335582*^9}, {
412   3.61692081007111*^9, 3.616920811789462*^9}, {3.6169220902135057`*^9,
413   3.6169220916785192`*^9}, {3.627800218613393*^9, 3.6278002208210363`*^9}, {
414   3.630748932272941*^9, 3.630748937906595*^9}, {3.633332239193083*^9,
415   3.6333322403879013`*^9}, 3.633333794100926*^9, {3.633759468942481*^9,
416   3.6337594703175983`*^9}, {3.635681641356083*^9, 3.6356816446148367`*^9}, {
417   3.6376402973444223`*^9, 3.6376402986547117`*^9}, {3.639376919579711*^9,
418   3.639376921244483*^9}, {3.6405100299897413`*^9, 3.640510032443145*^9}, {
419   3.643018741816877*^9, 3.643018742543559*^9}, 3.643024926442786*^9, {
420   3.645273275267683*^9, 3.645273276634437*^9}, {3.645274930954957*^9,
421   3.645274932634717*^9}, {3.645770163878159*^9, 3.6457701691664543`*^9}, {
422   3.645780013280984*^9, 3.645780013490704*^9}, {3.646026237633871*^9,
423   3.6460262398106728`*^9}, {3.6473477666176853`*^9, 3.647347767847106*^9}, {
424   3.649402992381681*^9, 3.6494029933443527`*^9}}],
425
426Cell[BoxData[""], "Input",
427 CellChangeTimes->{{3.603538963565145*^9, 3.603538971919922*^9}}],
428
429Cell[CellGroupData[{
430
431Cell[BoxData[
432 RowBox[{"LoadModel", "[",
433  RowBox[{
434  "\"\<SM.fr\>\"", ",", "\"\<dm_s_spin1.fr\>\"", ",",
435   "\"\<dm_s_spin1_ew.fr\>\""}], "]"}]], "Input",
436 CellChangeTimes->{{3.633332249125042*^9, 3.633332249491701*^9}, {
437   3.6337594763689528`*^9, 3.6337594776507893`*^9}, {3.6356816576884117`*^9,
438   3.6356816603749027`*^9}, {3.637640302808282*^9, 3.6376403082726*^9}, {
439   3.637640716438528*^9, 3.6376407440268297`*^9}, 3.643024914860723*^9, {
440   3.645273293611383*^9, 3.6452732956188726`*^9}, {3.645770176958198*^9,
441   3.645770177262162*^9}, {3.646026243920371*^9, 3.6460262460509453`*^9}, {
442   3.647347782049244*^9, 3.64734778358805*^9}, {3.64940300547442*^9,
443   3.649403021810585*^9}}],
444
445Cell[CellGroupData[{
446
447Cell[BoxData["\<\"Merging model-files...\"\>"], "Print",
448 CellChangeTimes->{
449  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
450   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
451   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
452   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
453   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
454   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
455   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
456   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
457   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
458   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
459   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
460   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
461   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
462   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
463   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
464   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
465   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
466   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
467   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
468   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
469   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
470   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
471   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
472   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
473   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
474   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
475   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
476   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
477   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
478   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
479   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
480   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
481   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
482   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
483   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
484   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
485   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
486   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
487   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
488   3.649404342789527*^9}],
489
490Cell[BoxData["\<\"This model implementation was created by\"\>"], "Print",
491 CellChangeTimes->{
492  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
493   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
494   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
495   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
496   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
497   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
498   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
499   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
500   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
501   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
502   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
503   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
504   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
505   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
506   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
507   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
508   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
509   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
510   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
511   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
512   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
513   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
514   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
515   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
516   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
517   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
518   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
519   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
520   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
521   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
522   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
523   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
524   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
525   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
526   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
527   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
528   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
529   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
530   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
531   3.6494043428245564`*^9}],
532
533Cell[BoxData["\<\"A. Martini, K. Mawatari, J. Wang, C. Zhang\"\>"], "Print",
534 CellChangeTimes->{
535  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
536   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
537   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
538   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
539   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
540   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
541   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
542   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
543   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
544   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
545   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
546   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
547   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
548   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
549   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
550   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
551   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
552   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
553   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
554   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
555   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
556   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
557   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
558   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
559   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
560   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
561   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
562   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
563   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
564   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
565   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
566   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
567   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
568   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
569   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
570   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
571   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
572   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
573   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
574   3.649404342826166*^9}],
575
576Cell[BoxData[
577 InterpretationBox[
578  RowBox[{"\<\"Model Version: \"\>", "\[InvisibleSpace]", "\<\"1.0\"\>"}],
579  SequenceForm["Model Version: ", "1.0"],
580  Editable->False]], "Print",
581 CellChangeTimes->{
582  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
583   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
584   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
585   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
586   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
587   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
588   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
589   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
590   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
591   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
592   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
593   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
594   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
595   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
596   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
597   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
598   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
599   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
600   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
601   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
602   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
603   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
604   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
605   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
606   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
607   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
608   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
609   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
610   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
611   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
612   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
613   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
614   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
615   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
616   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
617   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
618   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
619   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
620   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
621   3.649404342827634*^9}],
622
623Cell[BoxData["\<\"Please cite\"\>"], "Print",
624 CellChangeTimes->{
625  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
626   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
627   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
628   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
629   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
630   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
631   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
632   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
633   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
634   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
635   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
636   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
637   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
638   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
639   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
640   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
641   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
642   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
643   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
644   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
645   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
646   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
647   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
648   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
649   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
650   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
651   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
652   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
653   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
654   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
655   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
656   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
657   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
658   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
659   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
660   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
661   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
662   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
663   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
664   3.649404342828978*^9}],
665
666Cell[BoxData["\<\"O. Mattelaer et al., arXiv:1508.00564\"\>"], "Print",
667 CellChangeTimes->{
668  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
669   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
670   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
671   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
672   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
673   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
674   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
675   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
676   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
677   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
678   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
679   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
680   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
681   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
682   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
683   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
684   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
685   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
686   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
687   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
688   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
689   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
690   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
691   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
692   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
693   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
694   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
695   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
696   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
697   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
698   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
699   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
700   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
701   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
702   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
703   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
704   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
705   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
706   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
707   3.6494043428304*^9}],
708
709Cell[BoxData["\<\"M. Backovic et al., arXiv:1508.05327\"\>"], "Print",
710 CellChangeTimes->{
711  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
712   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
713   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
714   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
715   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
716   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
717   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
718   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
719   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
720   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
721   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
722   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
723   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
724   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
725   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
726   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
727   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
728   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
729   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
730   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
731   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
732   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
733   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
734   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
735   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
736   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
737   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
738   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
739   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
740   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
741   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
742   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
743   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
744   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
745   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
746   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
747   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
748   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
749   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
750   3.649404342831807*^9}],
751
752Cell[BoxData["\<\"M. Neubert et al., arXiv:1508.xxxxx\"\>"], "Print",
753 CellChangeTimes->{
754  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
755   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
756   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
757   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
758   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
759   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
760   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
761   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
762   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
763   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
764   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
765   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
766   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
767   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
768   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
769   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
770   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
771   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
772   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
773   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
774   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
775   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
776   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
777   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
778   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
779   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
780   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
781   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
782   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
783   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
784   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
785   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
786   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
787   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
788   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
789   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
790   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
791   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
792   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
793   3.649404342833261*^9}],
794
795Cell[BoxData["\<\"http://feynrules.irmp.ucl.ac.be/wiki/DMsimp/\"\>"], "Print",
796 CellChangeTimes->{
797  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
798   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
799   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
800   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
801   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
802   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
803   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
804   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
805   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
806   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
807   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
808   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
809   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
810   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
811   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
812   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
813   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
814   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
815   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
816   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
817   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
818   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
819   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
820   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
821   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
822   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
823   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
824   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
825   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
826   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
827   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
828   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
829   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
830   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
831   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
832   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
833   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
834   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
835   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
836   3.6494043428349543`*^9}],
837
838Cell[BoxData["\<\"For more information, type ModelInformation[].\"\>"], \
839"Print",
840 CellChangeTimes->{
841  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
842   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
843   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
844   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
845   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
846   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
847   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
848   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
849   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
850   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
851   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
852   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
853   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
854   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
855   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
856   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
857   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
858   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
859   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
860   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
861   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
862   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
863   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
864   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
865   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
866   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
867   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
868   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
869   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
870   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
871   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
872   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
873   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
874   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
875   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
876   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
877   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
878   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
879   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
880   3.6494043428367662`*^9}],
881
882Cell[BoxData["\<\"\"\>"], "Print",
883 CellChangeTimes->{
884  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
885   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
886   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
887   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
888   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
889   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
890   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
891   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
892   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
893   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
894   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
895   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
896   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
897   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
898   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
899   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
900   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
901   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
902   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
903   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
904   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
905   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
906   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
907   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
908   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
909   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
910   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
911   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
912   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
913   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
914   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
915   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
916   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
917   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
918   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
919   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
920   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
921   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
922   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
923   3.649404342838277*^9}],
924
925Cell[BoxData["\<\"   - Loading particle classes.\"\>"], "Print",
926 CellChangeTimes->{
927  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
928   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
929   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
930   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
931   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
932   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
933   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
934   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
935   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
936   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
937   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
938   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
939   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
940   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
941   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
942   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
943   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
944   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
945   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
946   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
947   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
948   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
949   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
950   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
951   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
952   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
953   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
954   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
955   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
956   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
957   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
958   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
959   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
960   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
961   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
962   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
963   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
964   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
965   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
966   3.649404342839663*^9}],
967
968Cell[BoxData["\<\"   - Loading gauge group classes.\"\>"], "Print",
969 CellChangeTimes->{
970  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
971   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
972   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
973   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
974   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
975   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
976   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
977   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
978   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
979   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
980   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
981   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
982   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
983   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
984   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
985   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
986   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
987   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
988   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
989   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
990   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
991   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
992   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
993   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
994   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
995   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
996   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
997   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
998   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
999   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
1000   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
1001   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
1002   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
1003   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
1004   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
1005   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
1006   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
1007   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
1008   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
1009   3.649404342974708*^9}],
1010
1011Cell[BoxData["\<\"   - Loading parameter classes.\"\>"], "Print",
1012 CellChangeTimes->{
1013  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
1014   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
1015   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
1016   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
1017   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
1018   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
1019   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
1020   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
1021   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
1022   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
1023   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
1024   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
1025   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
1026   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
1027   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
1028   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
1029   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
1030   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
1031   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
1032   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
1033   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
1034   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
1035   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
1036   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
1037   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
1038   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
1039   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
1040   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
1041   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
1042   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
1043   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
1044   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
1045   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
1046   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
1047   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
1048   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
1049   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
1050   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
1051   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
1052   3.649404343020705*^9}],
1053
1054Cell[BoxData[
1055 InterpretationBox[
1056  RowBox[{"\<\"\\nModel \"\>", "\[InvisibleSpace]", "\<\"DMsimp_s_spin1\"\>",
1057   "\[InvisibleSpace]", "\<\" loaded.\"\>"}],
1058  SequenceForm["\nModel ", "DMsimp_s_spin1", " loaded."],
1059  Editable->False]], "Print",
1060 CellChangeTimes->{
1061  3.603539276229219*^9, 3.6035428651813183`*^9, 3.603599911499213*^9,
1062   3.603601342445846*^9, 3.6036187190236464`*^9, 3.6049467561305513`*^9,
1063   3.6065503769323997`*^9, 3.608280856221733*^9, 3.608281631553297*^9,
1064   3.608281690134647*^9, 3.6082817251443768`*^9, 3.608282107510787*^9,
1065   3.6082824242562103`*^9, 3.608352909441928*^9, 3.6083540622806997`*^9,
1066   3.6083541434032393`*^9, 3.6083543240677567`*^9, 3.608354614648614*^9,
1067   3.608358025933999*^9, 3.608358128623258*^9, 3.608359221131486*^9,
1068   3.6084510618171864`*^9, 3.609235764148369*^9, 3.609236227349654*^9,
1069   3.609757586028043*^9, 3.610078214393291*^9, 3.610078266654603*^9,
1070   3.610078858102491*^9, 3.610079022297451*^9, 3.61007906477439*^9,
1071   3.610097055075354*^9, 3.6110328165448027`*^9, 3.6110328622220716`*^9,
1072   3.611033051920595*^9, 3.611035756190256*^9, 3.611035887624475*^9,
1073   3.611036013590836*^9, 3.611036133470861*^9, 3.611036222009946*^9,
1074   3.6110367119538603`*^9, 3.6110458837561626`*^9, 3.611046087381626*^9,
1075   3.611046516578813*^9, 3.616920494644947*^9, 3.616921490449946*^9,
1076   3.61692209555116*^9, {3.616922235727729*^9, 3.6169222557918653`*^9},
1077   3.61692248266975*^9, 3.616922590363521*^9, 3.6260819710519257`*^9,
1078   3.6274854451468067`*^9, 3.627628058682411*^9, 3.627635682746304*^9,
1079   3.6278002260992823`*^9, 3.630748955872439*^9, 3.633332251206326*^9,
1080   3.633333805271109*^9, 3.6333479837150583`*^9, 3.633429797615189*^9,
1081   3.6337596440210867`*^9, 3.633759736316864*^9, {3.633759800942401*^9,
1082   3.633759821611841*^9}, 3.633761298716833*^9, 3.633767060283568*^9,
1083   3.6356822233246393`*^9, 3.635682940927937*^9, 3.635760132371312*^9,
1084   3.635760181490759*^9, {3.63764070672262*^9, 3.637640731407392*^9},
1085   3.637640785936223*^9, 3.637640963641189*^9, 3.6376414110670567`*^9,
1086   3.637641502585011*^9, 3.637642214642048*^9, 3.637642577024967*^9,
1087   3.63764265841442*^9, 3.6376481321319447`*^9, 3.6393770012564774`*^9,
1088   3.639377083908358*^9, 3.639377206661962*^9, 3.639377325698201*^9,
1089   3.639377417358796*^9, 3.6393775234213247`*^9, 3.639377592106596*^9,
1090   3.639379649440363*^9, 3.639379734329454*^9, 3.639388644217759*^9,
1091   3.639388674403668*^9, 3.639988980372665*^9, 3.640510194707777*^9,
1092   3.6414760321905518`*^9, 3.64153994214283*^9, 3.6416348706083508`*^9,
1093   3.641727103360285*^9, 3.641789503957403*^9, 3.641789776141971*^9,
1094   3.643025165611589*^9, 3.643025225125194*^9, 3.645272117924819*^9,
1095   3.645273299742169*^9, 3.645274940197342*^9, 3.645770345152109*^9,
1096   3.6457801294682627`*^9, 3.64578042170009*^9, 3.646026354595029*^9,
1097   3.646370936028935*^9, 3.646371743777197*^9, 3.646377068395289*^9,
1098   3.64638860403161*^9, 3.646733874256979*^9, 3.6467339613477383`*^9,
1099   3.647076465387384*^9, 3.647347864730913*^9, 3.649403280131568*^9,
1100   3.6494043430815783`*^9}]
1101}, Open  ]]
1102}, Open  ]],
1103
1104Cell[CellGroupData[{
1105
1106Cell[BoxData[
1107 RowBox[{"LoadRestriction", "[",
1108  RowBox[{"\"\<Cabibbo.rst\>\"", ",", "\"\<Massless_5f.rst\>\""}],
1109  "]"}]], "Input",
1110 CellChangeTimes->{{3.639376820290628*^9, 3.6393768234379387`*^9}, {
1111  3.6393770865564947`*^9, 3.6393770912761908`*^9}, {3.6393771858866796`*^9,
1112  3.6393771863740797`*^9}, {3.639377466478868*^9, 3.639377471110105*^9}, {
1113  3.6393796364789057`*^9, 3.639379637142768*^9}, {3.639989012839026*^9,
1114  3.639989036648665*^9}, {3.641539947651075*^9, 3.641539950365509*^9}, {
1115  3.641789785973187*^9, 3.641789792194556*^9}, {3.643025183012186*^9,
1116  3.643025185439151*^9}, {3.645274945395602*^9, 3.645274957019786*^9}, {
1117  3.6457800188411694`*^9, 3.645780019775859*^9}, {3.646377072375288*^9,
1118  3.646377083707752*^9}, {3.646465411317153*^9, 3.646465413430913*^9}}],
1119
1120Cell[CellGroupData[{
1121
1122Cell[BoxData[
1123 InterpretationBox[
1124  RowBox[{"\<\"Loading restrictions from \"\>",
1125   "\[InvisibleSpace]", "\<\"Cabibbo.rst\"\>",
1126   "\[InvisibleSpace]", "\<\" : \"\>", "\[InvisibleSpace]",
1127   DynamicBox[ToBoxes[PRIVATE`FR$restrictionCounter, StandardForm],
1128    ImageSizeCache->{16., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
1129   "\[InvisibleSpace]", "6"}],
1130  SequenceForm["Loading restrictions from ", "Cabibbo.rst", " : ",
1131   Dynamic[PRIVATE`FR$restrictionCounter], " / ", 6],
1132  Editable->False]], "Print",
1133 CellChangeTimes->{3.646733879107862*^9, 3.646733965179865*^9,
1134  3.647076468461007*^9, 3.647347867464292*^9, 3.649403286040627*^9,
1135  3.649404346434187*^9}],
1136
1137Cell[BoxData[
1138 InterpretationBox[
1139  RowBox[{"\<\"Loading restrictions from \"\>",
1140   "\[InvisibleSpace]", "\<\"Massless_5f.rst\"\>",
1141   "\[InvisibleSpace]", "\<\" : \"\>", "\[InvisibleSpace]",
1142   DynamicBox[ToBoxes[PRIVATE`FR$restrictionCounter, StandardForm],
1143    ImageSizeCache->{16., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
1144   "\[InvisibleSpace]", "21"}],
1145  SequenceForm["Loading restrictions from ", "Massless_5f.rst", " : ",
1146   Dynamic[PRIVATE`FR$restrictionCounter], " / ", 21],
1147  Editable->False]], "Print",
1148 CellChangeTimes->{3.646733879107862*^9, 3.646733965179865*^9,
1149  3.647076468461007*^9, 3.647347867464292*^9, 3.649403286040627*^9,
1150  3.649404346584817*^9}],
1151
1152Cell[BoxData["\<\"Restrictions loaded.\"\>"], "Print",
1153 CellChangeTimes->{3.646733879107862*^9, 3.646733965179865*^9,
1154  3.647076468461007*^9, 3.647347867464292*^9, 3.649403286040627*^9,
1155  3.649404346701417*^9}]
1156}, Open  ]]
1157}, Open  ]],
1158
1159Cell[CellGroupData[{
1160
1161Cell[BoxData[
1162 RowBox[{"(*",
1163  RowBox[{"LoadRestriction", "[",
1164   RowBox[{"\"\<DiagonalCKM.rst\>\"", ",", "\"\<Massless_5f.rst\>\""}], "]"}],
1165   "*)"}]], "Input",
1166 CellChangeTimes->{{3.6463770912666693`*^9, 3.646377094581213*^9}, {
1167  3.646465405450945*^9, 3.646465408665985*^9}}],
1168
1169Cell[CellGroupData[{
1170
1171Cell[BoxData[
1172 InterpretationBox[
1173  RowBox[{"\<\"Loading restrictions from \"\>",
1174   "\[InvisibleSpace]", "\<\"DiagonalCKM.rst\"\>",
1175   "\[InvisibleSpace]", "\<\" : \"\>", "\[InvisibleSpace]",
1176   DynamicBox[ToBoxes[PRIVATE`FR$restrictionCounter, StandardForm],
1177    ImageSizeCache->{234., {2., 9.}}], "\[InvisibleSpace]", "\<\" / \"\>",
1178   "\[InvisibleSpace]", "3"}],
1179  SequenceForm["Loading restrictions from ", "DiagonalCKM.rst", " : ",
1180   Dynamic[PRIVATE`FR$restrictionCounter], " / ", 3],
1181  Editable->False]], "Print",
1182 CellChangeTimes->{
1183  3.633429802306655*^9, 3.633429905609647*^9, 3.633759825766581*^9,
1184   3.633761301178506*^9, 3.633767062560195*^9, 3.63568273224512*^9,
1185   3.635682967881454*^9, 3.635760185978702*^9, 3.637640793234333*^9,
1186   3.6376409663453207`*^9, 3.6376414136719303`*^9, 3.63764154491444*^9,
1187   3.637642217600418*^9, 3.63764258028148*^9, 3.637642660905436*^9,
1188   3.637648137063446*^9, 3.6393770036335373`*^9, 3.639377101485468*^9,
1189   3.6393772091113167`*^9, 3.639377330579913*^9, 3.6393774205071917`*^9,
1190   3.6393775444189453`*^9, 3.639377598580368*^9, 3.6393796522052507`*^9,
1191   3.639379737341523*^9, 3.639388647257901*^9, 3.639989041644158*^9,
1192   3.640510201117528*^9, 3.641476035981634*^9, 3.641539952215021*^9,
1193   3.641634873333626*^9, 3.641727111641016*^9, 3.641789794796475*^9,
1194   3.643025228084968*^9, 3.645272125469777*^9, 3.645273303628559*^9, {
1195   3.6452749506689787`*^9, 3.645274959391213*^9}, 3.645770348976141*^9,
1196   3.645780133863399*^9, 3.6457804245924997`*^9, 3.6460263615142183`*^9,
1197   3.6463709387164497`*^9, 3.646371746535939*^9, 3.6463770982378063`*^9,
1198   3.646388607680099*^9}],
1199
1200Cell[BoxData[
1201 InterpretationBox[
1202  RowBox[{"\<\"Loading restrictions from \"\>",
1203   "\[InvisibleSpace]", "\<\"Massless_5f.rst\"\>",
1204   "\[InvisibleSpace]", "\<\" : \"\>", "\[InvisibleSpace]",
1205   DynamicBox[ToBoxes[PRIVATE`FR$restrictionCounter, StandardForm],
1206    ImageSizeCache->{234., {2., 9.}}], "\[InvisibleSpace]", "\<\" / \"\>",
1207   "\[InvisibleSpace]", "21"}],
1208  SequenceForm["Loading restrictions from ", "Massless_5f.rst", " : ",
1209   Dynamic[PRIVATE`FR$restrictionCounter], " / ", 21],
1210  Editable->False]], "Print",
1211 CellChangeTimes->{
1212  3.633429802306655*^9, 3.633429905609647*^9, 3.633759825766581*^9,
1213   3.633761301178506*^9, 3.633767062560195*^9, 3.63568273224512*^9,
1214   3.635682967881454*^9, 3.635760185978702*^9, 3.637640793234333*^9,
1215   3.6376409663453207`*^9, 3.6376414136719303`*^9, 3.63764154491444*^9,
1216   3.637642217600418*^9, 3.63764258028148*^9, 3.637642660905436*^9,
1217   3.637648137063446*^9, 3.6393770036335373`*^9, 3.639377101485468*^9,
1218   3.6393772091113167`*^9, 3.639377330579913*^9, 3.6393774205071917`*^9,
1219   3.6393775444189453`*^9, 3.639377598580368*^9, 3.6393796522052507`*^9,
1220   3.639379737341523*^9, 3.639388647257901*^9, 3.639989041644158*^9,
1221   3.640510201117528*^9, 3.641476035981634*^9, 3.641539952215021*^9,
1222   3.641634873333626*^9, 3.641727111641016*^9, 3.641789794796475*^9,
1223   3.643025228084968*^9, 3.645272125469777*^9, 3.645273303628559*^9, {
1224   3.6452749506689787`*^9, 3.645274959391213*^9}, 3.645770348976141*^9,
1225   3.645780133863399*^9, 3.6457804245924997`*^9, 3.6460263615142183`*^9,
1226   3.6463709387164497`*^9, 3.646371746535939*^9, 3.6463770982378063`*^9,
1227   3.64638860782644*^9}],
1228
1229Cell[BoxData["\<\"Restrictions loaded.\"\>"], "Print",
1230 CellChangeTimes->{
1231  3.633429802306655*^9, 3.633429905609647*^9, 3.633759825766581*^9,
1232   3.633761301178506*^9, 3.633767062560195*^9, 3.63568273224512*^9,
1233   3.635682967881454*^9, 3.635760185978702*^9, 3.637640793234333*^9,
1234   3.6376409663453207`*^9, 3.6376414136719303`*^9, 3.63764154491444*^9,
1235   3.637642217600418*^9, 3.63764258028148*^9, 3.637642660905436*^9,
1236   3.637648137063446*^9, 3.6393770036335373`*^9, 3.639377101485468*^9,
1237   3.6393772091113167`*^9, 3.639377330579913*^9, 3.6393774205071917`*^9,
1238   3.6393775444189453`*^9, 3.639377598580368*^9, 3.6393796522052507`*^9,
1239   3.639379737341523*^9, 3.639388647257901*^9, 3.639989041644158*^9,
1240   3.640510201117528*^9, 3.641476035981634*^9, 3.641539952215021*^9,
1241   3.641634873333626*^9, 3.641727111641016*^9, 3.641789794796475*^9,
1242   3.643025228084968*^9, 3.645272125469777*^9, 3.645273303628559*^9, {
1243   3.6452749506689787`*^9, 3.645274959391213*^9}, 3.645770348976141*^9,
1244   3.645780133863399*^9, 3.6457804245924997`*^9, 3.6460263615142183`*^9,
1245   3.6463709387164497`*^9, 3.646371746535939*^9, 3.6463770982378063`*^9,
1246   3.64638860794532*^9}]
1247}, Open  ]]
1248}, Open  ]],
1249
1250Cell[CellGroupData[{
1251
1252Cell[BoxData[
1253 RowBox[{
1254  RowBox[{"CheckHermiticity", "[",
1255   RowBox[{"LSM", "+", "L1DM", "+", "L1SMEW"}], "]"}], ";"}]], "Input",
1256 CellChangeTimes->{{3.633332290865224*^9, 3.633332305905663*^9},
1257   3.63333373270155*^9, 3.6337594836385403`*^9, {3.6337598304792633`*^9,
1258   3.633759842414878*^9}, {3.635681667322399*^9, 3.63568169987755*^9}, {
1259   3.637640325295994*^9, 3.637640326653831*^9}, {3.6494030879543467`*^9,
1260   3.649403102697242*^9}}],
1261
1262Cell[CellGroupData[{
1263
1264Cell[BoxData["\<\"Checking for hermiticity by calculating the Feynman rules \
1265contained in L-HC[L].\"\>"], "Print",
1266 CellChangeTimes->{3.633332308739032*^9, 3.63333380901442*^9,
1267  3.633347988065689*^9, 3.6337598744753237`*^9, 3.63376130433986*^9,
1268  3.635682737560614*^9, 3.635682971522418*^9, 3.6357601897569227`*^9,
1269  3.637640797079672*^9, 3.6376409701272078`*^9, 3.6376415490168123`*^9,
1270  3.637642221307509*^9, 3.637648140805072*^9, 3.639377007793378*^9,
1271  3.639377106318482*^9, 3.640510205979582*^9, 3.643025233462542*^9,
1272  3.6452721299027557`*^9, 3.645273306904765*^9, 3.645274963609025*^9,
1273  3.6457703530356617`*^9, 3.645780138474923*^9, 3.646026367370565*^9,
1274  3.646370944015682*^9, 3.6463717494932547`*^9, 3.6467338848898067`*^9,
1275  3.646733969408041*^9, 3.647076472955679*^9, 3.647347871963839*^9,
1276  3.649403291499647*^9, 3.649404353312338*^9}],
1277
1278Cell[BoxData["\<\"If the lagrangian is hermitian, then the number of vertices \
1279should be zero.\"\>"], "Print",
1280 CellChangeTimes->{3.633332308739032*^9, 3.63333380901442*^9,
1281  3.633347988065689*^9, 3.6337598744753237`*^9, 3.63376130433986*^9,
1282  3.635682737560614*^9, 3.635682971522418*^9, 3.6357601897569227`*^9,
1283  3.637640797079672*^9, 3.6376409701272078`*^9, 3.6376415490168123`*^9,
1284  3.637642221307509*^9, 3.637648140805072*^9, 3.639377007793378*^9,
1285  3.639377106318482*^9, 3.640510205979582*^9, 3.643025233462542*^9,
1286  3.6452721299027557`*^9, 3.645273306904765*^9, 3.645274963609025*^9,
1287  3.6457703530356617`*^9, 3.645780138474923*^9, 3.646026367370565*^9,
1288  3.646370944015682*^9, 3.6463717494932547`*^9, 3.6467338848898067`*^9,
1289  3.646733969408041*^9, 3.647076472955679*^9, 3.647347871963839*^9,
1290  3.649403291499647*^9, 3.649404353313555*^9}],
1291
1292Cell[BoxData[
1293 StyleBox["\<\"Starting Feynman rule calculation.\"\>",
1294  StripOnInput->False,
1295  LineColor->RGBColor[1, 0.5, 0],
1296  FrontFaceColor->RGBColor[1, 0.5, 0],
1297  BackFaceColor->RGBColor[1, 0.5, 0],
1298  GraphicsColor->RGBColor[1, 0.5, 0],
1299  FontWeight->Bold,
1300  FontColor->RGBColor[1, 0.5, 0]]], "Print",
1301 CellChangeTimes->{3.633332308739032*^9, 3.63333380901442*^9,
1302  3.633347988065689*^9, 3.6337598744753237`*^9, 3.63376130433986*^9,
1303  3.635682737560614*^9, 3.635682971522418*^9, 3.6357601897569227`*^9,
1304  3.637640797079672*^9, 3.6376409701272078`*^9, 3.6376415490168123`*^9,
1305  3.637642221307509*^9, 3.637648140805072*^9, 3.639377007793378*^9,
1306  3.639377106318482*^9, 3.640510205979582*^9, 3.643025233462542*^9,
1307  3.6452721299027557`*^9, 3.645273306904765*^9, 3.645274963609025*^9,
1308  3.6457703530356617`*^9, 3.645780138474923*^9, 3.646026367370565*^9,
1309  3.646370944015682*^9, 3.6463717494932547`*^9, 3.6467338848898067`*^9,
1310  3.646733969408041*^9, 3.647076472955679*^9, 3.647347871963839*^9,
1311  3.649403291499647*^9, 3.6494043645299463`*^9}],
1312
1313Cell[BoxData["\<\"Expanding the Lagrangian...\"\>"], "Print",
1314 CellChangeTimes->{3.633332308739032*^9, 3.63333380901442*^9,
1315  3.633347988065689*^9, 3.6337598744753237`*^9, 3.63376130433986*^9,
1316  3.635682737560614*^9, 3.635682971522418*^9, 3.6357601897569227`*^9,
1317  3.637640797079672*^9, 3.6376409701272078`*^9, 3.6376415490168123`*^9,
1318  3.637642221307509*^9, 3.637648140805072*^9, 3.639377007793378*^9,
1319  3.639377106318482*^9, 3.640510205979582*^9, 3.643025233462542*^9,
1320  3.6452721299027557`*^9, 3.645273306904765*^9, 3.645274963609025*^9,
1321  3.6457703530356617`*^9, 3.645780138474923*^9, 3.646026367370565*^9,
1322  3.646370944015682*^9, 3.6463717494932547`*^9, 3.6467338848898067`*^9,
1323  3.646733969408041*^9, 3.647076472955679*^9, 3.647347871963839*^9,
1324  3.649403291499647*^9, 3.6494043645635242`*^9}],
1325
1326Cell[BoxData[
1327 InterpretationBox[
1328  RowBox[{"\<\"Expanding the indices over \"\>", "\[InvisibleSpace]", "4",
1329   "\[InvisibleSpace]", "\<\" cores\"\>"}],
1330  SequenceForm["Expanding the indices over ", 4, " cores"],
1331  Editable->False]], "Print",
1332 CellChangeTimes->{3.633332308739032*^9, 3.63333380901442*^9,
1333  3.633347988065689*^9, 3.6337598744753237`*^9, 3.63376130433986*^9,
1334  3.635682737560614*^9, 3.635682971522418*^9, 3.6357601897569227`*^9,
1335  3.637640797079672*^9, 3.6376409701272078`*^9, 3.6376415490168123`*^9,
1336  3.637642221307509*^9, 3.637648140805072*^9, 3.639377007793378*^9,
1337  3.639377106318482*^9, 3.640510205979582*^9, 3.643025233462542*^9,
1338  3.6452721299027557`*^9, 3.645273306904765*^9, 3.645274963609025*^9,
1339  3.6457703530356617`*^9, 3.645780138474923*^9, 3.646026367370565*^9,
1340  3.646370944015682*^9, 3.6463717494932547`*^9, 3.6467338848898067`*^9,
1341  3.646733969408041*^9, 3.647076472955679*^9, 3.647347871963839*^9,
1342  3.649403291499647*^9, 3.6494043645651207`*^9}],
1343
1344Cell[BoxData["\<\"Collecting the different structures that enter the \
1345vertex.\"\>"], "Print",
1346 CellChangeTimes->{3.633332308739032*^9, 3.63333380901442*^9,
1347  3.633347988065689*^9, 3.6337598744753237`*^9, 3.63376130433986*^9,
1348  3.635682737560614*^9, 3.635682971522418*^9, 3.6357601897569227`*^9,
1349  3.637640797079672*^9, 3.6376409701272078`*^9, 3.6376415490168123`*^9,
1350  3.637642221307509*^9, 3.637648140805072*^9, 3.639377007793378*^9,
1351  3.639377106318482*^9, 3.640510205979582*^9, 3.643025233462542*^9,
1352  3.6452721299027557`*^9, 3.645273306904765*^9, 3.645274963609025*^9,
1353  3.6457703530356617`*^9, 3.645780138474923*^9, 3.646026367370565*^9,
1354  3.646370944015682*^9, 3.6463717494932547`*^9, 3.6467338848898067`*^9,
1355  3.646733969408041*^9, 3.647076472955679*^9, 3.647347871963839*^9,
1356  3.649403291499647*^9, 3.649404365456595*^9}],
1357
1358Cell[BoxData["\<\"No vertices found.\"\>"], "Print",
1359 CellChangeTimes->{3.633332308739032*^9, 3.63333380901442*^9,
1360  3.633347988065689*^9, 3.6337598744753237`*^9, 3.63376130433986*^9,
1361  3.635682737560614*^9, 3.635682971522418*^9, 3.6357601897569227`*^9,
1362  3.637640797079672*^9, 3.6376409701272078`*^9, 3.6376415490168123`*^9,
1363  3.637642221307509*^9, 3.637648140805072*^9, 3.639377007793378*^9,
1364  3.639377106318482*^9, 3.640510205979582*^9, 3.643025233462542*^9,
1365  3.6452721299027557`*^9, 3.645273306904765*^9, 3.645274963609025*^9,
1366  3.6457703530356617`*^9, 3.645780138474923*^9, 3.646026367370565*^9,
1367  3.646370944015682*^9, 3.6463717494932547`*^9, 3.6467338848898067`*^9,
1368  3.646733969408041*^9, 3.647076472955679*^9, 3.647347871963839*^9,
1369  3.649403291499647*^9, 3.649404365495038*^9}],
1370
1371Cell[BoxData[
1372 InterpretationBox[
1373  RowBox[{"0", "\[InvisibleSpace]", "\<\" vertices obtained.\"\>"}],
1374  SequenceForm[0, " vertices obtained."],
1375  Editable->False]], "Print",
1376 CellChangeTimes->{3.633332308739032*^9, 3.63333380901442*^9,
1377  3.633347988065689*^9, 3.6337598744753237`*^9, 3.63376130433986*^9,
1378  3.635682737560614*^9, 3.635682971522418*^9, 3.6357601897569227`*^9,
1379  3.637640797079672*^9, 3.6376409701272078`*^9, 3.6376415490168123`*^9,
1380  3.637642221307509*^9, 3.637648140805072*^9, 3.639377007793378*^9,
1381  3.639377106318482*^9, 3.640510205979582*^9, 3.643025233462542*^9,
1382  3.6452721299027557`*^9, 3.645273306904765*^9, 3.645274963609025*^9,
1383  3.6457703530356617`*^9, 3.645780138474923*^9, 3.646026367370565*^9,
1384  3.646370944015682*^9, 3.6463717494932547`*^9, 3.6467338848898067`*^9,
1385  3.646733969408041*^9, 3.647076472955679*^9, 3.647347871963839*^9,
1386  3.649403291499647*^9, 3.6494043654964247`*^9}],
1387
1388Cell[BoxData["\<\"The lagrangian is hermitian.\"\>"], "Print",
1389 CellChangeTimes->{3.633332308739032*^9, 3.63333380901442*^9,
1390  3.633347988065689*^9, 3.6337598744753237`*^9, 3.63376130433986*^9,
1391  3.635682737560614*^9, 3.635682971522418*^9, 3.6357601897569227`*^9,
1392  3.637640797079672*^9, 3.6376409701272078`*^9, 3.6376415490168123`*^9,
1393  3.637642221307509*^9, 3.637648140805072*^9, 3.639377007793378*^9,
1394  3.639377106318482*^9, 3.640510205979582*^9, 3.643025233462542*^9,
1395  3.6452721299027557`*^9, 3.645273306904765*^9, 3.645274963609025*^9,
1396  3.6457703530356617`*^9, 3.645780138474923*^9, 3.646026367370565*^9,
1397  3.646370944015682*^9, 3.6463717494932547`*^9, 3.6467338848898067`*^9,
1398  3.646733969408041*^9, 3.647076472955679*^9, 3.647347871963839*^9,
1399  3.649403291499647*^9, 3.649404365497686*^9}]
1400}, Open  ]]
1401}, Open  ]],
1402
1403Cell[CellGroupData[{
1404
1405Cell[BoxData[
1406 RowBox[{
1407  RowBox[{"FeynmanRules", "[",
1408   RowBox[{"LSM", "+", "L1DM", "+", "L1SMEW"}], "]"}], ";"}]], "Input",
1409 CellChangeTimes->{{3.603539435628551*^9, 3.603539443511031*^9}, {
1410   3.633332257675256*^9, 3.633332273874855*^9}, 3.633332330927515*^9, {
1411   3.633759485057345*^9, 3.6337594896329927`*^9}, {3.633759845728799*^9,
1412   3.633759845998361*^9}, {3.635681693519002*^9, 3.635681708124132*^9},
1413   3.637640353419092*^9, 3.649403113712747*^9}],
1414
1415Cell[CellGroupData[{
1416
1417Cell[BoxData[
1418 StyleBox["\<\"Starting Feynman rule calculation.\"\>",
1419  StripOnInput->False,
1420  LineColor->RGBColor[1, 0.5, 0],
1421  FrontFaceColor->RGBColor[1, 0.5, 0],
1422  BackFaceColor->RGBColor[1, 0.5, 0],
1423  GraphicsColor->RGBColor[1, 0.5, 0],
1424  FontWeight->Bold,
1425  FontColor->RGBColor[1, 0.5, 0]]], "Print",
1426 CellChangeTimes->{
1427  3.603539445189519*^9, 3.603542874036621*^9, 3.603599924678094*^9,
1428   3.603601350674114*^9, 3.604946764412753*^9, 3.6065503893794193`*^9,
1429   3.608281576010133*^9, 3.608281915221355*^9, 3.608282113894981*^9,
1430   3.6082824343299837`*^9, {3.6082826108416033`*^9, 3.6082826382983027`*^9},
1431   3.608282706384251*^9, 3.6083534340971737`*^9, 3.6083546211097918`*^9,
1432   3.6083581397389507`*^9, 3.6083592300796347`*^9, 3.608451157968486*^9,
1433   3.608451329297677*^9, 3.609236387487259*^9, 3.609757624723915*^9,
1434   3.610078304599987*^9, 3.610078910000843*^9, 3.610079078750251*^9,
1435   3.610097065065124*^9, 3.6100971489601507`*^9, {3.610097187768207*^9,
1436   3.61009720841532*^9}, 3.611033106407926*^9, 3.6110357697809153`*^9,
1437   3.6110358967154217`*^9, 3.6110360250818863`*^9, 3.611036159530105*^9,
1438   3.611036228135294*^9, 3.611036722103962*^9, 3.6110465423941793`*^9,
1439   3.62608199560072*^9, 3.6274854776686583`*^9, 3.627628080607481*^9,
1440   3.6276357595056877`*^9, 3.6278002589171057`*^9, {3.6333322543816843`*^9,
1441   3.6333322783738317`*^9}, 3.633332333800562*^9, 3.6333338281586237`*^9,
1442   3.6333480066889687`*^9, 3.635682757363223*^9, 3.6356829870207*^9,
1443   3.645272148521742*^9, 3.6452733633168697`*^9, 3.6452750043196363`*^9,
1444   3.645770427852042*^9, 3.645780170482917*^9, 3.6460263819960527`*^9,
1445   3.649403307509602*^9}],
1446
1447Cell[BoxData["\<\"Expanding the Lagrangian...\"\>"], "Print",
1448 CellChangeTimes->{
1449  3.603539445189519*^9, 3.603542874036621*^9, 3.603599924678094*^9,
1450   3.603601350674114*^9, 3.604946764412753*^9, 3.6065503893794193`*^9,
1451   3.608281576010133*^9, 3.608281915221355*^9, 3.608282113894981*^9,
1452   3.6082824343299837`*^9, {3.6082826108416033`*^9, 3.6082826382983027`*^9},
1453   3.608282706384251*^9, 3.6083534340971737`*^9, 3.6083546211097918`*^9,
1454   3.6083581397389507`*^9, 3.6083592300796347`*^9, 3.608451157968486*^9,
1455   3.608451329297677*^9, 3.609236387487259*^9, 3.609757624723915*^9,
1456   3.610078304599987*^9, 3.610078910000843*^9, 3.610079078750251*^9,
1457   3.610097065065124*^9, 3.6100971489601507`*^9, {3.610097187768207*^9,
1458   3.61009720841532*^9}, 3.611033106407926*^9, 3.6110357697809153`*^9,
1459   3.6110358967154217`*^9, 3.6110360250818863`*^9, 3.611036159530105*^9,
1460   3.611036228135294*^9, 3.611036722103962*^9, 3.6110465423941793`*^9,
1461   3.62608199560072*^9, 3.6274854776686583`*^9, 3.627628080607481*^9,
1462   3.6276357595056877`*^9, 3.6278002589171057`*^9, {3.6333322543816843`*^9,
1463   3.6333322783738317`*^9}, 3.633332333800562*^9, 3.6333338281586237`*^9,
1464   3.6333480066889687`*^9, 3.635682757363223*^9, 3.6356829870207*^9,
1465   3.645272148521742*^9, 3.6452733633168697`*^9, 3.6452750043196363`*^9,
1466   3.645770427852042*^9, 3.645780170482917*^9, 3.6460263819960527`*^9,
1467   3.649403307534171*^9}],
1468
1469Cell[BoxData[
1470 InterpretationBox[
1471  RowBox[{"\<\"Expanding the indices over \"\>", "\[InvisibleSpace]", "4",
1472   "\[InvisibleSpace]", "\<\" cores\"\>"}],
1473  SequenceForm["Expanding the indices over ", 4, " cores"],
1474  Editable->False]], "Print",
1475 CellChangeTimes->{
1476  3.603539445189519*^9, 3.603542874036621*^9, 3.603599924678094*^9,
1477   3.603601350674114*^9, 3.604946764412753*^9, 3.6065503893794193`*^9,
1478   3.608281576010133*^9, 3.608281915221355*^9, 3.608282113894981*^9,
1479   3.6082824343299837`*^9, {3.6082826108416033`*^9, 3.6082826382983027`*^9},
1480   3.608282706384251*^9, 3.6083534340971737`*^9, 3.6083546211097918`*^9,
1481   3.6083581397389507`*^9, 3.6083592300796347`*^9, 3.608451157968486*^9,
1482   3.608451329297677*^9, 3.609236387487259*^9, 3.609757624723915*^9,
1483   3.610078304599987*^9, 3.610078910000843*^9, 3.610079078750251*^9,
1484   3.610097065065124*^9, 3.6100971489601507`*^9, {3.610097187768207*^9,
1485   3.61009720841532*^9}, 3.611033106407926*^9, 3.6110357697809153`*^9,
1486   3.6110358967154217`*^9, 3.6110360250818863`*^9, 3.611036159530105*^9,
1487   3.611036228135294*^9, 3.611036722103962*^9, 3.6110465423941793`*^9,
1488   3.62608199560072*^9, 3.6274854776686583`*^9, 3.627628080607481*^9,
1489   3.6276357595056877`*^9, 3.6278002589171057`*^9, {3.6333322543816843`*^9,
1490   3.6333322783738317`*^9}, 3.633332333800562*^9, 3.6333338281586237`*^9,
1491   3.6333480066889687`*^9, 3.635682757363223*^9, 3.6356829870207*^9,
1492   3.645272148521742*^9, 3.6452733633168697`*^9, 3.6452750043196363`*^9,
1493   3.645770427852042*^9, 3.645780170482917*^9, 3.6460263819960527`*^9,
1494   3.649403307536469*^9}],
1495
1496Cell[BoxData["\<\"Collecting the different structures that enter the \
1497vertex.\"\>"], "Print",
1498 CellChangeTimes->{
1499  3.603539445189519*^9, 3.603542874036621*^9, 3.603599924678094*^9,
1500   3.603601350674114*^9, 3.604946764412753*^9, 3.6065503893794193`*^9,
1501   3.608281576010133*^9, 3.608281915221355*^9, 3.608282113894981*^9,
1502   3.6082824343299837`*^9, {3.6082826108416033`*^9, 3.6082826382983027`*^9},
1503   3.608282706384251*^9, 3.6083534340971737`*^9, 3.6083546211097918`*^9,
1504   3.6083581397389507`*^9, 3.6083592300796347`*^9, 3.608451157968486*^9,
1505   3.608451329297677*^9, 3.609236387487259*^9, 3.609757624723915*^9,
1506   3.610078304599987*^9, 3.610078910000843*^9, 3.610079078750251*^9,
1507   3.610097065065124*^9, 3.6100971489601507`*^9, {3.610097187768207*^9,
1508   3.61009720841532*^9}, 3.611033106407926*^9, 3.6110357697809153`*^9,
1509   3.6110358967154217`*^9, 3.6110360250818863`*^9, 3.611036159530105*^9,
1510   3.611036228135294*^9, 3.611036722103962*^9, 3.6110465423941793`*^9,
1511   3.62608199560072*^9, 3.6274854776686583`*^9, 3.627628080607481*^9,
1512   3.6276357595056877`*^9, 3.6278002589171057`*^9, {3.6333322543816843`*^9,
1513   3.6333322783738317`*^9}, 3.633332333800562*^9, 3.6333338281586237`*^9,
1514   3.6333480066889687`*^9, 3.635682757363223*^9, 3.6356829870207*^9,
1515   3.645272148521742*^9, 3.6452733633168697`*^9, 3.6452750043196363`*^9,
1516   3.645770427852042*^9, 3.645780170482917*^9, 3.6460263819960527`*^9,
1517   3.649403312922605*^9}],
1518
1519Cell[BoxData[
1520 InterpretationBox[
1521  RowBox[{
1522  "119", "\[InvisibleSpace]", "\<\" possible non-zero vertices have been \
1523found -> starting the computation: \"\>", "\[InvisibleSpace]",
1524   DynamicBox[ToBoxes[FeynRules`FR$FeynmanRules, StandardForm],
1525    ImageSizeCache->{201., {2., 9.}}], "\[InvisibleSpace]", "\<\" / \"\>",
1526   "\[InvisibleSpace]", "119", "\[InvisibleSpace]", "\<\".\"\>"}],
1527  SequenceForm[
1528  119, " possible non-zero vertices have been found -> starting the \
1529computation: ",
1530   Dynamic[FeynRules`FR$FeynmanRules], " / ", 119, "."],
1531  Editable->False]], "Print",
1532 CellChangeTimes->{
1533  3.603539445189519*^9, 3.603542874036621*^9, 3.603599924678094*^9,
1534   3.603601350674114*^9, 3.604946764412753*^9, 3.6065503893794193`*^9,
1535   3.608281576010133*^9, 3.608281915221355*^9, 3.608282113894981*^9,
1536   3.6082824343299837`*^9, {3.6082826108416033`*^9, 3.6082826382983027`*^9},
1537   3.608282706384251*^9, 3.6083534340971737`*^9, 3.6083546211097918`*^9,
1538   3.6083581397389507`*^9, 3.6083592300796347`*^9, 3.608451157968486*^9,
1539   3.608451329297677*^9, 3.609236387487259*^9, 3.609757624723915*^9,
1540   3.610078304599987*^9, 3.610078910000843*^9, 3.610079078750251*^9,
1541   3.610097065065124*^9, 3.6100971489601507`*^9, {3.610097187768207*^9,
1542   3.61009720841532*^9}, 3.611033106407926*^9, 3.6110357697809153`*^9,
1543   3.6110358967154217`*^9, 3.6110360250818863`*^9, 3.611036159530105*^9,
1544   3.611036228135294*^9, 3.611036722103962*^9, 3.6110465423941793`*^9,
1545   3.62608199560072*^9, 3.6274854776686583`*^9, 3.627628080607481*^9,
1546   3.6276357595056877`*^9, 3.6278002589171057`*^9, {3.6333322543816843`*^9,
1547   3.6333322783738317`*^9}, 3.633332333800562*^9, 3.6333338281586237`*^9,
1548   3.6333480066889687`*^9, 3.635682757363223*^9, 3.6356829870207*^9,
1549   3.645272148521742*^9, 3.6452733633168697`*^9, 3.6452750043196363`*^9,
1550   3.645770427852042*^9, 3.645780170482917*^9, 3.6460263819960527`*^9,
1551   3.649403312977442*^9}],
1552
1553Cell[BoxData[
1554 InterpretationBox[
1555  RowBox[{"114", "\[InvisibleSpace]", "\<\" vertices obtained.\"\>"}],
1556  SequenceForm[114, " vertices obtained."],
1557  Editable->False]], "Print",
1558 CellChangeTimes->{
1559  3.603539445189519*^9, 3.603542874036621*^9, 3.603599924678094*^9,
1560   3.603601350674114*^9, 3.604946764412753*^9, 3.6065503893794193`*^9,
1561   3.608281576010133*^9, 3.608281915221355*^9, 3.608282113894981*^9,
1562   3.6082824343299837`*^9, {3.6082826108416033`*^9, 3.6082826382983027`*^9},
1563   3.608282706384251*^9, 3.6083534340971737`*^9, 3.6083546211097918`*^9,
1564   3.6083581397389507`*^9, 3.6083592300796347`*^9, 3.608451157968486*^9,
1565   3.608451329297677*^9, 3.609236387487259*^9, 3.609757624723915*^9,
1566   3.610078304599987*^9, 3.610078910000843*^9, 3.610079078750251*^9,
1567   3.610097065065124*^9, 3.6100971489601507`*^9, {3.610097187768207*^9,
1568   3.61009720841532*^9}, 3.611033106407926*^9, 3.6110357697809153`*^9,
1569   3.6110358967154217`*^9, 3.6110360250818863`*^9, 3.611036159530105*^9,
1570   3.611036228135294*^9, 3.611036722103962*^9, 3.6110465423941793`*^9,
1571   3.62608199560072*^9, 3.6274854776686583`*^9, 3.627628080607481*^9,
1572   3.6276357595056877`*^9, 3.6278002589171057`*^9, {3.6333322543816843`*^9,
1573   3.6333322783738317`*^9}, 3.633332333800562*^9, 3.6333338281586237`*^9,
1574   3.6333480066889687`*^9, 3.635682757363223*^9, 3.6356829870207*^9,
1575   3.645272148521742*^9, 3.6452733633168697`*^9, 3.6452750043196363`*^9,
1576   3.645770427852042*^9, 3.645780170482917*^9, 3.6460263819960527`*^9,
1577   3.649403316739642*^9}]
1578}, Open  ]]
1579}, Open  ]],
1580
1581Cell[BoxData[
1582 RowBox[{"(*",
1583  RowBox[{
1584   RowBox[{"Lren", "=",
1585    RowBox[{"OnShellRenormalization", "[",
1586     RowBox[{
1587      RowBox[{"LSM", "+", "LDM"}], ",",
1588      RowBox[{"QCDOnly", "\[Rule]", "True"}], ",",
1589      RowBox[{"FlavorMixing", "\[Rule]", "False"}]}], "]"}]}], ";"}],
1590  "*)"}]], "Input",
1591 CellChangeTimes->{{3.639377293725038*^9, 3.639377294339272*^9}, {
1592  3.639377426660799*^9, 3.63937742737294*^9}, {3.639377575388748*^9,
1593  3.639377575885442*^9}, {3.639377666979536*^9, 3.639377667838319*^9}, {
1594  3.639379689397005*^9, 3.6393796898866987`*^9}, {3.63938867958291*^9,
1595  3.639388680272472*^9}, {3.64673380677352*^9, 3.646733809952742*^9}}],
1596
1597Cell[CellGroupData[{
1598
1599Cell[BoxData[
1600 RowBox[{
1601  RowBox[{"Lren", "=",
1602   RowBox[{"OnShellRenormalization", "[",
1603    RowBox[{
1604     RowBox[{"LSM", "+", "L1DM", "+", "L1SMEW"}], ",",
1605     RowBox[{"QCDOnly", "\[Rule]", "True"}], ",",
1606     RowBox[{"FlavorMixing", "\[Rule]", "False"}]}], "]"}]}], ";"}]], "Input",\
1607
1608 CellChangeTimes->{{3.646733829286021*^9, 3.646733829286853*^9}, {
1609   3.6467339400725517`*^9, 3.646733941680039*^9}, {3.647076393112405*^9,
1610   3.647076398191709*^9}, 3.649403119421309*^9}],
1611
1612Cell[CellGroupData[{
1613
1614Cell[BoxData["\<\"Extracting the mass and kinetic terms to simplify \
1615them\"\>"], "Print",
1616 CellChangeTimes->{3.6393797451686087`*^9, 3.639388656970622*^9,
1617  3.6393886895686502`*^9, 3.639989052082037*^9, 3.6405102358000793`*^9,
1618  3.6414760466539183`*^9, 3.641539965513507*^9, 3.641634883223867*^9,
1619  3.6417271222307262`*^9, 3.6417898055676622`*^9, 3.643025271259474*^9,
1620  3.645272184616929*^9, 3.645273388409584*^9, 3.645275809764739*^9,
1621  3.6457704453515463`*^9, 3.645780191266561*^9, 3.6457804335225677`*^9,
1622  3.646026407845578*^9, 3.646370973435533*^9, 3.646371770694023*^9,
1623  3.646377110494865*^9, 3.646388619329558*^9, 3.646733906197085*^9,
1624  3.6467339893986197`*^9, 3.6470764908395452`*^9, 3.647347894759062*^9,
1625  3.649403329101622*^9, 3.6494043736046743`*^9}],
1626
1627Cell[BoxData[
1628 InterpretationBox[
1629  RowBox[{"\<\"Neglecting all terms with more than \"\>",
1630   "\[InvisibleSpace]", "\<\"2\"\>",
1631   "\[InvisibleSpace]", "\<\" particles.\"\>"}],
1632  SequenceForm["Neglecting all terms with more than ", "2", " particles."],
1633  Editable->False]], "Print",
1634 CellChangeTimes->{3.6393797451686087`*^9, 3.639388656970622*^9,
1635  3.6393886895686502`*^9, 3.639989052082037*^9, 3.6405102358000793`*^9,
1636  3.6414760466539183`*^9, 3.641539965513507*^9, 3.641634883223867*^9,
1637  3.6417271222307262`*^9, 3.6417898055676622`*^9, 3.643025271259474*^9,
1638  3.645272184616929*^9, 3.645273388409584*^9, 3.645275809764739*^9,
1639  3.6457704453515463`*^9, 3.645780191266561*^9, 3.6457804335225677`*^9,
1640  3.646026407845578*^9, 3.646370973435533*^9, 3.646371770694023*^9,
1641  3.646377110494865*^9, 3.646388619329558*^9, 3.646733906197085*^9,
1642  3.6467339893986197`*^9, 3.6470764908395452`*^9, 3.647347894759062*^9,
1643  3.649403329101622*^9, 3.649404377752858*^9}],
1644
1645Cell[BoxData["\<\"renormalizing the fields\"\>"], "Print",
1646 CellChangeTimes->{3.6393797451686087`*^9, 3.639388656970622*^9,
1647  3.6393886895686502`*^9, 3.639989052082037*^9, 3.6405102358000793`*^9,
1648  3.6414760466539183`*^9, 3.641539965513507*^9, 3.641634883223867*^9,
1649  3.6417271222307262`*^9, 3.6417898055676622`*^9, 3.643025271259474*^9,
1650  3.645272184616929*^9, 3.645273388409584*^9, 3.645275809764739*^9,
1651  3.6457704453515463`*^9, 3.645780191266561*^9, 3.6457804335225677`*^9,
1652  3.646026407845578*^9, 3.646370973435533*^9, 3.646371770694023*^9,
1653  3.646377110494865*^9, 3.646388619329558*^9, 3.646733906197085*^9,
1654  3.6467339893986197`*^9, 3.6470764908395452`*^9, 3.647347894759062*^9,
1655  3.649403329101622*^9, 3.6494043878335037`*^9}],
1656
1657Cell[BoxData["\<\"No mixing allowed for the renormalization\"\>"], "Print",
1658 CellChangeTimes->{3.6393797451686087`*^9, 3.639388656970622*^9,
1659  3.6393886895686502`*^9, 3.639989052082037*^9, 3.6405102358000793`*^9,
1660  3.6414760466539183`*^9, 3.641539965513507*^9, 3.641634883223867*^9,
1661  3.6417271222307262`*^9, 3.6417898055676622`*^9, 3.643025271259474*^9,
1662  3.645272184616929*^9, 3.645273388409584*^9, 3.645275809764739*^9,
1663  3.6457704453515463`*^9, 3.645780191266561*^9, 3.6457804335225677`*^9,
1664  3.646026407845578*^9, 3.646370973435533*^9, 3.646371770694023*^9,
1665  3.646377110494865*^9, 3.646388619329558*^9, 3.646733906197085*^9,
1666  3.6467339893986197`*^9, 3.6470764908395452`*^9, 3.647347894759062*^9,
1667  3.649403329101622*^9, 3.649404387951726*^9}],
1668
1669Cell[BoxData["\<\"renormalizing the parameters\"\>"], "Print",
1670 CellChangeTimes->{3.6393797451686087`*^9, 3.639388656970622*^9,
1671  3.6393886895686502`*^9, 3.639989052082037*^9, 3.6405102358000793`*^9,
1672  3.6414760466539183`*^9, 3.641539965513507*^9, 3.641634883223867*^9,
1673  3.6417271222307262`*^9, 3.6417898055676622`*^9, 3.643025271259474*^9,
1674  3.645272184616929*^9, 3.645273388409584*^9, 3.645275809764739*^9,
1675  3.6457704453515463`*^9, 3.645780191266561*^9, 3.6457804335225677`*^9,
1676  3.646026407845578*^9, 3.646370973435533*^9, 3.646371770694023*^9,
1677  3.646377110494865*^9, 3.646388619329558*^9, 3.646733906197085*^9,
1678  3.6467339893986197`*^9, 3.6470764908395452`*^9, 3.647347894759062*^9,
1679  3.649403329101622*^9, 3.649404387994981*^9}],
1680
1681Cell[BoxData["\<\"renormalizing the masses\"\>"], "Print",
1682 CellChangeTimes->{3.6393797451686087`*^9, 3.639388656970622*^9,
1683  3.6393886895686502`*^9, 3.639989052082037*^9, 3.6405102358000793`*^9,
1684  3.6414760466539183`*^9, 3.641539965513507*^9, 3.641634883223867*^9,
1685  3.6417271222307262`*^9, 3.6417898055676622`*^9, 3.643025271259474*^9,
1686  3.645272184616929*^9, 3.645273388409584*^9, 3.645275809764739*^9,
1687  3.6457704453515463`*^9, 3.645780191266561*^9, 3.6457804335225677`*^9,
1688  3.646026407845578*^9, 3.646370973435533*^9, 3.646371770694023*^9,
1689  3.646377110494865*^9, 3.646388619329558*^9, 3.646733906197085*^9,
1690  3.6467339893986197`*^9, 3.6470764908395452`*^9, 3.647347894759062*^9,
1691  3.649403329101622*^9, 3.6494043879971952`*^9}],
1692
1693Cell[BoxData["\<\"renormalizing the other external parameters\"\>"], "Print",
1694 CellChangeTimes->{3.6393797451686087`*^9, 3.639388656970622*^9,
1695  3.6393886895686502`*^9, 3.639989052082037*^9, 3.6405102358000793`*^9,
1696  3.6414760466539183`*^9, 3.641539965513507*^9, 3.641634883223867*^9,
1697  3.6417271222307262`*^9, 3.6417898055676622`*^9, 3.643025271259474*^9,
1698  3.645272184616929*^9, 3.645273388409584*^9, 3.645275809764739*^9,
1699  3.6457704453515463`*^9, 3.645780191266561*^9, 3.6457804335225677`*^9,
1700  3.646026407845578*^9, 3.646370973435533*^9, 3.646371770694023*^9,
1701  3.646377110494865*^9, 3.646388619329558*^9, 3.646733906197085*^9,
1702  3.6467339893986197`*^9, 3.6470764908395452`*^9, 3.647347894759062*^9,
1703  3.649403329101622*^9, 3.6494043879987*^9}],
1704
1705Cell[BoxData["\<\"Internal parameter renormalization\"\>"], "Print",
1706 CellChangeTimes->{3.6393797451686087`*^9, 3.639388656970622*^9,
1707  3.6393886895686502`*^9, 3.639989052082037*^9, 3.6405102358000793`*^9,
1708  3.6414760466539183`*^9, 3.641539965513507*^9, 3.641634883223867*^9,
1709  3.6417271222307262`*^9, 3.6417898055676622`*^9, 3.643025271259474*^9,
1710  3.645272184616929*^9, 3.645273388409584*^9, 3.645275809764739*^9,
1711  3.6457704453515463`*^9, 3.645780191266561*^9, 3.6457804335225677`*^9,
1712  3.646026407845578*^9, 3.646370973435533*^9, 3.646371770694023*^9,
1713  3.646377110494865*^9, 3.646388619329558*^9, 3.646733906197085*^9,
1714  3.6467339893986197`*^9, 3.6470764908395452`*^9, 3.647347894759062*^9,
1715  3.649403329101622*^9, 3.649404388000049*^9}],
1716
1717Cell[BoxData["\<\"renormalizing the Lagrangian\"\>"], "Print",
1718 CellChangeTimes->{3.6393797451686087`*^9, 3.639388656970622*^9,
1719  3.6393886895686502`*^9, 3.639989052082037*^9, 3.6405102358000793`*^9,
1720  3.6414760466539183`*^9, 3.641539965513507*^9, 3.641634883223867*^9,
1721  3.6417271222307262`*^9, 3.6417898055676622`*^9, 3.643025271259474*^9,
1722  3.645272184616929*^9, 3.645273388409584*^9, 3.645275809764739*^9,
1723  3.6457704453515463`*^9, 3.645780191266561*^9, 3.6457804335225677`*^9,
1724  3.646026407845578*^9, 3.646370973435533*^9, 3.646371770694023*^9,
1725  3.646377110494865*^9, 3.646388619329558*^9, 3.646733906197085*^9,
1726  3.6467339893986197`*^9, 3.6470764908395452`*^9, 3.647347894759062*^9,
1727  3.649403329101622*^9, 3.649404408618609*^9}],
1728
1729Cell[BoxData["\<\"with the parameters\"\>"], "Print",
1730 CellChangeTimes->{3.6393797451686087`*^9, 3.639388656970622*^9,
1731  3.6393886895686502`*^9, 3.639989052082037*^9, 3.6405102358000793`*^9,
1732  3.6414760466539183`*^9, 3.641539965513507*^9, 3.641634883223867*^9,
1733  3.6417271222307262`*^9, 3.6417898055676622`*^9, 3.643025271259474*^9,
1734  3.645272184616929*^9, 3.645273388409584*^9, 3.645275809764739*^9,
1735  3.6457704453515463`*^9, 3.645780191266561*^9, 3.6457804335225677`*^9,
1736  3.646026407845578*^9, 3.646370973435533*^9, 3.646371770694023*^9,
1737  3.646377110494865*^9, 3.646388619329558*^9, 3.646733906197085*^9,
1738  3.6467339893986197`*^9, 3.6470764908395452`*^9, 3.647347894759062*^9,
1739  3.649403329101622*^9, 3.649404408657929*^9}],
1740
1741Cell[BoxData["\<\"with the fields\"\>"], "Print",
1742 CellChangeTimes->{3.6393797451686087`*^9, 3.639388656970622*^9,
1743  3.6393886895686502`*^9, 3.639989052082037*^9, 3.6405102358000793`*^9,
1744  3.6414760466539183`*^9, 3.641539965513507*^9, 3.641634883223867*^9,
1745  3.6417271222307262`*^9, 3.6417898055676622`*^9, 3.643025271259474*^9,
1746  3.645272184616929*^9, 3.645273388409584*^9, 3.645275809764739*^9,
1747  3.6457704453515463`*^9, 3.645780191266561*^9, 3.6457804335225677`*^9,
1748  3.646026407845578*^9, 3.646370973435533*^9, 3.646371770694023*^9,
1749  3.646377110494865*^9, 3.646388619329558*^9, 3.646733906197085*^9,
1750  3.6467339893986197`*^9, 3.6470764908395452`*^9, 3.647347894759062*^9,
1751  3.649403329101622*^9, 3.64940440968515*^9}]
1752}, Open  ]]
1753}, Open  ]],
1754
1755Cell[BoxData[
1756 RowBox[{
1757  RowBox[{
1758   RowBox[{
1759   "SetDirectory", "[", "\"\<~/Documents/FeynArts-3.8/Models\>\"", "]"}],
1760   ";"}], " "}]], "Input",
1761 CellChangeTimes->{3.6393806207387753`*^9}],
1762
1763Cell[CellGroupData[{
1764
1765Cell[BoxData[
1766 RowBox[{"WriteFeynArtsOutput", "[",
1767  RowBox[{"Lren", ",",
1768   RowBox[{"Output", "\[Rule]", "\"\<DMsimp_s_spin1\>\""}], ",",
1769   RowBox[{"GenericFile", "\[Rule]", "False"}]}], "]"}]], "Input",
1770 CellChangeTimes->{{3.6333334931038446`*^9, 3.6333335002871113`*^9}, {
1771   3.633429938271714*^9, 3.633429940559534*^9}, {3.633759562734586*^9,
1772   3.633759563558978*^9}, {3.635681724626162*^9, 3.635681727084104*^9}, {
1773   3.6376404072686653`*^9, 3.637640408501841*^9}, {3.639376868393108*^9,
1774   3.639376873532495*^9}, {3.639376939852498*^9, 3.63937694097348*^9}, {
1775   3.6405100428214617`*^9, 3.640510047037116*^9}, {3.640510118853291*^9,
1776   3.6405101199564657`*^9}, {3.64301875554954*^9, 3.6430187563700323`*^9},
1777   3.643024935629327*^9, {3.645273450557111*^9, 3.64527345176429*^9}, {
1778   3.645275847284135*^9, 3.6452758487344007`*^9}, 3.6457702275909433`*^9, {
1779   3.645780047080944*^9, 3.645780047281754*^9}, {3.646026256330978*^9,
1780   3.646026258353125*^9}, {3.646388651789977*^9, 3.646388653583241*^9}, {
1781   3.646733795890051*^9, 3.646733799012479*^9}, {3.647347792529991*^9,
1782   3.647347793758451*^9}, {3.6494031342347517`*^9, 3.649403136315456*^9}, {
1783   3.649404423143777*^9, 3.649404424415291*^9}, {3.6500895827438307`*^9,
1784   3.650089583117058*^9}}],
1785
1786Cell[CellGroupData[{
1787
1788Cell[BoxData["\<\" - - - FeynRules interface to FeynArts - - -\"\>"], "Print",
1789 CellChangeTimes->CompressedData["
17901:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1791DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1792IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1793PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1794a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
17952vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1796HbdY/Jt1GEjr7V7isN7gtePJ3fUHQTQAPlSR/w==
1797  "]],
1798
1799Cell[BoxData["\<\"      C. Degrande C. Duhr, 2013\"\>"], "Print",
1800 CellChangeTimes->CompressedData["
18011:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1802DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1803IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1804PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1805a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
18062vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1807HbdY/Jt1GEjr7V7isN7gtWNDb8NBEA0AOtCRiQ==
1808  "]],
1809
1810Cell[BoxData["\<\"      Counterterms: B. Fuks, 2012\"\>"], "Print",
1811 CellChangeTimes->CompressedData["
18121:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1813DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1814IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1815PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1816a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
18172vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1818HbdY/Jt1GEjr7V7isN4A6N5ZDQdBNAA8C5Gy
1819  "]],
1820
1821Cell[BoxData[
1822 InterpretationBox[
1823  RowBox[{"\<\"Creating output directory: \"\>",
1824   "\[InvisibleSpace]", "\<\"DMsimp_spin1\"\>"}],
1825  SequenceForm["Creating output directory: ", "DMsimp_spin1"],
1826  Editable->False]], "Print",
1827 CellChangeTimes->CompressedData["
18281:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1829DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1830IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1831PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1832a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
18332vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1834HbdY/Jt1GEjr7V7isN4A6I9lDQdBNAA+r5II
1835  "]],
1836
1837Cell[BoxData[
1838 InterpretationBox[
1839  RowBox[{"\<\"Calculating Feynman rules for \"\>",
1840   "\[InvisibleSpace]", "\<\"L1\"\>"}],
1841  SequenceForm["Calculating Feynman rules for ", "L1"],
1842  Editable->False]], "Print",
1843 CellChangeTimes->CompressedData["
18441:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1845DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1846IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1847PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1848a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
18492vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1850HbdY/Jt1GEjr7V7isN7gtaPCpoaDIBoAONORTg==
1851  "]],
1852
1853Cell[BoxData[
1854 StyleBox["\<\"Starting Feynman rules calculation for L1.\"\>",
1855  StripOnInput->False,
1856  LineColor->RGBColor[1, 0.5, 0],
1857  FrontFaceColor->RGBColor[1, 0.5, 0],
1858  BackFaceColor->RGBColor[1, 0.5, 0],
1859  GraphicsColor->RGBColor[1, 0.5, 0],
1860  FontWeight->Bold,
1861  FontColor->RGBColor[1, 0.5, 0]]], "Print",
1862 CellChangeTimes->CompressedData["
18631:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1864DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1865IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1866PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1867a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
18682vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1869HbdY/Jt1GEjr7V7isN7gtWN3MOshEA0ANrWQ4A==
1870  "]],
1871
1872Cell[BoxData["\<\"Expanding the Lagrangian...\"\>"], "Print",
1873 CellChangeTimes->CompressedData["
18741:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1875DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1876IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1877PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1878a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
18792vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1880HbdY/Jt1GEjr7V7isN4AKJ/IeghEAwA2H5DP
1881  "]],
1882
1883Cell[BoxData[
1884 InterpretationBox[
1885  RowBox[{"\<\"Expanding the indices over \"\>", "\[InvisibleSpace]", "4",
1886   "\[InvisibleSpace]", "\<\" cores\"\>"}],
1887  SequenceForm["Expanding the indices over ", 4, " cores"],
1888  Editable->False]], "Print",
1889 CellChangeTimes->CompressedData["
18901:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1891DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1892IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1893PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1894a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
18952vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1896HbdY/Jt1GEjr7V7isN7gtWNhEeshEA0ANr6Q5Q==
1897  "]],
1898
1899Cell[BoxData["\<\"Collecting the different structures that enter the \
1900vertex.\"\>"], "Print",
1901 CellChangeTimes->CompressedData["
19021:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1903DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1904IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1905PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1906a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
19072vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1908HbdY/Jt1GEjr7V7isN7gtaNpLv8REA0ANQGQsA==
1909  "]],
1910
1911Cell[BoxData[
1912 StyleBox["\<\"Warning: Class members in the Lagrangian! Not supported by \
1913FeynArts.\"\>",
1914  StripOnInput->False,
1915  LineColor->RGBColor[1, 0.5, 0],
1916  FrontFaceColor->RGBColor[1, 0.5, 0],
1917  BackFaceColor->RGBColor[1, 0.5, 0],
1918  GraphicsColor->RGBColor[1, 0.5, 0],
1919  FontWeight->Bold,
1920  FontColor->RGBColor[1, 0.5, 0]]], "Print",
1921 CellChangeTimes->CompressedData["
19221:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1923DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1924IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1925PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1926a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
19272vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1928HbdY/Jt1GEjr7V7isN7gtSPHP+EjIBoAN6iRGA==
1929  "]],
1930
1931Cell[BoxData["\<\"1 vertex obtained.\"\>"], "Print",
1932 CellChangeTimes->CompressedData["
19331:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1934DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1935IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1936PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1937a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
19382vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1939HbdY/Jt1GEjr7V7isN7gteOTLNEjIBoAOoiRYg==
1940  "]],
1941
1942Cell[BoxData["\<\"Redefining classes in such a way that each particle is in a \
1943separate FeynArts class.\"\>"], "Print",
1944 CellChangeTimes->CompressedData["
19451:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1946DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1947IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1948PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1949a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
19502vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1951HbdY/Jt1GEjr7V7isN7gteOxStEjIBoAOgGRUw==
1952  "]],
1953
1954Cell[BoxData["\<\"See NewFeynArtsClasses[] for more information on the new \
1955classes\"\>"], "Print",
1956 CellChangeTimes->CompressedData["
19571:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1958DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1959IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1960PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1961a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
19622vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1963HbdY/Jt1GEjr7V7isN7gtWNRq+gREA0AN7WRCw==
1964  "]],
1965
1966Cell[BoxData["\<\"Restarting Feynman rule calculation, setting FlavorExpand \
1967-> True.\"\>"], "Print",
1968 CellChangeTimes->CompressedData["
19691:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1970DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1971IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1972PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1973a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
19742vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1975HbdY/Jt1GEjr7V7isN7gtaPUJNEjIBoANVCQwA==
1976  "]],
1977
1978Cell[BoxData[
1979 InterpretationBox[
1980  RowBox[{"\<\"Calculating Feynman rules for \"\>",
1981   "\[InvisibleSpace]", "\<\"L1\"\>"}],
1982  SequenceForm["Calculating Feynman rules for ", "L1"],
1983  Editable->False]], "Print",
1984 CellChangeTimes->CompressedData["
19851:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
1986DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
1987IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
1988PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
1989a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
19902vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
1991HbdY/Jt1GEjr7V7isN4AaM580SMgGgA3i5EJ
1992  "]],
1993
1994Cell[BoxData[
1995 StyleBox["\<\"Starting Feynman rules calculation for L1.\"\>",
1996  StripOnInput->False,
1997  LineColor->RGBColor[1, 0.5, 0],
1998  FrontFaceColor->RGBColor[1, 0.5, 0],
1999  BackFaceColor->RGBColor[1, 0.5, 0],
2000  GraphicsColor->RGBColor[1, 0.5, 0],
2001  FontWeight->Bold,
2002  FontColor->RGBColor[1, 0.5, 0]]], "Print",
2003 CellChangeTimes->CompressedData["
20041:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
2005DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
2006IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
2007PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
2008a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
20092vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
2010HbdY/Jt1GEjr7V7isN7gtWOT7MQjIBoAOEWRLw==
2011  "]],
2012
2013Cell[BoxData["\<\"Expanding the Lagrangian...\"\>"], "Print",
2014 CellChangeTimes->CompressedData["
20151:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
2016DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
2017IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
2018PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
2019a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
20202vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
2021HbdY/Jt1GEjr7V7isN7gtaOM1sQjIBoANXCQ1g==
2022  "]],
2023
2024Cell[BoxData[
2025 InterpretationBox[
2026  RowBox[{"\<\"Expanding the indices over \"\>", "\[InvisibleSpace]", "4",
2027   "\[InvisibleSpace]", "\<\" cores\"\>"}],
2028  SequenceForm["Expanding the indices over ", 4, " cores"],
2029  Editable->False]], "Print",
2030 CellChangeTimes->CompressedData["
20311:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
2032DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
2033IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
2034PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
2035a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
20362vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
2037HbdY/Jt1GEjr7V7isN7gtSOX5cQjIBoANUmQ0w==
2038  "]],
2039
2040Cell[BoxData["\<\"Collecting the different structures that enter the \
2041vertex.\"\>"], "Print",
2042 CellChangeTimes->CompressedData["
20431:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
2044DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
2045IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
2046PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
2047a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
20482vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
2049HbdY/Jt1GEjr7V7isN4AKC679RiIBgA3P5EY
2050  "]],
2051
2052Cell[BoxData[
2053 InterpretationBox[
2054  RowBox[{
2055  "193", "\[InvisibleSpace]", "\<\" possible non-zero vertices have been \
2056found -> starting the computation: \"\>", "\[InvisibleSpace]",
2057   DynamicBox[ToBoxes[FeynRules`FR$FeynmanRules, StandardForm],
2058    ImageSizeCache->{24., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
2059   "\[InvisibleSpace]", "193", "\[InvisibleSpace]", "\<\".\"\>"}],
2060  SequenceForm[
2061  193, " possible non-zero vertices have been found -> starting the \
2062computation: ",
2063   Dynamic[FeynRules`FR$FeynmanRules], " / ", 193, "."],
2064  Editable->False]], "Print",
2065 CellChangeTimes->CompressedData["
20661:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
2067DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
2068IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
2069PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
2070a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
20712vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
2072HbdY/Jt1GEjr7V7isN4A6C/9XcdANAA8G5G3
2073  "]],
2074
2075Cell[BoxData[
2076 InterpretationBox[
2077  RowBox[{"174", "\[InvisibleSpace]", "\<\" vertices obtained.\"\>"}],
2078  SequenceForm[174, " vertices obtained."],
2079  Editable->False]], "Print",
2080 CellChangeTimes->CompressedData["
20811:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
2082DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
2083IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
2084PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
2085a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
20862vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
2087HbdY/Jt1GEjr7V7isN7gteOEE7InQDQAOr6ReA==
2088  "]],
2089
2090Cell[BoxData[
2091 InterpretationBox[
2092  RowBox[{"\<\"Writing FeynArts model file into directory \"\>",
2093   "\[InvisibleSpace]", "\<\"DMsimp_spin1\"\>"}],
2094  SequenceForm["Writing FeynArts model file into directory ", "DMsimp_spin1"],
2095 
2096  Editable->False]], "Print",
2097 CellChangeTimes->CompressedData["
20981:eJxTTMoPSmVkYGBQA+IpTfVXOIReO/pXnDvAD6RLdXz3mgPp03tNbt4A0o4y
2099DN03gfQqucTIO0C6r0zgWLPYa8ddAtb3QLSLUdHklUC6pV/WwkHqteNZ+Vdt
2100IFoiZv9uEP2sXTTHGUj/e7qnBEQbzlDynSr72nFOfFz+LrnXjimxPG93yL92
2101PHGuv2GC4mvH8zeW7F4PpA+oTpK+B6SfSy2V51Z67eiXv/y6JpA2eXnxR4vK
2102a8cQEzHxcxqvHYPLz60F0acuW9w8D6T52CRTDmq+dsyZ6m53DEiHnboVZaf1
21032vG2aMn0Z0Car4nJ9DmQnqJzdupLIB08RdbsPZDOEX57Y7r2a0dXz38i9jqv
2104HbdY/Jt1GEjr7V7isN7gteO+Q5UnQDQAPiyR/A==
2105  "]]
2106}, Open  ]]
2107}, Open  ]],
2108
2109Cell[BoxData[
2110 RowBox[{"Quit", "[", "]"}]], "Input"],
2111
2112Cell[BoxData[
2113 RowBox[{
2114  RowBox[{"SetDirectory", "[", "\"\<~/Documents/FeynArts-3.8\>\"", "]"}],
2115  ";"}]], "Input"],
2116
2117Cell[CellGroupData[{
2118
2119Cell[BoxData[
2120 RowBox[{"<<", " ", "FeynArts`"}]], "Input"],
2121
2122Cell[CellGroupData[{
2123
2124Cell[BoxData["\<\"\"\>"], "Print",
2125 CellChangeTimes->{
2126  3.6333340062742558`*^9, 3.633348229208444*^9, 3.633430065155362*^9,
2127   3.633760001669025*^9, {3.633761419825535*^9, 3.633761425885021*^9},
2128   3.633767166566884*^9, 3.635683139828644*^9, 3.635760340532014*^9,
2129   3.637641781424296*^9, 3.637642777828939*^9, 3.637648360547853*^9,
2130   3.63938888484129*^9, 3.6399891883206367`*^9, 3.6405105000307283`*^9,
2131   3.6414761804555807`*^9, 3.64154016168857*^9, 3.641635285717799*^9,
2132   3.641727329735632*^9, 3.641790209539661*^9, 3.6430254539917393`*^9,
2133   3.64527235156678*^9, {3.6452735456903152`*^9, 3.645273547429137*^9},
2134   3.645274078357388*^9, 3.645275918468567*^9, 3.645770729621505*^9,
2135   3.6457805883271008`*^9, 3.6460265810439*^9, 3.646371089894401*^9,
2136   3.6463723181263227`*^9, 3.6463773435981283`*^9, 3.646388714466091*^9,
2137   3.646734121004572*^9, {3.647076590445853*^9, 3.6470765971626987`*^9},
2138   3.647347991398026*^9, 3.64940346604403*^9, 3.649404494522189*^9}],
2139
2140Cell[BoxData["\<\"FeynArts 3.8\"\>"], "Print",
2141 CellChangeTimes->{
2142  3.6333340062742558`*^9, 3.633348229208444*^9, 3.633430065155362*^9,
2143   3.633760001669025*^9, {3.633761419825535*^9, 3.633761425885021*^9},
2144   3.633767166566884*^9, 3.635683139828644*^9, 3.635760340532014*^9,
2145   3.637641781424296*^9, 3.637642777828939*^9, 3.637648360547853*^9,
2146   3.63938888484129*^9, 3.6399891883206367`*^9, 3.6405105000307283`*^9,
2147   3.6414761804555807`*^9, 3.64154016168857*^9, 3.641635285717799*^9,
2148   3.641727329735632*^9, 3.641790209539661*^9, 3.6430254539917393`*^9,
2149   3.64527235156678*^9, {3.6452735456903152`*^9, 3.645273547429137*^9},
2150   3.645274078357388*^9, 3.645275918468567*^9, 3.645770729621505*^9,
2151   3.6457805883271008`*^9, 3.6460265810439*^9, 3.646371089894401*^9,
2152   3.6463723181263227`*^9, 3.6463773435981283`*^9, 3.646388714466091*^9,
2153   3.646734121004572*^9, {3.647076590445853*^9, 3.6470765971626987`*^9},
2154   3.647347991398026*^9, 3.64940346604403*^9, 3.64940449454208*^9}],
2155
2156Cell[BoxData["\<\"by Hagen Eck, Sepp Kueblbeck, and Thomas Hahn\"\>"], "Print",
2157 CellChangeTimes->{
2158  3.6333340062742558`*^9, 3.633348229208444*^9, 3.633430065155362*^9,
2159   3.633760001669025*^9, {3.633761419825535*^9, 3.633761425885021*^9},
2160   3.633767166566884*^9, 3.635683139828644*^9, 3.635760340532014*^9,
2161   3.637641781424296*^9, 3.637642777828939*^9, 3.637648360547853*^9,
2162   3.63938888484129*^9, 3.6399891883206367`*^9, 3.6405105000307283`*^9,
2163   3.6414761804555807`*^9, 3.64154016168857*^9, 3.641635285717799*^9,
2164   3.641727329735632*^9, 3.641790209539661*^9, 3.6430254539917393`*^9,
2165   3.64527235156678*^9, {3.6452735456903152`*^9, 3.645273547429137*^9},
2166   3.645274078357388*^9, 3.645275918468567*^9, 3.645770729621505*^9,
2167   3.6457805883271008`*^9, 3.6460265810439*^9, 3.646371089894401*^9,
2168   3.6463723181263227`*^9, 3.6463773435981283`*^9, 3.646388714466091*^9,
2169   3.646734121004572*^9, {3.647076590445853*^9, 3.6470765971626987`*^9},
2170   3.647347991398026*^9, 3.64940346604403*^9, 3.649404494543632*^9}],
2171
2172Cell[BoxData["\<\"last revised 9 Jul 13\"\>"], "Print",
2173 CellChangeTimes->{
2174  3.6333340062742558`*^9, 3.633348229208444*^9, 3.633430065155362*^9,
2175   3.633760001669025*^9, {3.633761419825535*^9, 3.633761425885021*^9},
2176   3.633767166566884*^9, 3.635683139828644*^9, 3.635760340532014*^9,
2177   3.637641781424296*^9, 3.637642777828939*^9, 3.637648360547853*^9,
2178   3.63938888484129*^9, 3.6399891883206367`*^9, 3.6405105000307283`*^9,
2179   3.6414761804555807`*^9, 3.64154016168857*^9, 3.641635285717799*^9,
2180   3.641727329735632*^9, 3.641790209539661*^9, 3.6430254539917393`*^9,
2181   3.64527235156678*^9, {3.6452735456903152`*^9, 3.645273547429137*^9},
2182   3.645274078357388*^9, 3.645275918468567*^9, 3.645770729621505*^9,
2183   3.6457805883271008`*^9, 3.6460265810439*^9, 3.646371089894401*^9,
2184   3.6463723181263227`*^9, 3.6463773435981283`*^9, 3.646388714466091*^9,
2185   3.646734121004572*^9, {3.647076590445853*^9, 3.6470765971626987`*^9},
2186   3.647347991398026*^9, 3.64940346604403*^9, 3.649404494545072*^9}]
2187}, Open  ]]
2188}, Open  ]],
2189
2190Cell[BoxData[
2191 RowBox[{
2192  RowBox[{
2193  "SetDirectory", "[", "\"\<~/Documents/feynrules-current_3_7\>\"", "]"}],
2194  ";"}]], "Input",
2195 CellChangeTimes->{{3.64302329717109*^9, 3.643023299501276*^9}, {
2196  3.6452723585550957`*^9, 3.645272359939103*^9}, {3.647076405736209*^9,
2197  3.64707640635962*^9}}],
2198
2199Cell[CellGroupData[{
2200
2201Cell[BoxData[
2202 RowBox[{"<<", " ", "NLOCT`"}]], "Input"],
2203
2204Cell[CellGroupData[{
2205
2206Cell[BoxData["\<\" - NLOCT - \"\>"], "Print",
2207 CellChangeTimes->{3.633334012398602*^9, 3.63334823479993*^9,
2208  3.633430070827776*^9, 3.6337600047552557`*^9, 3.6337614288449593`*^9,
2209  3.63376716963179*^9, 3.635683144036674*^9, 3.635760344048397*^9,
2210  3.6376417854673986`*^9, 3.6376427809103813`*^9, 3.637648364508534*^9,
2211  3.639388890816511*^9, 3.639989191172407*^9, 3.6405105028721447`*^9,
2212  3.6414761840245857`*^9, 3.641540165251926*^9, 3.641635290546917*^9,
2213  3.64172733228785*^9, 3.641790212336192*^9, 3.643025460613501*^9,
2214  3.645272365875441*^9, 3.645273553311666*^9, 3.645274081217651*^9,
2215  3.6452759224520473`*^9, 3.645770733219626*^9, 3.645780591417716*^9,
2216  3.646026588840769*^9, 3.646371094455577*^9, 3.646372321274672*^9,
2217  3.6463773477242813`*^9, 3.64638871796944*^9, 3.646734124503805*^9,
2218  3.647076600246109*^9, 3.6473479946640787`*^9, 3.649403470879184*^9,
2219  3.6494044980102777`*^9}],
2220
2221Cell[BoxData["\<\"Version: 1.02\"\>"], "Print",
2222 CellChangeTimes->{3.633334012398602*^9, 3.63334823479993*^9,
2223  3.633430070827776*^9, 3.6337600047552557`*^9, 3.6337614288449593`*^9,
2224  3.63376716963179*^9, 3.635683144036674*^9, 3.635760344048397*^9,
2225  3.6376417854673986`*^9, 3.6376427809103813`*^9, 3.637648364508534*^9,
2226  3.639388890816511*^9, 3.639989191172407*^9, 3.6405105028721447`*^9,
2227  3.6414761840245857`*^9, 3.641540165251926*^9, 3.641635290546917*^9,
2228  3.64172733228785*^9, 3.641790212336192*^9, 3.643025460613501*^9,
2229  3.645272365875441*^9, 3.645273553311666*^9, 3.645274081217651*^9,
2230  3.6452759224520473`*^9, 3.645770733219626*^9, 3.645780591417716*^9,
2231  3.646026588840769*^9, 3.646371094455577*^9, 3.646372321274672*^9,
2232  3.6463773477242813`*^9, 3.64638871796944*^9, 3.646734124503805*^9,
2233  3.647076600246109*^9, 3.6473479946640787`*^9, 3.649403470879184*^9,
2234  3.649404498026012*^9}],
2235
2236Cell[BoxData["\<\"Authors: C. Degrande\"\>"], "Print",
2237 CellChangeTimes->{3.633334012398602*^9, 3.63334823479993*^9,
2238  3.633430070827776*^9, 3.6337600047552557`*^9, 3.6337614288449593`*^9,
2239  3.63376716963179*^9, 3.635683144036674*^9, 3.635760344048397*^9,
2240  3.6376417854673986`*^9, 3.6376427809103813`*^9, 3.637648364508534*^9,
2241  3.639388890816511*^9, 3.639989191172407*^9, 3.6405105028721447`*^9,
2242  3.6414761840245857`*^9, 3.641540165251926*^9, 3.641635290546917*^9,
2243  3.64172733228785*^9, 3.641790212336192*^9, 3.643025460613501*^9,
2244  3.645272365875441*^9, 3.645273553311666*^9, 3.645274081217651*^9,
2245  3.6452759224520473`*^9, 3.645770733219626*^9, 3.645780591417716*^9,
2246  3.646026588840769*^9, 3.646371094455577*^9, 3.646372321274672*^9,
2247  3.6463773477242813`*^9, 3.64638871796944*^9, 3.646734124503805*^9,
2248  3.647076600246109*^9, 3.6473479946640787`*^9, 3.649403470879184*^9,
2249  3.6494044980276537`*^9}]
2250}, Open  ]]
2251}, Open  ]],
2252
2253Cell[BoxData[
2254 RowBox[{
2255  RowBox[{
2256  "SetDirectory", "[",
2257   "\"\<~/Documents/feynrules-current_3_7/Models/DMsimp\>\"", "]"}],
2258  ";"}]], "Input",
2259 CellChangeTimes->{{3.6333335430865088`*^9, 3.6333335552625504`*^9}, {
2260   3.633759553050228*^9, 3.633759553878661*^9}, {3.635681734336973*^9,
2261   3.635681736612557*^9}, {3.637640417227786*^9, 3.6376404184754333`*^9}, {
2262   3.63937694796106*^9, 3.6393769493287563`*^9}, {3.6405100825800657`*^9,
2263   3.640510083170496*^9}, 3.64051048875382*^9, {3.643018762649206*^9,
2264   3.643018771597096*^9}, 3.643024946820489*^9, {3.645272373051367*^9,
2265   3.645272374670525*^9}, {3.645274084493257*^9, 3.645274085716125*^9}, {
2266   3.645275926207169*^9, 3.645275927770879*^9}, 3.645770250485813*^9,
2267   3.645770738860055*^9, {3.645780051087365*^9, 3.645780051727775*^9}, {
2268   3.646026265671403*^9, 3.6460262676920023`*^9}, {3.647076420208658*^9,
2269   3.647076420403612*^9}, {3.647347800062046*^9, 3.647347801503477*^9}, {
2270   3.6494031514580183`*^9, 3.649403153218494*^9}}],
2271
2272Cell[CellGroupData[{
2273
2274Cell[BoxData[
2275 RowBox[{
2276  RowBox[{"WriteCT", "[",
2277   RowBox[{
2278   "\"\<DMsimp_s_spin1/DMsimp_s_spin1\>\"", ",", "\"\<Lorentz\>\"", ",",
2279    RowBox[{"Output", "->", "\"\<DMsimp_s_spin1\>\""}], ",",
2280    RowBox[{"LabelInternal", "\[Rule]", "True"}], ",",
2281    RowBox[{"QCDOnly", "\[Rule]", "True"}], ",",
2282    RowBox[{"KeptIndices", "\[Rule]",
2283     RowBox[{"{", "}"}]}], ",",
2284    RowBox[{"ZeroMom", "\[Rule]",
2285     RowBox[{"{",
2286      RowBox[{"{",
2287       RowBox[{"aS", ",",
2288        RowBox[{"{",
2289         RowBox[{
2290          RowBox[{"F", "[", "7", "]"}], ",",
2291          RowBox[{"V", "[", "4", "]"}], ",",
2292          RowBox[{"-",
2293           RowBox[{"F", "[", "7", "]"}]}]}], "}"}], ",", "0"}], "}"}],
2294      "}"}]}], ",",
2295    RowBox[{"ComplexMass", "\[Rule]", "False"}], ",",
2296    RowBox[{"Exclude4ScalarsCT", "\[Rule]", "True"}]}], "]"}], "//", "Timing",
2297   " "}]], "Input",
2298 CellChangeTimes->CompressedData["
22991:eJxTTMoPSmViYGCQBGIQPYMtewWH0GvHXRNMV4Fo80cy6/mBtEqcHpjOWe+0
23007AaQlnu0ZTmI5spYZNks9trxiDqHDYiWMzo9x17qtaPdu/0LQPSiH+51/bKv
2301HV+ZXKoH0VIPZreD6AuxP8C0ocS7CzvkXzu+UO6+DKK37FS0v6f42lH/QgqY
2302dp/YrMutBKRPHgTTXHrbH2oC6eWs58C0tRvj4UaV1446QtFgetVu9eMtQDro
23030/UTIHqR4aobIHqO6w0wvXSy8u5zGq8dd3CU7QHR9ww6Hp8H0uxvLj4B0bXl
2304PxwPar52tDpzxQlEW2jt5ToGpNl45nCD6MzV35zttF47Kh2udAXRTt3snc+A
2305dLF3ezeInrFC8sV07deORaxdYNqkoL37sM5rx5b1k3tAdOvPJKX1Bq8d6+pP
2306K4Poh++cToNorr0WZ0F0yvSffv8Mge6vswoA0QCkOcJr
2307  "]],
2308
2309Cell[CellGroupData[{
2310
2311Cell[BoxData[
2312 StyleBox["\<\"Computing CT for the {S} vertices.\"\>",
2313  StripOnInput->False,
2314  LineColor->RGBColor[0, 0, 1],
2315  FrontFaceColor->RGBColor[0, 0, 1],
2316  BackFaceColor->RGBColor[0, 0, 1],
2317  GraphicsColor->RGBColor[0, 0, 1],
2318  FontColor->RGBColor[0, 0, 1]]], "Print",
2319 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2320  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553243725*^9}],
2321
2322Cell[BoxData["\<\"\"\>"], "Print",
2323 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2324  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045532451973`*^9}],
2325
2326Cell[BoxData[
2327 InterpretationBox[
2328  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>",
2329   "\[InvisibleSpace]", "\<\"generic\"\>",
2330   "\[InvisibleSpace]", "\<\" model file \"\>",
2331   "\[InvisibleSpace]", \
2332"\<\"/home/amartini/Documents/FeynArts-3.8/Models/Lorentz.gen\"\>"}],
2333  SequenceForm[
2334  "", "loading ", "generic", " model file ",
2335   "/home/amartini/Documents/FeynArts-3.8/Models/Lorentz.gen"],
2336  Editable->False]], "Print",
2337 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2338  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553246505*^9}],
2339
2340Cell[BoxData["\<\"> $GenericMixing is OFF\"\>"], "Print",
2341 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2342  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553247777*^9}],
2343
2344Cell[BoxData[
2345 InterpretationBox[
2346  RowBox[{"\<\"generic model \"\>", "\[InvisibleSpace]",
2347   RowBox[{"{", "\<\"Lorentz\"\>", "}"}],
2348   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
2349  SequenceForm["generic model ", {"Lorentz"}, " initialized"],
2350  Editable->False]], "Print",
2351 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2352  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553296049*^9}],
2353
2354Cell[BoxData["\<\"\"\>"], "Print",
2355 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2356  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553298263*^9}],
2357
2358Cell[BoxData[
2359 InterpretationBox[
2360  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>",
2361   "\[InvisibleSpace]", "\<\"classes\"\>",
2362   "\[InvisibleSpace]", "\<\" model file \"\>",
2363   "\[InvisibleSpace]", \
2364"\<\"/home/amartini/Documents/FeynArts-3.8/Models/DMsimp_spin1/DMsimp_spin1.\
2365mod\"\>"}],
2366  SequenceForm[
2367  "", "loading ", "classes", " model file ",
2368   "/home/amartini/Documents/FeynArts-3.8/Models/DMsimp_spin1/DMsimp_spin1.\
2369mod"],
2370  Editable->False]], "Print",
2371 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2372  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940455329978*^9}],
2373
2374Cell[BoxData[
2375 InterpretationBox[
2376  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "49",
2377   "\[InvisibleSpace]", "\<\" particles (incl. antiparticles) in \"\>",
2378   "\[InvisibleSpace]", "28", "\[InvisibleSpace]", "\<\" classes\"\>"}],
2379  SequenceForm[
2380  "> ", 49, " particles (incl. antiparticles) in ", 28, " classes"],
2381  Editable->False]], "Print",
2382 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2383  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553301166*^9}],
2384
2385Cell[BoxData["\<\"> $CounterTerms are ON\"\>"], "Print",
2386 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2387  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940455334265*^9}],
2388
2389Cell[BoxData[
2390 InterpretationBox[
2391  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "142",
2392   "\[InvisibleSpace]", "\<\" vertices\"\>"}],
2393  SequenceForm["> ", 142, " vertices"],
2394  Editable->False]], "Print",
2395 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2396  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553344858*^9}],
2397
2398Cell[BoxData[
2399 InterpretationBox[
2400  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "48",
2401   "\[InvisibleSpace]", "\<\" counter terms of order 1\"\>"}],
2402  SequenceForm["> ", 48, " counter terms of order 1"],
2403  Editable->False]], "Print",
2404 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2405  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045533464317`*^9}],
2406
2407Cell[BoxData[
2408 InterpretationBox[
2409  RowBox[{"\<\"classes model \"\>", "\[InvisibleSpace]",
2410   RowBox[{"{", "\<\"DMsimp_spin1/DMsimp_spin1\"\>", "}"}],
2411   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
2412  SequenceForm[
2413  "classes model ", {"DMsimp_spin1/DMsimp_spin1"}, " initialized"],
2414  Editable->False]], "Print",
2415 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2416  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940455334781*^9}],
2417
2418Cell[BoxData["\<\"\"\>"], "Print",
2419 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2420  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045533490353`*^9}],
2421
2422Cell[BoxData[
2423 InterpretationBox[
2424  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
2425   RowBox[{"{",
2426    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2427  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
2428  Editable->False]], "Print",
2429 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2430  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553350387*^9}],
2431
2432Cell[BoxData[
2433 InterpretationBox[
2434  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
2435   "\[InvisibleSpace]", "\<\": \"\>",
2436   "\[InvisibleSpace]", "\<\"4 Generic, 14 Classes insertions\"\>"}],
2437  SequenceForm["> Top. ", 1, ": ", "4 Generic, 14 Classes insertions"],
2438  Editable->False]], "Print",
2439 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2440  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553390518*^9}],
2441
2442Cell[BoxData[
2443 InterpretationBox[
2444  RowBox[{"\<\"in total: \"\>",
2445   "\[InvisibleSpace]", "\<\"4 Generic, 14 Classes insertions\"\>"}],
2446  SequenceForm["in total: ", "4 Generic, 14 Classes insertions"],
2447  Editable->False]], "Print",
2448 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2449  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045533928347`*^9}],
2450
2451Cell[BoxData["\<\"\"\>"], "Print",
2452 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2453  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045533942327`*^9}],
2454
2455Cell[BoxData[
2456 InterpretationBox[
2457  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
2458   RowBox[{"{",
2459    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2460  SequenceForm[
2461  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
2462  Editable->False]], "Print",
2463 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2464  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940455339559*^9}],
2465
2466Cell[BoxData[
2467 InterpretationBox[
2468  RowBox[{"\<\"in total: \"\>",
2469   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes amplitudes\"\>"}],
2470  SequenceForm["in total: ", "0 Generic, 0 Classes amplitudes"],
2471  Editable->False]], "Print",
2472 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2473  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045533969383`*^9}],
2474
2475Cell[BoxData["\<\"Writing amplitude finished after 0.122847\"\>"], "Print",
2476 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2477  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553398198*^9}],
2478
2479Cell[BoxData["\<\"Writing the R2 and UV parts at the class level finished \
2480after 0.122948\"\>"], "Print",
2481 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2482  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553399487*^9}],
2483
2484Cell[BoxData["\<\"\"\>"], "Print",
2485 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2486  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553400692*^9}],
2487
2488Cell[BoxData[
2489 InterpretationBox[
2490  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
2491   RowBox[{"{",
2492    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2493  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
2494  Editable->False]], "Print",
2495 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2496  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553402022*^9}],
2497
2498Cell[BoxData[
2499 InterpretationBox[
2500  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
2501   "\[InvisibleSpace]", "\<\": \"\>",
2502   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
2503  SequenceForm["> Top. ", 1, ": ", "0 Generic, 0 Classes insertions"],
2504  Editable->False]], "Print",
2505 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2506  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553403363*^9}],
2507
2508Cell[BoxData[
2509 InterpretationBox[
2510  RowBox[{"\<\"in total: \"\>",
2511   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
2512  SequenceForm["in total: ", "0 Generic, 0 Classes insertions"],
2513  Editable->False]], "Print",
2514 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2515  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045534046593`*^9}],
2516
2517Cell[BoxData["\<\"\"\>"], "Print",
2518 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2519  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045534058437`*^9}],
2520
2521Cell[BoxData[
2522 InterpretationBox[
2523  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
2524   RowBox[{"{",
2525    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2526  SequenceForm[
2527  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
2528  Editable->False]], "Print",
2529 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2530  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553407221*^9}],
2531
2532Cell[BoxData[
2533 InterpretationBox[
2534  RowBox[{"\<\"in total: \"\>",
2535   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes amplitudes\"\>"}],
2536  SequenceForm["in total: ", "0 Generic, 0 Classes amplitudes"],
2537  Editable->False]], "Print",
2538 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2539  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553408806*^9}],
2540
2541Cell[BoxData["\<\"Writing the symbolic CT finished after 0.124861\"\>"], \
2542"Print",
2543 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2544  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553410363*^9}],
2545
2546Cell[BoxData["\<\"SU3 algebra finished after 0.125172\"\>"], "Print",
2547 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2548  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553411642*^9}],
2549
2550Cell[BoxData["\<\"Simplification of the vertices finished after \
25510.125217\"\>"], "Print",
2552 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2553  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553412924*^9}],
2554
2555Cell[BoxData["\<\"Vertices {S} finished after 0.125256\"\>"], "Print",
2556 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2557  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553414236*^9}],
2558
2559Cell[BoxData[
2560 StyleBox["\<\"Computing CT for the {F, F} vertices.\"\>",
2561  StripOnInput->False,
2562  LineColor->RGBColor[0, 0, 1],
2563  FrontFaceColor->RGBColor[0, 0, 1],
2564  BackFaceColor->RGBColor[0, 0, 1],
2565  GraphicsColor->RGBColor[0, 0, 1],
2566  FontColor->RGBColor[0, 0, 1]]], "Print",
2567 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2568  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553415558*^9}],
2569
2570Cell[BoxData["\<\"\"\>"], "Print",
2571 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2572  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045534168587`*^9}],
2573
2574Cell[BoxData[
2575 InterpretationBox[
2576  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
2577   RowBox[{"{",
2578    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2579  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
2580  Editable->False]], "Print",
2581 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2582  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553418173*^9}],
2583
2584Cell[BoxData[
2585 InterpretationBox[
2586  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
2587   "\[InvisibleSpace]", "\<\": \"\>",
2588   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
2589  SequenceForm["> Top. ", 1, ": ", "0 Generic, 0 Classes insertions"],
2590  Editable->False]], "Print",
2591 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2592  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553419495*^9}],
2593
2594Cell[BoxData[
2595 InterpretationBox[
2596  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
2597   "\[InvisibleSpace]", "\<\": \"\>",
2598   "\[InvisibleSpace]", "\<\"2 Generic, 132 Classes insertions\"\>"}],
2599  SequenceForm["> Top. ", 2, ": ", "2 Generic, 132 Classes insertions"],
2600  Editable->False]], "Print",
2601 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2602  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553595544*^9}],
2603
2604Cell[BoxData[
2605 InterpretationBox[
2606  RowBox[{"\<\"in total: \"\>",
2607   "\[InvisibleSpace]", "\<\"2 Generic, 132 Classes insertions\"\>"}],
2608  SequenceForm["in total: ", "2 Generic, 132 Classes insertions"],
2609  Editable->False]], "Print",
2610 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2611  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553597793*^9}],
2612
2613Cell[BoxData["\<\"\"\>"], "Print",
2614 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2615  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553644034*^9}],
2616
2617Cell[BoxData[
2618 InterpretationBox[
2619  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
2620   RowBox[{"{",
2621    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2622  SequenceForm[
2623  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
2624  Editable->False]], "Print",
2625 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2626  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553645858*^9}],
2627
2628Cell[BoxData[
2629 InterpretationBox[
2630  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
2631   "\[InvisibleSpace]", "\<\": \"\>",
2632   "\[InvisibleSpace]", "\<\"1 Generic, 12 Classes amplitudes\"\>"}],
2633  SequenceForm["> Top. ", 1, ": ", "1 Generic, 12 Classes amplitudes"],
2634  Editable->False]], "Print",
2635 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2636  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553688085*^9}],
2637
2638Cell[BoxData[
2639 InterpretationBox[
2640  RowBox[{"\<\"in total: \"\>",
2641   "\[InvisibleSpace]", "\<\"1 Generic, 12 Classes amplitudes\"\>"}],
2642  SequenceForm["in total: ", "1 Generic, 12 Classes amplitudes"],
2643  Editable->False]], "Print",
2644 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2645  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940455369004*^9}],
2646
2647Cell[BoxData["\<\"Writing amplitude finished after 0.430705\"\>"], "Print",
2648 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2649  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940455369156*^9}],
2650
2651Cell[BoxData["\<\"Writing the R2 and UV parts at the class level finished \
2652after 0.647784\"\>"], "Print",
2653 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2654  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553881002*^9}],
2655
2656Cell[BoxData["\<\"\"\>"], "Print",
2657 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2658  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553929707*^9}],
2659
2660Cell[BoxData[
2661 InterpretationBox[
2662  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
2663   RowBox[{"{",
2664    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2665  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
2666  Editable->False]], "Print",
2667 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2668  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045539311943`*^9}],
2669
2670Cell[BoxData[
2671 InterpretationBox[
2672  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
2673   "\[InvisibleSpace]", "\<\": \"\>",
2674   "\[InvisibleSpace]", "\<\"1 Generic, 12 Classes insertions\"\>"}],
2675  SequenceForm["> Top. ", 1, ": ", "1 Generic, 12 Classes insertions"],
2676  Editable->False]], "Print",
2677 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2678  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553973392*^9}],
2679
2680Cell[BoxData[
2681 InterpretationBox[
2682  RowBox[{"\<\"in total: \"\>",
2683   "\[InvisibleSpace]", "\<\"1 Generic, 12 Classes insertions\"\>"}],
2684  SequenceForm["in total: ", "1 Generic, 12 Classes insertions"],
2685  Editable->False]], "Print",
2686 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2687  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045539751587`*^9}],
2688
2689Cell[BoxData["\<\"\"\>"], "Print",
2690 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2691  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045539766903`*^9}],
2692
2693Cell[BoxData[
2694 InterpretationBox[
2695  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
2696   RowBox[{"{",
2697    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2698  SequenceForm[
2699  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
2700  Editable->False]], "Print",
2701 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2702  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553978033*^9}],
2703
2704Cell[BoxData[
2705 InterpretationBox[
2706  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
2707   "\[InvisibleSpace]", "\<\": \"\>",
2708   "\[InvisibleSpace]", "\<\"1 Generic, 12 Classes amplitudes\"\>"}],
2709  SequenceForm["> Top. ", 1, ": ", "1 Generic, 12 Classes amplitudes"],
2710  Editable->False]], "Print",
2711 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2712  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940455397937*^9}],
2713
2714Cell[BoxData[
2715 InterpretationBox[
2716  RowBox[{"\<\"in total: \"\>",
2717   "\[InvisibleSpace]", "\<\"1 Generic, 12 Classes amplitudes\"\>"}],
2718  SequenceForm["in total: ", "1 Generic, 12 Classes amplitudes"],
2719  Editable->False]], "Print",
2720 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2721  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553980667*^9}],
2722
2723Cell[BoxData["\<\"Writing the symbolic CT finished after 0.735632\"\>"], \
2724"Print",
2725 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2726  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404553981926*^9}],
2727
2728Cell[BoxData["\<\"SU3 algebra finished after 1.475086\"\>"], "Print",
2729 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2730  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045547083607`*^9}],
2731
2732Cell[BoxData["\<\"Simplification of the vertices finished after \
27331.784426\"\>"], "Print",
2734 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2735  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045550178213`*^9}],
2736
2737Cell[BoxData["\<\"Vertices {F, F} finished after 1.784606\"\>"], "Print",
2738 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2739  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045550197277`*^9}],
2740
2741Cell[BoxData[
2742 StyleBox["\<\"Computing CT for the {S, S} vertices.\"\>",
2743  StripOnInput->False,
2744  LineColor->RGBColor[0, 0, 1],
2745  FrontFaceColor->RGBColor[0, 0, 1],
2746  BackFaceColor->RGBColor[0, 0, 1],
2747  GraphicsColor->RGBColor[0, 0, 1],
2748  FontColor->RGBColor[0, 0, 1]]], "Print",
2749 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2750  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555021202*^9}],
2751
2752Cell[BoxData["\<\"\"\>"], "Print",
2753 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2754  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555022649*^9}],
2755
2756Cell[BoxData[
2757 InterpretationBox[
2758  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
2759   RowBox[{"{",
2760    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2761  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
2762  Editable->False]], "Print",
2763 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2764  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555024004*^9}],
2765
2766Cell[BoxData[
2767 InterpretationBox[
2768  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
2769   "\[InvisibleSpace]", "\<\": \"\>",
2770   "\[InvisibleSpace]", "\<\"2 Generic, 22 Classes insertions\"\>"}],
2771  SequenceForm["> Top. ", 1, ": ", "2 Generic, 22 Classes insertions"],
2772  Editable->False]], "Print",
2773 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2774  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555065374*^9}],
2775
2776Cell[BoxData[
2777 InterpretationBox[
2778  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
2779   "\[InvisibleSpace]", "\<\": \"\>",
2780   "\[InvisibleSpace]", "\<\"5 Generic, 64 Classes insertions\"\>"}],
2781  SequenceForm["> Top. ", 2, ": ", "5 Generic, 64 Classes insertions"],
2782  Editable->False]], "Print",
2783 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2784  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940455515385*^9}],
2785
2786Cell[BoxData[
2787 InterpretationBox[
2788  RowBox[{"\<\"in total: \"\>",
2789   "\[InvisibleSpace]", "\<\"7 Generic, 86 Classes insertions\"\>"}],
2790  SequenceForm["in total: ", "7 Generic, 86 Classes insertions"],
2791  Editable->False]], "Print",
2792 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2793  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555155428*^9}],
2794
2795Cell[BoxData["\<\"\"\>"], "Print",
2796 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2797  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555195294*^9}],
2798
2799Cell[BoxData[
2800 InterpretationBox[
2801  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
2802   RowBox[{"{",
2803    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2804  SequenceForm[
2805  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
2806  Editable->False]], "Print",
2807 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2808  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555197115*^9}],
2809
2810Cell[BoxData[
2811 InterpretationBox[
2812  RowBox[{"\<\"in total: \"\>",
2813   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes amplitudes\"\>"}],
2814  SequenceForm["in total: ", "0 Generic, 0 Classes amplitudes"],
2815  Editable->False]], "Print",
2816 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2817  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045551987467`*^9}],
2818
2819Cell[BoxData["\<\"Writing amplitude finished after 1.938979\"\>"], "Print",
2820 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2821  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555200151*^9}],
2822
2823Cell[BoxData["\<\"Writing the R2 and UV parts at the class level finished \
2824after 1.939079\"\>"], "Print",
2825 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2826  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555201481*^9}],
2827
2828Cell[BoxData["\<\"\"\>"], "Print",
2829 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2830  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555202806*^9}],
2831
2832Cell[BoxData[
2833 InterpretationBox[
2834  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
2835   RowBox[{"{",
2836    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2837  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
2838  Editable->False]], "Print",
2839 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2840  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555204183*^9}],
2841
2842Cell[BoxData[
2843 InterpretationBox[
2844  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
2845   "\[InvisibleSpace]", "\<\": \"\>",
2846   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
2847  SequenceForm["> Top. ", 1, ": ", "0 Generic, 0 Classes insertions"],
2848  Editable->False]], "Print",
2849 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2850  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940455520577*^9}],
2851
2852Cell[BoxData[
2853 InterpretationBox[
2854  RowBox[{"\<\"in total: \"\>",
2855   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
2856  SequenceForm["in total: ", "0 Generic, 0 Classes insertions"],
2857  Editable->False]], "Print",
2858 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2859  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555207265*^9}],
2860
2861Cell[BoxData["\<\"\"\>"], "Print",
2862 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2863  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045552086067`*^9}],
2864
2865Cell[BoxData[
2866 InterpretationBox[
2867  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
2868   RowBox[{"{",
2869    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2870  SequenceForm[
2871  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
2872  Editable->False]], "Print",
2873 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2874  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940455520994*^9}],
2875
2876Cell[BoxData[
2877 InterpretationBox[
2878  RowBox[{"\<\"in total: \"\>",
2879   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes amplitudes\"\>"}],
2880  SequenceForm["in total: ", "0 Generic, 0 Classes amplitudes"],
2881  Editable->False]], "Print",
2882 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2883  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045552112913`*^9}],
2884
2885Cell[BoxData["\<\"Writing the symbolic CT finished after 1.941966\"\>"], \
2886"Print",
2887 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2888  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555212596*^9}],
2889
2890Cell[BoxData["\<\"SU3 algebra finished after 1.942187\"\>"], "Print",
2891 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2892  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045552139883`*^9}],
2893
2894Cell[BoxData["\<\"Simplification of the vertices finished after \
28951.942227\"\>"], "Print",
2896 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2897  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555215266*^9}],
2898
2899Cell[BoxData["\<\"Vertices {S, S} finished after 1.942305\"\>"], "Print",
2900 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2901  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045552165422`*^9}],
2902
2903Cell[BoxData[
2904 StyleBox["\<\"Computing CT for the {V, V} vertices.\"\>",
2905  StripOnInput->False,
2906  LineColor->RGBColor[0, 0, 1],
2907  FrontFaceColor->RGBColor[0, 0, 1],
2908  BackFaceColor->RGBColor[0, 0, 1],
2909  GraphicsColor->RGBColor[0, 0, 1],
2910  FontColor->RGBColor[0, 0, 1]]], "Print",
2911 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2912  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940455521791*^9}],
2913
2914Cell[BoxData["\<\"\"\>"], "Print",
2915 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2916  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555219211*^9}],
2917
2918Cell[BoxData[
2919 InterpretationBox[
2920  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
2921   RowBox[{"{",
2922    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2923  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
2924  Editable->False]], "Print",
2925 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2926  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555220517*^9}],
2927
2928Cell[BoxData[
2929 InterpretationBox[
2930  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
2931   "\[InvisibleSpace]", "\<\": \"\>",
2932   "\[InvisibleSpace]", "\<\"2 Generic, 31 Classes insertions\"\>"}],
2933  SequenceForm["> Top. ", 1, ": ", "2 Generic, 31 Classes insertions"],
2934  Editable->False]], "Print",
2935 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2936  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045552219*^9}],
2937
2938Cell[BoxData[
2939 InterpretationBox[
2940  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
2941   "\[InvisibleSpace]", "\<\": \"\>",
2942   "\[InvisibleSpace]", "\<\"5 Generic, 203 Classes insertions\"\>"}],
2943  SequenceForm["> Top. ", 2, ": ", "5 Generic, 203 Classes insertions"],
2944  Editable->False]], "Print",
2945 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2946  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555476789*^9}],
2947
2948Cell[BoxData[
2949 InterpretationBox[
2950  RowBox[{"\<\"in total: \"\>",
2951   "\[InvisibleSpace]", "\<\"7 Generic, 234 Classes insertions\"\>"}],
2952  SequenceForm["in total: ", "7 Generic, 234 Classes insertions"],
2953  Editable->False]], "Print",
2954 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2955  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555478739*^9}],
2956
2957Cell[BoxData["\<\"\"\>"], "Print",
2958 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2959  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940455553301*^9}],
2960
2961Cell[BoxData[
2962 InterpretationBox[
2963  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
2964   RowBox[{"{",
2965    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
2966  SequenceForm[
2967  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
2968  Editable->False]], "Print",
2969 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2970  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555534536*^9}],
2971
2972Cell[BoxData[
2973 InterpretationBox[
2974  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
2975   "\[InvisibleSpace]", "\<\": \"\>",
2976   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
2977  SequenceForm["> Top. ", 1, ": ", "1 Generic, 1 Classes amplitudes"],
2978  Editable->False]], "Print",
2979 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2980  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555574951*^9}],
2981
2982Cell[BoxData[
2983 InterpretationBox[
2984  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
2985   "\[InvisibleSpace]", "\<\": \"\>",
2986   "\[InvisibleSpace]", "\<\"3 Generic, 44 Classes amplitudes\"\>"}],
2987  SequenceForm["> Top. ", 2, ": ", "3 Generic, 44 Classes amplitudes"],
2988  Editable->False]], "Print",
2989 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2990  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555618717*^9}],
2991
2992Cell[BoxData[
2993 InterpretationBox[
2994  RowBox[{"\<\"in total: \"\>",
2995   "\[InvisibleSpace]", "\<\"4 Generic, 45 Classes amplitudes\"\>"}],
2996  SequenceForm["in total: ", "4 Generic, 45 Classes amplitudes"],
2997  Editable->False]], "Print",
2998 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
2999  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045556212797`*^9}],
3000
3001Cell[BoxData["\<\"Writing amplitude finished after 2.364240\"\>"], "Print",
3002 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3003  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404555623518*^9}],
3004
3005Cell[BoxData["\<\"Writing the R2 and UV parts at the class level finished \
3006after 3.059524\"\>"], "Print",
3007 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3008  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404556292832*^9}],
3009
3010Cell[BoxData["\<\"\"\>"], "Print",
3011 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3012  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404556351969*^9}],
3013
3014Cell[BoxData[
3015 InterpretationBox[
3016  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
3017   RowBox[{"{",
3018    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3019  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
3020  Editable->False]], "Print",
3021 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3022  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404556353561*^9}],
3023
3024Cell[BoxData[
3025 InterpretationBox[
3026  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3027   "\[InvisibleSpace]", "\<\": \"\>",
3028   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes insertions\"\>"}],
3029  SequenceForm["> Top. ", 1, ": ", "1 Generic, 1 Classes insertions"],
3030  Editable->False]], "Print",
3031 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3032  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404556355248*^9}],
3033
3034Cell[BoxData[
3035 InterpretationBox[
3036  RowBox[{"\<\"in total: \"\>",
3037   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes insertions\"\>"}],
3038  SequenceForm["in total: ", "1 Generic, 1 Classes insertions"],
3039  Editable->False]], "Print",
3040 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3041  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940455635669*^9}],
3042
3043Cell[BoxData["\<\"\"\>"], "Print",
3044 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3045  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404556358218*^9}],
3046
3047Cell[BoxData[
3048 InterpretationBox[
3049  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
3050   RowBox[{"{",
3051    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3052  SequenceForm[
3053  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
3054  Editable->False]], "Print",
3055 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3056  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404556359747*^9}],
3057
3058Cell[BoxData[
3059 InterpretationBox[
3060  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3061   "\[InvisibleSpace]", "\<\": \"\>",
3062   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
3063  SequenceForm["> Top. ", 1, ": ", "1 Generic, 1 Classes amplitudes"],
3064  Editable->False]], "Print",
3065 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3066  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404556361322*^9}],
3067
3068Cell[BoxData[
3069 InterpretationBox[
3070  RowBox[{"\<\"in total: \"\>",
3071   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
3072  SequenceForm["in total: ", "1 Generic, 1 Classes amplitudes"],
3073  Editable->False]], "Print",
3074 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3075  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045563630857`*^9}],
3076
3077Cell[BoxData["\<\"Writing the symbolic CT finished after 3.133733\"\>"], \
3078"Print",
3079 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3080  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404556404069*^9}],
3081
3082Cell[BoxData["\<\"SU3 algebra finished after 3.850974\"\>"], "Print",
3083 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3084  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404557084209*^9}],
3085
3086Cell[BoxData["\<\"Simplification of the vertices finished after \
30874.250908\"\>"], "Print",
3088 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3089  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404557484192*^9}],
3090
3091Cell[BoxData["\<\"Vertices {V, V} finished after 4.251051\"\>"], "Print",
3092 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3093  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404557485977*^9}],
3094
3095Cell[BoxData[
3096 StyleBox["\<\"Computing CT for the {F, F, S} vertices.\"\>",
3097  StripOnInput->False,
3098  LineColor->RGBColor[0, 0, 1],
3099  FrontFaceColor->RGBColor[0, 0, 1],
3100  BackFaceColor->RGBColor[0, 0, 1],
3101  GraphicsColor->RGBColor[0, 0, 1],
3102  FontColor->RGBColor[0, 0, 1]]], "Print",
3103 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3104  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404557487528*^9}],
3105
3106Cell[BoxData["\<\"\"\>"], "Print",
3107 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3108  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404557488975*^9}],
3109
3110Cell[BoxData[
3111 InterpretationBox[
3112  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
3113   RowBox[{"{",
3114    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3115  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
3116  Editable->False]], "Print",
3117 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3118  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045574903393`*^9}],
3119
3120Cell[BoxData[
3121 InterpretationBox[
3122  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3123   "\[InvisibleSpace]", "\<\": \"\>",
3124   "\[InvisibleSpace]", "\<\"6 Generic, 468 Classes insertions\"\>"}],
3125  SequenceForm["> Top. ", 1, ": ", "6 Generic, 468 Classes insertions"],
3126  Editable->False]], "Print",
3127 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3128  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561284169*^9}],
3129
3130Cell[BoxData[
3131 InterpretationBox[
3132  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
3133   "\[InvisibleSpace]", "\<\": \"\>",
3134   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
3135  SequenceForm["> Top. ", 2, ": ", "0 Generic, 0 Classes insertions"],
3136  Editable->False]], "Print",
3137 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3138  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561315208*^9}],
3139
3140Cell[BoxData[
3141 InterpretationBox[
3142  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3",
3143   "\[InvisibleSpace]", "\<\": \"\>",
3144   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
3145  SequenceForm["> Top. ", 3, ": ", "0 Generic, 0 Classes insertions"],
3146  Editable->False]], "Print",
3147 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3148  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561316847*^9}],
3149
3150Cell[BoxData[
3151 InterpretationBox[
3152  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4",
3153   "\[InvisibleSpace]", "\<\": \"\>",
3154   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
3155  SequenceForm["> Top. ", 4, ": ", "0 Generic, 0 Classes insertions"],
3156  Editable->False]], "Print",
3157 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3158  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561318756*^9}],
3159
3160Cell[BoxData[
3161 InterpretationBox[
3162  RowBox[{"\<\"in total: \"\>",
3163   "\[InvisibleSpace]", "\<\"6 Generic, 468 Classes insertions\"\>"}],
3164  SequenceForm["in total: ", "6 Generic, 468 Classes insertions"],
3165  Editable->False]], "Print",
3166 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3167  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045613203287`*^9}],
3168
3169Cell[BoxData["\<\"\"\>"], "Print",
3170 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3171  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561398218*^9}],
3172
3173Cell[BoxData[
3174 InterpretationBox[
3175  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
3176   RowBox[{"{",
3177    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3178  SequenceForm[
3179  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
3180  Editable->False]], "Print",
3181 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3182  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045613998117`*^9}],
3183
3184Cell[BoxData[
3185 InterpretationBox[
3186  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3187   "\[InvisibleSpace]", "\<\": \"\>",
3188   "\[InvisibleSpace]", "\<\"1 Generic, 8 Classes amplitudes\"\>"}],
3189  SequenceForm["> Top. ", 1, ": ", "1 Generic, 8 Classes amplitudes"],
3190  Editable->False]], "Print",
3191 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3192  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561441625*^9}],
3193
3194Cell[BoxData[
3195 InterpretationBox[
3196  RowBox[{"\<\"in total: \"\>",
3197   "\[InvisibleSpace]", "\<\"1 Generic, 8 Classes amplitudes\"\>"}],
3198  SequenceForm["in total: ", "1 Generic, 8 Classes amplitudes"],
3199  Editable->False]], "Print",
3200 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3201  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561443529*^9}],
3202
3203Cell[BoxData["\<\"Writing amplitude finished after 8.186835\"\>"], "Print",
3204 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3205  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561445065*^9}],
3206
3207Cell[BoxData["\<\"Writing the R2 and UV parts at the class level finished \
3208after 8.227004\"\>"], "Print",
3209 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3210  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561487011*^9}],
3211
3212Cell[BoxData["\<\"\"\>"], "Print",
3213 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3214  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561488821*^9}],
3215
3216Cell[BoxData[
3217 InterpretationBox[
3218  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
3219   RowBox[{"{",
3220    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3221  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
3222  Editable->False]], "Print",
3223 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3224  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561490615*^9}],
3225
3226Cell[BoxData[
3227 InterpretationBox[
3228  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3229   "\[InvisibleSpace]", "\<\": \"\>",
3230   "\[InvisibleSpace]", "\<\"1 Generic, 8 Classes insertions\"\>"}],
3231  SequenceForm["> Top. ", 1, ": ", "1 Generic, 8 Classes insertions"],
3232  Editable->False]], "Print",
3233 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3234  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561492158*^9}],
3235
3236Cell[BoxData[
3237 InterpretationBox[
3238  RowBox[{"\<\"in total: \"\>",
3239   "\[InvisibleSpace]", "\<\"1 Generic, 8 Classes insertions\"\>"}],
3240  SequenceForm["in total: ", "1 Generic, 8 Classes insertions"],
3241  Editable->False]], "Print",
3242 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3243  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561493588*^9}],
3244
3245Cell[BoxData["\<\"\"\>"], "Print",
3246 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3247  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561494931*^9}],
3248
3249Cell[BoxData[
3250 InterpretationBox[
3251  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
3252   RowBox[{"{",
3253    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3254  SequenceForm[
3255  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
3256  Editable->False]], "Print",
3257 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3258  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561496471*^9}],
3259
3260Cell[BoxData[
3261 InterpretationBox[
3262  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3263   "\[InvisibleSpace]", "\<\": \"\>",
3264   "\[InvisibleSpace]", "\<\"1 Generic, 8 Classes amplitudes\"\>"}],
3265  SequenceForm["> Top. ", 1, ": ", "1 Generic, 8 Classes amplitudes"],
3266  Editable->False]], "Print",
3267 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3268  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561498082*^9}],
3269
3270Cell[BoxData[
3271 InterpretationBox[
3272  RowBox[{"\<\"in total: \"\>",
3273   "\[InvisibleSpace]", "\<\"1 Generic, 8 Classes amplitudes\"\>"}],
3274  SequenceForm["in total: ", "1 Generic, 8 Classes amplitudes"],
3275  Editable->False]], "Print",
3276 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3277  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561499814*^9}],
3278
3279Cell[BoxData["\<\"Writing the symbolic CT finished after 8.277468\"\>"], \
3280"Print",
3281 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3282  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561541314*^9}],
3283
3284Cell[BoxData["\<\"SU3 algebra finished after 8.486049\"\>"], "Print",
3285 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3286  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561719503*^9}],
3287
3288Cell[BoxData["\<\"Simplification of the vertices finished after \
32898.577247\"\>"], "Print",
3290 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3291  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561810687*^9}],
3292
3293Cell[BoxData["\<\"Vertices {F, F, S} finished after 8.577424\"\>"], "Print",
3294 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3295  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561812234*^9}],
3296
3297Cell[BoxData[
3298 StyleBox["\<\"Computing CT for the {F, F, V} vertices.\"\>",
3299  StripOnInput->False,
3300  LineColor->RGBColor[0, 0, 1],
3301  FrontFaceColor->RGBColor[0, 0, 1],
3302  BackFaceColor->RGBColor[0, 0, 1],
3303  GraphicsColor->RGBColor[0, 0, 1],
3304  FontColor->RGBColor[0, 0, 1]]], "Print",
3305 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3306  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561813795*^9}],
3307
3308Cell[BoxData["\<\"\"\>"], "Print",
3309 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3310  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404561815138*^9}],
3311
3312Cell[BoxData[
3313 InterpretationBox[
3314  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
3315   RowBox[{"{",
3316    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3317  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
3318  Editable->False]], "Print",
3319 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3320  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045618165817`*^9}],
3321
3322Cell[BoxData[
3323 InterpretationBox[
3324  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3325   "\[InvisibleSpace]", "\<\": \"\>",
3326   "\[InvisibleSpace]", "\<\"6 Generic, 916 Classes insertions\"\>"}],
3327  SequenceForm["> Top. ", 1, ": ", "6 Generic, 916 Classes insertions"],
3328  Editable->False]], "Print",
3329 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3330  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404568036396*^9}],
3331
3332Cell[BoxData[
3333 InterpretationBox[
3334  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
3335   "\[InvisibleSpace]", "\<\": \"\>",
3336   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
3337  SequenceForm["> Top. ", 2, ": ", "0 Generic, 0 Classes insertions"],
3338  Editable->False]], "Print",
3339 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3340  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404568074679*^9}],
3341
3342Cell[BoxData[
3343 InterpretationBox[
3344  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3",
3345   "\[InvisibleSpace]", "\<\": \"\>",
3346   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
3347  SequenceForm["> Top. ", 3, ": ", "0 Generic, 0 Classes insertions"],
3348  Editable->False]], "Print",
3349 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3350  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940456807705*^9}],
3351
3352Cell[BoxData[
3353 InterpretationBox[
3354  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4",
3355   "\[InvisibleSpace]", "\<\": \"\>",
3356   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
3357  SequenceForm["> Top. ", 4, ": ", "0 Generic, 0 Classes insertions"],
3358  Editable->False]], "Print",
3359 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3360  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045680787086`*^9}],
3361
3362Cell[BoxData[
3363 InterpretationBox[
3364  RowBox[{"\<\"in total: \"\>",
3365   "\[InvisibleSpace]", "\<\"6 Generic, 916 Classes insertions\"\>"}],
3366  SequenceForm["in total: ", "6 Generic, 916 Classes insertions"],
3367  Editable->False]], "Print",
3368 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3369  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404568080164*^9}],
3370
3371Cell[BoxData["\<\"\"\>"], "Print",
3372 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3373  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045683709707`*^9}],
3374
3375Cell[BoxData[
3376 InterpretationBox[
3377  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
3378   RowBox[{"{",
3379    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3380  SequenceForm[
3381  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
3382  Editable->False]], "Print",
3383 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3384  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404568372891*^9}],
3385
3386Cell[BoxData[
3387 InterpretationBox[
3388  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3389   "\[InvisibleSpace]", "\<\": \"\>",
3390   "\[InvisibleSpace]", "\<\"3 Generic, 160 Classes amplitudes\"\>"}],
3391  SequenceForm["> Top. ", 1, ": ", "3 Generic, 160 Classes amplitudes"],
3392  Editable->False]], "Print",
3393 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3394  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404568648533*^9}],
3395
3396Cell[BoxData[
3397 InterpretationBox[
3398  RowBox[{"\<\"in total: \"\>",
3399   "\[InvisibleSpace]", "\<\"3 Generic, 160 Classes amplitudes\"\>"}],
3400  SequenceForm["in total: ", "3 Generic, 160 Classes amplitudes"],
3401  Editable->False]], "Print",
3402 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3403  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404568650158*^9}],
3404
3405Cell[BoxData["\<\"Writing amplitude finished after 15.431086\"\>"], "Print",
3406 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3407  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404568688504*^9}],
3408
3409Cell[BoxData["\<\"Writing the R2 and UV parts at the class level finished \
3410after 15.709282\"\>"], "Print",
3411 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3412  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404568942801*^9}],
3413
3414Cell[BoxData["\<\"\"\>"], "Print",
3415 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3416  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404569190112*^9}],
3417
3418Cell[BoxData[
3419 InterpretationBox[
3420  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
3421   RowBox[{"{",
3422    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3423  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
3424  Editable->False]], "Print",
3425 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3426  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045691917353`*^9}],
3427
3428Cell[BoxData[
3429 InterpretationBox[
3430  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3431   "\[InvisibleSpace]", "\<\": \"\>",
3432   "\[InvisibleSpace]", "\<\"1 Generic, 68 Classes insertions\"\>"}],
3433  SequenceForm["> Top. ", 1, ": ", "1 Generic, 68 Classes insertions"],
3434  Editable->False]], "Print",
3435 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3436  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045692295227`*^9}],
3437
3438Cell[BoxData[
3439 InterpretationBox[
3440  RowBox[{"\<\"in total: \"\>",
3441   "\[InvisibleSpace]", "\<\"1 Generic, 68 Classes insertions\"\>"}],
3442  SequenceForm["in total: ", "1 Generic, 68 Classes insertions"],
3443  Editable->False]], "Print",
3444 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3445  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404569231703*^9}],
3446
3447Cell[BoxData["\<\"\"\>"], "Print",
3448 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3449  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404569233157*^9}],
3450
3451Cell[BoxData[
3452 InterpretationBox[
3453  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
3454   RowBox[{"{",
3455    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3456  SequenceForm[
3457  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
3458  Editable->False]], "Print",
3459 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3460  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404569234769*^9}],
3461
3462Cell[BoxData[
3463 InterpretationBox[
3464  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3465   "\[InvisibleSpace]", "\<\": \"\>",
3466   "\[InvisibleSpace]", "\<\"1 Generic, 68 Classes amplitudes\"\>"}],
3467  SequenceForm["> Top. ", 1, ": ", "1 Generic, 68 Classes amplitudes"],
3468  Editable->False]], "Print",
3469 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3470  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045692822857`*^9}],
3471
3472Cell[BoxData[
3473 InterpretationBox[
3474  RowBox[{"\<\"in total: \"\>",
3475   "\[InvisibleSpace]", "\<\"1 Generic, 68 Classes amplitudes\"\>"}],
3476  SequenceForm["in total: ", "1 Generic, 68 Classes amplitudes"],
3477  Editable->False]], "Print",
3478 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3479  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404569283842*^9}],
3480
3481Cell[BoxData["\<\"Writing the symbolic CT finished after 16.158923\"\>"], \
3482"Print",
3483 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3484  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404569392414*^9}],
3485
3486Cell[BoxData["\<\"SU3 algebra finished after 18.520586\"\>"], "Print",
3487 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3488  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940457175406*^9}],
3489
3490Cell[BoxData["\<\"Simplification of the vertices finished after \
349119.375806\"\>"], "Print",
3492 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3493  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045726093473`*^9}],
3494
3495Cell[BoxData["\<\"Vertices {F, F, V} finished after 19.376426\"\>"], "Print",
3496 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3497  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404572611164*^9}],
3498
3499Cell[BoxData[
3500 StyleBox["\<\"Computing CT for the {V, V, V} vertices.\"\>",
3501  StripOnInput->False,
3502  LineColor->RGBColor[0, 0, 1],
3503  FrontFaceColor->RGBColor[0, 0, 1],
3504  BackFaceColor->RGBColor[0, 0, 1],
3505  GraphicsColor->RGBColor[0, 0, 1],
3506  FontColor->RGBColor[0, 0, 1]]], "Print",
3507 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3508  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404572612823*^9}],
3509
3510Cell[BoxData["\<\"\"\>"], "Print",
3511 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3512  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404572614271*^9}],
3513
3514Cell[BoxData[
3515 InterpretationBox[
3516  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
3517   RowBox[{"{",
3518    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3519  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
3520  Editable->False]], "Print",
3521 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3522  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404572615786*^9}],
3523
3524Cell[BoxData[
3525 InterpretationBox[
3526  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3527   "\[InvisibleSpace]", "\<\": \"\>",
3528   "\[InvisibleSpace]", "\<\"10 Generic, 1861 Classes insertions\"\>"}],
3529  SequenceForm["> Top. ", 1, ": ", "10 Generic, 1861 Classes insertions"],
3530  Editable->False]], "Print",
3531 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3532  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404575658085*^9}],
3533
3534Cell[BoxData[
3535 InterpretationBox[
3536  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
3537   "\[InvisibleSpace]", "\<\": \"\>",
3538   "\[InvisibleSpace]", "\<\"2 Generic, 83 Classes insertions\"\>"}],
3539  SequenceForm["> Top. ", 2, ": ", "2 Generic, 83 Classes insertions"],
3540  Editable->False]], "Print",
3541 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3542  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404575913735*^9}],
3543
3544Cell[BoxData[
3545 InterpretationBox[
3546  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3",
3547   "\[InvisibleSpace]", "\<\": \"\>",
3548   "\[InvisibleSpace]", "\<\"2 Generic, 83 Classes insertions\"\>"}],
3549  SequenceForm["> Top. ", 3, ": ", "2 Generic, 83 Classes insertions"],
3550  Editable->False]], "Print",
3551 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3552  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045760944147`*^9}],
3553
3554Cell[BoxData[
3555 InterpretationBox[
3556  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4",
3557   "\[InvisibleSpace]", "\<\": \"\>",
3558   "\[InvisibleSpace]", "\<\"2 Generic, 83 Classes insertions\"\>"}],
3559  SequenceForm["> Top. ", 4, ": ", "2 Generic, 83 Classes insertions"],
3560  Editable->False]], "Print",
3561 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3562  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404576292109*^9}],
3563
3564Cell[BoxData[
3565 InterpretationBox[
3566  RowBox[{"\<\"in total: \"\>",
3567   "\[InvisibleSpace]", "\<\"16 Generic, 2110 Classes insertions\"\>"}],
3568  SequenceForm["in total: ", "16 Generic, 2110 Classes insertions"],
3569  Editable->False]], "Print",
3570 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3571  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045763414288`*^9}],
3572
3573Cell[BoxData["\<\"\"\>"], "Print",
3574 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3575  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404576958024*^9}],
3576
3577Cell[BoxData[
3578 InterpretationBox[
3579  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
3580   RowBox[{"{",
3581    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3582  SequenceForm[
3583  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
3584  Editable->False]], "Print",
3585 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3586  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940457695991*^9}],
3587
3588Cell[BoxData[
3589 InterpretationBox[
3590  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3591   "\[InvisibleSpace]", "\<\": \"\>",
3592   "\[InvisibleSpace]", "\<\"3 Generic, 507 Classes amplitudes\"\>"}],
3593  SequenceForm["> Top. ", 1, ": ", "3 Generic, 507 Classes amplitudes"],
3594  Editable->False]], "Print",
3595 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3596  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940457787913*^9}],
3597
3598Cell[BoxData[
3599 InterpretationBox[
3600  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
3601   "\[InvisibleSpace]", "\<\": \"\>",
3602   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
3603  SequenceForm["> Top. ", 2, ": ", "1 Generic, 1 Classes amplitudes"],
3604  Editable->False]], "Print",
3605 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3606  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404577923938*^9}],
3607
3608Cell[BoxData[
3609 InterpretationBox[
3610  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3",
3611   "\[InvisibleSpace]", "\<\": \"\>",
3612   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
3613  SequenceForm["> Top. ", 3, ": ", "1 Generic, 1 Classes amplitudes"],
3614  Editable->False]], "Print",
3615 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3616  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404577925827*^9}],
3617
3618Cell[BoxData[
3619 InterpretationBox[
3620  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4",
3621   "\[InvisibleSpace]", "\<\": \"\>",
3622   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
3623  SequenceForm["> Top. ", 4, ": ", "1 Generic, 1 Classes amplitudes"],
3624  Editable->False]], "Print",
3625 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3626  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404577927701*^9}],
3627
3628Cell[BoxData[
3629 InterpretationBox[
3630  RowBox[{"\<\"in total: \"\>",
3631   "\[InvisibleSpace]", "\<\"6 Generic, 510 Classes amplitudes\"\>"}],
3632  SequenceForm["in total: ", "6 Generic, 510 Classes amplitudes"],
3633  Editable->False]], "Print",
3634 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3635  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494045779292793`*^9}],
3636
3637Cell[BoxData["\<\"Writing amplitude finished after 24.722895\"\>"], "Print",
3638 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3639  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404577973978*^9}],
3640
3641Cell[BoxData["\<\"Writing the R2 and UV parts at the class level finished \
3642after 156.943737\"\>"], "Print",
3643 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3644  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404710177348*^9}],
3645
3646Cell[BoxData["\<\"\"\>"], "Print",
3647 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3648  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404710235854*^9}],
3649
3650Cell[BoxData[
3651 InterpretationBox[
3652  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
3653   RowBox[{"{",
3654    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3655  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
3656  Editable->False]], "Print",
3657 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3658  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404710237863*^9}],
3659
3660Cell[BoxData[
3661 InterpretationBox[
3662  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3663   "\[InvisibleSpace]", "\<\": \"\>",
3664   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes insertions\"\>"}],
3665  SequenceForm["> Top. ", 1, ": ", "1 Generic, 1 Classes insertions"],
3666  Editable->False]], "Print",
3667 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3668  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404710239539*^9}],
3669
3670Cell[BoxData[
3671 InterpretationBox[
3672  RowBox[{"\<\"in total: \"\>",
3673   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes insertions\"\>"}],
3674  SequenceForm["in total: ", "1 Generic, 1 Classes insertions"],
3675  Editable->False]], "Print",
3676 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3677  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047102410994`*^9}],
3678
3679Cell[BoxData["\<\"\"\>"], "Print",
3680 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3681  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047102426662`*^9}],
3682
3683Cell[BoxData[
3684 InterpretationBox[
3685  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
3686   RowBox[{"{",
3687    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3688  SequenceForm[
3689  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
3690  Editable->False]], "Print",
3691 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3692  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404710244255*^9}],
3693
3694Cell[BoxData[
3695 InterpretationBox[
3696  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3697   "\[InvisibleSpace]", "\<\": \"\>",
3698   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
3699  SequenceForm["> Top. ", 1, ": ", "1 Generic, 1 Classes amplitudes"],
3700  Editable->False]], "Print",
3701 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3702  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047102460213`*^9}],
3703
3704Cell[BoxData[
3705 InterpretationBox[
3706  RowBox[{"\<\"in total: \"\>",
3707   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
3708  SequenceForm["in total: ", "1 Generic, 1 Classes amplitudes"],
3709  Editable->False]], "Print",
3710 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3711  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404710248122*^9}],
3712
3713Cell[BoxData["\<\"Writing the symbolic CT finished after 157.026868\"\>"], \
3714"Print",
3715 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3716  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404710291153*^9}],
3717
3718Cell[BoxData["\<\"SU3 algebra finished after 159.852123\"\>"], "Print",
3719 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3720  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404713085641*^9}],
3721
3722Cell[BoxData["\<\"Simplification of the vertices finished after \
3723160.478395\"\>"], "Print",
3724 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3725  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404713712138*^9}],
3726
3727Cell[BoxData["\<\"Vertices {V, V, V} finished after 160.478998\"\>"], "Print",
3728 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3729  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047137146797`*^9}],
3730
3731Cell[BoxData[
3732 StyleBox["\<\"Computing CT for the {V, V, S} vertices.\"\>",
3733  StripOnInput->False,
3734  LineColor->RGBColor[0, 0, 1],
3735  FrontFaceColor->RGBColor[0, 0, 1],
3736  BackFaceColor->RGBColor[0, 0, 1],
3737  GraphicsColor->RGBColor[0, 0, 1],
3738  FontColor->RGBColor[0, 0, 1]]], "Print",
3739 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3740  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404713717102*^9}],
3741
3742Cell[BoxData["\<\"\"\>"], "Print",
3743 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3744  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404713719264*^9}],
3745
3746Cell[BoxData[
3747 InterpretationBox[
3748  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
3749   RowBox[{"{",
3750    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3751  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
3752  Editable->False]], "Print",
3753 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3754  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404713721765*^9}],
3755
3756Cell[BoxData[
3757 InterpretationBox[
3758  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3759   "\[InvisibleSpace]", "\<\": \"\>",
3760   "\[InvisibleSpace]", "\<\"10 Generic, 729 Classes insertions\"\>"}],
3761  SequenceForm["> Top. ", 1, ": ", "10 Generic, 729 Classes insertions"],
3762  Editable->False]], "Print",
3763 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3764  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047154818163`*^9}],
3765
3766Cell[BoxData[
3767 InterpretationBox[
3768  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
3769   "\[InvisibleSpace]", "\<\": \"\>",
3770   "\[InvisibleSpace]", "\<\"1 Generic, 89 Classes insertions\"\>"}],
3771  SequenceForm["> Top. ", 2, ": ", "1 Generic, 89 Classes insertions"],
3772  Editable->False]], "Print",
3773 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3774  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404715590074*^9}],
3775
3776Cell[BoxData[
3777 InterpretationBox[
3778  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3",
3779   "\[InvisibleSpace]", "\<\": \"\>",
3780   "\[InvisibleSpace]", "\<\"1 Generic, 89 Classes insertions\"\>"}],
3781  SequenceForm["> Top. ", 3, ": ", "1 Generic, 89 Classes insertions"],
3782  Editable->False]], "Print",
3783 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3784  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404715694914*^9}],
3785
3786Cell[BoxData[
3787 InterpretationBox[
3788  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4",
3789   "\[InvisibleSpace]", "\<\": \"\>",
3790   "\[InvisibleSpace]", "\<\"2 Generic, 56 Classes insertions\"\>"}],
3791  SequenceForm["> Top. ", 4, ": ", "2 Generic, 56 Classes insertions"],
3792  Editable->False]], "Print",
3793 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3794  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047158256817`*^9}],
3795
3796Cell[BoxData[
3797 InterpretationBox[
3798  RowBox[{"\<\"in total: \"\>",
3799   "\[InvisibleSpace]", "\<\"14 Generic, 963 Classes insertions\"\>"}],
3800  SequenceForm["in total: ", "14 Generic, 963 Classes insertions"],
3801  Editable->False]], "Print",
3802 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3803  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047158745813`*^9}],
3804
3805Cell[BoxData["\<\"\"\>"], "Print",
3806 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3807  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404716107876*^9}],
3808
3809Cell[BoxData[
3810 InterpretationBox[
3811  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
3812   RowBox[{"{",
3813    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3814  SequenceForm[
3815  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
3816  Editable->False]], "Print",
3817 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3818  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047161104183`*^9}],
3819
3820Cell[BoxData[
3821 InterpretationBox[
3822  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3823   "\[InvisibleSpace]", "\<\": \"\>",
3824   "\[InvisibleSpace]", "\<\"1 Generic, 36 Classes amplitudes\"\>"}],
3825  SequenceForm["> Top. ", 1, ": ", "1 Generic, 36 Classes amplitudes"],
3826  Editable->False]], "Print",
3827 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3828  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940471619405*^9}],
3829
3830Cell[BoxData[
3831 InterpretationBox[
3832  RowBox[{"\<\"in total: \"\>",
3833   "\[InvisibleSpace]", "\<\"1 Generic, 36 Classes amplitudes\"\>"}],
3834  SequenceForm["in total: ", "1 Generic, 36 Classes amplitudes"],
3835  Editable->False]], "Print",
3836 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3837  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404716195929*^9}],
3838
3839Cell[BoxData["\<\"Writing amplitude finished after 162.966929\"\>"], "Print",
3840 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3841  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047162378817`*^9}],
3842
3843Cell[BoxData["\<\"Writing the R2 and UV parts at the class level finished \
3844after 163.127803\"\>"], "Print",
3845 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3846  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940471636134*^9}],
3847
3848Cell[BoxData["\<\"\"\>"], "Print",
3849 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3850  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047164049273`*^9}],
3851
3852Cell[BoxData[
3853 InterpretationBox[
3854  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
3855   RowBox[{"{",
3856    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3857  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
3858  Editable->False]], "Print",
3859 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3860  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047164067163`*^9}],
3861
3862Cell[BoxData[
3863 InterpretationBox[
3864  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3865   "\[InvisibleSpace]", "\<\": \"\>",
3866   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
3867  SequenceForm["> Top. ", 1, ": ", "0 Generic, 0 Classes insertions"],
3868  Editable->False]], "Print",
3869 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3870  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047164090776`*^9}],
3871
3872Cell[BoxData[
3873 InterpretationBox[
3874  RowBox[{"\<\"in total: \"\>",
3875   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
3876  SequenceForm["in total: ", "0 Generic, 0 Classes insertions"],
3877  Editable->False]], "Print",
3878 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3879  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404716410781*^9}],
3880
3881Cell[BoxData["\<\"\"\>"], "Print",
3882 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3883  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047164123287`*^9}],
3884
3885Cell[BoxData[
3886 InterpretationBox[
3887  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
3888   RowBox[{"{",
3889    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3890  SequenceForm[
3891  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
3892  Editable->False]], "Print",
3893 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3894  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404716413888*^9}],
3895
3896Cell[BoxData[
3897 InterpretationBox[
3898  RowBox[{"\<\"in total: \"\>",
3899   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes amplitudes\"\>"}],
3900  SequenceForm["in total: ", "0 Generic, 0 Classes amplitudes"],
3901  Editable->False]], "Print",
3902 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3903  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404716415412*^9}],
3904
3905Cell[BoxData["\<\"Writing the symbolic CT finished after 163.133938\"\>"], \
3906"Print",
3907 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3908  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047164169483`*^9}],
3909
3910Cell[BoxData["\<\"SU3 algebra finished after 163.153896\"\>"], "Print",
3911 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3912  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047164187*^9}],
3913
3914Cell[BoxData["\<\"Simplification of the vertices finished after \
3915163.161853\"\>"], "Print",
3916 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3917  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404716421035*^9}],
3918
3919Cell[BoxData["\<\"Vertices {V, V, S} finished after 163.162031\"\>"], "Print",
3920 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3921  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404716423502*^9}],
3922
3923Cell[BoxData[
3924 StyleBox["\<\"Computing CT for the {V, S, S} vertices.\"\>",
3925  StripOnInput->False,
3926  LineColor->RGBColor[0, 0, 1],
3927  FrontFaceColor->RGBColor[0, 0, 1],
3928  BackFaceColor->RGBColor[0, 0, 1],
3929  GraphicsColor->RGBColor[0, 0, 1],
3930  FontColor->RGBColor[0, 0, 1]]], "Print",
3931 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3932  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404716425412*^9}],
3933
3934Cell[BoxData["\<\"\"\>"], "Print",
3935 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3936  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404716427001*^9}],
3937
3938Cell[BoxData[
3939 InterpretationBox[
3940  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
3941   RowBox[{"{",
3942    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
3943  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
3944  Editable->False]], "Print",
3945 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3946  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404716428589*^9}],
3947
3948Cell[BoxData[
3949 InterpretationBox[
3950  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
3951   "\[InvisibleSpace]", "\<\": \"\>",
3952   "\[InvisibleSpace]", "\<\"10 Generic, 588 Classes insertions\"\>"}],
3953  SequenceForm["> Top. ", 1, ": ", "10 Generic, 588 Classes insertions"],
3954  Editable->False]], "Print",
3955 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3956  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047176593103`*^9}],
3957
3958Cell[BoxData[
3959 InterpretationBox[
3960  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
3961   "\[InvisibleSpace]", "\<\": \"\>",
3962   "\[InvisibleSpace]", "\<\"2 Generic, 48 Classes insertions\"\>"}],
3963  SequenceForm["> Top. ", 2, ": ", "2 Generic, 48 Classes insertions"],
3964  Editable->False]], "Print",
3965 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3966  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940471778406*^9}],
3967
3968Cell[BoxData[
3969 InterpretationBox[
3970  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3",
3971   "\[InvisibleSpace]", "\<\": \"\>",
3972   "\[InvisibleSpace]", "\<\"1 Generic, 86 Classes insertions\"\>"}],
3973  SequenceForm["> Top. ", 3, ": ", "1 Generic, 86 Classes insertions"],
3974  Editable->False]], "Print",
3975 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3976  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404717887373*^9}],
3977
3978Cell[BoxData[
3979 InterpretationBox[
3980  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4",
3981   "\[InvisibleSpace]", "\<\": \"\>",
3982   "\[InvisibleSpace]", "\<\"1 Generic, 86 Classes insertions\"\>"}],
3983  SequenceForm["> Top. ", 4, ": ", "1 Generic, 86 Classes insertions"],
3984  Editable->False]], "Print",
3985 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3986  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404717995791*^9}],
3987
3988Cell[BoxData[
3989 InterpretationBox[
3990  RowBox[{"\<\"in total: \"\>",
3991   "\[InvisibleSpace]", "\<\"14 Generic, 808 Classes insertions\"\>"}],
3992  SequenceForm["in total: ", "14 Generic, 808 Classes insertions"],
3993  Editable->False]], "Print",
3994 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3995  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404717998502*^9}],
3996
3997Cell[BoxData["\<\"\"\>"], "Print",
3998 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
3999  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047182150297`*^9}],
4000
4001Cell[BoxData[
4002 InterpretationBox[
4003  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
4004   RowBox[{"{",
4005    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4006  SequenceForm[
4007  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
4008  Editable->False]], "Print",
4009 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4010  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404718216735*^9}],
4011
4012Cell[BoxData[
4013 InterpretationBox[
4014  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
4015   "\[InvisibleSpace]", "\<\": \"\>",
4016   "\[InvisibleSpace]", "\<\"1 Generic, 12 Classes amplitudes\"\>"}],
4017  SequenceForm["> Top. ", 1, ": ", "1 Generic, 12 Classes amplitudes"],
4018  Editable->False]], "Print",
4019 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4020  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940471826581*^9}],
4021
4022Cell[BoxData[
4023 InterpretationBox[
4024  RowBox[{"\<\"in total: \"\>",
4025   "\[InvisibleSpace]", "\<\"1 Generic, 12 Classes amplitudes\"\>"}],
4026  SequenceForm["in total: ", "1 Generic, 12 Classes amplitudes"],
4027  Editable->False]], "Print",
4028 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4029  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404718267797*^9}],
4030
4031Cell[BoxData["\<\"Writing amplitude finished after 165.009942\"\>"], "Print",
4032 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4033  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404718269371*^9}],
4034
4035Cell[BoxData["\<\"Writing the R2 and UV parts at the class level finished \
4036after 179.757436\"\>"], "Print",
4037 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4038  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047329912043`*^9}],
4039
4040Cell[BoxData["\<\"\"\>"], "Print",
4041 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4042  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404732993681*^9}],
4043
4044Cell[BoxData[
4045 InterpretationBox[
4046  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
4047   RowBox[{"{",
4048    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4049  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
4050  Editable->False]], "Print",
4051 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4052  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047329962893`*^9}],
4053
4054Cell[BoxData[
4055 InterpretationBox[
4056  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
4057   "\[InvisibleSpace]", "\<\": \"\>",
4058   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
4059  SequenceForm["> Top. ", 1, ": ", "0 Generic, 0 Classes insertions"],
4060  Editable->False]], "Print",
4061 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4062  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404732998763*^9}],
4063
4064Cell[BoxData[
4065 InterpretationBox[
4066  RowBox[{"\<\"in total: \"\>",
4067   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
4068  SequenceForm["in total: ", "0 Generic, 0 Classes insertions"],
4069  Editable->False]], "Print",
4070 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4071  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047330011787`*^9}],
4072
4073Cell[BoxData["\<\"\"\>"], "Print",
4074 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4075  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404733003743*^9}],
4076
4077Cell[BoxData[
4078 InterpretationBox[
4079  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
4080   RowBox[{"{",
4081    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4082  SequenceForm[
4083  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
4084  Editable->False]], "Print",
4085 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4086  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940473300618*^9}],
4087
4088Cell[BoxData[
4089 InterpretationBox[
4090  RowBox[{"\<\"in total: \"\>",
4091   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes amplitudes\"\>"}],
4092  SequenceForm["in total: ", "0 Generic, 0 Classes amplitudes"],
4093  Editable->False]], "Print",
4094 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4095  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404733008988*^9}],
4096
4097Cell[BoxData["\<\"Writing the symbolic CT finished after 179.762084\"\>"], \
4098"Print",
4099 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4100  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047330110483`*^9}],
4101
4102Cell[BoxData["\<\"SU3 algebra finished after 179.762433\"\>"], "Print",
4103 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4104  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404733012513*^9}],
4105
4106Cell[BoxData["\<\"Simplification of the vertices finished after \
4107179.762507\"\>"], "Print",
4108 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4109  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404733014002*^9}],
4110
4111Cell[BoxData["\<\"Vertices {V, S, S} finished after 179.762694\"\>"], "Print",
4112 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4113  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404733015902*^9}],
4114
4115Cell[BoxData[
4116 StyleBox["\<\"Computing CT for the {S, S, S} vertices.\"\>",
4117  StripOnInput->False,
4118  LineColor->RGBColor[0, 0, 1],
4119  FrontFaceColor->RGBColor[0, 0, 1],
4120  BackFaceColor->RGBColor[0, 0, 1],
4121  GraphicsColor->RGBColor[0, 0, 1],
4122  FontColor->RGBColor[0, 0, 1]]], "Print",
4123 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4124  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404733017509*^9}],
4125
4126Cell[BoxData["\<\"\"\>"], "Print",
4127 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4128  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404733018936*^9}],
4129
4130Cell[BoxData[
4131 InterpretationBox[
4132  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
4133   RowBox[{"{",
4134    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4135  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
4136  Editable->False]], "Print",
4137 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4138  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404733020524*^9}],
4139
4140Cell[BoxData[
4141 InterpretationBox[
4142  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
4143   "\[InvisibleSpace]", "\<\": \"\>",
4144   "\[InvisibleSpace]", "\<\"10 Generic, 520 Classes insertions\"\>"}],
4145  SequenceForm["> Top. ", 1, ": ", "10 Generic, 520 Classes insertions"],
4146  Editable->False]], "Print",
4147 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4148  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734114705*^9}],
4149
4150Cell[BoxData[
4151 InterpretationBox[
4152  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
4153   "\[InvisibleSpace]", "\<\": \"\>",
4154   "\[InvisibleSpace]", "\<\"2 Generic, 54 Classes insertions\"\>"}],
4155  SequenceForm["> Top. ", 2, ": ", "2 Generic, 54 Classes insertions"],
4156  Editable->False]], "Print",
4157 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4158  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734231189*^9}],
4159
4160Cell[BoxData[
4161 InterpretationBox[
4162  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3",
4163   "\[InvisibleSpace]", "\<\": \"\>",
4164   "\[InvisibleSpace]", "\<\"2 Generic, 54 Classes insertions\"\>"}],
4165  SequenceForm["> Top. ", 3, ": ", "2 Generic, 54 Classes insertions"],
4166  Editable->False]], "Print",
4167 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4168  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047343438683`*^9}],
4169
4170Cell[BoxData[
4171 InterpretationBox[
4172  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4",
4173   "\[InvisibleSpace]", "\<\": \"\>",
4174   "\[InvisibleSpace]", "\<\"2 Generic, 54 Classes insertions\"\>"}],
4175  SequenceForm["> Top. ", 4, ": ", "2 Generic, 54 Classes insertions"],
4176  Editable->False]], "Print",
4177 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4178  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940473445857*^9}],
4179
4180Cell[BoxData[
4181 InterpretationBox[
4182  RowBox[{"\<\"in total: \"\>",
4183   "\[InvisibleSpace]", "\<\"16 Generic, 682 Classes insertions\"\>"}],
4184  SequenceForm["in total: ", "16 Generic, 682 Classes insertions"],
4185  Editable->False]], "Print",
4186 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4187  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734460507*^9}],
4188
4189Cell[BoxData["\<\"\"\>"], "Print",
4190 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4191  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734640451*^9}],
4192
4193Cell[BoxData[
4194 InterpretationBox[
4195  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
4196   RowBox[{"{",
4197    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4198  SequenceForm[
4199  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
4200  Editable->False]], "Print",
4201 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4202  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047346422663`*^9}],
4203
4204Cell[BoxData[
4205 InterpretationBox[
4206  RowBox[{"\<\"in total: \"\>",
4207   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes amplitudes\"\>"}],
4208  SequenceForm["in total: ", "0 Generic, 0 Classes amplitudes"],
4209  Editable->False]], "Print",
4210 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4211  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734643897*^9}],
4212
4213Cell[BoxData["\<\"Writing amplitude finished after 181.407720\"\>"], "Print",
4214 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4215  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734645455*^9}],
4216
4217Cell[BoxData["\<\"Writing the R2 and UV parts at the class level finished \
4218after 181.407832\"\>"], "Print",
4219 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4220  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734647394*^9}],
4221
4222Cell[BoxData["\<\"\"\>"], "Print",
4223 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4224  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047346489363`*^9}],
4225
4226Cell[BoxData[
4227 InterpretationBox[
4228  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
4229   RowBox[{"{",
4230    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4231  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
4232  Editable->False]], "Print",
4233 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4234  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734651039*^9}],
4235
4236Cell[BoxData[
4237 InterpretationBox[
4238  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
4239   "\[InvisibleSpace]", "\<\": \"\>",
4240   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
4241  SequenceForm["> Top. ", 1, ": ", "0 Generic, 0 Classes insertions"],
4242  Editable->False]], "Print",
4243 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4244  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047346531057`*^9}],
4245
4246Cell[BoxData[
4247 InterpretationBox[
4248  RowBox[{"\<\"in total: \"\>",
4249   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
4250  SequenceForm["in total: ", "0 Generic, 0 Classes insertions"],
4251  Editable->False]], "Print",
4252 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4253  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940473465633*^9}],
4254
4255Cell[BoxData["\<\"\"\>"], "Print",
4256 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4257  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734658499*^9}],
4258
4259Cell[BoxData[
4260 InterpretationBox[
4261  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
4262   RowBox[{"{",
4263    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4264  SequenceForm[
4265  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
4266  Editable->False]], "Print",
4267 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4268  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734660386*^9}],
4269
4270Cell[BoxData[
4271 InterpretationBox[
4272  RowBox[{"\<\"in total: \"\>",
4273   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes amplitudes\"\>"}],
4274  SequenceForm["in total: ", "0 Generic, 0 Classes amplitudes"],
4275  Editable->False]], "Print",
4276 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4277  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734661998*^9}],
4278
4279Cell[BoxData["\<\"Writing the symbolic CT finished after 181.410899\"\>"], \
4280"Print",
4281 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4282  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734663588*^9}],
4283
4284Cell[BoxData["\<\"SU3 algebra finished after 181.411151\"\>"], "Print",
4285 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4286  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734665051*^9}],
4287
4288Cell[BoxData["\<\"Simplification of the vertices finished after \
4289181.411197\"\>"], "Print",
4290 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4291  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734666535*^9}],
4292
4293Cell[BoxData["\<\"Vertices {S, S, S} finished after 181.411314\"\>"], "Print",
4294 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4295  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734668009*^9}],
4296
4297Cell[BoxData[
4298 StyleBox["\<\"Computing CT for the {V, V, V, V} vertices.\"\>",
4299  StripOnInput->False,
4300  LineColor->RGBColor[0, 0, 1],
4301  FrontFaceColor->RGBColor[0, 0, 1],
4302  BackFaceColor->RGBColor[0, 0, 1],
4303  GraphicsColor->RGBColor[0, 0, 1],
4304  FontColor->RGBColor[0, 0, 1]]], "Print",
4305 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4306  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047346695757`*^9}],
4307
4308Cell[BoxData["\<\"\"\>"], "Print",
4309 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4310  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734711883*^9}],
4311
4312Cell[BoxData[
4313 InterpretationBox[
4314  RowBox[{"\<\"Excluding \"\>", "\[InvisibleSpace]", "14",
4315   "\[InvisibleSpace]", "\<\" field point(s) (incl. charge-conjugate \
4316ones)\"\>"}],
4317  SequenceForm[
4318  "Excluding ", 14, " field point(s) (incl. charge-conjugate ones)"],
4319  Editable->False]], "Print",
4320 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4321  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047347137012`*^9}],
4322
4323Cell[BoxData["\<\"\"\>"], "Print",
4324 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4325  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734715169*^9}],
4326
4327Cell[BoxData[
4328 InterpretationBox[
4329  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
4330   RowBox[{"{",
4331    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4332  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
4333  Editable->False]], "Print",
4334 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4335  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404734716786*^9}],
4336
4337Cell[BoxData[
4338 InterpretationBox[
4339  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
4340   "\[InvisibleSpace]", "\<\": \"\>",
4341   "\[InvisibleSpace]", "\<\"2 Generic, 677 Classes insertions\"\>"}],
4342  SequenceForm["> Top. ", 1, ": ", "2 Generic, 677 Classes insertions"],
4343  Editable->False]], "Print",
4344 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4345  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404736005454*^9}],
4346
4347Cell[BoxData[
4348 InterpretationBox[
4349  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
4350   "\[InvisibleSpace]", "\<\": \"\>",
4351   "\[InvisibleSpace]", "\<\"2 Generic, 677 Classes insertions\"\>"}],
4352  SequenceForm["> Top. ", 2, ": ", "2 Generic, 677 Classes insertions"],
4353  Editable->False]], "Print",
4354 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4355  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047373467283`*^9}],
4356
4357Cell[BoxData[
4358 InterpretationBox[
4359  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3",
4360   "\[InvisibleSpace]", "\<\": \"\>",
4361   "\[InvisibleSpace]", "\<\"2 Generic, 677 Classes insertions\"\>"}],
4362  SequenceForm["> Top. ", 3, ": ", "2 Generic, 677 Classes insertions"],
4363  Editable->False]], "Print",
4364 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4365  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404738672555*^9}],
4366
4367Cell[BoxData[
4368 InterpretationBox[
4369  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4",
4370   "\[InvisibleSpace]", "\<\": \"\>",
4371   "\[InvisibleSpace]", "\<\"2 Generic, 677 Classes insertions\"\>"}],
4372  SequenceForm["> Top. ", 4, ": ", "2 Generic, 677 Classes insertions"],
4373  Editable->False]], "Print",
4374 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4375  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404740021267*^9}],
4376
4377Cell[BoxData[
4378 InterpretationBox[
4379  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5",
4380   "\[InvisibleSpace]", "\<\": \"\>",
4381   "\[InvisibleSpace]", "\<\"2 Generic, 677 Classes insertions\"\>"}],
4382  SequenceForm["> Top. ", 5, ": ", "2 Generic, 677 Classes insertions"],
4383  Editable->False]], "Print",
4384 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4385  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494047413529053`*^9}],
4386
4387Cell[BoxData[
4388 InterpretationBox[
4389  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6",
4390   "\[InvisibleSpace]", "\<\": \"\>",
4391   "\[InvisibleSpace]", "\<\"2 Generic, 677 Classes insertions\"\>"}],
4392  SequenceForm["> Top. ", 6, ": ", "2 Generic, 677 Classes insertions"],
4393  Editable->False]], "Print",
4394 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4395  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404742676086*^9}],
4396
4397Cell[BoxData[
4398 InterpretationBox[
4399  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7",
4400   "\[InvisibleSpace]", "\<\": \"\>",
4401   "\[InvisibleSpace]", "\<\"4 Generic, 6263 Classes insertions\"\>"}],
4402  SequenceForm["> Top. ", 7, ": ", "4 Generic, 6263 Classes insertions"],
4403  Editable->False]], "Print",
4404 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4405  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404758544491*^9}],
4406
4407Cell[BoxData[
4408 InterpretationBox[
4409  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8",
4410   "\[InvisibleSpace]", "\<\": \"\>",
4411   "\[InvisibleSpace]", "\<\"4 Generic, 6263 Classes insertions\"\>"}],
4412  SequenceForm["> Top. ", 8, ": ", "4 Generic, 6263 Classes insertions"],
4413  Editable->False]], "Print",
4414 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4415  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404774367918*^9}],
4416
4417Cell[BoxData[
4418 InterpretationBox[
4419  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9",
4420   "\[InvisibleSpace]", "\<\": \"\>",
4421   "\[InvisibleSpace]", "\<\"4 Generic, 6263 Classes insertions\"\>"}],
4422  SequenceForm["> Top. ", 9, ": ", "4 Generic, 6263 Classes insertions"],
4423  Editable->False]], "Print",
4424 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4425  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404792137575*^9}],
4426
4427Cell[BoxData[
4428 InterpretationBox[
4429  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10",
4430   "\[InvisibleSpace]", "\<\": \"\>",
4431   "\[InvisibleSpace]", "\<\"2 Generic, 409 Classes insertions\"\>"}],
4432  SequenceForm["> Top. ", 10, ": ", "2 Generic, 409 Classes insertions"],
4433  Editable->False]], "Print",
4434 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4435  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404792958478*^9}],
4436
4437Cell[BoxData[
4438 InterpretationBox[
4439  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11",
4440   "\[InvisibleSpace]", "\<\": \"\>",
4441   "\[InvisibleSpace]", "\<\"2 Generic, 409 Classes insertions\"\>"}],
4442  SequenceForm["> Top. ", 11, ": ", "2 Generic, 409 Classes insertions"],
4443  Editable->False]], "Print",
4444 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4445  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404793779251*^9}],
4446
4447Cell[BoxData[
4448 InterpretationBox[
4449  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12",
4450   "\[InvisibleSpace]", "\<\": \"\>",
4451   "\[InvisibleSpace]", "\<\"2 Generic, 409 Classes insertions\"\>"}],
4452  SequenceForm["> Top. ", 12, ": ", "2 Generic, 409 Classes insertions"],
4453  Editable->False]], "Print",
4454 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4455  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404794598016*^9}],
4456
4457Cell[BoxData["\<\"\"\>"], "Print",
4458 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4459  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404794599712*^9}],
4460
4461Cell[BoxData[
4462 InterpretationBox[
4463  RowBox[{"\<\"Restoring \"\>", "\[InvisibleSpace]", "14",
4464   "\[InvisibleSpace]", "\<\" field point(s)\"\>"}],
4465  SequenceForm["Restoring ", 14, " field point(s)"],
4466  Editable->False]], "Print",
4467 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4468  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404794601461*^9}],
4469
4470Cell[BoxData[
4471 InterpretationBox[
4472  RowBox[{"\<\"in total: \"\>",
4473   "\[InvisibleSpace]", "\<\"30 Generic, 24078 Classes insertions\"\>"}],
4474  SequenceForm["in total: ", "30 Generic, 24078 Classes insertions"],
4475  Editable->False]], "Print",
4476 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4477  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404794711789*^9}],
4478
4479Cell[BoxData["\<\"\"\>"], "Print",
4480 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4481  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404804616252*^9}],
4482
4483Cell[BoxData[
4484 InterpretationBox[
4485  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
4486   RowBox[{"{",
4487    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4488  SequenceForm[
4489  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
4490  Editable->False]], "Print",
4491 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4492  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404804618697*^9}],
4493
4494Cell[BoxData[
4495 InterpretationBox[
4496  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
4497   "\[InvisibleSpace]", "\<\": \"\>",
4498   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
4499  SequenceForm["> Top. ", 1, ": ", "1 Generic, 1 Classes amplitudes"],
4500  Editable->False]], "Print",
4501 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4502  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494048066366053`*^9}],
4503
4504Cell[BoxData[
4505 InterpretationBox[
4506  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
4507   "\[InvisibleSpace]", "\<\": \"\>",
4508   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
4509  SequenceForm["> Top. ", 2, ": ", "1 Generic, 1 Classes amplitudes"],
4510  Editable->False]], "Print",
4511 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4512  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404806688724*^9}],
4513
4514Cell[BoxData[
4515 InterpretationBox[
4516  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3",
4517   "\[InvisibleSpace]", "\<\": \"\>",
4518   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
4519  SequenceForm["> Top. ", 3, ": ", "1 Generic, 1 Classes amplitudes"],
4520  Editable->False]], "Print",
4521 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4522  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404806691845*^9}],
4523
4524Cell[BoxData[
4525 InterpretationBox[
4526  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4",
4527   "\[InvisibleSpace]", "\<\": \"\>",
4528   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
4529  SequenceForm["> Top. ", 4, ": ", "1 Generic, 1 Classes amplitudes"],
4530  Editable->False]], "Print",
4531 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4532  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404806694996*^9}],
4533
4534Cell[BoxData[
4535 InterpretationBox[
4536  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5",
4537   "\[InvisibleSpace]", "\<\": \"\>",
4538   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
4539  SequenceForm["> Top. ", 5, ": ", "1 Generic, 1 Classes amplitudes"],
4540  Editable->False]], "Print",
4541 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4542  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404806697603*^9}],
4543
4544Cell[BoxData[
4545 InterpretationBox[
4546  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6",
4547   "\[InvisibleSpace]", "\<\": \"\>",
4548   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
4549  SequenceForm["> Top. ", 6, ": ", "1 Generic, 1 Classes amplitudes"],
4550  Editable->False]], "Print",
4551 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4552  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940480669925*^9}],
4553
4554Cell[BoxData[
4555 InterpretationBox[
4556  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7",
4557   "\[InvisibleSpace]", "\<\": \"\>",
4558   "\[InvisibleSpace]", "\<\"3 Generic, 2943 Classes amplitudes\"\>"}],
4559  SequenceForm["> Top. ", 7, ": ", "3 Generic, 2943 Classes amplitudes"],
4560  Editable->False]], "Print",
4561 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4562  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404812480259*^9}],
4563
4564Cell[BoxData[
4565 InterpretationBox[
4566  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8",
4567   "\[InvisibleSpace]", "\<\": \"\>",
4568   "\[InvisibleSpace]", "\<\"3 Generic, 2943 Classes amplitudes\"\>"}],
4569  SequenceForm["> Top. ", 8, ": ", "3 Generic, 2943 Classes amplitudes"],
4570  Editable->False]], "Print",
4571 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4572  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404818175743*^9}],
4573
4574Cell[BoxData[
4575 InterpretationBox[
4576  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9",
4577   "\[InvisibleSpace]", "\<\": \"\>",
4578   "\[InvisibleSpace]", "\<\"3 Generic, 2943 Classes amplitudes\"\>"}],
4579  SequenceForm["> Top. ", 9, ": ", "3 Generic, 2943 Classes amplitudes"],
4580  Editable->False]], "Print",
4581 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4582  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404823940118*^9}],
4583
4584Cell[BoxData[
4585 InterpretationBox[
4586  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10",
4587   "\[InvisibleSpace]", "\<\": \"\>",
4588   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
4589  SequenceForm["> Top. ", 10, ": ", "1 Generic, 1 Classes amplitudes"],
4590  Editable->False]], "Print",
4591 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4592  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494048239916897`*^9}],
4593
4594Cell[BoxData[
4595 InterpretationBox[
4596  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11",
4597   "\[InvisibleSpace]", "\<\": \"\>",
4598   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
4599  SequenceForm["> Top. ", 11, ": ", "1 Generic, 1 Classes amplitudes"],
4600  Editable->False]], "Print",
4601 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4602  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404823994047*^9}],
4603
4604Cell[BoxData[
4605 InterpretationBox[
4606  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12",
4607   "\[InvisibleSpace]", "\<\": \"\>",
4608   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
4609  SequenceForm["> Top. ", 12, ": ", "1 Generic, 1 Classes amplitudes"],
4610  Editable->False]], "Print",
4611 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4612  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404823996084*^9}],
4613
4614Cell[BoxData[
4615 InterpretationBox[
4616  RowBox[{"\<\"in total: \"\>",
4617   "\[InvisibleSpace]", "\<\"18 Generic, 8838 Classes amplitudes\"\>"}],
4618  SequenceForm["in total: ", "18 Generic, 8838 Classes amplitudes"],
4619  Editable->False]], "Print",
4620 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4621  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404824039693*^9}],
4622
4623Cell[BoxData["\<\"Writing amplitude finished after 271.447066\"\>"], "Print",
4624 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4625  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404824680655*^9}],
4626
4627Cell[BoxData["\<\"Writing the R2 and UV parts at the class level finished \
4628after 283.372856\"\>"], "Print",
4629 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4630  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404836606719*^9}],
4631
4632Cell[BoxData["\<\"\"\>"], "Print",
4633 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4634  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494048374022093`*^9}],
4635
4636Cell[BoxData[
4637 InterpretationBox[
4638  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
4639   RowBox[{"{",
4640    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4641  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
4642  Editable->False]], "Print",
4643 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4644  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404837404664*^9}],
4645
4646Cell[BoxData[
4647 InterpretationBox[
4648  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
4649   "\[InvisibleSpace]", "\<\": \"\>",
4650   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes insertions\"\>"}],
4651  SequenceForm["> Top. ", 1, ": ", "1 Generic, 1 Classes insertions"],
4652  Editable->False]], "Print",
4653 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4654  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404837406901*^9}],
4655
4656Cell[BoxData[
4657 InterpretationBox[
4658  RowBox[{"\<\"in total: \"\>",
4659   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes insertions\"\>"}],
4660  SequenceForm["in total: ", "1 Generic, 1 Classes insertions"],
4661  Editable->False]], "Print",
4662 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4663  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494048374101543`*^9}],
4664
4665Cell[BoxData["\<\"\"\>"], "Print",
4666 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4667  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940483741393*^9}],
4668
4669Cell[BoxData[
4670 InterpretationBox[
4671  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
4672   RowBox[{"{",
4673    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4674  SequenceForm[
4675  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
4676  Editable->False]], "Print",
4677 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4678  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494048374175262`*^9}],
4679
4680Cell[BoxData[
4681 InterpretationBox[
4682  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
4683   "\[InvisibleSpace]", "\<\": \"\>",
4684   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
4685  SequenceForm["> Top. ", 1, ": ", "1 Generic, 1 Classes amplitudes"],
4686  Editable->False]], "Print",
4687 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4688  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404837420114*^9}],
4689
4690Cell[BoxData[
4691 InterpretationBox[
4692  RowBox[{"\<\"in total: \"\>",
4693   "\[InvisibleSpace]", "\<\"1 Generic, 1 Classes amplitudes\"\>"}],
4694  SequenceForm["in total: ", "1 Generic, 1 Classes amplitudes"],
4695  Editable->False]], "Print",
4696 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4697  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494048374228983`*^9}],
4698
4699Cell[BoxData["\<\"Writing the symbolic CT finished after 284.189236\"\>"], \
4700"Print",
4701 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4702  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404837424752*^9}],
4703
4704Cell[BoxData["\<\"SU3 algebra finished after 336.755848\"\>"], "Print",
4705 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4706  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404889989447*^9}],
4707
4708Cell[BoxData["\<\"Simplification of the vertices finished after \
4709341.434091\"\>"], "Print",
4710 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4711  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494048946677637`*^9}],
4712
4713Cell[BoxData["\<\"Vertices {V, V, V, V} finished after 341.434402\"\>"], \
4714"Print",
4715 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4716  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494048946696377`*^9}],
4717
4718Cell[BoxData[
4719 StyleBox["\<\"Computing CT for the {V, V, S, S} vertices.\"\>",
4720  StripOnInput->False,
4721  LineColor->RGBColor[0, 0, 1],
4722  FrontFaceColor->RGBColor[0, 0, 1],
4723  BackFaceColor->RGBColor[0, 0, 1],
4724  GraphicsColor->RGBColor[0, 0, 1],
4725  FontColor->RGBColor[0, 0, 1]]], "Print",
4726 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4727  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404894671412*^9}],
4728
4729Cell[BoxData["\<\"\"\>"], "Print",
4730 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4731  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404894714813*^9}],
4732
4733Cell[BoxData[
4734 InterpretationBox[
4735  RowBox[{"\<\"Excluding \"\>", "\[InvisibleSpace]", "14",
4736   "\[InvisibleSpace]", "\<\" field point(s) (incl. charge-conjugate \
4737ones)\"\>"}],
4738  SequenceForm[
4739  "Excluding ", 14, " field point(s) (incl. charge-conjugate ones)"],
4740  Editable->False]], "Print",
4741 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4742  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404894716823*^9}],
4743
4744Cell[BoxData["\<\"\"\>"], "Print",
4745 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4746  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404894718912*^9}],
4747
4748Cell[BoxData[
4749 InterpretationBox[
4750  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
4751   RowBox[{"{",
4752    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4753  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
4754  Editable->False]], "Print",
4755 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4756  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404894721065*^9}],
4757
4758Cell[BoxData[
4759 InterpretationBox[
4760  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
4761   "\[InvisibleSpace]", "\<\": \"\>",
4762   "\[InvisibleSpace]", "\<\"2 Generic, 360 Classes insertions\"\>"}],
4763  SequenceForm["> Top. ", 1, ": ", "2 Generic, 360 Classes insertions"],
4764  Editable->False]], "Print",
4765 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4766  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404895557143*^9}],
4767
4768Cell[BoxData[
4769 InterpretationBox[
4770  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
4771   "\[InvisibleSpace]", "\<\": \"\>",
4772   "\[InvisibleSpace]", "\<\"2 Generic, 564 Classes insertions\"\>"}],
4773  SequenceForm["> Top. ", 2, ": ", "2 Generic, 564 Classes insertions"],
4774  Editable->False]], "Print",
4775 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4776  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494048967403812`*^9}],
4777
4778Cell[BoxData[
4779 InterpretationBox[
4780  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3",
4781   "\[InvisibleSpace]", "\<\": \"\>",
4782   "\[InvisibleSpace]", "\<\"2 Generic, 564 Classes insertions\"\>"}],
4783  SequenceForm["> Top. ", 3, ": ", "2 Generic, 564 Classes insertions"],
4784  Editable->False]], "Print",
4785 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4786  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494048979354973`*^9}],
4787
4788Cell[BoxData[
4789 InterpretationBox[
4790  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4",
4791   "\[InvisibleSpace]", "\<\": \"\>",
4792   "\[InvisibleSpace]", "\<\"2 Generic, 564 Classes insertions\"\>"}],
4793  SequenceForm["> Top. ", 4, ": ", "2 Generic, 564 Classes insertions"],
4794  Editable->False]], "Print",
4795 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4796  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404899180235*^9}],
4797
4798Cell[BoxData[
4799 InterpretationBox[
4800  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5",
4801   "\[InvisibleSpace]", "\<\": \"\>",
4802   "\[InvisibleSpace]", "\<\"2 Generic, 564 Classes insertions\"\>"}],
4803  SequenceForm["> Top. ", 5, ": ", "2 Generic, 564 Classes insertions"],
4804  Editable->False]], "Print",
4805 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4806  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404900358073*^9}],
4807
4808Cell[BoxData[
4809 InterpretationBox[
4810  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6",
4811   "\[InvisibleSpace]", "\<\": \"\>",
4812   "\[InvisibleSpace]", "\<\"2 Generic, 564 Classes insertions\"\>"}],
4813  SequenceForm["> Top. ", 6, ": ", "2 Generic, 564 Classes insertions"],
4814  Editable->False]], "Print",
4815 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4816  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494049017700253`*^9}],
4817
4818Cell[BoxData[
4819 InterpretationBox[
4820  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7",
4821   "\[InvisibleSpace]", "\<\": \"\>",
4822   "\[InvisibleSpace]", "\<\"4 Generic, 1098 Classes insertions\"\>"}],
4823  SequenceForm["> Top. ", 7, ": ", "4 Generic, 1098 Classes insertions"],
4824  Editable->False]], "Print",
4825 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4826  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404906635358*^9}],
4827
4828Cell[BoxData[
4829 InterpretationBox[
4830  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8",
4831   "\[InvisibleSpace]", "\<\": \"\>",
4832   "\[InvisibleSpace]", "\<\"4 Generic, 1098 Classes insertions\"\>"}],
4833  SequenceForm["> Top. ", 8, ": ", "4 Generic, 1098 Classes insertions"],
4834  Editable->False]], "Print",
4835 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4836  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494049115199337`*^9}],
4837
4838Cell[BoxData[
4839 InterpretationBox[
4840  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9",
4841   "\[InvisibleSpace]", "\<\": \"\>",
4842   "\[InvisibleSpace]", "\<\"4 Generic, 968 Classes insertions\"\>"}],
4843  SequenceForm["> Top. ", 9, ": ", "4 Generic, 968 Classes insertions"],
4844  Editable->False]], "Print",
4845 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4846  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494049152736263`*^9}],
4847
4848Cell[BoxData[
4849 InterpretationBox[
4850  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10",
4851   "\[InvisibleSpace]", "\<\": \"\>",
4852   "\[InvisibleSpace]", "\<\"2 Generic, 232 Classes insertions\"\>"}],
4853  SequenceForm["> Top. ", 10, ": ", "2 Generic, 232 Classes insertions"],
4854  Editable->False]], "Print",
4855 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4856  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404915793064*^9}],
4857
4858Cell[BoxData[
4859 InterpretationBox[
4860  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11",
4861   "\[InvisibleSpace]", "\<\": \"\>",
4862   "\[InvisibleSpace]", "\<\"1 Generic, 354 Classes insertions\"\>"}],
4863  SequenceForm["> Top. ", 11, ": ", "1 Generic, 354 Classes insertions"],
4864  Editable->False]], "Print",
4865 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4866  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494049162039843`*^9}],
4867
4868Cell[BoxData[
4869 InterpretationBox[
4870  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12",
4871   "\[InvisibleSpace]", "\<\": \"\>",
4872   "\[InvisibleSpace]", "\<\"1 Generic, 354 Classes insertions\"\>"}],
4873  SequenceForm["> Top. ", 12, ": ", "1 Generic, 354 Classes insertions"],
4874  Editable->False]], "Print",
4875 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4876  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404916608665*^9}],
4877
4878Cell[BoxData["\<\"\"\>"], "Print",
4879 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4880  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404916611044*^9}],
4881
4882Cell[BoxData[
4883 InterpretationBox[
4884  RowBox[{"\<\"Restoring \"\>", "\[InvisibleSpace]", "14",
4885   "\[InvisibleSpace]", "\<\" field point(s)\"\>"}],
4886  SequenceForm["Restoring ", 14, " field point(s)"],
4887  Editable->False]], "Print",
4888 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4889  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404916613372*^9}],
4890
4891Cell[BoxData[
4892 InterpretationBox[
4893  RowBox[{"\<\"in total: \"\>",
4894   "\[InvisibleSpace]", "\<\"28 Generic, 7284 Classes insertions\"\>"}],
4895  SequenceForm["in total: ", "28 Generic, 7284 Classes insertions"],
4896  Editable->False]], "Print",
4897 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4898  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494049166602182`*^9}],
4899
4900Cell[BoxData["\<\"\"\>"], "Print",
4901 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4902  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494049191728363`*^9}],
4903
4904Cell[BoxData[
4905 InterpretationBox[
4906  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
4907   RowBox[{"{",
4908    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4909  SequenceForm[
4910  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
4911  Editable->False]], "Print",
4912 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4913  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404919175247*^9}],
4914
4915Cell[BoxData[
4916 InterpretationBox[
4917  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
4918   "\[InvisibleSpace]", "\<\": \"\>",
4919   "\[InvisibleSpace]", "\<\"1 Generic, 100 Classes amplitudes\"\>"}],
4920  SequenceForm["> Top. ", 1, ": ", "1 Generic, 100 Classes amplitudes"],
4921  Editable->False]], "Print",
4922 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4923  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404919425619*^9}],
4924
4925Cell[BoxData[
4926 InterpretationBox[
4927  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2",
4928   "\[InvisibleSpace]", "\<\": \"\>",
4929   "\[InvisibleSpace]", "\<\"1 Generic, 100 Classes amplitudes\"\>"}],
4930  SequenceForm["> Top. ", 2, ": ", "1 Generic, 100 Classes amplitudes"],
4931  Editable->False]], "Print",
4932 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4933  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404919611506*^9}],
4934
4935Cell[BoxData[
4936 InterpretationBox[
4937  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3",
4938   "\[InvisibleSpace]", "\<\": \"\>",
4939   "\[InvisibleSpace]", "\<\"1 Generic, 100 Classes amplitudes\"\>"}],
4940  SequenceForm["> Top. ", 3, ": ", "1 Generic, 100 Classes amplitudes"],
4941  Editable->False]], "Print",
4942 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4943  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404919816181*^9}],
4944
4945Cell[BoxData[
4946 InterpretationBox[
4947  RowBox[{"\<\"in total: \"\>",
4948   "\[InvisibleSpace]", "\<\"3 Generic, 300 Classes amplitudes\"\>"}],
4949  SequenceForm["in total: ", "3 Generic, 300 Classes amplitudes"],
4950  Editable->False]], "Print",
4951 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4952  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404919818019*^9}],
4953
4954Cell[BoxData["\<\"Writing amplitude finished after 366.666482\"\>"], "Print",
4955 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4956  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494049199003363`*^9}],
4957
4958Cell[BoxData["\<\"Writing the R2 and UV parts at the class level finished \
4959after 366.890183\"\>"], "Print",
4960 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4961  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494049201239777`*^9}],
4962
4963Cell[BoxData["\<\"\"\>"], "Print",
4964 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4965  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940492016367*^9}],
4966
4967Cell[BoxData[
4968 InterpretationBox[
4969  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]",
4970   RowBox[{"{",
4971    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
4972  SequenceForm["inserting at level(s) ", {Generic, FeynArts`Classes}],
4973  Editable->False]], "Print",
4974 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4975  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404920165999*^9}],
4976
4977Cell[BoxData[
4978 InterpretationBox[
4979  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1",
4980   "\[InvisibleSpace]", "\<\": \"\>",
4981   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
4982  SequenceForm["> Top. ", 1, ": ", "0 Generic, 0 Classes insertions"],
4983  Editable->False]], "Print",
4984 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4985  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404920167856*^9}],
4986
4987Cell[BoxData[
4988 InterpretationBox[
4989  RowBox[{"\<\"in total: \"\>",
4990   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes insertions\"\>"}],
4991  SequenceForm["in total: ", "0 Generic, 0 Classes insertions"],
4992  Editable->False]], "Print",
4993 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4994  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940492016957*^9}],
4995
4996Cell[BoxData["\<\"\"\>"], "Print",
4997 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
4998  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404920171206*^9}],
4999
5000Cell[BoxData[
5001 InterpretationBox[
5002  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]",
5003   RowBox[{"{",
5004    RowBox[{"Generic", ",", "Classes"}], "}"}]}],
5005  SequenceForm[
5006  "creating amplitudes at level(s) ", {Generic, FeynArts`Classes}],
5007  Editable->False]], "Print",
5008 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
5009  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404920173149*^9}],
5010
5011Cell[BoxData[
5012 InterpretationBox[
5013  RowBox[{"\<\"in total: \"\>",
5014   "\[InvisibleSpace]", "\<\"0 Generic, 0 Classes amplitudes\"\>"}],
5015  SequenceForm["in total: ", "0 Generic, 0 Classes amplitudes"],
5016  Editable->False]], "Print",
5017 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
5018  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404920175251*^9}],
5019
5020Cell[BoxData["\<\"Writing the symbolic CT finished after 366.905177\"\>"], \
5021"Print",
5022 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
5023  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404920176873*^9}],
5024
5025Cell[BoxData["\<\"SU3 algebra finished after 366.950863\"\>"], "Print",
5026 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
5027  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404920216515*^9}],
5028
5029Cell[BoxData["\<\"Simplification of the vertices finished after \
5030366.958674\"\>"], "Print",
5031 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
5032  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494049202190723`*^9}],
5033
5034Cell[BoxData["\<\"Vertices {V, V, S, S} finished after 366.958896\"\>"], \
5035"Print",
5036 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
5037  3.6473480021180143`*^9, 3.649403484993147*^9, 3.64940492022095*^9}],
5038
5039Cell[BoxData["\<\"before merge 366.965908 temp=62.257851\"\>"], "Print",
5040 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
5041  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494049202227716`*^9}],
5042
5043Cell[BoxData["\<\"merging done 366.996872\"\>"], "Print",
5044 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
5045  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404920263136*^9}],
5046
5047Cell[BoxData["\<\"Writing R2 and UV counterterms from \
5048DMsimp_spin1/DMsimp_spin1 and Lorentz in DMsimp_spin1.nlo\"\>"], "Print",
5049 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
5050  3.6473480021180143`*^9, 3.649403484993147*^9, 3.6494049203342333`*^9}],
5051
5052Cell[BoxData["\<\"done\"\>"], "Print",
5053 CellChangeTimes->{3.64673416601022*^9, 3.647076613520582*^9,
5054  3.6473480021180143`*^9, 3.649403484993147*^9, 3.649404920385399*^9}]
5055}, Open  ]],
5056
5057Cell[BoxData[
5058 RowBox[{"{",
5059  RowBox[{
5060  "369.25389999999998735802364535629749298096`8.587925004235947", ",",
5061   "Null"}], "}"}]], "Output",
5062 CellChangeTimes->{3.646734471449627*^9, 3.6470768947501574`*^9,
5063  3.647348337525042*^9, 3.64940386211159*^9, 3.649404920430368*^9}]
5064}, Open  ]],
5065
5066Cell[BoxData[
5067 RowBox[{"Quit", "[", "]"}]], "Input",
5068 CellChangeTimes->{{3.645276376306346*^9, 3.6452763777860003`*^9}}],
5069
5070Cell[BoxData[
5071 RowBox[{
5072  RowBox[{"$FeynRulesPath", "=",
5073   RowBox[{
5074   "SetDirectory", "[", "\"\<~/Documents/feynrules-current_3_7\>\"", "]"}]}],
5075  ";"}]], "Input",
5076 CellChangeTimes->{
5077  3.633334333718008*^9, {3.643018789753442*^9, 3.643018791330467*^9}, {
5078   3.645272799947063*^9, 3.645272801466074*^9}, {3.647076435500992*^9,
5079   3.6470764362644157`*^9}}],
5080
5081Cell[CellGroupData[{
5082
5083Cell[BoxData[
5084 RowBox[{"<<", "FeynRules`"}]], "Input"],
5085
5086Cell[CellGroupData[{
5087
5088Cell[BoxData["\<\" - FeynRules - \"\>"], "Print",
5089 CellChangeTimes->{
5090  3.63333440695919*^9, 3.633348560486579*^9, 3.633430677253861*^9,
5091   3.633760418806879*^9, 3.63376190797229*^9, 3.633768111788323*^9,
5092   3.635683611528593*^9, 3.6356836827698507`*^9, 3.635683881621481*^9,
5093   3.635683982036408*^9, 3.635760784410219*^9, 3.637643143830041*^9,
5094   3.637647371947709*^9, 3.637648748372431*^9, 3.639389302649088*^9,
5095   3.639989579315937*^9, 3.640510872486952*^9, 3.6405110246358852`*^9,
5096   3.641476655652068*^9, 3.641540959401083*^9, 3.641635756491544*^9,
5097   3.64172791075239*^9, 3.641790915266135*^9, 3.643025908027935*^9,
5098   3.645272805937785*^9, 3.645273958562047*^9, 3.645274476314858*^9,
5099   3.645276384688925*^9, 3.645276428285972*^9, {3.645771178582847*^9,
5100   3.645771189688349*^9}, 3.6457812303151407`*^9, 3.646027078285276*^9,
5101   3.6463715419184523`*^9, 3.646373035858588*^9, 3.6463776699247293`*^9,
5102   3.646390127999592*^9, {3.646734483394376*^9, 3.646734527476392*^9},
5103   3.647076944542347*^9, 3.647348353200954*^9, 3.649404147951804*^9,
5104   3.649404953644567*^9}],
5105
5106Cell[BoxData[
5107 InterpretationBox[
5108  RowBox[{"\<\"Version: \"\>", "\[InvisibleSpace]", "\<\"2.3.7\"\>",
5109   "\[InvisibleSpace]",
5110   RowBox[{"\<\" (\"\>", " ", "\<\"27 July 2015\"\>"}],
5111   "\[InvisibleSpace]", "\<\").\"\>"}],
5112  SequenceForm["Version: ", "2.3.7", " (" "27 July 2015", ")."],
5113  Editable->False]], "Print",
5114 CellChangeTimes->{
5115  3.63333440695919*^9, 3.633348560486579*^9, 3.633430677253861*^9,
5116   3.633760418806879*^9, 3.63376190797229*^9, 3.633768111788323*^9,
5117   3.635683611528593*^9, 3.6356836827698507`*^9, 3.635683881621481*^9,
5118   3.635683982036408*^9, 3.635760784410219*^9, 3.637643143830041*^9,
5119   3.637647371947709*^9, 3.637648748372431*^9, 3.639389302649088*^9,
5120   3.639989579315937*^9, 3.640510872486952*^9, 3.6405110246358852`*^9,
5121   3.641476655652068*^9, 3.641540959401083*^9, 3.641635756491544*^9,
5122   3.64172791075239*^9, 3.641790915266135*^9, 3.643025908027935*^9,
5123   3.645272805937785*^9, 3.645273958562047*^9, 3.645274476314858*^9,
5124   3.645276384688925*^9, 3.645276428285972*^9, {3.645771178582847*^9,
5125   3.645771189688349*^9}, 3.6457812303151407`*^9, 3.646027078285276*^9,
5126   3.6463715419184523`*^9, 3.646373035858588*^9, 3.6463776699247293`*^9,
5127   3.646390127999592*^9, {3.646734483394376*^9, 3.646734527476392*^9},
5128   3.647076944542347*^9, 3.647348353200954*^9, 3.649404147951804*^9,
5129   3.649404953669344*^9}],
5130
5131Cell[BoxData["\<\"Authors: A. Alloul, N. Christensen, C. Degrande, C. Duhr, \
5132B. Fuks\"\>"], "Print",
5133 CellChangeTimes->{
5134  3.63333440695919*^9, 3.633348560486579*^9, 3.633430677253861*^9,
5135   3.633760418806879*^9, 3.63376190797229*^9, 3.633768111788323*^9,
5136   3.635683611528593*^9, 3.6356836827698507`*^9, 3.635683881621481*^9,
5137   3.635683982036408*^9, 3.635760784410219*^9, 3.637643143830041*^9,
5138   3.637647371947709*^9, 3.637648748372431*^9, 3.639389302649088*^9,
5139   3.639989579315937*^9, 3.640510872486952*^9, 3.6405110246358852`*^9,
5140   3.641476655652068*^9, 3.641540959401083*^9, 3.641635756491544*^9,
5141   3.64172791075239*^9, 3.641790915266135*^9, 3.643025908027935*^9,
5142   3.645272805937785*^9, 3.645273958562047*^9, 3.645274476314858*^9,
5143   3.645276384688925*^9, 3.645276428285972*^9, {3.645771178582847*^9,
5144   3.645771189688349*^9}, 3.6457812303151407`*^9, 3.646027078285276*^9,
5145   3.6463715419184523`*^9, 3.646373035858588*^9, 3.6463776699247293`*^9,
5146   3.646390127999592*^9, {3.646734483394376*^9, 3.646734527476392*^9},
5147   3.647076944542347*^9, 3.647348353200954*^9, 3.649404147951804*^9,
5148   3.649404953671152*^9}],
5149
5150Cell[BoxData["\<\" \"\>"], "Print",
5151 CellChangeTimes->{
5152  3.63333440695919*^9, 3.633348560486579*^9, 3.633430677253861*^9,
5153   3.633760418806879*^9, 3.63376190797229*^9, 3.633768111788323*^9,
5154   3.635683611528593*^9, 3.6356836827698507`*^9, 3.635683881621481*^9,
5155   3.635683982036408*^9, 3.635760784410219*^9, 3.637643143830041*^9,
5156   3.637647371947709*^9, 3.637648748372431*^9, 3.639389302649088*^9,
5157   3.639989579315937*^9, 3.640510872486952*^9, 3.6405110246358852`*^9,
5158   3.641476655652068*^9, 3.641540959401083*^9, 3.641635756491544*^9,
5159   3.64172791075239*^9, 3.641790915266135*^9, 3.643025908027935*^9,
5160   3.645272805937785*^9, 3.645273958562047*^9, 3.645274476314858*^9,
5161   3.645276384688925*^9, 3.645276428285972*^9, {3.645771178582847*^9,
5162   3.645771189688349*^9}, 3.6457812303151407`*^9, 3.646027078285276*^9,
5163   3.6463715419184523`*^9, 3.646373035858588*^9, 3.6463776699247293`*^9,
5164   3.646390127999592*^9, {3.646734483394376*^9, 3.646734527476392*^9},
5165   3.647076944542347*^9, 3.647348353200954*^9, 3.649404147951804*^9,
5166   3.6494049536731453`*^9}],
5167
5168Cell[BoxData["\<\"Please cite:\"\>"], "Print",
5169 CellChangeTimes->{
5170  3.63333440695919*^9, 3.633348560486579*^9, 3.633430677253861*^9,
5171   3.633760418806879*^9, 3.63376190797229*^9, 3.633768111788323*^9,
5172   3.635683611528593*^9, 3.6356836827698507`*^9, 3.635683881621481*^9,
5173   3.635683982036408*^9, 3.635760784410219*^9, 3.637643143830041*^9,
5174   3.637647371947709*^9, 3.637648748372431*^9, 3.639389302649088*^9,
5175   3.639989579315937*^9, 3.640510872486952*^9, 3.6405110246358852`*^9,
5176   3.641476655652068*^9, 3.641540959401083*^9, 3.641635756491544*^9,
5177   3.64172791075239*^9, 3.641790915266135*^9, 3.643025908027935*^9,
5178   3.645272805937785*^9, 3.645273958562047*^9, 3.645274476314858*^9,
5179   3.645276384688925*^9, 3.645276428285972*^9, {3.645771178582847*^9,
5180   3.645771189688349*^9}, 3.6457812303151407`*^9, 3.646027078285276*^9,
5181   3.6463715419184523`*^9, 3.646373035858588*^9, 3.6463776699247293`*^9,
5182   3.646390127999592*^9, {3.646734483394376*^9, 3.646734527476392*^9},
5183   3.647076944542347*^9, 3.647348353200954*^9, 3.649404147951804*^9,
5184   3.649404953675169*^9}],
5185
5186Cell[BoxData["\<\"    - Comput.Phys.Commun.185:2250-2300,2014 \
5187(arXiv:1310.1921);\"\>"], "Print",
5188 CellChangeTimes->{
5189  3.63333440695919*^9, 3.633348560486579*^9, 3.633430677253861*^9,
5190   3.633760418806879*^9, 3.63376190797229*^9, 3.633768111788323*^9,
5191   3.635683611528593*^9, 3.6356836827698507`*^9, 3.635683881621481*^9,
5192   3.635683982036408*^9, 3.635760784410219*^9, 3.637643143830041*^9,
5193   3.637647371947709*^9, 3.637648748372431*^9, 3.639389302649088*^9,
5194   3.639989579315937*^9, 3.640510872486952*^9, 3.6405110246358852`*^9,
5195   3.641476655652068*^9, 3.641540959401083*^9, 3.641635756491544*^9,
5196   3.64172791075239*^9, 3.641790915266135*^9, 3.643025908027935*^9,
5197   3.645272805937785*^9, 3.645273958562047*^9, 3.645274476314858*^9,
5198   3.645276384688925*^9, 3.645276428285972*^9, {3.645771178582847*^9,
5199   3.645771189688349*^9}, 3.6457812303151407`*^9, 3.646027078285276*^9,
5200   3.6463715419184523`*^9, 3.646373035858588*^9, 3.6463776699247293`*^9,
5201   3.646390127999592*^9, {3.646734483394376*^9, 3.646734527476392*^9},
5202   3.647076944542347*^9, 3.647348353200954*^9, 3.649404147951804*^9,
5203   3.64940495367737*^9}],
5204
5205Cell[BoxData["\<\"    - Comput.Phys.Commun.180:1614-1641,2009 \
5206(arXiv:0806.4194).\"\>"], "Print",
5207 CellChangeTimes->{
5208  3.63333440695919*^9, 3.633348560486579*^9, 3.633430677253861*^9,
5209   3.633760418806879*^9, 3.63376190797229*^9, 3.633768111788323*^9,
5210   3.635683611528593*^9, 3.6356836827698507`*^9, 3.635683881621481*^9,
5211   3.635683982036408*^9, 3.635760784410219*^9, 3.637643143830041*^9,
5212   3.637647371947709*^9, 3.637648748372431*^9, 3.639389302649088*^9,
5213   3.639989579315937*^9, 3.640510872486952*^9, 3.6405110246358852`*^9,
5214   3.641476655652068*^9, 3.641540959401083*^9, 3.641635756491544*^9,
5215   3.64172791075239*^9, 3.641790915266135*^9, 3.643025908027935*^9,
5216   3.645272805937785*^9, 3.645273958562047*^9, 3.645274476314858*^9,
5217   3.645276384688925*^9, 3.645276428285972*^9, {3.645771178582847*^9,
5218   3.645771189688349*^9}, 3.6457812303151407`*^9, 3.646027078285276*^9,
5219   3.6463715419184523`*^9, 3.646373035858588*^9, 3.6463776699247293`*^9,
5220   3.646390127999592*^9, {3.646734483394376*^9, 3.646734527476392*^9},
5221   3.647076944542347*^9, 3.647348353200954*^9, 3.649404147951804*^9,
5222   3.6494049536790323`*^9}],
5223
5224Cell[BoxData["\<\" \"\>"], "Print",
5225 CellChangeTimes->{
5226  3.63333440695919*^9, 3.633348560486579*^9, 3.633430677253861*^9,
5227   3.633760418806879*^9, 3.63376190797229*^9, 3.633768111788323*^9,
5228   3.635683611528593*^9, 3.6356836827698507`*^9, 3.635683881621481*^9,
5229   3.635683982036408*^9, 3.635760784410219*^9, 3.637643143830041*^9,
5230   3.637647371947709*^9, 3.637648748372431*^9, 3.639389302649088*^9,
5231   3.639989579315937*^9, 3.640510872486952*^9, 3.6405110246358852`*^9,
5232   3.641476655652068*^9, 3.641540959401083*^9, 3.641635756491544*^9,
5233   3.64172791075239*^9, 3.641790915266135*^9, 3.643025908027935*^9,
5234   3.645272805937785*^9, 3.645273958562047*^9, 3.645274476314858*^9,
5235   3.645276384688925*^9, 3.645276428285972*^9, {3.645771178582847*^9,
5236   3.645771189688349*^9}, 3.6457812303151407`*^9, 3.646027078285276*^9,
5237   3.6463715419184523`*^9, 3.646373035858588*^9, 3.6463776699247293`*^9,
5238   3.646390127999592*^9, {3.646734483394376*^9, 3.646734527476392*^9},
5239   3.647076944542347*^9, 3.647348353200954*^9, 3.649404147951804*^9,
5240   3.649404953680554*^9}],
5241
5242Cell[BoxData["\<\"http://feynrules.phys.ucl.ac.be\"\>"], "Print",
5243 CellChangeTimes->{
5244  3.63333440695919*^9, 3.633348560486579*^9, 3.633430677253861*^9,
5245   3.633760418806879*^9, 3.63376190797229*^9, 3.633768111788323*^9,
5246   3.635683611528593*^9, 3.6356836827698507`*^9, 3.635683881621481*^9,
5247   3.635683982036408*^9, 3.635760784410219*^9, 3.637643143830041*^9,
5248   3.637647371947709*^9, 3.637648748372431*^9, 3.639389302649088*^9,
5249   3.639989579315937*^9, 3.640510872486952*^9, 3.6405110246358852`*^9,
5250   3.641476655652068*^9, 3.641540959401083*^9, 3.641635756491544*^9,
5251   3.64172791075239*^9, 3.641790915266135*^9, 3.643025908027935*^9,
5252   3.645272805937785*^9, 3.645273958562047*^9, 3.645274476314858*^9,
5253   3.645276384688925*^9, 3.645276428285972*^9, {3.645771178582847*^9,
5254   3.645771189688349*^9}, 3.6457812303151407`*^9, 3.646027078285276*^9,
5255   3.6463715419184523`*^9, 3.646373035858588*^9, 3.6463776699247293`*^9,
5256   3.646390127999592*^9, {3.646734483394376*^9, 3.646734527476392*^9},
5257   3.647076944542347*^9, 3.647348353200954*^9, 3.649404147951804*^9,
5258   3.649404953682172*^9}],
5259
5260Cell[BoxData["\<\" \"\>"], "Print",
5261 CellChangeTimes->{
5262  3.63333440695919*^9, 3.633348560486579*^9, 3.633430677253861*^9,
5263   3.633760418806879*^9, 3.63376190797229*^9, 3.633768111788323*^9,
5264   3.635683611528593*^9, 3.6356836827698507`*^9, 3.635683881621481*^9,
5265   3.635683982036408*^9, 3.635760784410219*^9, 3.637643143830041*^9,
5266   3.637647371947709*^9, 3.637648748372431*^9, 3.639389302649088*^9,
5267   3.639989579315937*^9, 3.640510872486952*^9, 3.6405110246358852`*^9,
5268   3.641476655652068*^9, 3.641540959401083*^9, 3.641635756491544*^9,
5269   3.64172791075239*^9, 3.641790915266135*^9, 3.643025908027935*^9,
5270   3.645272805937785*^9, 3.645273958562047*^9, 3.645274476314858*^9,
5271   3.645276384688925*^9, 3.645276428285972*^9, {3.645771178582847*^9,
5272   3.645771189688349*^9}, 3.6457812303151407`*^9, 3.646027078285276*^9,
5273   3.6463715419184523`*^9, 3.646373035858588*^9, 3.6463776699247293`*^9,
5274   3.646390127999592*^9, {3.646734483394376*^9, 3.646734527476392*^9},
5275   3.647076944542347*^9, 3.647348353200954*^9, 3.649404147951804*^9,
5276   3.6494049536836653`*^9}],
5277
5278Cell[BoxData["\<\"The FeynRules palette can be opened using the command \
5279FRPalette[].\"\>"], "Print",
5280 CellChangeTimes->{
5281  3.63333440695919*^9, 3.633348560486579*^9, 3.633430677253861*^9,
5282   3.633760418806879*^9, 3.63376190797229*^9, 3.633768111788323*^9,
5283   3.635683611528593*^9, 3.6356836827698507`*^9, 3.635683881621481*^9,
5284   3.635683982036408*^9, 3.635760784410219*^9, 3.637643143830041*^9,
5285   3.637647371947709*^9, 3.637648748372431*^9, 3.639389302649088*^9,
5286   3.639989579315937*^9, 3.640510872486952*^9, 3.6405110246358852`*^9,
5287   3.641476655652068*^9, 3.641540959401083*^9, 3.641635756491544*^9,
5288   3.64172791075239*^9, 3.641790915266135*^9, 3.643025908027935*^9,
5289   3.645272805937785*^9, 3.645273958562047*^9, 3.645274476314858*^9,
5290   3.645276384688925*^9, 3.645276428285972*^9, {3.645771178582847*^9,
5291   3.645771189688349*^9}, 3.6457812303151407`*^9, 3.646027078285276*^9,
5292   3.6463715419184523`*^9, 3.646373035858588*^9, 3.6463776699247293`*^9,
5293   3.646390127999592*^9, {3.646734483394376*^9, 3.646734527476392*^9},
5294   3.647076944542347*^9, 3.647348353200954*^9, 3.649404147951804*^9,
5295   3.649404953685349*^9}]
5296}, Open  ]]
5297}, Open  ]],
5298
5299Cell[BoxData[
5300 RowBox[{
5301  RowBox[{"SetDirectory", "[",
5302   RowBox[{"$FeynRulesPath", "<>", "\"\</Models/DMsimp\>\""}], "]"}],
5303  ";"}]], "Input",
5304 CellChangeTimes->{{3.633333653355482*^9, 3.633333654140135*^9}, {
5305   3.633759508925624*^9, 3.633759509782259*^9}, {3.6356817782298527`*^9,
5306   3.63568178057517*^9}, {3.637643151097705*^9, 3.637643157090357*^9}, {
5307   3.639376969362584*^9, 3.639376970805305*^9}, {3.640510133439883*^9,
5308   3.640510134052121*^9}, {3.64301879488282*^9, 3.6430187955340557`*^9},
5309   3.6430249807051477`*^9, {3.645273962622952*^9, 3.6452739639072227`*^9}, {
5310   3.645276394612421*^9, 3.645276395972137*^9}, 3.6457702767154827`*^9, {
5311   3.6457800697087383`*^9, 3.645780069903144*^9}, {3.646026301430621*^9,
5312   3.646026303553194*^9}, {3.64734782249478*^9, 3.6473478235665007`*^9}, {
5313   3.6494031754789267`*^9, 3.649403176983906*^9}}],
5314
5315Cell[CellGroupData[{
5316
5317Cell[BoxData[
5318 RowBox[{"LoadModel", "[",
5319  RowBox[{
5320  "\"\<SM.fr\>\"", ",", "\"\<dm_s_spin1.fr\>\"", ",", " ",
5321   "\"\<dm_s_spin1_ew.fr\>\""}], "]"}]], "Input",
5322 CellChangeTimes->{{3.6333336630998907`*^9, 3.633333666934019*^9}, {
5323   3.6337595144873743`*^9, 3.633759515254868*^9}, {3.635681785377611*^9,
5324   3.635681787678496*^9}, {3.6376404775561666`*^9, 3.637640487932433*^9}, {
5325   3.63764316147395*^9, 3.637643161943272*^9}, 3.6430249837647533`*^9, {
5326   3.645273967364667*^9, 3.645273969067214*^9}, {3.6452764011648684`*^9,
5327   3.645276411381513*^9}, {3.645770280750688*^9, 3.645770280968597*^9}, {
5328   3.646026307411837*^9, 3.64602630943712*^9}, {3.647347826971569*^9,
5329   3.6473478280586557`*^9}, {3.6494031824564037`*^9, 3.649403201047883*^9}}],
5330
5331Cell[CellGroupData[{
5332
5333Cell[BoxData["\<\"Merging model-files...\"\>"], "Print",
5334 CellChangeTimes->{
5335  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5336   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5337   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5338   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5339   3.649404155388818*^9, 3.649404960075787*^9}],
5340
5341Cell[BoxData["\<\"This model implementation was created by\"\>"], "Print",
5342 CellChangeTimes->{
5343  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5344   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5345   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5346   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5347   3.649404155388818*^9, 3.649404960107028*^9}],
5348
5349Cell[BoxData["\<\"A. Martini, K. Mawatari, J. Wang, C. Zhang\"\>"], "Print",
5350 CellChangeTimes->{
5351  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5352   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5353   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5354   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5355   3.649404155388818*^9, 3.649404960108989*^9}],
5356
5357Cell[BoxData[
5358 InterpretationBox[
5359  RowBox[{"\<\"Model Version: \"\>", "\[InvisibleSpace]", "\<\"1.0\"\>"}],
5360  SequenceForm["Model Version: ", "1.0"],
5361  Editable->False]], "Print",
5362 CellChangeTimes->{
5363  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5364   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5365   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5366   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5367   3.649404155388818*^9, 3.649404960110921*^9}],
5368
5369Cell[BoxData["\<\"Please cite\"\>"], "Print",
5370 CellChangeTimes->{
5371  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5372   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5373   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5374   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5375   3.649404155388818*^9, 3.6494049601125183`*^9}],
5376
5377Cell[BoxData["\<\"O. Mattelaer et al., arXiv:1508.00564\"\>"], "Print",
5378 CellChangeTimes->{
5379  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5380   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5381   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5382   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5383   3.649404155388818*^9, 3.649404960114118*^9}],
5384
5385Cell[BoxData["\<\"M. Backovic et al., arXiv:1508.05327\"\>"], "Print",
5386 CellChangeTimes->{
5387  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5388   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5389   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5390   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5391   3.649404155388818*^9, 3.649404960115747*^9}],
5392
5393Cell[BoxData["\<\"M. Neubert et al., arXiv:1508.xxxxx\"\>"], "Print",
5394 CellChangeTimes->{
5395  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5396   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5397   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5398   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5399   3.649404155388818*^9, 3.6494049601175137`*^9}],
5400
5401Cell[BoxData["\<\"http://feynrules.irmp.ucl.ac.be/wiki/DMsimp/\"\>"], "Print",
5402 CellChangeTimes->{
5403  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5404   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5405   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5406   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5407   3.649404155388818*^9, 3.649404960119751*^9}],
5408
5409Cell[BoxData["\<\"For more information, type ModelInformation[].\"\>"], \
5410"Print",
5411 CellChangeTimes->{
5412  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5413   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5414   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5415   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5416   3.649404155388818*^9, 3.649404960122568*^9}],
5417
5418Cell[BoxData["\<\"\"\>"], "Print",
5419 CellChangeTimes->{
5420  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5421   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5422   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5423   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5424   3.649404155388818*^9, 3.649404960124247*^9}],
5425
5426Cell[BoxData["\<\"   - Loading particle classes.\"\>"], "Print",
5427 CellChangeTimes->{
5428  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5429   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5430   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5431   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5432   3.649404155388818*^9, 3.6494049601259212`*^9}],
5433
5434Cell[BoxData["\<\"   - Loading gauge group classes.\"\>"], "Print",
5435 CellChangeTimes->{
5436  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5437   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5438   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5439   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5440   3.649404155388818*^9, 3.6494049602679358`*^9}],
5441
5442Cell[BoxData["\<\"   - Loading parameter classes.\"\>"], "Print",
5443 CellChangeTimes->{
5444  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5445   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5446   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5447   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5448   3.649404155388818*^9, 3.649404960319577*^9}],
5449
5450Cell[BoxData[
5451 InterpretationBox[
5452  RowBox[{"\<\"\\nModel \"\>", "\[InvisibleSpace]", "\<\"DMsimp_s_spin1\"\>",
5453   "\[InvisibleSpace]", "\<\" loaded.\"\>"}],
5454  SequenceForm["\nModel ", "DMsimp_s_spin1", " loaded."],
5455  Editable->False]], "Print",
5456 CellChangeTimes->{
5457  3.6452764346338987`*^9, 3.645771194596031*^9, 3.6457812380315657`*^9,
5458   3.6460270859885817`*^9, 3.646371548105691*^9, 3.6463730452682457`*^9,
5459   3.646377677162462*^9, 3.6463901333396072`*^9, {3.646734490207191*^9,
5460   3.646734532719462*^9}, 3.6470769500669947`*^9, 3.647348359189395*^9,
5461   3.649404155388818*^9, 3.6494049603732243`*^9}]
5462}, Open  ]]
5463}, Open  ]],
5464
5465Cell[CellGroupData[{
5466
5467Cell[BoxData[
5468 RowBox[{"LoadRestriction", "[",
5469  RowBox[{"\"\<Cabibbo.rst\>\"", ",", "\"\<Massless_5f.rst\>\""}],
5470  "]"}]], "Input",
5471 CellChangeTimes->{{3.639989591485811*^9, 3.639989593069509*^9}, {
5472  3.64154097216433*^9, 3.641540974684147*^9}, {3.6417909255941687`*^9,
5473  3.6417909297310133`*^9}, {3.643025203788245*^9, 3.643025206111291*^9}, {
5474  3.645276440101756*^9, 3.645276449127439*^9}, {3.645780074961405*^9,
5475  3.645780076352491*^9}, {3.6463776813917847`*^9, 3.646377688991543*^9}, {
5476  3.646465430675503*^9, 3.6464654368223667`*^9}}],
5477
5478Cell[CellGroupData[{
5479
5480Cell[BoxData[
5481 InterpretationBox[
5482  RowBox[{"\<\"Loading restrictions from \"\>",
5483   "\[InvisibleSpace]", "\<\"Cabibbo.rst\"\>",
5484   "\[InvisibleSpace]", "\<\" : \"\>", "\[InvisibleSpace]",
5485   DynamicBox[ToBoxes[PRIVATE`FR$restrictionCounter, StandardForm],
5486    ImageSizeCache->{16., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
5487   "\[InvisibleSpace]", "6"}],
5488  SequenceForm["Loading restrictions from ", "Cabibbo.rst", " : ",
5489   Dynamic[PRIVATE`FR$restrictionCounter], " / ", 6],
5490  Editable->False]], "Print",
5491 CellChangeTimes->{
5492  3.6334306848130302`*^9, 3.633760429152564*^9, 3.633761916024652*^9,
5493   3.633768120147912*^9, 3.6356836192767067`*^9, 3.63568369175706*^9,
5494   3.6356839326067247`*^9, 3.635683989102797*^9, 3.635760791879394*^9,
5495   3.6376431668304768`*^9, 3.637647380992176*^9, 3.637648756419928*^9,
5496   3.639389312685671*^9, 3.639989602876381*^9, 3.6405108810467577`*^9,
5497   3.640511031933874*^9, 3.64147666589777*^9, 3.641540977305107*^9,
5498   3.641635769894772*^9, 3.641727918705084*^9, 3.641790931402239*^9,
5499   3.643025920128963*^9, 3.645272819582477*^9, 3.645273976685206*^9,
5500   3.6452744918051853`*^9, {3.6452764455565166`*^9, 3.645276449911216*^9},
5501   3.645771197671864*^9, 3.64578124125686*^9, 3.646027089730276*^9,
5502   3.6463715521531687`*^9, 3.646373048024355*^9, 3.6463776916950293`*^9,
5503   3.646390137024032*^9, {3.6467345152009907`*^9, 3.646734535311812*^9},
5504   3.6470769522530413`*^9, 3.647348361642148*^9, 3.649404158128687*^9,
5505   3.649404964394639*^9}],
5506
5507Cell[BoxData[
5508 InterpretationBox[
5509  RowBox[{"\<\"Loading restrictions from \"\>",
5510   "\[InvisibleSpace]", "\<\"Massless_5f.rst\"\>",
5511   "\[InvisibleSpace]", "\<\" : \"\>", "\[InvisibleSpace]",
5512   DynamicBox[ToBoxes[PRIVATE`FR$restrictionCounter, StandardForm],
5513    ImageSizeCache->{16., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
5514   "\[InvisibleSpace]", "21"}],
5515  SequenceForm["Loading restrictions from ", "Massless_5f.rst", " : ",
5516   Dynamic[PRIVATE`FR$restrictionCounter], " / ", 21],
5517  Editable->False]], "Print",
5518 CellChangeTimes->{
5519  3.6334306848130302`*^9, 3.633760429152564*^9, 3.633761916024652*^9,
5520   3.633768120147912*^9, 3.6356836192767067`*^9, 3.63568369175706*^9,
5521   3.6356839326067247`*^9, 3.635683989102797*^9, 3.635760791879394*^9,
5522   3.6376431668304768`*^9, 3.637647380992176*^9, 3.637648756419928*^9,
5523   3.639389312685671*^9, 3.639989602876381*^9, 3.6405108810467577`*^9,
5524   3.640511031933874*^9, 3.64147666589777*^9, 3.641540977305107*^9,
5525   3.641635769894772*^9, 3.641727918705084*^9, 3.641790931402239*^9,
5526   3.643025920128963*^9, 3.645272819582477*^9, 3.645273976685206*^9,
5527   3.6452744918051853`*^9, {3.6452764455565166`*^9, 3.645276449911216*^9},
5528   3.645771197671864*^9, 3.64578124125686*^9, 3.646027089730276*^9,
5529   3.6463715521531687`*^9, 3.646373048024355*^9, 3.6463776916950293`*^9,
5530   3.646390137024032*^9, {3.6467345152009907`*^9, 3.646734535311812*^9},
5531   3.6470769522530413`*^9, 3.647348361642148*^9, 3.649404158128687*^9,
5532   3.649404964545706*^9}],
5533
5534Cell[BoxData["\<\"Restrictions loaded.\"\>"], "Print",
5535 CellChangeTimes->{
5536  3.6334306848130302`*^9, 3.633760429152564*^9, 3.633761916024652*^9,
5537   3.633768120147912*^9, 3.6356836192767067`*^9, 3.63568369175706*^9,
5538   3.6356839326067247`*^9, 3.635683989102797*^9, 3.635760791879394*^9,
5539   3.6376431668304768`*^9, 3.637647380992176*^9, 3.637648756419928*^9,
5540   3.639389312685671*^9, 3.639989602876381*^9, 3.6405108810467577`*^9,
5541   3.640511031933874*^9, 3.64147666589777*^9, 3.641540977305107*^9,
5542   3.641635769894772*^9, 3.641727918705084*^9, 3.641790931402239*^9,
5543   3.643025920128963*^9, 3.645272819582477*^9, 3.645273976685206*^9,
5544   3.6452744918051853`*^9, {3.6452764455565166`*^9, 3.645276449911216*^9},
5545   3.645771197671864*^9, 3.64578124125686*^9, 3.646027089730276*^9,
5546   3.6463715521531687`*^9, 3.646373048024355*^9, 3.6463776916950293`*^9,
5547   3.646390137024032*^9, {3.6467345152009907`*^9, 3.646734535311812*^9},
5548   3.6470769522530413`*^9, 3.647348361642148*^9, 3.649404158128687*^9,
5549   3.649404964656404*^9}]
5550}, Open  ]]
5551}, Open  ]],
5552
5553Cell[BoxData[
5554 RowBox[{"Get", "[", "\"\<DMsimp_s_spin1.nlo\>\"", "]"}]], "Input",
5555 CellChangeTimes->{{3.633333679844839*^9, 3.633333682243373*^9}, {
5556   3.633759573989903*^9, 3.633759574813645*^9}, {3.635681792889392*^9,
5557   3.635681794928862*^9}, {3.6376404988908873`*^9, 3.637640502843729*^9}, {
5558   3.6393769763154087`*^9, 3.6393769775307503`*^9}, {3.640510140072566*^9,
5559   3.640510141779975*^9}, {3.643024989253413*^9, 3.6430249909315453`*^9}, {
5560   3.643025070685824*^9, 3.643025074221505*^9}, {3.6452739791542587`*^9,
5561   3.64527398039443*^9}, {3.645276453474934*^9, 3.645276454803453*^9},
5562   3.645770286391513*^9, {3.6457800800957413`*^9, 3.645780080471368*^9}, {
5563   3.646026321042013*^9, 3.646026322988809*^9}, {3.647347834625543*^9,
5564   3.647347835975219*^9}, {3.649403214712672*^9, 3.649403216153846*^9}, {
5565   3.649404967303237*^9, 3.649404968446651*^9}, {3.6494082744264297`*^9,
5566   3.649408274795074*^9}}],
5567
5568Cell[CellGroupData[{
5569
5570Cell[BoxData[
5571 RowBox[{"WriteUFO", "[",
5572  RowBox[{
5573   RowBox[{"LSM", "+", "L1DM", "+", "L1SMEW"}], ",",
5574   RowBox[{"UVCounterterms", "\[Rule]", "UV$vertlist"}], ",",
5575   RowBox[{"R2Vertices", "\[Rule]", "R2$vertlist"}], ",",
5576   RowBox[{"Output", "\[Rule]", "\"\<DMsimp_s_spin1\>\""}]}], "]"}]], "Input",\
5577
5578 CellChangeTimes->{{3.603600645725746*^9, 3.6036006566228743`*^9}, {
5579   3.606550334098661*^9, 3.60655033664305*^9}, {3.608451188889968*^9,
5580   3.608451204251935*^9}, 3.60845124249209*^9, {3.633332357749588*^9,
5581   3.633332371706971*^9}, {3.633333594923254*^9, 3.6333336099891357`*^9}, {
5582   3.633333692998436*^9, 3.633333708244873*^9}, {3.633759523248143*^9,
5583   3.63375952406321*^9}, 3.6337595816874228`*^9, {3.633759861480113*^9,
5584   3.633759861782745*^9}, {3.635681799753024*^9, 3.635681812948553*^9}, {
5585   3.637640540300961*^9, 3.6376405694259853`*^9}, {3.637640663087901*^9,
5586   3.637640663759862*^9}, {3.637647387697893*^9, 3.637647389712125*^9}, {
5587   3.637648387110936*^9, 3.637648387849903*^9}, {3.639389319458922*^9,
5588   3.639389319865039*^9}, {3.64051094238649*^9, 3.640510950609267*^9}, {
5589   3.6430250002334414`*^9, 3.643025002692279*^9}, {3.643025047978877*^9,
5590   3.643025060082522*^9}, {3.6452745024778748`*^9, 3.6452745079012833`*^9}, {
5591   3.645276460101131*^9, 3.645276462419408*^9}, 3.645770304766233*^9, {
5592   3.64578008286651*^9, 3.6457800832087*^9}, {3.646026325649763*^9,
5593   3.646026327751546*^9}, {3.647347838972896*^9, 3.6473478401093903`*^9}, {
5594   3.64940322069949*^9, 3.6494032361730423`*^9}, {3.650089615748787*^9,
5595   3.650089616233056*^9}}],
5596
5597Cell[CellGroupData[{
5598
5599Cell[BoxData["\<\" --- Universal FeynRules Output (UFO) v 1.1 ---\"\>"], \
5600"Print",
5601 CellChangeTimes->CompressedData["
56021:eJwd0F1M0mEYBXBjjmjUMhhMKXJQWCIwK9vcWsQTLS1WNk3Wx1ZNpWVrs9Yi
5603cZTWMq0xcxjBaiajLmrlwLGs4MpsQSuEykoTtNQC/2+JY5ZrttHzenH2uzgX
5604ZzuSqrpyw6KMjAwdxqE87SofZkDm7DQeRn96NX8mRhgo5E2nUqMMlO7pOaUZ
5605Z+DeubnL1DHHTjc1XS8JLTiVU1mNxvqfJqi6ror7BtRqqFIeR38F5rM60Lfs
5606CwIqT8CSUhs7eka6vzOg1hYkqbe/Hgr2oieun33ZGGcg+4kl6xIq9f5dQ61R
5607nAHqsXRoF9Uorm2h3jlgq7yKXjNPmn0p7BnnHNUngyY/OpuwRDdlEvC1d+V/
5608YxMo0nSqqJ/eNL/OW0zg1gp+qxwdZ8W+NKDbvSa/aBmBHfwIj8Mj8GBVGX8J
5609enIsNL8cHUp8FBSjJWK3cBh13TBGqEKVYCiKmu82ya4ICWzM9aiobcJABbV1
56100jn4EFVvFv3WiAi8iK/M1KKJI1o31RawW21iAgPvQ92+1QSW7pspep6Lu9zi
5611rQuG+0qo5mltsF1CwB2OqzyolVNdP4paFKzzXCmBYKRsixxta2BD81oCaZP+
56126MB6AvsP/tsQRvf6JXkR1FQ79qwvH3/RzXa9Qi/u1j9SywnUfObHfqD6D3Z7
5613HG1ZVxadQutKWTNJdHDeleMoIBBSPtZtUxAonki+60e5vTdd7kICDbFsjgf9
5614D8hON8s=
5615  "]],
5616
5617Cell[BoxData[
5618 StyleBox["\<\"Starting Feynman rule calculation.\"\>",
5619  StripOnInput->False,
5620  LineColor->RGBColor[1, 0.5, 0],
5621  FrontFaceColor->RGBColor[1, 0.5, 0],
5622  BackFaceColor->RGBColor[1, 0.5, 0],
5623  GraphicsColor->RGBColor[1, 0.5, 0],
5624  FontWeight->Bold,
5625  FontColor->RGBColor[1, 0.5, 0]]], "Print",
5626 CellChangeTimes->CompressedData["
56271:eJwd0FtM0mEYBnBijmjUMhgsKXJQWqIwK9vYWsQbLS1WNE3XYR3moWVrs8My
5628cZTWMq0xcxjBagqjLmrlwLGs8MpsYSuEykoTpNQC/1+JY5ZrtNH7efHsd/Fc
5629PNsjLa8prlrAYrF0GJvitLN4hIEsR0ftIfSnR/NnYpSBfP50IjHGQNHu7lOa
5630cQbunZ+7Qo3YdrioqTqpf96pjNIKNNz/NEbV2UvuV6HmqnLFcfSXL5nejr7l
5631XBRS+UK2jNrQ3j3a9Z0BtTY3Tr3z9eBAD3rixrmXDVEGlj8xpV9GZZ6/q6mV
5632eWeAeizl30mtlVQ3U+/ut5ReQ68bJ43eBPaMY47qzYLGXnQ2ZgptTCPgbbPn
5633fOMQKNB0KKmf3jS9zl5I4PYyQYscHWeHv9Sj2zyGXvESAtsFQT6XT+DBSr1g
5634EXoy4k8uRYdjH4UqtFDiEo2gzpu1QapIKRwOocbOxqyrIgIbMt1KaqvIV0Jt
5635mXQMPUTVm8S/NWICL6Ir0rRo7IjWRbX4rGaLhMDge3+XdxWBxXtnCp5n4i5P
5636tWXeQF8h1TitHWiTEnAFoko3auZW1I2hpjz2BZ6MwEBQv1mOttZzoGkNgZSh
56377OjgOgL7DvxbH0D39Eqzg6ihOvKsLwd/0c3aX6GXdpU9UssJVH4WhH+gZR+s
56381ijavFYfmkJritgzcXQo6cyw5RLwKx7rtuYRUE3E3/WjvJ5bTlc+gbOHpVw3
5639+h/ExDdM
5640  "]],
5641
5642Cell[BoxData["\<\"Expanding the Lagrangian...\"\>"], "Print",
5643 CellChangeTimes->CompressedData["
56441:eJwd0F1M0mEYBXBijmjUMhgsLXJQWCowK9vYWsQTLS1WNE3Wx1ZNpaVrs9Yi
5645cZTWMq05cxjBagajLmrlwLms8MpsQSuEykpTpNQC/2+JY5ZrtNHzenH2uzgX
5646ZzuSitpS4yIWi6XDOBSn3aUjDMhcnaYj6M8ezZ/JUQYK+TPJ5DgDJXu7T2km
5647GLh3bv4yNerY5aGm6yTBBaezyivRyMDTOFXnLLtvRK3GCsUJ9Jc/ldmBvuVc
5648EFL5QraU2tDRPdr1nQG1tiBBvf31cKAXPXn97MuGGAMrn7RmXkKlPX/XUqvk
5649Z4B6PB3cTTWJq5updw7ayq+i1yxTFl8Se8Y1T/XJoLEPnYu3jm3OIOBrd+Z9
56504xAo0nQqqZ/eNL3OXUzg1gpBSz46wY58qUd39Jj7spcR2CkI87l8Ag9W6wVL
56510JpoMLUcHY5/FKrQYrFHNIK6b5jCVJFSODyGWu42yq6ICGzK8SqpbSJ/GbVl
5652yjX0EFVvyf6tySbwIrYqQ4vGj2o9VJvfbrWJCQy+D3b51hBYun+26HkO7vJU
56532xYM9RdTLTPaQLuEgCcUU3pRK7eybhxtlbPP86QEAmH91ny0rZ4DTesIpM2G
5654Y4MbCBw49G9jCN3XJ8kNo+bq6LP+PPxFN+d8hV7cY3ikzidQ9VkQ+YEaPtjt
5655MbR5vX5sGq0tYc8m0KGUO8tRQCCoeKzbLiegmky8G0B5vTfdnkICshoJ14v+
5656B8K3Nww=
5657  "]],
5658
5659Cell[BoxData[
5660 InterpretationBox[
5661  RowBox[{"\<\"Expanding the indices over \"\>", "\[InvisibleSpace]", "4",
5662   "\[InvisibleSpace]", "\<\" cores\"\>"}],
5663  SequenceForm["Expanding the indices over ", 4, " cores"],
5664  Editable->False]], "Print",
5665 CellChangeTimes->CompressedData["
56661:eJwd0F1M0mEYBXBijmjWMhgsKXNQWCIwK9vYWsYTLS2WNk3Wx1ZNpWVrM9ci
5667cZTWMq0xcxrBaiajLmrlwLGs4MpsQSuEysoPlFIL/L8ljlmu0UbP68XZ7+Jc
5668nO2IK2vL9EtYLJYWY1OcdZSNMCC1dxmOoj/d6j9TYwzk82YTiQkGivf3nlFP
5669MnD//MIVasS2x0lN1YsDi85kVlSh4wPPYlRtd/kDPdqhr1ScRH/5khmd6DvO
5670RQGVJ2BLqI2dvWM93xko1OTFqXe+HvH3oadunHvVGGVg9VNzxmVU4v67nlot
5671rwPqiVRgL9WQVdNCvXvIUnENvW6aNnkS2DP2BapHCk1edD5mDm9NI+Bp7879
5672xiFQoO5SUj+/bX6Ts5TA7VX8Vhk6yR4fbUB3uY1e0QoCu/khHpdH4OHaUv4y
56739HQkkFyJDsc+CVRoUZZTOII6bhpCVKFSMBxGTfeapFeFBLZku5TUNqGvnNo6
5674bR96hBZuE/1Wiwi8jK5J06CxYxon1eKzdliyCAx+CPR41hFYfmCu4EU27qar
5675diwa7C+immY1/nYxAWcwqnShHdyq+gnULGdfSJcQ8IdKt8vQtgYONG8gkDLq
5676jg9uInDw8L/NQbTEK84JocaayPP+XPxFO9/9Gr20T/e4UEag+gt//Aeq+2i1
5677RtGWjaXhGbS2mD0XR4eSjkxbHoGA4ol2p5yAair+fgBN77vlcOYTGK0Tc13o
5678f8iQN8g=
5679  "]],
5680
5681Cell[BoxData["\<\"Collecting the different structures that enter the \
5682vertex.\"\>"], "Print",
5683 CellChangeTimes->CompressedData["
56841:eJwd0F1M0mEYBXBijmj0YTBYUuTAsPyAWdnG1iKeaGkxo2myPrZqKi1bm7UW
5685qaO0lmmNmcMIVjMddVErB45lBVdmC1qhVFYaIKUW+H9LnLNcs42e14uz38W5
5686ONuRVtSUGhexWCwdxqE47SwdYUDe1WE6jP70aP6Mhxko4E/NzIwyUFzSc0oz
5687xsC9c3OXqTHHLhc1VSsNLjiZUV6JRvufJqi6zrL7RtRqrFAcR3/559Pb0bec
5688C0IqX8iWURvae8Ld3xlQa/OS1NtfDwV60RPXz75siDOw6okl/RIq8/zNolbl
5689nwHqsVRwN9UkqW6m3jlgK7+KXjNPmL0z2DNdc1SvHBp96GzCEtmcRsDb1pnz
5690jUOgUNOhpH560/Q6ezGBWysFLbnoGDv6pR7d4anziZcR2CkI8bl8Ag/W6AVL
56910JOx4PwKdDjxUahCiyQu0QjqvGEKUUVK4XAENd9tlF8REdiU6VZSW0X+MmrL
5692RNfQQ1S9RfxbIybwIr46TYsmjmhdVJvfbrVJCAy8D3Z71xJYum+68Hkm7vJU
56932xYc7Cuimqe0gTYpAddgXOlGrdzK2lHUks8+z5MRCIT0W3PR1noONK0jkKoz
5694HB3YQGD/wX8bB9G9Pml2CK2rjj3ry8FfdLOdr9CLewyP1LkEqj4Loj9Qwwe7
5695PY42r9dHJtGaYvZ0Eh2ad2Y48ggEFY912/MJqMaT7/pRXu9Np6uAwPKsMNeN
5696/gfEajdo
5697  "]],
5698
5699Cell[BoxData[
5700 InterpretationBox[
5701  RowBox[{
5702  "119", "\[InvisibleSpace]", "\<\" possible non-zero vertices have been \
5703found -> starting the computation: \"\>", "\[InvisibleSpace]",
5704   DynamicBox[ToBoxes[FeynRules`FR$FeynmanRules, StandardForm],
5705    ImageSizeCache->{24., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
5706   "\[InvisibleSpace]", "119", "\[InvisibleSpace]", "\<\".\"\>"}],
5707  SequenceForm[
5708  119, " possible non-zero vertices have been found -> starting the \
5709computation: ",
5710   Dynamic[FeynRules`FR$FeynmanRules], " / ", 119, "."],
5711  Editable->False]], "Print",
5712 CellChangeTimes->CompressedData["
57131:eJwd0F1M0mEYBXBjjmjUMhgsLXJQWKIwK9vYWsYTLS1WNE3Wx1ZNpWVrs9Yi
5714cZTWMq0xc5jhaiajLmrlwLGs4MpsQSuEykoTpJQC/2+JMcs12uh5vTj7XZyL
5715sx1xVV25fkFGRoYG0yU/ZS8fZUBq6zYcQn+4VH8mxxgo4k0nk+MMlO3uO6ma
5716YODu2blL1EjXDgc1XS/2zzuVXVmNhgefxKmanop7etSir5IfQ396U1kd6Bv2
5717eQGVJ2BJqI0dfWO93xgoURckqLe+HPT1o8evnXnRGGNg+WNz1kVU4vq7mlpT
5718eBqoR9P+nVSDqLaFent/Z+UV9KopanInsWdsc1S3FJo86GzcHNqYScDd3pP/
5719lU2gWNWtoH583fwqbyGBm8v4rTJ0ghX+3IBucxk9OUsIbOcHeRwegfsrtfxF
57206ImIP7UUHYl/ECjRUpFDOIrarxuCVKFCMBJCTXeapJeFBDbkOhXUNqG3gtoa
5721tQ0/QEs25fxW5RB4HluRqUbjh9UOaqfXaukUERh65+91ryKweO9M8bNc3OUq
5722t8wbGCilmqbVvnYxAUcgpnCiFk51/ThqLmSd40oI+ILazTK0rYENzWsIpI26
5723I0PrCOw78G99AN3jEecFUWNt5OlAPv6ime15iV7YpXtYIiNQ84kf/o7q3lut
5724MbRlrTY0hdaVsWYS6HDKnt1VQMAvf6TZWkhAOZl4O4hy+2/YHUUEfkVDHCf6
5725H9DPOQ0=
5726  "]],
5727
5728Cell[BoxData[
5729 InterpretationBox[
5730  RowBox[{"114", "\[InvisibleSpace]", "\<\" vertices obtained.\"\>"}],
5731  SequenceForm[114, " vertices obtained."],
5732  Editable->False]], "Print",
5733 CellChangeTimes->CompressedData["
57341:eJwd0F1I02EYBfA1ZCkrso2NXC3ZaqZzDiuDQbT2tEhr5EJz9AEZ6iIjsIjM
5735yUqLTIthoq2NxByri6JkE8lqXpnRFjW3ykrTuVJr8/+Wk2FJLFjP68Xhd3Eu
5736DhxJRU2JcRmLxdJh7HlnnCVjDMgcXbVH0Z99mj/T4wzk8+bi8UkGivb3ntZM
5737MXDv/OIVati+x0VN1kn8S85mlFWioaGnUaquu/S+EW03VuSdQH95E+kd6FvO
5738RQGVJ2BLqQ0dveM93xlQa3Nj1Dtfj/j60ZM3zr1siDCw5okl/TIq7fu7gVql
5739OAvU40n/XmqtuLqZ2nnIWnYNvW6eMXvi2DOORapHBo0D6ELUMrE1hYCnrTvn
5740G4dAgaZLSf30pul11nICt1fzW+ToFDv0pR7d1WcaEK0ksJsf5KXyCDxYp+en
5741oafC/sQqdDT6UaBCC8Uu4RjqvFkbpAqVgtEJ1Hy3UXZVSGBLpltJbRV6S6kt
5742M46Rh6h6m+i3RkTgRWRtihaNHtO6qFavrd0qJjD83t/jWU9gxYH5gueZuMtV
57437VgyMFhINc9pfW0SAq5AROlG21Mr6yZRi4J9gSsl4Avqt8vR1noONG0kkDQZ
5744yoezCRw8/G9zAC0ekGQFUVN1+NlgDv6iW+h+hV7aZ3iklhOo+swP/UANH2y2
5745CNq8ST8xi9YUsedj6EjCmWHPJeDPe6zbqSCgmo69G0K5/becrnwC2Z3laW70
5746P8WfN38=
5747  "]],
5748
5749Cell[BoxData[
5750 InterpretationBox[
5751  RowBox[{"\<\"Flavor expansion of the vertices distributed over \"\>",
5752   "\[InvisibleSpace]", "4", "\[InvisibleSpace]", "\<\" cores: \"\>",
5753   "\[InvisibleSpace]",
5754   DynamicBox[ToBoxes[FeynRules`FR$Count1, StandardForm],
5755    ImageSizeCache->{24., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
5756   "\[InvisibleSpace]", "167"}],
5757  SequenceForm[
5758  "Flavor expansion of the vertices distributed over ", 4, " cores: ",
5759   Dynamic[FeynRules`FR$Count1], " / ", 167],
5760  Editable->False]], "Print",
5761 CellChangeTimes->CompressedData["
57621:eJwd0F1M0mEUBnBijkxrGQyWFDkoLBGYlW1sLeJES4sVTZP1sWVTadnarLVI
5763HKW1TGvMnEawmsGoi1o5cCwruDJb0gqhstIULbXA/1vqmOUabXReL85+F8/F
57648+yIK2pKjItYLJYOz6E47S4ZYkDq6jAdQX/6NH8mhhko4E4nEqMMFO/tOqUZ
5765Z+DeufnL1DHHLg81VSsOLTiVXVaJRnufxqk6Z+l9I9pmrFAcR3/1JbPa0bec
5766C3wql8+WUOvbu4Y7vzOg1ubPUG9/PRzsRk9cP/uyPsbAyifWrEuoxPd3LbVK
5767fgaox1Kh3VSTqLqJeuegrewqes0yafEnMGdc81S/FBoC6FzcOrI5jYC/1Zn3
5768jUOgUNOhpH560/g6dzGBWyt4zTJ0nB39Uofu8JkDwmUEdvIi3HQugQer9bwl
57696MmxUHI5Ohj/yFehRSKPYAh13zBFqAIlf3AEtdxtkF4RENiU41VSWwR9pdTm
5770SdfAQ1S9RfhbIyTwIrYqTYvGj2o9VFufvc0mItD/PtTpX0Ng6f7Zwuc52Jup
57712rZguKeIapnWBlvFBDzhmNKLtqVX1o6iVjn7fKaEQDCi3ypDW+o40LiOQMps
5772KO/fQODAoX8bw+i+gDg3gpqrx5715OFfdHPOV+jFPYZHahmBqs+86A/U8MFu
5773j6FN6/UjU2hNMXt2Bh1IurMd+QRCise67XICqomZd71oZvdNt6cA92WUZ3jR
5774/8RNN0M=
5775  "]],
5776
5777Cell[BoxData["\<\"   - Saved vertices in InterfaceRun[ 1 ].\"\>"], "Print",
5778 CellChangeTimes->CompressedData["
57791:eJwd0F1I02EYBfA1ZBkrso2NXC3ZapZzDiuDQbT2tEhrpKE5+oAKdZERWETL
5780yUqLTI1hMjOlMMcKKko2GVltV2a0Rc2tstLcXKm1+X/LybAkFqzn9eLwuzgX
5781B46koqbUsIjFYukwXXmn7aWjDMhs3cbD6E+X5s/kGAP5vJlEYpyBor19pzQT
5782DNw9N3+ZGuna5aCmaiX+BaczyyvR8ODTGFXXU3bPgFoNFXnH0V/eZEY7+pZz
5783QUDlCdhSan1731jvdwbU2tw49dbXQ75+9MS1sy/rowysfGLJuIRKXX/XUqsU
5784Z4B6LOXfTTWKq5uotw90lF9FW8xTZncCe8Y2T3XLoMGDzsUsoc1pBNxtPTnf
5785OAQKNN1K6qc3ja+zFxO4uYLfLEcn2OEvdegOl8kjWkZgJz/IS+cReLC6hL8E
5786PRnxJ5ejI7GPAhVaKHYIR1H7dWOQKlQKRkKo+U6D7IqQwKYsp5LaKvSWUZun
5787bMMPUfUW0W+NiMCL6Ko0LRo7onVQO7yd1g4xgaH3/l73GgJL980WPM/CXa5q
578824KBgUKqeUbra5MQcASiSidqTa+sHUctCvZ5rpSAL1iyVY621nGgcR2BlEl/
5789dGgDgf0H/20MoMUeSXYQNVVHng3k4C+6uZ5X6MU9+kdqOYGqz/zwD1T/obMz
5790ijatLwlNozVF7Nk4Opy0Z3blEvDnPdZtVxBQTcbfDaLc/ht2Rz6BlvsprhP9
5791D8zFOI4=
5792  "]],
5793
5794Cell[BoxData[
5795 StyleBox["\<\"Computing the squared matrix elements relevant for the 1->2 \
5796decays: \"\>",
5797  StripOnInput->False,
5798  LineColor->RGBColor[1, 0.5, 0],
5799  FrontFaceColor->RGBColor[1, 0.5, 0],
5800  BackFaceColor->RGBColor[1, 0.5, 0],
5801  GraphicsColor->RGBColor[1, 0.5, 0],
5802  FontWeight->Bold,
5803  FontColor->RGBColor[1, 0.5, 0]]], "Print",
5804 CellChangeTimes->CompressedData["
58051:eJwd0F1M0mEYBXBjjmxYGQyWlDkoLBGYlW1sLeOJlhYzmibrY6um0rK1WWuR
5806OEprmdYYOY1gNYNRF7Vy4FhWcGW2oBVCZaUpUmqB/7fUMcs12+h5vTj7XZyL
5807sx1RVV25flFaWpoGY5efdpUPMSBxdhoOoz+9qj/jwwwUcqeSyVEGSsu6T6nG
5808GLh3bu4yNWbf5aam6kWhBSezK6vRaN/TBFXjqLivR9v1VfLj6K/AfFYH+pZ9
5809gU/l8lliamNH93DXdwaK1QXT1NtfDwV70BPXz75sjDOw8ok56xIq9v5dS62R
5810nQHqsVRoN9WQU9tCvXPAWnkVvWaaMPmS2DPOOapPAk1+dDZhHtmcTsDX5sj/
5811xiZQpOpUUD+9aX6dt5jArRW8Vik6xop+aUB3eI1+4VICO3kRbgaXwIPVWt4S
58129GQsNL8cHUx85CvRkhy3YAh13TBEqAIFf3AENd1tklwRENiU61FQLYJABbV1
5813wjnwEC3eIvytEhJ4EV+VrkYTR9RuqjVga7fmEOh/H+ryrSGQuW+m6Hku7nKU
58142xYM95ZQTVPqYJuIgDscV3jQ9ozq+lHULGOd54gJBCParVLU0sCG5nUEUkbd
58150f4NBPYf/LcxjO71i/IiqLE29qw3H3/RzDpeoRf36B4VSwnUfOZFf6C6DzZb
5816HG1Zrx2ZROtKWTPT6MC8K9teQCAkf6zZLiOgHJ9+14dyem663IUEqizLMj3o
5817f8U9N14=
5818  "]],
5819
5820Cell[BoxData[
5821 InterpretationBox[
5822  RowBox[{
5823   DynamicBox[ToBoxes[PRIVATE`mycounter, StandardForm],
5824    ImageSizeCache->{16., {0., 8.}}], "\[InvisibleSpace]", "\<\" / \"\>",
5825   "\[InvisibleSpace]", "55"}],
5826  SequenceForm[
5827   Dynamic[PRIVATE`mycounter], " / ", 55],
5828  Editable->False]], "Print",
5829 CellChangeTimes->CompressedData["
58301:eJwd0F1I02EYBfA1ZBkztI2NXC3ZSsu5DSuDQbT2tEhrpKE5+oAKdZERWERL
5831ZaVFpsUwma2NwpTVRVGyychqg8CMtj7mVllpbq7U2vy/5UQsiQX2vF4cfhfn
58324sCRVNSUGhaxWCwdxq446SgdZiC7q8N4EP3p1vwZH2Egnzc1MzPKQNHunhOa
5833MQbunJm7SI3adzip87WSwIKTmeWVaKT/cZyq6yy7a0AthgrFUfSXL5nRjr7l
5834nBNQeQK2lNrQ3jPS/Z0BtTYvQb359YC/Fz129fSLhhgDyx+ZMy6gUvff1dQq
5835+SmgHpkP7KQaxdXN1Fv7rOWX0SumCZNnBnuma47qyYZGLzobN4c3phDwtHXm
5836fuMQKNB0KKmf3jS9yllM4MYyfosMHWNHvtSj29x1XtFSAtv5IV4qj8C9lSX8
5837JejxaCCZjg7FPwpUaKHYKRxGHdeMIapQKRgKo6bbjdmXhAQ2ZLmU1Fahr4za
5838MtE1eB9VbxL91ogIPI+tSNGi8UNaJ9Xqs1msYgID7wPdnlUE0vZMFzzNwl2u
5839asuCwb5CqmlK62+TEHAGY0oXakmtrB1FzXL2Wa6UgD9UslmGttZzoGkNgfk6
5840/eGBdQT27v+3PogWeyU5IbSuOvqkLxd/0c12vkTP79I/UMsIVH3mR36g+g82
5841WwxtXlsSnkRritjTCXQw6ci05xEIKB7qtsoJqMYT7/pRbu91hzOfwOtn6Wku
58429D/J0zf3
5843  "]],
5844
5845Cell[BoxData[
5846 InterpretationBox[
5847  RowBox[{"\<\"Squared matrix elent compute in \"\>", "\[InvisibleSpace]",
5848   "2.30641499999999988190779731667134910822`6.383537367146441",
5849   "\[InvisibleSpace]", "\<\" seconds.\"\>"}],
5850  SequenceForm[
5851  "Squared matrix elent compute in ",
5852   2.30641499999999988190779731667134910822`6.383537367146441, " seconds."],
5853  Editable->False]], "Print",
5854 CellChangeTimes->CompressedData["
58551:eJwd0F1M0mEYBXBijmzaMhgsLXJQUCIwK9vYWsQTLS2WNk3Wx1bNj5atzVqL
5856xFFay7TGzGEEqxmMuqiVQ8fSgiuzBa0QKitN0FIL/L8ljlmu2UbP68XZ7+Jc
5857nO2IKuvKapawWCwdxq444yobYUDi7DQcQX96NH8mRxko4M4kk2MMFO/rOa2Z
5858YOD++fkr1HH7bjc1VS8KLjqdXVGFRgf64lSdo/xBDWqpqVScQH/5F7I60Lec
5859i3wql88WUxs7eka7vjOg1uYnqHe+Hg70oidvnHvZGGNg1VNz1mVU7Pm7jlot
5860PwvU46ngHqpBWNtCvXvQWnENvW6aMnmT2DPOeapXAk0+dC5ujmxJI+Btd+R9
58614xAo1HQqqZ/eNL+WLiVweyWvVYZOsKNfGtCdHqMvZzmBXbwwN51L4OGaUt4y
58629NR4cGEFOhz/yFehRUK3YAR13TSEqQIlfziCmu41Sa4KCGzO7VZS2wT+cmrr
5863lHPoEaremvNbk0PgRWx1mhaNH9W6qVa/zWIVEhh8H+zyriWQuX+28Hku7mao
5864ti8a6i+imma0gXYRAXcopuxGLelV9WOoWc6+kCEmEAiXbpOhbQ0caF5PIGXU
5865HxvcSODAoX+bQmiJTyQNo8ba8Wf9efiLbs7xCr20V/9YLSNQ/ZkX/YHqP9hs
5866MbRlQ2lkGq0rZs8m0KEFV7Y9n0BQ8US3Q05ANZl4N4Bm9N5yuQsISE19md3o
5867f8bVN7k=
5868  "]],
5869
5870Cell[BoxData[
5871 InterpretationBox[
5872  RowBox[{"\<\"Decay widths computed in \"\>", "\[InvisibleSpace]",
5873   "0.01883500000000000104694031222152261762`4.295565537818911",
5874   "\[InvisibleSpace]", "\<\" seconds.\"\>"}],
5875  SequenceForm[
5876  "Decay widths computed in ",
5877   0.01883500000000000104694031222152261762`4.295565537818911, " seconds."],
5878  Editable->False]], "Print",
5879 CellChangeTimes->CompressedData["
58801:eJwd0F1M0mEYBXBjjmzYMhiUlDkoLFGYlW1sLeOJlhYrmibrY6um0rK1WWuR
5881OEprmdaYOYxgNZNRF7Vy4FhmcGW2sBVCZaUBUmqB/7fEMcs12+h5vTj7XZyL
5882sx1RVV25blFaWpoaY5OdcZSPMiCxd+qPoD/dyj8TIQaKuNPJ5BgDZXt7TivH
5883Gbh/fu4KNWrb5aSm6kX+BaeyK6vRyMCzOFXdVfFAh5p1VbIT6C/ffFYH+pZ9
5884kU/l8lliamNHT6j7OwMlqoIE9c7Xw4O96Mkb5142xhhY+dSUdRkVu/+updYU
5885ngXq8ZR/N1WfU9tCvXvQUnkNvW6cNHqS2DP2OapHAk1edDZuCm9OJ+Bp78r/
5886xiZQrOyUUz+9aX6dt5jA7eW8Vik6zop8aUB3uA1e4VICO3lBbgaXwMPVGt4S
58879FTUP78MHYl/5CvQ0hynYBR13NQHqQI5fySMGu81Sa4KCGzKdcmpbQJfBbV1
58880j78CC3ZIvytFBJ4EVuVrkLjR1VOqsVnNVtyCAy993d71hDI3D9T/DwXdzmK
5889bQsG+kupxmnVYLuIgDMQk7tQc0Z1/RhqKmRd4IgJDAY1W6VoWwMbmtcRSBm0
5890x4Y2EDhw6N/GALrPK8oLoobaaF9/Pv6inu16hV7ao31cIiVQ85kX+YFqP1it
5891MbRlvSY8hdaVsWYS6PC8I9tWQMAve6LeXkhAMZF4N4Byem85nEUEQiv6Ml3o
5892f8nAOAo=
5893  "]],
5894
5895Cell[BoxData["\<\"Preparing Python output.\"\>"], "Print",
5896 CellChangeTimes->CompressedData["
58971:eJwd0F1M0mEUBnBijmzYMhgsKXJQUCIwK9vcWsSJlhZLmibrY6um0rK1WWuR
5898OkprmdaYOcxkNYNRF7Vy4FhmcGW2oBVCZaWJUmqB/7fUMcs12+i8Xpz9Lp6L
589959mRlFeXmJawWCw9nl11xlUyzIDM2Wk+gv70av9MjDCQx5tOJscYKNrXfVo7
5900zsD98/NXqDH7bjc1VSMJLTqVVVaBjvY/S1D1jtIHJtRmKledQH8FFjLb0Lec
5901iwIqT8CWUuvbuke6vjOg0eXOUO98PRzsQU/eOPeyPs7AqqfWzMuo1Pt3HbVS
5902eRaox1OhPVSzuKqJevdge9k19Lpl0uJLYs4456k+GTT40bmENboljYCv1ZHz
5903jUMgX9uppn560/havpTA7ZX8ZgU6zh79Uofu9Nb6RcsJ7OJHeOk8Ag/XGPjL
59040FOx0MIKdCjxUVCAFordwmHUddMcoQrVgqEoarnXILsqJLA526OmtggDpdTm
5905SefgI1SzVfRbKyLwIr46TYcmjurc1PZAh61dTGDgfajLt5ZAxv7Z/OfZ2Mst
59062L5ouK+QapnWBVslBNzhuNqD2tIrasZQq5J9gSslEIwYtinQljoONK4nkKo1
5907HhvYSODAoX+bwmixXyKPoLVVsd6+HPyLfs7xCr201/hYoyBQ+Zk/+gM1fujo
5908iKNNGwzRKbS6iD07gw4uuLLsuQRCqif6HUoCBRMz7/pRbs8tlzsP98t7Mzzo
5909f8nBOAw=
5910  "]],
5911
5912Cell[BoxData["\<\"    - Splitting vertices into building blocks.\"\>"], \
5913"Print",
5914 CellChangeTimes->CompressedData["
59151:eJwd0F1M0mEYBXBijmzYMhgsKXJQWKIwK9vYWsQTLS1WNE3Wx1bNj5atzVpF
59164iitZVpj5jCC1QxGXdTKgWNZwZXZ0lYIlZUmaKkF/t8SxyzXbNHzenH2uzgX
5917ZzuS8pqSqgUsFkuHcShOukuGGJC52o0H0R8+ze/xYQYKeFPJ5AgDxbs6T2jG
5918GLh7dvYSddSx3UNN1UqC805mlVWg0Z4ncarOWXqvCrVWlSuOoj975zLb0Dec
59198wIqT8CWUuvbOoc7vjGg1uYlqLe+HOjrQo9dO/2iPsbAsseWzIuo1PdnFbUy
5920/xRQj6SCO6hGcXUT9fY+W9kV9Kp5wuxPYs+4Zql+GTQE0Jm4JbIhjYC/1Zn7
5921lUOgUNOupH583fgqZyGBm0v5zXJ0jB39XIdu9ZkCosUEtvHDvHQegfsr9PxF
59226PHR4NwSdDD+QaBCi8Qe4RDqvm4MU4VKwWAENd9pkF0WElif7VVSW4S9pdTm
5923CdfAA1S9UfRLIyLwPLY8TYvGD2k9VFuv3WoTE+h/F+zwrySQsWe68Fk27nJV
5924m+cNdRdRzVPavlYJAU8opvSi1vSK2hHUks8+x5US6AvrN8nRljoONK4mkDIZ
5925DvevJbB3/991IXR3QJITRk3Vo0+7c/EX3YzzJXphp+GhWk6g8hM/+h01vLfb
5926Y2jTGn1kEq0pZk8n0IE5d5Yjj0BQ8Ui3JZ+Aajzxtgfldt1wewoInPkXzvCi
5927/wHNaTii
5928  "]],
5929
5930Cell[BoxData[
5931 InterpretationBox[
5932  RowBox[{"\<\"Splitting of vertices distributed over \"\>",
5933   "\[InvisibleSpace]", "4", "\[InvisibleSpace]", "\<\" kernels.\"\>"}],
5934  SequenceForm["Splitting of vertices distributed over ", 4, " kernels."],
5935  Editable->False]], "Print",
5936 CellChangeTimes->CompressedData["
59371:eJwd0F1M0mEYBXBijmzaMhgsKXJQWCowK9vYWsQTLS1WNk3Wx1ZNpUVrs9Yi
5938cRTWMq0xcxjhaoajLmrl0Lms4MpsQSuEykoTpNQC/2+JY5ZrtNHzenH2uzgX
5939Zzvi6roK/SIWi6XFdMhPuypGGZB2dRoPoz/71H8mxxgo5s4kk+MMlO3pPaWe
5940YODeufnL1GjHTjc1XS8OLDidW1WDRgafxqlaZ+V9PWrTV8uPo798qZx29C3n
5941Ap/K5bMlVEt771j3dwZUmqIE9fbXQ/5+9MT1sy8tMQZWPLHmXEIlfX/XUGtl
5942Z4B6LB3YRTWKDM3UOwfsVVfRa+YpsyeJPdM1T/VIodGLzsWt4U0ZBDxtzoJv
5943HAIl6k4F9dObptf5iwncWs5rKUQn2JEvDej2PpNXuJTADl6Im8kl8GBVOW8J
5944ejIaSC1DR+If+Uq0VOQWjKKuG8YQVaDgj4RR891G6RUBgY15PQpqq8BXSW2Z
59456hp+iKo2C3+rhQRexFZmaND4EY2bavc5bHYRgaH3gW7PagLZ+2ZLnufhbpZy
594664LBgVKqeUbjbxMTcAdjih7UlllTP45aZezzWRIC/lD5lkK0tYEDTWsJpE26
5947o0PrCew/+G9DEN3rFeeHUJMh+mygAH/RzjlfoRd36x6pCgnUfuZFfqC6Dw5H
5948DG1eVx6eRuvK2LMJdDjlyu0oIhCQP9ZukxFQTibeDaJZ/Tdd7mICFsNEdg/6
5949H8oaOCo=
5950  "]],
5951
5952Cell[BoxData[
5953 InterpretationBox[
5954  RowBox[{"\<\"    - Optimizing: \"\>", "\[InvisibleSpace]",
5955   DynamicBox[ToBoxes[PRIVATE`PY$SplitVertexCounter, StandardForm],
5956    ImageSizeCache->{24., {0., 8.}}], "\[InvisibleSpace]", "\<\"/\"\>",
5957   "\[InvisibleSpace]", "163", "\[InvisibleSpace]", "\<\" .\"\>"}],
5958  SequenceForm["    - Optimizing: ",
5959   Dynamic[PRIVATE`PY$SplitVertexCounter], "/", 163, " ."],
5960  Editable->False]], "Print",
5961 CellChangeTimes->CompressedData["
59621:eJwd0F1I02EYBfA1ZBkm2cZGrpbMmuXchpWCEK09LdIatdAcfUCFusgILKLl
5963ZKVFpsUw0daGYRuri6JkyshquzKjLWpulZXm5kqtzf9bToYlscCe14vD7+Jc
5964HDjiqrpy/RIWi6XB2ORnnOWjDEgc3YYj6E+36s/kGAOF3JlkcpyBsr19p1UT
5965DNw7P3+FGrXtclEX6sWBRaezK6vRyODTOFVjr7ivRzv0VfIT6C9fKqsTfcu5
5966yKdy+excamNn31jPdwaU6oIEtevrYX8/evLGuZeNMQZWPTFnXUZz3X/XUWtk
5967Z4F6fCGwm2oQ1bZQ7xy0VF5Dr5umTJ4k9oxjnuqRQJMXnYubw1vSCHja7fnf
5968OASKVN0K6qc3za/zlhK4vZLXKkUn2JEvDegOt9ErzCSwkxfipnMJPFij5S1D
5969T0UDqRXoSPwjvwQtFbkEo6jzpiFEFSj4I2HUdLdJclVAYHNOr4LaJvBVUFun
5970HMMPUWWx8LdKSOBFbHWaGo0fVbuoFp+1wyIiMPQ+0ONZS2D5/tmi5zm4m1Gy
5971bdHgQCnVNKP2t4sJuIIxRS/akV5dP46aZewLGbkE/CHtVina1sCB5vUEFoy6
5972Y0MbCRw49G9TEN3nFeeFUGNt9NlAPv6imbO/Qi/t0T1SSgnUfOZFfqC6D1Zr
5973DG3ZoA1Po3Vl7NkEOpxyZtsKCATkjzXbZQRKJhPvBtGM/ltOVyGBrmJbZi/6
5974H8fPN8g=
5975  "]],
5976
5977Cell[BoxData["\<\"    - Writing files.\"\>"], "Print",
5978 CellChangeTimes->CompressedData["
59791:eJwd0F1I02EYBXAbsowl2cZGWku2muXchpXBIFp7WqQ1aqE5+oAKdaERWETL
5980yUqLTIthMluTwjZWF0XJJiOreRFmtEXNrbLSnK7U2vy/5UQsiQXreb04/C7O
5981xYEjqqgtNSxKS0vTYjrkp1ylwwxInJ3Gw+hPr/rPxAgDhdzp2dkxBkr2dJ9U
5982jzNw9+z8JWq0Y6ebmqoTBRecyi6vREf7n8SpWkfZPQNqNVTIj6O//MmsdvQt
5983+zyfyuWzxNSG9u6Rru8MqDQFCeqtr4cCPWj1tTMvG2IMrHhsybqIir1/11Cr
5984ZKeBeiwV3EU1CmuaqbcP2MqvoFfNk2bfLPaMc57qk0BjLzoXt0Q2pRPwtTny
5985v7EJFKk7FdRPb5pe5y0mcHM5r0WKjrNGv9Sj272m3pxMAjt4YW4Gl8D9VTre
5986EvRENJhchg7FP/KVaLHQLRhGXdeNYapAwR+KoOY7jZLLAgIbcz0KaqvAX0Zt
5987mXQOPkBVm3N+q3MIvIitTNeg8SMaN9Xmt1ttQgID74NdvtUElu6bKXqWi7sc
59885dYFQ33FVPO0JtAmIuAOxRQe1JpRWTeGWmSscxwxgUBYt0WKttazoWktgZRJ
5989f3RgPYH9B/9tCKF7e0V5YdRUE33al4+/aOccr9ALu/UPVVICVZ95oz9Q/Qe7
5990PYY2r9NFptDaEtZMAh1MurI7CggE5Y+022QElBOJd/0op+eGy11IoFrzPNOD
5991/gfHizfL
5992  "]],
5993
5994Cell[BoxData["\<\"Done!\"\>"], "Print",
5995 CellChangeTimes->CompressedData["
59961:eJwd0F1M0mEUBnBijmzkMhgsKXJYWiIwK9vcWsaJlhYrmqbrY6um0rLarLVI
5997HKW1TGvMHEaymsGoi1o5cCwruDJb0AyhstIEKbXA/1vimOUabXReL85+F8/F
59988+xIquvLtYtYLJYazyI/Yy8fZSDX1q07jP50Kf9MjjFQyJtJJMYZKNvTe1o5
5999wcD98/NXqBHLTgc11SDxLzidVVmDhgeexahqa8UDLWrSVsuPo7+8ycxO9C3n
6000ooDKE7BzqE2dvWM93xkoURXEqXe+HvL1oSdunHvVFGVgxVNj5mU0x/V3DbVW
6001dhaox1L+XVSduK6VeveAufIaet0wZXAnMGds81R3LjR70LmYMbQpjYC7w5r/
6002jUOgSNmtoH4abHmTt5jA7eX8Nik6wQ5/aUS3u/QeUQaBHfwgL51H4OEqDX8J
6003ejLiTy5DR2IfBcVoqdghHEXtN3VBqlAhGAmhhnvNuVeFBDZmOxXUdqG3gto2
6004ZRt+hJZsFv1Wigi8jK5MU6GxIyoH1eztMpnFBIbe+3vcqwks3Tdb9CIbe7nF
6005WxcM9JdSDTMqX4eEgCMQVThRU3pNwzhqlLEvcHMI+IKaLVK0vZEDLWsJpPRV
6006R4fWE9h/8N+GALrXI8kLovq6yPP+fPyLes76Gr20u+pxiZRA7Wd++Ada9aGr
6007K4q2rtOEptH6MvZsHB1O2rMsBQT88ifqbTICxZPxdwMot++W3VGIe04NZjjR
6008/8o7OCk=
6009  "]]
6010}, Open  ]]
6011}, Open  ]]
6012},
6013WindowSize->{927, 1028},
6014WindowMargins->{{-6, Automatic}, {Automatic, 0}},
6015FrontEndVersion->"9.0 for Linux x86 (64-bit) (November 20, 2012)",
6016StyleDefinitions->"Default.nb"
6017]
6018(* End of Notebook Content *)
6019
6020(* Internal cache information *)
6021(*CellTagsOutline
6022CellTagsIndex->{}
6023*)
6024(*CellTagsIndex
6025CellTagsIndex->{}
6026*)
6027(*NotebookFileOutline
6028Notebook[{
6029Cell[557, 20, 218, 4, 32, "Input"],
6030Cell[778, 26, 452, 9, 32, "Input"],
6031Cell[CellGroupData[{
6032Cell[1255, 39, 169, 3, 32, "Input"],
6033Cell[CellGroupData[{
6034Cell[1449, 46, 2036, 29, 23, "Print"],
6035Cell[3488, 77, 2307, 36, 23, "Print"],
6036Cell[5798, 115, 2090, 30, 23, "Print"],
6037Cell[7891, 147, 2021, 29, 23, "Print"],
6038Cell[9915, 178, 2033, 29, 23, "Print"],
6039Cell[11951, 209, 2085, 30, 23, "Print"],
6040Cell[14039, 241, 2087, 30, 23, "Print"],
6041Cell[16129, 273, 2024, 29, 23, "Print"],
6042Cell[18156, 304, 2054, 29, 23, "Print"],
6043Cell[20213, 335, 2022, 29, 23, "Print"],
6044Cell[22238, 366, 2089, 30, 23, "Print"]
6045}, Open  ]]
6046}, Open  ]],
6047Cell[24354, 400, 1526, 23, 32, "Input"],
6048Cell[25883, 425, 92, 1, 32, "Input"],
6049Cell[CellGroupData[{
6050Cell[26000, 430, 697, 12, 32, "Input"],
6051Cell[CellGroupData[{
6052Cell[26722, 446, 2887, 41, 23, "Print"],
6053Cell[29612, 489, 2907, 41, 23, "Print"],
6054Cell[32522, 532, 2907, 41, 23, "Print"],
6055Cell[35432, 575, 3011, 45, 23, "Print"],
6056Cell[38446, 622, 2876, 41, 23, "Print"],
6057Cell[41325, 665, 2900, 41, 23, "Print"],
6058Cell[44228, 708, 2901, 41, 23, "Print"],
6059Cell[47132, 751, 2900, 41, 23, "Print"],
6060Cell[50035, 794, 2911, 41, 23, "Print"],
6061Cell[52949, 837, 2915, 42, 23, "Print"],
6062Cell[55867, 881, 2865, 41, 23, "Print"],
6063Cell[58735, 924, 2895, 41, 23, "Print"],
6064Cell[61633, 967, 2898, 41, 23, "Print"],
6065Cell[64534, 1010, 2896, 41, 23, "Print"],
6066Cell[67433, 1053, 3079, 46, 43, "Print"]
6067}, Open  ]]
6068}, Open  ]],
6069Cell[CellGroupData[{
6070Cell[70561, 1105, 790, 12, 32, "Input"],
6071Cell[CellGroupData[{
6072Cell[71376, 1121, 675, 13, 23, "Print"],
6073Cell[72054, 1136, 685, 13, 23, "Print"],
6074Cell[72742, 1151, 212, 3, 23, "Print"]
6075}, Open  ]]
6076}, Open  ]],
6077Cell[CellGroupData[{
6078Cell[73003, 1160, 281, 6, 32, "Input"],
6079Cell[CellGroupData[{
6080Cell[73309, 1170, 1644, 27, 23, "Print"],
6081Cell[74956, 1199, 1645, 27, 23, "Print"],
6082Cell[76604, 1228, 1171, 17, 23, "Print"]
6083}, Open  ]]
6084}, Open  ]],
6085Cell[CellGroupData[{
6086Cell[77824, 1251, 445, 8, 32, "Input"],
6087Cell[CellGroupData[{
6088Cell[78294, 1263, 861, 12, 23, "Print"],
6089Cell[79158, 1277, 857, 12, 23, "Print"],
6090Cell[80018, 1291, 1054, 19, 23, "Print"],
6091Cell[81075, 1312, 809, 11, 23, "Print"],
6092Cell[81887, 1325, 991, 16, 23, "Print"],
6093Cell[82881, 1343, 840, 12, 23, "Print"],
6094Cell[83724, 1357, 798, 11, 23, "Print"],
6095Cell[84525, 1370, 922, 15, 23, "Print"],
6096Cell[85450, 1387, 808, 11, 23, "Print"]
6097}, Open  ]]
6098}, Open  ]],
6099Cell[CellGroupData[{
6100Cell[86307, 1404, 461, 8, 32, "Input"],
6101Cell[CellGroupData[{
6102Cell[86793, 1416, 1659, 28, 23, "Print"],
6103Cell[88455, 1446, 1414, 20, 23, "Print"],
6104Cell[89872, 1468, 1596, 25, 23, "Print"],
6105Cell[91471, 1495, 1447, 21, 23, "Print"],
6106Cell[92921, 1518, 1933, 32, 43, "Print"],
6107Cell[94857, 1552, 1531, 24, 23, "Print"]
6108}, Open  ]]
6109}, Open  ]],
6110Cell[96415, 1580, 660, 14, 32, "Input"],
6111Cell[CellGroupData[{
6112Cell[97100, 1598, 481, 11, 32, "Input"],
6113Cell[CellGroupData[{
6114Cell[97606, 1613, 775, 11, 23, "Print"],
6115Cell[98384, 1626, 968, 16, 23, "Print"],
6116Cell[99355, 1644, 743, 10, 23, "Print"],
6117Cell[100101, 1656, 758, 10, 23, "Print"],
6118Cell[100862, 1668, 745, 10, 23, "Print"],
6119Cell[101610, 1680, 743, 10, 23, "Print"],
6120Cell[102356, 1692, 758, 10, 23, "Print"],
6121Cell[103117, 1704, 751, 10, 23, "Print"],
6122Cell[103871, 1716, 745, 10, 23, "Print"],
6123Cell[104619, 1728, 736, 10, 23, "Print"],
6124Cell[105358, 1740, 731, 10, 23, "Print"]
6125}, Open  ]]
6126}, Open  ]],
6127Cell[106116, 1754, 192, 6, 32, "Input"],
6128Cell[CellGroupData[{
6129Cell[106333, 1764, 1265, 19, 32, "Input"],
6130Cell[CellGroupData[{
6131Cell[107623, 1787, 528, 9, 23, "Print"],
6132Cell[108154, 1798, 515, 9, 23, "Print"],
6133Cell[108672, 1809, 513, 9, 23, "Print"],
6134Cell[109188, 1820, 672, 14, 23, "Print"],
6135Cell[109863, 1836, 662, 14, 23, "Print"],
6136Cell[110528, 1852, 764, 17, 23, "Print"],
6137Cell[111295, 1871, 507, 9, 23, "Print"],
6138Cell[111805, 1882, 693, 14, 23, "Print"],
6139Cell[112501, 1898, 544, 10, 23, "Print"],
6140Cell[113048, 1910, 792, 18, 23, "Print"],
6141Cell[113843, 1930, 502, 9, 23, "Print"],
6142Cell[114348, 1941, 570, 10, 23, "Print"],
6143Cell[114921, 1953, 550, 10, 23, "Print"],
6144Cell[115474, 1965, 552, 10, 23, "Print"],
6145Cell[116029, 1977, 658, 14, 23, "Print"],
6146Cell[116690, 1993, 764, 17, 23, "Print"],
6147Cell[117457, 2012, 511, 9, 23, "Print"],
6148Cell[117971, 2023, 693, 14, 23, "Print"],
6149Cell[118667, 2039, 540, 10, 23, "Print"],
6150Cell[119210, 2051, 1025, 21, 23, "Print"],
6151Cell[120238, 2074, 628, 13, 23, "Print"],
6152Cell[120869, 2089, 711, 15, 23, "Print"]
6153}, Open  ]]
6154}, Open  ]],
6155Cell[121607, 2108, 52, 1, 32, "Input"],
6156Cell[121662, 2111, 117, 3, 32, "Input"],
6157Cell[CellGroupData[{
6158Cell[121804, 2118, 58, 1, 32, "Input"],
6159Cell[CellGroupData[{
6160Cell[121887, 2123, 983, 14, 23, "Print"],
6161Cell[122873, 2139, 994, 14, 23, "Print"],
6162Cell[123870, 2155, 1028, 14, 23, "Print"],
6163Cell[124901, 2171, 1004, 14, 23, "Print"]
6164}, Open  ]]
6165}, Open  ]],
6166Cell[125932, 2189, 293, 7, 32, "Input"],
6167Cell[CellGroupData[{
6168Cell[126250, 2200, 55, 1, 32, "Input"],
6169Cell[CellGroupData[{
6170Cell[126330, 2205, 909, 13, 23, "Print"],
6171Cell[127242, 2220, 909, 13, 23, "Print"],
6172Cell[128154, 2235, 918, 13, 23, "Print"]
6173}, Open  ]]
6174}, Open  ]],
6175Cell[129099, 2252, 1001, 17, 32, "Input"],
6176Cell[CellGroupData[{
6177Cell[130125, 2273, 1395, 33, 99, "Input"],
6178Cell[CellGroupData[{
6179Cell[131545, 2310, 410, 9, 23, "Print"],
6180Cell[131958, 2321, 170, 2, 23, "Print"],
6181Cell[132131, 2325, 576, 12, 23, "Print"],
6182Cell[132710, 2339, 191, 2, 23, "Print"],
6183Cell[132904, 2343, 411, 8, 23, "Print"],
6184Cell[133318, 2353, 168, 2, 23, "Print"],
6185Cell[133489, 2357, 615, 14, 43, "Print"],
6186Cell[134107, 2373, 480, 9, 23, "Print"],
6187Cell[134590, 2384, 189, 2, 23, "Print"],
6188Cell[134782, 2388, 337, 7, 23, "Print"],
6189Cell[135122, 2397, 369, 7, 23, "Print"],
6190Cell[135494, 2406, 449, 9, 23, "Print"],
6191Cell[135946, 2417, 170, 2, 23, "Print"],
6192Cell[136119, 2421, 401, 8, 23, "Print"],
6193Cell[136523, 2431, 434, 8, 23, "Print"],
6194Cell[136960, 2441, 368, 7, 23, "Print"],
6195Cell[137331, 2450, 170, 2, 23, "Print"],
6196Cell[137504, 2454, 423, 9, 23, "Print"],
6197Cell[137930, 2465, 366, 7, 23, "Print"],
6198Cell[138299, 2474, 209, 2, 23, "Print"],
6199Cell[138511, 2478, 240, 3, 23, "Print"],
6200Cell[138754, 2483, 168, 2, 23, "Print"],
6201Cell[138925, 2487, 401, 8, 23, "Print"],
6202Cell[139329, 2497, 432, 8, 23, "Print"],
6203Cell[139764, 2507, 366, 7, 23, "Print"],
6204Cell[140133, 2516, 170, 2, 23, "Print"],
6205Cell[140306, 2520, 424, 9, 23, "Print"],
6206Cell[140733, 2531, 364, 7, 23, "Print"],
6207Cell[141100, 2540, 217, 3, 23, "Print"],
6208Cell[141320, 2545, 203, 2, 23, "Print"],
6209Cell[141526, 2549, 224, 3, 23, "Print"],
6210Cell[141753, 2554, 204, 2, 23, "Print"],
6211Cell[141960, 2558, 413, 9, 23, "Print"],
6212Cell[142376, 2569, 170, 2, 23, "Print"],
6213Cell[142549, 2573, 401, 8, 23, "Print"],
6214Cell[142953, 2583, 432, 8, 23, "Print"],
6215Cell[143388, 2593, 436, 8, 23, "Print"],
6216Cell[143827, 2603, 368, 7, 23, "Print"],
6217Cell[144198, 2612, 168, 2, 23, "Print"],
6218Cell[144369, 2616, 424, 9, 23, "Print"],
6219Cell[144796, 2627, 434, 8, 23, "Print"],
6220Cell[145233, 2637, 365, 7, 23, "Print"],
6221Cell[145601, 2646, 208, 2, 23, "Print"],
6222Cell[145812, 2650, 240, 3, 23, "Print"],
6223Cell[146055, 2655, 168, 2, 23, "Print"],
6224Cell[146226, 2659, 403, 8, 23, "Print"],
6225Cell[146632, 2669, 434, 8, 23, "Print"],
6226Cell[147069, 2679, 368, 7, 23, "Print"],
6227Cell[147440, 2688, 170, 2, 23, "Print"],
6228Cell[147613, 2692, 424, 9, 23, "Print"],
6229Cell[148040, 2703, 433, 8, 23, "Print"],
6230Cell[148476, 2713, 366, 7, 23, "Print"],
6231Cell[148845, 2722, 217, 3, 23, "Print"],
6232Cell[149065, 2727, 205, 2, 23, "Print"],
6233Cell[149273, 2731, 226, 3, 23, "Print"],
6234Cell[149502, 2736, 209, 2, 23, "Print"],
6235Cell[149714, 2740, 413, 9, 23, "Print"],
6236Cell[150130, 2751, 168, 2, 23, "Print"],
6237Cell[150301, 2755, 401, 8, 23, "Print"],
6238Cell[150705, 2765, 434, 8, 23, "Print"],
6239Cell[151142, 2775, 433, 8, 23, "Print"],
6240Cell[151578, 2785, 366, 7, 23, "Print"],
6241Cell[151947, 2794, 168, 2, 23, "Print"],
6242Cell[152118, 2798, 424, 9, 23, "Print"],
6243Cell[152545, 2809, 366, 7, 23, "Print"],
6244Cell[152914, 2818, 209, 2, 23, "Print"],
6245Cell[153126, 2822, 240, 3, 23, "Print"],
6246Cell[153369, 2827, 168, 2, 23, "Print"],
6247Cell[153540, 2831, 401, 8, 23, "Print"],
6248Cell[153944, 2841, 431, 8, 23, "Print"],
6249Cell[154378, 2851, 364, 7, 23, "Print"],
6250Cell[154745, 2860, 170, 2, 23, "Print"],
6251Cell[154918, 2864, 423, 9, 23, "Print"],
6252Cell[155344, 2875, 366, 7, 23, "Print"],
6253Cell[155713, 2884, 217, 3, 23, "Print"],
6254Cell[155933, 2889, 205, 2, 23, "Print"],
6255Cell[156141, 2893, 224, 3, 23, "Print"],
6256Cell[156368, 2898, 209, 2, 23, "Print"],
6257Cell[156580, 2902, 412, 9, 23, "Print"],
6258Cell[156995, 2913, 168, 2, 23, "Print"],
6259Cell[157166, 2917, 401, 8, 23, "Print"],
6260Cell[157570, 2927, 432, 8, 23, "Print"],
6261Cell[158005, 2937, 436, 8, 23, "Print"],
6262Cell[158444, 2947, 368, 7, 23, "Print"],
6263Cell[158815, 2956, 167, 2, 23, "Print"],
6264Cell[158985, 2960, 424, 9, 23, "Print"],
6265Cell[159412, 2971, 432, 8, 23, "Print"],
6266Cell[159847, 2981, 434, 8, 23, "Print"],
6267Cell[160284, 2991, 368, 7, 23, "Print"],
6268Cell[160655, 3000, 209, 2, 23, "Print"],
6269Cell[160867, 3004, 240, 3, 23, "Print"],
6270Cell[161110, 3009, 168, 2, 23, "Print"],
6271Cell[161281, 3013, 401, 8, 23, "Print"],
6272Cell[161685, 3023, 432, 8, 23, "Print"],
6273Cell[162120, 3033, 363, 7, 23, "Print"],
6274Cell[162486, 3042, 168, 2, 23, "Print"],
6275Cell[162657, 3046, 424, 9, 23, "Print"],
6276Cell[163084, 3057, 432, 8, 23, "Print"],
6277Cell[163519, 3067, 366, 7, 23, "Print"],
6278Cell[163888, 3076, 217, 3, 23, "Print"],
6279Cell[164108, 3081, 203, 2, 23, "Print"],
6280Cell[164314, 3085, 224, 3, 23, "Print"],
6281Cell[164541, 3090, 207, 2, 23, "Print"],
6282Cell[164751, 3094, 416, 9, 23, "Print"],
6283Cell[165170, 3105, 168, 2, 23, "Print"],
6284Cell[165341, 3109, 403, 8, 23, "Print"],
6285Cell[165747, 3119, 436, 8, 23, "Print"],
6286Cell[166186, 3129, 432, 8, 23, "Print"],
6287Cell[166621, 3139, 432, 8, 23, "Print"],
6288Cell[167056, 3149, 432, 8, 23, "Print"],
6289Cell[167491, 3159, 370, 7, 23, "Print"],
6290Cell[167864, 3168, 168, 2, 23, "Print"],
6291Cell[168035, 3172, 426, 9, 23, "Print"],
6292Cell[168464, 3183, 432, 8, 23, "Print"],
6293Cell[168899, 3193, 364, 7, 23, "Print"],
6294Cell[169266, 3202, 209, 2, 23, "Print"],
6295Cell[169478, 3206, 240, 3, 23, "Print"],
6296Cell[169721, 3211, 168, 2, 23, "Print"],
6297Cell[169892, 3215, 401, 8, 23, "Print"],
6298Cell[170296, 3225, 432, 8, 23, "Print"],
6299Cell[170731, 3235, 364, 7, 23, "Print"],
6300Cell[171098, 3244, 168, 2, 23, "Print"],
6301Cell[171269, 3248, 424, 9, 23, "Print"],
6302Cell[171696, 3259, 432, 8, 23, "Print"],
6303Cell[172131, 3269, 364, 7, 23, "Print"],
6304Cell[172498, 3278, 217, 3, 23, "Print"],
6305Cell[172718, 3283, 203, 2, 23, "Print"],
6306Cell[172924, 3287, 224, 3, 23, "Print"],
6307Cell[173151, 3292, 210, 2, 23, "Print"],
6308Cell[173364, 3296, 416, 9, 23, "Print"],
6309Cell[173783, 3307, 168, 2, 23, "Print"],
6310Cell[173954, 3311, 403, 8, 23, "Print"],
6311Cell[174360, 3321, 436, 8, 23, "Print"],
6312Cell[174799, 3331, 432, 8, 23, "Print"],
6313Cell[175234, 3341, 431, 8, 23, "Print"],
6314Cell[175668, 3351, 434, 8, 23, "Print"],
6315Cell[176105, 3361, 368, 7, 23, "Print"],
6316Cell[176476, 3370, 170, 2, 23, "Print"],
6317Cell[176649, 3374, 424, 9, 23, "Print"],
6318Cell[177076, 3385, 436, 8, 23, "Print"],
6319Cell[177515, 3395, 368, 7, 23, "Print"],
6320Cell[177886, 3404, 210, 2, 23, "Print"],
6321Cell[178099, 3408, 241, 3, 23, "Print"],
6322Cell[178343, 3413, 168, 2, 23, "Print"],
6323Cell[178514, 3417, 403, 8, 23, "Print"],
6324Cell[178920, 3427, 436, 8, 23, "Print"],
6325Cell[179359, 3437, 366, 7, 23, "Print"],
6326Cell[179728, 3446, 168, 2, 23, "Print"],
6327Cell[179899, 3450, 424, 9, 23, "Print"],
6328Cell[180326, 3461, 436, 8, 23, "Print"],
6329Cell[180765, 3471, 366, 7, 23, "Print"],
6330Cell[181134, 3480, 218, 3, 23, "Print"],
6331Cell[181355, 3485, 203, 2, 23, "Print"],
6332Cell[181561, 3489, 227, 3, 23, "Print"],
6333Cell[181791, 3494, 211, 2, 23, "Print"],
6334Cell[182005, 3498, 416, 9, 23, "Print"],
6335Cell[182424, 3509, 168, 2, 23, "Print"],
6336Cell[182595, 3513, 401, 8, 23, "Print"],
6337Cell[182999, 3523, 440, 8, 23, "Print"],
6338Cell[183442, 3533, 434, 8, 23, "Print"],
6339Cell[183879, 3543, 436, 8, 23, "Print"],
6340Cell[184318, 3553, 434, 8, 23, "Print"],
6341Cell[184755, 3563, 374, 7, 23, "Print"],
6342Cell[185132, 3572, 168, 2, 23, "Print"],
6343Cell[185303, 3576, 423, 9, 23, "Print"],
6344Cell[185729, 3587, 435, 8, 23, "Print"],
6345Cell[186167, 3597, 432, 8, 23, "Print"],
6346Cell[186602, 3607, 432, 8, 23, "Print"],
6347Cell[187037, 3617, 432, 8, 23, "Print"],
6348Cell[187472, 3627, 370, 7, 23, "Print"],
6349Cell[187845, 3636, 210, 2, 23, "Print"],
6350Cell[188058, 3640, 242, 3, 23, "Print"],
6351Cell[188303, 3645, 168, 2, 23, "Print"],
6352Cell[188474, 3649, 401, 8, 23, "Print"],
6353Cell[188878, 3659, 432, 8, 23, "Print"],
6354Cell[189313, 3669, 366, 7, 23, "Print"],
6355Cell[189682, 3678, 170, 2, 23, "Print"],
6356Cell[189855, 3682, 424, 9, 23, "Print"],
6357Cell[190282, 3693, 434, 8, 23, "Print"],
6358Cell[190719, 3703, 364, 7, 23, "Print"],
6359Cell[191086, 3712, 219, 3, 23, "Print"],
6360Cell[191308, 3717, 205, 2, 23, "Print"],
6361Cell[191516, 3721, 226, 3, 23, "Print"],
6362Cell[191745, 3726, 214, 2, 23, "Print"],
6363Cell[191962, 3730, 416, 9, 23, "Print"],
6364Cell[192381, 3741, 168, 2, 23, "Print"],
6365Cell[192552, 3745, 401, 8, 23, "Print"],
6366Cell[192956, 3755, 440, 8, 23, "Print"],
6367Cell[193399, 3765, 434, 8, 23, "Print"],
6368Cell[193836, 3775, 434, 8, 23, "Print"],
6369Cell[194273, 3785, 436, 8, 23, "Print"],
6370Cell[194712, 3795, 372, 7, 23, "Print"],
6371Cell[195087, 3804, 168, 2, 23, "Print"],
6372Cell[195258, 3808, 426, 9, 23, "Print"],
6373Cell[195687, 3819, 433, 8, 23, "Print"],
6374Cell[196123, 3829, 366, 7, 23, "Print"],
6375Cell[196492, 3838, 213, 2, 23, "Print"],
6376Cell[196708, 3842, 241, 3, 23, "Print"],
6377Cell[196952, 3847, 170, 2, 23, "Print"],
6378Cell[197125, 3851, 403, 8, 23, "Print"],
6379Cell[197531, 3861, 434, 8, 23, "Print"],
6380Cell[197968, 3871, 364, 7, 23, "Print"],
6381Cell[198335, 3880, 170, 2, 23, "Print"],
6382Cell[198508, 3884, 424, 9, 23, "Print"],
6383Cell[198935, 3895, 364, 7, 23, "Print"],
6384Cell[199302, 3904, 221, 3, 23, "Print"],
6385Cell[199526, 3909, 203, 2, 23, "Print"],
6386Cell[199732, 3913, 226, 3, 23, "Print"],
6387Cell[199961, 3918, 212, 2, 23, "Print"],
6388Cell[200176, 3922, 416, 9, 23, "Print"],
6389Cell[200595, 3933, 168, 2, 23, "Print"],
6390Cell[200766, 3937, 401, 8, 23, "Print"],
6391Cell[201170, 3947, 440, 8, 23, "Print"],
6392Cell[201613, 3957, 433, 8, 23, "Print"],
6393Cell[202049, 3967, 434, 8, 23, "Print"],
6394Cell[202486, 3977, 434, 8, 23, "Print"],
6395Cell[202923, 3987, 370, 7, 23, "Print"],
6396Cell[203296, 3996, 170, 2, 23, "Print"],
6397Cell[203469, 4000, 424, 9, 23, "Print"],
6398Cell[203896, 4011, 433, 8, 23, "Print"],
6399Cell[204332, 4021, 366, 7, 23, "Print"],
6400Cell[204701, 4030, 211, 2, 23, "Print"],
6401Cell[204915, 4034, 244, 3, 23, "Print"],
6402Cell[205162, 4039, 168, 2, 23, "Print"],
6403Cell[205333, 4043, 403, 8, 23, "Print"],
6404Cell[205739, 4053, 432, 8, 23, "Print"],
6405Cell[206174, 4063, 366, 7, 23, "Print"],
6406Cell[206543, 4072, 168, 2, 23, "Print"],
6407Cell[206714, 4076, 423, 9, 23, "Print"],
6408Cell[207140, 4087, 364, 7, 23, "Print"],
6409Cell[207507, 4096, 221, 3, 23, "Print"],
6410Cell[207731, 4101, 205, 2, 23, "Print"],
6411Cell[207939, 4105, 226, 3, 23, "Print"],
6412Cell[208168, 4110, 212, 2, 23, "Print"],
6413Cell[208383, 4114, 416, 9, 23, "Print"],
6414Cell[208802, 4125, 168, 2, 23, "Print"],
6415Cell[208973, 4129, 401, 8, 23, "Print"],
6416Cell[209377, 4139, 438, 8, 23, "Print"],
6417Cell[209818, 4149, 434, 8, 23, "Print"],
6418Cell[210255, 4159, 436, 8, 23, "Print"],
6419Cell[210694, 4169, 433, 8, 23, "Print"],
6420Cell[211130, 4179, 370, 7, 23, "Print"],
6421Cell[211503, 4188, 168, 2, 23, "Print"],
6422Cell[211674, 4192, 426, 9, 23, "Print"],
6423Cell[212103, 4203, 364, 7, 23, "Print"],
6424Cell[212470, 4212, 211, 2, 23, "Print"],
6425Cell[212684, 4216, 242, 3, 23, "Print"],
6426Cell[212929, 4221, 170, 2, 23, "Print"],
6427Cell[213102, 4225, 401, 8, 23, "Print"],
6428Cell[213506, 4235, 434, 8, 23, "Print"],
6429Cell[213943, 4245, 363, 7, 23, "Print"],
6430Cell[214309, 4254, 168, 2, 23, "Print"],
6431Cell[214480, 4258, 424, 9, 23, "Print"],
6432Cell[214907, 4269, 364, 7, 23, "Print"],
6433Cell[215274, 4278, 219, 3, 23, "Print"],
6434Cell[215496, 4283, 205, 2, 23, "Print"],
6435Cell[215704, 4287, 226, 3, 23, "Print"],
6436Cell[215933, 4292, 212, 2, 23, "Print"],
6437Cell[216148, 4296, 421, 9, 23, "Print"],
6438Cell[216572, 4307, 168, 2, 23, "Print"],
6439Cell[216743, 4311, 430, 9, 23, "Print"],
6440Cell[217176, 4322, 168, 2, 23, "Print"],
6441Cell[217347, 4326, 401, 8, 23, "Print"],
6442Cell[217751, 4336, 436, 8, 23, "Print"],
6443Cell[218190, 4346, 438, 8, 23, "Print"],
6444Cell[218631, 4356, 436, 8, 23, "Print"],
6445Cell[219070, 4366, 436, 8, 23, "Print"],
6446Cell[219509, 4376, 438, 8, 23, "Print"],
6447Cell[219950, 4386, 436, 8, 23, "Print"],
6448Cell[220389, 4396, 438, 8, 23, "Print"],
6449Cell[220830, 4406, 438, 8, 23, "Print"],
6450Cell[221271, 4416, 438, 8, 23, "Print"],
6451Cell[221712, 4426, 438, 8, 23, "Print"],
6452Cell[222153, 4436, 438, 8, 23, "Print"],
6453Cell[222594, 4446, 438, 8, 23, "Print"],
6454Cell[223035, 4456, 168, 2, 23, "Print"],
6455Cell[223206, 4460, 363, 7, 23, "Print"],
6456Cell[223572, 4469, 374, 7, 23, "Print"],
6457Cell[223949, 4478, 168, 2, 23, "Print"],
6458Cell[224120, 4482, 424, 9, 23, "Print"],
6459Cell[224547, 4493, 434, 8, 23, "Print"],
6460Cell[224984, 4503, 432, 8, 23, "Print"],
6461Cell[225419, 4513, 432, 8, 23, "Print"],
6462Cell[225854, 4523, 432, 8, 23, "Print"],
6463Cell[226289, 4533, 432, 8, 23, "Print"],
6464Cell[226724, 4543, 431, 8, 23, "Print"],
6465Cell[227158, 4553, 438, 8, 23, "Print"],
6466Cell[227599, 4563, 438, 8, 23, "Print"],
6467Cell[228040, 4573, 438, 8, 23, "Print"],
6468Cell[228481, 4583, 436, 8, 23, "Print"],
6469Cell[228920, 4593, 434, 8, 23, "Print"],
6470Cell[229357, 4603, 434, 8, 23, "Print"],
6471Cell[229794, 4613, 372, 7, 23, "Print"],
6472Cell[230169, 4622, 211, 2, 23, "Print"],
6473Cell[230383, 4626, 242, 3, 23, "Print"],
6474Cell[230628, 4631, 170, 2, 23, "Print"],
6475Cell[230801, 4635, 401, 8, 23, "Print"],
6476Cell[231205, 4645, 432, 8, 23, "Print"],
6477Cell[231640, 4655, 366, 7, 23, "Print"],
6478Cell[232009, 4664, 167, 2, 23, "Print"],
6479Cell[232179, 4668, 426, 9, 23, "Print"],
6480Cell[232608, 4679, 432, 8, 23, "Print"],
6481Cell[233043, 4689, 366, 7, 23, "Print"],
6482Cell[233412, 4698, 219, 3, 23, "Print"],
6483Cell[233634, 4703, 205, 2, 23, "Print"],
6484Cell[233842, 4707, 228, 3, 23, "Print"],
6485Cell[234073, 4712, 219, 3, 23, "Print"],
6486Cell[234295, 4717, 419, 9, 23, "Print"],
6487Cell[234717, 4728, 168, 2, 23, "Print"],
6488Cell[234888, 4732, 428, 9, 23, "Print"],
6489Cell[235319, 4743, 168, 2, 23, "Print"],
6490Cell[235490, 4747, 401, 8, 23, "Print"],
6491Cell[235894, 4757, 436, 8, 23, "Print"],
6492Cell[236333, 4767, 438, 8, 23, "Print"],
6493Cell[236774, 4777, 438, 8, 23, "Print"],
6494Cell[237215, 4787, 436, 8, 23, "Print"],
6495Cell[237654, 4797, 436, 8, 23, "Print"],
6496Cell[238093, 4807, 438, 8, 23, "Print"],
6497Cell[238534, 4817, 438, 8, 23, "Print"],
6498Cell[238975, 4827, 440, 8, 23, "Print"],
6499Cell[239418, 4837, 438, 8, 23, "Print"],
6500Cell[239859, 4847, 438, 8, 23, "Print"],
6501Cell[240300, 4857, 440, 8, 23, "Print"],
6502Cell[240743, 4867, 438, 8, 23, "Print"],
6503Cell[241184, 4877, 168, 2, 23, "Print"],
6504Cell[241355, 4881, 363, 7, 23, "Print"],
6505Cell[241721, 4890, 374, 7, 23, "Print"],
6506Cell[242098, 4899, 170, 2, 23, "Print"],
6507Cell[242271, 4903, 424, 9, 23, "Print"],
6508Cell[242698, 4914, 436, 8, 23, "Print"],
6509Cell[243137, 4924, 436, 8, 23, "Print"],
6510Cell[243576, 4934, 436, 8, 23, "Print"],
6511Cell[244015, 4944, 368, 7, 23, "Print"],
6512Cell[244386, 4953, 213, 2, 23, "Print"],
6513Cell[244602, 4957, 244, 3, 23, "Print"],
6514Cell[244849, 4962, 167, 2, 23, "Print"],
6515Cell[245019, 4966, 401, 8, 23, "Print"],
6516Cell[245423, 4976, 432, 8, 23, "Print"],
6517Cell[245858, 4986, 363, 7, 23, "Print"],
6518Cell[246224, 4995, 168, 2, 23, "Print"],
6519Cell[246395, 4999, 424, 9, 23, "Print"],
6520Cell[246822, 5010, 364, 7, 23, "Print"],
6521Cell[247189, 5019, 219, 3, 23, "Print"],
6522Cell[247411, 5024, 205, 2, 23, "Print"],
6523Cell[247619, 5028, 228, 3, 23, "Print"],
6524Cell[247850, 5033, 216, 3, 23, "Print"],
6525Cell[248069, 5038, 208, 2, 23, "Print"],
6526Cell[248280, 5042, 191, 2, 23, "Print"],
6527Cell[248474, 5046, 265, 3, 23, "Print"],
6528Cell[248742, 5051, 172, 2, 23, "Print"]
6529}, Open  ]],
6530Cell[248929, 5056, 276, 6, 32, "Output"]
6531}, Open  ]],
6532Cell[249220, 5065, 120, 2, 32, "Input"],
6533Cell[249343, 5069, 360, 9, 32, "Input"],
6534Cell[CellGroupData[{
6535Cell[249728, 5082, 54, 1, 32, "Input"],
6536Cell[CellGroupData[{
6537Cell[249807, 5087, 1085, 16, 23, "Print"],
6538Cell[250895, 5105, 1356, 23, 23, "Print"],
6539Cell[252254, 5130, 1137, 17, 23, "Print"],
6540Cell[253394, 5149, 1073, 16, 23, "Print"],
6541Cell[254470, 5167, 1082, 16, 23, "Print"],
6542Cell[255555, 5185, 1133, 17, 23, "Print"],
6543Cell[256691, 5204, 1136, 17, 23, "Print"],
6544Cell[257830, 5223, 1071, 16, 23, "Print"],
6545Cell[258904, 5241, 1101, 16, 23, "Print"],
6546Cell[260008, 5259, 1073, 16, 23, "Print"],
6547Cell[261084, 5277, 1138, 17, 23, "Print"]
6548}, Open  ]]
6549}, Open  ]],
6550Cell[262249, 5298, 856, 14, 32, "Input"],
6551Cell[CellGroupData[{
6552Cell[263130, 5316, 750, 12, 32, "Input"],
6553Cell[CellGroupData[{
6554Cell[263905, 5332, 417, 6, 23, "Print"],
6555Cell[264325, 5340, 435, 6, 23, "Print"],
6556Cell[264763, 5348, 437, 6, 23, "Print"],
6557Cell[265203, 5356, 541, 10, 23, "Print"],
6558Cell[265747, 5368, 408, 6, 23, "Print"],
6559Cell[266158, 5376, 432, 6, 23, "Print"],
6560Cell[266593, 5384, 431, 6, 23, "Print"],
6561Cell[267027, 5392, 432, 6, 23, "Print"],
6562Cell[267462, 5400, 439, 6, 23, "Print"],
6563Cell[267904, 5408, 443, 7, 23, "Print"],
6564Cell[268350, 5417, 395, 6, 23, "Print"],
6565Cell[268748, 5425, 427, 6, 23, "Print"],
6566Cell[269178, 5433, 430, 6, 23, "Print"],
6567Cell[269611, 5441, 426, 6, 23, "Print"],
6568Cell[270040, 5449, 609, 11, 43, "Print"]
6569}, Open  ]]
6570}, Open  ]],
6571Cell[CellGroupData[{
6572Cell[270698, 5466, 544, 9, 32, "Input"],
6573Cell[CellGroupData[{
6574Cell[271267, 5479, 1495, 25, 23, "Print"],
6575Cell[272765, 5506, 1505, 25, 23, "Print"],
6576Cell[274273, 5533, 1032, 15, 23, "Print"]
6577}, Open  ]]
6578}, Open  ]],
6579Cell[275332, 5552, 916, 13, 32, "Input"],
6580Cell[CellGroupData[{
6581Cell[276273, 5569, 1576, 25, 55, "Input"],
6582Cell[CellGroupData[{
6583Cell[277874, 5598, 867, 16, 23, "Print"],
6584Cell[278744, 5616, 1090, 23, 23, "Print"],
6585Cell[279837, 5641, 845, 15, 23, "Print"],
6586Cell[280685, 5658, 1027, 20, 23, "Print"],
6587Cell[281715, 5680, 878, 16, 23, "Print"],
6588Cell[282596, 5698, 1363, 27, 23, "Print"],
6589Cell[283962, 5727, 962, 19, 23, "Print"],
6590Cell[284927, 5748, 1316, 26, 23, "Print"],
6591Cell[286246, 5776, 859, 15, 23, "Print"],
6592Cell[287108, 5793, 1126, 24, 23, "Print"],
6593Cell[288237, 5819, 1080, 23, 23, "Print"],
6594Cell[289320, 5844, 1168, 23, 23, "Print"],
6595Cell[290491, 5869, 1154, 23, 23, "Print"],
6596Cell[291648, 5894, 842, 15, 23, "Print"],
6597Cell[292493, 5911, 866, 16, 23, "Print"],
6598Cell[293362, 5929, 1057, 20, 23, "Print"],
6599Cell[294422, 5951, 1216, 23, 23, "Print"],
6600Cell[295641, 5976, 838, 15, 23, "Print"],
6601Cell[296482, 5993, 823, 15, 23, "Print"]
6602}, Open  ]]
6603}, Open  ]]
6604}
6605]
6606*)
6607
6608(* End of internal cache information *)