-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathMagneticMoment.nb
4926 lines (4758 loc) · 179 KB
/
MagneticMoment.nb
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
(* Content-type: application/vnd.wolfram.mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 12.0' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
NotebookDataLength[ 182849, 4918]
NotebookOptionsPosition[ 170164, 4690]
NotebookOutlinePosition[ 170529, 4706]
CellTagsIndexPosition[ 170486, 4703]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell["Baryon", "Section",
CellChangeTimes->{{3.8243239448415504`*^9, 3.8243239701441855`*^9}, {
3.86662551391595*^9,
3.86662551632959*^9}},ExpressionUUID->"35239b50-f1b3-48f7-aa43-\
1542484735cf"],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"{",
"\"\<\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"1\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \"2\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[StyleBox[\"\
\[Phi]\",FontColor->RGBColor[1, 0, 0]], \"1\"],FontColor->RGBColor[1, 0, \
0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \"3\"],FontColor->RGBColor[1, 0, \
0]]\)\>\"", "}"}], "\[IndentingNewLine]",
RowBox[{"Coefficient", "[",
RowBox[{
RowBox[{
FractionBox[
RowBox[{"2", " ", "C1", " ", "C2", " ",
RowBox[{"(",
RowBox[{
RowBox[{"-", "\[Mu]1"}], "+", "\[Mu]2"}], ")"}]}],
SqrtBox["3"]], "+",
RowBox[{
FractionBox["1", "3"], " ",
SuperscriptBox["C1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"2", " ", "\[Mu]1"}], "+",
RowBox[{"2", " ", "\[Mu]2"}], "-", "\[Mu]3"}], ")"}]}], "+",
RowBox[{
SuperscriptBox["C2", "2"], " ", "\[Mu]3"}]}], ",",
RowBox[{"{",
RowBox[{"\[Mu]1", ",", "\[Mu]2", ",", "\[Mu]3"}], "}"}]}],
"]"}]}], "Input",
CellChangeTimes->{{3.8242686512321525`*^9, 3.8242686513595695`*^9}, {
3.8242687083125544`*^9, 3.8242687191652646`*^9}, 3.824268777417646*^9, {
3.8243512724045944`*^9, 3.8243512813290796`*^9}, 3.825536746855194*^9, {
3.829355356491914*^9, 3.8293553810224257`*^9}, 3.866625537246385*^9, {
3.882506088576586*^9, 3.882506093165092*^9}, {3.882846096844246*^9,
3.882846130578313*^9}, {3.88284617218507*^9, 3.882846184118442*^9}},
CellLabel->"In[3]:=",ExpressionUUID->"1eef1487-f657-402f-b1a7-ef276e082097"],
Cell[BoxData[
RowBox[{"{", "\<\"\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"1\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[StyleBox[\\\"\[Phi]\\\",FontColor->\
RGBColor[1, 0, 0]], \\\"1\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"3\\\"],FontColor->RGBColor[1, 0, 0]]\\)\"\>", "}"}]], "Output",
CellChangeTimes->{3.824268651725047*^9, 3.824268727294764*^9,
3.824351354514428*^9, 3.825536762188772*^9, 3.8293553868237696`*^9,
3.8828461401145887`*^9, 3.882846196622756*^9},
CellLabel->"Out[3]=",ExpressionUUID->"bd71f0b4-ee22-4315-8ef2-05cdae247d18"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{
FractionBox[
RowBox[{"2", " ",
SuperscriptBox["C1", "2"]}], "3"], "-",
FractionBox[
RowBox[{"2", " ", "C1", " ", "C2"}],
SqrtBox["3"]]}], ",",
RowBox[{
FractionBox[
RowBox[{"2", " ",
SuperscriptBox["C1", "2"]}], "3"], "+",
FractionBox[
RowBox[{"2", " ", "C1", " ", "C2"}],
SqrtBox["3"]]}], ",",
RowBox[{
RowBox[{"-",
FractionBox[
SuperscriptBox["C1", "2"], "3"]}], "+",
SuperscriptBox["C2", "2"]}]}], "}"}]], "Output",
CellChangeTimes->{3.824268651725047*^9, 3.824268727294764*^9,
3.824351354514428*^9, 3.825536762188772*^9, 3.8293553868237696`*^9,
3.8828461401145887`*^9, 3.882846196624927*^9},
CellLabel->"Out[4]=",ExpressionUUID->"a8cbbb07-9f6b-4365-b046-c74e6cc30e36"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Tetraquark", "Section",
CellChangeTimes->{{3.8243239448415504`*^9, 3.8243239701441855`*^9}, {
3.86662551391595*^9, 3.86662551632959*^9},
3.866625699298586*^9},ExpressionUUID->"903dc6e7-c241-4ccf-8316-\
22cfd047341c"],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"{",
"\"\<\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"2\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \"3\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"1\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"6\"],FontColor->RGBColor[1, 0, 0]]\)\>\"", "}"}], "\[IndentingNewLine]",
RowBox[{"Coefficient", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"\[Mu]1", ",", "\[Mu]2", ",", "\[Mu]3", ",", "\[Mu]4"}], "}"}]}],
"]"}]}], "Input",
CellChangeTimes->{{3.824268679008191*^9, 3.8242686819337263`*^9}, {
3.8242687313413525`*^9, 3.824268837689647*^9}, {3.824351285934971*^9,
3.8243512919849806`*^9}, {3.8828462790756187`*^9, 3.8828462843519917`*^9}, {
3.882846326676724*^9, 3.8828463280834227`*^9}},
CellLabel->"In[5]:=",ExpressionUUID->"48728489-9df6-4d97-a62c-e605aaf7754e"],
Cell[BoxData[
RowBox[{"{", "\<\"\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"3\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"1\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"6\\\"],FontColor->RGBColor[1, 0, 0]]\\)\"\>", "}"}]], "Output",
CellChangeTimes->{3.824268838229477*^9, 3.8243513590652895`*^9,
3.82553676442054*^9, 3.882846332075461*^9},
CellLabel->"Out[5]=",ExpressionUUID->"8a1f0266-7666-4257-9286-f2f2c41409ac"],
Cell[BoxData[
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0", ",", "0"}], "}"}]], "Output",
CellChangeTimes->{3.824268838229477*^9, 3.8243513590652895`*^9,
3.82553676442054*^9, 3.882846332078685*^9},
CellLabel->"Out[6]=",ExpressionUUID->"95301b33-19cb-4ed3-a15a-dfea2faae7e6"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"{",
"\"\<\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"2\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \"5\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"1\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"4\"],FontColor->RGBColor[1, 0, 0]]\)\>\"", "}"}], "\[IndentingNewLine]",
RowBox[{"Coefficient", "[",
RowBox[{
RowBox[{
RowBox[{
SuperscriptBox["C2", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2"}], ")"}]}], "+",
RowBox[{
SuperscriptBox["C1", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]3", "+", "\[Mu]4"}], ")"}]}]}], ",",
RowBox[{"{",
RowBox[{"\[Mu]1", ",", "\[Mu]2", ",", "\[Mu]3", ",", "\[Mu]4"}], "}"}]}],
"]"}]}], "Input",
CellChangeTimes->{{3.824268679008191*^9, 3.8242686819337263`*^9}, {
3.8242687313413525`*^9, 3.824268837689647*^9}, {3.824351285934971*^9,
3.8243512919849806`*^9}, {3.882846342273706*^9, 3.8828463596382227`*^9}},
CellLabel->"In[7]:=",ExpressionUUID->"b96861a6-3323-4821-89ac-16a706e0d702"],
Cell[BoxData[
RowBox[{"{", "\<\"\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"5\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"1\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"4\\\"],FontColor->RGBColor[1, 0, 0]]\\)\"\>", "}"}]], "Output",
CellChangeTimes->{3.824268838229477*^9, 3.8243513590652895`*^9,
3.82553676442054*^9, 3.8828465258938417`*^9},
CellLabel->"Out[7]=",ExpressionUUID->"a4339356-8c80-4282-a3c6-00e8fc4a83c3"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
SuperscriptBox["C2", "2"], ",",
SuperscriptBox["C2", "2"], ",",
SuperscriptBox["C1", "2"], ",",
SuperscriptBox["C1", "2"]}], "}"}]], "Output",
CellChangeTimes->{3.824268838229477*^9, 3.8243513590652895`*^9,
3.82553676442054*^9, 3.882846525894464*^9},
CellLabel->"Out[8]=",ExpressionUUID->"d886eaaa-0841-455a-bcac-dcc3099227d6"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"{",
"\"\<\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"2\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \"2\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"2\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"5\"],FontColor->RGBColor[1, 0, \
0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"1\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"4\"],FontColor->RGBColor[1, 0, 0]]\)\>\"", "}"}], "\[IndentingNewLine]",
RowBox[{"Coefficient", "[",
RowBox[{
RowBox[{
RowBox[{
SqrtBox["2"], " ", "C1", " ", "C2", " ",
RowBox[{"(",
RowBox[{
RowBox[{"-", "\[Mu]1"}], "+", "\[Mu]2"}], ")"}]}], "+",
RowBox[{
SuperscriptBox["C3", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2"}], ")"}]}], "+",
RowBox[{
SuperscriptBox["C2", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]3", "+", "\[Mu]4"}], ")"}]}], "+",
RowBox[{
FractionBox["1", "2"], " ",
SuperscriptBox["C1", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2", "+", "\[Mu]3", "+", "\[Mu]4"}],
")"}]}]}], ",",
RowBox[{"{",
RowBox[{"\[Mu]1", ",", "\[Mu]2", ",", "\[Mu]3", ",", "\[Mu]4"}], "}"}]}],
"]"}]}], "Input",
CellChangeTimes->{{3.8242689910491424`*^9, 3.824269016527527*^9}, {
3.8243513056247673`*^9, 3.8243513259450817`*^9}, 3.8255367596849804`*^9, {
3.829355500549836*^9, 3.829355512636507*^9}, {3.882846411585355*^9,
3.882846422629965*^9}, 3.882846456415292*^9},
CellLabel->"In[9]:=",ExpressionUUID->"68ff4f02-7dd3-42c7-96e7-4d75330ec3b6"],
Cell[BoxData[
RowBox[{"{", "\<\"\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"5\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"1\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"4\\\"],FontColor->RGBColor[1, 0, 0]]\\)\"\>", "}"}]], "Output",
CellChangeTimes->{3.824269023120822*^9, 3.8243513639347105`*^9,
3.8255367686262565`*^9, 3.82935551352403*^9, 3.882846527280534*^9},
CellLabel->"Out[9]=",ExpressionUUID->"ead6aa3d-1270-4ee0-844d-fb14325fa0c1"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{
FractionBox[
SuperscriptBox["C1", "2"], "2"], "-",
RowBox[{
SqrtBox["2"], " ", "C1", " ", "C2"}], "+",
SuperscriptBox["C3", "2"]}], ",",
RowBox[{
FractionBox[
SuperscriptBox["C1", "2"], "2"], "+",
RowBox[{
SqrtBox["2"], " ", "C1", " ", "C2"}], "+",
SuperscriptBox["C3", "2"]}], ",",
RowBox[{
FractionBox[
SuperscriptBox["C1", "2"], "2"], "+",
SuperscriptBox["C2", "2"]}], ",",
RowBox[{
FractionBox[
SuperscriptBox["C1", "2"], "2"], "+",
SuperscriptBox["C2", "2"]}]}], "}"}]], "Output",
CellChangeTimes->{3.824269023120822*^9, 3.8243513639347105`*^9,
3.8255367686262565`*^9, 3.82935551352403*^9, 3.8828465272812843`*^9},
CellLabel->"Out[10]=",ExpressionUUID->"d5828c1f-526a-4761-b0c2-d2cca93150d9"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"{",
"\"\<\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"2\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \"2\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, \
0]]\)\!\(\*StyleBox[StyleBox[RowBox[{\" \", \" \"}]],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"2\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \"4\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"1\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"5\"],FontColor->RGBColor[1, 0, 0]]\)\>\"", "}"}], "\[IndentingNewLine]",
RowBox[{"Coefficient", "[",
RowBox[{
RowBox[{
RowBox[{
SuperscriptBox["C2", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2"}], ")"}]}], "+",
RowBox[{
SqrtBox["2"], " ", "C1", " ", "C2", " ",
RowBox[{"(",
RowBox[{"\[Mu]3", "-", "\[Mu]4"}], ")"}]}], "+",
RowBox[{
SuperscriptBox["C3", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]3", "+", "\[Mu]4"}], ")"}]}], "+",
RowBox[{
FractionBox["1", "2"], " ",
SuperscriptBox["C1", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2", "+", "\[Mu]3", "+", "\[Mu]4"}],
")"}]}]}], ",",
RowBox[{"{",
RowBox[{"\[Mu]1", ",", "\[Mu]2", ",", "\[Mu]3", ",", "\[Mu]4"}], "}"}]}],
"]"}]}], "Input",
CellChangeTimes->{{3.8242688586504354`*^9, 3.8242689728896575`*^9}, {
3.8243512948248177`*^9, 3.824351302504921*^9}, 3.825536755155237*^9, {
3.829355452531418*^9, 3.8293554882002525`*^9}, {3.882846499423359*^9,
3.8828465188422613`*^9}},
CellLabel->"In[11]:=",ExpressionUUID->"1b01b2aa-a368-47f2-9c6f-cf7eee24e8a9"],
Cell[BoxData[
RowBox[{"{", "\<\"\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[StyleBox[RowBox[{\\\" \\\", \\\" \
\\\"}]],FontColor->RGBColor[1, 0, 0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\
\[Phi]\\\", \\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"4\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"1\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"5\\\"],FontColor->RGBColor[1, 0, 0]]\\)\"\>", "}"}]], "Output",
CellChangeTimes->{3.8242689734831467`*^9, 3.8243513616043887`*^9,
3.825536766752127*^9, 3.829355495437306*^9, 3.882846528820449*^9},
CellLabel->"Out[11]=",ExpressionUUID->"25b59737-e49b-41f4-b7d8-f086b74964ea"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{
FractionBox[
SuperscriptBox["C1", "2"], "2"], "+",
SuperscriptBox["C2", "2"]}], ",",
RowBox[{
FractionBox[
SuperscriptBox["C1", "2"], "2"], "+",
SuperscriptBox["C2", "2"]}], ",",
RowBox[{
FractionBox[
SuperscriptBox["C1", "2"], "2"], "+",
RowBox[{
SqrtBox["2"], " ", "C1", " ", "C2"}], "+",
SuperscriptBox["C3", "2"]}], ",",
RowBox[{
FractionBox[
SuperscriptBox["C1", "2"], "2"], "-",
RowBox[{
SqrtBox["2"], " ", "C1", " ", "C2"}], "+",
SuperscriptBox["C3", "2"]}]}], "}"}]], "Output",
CellChangeTimes->{3.8242689734831467`*^9, 3.8243513616043887`*^9,
3.825536766752127*^9, 3.829355495437306*^9, 3.882846528821327*^9},
CellLabel->"Out[12]=",ExpressionUUID->"79d26446-5e72-4e26-952e-f2acc535be0f"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"{",
"\"\<\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"1\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \"2\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"1\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"4\"],FontColor->RGBColor[1, 0, \
0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"2\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"5\"],FontColor->RGBColor[1, 0, 0]]\)\>\"", "}"}], "\[IndentingNewLine]",
RowBox[{"Coefficient", "[",
RowBox[{
RowBox[{
RowBox[{
SuperscriptBox["C2", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2"}], ")"}]}], "+",
RowBox[{
SqrtBox["2"], " ", "C1", " ", "C2", " ",
RowBox[{"(",
RowBox[{"\[Mu]3", "-", "\[Mu]4"}], ")"}]}], "+",
RowBox[{
SuperscriptBox["C3", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]3", "+", "\[Mu]4"}], ")"}]}], "+",
RowBox[{
FractionBox["1", "2"], " ",
SuperscriptBox["C1", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2", "+", "\[Mu]3", "+", "\[Mu]4"}],
")"}]}]}], ",",
RowBox[{"{",
RowBox[{"\[Mu]1", ",", "\[Mu]2", ",", "\[Mu]3", ",", "\[Mu]4"}], "}"}]}],
"]"}]}], "Input",
CellChangeTimes->{{3.8242688586504354`*^9, 3.8242689728896575`*^9}, {
3.8243512948248177`*^9, 3.824351302504921*^9}, 3.825536755155237*^9, {
3.829355452531418*^9, 3.8293554882002525`*^9}, {3.88284654047738*^9,
3.882846564547917*^9}},
CellLabel->"In[13]:=",ExpressionUUID->"2d09ec0d-38a5-4a60-b37e-842134b4befe"],
Cell[BoxData[
RowBox[{"{", "\<\"\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"1\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"1\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"4\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"5\\\"],FontColor->RGBColor[1, 0, 0]]\\)\"\>", "}"}]], "Output",
CellChangeTimes->{3.8242689734831467`*^9, 3.8243513616043887`*^9,
3.825536766752127*^9, 3.829355495437306*^9, 3.88284656630455*^9},
CellLabel->"Out[13]=",ExpressionUUID->"abbdc376-9584-4dd4-9a70-17d60a7c0c3c"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{
FractionBox[
SuperscriptBox["C1", "2"], "2"], "+",
SuperscriptBox["C2", "2"]}], ",",
RowBox[{
FractionBox[
SuperscriptBox["C1", "2"], "2"], "+",
SuperscriptBox["C2", "2"]}], ",",
RowBox[{
FractionBox[
SuperscriptBox["C1", "2"], "2"], "+",
RowBox[{
SqrtBox["2"], " ", "C1", " ", "C2"}], "+",
SuperscriptBox["C3", "2"]}], ",",
RowBox[{
FractionBox[
SuperscriptBox["C1", "2"], "2"], "-",
RowBox[{
SqrtBox["2"], " ", "C1", " ", "C2"}], "+",
SuperscriptBox["C3", "2"]}]}], "}"}]], "Output",
CellChangeTimes->{3.8242689734831467`*^9, 3.8243513616043887`*^9,
3.825536766752127*^9, 3.829355495437306*^9, 3.882846566305387*^9},
CellLabel->"Out[14]=",ExpressionUUID->"729be834-626a-4e79-84ce-40a6f5c96b8b"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"{",
"\"\<\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"2\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \"3\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"2\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"6\"],FontColor->RGBColor[1, 0, \
0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"1\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"3\"],FontColor->RGBColor[1, 0, \
0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, \
0]]\)\!\(\*StyleBox[StyleBox[RowBox[{\" \", \" \"}]],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"1\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \"6\"],FontColor->RGBColor[1, \
0, 0]]\)\>\"", "}"}], "\[IndentingNewLine]",
RowBox[{"Coefficient", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"\[Mu]1", ",", "\[Mu]2", ",", "\[Mu]3", ",", "\[Mu]4"}], "}"}]}],
"]"}]}], "Input",
CellChangeTimes->{{3.8296830053321733`*^9, 3.829683010417119*^9}, {
3.829686835390308*^9, 3.8296868510375237`*^9}, {3.829686890037814*^9,
3.8296869107459507`*^9}, {3.829687019050123*^9, 3.8296870446794777`*^9}, {
3.829687136873195*^9, 3.8296871394600096`*^9}, {3.829687239166437*^9,
3.829687285298743*^9}, {3.829689610535884*^9, 3.8296896128038883`*^9}, {
3.8296896440603294`*^9, 3.829689675004239*^9}, {3.882846606394417*^9,
3.882846653278678*^9}, 3.882846691129651*^9},
CellLabel->"In[15]:=",ExpressionUUID->"9044111f-dddd-4c09-9ed4-cf41fb6d4cae"],
Cell[BoxData[
RowBox[{"{", "\<\"\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"3\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"6\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"1\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"3\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[StyleBox[RowBox[{\\\" \\\", \\\" \
\\\"}]],FontColor->RGBColor[1, 0, 0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\
\[Phi]\\\", \\\"1\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"6\\\"],FontColor->RGBColor[1, 0, 0]]\\)\"\>", "}"}]], "Output",
CellChangeTimes->{3.829692574009721*^9, 3.882846691687429*^9},
CellLabel->"Out[15]=",ExpressionUUID->"ee7a637d-ef00-49ca-b3e9-f4212fa12798"],
Cell[BoxData[
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0", ",", "0"}], "}"}]], "Output",
CellChangeTimes->{3.829692574009721*^9, 3.882846691688283*^9},
CellLabel->"Out[16]=",ExpressionUUID->"fed9de7f-2117-4e4d-99e8-9e5c3bf764c1"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"{",
"\"\<\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"2\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \"2\"],FontColor->RGBColor[1, \
0, 0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"2\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"4\"],FontColor->RGBColor[1, 0, \
0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"2\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"5\"],FontColor->RGBColor[1, 0, \
0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"1\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"2\"],FontColor->RGBColor[1, 0, \
0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"1\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"4\"],FontColor->RGBColor[1, 0, \
0]]\)\!\(\*StyleBox[\",\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[\" \
\",FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Phi]\", \"1\
\"],FontColor->RGBColor[1, 0, 0]]\)\!\(\*StyleBox[SubscriptBox[\"\[Chi]\", \
\"5\"],FontColor->RGBColor[1, 0, 0]]\)\>\"", "}"}], "\[IndentingNewLine]",
RowBox[{"Coefficient", "[",
RowBox[{
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"2", " ",
SuperscriptBox["C2", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2"}], ")"}]}], "+",
RowBox[{
SuperscriptBox["C1", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2", "+", "\[Mu]3", "+", "\[Mu]4"}],
")"}]}], "+",
RowBox[{
SuperscriptBox["C3", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"3", " ", "\[Mu]1"}], "-",
RowBox[{"2", " ",
SqrtBox["2"], " ", "\[Mu]1"}], "+",
RowBox[{"3", " ", "\[Mu]2"}], "+",
RowBox[{"2", " ",
SqrtBox["2"], " ", "\[Mu]2"}], "+",
RowBox[{"5", " ", "\[Mu]3"}], "+",
RowBox[{"2", " ",
SqrtBox["2"], " ", "\[Mu]3"}], "+",
RowBox[{"5", " ", "\[Mu]4"}], "-",
RowBox[{"2", " ",
SqrtBox["2"], " ", "\[Mu]4"}]}], ")"}]}], "-",
RowBox[{"2", " ",
SqrtBox["2"], " ", "C1", " ",
RowBox[{"(",
RowBox[{
RowBox[{"C3", " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "-", "\[Mu]2"}], ")"}]}], "+",
RowBox[{"C2", " ",
RowBox[{"(",
RowBox[{
RowBox[{"-", "\[Mu]3"}], "+", "\[Mu]4"}], ")"}]}]}], ")"}]}]}],
")"}]}], ",",
RowBox[{"{",
RowBox[{"\[Mu]1", ",", "\[Mu]2", ",", "\[Mu]3", ",", "\[Mu]4"}], "}"}]}],
"]"}]}], "Input",
CellChangeTimes->{{3.8296830053321733`*^9, 3.829683010417119*^9}, {
3.829686835390308*^9, 3.8296868510375237`*^9}, {3.829686890037814*^9,
3.8296869107459507`*^9}, {3.829687019050123*^9, 3.8296870446794777`*^9}, {
3.829687136873195*^9, 3.8296871394600096`*^9}, {3.829687239166437*^9,
3.829687285298743*^9}, {3.829689610535884*^9, 3.8296896128038883`*^9}, {
3.8296896440603294`*^9, 3.829689675004239*^9}, {3.8828467016405163`*^9,
3.882846726777179*^9}, 3.8828467757009573`*^9},
CellLabel->"In[17]:=",ExpressionUUID->"17b5ef20-d34b-4a84-842b-4bee8b416bd6"],
Cell[BoxData[
RowBox[{"{", "\<\"\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"4\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"5\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"1\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"2\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"1\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"4\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\",\\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[\\\" \\\",FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Phi]\\\", \
\\\"1\\\"],FontColor->RGBColor[1, 0, \
0]]\\)\\!\\(\\*StyleBox[SubscriptBox[\\\"\[Chi]\\\", \
\\\"5\\\"],FontColor->RGBColor[1, 0, 0]]\\)\"\>", "}"}]], "Output",
CellChangeTimes->{3.829692574009721*^9, 3.882846777495654*^9},
CellLabel->"Out[17]=",ExpressionUUID->"f7b6a722-a70f-40f0-90a9-6858edabd96f"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["C1", "2"], "+",
RowBox[{"2", " ",
SuperscriptBox["C2", "2"]}], "-",
RowBox[{"2", " ",
SqrtBox["2"], " ", "C1", " ", "C3"}], "+",
RowBox[{"3", " ",
SuperscriptBox["C3", "2"]}], "-",
RowBox[{"2", " ",
SqrtBox["2"], " ",
SuperscriptBox["C3", "2"]}]}], ")"}]}], ",",
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["C1", "2"], "+",
RowBox[{"2", " ",
SuperscriptBox["C2", "2"]}], "+",
RowBox[{"2", " ",
SqrtBox["2"], " ", "C1", " ", "C3"}], "+",
RowBox[{"3", " ",
SuperscriptBox["C3", "2"]}], "+",
RowBox[{"2", " ",
SqrtBox["2"], " ",
SuperscriptBox["C3", "2"]}]}], ")"}]}], ",",
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["C1", "2"], "+",
RowBox[{"2", " ",
SqrtBox["2"], " ", "C1", " ", "C2"}], "+",
RowBox[{"5", " ",
SuperscriptBox["C3", "2"]}], "+",
RowBox[{"2", " ",
SqrtBox["2"], " ",
SuperscriptBox["C3", "2"]}]}], ")"}]}], ",",
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
SuperscriptBox["C1", "2"], "-",
RowBox[{"2", " ",
SqrtBox["2"], " ", "C1", " ", "C2"}], "+",
RowBox[{"5", " ",
SuperscriptBox["C3", "2"]}], "-",
RowBox[{"2", " ",
SqrtBox["2"], " ",
SuperscriptBox["C3", "2"]}]}], ")"}]}]}], "}"}]], "Output",
CellChangeTimes->{3.829692574009721*^9, 3.882846777497732*^9},
CellLabel->"Out[18]=",ExpressionUUID->"28849666-5c8e-424a-a21e-e44336362592"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Pentaquark with versatile wavefunctions", "Section",
CellChangeTimes->{{3.8243239448415504`*^9, 3.8243239701441855`*^9}, {
3.86662551391595*^9, 3.86662551632959*^9}, {3.8666260088551607`*^9,
3.866626016118394*^9}, {3.8964758731559153`*^9,
3.896475873536003*^9}},ExpressionUUID->"887dc0fd-082b-412a-a5da-\
65d8238082e1"],
Cell[CellGroupData[{
Cell[BoxData[
SuperscriptBox[
StyleBox[
SubscriptBox["\[Psi]", "3"], "Subsection"], "*"]], "Subsection",
CellChangeTimes->{{3.867896177072421*^9, 3.867896190762278*^9},
3.869353244175023*^9},ExpressionUUID->"cf08ac22-0c84-41bb-bfd4-\
3ca64af2ea7b"],
Cell[BoxData[
RowBox[{"Coefficient", "[",
RowBox[{
RowBox[{
"\[Mu]1", "+", "\[Mu]2", "+", "\[Mu]3", "+", "\[Mu]4", "+", "\[Mu]5"}],
",",
RowBox[{"{",
RowBox[{
"\[Mu]1", ",", "\[Mu]2", ",", "\[Mu]3", ",", "\[Mu]4", ",", "\[Mu]5"}],
"}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.87042562510778*^9, 3.870425625111623*^9}, {
3.883123513199061*^9, 3.883123521109001*^9},
3.8831238123786077`*^9},ExpressionUUID->"cfc61b6c-6c94-4e62-8f9c-\
8a28275dd4c7"]
}, Closed]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
StyleBox[
RowBox[{
SubscriptBox["\[Psi]", "1"], "'"}], "Subsection"], ",",
StyleBox[
RowBox[{
SubscriptBox["\[Psi]", "3"], "'"}], "Subsection"], ",",
StyleBox[
RowBox[{
SubscriptBox["\[Psi]", "11"], "'"}], "Subsection"]}]], "Subsection",
CellChangeTimes->{{3.8678944876863413`*^9, 3.867894491195648*^9},
3.867894553755221*^9, {3.867896449055201*^9, 3.867896453644582*^9}, {
3.8693532673926973`*^9, 3.86935326912281*^9}, {3.872124688469337*^9,
3.872124689325653*^9}, {3.872124749623217*^9,
3.8721247623768377`*^9}},ExpressionUUID->"185f0dc1-946c-4cdc-8f0f-\
b7ad6a0bb31a"],
Cell[BoxData[
RowBox[{"Coefficient", "[",
RowBox[{
RowBox[{
FractionBox["1", "30"], " ",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"-", "2"}], " ",
SqrtBox["10"], " ", "C2", " ", "C3", " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2", "+", "\[Mu]3", "-",
RowBox[{"3", " ", "\[Mu]4"}]}], ")"}]}], "+",
RowBox[{"2", " ", "C1", " ",
RowBox[{"(",
RowBox[{
RowBox[{"5", " ",
SqrtBox["2"], " ", "C2"}], "-",
RowBox[{
SqrtBox["5"], " ", "C3"}]}], ")"}], " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2", "+", "\[Mu]3", "-",
RowBox[{"3", " ", "\[Mu]4"}]}], ")"}]}], "+",
RowBox[{"9", " ",
SuperscriptBox["C3", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"3", " ", "\[Mu]1"}], "+",
RowBox[{"3", " ", "\[Mu]2"}], "+",
RowBox[{"3", " ", "\[Mu]3"}], "+",
RowBox[{"3", " ", "\[Mu]4"}], "-",
RowBox[{"2", " ", "\[Mu]5"}]}], ")"}]}], "+",
RowBox[{"15", " ",
SuperscriptBox["C1", "2"], " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2", "+", "\[Mu]3", "+", "\[Mu]4", "+",
RowBox[{"2", " ", "\[Mu]5"}]}], ")"}]}], "+",
RowBox[{"10", " ",
SuperscriptBox["C2", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"2", " ", "\[Mu]1"}], "+",
RowBox[{"2", " ", "\[Mu]2"}], "+",
RowBox[{"2", " ", "\[Mu]3"}], "+",
RowBox[{"3", " ", "\[Mu]5"}]}], ")"}]}]}], ")"}]}], ",",
RowBox[{"{",
RowBox[{
"\[Mu]1", ",", "\[Mu]2", ",", "\[Mu]3", ",", "\[Mu]4", ",", "\[Mu]5"}],
"}"}]}], "]"}]], "Input",
CellChangeTimes->{
3.870425606624295*^9, {3.870677760899171*^9, 3.870677761134053*^9},
3.883123528614952*^9,
3.883124075542639*^9},ExpressionUUID->"be2327de-3a98-4c85-b6f6-\
7d44ba4e3618"]
}, Closed]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
StyleBox[
SubscriptBox["\[Psi]", "1"], "Subsection"], ",",
StyleBox[
SubscriptBox["\[Psi]", "3"], "Subsection"], ",",
StyleBox[
SubscriptBox["\[Psi]", "11"], "Subsection"]}]], "Subsection",
CellChangeTimes->{{3.8678944876863413`*^9, 3.867894491195648*^9},
3.867894553755221*^9, {3.8678948309006023`*^9, 3.867894834468341*^9}, {
3.867896456688156*^9, 3.867896457990939*^9}, {3.869353272079487*^9,
3.869353275366868*^9}, {3.872124780147195*^9,
3.872124786518114*^9}},ExpressionUUID->"43788b8b-5e22-4ac9-9807-\
160c8a03056e"],
Cell[BoxData[
RowBox[{"Coefficient", "[",
RowBox[{
RowBox[{
FractionBox["1", "9"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"2", " ",
SqrtBox["2"], " ", "C1", " ",
RowBox[{"(",
RowBox[{"C2", "-", "C3"}], ")"}], " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2", "+", "\[Mu]3", "-",
RowBox[{"3", " ", "\[Mu]4"}]}], ")"}]}], "+",
RowBox[{"2", " ", "C2", " ", "C3", " ",
RowBox[{"(",
RowBox[{"\[Mu]1", "+", "\[Mu]2", "+", "\[Mu]3", "-",
RowBox[{"3", " ", "\[Mu]4"}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["C2", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"4", " ", "\[Mu]1"}], "+",
RowBox[{"4", " ", "\[Mu]2"}], "+",
RowBox[{"4", " ", "\[Mu]3"}], "-",
RowBox[{"3", " ", "\[Mu]5"}]}], ")"}]}], "+",
RowBox[{"3", " ",
SuperscriptBox["C1", "2"], " ",
RowBox[{"(",
RowBox[{
"\[Mu]1", "+", "\[Mu]2", "+", "\[Mu]3", "+", "\[Mu]4", "-",
"\[Mu]5"}], ")"}]}], "+",
RowBox[{"9", " ",
SuperscriptBox["C3", "2"], " ", "\[Mu]5"}]}], ")"}]}], ",",
RowBox[{"{",
RowBox[{
"\[Mu]1", ",", "\[Mu]2", ",", "\[Mu]3", ",", "\[Mu]4", ",", "\[Mu]5"}],
"}"}]}], "]"}]], "Input",
CellChangeTimes->{
3.870425511381465*^9, {3.870677869789233*^9, 3.8706778702042837`*^9},
3.88312355334988*^9,
3.883124250833695*^9},ExpressionUUID->"4ee99e62-dc69-4af2-9942-\
59270da0b67b"]
}, Closed]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
SqrtBox[
FractionBox["2", "3"]],
SuperscriptBox[
StyleBox[
SubscriptBox["\[Psi]", "2"], "Subsection"], "*"]}], "-",
RowBox[{
SqrtBox[
FractionBox["1", "3"]],
SuperscriptBox[
StyleBox[
SubscriptBox["\[Psi]", "3"], "Subsection"], "*"]}]}]], "Subsection",
CellChangeTimes->{{3.867896177072421*^9, 3.867896190762278*^9}, {
3.8678963096948643`*^9, 3.867896315553927*^9}, {3.8678963919713697`*^9,
3.8678963966533537`*^9}, {3.869354032681427*^9,
3.869354037499555*^9}},ExpressionUUID->"047ba0a8-2ca7-4b61-a757-\
e88af433d6d1"],
Cell[BoxData[
RowBox[{"Coefficient", "[",
RowBox[{
RowBox[{
"\[Mu]1", "+", "\[Mu]2", "+", "\[Mu]3", "+", "\[Mu]4", "+", "\[Mu]5"}],
",",
RowBox[{"{",
RowBox[{
"\[Mu]1", ",", "\[Mu]2", ",", "\[Mu]3", ",", "\[Mu]4", ",", "\[Mu]5"}],
"}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.87042537486652*^9, 3.870425374871274*^9},
3.883123559350134*^9,
3.883124300239616*^9},ExpressionUUID->"2a792209-7440-493c-a649-\
125fde3876e7"]
}, Closed]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["\[Psi]", "1"], "'"}], ",", " ",
RowBox[{
RowBox[{
SqrtBox[
FractionBox["2", "3"]],
StyleBox[
RowBox[{
SubscriptBox["\[Psi]", "4"], "'"}], "Subsection"]}], "-",
RowBox[{
SqrtBox[
FractionBox["1", "3"]],
StyleBox[
RowBox[{
SubscriptBox["\[Psi]", "3"], "'"}], "Subsection"]}]}],
StyleBox[",", "Subsection"],
StyleBox[" ", "Subsection"],
StyleBox[
RowBox[{
SubscriptBox["\[Psi]", "6"], "'"}], "Subsection"],
StyleBox[",", "Subsection"],
StyleBox[" ", "Subsection"],
RowBox[{
RowBox[{
SqrtBox[
FractionBox["2", "3"]],
StyleBox[
RowBox[{
SubscriptBox["\[Psi]", "12"], "'"}], "Subsection"]}], "-",
RowBox[{
SqrtBox[
FractionBox["1", "3"]],
StyleBox[
RowBox[{
SubscriptBox["\[Psi]", "11"], "'"}], "Subsection"]}]}]}]], "Subsection",\
CellChangeTimes->{{3.867896177072421*^9, 3.867896190762278*^9}, {
3.8678963096948643`*^9, 3.867896315553927*^9}, {3.8678963919713697`*^9,
3.8678963966533537`*^9}, {3.867896830199946*^9, 3.867896876175119*^9}, {