MLFVtIIIseesaw: yuk_mlfv_typeIII-see-saw.nb

File yuk_mlfv_typeIII-see-saw.nb, 17.0 KB (added by Oscar Eboli, 8 years ago)

Mathematica notebook that evaluate the Yukawa couplings at the best fit values of neutrino parameters from NUFIT - 3.0 global fit

Line 
1(* Content-type: application/vnd.wolfram.mathematica *)
2
3(*** Wolfram Notebook File ***)
4(* http://www.wolfram.com/nb *)
5
6(* CreatedBy='Mathematica 10.3' *)
7
8(*CacheID: 234*)
9(* Internal cache information:
10NotebookFileLineBreakTest
11NotebookFileLineBreakTest
12NotebookDataPosition[ 158, 7]
13NotebookDataLength[ 16759, 490]
14NotebookOptionsPosition[ 16064, 462]
15NotebookOutlinePosition[ 16425, 478]
16CellTagsIndexPosition[ 16382, 475]
17WindowFrame->Normal*)
18
19(* Beginning of Notebook Content *)
20Notebook[{
21Cell[BoxData[
22 RowBox[{"(*", " ",
23 RowBox[{
24 RowBox[{
25 RowBox[{
26 "Yukawa", " ", "couplings", " ", "corresponding", " ", "to", " ", "the",
27 " ", "best", " ", "fit", " ", "values", " ", "of", " ", "neutrino", " ",
28 "parameters", " ", "from", " ", "NUFIT"}], "-",
29 RowBox[{
30 "3.0", " ", "global", " ", "fit", " ", "to", " ", "neutrino", " ",
31 "oscillaiton", " ", "data", " ", "\[IndentingNewLine]", "from", " ",
32 RowBox[{"Ref", ".", " ", "I", ".", " ", "Esteban"}], " ", "etal", " ",
33 "JHEP", " ", "1701", " ",
34 RowBox[{"(", "2017", ")"}], " ", "087"}]}], ",", " ",
35 RowBox[{
36 RowBox[{"arXiv", ":",
37 RowBox[{"1611.01514", " ", "\[IndentingNewLine]", "http"}], ":"}], "//",
38 RowBox[{
39 RowBox[{"www", ".", "nu"}], "-",
40 RowBox[{
41 RowBox[{
42 RowBox[{"fit", ".", "org"}], "/", "\[IndentingNewLine]", "The"}], " ",
43 "yukawa", " ", "coupligngs", " ", "are", " ", "given", " ", "as", " ",
44 "a", " ", "function", " ", "of", " ", "the", " ", "unique", " ",
45 "parameter", " ", "undetermined", " ", "by", " ", "oscilllation", " ",
46 "data", " ", "phase", " ",
47 RowBox[{"alpha", ".", " ", "For"}], " ", "update", " ", "and", " ",
48 "allowed", " ", "allowed", " ", "ranges", " ", "of", " ", "the", " ",
49 "yukawa", " ", "couplings", " ", "contact", " ", "the", " ", "authors",
50 " ", "of", " ", "the", " ", "NUFIT", " ", "project"}]}]}]}], " ",
51 "*)"}]], "Input",
52 CellChangeTimes->{{3.712669481518971*^9, 3.7126695513544397`*^9}, {
53 3.712669585676566*^9, 3.712669820707429*^9}, {3.712669884602373*^9,
54 3.7126699225025167`*^9}}],
55
56Cell[CellGroupData[{
57
58Cell["Best fit point for normal ordering", "Subchapter",
59 CellChangeTimes->{{3.712741935515971*^9, 3.712741949415163*^9}}],
60
61Cell[BoxData[{
62 RowBox[{
63 RowBox[{"sinsqt13n", "=", "0.0217"}], ";"}], "\[IndentingNewLine]",
64 RowBox[{
65 RowBox[{"sinsqt23n", "=", "0.441"}], ";"}], "\[IndentingNewLine]",
66 RowBox[{
67 RowBox[{"sinsqt12n", "=", "0.306"}], ";"}], "\[IndentingNewLine]",
68 RowBox[{
69 RowBox[{"dm21n", "=",
70 RowBox[{"7.50", " ",
71 RowBox[{"10", "^",
72 RowBox[{"-", "5"}]}]}]}], ";"}], "\[IndentingNewLine]",
73 RowBox[{
74 RowBox[{"dm31n", "=",
75 RowBox[{"2.524", " ",
76 RowBox[{"10", "^",
77 RowBox[{"-", "3"}]}]}]}], ";"}], "\[IndentingNewLine]",
78 RowBox[{
79 RowBox[{"dm32n", "=",
80 RowBox[{"dm31n", "-", "dm21n"}]}], ";"}], "\[IndentingNewLine]",
81 RowBox[{
82 RowBox[{"dcpn", "=",
83 RowBox[{"261", " ",
84 RowBox[{"Pi", "/", "180"}]}]}], " ", ";"}], "\[IndentingNewLine]",
85 RowBox[{
86 RowBox[{"rn", "=",
87 RowBox[{"dm21n", "/", "dm32n"}]}], ";"}], "\[IndentingNewLine]",
88 RowBox[{
89 RowBox[{"rhon", "=",
90 RowBox[{
91 RowBox[{"(",
92 RowBox[{
93 RowBox[{"Sqrt", "[",
94 RowBox[{"1", "+", "rn"}], "]"}], "-", "rn"}], ")"}], "/",
95 RowBox[{"(",
96 RowBox[{
97 RowBox[{"Sqrt", "[",
98 RowBox[{"1", "+", "rn"}], "]"}], "+", "rn"}], ")"}]}]}],
99 ";"}], "\[IndentingNewLine]",
100 RowBox[{
101 RowBox[{"s12n", "=",
102 RowBox[{"Sqrt", "[", "sinsqt12n", "]"}]}], ";"}], "\[IndentingNewLine]",
103 RowBox[{
104 RowBox[{"c12n", "=",
105 RowBox[{"Sqrt", "[",
106 RowBox[{"1", "-", "sinsqt12n"}], "]"}]}], ";"}], "\[IndentingNewLine]",
107 RowBox[{
108 RowBox[{"s13n", "=",
109 RowBox[{"Sqrt", "[", "sinsqt13n", "]"}]}], ";"}], "\[IndentingNewLine]",
110 RowBox[{
111 RowBox[{"c13n", "=",
112 RowBox[{"Sqrt", "[",
113 RowBox[{"1", "-", "sinsqt13n"}], "]"}]}], ";"}], "\[IndentingNewLine]",
114 RowBox[{
115 RowBox[{"s23n", "=",
116 RowBox[{"Sqrt", "[", "sinsqt23n", "]"}]}], ";"}], "\[IndentingNewLine]",
117 RowBox[{
118 RowBox[{"c23n", "=",
119 RowBox[{"Sqrt", "[",
120 RowBox[{"1", "-", "sinsqt23n"}], "]"}]}], ";"}], "\[IndentingNewLine]",
121 RowBox[{
122 RowBox[{"Ue1n0", "=",
123 RowBox[{"c12n", " ", "c13n"}]}], ";"}], "\n",
124 RowBox[{
125 RowBox[{"Ue2n0", "=",
126 RowBox[{"s12n", " ", "c13n"}]}], ";"}], "\n",
127 RowBox[{
128 RowBox[{"Ue3n0", "=",
129 RowBox[{"s13n", " ",
130 RowBox[{"Exp", "[",
131 RowBox[{
132 RowBox[{"-", "I"}], " ", "dcpn"}], "]"}]}]}], ";"}], "\n",
133 RowBox[{
134 RowBox[{"Um1n0", "=",
135 RowBox[{
136 RowBox[{
137 RowBox[{"-", "s12n"}], " ", "c23n"}], "-",
138 RowBox[{"c12n", " ", "s13n", " ", "s23n", " ",
139 RowBox[{"Exp", "[",
140 RowBox[{"I", " ", "dcpn"}], "]"}]}]}]}], ";"}], "\n",
141 RowBox[{
142 RowBox[{"Um2n0", "=",
143 RowBox[{
144 RowBox[{"c12n", " ", "c23n"}], "-",
145 RowBox[{"s12n", " ", "s13n", " ", "s23n", " ",
146 RowBox[{"Exp", "[",
147 RowBox[{"I", " ", "dcpn"}], "]"}]}]}]}], ";"}], "\n",
148 RowBox[{
149 RowBox[{"Um3n0", "=",
150 RowBox[{"c13n", " ", "s23n"}]}], ";"}], "\[IndentingNewLine]",
151 RowBox[{
152 RowBox[{"Ut1n0", "=",
153 RowBox[{
154 RowBox[{"s12n", " ", "s23n"}], "-",
155 RowBox[{"c12n", " ", "s13n", " ", "c23n", " ",
156 RowBox[{"Exp", "[",
157 RowBox[{"I", " ", "dcpn"}], "]"}]}]}]}], ";"}], "\n",
158 RowBox[{
159 RowBox[{"Ut2n0", "=",
160 RowBox[{
161 RowBox[{
162 RowBox[{"-", "c12n"}], " ", "s23n"}], "-",
163 RowBox[{"s12n", " ", "s13n", " ", "c23n", " ",
164 RowBox[{"Exp", "[",
165 RowBox[{"I", " ", "dcpn"}], "]"}]}]}]}], ";"}], "\n",
166 RowBox[{
167 RowBox[{"Ut3n0", "=",
168 RowBox[{"c13n", " ", "c23n"}]}], ";"}]}], "Input",
169 CellChangeTimes->CompressedData["
1701:eJwdzU8ogwEABfAvtZ0m1GLNaFNaLkuTcqBsJOwyk2RWajbtT01t2RalWVpq
171kX3TaFtDNFYmKXNQOJhSSBumVrvMCsvK2kmG732H1+/wXj2BelqhrSAIgkcF
1726gOtOWUkLyFH85/QFG4vQumOr2qccrfPWwdDbDkPdjTp+PBq2y6CruCxGH5L
173k93wuocxAI8WhTOwxVuyw6+QcwE2hOpdMBNxu+Fr2rQK1xsHfVBomwjQv2UD
174LZ/l34Q/cW0UEpbJGHwfvqVVi1nndN+cuoQfOXYcKvembmBp6S8BD8cak/BN
175U3yG0jVPCnLldoYK2s+YUNDpr4QHClkNvJOpOLBwqqOtrg1LoI5M026YbBo1
176pZ5r1MK22JAZPt0/zEKX1RyEjqJxC5IFVf885UXWMgK5vwnbI/YG0Ry0ZpkO
177uNwbcMKulagH+r1iEp6UM/uQI3+JwH9smvEK
178 "]],
179
180Cell[BoxData[
181 RowBox[{
182 StyleBox[
183 RowBox[{
184 "Yukawa", " ", "couplings", " ", "as", " ", "a", " ", "function", " ",
185 "of", " ", "alpha"}], "Section"], "\[IndentingNewLine]"}]], "Input",
186 Evaluatable->False,
187 CellChangeTimes->CompressedData["
1881:eJxTTMoPSmViYGCQAmIQnTnb4GnUyteOk8JfvwXRectMP4Fop8XT+KOB9BK3
189yeIgep5IgAyItlDKUADRRxZW6IHotjmbjED0L6fLDiD6mDOrJ4je0KJeCqI1
190J3+pANEf5zU1gmjZedJtIPreyu5uEP3kdt4EED1dzmsaiFYvj58NtvdvFphW
1914Jk1H0T/OZq6FkQzFCdvA9Evg8+A6SQjnn1gedXrB0D0q6ciR0F01PK0kyD6
192S8f/SyB6XaTcZRD9IuXTNRDtNGXidRAtFVDBGgOiK3azgWhFm1m8IHpNkLcg
193iD7rHSMBot9tzwDTAmLLHEF0xqTbYHpGXnlKEpDOlMpOBdHG2wKLQPTVcxeq
194QHRbWdEcEN3wKXsBiJ70LsajDkjvf1wcCqKl/l0qvwJSn6VXDaLLHrM1gOgU
195W+lmEA0AeP/cmg==
196 "]],
197
198Cell[BoxData[
199 RowBox[{
200 RowBox[{
201 RowBox[{"Yen", "[", "alpha_", "]"}], ":=",
202 RowBox[{
203 RowBox[{"Abs", "[",
204 RowBox[{
205 RowBox[{
206 RowBox[{"Conjugate", "[", "Ue3n0", " ", "]"}],
207 RowBox[{"Sqrt", "[",
208 RowBox[{"1", "+", "rhon"}], "]"}]}], "+",
209 RowBox[{
210 RowBox[{"Conjugate", "[",
211 RowBox[{"Ue2n0", " ",
212 RowBox[{"Exp", "[",
213 RowBox[{"I", " ", "alpha"}], "]"}]}], "]"}], " ",
214 RowBox[{"Sqrt", "[",
215 RowBox[{"1", "-", "rhon"}], "]"}]}]}], "]"}], "/",
216 RowBox[{"Sqrt", "[", "2", "]"}]}]}], ";",
217 RowBox[{
218 RowBox[{"Ymun", "[", "alpha_", "]"}], ":=",
219 RowBox[{
220 RowBox[{"Abs", "[",
221 RowBox[{
222 RowBox[{
223 RowBox[{"Conjugate", "[", "Um3n0", "]"}], " ",
224 RowBox[{"Sqrt", "[",
225 RowBox[{"1", "+", "rhon"}], "]"}]}], "+",
226 RowBox[{
227 RowBox[{"Conjugate", "[",
228 RowBox[{"Um2n0", " ",
229 RowBox[{"Exp", "[",
230 RowBox[{"I", " ", "alpha"}], "]"}]}], "]"}], " ",
231 RowBox[{"Sqrt", "[",
232 RowBox[{"1", "-", "rhon"}], "]"}]}]}], "]"}], "/",
233 RowBox[{"Sqrt", "[", "2", "]"}]}]}], ";",
234 RowBox[{
235 RowBox[{"Ytun", "[", "alpha_", "]"}], ":=",
236 RowBox[{
237 RowBox[{"Abs", "[",
238 RowBox[{
239 RowBox[{
240 RowBox[{"Conjugate", "[", "Ut3n0", "]"}], " ",
241 RowBox[{"Sqrt", "[",
242 RowBox[{"1", "+", "rhon"}], "]"}]}], "+",
243 RowBox[{
244 RowBox[{"Conjugate", "[",
245 RowBox[{"Ut2n0", " ",
246 RowBox[{"Exp", "[",
247 RowBox[{"I", " ", "alpha"}], "]"}]}], "]"}], " ",
248 RowBox[{"Sqrt", "[",
249 RowBox[{"1", "-", "rhon"}], "]"}]}]}], "]"}], "/",
250 RowBox[{"Sqrt", "[", "2", "]"}]}]}], ";"}]], "Input"]
251}, Open ]],
252
253Cell[CellGroupData[{
254
255Cell["Inverted ordering", "Subchapter",
256 CellChangeTimes->{{3.712918351452322*^9, 3.7129183548669786`*^9}}],
257
258Cell[BoxData[{
259 RowBox[{
260 RowBox[{"sinsqt13i", "=", "0.0218"}], ";"}], "\[IndentingNewLine]",
261 RowBox[{
262 RowBox[{"sinsqt23i", "=", "0.587"}], ";"}], "\[IndentingNewLine]",
263 RowBox[{
264 RowBox[{"sinsqt12i", "=", "0.306"}], ";"}], "\[IndentingNewLine]",
265 RowBox[{
266 RowBox[{"dm21i", "=",
267 RowBox[{"7.50", " ",
268 RowBox[{"10", "^",
269 RowBox[{"-", "5"}]}]}]}], ";"}], "\[IndentingNewLine]",
270 RowBox[{
271 RowBox[{"dm32i", "=",
272 RowBox[{
273 RowBox[{"-", "2.514"}], " ",
274 RowBox[{"10", "^",
275 RowBox[{"-", "3"}]}]}]}], ";"}], "\[IndentingNewLine]",
276 RowBox[{
277 RowBox[{"dm31i", "=",
278 RowBox[{"dm32i", "+", "dm21i"}]}], ";"}], "\[IndentingNewLine]",
279 RowBox[{
280 RowBox[{"dcpi", "=",
281 RowBox[{"277", " ",
282 RowBox[{"Pi", "/", "180"}]}]}], " ", ";"}], "\[IndentingNewLine]",
283 RowBox[{
284 RowBox[{"ri", "=",
285 RowBox[{
286 RowBox[{"-", "dm21i"}], "/", "dm31i"}]}], ";"}], "\[IndentingNewLine]",
287 RowBox[{
288 RowBox[{"rhoi", "=",
289 RowBox[{
290 RowBox[{"(",
291 RowBox[{
292 RowBox[{"Sqrt", "[",
293 RowBox[{"1", "+", "ri"}], "]"}], "-", "1"}], ")"}], "/",
294 RowBox[{"(",
295 RowBox[{
296 RowBox[{"Sqrt", "[",
297 RowBox[{"1", "+", "ri"}], "]"}], "+", "1"}], ")"}]}]}],
298 ";"}], "\[IndentingNewLine]",
299 RowBox[{
300 RowBox[{"s12i", "=",
301 RowBox[{"Sqrt", "[", "sinsqt12i", "]"}]}], ";"}], "\[IndentingNewLine]",
302 RowBox[{
303 RowBox[{"c12i", "=",
304 RowBox[{"Sqrt", "[",
305 RowBox[{"1", "-", "sinsqt12i"}], "]"}]}], ";"}], "\[IndentingNewLine]",
306 RowBox[{
307 RowBox[{"s13i", "=",
308 RowBox[{"Sqrt", "[", "sinsqt13i", "]"}]}], ";"}], "\[IndentingNewLine]",
309 RowBox[{
310 RowBox[{"c13i", "=",
311 RowBox[{"Sqrt", "[",
312 RowBox[{"1", "-", "sinsqt13i"}], "]"}]}], ";"}], "\[IndentingNewLine]",
313 RowBox[{
314 RowBox[{"s23i", "=",
315 RowBox[{"Sqrt", "[", "sinsqt23i", "]"}]}], ";"}], "\[IndentingNewLine]",
316 RowBox[{
317 RowBox[{"c23i", "=",
318 RowBox[{"Sqrt", "[",
319 RowBox[{"1", "-", "sinsqt23i"}], "]"}]}], ";"}], "\[IndentingNewLine]",
320 RowBox[{
321 RowBox[{"Ue1i0", "=",
322 RowBox[{"c12i", " ", "c13i"}]}], ";"}], "\n",
323 RowBox[{
324 RowBox[{"Ue2i0", "=",
325 RowBox[{"s12i", " ", "c13i"}]}], ";"}], "\n",
326 RowBox[{
327 RowBox[{"Ue3i0", "=",
328 RowBox[{"s13i", " ",
329 RowBox[{"Exp", "[",
330 RowBox[{
331 RowBox[{"-", "I"}], " ", "dcpi"}], "]"}]}]}], ";"}], "\n",
332 RowBox[{
333 RowBox[{"Um1i0", "=",
334 RowBox[{
335 RowBox[{
336 RowBox[{"-", "s12i"}], " ", "c23i"}], "-",
337 RowBox[{"c12i", " ", "s13i", " ", "s23i", " ",
338 RowBox[{"Exp", "[",
339 RowBox[{"I", " ", "dcpi"}], "]"}]}]}]}], ";"}], "\n",
340 RowBox[{
341 RowBox[{"Um2i0", "=",
342 RowBox[{
343 RowBox[{"c12i", " ", "c23i"}], "-",
344 RowBox[{"s12i", " ", "s13i", " ", "s23i", " ",
345 RowBox[{"Exp", "[",
346 RowBox[{"I", " ", "dcpi"}], "]"}]}]}]}], ";"}], "\n",
347 RowBox[{
348 RowBox[{"Um3i0", "=",
349 RowBox[{"c13i", " ", "s23i"}]}], ";"}], "\[IndentingNewLine]",
350 RowBox[{
351 RowBox[{"Ut1i0", "=",
352 RowBox[{
353 RowBox[{"s12i", " ", "s23i"}], "-",
354 RowBox[{"c12i", " ", "s13i", " ", "c23i", " ",
355 RowBox[{"Exp", "[",
356 RowBox[{"I", " ", "dcpi"}], "]"}]}]}]}], ";"}], "\n",
357 RowBox[{
358 RowBox[{"Ut2i0", "=",
359 RowBox[{
360 RowBox[{
361 RowBox[{"-", "c12i"}], " ", "s23i"}], "-",
362 RowBox[{"s12i", " ", "s13i", " ", "c23i", " ",
363 RowBox[{"Exp", "[",
364 RowBox[{"I", " ", "dcpi"}], "]"}]}]}]}], ";"}], "\n",
365 RowBox[{
366 RowBox[{"Ut3i0", "=",
367 RowBox[{"c13i", " ", "c23i"}]}], ";"}]}], "Input",
368 CellChangeTimes->{{3.7126708429634542`*^9, 3.71267085594069*^9}, {
369 3.7126719181517363`*^9, 3.712672191498571*^9}, {3.712672237521976*^9,
370 3.712672276274688*^9}, {3.712672375228467*^9, 3.712672376373741*^9}, {
371 3.712685027623419*^9, 3.712685097252076*^9}, 3.712685333319643*^9, {
372 3.712918360907927*^9, 3.7129183647973146`*^9}, {3.712918404426309*^9,
373 3.712918452497957*^9}, 3.712918560699739*^9, {3.7129186827342577`*^9,
374 3.712918682803941*^9}, {3.7129188139075317`*^9, 3.712918814025947*^9}}],
375
376Cell[BoxData[
377 StyleBox[
378 RowBox[{
379 "Yukawa", " ", "couplings", " ", "as", " ", "a", " ", "function", " ", "of",
380 " ", "alpha"}], "Section"]], "Input",
381 Evaluatable->False,
382 CellChangeTimes->{{3.7126708429634542`*^9, 3.71267085594069*^9}, {
383 3.7126719181517363`*^9, 3.712672191498571*^9}, {3.712672237521976*^9,
384 3.712672276274688*^9}, {3.712672375228467*^9, 3.712672376373741*^9}, {
385 3.712685027623419*^9, 3.712685097252076*^9}, 3.712685333319643*^9, {
386 3.712918360907927*^9, 3.7129183647973146`*^9}, {3.712918404426309*^9,
387 3.712918452497957*^9}, {3.712918560699739*^9, 3.712918572105578*^9}}],
388
389Cell[BoxData[{
390 RowBox[{
391 RowBox[{
392 RowBox[{"Yei", "[", "alpha_", "]"}], ":=",
393 RowBox[{
394 RowBox[{"Abs", "[",
395 RowBox[{
396 RowBox[{
397 RowBox[{"Conjugate", "[",
398 RowBox[{"Ue2i0", " ",
399 RowBox[{"Exp", "[",
400 RowBox[{"I", " ", "alpha"}], "]"}]}], "]"}],
401 RowBox[{"Sqrt", "[",
402 RowBox[{"1", "+", "rhoi"}], "]"}]}], " ", "+",
403 RowBox[{
404 RowBox[{"Conjugate", "[",
405 RowBox[{"Ue1i0", " ",
406 RowBox[{"Exp", "[",
407 RowBox[{
408 RowBox[{"-", "I"}], " ", "alpha"}], "]"}]}], "]"}], " ",
409 RowBox[{"Sqrt", "[",
410 RowBox[{"1", "-", "rhoi"}], "]"}]}]}], "]"}], "/",
411 RowBox[{"Sqrt", "[", "2", "]"}]}]}], ";",
412 RowBox[{
413 RowBox[{"Ymui", "[", "alpha_", "]"}], ":=",
414 RowBox[{
415 RowBox[{"Abs", "[",
416 RowBox[{
417 RowBox[{
418 RowBox[{"Conjugate", "[",
419 RowBox[{"Um2i0", " ",
420 RowBox[{"Exp", "[",
421 RowBox[{"I", " ", "alpha"}], "]"}]}], "]"}],
422 RowBox[{"Sqrt", "[",
423 RowBox[{"1", "+", "rhoi"}], "]"}]}], " ", "+",
424 RowBox[{
425 RowBox[{"Conjugate", "[",
426 RowBox[{"Um1i0", " ",
427 RowBox[{"Exp", "[",
428 RowBox[{
429 RowBox[{"-", "I"}], " ", "alpha"}], "]"}]}], "]"}], " ",
430 RowBox[{"Sqrt", "[",
431 RowBox[{"1", "-", "rhoi"}], "]"}]}]}], "]"}], "/",
432 RowBox[{"Sqrt", "[", "2", "]"}]}]}], ";"}], "\n",
433 RowBox[{
434 RowBox[{
435 RowBox[{"Yti", "[", "alpha_", "]"}], ":=",
436 RowBox[{
437 RowBox[{"Abs", "[",
438 RowBox[{
439 RowBox[{
440 RowBox[{"Conjugate", "[",
441 RowBox[{"Ut2i0", " ",
442 RowBox[{"Exp", "[",
443 RowBox[{"I", " ", "alpha"}], "]"}]}], "]"}],
444 RowBox[{"Sqrt", "[",
445 RowBox[{"1", "+", "rhoi"}], "]"}]}], " ", "+",
446 RowBox[{
447 RowBox[{"Conjugate", "[",
448 RowBox[{"Ut1i0", " ",
449 RowBox[{"Exp", "[",
450 RowBox[{
451 RowBox[{"-", "I"}], " ", "alpha"}], "]"}]}], "]"}], " ",
452 RowBox[{"Sqrt", "[",
453 RowBox[{"1", "-", "rhoi"}], "]"}]}]}], "]"}], "/",
454 RowBox[{"Sqrt", "[", "2", "]"}]}]}], ";"}]}], "Input",
455 CellChangeTimes->{{3.7126708429634542`*^9, 3.71267085594069*^9}, {
456 3.7126719181517363`*^9, 3.712672191498571*^9}, {3.712672237521976*^9,
457 3.712672276274688*^9}, {3.712672375228467*^9, 3.712672376373741*^9}, {
458 3.712685027623419*^9, 3.712685097252076*^9}, 3.712685333319643*^9, {
459 3.712918360907927*^9, 3.7129183647973146`*^9}, {3.712918404426309*^9,
460 3.712918452497957*^9}, {3.712918560699739*^9, 3.712918567245366*^9}}]
461}, Open ]]
462},
463WindowSize->{1326, 1306},
464WindowMargins->{{301, Automatic}, {Automatic, 0}},
465FrontEndVersion->"11.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (September \
46621, 2016)",
467StyleDefinitions->"Default.nb"
468]
469(* End of Notebook Content *)
470
471(* Internal cache information *)
472(*CellTagsOutline
473CellTagsIndex->{}
474*)
475(*CellTagsIndex
476CellTagsIndex->{}
477*)
478(*NotebookFileOutline
479Notebook[{
480Cell[558, 20, 1644, 33, 117, "Input"],
481Cell[CellGroupData[{
482Cell[2227, 57, 122, 1, 63, "Subchapter"],
483Cell[2352, 60, 3937, 117, 516, "Input"],
484Cell[6292, 179, 703, 16, 67, "Input",
485 Evaluatable->False],
486Cell[6998, 197, 1734, 52, 75, "Input"]
487}, Open ]],
488Cell[CellGroupData[{
489Cell[8769, 254, 107, 1, 63, "Subchapter"],
490Cell[8879, 257, 3979, 116, 516, "Input"],
491Cell[12861, 375, 612, 11, 49, "Input",
492 Evaluatable->False],
493Cell[13476, 388, 2572, 71, 75, "Input"]
494}, Open ]]
495}
496]
497*)
498