Context Navigation

Back to ChernSimonsPortal

ChernSimonsPortal: ChernSimons.nb

File ChernSimons.nb, 54.6 KB (added by Maksym Ovchynnikov, 5 years ago)

Line
1	(* Content-type: application/mathematica *)
2
3	(* Wolfram Notebook File *)
4	(* http://www.wolfram.com/nb *)
5
6	(* CreatedBy='Mathematica 6.0' *)
7
8	(CacheID: 234)
9	(* Internal cache information:
10	NotebookFileLineBreakTest
11	NotebookFileLineBreakTest
12	NotebookDataPosition[ 145, 7]
13	NotebookDataLength[ 55795, 1206]
14	NotebookOptionsPosition[ 48595, 1046]
15	NotebookOutlinePosition[ 48990, 1063]
16	CellTagsIndexPosition[ 48947, 1060]
17	WindowFrame->Normal*)
18
19	(* Beginning of Notebook Content *)
20	Notebook[{
21
22	Cell[CellGroupData[{
23	Cell[BoxData[{
24	RowBox[{"$FeynRulesPath", "=",
25	RowBox[{
26	"SetDirectory", "[",
27	"\"\</Users/miksi/AppData/Roaming/Mathematica/Applications/feynrules-\
28	current\>\"", "]"}]}], "\[IndentingNewLine]",
29	RowBox[{"<<", "FeynRules`"}], "\[IndentingNewLine]",
30	RowBox[{
31	RowBox[{"SetDirectory", "[",
32	RowBox[{"$FeynRulesPath", "<>", "\"\</Models/SM\>\""}], "]"}],
33	";"}]}], "Input",
34	CellChangeTimes->{{3.41265862251538^9, 3.412658649947229^9}, {
35	3.423415585782702^9, 3.423415597189939^9}, {3.4234163173467493`*^9,
36	3.4234163227881193`^9}, {3.7699296857950644`^9, 3.7699297151216035`*^9}, {
37	3.770018677814289^9, 3.770018683516034^9}, {3.7700188623105717`*^9,
38	3.770018876381921*^9}},ExpressionUUID->"0708a221-1e85-4914-afcc-\
39	0affdce87cfe"],
40
41	Cell[BoxData["\<\"C:\\\\Users\\\\miksi\\\\AppData\\\\Roaming\\\\Mathematica\\\
42	\\Applications\\\\feynrules-current\"\>"], "Output",
43	CellChangeTimes->{
44	3.770018884618884^9, 3.770026366290766^9, 3.7700287207027664`*^9,
45	3.7700318797155466`^9, {3.770032088753557^9, 3.7700321405882206`*^9},
46	3.7700322130020423`^9, 3.7700338985417213`^9, 3.7700349092303057`*^9,
47	3.770035774463673^9, 3.77004599543388^9, 3.7700492085244484`*^9,
48	3.770050202229926^9, 3.770050489826527^9, 3.7700505460397234`*^9,
49	3.770050932569648^9, {3.7700509999504623`^9, 3.7700510231042695`*^9}, {
50	3.770963419780664^9, 3.7709634469725323`^9}, {3.7716584358604617`*^9,
51	3.7716584474280634`*^9},
52	3.771659067508607*^9},ExpressionUUID->"2584ad75-06bf-4691-b51e-\
53	1e6145c4c1db"],
54
55	Cell[CellGroupData[{
56
57	Cell[BoxData["\<\" - FeynRules - \"\>"], "Print",
58	CellChangeTimes->{
59	3.7700188846498003`^9, 3.7700263662977495`^9, 3.770028720707753*^9,
60	3.770031879724521^9, {3.770032088814395^9, 3.770032140643078*^9},
61	3.770032213009056^9, 3.7700338985546937`^9, 3.770034909239296*^9,
62	3.7700357744716625`^9, 3.770045995439863^9, 3.77004920857232*^9,
63	3.770050202282785^9, 3.770050489830517^9, 3.7700505460796175`*^9,
64	3.7700509326005745`^9, {3.7700509999544525`^9, 3.770051023111249*^9}, {
65	3.770963419801607^9, 3.7709634469805126`^9}, {3.7716584359364696`*^9,
66	3.771658447472066*^9},
67	3.7716590675463657`*^9},ExpressionUUID->"fbb2b292-6508-4b62-a62f-\
68	7849e472af4b"],
69
70	Cell[BoxData[
71	InterpretationBox[
72	RowBox[{"\<\"Version: \"\>", "\[InvisibleSpace]", "\<\"2.3.34\"\>",
73	"\[InvisibleSpace]",
74	RowBox[{"\<\" (\"\>", " ", "\<\"22 May 2019\"\>"}],
75	"\[InvisibleSpace]", "\<\").\"\>"}],
76	SequenceForm["Version: ", "2.3.34", " (" "22 May 2019", ")."],
77	Editable->False]], "Print",
78	CellChangeTimes->{
79	3.7700188846498003`^9, 3.7700263662977495`^9, 3.770028720707753*^9,
80	3.770031879724521^9, {3.770032088814395^9, 3.770032140643078*^9},
81	3.770032213009056^9, 3.7700338985546937`^9, 3.770034909239296*^9,
82	3.7700357744716625`^9, 3.770045995439863^9, 3.77004920857232*^9,
83	3.770050202282785^9, 3.770050489830517^9, 3.7700505460796175`*^9,
84	3.7700509326005745`^9, {3.7700509999544525`^9, 3.770051023111249*^9}, {
85	3.770963419801607^9, 3.7709634469805126`^9}, {3.7716584359364696`*^9,
86	3.771658447472066*^9},
87	3.7716590675463657`*^9},ExpressionUUID->"b1c445e5-76bc-44c3-a9a8-\
88	c53ef3e0b398"],
89
90	Cell[BoxData["\<\"Authors: A. Alloul, N. Christensen, C. Degrande, C. Duhr, \
91	B. Fuks\"\>"], "Print",
92	CellChangeTimes->{
93	3.7700188846498003`^9, 3.7700263662977495`^9, 3.770028720707753*^9,
94	3.770031879724521^9, {3.770032088814395^9, 3.770032140643078*^9},
95	3.770032213009056^9, 3.7700338985546937`^9, 3.770034909239296*^9,
96	3.7700357744716625`^9, 3.770045995439863^9, 3.77004920857232*^9,
97	3.770050202282785^9, 3.770050489830517^9, 3.7700505460796175`*^9,
98	3.7700509326005745`^9, {3.7700509999544525`^9, 3.770051023111249*^9}, {
99	3.770963419801607^9, 3.7709634469805126`^9}, {3.7716584359364696`*^9,
100	3.771658447472066*^9},
101	3.7716590675463657`*^9},ExpressionUUID->"abd080cc-78f1-4323-9885-\
102	3cd53809e107"],
103
104	Cell[BoxData["\<\" \"\>"], "Print",
105	CellChangeTimes->{
106	3.7700188846498003`^9, 3.7700263662977495`^9, 3.770028720707753*^9,
107	3.770031879724521^9, {3.770032088814395^9, 3.770032140643078*^9},
108	3.770032213009056^9, 3.7700338985546937`^9, 3.770034909239296*^9,
109	3.7700357744716625`^9, 3.770045995439863^9, 3.77004920857232*^9,
110	3.770050202282785^9, 3.770050489830517^9, 3.7700505460796175`*^9,
111	3.7700509326005745`^9, {3.7700509999544525`^9, 3.770051023111249*^9}, {
112	3.770963419801607^9, 3.7709634469805126`^9}, {3.7716584359364696`*^9,
113	3.771658447472066*^9},
114	3.771659067561984*^9},ExpressionUUID->"e6976d9c-7595-4662-a518-\
115	ff63617d3e89"],
116
117	Cell[BoxData["\<\"Please cite:\"\>"], "Print",
118	CellChangeTimes->{
119	3.7700188846498003`^9, 3.7700263662977495`^9, 3.770028720707753*^9,
120	3.770031879724521^9, {3.770032088814395^9, 3.770032140643078*^9},
121	3.770032213009056^9, 3.7700338985546937`^9, 3.770034909239296*^9,
122	3.7700357744716625`^9, 3.770045995439863^9, 3.77004920857232*^9,
123	3.770050202282785^9, 3.770050489830517^9, 3.7700505460796175`*^9,
124	3.7700509326005745`^9, {3.7700509999544525`^9, 3.770051023111249*^9}, {
125	3.770963419801607^9, 3.7709634469805126`^9}, {3.7716584359364696`*^9,
126	3.771658447472066*^9},
127	3.7716590675677357`*^9},ExpressionUUID->"ecc02e49-3c43-4649-9b7f-\
128	7d1edb300262"],
129
130	Cell[BoxData["\<\" - Comput.Phys.Commun.185:2250-2300,2014 \
131	(arXiv:1310.1921);\"\>"], "Print",
132	CellChangeTimes->{
133	3.7700188846498003`^9, 3.7700263662977495`^9, 3.770028720707753*^9,
134	3.770031879724521^9, {3.770032088814395^9, 3.770032140643078*^9},
135	3.770032213009056^9, 3.7700338985546937`^9, 3.770034909239296*^9,
136	3.7700357744716625`^9, 3.770045995439863^9, 3.77004920857232*^9,
137	3.770050202282785^9, 3.770050489830517^9, 3.7700505460796175`*^9,
138	3.7700509326005745`^9, {3.7700509999544525`^9, 3.770051023111249*^9}, {
139	3.770963419801607^9, 3.7709634469805126`^9}, {3.7716584359364696`*^9,
140	3.771658447472066*^9},
141	3.7716590675677357`*^9},ExpressionUUID->"c0b12cd2-290e-4015-a85b-\
142	d7d05706126d"],
143
144	Cell[BoxData["\<\" - Comput.Phys.Commun.180:1614-1641,2009 \
145	(arXiv:0806.4194).\"\>"], "Print",
146	CellChangeTimes->{
147	3.7700188846498003`^9, 3.7700263662977495`^9, 3.770028720707753*^9,
148	3.770031879724521^9, {3.770032088814395^9, 3.770032140643078*^9},
149	3.770032213009056^9, 3.7700338985546937`^9, 3.770034909239296*^9,
150	3.7700357744716625`^9, 3.770045995439863^9, 3.77004920857232*^9,
151	3.770050202282785^9, 3.770050489830517^9, 3.7700505460796175`*^9,
152	3.7700509326005745`^9, {3.7700509999544525`^9, 3.770051023111249*^9}, {
153	3.770963419801607^9, 3.7709634469805126`^9}, {3.7716584359364696`*^9,
154	3.771658447472066*^9},
155	3.7716590675677357`*^9},ExpressionUUID->"475c5d4b-f8ab-4a19-b5e2-\
156	e0362a422827"],
157
158	Cell[BoxData["\<\" \"\>"], "Print",
159	CellChangeTimes->{
160	3.7700188846498003`^9, 3.7700263662977495`^9, 3.770028720707753*^9,
161	3.770031879724521^9, {3.770032088814395^9, 3.770032140643078*^9},
162	3.770032213009056^9, 3.7700338985546937`^9, 3.770034909239296*^9,
163	3.7700357744716625`^9, 3.770045995439863^9, 3.77004920857232*^9,
164	3.770050202282785^9, 3.770050489830517^9, 3.7700505460796175`*^9,
165	3.7700509326005745`^9, {3.7700509999544525`^9, 3.770051023111249*^9}, {
166	3.770963419801607^9, 3.7709634469805126`^9}, {3.7716584359364696`*^9,
167	3.771658447472066*^9},
168	3.7716590675677357`*^9},ExpressionUUID->"5d9bd842-40de-439c-a3fd-\
169	d07a1f27eb27"],
170
171	Cell[BoxData["\<\"http://feynrules.phys.ucl.ac.be\"\>"], "Print",
172	CellChangeTimes->{
173	3.7700188846498003`^9, 3.7700263662977495`^9, 3.770028720707753*^9,
174	3.770031879724521^9, {3.770032088814395^9, 3.770032140643078*^9},
175	3.770032213009056^9, 3.7700338985546937`^9, 3.770034909239296*^9,
176	3.7700357744716625`^9, 3.770045995439863^9, 3.77004920857232*^9,
177	3.770050202282785^9, 3.770050489830517^9, 3.7700505460796175`*^9,
178	3.7700509326005745`^9, {3.7700509999544525`^9, 3.770051023111249*^9}, {
179	3.770963419801607^9, 3.7709634469805126`^9}, {3.7716584359364696`*^9,
180	3.771658447472066*^9},
181	3.7716590675677357`*^9},ExpressionUUID->"e0a95798-9b3f-4f46-a5df-\
182	afae4905a0e2"],
183
184	Cell[BoxData["\<\" \"\>"], "Print",
185	CellChangeTimes->{
186	3.7700188846498003`^9, 3.7700263662977495`^9, 3.770028720707753*^9,
187	3.770031879724521^9, {3.770032088814395^9, 3.770032140643078*^9},
188	3.770032213009056^9, 3.7700338985546937`^9, 3.770034909239296*^9,
189	3.7700357744716625`^9, 3.770045995439863^9, 3.77004920857232*^9,
190	3.770050202282785^9, 3.770050489830517^9, 3.7700505460796175`*^9,
191	3.7700509326005745`^9, {3.7700509999544525`^9, 3.770051023111249*^9}, {
192	3.770963419801607^9, 3.7709634469805126`^9}, {3.7716584359364696`*^9,
193	3.771658447472066*^9},
194	3.771659067583359*^9},ExpressionUUID->"5cac65c4-c76a-4765-af9d-\
195	949300ab637b"],
196
197	Cell[BoxData["\<\"The FeynRules palette can be opened using the command \
198	FRPalette[].\"\>"], "Print",
199	CellChangeTimes->{
200	3.7700188846498003`^9, 3.7700263662977495`^9, 3.770028720707753*^9,
201	3.770031879724521^9, {3.770032088814395^9, 3.770032140643078*^9},
202	3.770032213009056^9, 3.7700338985546937`^9, 3.770034909239296*^9,
203	3.7700357744716625`^9, 3.770045995439863^9, 3.77004920857232*^9,
204	3.770050202282785^9, 3.770050489830517^9, 3.7700505460796175`*^9,
205	3.7700509326005745`^9, {3.7700509999544525`^9, 3.770051023111249*^9}, {
206	3.770963419801607^9, 3.7709634469805126`^9}, {3.7716584359364696`*^9,
207	3.771658447472066*^9},
208	3.771659067583359*^9},ExpressionUUID->"4816d7d1-74ba-4154-824b-\
209	33bd2fbc4a88"]
210	}, Open ]]
211	}, Open ]],
212
213	Cell[CellGroupData[{
214
215	Cell["Chern-Simons Lagrangian", "Section",
216	CellChangeTimes->{{3.770018943147238^9, 3.7700189488479867`^9}, {
217	3.7709633802581882`^9, 3.7709633806382055`^9}, {3.771660160478606*^9,
218	3.771660160748828*^9}},ExpressionUUID->"8b2944ed-22b5-4602-a003-\
219	2dadb1cf0b3d"],
220
221	Cell[CellGroupData[{
222
223	Cell[BoxData[{
224	RowBox[{"LoadModel", "[",
225	RowBox[{"\"\<SM.fr\>\"", ",", "\"\<Chern-Simons-Portal.fr\>\""}],
226	"]"}], "\[IndentingNewLine]",
227	RowBox[{"LoadRestriction", "[",
228	RowBox[{"\"\<Massless.rst\>\"", ",", "\"\<DiagonalCKM.rst\>\""}],
229	"]"}], "\[IndentingNewLine]",
230	RowBox[{"LCS", ":=",
231	RowBox[{
232	RowBox[{"cW", " ",
233	RowBox[{"Eps", "[",
234	RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Beta]"}], "]"}],
235
236	RowBox[{"W", "[", "\[Mu]", "]"}], " ",
237	RowBox[{"xb", "[", "\[Nu]", "]"}],
238	RowBox[{"del", "[",
239	RowBox[{
240	RowBox[{"HC", "[",
241	RowBox[{"W", "[", "\[Alpha]", "]"}], "]"}], ",", "\[Beta]"}], "]"}]}],
242	"+",
243	RowBox[{"cW", " ",
244	RowBox[{"Eps", "[",
245	RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Beta]"}], "]"}],
246
247	RowBox[{"HC", "[",
248	RowBox[{"W", "[", "\[Mu]", "]"}], "]"}], " ",
249	RowBox[{"xb", "[", "\[Nu]", "]"}],
250	RowBox[{"del", "[",
251	RowBox[{
252	RowBox[{"W", "[", "\[Alpha]", "]"}], ",", "\[Beta]"}], "]"}]}], "+",
253	RowBox[{"cZ", " ",
254	RowBox[{"Eps", "[",
255	RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Beta]"}], "]"}],
256
257	RowBox[{"Z", "[", "\[Mu]", "]"}], " ",
258	RowBox[{"xb", "[", "\[Nu]", "]"}],
259	RowBox[{"del", "[",
260	RowBox[{
261	RowBox[{"Z", "[", "\[Alpha]", "]"}], ",", "\[Beta]"}], "]"}]}], "+",
262	RowBox[{"cZgamma", " ",
263	RowBox[{"Eps", "[",
264	RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Beta]"}], "]"}],
265
266	RowBox[{"Z", "[", "\[Mu]", "]"}], " ",
267	RowBox[{"xb", "[", "\[Nu]", "]"}],
268	RowBox[{"del", "[",
269	RowBox[{
270	RowBox[{"Z", "[", "\[Alpha]", "]"}], ",", "\[Beta]"}], "]"}]}], "+",
271	RowBox[{"Cmu", " ",
272	RowBox[{"xb", "[", "\[Nu]", "]"}],
273	RowBox[{"mubar", ".",
274	RowBox[{"Ga", "[", "\[Nu]", "]"}], ".",
275	RowBox[{"Ga", "[", "5", "]"}], ".", "mu"}]}], "+",
276	RowBox[{
277	FractionBox[
278	SuperscriptBox["Mxb", "2"], "2"],
279	RowBox[{"xb", "[", "\[Nu]", "]"}],
280	RowBox[{"xb", "[", "\[Nu]", "]"}]}], "-",
281	RowBox[{
282	FractionBox["1", "4"],
283	RowBox[{"(",
284	RowBox[{
285	RowBox[{"del", "[",
286	RowBox[{
287	RowBox[{"xb", "[", "\[Mu]", "]"}], ",", "\[Nu]"}], "]"}], "-",
288	RowBox[{"del", "[",
289	RowBox[{
290	RowBox[{"xb", "[", "\[Nu]", "]"}], ",", "\[Mu]"}], "]"}]}], ")"}],
291	RowBox[{"(",
292	RowBox[{
293	RowBox[{"del", "[",
294	RowBox[{
295	RowBox[{"xb", "[", "\[Mu]", "]"}], ",", "\[Nu]"}], "]"}], "-",
296	RowBox[{"del", "[",
297	RowBox[{
298	RowBox[{"xb", "[", "\[Nu]", "]"}], ",", "\[Mu]"}], "]"}]}],
299	")"}]}]}]}], "\[IndentingNewLine]",
300	RowBox[{"CheckHermiticity", "[", "LCS", "]"}], "\[IndentingNewLine]",
301	RowBox[{
302	RowBox[{"FeynmanGauge", "\[Rule]", "False"}],
303	";"}], "\[IndentingNewLine]",
304	RowBox[{
305	RowBox[{"WriteUFO", "[",
306	RowBox[{"LSM", "+", "LCS"}], "]"}], ";"}], "\[IndentingNewLine]",
307	RowBox[{"FeynmanRules", "[", "LCS", "]"}], "\[IndentingNewLine]",
308	RowBox[{"CheckMassSpectrum", "[", "LCS", "]"}]}], "Input",
309	CellChangeTimes->{{3.7700189562442236`^9, 3.7700191587633967`^9}, {
310	3.770019247701813^9, 3.7700193086497188`^9}, {3.7700193567779555`*^9,
311	3.770019394678585^9}, {3.770020411712239^9, 3.77002042281653*^9}, {
312	3.770020549244278^9, 3.770020552564395^9}, {3.770020609944874*^9,
313	3.770020617893608^9}, {3.7700207091119576`^9, 3.7700208667985945`*^9}, {
314	3.7700213240982018`^9, 3.7700213566351824`^9}, {3.77002140374516*^9,
315	3.7700214779929557`^9}, {3.7700216056020727`^9, 3.7700216517685575`*^9}, {
316	3.770050483069606^9, 3.7700504845586214`^9}, {3.7709633478498116`*^9,
317	3.770963362999318^9}, {3.771658539438449^9, 3.7716585448172464`*^9}, {
318	3.7716585865161314`*^9,
319	3.7716586059277987`*^9}},ExpressionUUID->"900d4461-aeba-47bc-8179-\
320	81878652e795"],
321
322	Cell[CellGroupData[{
323
324	Cell[BoxData["\<\"Merging model-files...\"\>"], "Print",
325	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
326	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
327	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
328	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
329	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
330	3.771659071600277*^9},ExpressionUUID->"1d6fc101-fb15-4463-b37a-\
331	916e2517a433"],
332
333	Cell[BoxData["\<\"This model implementation was created by\"\>"], "Print",
334	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
335	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
336	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
337	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
338	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
339	3.7716590716362786`*^9},ExpressionUUID->"3e165d0c-4210-4060-afaa-\
340	0edb4381bf37"],
341
342	Cell[BoxData["\<\"M.Ovchynnikov\"\>"], "Print",
343	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
344	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
345	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
346	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
347	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
348	3.771659071640274*^9},ExpressionUUID->"9b60cd0e-adb7-437d-8a62-\
349	b88afd43f10a"],
350
351	Cell[BoxData[
352	InterpretationBox[
353	RowBox[{"\<\"Model Version: \"\>", "\[InvisibleSpace]", "\<\"1.0\"\>"}],
354	SequenceForm["Model Version: ", "1.0"],
355	Editable->False]], "Print",
356	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
357	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
358	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
359	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
360	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
361	3.771659071644276*^9},ExpressionUUID->"bbae8cd4-92fc-497b-8654-\
362	ab2ea17fa74b"],
363
364	Cell[BoxData["\<\"For more information, type ModelInformation[].\"\>"], \
365	"Print",
366	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
367	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
368	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
369	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
370	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
371	3.7716590716482787`*^9},ExpressionUUID->"7108e137-3426-4e3c-b8c9-\
372	9cd03a5da0a4"],
373
374	Cell[BoxData["\<\"\"\>"], "Print",
375	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
376	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
377	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
378	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
379	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
380	3.7716590716562967`*^9},ExpressionUUID->"5d90bb4f-c4c3-48e2-b3fd-\
381	7c3eb66846e3"],
382
383	Cell[BoxData["\<\" - Loading particle classes.\"\>"], "Print",
384	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
385	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
386	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
387	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
388	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
389	3.7716590716602755`*^9},ExpressionUUID->"882f7885-0842-46c5-9ad5-\
390	5deb7ddda685"],
391
392	Cell[BoxData["\<\" - Loading gauge group classes.\"\>"], "Print",
393	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
394	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
395	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
396	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
397	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
398	3.771659071792019*^9},ExpressionUUID->"07ae89bb-6288-4cd5-aba6-\
399	f3fecfae20d7"],
400
401	Cell[BoxData["\<\" - Loading parameter classes.\"\>"], "Print",
402	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
403	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
404	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
405	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
406	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
407	3.7716590717960157`*^9},ExpressionUUID->"ae3d7c99-9d23-47fb-95cf-\
408	914510f3b122"],
409
410	Cell[BoxData[
411	InterpretationBox[
412	RowBox[{"\<\"\\nModel \"\>", "\[InvisibleSpace]", "\<\"ChernSimons\"\>",
413	"\[InvisibleSpace]", "\<\" loaded.\"\>"}],
414	SequenceForm["\nModel ", "ChernSimons", " loaded."],
415	Editable->False]], "Print",
416	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
417	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
418	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
419	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
420	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
421	3.771659071900015*^9},ExpressionUUID->"f594271d-f11d-4078-8323-\
422	087810f853c5"],
423
424	Cell[BoxData[
425	InterpretationBox[
426	RowBox[{"\<\"Loading restrictions from \"\>",
427	"\[InvisibleSpace]", "\<\"Massless.rst\"\>",
428	"\[InvisibleSpace]", "\<\" : \"\>", "\[InvisibleSpace]",
429	DynamicBox[ToBoxes[PRIVATE`FR$restrictionCounter, StandardForm],
430	ImageSizeCache->{10., {0., 12.}}], "\[InvisibleSpace]", "\<\" / \"\>",
431	"\[InvisibleSpace]", "18"}],
432	SequenceForm["Loading restrictions from ", "Massless.rst", " : ",
433	Dynamic[PRIVATE`FR$restrictionCounter], " / ", 18],
434	Editable->False]], "Print",
435	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
436	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
437	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
438	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
439	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
440	3.771659072841994*^9},ExpressionUUID->"23f840b4-1fac-49d7-902a-\
441	de61c1fe5bae"],
442
443	Cell[BoxData[
444	InterpretationBox[
445	RowBox[{"\<\"Loading restrictions from \"\>",
446	"\[InvisibleSpace]", "\<\"DiagonalCKM.rst\"\>",
447	"\[InvisibleSpace]", "\<\" : \"\>", "\[InvisibleSpace]",
448	DynamicBox[ToBoxes[PRIVATE`FR$restrictionCounter, StandardForm],
449	ImageSizeCache->{10., {0., 12.}}], "\[InvisibleSpace]", "\<\" / \"\>",
450	"\[InvisibleSpace]", "3"}],
451	SequenceForm["Loading restrictions from ", "DiagonalCKM.rst", " : ",
452	Dynamic[PRIVATE`FR$restrictionCounter], " / ", 3],
453	Editable->False]], "Print",
454	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
455	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
456	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
457	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
458	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
459	3.7716590730281677`*^9},ExpressionUUID->"babc7bb3-8a84-4ecb-a061-\
460	32b66cce0eca"],
461
462	Cell[BoxData["\<\"Restrictions loaded.\"\>"], "Print",
463	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
464	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
465	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
466	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
467	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
468	3.7716590731561704`*^9},ExpressionUUID->"67aa327e-1799-4879-b2cb-\
469	07003dcc3658"],
470
471	Cell[BoxData["\<\"Checking for hermiticity by calculating the Feynman rules \
472	contained in L-HC[L].\"\>"], "Print",
473	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
474	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
475	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
476	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
477	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
478	3.771659073196169*^9},ExpressionUUID->"1a6335fb-3326-4b68-a7e1-\
479	d1c7a24dba72"],
480
481	Cell[BoxData["\<\"If the lagrangian is hermitian, then the number of vertices \
482	should be zero.\"\>"], "Print",
483	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
484	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
485	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
486	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
487	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
488	3.771659073204173*^9},ExpressionUUID->"c6adb990-5f52-4ffa-b96c-\
489	fe67a27c0651"],
490
491	Cell[BoxData[
492	StyleBox["\<\"Starting Feynman rule calculation.\"\>",
493	StripOnInput->False,
494	LineColor->RGBColor[1, 0.5, 0],
495	FrontFaceColor->RGBColor[1, 0.5, 0],
496	BackFaceColor->RGBColor[1, 0.5, 0],
497	GraphicsColor->RGBColor[1, 0.5, 0],
498	FontWeight->Bold,
499	FontColor->RGBColor[1, 0.5, 0]]], "Print",
500	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
501	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
502	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
503	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
504	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
505	3.7716590735241704`*^9},ExpressionUUID->"63cf4728-d6fa-44cf-9cbe-\
506	e9e289be8458"],
507
508	Cell[BoxData["\<\"Expanding the Lagrangian...\"\>"], "Print",
509	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
510	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
511	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
512	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
513	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
514	3.7716590735281687`*^9},ExpressionUUID->"11cbe5f2-952d-4ade-a132-\
515	71db5214f9ad"],
516
517	Cell[BoxData["\<\"No vertices found.\"\>"], "Print",
518	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
519	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
520	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
521	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
522	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
523	3.7716590735321712`*^9},ExpressionUUID->"acaab19b-eafe-40dd-81e2-\
524	354003693d40"],
525
526	Cell[BoxData[
527	InterpretationBox[
528	RowBox[{"0", "\[InvisibleSpace]", "\<\" vertices obtained.\"\>"}],
529	SequenceForm[0, " vertices obtained."],
530	Editable->False]], "Print",
531	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
532	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
533	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
534	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
535	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
536	3.7716590735401692`*^9},ExpressionUUID->"ba35ddb3-2d7a-4db3-994d-\
537	f42f49201704"],
538
539	Cell[BoxData["\<\"The lagrangian is hermitian.\"\>"], "Print",
540	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
541	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
542	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
543	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
544	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
545	3.7716590735441685`*^9},ExpressionUUID->"0b93fd14-080f-430c-b70d-\
546	fb0271972095"]
547	}, Open ]],
548
549	Cell[BoxData[
550	RowBox[{"{", "}"}]], "Output",
551	CellChangeTimes->{3.771658987677289*^9,
552	3.771659073548171*^9},ExpressionUUID->"b896ecd7-5873-4fdc-98ea-\
553	2443412e2b2b"],
554
555	Cell[CellGroupData[{
556
557	Cell[BoxData["\<\" --- Universal FeynRules Output (UFO) v 1.1 ---\"\>"], \
558	"Print",
559	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
560	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
561	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
562	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
563	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
564	3.771659076296605*^9},ExpressionUUID->"d8eb7552-1fe8-424b-9fd4-\
565	92181578a500"],
566
567	Cell[BoxData[
568	StyleBox["\<\"Starting Feynman rule calculation.\"\>",
569	StripOnInput->False,
570	LineColor->RGBColor[1, 0.5, 0],
571	FrontFaceColor->RGBColor[1, 0.5, 0],
572	BackFaceColor->RGBColor[1, 0.5, 0],
573	GraphicsColor->RGBColor[1, 0.5, 0],
574	FontWeight->Bold,
575	FontColor->RGBColor[1, 0.5, 0]]], "Print",
576	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
577	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
578	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
579	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
580	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
581	3.7716590766674204`*^9},ExpressionUUID->"2b7d686d-88cc-4c4f-a362-\
582	792d5be7ec7a"],
583
584	Cell[BoxData["\<\"Expanding the Lagrangian...\"\>"], "Print",
585	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
586	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
587	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
588	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
589	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
590	3.771659076669442*^9},ExpressionUUID->"bb1038a7-14a7-4708-b066-\
591	24b9dbcb38cd"],
592
593	Cell[BoxData[
594	InterpretationBox[
595	RowBox[{"\<\"Expanding the indices over \"\>", "\[InvisibleSpace]", "2",
596	"\[InvisibleSpace]", "\<\" cores\"\>"}],
597	SequenceForm["Expanding the indices over ", 2, " cores"],
598	Editable->False]], "Print",
599	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
600	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
601	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
602	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
603	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
604	3.7716590766795483`*^9},ExpressionUUID->"1b1e6491-0e8b-4c07-b337-\
605	61bee43fd3f0"],
606
607	Cell[BoxData["\<\"Collecting the different structures that enter the \
608	vertex.\"\>"], "Print",
609	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
610	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
611	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
612	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
613	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
614	3.7716590857077036`*^9},ExpressionUUID->"71efb46d-0ca1-4729-896c-\
615	b6eec9d71cb4"],
616
617	Cell[BoxData[
618	InterpretationBox[
619	RowBox[{
620	"101", "\[InvisibleSpace]", "\<\" possible non-zero vertices have been \
621	found -> starting the computation: \"\>", "\[InvisibleSpace]",
622	DynamicBox[ToBoxes[FeynRules`FR$FeynmanRules, StandardForm],
623	ImageSizeCache->{10., {0., 12.}}], "\[InvisibleSpace]", "\<\" / \"\>",
624	"\[InvisibleSpace]", "101", "\[InvisibleSpace]", "\<\".\"\>"}],
625	SequenceForm[
626	101, " possible non-zero vertices have been found -> starting the \
627	computation: ",
628	Dynamic[FeynRules`FR$FeynmanRules], " / ", 101, "."],
629	Editable->False]], "Print",
630	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
631	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
632	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
633	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
634	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
635	3.771659085801607*^9},ExpressionUUID->"36d5d78b-1444-415e-b73e-\
636	e9a8fbc60454"],
637
638	Cell[BoxData[
639	InterpretationBox[
640	RowBox[{"96", "\[InvisibleSpace]", "\<\" vertices obtained.\"\>"}],
641	SequenceForm[96, " vertices obtained."],
642	Editable->False]], "Print",
643	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
644	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
645	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
646	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
647	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
648	3.7716590914926147`*^9},ExpressionUUID->"e7595139-4e1e-46fb-aa71-\
649	7a380fa7fd92"],
650
651	Cell[BoxData[
652	InterpretationBox[
653	RowBox[{"\<\"Flavor expansion of the vertices distributed over \"\>",
654	"\[InvisibleSpace]", "2", "\[InvisibleSpace]", "\<\" cores: \"\>",
655	"\[InvisibleSpace]",
656	DynamicBox[ToBoxes[FeynRules`FR$Count1, StandardForm],
657	ImageSizeCache->{20., {0., 12.}}], "\[InvisibleSpace]", "\<\" / \"\>",
658	"\[InvisibleSpace]", "96"}],
659	SequenceForm[
660	"Flavor expansion of the vertices distributed over ", 2, " cores: ",
661	Dynamic[FeynRules`FR$Count1], " / ", 96],
662	Editable->False]], "Print",
663	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
664	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
665	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
666	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
667	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
668	3.7716590950037527`*^9},ExpressionUUID->"f6b736b6-4348-4a9e-99d8-\
669	d5c429a08c06"],
670
671	Cell[BoxData["\<\" - Saved vertices in InterfaceRun[ 1 ].\"\>"], "Print",
672	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
673	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
674	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
675	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
676	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
677	3.7716591009803276`*^9},ExpressionUUID->"06d5d6ff-da08-4fd0-9652-\
678	4f1f96b9ef8a"],
679
680	Cell[BoxData[
681	StyleBox["\<\"Computing the squared matrix elements relevant for the 1->2 \
682	decays: \"\>",
683	StripOnInput->False,
684	LineColor->RGBColor[1, 0.5, 0],
685	FrontFaceColor->RGBColor[1, 0.5, 0],
686	BackFaceColor->RGBColor[1, 0.5, 0],
687	GraphicsColor->RGBColor[1, 0.5, 0],
688	FontWeight->Bold,
689	FontColor->RGBColor[1, 0.5, 0]]], "Print",
690	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
691	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
692	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
693	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
694	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
695	3.7716591010283084`*^9},ExpressionUUID->"0f5a82ed-e028-453f-82ad-\
696	b00ab757e1b7"],
697
698	Cell[BoxData[
699	InterpretationBox[
700	RowBox[{
701	DynamicBox[ToBoxes[PRIVATE`mycounter, StandardForm],
702	ImageSizeCache->{20., {0., 12.}}], "\[InvisibleSpace]", "\<\" / \"\>",
703	"\[InvisibleSpace]", "43"}],
704	SequenceForm[
705	Dynamic[PRIVATE`mycounter], " / ", 43],
706	Editable->False]], "Print",
707	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
708	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
709	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
710	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
711	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
712	3.7716591010718985`*^9},ExpressionUUID->"2fe75a04-7a61-476b-b361-\
713	42f329f0a19b"],
714
715	Cell[BoxData[
716	InterpretationBox[
717	RowBox[{"\<\"Squared matrix elent compute in \"\>", "\[InvisibleSpace]",
718	"2.21875`", "\[InvisibleSpace]", "\<\" seconds.\"\>"}],
719	SequenceForm["Squared matrix elent compute in ", 2.21875, " seconds."],
720	Editable->False]], "Print",
721	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
722	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
723	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
724	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
725	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
726	3.77165911251306*^9},ExpressionUUID->"cce4b2a1-cbb4-4639-8e0e-211b868445b4"],
727
728	Cell[BoxData[
729	InterpretationBox[
730	RowBox[{"\<\"Decay widths computed in \"\>", "\[InvisibleSpace]",
731	"0.015625`", "\[InvisibleSpace]", "\<\" seconds.\"\>"}],
732	SequenceForm["Decay widths computed in ", 0.015625, " seconds."],
733	Editable->False]], "Print",
734	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
735	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
736	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
737	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
738	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
739	3.7716591125530577`*^9},ExpressionUUID->"8d31a23f-6be0-45c4-b5ab-\
740	932f117fa391"],
741
742	Cell[BoxData["\<\"Preparing Python output.\"\>"], "Print",
743	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
744	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
745	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
746	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
747	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
748	3.7716591125634604`*^9},ExpressionUUID->"ace19c51-aa18-44d2-9966-\
749	e0e662dd2361"],
750
751	Cell[BoxData["\<\" - Splitting vertices into building blocks.\"\>"], \
752	"Print",
753	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
754	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
755	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
756	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
757	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
758	3.771659112701269*^9},ExpressionUUID->"da24c3fd-4359-4c59-aca7-\
759	834c6e9fa023"],
760
761	Cell[BoxData[
762	InterpretationBox[
763	RowBox[{"\<\"Splitting of vertices distributed over \"\>",
764	"\[InvisibleSpace]", "2", "\[InvisibleSpace]", "\<\" kernels.\"\>"}],
765	SequenceForm["Splitting of vertices distributed over ", 2, " kernels."],
766	Editable->False]], "Print",
767	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
768	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
769	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
770	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
771	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
772	3.7716591127372704`*^9},ExpressionUUID->"fb3cf851-00fb-4bbf-9a20-\
773	d9d8f71de672"],
774
775	Cell[BoxData[
776	InterpretationBox[
777	RowBox[{"\<\" - Optimizing: \"\>", "\[InvisibleSpace]",
778	DynamicBox[ToBoxes[PRIVATE`PY$SplitVertexCounter, StandardForm],
779	ImageSizeCache->{30., {0., 12.}}], "\[InvisibleSpace]", "\<\"/\"\>",
780	"\[InvisibleSpace]", "122", "\[InvisibleSpace]", "\<\" .\"\>"}],
781	SequenceForm[" - Optimizing: ",
782	Dynamic[PRIVATE`PY$SplitVertexCounter], "/", 122, " ."],
783	Editable->False]], "Print",
784	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
785	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
786	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
787	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
788	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
789	3.771659114801661*^9},ExpressionUUID->"2c126e44-5b10-471a-ae7e-\
790	bd4c251dafbb"],
791
792	Cell[BoxData["\<\" - Writing files.\"\>"], "Print",
793	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
794	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
795	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
796	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
797	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
798	3.771659114948775*^9},ExpressionUUID->"dff2f723-4f9a-4d4c-ac9c-\
799	61cf03c66c1e"],
800
801	Cell[BoxData["\<\"Done!\"\>"], "Print",
802	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
803	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
804	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
805	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
806	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
807	3.7716591152495604`*^9},ExpressionUUID->"3c1e0bea-2f75-493e-ae4f-\
808	aaa025ce6b40"],
809
810	Cell[BoxData[
811	StyleBox["\<\"Starting Feynman rule calculation.\"\>",
812	StripOnInput->False,
813	LineColor->RGBColor[1, 0.5, 0],
814	FrontFaceColor->RGBColor[1, 0.5, 0],
815	BackFaceColor->RGBColor[1, 0.5, 0],
816	GraphicsColor->RGBColor[1, 0.5, 0],
817	FontWeight->Bold,
818	FontColor->RGBColor[1, 0.5, 0]]], "Print",
819	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
820	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
821	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
822	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
823	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
824	3.7716591152575617`*^9},ExpressionUUID->"11e8e8e7-3852-4fa2-96a6-\
825	fba49a3b5fef"],
826
827	Cell[BoxData["\<\"Expanding the Lagrangian...\"\>"], "Print",
828	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
829	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
830	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
831	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
832	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
833	3.77165911526156*^9},ExpressionUUID->"6aaeee7e-f6f6-4ccb-883f-bd8cd41622c0"],
834
835	Cell[BoxData["\<\"Collecting the different structures that enter the \
836	vertex.\"\>"], "Print",
837	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
838	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
839	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
840	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
841	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
842	3.771659115413562*^9},ExpressionUUID->"b732fd47-918a-40c8-85dd-\
843	bfe85508b742"],
844
845	Cell[BoxData[
846	InterpretationBox[
847	RowBox[{
848	"3", "\[InvisibleSpace]", "\<\" possible non-zero vertices have been found \
849	-> starting the computation: \"\>", "\[InvisibleSpace]",
850	DynamicBox[ToBoxes[FeynRules`FR$FeynmanRules, StandardForm],
851	ImageSizeCache->{10., {0., 12.}}], "\[InvisibleSpace]", "\<\" / \"\>",
852	"\[InvisibleSpace]", "3", "\[InvisibleSpace]", "\<\".\"\>"}],
853	SequenceForm[
854	3, " possible non-zero vertices have been found -> starting the \
855	computation: ",
856	Dynamic[FeynRules`FR$FeynmanRules], " / ", 3, "."],
857	Editable->False]], "Print",
858	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
859	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
860	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
861	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
862	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
863	3.7716591154215603`*^9},ExpressionUUID->"deec0945-3fbf-4c87-823a-\
864	f89ecce2ccfe"],
865
866	Cell[BoxData[
867	InterpretationBox[
868	RowBox[{"3", "\[InvisibleSpace]", "\<\" vertices obtained.\"\>"}],
869	SequenceForm[3, " vertices obtained."],
870	Editable->False]], "Print",
871	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
872	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
873	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
874	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
875	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
876	3.771659115569034*^9},ExpressionUUID->"cd88433b-9c5b-454f-b473-\
877	5c97f05a5a4c"]
878	}, Open ]],
879
880	Cell[BoxData[
881	RowBox[{"{",
882	RowBox[{
883	RowBox[{"{",
884	RowBox[{
885	RowBox[{"{",
886	RowBox[{
887	RowBox[{"{",
888	RowBox[{"W", ",", "1"}], "}"}], ",",
889	RowBox[{"{",
890	RowBox[{
891	SuperscriptBox["W", "\[Dagger]"], ",", "2"}], "}"}], ",",
892	RowBox[{"{",
893	RowBox[{"xb", ",", "3"}], "}"}]}], "}"}], ",",
894	RowBox[{
895	RowBox[{
896	RowBox[{"-", "cW"}], " ",
897	SubscriptBox["\[Epsilon]",
898	RowBox[{
899	SubscriptBox["\<\"\[Mu]\"\>", "2"], ",",
900	SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
901	SubscriptBox["\<\"\[Mu]\"\>", "3"], ",", "mu$1"}]], " ",
902	SubsuperscriptBox["\<\"p\"\>", "1", "mu$1"]}], "+",
903	RowBox[{"cW", " ",
904	SubscriptBox["\[Epsilon]",
905	RowBox[{
906	SubscriptBox["\<\"\[Mu]\"\>", "2"], ",",
907	SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
908	SubscriptBox["\<\"\[Mu]\"\>", "3"], ",", "mu$1"}]], " ",
909	SubsuperscriptBox["\<\"p\"\>", "2", "mu$1"]}]}]}], "}"}], ",",
910	RowBox[{"{",
911	RowBox[{
912	RowBox[{"{",
913	RowBox[{
914	RowBox[{"{",
915	RowBox[{"xb", ",", "1"}], "}"}], ",",
916	RowBox[{"{",
917	RowBox[{"Z", ",", "2"}], "}"}], ",",
918	RowBox[{"{",
919	RowBox[{"Z", ",", "3"}], "}"}]}], "}"}], ",",
920	RowBox[{
921	RowBox[{
922	RowBox[{"-", "cZ"}], " ",
923	SubscriptBox["\[Epsilon]",
924	RowBox[{
925	SubscriptBox["\<\"\[Mu]\"\>", "2"], ",",
926	SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
927	SubscriptBox["\<\"\[Mu]\"\>", "3"], ",", "mu$1"}]], " ",
928	SubsuperscriptBox["\<\"p\"\>", "2", "mu$1"]}], "-",
929	RowBox[{"cZgamma", " ",
930	SubscriptBox["\[Epsilon]",
931	RowBox[{
932	SubscriptBox["\<\"\[Mu]\"\>", "2"], ",",
933	SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
934	SubscriptBox["\<\"\[Mu]\"\>", "3"], ",", "mu$1"}]], " ",
935	SubsuperscriptBox["\<\"p\"\>", "2", "mu$1"]}], "+",
936	RowBox[{"cZ", " ",
937	SubscriptBox["\[Epsilon]",
938	RowBox[{
939	SubscriptBox["\<\"\[Mu]\"\>", "2"], ",",
940	SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
941	SubscriptBox["\<\"\[Mu]\"\>", "3"], ",", "mu$1"}]], " ",
942	SubsuperscriptBox["\<\"p\"\>", "3", "mu$1"]}], "+",
943	RowBox[{"cZgamma", " ",
944	SubscriptBox["\[Epsilon]",
945	RowBox[{
946	SubscriptBox["\<\"\[Mu]\"\>", "2"], ",",
947	SubscriptBox["\<\"\[Mu]\"\>", "1"], ",",
948	SubscriptBox["\<\"\[Mu]\"\>", "3"], ",", "mu$1"}]], " ",
949	SubsuperscriptBox["\<\"p\"\>", "3", "mu$1"]}]}]}], "}"}], ",",
950	RowBox[{"{",
951	RowBox[{
952	RowBox[{"{",
953	RowBox[{
954	RowBox[{"{",
955	RowBox[{
956	OverscriptBox["mu", "\<\"-\"\>"], ",", "1"}], "}"}], ",",
957	RowBox[{"{",
958	RowBox[{"mu", ",", "2"}], "}"}], ",",
959	RowBox[{"{",
960	RowBox[{"xb", ",", "3"}], "}"}]}], "}"}], ",",
961	RowBox[{"\[ImaginaryI]", " ", "Cmu", " ",
962	SubscriptBox[
963	RowBox[{
964	TemplateBox[{"\[Gamma]",SubscriptBox["\"\[Mu]\"", "3"]},
965	"Superscript"], ".",
966	TemplateBox[{"\[Gamma]","5"},
967	"Superscript"]}],
968	RowBox[{
969	SubscriptBox["\<\"s\"\>", "1"], ",",
970	SubscriptBox["\<\"s\"\>", "2"]}]]}]}], "}"}]}], "}"}]], "Output",
971	CellChangeTimes->{3.771658987677289*^9,
972	3.771659115581035*^9},ExpressionUUID->"699a56d5-5009-4353-9332-\
973	4e50d024f36f"],
974
975	Cell[CellGroupData[{
976
977	Cell[BoxData[
978	InterpretationBox[
979	RowBox[{"\<\"Neglecting all terms with more than \"\>",
980	"\[InvisibleSpace]", "\<\"2\"\>",
981	"\[InvisibleSpace]", "\<\" particles.\"\>"}],
982	SequenceForm["Neglecting all terms with more than ", "2", " particles."],
983	Editable->False]], "Print",
984	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
985	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
986	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
987	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
988	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
989	3.771659115717035*^9},ExpressionUUID->"17f9ab24-e34d-43d4-9bff-\
990	3d495d7eccf6"],
991
992	Cell[BoxData["\<\"All mass terms are diagonal.\"\>"], "Print",
993	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
994	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
995	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
996	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
997	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
998	3.771659115717035*^9},ExpressionUUID->"9f6517e6-241f-40e4-a8e4-\
999	3fdb18484161"],
1000
1001	Cell[BoxData["\<\"Getting mass spectrum.\"\>"], "Print",
1002	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
1003	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
1004	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
1005	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
1006	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
1007	3.7716591158570366`*^9},ExpressionUUID->"df2ea49e-9d88-41b7-a89d-\
1008	61afbffd5131"],
1009
1010	Cell[BoxData["\<\"Checking for less then 0.1% agreement with model file \
1011	values.\"\>"], "Print",
1012	CellChangeTimes->{3.7700216522841816`^9, 3.770026399829214^9,
1013	3.7700287621778016`^9, 3.770031899874612^9, 3.7700322352874136`*^9,
1014	3.7700339211592064`^9, 3.7700349207445^9, 3.7700357877112317`*^9,
1015	3.770046004513585^9, 3.770049223728769^9, 3.770050221265997*^9,
1016	3.77005055587042^9, 3.770051053461372^9, 3.771658985795362*^9,
1017	3.771659115865037*^9},ExpressionUUID->"a2ae73b0-ca49-45ae-919c-\
1018	6d24d9883195"]
1019	}, Open ]],
1020
1021	Cell[BoxData[
1022	TagBox[GridBox[{
1023	{"\<\"Particle\"\>", "\<\"Analytic value\"\>", "\<\"Numerical value\"\>", \
1024	"\<\"Model-file value\"\>"},
1025	{"xb",
1026	SqrtBox[
1027	SuperscriptBox["Mxb", "2"]], "1.`", "1.`"}
1028	},
1029	GridBoxAlignment->{
1030	"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
1031	"RowsIndexed" -> {}},
1032	GridBoxSpacings->{"Columns" -> {
1033	Offset[0.27999999999999997`], {
1034	Offset[2.0999999999999996`]},
1035	Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
1036	Offset[0.2], {
1037	Offset[0.4]},
1038	Offset[0.2]}, "RowsIndexed" -> {}}],
1039	Function[BoxForm`e$,
1040	TableForm[BoxForm`e$]]]], "Output",
1041	CellChangeTimes->{3.771658987677289*^9,
1042	3.7716591158690357`*^9},ExpressionUUID->"7942bc2c-61fb-4553-87ca-\
1043	2fc151605884"]
1044	}, Open ]]
1045	}, Open ]]
1046	},
1047	WindowSize->{1500, 917},
1048	WindowMargins->{{-8, Automatic}, {Automatic, -8}},
1049	ShowSelection->True,
1050	Magnification:>1.6 Inherited,
1051	FrontEndVersion->"11.1 for Microsoft Windows (64-bit) (March 13, 2017)",
1052	StyleDefinitions->"Default.nb"
1053	]
1054	(* End of Notebook Content *)
1055
1056	(* Internal cache information *)
1057	(*CellTagsOutline
1058	CellTagsIndex->{}
1059	*)
1060	(*CellTagsIndex
1061	CellTagsIndex->{}
1062	*)
1063	(*NotebookFileOutline
1064	Notebook[{
1065	Cell[CellGroupData[{
1066	Cell[567, 22, 761, 16, 109, "Input", "ExpressionUUID" -> \
1067	"0708a221-1e85-4914-afcc-0affdce87cfe"],
1068	Cell[1331, 40, 782, 12, 48, "Output", "ExpressionUUID" -> \
1069	"2584ad75-06bf-4691-b51e-1e6145c4c1db"],
1070	Cell[CellGroupData[{
1071	Cell[2138, 56, 694, 11, 34, "Print", "ExpressionUUID" -> \
1072	"fbb2b292-6508-4b62-a62f-7849e472af4b"],
1073	Cell[2835, 69, 965, 18, 34, "Print", "ExpressionUUID" -> \
1074	"b1c445e5-76bc-44c3-a9a8-c53ef3e0b398"],
1075	Cell[3803, 89, 746, 12, 34, "Print", "ExpressionUUID" -> \
1076	"abd080cc-78f1-4323-9885-3cd53809e107"],
1077	Cell[4552, 103, 678, 11, 34, "Print", "ExpressionUUID" -> \
1078	"e6976d9c-7595-4662-a518-ff63617d3e89"],
1079	Cell[5233, 116, 691, 11, 34, "Print", "ExpressionUUID" -> \
1080	"ecc02e49-3c43-4649-9b7f-7d1edb300262"],
1081	Cell[5927, 129, 743, 12, 34, "Print", "ExpressionUUID" -> \
1082	"c0b12cd2-290e-4015-a85b-d7d05706126d"],
1083	Cell[6673, 143, 743, 12, 34, "Print", "ExpressionUUID" -> \
1084	"475c5d4b-f8ab-4a19-b5e2-e0362a422827"],
1085	Cell[7419, 157, 680, 11, 34, "Print", "ExpressionUUID" -> \
1086	"5d9bd842-40de-439c-a3fd-d07a1f27eb27"],
1087	Cell[8102, 170, 710, 11, 34, "Print", "ExpressionUUID" -> \
1088	"e0a95798-9b3f-4f46-a5df-afae4905a0e2"],
1089	Cell[8815, 183, 678, 11, 34, "Print", "ExpressionUUID" -> \
1090	"5cac65c4-c76a-4765-af9d-949300ab637b"],
1091	Cell[9496, 196, 745, 12, 34, "Print", "ExpressionUUID" -> \
1092	"4816d7d1-74ba-4154-824b-33bd2fbc4a88"]
1093	}, Open ]]
1094	}, Open ]],
1095	Cell[CellGroupData[{
1096	Cell[10290, 214, 269, 4, 113, "Section", "ExpressionUUID" -> \
1097	"8b2944ed-22b5-4602-a003-2dadb1cf0b3d"],
1098	Cell[CellGroupData[{
1099	Cell[10584, 222, 3851, 97, 435, "Input", "ExpressionUUID" -> \
1100	"900d4461-aeba-47bc-8179-81878652e795"],
1101	Cell[CellGroupData[{
1102	Cell[14460, 323, 485, 7, 34, "Print", "ExpressionUUID" -> \
1103	"1d6fc101-fb15-4463-b37a-916e2517a433"],
1104	Cell[14948, 332, 505, 7, 34, "Print", "ExpressionUUID" -> \
1105	"3e165d0c-4210-4060-afaa-0edb4381bf37"],
1106	Cell[15456, 341, 476, 7, 34, "Print", "ExpressionUUID" -> \
1107	"9b60cd0e-adb7-437d-8a62-b88afd43f10a"],
1108	Cell[15935, 350, 609, 11, 34, "Print", "ExpressionUUID" -> \
1109	"bbae8cd4-92fc-497b-8654-ab2ea17fa74b"],
1110	Cell[16547, 363, 513, 8, 34, "Print", "ExpressionUUID" -> \
1111	"7108e137-3426-4e3c-b8c9-9cd03a5da0a4"],
1112	Cell[17063, 373, 465, 7, 34, "Print", "ExpressionUUID" -> \
1113	"5d90bb4f-c4c3-48e2-b3fd-7c3eb66846e3"],
1114	Cell[17531, 382, 495, 7, 34, "Print", "ExpressionUUID" -> \
1115	"882f7885-0842-46c5-9ad5-5deb7ddda685"],
1116	Cell[18029, 391, 496, 7, 34, "Print", "ExpressionUUID" -> \
1117	"07ae89bb-6288-4cd5-aba6-f3fecfae20d7"],
1118	Cell[18528, 400, 496, 7, 34, "Print", "ExpressionUUID" -> \
1119	"ae3d7c99-9d23-47fb-95cf-914510f3b122"],
1120	Cell[19027, 409, 669, 12, 63, "Print", "ExpressionUUID" -> \
1121	"f594271d-f11d-4078-8323-087810f853c5"],
1122	Cell[19699, 423, 951, 17, 34, "Print", "ExpressionUUID" -> \
1123	"23f840b4-1fac-49d7-902a-de61c1fe5bae"],
1124	Cell[20653, 442, 957, 17, 34, "Print", "ExpressionUUID" -> \
1125	"babc7bb3-8a84-4ecb-a061-32b66cce0eca"],
1126	Cell[21613, 461, 485, 7, 34, "Print", "ExpressionUUID" -> \
1127	"67aa327e-1799-4879-b2cb-07003dcc3658"],
1128	Cell[22101, 470, 544, 8, 34, "Print", "ExpressionUUID" -> \
1129	"1a6335fb-3326-4b68-a7e1-d1c7a24dba72"],
1130	Cell[22648, 480, 540, 8, 34, "Print", "ExpressionUUID" -> \
1131	"c6adb990-5f52-4ffa-b96c-fe67a27c0651"],
1132	Cell[23191, 490, 737, 15, 34, "Print", "ExpressionUUID" -> \
1133	"63cf4728-d6fa-44cf-9cbe-e9e289be8458"],
1134	Cell[23931, 507, 492, 7, 34, "Print", "ExpressionUUID" -> \
1135	"11cbe5f2-952d-4ade-a132-71db5214f9ad"],
1136	Cell[24426, 516, 483, 7, 34, "Print", "ExpressionUUID" -> \
1137	"acaab19b-eafe-40dd-81e2-354003693d40"],
1138	Cell[24912, 525, 605, 11, 34, "Print", "ExpressionUUID" -> \
1139	"ba35ddb3-2d7a-4db3-994d-f42f49201704"],
1140	Cell[25520, 538, 493, 7, 34, "Print", "ExpressionUUID" -> \
1141	"0b93fd14-080f-430c-b70d-fb0271972095"]
1142	}, Open ]],
1143	Cell[26028, 548, 169, 4, 48, "Output", "ExpressionUUID" -> \
1144	"b896ecd7-5873-4fdc-98ea-2443412e2b2b"],
1145	Cell[CellGroupData[{
1146	Cell[26222, 556, 512, 8, 34, "Print", "ExpressionUUID" -> \
1147	"d8eb7552-1fe8-424b-9fd4-92181578a500"],
1148	Cell[26737, 566, 737, 15, 34, "Print", "ExpressionUUID" -> \
1149	"2b7d686d-88cc-4c4f-a362-792d5be7ec7a"],
1150	Cell[27477, 583, 490, 7, 34, "Print", "ExpressionUUID" -> \
1151	"bb1038a7-14a7-4708-b066-24b9dbcb38cd"],
1152	Cell[27970, 592, 674, 12, 34, "Print", "ExpressionUUID" -> \
1153	"1b1e6491-0e8b-4c07-b337-61bee43fd3f0"],
1154	Cell[28647, 606, 525, 8, 34, "Print", "ExpressionUUID" -> \
1155	"71efb46d-0ca1-4729-896c-b6eec9d71cb4"],
1156	Cell[29175, 616, 1009, 19, 34, "Print", "ExpressionUUID" -> \
1157	"36d5d78b-1444-415e-b73e-e9a8fbc60454"],
1158	Cell[30187, 637, 607, 11, 34, "Print", "ExpressionUUID" -> \
1159	"e7595139-4e1e-46fb-aa71-7a380fa7fd92"],
1160	Cell[30797, 650, 962, 18, 34, "Print", "ExpressionUUID" -> \
1161	"f6b736b6-4348-4a9e-99d8-d5c429a08c06"],
1162	Cell[31762, 670, 506, 7, 34, "Print", "ExpressionUUID" -> \
1163	"06d5d6ff-da08-4fd0-9652-4f1f96b9ef8a"],
1164	Cell[32271, 679, 773, 16, 34, "Print", "ExpressionUUID" -> \
1165	"0f5a82ed-e028-453f-82ad-b00ab757e1b7"],
1166	Cell[33047, 697, 728, 15, 34, "Print", "ExpressionUUID" -> \
1167	"2fe75a04-7a61-476b-b361-42f329f0a19b"],
1168	Cell[33778, 714, 698, 11, 34, "Print", "ExpressionUUID" -> \
1169	"cce4b2a1-cbb4-4639-8e0e-211b868445b4"],
1170	Cell[34479, 727, 691, 12, 34, "Print", "ExpressionUUID" -> \
1171	"8d31a23f-6be0-45c4-b5ab-932f117fa391"],
1172	Cell[35173, 741, 489, 7, 34, "Print", "ExpressionUUID" -> \
1173	"ace19c51-aa18-44d2-9966-e0e662dd2361"],
1174	Cell[35665, 750, 511, 8, 34, "Print", "ExpressionUUID" -> \
1175	"da24c3fd-4359-4c59-aca7-834c6e9fa023"],
1176	Cell[36179, 760, 704, 12, 34, "Print", "ExpressionUUID" -> \
1177	"fb3cf851-00fb-4bbf-9a20-d9d8f71de672"],
1178	Cell[36886, 774, 862, 15, 34, "Print", "ExpressionUUID" -> \
1179	"2c126e44-5b10-471a-ae7e-bd4c251dafbb"],
1180	Cell[37751, 791, 483, 7, 34, "Print", "ExpressionUUID" -> \
1181	"dff2f723-4f9a-4d4c-ac9c-61cf03c66c1e"],
1182	Cell[38237, 800, 470, 7, 34, "Print", "ExpressionUUID" -> \
1183	"3c1e0bea-2f75-493e-ae4f-aaa025ce6b40"],
1184	Cell[38710, 809, 737, 15, 34, "Print", "ExpressionUUID" -> \
1185	"11e8e8e7-3852-4fa2-96a6-fba49a3b5fef"],
1186	Cell[39450, 826, 487, 6, 34, "Print", "ExpressionUUID" -> \
1187	"6aaeee7e-f6f6-4ccb-883f-bd8cd41622c0"],
1188	Cell[39940, 834, 523, 8, 34, "Print", "ExpressionUUID" -> \
1189	"b732fd47-918a-40c8-85dd-bfe85508b742"],
1190	Cell[40466, 844, 1003, 19, 34, "Print", "ExpressionUUID" -> \
1191	"deec0945-3fbf-4c87-823a-f89ecce2ccfe"],
1192	Cell[41472, 865, 603, 11, 34, "Print", "ExpressionUUID" -> \
1193	"cd88433b-9c5b-454f-b473-5c97f05a5a4c"]
1194	}, Open ]],
1195	Cell[42090, 879, 3397, 93, 137, "Output", "ExpressionUUID" -> \
1196	"699a56d5-5009-4353-9332-4e50d024f36f"],
1197	Cell[CellGroupData[{
1198	Cell[45512, 976, 714, 13, 34, "Print", "ExpressionUUID" -> \
1199	"17f9ab24-e34d-43d4-9bff-3d495d7eccf6"],
1200	Cell[46229, 991, 491, 7, 34, "Print", "ExpressionUUID" -> \
1201	"9f6517e6-241f-40e4-a8e4-3fdb18484161"],
1202	Cell[46723, 1000, 487, 7, 34, "Print", "ExpressionUUID" -> \
1203	"df2ea49e-9d88-41b7-a89d-61afbffd5131"],
1204	Cell[47213, 1009, 526, 8, 34, "Print", "ExpressionUUID" -> \
1205	"a2ae73b0-ca49-45ae-919c-6d24d9883195"]
1206	}, Open ]],
1207	Cell[47754, 1020, 813, 22, 102, "Output", "ExpressionUUID" -> \
1208	"7942bc2c-61fb-4553-87ca-2fc151605884"]
1209	}, Open ]]
1210	}, Open ]]
1211	}
1212	]
1213	*)
1214

Download in other formats:

Original Format