Neutrinos: neutrinos.nb

File neutrinos.nb, 255.6 KB (added by anonymous, 7 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:
10NotebookFileLineBreakTest
11NotebookFileLineBreakTest
12NotebookDataPosition[       145,          7]
13NotebookDataLength[    256118,       5433]
14NotebookOptionsPosition[    254150,       5364]
15NotebookOutlinePosition[    254573,       5381]
16CellTagsIndexPosition[    254530,       5378]
17WindowFrame->Normal
18ContainsDynamic->True *)
19
20(* Beginning of Notebook Content *)
21Notebook[{
22
23Cell[CellGroupData[{
24Cell[TextData[{
25 "\nNeutrino' s Oscillations\n",
26 StyleBox["(from G. Gollin's lecture at UIUC)", "Subsection"]
27}], "Section",
28 CellChangeTimes->{{3.446279524122033*^9, 3.446279555616667*^9}}],
29
30Cell[CellGroupData[{
31
32Cell["\<\
33 This notebook does neutrino oscillation calculations. Load the packages \
34needed and define the t = 0 production eigenstate amplitudes\
35\>", "Subsection",
36 CellChangeTimes->{
37  3.446277687673831*^9, 3.446277754713615*^9, {3.44627957958817*^9,
38   3.446279589632365*^9}, {3.446279832037991*^9, 3.446279838088664*^9}}],
39
40Cell[CellGroupData[{
41
42Cell[BoxData[{
43 RowBox[{
44  RowBox[{"<<", "Graphics`Animation`"}], ";"}], "\n",
45 RowBox[{"Off", "[",
46  RowBox[{"General", "::", "spell1"}], "]"}]}], "Input",
47 CellChangeTimes->{
48  3.446277687673831*^9, 3.446277754713615*^9, {3.44627957958817*^9,
49   3.4462795947099333`*^9}}],
50
51Cell[BoxData[
52 RowBox[{
53  RowBox[{"General", "::", "\<\"obspkg\"\>"}],
54  RowBox[{
55  ":", " "}], "\<\"\\!\\(\\\"Graphics`Animation`\\\"\\) is now obsolete. The \
56legacy version being loaded may conflict with current Mathematica \
57functionality. See the Compatibility Guide for updating information. \
58\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
59ButtonFrame->None, \
60ButtonData:>\\\"paclet:Compatibility/Tutorials/Graphics/Animation\\\", \
61ButtonNote -> \\\"General::obspkg\\\"]\\)\"\>"}]], "Message", "MSG",
62 CellChangeTimes->{3.446279920586542*^9}]
63}, Open  ]]
64}, Open  ]],
65
66Cell[CellGroupData[{
67
68Cell["t = 0 production eigenstate amplitudes ", "Subsection",
69 CellChangeTimes->{
70  3.446277687673831*^9, 3.446277754713615*^9, {3.44627957958817*^9,
71   3.446279600245813*^9}, 3.446279887268866*^9}],
72
73Cell[BoxData["0"], "Output",
74 CellChangeTimes->{3.4462797726304197`*^9}],
75
76Cell[BoxData[{
77 RowBox[{
78  RowBox[{"tinitial", "=", "0."}], ";"}], "\n",
79 RowBox[{
80  RowBox[{"AmpNuE", "=", "0."}], ";"}], "\n",
81 RowBox[{
82  RowBox[{"AmpNuMu", "=", "1."}], ";"}], "\n",
83 RowBox[{
84  RowBox[{"AmpNuTau", "=", "0."}], ";"}]}], "Input",
85 CellChangeTimes->{
86  3.446277687673831*^9, 3.446277754713615*^9, {3.44627957958817*^9,
87   3.4462796349088583`*^9}}]
88}, Open  ]],
89
90Cell[CellGroupData[{
91
92Cell["\<\
93make sure they' re properly normalized, since the production eigenstates are \
94orthogonal \
95\>", "Subsection",
96 CellChangeTimes->{
97  3.446277687673831*^9, 3.446277754713615*^9, {3.44627957958817*^9,
98   3.446279651104116*^9}, {3.446279893653021*^9, 3.446279894310679*^9}},
99 EmphasizeSyntaxErrors->True],
100
101Cell[BoxData[{
102 RowBox[{
103  RowBox[{"norm", "=",
104   RowBox[{"Sqrt", "[",
105    RowBox[{
106     RowBox[{
107      RowBox[{"Abs", "[", "AmpNuE", "]"}], "^", "2"}], " ", "+", " ",
108     RowBox[{
109      RowBox[{"Abs", "[", "AmpNuMu", "]"}], "^", "2"}], " ", "+", " ",
110     RowBox[{
111      RowBox[{"Abs", "[", "AmpNuTau", "]"}], "^", "2"}]}], "]"}]}],
112  ";"}], "\n",
113 RowBox[{
114  RowBox[{"AmpNuE", "=",
115   RowBox[{"AmpNuE", " ", "/", " ", "norm"}]}], ";"}], "\n",
116 RowBox[{
117  RowBox[{"AmpNuMu", "=",
118   RowBox[{"AmpNuMu", " ", "/", " ", "norm"}]}], ";"}], "\n",
119 RowBox[{
120  RowBox[{"AmpNuTau", "=",
121   RowBox[{"AmpNuTau", " ", "/", " ", "norm"}]}], ";"}]}], "Input",
122 CellChangeTimes->{
123  3.446277687673831*^9, 3.446277754713615*^9, {3.44627957958817*^9,
124   3.4462796364447308`*^9}}]
125}, Open  ]],
126
127Cell[CellGroupData[{
128
129Cell["\<\
130define a 3 - component object from the production amplitudes now \
131\>", "Subsection",
132 CellChangeTimes->{
133  3.446277687673831*^9, 3.446277754713615*^9, {3.44627957958817*^9,
134   3.4462796524971027`*^9}, {3.446279897109918*^9, 3.446279897581273*^9}}],
135
136Cell[BoxData[
137 RowBox[{
138  RowBox[{"3", " ", "a", " ", "define"}], "-",
139  RowBox[{
140  "amplitudes", " ", "component", " ", "from", " ", "now", " ", "object", " ",
141    "production", " ", "the"}]}]], "Output",
142 CellChangeTimes->{3.4462797736611156`*^9}],
143
144Cell[BoxData[
145 RowBox[{
146  RowBox[{"AmpProductionT0", "=",
147   RowBox[{"{",
148    RowBox[{"AmpNuE", ",", " ", "AmpNuMu", ",", " ", "AmpNuTau"}], "}"}]}],
149  ";"}]], "Input",
150 CellChangeTimes->{
151  3.446277687673831*^9, 3.446277754713615*^9, {3.44627957958817*^9,
152   3.446279657735013*^9}}]
153}, Open  ]],
154
155Cell[CellGroupData[{
156
157Cell["\<\
158Define the mixing between production eigenstates
159(electron, muon, tau neutrinos) and mass eigenstates (nu1, nu2, nu3).
160   
161   Use a 3 x3 unitary neutrino mixing matrix using the standard MNS \
162formulation.
163   Also define the inverse of the matrix.
164   
165   Mixing angles (including delta) are in degrees.
166   
167   Use the matrices this way :
168   \t(neutrino mixture in terms of production eigenstates) =
169 \tMixingMatrix * (neutrino mixture in terms of mass eigenstates)
170 
171 (neutrino mixture in terms of mass eigenstates) =
172  \tMixingMatrixInverse * (neutrino mixture in terms of production \
173eigenstates)
174 \
175\>", "Subsection",
176 CellChangeTimes->{
177  3.446277687673831*^9, 3.446277754713615*^9, {3.44627957958817*^9,
178   3.4462796228608294`*^9}, {3.44627989968404*^9, 3.446279899906705*^9}},
179 EmphasizeSyntaxErrors->True],
180
181Cell[BoxData[
182 RowBox[{"between", " ", "Define", " ", "eigenstates", " ", "mixing", " ",
183  "production", " ", "the"}]], "Output",
184 CellChangeTimes->{3.44627986729141*^9}]
185}, Open  ]],
186
187Cell[CellGroupData[{
188
189Cell["between Define eigenstates mixing production the", "Subsection",
190 CellChangeTimes->{
191  3.446279773727149*^9, {3.446279904261318*^9, 3.446279905101623*^9}}],
192
193Cell[CellGroupData[{
194
195Cell[BoxData[
196 RowBox[{"\n",
197  RowBox[{"(*", " ",
198   RowBox[{"here", " ", "are", " ", "the", " ", "MNS", " ",
199    RowBox[{"angles", "."}]}], " ", "*)"}],
200  StyleBox["\n", "Subsection"],
201  RowBox[{
202   RowBox[{
203    RowBox[{"theta12", "=", "10."}], ";"}], "\n",
204   RowBox[{
205    RowBox[{"theta13", "=", "20."}], ";"}], "\n",
206   RowBox[{
207    RowBox[{"theta23", "=", "30."}], ";"}], "\n",
208   RowBox[{"(*", " ",
209    RowBox[{"CP", "-",
210     RowBox[{"violating", " ", "phase"}]}], " ", "*)"}],
211   "\[IndentingNewLine]",
212   RowBox[{
213    RowBox[{"delta", "=", "0."}], ";"}], "\n", "\n",
214   RowBox[{"(*", " ",
215    RowBox[{"cosines", ",", " ", "sines", ",", " ",
216     RowBox[{
217      RowBox[{"etc", ".", " ", "of"}], " ", "the", " ", "MNS", " ",
218      "angles"}]}], " ", "*)"}], "\n",
219   RowBox[{
220    RowBox[{"c12", "=",
221     RowBox[{"Cos", "[",
222      RowBox[{"Pi", " ", "*", " ",
223       RowBox[{"theta12", " ", "/", " ", "180"}]}], "]"}]}], ";"}], "\n",
224   RowBox[{
225    RowBox[{"s12", "=",
226     RowBox[{"Sin", "[",
227      RowBox[{"Pi", " ", "*", " ",
228       RowBox[{"theta12", " ", "/", " ", "180"}]}], "]"}]}], ";"}], "\n",
229   RowBox[{
230    RowBox[{"c13", "=",
231     RowBox[{"Cos", "[",
232      RowBox[{"Pi", " ", "*", " ",
233       RowBox[{"theta13", " ", "/", " ", "180"}]}], "]"}]}], ";"}], "\n",
234   RowBox[{
235    RowBox[{"s13", "=",
236     RowBox[{"Sin", "[",
237      RowBox[{"Pi", " ", "*", " ",
238       RowBox[{"theta13", " ", "/", " ", "180"}]}], "]"}]}], ";"}], "\n",
239   RowBox[{
240    RowBox[{"c23", "=",
241     RowBox[{"Cos", "[",
242      RowBox[{"Pi", " ", "*", " ",
243       RowBox[{"theta23", " ", "/", " ", "180"}]}], "]"}]}], ";"}], "\n",
244   RowBox[{
245    RowBox[{"s23", "=",
246     RowBox[{"Sin", "[",
247      RowBox[{"Pi", " ", "*", " ",
248       RowBox[{"theta23", " ", "/", " ", "180"}]}], "]"}]}], ";"}], "\n",
249   RowBox[{
250    RowBox[{"expid", "=",
251     RowBox[{"Exp", "[",
252      RowBox[{"I", " ", "*", " ", "Pi", " ", "*", " ",
253       RowBox[{"delta", " ", "/", " ", "180"}]}], "]"}]}], ";"}], "\n", "\n",
254   
255   RowBox[{"(*", " ",
256    RowBox[{"specify", " ",
257     RowBox[{"mc", "^", "2"}], " ", "for", " ", "the", " ", "three", " ",
258     "mass", " ",
259     RowBox[{"eigenstates", " ", "[", "eV", "]"}]}], " ", "*)"}], "\n",
260   RowBox[{
261    RowBox[{"mcsq1", "=", "0.1"}], ";"}], "\n",
262   RowBox[{
263    RowBox[{"mcsq2", "=", "0.3"}], ";"}], "\n",
264   RowBox[{
265    RowBox[{"mcsq3", "=", "0.4"}], ";"}], "\n", "\n",
266   RowBox[{"(*", " ",
267    RowBox[{"hbar", ",", " ",
268     RowBox[{"in", " ", "eV", " ", "sec"}]}], " ", "*)"}], "\n",
269   RowBox[{
270    RowBox[{"hbar", "=",
271     RowBox[{"6.582173", "*",
272      RowBox[{"10", "^",
273       RowBox[{"-", "16"}]}]}]}], ";"}], "\[IndentingNewLine]",
274   "\[IndentingNewLine]",
275   RowBox[{"(*", " ", "\[IndentingNewLine]",
276    RowBox[{
277     RowBox[{"Now", " ", "set", " ", "up", " ", "the", " ", "MNS"}], "-",
278     RowBox[{"style", " ",
279      RowBox[{"matrix", ".", " ", "Note"}], " ", "the", " ", "convenient",
280      " ", "form", " ", "as", " ", "a", " ", "\[IndentingNewLine]", "product",
281       " ", "of", " ", "three", " ", "different", " ", "two"}], "-",
282     RowBox[{"neutrino", " ", "mixing", " ",
283      RowBox[{"matrices", "."}]}]}], " ", "\[IndentingNewLine]", "*)"}], "\n",
284    " ", "\[IndentingNewLine]",
285   RowBox[{
286    RowBox[{"R12", "=",
287     RowBox[{"{", "     ",
288      RowBox[{
289       RowBox[{"{", "  ",
290        RowBox[{"c12", ",", "        ", "s12", ",", "      ", "0"}], " ",
291        "}"}], ",", "\n", "\t\t",
292       RowBox[{"{",
293        RowBox[{
294         RowBox[{"-", "s12"}], ",", "        ", "c12", ",", "      ", "0"}],
295        " ", "}"}], ",", "\n", "\t\t",
296       RowBox[{"{", "   ",
297        RowBox[{"0", ",", "            ", "0", ",", "           ", "1"}], " ",
298         "}"}]}], " ", "}"}]}], ";"}], "\n", "\[IndentingNewLine]",
299   RowBox[{
300    RowBox[{"R13", "=",
301     RowBox[{"{", "     ",
302      RowBox[{
303       RowBox[{"{", "  ",
304        RowBox[{
305        "c13", ",", "                               ", "0", ",", "      ",
306         RowBox[{"s13", "/", "expid"}]}], " ", "}"}], ",", "\n", "\t\t",
307       RowBox[{"{", "   ",
308        RowBox[{
309        "0", ",", "                                   ", "1", ",", "      ",
310         "0"}], "                            ", "}"}], ",", "\n", "\t\t",
311       RowBox[{"{",
312        RowBox[{
313         RowBox[{
314          RowBox[{"-", "s13"}], "*", "expid"}], ",", "        ", "0", ",",
315         "      ", "c13"}], "                        ", "}"}]}], "  ",
316      "}"}]}], ";"}], "\n", "\[IndentingNewLine]",
317   RowBox[{
318    RowBox[{"R23", "=",
319     RowBox[{"{", "     ",
320      RowBox[{
321       RowBox[{"{", "  ",
322        RowBox[{"1", ",", "             ", "0", ",", "           ", "0"}],
323        " ", "}"}], ",", "\n", "\t\t",
324       RowBox[{"{", "   ",
325        RowBox[{"0", ",", "            ", "c23", ",", "    ", "s23"}], " ",
326        "}"}], ",", "\n", "\t\t",
327       RowBox[{"{", "   ",
328        RowBox[{"0", ",", "          ",
329         RowBox[{"-", "s23"}], ",", "    ", "c23"}], " ", "}"}]}], " ",
330      "}"}]}], ";"}], "\n", "\[IndentingNewLine]",
331   RowBox[{
332    RowBox[{"MixingMatrix", "=",
333     RowBox[{"R23", " ", ".", " ", "R13", " ", ".", " ", "R12"}]}], ";"}],
334   "\n", "\[IndentingNewLine]",
335   RowBox[{
336    RowBox[{"Print", "[",
337     RowBox[{
338     "\"\<MNS Mixing matrix to transform mass eigenstates into production \
339eigenstates is \\n\>\"", ",", "\n", "\t\t",
340      RowBox[{"MatrixForm", "[", "MixingMatrix", "]"}]}], " ", "]"}], ";"}],
341   "\n", "\n",
342   RowBox[{"(*", " ",
343    RowBox[{
344    "Also", " ", "calculate", " ", "the", " ", "inverse", " ", "of", " ",
345     "the", " ", "matrix"}], " ", "*)"}], "\n", "\n",
346   RowBox[{
347    RowBox[{"MixingMatrixInverse", "=",
348     RowBox[{"Conjugate", "[",
349      RowBox[{"Transpose", "[", "MixingMatrix", "]"}], "]"}]}], ";"}], "\n",
350   RowBox[{
351    RowBox[{"Print", "[",
352     RowBox[{
353     "\"\<Mixing matrix to transform production eigenstates back into mass \
354eigenstates is\\n\>\"", ",", "\n", "\t\t",
355      RowBox[{"MatrixForm", "[", "MixingMatrixInverse", "]"}]}], " ", "]"}],
356    ";"}], "\[IndentingNewLine]", "\n",
357   RowBox[{"(*", " ",
358    RowBox[{
359     RowBox[{"re", "-",
360      RowBox[{"express", " ", "t"}]}], "=",
361     RowBox[{
362     "0", " ", "neutrino", " ", "state", " ", "in", " ", "terms", " ", "of",
363      " ", "mass", " ", "eigenstates"}]}], " ", "*)"}], "\n",
364   RowBox[{
365    RowBox[{"AmpMassT0", "=",
366     RowBox[{"MixingMatrixInverse", " ", ".", " ", "AmpProductionT0"}]}],
367    ";"}], "\n", "\n",
368   RowBox[{
369    RowBox[{"Print", "[",
370     RowBox[{
371     "\"\<Initial state neutrino, in terms of e, mu, tau amplitudes is \
372\\n\>\"", ",", "\n", "\t\t",
373      RowBox[{"MatrixForm", "[", "AmpProductionT0", "]"}]}], " ", "]"}],
374    ";"}], "\n", "\n",
375   RowBox[{
376    RowBox[{"Print", "[",
377     RowBox[{
378     "\"\<Initial state neutrino, in terms of mass eigenstate amplitudes is \
379\\n\>\"", ",", "\n", "\t\t",
380      RowBox[{"MatrixForm", "[", "AmpMassT0", "]"}]}], " ", "]"}], ";"}],
381   "\n", "\n",
382   RowBox[{
383    RowBox[{"Print", "[",
384     RowBox[{
385     "\"\<Now invert the mass eigenstate amplitudes to recover e, mu, tau \
386amplitudes:\\n\>\"", ",", "\n", "\t\t",
387      RowBox[{"MatrixForm", "[",
388       RowBox[{"MixingMatrix", " ", ".", " ", "AmpMassT0"}], "]"}]}], " ",
389     "]"}], ";"}], "\n", "\n",
390   RowBox[{"(*", " ",
391    RowBox[{
392    "generate", " ", "the", " ", "time", " ", "evolution", " ", "matrix", " ",
393      "for", " ", "the", " ", "mass", " ", "eigenstates"}], " ", "*)"}], "\n",
394   
395   RowBox[{
396    RowBox[{
397     RowBox[{"TimeEvolutionMatrix", "[", "t_", "]"}], ":=", "\n",
398     RowBox[{"{", "\n", "\t",
399      RowBox[{
400       RowBox[{"{",
401        RowBox[{
402         RowBox[{"Exp", "[",
403          RowBox[{
404           RowBox[{"-", "I"}], " ", "*", " ", "mcsq1", "*",
405           RowBox[{"t", "/", "hbar"}]}], "]"}], ",", "  ", "0", ",",
406         "                                                    ", "0"}], "}"}],
407        ",", "\n", "\t",
408       RowBox[{"{",
409        RowBox[{
410        "0", ",", "                                                    ",
411         RowBox[{"Exp", "[",
412          RowBox[{
413           RowBox[{"-", "I"}], " ", "*", " ", "mcsq2", "*",
414           RowBox[{"t", "/", "hbar"}]}], "]"}], ",", "  ", "0"}], "}"}], ",",
415       "\n", "\t",
416       RowBox[{"{",
417        RowBox[{
418        "0", ",", "                                                    ", "0",
419          ",", "                                                     ",
420         RowBox[{"Exp", "[",
421          RowBox[{
422           RowBox[{"-", "I"}], " ", "*", "  ", "mcsq3", "*",
423           RowBox[{"t", "/", "hbar"}]}], "]"}]}], "}"}]}], "\n", "}"}]}],
424    ";"}], "\n", "\n",
425   RowBox[{"(*", " ",
426    RowBox[{
427    "clear", " ", "a", " ", "possible", " ", "definition", " ", "of", " ",
428     "t", " ", "so", " ", "that", " ",
429     RowBox[{"we", "'"}], "ll", " ", "see", " ", "the", " ", "matrix", " ",
430     "in", " ", "symbolic", " ", "form"}], " ", "*)"}], "\n",
431   RowBox[{
432    RowBox[{"Clear", "[", "t", "]"}], ";"}], "\n",
433   RowBox[{
434    RowBox[{"Print", "[",
435     RowBox[{
436     "\"\<Time evolution matrix for mass eigenstates is \\n\>\"", "\n",
437      "\t\t",
438      RowBox[{"MatrixForm", "[",
439       RowBox[{"TimeEvolutionMatrix", "[", "t", "]"}], "]"}]}], " ", "]"}],
440    ";"}], "\n", "\n",
441   RowBox[{"(*", " ",
442    RowBox[{
443    "define", " ", "the", " ", "function", " ", "that", " ", "gives", " ",
444     "the", " ", "mass", " ", "eigenstate", " ", "components", " ", "at", " ",
445      "time", " ", "t"}], " ", "*)"}], "\n",
446   RowBox[{
447    RowBox[{
448     RowBox[{"AmpMass", "[", "t_", "]"}], ":=",
449     RowBox[{
450      RowBox[{"TimeEvolutionMatrix", "[", "t", "]"}], " ", ".", " ",
451      "AmpMassT0"}]}], ";"}], "\n", "\n",
452   RowBox[{"(*", " ",
453    RowBox[{
454    "define", " ", "the", " ", "function", " ", "that", " ", "gives", " ",
455     "the", " ", "production", " ", "eigenstate", " ", "components", " ",
456     "at", " ", "time", " ", "t"}], " ", "*)"}], "\n",
457   RowBox[{
458    RowBox[{
459     RowBox[{"AmpProduction", "[", "t_", "]"}], ":=",
460     RowBox[{"MixingMatrix", " ", ".", " ",
461      RowBox[{"(",
462       RowBox[{
463        RowBox[{"TimeEvolutionMatrix", "[", "t", "]"}], " ", ".", " ",
464        "AmpMassT0"}], ")"}]}]}], ";"}], "\n", "\n"}]}]], "Input",
465 CellChangeTimes->{
466  3.446277687673831*^9, 3.446277754713615*^9, {3.44627957958817*^9,
467   3.4462796228608294`*^9}, 3.446279673268849*^9}],
468
469Cell[CellGroupData[{
470
471Cell[BoxData[
472 InterpretationBox[
473  RowBox[{"\<\"MNS Mixing matrix to transform mass eigenstates into \
474production eigenstates is \\n\"\>", "\[InvisibleSpace]",
475   TagBox[
476    RowBox[{"(", "\[NoBreak]", GridBox[{
477       {
478        RowBox[{"0.9254165783983233`", "\[InvisibleSpace]", "+",
479         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}],
480        RowBox[{"0.16317591116653485`", "\[InvisibleSpace]", "+",
481         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}],
482        RowBox[{"0.34202014332566877`", "\[InvisibleSpace]", "+",
483         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]},
484       {
485        RowBox[{
486         RowBox[{"-", "0.31879577759716793`"}], "+",
487         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}],
488        RowBox[{"0.8231729446455007`", "\[InvisibleSpace]", "+",
489         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}],
490        RowBox[{"0.46984631039295427`", "\[InvisibleSpace]", "+",
491         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]},
492       {
493        RowBox[{
494         RowBox[{"-", "0.2048741287028621`"}], "+",
495         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}],
496        RowBox[{
497         RowBox[{"-", "0.5438381424823258`"}], "+",
498         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}],
499        RowBox[{"0.8137976813493736`", "\[InvisibleSpace]", "+",
500         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]}
501      },
502      GridBoxAlignment->{
503       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
504        "RowsIndexed" -> {}},
505      GridBoxSpacings->{"Columns" -> {
506          Offset[0.27999999999999997`], {
507           Offset[0.7]},
508          Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
509          Offset[0.2], {
510           Offset[0.4]},
511          Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
512    Function[BoxForm`e$,
513     MatrixForm[BoxForm`e$]]]}],
514  SequenceForm[
515  "MNS Mixing matrix to transform mass eigenstates into production \
516eigenstates is \n",
517   MatrixForm[{{Complex[0.9254165783983233, 0.], Complex[0.16317591116653485`,
518     0.], Complex[0.34202014332566877`, 0.]}, {Complex[-0.31879577759716793`,
519    0.], Complex[0.8231729446455007, 0.], Complex[0.46984631039295427`,
520    0.]}, {Complex[-0.2048741287028621, 0.], Complex[-0.5438381424823258, 0.],
521     Complex[0.8137976813493736, 0.]}}]],
522  Editable->False]], "Print",
523 CellChangeTimes->{3.4462797741396923`*^9, 3.446279920868536*^9}],
524
525Cell[BoxData[
526 InterpretationBox[
527  RowBox[{"\<\"Mixing matrix to transform production eigenstates back into \
528mass eigenstates is\\n\"\>", "\[InvisibleSpace]",
529   TagBox[
530    RowBox[{"(", "\[NoBreak]", GridBox[{
531       {
532        RowBox[{"0.9254165783983233`", "\[InvisibleSpace]", "+",
533         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}],
534        RowBox[{
535         RowBox[{"-", "0.31879577759716793`"}], "+",
536         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}],
537        RowBox[{
538         RowBox[{"-", "0.2048741287028621`"}], "+",
539         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]},
540       {
541        RowBox[{"0.16317591116653485`", "\[InvisibleSpace]", "+",
542         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}],
543        RowBox[{"0.8231729446455007`", "\[InvisibleSpace]", "+",
544         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}],
545        RowBox[{
546         RowBox[{"-", "0.5438381424823258`"}], "+",
547         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]},
548       {
549        RowBox[{"0.34202014332566877`", "\[InvisibleSpace]", "+",
550         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}],
551        RowBox[{"0.46984631039295427`", "\[InvisibleSpace]", "+",
552         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}],
553        RowBox[{"0.8137976813493736`", "\[InvisibleSpace]", "+",
554         RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]}
555      },
556      GridBoxAlignment->{
557       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
558        "RowsIndexed" -> {}},
559      GridBoxSpacings->{"Columns" -> {
560          Offset[0.27999999999999997`], {
561           Offset[0.7]},
562          Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
563          Offset[0.2], {
564           Offset[0.4]},
565          Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
566    Function[BoxForm`e$,
567     MatrixForm[BoxForm`e$]]]}],
568  SequenceForm[
569  "Mixing matrix to transform production eigenstates back into mass \
570eigenstates is\n",
571   MatrixForm[{{Complex[0.9254165783983233, 0.],
572    Complex[-0.31879577759716793`, 0.], Complex[-0.2048741287028621, 0.]}, {
573    Complex[0.16317591116653485`, 0.], Complex[0.8231729446455007, 0.],
574    Complex[-0.5438381424823258, 0.]}, {Complex[0.34202014332566877`, 0.],
575    Complex[0.46984631039295427`, 0.], Complex[0.8137976813493736, 0.]}}]],
576  Editable->False]], "Print",
577 CellChangeTimes->{3.4462797741396923`*^9, 3.4462799208744993`*^9}],
578
579Cell[BoxData[
580 InterpretationBox[
581  RowBox[{"\<\"Initial state neutrino, in terms of e, mu, tau amplitudes is \
582\\n\"\>", "\[InvisibleSpace]",
583   TagBox[
584    RowBox[{"(", "\[NoBreak]",
585     TagBox[GridBox[{
586        {"0.`"},
587        {"1.`"},
588        {"0.`"}
589       },
590       GridBoxAlignment->{
591        "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
592          "RowsIndexed" -> {}},
593       GridBoxSpacings->{"Columns" -> {
594           Offset[0.27999999999999997`], {
595            Offset[0.5599999999999999]},
596           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
597           Offset[0.2], {
598            Offset[0.4]},
599           Offset[0.2]}, "RowsIndexed" -> {}}],
600      Column], "\[NoBreak]", ")"}],
601    Function[BoxForm`e$,
602     MatrixForm[BoxForm`e$]]]}],
603  SequenceForm[
604  "Initial state neutrino, in terms of e, mu, tau amplitudes is \n",
605   MatrixForm[{0., 1., 0.}]],
606  Editable->False]], "Print",
607 CellChangeTimes->{3.4462797741396923`*^9, 3.446279920880884*^9}],
608
609Cell[BoxData[
610 InterpretationBox[
611  RowBox[{"\<\"Initial state neutrino, in terms of mass eigenstate amplitudes \
612is \\n\"\>", "\[InvisibleSpace]",
613   TagBox[
614    RowBox[{"(", "\[NoBreak]",
615     TagBox[GridBox[{
616        {
617         RowBox[{
618          RowBox[{"-", "0.31879577759716793`"}], "+",
619          RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]},
620        {
621         RowBox[{"0.8231729446455007`", "\[InvisibleSpace]", "+",
622          RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]},
623        {
624         RowBox[{"0.46984631039295427`", "\[InvisibleSpace]", "+",
625          RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]}
626       },
627       GridBoxAlignment->{
628        "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
629          "RowsIndexed" -> {}},
630       GridBoxSpacings->{"Columns" -> {
631           Offset[0.27999999999999997`], {
632            Offset[0.5599999999999999]},
633           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
634           Offset[0.2], {
635            Offset[0.4]},
636           Offset[0.2]}, "RowsIndexed" -> {}}],
637      Column], "\[NoBreak]", ")"}],
638    Function[BoxForm`e$,
639     MatrixForm[BoxForm`e$]]]}],
640  SequenceForm[
641  "Initial state neutrino, in terms of mass eigenstate amplitudes is \n",
642   MatrixForm[{Complex[-0.31879577759716793`, 0.], Complex[0.8231729446455007,
643     0.], Complex[0.46984631039295427`, 0.]}]],
644  Editable->False]], "Print",
645 CellChangeTimes->{3.4462797741396923`*^9, 3.446279920886834*^9}],
646
647Cell[BoxData[
648 InterpretationBox[
649  RowBox[{"\<\"Now invert the mass eigenstate amplitudes to recover e, mu, \
650tau amplitudes:\\n\"\>", "\[InvisibleSpace]",
651   TagBox[
652    RowBox[{"(", "\[NoBreak]",
653     TagBox[GridBox[{
654        {
655         RowBox[{"5.551115123125783`*^-17", "+",
656          RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]},
657        {
658         RowBox[{"1.`", "\[InvisibleSpace]", "+",
659          RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]},
660        {
661         RowBox[{
662          RowBox[{"-", "5.551115123125783`*^-17"}], "+",
663          RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]}
664       },
665       GridBoxAlignment->{
666        "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
667          "RowsIndexed" -> {}},
668       GridBoxSpacings->{"Columns" -> {
669           Offset[0.27999999999999997`], {
670            Offset[0.5599999999999999]},
671           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
672           Offset[0.2], {
673            Offset[0.4]},
674           Offset[0.2]}, "RowsIndexed" -> {}}],
675      Column], "\[NoBreak]", ")"}],
676    Function[BoxForm`e$,
677     MatrixForm[BoxForm`e$]]]}],
678  SequenceForm[
679  "Now invert the mass eigenstate amplitudes to recover e, mu, tau \
680amplitudes:\n",
681   MatrixForm[{Complex[5.551115123125783*^-17, 0.], Complex[1., 0.],
682    Complex[-5.551115123125783*^-17, 0.]}]],
683  Editable->False]], "Print",
684 CellChangeTimes->{3.4462797741396923`*^9, 3.4462799208929367`*^9}],
685
686Cell[BoxData[
687 RowBox[{"\<\"Time evolution matrix for mass eigenstates is \\n\"\>", " ",
688  TagBox[
689   RowBox[{"(", "\[NoBreak]", GridBox[{
690      {
691       SuperscriptBox["\[ExponentialE]",
692        RowBox[{
693         RowBox[{"-", "1.5192551152939922`*^14"}], " ", "\[ImaginaryI]", " ",
694         "t"}]], "0", "0"},
695      {"0",
696       SuperscriptBox["\[ExponentialE]",
697        RowBox[{
698         RowBox[{"-", "4.5577653458819756`*^14"}], " ", "\[ImaginaryI]", " ",
699         "t"}]], "0"},
700      {"0", "0",
701       SuperscriptBox["\[ExponentialE]",
702        RowBox[{
703         RowBox[{"-", "6.077020461175969`*^14"}], " ", "\[ImaginaryI]", " ",
704         "t"}]]}
705     },
706     GridBoxAlignment->{
707      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
708       "RowsIndexed" -> {}},
709     GridBoxSpacings->{"Columns" -> {
710         Offset[0.27999999999999997`], {
711          Offset[0.7]},
712         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
713         Offset[0.2], {
714          Offset[0.4]},
715         Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
716   Function[BoxForm`e$,
717    MatrixForm[BoxForm`e$]]]}]], "Print",
718 CellChangeTimes->{3.4462797741396923`*^9, 3.4462799208992767`*^9}]
719}, Open  ]]
720}, Open  ]]
721}, Open  ]],
722
723Cell[CellGroupData[{
724
725Cell["\<\
726Now specify the t = 0 state of the neutrino and
727make some argand diagrams to show the initial amplitudes.
728  \
729\>", "Subsection",
730 CellChangeTimes->{
731  3.446277687673831*^9, 3.446277754713615*^9, {3.44627957958817*^9,
732   3.4462796228608294`*^9}, {3.446279673268849*^9, 3.446279689085381*^9},
733   3.446279881790246*^9},
734 EmphasizeSyntaxErrors->True],
735
736Cell[BoxData[
737 RowBox[{
738  RowBox[{"Set", "::", "\<\"write\"\>"}],
739  RowBox[{
740  ":", " "}], "\<\"Tag \\!\\(Times\\) in \\!\\(Now\\\\ specify\\\\ t\\\\ \
741the\\) is Protected. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
742ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
743ButtonData:>\\\"paclet:ref/message/General/write\\\", ButtonNote -> \
744\\\"Set::write\\\"]\\)\"\>"}]], "Message", "MSG",
745 CellChangeTimes->{3.446279774225973*^9}],
746
747Cell[BoxData["0"], "Output",
748 CellChangeTimes->{3.44627977423181*^9}],
749
750Cell[BoxData[{
751 RowBox[{
752  RowBox[{"modulus1", "=",
753   RowBox[{"Abs", "[",
754    RowBox[{"AmpMassT0", "[",
755     RowBox[{"[", "1", "]"}], "]"}], "]"}]}], ";"}], "\n",
756 RowBox[{
757  RowBox[{"modulus2", "=",
758   RowBox[{"Abs", "[",
759    RowBox[{"AmpMassT0", "[",
760     RowBox[{"[", "2", "]"}], "]"}], "]"}]}], ";"}], "\n",
761 RowBox[{
762  RowBox[{
763   RowBox[{"modulus3", "=",
764    RowBox[{"Abs", "[",
765     RowBox[{"AmpMassT0", "[",
766      RowBox[{"[", "3", "]"}], "]"}], "]"}]}], ";"}], "\n", "\n",
767  RowBox[{"(*", " ",
768   RowBox[{
769    RowBox[{"empty", " ", "space", " ", "between", " ", "circles"}], ",", " ",
770     
771    RowBox[{"in", " ", "inches"}]}], " ", "*)"}]}], "\n",
772 RowBox[{
773  RowBox[{
774   RowBox[{"gap", "=", "0.35"}], ";"}], "\n", "\n",
775  RowBox[{"(*", " ",
776   RowBox[{"background", " ", "grayscale"}], " ", "*)"}]}], "\n",
777 RowBox[{
778  RowBox[{
779   RowBox[{"bkgnd", "=", "0.97"}], ";"}], "\n",
780  RowBox[{"(*", " ",
781   RowBox[{
782    RowBox[{"plot", " ", "height", " ", "and", " ", "width"}], ",", " ",
783    RowBox[{"in", " ", "inches"}]}], " ", "*)"}]}], "\n",
784 RowBox[{
785  RowBox[{"plotheight", "=",
786   RowBox[{"4", "+",
787    RowBox[{"5", "*", "gap"}]}]}], ";"}], "\n",
788 RowBox[{
789  RowBox[{
790   RowBox[{"plotwidth", "=",
791    RowBox[{"6", "+",
792     RowBox[{"4", "*", "gap"}], " ", "+", " ", "1.5"}]}], ";"}], "\n", "\n",
793  RowBox[{"(*", " ",
794   RowBox[{
795   "coordinates", " ", "of", " ", "centers", " ", "of", " ", "amplitude", " ",
796     "plots", " ",
797    RowBox[{"(",
798     RowBox[{"max", " ", "amplitude", " ", "is", " ", "1"}], ")"}]}], " ",
799   "*)"}], "\n",
800  RowBox[{"(*", " ",
801   RowBox[{"production", " ", "eigenstates"}], " ", "*)"}]}], "\n",
802 RowBox[{
803  RowBox[{"xe", "=",
804   RowBox[{"1.", " ", "+", " ", "gap"}]}], ";"}], "\n",
805 RowBox[{
806  RowBox[{"xmu", "=",
807   RowBox[{"x1", " ", "+", " ", "2.", " ", "+", " ", "gap"}]}], ";"}], "\n",
808 RowBox[{
809  RowBox[{"xtau", "=",
810   RowBox[{"x2", " ", "+", " ", "2.", " ", "+", " ", "gap"}]}], ";"}], "\n",
811 RowBox[{
812  RowBox[{"ye", "=",
813   RowBox[{
814    RowBox[{"4", "*", "gap"}], " ", "+", " ", "3"}]}], ";"}], "\n",
815 RowBox[{
816  RowBox[{"ymu", "=", "ye"}], ";"}], "\n",
817 RowBox[{
818  RowBox[{
819   RowBox[{"ytau", "=", "ye"}], ";"}], "\n",
820  RowBox[{"(*", " ",
821   RowBox[{"mass", " ", "eigenstates"}], " ", "*)"}]}], "\n",
822 RowBox[{
823  RowBox[{"x1", "=", "xe"}], ";"}], "\n",
824 RowBox[{
825  RowBox[{"x2", "=", "xmu"}], ";"}], "\n",
826 RowBox[{
827  RowBox[{"x3", "=", "xtau"}], ";"}], "\n",
828 RowBox[{
829  RowBox[{"y1", "=",
830   RowBox[{
831    RowBox[{"2", "*", "gap"}], " ", "+", " ", "1"}]}], ";"}], "\n",
832 RowBox[{
833  RowBox[{"y2", "=", "y1"}], ";"}], "\n",
834 RowBox[{
835  RowBox[{
836   RowBox[{"y3", "=", "y1"}], ";"}], "\[IndentingNewLine]", "\n",
837  RowBox[{"(*", " ",
838   RowBox[{
839   "y", " ", "positions", " ", "for", " ", "text", " ", "labeling", " ",
840    "the", " ", "graphs"}], " ", "*)"}], "\n",
841  RowBox[{"(*", " ",
842   RowBox[{"production", " ", "eigenstates"}], " ",
843   "*)"}]}], "\[IndentingNewLine]",
844 RowBox[{
845  RowBox[{
846   RowBox[{"textye", "=",
847    RowBox[{
848     RowBox[{"3", "*", "gap"}], " ", "+", " ", "2"}]}], ";"}], "\n",
849  RowBox[{"(*", " ",
850   RowBox[{"mass", " ", "eigenstates"}], " ", "*)"}]}], "\n",
851 RowBox[{
852  RowBox[{
853   RowBox[{"texty", "=", "gap"}], " ", ";"}],
854  "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
855 CellChangeTimes->{
856  3.446277687673831*^9, 3.446277754713615*^9, {3.44627957958817*^9,
857   3.4462796228608294`*^9}, {3.446279673268849*^9, 3.446279684401219*^9}}],
858
859Cell[BoxData[
860 RowBox[{
861  RowBox[{"(*",
862   RowBox[{
863   "**", "**", "**", "**", "**", "**", "**", "**", "**", "**", "**", "**", "**",
864     "**", "**", "**", "**", "**", "**", "**", "**", "**", "**", "**", "**", "**",
865     "**", "**", "**", "**", "**", "**", "**", "**", "**", "**"}], "*****)"}],
866   "\n", "\n", "\n",
867  RowBox[{
868   StyleBox[
869    RowBox[{
870     RowBox[{"In", " ", "this", " ", "cell"}], ",", " ",
871     RowBox[{
872     "make", " ", "some", " ", "animated", " ", "argand", " ", "diagrams",
873      " ", "to", " ", "show", " ", "the", " ", "amplitudes"}]}],
874    "Subsection"],
875   StyleBox["\n", "Subsection"],
876   RowBox[{
877    StyleBox["as", "Subsection"],
878    StyleBox[" ", "Subsection"],
879    StyleBox["functions", "Subsection"],
880    StyleBox[" ", "Subsection"],
881    StyleBox["of", "Subsection"],
882    StyleBox[" ", "Subsection"],
883    RowBox[{
884     StyleBox["time", "Subsection"],
885     StyleBox[".", "Subsection"], "\n"}]}]}]}]], "Input",
886 CellChangeTimes->{{3.446277704607821*^9, 3.4462777093195353`*^9}, {
887  3.446277764763568*^9, 3.446277843832737*^9}, {3.446279710918833*^9,
888  3.446279717469611*^9}},
889 EmphasizeSyntaxErrors->True],
890
891Cell[BoxData[
892 RowBox[{
893  RowBox[{"(*", " ",
894   RowBox[{
895   "periods", " ", "for", " ", "a", " ", "360", " ", "degree", " ", "phase",
896    " ", "rotation", " ", "of", " ", "each", " ", "mass", " ",
897    "eigenfunction"}], " ", "*)"}], "\n",
898  RowBox[{
899   RowBox[{
900    RowBox[{"period1", "=",
901     RowBox[{"2", " ", "*", " ", "Pi", " ", "*", " ",
902      RowBox[{"hbar", " ", "/", " ", "mcsq1"}]}]}], ";"}], "\n",
903   RowBox[{
904    RowBox[{"period2", "=",
905     RowBox[{"2", " ", "*", " ", "Pi", " ", "*", " ",
906      RowBox[{"hbar", " ", "/", " ", "mcsq2"}]}]}], ";"}], "\n",
907   RowBox[{
908    RowBox[{"period3", "=",
909     RowBox[{"2", " ", "*", " ", "Pi", " ", "*", " ",
910      RowBox[{"hbar", " ", "/", " ", "mcsq3"}]}]}], ";"}], "\n", "\n",
911   RowBox[{"(*", " ",
912    RowBox[{"maximum", " ", "period"}], " ", "*)"}], "\n",
913   RowBox[{
914    RowBox[{"periodmax", "=",
915     RowBox[{"Max", "[",
916      RowBox[{"period1", ",", " ", "period2", ",", " ", "period3"}], "]"}]}],
917    ";"}], "\n", "\n",
918   RowBox[{"(*", " ",
919    RowBox[{"time", " ", "for", " ", "first", " ", "amplitude", " ", "plot"}],
920     " ", "*)"}], "\n",
921   RowBox[{
922    RowBox[{"tinitial", "=", "0."}], ";"}], "\n", "\n",
923   RowBox[{"(*", " ",
924    RowBox[{"plot", " ", "time", " ", "step", " ", "size"}], " ", "*)"}],
925   "\n",
926   RowBox[{
927    RowBox[{"dt", "=",
928     RowBox[{"periodmax", " ", "/", " ", "30"}]}], ";"}],
929   "\[IndentingNewLine]"}]}]], "Input",
930 CellChangeTimes->{{3.446277704607821*^9, 3.4462777093195353`*^9}, {
931  3.446277764763568*^9, 3.446277843832737*^9}, {3.446279710918833*^9,
932  3.446279733748246*^9}}],
933
934Cell[BoxData[
935 RowBox[{
936  RowBox[{
937   RowBox[{"MixingMovie", "=",
938    RowBox[{
939     StyleBox["Table",
940      FontSize->14],
941     StyleBox["[",
942      FontSize->14],
943     RowBox[{
944      RowBox[{
945       StyleBox["Graphics",
946        FontSize->14],
947       StyleBox["[",
948        FontSize->14], "\n", "\t",
949       RowBox[{
950        StyleBox[
951         RowBox[{"{", "\[IndentingNewLine]",
952          RowBox[{
953           RowBox[{"Point", "[",
954            RowBox[{"{",
955             RowBox[{"0", ",", "0"}], "}"}], "]"}], ",",
956           "\[IndentingNewLine]",
957           RowBox[{"Point", "[",
958            RowBox[{"{",
959             RowBox[{"plotwidth", ",", "plotheight"}], "}"}], "]"}], ",",
960           "\[IndentingNewLine]",
961           RowBox[{"Point", "[",
962            RowBox[{"{",
963             RowBox[{"plotwidth", ",", "0"}], "}"}], "]"}], ",",
964           "\[IndentingNewLine]",
965           RowBox[{"Point", "[",
966            RowBox[{"{",
967             RowBox[{"0", ",", "plotheight"}], "}"}], "]"}], ",",
968           "\[IndentingNewLine]", "\[IndentingNewLine]",
969           RowBox[{"RGBColor", "[",
970            RowBox[{".8", ",", "0", ",", "0"}], "]"}], ",",
971           "\[IndentingNewLine]",
972           RowBox[{"Circle", "[", " ",
973            RowBox[{
974             RowBox[{"{",
975              RowBox[{"x1", ",", "y1"}], "}"}], ",",
976             RowBox[{"Abs", "[", " ",
977              RowBox[{
978               RowBox[{"AmpMass", "[", "t", "]"}], "[",
979               RowBox[{"[", "1", "]"}], "]"}], " ", "]"}]}], " ", "]"}], ",",
980           "\[IndentingNewLine]",
981           RowBox[{"Line", "[", " ",
982            RowBox[{"{", " ",
983             RowBox[{
984              RowBox[{"{",
985               RowBox[{"x1", ",", "y1"}], "}"}], ",", " ",
986              RowBox[{"{",
987               RowBox[{
988                RowBox[{"x1", " ", "+", " ",
989                 RowBox[{"Re", "[", " ",
990                  RowBox[{
991                   RowBox[{"AmpMass", "[", "t", "]"}], "[",
992                   RowBox[{"[", "1", "]"}], "]"}], " ", "]"}]}], ",", " ",
993                RowBox[{"y1", " ", "+", " ",
994                 RowBox[{"Im", "[", " ",
995                  RowBox[{
996                   RowBox[{"AmpMass", "[", "t", "]"}], "[",
997                   RowBox[{"[", "1", "]"}], "]"}], " ", "]"}]}]}], " ",
998               "}"}]}], " ", "}"}], " ", "]"}], ",",
999           RowBox[{"RGBColor", "[",
1000            RowBox[{"0", ",", ".6", ",", "0"}], "]"}], ",",
1001           "\[IndentingNewLine]",
1002           RowBox[{"Circle", "[", " ",
1003            RowBox[{
1004             RowBox[{"{",
1005              RowBox[{"x2", ",", "y2"}], "}"}], ",",
1006             RowBox[{"Abs", "[", " ",
1007              RowBox[{
1008               RowBox[{"AmpMass", "[", "t", "]"}], "[",
1009               RowBox[{"[", "2", "]"}], "]"}], " ", "]"}]}], " ", "]"}], ",",
1010           "\[IndentingNewLine]",
1011           RowBox[{"Line", "[", " ",
1012            RowBox[{"{", " ",
1013             RowBox[{
1014              RowBox[{"{",
1015               RowBox[{"x2", ",", "y2"}], "}"}], ",", " ",
1016              RowBox[{"{",
1017               RowBox[{
1018                RowBox[{"x2", " ", "+", " ",
1019                 RowBox[{"Re", "[", " ",
1020                  RowBox[{
1021                   RowBox[{"AmpMass", "[", "t", "]"}], "[",
1022                   RowBox[{"[", "2", "]"}], "]"}], " ", "]"}]}], ",", " ",
1023                RowBox[{"y2", " ", "+", " ",
1024                 RowBox[{"Im", "[", " ",
1025                  RowBox[{
1026                   RowBox[{"AmpMass", "[", "t", "]"}], "[",
1027                   RowBox[{"[", "2", "]"}], "]"}], " ", "]"}]}]}], " ",
1028               "}"}]}], " ", "}"}], " ", "]"}], ",", "\[IndentingNewLine]",
1029           RowBox[{"RGBColor", "[",
1030            RowBox[{"0", ",", "0", ",", ".8"}], "]"}], ",",
1031           "\[IndentingNewLine]",
1032           RowBox[{"Circle", "[", " ",
1033            RowBox[{
1034             RowBox[{"{",
1035              RowBox[{"x3", ",", "y3"}], "}"}], ",",
1036             RowBox[{"Abs", "[", " ",
1037              RowBox[{
1038               RowBox[{"AmpMass", "[", "t", "]"}], "[",
1039               RowBox[{"[", "3", "]"}], "]"}], " ", "]"}]}], " ", "]"}], ",",
1040           "\[IndentingNewLine]",
1041           RowBox[{"Line", "[", " ",
1042            RowBox[{"{", " ",
1043             RowBox[{
1044              RowBox[{"{",
1045               RowBox[{"x3", ",", "y3"}], "}"}], ",", " ",
1046              RowBox[{"{",
1047               RowBox[{
1048                RowBox[{"x3", " ", "+", " ",
1049                 RowBox[{"Re", "[", " ",
1050                  RowBox[{
1051                   RowBox[{"AmpMass", "[", "t", "]"}], "[",
1052                   RowBox[{"[", "3", "]"}], "]"}], " ", "]"}]}], ",", " ",
1053                RowBox[{"y3", " ", "+", " ",
1054                 RowBox[{"Im", "[", " ",
1055                  RowBox[{
1056                   RowBox[{"AmpMass", "[", "t", "]"}], "[",
1057                   RowBox[{"[", "3", "]"}], "]"}], " ", "]"}]}]}], " ",
1058               "}"}]}], " ", "}"}], " ", "]"}], ",", "\[IndentingNewLine]",
1059           "\[IndentingNewLine]",
1060           RowBox[{"RGBColor", "[",
1061            RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",",
1062           "\[IndentingNewLine]",
1063           RowBox[{"Text", "[",
1064            RowBox[{"\"\<\!\(\*SubscriptBox[\(\[Nu]\), \(1\)]\)\>\"", ",",
1065             RowBox[{"{",
1066              RowBox[{"x1", ",", "texty"}], "}"}], ",",
1067             RowBox[{"{",
1068              RowBox[{"0", ",",
1069               RowBox[{"-", "1"}]}], "}"}], ",",
1070             RowBox[{"TextStyle", "->",
1071              RowBox[{"{",
1072               RowBox[{"FontSize", "->", "24"}], "}"}]}]}], "]"}], ",",
1073           "\[IndentingNewLine]",
1074           RowBox[{"Text", "[",
1075            RowBox[{"\"\<\!\(\*SubscriptBox[\(\[Nu]\), \(2\)]\)\>\"", ",",
1076             RowBox[{"{",
1077              RowBox[{"x2", ",", "texty"}], "}"}], ",",
1078             RowBox[{"{",
1079              RowBox[{"0", ",",
1080               RowBox[{"-", "1"}]}], "}"}], ",",
1081             RowBox[{"TextStyle", "->",
1082              RowBox[{"{",
1083               RowBox[{"FontSize", "->", "24"}], "}"}]}]}], "]"}], ",",
1084           "\[IndentingNewLine]",
1085           RowBox[{"Text", "[",
1086            RowBox[{"\"\<\!\(\*SubscriptBox[\(\[Nu]\), \(3\)]\)\>\"", ",",
1087             RowBox[{"{",
1088              RowBox[{"x3", ",", "texty"}], "}"}], ",",
1089             RowBox[{"{",
1090              RowBox[{"0", ",",
1091               RowBox[{"-", "1"}]}], "}"}], ",",
1092             RowBox[{"TextStyle", "->",
1093              RowBox[{"{",
1094               RowBox[{"FontSize", "->", "24"}], "}"}]}]}], "]"}], ",",
1095           "\[IndentingNewLine]", "\[IndentingNewLine]",
1096           RowBox[{"Text", "[",
1097            RowBox[{
1098             RowBox[{"StringForm", "[",
1099              RowBox[{
1100              "\"\<\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV\>\"", ",",
1101               RowBox[{"ToString", "[", "mcsq1", "]"}]}], "]"}], ",",
1102             RowBox[{"{",
1103              RowBox[{"x1", ",",
1104               RowBox[{"texty", "-", "gap"}]}], "}"}], ",",
1105             RowBox[{"{",
1106              RowBox[{"0", ",",
1107               RowBox[{"-", "1"}]}], "}"}], ",", "\[IndentingNewLine]", "\t",
1108             
1109             RowBox[{"TextStyle", "->",
1110              RowBox[{"{",
1111               RowBox[{"FontSize", "->", "14"}], "}"}]}]}], "]"}], ",",
1112           "\[IndentingNewLine]",
1113           RowBox[{"Text", "[",
1114            RowBox[{
1115             RowBox[{"StringForm", "[",
1116              RowBox[{
1117              "\"\<\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV\>\"", ",",
1118               RowBox[{"ToString", "[", "mcsq2", "]"}]}], "]"}], ",",
1119             RowBox[{"{",
1120              RowBox[{"x2", ",",
1121               RowBox[{"texty", "-", "gap"}]}], "}"}], ",",
1122             RowBox[{"{",
1123              RowBox[{"0", ",",
1124               RowBox[{"-", "1"}]}], "}"}], ",", "\[IndentingNewLine]", "\t",
1125             
1126             RowBox[{"TextStyle", "->",
1127              RowBox[{"{",
1128               RowBox[{"FontSize", "->", "14"}], "}"}]}]}], "]"}], ",",
1129           "\[IndentingNewLine]",
1130           RowBox[{"Text", "[",
1131            RowBox[{
1132             RowBox[{"StringForm", "[",
1133              RowBox[{
1134              "\"\<\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV\>\"", ",",
1135               RowBox[{"ToString", "[", "mcsq3", "]"}]}], "]"}], ",",
1136             RowBox[{"{",
1137              RowBox[{"x3", ",",
1138               RowBox[{"texty", "-", "gap"}]}], "}"}], ",",
1139             RowBox[{"{",
1140              RowBox[{"0", ",",
1141               RowBox[{"-", "1"}]}], "}"}], ",", "\[IndentingNewLine]", "\t",
1142             
1143             RowBox[{"TextStyle", "->",
1144              RowBox[{"{",
1145               RowBox[{"FontSize", "->", "14"}], "}"}]}]}], "]"}], ",",
1146           "\[IndentingNewLine]", "\n", "\[IndentingNewLine]",
1147           RowBox[{"RGBColor", "[",
1148            RowBox[{"0", ",", ".6", ",", ".6"}], "]"}], ",",
1149           "\[IndentingNewLine]",
1150           RowBox[{"Circle", "[", " ",
1151            RowBox[{
1152             RowBox[{"{",
1153              RowBox[{"xe", ",", "ye"}], "}"}], ",",
1154             RowBox[{"Abs", "[", " ",
1155              RowBox[{
1156               RowBox[{"AmpProduction", "[", "t", "]"}], "[",
1157               RowBox[{"[", "1", "]"}], "]"}], " ", "]"}]}], " ", "]"}], ",",
1158           "\[IndentingNewLine]",
1159           RowBox[{"Line", "[", " ",
1160            RowBox[{"{", " ",
1161             RowBox[{
1162              RowBox[{"{",
1163               RowBox[{"xe", ",", "ye"}], "}"}], ",", " ",
1164              RowBox[{"{",
1165               RowBox[{
1166                RowBox[{"xe", " ", "+", " ",
1167                 RowBox[{"Re", "[", " ",
1168                  RowBox[{
1169                   RowBox[{"AmpProduction", "[", "t", "]"}], "[",
1170                   RowBox[{"[", "1", "]"}], "]"}], " ", "]"}]}], ",", " ",
1171                RowBox[{"ye", " ", "+", " ",
1172                 RowBox[{"Im", "[", " ",
1173                  RowBox[{
1174                   RowBox[{"AmpProduction", "[", "t", "]"}], "[",
1175                   RowBox[{"[", "1", "]"}], "]"}], " ", "]"}]}]}], " ",
1176               "}"}]}], " ", "}"}], " ", "]"}], ",", "\[IndentingNewLine]",
1177           RowBox[{"RGBColor", "[",
1178            RowBox[{".6", ",", "0", ",", ".6"}], "]"}], ",",
1179           "\[IndentingNewLine]",
1180           RowBox[{"Line", "[", " ",
1181            RowBox[{"{", " ",
1182             RowBox[{
1183              RowBox[{"{",
1184               RowBox[{"xmu", ",", "ymu"}], "}"}], ",", " ",
1185              RowBox[{"{",
1186               RowBox[{
1187                RowBox[{"xmu", " ", "+", " ",
1188                 RowBox[{"Re", "[", " ",
1189                  RowBox[{
1190                   RowBox[{"AmpProduction", "[", "t", "]"}], "[",
1191                   RowBox[{"[", "2", "]"}], "]"}], " ", "]"}]}], ",", " ",
1192                RowBox[{"ymu", " ", "+", " ",
1193                 RowBox[{"Im", "[", " ",
1194                  RowBox[{
1195                   RowBox[{"AmpProduction", "[", "t", "]"}], "[",
1196                   RowBox[{"[", "2", "]"}], "]"}], " ", "]"}]}]}], " ",
1197               "}"}]}], " ", "}"}], " ", "]"}], ",", "\[IndentingNewLine]",
1198           RowBox[{"Circle", "[", " ",
1199            RowBox[{
1200             RowBox[{"{",
1201              RowBox[{"xmu", ",", "ymu"}], "}"}], ",",
1202             RowBox[{"Abs", "[", " ",
1203              RowBox[{
1204               RowBox[{"AmpProduction", "[", "t", "]"}], "[",
1205               RowBox[{"[", "2", "]"}], "]"}], " ", "]"}]}], " ", "]"}], ",",
1206           "\[IndentingNewLine]",
1207           RowBox[{"RGBColor", "[",
1208            RowBox[{".6", ",", ".6", ",", "0"}], "]"}], ",",
1209           "\[IndentingNewLine]",
1210           RowBox[{"Circle", "[", " ",
1211            RowBox[{
1212             RowBox[{"{",
1213              RowBox[{"xtau", ",", "ytau"}], "}"}], ",",
1214             RowBox[{"Abs", "[", " ",
1215              RowBox[{
1216               RowBox[{"AmpProduction", "[", "t", "]"}], "[",
1217               RowBox[{"[", "3", "]"}], "]"}], " ", "]"}]}], " ", "]"}], ",",
1218           "\t",
1219           RowBox[{"Line", "[", " ",
1220            RowBox[{"{", " ",
1221             RowBox[{
1222              RowBox[{"{",
1223               RowBox[{"xtau", ",", "ytau"}], "}"}], ",", " ",
1224              RowBox[{"{",
1225               RowBox[{
1226                RowBox[{"xtau", " ", "+", " ",
1227                 RowBox[{"Re", "[", " ",
1228                  RowBox[{
1229                   RowBox[{"AmpProduction", "[", "t", "]"}], "[",
1230                   RowBox[{"[", "3", "]"}], "]"}], " ", "]"}]}], ",", " ",
1231                RowBox[{"ytau", " ", "+", " ",
1232                 RowBox[{"Im", "[", " ",
1233                  RowBox[{
1234                   RowBox[{"AmpProduction", "[", "t", "]"}], "[",
1235                   RowBox[{"[", "3", "]"}], "]"}], " ", "]"}]}]}], " ",
1236               "}"}]}], " ", "}"}], " ", "]"}], ",", "\[IndentingNewLine]",
1237           "\[IndentingNewLine]",
1238           RowBox[{"RGBColor", "[",
1239            RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",",
1240           "\[IndentingNewLine]", "\[IndentingNewLine]",
1241           RowBox[{"Text", "[",
1242            RowBox[{
1243             RowBox[{"StringForm", "[",
1244              RowBox[{"\"\<P = ``\>\"", ",",
1245               RowBox[{"NumberForm", "[",
1246                RowBox[{
1247                 RowBox[{
1248                  RowBox[{"Abs", "[", " ",
1249                   RowBox[{
1250                    RowBox[{"AmpProduction", "[", "t", "]"}], "[",
1251                    RowBox[{"[", "1", "]"}], "]"}], " ", "]"}], "^", "2"}],
1252                 ",", "3"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", "\t",
1253             
1254             RowBox[{"{",
1255              RowBox[{"xe", ",",
1256               RowBox[{"textye", "-", "gap"}]}], "}"}], ",",
1257             RowBox[{"{",
1258              RowBox[{"0", ",",
1259               RowBox[{"-", "1"}]}], "}"}], ",", "\[IndentingNewLine]", "\t",
1260             
1261             RowBox[{"TextStyle", "->",
1262              RowBox[{"{",
1263               RowBox[{"FontSize", "->", "18"}], "}"}]}]}], "]"}], ",",
1264           "\[IndentingNewLine]",
1265           RowBox[{"Text", "[",
1266            RowBox[{
1267             RowBox[{"StringForm", "[",
1268              RowBox[{"\"\<P = ``\>\"", ",",
1269               RowBox[{"NumberForm", "[",
1270                RowBox[{
1271                 RowBox[{
1272                  RowBox[{"Abs", "[", " ",
1273                   RowBox[{
1274                    RowBox[{"AmpProduction", "[", "t", "]"}], "[",
1275                    RowBox[{"[", "2", "]"}], "]"}], " ", "]"}], "^", "2"}],
1276                 ",", "3"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", "\t",
1277             
1278             RowBox[{"{",
1279              RowBox[{"xmu", ",",
1280               RowBox[{"textye", "-", "gap"}]}], "}"}], ",",
1281             RowBox[{"{",
1282              RowBox[{"0", ",",
1283               RowBox[{"-", "1"}]}], "}"}], ",", "\[IndentingNewLine]", "\t",
1284             
1285             RowBox[{"TextStyle", "->",
1286              RowBox[{"{",
1287               RowBox[{"FontSize", "->", "18"}], "}"}]}]}], "]"}], ",",
1288           "\[IndentingNewLine]",
1289           RowBox[{"Text", "[",
1290            RowBox[{
1291             RowBox[{"StringForm", "[",
1292              RowBox[{"\"\<P = ``\>\"", ",",
1293               RowBox[{"NumberForm", "[",
1294                RowBox[{
1295                 RowBox[{
1296                  RowBox[{"Abs", "[", " ",
1297                   RowBox[{
1298                    RowBox[{"AmpProduction", "[", "t", "]"}], "[",
1299                    RowBox[{"[", "3", "]"}], "]"}], " ", "]"}], "^", "2"}],
1300                 ",", "3"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", "\t",
1301             
1302             RowBox[{"{",
1303              RowBox[{"xtau", ",",
1304               RowBox[{"textye", "-", "gap"}]}], "}"}], ",",
1305             RowBox[{"{",
1306              RowBox[{"0", ",",
1307               RowBox[{"-", "1"}]}], "}"}], ",", "\[IndentingNewLine]", "\t",
1308             
1309             RowBox[{"TextStyle", "->",
1310              RowBox[{"{",
1311               RowBox[{"FontSize", "->", "18"}], "}"}]}]}], "]"}], ",",
1312           "\[IndentingNewLine]", "\n", "\t",
1313           RowBox[{"Text", "[",
1314            RowBox[{"\"\<\!\(\*SubscriptBox[\(\[Nu]\), \(e\)]\)\>\"", ",",
1315             RowBox[{"{",
1316              RowBox[{"xe", ",", "textye"}], "}"}], ",",
1317             RowBox[{"{",
1318              RowBox[{"0", ",",
1319               RowBox[{"-", "1"}]}], "}"}], ",",
1320             RowBox[{"TextStyle", "->",
1321              RowBox[{"{",
1322               RowBox[{"FontSize", "->", "24"}], "}"}]}]}], "]"}], ",", "\n",
1323           "\t",
1324           RowBox[{"Text", "[",
1325            RowBox[{
1326            "\"\<\!\(\*SubscriptBox[\(\[Nu]\), \(\[Mu]\)]\)\>\"", ",",
1327             RowBox[{"{",
1328              RowBox[{"xmu", ",", "textye"}], "}"}], ",",
1329             RowBox[{"{",
1330              RowBox[{"0", ",",
1331               RowBox[{"-", "1"}]}], "}"}], ",",
1332             RowBox[{"TextStyle", "->",
1333              RowBox[{"{",
1334               RowBox[{"FontSize", "->", "24"}], "}"}]}]}], "]"}], ",", "\n",
1335           "\t",
1336           RowBox[{"Text", "[",
1337            RowBox[{
1338            "\"\<\!\(\*SubscriptBox[\(\[Nu]\), \(\[Tau]\)]\)\>\"", ",",
1339             RowBox[{"{",
1340              RowBox[{"xtau", ",", "textye"}], "}"}], ",",
1341             RowBox[{"{",
1342              RowBox[{"0", ",",
1343               RowBox[{"-", "1"}]}], "}"}], ",",
1344             RowBox[{"TextStyle", "->",
1345              RowBox[{"{",
1346               RowBox[{"FontSize", "->", "24"}], "}"}]}]}], "]"}], ",", "\n",
1347           "\t", "\n", "\t",
1348           RowBox[{"Text", "[",
1349            RowBox[{
1350             RowBox[{"StringForm", "[",
1351              RowBox[{
1352              "\"\<\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg\>\"",
1353               ",",
1354               RowBox[{"ToString", "[", "theta12", "]"}]}], "]"}], ",",
1355             RowBox[{"{",
1356              RowBox[{"x1", ",",
1357               RowBox[{"texty", "-",
1358                RowBox[{"2", "*", "gap"}]}]}], "}"}], ",",
1359             RowBox[{"{",
1360              RowBox[{"0", ",",
1361               RowBox[{"-", "1"}]}], "}"}], ",", "\[IndentingNewLine]", "\t",
1362             
1363             RowBox[{"TextStyle", "->",
1364              RowBox[{"{",
1365               RowBox[{"FontSize", "->", "14"}], "}"}]}]}], "]"}], ",", "\n",
1366           "\t",
1367           RowBox[{"Text", "[",
1368            RowBox[{
1369             RowBox[{"StringForm", "[",
1370              RowBox[{
1371              "\"\<\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg\>\"",
1372               ",",
1373               RowBox[{"ToString", "[", "theta13", "]"}]}], "]"}], ",",
1374             RowBox[{"{",
1375              RowBox[{"x2", ",",
1376               RowBox[{"texty", "-",
1377                RowBox[{"2", "*", "gap"}]}]}], "}"}], ",",
1378             RowBox[{"{",
1379              RowBox[{"0", ",",
1380               RowBox[{"-", "1"}]}], "}"}], ",", "\[IndentingNewLine]", "\t",
1381             
1382             RowBox[{"TextStyle", "->",
1383              RowBox[{"{",
1384               RowBox[{"FontSize", "->", "14"}], "}"}]}]}], "]"}], ",", "\n",
1385           "\t",
1386           RowBox[{"Text", "[",
1387            RowBox[{
1388             RowBox[{"StringForm", "[",
1389              RowBox[{
1390              "\"\<\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg\>\"",
1391               ",",
1392               RowBox[{"ToString", "[", "theta23", "]"}]}], "]"}], ",",
1393             RowBox[{"{",
1394              RowBox[{"x3", ",",
1395               RowBox[{"texty", "-",
1396                RowBox[{"2", "*", "gap"}]}]}], "}"}], ",",
1397             RowBox[{"{",
1398              RowBox[{"0", ",",
1399               RowBox[{"-", "1"}]}], "}"}], ",", "\[IndentingNewLine]", "\t",
1400             
1401             RowBox[{"TextStyle", "->",
1402              RowBox[{"{",
1403               RowBox[{"FontSize", "->", "14"}], "}"}]}]}], "]"}], ",",
1404           "\[IndentingNewLine]", "\n", "\[IndentingNewLine]",
1405           RowBox[{"Text", "[",
1406            RowBox[{
1407             RowBox[{"StringForm", "[",
1408              RowBox[{"\"\<t = `` sec\>\"", ",",
1409               RowBox[{"ScientificForm", "[",
1410                RowBox[{"t", ",", "4"}], "]"}]}], "]"}], ",",
1411             RowBox[{"{",
1412              RowBox[{
1413               RowBox[{"xtau", "+", "0.5"}], ",", "texty"}], "}"}], ",",
1414             RowBox[{"{",
1415              RowBox[{
1416               RowBox[{"-", "1"}], ",",
1417               RowBox[{"-", "1"}]}], "}"}], ",", "\[IndentingNewLine]", "\t",
1418             
1419             RowBox[{"TextStyle", "->",
1420              RowBox[{"{",
1421               RowBox[{"FontSize", "->", "12"}], "}"}]}]}], "]"}]}],
1422          "\[IndentingNewLine]", "\t", "}"}],
1423         FontSize->14],
1424        StyleBox[",",
1425         FontSize->14], "\[IndentingNewLine]",
1426        StyleBox[
1427         RowBox[{"AspectRatio", "\[Rule]", "Automatic"}],
1428         FontSize->14],
1429        StyleBox[",",
1430         FontSize->14], "\n", "\t",
1431        RowBox[{"ImageSize", "\[Rule]",
1432         RowBox[{"72", "*",
1433          RowBox[{"{",
1434           RowBox[{"plotwidth", ",", "plotheight"}], "}"}]}]}]}],
1435       StyleBox["]",
1436        FontSize->14]}],
1437      StyleBox[",",
1438       FontSize->14], "\n", "\t",
1439      RowBox[{"{",
1440       RowBox[{"t", ",", " ", "tinitial", ",", " ",
1441        RowBox[{"tinitial", "+", "periodmax", "-", "dt"}], ",", " ", "dt"}],
1442       "}"}]}], "]"}]}], ";"}], " "}]], "Input",
1443 CellChangeTimes->{{3.446277704607821*^9, 3.4462777093195353`*^9}, {
1444  3.446277764763568*^9, 3.446277843832737*^9}, {3.446279710918833*^9,
1445  3.4462797404349003`*^9}}],
1446
1447Cell[CellGroupData[{
1448
1449Cell[BoxData[
1450 RowBox[{
1451  StyleBox[
1452   RowBox[{"List",
1453    StyleBox["Animate",
1454     FontSize->14]}]],
1455  StyleBox["[",
1456   FontSize->14],
1457  StyleBox["MixingMovie",
1458   FontSize->14],
1459  StyleBox["]",
1460   FontSize->14]}]], "Input",
1461 CellChangeTimes->{{3.446277704607821*^9, 3.4462777093195353`*^9}, {
1462  3.446277764763568*^9, 3.446277843832737*^9}, {3.446279710918833*^9,
1463  3.4462797404349003`*^9}}],
1464
1465Cell[BoxData[
1466 TagBox[
1467  StyleBox[
1468   DynamicModuleBox[{$CellContext`i1$$ = 7, Typeset`show$$ = True,
1469    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu",
1470    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ =
1471    "\"untitled\"", Typeset`specs$$ = {{{
1472       Hold[$CellContext`i1$$], 1, ""}, 1, 30, 1}}, Typeset`size$$ =
1473    Automatic, Typeset`update$$ = 0, Typeset`initDone$$,
1474    Typeset`skipInitDone$$ = True, $CellContext`i1$184$$ = 0},
1475    PaneBox[
1476     PanelBox[
1477      DynamicWrapperBox[
1478       TagBox[GridBox[{
1479          {
1480           ItemBox[
1481            ItemBox[
1482             StyleBox[
1483              TagBox[GridBox[{
1484                 {"\<\"\\!\\(\\*TagBox[\\\"\\\\\\\"\\\\\\\"\\\", HoldForm]\\)\
1485\"\>",
1486                  AnimatorBox[Dynamic[$CellContext`i1$$], {1, 30, 1},
1487                   AnimationRate->Automatic,
1488                   
1489                   AppearanceElements->{
1490                    "ProgressSlider", "PlayPauseButton",
1491                    "FasterSlowerButtons", "DirectionButton"},
1492                   AutoAction->False,
1493                   ContinuousAction->True,
1494                   DisplayAllSteps->True]}
1495                },
1496                ColumnsEqual->False,
1497               
1498                GridBoxAlignment->{
1499                 "Columns" -> {Right, {Left}}, "ColumnsIndexed" -> {},
1500                  "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
1501               
1502                GridBoxItemSize->{
1503                 "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
1504                RowsEqual->False],
1505               "Grid"], "ManipulateLabel",
1506              StripOnInput->False],
1507             Alignment->{Automatic, Inherited},
1508             StripOnInput->False],
1509            Background->None,
1510            StripOnInput->False]},
1511          {
1512           ItemBox[
1513            TagBox[
1514             StyleBox[
1515              PaneBox[Cell[BoxData[
1516                TagBox[
1517                 PaneSelectorBox[{1->
1518                 
1519                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
1520                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
1521                    {RGBColor[0.8, 0, 0],
1522                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
1523                    LineBox[{{1.35, 1.7}, {1.0312042224028322`, 1.7}}]},
1524                    {RGBColor[0, 0.6, 0],
1525                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
1526                    LineBox[{{3.7, 1.7}, {4.523172944645501, 1.7}}]},
1527                    {RGBColor[0, 0, 0.8],
1528                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
1529                     LineBox[{{6.050000000000001, 1.7}, {6.519846310392955,
1530                    1.7}}]},
1531                    {RGBColor[0, 0, 0],
1532                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
1533\\)\"\>", {1.35, 0.35}, {0, -1},
1534                    BaseStyle->{FontSize -> 24}],
1535                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
1536\\)\"\>", {3.7, 0.35}, {0, -1},
1537                    BaseStyle->{FontSize -> 24}],
1538                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
1539\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
1540                    BaseStyle->{FontSize -> 24}], InsetBox[
1541                   
1542                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
1543\\(1\\)]\\) = 0.1 eV\"\>",
1544                    StringForm[
1545                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
1546                    Editable->False], {1.35, 0.}, {0, -1},
1547                    BaseStyle->{FontSize -> 14}], InsetBox[
1548                   
1549                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
1550\\(2\\)]\\) = 0.3 eV\"\>",
1551                    StringForm[
1552                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
1553                    Editable->False], {3.7, 0.}, {0, -1},
1554                    BaseStyle->{FontSize -> 14}], InsetBox[
1555                   
1556                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
1557\\(3\\)]\\) = 0.4 eV\"\>",
1558                    StringForm[
1559                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
1560                    Editable->False], {6.050000000000001, 0.}, {0, -1},
1561                    BaseStyle->{FontSize -> 14}]},
1562                    {RGBColor[0, 0.6, 0.6],
1563                    CircleBox[{1.35, 4.4}, 5.551115123125783*^-17],
1564                    LineBox[{{1.35, 4.4}, {1.35, 4.4}}]},
1565                    {RGBColor[0.6, 0, 0.6], LineBox[{{3.7, 4.4}, {4.7, 4.4}}],
1566                     CircleBox[{3.7, 4.4}]},
1567                    {RGBColor[0.6, 0.6, 0],
1568                    CircleBox[{6.050000000000001, 4.4},
1569                    5.551115123125783*^-17],
1570                    LineBox[{{6.050000000000001, 4.4}, {6.050000000000001,
1571                    4.4}}]},
1572                    {RGBColor[0, 0, 0], InsetBox[
1573                   
1574                    InterpretationBox["\<\"P = \
1575\\!\\(TraditionalForm\\`\\(\\\"3.08\\\" \[Times] 10\\^\\\"-33\\\"\\)\\)\"\>",
1576                    StringForm["P = ``",
1577                    NumberForm[3.0814879110195774`*^-33, 3]],
1578                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
1579                    BaseStyle->{FontSize -> 18}], InsetBox[
1580                   
1581                    InterpretationBox["\<\"P = \\!\\(TraditionalForm\\`\\\"1.\
1582\\\"\\)\"\>",
1583                    StringForm["P = ``",
1584                    NumberForm[1., 3]],
1585                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
1586                    BaseStyle->{FontSize -> 18}], InsetBox[
1587                   
1588                    InterpretationBox["\<\"P = \
1589\\!\\(TraditionalForm\\`\\(\\\"3.08\\\" \[Times] 10\\^\\\"-33\\\"\\)\\)\"\>",
1590                    StringForm["P = ``",
1591                    NumberForm[3.0814879110195774`*^-33, 3]],
1592                   
1593                    Editable->
1594                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
1595                   
1596                    BaseStyle->{FontSize -> 18}],
1597                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
1598\\)\"\>", {1.35, 3.05}, {0, -1},
1599                    BaseStyle->{FontSize -> 24}],
1600                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
1601\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
1602                    BaseStyle->{FontSize -> 24}],
1603                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
1604\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
1605                    BaseStyle->{FontSize -> 24}], InsetBox[
1606                   
1607                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
1608), \\(12\\)]\\)=10. deg\"\>",
1609                    StringForm[
1610                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
1611                    "10."],
1612                    Editable->False], {1.35, -0.35}, {0, -1},
1613                    BaseStyle->{FontSize -> 14}], InsetBox[
1614                   
1615                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
1616), \\(13\\)]\\)=20. deg\"\>",
1617                    StringForm[
1618                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
1619                    "20."],
1620                    Editable->False], {3.7, -0.35}, {0, -1},
1621                    BaseStyle->{FontSize -> 14}], InsetBox[
1622                   
1623                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
1624), \\(23\\)]\\)=30. deg\"\>",
1625                    StringForm[
1626                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
1627                    "30."],
1628                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
1629                    BaseStyle->{FontSize -> 14}], InsetBox[
1630                   
1631                    InterpretationBox["\<\"t = \\!\\(TraditionalForm\\`\\\"0.\
1632\\\"\\) sec\"\>",
1633                    StringForm["t = `` sec",
1634                    ScientificForm[0., 4]],
1635                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
1636                    BaseStyle->{FontSize -> 12}]}},
1637                   AspectRatio->Automatic,
1638                   ImageSize->{640.8000000000001, 414.}], 2->
1639                 
1640                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
1641                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
1642                    {RGBColor[0.8, 0, 0],
1643                    CircleBox[{1.35, 1.7}, 0.3187957775971679],
1644                    LineBox[{{1.35, 1.7}, {1.0381706750192623`,
1645                    1.7662813691457895`}}]},
1646                    {RGBColor[0, 0.6, 0],
1647                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
1648                    LineBox[{{3.7, 1.7}, {4.365960901527878,
1649                    1.2161510830512061`}}]},
1650                    {RGBColor[0, 0, 0.8],
1651                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
1652                     LineBox[{{6.050000000000001, 1.7}, {6.36438854656871,
1653                    1.3508361456618303`}}]},
1654                    {RGBColor[0, 0, 0],
1655                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
1656\\)\"\>", {1.35, 0.35}, {0, -1},
1657                    BaseStyle->{FontSize -> 24}],
1658                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
1659\\)\"\>", {3.7, 0.35}, {0, -1},
1660                    BaseStyle->{FontSize -> 24}],
1661                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
1662\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
1663                    BaseStyle->{FontSize -> 24}], InsetBox[
1664                   
1665                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
1666\\(1\\)]\\) = 0.1 eV\"\>",
1667                    StringForm[
1668                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
1669                    Editable->False], {1.35, 0.}, {0, -1},
1670                    BaseStyle->{FontSize -> 14}], InsetBox[
1671                   
1672                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
1673\\(2\\)]\\) = 0.3 eV\"\>",
1674                    StringForm[
1675                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
1676                    Editable->False], {3.7, 0.}, {0, -1},
1677                    BaseStyle->{FontSize -> 14}], InsetBox[
1678                   
1679                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
1680\\(3\\)]\\) = 0.4 eV\"\>",
1681                    StringForm[
1682                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
1683                    Editable->False], {6.050000000000001, 0.}, {0, -1},
1684                    BaseStyle->{FontSize -> 14}]},
1685                    {RGBColor[0, 0.6, 0.6],
1686                    CircleBox[{1.35, 4.4}, 0.1549744119485853],
1687                    LineBox[{{1.35, 4.4}, {1.2776239656975443`,
1688                    4.262964318451509}}]},
1689                    {RGBColor[0.6, 0, 0.6],
1690                    LineBox[{{3.7, 4.4}, {4.495325167099422,
1691                    3.8165250929713164`}}],
1692                    CircleBox[{3.7, 4.4}, 0.9864000651631436]},
1693                    {RGBColor[0.6, 0.6, 0],
1694                    CircleBox[{6.050000000000001, 4.4}, 0.05475256238146247],
1695                    LineBox[{{6.050000000000001, 4.4}, {6.00755949184707,
1696                    4.365407423411129}}]},
1697                    {RGBColor[0, 0, 0], InsetBox[
1698                   
1699                    InterpretationBox["\<\"P = \
1700\\!\\(TraditionalForm\\`\\\"0.024\\\"\\)\"\>",
1701                    StringForm["P = ``",
1702                    NumberForm[0.024017068358809818`, 3]],
1703                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
1704                    BaseStyle->{FontSize -> 18}], InsetBox[
1705                   
1706                    InterpretationBox["\<\"P = \
1707\\!\\(TraditionalForm\\`\\\"0.973\\\"\\)\"\>",
1708                    StringForm["P = ``",
1709                    NumberForm[0.9729850885538539, 3]],
1710                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
1711                    BaseStyle->{FontSize -> 18}], InsetBox[
1712                   
1713                    InterpretationBox["\<\"P = \
1714\\!\\(TraditionalForm\\`\\\"0.003\\\"\\)\"\>",
1715                    StringForm["P = ``",
1716                    NumberForm[0.0029978430873359393`, 3]],
1717                   
1718                    Editable->
1719                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
1720                   
1721                    BaseStyle->{FontSize -> 18}],
1722                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
1723\\)\"\>", {1.35, 3.05}, {0, -1},
1724                    BaseStyle->{FontSize -> 24}],
1725                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
1726\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
1727                    BaseStyle->{FontSize -> 24}],
1728                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
1729\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
1730                    BaseStyle->{FontSize -> 24}], InsetBox[
1731                   
1732                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
1733), \\(12\\)]\\)=10. deg\"\>",
1734                    StringForm[
1735                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
1736                    "10."],
1737                    Editable->False], {1.35, -0.35}, {0, -1},
1738                    BaseStyle->{FontSize -> 14}], InsetBox[
1739                   
1740                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
1741), \\(13\\)]\\)=20. deg\"\>",
1742                    StringForm[
1743                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
1744                    "20."],
1745                    Editable->False], {3.7, -0.35}, {0, -1},
1746                    BaseStyle->{FontSize -> 14}], InsetBox[
1747                   
1748                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
1749), \\(23\\)]\\)=30. deg\"\>",
1750                    StringForm[
1751                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
1752                    "30."],
1753                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
1754                    BaseStyle->{FontSize -> 14}], InsetBox[
1755                   
1756                    InterpretationBox["\<\"t = \
1757\\!\\(TraditionalForm\\`\\(\\\"1.379\\\" \[Times] 10\\^\\\"-15\\\"\\)\\) \
1758sec\"\>",
1759                    StringForm["t = `` sec",
1760                    ScientificForm[1.3785670894304726`*^-15, 4]],
1761                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
1762                    BaseStyle->{FontSize -> 12}]}},
1763                   AspectRatio->Automatic,
1764                   ImageSize->{640.8000000000001, 414.}], 3->
1765                 
1766                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
1767                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
1768                    {RGBColor[0.8, 0, 0],
1769                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
1770                    LineBox[{{1.35, 1.7}, {1.0587655654604666`,
1771                    1.8296659244066116`}}]},
1772                    {RGBColor[0, 0.6, 0],
1773                    CircleBox[{3.7, 1.7}, 0.8231729446455008],
1774                    LineBox[{{3.7, 1.7}, {3.9543744292051275`,
1775                    0.9171160069570267}}]},
1776                    {RGBColor[0, 0, 0.8],
1777                    CircleBox[{6.050000000000001, 1.7}, 0.4698463103929542],
1778                    LineBox[{{6.050000000000001, 1.7}, {6.000887687202648,
1779                    1.232727556856209}}]},
1780                    {RGBColor[0, 0, 0],
1781                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
1782\\)\"\>", {1.35, 0.35}, {0, -1},
1783                    BaseStyle->{FontSize -> 24}],
1784                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
1785\\)\"\>", {3.7, 0.35}, {0, -1},
1786                    BaseStyle->{FontSize -> 24}],
1787                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
1788\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
1789                    BaseStyle->{FontSize -> 24}], InsetBox[
1790                   
1791                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
1792\\(1\\)]\\) = 0.1 eV\"\>",
1793                    StringForm[
1794                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
1795                    Editable->False], {1.35, 0.}, {0, -1},
1796                    BaseStyle->{FontSize -> 14}], InsetBox[
1797                   
1798                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
1799\\(2\\)]\\) = 0.3 eV\"\>",
1800                    StringForm[
1801                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
1802                    Editable->False], {3.7, 0.}, {0, -1},
1803                    BaseStyle->{FontSize -> 14}], InsetBox[
1804                   
1805                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
1806\\(3\\)]\\) = 0.4 eV\"\>",
1807                    StringForm[
1808                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
1809                    Editable->False], {6.050000000000001, 0.}, {0, -1},
1810                    BaseStyle->{FontSize -> 14}]},
1811                    {RGBColor[0, 0.6, 0.6],
1812                    CircleBox[{1.35, 4.4}, 0.29666127566530637`],
1813                    LineBox[{{1.35, 4.4}, {1.1051972050776628`,
1814                    4.2324305992205655`}}]},
1815                    {RGBColor[0.6, 0, 0.6],
1816                    LineBox[{{3.7, 4.4}, {3.9791632169907047`,
1817                    3.4946678955725154`}}],
1818                    CircleBox[{3.7, 4.4}, 0.9473955462359414]},
1819                    {RGBColor[0.6, 0.6, 0],
1820                    CircleBox[{6.050000000000001, 4.4}, 0.12014061133911028`],
1821                     LineBox[{{6.050000000000001, 4.4}, {5.931360397670449,
1822                    4.418931752481507}}]},
1823                    {RGBColor[0, 0, 0], InsetBox[
1824                   
1825                    InterpretationBox["\<\"P = \
1826\\!\\(TraditionalForm\\`\\\"0.088\\\"\\)\"\>",
1827                    StringForm["P = ``",
1828                    NumberForm[0.0880079124793669, 3]],
1829                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
1830                    BaseStyle->{FontSize -> 18}], InsetBox[
1831                   
1832                    InterpretationBox["\<\"P = \
1833\\!\\(TraditionalForm\\`\\\"0.898\\\"\\)\"\>",
1834                    StringForm["P = ``",
1835                    NumberForm[0.8975583210276977, 3]],
1836                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
1837                    BaseStyle->{FontSize -> 18}], InsetBox[
1838                   
1839                    InterpretationBox["\<\"P = \
1840\\!\\(TraditionalForm\\`\\\"0.0144\\\"\\)\"\>",
1841                    StringForm["P = ``",
1842                    NumberForm[0.014433766492935153`, 3]],
1843                   
1844                    Editable->
1845                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
1846                   
1847                    BaseStyle->{FontSize -> 18}],
1848                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
1849\\)\"\>", {1.35, 3.05}, {0, -1},
1850                    BaseStyle->{FontSize -> 24}],
1851                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
1852\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
1853                    BaseStyle->{FontSize -> 24}],
1854                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
1855\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
1856                    BaseStyle->{FontSize -> 24}], InsetBox[
1857                   
1858                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
1859), \\(12\\)]\\)=10. deg\"\>",
1860                    StringForm[
1861                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
1862                    "10."],
1863                    Editable->False], {1.35, -0.35}, {0, -1},
1864                    BaseStyle->{FontSize -> 14}], InsetBox[
1865                   
1866                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
1867), \\(13\\)]\\)=20. deg\"\>",
1868                    StringForm[
1869                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
1870                    "20."],
1871                    Editable->False], {3.7, -0.35}, {0, -1},
1872                    BaseStyle->{FontSize -> 14}], InsetBox[
1873                   
1874                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
1875), \\(23\\)]\\)=30. deg\"\>",
1876                    StringForm[
1877                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
1878                    "30."],
1879                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
1880                    BaseStyle->{FontSize -> 14}], InsetBox[
1881                   
1882                    InterpretationBox["\<\"t = \
1883\\!\\(TraditionalForm\\`\\(\\\"2.757\\\" \[Times] 10\\^\\\"-15\\\"\\)\\) \
1884sec\"\>",
1885                    StringForm["t = `` sec",
1886                    ScientificForm[2.757134178860945*^-15, 4]],
1887                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
1888                    BaseStyle->{FontSize -> 12}]}},
1889                   AspectRatio->Automatic,
1890                   ImageSize->{640.8000000000001, 414.}], 4->
1891                 
1892                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
1893                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
1894                    {RGBColor[0.8, 0, 0],
1895                    CircleBox[{1.35, 1.7}, 0.318795777597168],
1896                    LineBox[{{1.35, 1.7}, {1.0920887981889151`,
1897                    1.8873834565647265`}}]},
1898                    {RGBColor[0, 0.6, 0],
1899                    CircleBox[{3.7, 1.7}, 0.8231729446455008],
1900                    LineBox[{{3.7, 1.7}, {3.4456255707948724`,
1901                    0.9171160069570267}}]},
1902                    {RGBColor[0, 0, 0.8],
1903                    CircleBox[{6.050000000000001, 1.7}, 0.4698463103929542],
1904                    LineBox[{{6.050000000000001, 1.7}, {5.669886350147734,
1905                    1.4238312679069898`}}]},
1906                    {RGBColor[0, 0, 0],
1907                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
1908\\)\"\>", {1.35, 0.35}, {0, -1},
1909                    BaseStyle->{FontSize -> 24}],
1910                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
1911\\)\"\>", {3.7, 0.35}, {0, -1},
1912                    BaseStyle->{FontSize -> 24}],
1913                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
1914\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
1915                    BaseStyle->{FontSize -> 24}], InsetBox[
1916                   
1917                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
1918\\(1\\)]\\) = 0.1 eV\"\>",
1919                    StringForm[
1920                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
1921                    Editable->False], {1.35, 0.}, {0, -1},
1922                    BaseStyle->{FontSize -> 14}], InsetBox[
1923                   
1924                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
1925\\(2\\)]\\) = 0.3 eV\"\>",
1926                    StringForm[
1927                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
1928                    Editable->False], {3.7, 0.}, {0, -1},
1929                    BaseStyle->{FontSize -> 14}], InsetBox[
1930                   
1931                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
1932\\(3\\)]\\) = 0.4 eV\"\>",
1933                    StringForm[
1934                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
1935                    Editable->False], {6.050000000000001, 0.}, {0, -1},
1936                    BaseStyle->{FontSize -> 14}]},
1937                    {RGBColor[0, 0.6, 0.6],
1938                    CircleBox[{1.35, 4.4}, 0.4130817066485086],
1939                    LineBox[{{1.35, 4.4}, {0.9398103938238572,
1940                    4.351204678987578}}]},
1941                    {RGBColor[0.6, 0, 0.6],
1942                    LineBox[{{3.7, 4.4}, {3.394231858287995,
1943                    3.56605716356679}}],
1944                    CircleBox[{3.7, 4.4}, 0.8882312823382664]},
1945                    {RGBColor[0.6, 0.6, 0],
1946                    CircleBox[{6.050000000000001, 4.4}, 0.20101913517890388`],
1947                     LineBox[{{6.050000000000001, 4.4}, {5.931842242928651,
1948                    4.56262668032012}}]},
1949                    {RGBColor[0, 0, 0], InsetBox[
1950                   
1951                    InterpretationBox["\<\"P = \
1952\\!\\(TraditionalForm\\`\\\"0.171\\\"\\)\"\>",
1953                    StringForm["P = ``",
1954                    NumberForm[0.1706364963676445, 3]],
1955                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
1956                    BaseStyle->{FontSize -> 18}], InsetBox[
1957                   
1958                    InterpretationBox["\<\"P = \
1959\\!\\(TraditionalForm\\`\\\"0.789\\\"\\)\"\>",
1960                    StringForm["P = ``",
1961                    NumberForm[0.7889548109242812, 3]],
1962                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
1963                    BaseStyle->{FontSize -> 18}], InsetBox[
1964                   
1965                    InterpretationBox["\<\"P = \
1966\\!\\(TraditionalForm\\`\\\"0.0404\\\"\\)\"\>",
1967                    StringForm["P = ``",
1968                    NumberForm[0.04040869270807443, 3]],
1969                   
1970                    Editable->
1971                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
1972                   
1973                    BaseStyle->{FontSize -> 18}],
1974                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
1975\\)\"\>", {1.35, 3.05}, {0, -1},
1976                    BaseStyle->{FontSize -> 24}],
1977                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
1978\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
1979                    BaseStyle->{FontSize -> 24}],
1980                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
1981\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
1982                    BaseStyle->{FontSize -> 24}], InsetBox[
1983                   
1984                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
1985), \\(12\\)]\\)=10. deg\"\>",
1986                    StringForm[
1987                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
1988                    "10."],
1989                    Editable->False], {1.35, -0.35}, {0, -1},
1990                    BaseStyle->{FontSize -> 14}], InsetBox[
1991                   
1992                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
1993), \\(13\\)]\\)=20. deg\"\>",
1994                    StringForm[
1995                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
1996                    "20."],
1997                    Editable->False], {3.7, -0.35}, {0, -1},
1998                    BaseStyle->{FontSize -> 14}], InsetBox[
1999                   
2000                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2001), \\(23\\)]\\)=30. deg\"\>",
2002                    StringForm[
2003                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
2004                    "30."],
2005                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
2006                    BaseStyle->{FontSize -> 14}], InsetBox[
2007                   
2008                    InterpretationBox["\<\"t = \
2009\\!\\(TraditionalForm\\`\\(\\\"4.136\\\" \[Times] 10\\^\\\"-15\\\"\\)\\) \
2010sec\"\>",
2011                    StringForm["t = `` sec",
2012                    ScientificForm[4.1357012682914175`*^-15, 4]],
2013                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
2014                    BaseStyle->{FontSize -> 12}]}},
2015                   AspectRatio->Automatic,
2016                   ImageSize->{640.8000000000001, 414.}], 5->
2017                 
2018                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
2019                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
2020                    {RGBColor[0.8, 0, 0],
2021                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
2022                    LineBox[{{1.35, 1.7}, {1.1366839880317634`,
2023                    1.9369114325053776`}}]},
2024                    {RGBColor[0, 0.6, 0],
2025                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
2026                    LineBox[{{3.7, 1.7}, {3.034039098472122,
2027                    1.2161510830512063`}}]},
2028                    {RGBColor[0, 0, 0.8],
2029                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295416`],
2030                     LineBox[{{6.050000000000001, 1.7}, {5.590420958775502,
2031                    1.7976865408182852`}}]},
2032                    {RGBColor[0, 0, 0],
2033                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
2034\\)\"\>", {1.35, 0.35}, {0, -1},
2035                    BaseStyle->{FontSize -> 24}],
2036                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
2037\\)\"\>", {3.7, 0.35}, {0, -1},
2038                    BaseStyle->{FontSize -> 24}],
2039                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
2040\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
2041                    BaseStyle->{FontSize -> 24}], InsetBox[
2042                   
2043                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2044\\(1\\)]\\) = 0.1 eV\"\>",
2045                    StringForm[
2046                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
2047                    Editable->False], {1.35, 0.}, {0, -1},
2048                    BaseStyle->{FontSize -> 14}], InsetBox[
2049                   
2050                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2051\\(2\\)]\\) = 0.3 eV\"\>",
2052                    StringForm[
2053                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
2054                    Editable->False], {3.7, 0.}, {0, -1},
2055                    BaseStyle->{FontSize -> 14}], InsetBox[
2056                   
2057                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2058\\(3\\)]\\) = 0.4 eV\"\>",
2059                    StringForm[
2060                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
2061                    Editable->False], {6.050000000000001, 0.}, {0, -1},
2062                    BaseStyle->{FontSize -> 14}]},
2063                    {RGBColor[0, 0.6, 0.6],
2064                    CircleBox[{1.35, 4.4}, 0.4947542375891875],
2065                    LineBox[{{1.35, 4.4}, {0.8867397596296036,
2066                    4.573700044054171}}]},
2067                    {RGBColor[0.6, 0, 0.6],
2068                    LineBox[{{3.7, 4.4}, {3.003871730726603,
2069                    3.972079958703037}}],
2070                    CircleBox[{3.7, 4.4}, 0.817135318674435]},
2071                    {RGBColor[0.6, 0.6, 0],
2072                    CircleBox[{6.050000000000001, 4.4}, 0.29581770630300547`],
2073                     LineBox[{{6.050000000000001, 4.4}, {6.081873513597873,
2074                    4.694095553338193}}]},
2075                    {RGBColor[0, 0, 0], InsetBox[
2076                   
2077                    InterpretationBox["\<\"P = \
2078\\!\\(TraditionalForm\\`\\\"0.245\\\"\\)\"\>",
2079                    StringForm["P = ``",
2080                    NumberForm[0.2447817556124582, 3]],
2081                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
2082                    BaseStyle->{FontSize -> 18}], InsetBox[
2083                   
2084                    InterpretationBox["\<\"P = \
2085\\!\\(TraditionalForm\\`\\\"0.668\\\"\\)\"\>",
2086                    StringForm["P = ``",
2087                    NumberForm[0.6677101290251705, 3]],
2088                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
2089                    BaseStyle->{FontSize -> 18}], InsetBox[
2090                   
2091                    InterpretationBox["\<\"P = \
2092\\!\\(TraditionalForm\\`\\\"0.0875\\\"\\)\"\>",
2093                    StringForm["P = ``",
2094                    NumberForm[0.0875081153623712, 3]],
2095                   
2096                    Editable->
2097                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
2098                   
2099                    BaseStyle->{FontSize -> 18}],
2100                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
2101\\)\"\>", {1.35, 3.05}, {0, -1},
2102                    BaseStyle->{FontSize -> 24}],
2103                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
2104\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
2105                    BaseStyle->{FontSize -> 24}],
2106                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
2107\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
2108                    BaseStyle->{FontSize -> 24}], InsetBox[
2109                   
2110                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2111), \\(12\\)]\\)=10. deg\"\>",
2112                    StringForm[
2113                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
2114                    "10."],
2115                    Editable->False], {1.35, -0.35}, {0, -1},
2116                    BaseStyle->{FontSize -> 14}], InsetBox[
2117                   
2118                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2119), \\(13\\)]\\)=20. deg\"\>",
2120                    StringForm[
2121                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
2122                    "20."],
2123                    Editable->False], {3.7, -0.35}, {0, -1},
2124                    BaseStyle->{FontSize -> 14}], InsetBox[
2125                   
2126                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2127), \\(23\\)]\\)=30. deg\"\>",
2128                    StringForm[
2129                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
2130                    "30."],
2131                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
2132                    BaseStyle->{FontSize -> 14}], InsetBox[
2133                   
2134                    InterpretationBox["\<\"t = \
2135\\!\\(TraditionalForm\\`\\(\\\"5.514\\\" \[Times] 10\\^\\\"-15\\\"\\)\\) \
2136sec\"\>",
2137                    StringForm["t = `` sec",
2138                    ScientificForm[5.51426835772189*^-15, 4]],
2139                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
2140                    BaseStyle->{FontSize -> 12}]}},
2141                   AspectRatio->Automatic,
2142                   ImageSize->{640.8000000000001, 414.}], 6->
2143                 
2144                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
2145                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
2146                    {RGBColor[0.8, 0, 0],
2147                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
2148                    LineBox[{{1.35, 1.7}, {1.1906021112014162`,
2149                    1.9760852420183614`}}]},
2150                    {RGBColor[0, 0.6, 0],
2151                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
2152                    LineBox[{{3.7, 1.7}, {2.8768270553544992`, 1.7}}]},
2153                    {RGBColor[0, 0, 0.8],
2154                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
2155                     LineBox[{{6.050000000000001, 1.7}, {5.8150768448035235`,
2156                    2.106898840674687}}]},
2157                    {RGBColor[0, 0, 0],
2158                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
2159\\)\"\>", {1.35, 0.35}, {0, -1},
2160                    BaseStyle->{FontSize -> 24}],
2161                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
2162\\)\"\>", {3.7, 0.35}, {0, -1},
2163                    BaseStyle->{FontSize -> 24}],
2164                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
2165\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
2166                    BaseStyle->{FontSize -> 24}], InsetBox[
2167                   
2168                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2169\\(1\\)]\\) = 0.1 eV\"\>",
2170                    StringForm[
2171                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
2172                    Editable->False], {1.35, 0.}, {0, -1},
2173                    BaseStyle->{FontSize -> 14}], InsetBox[
2174                   
2175                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2176\\(2\\)]\\) = 0.3 eV\"\>",
2177                    StringForm[
2178                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
2179                    Editable->False], {3.7, 0.}, {0, -1},
2180                    BaseStyle->{FontSize -> 14}], InsetBox[
2181                   
2182                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2183\\(3\\)]\\) = 0.4 eV\"\>",
2184                    StringForm[
2185                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
2186                    Editable->False], {6.050000000000001, 0.}, {0, -1},
2187                    BaseStyle->{FontSize -> 14}]},
2188                    {RGBColor[0, 0.6, 0.6],
2189                    CircleBox[{1.35, 4.4}, 0.5356602883070314],
2190                    LineBox[{{1.35, 4.4}, {0.9878201046431117,
2191                    4.79466145982151}}]},
2192                    {RGBColor[0.6, 0, 0.6],
2193                    LineBox[{{3.7, 4.4}, {2.962823899415611,
2194                    4.503165109581826}}],
2195                    CircleBox[{3.7, 4.4}, 0.7443598881642104]},
2196                    {RGBColor[0.6, 0.6, 0],
2197                    CircleBox[{6.050000000000001, 4.4}, 0.3987435421708947],
2198                    LineBox[{{6.050000000000001, 4.4}, {6.33914942974823,
2199                    4.674570609678578}}]},
2200                    {RGBColor[0, 0, 0], InsetBox[
2201                   
2202                    InterpretationBox["\<\"P = \
2203\\!\\(TraditionalForm\\`\\\"0.287\\\"\\)\"\>",
2204                    StringForm["P = ``",
2205                    NumberForm[0.286931944469172, 3]],
2206                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
2207                    BaseStyle->{FontSize -> 18}], InsetBox[
2208                   
2209                    InterpretationBox["\<\"P = \
2210\\!\\(TraditionalForm\\`\\\"0.554\\\"\\)\"\>",
2211                    StringForm["P = ``",
2212                    NumberForm[0.5540716431078359, 3]],
2213                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
2214                    BaseStyle->{FontSize -> 18}], InsetBox[
2215                   
2216                    InterpretationBox["\<\"P = \
2217\\!\\(TraditionalForm\\`\\\"0.159\\\"\\)\"\>",
2218                    StringForm["P = ``",
2219                    NumberForm[0.15899641242299206`, 3]],
2220                   
2221                    Editable->
2222                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
2223                   
2224                    BaseStyle->{FontSize -> 18}],
2225                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
2226\\)\"\>", {1.35, 3.05}, {0, -1},
2227                    BaseStyle->{FontSize -> 24}],
2228                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
2229\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
2230                    BaseStyle->{FontSize -> 24}],
2231                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
2232\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
2233                    BaseStyle->{FontSize -> 24}], InsetBox[
2234                   
2235                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2236), \\(12\\)]\\)=10. deg\"\>",
2237                    StringForm[
2238                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
2239                    "10."],
2240                    Editable->False], {1.35, -0.35}, {0, -1},
2241                    BaseStyle->{FontSize -> 14}], InsetBox[
2242                   
2243                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2244), \\(13\\)]\\)=20. deg\"\>",
2245                    StringForm[
2246                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
2247                    "20."],
2248                    Editable->False], {3.7, -0.35}, {0, -1},
2249                    BaseStyle->{FontSize -> 14}], InsetBox[
2250                   
2251                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2252), \\(23\\)]\\)=30. deg\"\>",
2253                    StringForm[
2254                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
2255                    "30."],
2256                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
2257                    BaseStyle->{FontSize -> 14}], InsetBox[
2258                   
2259                    InterpretationBox["\<\"t = \
2260\\!\\(TraditionalForm\\`\\(\\\"6.893\\\" \[Times] 10\\^\\\"-15\\\"\\)\\) \
2261sec\"\>",
2262                    StringForm["t = `` sec",
2263                    ScientificForm[6.892835447152363*^-15, 4]],
2264                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
2265                    BaseStyle->{FontSize -> 12}]}},
2266                   AspectRatio->Automatic,
2267                   ImageSize->{640.8000000000001, 414.}], 7->
2268                 
2269                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
2270                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
2271                    {RGBColor[0.8, 0, 0],
2272                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
2273                    LineBox[{{1.35, 1.7}, {1.251486686987499,
2274                    2.003192801651167}}]},
2275                    {RGBColor[0, 0.6, 0],
2276                    CircleBox[{3.7, 1.7}, 0.8231729446455008],
2277                    LineBox[{{3.7, 1.7}, {3.034039098472122,
2278                    2.1838489169487936`}}]},
2279                    {RGBColor[0, 0, 0.8],
2280                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
2281                     LineBox[{{6.050000000000001, 1.7}, {6.19519049465579,
2282                    2.1468503951564544`}}]},
2283                    {RGBColor[0, 0, 0],
2284                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
2285\\)\"\>", {1.35, 0.35}, {0, -1},
2286                    BaseStyle->{FontSize -> 24}],
2287                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
2288\\)\"\>", {3.7, 0.35}, {0, -1},
2289                    BaseStyle->{FontSize -> 24}],
2290                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
2291\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
2292                    BaseStyle->{FontSize -> 24}], InsetBox[
2293                   
2294                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2295\\(1\\)]\\) = 0.1 eV\"\>",
2296                    StringForm[
2297                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
2298                    Editable->False], {1.35, 0.}, {0, -1},
2299                    BaseStyle->{FontSize -> 14}], InsetBox[
2300                   
2301                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2302\\(2\\)]\\) = 0.3 eV\"\>",
2303                    StringForm[
2304                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
2305                    Editable->False], {3.7, 0.}, {0, -1},
2306                    BaseStyle->{FontSize -> 14}], InsetBox[
2307                   
2308                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2309\\(3\\)]\\) = 0.4 eV\"\>",
2310                    StringForm[
2311                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
2312                    Editable->False], {6.050000000000001, 0.}, {0, -1},
2313                    BaseStyle->{FontSize -> 14}]},
2314                    {RGBColor[0, 0.6, 0.6],
2315                    CircleBox[{1.35, 4.4}, 0.5339193150121708],
2316                    LineBox[{{1.35, 4.4}, {1.1998234438288877`,
2317                    4.912363969185628}}]},
2318                    {RGBColor[0.6, 0, 0.6],
2319                    LineBox[{{3.7, 4.4}, {3.2514218501141685`,
2320                    4.911585762225921}}],
2321                    CircleBox[{3.7, 4.4}, 0.6803986689193859]},
2322                    {RGBColor[0.6, 0.6, 0],
2323                    CircleBox[{6.050000000000001, 4.4}, 0.5019838806073976],
2324                    LineBox[{{6.050000000000001, 4.4}, {6.550513456726695,
2325                    4.4383939581855945`}}]},
2326                    {RGBColor[0, 0, 0], InsetBox[
2327                   
2328                    InterpretationBox["\<\"P = \
2329\\!\\(TraditionalForm\\`\\\"0.285\\\"\\)\"\>",
2330                    StringForm["P = ``",
2331                    NumberForm[0.2850698349430657, 3]],
2332                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
2333                    BaseStyle->{FontSize -> 18}], InsetBox[
2334                   
2335                    InterpretationBox["\<\"P = \
2336\\!\\(TraditionalForm\\`\\\"0.463\\\"\\)\"\>",
2337                    StringForm["P = ``",
2338                    NumberForm[0.4629423486672722, 3]],
2339                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
2340                    BaseStyle->{FontSize -> 18}], InsetBox[
2341                   
2342                    InterpretationBox["\<\"P = \
2343\\!\\(TraditionalForm\\`\\\"0.252\\\"\\)\"\>",
2344                    StringForm["P = ``",
2345                    NumberForm[0.25198781638966206`, 3]],
2346                   
2347                    Editable->
2348                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
2349                   
2350                    BaseStyle->{FontSize -> 18}],
2351                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
2352\\)\"\>", {1.35, 3.05}, {0, -1},
2353                    BaseStyle->{FontSize -> 24}],
2354                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
2355\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
2356                    BaseStyle->{FontSize -> 24}],
2357                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
2358\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
2359                    BaseStyle->{FontSize -> 24}], InsetBox[
2360                   
2361                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2362), \\(12\\)]\\)=10. deg\"\>",
2363                    StringForm[
2364                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
2365                    "10."],
2366                    Editable->False], {1.35, -0.35}, {0, -1},
2367                    BaseStyle->{FontSize -> 14}], InsetBox[
2368                   
2369                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2370), \\(13\\)]\\)=20. deg\"\>",
2371                    StringForm[
2372                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
2373                    "20."],
2374                    Editable->False], {3.7, -0.35}, {0, -1},
2375                    BaseStyle->{FontSize -> 14}], InsetBox[
2376                   
2377                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2378), \\(23\\)]\\)=30. deg\"\>",
2379                    StringForm[
2380                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
2381                    "30."],
2382                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
2383                    BaseStyle->{FontSize -> 14}], InsetBox[
2384                   
2385                    InterpretationBox["\<\"t = \
2386\\!\\(TraditionalForm\\`\\(\\\"8.271\\\" \[Times] 10\\^\\\"-15\\\"\\)\\) \
2387sec\"\>",
2388                    StringForm["t = `` sec",
2389                    ScientificForm[8.271402536582835*^-15, 4]],
2390                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
2391                    BaseStyle->{FontSize -> 12}]}},
2392                   AspectRatio->Automatic,
2393                   ImageSize->{640.8000000000001, 414.}], 8->
2394                 
2395                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
2396                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
2397                    {RGBColor[0.8, 0, 0],
2398                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
2399                    LineBox[{{1.35, 1.7}, {1.3166767672715516`,
2400                    2.017049380971338}}]},
2401                    {RGBColor[0, 0.6, 0],
2402                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
2403                    LineBox[{{3.7, 1.7}, {3.4456255707948724`,
2404                    2.4828839930429734`}}]},
2405                    {RGBColor[0, 0, 0.8],
2406                    CircleBox[{6.050000000000001, 1.7}, 0.4698463103929543],
2407                    LineBox[{{6.050000000000001, 1.7}, {6.47922596264962,
2408                    1.8911037110507802`}}]},
2409                    {RGBColor[0, 0, 0],
2410                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
2411\\)\"\>", {1.35, 0.35}, {0, -1},
2412                    BaseStyle->{FontSize -> 24}],
2413                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
2414\\)\"\>", {3.7, 0.35}, {0, -1},
2415                    BaseStyle->{FontSize -> 24}],
2416                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
2417\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
2418                    BaseStyle->{FontSize -> 24}], InsetBox[
2419                   
2420                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2421\\(1\\)]\\) = 0.1 eV\"\>",
2422                    StringForm[
2423                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
2424                    Editable->False], {1.35, 0.}, {0, -1},
2425                    BaseStyle->{FontSize -> 14}], InsetBox[
2426                   
2427                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2428\\(2\\)]\\) = 0.3 eV\"\>",
2429                    StringForm[
2430                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
2431                    Editable->False], {3.7, 0.}, {0, -1},
2432                    BaseStyle->{FontSize -> 14}], InsetBox[
2433                   
2434                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2435\\(3\\)]\\) = 0.4 eV\"\>",
2436                    StringForm[
2437                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
2438                    Editable->False], {6.050000000000001, 0.}, {0, -1},
2439                    BaseStyle->{FontSize -> 14}]},
2440                    {RGBColor[0, 0.6, 0.6],
2441                    CircleBox[{1.35, 4.4}, 0.49217663982664556`],
2442                    LineBox[{{1.35, 4.4}, {1.4244582739887752`,
2443                    4.88651188086794}}]},
2444                    {RGBColor[0.6, 0, 0.6],
2445                    LineBox[{{3.7, 4.4}, {3.7028993928342016`,
2446                    5.033164291465164}}],
2447                    CircleBox[{3.7, 4.4}, 0.6331709298960195]},
2448                    {RGBColor[0.6, 0.6, 0],
2449                    CircleBox[{6.050000000000001, 4.4}, 0.5973748645060004],
2450                    LineBox[{{6.050000000000001, 4.4}, {6.544468678523936,
2451                    4.064802364712465}}]},
2452                    {RGBColor[0, 0, 0], InsetBox[
2453                   
2454                    InterpretationBox["\<\"P = \
2455\\!\\(TraditionalForm\\`\\\"0.242\\\"\\)\"\>",
2456                    StringForm["P = ``",
2457                    NumberForm[0.2422378447910476, 3]],
2458                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
2459                    BaseStyle->{FontSize -> 18}], InsetBox[
2460                   
2461                    InterpretationBox["\<\"P = \
2462\\!\\(TraditionalForm\\`\\\"0.401\\\"\\)\"\>",
2463                    StringForm["P = ``",
2464                    NumberForm[0.40090542646539007`, 3]],
2465                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
2466                    BaseStyle->{FontSize -> 18}], InsetBox[
2467                   
2468                    InterpretationBox["\<\"P = \
2469\\!\\(TraditionalForm\\`\\\"0.357\\\"\\)\"\>",
2470                    StringForm["P = ``",
2471                    NumberForm[0.35685672874356233`, 3]],
2472                   
2473                    Editable->
2474                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
2475                   
2476                    BaseStyle->{FontSize -> 18}],
2477                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
2478\\)\"\>", {1.35, 3.05}, {0, -1},
2479                    BaseStyle->{FontSize -> 24}],
2480                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
2481\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
2482                    BaseStyle->{FontSize -> 24}],
2483                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
2484\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
2485                    BaseStyle->{FontSize -> 24}], InsetBox[
2486                   
2487                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2488), \\(12\\)]\\)=10. deg\"\>",
2489                    StringForm[
2490                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
2491                    "10."],
2492                    Editable->False], {1.35, -0.35}, {0, -1},
2493                    BaseStyle->{FontSize -> 14}], InsetBox[
2494                   
2495                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2496), \\(13\\)]\\)=20. deg\"\>",
2497                    StringForm[
2498                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
2499                    "20."],
2500                    Editable->False], {3.7, -0.35}, {0, -1},
2501                    BaseStyle->{FontSize -> 14}], InsetBox[
2502                   
2503                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2504), \\(23\\)]\\)=30. deg\"\>",
2505                    StringForm[
2506                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
2507                    "30."],
2508                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
2509                    BaseStyle->{FontSize -> 14}], InsetBox[
2510                   
2511                    InterpretationBox["\<\"t = \
2512\\!\\(TraditionalForm\\`\\(\\\"9.65\\\" \[Times] 10\\^\\\"-15\\\"\\)\\) sec\"\
2513\>",
2514                    StringForm["t = `` sec",
2515                    ScientificForm[9.649969626013308*^-15, 4]],
2516                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
2517                    BaseStyle->{FontSize -> 12}]}},
2518                   AspectRatio->Automatic,
2519                   ImageSize->{640.8000000000001, 414.}], 9->
2520                 
2521                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
2522                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
2523                    {RGBColor[0.8, 0, 0],
2524                    CircleBox[{1.35, 1.7}, 0.3187957775971679],
2525                    LineBox[{{1.35, 1.7}, {1.3833232327284488`,
2526                    2.017049380971338}}]},
2527                    {RGBColor[0, 0.6, 0],
2528                    CircleBox[{3.7, 1.7}, 0.8231729446455006],
2529                    LineBox[{{3.7, 1.7}, {3.9543744292051284`,
2530                    2.482883993042973}}]},
2531                    {RGBColor[0, 0, 0.8],
2532                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
2533                     LineBox[{{6.050000000000001, 1.7}, {6.479225962649619,
2534                    1.5088962889492188`}}]},
2535                    {RGBColor[0, 0, 0],
2536                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
2537\\)\"\>", {1.35, 0.35}, {0, -1},
2538                    BaseStyle->{FontSize -> 24}],
2539                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
2540\\)\"\>", {3.7, 0.35}, {0, -1},
2541                    BaseStyle->{FontSize -> 24}],
2542                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
2543\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
2544                    BaseStyle->{FontSize -> 24}], InsetBox[
2545                   
2546                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2547\\(1\\)]\\) = 0.1 eV\"\>",
2548                    StringForm[
2549                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
2550                    Editable->False], {1.35, 0.}, {0, -1},
2551                    BaseStyle->{FontSize -> 14}], InsetBox[
2552                   
2553                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2554\\(2\\)]\\) = 0.3 eV\"\>",
2555                    StringForm[
2556                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
2557                    Editable->False], {3.7, 0.}, {0, -1},
2558                    BaseStyle->{FontSize -> 14}], InsetBox[
2559                   
2560                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2561\\(3\\)]\\) = 0.4 eV\"\>",
2562                    StringForm[
2563                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
2564                    Editable->False], {6.050000000000001, 0.}, {0, -1},
2565                    BaseStyle->{FontSize -> 14}]},
2566                    {RGBColor[0, 0.6, 0.6],
2567                    CircleBox[{1.35, 4.4}, 0.4178666327256273],
2568                    LineBox[{{1.35, 4.4}, {1.5691495765402668`,
2569                    4.7557892435806295`}}]},
2570                    {RGBColor[0.6, 0, 0.6],
2571                    LineBox[{{3.7, 4.4}, {4.100441076917374,
2572                    4.853585544385943}}],
2573                    CircleBox[{3.7, 4.4}, 0.6050561148840974]},
2574                    {RGBColor[0.6, 0.6, 0],
2575                    CircleBox[{6.050000000000001, 4.4}, 0.6777127526437047],
2576                    LineBox[{{6.050000000000001, 4.4}, {6.254137507834491,
2577                    3.753762850811693}}]},
2578                    {RGBColor[0, 0, 0], InsetBox[
2579                   
2580                    InterpretationBox["\<\"P = \
2581\\!\\(TraditionalForm\\`\\\"0.175\\\"\\)\"\>",
2582                    StringForm["P = ``",
2583                    NumberForm[0.1746125227454543, 3]],
2584                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
2585                    BaseStyle->{FontSize -> 18}], InsetBox[
2586                   
2587                    InterpretationBox["\<\"P = \
2588\\!\\(TraditionalForm\\`\\\"0.366\\\"\\)\"\>",
2589                    StringForm["P = ``",
2590                    NumberForm[0.36609290215863804`, 3]],
2591                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
2592                    BaseStyle->{FontSize -> 18}], InsetBox[
2593                   
2594                    InterpretationBox["\<\"P = \
2595\\!\\(TraditionalForm\\`\\\"0.459\\\"\\)\"\>",
2596                    StringForm["P = ``",
2597                    NumberForm[0.45929457509590726`, 3]],
2598                   
2599                    Editable->
2600                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
2601                   
2602                    BaseStyle->{FontSize -> 18}],
2603                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
2604\\)\"\>", {1.35, 3.05}, {0, -1},
2605                    BaseStyle->{FontSize -> 24}],
2606                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
2607\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
2608                    BaseStyle->{FontSize -> 24}],
2609                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
2610\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
2611                    BaseStyle->{FontSize -> 24}], InsetBox[
2612                   
2613                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2614), \\(12\\)]\\)=10. deg\"\>",
2615                    StringForm[
2616                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
2617                    "10."],
2618                    Editable->False], {1.35, -0.35}, {0, -1},
2619                    BaseStyle->{FontSize -> 14}], InsetBox[
2620                   
2621                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2622), \\(13\\)]\\)=20. deg\"\>",
2623                    StringForm[
2624                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
2625                    "20."],
2626                    Editable->False], {3.7, -0.35}, {0, -1},
2627                    BaseStyle->{FontSize -> 14}], InsetBox[
2628                   
2629                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2630), \\(23\\)]\\)=30. deg\"\>",
2631                    StringForm[
2632                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
2633                    "30."],
2634                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
2635                    BaseStyle->{FontSize -> 14}], InsetBox[
2636                   
2637                    InterpretationBox["\<\"t = \
2638\\!\\(TraditionalForm\\`\\(\\\"1.103\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
2639sec\"\>",
2640                    StringForm["t = `` sec",
2641                    ScientificForm[1.102853671544378*^-14, 4]],
2642                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
2643                    BaseStyle->{FontSize -> 12}]}},
2644                   AspectRatio->Automatic,
2645                   ImageSize->{640.8000000000001, 414.}], 10->
2646                 
2647                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
2648                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
2649                    {RGBColor[0.8, 0, 0],
2650                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
2651                    LineBox[{{1.35, 1.7}, {1.4485133130125012`,
2652                    2.003192801651167}}]},
2653                    {RGBColor[0, 0.6, 0],
2654                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
2655                    LineBox[{{3.7, 1.7}, {4.365960901527878,
2656                    2.183848916948793}}]},
2657                    {RGBColor[0, 0, 0.8],
2658                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
2659                     LineBox[{{6.050000000000001, 1.7}, {6.195190494655789,
2660                    1.2531496048435453`}}]},
2661                    {RGBColor[0, 0, 0],
2662                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
2663\\)\"\>", {1.35, 0.35}, {0, -1},
2664                    BaseStyle->{FontSize -> 24}],
2665                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
2666\\)\"\>", {3.7, 0.35}, {0, -1},
2667                    BaseStyle->{FontSize -> 24}],
2668                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
2669\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
2670                    BaseStyle->{FontSize -> 24}], InsetBox[
2671                   
2672                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2673\\(1\\)]\\) = 0.1 eV\"\>",
2674                    StringForm[
2675                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
2676                    Editable->False], {1.35, 0.}, {0, -1},
2677                    BaseStyle->{FontSize -> 14}], InsetBox[
2678                   
2679                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2680\\(2\\)]\\) = 0.3 eV\"\>",
2681                    StringForm[
2682                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
2683                    Editable->False], {3.7, 0.}, {0, -1},
2684                    BaseStyle->{FontSize -> 14}], InsetBox[
2685                   
2686                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2687\\(3\\)]\\) = 0.4 eV\"\>",
2688                    StringForm[
2689                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
2690                    Editable->False], {6.050000000000001, 0.}, {0, -1},
2691                    BaseStyle->{FontSize -> 14}]},
2692                    {RGBColor[0, 0.6, 0.6],
2693                    CircleBox[{1.35, 4.4}, 0.32399324363458537`],
2694                    LineBox[{{1.35, 4.4}, {1.5994927037545081`,
2695                    4.606700296792543}}]},
2696                    {RGBColor[0.6, 0, 0.6],
2697                    LineBox[{{3.7, 4.4}, {4.285012586322133,
2698                    4.491683743302133}}],
2699                    CircleBox[{3.7, 4.4}, 0.5921533880180051]},
2700                    {RGBColor[0.6, 0.6, 0],
2701                    CircleBox[{6.050000000000001, 4.4}, 0.7378229754744275],
2702                    LineBox[{{6.050000000000001, 4.4}, {5.785797919083005,
2703                    3.711102327208847}}]},
2704                    {RGBColor[0, 0, 0], InsetBox[
2705                   
2706                    InterpretationBox["\<\"P = \
2707\\!\\(TraditionalForm\\`\\\"0.105\\\"\\)\"\>",
2708                    StringForm["P = ``",
2709                    NumberForm[0.10497162192085979`, 3]],
2710                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
2711                    BaseStyle->{FontSize -> 18}], InsetBox[
2712                   
2713                    InterpretationBox["\<\"P = \
2714\\!\\(TraditionalForm\\`\\\"0.351\\\"\\)\"\>",
2715                    StringForm["P = ``",
2716                    NumberForm[0.3506456349412021, 3]],
2717                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
2718                    BaseStyle->{FontSize -> 18}], InsetBox[
2719                   
2720                    InterpretationBox["\<\"P = \
2721\\!\\(TraditionalForm\\`\\\"0.544\\\"\\)\"\>",
2722                    StringForm["P = ``",
2723                    NumberForm[0.5443827431379377, 3]],
2724                   
2725                    Editable->
2726                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
2727                   
2728                    BaseStyle->{FontSize -> 18}],
2729                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
2730\\)\"\>", {1.35, 3.05}, {0, -1},
2731                    BaseStyle->{FontSize -> 24}],
2732                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
2733\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
2734                    BaseStyle->{FontSize -> 24}],
2735                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
2736\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
2737                    BaseStyle->{FontSize -> 24}], InsetBox[
2738                   
2739                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2740), \\(12\\)]\\)=10. deg\"\>",
2741                    StringForm[
2742                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
2743                    "10."],
2744                    Editable->False], {1.35, -0.35}, {0, -1},
2745                    BaseStyle->{FontSize -> 14}], InsetBox[
2746                   
2747                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2748), \\(13\\)]\\)=20. deg\"\>",
2749                    StringForm[
2750                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
2751                    "20."],
2752                    Editable->False], {3.7, -0.35}, {0, -1},
2753                    BaseStyle->{FontSize -> 14}], InsetBox[
2754                   
2755                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2756), \\(23\\)]\\)=30. deg\"\>",
2757                    StringForm[
2758                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
2759                    "30."],
2760                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
2761                    BaseStyle->{FontSize -> 14}], InsetBox[
2762                   
2763                    InterpretationBox["\<\"t = \
2764\\!\\(TraditionalForm\\`\\(\\\"1.241\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
2765sec\"\>",
2766                    StringForm["t = `` sec",
2767                    ScientificForm[1.2407103804874253`*^-14, 4]],
2768                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
2769                    BaseStyle->{FontSize -> 12}]}},
2770                   AspectRatio->Automatic,
2771                   ImageSize->{640.8000000000001, 414.}], 11->
2772                 
2773                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
2774                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
2775                    {RGBColor[0.8, 0, 0],
2776                    CircleBox[{1.35, 1.7}, 0.3187957775971679],
2777                    LineBox[{{1.35, 1.7}, {1.5093978887985842`,
2778                    1.9760852420183612`}}]},
2779                    {RGBColor[0, 0.6, 0],
2780                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
2781                    LineBox[{{3.7, 1.7}, {4.523172944645501,
2782                    1.7000000000000002`}}]},
2783                    {RGBColor[0, 0, 0.8],
2784                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
2785                     LineBox[{{6.050000000000001, 1.7}, {5.8150768448035235`,
2786                    1.2931011593253132`}}]},
2787                    {RGBColor[0, 0, 0],
2788                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
2789\\)\"\>", {1.35, 0.35}, {0, -1},
2790                    BaseStyle->{FontSize -> 24}],
2791                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
2792\\)\"\>", {3.7, 0.35}, {0, -1},
2793                    BaseStyle->{FontSize -> 24}],
2794                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
2795\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
2796                    BaseStyle->{FontSize -> 24}], InsetBox[
2797                   
2798                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2799\\(1\\)]\\) = 0.1 eV\"\>",
2800                    StringForm[
2801                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
2802                    Editable->False], {1.35, 0.}, {0, -1},
2803                    BaseStyle->{FontSize -> 14}], InsetBox[
2804                   
2805                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2806\\(2\\)]\\) = 0.3 eV\"\>",
2807                    StringForm[
2808                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
2809                    Editable->False], {3.7, 0.}, {0, -1},
2810                    BaseStyle->{FontSize -> 14}], InsetBox[
2811                   
2812                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2813\\(3\\)]\\) = 0.4 eV\"\>",
2814                    StringForm[
2815                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
2816                    Editable->False], {6.050000000000001, 0.}, {0, -1},
2817                    BaseStyle->{FontSize -> 14}]},
2818                    {RGBColor[0, 0.6, 0.6],
2819                    CircleBox[{1.35, 4.4}, 0.2326525204166003],
2820                    LineBox[{{1.35, 4.4}, {1.5514829929352536`,
2821                    4.5163262602083005`}}]},
2822                    {RGBColor[0.6, 0, 0.6],
2823                    LineBox[{{3.7, 4.4}, {4.216420545194517,
2824                    4.120805271593483}}],
2825                    CircleBox[{3.7, 4.4}, 0.5870603681641192]},
2826                    {RGBColor[0.6, 0.6, 0],
2827                    CircleBox[{6.050000000000001, 4.4}, 0.7753921129820782],
2828                    LineBox[{{6.050000000000001, 4.4}, {5.378490732263427,
2829                    4.012303943508962}}]},
2830                    {RGBColor[0, 0, 0], InsetBox[
2831                   
2832                    InterpretationBox["\<\"P = \
2833\\!\\(TraditionalForm\\`\\\"0.0541\\\"\\)\"\>",
2834                    StringForm["P = ``",
2835                    NumberForm[0.05412719525619662, 3]],
2836                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
2837                    BaseStyle->{FontSize -> 18}], InsetBox[
2838                   
2839                    InterpretationBox["\<\"P = \
2840\\!\\(TraditionalForm\\`\\\"0.345\\\"\\)\"\>",
2841                    StringForm["P = ``",
2842                    NumberForm[0.3446398758689912, 3]],
2843                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
2844                    BaseStyle->{FontSize -> 18}], InsetBox[
2845                   
2846                    InterpretationBox["\<\"P = \
2847\\!\\(TraditionalForm\\`\\\"0.601\\\"\\)\"\>",
2848                    StringForm["P = ``",
2849                    NumberForm[0.601232928874812, 3]],
2850                   
2851                    Editable->
2852                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
2853                   
2854                    BaseStyle->{FontSize -> 18}],
2855                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
2856\\)\"\>", {1.35, 3.05}, {0, -1},
2857                    BaseStyle->{FontSize -> 24}],
2858                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
2859\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
2860                    BaseStyle->{FontSize -> 24}],
2861                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
2862\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
2863                    BaseStyle->{FontSize -> 24}], InsetBox[
2864                   
2865                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2866), \\(12\\)]\\)=10. deg\"\>",
2867                    StringForm[
2868                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
2869                    "10."],
2870                    Editable->False], {1.35, -0.35}, {0, -1},
2871                    BaseStyle->{FontSize -> 14}], InsetBox[
2872                   
2873                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2874), \\(13\\)]\\)=20. deg\"\>",
2875                    StringForm[
2876                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
2877                    "20."],
2878                    Editable->False], {3.7, -0.35}, {0, -1},
2879                    BaseStyle->{FontSize -> 14}], InsetBox[
2880                   
2881                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2882), \\(23\\)]\\)=30. deg\"\>",
2883                    StringForm[
2884                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
2885                    "30."],
2886                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
2887                    BaseStyle->{FontSize -> 14}], InsetBox[
2888                   
2889                    InterpretationBox["\<\"t = \
2890\\!\\(TraditionalForm\\`\\(\\\"1.379\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
2891sec\"\>",
2892                    StringForm["t = `` sec",
2893                    ScientificForm[1.3785670894304726`*^-14, 4]],
2894                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
2895                    BaseStyle->{FontSize -> 12}]}},
2896                   AspectRatio->Automatic,
2897                   ImageSize->{640.8000000000001, 414.}], 12->
2898                 
2899                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
2900                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
2901                    {RGBColor[0.8, 0, 0],
2902                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
2903                    LineBox[{{1.35, 1.7}, {1.5633160119682368`,
2904                    1.9369114325053776`}}]},
2905                    {RGBColor[0, 0.6, 0],
2906                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
2907                    LineBox[{{3.7, 1.7}, {4.3659609015278775`,
2908                    1.216151083051206}}]},
2909                    {RGBColor[0, 0, 0.8],
2910                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
2911                     LineBox[{{6.050000000000001, 1.7}, {5.590420958775502,
2912                    1.6023134591817152`}}]},
2913                    {RGBColor[0, 0, 0],
2914                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
2915\\)\"\>", {1.35, 0.35}, {0, -1},
2916                    BaseStyle->{FontSize -> 24}],
2917                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
2918\\)\"\>", {3.7, 0.35}, {0, -1},
2919                    BaseStyle->{FontSize -> 24}],
2920                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
2921\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
2922                    BaseStyle->{FontSize -> 24}], InsetBox[
2923                   
2924                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2925\\(1\\)]\\) = 0.1 eV\"\>",
2926                    StringForm[
2927                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
2928                    Editable->False], {1.35, 0.}, {0, -1},
2929                    BaseStyle->{FontSize -> 14}], InsetBox[
2930                   
2931                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2932\\(2\\)]\\) = 0.3 eV\"\>",
2933                    StringForm[
2934                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
2935                    Editable->False], {3.7, 0.}, {0, -1},
2936                    BaseStyle->{FontSize -> 14}], InsetBox[
2937                   
2938                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
2939\\(3\\)]\\) = 0.4 eV\"\>",
2940                    StringForm[
2941                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
2942                    Editable->False], {6.050000000000001, 0.}, {0, -1},
2943                    BaseStyle->{FontSize -> 14}]},
2944                    {RGBColor[0, 0.6, 0.6],
2945                    CircleBox[{1.35, 4.4}, 0.18327888075828863`],
2946                    LineBox[{{1.35, 4.4}, {1.4988896612722433`,
2947                    4.506878514670853}}]},
2948                    {RGBColor[0.6, 0, 0.6],
2949                    LineBox[{{3.7, 4.4}, {3.9642652355668724`,
2950                    3.8802846371459925`}}],
2951                    CircleBox[{3.7, 4.4}, 0.5830438860975111]},
2952                    {RGBColor[0.6, 0.6, 0],
2953                    CircleBox[{6.050000000000001, 4.4}, 0.7914977439969751],
2954                    LineBox[{{6.050000000000001, 4.4}, {5.2701177701115975`,
2955                    4.53510139250427}}]},
2956                    {RGBColor[0, 0, 0], InsetBox[
2957                   
2958                    InterpretationBox["\<\"P = \
2959\\!\\(TraditionalForm\\`\\\"0.0336\\\"\\)\"\>",
2960                    StringForm["P = ``",
2961                    NumberForm[0.03359114813201098, 3]],
2962                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
2963                    BaseStyle->{FontSize -> 18}], InsetBox[
2964                   
2965                    InterpretationBox["\<\"P = \
2966\\!\\(TraditionalForm\\`\\\"0.34\\\"\\)\"\>",
2967                    StringForm["P = ``",
2968                    NumberForm[0.3399401731156875, 3]],
2969                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
2970                    BaseStyle->{FontSize -> 18}], InsetBox[
2971                   
2972                    InterpretationBox["\<\"P = \
2973\\!\\(TraditionalForm\\`\\\"0.626\\\"\\)\"\>",
2974                    StringForm["P = ``",
2975                    NumberForm[0.6264686787523012, 3]],
2976                   
2977                    Editable->
2978                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
2979                   
2980                    BaseStyle->{FontSize -> 18}],
2981                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
2982\\)\"\>", {1.35, 3.05}, {0, -1},
2983                    BaseStyle->{FontSize -> 24}],
2984                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
2985\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
2986                    BaseStyle->{FontSize -> 24}],
2987                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
2988\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
2989                    BaseStyle->{FontSize -> 24}], InsetBox[
2990                   
2991                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
2992), \\(12\\)]\\)=10. deg\"\>",
2993                    StringForm[
2994                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
2995                    "10."],
2996                    Editable->False], {1.35, -0.35}, {0, -1},
2997                    BaseStyle->{FontSize -> 14}], InsetBox[
2998                   
2999                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3000), \\(13\\)]\\)=20. deg\"\>",
3001                    StringForm[
3002                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
3003                    "20."],
3004                    Editable->False], {3.7, -0.35}, {0, -1},
3005                    BaseStyle->{FontSize -> 14}], InsetBox[
3006                   
3007                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3008), \\(23\\)]\\)=30. deg\"\>",
3009                    StringForm[
3010                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
3011                    "30."],
3012                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
3013                    BaseStyle->{FontSize -> 14}], InsetBox[
3014                   
3015                    InterpretationBox["\<\"t = \
3016\\!\\(TraditionalForm\\`\\(\\\"1.516\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
3017sec\"\>",
3018                    StringForm["t = `` sec",
3019                    ScientificForm[1.51642379837352*^-14, 4]],
3020                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
3021                    BaseStyle->{FontSize -> 12}]}},
3022                   AspectRatio->Automatic,
3023                   ImageSize->{640.8000000000001, 414.}], 13->
3024                 
3025                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
3026                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
3027                    {RGBColor[0.8, 0, 0],
3028                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
3029                    LineBox[{{1.35, 1.7}, {1.607911201811085,
3030                    1.8873834565647265`}}]},
3031                    {RGBColor[0, 0.6, 0],
3032                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
3033                    LineBox[{{3.7, 1.7}, {3.954374429205128,
3034                    0.9171160069570269}}]},
3035                    {RGBColor[0, 0, 0.8],
3036                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
3037                     LineBox[{{6.050000000000001, 1.7}, {5.669886350147734,
3038                    1.9761687320930101`}}]},
3039                    {RGBColor[0, 0, 0],
3040                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
3041\\)\"\>", {1.35, 0.35}, {0, -1},
3042                    BaseStyle->{FontSize -> 24}],
3043                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
3044\\)\"\>", {3.7, 0.35}, {0, -1},
3045                    BaseStyle->{FontSize -> 24}],
3046                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
3047\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
3048                    BaseStyle->{FontSize -> 24}], InsetBox[
3049                   
3050                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3051\\(1\\)]\\) = 0.1 eV\"\>",
3052                    StringForm[
3053                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
3054                    Editable->False], {1.35, 0.}, {0, -1},
3055                    BaseStyle->{FontSize -> 14}], InsetBox[
3056                   
3057                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3058\\(2\\)]\\) = 0.3 eV\"\>",
3059                    StringForm[
3060                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
3061                    Editable->False], {3.7, 0.}, {0, -1},
3062                    BaseStyle->{FontSize -> 14}], InsetBox[
3063                   
3064                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3065\\(3\\)]\\) = 0.4 eV\"\>",
3066                    StringForm[
3067                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
3068                    Editable->False], {6.050000000000001, 0.}, {0, -1},
3069                    BaseStyle->{FontSize -> 14}]},
3070                    {RGBColor[0, 0.6, 0.6],
3071                    CircleBox[{1.35, 4.4}, 0.20539053590965575`],
3072                    LineBox[{{1.35, 4.4}, {1.5001765561711125`,
3073                    4.540115217652618}}]},
3074                    {RGBColor[0.6, 0, 0.6],
3075                    LineBox[{{3.7, 4.4}, {3.648578149885832,
3076                    3.8255708832063924`}}],
3077                    CircleBox[{3.7, 4.4}, 0.5767261194791238]},
3078                    {RGBColor[0.6, 0.6, 0],
3079                    CircleBox[{6.050000000000001, 4.4}, 0.7906969779057561],
3080                    LineBox[{{6.050000000000001, 4.4}, {5.549486543273305,
3081                    5.012117627997096}}]},
3082                    {RGBColor[0, 0, 0], InsetBox[
3083                   
3084                    InterpretationBox["\<\"P = \
3085\\!\\(TraditionalForm\\`\\\"0.0422\\\"\\)\"\>",
3086                    StringForm["P = ``",
3087                    NumberForm[0.04218527224125559, 3]],
3088                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
3089                    BaseStyle->{FontSize -> 18}], InsetBox[
3090                   
3091                    InterpretationBox["\<\"P = \
3092\\!\\(TraditionalForm\\`\\\"0.333\\\"\\)\"\>",
3093                    StringForm["P = ``",
3094                    NumberForm[0.33261301688944855`, 3]],
3095                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
3096                    BaseStyle->{FontSize -> 18}], InsetBox[
3097                   
3098                    InterpretationBox["\<\"P = \
3099\\!\\(TraditionalForm\\`\\\"0.625\\\"\\)\"\>",
3100                    StringForm["P = ``",
3101                    NumberForm[0.6252017108692958, 3]],
3102                   
3103                    Editable->
3104                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
3105                   
3106                    BaseStyle->{FontSize -> 18}],
3107                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
3108\\)\"\>", {1.35, 3.05}, {0, -1},
3109                    BaseStyle->{FontSize -> 24}],
3110                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
3111\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
3112                    BaseStyle->{FontSize -> 24}],
3113                   
3114                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
3115\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
3116                    BaseStyle->{FontSize -> 24}], InsetBox[
3117                   
3118                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3119), \\(12\\)]\\)=10. deg\"\>",
3120                    StringForm[
3121                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
3122                    "10."],
3123                    Editable->False], {1.35, -0.35}, {0, -1},
3124                    BaseStyle->{FontSize -> 14}], InsetBox[
3125                   
3126                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3127), \\(13\\)]\\)=20. deg\"\>",
3128                    StringForm[
3129                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
3130                    "20."],
3131                    Editable->False], {3.7, -0.35}, {0, -1},
3132                    BaseStyle->{FontSize -> 14}], InsetBox[
3133                   
3134                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3135), \\(23\\)]\\)=30. deg\"\>",
3136                    StringForm[
3137                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
3138                    "30."],
3139                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
3140                    BaseStyle->{FontSize -> 14}], InsetBox[
3141                   
3142                    InterpretationBox["\<\"t = \
3143\\!\\(TraditionalForm\\`\\(\\\"1.654\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
3144sec\"\>",
3145                    StringForm["t = `` sec",
3146                    ScientificForm[1.654280507316567*^-14, 4]],
3147                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
3148                    BaseStyle->{FontSize -> 12}]}},
3149                   AspectRatio->Automatic,
3150                   ImageSize->{640.8000000000001, 414.}], 14->
3151                 
3152                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
3153                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
3154                    {RGBColor[0.8, 0, 0],
3155                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
3156                    LineBox[{{1.35, 1.7}, {1.6412344345395338`,
3157                    1.8296659244066111`}}]},
3158                    {RGBColor[0, 0.6, 0],
3159                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
3160                    LineBox[{{3.7, 1.7}, {3.4456255707948715`,
3161                    0.9171160069570271}}]},
3162                    {RGBColor[0, 0, 0.8],
3163                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
3164                     LineBox[{{6.050000000000001, 1.7}, {6.000887687202649,
3165                    2.167272443143791}}]},
3166                    {RGBColor[0, 0, 0],
3167                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
3168\\)\"\>", {1.35, 0.35}, {0, -1},
3169                    BaseStyle->{FontSize -> 24}],
3170                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
3171\\)\"\>", {3.7, 0.35}, {0, -1},
3172                    BaseStyle->{FontSize -> 24}],
3173                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
3174\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
3175                    BaseStyle->{FontSize -> 24}], InsetBox[
3176                   
3177                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3178\\(1\\)]\\) = 0.1 eV\"\>",
3179                    StringForm[
3180                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
3181                    Editable->False], {1.35, 0.}, {0, -1},
3182                    BaseStyle->{FontSize -> 14}], InsetBox[
3183                   
3184                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3185\\(2\\)]\\) = 0.3 eV\"\>",
3186                    StringForm[
3187                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
3188                    Editable->False], {3.7, 0.}, {0, -1},
3189                    BaseStyle->{FontSize -> 14}], InsetBox[
3190                   
3191                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3192\\(3\\)]\\) = 0.4 eV\"\>",
3193                    StringForm[
3194                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
3195                    Editable->False], {6.050000000000001, 0.}, {0, -1},
3196                    BaseStyle->{FontSize -> 14}]},
3197                    {RGBColor[0, 0.6, 0.6],
3198                    CircleBox[{1.35, 4.4}, 0.26025412315197266`],
3199                    LineBox[{{1.35, 4.4}, {1.5612079943983266`,
3200                    4.552063775172915}}]},
3201                    {RGBColor[0.6, 0, 0.6],
3202                    LineBox[{{3.7, 4.4}, {3.374686305083894,
3203                    3.933760362291339}}],
3204                    CircleBox[{3.7, 4.4}, 0.568514203754553]},
3205                    {RGBColor[0.6, 0.6, 0],
3206                    CircleBox[{6.050000000000001, 4.4}, 0.7804225724001866],
3207                    LineBox[{{6.050000000000001, 4.4}, {6.088704629769173,
3208                    5.179462214059256}}]},
3209                    {RGBColor[0, 0, 0], InsetBox[
3210                   
3211                    InterpretationBox["\<\"P = \
3212\\!\\(TraditionalForm\\`\\\"0.0677\\\"\\)\"\>",
3213                    StringForm["P = ``",
3214                    NumberForm[0.06773220861760215, 3]],
3215                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
3216                    BaseStyle->{FontSize -> 18}], InsetBox[
3217                   
3218                    InterpretationBox["\<\"P = \
3219\\!\\(TraditionalForm\\`\\\"0.323\\\"\\)\"\>",
3220                    StringForm["P = ``",
3221                    NumberForm[0.32320839987067335`, 3]],
3222                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
3223                    BaseStyle->{FontSize -> 18}], InsetBox[
3224                   
3225                    InterpretationBox["\<\"P = \
3226\\!\\(TraditionalForm\\`\\\"0.609\\\"\\)\"\>",
3227                    StringForm["P = ``",
3228                    NumberForm[0.6090593915117246, 3]],
3229                   
3230                    Editable->
3231                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
3232                   
3233                    BaseStyle->{FontSize -> 18}],
3234                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
3235\\)\"\>", {1.35, 3.05}, {0, -1},
3236                    BaseStyle->{FontSize -> 24}],
3237                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
3238\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
3239                    BaseStyle->{FontSize -> 24}],
3240                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
3241\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
3242                    BaseStyle->{FontSize -> 24}], InsetBox[
3243                   
3244                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3245), \\(12\\)]\\)=10. deg\"\>",
3246                    StringForm[
3247                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
3248                    "10."],
3249                    Editable->False], {1.35, -0.35}, {0, -1},
3250                    BaseStyle->{FontSize -> 14}], InsetBox[
3251                   
3252                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3253), \\(13\\)]\\)=20. deg\"\>",
3254                    StringForm[
3255                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
3256                    "20."],
3257                    Editable->False], {3.7, -0.35}, {0, -1},
3258                    BaseStyle->{FontSize -> 14}], InsetBox[
3259                   
3260                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3261), \\(23\\)]\\)=30. deg\"\>",
3262                    StringForm[
3263                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
3264                    "30."],
3265                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
3266                    BaseStyle->{FontSize -> 14}], InsetBox[
3267                   
3268                    InterpretationBox["\<\"t = \
3269\\!\\(TraditionalForm\\`\\(\\\"1.792\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
3270sec\"\>",
3271                    StringForm["t = `` sec",
3272                    ScientificForm[1.7921372162596144`*^-14, 4]],
3273                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
3274                    BaseStyle->{FontSize -> 12}]}},
3275                   AspectRatio->Automatic,
3276                   ImageSize->{640.8000000000001, 414.}], 15->
3277                 
3278                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
3279                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
3280                    {RGBColor[0.8, 0, 0],
3281                    CircleBox[{1.35, 1.7}, 0.3187957775971679],
3282                    LineBox[{{1.35, 1.7}, {1.6618293249807379`,
3283                    1.7662813691457893`}}]},
3284                    {RGBColor[0, 0.6, 0],
3285                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
3286                    LineBox[{{3.7, 1.7}, {3.0340390984721224`,
3287                    1.216151083051206}}]},
3288                    {RGBColor[0, 0, 0.8],
3289                    CircleBox[{6.050000000000001, 1.7}, 0.4698463103929543],
3290                    LineBox[{{6.050000000000001, 1.7}, {6.364388546568711,
3291                    2.049163854338169}}]},
3292                    {RGBColor[0, 0, 0],
3293                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
3294\\)\"\>", {1.35, 0.35}, {0, -1},
3295                    BaseStyle->{FontSize -> 24}],
3296                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
3297\\)\"\>", {3.7, 0.35}, {0, -1},
3298                    BaseStyle->{FontSize -> 24}],
3299                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
3300\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
3301                    BaseStyle->{FontSize -> 24}], InsetBox[
3302                   
3303                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3304\\(1\\)]\\) = 0.1 eV\"\>",
3305                    StringForm[
3306                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
3307                    Editable->False], {1.35, 0.}, {0, -1},
3308                    BaseStyle->{FontSize -> 14}], InsetBox[
3309                   
3310                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3311\\(2\\)]\\) = 0.3 eV\"\>",
3312                    StringForm[
3313                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
3314                    Editable->False], {3.7, 0.}, {0, -1},
3315                    BaseStyle->{FontSize -> 14}], InsetBox[
3316                   
3317                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3318\\(3\\)]\\) = 0.4 eV\"\>",
3319                    StringForm[
3320                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
3321                    Editable->False], {6.050000000000001, 0.}, {0, -1},
3322                    BaseStyle->{FontSize -> 14}]},
3323                    {RGBColor[0, 0.6, 0.6],
3324                    CircleBox[{1.35, 4.4}, 0.30492757873824183`],
3325                    LineBox[{{1.35, 4.4}, {1.6374304658172139`,
3326                    4.501806461461276}}]},
3327                    {RGBColor[0.6, 0, 0.6],
3328                    LineBox[{{3.7, 4.4}, {3.2001034301708025`,
3329                    4.14463179033806}}],
3330                    CircleBox[{3.7, 4.4}, 0.5613461525947626]},
3331                    {RGBColor[0.6, 0.6, 0],
3332                    CircleBox[{6.050000000000001, 4.4}, 0.7693566589637674],
3333                    LineBox[{{6.050000000000001, 4.4}, {6.604137848633763,
3334                    4.933704893553953}}]},
3335                    {RGBColor[0, 0, 0], InsetBox[
3336                   
3337                    InterpretationBox["\<\"P = \
3338\\!\\(TraditionalForm\\`\\\"0.093\\\"\\)\"\>",
3339                    StringForm["P = ``",
3340                    NumberForm[0.09298082827516667, 3]],
3341                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
3342                    BaseStyle->{FontSize -> 18}], InsetBox[
3343                   
3344                    InterpretationBox["\<\"P = \
3345\\!\\(TraditionalForm\\`\\\"0.315\\\"\\)\"\>",
3346                    StringForm["P = ``",
3347                    NumberForm[0.3151095030329425, 3]],
3348                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
3349                    BaseStyle->{FontSize -> 18}], InsetBox[
3350                   
3351                    InterpretationBox["\<\"P = \
3352\\!\\(TraditionalForm\\`\\\"0.592\\\"\\)\"\>",
3353                    StringForm["P = ``",
3354                    NumberForm[0.5919096686918907, 3]],
3355                   
3356                    Editable->
3357                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
3358                   
3359                    BaseStyle->{FontSize -> 18}],
3360                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
3361\\)\"\>", {1.35, 3.05}, {0, -1},
3362                    BaseStyle->{FontSize -> 24}],
3363                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
3364\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
3365                    BaseStyle->{FontSize -> 24}],
3366                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
3367\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
3368                    BaseStyle->{FontSize -> 24}], InsetBox[
3369                   
3370                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3371), \\(12\\)]\\)=10. deg\"\>",
3372                    StringForm[
3373                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
3374                    "10."],
3375                    Editable->False], {1.35, -0.35}, {0, -1},
3376                    BaseStyle->{FontSize -> 14}], InsetBox[
3377                   
3378                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3379), \\(13\\)]\\)=20. deg\"\>",
3380                    StringForm[
3381                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
3382                    "20."],
3383                    Editable->False], {3.7, -0.35}, {0, -1},
3384                    BaseStyle->{FontSize -> 14}], InsetBox[
3385                   
3386                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3387), \\(23\\)]\\)=30. deg\"\>",
3388                    StringForm[
3389                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
3390                    "30."],
3391                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
3392                    BaseStyle->{FontSize -> 14}], InsetBox[
3393                   
3394                    InterpretationBox["\<\"t = \
3395\\!\\(TraditionalForm\\`\\(\\\"1.93\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) sec\"\
3396\>",
3397                    StringForm["t = `` sec",
3398                    ScientificForm[1.9299939252026616`*^-14, 4]],
3399                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
3400                    BaseStyle->{FontSize -> 12}]}},
3401                   AspectRatio->Automatic,
3402                   ImageSize->{640.8000000000001, 414.}], 16->
3403                 
3404                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
3405                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
3406                    {RGBColor[0.8, 0, 0],
3407                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
3408                    LineBox[{{1.35, 1.7}, {1.668795777597168, 1.7}}]},
3409                    {RGBColor[0, 0.6, 0],
3410                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
3411                    LineBox[{{3.7, 1.7}, {2.8768270553544992`,
3412                    1.6999999999999997`}}]},
3413                    {RGBColor[0, 0, 0.8],
3414                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
3415                     LineBox[{{6.050000000000001, 1.7}, {6.519846310392955,
3416                    1.6999999999999993`}}]},
3417                    {RGBColor[0, 0, 0],
3418                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
3419\\)\"\>", {1.35, 0.35}, {0, -1},
3420                    BaseStyle->{FontSize -> 24}],
3421                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
3422\\)\"\>", {3.7, 0.35}, {0, -1},
3423                    BaseStyle->{FontSize -> 24}],
3424                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
3425\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
3426                    BaseStyle->{FontSize -> 24}], InsetBox[
3427                   
3428                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3429\\(1\\)]\\) = 0.1 eV\"\>",
3430                    StringForm[
3431                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
3432                    Editable->False], {1.35, 0.}, {0, -1},
3433                    BaseStyle->{FontSize -> 14}], InsetBox[
3434                   
3435                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3436\\(2\\)]\\) = 0.3 eV\"\>",
3437                    StringForm[
3438                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
3439                    Editable->False], {3.7, 0.}, {0, -1},
3440                    BaseStyle->{FontSize -> 14}], InsetBox[
3441                   
3442                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3443\\(3\\)]\\) = 0.4 eV\"\>",
3444                    StringForm[
3445                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
3446                    Editable->False], {6.050000000000001, 0.}, {0, -1},
3447                    BaseStyle->{FontSize -> 14}]},
3448                    {RGBColor[0, 0.6, 0.6],
3449                    CircleBox[{1.35, 4.4}, 0.3213938048432697],
3450                    LineBox[{{1.35, 4.4}, {1.6713938048432697`, 4.4}}]},
3451                    {RGBColor[0.6, 0, 0.6],
3452                    LineBox[{{3.7, 4.4}, {3.141511110779745,
3453                    4.3999999999999995`}}],
3454                    CircleBox[{3.7, 4.4}, 0.5584888892202553]},
3455                    {RGBColor[0.6, 0.6, 0],
3456                    CircleBox[{6.050000000000001, 4.4}, 0.7647196759766886],
3457                    LineBox[{{6.050000000000001, 4.4}, {6.814719675976689,
3458                    4.4}}]},
3459                    {RGBColor[0, 0, 0], InsetBox[
3460                   
3461                    InterpretationBox["\<\"P = \
3462\\!\\(TraditionalForm\\`\\\"0.103\\\"\\)\"\>",
3463                    StringForm["P = ``",
3464                    NumberForm[0.10329397779163371`, 3]],
3465                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
3466                    BaseStyle->{FontSize -> 18}], InsetBox[
3467                   
3468                    InterpretationBox["\<\"P = \
3469\\!\\(TraditionalForm\\`\\\"0.312\\\"\\)\"\>",
3470                    StringForm["P = ``",
3471                    NumberForm[0.3119098393824746, 3]],
3472                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
3473                    BaseStyle->{FontSize -> 18}], InsetBox[
3474                   
3475                    InterpretationBox["\<\"P = \
3476\\!\\(TraditionalForm\\`\\\"0.585\\\"\\)\"\>",
3477                    StringForm["P = ``",
3478                    NumberForm[0.5847961828258915, 3]],
3479                   
3480                    Editable->
3481                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
3482                   
3483                    BaseStyle->{FontSize -> 18}],
3484                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
3485\\)\"\>", {1.35, 3.05}, {0, -1},
3486                    BaseStyle->{FontSize -> 24}],
3487                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
3488\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
3489                    BaseStyle->{FontSize -> 24}],
3490                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
3491\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
3492                    BaseStyle->{FontSize -> 24}], InsetBox[
3493                   
3494                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3495), \\(12\\)]\\)=10. deg\"\>",
3496                    StringForm[
3497                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
3498                    "10."],
3499                    Editable->False], {1.35, -0.35}, {0, -1},
3500                    BaseStyle->{FontSize -> 14}], InsetBox[
3501                   
3502                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3503), \\(13\\)]\\)=20. deg\"\>",
3504                    StringForm[
3505                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
3506                    "20."],
3507                    Editable->False], {3.7, -0.35}, {0, -1},
3508                    BaseStyle->{FontSize -> 14}], InsetBox[
3509                   
3510                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3511), \\(23\\)]\\)=30. deg\"\>",
3512                    StringForm[
3513                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
3514                    "30."],
3515                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
3516                    BaseStyle->{FontSize -> 14}], InsetBox[
3517                   
3518                    InterpretationBox["\<\"t = \
3519\\!\\(TraditionalForm\\`\\(\\\"2.068\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
3520sec\"\>",
3521                    StringForm["t = `` sec",
3522                    ScientificForm[2.067850634145709*^-14, 4]],
3523                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
3524                    BaseStyle->{FontSize -> 12}]}},
3525                   AspectRatio->Automatic,
3526                   ImageSize->{640.8000000000001, 414.}], 17->
3527                 
3528                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
3529                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
3530                    {RGBColor[0.8, 0, 0],
3531                    CircleBox[{1.35, 1.7}, 0.3187957775971679],
3532                    LineBox[{{1.35, 1.7}, {1.6618293249807379`,
3533                    1.6337186308542102`}}]},
3534                    {RGBColor[0, 0.6, 0],
3535                    CircleBox[{3.7, 1.7}, 0.8231729446455006],
3536                    LineBox[{{3.7, 1.7}, {3.034039098472123,
3537                    2.1838489169487945`}}]},
3538                    {RGBColor[0, 0, 0.8],
3539                    CircleBox[{6.050000000000001, 1.7}, 0.4698463103929543],
3540                    LineBox[{{6.050000000000001, 1.7}, {6.364388546568709,
3541                    1.3508361456618296`}}]},
3542                    {RGBColor[0, 0, 0],
3543                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
3544\\)\"\>", {1.35, 0.35}, {0, -1},
3545                    BaseStyle->{FontSize -> 24}],
3546                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
3547\\)\"\>", {3.7, 0.35}, {0, -1},
3548                    BaseStyle->{FontSize -> 24}],
3549                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
3550\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
3551                    BaseStyle->{FontSize -> 24}], InsetBox[
3552                   
3553                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3554\\(1\\)]\\) = 0.1 eV\"\>",
3555                    StringForm[
3556                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
3557                    Editable->False], {1.35, 0.}, {0, -1},
3558                    BaseStyle->{FontSize -> 14}], InsetBox[
3559                   
3560                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3561\\(2\\)]\\) = 0.3 eV\"\>",
3562                    StringForm[
3563                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
3564                    Editable->False], {3.7, 0.}, {0, -1},
3565                    BaseStyle->{FontSize -> 14}], InsetBox[
3566                   
3567                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3568\\(3\\)]\\) = 0.4 eV\"\>",
3569                    StringForm[
3570                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
3571                    Editable->False], {6.050000000000001, 0.}, {0, -1},
3572                    BaseStyle->{FontSize -> 14}]},
3573                    {RGBColor[0, 0.6, 0.6],
3574                    CircleBox[{1.35, 4.4}, 0.30492757873824156`],
3575                    LineBox[{{1.35, 4.4}, {1.6374304658172134`,
3576                    4.298193538538724}}]},
3577                    {RGBColor[0.6, 0, 0.6],
3578                    LineBox[{{3.7, 4.4}, {3.2001034301708025`,
3579                    4.65536820966194}}],
3580                    CircleBox[{3.7, 4.4}, 0.5613461525947628]},
3581                    {RGBColor[0.6, 0.6, 0],
3582                    CircleBox[{6.050000000000001, 4.4}, 0.7693566589637671],
3583                    LineBox[{{6.050000000000001, 4.4}, {6.604137848633761,
3584                    3.866295106446046}}]},
3585                    {RGBColor[0, 0, 0], InsetBox[
3586                   
3587                    InterpretationBox["\<\"P = \
3588\\!\\(TraditionalForm\\`\\\"0.093\\\"\\)\"\>",
3589                    StringForm["P = ``",
3590                    NumberForm[0.0929808282751665, 3]],
3591                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
3592                    BaseStyle->{FontSize -> 18}], InsetBox[
3593                   
3594                    InterpretationBox["\<\"P = \
3595\\!\\(TraditionalForm\\`\\\"0.315\\\"\\)\"\>",
3596                    StringForm["P = ``",
3597                    NumberForm[0.3151095030329428, 3]],
3598                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
3599                    BaseStyle->{FontSize -> 18}], InsetBox[
3600                   
3601                    InterpretationBox["\<\"P = \
3602\\!\\(TraditionalForm\\`\\\"0.592\\\"\\)\"\>",
3603                    StringForm["P = ``",
3604                    NumberForm[0.5919096686918903, 3]],
3605                   
3606                    Editable->
3607                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
3608                   
3609                    BaseStyle->{FontSize -> 18}],
3610                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
3611\\)\"\>", {1.35, 3.05}, {0, -1},
3612                    BaseStyle->{FontSize -> 24}],
3613                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
3614\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
3615                    BaseStyle->{FontSize -> 24}],
3616                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
3617\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
3618                    BaseStyle->{FontSize -> 24}], InsetBox[
3619                   
3620                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3621), \\(12\\)]\\)=10. deg\"\>",
3622                    StringForm[
3623                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
3624                    "10."],
3625                    Editable->False], {1.35, -0.35}, {0, -1},
3626                    BaseStyle->{FontSize -> 14}], InsetBox[
3627                   
3628                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3629), \\(13\\)]\\)=20. deg\"\>",
3630                    StringForm[
3631                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
3632                    "20."],
3633                    Editable->False], {3.7, -0.35}, {0, -1},
3634                    BaseStyle->{FontSize -> 14}], InsetBox[
3635                   
3636                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3637), \\(23\\)]\\)=30. deg\"\>",
3638                    StringForm[
3639                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
3640                    "30."],
3641                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
3642                    BaseStyle->{FontSize -> 14}], InsetBox[
3643                   
3644                    InterpretationBox["\<\"t = \
3645\\!\\(TraditionalForm\\`\\(\\\"2.206\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
3646sec\"\>",
3647                    StringForm["t = `` sec",
3648                    ScientificForm[2.205707343088756*^-14, 4]],
3649                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
3650                    BaseStyle->{FontSize -> 12}]}},
3651                   AspectRatio->Automatic,
3652                   ImageSize->{640.8000000000001, 414.}], 18->
3653                 
3654                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
3655                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
3656                    {RGBColor[0.8, 0, 0],
3657                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
3658                    LineBox[{{1.35, 1.7}, {1.6412344345395335`,
3659                    1.5703340755933883`}}]},
3660                    {RGBColor[0, 0.6, 0],
3661                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
3662                    LineBox[{{3.7, 1.7}, {3.4456255707948724`,
3663                    2.482883993042973}}]},
3664                    {RGBColor[0, 0, 0.8],
3665                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
3666                     LineBox[{{6.050000000000001, 1.7}, {6.000887687202647,
3667                    1.232727556856209}}]},
3668                    {RGBColor[0, 0, 0],
3669                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
3670\\)\"\>", {1.35, 0.35}, {0, -1},
3671                    BaseStyle->{FontSize -> 24}],
3672                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
3673\\)\"\>", {3.7, 0.35}, {0, -1},
3674                    BaseStyle->{FontSize -> 24}],
3675                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
3676\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
3677                    BaseStyle->{FontSize -> 24}], InsetBox[
3678                   
3679                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3680\\(1\\)]\\) = 0.1 eV\"\>",
3681                    StringForm[
3682                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
3683                    Editable->False], {1.35, 0.}, {0, -1},
3684                    BaseStyle->{FontSize -> 14}], InsetBox[
3685                   
3686                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3687\\(2\\)]\\) = 0.3 eV\"\>",
3688                    StringForm[
3689                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
3690                    Editable->False], {3.7, 0.}, {0, -1},
3691                    BaseStyle->{FontSize -> 14}], InsetBox[
3692                   
3693                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3694\\(3\\)]\\) = 0.4 eV\"\>",
3695                    StringForm[
3696                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
3697                    Editable->False], {6.050000000000001, 0.}, {0, -1},
3698                    BaseStyle->{FontSize -> 14}]},
3699                    {RGBColor[0, 0.6, 0.6],
3700                    CircleBox[{1.35, 4.4}, 0.2602541231519723],
3701                    LineBox[{{1.35, 4.4}, {1.561207994398326,
3702                    4.247936224827086}}]},
3703                    {RGBColor[0.6, 0, 0.6],
3704                    LineBox[{{3.7, 4.4}, {3.3746863050838933`,
3705                    4.866239637708662}}],
3706                    CircleBox[{3.7, 4.4}, 0.5685142037545534]},
3707                    {RGBColor[0.6, 0.6, 0],
3708                    CircleBox[{6.050000000000001, 4.4}, 0.7804225724001863],
3709                    LineBox[{{6.050000000000001, 4.4}, {6.08870462976917,
3710                    3.6205377859407455`}}]},
3711                    {RGBColor[0, 0, 0], InsetBox[
3712                   
3713                    InterpretationBox["\<\"P = \
3714\\!\\(TraditionalForm\\`\\\"0.0677\\\"\\)\"\>",
3715                    StringForm["P = ``",
3716                    NumberForm[0.06773220861760199, 3]],
3717                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
3718                    BaseStyle->{FontSize -> 18}], InsetBox[
3719                   
3720                    InterpretationBox["\<\"P = \
3721\\!\\(TraditionalForm\\`\\\"0.323\\\"\\)\"\>",
3722                    StringForm["P = ``",
3723                    NumberForm[0.3232083998706739, 3]],
3724                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
3725                    BaseStyle->{FontSize -> 18}], InsetBox[
3726                   
3727                    InterpretationBox["\<\"P = \
3728\\!\\(TraditionalForm\\`\\\"0.609\\\"\\)\"\>",
3729                    StringForm["P = ``",
3730                    NumberForm[0.6090593915117241, 3]],
3731                   
3732                    Editable->
3733                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
3734                   
3735                    BaseStyle->{FontSize -> 18}],
3736                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
3737\\)\"\>", {1.35, 3.05}, {0, -1},
3738                    BaseStyle->{FontSize -> 24}],
3739                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
3740\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
3741                    BaseStyle->{FontSize -> 24}],
3742                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
3743\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
3744                    BaseStyle->{FontSize -> 24}], InsetBox[
3745                   
3746                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3747), \\(12\\)]\\)=10. deg\"\>",
3748                    StringForm[
3749                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
3750                    "10."],
3751                    Editable->False], {1.35, -0.35}, {0, -1},
3752                    BaseStyle->{FontSize -> 14}], InsetBox[
3753                   
3754                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3755), \\(13\\)]\\)=20. deg\"\>",
3756                    StringForm[
3757                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
3758                    "20."],
3759                    Editable->False], {3.7, -0.35}, {0, -1},
3760                    BaseStyle->{FontSize -> 14}], InsetBox[
3761                   
3762                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3763), \\(23\\)]\\)=30. deg\"\>",
3764                    StringForm[
3765                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
3766                    "30."],
3767                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
3768                    BaseStyle->{FontSize -> 14}], InsetBox[
3769                   
3770                    InterpretationBox["\<\"t = \
3771\\!\\(TraditionalForm\\`\\(\\\"2.344\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
3772sec\"\>",
3773                    StringForm["t = `` sec",
3774                    ScientificForm[2.3435640520318032`*^-14, 4]],
3775                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
3776                    BaseStyle->{FontSize -> 12}]}},
3777                   AspectRatio->Automatic,
3778                   ImageSize->{640.8000000000001, 414.}], 19->
3779                 
3780                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
3781                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
3782                    {RGBColor[0.8, 0, 0],
3783                    CircleBox[{1.35, 1.7}, 0.3187957775971679],
3784                    LineBox[{{1.35, 1.7}, {1.6079112018110848`,
3785                    1.5126165434352732`}}]},
3786                    {RGBColor[0, 0.6, 0],
3787                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
3788                    LineBox[{{3.7, 1.7}, {3.954374429205129,
3789                    2.482883993042973}}]},
3790                    {RGBColor[0, 0, 0.8],
3791                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
3792                     LineBox[{{6.050000000000001, 1.7}, {5.669886350147733,
3793                    1.4238312679069909`}}]},
3794                    {RGBColor[0, 0, 0],
3795                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
3796\\)\"\>", {1.35, 0.35}, {0, -1},
3797                    BaseStyle->{FontSize -> 24}],
3798                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
3799\\)\"\>", {3.7, 0.35}, {0, -1},
3800                    BaseStyle->{FontSize -> 24}],
3801                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
3802\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
3803                    BaseStyle->{FontSize -> 24}], InsetBox[
3804                   
3805                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3806\\(1\\)]\\) = 0.1 eV\"\>",
3807                    StringForm[
3808                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
3809                    Editable->False], {1.35, 0.}, {0, -1},
3810                    BaseStyle->{FontSize -> 14}], InsetBox[
3811                   
3812                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3813\\(2\\)]\\) = 0.3 eV\"\>",
3814                    StringForm[
3815                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
3816                    Editable->False], {3.7, 0.}, {0, -1},
3817                    BaseStyle->{FontSize -> 14}], InsetBox[
3818                   
3819                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3820\\(3\\)]\\) = 0.4 eV\"\>",
3821                    StringForm[
3822                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
3823                    Editable->False], {6.050000000000001, 0.}, {0, -1},
3824                    BaseStyle->{FontSize -> 14}]},
3825                    {RGBColor[0, 0.6, 0.6],
3826                    CircleBox[{1.35, 4.4}, 0.20539053590965553`],
3827                    LineBox[{{1.35, 4.4}, {1.5001765561711122`,
3828                    4.259884782347383}}]},
3829                    {RGBColor[0.6, 0, 0.6],
3830                    LineBox[{{3.7, 4.4}, {3.6485781498858323`,
3831                    4.974429116793608}}],
3832                    CircleBox[{3.7, 4.4}, 0.576726119479124]},
3833                    {RGBColor[0.6, 0.6, 0],
3834                    CircleBox[{6.050000000000001, 4.4}, 0.7906969779057559],
3835                    LineBox[{{6.050000000000001, 4.4}, {5.549486543273305,
3836                    3.7878823720029056`}}]},
3837                    {RGBColor[0, 0, 0], InsetBox[
3838                   
3839                    InterpretationBox["\<\"P = \
3840\\!\\(TraditionalForm\\`\\\"0.0422\\\"\\)\"\>",
3841                    StringForm["P = ``",
3842                    NumberForm[0.0421852722412555, 3]],
3843                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
3844                    BaseStyle->{FontSize -> 18}], InsetBox[
3845                   
3846                    InterpretationBox["\<\"P = \
3847\\!\\(TraditionalForm\\`\\\"0.333\\\"\\)\"\>",
3848                    StringForm["P = ``",
3849                    NumberForm[0.33261301688944883`, 3]],
3850                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
3851                    BaseStyle->{FontSize -> 18}], InsetBox[
3852                   
3853                    InterpretationBox["\<\"P = \
3854\\!\\(TraditionalForm\\`\\\"0.625\\\"\\)\"\>",
3855                    StringForm["P = ``",
3856                    NumberForm[0.6252017108692954, 3]],
3857                   
3858                    Editable->
3859                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
3860                   
3861                    BaseStyle->{FontSize -> 18}],
3862                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
3863\\)\"\>", {1.35, 3.05}, {0, -1},
3864                    BaseStyle->{FontSize -> 24}],
3865                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
3866\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
3867                    BaseStyle->{FontSize -> 24}],
3868                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
3869\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
3870                    BaseStyle->{FontSize -> 24}], InsetBox[
3871                   
3872                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3873), \\(12\\)]\\)=10. deg\"\>",
3874                    StringForm[
3875                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
3876                    "10."],
3877                    Editable->False], {1.35, -0.35}, {0, -1},
3878                    BaseStyle->{FontSize -> 14}], InsetBox[
3879                   
3880                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3881), \\(13\\)]\\)=20. deg\"\>",
3882                    StringForm[
3883                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
3884                    "20."],
3885                    Editable->False], {3.7, -0.35}, {0, -1},
3886                    BaseStyle->{FontSize -> 14}], InsetBox[
3887                   
3888                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3889), \\(23\\)]\\)=30. deg\"\>",
3890                    StringForm[
3891                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
3892                    "30."],
3893                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
3894                    BaseStyle->{FontSize -> 14}], InsetBox[
3895                   
3896                    InterpretationBox["\<\"t = \
3897\\!\\(TraditionalForm\\`\\(\\\"2.481\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
3898sec\"\>",
3899                    StringForm["t = `` sec",
3900                    ScientificForm[2.4814207609748507`*^-14, 4]],
3901                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
3902                    BaseStyle->{FontSize -> 12}]}},
3903                   AspectRatio->Automatic,
3904                   ImageSize->{640.8000000000001, 414.}], 20->
3905                 
3906                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
3907                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
3908                    {RGBColor[0.8, 0, 0],
3909                    CircleBox[{1.35, 1.7}, 0.318795777597168],
3910                    LineBox[{{1.35, 1.7}, {1.5633160119682366`,
3911                    1.4630885674946223`}}]},
3912                    {RGBColor[0, 0.6, 0],
3913                    CircleBox[{3.7, 1.7}, 0.8231729446455008],
3914                    LineBox[{{3.7, 1.7}, {4.365960901527879,
3915                    2.1838489169487927`}}]},
3916                    {RGBColor[0, 0, 0.8],
3917                    CircleBox[{6.050000000000001, 1.7}, 0.4698463103929542],
3918                    LineBox[{{6.050000000000001, 1.7}, {5.590420958775502,
3919                    1.7976865408182858`}}]},
3920                    {RGBColor[0, 0, 0],
3921                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
3922\\)\"\>", {1.35, 0.35}, {0, -1},
3923                    BaseStyle->{FontSize -> 24}],
3924                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
3925\\)\"\>", {3.7, 0.35}, {0, -1},
3926                    BaseStyle->{FontSize -> 24}],
3927                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
3928\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
3929                    BaseStyle->{FontSize -> 24}], InsetBox[
3930                   
3931                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3932\\(1\\)]\\) = 0.1 eV\"\>",
3933                    StringForm[
3934                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
3935                    Editable->False], {1.35, 0.}, {0, -1},
3936                    BaseStyle->{FontSize -> 14}], InsetBox[
3937                   
3938                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3939\\(2\\)]\\) = 0.3 eV\"\>",
3940                    StringForm[
3941                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
3942                    Editable->False], {3.7, 0.}, {0, -1},
3943                    BaseStyle->{FontSize -> 14}], InsetBox[
3944                   
3945                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
3946\\(3\\)]\\) = 0.4 eV\"\>",
3947                    StringForm[
3948                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
3949                    Editable->False], {6.050000000000001, 0.}, {0, -1},
3950                    BaseStyle->{FontSize -> 14}]},
3951                    {RGBColor[0, 0.6, 0.6],
3952                    CircleBox[{1.35, 4.4}, 0.18327888075828871`],
3953                    LineBox[{{1.35, 4.4}, {1.4988896612722433`,
3954                    4.293121485329148}}]},
3955                    {RGBColor[0.6, 0, 0.6],
3956                    LineBox[{{3.7, 4.4}, {3.9642652355668737`,
3957                    4.919715362854007}}],
3958                    CircleBox[{3.7, 4.4}, 0.5830438860975111]},
3959                    {RGBColor[0.6, 0.6, 0],
3960                    CircleBox[{6.050000000000001, 4.4}, 0.7914977439969754],
3961                    LineBox[{{6.050000000000001, 4.4}, {5.270117770111597,
3962                    4.264898607495732}}]},
3963                    {RGBColor[0, 0, 0], InsetBox[
3964                   
3965                    InterpretationBox["\<\"P = \
3966\\!\\(TraditionalForm\\`\\\"0.0336\\\"\\)\"\>",
3967                    StringForm["P = ``",
3968                    NumberForm[0.033591148132011014`, 3]],
3969                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
3970                    BaseStyle->{FontSize -> 18}], InsetBox[
3971                   
3972                    InterpretationBox["\<\"P = \
3973\\!\\(TraditionalForm\\`\\\"0.34\\\"\\)\"\>",
3974                    StringForm["P = ``",
3975                    NumberForm[0.3399401731156875, 3]],
3976                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
3977                    BaseStyle->{FontSize -> 18}], InsetBox[
3978                   
3979                    InterpretationBox["\<\"P = \
3980\\!\\(TraditionalForm\\`\\\"0.626\\\"\\)\"\>",
3981                    StringForm["P = ``",
3982                    NumberForm[0.6264686787523016, 3]],
3983                   
3984                    Editable->
3985                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
3986                   
3987                    BaseStyle->{FontSize -> 18}],
3988                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
3989\\)\"\>", {1.35, 3.05}, {0, -1},
3990                    BaseStyle->{FontSize -> 24}],
3991                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
3992\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
3993                    BaseStyle->{FontSize -> 24}],
3994                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
3995\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
3996                    BaseStyle->{FontSize -> 24}], InsetBox[
3997                   
3998                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
3999), \\(12\\)]\\)=10. deg\"\>",
4000                    StringForm[
4001                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
4002                    "10."],
4003                    Editable->False], {1.35, -0.35}, {0, -1},
4004                    BaseStyle->{FontSize -> 14}], InsetBox[
4005                   
4006                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4007), \\(13\\)]\\)=20. deg\"\>",
4008                    StringForm[
4009                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
4010                    "20."],
4011                    Editable->False], {3.7, -0.35}, {0, -1},
4012                    BaseStyle->{FontSize -> 14}], InsetBox[
4013                   
4014                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4015), \\(23\\)]\\)=30. deg\"\>",
4016                    StringForm[
4017                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
4018                    "30."],
4019                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
4020                    BaseStyle->{FontSize -> 14}], InsetBox[
4021                   
4022                    InterpretationBox["\<\"t = \
4023\\!\\(TraditionalForm\\`\\(\\\"2.619\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
4024sec\"\>",
4025                    StringForm["t = `` sec",
4026                    ScientificForm[2.6192774699178978`*^-14, 4]],
4027                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
4028                    BaseStyle->{FontSize -> 12}]}},
4029                   AspectRatio->Automatic,
4030                   ImageSize->{640.8000000000001, 414.}], 21->
4031                 
4032                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
4033                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
4034                    {RGBColor[0.8, 0, 0],
4035                    CircleBox[{1.35, 1.7}, 0.3187957775971679],
4036                    LineBox[{{1.35, 1.7}, {1.509397888798584,
4037                    1.4239147579816385`}}]},
4038                    {RGBColor[0, 0.6, 0],
4039                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
4040                    LineBox[{{3.7, 1.7}, {4.523172944645501,
4041                    1.7000000000000004`}}]},
4042                    {RGBColor[0, 0, 0.8],
4043                    CircleBox[{6.050000000000001, 1.7}, 0.4698463103929542],
4044                    LineBox[{{6.050000000000001, 1.7}, {5.815076844803524,
4045                    2.1068988406746874`}}]},
4046                    {RGBColor[0, 0, 0],
4047                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
4048\\)\"\>", {1.35, 0.35}, {0, -1},
4049                    BaseStyle->{FontSize -> 24}],
4050                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
4051\\)\"\>", {3.7, 0.35}, {0, -1},
4052                    BaseStyle->{FontSize -> 24}],
4053                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
4054\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
4055                    BaseStyle->{FontSize -> 24}], InsetBox[
4056                   
4057                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4058\\(1\\)]\\) = 0.1 eV\"\>",
4059                    StringForm[
4060                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
4061                    Editable->False], {1.35, 0.}, {0, -1},
4062                    BaseStyle->{FontSize -> 14}], InsetBox[
4063                   
4064                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4065\\(2\\)]\\) = 0.3 eV\"\>",
4066                    StringForm[
4067                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
4068                    Editable->False], {3.7, 0.}, {0, -1},
4069                    BaseStyle->{FontSize -> 14}], InsetBox[
4070                   
4071                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4072\\(3\\)]\\) = 0.4 eV\"\>",
4073                    StringForm[
4074                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
4075                    Editable->False], {6.050000000000001, 0.}, {0, -1},
4076                    BaseStyle->{FontSize -> 14}]},
4077                    {RGBColor[0, 0.6, 0.6],
4078                    CircleBox[{1.35, 4.4}, 0.23265252041660042`],
4079                    LineBox[{{1.35, 4.4}, {1.5514829929352538`,
4080                    4.2836737397917}}]},
4081                    {RGBColor[0.6, 0, 0.6],
4082                    LineBox[{{3.7, 4.4}, {4.216420545194517,
4083                    4.679194728406519}}],
4084                    CircleBox[{3.7, 4.4}, 0.5870603681641201]},
4085                    {RGBColor[0.6, 0.6, 0],
4086                    CircleBox[{6.050000000000001, 4.4}, 0.7753921129820776],
4087                    LineBox[{{6.050000000000001, 4.4}, {5.378490732263428,
4088                    4.78769605649104}}]},
4089                    {RGBColor[0, 0, 0], InsetBox[
4090                   
4091                    InterpretationBox["\<\"P = \
4092\\!\\(TraditionalForm\\`\\\"0.0541\\\"\\)\"\>",
4093                    StringForm["P = ``",
4094                    NumberForm[0.05412719525619668, 3]],
4095                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
4096                    BaseStyle->{FontSize -> 18}], InsetBox[
4097                   
4098                    InterpretationBox["\<\"P = \
4099\\!\\(TraditionalForm\\`\\\"0.345\\\"\\)\"\>",
4100                    StringForm["P = ``",
4101                    NumberForm[0.34463987586899225`, 3]],
4102                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
4103                    BaseStyle->{FontSize -> 18}], InsetBox[
4104                   
4105                    InterpretationBox["\<\"P = \
4106\\!\\(TraditionalForm\\`\\\"0.601\\\"\\)\"\>",
4107                    StringForm["P = ``",
4108                    NumberForm[0.601232928874811, 3]],
4109                   
4110                    Editable->
4111                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
4112                   
4113                    BaseStyle->{FontSize -> 18}],
4114                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
4115\\)\"\>", {1.35, 3.05}, {0, -1},
4116                    BaseStyle->{FontSize -> 24}],
4117                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
4118\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
4119                    BaseStyle->{FontSize -> 24}],
4120                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
4121\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
4122                    BaseStyle->{FontSize -> 24}], InsetBox[
4123                   
4124                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4125), \\(12\\)]\\)=10. deg\"\>",
4126                    StringForm[
4127                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
4128                    "10."],
4129                    Editable->False], {1.35, -0.35}, {0, -1},
4130                    BaseStyle->{FontSize -> 14}], InsetBox[
4131                   
4132                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4133), \\(13\\)]\\)=20. deg\"\>",
4134                    StringForm[
4135                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
4136                    "20."],
4137                    Editable->False], {3.7, -0.35}, {0, -1},
4138                    BaseStyle->{FontSize -> 14}], InsetBox[
4139                   
4140                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4141), \\(23\\)]\\)=30. deg\"\>",
4142                    StringForm[
4143                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
4144                    "30."],
4145                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
4146                    BaseStyle->{FontSize -> 14}], InsetBox[
4147                   
4148                    InterpretationBox["\<\"t = \
4149\\!\\(TraditionalForm\\`\\(\\\"2.757\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
4150sec\"\>",
4151                    StringForm["t = `` sec",
4152                    ScientificForm[2.7571341788609452`*^-14, 4]],
4153                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
4154                    BaseStyle->{FontSize -> 12}]}},
4155                   AspectRatio->Automatic,
4156                   ImageSize->{640.8000000000001, 414.}], 22->
4157                 
4158                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
4159                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
4160                    {RGBColor[0.8, 0, 0],
4161                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
4162                    LineBox[{{1.35, 1.7}, {1.4485133130125012`,
4163                    1.3968071983488328`}}]},
4164                    {RGBColor[0, 0.6, 0],
4165                    CircleBox[{3.7, 1.7}, 0.8231729446455005],
4166                    LineBox[{{3.7, 1.7}, {4.365960901527878,
4167                    1.2161510830512068`}}]},
4168                    {RGBColor[0, 0, 0.8],
4169                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
4170                     LineBox[{{6.050000000000001, 1.7}, {6.195190494655789,
4171                    2.1468503951564544`}}]},
4172                    {RGBColor[0, 0, 0],
4173                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
4174\\)\"\>", {1.35, 0.35}, {0, -1},
4175                    BaseStyle->{FontSize -> 24}],
4176                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
4177\\)\"\>", {3.7, 0.35}, {0, -1},
4178                    BaseStyle->{FontSize -> 24}],
4179                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
4180\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
4181                    BaseStyle->{FontSize -> 24}], InsetBox[
4182                   
4183                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4184\\(1\\)]\\) = 0.1 eV\"\>",
4185                    StringForm[
4186                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
4187                    Editable->False], {1.35, 0.}, {0, -1},
4188                    BaseStyle->{FontSize -> 14}], InsetBox[
4189                   
4190                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4191\\(2\\)]\\) = 0.3 eV\"\>",
4192                    StringForm[
4193                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
4194                    Editable->False], {3.7, 0.}, {0, -1},
4195                    BaseStyle->{FontSize -> 14}], InsetBox[
4196                   
4197                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4198\\(3\\)]\\) = 0.4 eV\"\>",
4199                    StringForm[
4200                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
4201                    Editable->False], {6.050000000000001, 0.}, {0, -1},
4202                    BaseStyle->{FontSize -> 14}]},
4203                    {RGBColor[0, 0.6, 0.6],
4204                    CircleBox[{1.35, 4.4}, 0.3239932436345855],
4205                    LineBox[{{1.35, 4.4}, {1.5994927037545081`,
4206                    4.193299703207458}}]},
4207                    {RGBColor[0.6, 0, 0.6],
4208                    LineBox[{{3.7, 4.4}, {4.285012586322133,
4209                    4.308316256697867}}],
4210                    CircleBox[{3.7, 4.4}, 0.5921533880180052]},
4211                    {RGBColor[0.6, 0.6, 0],
4212                    CircleBox[{6.050000000000001, 4.4}, 0.7378229754744274],
4213                    LineBox[{{6.050000000000001, 4.4}, {5.785797919083006,
4214                    5.088897672791154}}]},
4215                    {RGBColor[0, 0, 0], InsetBox[
4216                   
4217                    InterpretationBox["\<\"P = \
4218\\!\\(TraditionalForm\\`\\\"0.105\\\"\\)\"\>",
4219                    StringForm["P = ``",
4220                    NumberForm[0.10497162192085986`, 3]],
4221                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
4222                    BaseStyle->{FontSize -> 18}], InsetBox[
4223                   
4224                    InterpretationBox["\<\"P = \
4225\\!\\(TraditionalForm\\`\\\"0.351\\\"\\)\"\>",
4226                    StringForm["P = ``",
4227                    NumberForm[0.3506456349412022, 3]],
4228                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
4229                    BaseStyle->{FontSize -> 18}], InsetBox[
4230                   
4231                    InterpretationBox["\<\"P = \
4232\\!\\(TraditionalForm\\`\\\"0.544\\\"\\)\"\>",
4233                    StringForm["P = ``",
4234                    NumberForm[0.5443827431379376, 3]],
4235                   
4236                    Editable->
4237                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
4238                   
4239                    BaseStyle->{FontSize -> 18}],
4240                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
4241\\)\"\>", {1.35, 3.05}, {0, -1},
4242                    BaseStyle->{FontSize -> 24}],
4243                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
4244\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
4245                    BaseStyle->{FontSize -> 24}],
4246                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
4247\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
4248                    BaseStyle->{FontSize -> 24}], InsetBox[
4249                   
4250                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4251), \\(12\\)]\\)=10. deg\"\>",
4252                    StringForm[
4253                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
4254                    "10."],
4255                    Editable->False], {1.35, -0.35}, {0, -1},
4256                    BaseStyle->{FontSize -> 14}], InsetBox[
4257                   
4258                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4259), \\(13\\)]\\)=20. deg\"\>",
4260                    StringForm[
4261                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
4262                    "20."],
4263                    Editable->False], {3.7, -0.35}, {0, -1},
4264                    BaseStyle->{FontSize -> 14}], InsetBox[
4265                   
4266                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4267), \\(23\\)]\\)=30. deg\"\>",
4268                    StringForm[
4269                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
4270                    "30."],
4271                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
4272                    BaseStyle->{FontSize -> 14}], InsetBox[
4273                   
4274                    InterpretationBox["\<\"t = \
4275\\!\\(TraditionalForm\\`\\(\\\"2.895\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
4276sec\"\>",
4277                    StringForm["t = `` sec",
4278                    ScientificForm[2.8949908878039923`*^-14, 4]],
4279                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
4280                    BaseStyle->{FontSize -> 12}]}},
4281                   AspectRatio->Automatic,
4282                   ImageSize->{640.8000000000001, 414.}], 23->
4283                 
4284                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
4285                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
4286                    {RGBColor[0.8, 0, 0],
4287                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
4288                    LineBox[{{1.35, 1.7}, {1.3833232327284486`,
4289                    1.382950619028662}}]},
4290                    {RGBColor[0, 0.6, 0],
4291                    CircleBox[{3.7, 1.7}, 0.8231729446455008],
4292                    LineBox[{{3.7, 1.7}, {3.954374429205127,
4293                    0.9171160069570264}}]},
4294                    {RGBColor[0, 0, 0.8],
4295                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
4296                     LineBox[{{6.050000000000001, 1.7}, {6.47922596264962,
4297                    1.8911037110507805`}}]},
4298                    {RGBColor[0, 0, 0],
4299                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
4300\\)\"\>", {1.35, 0.35}, {0, -1},
4301                    BaseStyle->{FontSize -> 24}],
4302                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
4303\\)\"\>", {3.7, 0.35}, {0, -1},
4304                    BaseStyle->{FontSize -> 24}],
4305                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
4306\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
4307                    BaseStyle->{FontSize -> 24}], InsetBox[
4308                   
4309                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4310\\(1\\)]\\) = 0.1 eV\"\>",
4311                    StringForm[
4312                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
4313                    Editable->False], {1.35, 0.}, {0, -1},
4314                    BaseStyle->{FontSize -> 14}], InsetBox[
4315                   
4316                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4317\\(2\\)]\\) = 0.3 eV\"\>",
4318                    StringForm[
4319                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
4320                    Editable->False], {3.7, 0.}, {0, -1},
4321                    BaseStyle->{FontSize -> 14}], InsetBox[
4322                   
4323                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4324\\(3\\)]\\) = 0.4 eV\"\>",
4325                    StringForm[
4326                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
4327                    Editable->False], {6.050000000000001, 0.}, {0, -1},
4328                    BaseStyle->{FontSize -> 14}]},
4329                    {RGBColor[0, 0.6, 0.6],
4330                    CircleBox[{1.35, 4.4}, 0.41786663272562746`],
4331                    LineBox[{{1.35, 4.4}, {1.5691495765402665`,
4332                    4.044210756419371}}]},
4333                    {RGBColor[0.6, 0, 0.6],
4334                    LineBox[{{3.7, 4.4}, {4.100441076917373,
4335                    3.946414455614057}}],
4336                    CircleBox[{3.7, 4.4}, 0.6050561148840972]},
4337                    {RGBColor[0.6, 0.6, 0],
4338                    CircleBox[{6.050000000000001, 4.4}, 0.6777127526437049],
4339                    LineBox[{{6.050000000000001, 4.4}, {6.254137507834492,
4340                    5.046237149188308}}]},
4341                    {RGBColor[0, 0, 0], InsetBox[
4342                   
4343                    InterpretationBox["\<\"P = \
4344\\!\\(TraditionalForm\\`\\\"0.175\\\"\\)\"\>",
4345                    StringForm["P = ``",
4346                    NumberForm[0.17461252274545444`, 3]],
4347                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
4348                    BaseStyle->{FontSize -> 18}], InsetBox[
4349                   
4350                    InterpretationBox["\<\"P = \
4351\\!\\(TraditionalForm\\`\\\"0.366\\\"\\)\"\>",
4352                    StringForm["P = ``",
4353                    NumberForm[0.36609290215863777`, 3]],
4354                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
4355                    BaseStyle->{FontSize -> 18}], InsetBox[
4356                   
4357                    InterpretationBox["\<\"P = \
4358\\!\\(TraditionalForm\\`\\\"0.459\\\"\\)\"\>",
4359                    StringForm["P = ``",
4360                    NumberForm[0.45929457509590754`, 3]],
4361                   
4362                    Editable->
4363                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
4364                   
4365                    BaseStyle->{FontSize -> 18}],
4366                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
4367\\)\"\>", {1.35, 3.05}, {0, -1},
4368                    BaseStyle->{FontSize -> 24}],
4369                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
4370\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
4371                    BaseStyle->{FontSize -> 24}],
4372                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
4373\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
4374                    BaseStyle->{FontSize -> 24}], InsetBox[
4375                   
4376                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4377), \\(12\\)]\\)=10. deg\"\>",
4378                    StringForm[
4379                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
4380                    "10."],
4381                    Editable->False], {1.35, -0.35}, {0, -1},
4382                    BaseStyle->{FontSize -> 14}], InsetBox[
4383                   
4384                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4385), \\(13\\)]\\)=20. deg\"\>",
4386                    StringForm[
4387                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
4388                    "20."],
4389                    Editable->False], {3.7, -0.35}, {0, -1},
4390                    BaseStyle->{FontSize -> 14}], InsetBox[
4391                   
4392                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4393), \\(23\\)]\\)=30. deg\"\>",
4394                    StringForm[
4395                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
4396                    "30."],
4397                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
4398                    BaseStyle->{FontSize -> 14}], InsetBox[
4399                   
4400                    InterpretationBox["\<\"t = \
4401\\!\\(TraditionalForm\\`\\(\\\"3.033\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
4402sec\"\>",
4403                    StringForm["t = `` sec",
4404                    ScientificForm[3.03284759674704*^-14, 4]],
4405                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
4406                    BaseStyle->{FontSize -> 12}]}},
4407                   AspectRatio->Automatic,
4408                   ImageSize->{640.8000000000001, 414.}], 24->
4409                 
4410                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
4411                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
4412                    {RGBColor[0.8, 0, 0],
4413                    CircleBox[{1.35, 1.7}, 0.318795777597168],
4414                    LineBox[{{1.35, 1.7}, {1.3166767672715511`,
4415                    1.382950619028662}}]},
4416                    {RGBColor[0, 0.6, 0],
4417                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
4418                    LineBox[{{3.7, 1.7}, {3.4456255707948715`,
4419                    0.9171160069570271}}]},
4420                    {RGBColor[0, 0, 0.8],
4421                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
4422                     LineBox[{{6.050000000000001, 1.7}, {6.479225962649618,
4423                    1.508896288949217}}]},
4424                    {RGBColor[0, 0, 0],
4425                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
4426\\)\"\>", {1.35, 0.35}, {0, -1},
4427                    BaseStyle->{FontSize -> 24}],
4428                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
4429\\)\"\>", {3.7, 0.35}, {0, -1},
4430                    BaseStyle->{FontSize -> 24}],
4431                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
4432\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
4433                    BaseStyle->{FontSize -> 24}], InsetBox[
4434                   
4435                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4436\\(1\\)]\\) = 0.1 eV\"\>",
4437                    StringForm[
4438                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
4439                    Editable->False], {1.35, 0.}, {0, -1},
4440                    BaseStyle->{FontSize -> 14}], InsetBox[
4441                   
4442                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4443\\(2\\)]\\) = 0.3 eV\"\>",
4444                    StringForm[
4445                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
4446                    Editable->False], {3.7, 0.}, {0, -1},
4447                    BaseStyle->{FontSize -> 14}], InsetBox[
4448                   
4449                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4450\\(3\\)]\\) = 0.4 eV\"\>",
4451                    StringForm[
4452                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
4453                    Editable->False], {6.050000000000001, 0.}, {0, -1},
4454                    BaseStyle->{FontSize -> 14}]},
4455                    {RGBColor[0, 0.6, 0.6],
4456                    CircleBox[{1.35, 4.4}, 0.49217663982664617`],
4457                    LineBox[{{1.35, 4.4}, {1.4244582739887741`,
4458                    3.9134881191320603`}}]},
4459                    {RGBColor[0.6, 0, 0.6],
4460                    LineBox[{{3.7, 4.4}, {3.7028993928342,
4461                    3.7668357085348356`}}],
4462                    CircleBox[{3.7, 4.4}, 0.6331709298960205]},
4463                    {RGBColor[0.6, 0.6, 0],
4464                    CircleBox[{6.050000000000001, 4.4}, 0.5973748645059986],
4465                    LineBox[{{6.050000000000001, 4.4}, {6.544468678523935,
4466                    4.735197635287534}}]},
4467                    {RGBColor[0, 0, 0], InsetBox[
4468                   
4469                    InterpretationBox["\<\"P = \
4470\\!\\(TraditionalForm\\`\\\"0.242\\\"\\)\"\>",
4471                    StringForm["P = ``",
4472                    NumberForm[0.24223784479104818`, 3]],
4473                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
4474                    BaseStyle->{FontSize -> 18}], InsetBox[
4475                   
4476                    InterpretationBox["\<\"P = \
4477\\!\\(TraditionalForm\\`\\\"0.401\\\"\\)\"\>",
4478                    StringForm["P = ``",
4479                    NumberForm[0.40090542646539135`, 3]],
4480                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
4481                    BaseStyle->{FontSize -> 18}], InsetBox[
4482                   
4483                    InterpretationBox["\<\"P = \
4484\\!\\(TraditionalForm\\`\\\"0.357\\\"\\)\"\>",
4485                    StringForm["P = ``",
4486                    NumberForm[0.3568567287435602, 3]],
4487                   
4488                    Editable->
4489                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
4490                   
4491                    BaseStyle->{FontSize -> 18}],
4492                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
4493\\)\"\>", {1.35, 3.05}, {0, -1},
4494                    BaseStyle->{FontSize -> 24}],
4495                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
4496\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
4497                    BaseStyle->{FontSize -> 24}],
4498                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
4499\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
4500                    BaseStyle->{FontSize -> 24}], InsetBox[
4501                   
4502                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4503), \\(12\\)]\\)=10. deg\"\>",
4504                    StringForm[
4505                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
4506                    "10."],
4507                    Editable->False], {1.35, -0.35}, {0, -1},
4508                    BaseStyle->{FontSize -> 14}], InsetBox[
4509                   
4510                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4511), \\(13\\)]\\)=20. deg\"\>",
4512                    StringForm[
4513                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
4514                    "20."],
4515                    Editable->False], {3.7, -0.35}, {0, -1},
4516                    BaseStyle->{FontSize -> 14}], InsetBox[
4517                   
4518                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4519), \\(23\\)]\\)=30. deg\"\>",
4520                    StringForm[
4521                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
4522                    "30."],
4523                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
4524                    BaseStyle->{FontSize -> 14}], InsetBox[
4525                   
4526                    InterpretationBox["\<\"t = \
4527\\!\\(TraditionalForm\\`\\(\\\"3.171\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
4528sec\"\>",
4529                    StringForm["t = `` sec",
4530                    ScientificForm[3.170704305690087*^-14, 4]],
4531                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
4532                    BaseStyle->{FontSize -> 12}]}},
4533                   AspectRatio->Automatic,
4534                   ImageSize->{640.8000000000001, 414.}], 25->
4535                 
4536                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
4537                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
4538                    {RGBColor[0.8, 0, 0],
4539                    CircleBox[{1.35, 1.7}, 0.318795777597168],
4540                    LineBox[{{1.35, 1.7}, {1.2514866869874992`,
4541                    1.3968071983488328`}}]},
4542                    {RGBColor[0, 0.6, 0],
4543                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
4544                    LineBox[{{3.7, 1.7}, {3.0340390984721224`,
4545                    1.216151083051206}}]},
4546                    {RGBColor[0, 0, 0.8],
4547                    CircleBox[{6.050000000000001, 1.7}, 0.4698463103929542],
4548                    LineBox[{{6.050000000000001, 1.7}, {6.19519049465579,
4549                    1.2531496048435455`}}]},
4550                    {RGBColor[0, 0, 0],
4551                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
4552\\)\"\>", {1.35, 0.35}, {0, -1},
4553                    BaseStyle->{FontSize -> 24}],
4554                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
4555\\)\"\>", {3.7, 0.35}, {0, -1},
4556                    BaseStyle->{FontSize -> 24}],
4557                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
4558\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
4559                    BaseStyle->{FontSize -> 24}], InsetBox[
4560                   
4561                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4562\\(1\\)]\\) = 0.1 eV\"\>",
4563                    StringForm[
4564                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
4565                    Editable->False], {1.35, 0.}, {0, -1},
4566                    BaseStyle->{FontSize -> 14}], InsetBox[
4567                   
4568                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4569\\(2\\)]\\) = 0.3 eV\"\>",
4570                    StringForm[
4571                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
4572                    Editable->False], {3.7, 0.}, {0, -1},
4573                    BaseStyle->{FontSize -> 14}], InsetBox[
4574                   
4575                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4576\\(3\\)]\\) = 0.4 eV\"\>",
4577                    StringForm[
4578                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
4579                    Editable->False], {6.050000000000001, 0.}, {0, -1},
4580                    BaseStyle->{FontSize -> 14}]},
4581                    {RGBColor[0, 0.6, 0.6],
4582                    CircleBox[{1.35, 4.4}, 0.5339193150121708],
4583                    LineBox[{{1.35, 4.4}, {1.199823443828888,
4584                    3.887636030814373}}]},
4585                    {RGBColor[0.6, 0, 0.6],
4586                    LineBox[{{3.7, 4.4}, {3.251421850114169,
4587                    3.888414237774079}}],
4588                    CircleBox[{3.7, 4.4}, 0.6803986689193858]},
4589                    {RGBColor[0.6, 0.6, 0],
4590                    CircleBox[{6.050000000000001, 4.4}, 0.5019838806073977],
4591                    LineBox[{{6.050000000000001, 4.4}, {6.550513456726695,
4592                    4.361606041814406}}]},
4593                    {RGBColor[0, 0, 0], InsetBox[
4594                   
4595                    InterpretationBox["\<\"P = \
4596\\!\\(TraditionalForm\\`\\\"0.285\\\"\\)\"\>",
4597                    StringForm["P = ``",
4598                    NumberForm[0.2850698349430657, 3]],
4599                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
4600                    BaseStyle->{FontSize -> 18}], InsetBox[
4601                   
4602                    InterpretationBox["\<\"P = \
4603\\!\\(TraditionalForm\\`\\\"0.463\\\"\\)\"\>",
4604                    StringForm["P = ``",
4605                    NumberForm[0.462942348667272, 3]],
4606                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
4607                    BaseStyle->{FontSize -> 18}], InsetBox[
4608                   
4609                    InterpretationBox["\<\"P = \
4610\\!\\(TraditionalForm\\`\\\"0.252\\\"\\)\"\>",
4611                    StringForm["P = ``",
4612                    NumberForm[0.25198781638966217`, 3]],
4613                   
4614                    Editable->
4615                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
4616                   
4617                    BaseStyle->{FontSize -> 18}],
4618                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
4619\\)\"\>", {1.35, 3.05}, {0, -1},
4620                    BaseStyle->{FontSize -> 24}],
4621                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
4622\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
4623                    BaseStyle->{FontSize -> 24}],
4624                   
4625                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
4626\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
4627                    BaseStyle->{FontSize -> 24}], InsetBox[
4628                   
4629                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4630), \\(12\\)]\\)=10. deg\"\>",
4631                    StringForm[
4632                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
4633                    "10."],
4634                    Editable->False], {1.35, -0.35}, {0, -1},
4635                    BaseStyle->{FontSize -> 14}], InsetBox[
4636                   
4637                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4638), \\(13\\)]\\)=20. deg\"\>",
4639                    StringForm[
4640                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
4641                    "20."],
4642                    Editable->False], {3.7, -0.35}, {0, -1},
4643                    BaseStyle->{FontSize -> 14}], InsetBox[
4644                   
4645                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4646), \\(23\\)]\\)=30. deg\"\>",
4647                    StringForm[
4648                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
4649                    "30."],
4650                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
4651                    BaseStyle->{FontSize -> 14}], InsetBox[
4652                   
4653                    InterpretationBox["\<\"t = \
4654\\!\\(TraditionalForm\\`\\(\\\"3.309\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
4655sec\"\>",
4656                    StringForm["t = `` sec",
4657                    ScientificForm[3.308561014633134*^-14, 4]],
4658                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
4659                    BaseStyle->{FontSize -> 12}]}},
4660                   AspectRatio->Automatic,
4661                   ImageSize->{640.8000000000001, 414.}], 26->
4662                 
4663                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
4664                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
4665                    {RGBColor[0.8, 0, 0],
4666                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
4667                    LineBox[{{1.35, 1.7}, {1.1906021112014158`,
4668                    1.4239147579816387`}}]},
4669                    {RGBColor[0, 0.6, 0],
4670                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
4671                    LineBox[{{3.7, 1.7}, {2.8768270553544992`,
4672                    1.6999999999999995`}}]},
4673                    {RGBColor[0, 0, 0.8],
4674                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
4675                     LineBox[{{6.050000000000001, 1.7}, {5.815076844803522,
4676                    1.2931011593253139`}}]},
4677                    {RGBColor[0, 0, 0],
4678                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
4679\\)\"\>", {1.35, 0.35}, {0, -1},
4680                    BaseStyle->{FontSize -> 24}],
4681                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
4682\\)\"\>", {3.7, 0.35}, {0, -1},
4683                    BaseStyle->{FontSize -> 24}],
4684                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
4685\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
4686                    BaseStyle->{FontSize -> 24}], InsetBox[
4687                   
4688                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4689\\(1\\)]\\) = 0.1 eV\"\>",
4690                    StringForm[
4691                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
4692                    Editable->False], {1.35, 0.}, {0, -1},
4693                    BaseStyle->{FontSize -> 14}], InsetBox[
4694                   
4695                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4696\\(2\\)]\\) = 0.3 eV\"\>",
4697                    StringForm[
4698                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
4699                    Editable->False], {3.7, 0.}, {0, -1},
4700                    BaseStyle->{FontSize -> 14}], InsetBox[
4701                   
4702                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4703\\(3\\)]\\) = 0.4 eV\"\>",
4704                    StringForm[
4705                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
4706                    Editable->False], {6.050000000000001, 0.}, {0, -1},
4707                    BaseStyle->{FontSize -> 14}]},
4708                    {RGBColor[0, 0.6, 0.6],
4709                    CircleBox[{1.35, 4.4}, 0.5356602883070318],
4710                    LineBox[{{1.35, 4.4}, {0.9878201046431107,
4711                    4.0053385401784904`}}]},
4712                    {RGBColor[0.6, 0, 0.6],
4713                    LineBox[{{3.7, 4.4}, {2.96282389941561,
4714                    4.296834890418174}}],
4715                    CircleBox[{3.7, 4.4}, 0.7443598881642112]},
4716                    {RGBColor[0.6, 0.6, 0],
4717                    CircleBox[{6.050000000000001, 4.4}, 0.39874354217089286`],
4718                     LineBox[{{6.050000000000001, 4.4}, {6.339149429748228,
4719                    4.125429390321424}}]},
4720                    {RGBColor[0, 0, 0], InsetBox[
4721                   
4722                    InterpretationBox["\<\"P = \
4723\\!\\(TraditionalForm\\`\\\"0.287\\\"\\)\"\>",
4724                    StringForm["P = ``",
4725                    NumberForm[0.2869319444691725, 3]],
4726                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
4727                    BaseStyle->{FontSize -> 18}], InsetBox[
4728                   
4729                    InterpretationBox["\<\"P = \
4730\\!\\(TraditionalForm\\`\\\"0.554\\\"\\)\"\>",
4731                    StringForm["P = ``",
4732                    NumberForm[0.554071643107837, 3]],
4733                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
4734                    BaseStyle->{FontSize -> 18}], InsetBox[
4735                   
4736                    InterpretationBox["\<\"P = \
4737\\!\\(TraditionalForm\\`\\\"0.159\\\"\\)\"\>",
4738                    StringForm["P = ``",
4739                    NumberForm[0.15899641242299062`, 3]],
4740                   
4741                    Editable->
4742                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
4743                   
4744                    BaseStyle->{FontSize -> 18}],
4745                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
4746\\)\"\>", {1.35, 3.05}, {0, -1},
4747                    BaseStyle->{FontSize -> 24}],
4748                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
4749\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
4750                    BaseStyle->{FontSize -> 24}],
4751                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
4752\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
4753                    BaseStyle->{FontSize -> 24}], InsetBox[
4754                   
4755                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4756), \\(12\\)]\\)=10. deg\"\>",
4757                    StringForm[
4758                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
4759                    "10."],
4760                    Editable->False], {1.35, -0.35}, {0, -1},
4761                    BaseStyle->{FontSize -> 14}], InsetBox[
4762                   
4763                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4764), \\(13\\)]\\)=20. deg\"\>",
4765                    StringForm[
4766                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
4767                    "20."],
4768                    Editable->False], {3.7, -0.35}, {0, -1},
4769                    BaseStyle->{FontSize -> 14}], InsetBox[
4770                   
4771                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4772), \\(23\\)]\\)=30. deg\"\>",
4773                    StringForm[
4774                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
4775                    "30."],
4776                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
4777                    BaseStyle->{FontSize -> 14}], InsetBox[
4778                   
4779                    InterpretationBox["\<\"t = \
4780\\!\\(TraditionalForm\\`\\(\\\"3.446\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
4781sec\"\>",
4782                    StringForm["t = `` sec",
4783                    ScientificForm[3.4464177235761814`*^-14, 4]],
4784                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
4785                    BaseStyle->{FontSize -> 12}]}},
4786                   AspectRatio->Automatic,
4787                   ImageSize->{640.8000000000001, 414.}], 27->
4788                 
4789                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
4790                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
4791                    {RGBColor[0.8, 0, 0],
4792                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
4793                    LineBox[{{1.35, 1.7}, {1.1366839880317632`,
4794                    1.4630885674946228`}}]},
4795                    {RGBColor[0, 0.6, 0],
4796                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
4797                    LineBox[{{3.7, 1.7}, {3.0340390984721237`,
4798                    2.1838489169487953`}}]},
4799                    {RGBColor[0, 0, 0.8],
4800                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
4801                     LineBox[{{6.050000000000001, 1.7}, {5.590420958775501,
4802                    1.6023134591817174`}}]},
4803                    {RGBColor[0, 0, 0],
4804                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
4805\\)\"\>", {1.35, 0.35}, {0, -1},
4806                    BaseStyle->{FontSize -> 24}],
4807                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
4808\\)\"\>", {3.7, 0.35}, {0, -1},
4809                    BaseStyle->{FontSize -> 24}],
4810                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
4811\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
4812                    BaseStyle->{FontSize -> 24}], InsetBox[
4813                   
4814                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4815\\(1\\)]\\) = 0.1 eV\"\>",
4816                    StringForm[
4817                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
4818                    Editable->False], {1.35, 0.}, {0, -1},
4819                    BaseStyle->{FontSize -> 14}], InsetBox[
4820                   
4821                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4822\\(2\\)]\\) = 0.3 eV\"\>",
4823                    StringForm[
4824                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
4825                    Editable->False], {3.7, 0.}, {0, -1},
4826                    BaseStyle->{FontSize -> 14}], InsetBox[
4827                   
4828                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4829\\(3\\)]\\) = 0.4 eV\"\>",
4830                    StringForm[
4831                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
4832                    Editable->False], {6.050000000000001, 0.}, {0, -1},
4833                    BaseStyle->{FontSize -> 14}]},
4834                    {RGBColor[0, 0.6, 0.6],
4835                    CircleBox[{1.35, 4.4}, 0.49475423758918713`],
4836                    LineBox[{{1.35, 4.4}, {0.8867397596296034,
4837                    4.226299955945832}}]},
4838                    {RGBColor[0.6, 0, 0.6],
4839                    LineBox[{{3.7, 4.4}, {3.003871730726604,
4840                    4.8279200412969665`}}],
4841                    CircleBox[{3.7, 4.4}, 0.8171353186744356]},
4842                    {RGBColor[0.6, 0.6, 0],
4843                    CircleBox[{6.050000000000001, 4.4}, 0.2958177063030044],
4844                    LineBox[{{6.050000000000001, 4.4}, {6.081873513597872,
4845                    4.105904446661809}}]},
4846                    {RGBColor[0, 0, 0], InsetBox[
4847                   
4848                    InterpretationBox["\<\"P = \
4849\\!\\(TraditionalForm\\`\\\"0.245\\\"\\)\"\>",
4850                    StringForm["P = ``",
4851                    NumberForm[0.24478175561245782`, 3]],
4852                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
4853                    BaseStyle->{FontSize -> 18}], InsetBox[
4854                   
4855                    InterpretationBox["\<\"P = \
4856\\!\\(TraditionalForm\\`\\\"0.668\\\"\\)\"\>",
4857                    StringForm["P = ``",
4858                    NumberForm[0.6677101290251714, 3]],
4859                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
4860                    BaseStyle->{FontSize -> 18}], InsetBox[
4861                   
4862                    InterpretationBox["\<\"P = \
4863\\!\\(TraditionalForm\\`\\\"0.0875\\\"\\)\"\>",
4864                    StringForm["P = ``",
4865                    NumberForm[0.08750811536237058, 3]],
4866                   
4867                    Editable->
4868                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
4869                   
4870                    BaseStyle->{FontSize -> 18}],
4871                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
4872\\)\"\>", {1.35, 3.05}, {0, -1},
4873                    BaseStyle->{FontSize -> 24}],
4874                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
4875\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
4876                    BaseStyle->{FontSize -> 24}],
4877                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
4878\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
4879                    BaseStyle->{FontSize -> 24}], InsetBox[
4880                   
4881                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4882), \\(12\\)]\\)=10. deg\"\>",
4883                    StringForm[
4884                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
4885                    "10."],
4886                    Editable->False], {1.35, -0.35}, {0, -1},
4887                    BaseStyle->{FontSize -> 14}], InsetBox[
4888                   
4889                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4890), \\(13\\)]\\)=20. deg\"\>",
4891                    StringForm[
4892                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
4893                    "20."],
4894                    Editable->False], {3.7, -0.35}, {0, -1},
4895                    BaseStyle->{FontSize -> 14}], InsetBox[
4896                   
4897                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
4898), \\(23\\)]\\)=30. deg\"\>",
4899                    StringForm[
4900                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
4901                    "30."],
4902                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
4903                    BaseStyle->{FontSize -> 14}], InsetBox[
4904                   
4905                    InterpretationBox["\<\"t = \
4906\\!\\(TraditionalForm\\`\\(\\\"3.584\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
4907sec\"\>",
4908                    StringForm["t = `` sec",
4909                    ScientificForm[3.584274432519229*^-14, 4]],
4910                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
4911                    BaseStyle->{FontSize -> 12}]}},
4912                   AspectRatio->Automatic,
4913                   ImageSize->{640.8000000000001, 414.}], 28->
4914                 
4915                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
4916                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
4917                    {RGBColor[0.8, 0, 0],
4918                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
4919                    LineBox[{{1.35, 1.7}, {1.0920887981889151`,
4920                    1.5126165434352734`}}]},
4921                    {RGBColor[0, 0.6, 0],
4922                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
4923                    LineBox[{{3.7, 1.7}, {3.445625570794872,
4924                    2.482883993042973}}]},
4925                    {RGBColor[0, 0, 0.8],
4926                    CircleBox[{6.050000000000001, 1.7}, 0.4698463103929542],
4927                    LineBox[{{6.050000000000001, 1.7}, {5.669886350147734,
4928                    1.97616873209301}}]},
4929                    {RGBColor[0, 0, 0],
4930                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
4931\\)\"\>", {1.35, 0.35}, {0, -1},
4932                    BaseStyle->{FontSize -> 24}],
4933                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
4934\\)\"\>", {3.7, 0.35}, {0, -1},
4935                    BaseStyle->{FontSize -> 24}],
4936                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
4937\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
4938                    BaseStyle->{FontSize -> 24}], InsetBox[
4939                   
4940                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4941\\(1\\)]\\) = 0.1 eV\"\>",
4942                    StringForm[
4943                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
4944                    Editable->False], {1.35, 0.}, {0, -1},
4945                    BaseStyle->{FontSize -> 14}], InsetBox[
4946                   
4947                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4948\\(2\\)]\\) = 0.3 eV\"\>",
4949                    StringForm[
4950                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
4951                    Editable->False], {3.7, 0.}, {0, -1},
4952                    BaseStyle->{FontSize -> 14}], InsetBox[
4953                   
4954                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
4955\\(3\\)]\\) = 0.4 eV\"\>",
4956                    StringForm[
4957                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
4958                    Editable->False], {6.050000000000001, 0.}, {0, -1},
4959                    BaseStyle->{FontSize -> 14}]},
4960                    {RGBColor[0, 0.6, 0.6],
4961                    CircleBox[{1.35, 4.4}, 0.4130817066485087],
4962                    LineBox[{{1.35, 4.4}, {0.9398103938238571,
4963                    4.448795321012422}}]},
4964                    {RGBColor[0.6, 0, 0.6],
4965                    LineBox[{{3.7, 4.4}, {3.3942318582879945`,
4966                    5.233942836433211}}],
4967                    CircleBox[{3.7, 4.4}, 0.8882312823382662]},
4968                    {RGBColor[0.6, 0.6, 0],
4969                    CircleBox[{6.050000000000001, 4.4}, 0.20101913517890393`],
4970                     LineBox[{{6.050000000000001, 4.4}, {5.931842242928651,
4971                    4.237373319679881}}]},
4972                    {RGBColor[0, 0, 0], InsetBox[
4973                   
4974                    InterpretationBox["\<\"P = \
4975\\!\\(TraditionalForm\\`\\\"0.171\\\"\\)\"\>",
4976                    StringForm["P = ``",
4977                    NumberForm[0.17063649636764458`, 3]],
4978                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
4979                    BaseStyle->{FontSize -> 18}], InsetBox[
4980                   
4981                    InterpretationBox["\<\"P = \
4982\\!\\(TraditionalForm\\`\\\"0.789\\\"\\)\"\>",
4983                    StringForm["P = ``",
4984                    NumberForm[0.7889548109242808, 3]],
4985                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
4986                    BaseStyle->{FontSize -> 18}], InsetBox[
4987                   
4988                    InterpretationBox["\<\"P = \
4989\\!\\(TraditionalForm\\`\\\"0.0404\\\"\\)\"\>",
4990                    StringForm["P = ``",
4991                    NumberForm[0.040408692708074456`, 3]],
4992                   
4993                    Editable->
4994                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
4995                   
4996                    BaseStyle->{FontSize -> 18}],
4997                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
4998\\)\"\>", {1.35, 3.05}, {0, -1},
4999                    BaseStyle->{FontSize -> 24}],
5000                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
5001\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
5002                    BaseStyle->{FontSize -> 24}],
5003                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
5004\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
5005                    BaseStyle->{FontSize -> 24}], InsetBox[
5006                   
5007                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
5008), \\(12\\)]\\)=10. deg\"\>",
5009                    StringForm[
5010                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
5011                    "10."],
5012                    Editable->False], {1.35, -0.35}, {0, -1},
5013                    BaseStyle->{FontSize -> 14}], InsetBox[
5014                   
5015                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
5016), \\(13\\)]\\)=20. deg\"\>",
5017                    StringForm[
5018                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
5019                    "20."],
5020                    Editable->False], {3.7, -0.35}, {0, -1},
5021                    BaseStyle->{FontSize -> 14}], InsetBox[
5022                   
5023                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
5024), \\(23\\)]\\)=30. deg\"\>",
5025                    StringForm[
5026                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
5027                    "30."],
5028                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
5029                    BaseStyle->{FontSize -> 14}], InsetBox[
5030                   
5031                    InterpretationBox["\<\"t = \
5032\\!\\(TraditionalForm\\`\\(\\\"3.722\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
5033sec\"\>",
5034                    StringForm["t = `` sec",
5035                    ScientificForm[3.7221311414622757`*^-14, 4]],
5036                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
5037                    BaseStyle->{FontSize -> 12}]}},
5038                   AspectRatio->Automatic,
5039                   ImageSize->{640.8000000000001, 414.}], 29->
5040                 
5041                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
5042                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
5043                    {RGBColor[0.8, 0, 0],
5044                    CircleBox[{1.35, 1.7}, 0.318795777597168],
5045                    LineBox[{{1.35, 1.7}, {1.0587655654604664`,
5046                    1.5703340755933888`}}]},
5047                    {RGBColor[0, 0.6, 0],
5048                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
5049                    LineBox[{{3.7, 1.7}, {3.954374429205127,
5050                    2.4828839930429734`}}]},
5051                    {RGBColor[0, 0, 0.8],
5052                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
5053                     LineBox[{{6.050000000000001, 1.7}, {6.00088768720265,
5054                    2.167272443143791}}]},
5055                    {RGBColor[0, 0, 0],
5056                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
5057\\)\"\>", {1.35, 0.35}, {0, -1},
5058                    BaseStyle->{FontSize -> 24}],
5059                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
5060\\)\"\>", {3.7, 0.35}, {0, -1},
5061                    BaseStyle->{FontSize -> 24}],
5062                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
5063\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
5064                    BaseStyle->{FontSize -> 24}], InsetBox[
5065                   
5066                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
5067\\(1\\)]\\) = 0.1 eV\"\>",
5068                    StringForm[
5069                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
5070                    Editable->False], {1.35, 0.}, {0, -1},
5071                    BaseStyle->{FontSize -> 14}], InsetBox[
5072                   
5073                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
5074\\(2\\)]\\) = 0.3 eV\"\>",
5075                    StringForm[
5076                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
5077                    Editable->False], {3.7, 0.}, {0, -1},
5078                    BaseStyle->{FontSize -> 14}], InsetBox[
5079                   
5080                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
5081\\(3\\)]\\) = 0.4 eV\"\>",
5082                    StringForm[
5083                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
5084                    Editable->False], {6.050000000000001, 0.}, {0, -1},
5085                    BaseStyle->{FontSize -> 14}]},
5086                    {RGBColor[0, 0.6, 0.6],
5087                    CircleBox[{1.35, 4.4}, 0.29666127566530615`],
5088                    LineBox[{{1.35, 4.4}, {1.1051972050776633`,
5089                    4.567569400779436}}]},
5090                    {RGBColor[0.6, 0, 0.6],
5091                    LineBox[{{3.7, 4.4}, {3.979163216990705,
5092                    5.305332104427485}}],
5093                    CircleBox[{3.7, 4.4}, 0.9473955462359417]},
5094                    {RGBColor[0.6, 0.6, 0],
5095                    CircleBox[{6.050000000000001, 4.4}, 0.12014061133910847`],
5096                     LineBox[{{6.050000000000001, 4.4}, {5.931360397670451,
5097                    4.381068247518494}}]},
5098                    {RGBColor[0, 0, 0], InsetBox[
5099                   
5100                    InterpretationBox["\<\"P = \
5101\\!\\(TraditionalForm\\`\\\"0.088\\\"\\)\"\>",
5102                    StringForm["P = ``",
5103                    NumberForm[0.08800791247936676, 3]],
5104                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
5105                    BaseStyle->{FontSize -> 18}], InsetBox[
5106                   
5107                    InterpretationBox["\<\"P = \
5108\\!\\(TraditionalForm\\`\\\"0.898\\\"\\)\"\>",
5109                    StringForm["P = ``",
5110                    NumberForm[0.8975583210276983, 3]],
5111                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
5112                    BaseStyle->{FontSize -> 18}], InsetBox[
5113                   
5114                    InterpretationBox["\<\"P = \
5115\\!\\(TraditionalForm\\`\\\"0.0144\\\"\\)\"\>",
5116                    StringForm["P = ``",
5117                    NumberForm[0.01443376649293472, 3]],
5118                   
5119                    Editable->
5120                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
5121                   
5122                    BaseStyle->{FontSize -> 18}],
5123                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
5124\\)\"\>", {1.35, 3.05}, {0, -1},
5125                    BaseStyle->{FontSize -> 24}],
5126                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
5127\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
5128                    BaseStyle->{FontSize -> 24}],
5129                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
5130\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
5131                    BaseStyle->{FontSize -> 24}], InsetBox[
5132                   
5133                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
5134), \\(12\\)]\\)=10. deg\"\>",
5135                    StringForm[
5136                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
5137                    "10."],
5138                    Editable->False], {1.35, -0.35}, {0, -1},
5139                    BaseStyle->{FontSize -> 14}], InsetBox[
5140                   
5141                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
5142), \\(13\\)]\\)=20. deg\"\>",
5143                    StringForm[
5144                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
5145                    "20."],
5146                    Editable->False], {3.7, -0.35}, {0, -1},
5147                    BaseStyle->{FontSize -> 14}], InsetBox[
5148                   
5149                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
5150), \\(23\\)]\\)=30. deg\"\>",
5151                    StringForm[
5152                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
5153                    "30."],
5154                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
5155                    BaseStyle->{FontSize -> 14}], InsetBox[
5156                   
5157                    InterpretationBox["\<\"t = \
5158\\!\\(TraditionalForm\\`\\(\\\"3.86\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) sec\"\
5159\>",
5160                    StringForm["t = `` sec",
5161                    ScientificForm[3.859987850405323*^-14, 4]],
5162                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
5163                    BaseStyle->{FontSize -> 12}]}},
5164                   AspectRatio->Automatic,
5165                   ImageSize->{640.8000000000001, 414.}], 30->
5166                 
5167                  GraphicsBox[{PointBox[{0, 0}], PointBox[{8.9, 5.75}],
5168                    PointBox[{8.9, 0}], PointBox[{0, 5.75}],
5169                    {RGBColor[0.8, 0, 0],
5170                    CircleBox[{1.35, 1.7}, 0.31879577759716793`],
5171                    LineBox[{{1.35, 1.7}, {1.0381706750192623`,
5172                    1.6337186308542109`}}]},
5173                    {RGBColor[0, 0.6, 0],
5174                    CircleBox[{3.7, 1.7}, 0.8231729446455007],
5175                    LineBox[{{3.7, 1.7}, {4.365960901527879,
5176                    2.183848916948792}}]},
5177                    {RGBColor[0, 0, 0.8],
5178                    CircleBox[{6.050000000000001, 1.7}, 0.46984631039295427`],
5179                     LineBox[{{6.050000000000001, 1.7}, {6.364388546568712,
5180                    2.049163854338168}}]},
5181                    {RGBColor[0, 0, 0],
5182                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(1\\)]\
5183\\)\"\>", {1.35, 0.35}, {0, -1},
5184                    BaseStyle->{FontSize -> 24}],
5185                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(2\\)]\
5186\\)\"\>", {3.7, 0.35}, {0, -1},
5187                    BaseStyle->{FontSize -> 24}],
5188                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(3\\)]\
5189\\)\"\>", {6.050000000000001, 0.35}, {0, -1},
5190                    BaseStyle->{FontSize -> 24}], InsetBox[
5191                   
5192                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
5193\\(1\\)]\\) = 0.1 eV\"\>",
5194                    StringForm[
5195                    "\!\(\*SubscriptBox[\(m\), \(1\)]\) = `` eV", "0.1"],
5196                    Editable->False], {1.35, 0.}, {0, -1},
5197                    BaseStyle->{FontSize -> 14}], InsetBox[
5198                   
5199                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
5200\\(2\\)]\\) = 0.3 eV\"\>",
5201                    StringForm[
5202                    "\!\(\*SubscriptBox[\(m\), \(2\)]\) = `` eV", "0.3"],
5203                    Editable->False], {3.7, 0.}, {0, -1},
5204                    BaseStyle->{FontSize -> 14}], InsetBox[
5205                   
5206                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(m\\), \
5207\\(3\\)]\\) = 0.4 eV\"\>",
5208                    StringForm[
5209                    "\!\(\*SubscriptBox[\(m\), \(3\)]\) = `` eV", "0.4"],
5210                    Editable->False], {6.050000000000001, 0.}, {0, -1},
5211                    BaseStyle->{FontSize -> 14}]},
5212                    {RGBColor[0, 0.6, 0.6],
5213                    CircleBox[{1.35, 4.4}, 0.15497441194858447`],
5214                    LineBox[{{1.35, 4.4}, {1.277623965697545,
5215                    4.537035681548491}}]},
5216                    {RGBColor[0.6, 0, 0.6],
5217                    LineBox[{{3.7, 4.4}, {4.495325167099423,
5218                    4.983474907028682}}],
5219                    CircleBox[{3.7, 4.4}, 0.9864000651631438]},
5220                    {RGBColor[0.6, 0.6, 0],
5221                    CircleBox[{6.050000000000001, 4.4}, 0.05475256238146174],
5222                    LineBox[{{6.050000000000001, 4.4}, {6.007559491847071,
5223                    4.434592576588872}}]},
5224                    {RGBColor[0, 0, 0], InsetBox[
5225                   
5226                    InterpretationBox["\<\"P = \
5227\\!\\(TraditionalForm\\`\\\"0.024\\\"\\)\"\>",
5228                    StringForm["P = ``",
5229                    NumberForm[0.02401706835880956, 3]],
5230                    Editable->False], {1.35, 2.6999999999999997`}, {0, -1},
5231                    BaseStyle->{FontSize -> 18}], InsetBox[
5232                   
5233                    InterpretationBox["\<\"P = \
5234\\!\\(TraditionalForm\\`\\\"0.973\\\"\\)\"\>",
5235                    StringForm["P = ``",
5236                    NumberForm[0.9729850885538543, 3]],
5237                    Editable->False], {3.7, 2.6999999999999997`}, {0, -1},
5238                    BaseStyle->{FontSize -> 18}], InsetBox[
5239                   
5240                    InterpretationBox["\<\"P = \
5241\\!\\(TraditionalForm\\`\\\"0.003\\\"\\)\"\>",
5242                    StringForm["P = ``",
5243                    NumberForm[0.0029978430873358595`, 3]],
5244                   
5245                    Editable->
5246                    False], {6.050000000000001, 2.6999999999999997`}, {0, -1},
5247                   
5248                    BaseStyle->{FontSize -> 18}],
5249                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\
5250\\)\"\>", {1.35, 3.05}, {0, -1},
5251                    BaseStyle->{FontSize -> 24}],
5252                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\
5253\\)]\\)\"\>", {3.7, 3.05}, {0, -1},
5254                    BaseStyle->{FontSize -> 24}],
5255                    InsetBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
5256\\(\[Tau]\\)]\\)\"\>", {6.050000000000001, 3.05}, {0, -1},
5257                    BaseStyle->{FontSize -> 24}], InsetBox[
5258                   
5259                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
5260), \\(12\\)]\\)=10. deg\"\>",
5261                    StringForm[
5262                    "\!\(\*SubscriptBox[\(\[Theta]\), \(12\)]\)=`` deg",
5263                    "10."],
5264                    Editable->False], {1.35, -0.35}, {0, -1},
5265                    BaseStyle->{FontSize -> 14}], InsetBox[
5266                   
5267                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
5268), \\(13\\)]\\)=20. deg\"\>",
5269                    StringForm[
5270                    "\!\(\*SubscriptBox[\(\[Theta]\), \(13\)]\)=`` deg",
5271                    "20."],
5272                    Editable->False], {3.7, -0.35}, {0, -1},
5273                    BaseStyle->{FontSize -> 14}], InsetBox[
5274                   
5275                    InterpretationBox["\<\"\\!\\(\\*SubscriptBox[\\(\[Theta]\\\
5276), \\(23\\)]\\)=30. deg\"\>",
5277                    StringForm[
5278                    "\!\(\*SubscriptBox[\(\[Theta]\), \(23\)]\)=`` deg",
5279                    "30."],
5280                    Editable->False], {6.050000000000001, -0.35}, {0, -1},
5281                    BaseStyle->{FontSize -> 14}], InsetBox[
5282                   
5283                    InterpretationBox["\<\"t = \
5284\\!\\(TraditionalForm\\`\\(\\\"3.998\\\" \[Times] 10\\^\\\"-14\\\"\\)\\) \
5285sec\"\>",
5286                    StringForm["t = `` sec",
5287                    ScientificForm[3.9978445593483705`*^-14, 4]],
5288                    Editable->False], {6.550000000000001, 0.35}, {-1, -1},
5289                    BaseStyle->{FontSize -> 12}]}},
5290                   AspectRatio->Automatic,
5291                   ImageSize->{640.8000000000001, 414.}]},
5292                  Dynamic[$CellContext`i1$$],
5293                  Alignment->Automatic,
5294                  ImageSize->All],
5295                 Identity,
5296                 Editable->True,
5297                 Selectable->True]],
5298                ScriptLevel->0,
5299                Background->GrayLevel[1]],
5300               ImageMargins->10],
5301              Deployed->False,
5302              StripOnInput->False,
5303              GraphicsBoxOptions->{PreserveImageOptions->True},
5304              Graphics3DBoxOptions->{PreserveImageOptions->True}],
5305             Identity,
5306             Editable->False,
5307             Selectable->False],
5308            Alignment->{Left, Center},
5309            Background->GrayLevel[1],
5310            Frame->1,
5311            FrameStyle->GrayLevel[0, 0.2],
5312            StripOnInput->False]}
5313         },
5314         ColumnsEqual->False,
5315         GridBoxAlignment->{
5316          "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Top}},
5317           "RowsIndexed" -> {}},
5318         GridBoxDividers->{
5319          "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}},
5320            "RowsIndexed" -> {}},
5321         GridBoxItemSize->{
5322          "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
5323         GridBoxSpacings->{"Columns" -> {
5324             Offset[0.7], {
5325              Offset[0.5599999999999999]},
5326             Offset[0.7]}, "ColumnsIndexed" -> {}, "Rows" -> {
5327             Offset[0.4], {
5328              Offset[0.8]},
5329             Offset[0.4]}, "RowsIndexed" -> {}},
5330         RowsEqual->False],
5331        "Grid"], If[
5332        CurrentValue["SelectionOver"],
5333        Manipulate`Dump`ReadControllerState[
5334         Map[Manipulate`Dump`updateOneVar[#,
5335           CurrentValue["PreviousFormatTime"],
5336           CurrentValue["CurrentFormatTime"]]& , {
5337           
5338           Manipulate`Dump`controllerLink[{$CellContext`i1$$, \
5339$CellContext`i1$184$$}, "X1",
5340            If["DefaultAbsolute", True, "JB1"], False, {1, 30, 1}, 30, 1.]}],
5341         
5342         CurrentValue[{
5343          "ControllerData", {
5344           "Gamepad", "Joystick", "Multi-Axis Controller"}}], {}]],
5345       ImageSizeCache->{671., {234.875, 240.125}}],
5346      DefaultBaseStyle->{},
5347      FrameMargins->{{5, 5}, {5, 5}}],
5348     BaselinePosition->Automatic,
5349     ImageMargins->0],
5350    Deinitialization:>None,
5351    DynamicModuleValues:>{},
5352    SynchronousInitialization->True,
5353    UnsavedVariables:>{Typeset`initDone$$},
5354    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
5355   Deployed->True,
5356   StripOnInput->False],
5357  Manipulate`InterpretManipulate[1]]], "Output",
5358 CellChangeTimes->{
5359  3.4462777118099117`*^9, {3.446277769089322*^9, 3.446277800517777*^9},
5360   3.446277845679534*^9, 3.44627977567605*^9, 3.446279923401156*^9}]
5361}, Open  ]]
5362}, Open  ]]
5363}, Open  ]]
5364},
5365WindowSize->{894, 668},
5366WindowMargins->{{Automatic, 34}, {Automatic, 0}},
5367DockedCells->FEPrivate`FrontEndResource[
5368 "FEExpressions", "CompatibilityToolbar"],
5369FrontEndVersion->"6.0 for Mac OS X PowerPC (32-bit) (June 19, 2007)",
5370StyleDefinitions->"Default.nb"
5371]
5372(* End of Notebook Content *)
5373
5374(* Internal cache information *)
5375(*CellTagsOutline
5376CellTagsIndex->{}
5377*)
5378(*CellTagsIndex
5379CellTagsIndex->{}
5380*)
5381(*NotebookFileOutline
5382Notebook[{
5383Cell[CellGroupData[{
5384Cell[590, 23, 191, 4, 105, "Section"],
5385Cell[CellGroupData[{
5386Cell[806, 31, 327, 6, 49, "Subsection"],
5387Cell[CellGroupData[{
5388Cell[1158, 41, 276, 7, 43, "Input"],
5389Cell[1437, 50, 579, 11, 41, "Message"]
5390}, Open  ]]
5391}, Open  ]],
5392Cell[CellGroupData[{
5393Cell[2065, 67, 199, 3, 34, "Subsection"],
5394Cell[2267, 72, 72, 1, 27, "Output"],
5395Cell[2342, 75, 369, 11, 73, "Input"]
5396}, Open  ]],
5397Cell[CellGroupData[{
5398Cell[2748, 91, 312, 7, 34, "Subsection"],
5399Cell[3063, 100, 778, 23, 73, "Input"]
5400}, Open  ]],
5401Cell[CellGroupData[{
5402Cell[3878, 128, 259, 5, 34, "Subsection"],
5403Cell[4140, 135, 250, 6, 27, "Output"],
5404Cell[4393, 143, 287, 8, 27, "Input"]
5405}, Open  ]],
5406Cell[CellGroupData[{
5407Cell[4717, 156, 830, 22, 244, "Subsection"],
5408Cell[5550, 180, 171, 3, 27, "Output"]
5409}, Open  ]],
5410Cell[CellGroupData[{
5411Cell[5758, 188, 161, 2, 34, "Subsection"],
5412Cell[CellGroupData[{
5413Cell[5944, 194, 10530, 272, 1288, "Input"],
5414Cell[CellGroupData[{
5415Cell[16499, 470, 2368, 52, 71, "Print"],
5416Cell[18870, 524, 2370, 52, 71, "Print"],
5417Cell[21243, 578, 1017, 28, 71, "Print"],
5418Cell[22263, 608, 1467, 36, 71, "Print"],
5419Cell[23733, 646, 1446, 37, 78, "Print"],
5420Cell[25182, 685, 1230, 32, 92, "Print"]
5421}, Open  ]]
5422}, Open  ]]
5423}, Open  ]],
5424Cell[CellGroupData[{
5425Cell[26473, 724, 358, 9, 64, "Subsection"],
5426Cell[26834, 735, 430, 9, 23, "Message"],
5427Cell[27267, 746, 69, 1, 27, "Output"],
5428Cell[27339, 749, 3495, 107, 553, "Input"],
5429Cell[30837, 858, 1153, 30, 111, "Input"],
5430Cell[31993, 890, 1605, 41, 223, "Input"],
5431Cell[33601, 933, 21446, 511, 1208, "Input"],
5432Cell[CellGroupData[{
5433Cell[55072, 1448, 397, 14, 29, "Input"],
5434Cell[55472, 1464, 198638, 3895, 506, "Output"]
5435}, Open  ]]
5436}, Open  ]]
5437}, Open  ]]
5438}
5439]
5440*)
5441
5442(* End of internal cache information *)