Skip to content

Commit

Permalink
extract 3L anomalous dimensions of superfields in the MSSM
Browse files Browse the repository at this point in the history
  • Loading branch information
Alexander Voigt authored and Alexander Voigt committed Dec 3, 2015
1 parent 63485a7 commit cbc5170
Show file tree
Hide file tree
Showing 8 changed files with 339 additions and 0 deletions.
8 changes: 8 additions & 0 deletions meta/ThreeLoopMSSM/extract_MSSM_beta_functions_from_hep-ph-0308231.m
View file
Expand Up @@ -95,3 +95,11 @@
{betaM21 , betaM22 , betaM23 } //. repl >> "beta_M2.m";
{betaM31 , betaM32 , betaM33 } //. repl >> "beta_M3.m";
{betaMu1 , betaMu2 , betaMu3 } //. repl >> "beta_Mu.m";

{gammaQ1 , gammaQ2 , gammaQ3 } //. repl >> "gamma_SqL.m";
{gammat1 , gammat2 , gammat3 } //. repl >> "gamma_SuR.m";
{gammab1 , gammab2 , gammab3 } //. repl >> "gamma_SdR.m";
{gammaL1 , gammaL2 , gammaL3 } //. repl >> "gamma_SlL.m";
{gammatau1, gammatau2, gammatau3} //. repl >> "gamma_SeR.m";
{gammaH11 , gammaH12 , gammaH13 } //. repl >> "gamma_SHd.m";
{gammaH21 , gammaH22 , gammaH23 } //. repl >> "gamma_SHu.m";
45 changes: 45 additions & 0 deletions meta/ThreeLoopMSSM/gamma_SHd.m
View file
@@ -0,0 +1,45 @@
{(-3*g1^2)/10 - (3*g2^2)/2 + 3*trace[Adj[Yb], Yb] + trace[Adj[Ye], Ye],
(207*g1^4)/100 + (9*g1^2*g2^2)/10 + (15*g2^4)/4 -
(2*g1^2*trace[Adj[Yb], Yb])/5 + 16*g3^2*trace[Adj[Yb], Yb] +
(6*g1^2*trace[Adj[Ye], Ye])/5 - 9*trace[Adj[Yb], Yb, Adj[Yb], Yb] -
3*trace[Adj[Ye], Ye, Adj[Ye], Ye] - 3*trace[Adj[Yt], Yt, Adj[Yb], Yb],
(1839*g1^6)/100 + (27*g1^4*g2^2)/100 + (9*g1^2*g2^4)/4 + (345*g2^6)/4 +
(66*g1^4*g3^2)/5 + 90*g2^4*g3^2 - (175*g1^4*trace[Adj[Yb], Yb])/12 -
(3*g1^2*g2^2*trace[Adj[Yb], Yb])/10 - (225*g2^4*trace[Adj[Yb], Yb])/4 -
(284*g1^2*g3^2*trace[Adj[Yb], Yb])/15 - 132*g2^2*g3^2*trace[Adj[Yb], Yb] -
(160*g3^4*trace[Adj[Yb], Yb])/3 - (603*g1^4*trace[Adj[Ye], Ye])/20 -
(81*g1^2*g2^2*trace[Adj[Ye], Ye])/10 - (75*g2^4*trace[Adj[Ye], Ye])/4 -
(39*g1^4*trace[Adj[Yt], Yt])/10 - (45*g2^4*trace[Adj[Yt], Yt])/2 +
3*g1^2*trace[Adj[Yb], Yb, Adj[Yb], Yb] +
9*g2^2*trace[Adj[Yb], Yb, Adj[Yb], Yb] +
72*g3^2*trace[Adj[Yb], Yb, Adj[Yb], Yb] + 54*trace[Adj[Yb], Yb]*
trace[Adj[Yb], Yb, Adj[Yb], Yb] + 18*trace[Adj[Ye], Ye]*
trace[Adj[Yb], Yb, Adj[Yb], Yb] + 9*g1^2*trace[Adj[Ye], Ye, Adj[Ye], Ye] +
3*g2^2*trace[Adj[Ye], Ye, Adj[Ye], Ye] + 18*trace[Adj[Yb], Yb]*
trace[Adj[Ye], Ye, Adj[Ye], Ye] + 6*trace[Adj[Ye], Ye]*
trace[Adj[Ye], Ye, Adj[Ye], Ye] -
(12*g1^2*trace[Adj[Yt], Yt, Adj[Yb], Yb])/5 +
18*g2^2*trace[Adj[Yt], Yt, Adj[Yb], Yb] +
24*g3^2*trace[Adj[Yt], Yt, Adj[Yb], Yb] + 18*trace[Adj[Yt], Yt]*
trace[Adj[Yt], Yt, Adj[Yb], Yb] +
3*trace[Adj[Yb], Yb, Adj[Yb], Yb, Adj[Yb], Yb] +
trace[Adj[Ye], Ye, Adj[Ye], Ye, Adj[Ye], Ye] +
9*trace[Adj[Yt], Yt, Adj[Yt], Yt, Adj[Yb], Yb] - (1791*g1^6*Zeta[3])/250 -
(243*g1^4*g2^2*Zeta[3])/50 - (81*g1^2*g2^4*Zeta[3])/10 +
(315*g2^6*Zeta[3])/2 - (396*g1^4*g3^2*Zeta[3])/25 - 108*g2^4*g3^2*Zeta[3] -
(77*g1^4*trace[Adj[Yb], Yb]*Zeta[3])/50 - 9*g1^2*g2^2*trace[Adj[Yb], Yb]*
Zeta[3] - (189*g2^4*trace[Adj[Yb], Yb]*Zeta[3])/2 +
(112*g1^2*g3^2*trace[Adj[Yb], Yb]*Zeta[3])/5 +
144*g2^2*g3^2*trace[Adj[Yb], Yb]*Zeta[3] - 16*g3^4*trace[Adj[Yb], Yb]*
Zeta[3] + (81*g1^4*trace[Adj[Ye], Ye]*Zeta[3])/50 +
(81*g1^2*g2^2*trace[Adj[Ye], Ye]*Zeta[3])/5 -
(63*g2^4*trace[Adj[Ye], Ye]*Zeta[3])/2 +
(54*g1^2*trace[Adj[Yb], Yb, Adj[Yb], Yb]*Zeta[3])/5 +
54*g2^2*trace[Adj[Yb], Yb, Adj[Yb], Yb]*Zeta[3] -
144*g3^2*trace[Adj[Yb], Yb, Adj[Yb], Yb]*Zeta[3] -
(54*g1^2*trace[Adj[Ye], Ye, Adj[Ye], Ye]*Zeta[3])/5 +
18*g2^2*trace[Adj[Ye], Ye, Adj[Ye], Ye]*Zeta[3] +
(42*g1^2*trace[Adj[Yt], Yt, Adj[Yb], Yb]*Zeta[3])/5 -
48*g3^2*trace[Adj[Yt], Yt, Adj[Yb], Yb]*Zeta[3] +
18*trace[Adj[Yb], Yb, Adj[Yb], Yb, Adj[Yb], Yb]*Zeta[3] +
6*trace[Adj[Ye], Ye, Adj[Ye], Ye, Adj[Ye], Ye]*Zeta[3]}
34 changes: 34 additions & 0 deletions meta/ThreeLoopMSSM/gamma_SHu.m
View file
@@ -0,0 +1,34 @@
{(-3*g1^2)/10 - (3*g2^2)/2 + 3*trace[Adj[Yt], Yt],
(207*g1^4)/100 + (9*g1^2*g2^2)/10 + (15*g2^4)/4 +
(4*g1^2*trace[Adj[Yt], Yt])/5 + 16*g3^2*trace[Adj[Yt], Yt] -
3*trace[Adj[Yt], Yt, Adj[Yb], Yb] - 9*trace[Adj[Yt], Yt, Adj[Yt], Yt],
(1839*g1^6)/100 + (27*g1^4*g2^2)/100 + (9*g1^2*g2^4)/4 + (345*g2^6)/4 +
(66*g1^4*g3^2)/5 + 90*g2^4*g3^2 - (21*g1^4*trace[Adj[Yb], Yb])/10 -
(45*g2^4*trace[Adj[Yb], Yb])/2 - (27*g1^4*trace[Adj[Ye], Ye])/10 -
(15*g2^4*trace[Adj[Ye], Ye])/2 - (2123*g1^4*trace[Adj[Yt], Yt])/60 -
(57*g1^2*g2^2*trace[Adj[Yt], Yt])/10 - (225*g2^4*trace[Adj[Yt], Yt])/4 -
(124*g1^2*g3^2*trace[Adj[Yt], Yt])/3 - 132*g2^2*g3^2*trace[Adj[Yt], Yt] -
(160*g3^4*trace[Adj[Yt], Yt])/3 + (6*g1^2*trace[Adj[Yt], Yt, Adj[Yb], Yb])/
5 + 18*g2^2*trace[Adj[Yt], Yt, Adj[Yb], Yb] +
24*g3^2*trace[Adj[Yt], Yt, Adj[Yb], Yb] + 18*trace[Adj[Yb], Yb]*
trace[Adj[Yt], Yt, Adj[Yb], Yb] + 6*trace[Adj[Ye], Ye]*
trace[Adj[Yt], Yt, Adj[Yb], Yb] +
(57*g1^2*trace[Adj[Yt], Yt, Adj[Yt], Yt])/5 +
9*g2^2*trace[Adj[Yt], Yt, Adj[Yt], Yt] +
72*g3^2*trace[Adj[Yt], Yt, Adj[Yt], Yt] + 54*trace[Adj[Yt], Yt]*
trace[Adj[Yt], Yt, Adj[Yt], Yt] +
9*trace[Adj[Yb], Yb, Adj[Yt], Yt, Adj[Yb], Yb] +
3*trace[Adj[Yt], Yt, Adj[Yt], Yt, Adj[Yt], Yt] - (1791*g1^6*Zeta[3])/250 -
(243*g1^4*g2^2*Zeta[3])/50 - (81*g1^2*g2^4*Zeta[3])/10 +
(315*g2^6*Zeta[3])/2 - (396*g1^4*g3^2*Zeta[3])/25 - 108*g2^4*g3^2*Zeta[3] -
(13*g1^4*trace[Adj[Yt], Yt]*Zeta[3])/10 +
(63*g1^2*g2^2*trace[Adj[Yt], Yt]*Zeta[3])/5 -
(189*g2^4*trace[Adj[Yt], Yt]*Zeta[3])/2 +
(208*g1^2*g3^2*trace[Adj[Yt], Yt]*Zeta[3])/5 +
144*g2^2*g3^2*trace[Adj[Yt], Yt]*Zeta[3] - 16*g3^4*trace[Adj[Yt], Yt]*
Zeta[3] + (6*g1^2*trace[Adj[Yt], Yt, Adj[Yb], Yb]*Zeta[3])/5 -
48*g3^2*trace[Adj[Yt], Yt, Adj[Yb], Yb]*Zeta[3] -
(18*g1^2*trace[Adj[Yt], Yt, Adj[Yt], Yt]*Zeta[3])/5 +
54*g2^2*trace[Adj[Yt], Yt, Adj[Yt], Yt]*Zeta[3] -
144*g3^2*trace[Adj[Yt], Yt, Adj[Yt], Yt]*Zeta[3] +
18*trace[Adj[Yt], Yt, Adj[Yt], Yt, Adj[Yt], Yt]*Zeta[3]}
57 changes: 57 additions & 0 deletions meta/ThreeLoopMSSM/gamma_SdR.m
View file
@@ -0,0 +1,57 @@
{(-2*g1^2)/15 - (8*g3^2)/3 + 2*MatMul[Yb, Adj[Yb]],
(202*g1^4)/225 + (32*g1^2*g3^2)/45 - (8*g3^4)/9 +
(2*g1^2*MatMul[Yb, Adj[Yb]])/5 + 6*g2^2*MatMul[Yb, Adj[Yb]] -
2*MatMul[Yb, Adj[Yb], Yb, Adj[Yb]] - 2*MatMul[Yb, Adj[Yt], Yt, Adj[Yb]] -
6*MatMul[Yb, Adj[Yb]]*trace[Adj[Yb], Yb] - 2*MatMul[Yb, Adj[Yb]]*
trace[Adj[Ye], Ye], (5629*g1^6)/675 + (9*g1^4*g2^2)/5 +
(728*g1^4*g3^2)/225 + (452*g1^2*g3^4)/45 + 60*g2^2*g3^4 + (2720*g3^6)/27 -
(337*g1^4*MatMul[Yb, Adj[Yb]])/30 - (43*g1^2*g2^2*MatMul[Yb, Adj[Yb]])/5 -
(87*g2^4*MatMul[Yb, Adj[Yb]])/2 - (24*g1^2*g3^2*MatMul[Yb, Adj[Yb]])/5 -
88*g2^2*g3^2*MatMul[Yb, Adj[Yb]] + (16*g3^4*MatMul[Yb, Adj[Yb]])/3 -
(7*g1^4*MatMul[MatMul[Yb, Adj[Yb]], Zeta[3]])/75 +
(42*g1^2*g2^2*MatMul[MatMul[Yb, Adj[Yb]], Zeta[3]])/5 -
9*g2^4*MatMul[MatMul[Yb, Adj[Yb]], Zeta[3]] +
(32*g1^2*g3^2*MatMul[MatMul[Yb, Adj[Yb]], Zeta[3]])/3 +
96*g2^2*g3^2*MatMul[MatMul[Yb, Adj[Yb]], Zeta[3]] -
(544*g3^4*MatMul[MatMul[Yb, Adj[Yb]], Zeta[3]])/3 +
(6*g1^2*MatMul[MatMul[Yb, Adj[Yb], Yb, Adj[Yb]], Zeta[3]])/5 -
18*g2^2*MatMul[MatMul[Yb, Adj[Yb], Yb, Adj[Yb]], Zeta[3]] +
(18*g1^2*MatMul[MatMul[Yb, Adj[Yt], Yt, Adj[Yb]], Zeta[3]])/5 -
18*g2^2*MatMul[MatMul[Yb, Adj[Yt], Yt, Adj[Yb]], Zeta[3]] +
12*MatMul[MatMul[Yb, Adj[Yb], Yb, Adj[Yb], Yb, Adj[Yb]], Zeta[3]] -
(g1^2*MatMul[Yb, Adj[Yb], Yb, Adj[Yb]])/3 +
9*g2^2*MatMul[Yb, Adj[Yb], Yb, Adj[Yb]] +
(64*g3^2*MatMul[Yb, Adj[Yb], Yb, Adj[Yb]])/3 -
(29*g1^2*MatMul[Yb, Adj[Yt], Yt, Adj[Yb]])/15 +
9*g2^2*MatMul[Yb, Adj[Yt], Yt, Adj[Yb]] +
(64*g3^2*MatMul[Yb, Adj[Yt], Yt, Adj[Yb]])/3 +
6*MatMul[Yb, Adj[Yb], Yb, Adj[Yb], Yb, Adj[Yb]] -
2*MatMul[Yb, Adj[Yb], Yb, Adj[Yt], Yt, Adj[Yb]] -
2*MatMul[Yb, Adj[Yt], Yt, Adj[Yb], Yb, Adj[Yb]] +
6*MatMul[Yb, Adj[Yt], Yt, Adj[Yt], Yt, Adj[Yb]] -
(14*g1^4*trace[Adj[Yb], Yb])/15 - (80*g3^4*trace[Adj[Yb], Yb])/3 +
7*g1^2*MatMul[Yb, Adj[Yb]]*trace[Adj[Yb], Yb] +
27*g2^2*MatMul[Yb, Adj[Yb]]*trace[Adj[Yb], Yb] -
16*g3^2*MatMul[Yb, Adj[Yb]]*trace[Adj[Yb], Yb] -
6*g1^2*MatMul[MatMul[Yb, Adj[Yb]], Zeta[3]]*trace[Adj[Yb], Yb] -
54*g2^2*MatMul[MatMul[Yb, Adj[Yb]], Zeta[3]]*trace[Adj[Yb], Yb] +
96*g3^2*MatMul[MatMul[Yb, Adj[Yb]], Zeta[3]]*trace[Adj[Yb], Yb] +
6*MatMul[Yb, Adj[Yb], Yb, Adj[Yb]]*trace[Adj[Yb], Yb] -
6*MatMul[Yb, Adj[Yt], Yt, Adj[Yb]]*trace[Adj[Yb], Yb] -
18*MatMul[Yb, Adj[Yb]]*trace[Adj[Yb], Yb]^2 -
(6*g1^4*trace[Adj[Ye], Ye])/5 - 3*g1^2*MatMul[Yb, Adj[Yb]]*
trace[Adj[Ye], Ye] + 9*g2^2*MatMul[Yb, Adj[Yb]]*trace[Adj[Ye], Ye] +
16*g3^2*MatMul[Yb, Adj[Yb]]*trace[Adj[Ye], Ye] +
6*g1^2*MatMul[MatMul[Yb, Adj[Yb]], Zeta[3]]*trace[Adj[Ye], Ye] -
18*g2^2*MatMul[MatMul[Yb, Adj[Yb]], Zeta[3]]*trace[Adj[Ye], Ye] +
2*MatMul[Yb, Adj[Yb], Yb, Adj[Yb]]*trace[Adj[Ye], Ye] -
2*MatMul[Yb, Adj[Yt], Yt, Adj[Yb]]*trace[Adj[Ye], Ye] -
12*MatMul[Yb, Adj[Yb]]*trace[Adj[Yb], Yb]*trace[Adj[Ye], Ye] -
2*MatMul[Yb, Adj[Yb]]*trace[Adj[Ye], Ye]^2 - (26*g1^4*trace[Adj[Yt], Yt])/
15 - (80*g3^4*trace[Adj[Yt], Yt])/3 + 12*MatMul[Yb, Adj[Yt], Yt, Adj[Yb]]*
trace[Adj[Yt], Yt] + 36*MatMul[Yb, Adj[Yb]]*trace[Adj[Yb], Yb, Adj[Yb],
Yb] + 12*MatMul[Yb, Adj[Yb]]*trace[Adj[Ye], Ye, Adj[Ye], Ye] +
12*MatMul[Yb, Adj[Yb]]*trace[Adj[Yt], Yt, Adj[Yb], Yb] -
(398*g1^6*Zeta[3])/125 - (54*g1^4*g2^2*Zeta[3])/25 -
(176*g1^4*g3^2*Zeta[3])/25 - (88*g1^2*g3^4*Zeta[3])/5 -
72*g2^2*g3^4*Zeta[3] + 320*g3^6*Zeta[3]}
38 changes: 38 additions & 0 deletions meta/ThreeLoopMSSM/gamma_SeR.m
View file
@@ -0,0 +1,38 @@
{(-6*g1^2)/5 + 2*MatMul[Ye, Adj[Ye]], (234*g1^4)/25 -
(6*g1^2*MatMul[Ye, Adj[Ye]])/5 + 6*g2^2*MatMul[Ye, Adj[Ye]] -
2*MatMul[Ye, Adj[Ye], Ye, Adj[Ye]] - 6*MatMul[Ye, Adj[Ye]]*
trace[Adj[Yb], Yb] - 2*MatMul[Ye, Adj[Ye]]*trace[Adj[Ye], Ye],
(7899*g1^6)/125 + (81*g1^4*g2^2)/5 + (264*g1^4*g3^2)/5 -
(1503*g1^4*MatMul[Ye, Adj[Ye]])/50 - 27*g1^2*g2^2*MatMul[Ye, Adj[Ye]] -
(87*g2^4*MatMul[Ye, Adj[Ye]])/2 -
(81*g1^4*MatMul[MatMul[Ye, Adj[Ye]], Zeta[3]])/5 +
(162*g1^2*g2^2*MatMul[MatMul[Ye, Adj[Ye]], Zeta[3]])/5 -
9*g2^4*MatMul[MatMul[Ye, Adj[Ye]], Zeta[3]] +
(54*g1^2*MatMul[MatMul[Ye, Adj[Ye], Ye, Adj[Ye]], Zeta[3]])/5 -
18*g2^2*MatMul[MatMul[Ye, Adj[Ye], Ye, Adj[Ye]], Zeta[3]] +
12*MatMul[MatMul[Ye, Adj[Ye], Ye, Adj[Ye], Ye, Adj[Ye]], Zeta[3]] +
(9*g1^2*MatMul[Ye, Adj[Ye], Ye, Adj[Ye]])/5 +
9*g2^2*MatMul[Ye, Adj[Ye], Ye, Adj[Ye]] +
6*MatMul[Ye, Adj[Ye], Ye, Adj[Ye], Ye, Adj[Ye]] -
(42*g1^4*trace[Adj[Yb], Yb])/5 +
(107*g1^2*MatMul[Ye, Adj[Ye]]*trace[Adj[Yb], Yb])/5 +
27*g2^2*MatMul[Ye, Adj[Ye]]*trace[Adj[Yb], Yb] -
64*g3^2*MatMul[Ye, Adj[Ye]]*trace[Adj[Yb], Yb] +
(42*g1^2*MatMul[MatMul[Ye, Adj[Ye]], Zeta[3]]*trace[Adj[Yb], Yb])/5 -
54*g2^2*MatMul[MatMul[Ye, Adj[Ye]], Zeta[3]]*trace[Adj[Yb], Yb] +
96*g3^2*MatMul[MatMul[Ye, Adj[Ye]], Zeta[3]]*trace[Adj[Yb], Yb] +
6*MatMul[Ye, Adj[Ye], Ye, Adj[Ye]]*trace[Adj[Yb], Yb] -
18*MatMul[Ye, Adj[Ye]]*trace[Adj[Yb], Yb]^2 -
(54*g1^4*trace[Adj[Ye], Ye])/5 +
(9*g1^2*MatMul[Ye, Adj[Ye]]*trace[Adj[Ye], Ye])/5 +
9*g2^2*MatMul[Ye, Adj[Ye]]*trace[Adj[Ye], Ye] +
(54*g1^2*MatMul[MatMul[Ye, Adj[Ye]], Zeta[3]]*trace[Adj[Ye], Ye])/5 -
18*g2^2*MatMul[MatMul[Ye, Adj[Ye]], Zeta[3]]*trace[Adj[Ye], Ye] +
2*MatMul[Ye, Adj[Ye], Ye, Adj[Ye]]*trace[Adj[Ye], Ye] -
12*MatMul[Ye, Adj[Ye]]*trace[Adj[Yb], Yb]*trace[Adj[Ye], Ye] -
2*MatMul[Ye, Adj[Ye]]*trace[Adj[Ye], Ye]^2 - (78*g1^4*trace[Adj[Yt], Yt])/
5 + 36*MatMul[Ye, Adj[Ye]]*trace[Adj[Yb], Yb, Adj[Yb], Yb] +
12*MatMul[Ye, Adj[Ye]]*trace[Adj[Ye], Ye, Adj[Ye], Ye] +
12*MatMul[Ye, Adj[Ye]]*trace[Adj[Yt], Yt, Adj[Yb], Yb] -
(3582*g1^6*Zeta[3])/125 - (486*g1^4*g2^2*Zeta[3])/25 -
(1584*g1^4*g3^2*Zeta[3])/25}
34 changes: 34 additions & 0 deletions meta/ThreeLoopMSSM/gamma_SlL.m
View file
@@ -0,0 +1,34 @@
{(-3*g1^2)/10 - (3*g2^2)/2 + MatMul[Adj[Ye], Ye],
(207*g1^4)/100 + (9*g1^2*g2^2)/10 + (15*g2^4)/4 +
(6*g1^2*MatMul[Adj[Ye], Ye])/5 - 2*MatMul[Adj[Ye], Ye, Adj[Ye], Ye] -
3*MatMul[Adj[Ye], Ye]*trace[Adj[Yb], Yb] - MatMul[Adj[Ye], Ye]*
trace[Adj[Ye], Ye], (1839*g1^6)/100 + (27*g1^4*g2^2)/100 +
(9*g1^2*g2^4)/4 + (345*g2^6)/4 + (66*g1^4*g3^2)/5 + 90*g2^4*g3^2 -
(549*g1^4*MatMul[Adj[Ye], Ye])/20 - (81*g1^2*g2^2*MatMul[Adj[Ye], Ye])/10 -
(45*g2^4*MatMul[Adj[Ye], Ye])/4 +
(81*g1^4*MatMul[MatMul[Adj[Ye], Ye], Zeta[3]])/50 +
(81*g1^2*g2^2*MatMul[MatMul[Adj[Ye], Ye], Zeta[3]])/5 -
(63*g2^4*MatMul[MatMul[Adj[Ye], Ye], Zeta[3]])/2 -
(54*g1^2*MatMul[MatMul[Adj[Ye], Ye, Adj[Ye], Ye], Zeta[3]])/5 +
18*g2^2*MatMul[MatMul[Adj[Ye], Ye, Adj[Ye], Ye], Zeta[3]] +
6*MatMul[MatMul[Adj[Ye], Ye, Adj[Ye], Ye, Adj[Ye], Ye], Zeta[3]] +
9*g1^2*MatMul[Adj[Ye], Ye, Adj[Ye], Ye] -
3*g2^2*MatMul[Adj[Ye], Ye, Adj[Ye], Ye] - (21*g1^4*trace[Adj[Yb], Yb])/10 -
(45*g2^4*trace[Adj[Yb], Yb])/2 + 8*g1^2*MatMul[Adj[Ye], Ye]*
trace[Adj[Yb], Yb] + 18*g2^2*MatMul[Adj[Ye], Ye]*trace[Adj[Yb], Yb] -
32*g3^2*MatMul[Adj[Ye], Ye]*trace[Adj[Yb], Yb] -
12*g1^2*MatMul[MatMul[Adj[Ye], Ye], Zeta[3]]*trace[Adj[Yb], Yb] +
48*g3^2*MatMul[MatMul[Adj[Ye], Ye], Zeta[3]]*trace[Adj[Yb], Yb] +
6*MatMul[Adj[Ye], Ye, Adj[Ye], Ye]*trace[Adj[Yb], Yb] -
9*MatMul[Adj[Ye], Ye]*trace[Adj[Yb], Yb]^2 - (27*g1^4*trace[Adj[Ye], Ye])/
10 - (15*g2^4*trace[Adj[Ye], Ye])/2 + 6*g2^2*MatMul[Adj[Ye], Ye]*
trace[Adj[Ye], Ye] + 2*MatMul[Adj[Ye], Ye, Adj[Ye], Ye]*
trace[Adj[Ye], Ye] - 6*MatMul[Adj[Ye], Ye]*trace[Adj[Yb], Yb]*
trace[Adj[Ye], Ye] - MatMul[Adj[Ye], Ye]*trace[Adj[Ye], Ye]^2 -
(39*g1^4*trace[Adj[Yt], Yt])/10 - (45*g2^4*trace[Adj[Yt], Yt])/2 +
18*MatMul[Adj[Ye], Ye]*trace[Adj[Yb], Yb, Adj[Yb], Yb] +
6*MatMul[Adj[Ye], Ye]*trace[Adj[Ye], Ye, Adj[Ye], Ye] +
6*MatMul[Adj[Ye], Ye]*trace[Adj[Yt], Yt, Adj[Yb], Yb] -
(1791*g1^6*Zeta[3])/250 - (243*g1^4*g2^2*Zeta[3])/50 -
(81*g1^2*g2^4*Zeta[3])/10 + (315*g2^6*Zeta[3])/2 -
(396*g1^4*g3^2*Zeta[3])/25 - 108*g2^4*g3^2*Zeta[3]}
74 changes: 74 additions & 0 deletions meta/ThreeLoopMSSM/gamma_SqL.m
View file
@@ -0,0 +1,74 @@
{-g1^2/30 - (3*g2^2)/2 - (8*g3^2)/3 + MatMul[Adj[Yb], Yb] +
MatMul[Adj[Yt], Yt], (199*g1^4)/900 + (g1^2*g2^2)/10 + (15*g2^4)/4 +
(8*g1^2*g3^2)/45 + 8*g2^2*g3^2 - (8*g3^4)/9 +
(2*g1^2*MatMul[Adj[Yb], Yb])/5 + (4*g1^2*MatMul[Adj[Yt], Yt])/5 -
2*MatMul[Adj[Yb], Yb, Adj[Yb], Yb] - 2*MatMul[Adj[Yt], Yt, Adj[Yt], Yt] -
3*MatMul[Adj[Yb], Yb]*trace[Adj[Yb], Yb] - MatMul[Adj[Yb], Yb]*
trace[Adj[Ye], Ye] - 3*MatMul[Adj[Yt], Yt]*trace[Adj[Yt], Yt],
(28457*g1^6)/13500 + (11*g1^4*g2^2)/100 + (25*g1^2*g2^4)/4 + (345*g2^6)/4 +
(194*g1^4*g3^2)/225 - (8*g1^2*g2^2*g3^2)/5 + 50*g2^4*g3^2 +
(608*g1^2*g3^4)/45 + 8*g2^2*g3^4 + (2720*g3^6)/27 -
(633*g1^4*MatMul[Adj[Yb], Yb])/100 - (41*g1^2*g2^2*MatMul[Adj[Yb], Yb])/
10 - (45*g2^4*MatMul[Adj[Yb], Yb])/4 - (76*g1^2*g3^2*MatMul[Adj[Yb], Yb])/
15 - 4*g2^2*g3^2*MatMul[Adj[Yb], Yb] + (8*g3^4*MatMul[Adj[Yb], Yb])/3 -
(3767*g1^4*MatMul[Adj[Yt], Yt])/300 - (59*g1^2*g2^2*MatMul[Adj[Yt], Yt])/
10 - (45*g2^4*MatMul[Adj[Yt], Yt])/4 - (68*g1^2*g3^2*MatMul[Adj[Yt], Yt])/
5 - 4*g2^2*g3^2*MatMul[Adj[Yt], Yt] + (8*g3^4*MatMul[Adj[Yt], Yt])/3 +
(7*g1^4*MatMul[MatMul[Adj[Yb], Yb], Zeta[3]])/30 +
(9*g1^2*g2^2*MatMul[MatMul[Adj[Yb], Yb], Zeta[3]])/5 -
(63*g2^4*MatMul[MatMul[Adj[Yb], Yb], Zeta[3]])/2 +
(128*g1^2*g3^2*MatMul[MatMul[Adj[Yb], Yb], Zeta[3]])/15 -
(272*g3^4*MatMul[MatMul[Adj[Yb], Yb], Zeta[3]])/3 +
(143*g1^4*MatMul[MatMul[Adj[Yt], Yt], Zeta[3]])/150 +
9*g1^2*g2^2*MatMul[MatMul[Adj[Yt], Yt], Zeta[3]] -
(63*g2^4*MatMul[MatMul[Adj[Yt], Yt], Zeta[3]])/2 +
(128*g1^2*g3^2*MatMul[MatMul[Adj[Yt], Yt], Zeta[3]])/15 -
(272*g3^4*MatMul[MatMul[Adj[Yt], Yt], Zeta[3]])/3 -
(6*g1^2*MatMul[MatMul[Adj[Yb], Yb, Adj[Yb], Yb], Zeta[3]])/5 +
18*g2^2*MatMul[MatMul[Adj[Yb], Yb, Adj[Yb], Yb], Zeta[3]] -
6*g1^2*MatMul[MatMul[Adj[Yt], Yt, Adj[Yt], Yt], Zeta[3]] +
18*g2^2*MatMul[MatMul[Adj[Yt], Yt, Adj[Yt], Yt], Zeta[3]] +
6*MatMul[MatMul[Adj[Yb], Yb, Adj[Yb], Yb, Adj[Yb], Yb], Zeta[3]] +
6*MatMul[MatMul[Adj[Yt], Yt, Adj[Yt], Yt, Adj[Yt], Yt], Zeta[3]] +
(7*g1^2*MatMul[Adj[Yb], Yb, Adj[Yb], Yb])/15 -
3*g2^2*MatMul[Adj[Yb], Yb, Adj[Yb], Yb] +
(64*g3^2*MatMul[Adj[Yb], Yb, Adj[Yb], Yb])/3 +
(11*g1^2*MatMul[Adj[Yt], Yt, Adj[Yt], Yt])/3 -
3*g2^2*MatMul[Adj[Yt], Yt, Adj[Yt], Yt] +
(64*g3^2*MatMul[Adj[Yt], Yt, Adj[Yt], Yt])/3 +
4*MatMul[Adj[Yb], Yb, Adj[Yt], Yt, Adj[Yb], Yb] +
4*MatMul[Adj[Yt], Yt, Adj[Yb], Yb, Adj[Yt], Yt] -
(7*g1^4*trace[Adj[Yb], Yb])/30 - (45*g2^4*trace[Adj[Yb], Yb])/2 -
(80*g3^4*trace[Adj[Yb], Yb])/3 +
(16*g1^2*MatMul[Adj[Yb], Yb]*trace[Adj[Yb], Yb])/5 +
18*g2^2*MatMul[Adj[Yb], Yb]*trace[Adj[Yb], Yb] -
8*g3^2*MatMul[Adj[Yb], Yb]*trace[Adj[Yb], Yb] -
(24*g1^2*MatMul[MatMul[Adj[Yb], Yb], Zeta[3]]*trace[Adj[Yb], Yb])/5 +
48*g3^2*MatMul[MatMul[Adj[Yb], Yb], Zeta[3]]*trace[Adj[Yb], Yb] +
6*MatMul[Adj[Yb], Yb, Adj[Yb], Yb]*trace[Adj[Yb], Yb] -
9*MatMul[Adj[Yb], Yb]*trace[Adj[Yb], Yb]^2 - (3*g1^4*trace[Adj[Ye], Ye])/
10 - (15*g2^4*trace[Adj[Ye], Ye])/2 -
(8*g1^2*MatMul[Adj[Yb], Yb]*trace[Adj[Ye], Ye])/5 +
6*g2^2*MatMul[Adj[Yb], Yb]*trace[Adj[Ye], Ye] +
8*g3^2*MatMul[Adj[Yb], Yb]*trace[Adj[Ye], Ye] +
(12*g1^2*MatMul[MatMul[Adj[Yb], Yb], Zeta[3]]*trace[Adj[Ye], Ye])/5 +
2*MatMul[Adj[Yb], Yb, Adj[Yb], Yb]*trace[Adj[Ye], Ye] -
6*MatMul[Adj[Yb], Yb]*trace[Adj[Yb], Yb]*trace[Adj[Ye], Ye] -
MatMul[Adj[Yb], Yb]*trace[Adj[Ye], Ye]^2 - (13*g1^4*trace[Adj[Yt], Yt])/
30 - (45*g2^4*trace[Adj[Yt], Yt])/2 - (80*g3^4*trace[Adj[Yt], Yt])/3 +
2*g1^2*MatMul[Adj[Yt], Yt]*trace[Adj[Yt], Yt] +
18*g2^2*MatMul[Adj[Yt], Yt]*trace[Adj[Yt], Yt] -
8*g3^2*MatMul[Adj[Yt], Yt]*trace[Adj[Yt], Yt] -
(24*g1^2*MatMul[MatMul[Adj[Yt], Yt], Zeta[3]]*trace[Adj[Yt], Yt])/5 +
48*g3^2*MatMul[MatMul[Adj[Yt], Yt], Zeta[3]]*trace[Adj[Yt], Yt] +
6*MatMul[Adj[Yt], Yt, Adj[Yt], Yt]*trace[Adj[Yt], Yt] -
9*MatMul[Adj[Yt], Yt]*trace[Adj[Yt], Yt]^2 +
18*MatMul[Adj[Yb], Yb]*trace[Adj[Yb], Yb, Adj[Yb], Yb] +
6*MatMul[Adj[Yb], Yb]*trace[Adj[Ye], Ye, Adj[Ye], Ye] +
6*MatMul[Adj[Yb], Yb]*trace[Adj[Yt], Yt, Adj[Yb], Yb] +
6*MatMul[Adj[Yt], Yt]*trace[Adj[Yt], Yt, Adj[Yb], Yb] +
18*MatMul[Adj[Yt], Yt]*trace[Adj[Yt], Yt, Adj[Yt], Yt] -
(199*g1^6*Zeta[3])/250 - (27*g1^4*g2^2*Zeta[3])/50 -
(81*g1^2*g2^4*Zeta[3])/10 + (315*g2^6*Zeta[3])/2 -
(44*g1^4*g3^2*Zeta[3])/25 - 108*g2^4*g3^2*Zeta[3] -
(88*g1^2*g3^4*Zeta[3])/5 - 72*g2^2*g3^4*Zeta[3] + 320*g3^6*Zeta[3]}

0 comments on commit cbc5170

Please sign in to comment.