(* ::Package:: *)
localbasis[GGGG[5]] = {{M[GGGG[5], {1, SUSYM}], H[1, 4]^2*H[2, 3]^2},
{M[GGGG[5], {1, SUSYM}, tus], H[1, 3]^2*H[2, 4]^2},
{M[GGGG[5], {1, SUSYM}, ust], H[1, 2]^2*H[3, 4]^2},
{M[GGGG[5], {2, SUSYM}], H[1, 2]*H[1, 3]*H[2, 4]*H[3, 4]},
{M[GGGG[5], {2, SUSYM}, tus], H[1, 2]*H[1, 4]*H[2, 3]*H[3, 4]},
{M[GGGG[5], {2, SUSYM}, ust], H[1, 3]*H[1, 4]*H[2, 3]*H[2, 4]},
{M[GGGG[5], {3, SUSYM}], -(H[1, 4]*H[2, 3]*(X[1, 2, 3, 4] -
X[1, 2, 4, 3] + X[1, 3, 2, 4]))}, {M[GGGG[5], {3, SUSYM}, tus],
H[1, 3]*H[2, 4]*(X[1, 2, 3, 4] - X[1, 2, 4, 3] - X[1, 3, 2, 4])},
{M[GGGG[5], {3, SUSYM}, ust], -(H[1, 2]*H[3, 4]*(X[1, 2, 3, 4] +
X[1, 2, 4, 3] - X[1, 3, 2, 4]))}, {M[GGGG[5], {4, NOSYM}],
H[1, 2]*H[3, 4]*X[1, 2, 4, 3]}, {M[GGGG[5], {4, NOSYM}, tus],
H[1, 4]*H[2, 3]*X[1, 2, 3, 4]}, {M[GGGG[5], {4, NOSYM}, ust],
H[1, 3]*H[2, 4]*X[1, 3, 2, 4]}, {M[GGGG[5], {4, NOSYM}, tsu],
H[1, 4]*H[2, 3]*X[1, 3, 2, 4]}, {M[GGGG[5], {4, NOSYM}, uts],
H[1, 3]*H[2, 4]*X[1, 2, 4, 3]}, {M[GGGG[5], {4, NOSYM}, sut],
H[1, 2]*H[3, 4]*X[1, 2, 3, 4]}, {M[GGGG[5], {5, SUSYM}],
HS*H[1, 4]*H[2, 3]}, {M[GGGG[5], {5, SUSYM}, tus], HS*H[1, 3]*H[2, 4]},
{M[GGGG[5], {5, SUSYM}, ust], HS*H[1, 2]*H[3, 4]},
{M[GGGG[5], {6, SUSYM}], HS*X[1, 2, 4, 3]},
{M[GGGG[5], {6, SUSYM}, tus], HS*X[1, 2, 3, 4]},
{M[GGGG[5], {6, SUSYM}, ust], HS*X[1, 3, 2, 4]},
{M[GGGG[5], {7, FULLSYM}], HS^2}, {M[GGGG[5], {8, SUODD}],
(-I)*(H[2, 3]*H[2, 3, 4]*V[1]*\[Epsilon][e[1], e[4], p[1], p[2],
p[4]] - H[2, 3]*H[1, 2, 3]*V[4]*\[Epsilon][e[1], e[4], p[1], p[2],
p[4]] - H[1, 4]*H[1, 3, 4]*V[2]*\[Epsilon][e[2], e[3], p[1], p[2],
p[3]] + H[1, 4]*H[1, 2, 4]*V[3]*\[Epsilon][e[2], e[3], p[1], p[2],
p[3]])}, {M[GGGG[5], {8, SUODD}, tus],
I*(H[2, 4]*H[2, 3, 4]*V[1]*\[Epsilon][e[1], e[3], p[1], p[3], p[4]] -
H[2, 4]*H[1, 2, 4]*V[3]*\[Epsilon][e[1], e[3], p[1], p[3], p[4]] -
H[1, 3]*H[1, 3, 4]*V[2]*\[Epsilon][e[2], e[4], p[1], p[2], p[4]] +
H[1, 3]*H[1, 2, 3]*V[4]*\[Epsilon][e[2], e[4], p[1], p[2], p[4]])},
{M[GGGG[5], {8, SUODD}, ust],
I*(H[3, 4]*H[2, 3, 4]*V[1]*\[Epsilon][e[1], e[2], p[1], p[2], p[3]] -
H[3, 4]*H[1, 3, 4]*V[2]*\[Epsilon][e[1], e[2], p[1], p[2], p[3]] +
H[1, 2]*H[1, 2, 4]*V[3]*\[Epsilon][e[3], e[4], p[1], p[3], p[4]] -
H[1, 2]*H[1, 2, 3]*V[4]*\[Epsilon][e[3], e[4], p[1], p[3], p[4]])}}
vertices[GG[5]] = {(dot[ep[1], ep[2]]^2*Tableau[{evenn^J}])/Sqrt[5],
3*Sqrt[2/7]*Sqrt[((-1 + J)*J)/((2 + J)*(3 + J))]*dot[ep[1], ep[2]]*
((dot[ep[1], ep[2]]*Tableau[{evenn^J}])/3 + Tableau[{ep[1]}, {ep[2]},
{evenn^(-2 + J)}]), (Sqrt[35/2]*Sqrt[((-3 + J)*(-2 + J)*(-1 + J)*J)/
((2 + J)*(3 + J)*(4 + J)*(5 + J))]*
((2*dot[ep[1], ep[2]]^2*Tableau[{evenn^J}])/35 +
(4*dot[ep[1], ep[2]]*Tableau[{ep[1]}, {ep[2]}, {evenn^(-2 + J)}])/7 +
Tableau[{ep[1]}, {ep[1]}, {ep[2]}, {ep[2]}, {evenn^(-4 + J)}]))/2,
Sqrt[2/5]*Sqrt[J/(2 + J)]*dot[ep[1], ep[2]]*Tableau[{ep[1], ep[2], n},
{evenn^(-1 + J)}], Sqrt[5/2]*Sqrt[((-2 + J)*(-1 + J)*J)/
((2 + J)*(3 + J)*(4 + J))]*
((dot[ep[1], ep[2]]*Tableau[{ep[1], ep[2], n}, {evenn^(-1 + J)}])/5 +
Tableau[{ep[1], ep[2], n}, {ep[1]}, {ep[2]}, {evenn^(-3 + J)}]),
I*Sqrt[2/5]*J*Sqrt[(1 + J)^(-2)]*dot[ep[1], ep[2]]*
Tableau[SD[ep[1], ep[2]], {n}, {evenn^(-2 + J)}],
(I/2)*Sqrt[15]*J*Sqrt[((-2 + J)*(-1 + J))/((1 + J)^2*(3 + J)*(4 + J))]*
((2*dot[ep[1], ep[2]]*Tableau[SD[ep[1], ep[2]], {n}, {evenn^(-2 + J)}])/
5 + Tableau[SD[ep[1], ep[2]], {ep[1]}, {ep[2]}, {n},
{evenn^(-4 + J)}]), (Sqrt[6/7]*J*Sqrt[(-1 + J)/(3 + J)]*
dot[ep[1], ep[2]]*(Tableau[SD[ep[1], n], {ep[2]}, {n},
{evenn^(-3 + J)}] + Tableau[SD[ep[2], n], {ep[1]}, {n},
{evenn^(-3 + J)}]))/(1 + J),
(Sqrt[7]*J*Sqrt[((-3 + J)*(-2 + J)*(-1 + J))/((3 + J)*(4 + J)*(5 + J))]*
((2*dot[ep[1], ep[2]]*(Tableau[SD[ep[1], n], {ep[2]}, {n},
{evenn^(-3 + J)}] + Tableau[SD[ep[2], n], {ep[1]}, {n},
{evenn^(-3 + J)}]))/7 + Tableau[SD[ep[1], n], {ep[1]}, {ep[2]},
{ep[2]}, {n}, {evenn^(-5 + J)}] + Tableau[SD[ep[2], n], {ep[2]},
{ep[1]}, {ep[1]}, {n}, {evenn^(-5 + J)}]))/(2*(1 + J)),
I*Sqrt[2/5]*J*Sqrt[(1 + J)^(-2)]*dot[ep[1], ep[2]]*
Tableau[ASD[ep[1], ep[2]], {n}, {evenn^(-2 + J)}],
(I/2)*Sqrt[15]*J*Sqrt[((-2 + J)*(-1 + J))/((1 + J)^2*(3 + J)*(4 + J))]*
((2*dot[ep[1], ep[2]]*Tableau[ASD[ep[1], ep[2]], {n},
{evenn^(-2 + J)}])/5 + Tableau[ASD[ep[1], ep[2]], {ep[1]}, {ep[2]},
{n}, {evenn^(-4 + J)}]), (Sqrt[6/7]*J*Sqrt[(-1 + J)/(3 + J)]*
dot[ep[1], ep[2]]*(Tableau[ASD[ep[1], n], {ep[2]}, {n},
{evenn^(-3 + J)}] + Tableau[ASD[ep[2], n], {ep[1]}, {n},
{evenn^(-3 + J)}]))/(1 + J),
(Sqrt[7]*J*Sqrt[((-3 + J)*(-2 + J)*(-1 + J))/((3 + J)*(4 + J)*(5 + J))]*
((2*dot[ep[1], ep[2]]*(Tableau[ASD[ep[1], n], {ep[2]}, {n},
{evenn^(-3 + J)}] + Tableau[ASD[ep[2], n], {ep[1]}, {n},
{evenn^(-3 + J)}]))/7 + Tableau[ASD[ep[1], n], {ep[1]}, {ep[2]},
{ep[2]}, {n}, {evenn^(-5 + J)}] + Tableau[ASD[ep[2], n], {ep[2]},
{ep[1]}, {ep[1]}, {n}, {evenn^(-5 + J)}]))/(2*(1 + J)),
(Sqrt[3/7]*(-1 + J)*dot[ep[1], ep[2]]*(Tableau[SD[ep[1], n], {ep[2], n},
{evenn^(-2 + J)}] + Tableau[SD[ep[2], n], {ep[1], n},
{evenn^(-2 + J)}]))/(1 + J),
(Sqrt[7]*(-1 + J)*Sqrt[((-3 + J)*(-2 + J))/((4 + J)*(5 + J))]*
((2*dot[ep[1], ep[2]]*Tableau[SD[ep[1], n], {ep[2], n},
{evenn^(-2 + J)}])/21 + Tableau[SD[ep[1], ep[2]], {ep[1], ep[2]},
{evenn^(-2 + J)}]/3 + (2*dot[ep[1], ep[2]]*Tableau[SD[ep[2], n],
{ep[1], n}, {evenn^(-2 + J)}])/21 + Tableau[SD[ep[1], n],
{ep[2], n}, {ep[1]}, {ep[2]}, {evenn^(-4 + J)}] +
Tableau[SD[ep[2], n], {ep[1], n}, {ep[1]}, {ep[2]},
{evenn^(-4 + J)}]))/(2*(1 + J)), (I/2)*Sqrt[3]*(-1 + J)*
Sqrt[(-2 + J)/((1 + J)^2*(4 + J))]*(Tableau[SD[ep[1], ep[2]],
{ep[1], n}, {ep[2]}, {evenn^(-3 + J)}] + Tableau[SD[ep[1], ep[2]],
{ep[2], n}, {ep[1]}, {evenn^(-3 + J)}]),
(Sqrt[3/7]*(-1 + J)*dot[ep[1], ep[2]]*(Tableau[ASD[ep[1], n],
{ep[2], n}, {evenn^(-2 + J)}] + Tableau[ASD[ep[2], n], {ep[1], n},
{evenn^(-2 + J)}]))/(1 + J),
(Sqrt[7]*(-1 + J)*Sqrt[((-3 + J)*(-2 + J))/((4 + J)*(5 + J))]*
((2*dot[ep[1], ep[2]]*Tableau[ASD[ep[1], n], {ep[2], n},
{evenn^(-2 + J)}])/21 + Tableau[ASD[ep[1], ep[2]], {ep[1], ep[2]},
{evenn^(-2 + J)}]/3 + (2*dot[ep[1], ep[2]]*Tableau[ASD[ep[2], n],
{ep[1], n}, {evenn^(-2 + J)}])/21 + Tableau[ASD[ep[1], n],
{ep[2], n}, {ep[1]}, {ep[2]}, {evenn^(-4 + J)}] +
Tableau[ASD[ep[2], n], {ep[1], n}, {ep[1]}, {ep[2]},
{evenn^(-4 + J)}]))/(2*(1 + J)), (I/2)*Sqrt[3]*(-1 + J)*
Sqrt[(-2 + J)/((1 + J)^2*(4 + J))]*(Tableau[ASD[ep[1], ep[2]],
{ep[1], n}, {ep[2]}, {evenn^(-3 + J)}] + Tableau[ASD[ep[1], ep[2]],
{ep[2], n}, {ep[1]}, {evenn^(-3 + J)}]),
(I*(-2 + J)*Tableau[SD[ep[1], ep[2]], {ep[1], n}, {ep[2], n}, {n},
{evenn^(-4 + J)}])/Sqrt[(1 + J)^2],
((-2 + J)*Sqrt[(-3 + J)/(5 + J)]*(Tableau[SD[ep[1], n], {ep[1], n},
{ep[2], n}, {ep[2]}, {n}, {evenn^(-5 + J)}] + Tableau[SD[ep[2], n],
{ep[2], n}, {ep[1], n}, {ep[1]}, {n}, {evenn^(-5 + J)}]))/(1 + J),
(I*(-2 + J)*Tableau[ASD[ep[1], ep[2]], {ep[1], n}, {ep[2], n}, {n},
{evenn^(-4 + J)}])/Sqrt[(1 + J)^2],
((-2 + J)*Sqrt[(-3 + J)/(5 + J)]*(Tableau[ASD[ep[1], n], {ep[1], n},
{ep[2], n}, {ep[2]}, {n}, {evenn^(-5 + J)}] + Tableau[ASD[ep[2], n],
{ep[2], n}, {ep[1], n}, {ep[1]}, {n}, {evenn^(-5 + J)}]))/(1 + J),
((-3 + J)*(Tableau[SD[ep[1], n], {ep[1], n}, {ep[2], n}, {ep[2], n},
{evenn^(-4 + J)}] + Tableau[SD[ep[2], n], {ep[2], n}, {ep[1], n},
{ep[1], n}, {evenn^(-4 + J)}]))/(2*(1 + J)),
((-3 + J)*(Tableau[ASD[ep[1], n], {ep[1], n}, {ep[2], n}, {ep[2], n},
{evenn^(-4 + J)}] + Tableau[ASD[ep[2], n], {ep[2], n}, {ep[1], n},
{ep[1], n}, {evenn^(-4 + J)}]))/(2*(1 + J))}
amplow[GGG[5]] = 2 Sqrt[G8\[Pi]] (\[Alpha]4 dot[p[1],e[3]]^2 dot[p[2],e[1]]^2 dot[p[3],e[2]]^2+
\[Alpha]2 dot[p[1],e[3]] dot[p[2],e[1]] dot[p[3],e[2]] (dot[e[1],e[2]] dot[p[1],e[3]]
+dot[e[2],e[3]] dot[p[2],e[1]]+dot[e[1],e[3]] dot[p[3],e[2]])+
(dot[e[1],e[2]] dot[p[1],e[3]]+dot[e[2],e[3]] dot[p[2],e[1]]+
dot[e[1],e[3]] dot[p[3],e[2]])^2)
amplow[GGGG[5]] = {-(G8\[Pi]/(s*t*(s + t))) - (G8\[Pi]*\[Alpha]2^2)/(24*t) -
(G8\[Pi]*(6*s^2 + 6*s*t)*\[Alpha]4^2)/(96*t) + g[4, 0, {GGGG[5], 1}] +
(s^2 + t^2 + u^2)*g[6, 0, {GGGG[5], 1}] + s*t*u*g[7, 0, {GGGG[5], 1}] +
(s^2 + t^2 + u^2)^2*g[8, 0, {GGGG[5], 1}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 1}] + (s^2 + t^2 + u^2)^3*g[10, 0, {GGGG[5], 1}] +
t*g[5, T, 0, {GGGG[5], 1}] + t^2*g[6, T^2, 0, {GGGG[5], 1}] +
t*(s^2 + t^2 + u^2)*g[7, T, 0, {GGGG[5], 1}] +
s*t^2*u*g[8, T, 0, {GGGG[5], 1}], G8\[Pi]/(s*(-s - t)*t) -
(G8\[Pi]*\[Alpha]2^2)/(24*(-s - t)) -
(G8\[Pi]*(6*(-s - t)*t + 6*t^2)*\[Alpha]4^2)/(96*(-s - t)) +
g[4, 0, {GGGG[5], 1}] + (s^2 + t^2 + u^2)*g[6, 0, {GGGG[5], 1}] +
s*t*u*g[7, 0, {GGGG[5], 1}] + (s^2 + t^2 + u^2)^2*
g[8, 0, {GGGG[5], 1}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 1}] + (s^2 + t^2 + u^2)^3*g[10, 0, {GGGG[5], 1}] +
u*g[5, T, 0, {GGGG[5], 1}] + u^2*g[6, T^2, 0, {GGGG[5], 1}] +
u*(s^2 + t^2 + u^2)*g[7, T, 0, {GGGG[5], 1}] +
s*t*u^2*g[8, T, 0, {GGGG[5], 1}], G8\[Pi]/(s*(-s - t)*t) -
(G8\[Pi]*\[Alpha]2^2)/(24*s) - (G8\[Pi]*(6*s*(-s - t) + 6*(-s - t)^2)*
\[Alpha]4^2)/(96*s) + g[4, 0, {GGGG[5], 1}] +
(s^2 + t^2 + u^2)*g[6, 0, {GGGG[5], 1}] + s*t*u*g[7, 0, {GGGG[5], 1}] +
(s^2 + t^2 + u^2)^2*g[8, 0, {GGGG[5], 1}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 1}] + (s^2 + t^2 + u^2)^3*g[10, 0, {GGGG[5], 1}] +
s*g[5, T, 0, {GGGG[5], 1}] + s^2*g[6, T^2, 0, {GGGG[5], 1}] +
s*(s^2 + t^2 + u^2)*g[7, T, 0, {GGGG[5], 1}] +
s^2*t*u*g[8, T, 0, {GGGG[5], 1}], (-6*G8\[Pi])/(s*t*(s + t)) -
(2*G8\[Pi]*\[Alpha]2)/(s*(s + t)) - (G8\[Pi]*t*\[Alpha]2^2)/
(4*s*(s + t)) - (G8\[Pi]*t*\[Alpha]4)/(2*s*(s + t)) +
g[4, 0, {GGGG[5], 2}] + (s^2 + t^2 + u^2)*g[6, 0, {GGGG[5], 2}] +
s*t*u*g[7, 0, {GGGG[5], 2}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 2}] + s^2*t^2*u^2*g[10, 1, {GGGG[5], 2}] +
t*g[5, T, 0, {GGGG[5], 2}] + t^2*g[6, T^2, 0, {GGGG[5], 2}] +
t*(s^2 + t^2 + u^2)*g[7, T, 0, {GGGG[5], 2}] +
s*t^2*u*g[8, T, 0, {GGGG[5], 2}] + t^2*(s^2 + t^2 + u^2)*
g[8, T^2, 0, {GGGG[5], 2}] + s*t^3*u*g[9, T^2, 0, {GGGG[5], 2}],
(-6*G8\[Pi])/(s*t*(s + t)) + (2*G8\[Pi]*\[Alpha]2)/(s*t) -
(G8\[Pi]*(s + t)*\[Alpha]2^2)/(4*s*t) - (G8\[Pi]*(s + t)*\[Alpha]4)/
(2*s*t) + g[4, 0, {GGGG[5], 2}] + (s^2 + t^2 + u^2)*
g[6, 0, {GGGG[5], 2}] + s*t*u*g[7, 0, {GGGG[5], 2}] +
2*s*t*u*(s^2 + t^2 + u^2)*g[9, 0, {GGGG[5], 2}] +
s^2*t^2*u^2*g[10, 1, {GGGG[5], 2}] + u*g[5, T, 0, {GGGG[5], 2}] +
u^2*g[6, T^2, 0, {GGGG[5], 2}] + u*(s^2 + t^2 + u^2)*
g[7, T, 0, {GGGG[5], 2}] + s*t*u^2*g[8, T, 0, {GGGG[5], 2}] +
u^2*(s^2 + t^2 + u^2)*g[8, T^2, 0, {GGGG[5], 2}] +
s*t*u^3*g[9, T^2, 0, {GGGG[5], 2}], (-6*G8\[Pi])/(s*t*(s + t)) -
(2*G8\[Pi]*\[Alpha]2)/(t*(s + t)) - (G8\[Pi]*s*\[Alpha]2^2)/
(4*t*(s + t)) - (G8\[Pi]*s*\[Alpha]4)/(2*t*(s + t)) +
g[4, 0, {GGGG[5], 2}] + (s^2 + t^2 + u^2)*g[6, 0, {GGGG[5], 2}] +
s*t*u*g[7, 0, {GGGG[5], 2}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 2}] + s^2*t^2*u^2*g[10, 1, {GGGG[5], 2}] +
s*g[5, T, 0, {GGGG[5], 2}] + s^2*g[6, T^2, 0, {GGGG[5], 2}] +
s*(s^2 + t^2 + u^2)*g[7, T, 0, {GGGG[5], 2}] +
s^2*t*u*g[8, T, 0, {GGGG[5], 2}] + s^2*(s^2 + t^2 + u^2)*
g[8, T^2, 0, {GGGG[5], 2}] + s^3*t*u*g[9, T^2, 0, {GGGG[5], 2}],
(4*G8\[Pi])/(s^2*t + s*t^2) - (3*G8\[Pi]*\[Alpha]4)/t +
g[4, 0, {GGGG[5], 3}] + (s^2 + t^2 + u^2)*g[6, 0, {GGGG[5], 3}] +
s*t*u*g[7, 0, {GGGG[5], 3}] + (s^2 + t^2 + u^2)^2*
g[8, 0, {GGGG[5], 3}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 3}] + (s^2 + t^2 + u^2)^3*g[10, 0, {GGGG[5], 3}] +
s^2*t^2*u^2*g[10, 1, {GGGG[5], 3}] + t*g[5, T, 0, {GGGG[5], 3}] +
t^2*g[6, T^2, 0, {GGGG[5], 3}] + t*(s^2 + t^2 + u^2)*
g[7, T, 0, {GGGG[5], 3}] + s*t^2*u*g[8, T, 0, {GGGG[5], 3}] +
t^2*(s^2 + t^2 + u^2)*g[8, T^2, 0, {GGGG[5], 3}] +
s*t^3*u*g[9, T^2, 0, {GGGG[5], 3}], (4*G8\[Pi])/(s^2*t + s*t^2) +
(3*G8\[Pi]*\[Alpha]4)/(s + t) + g[4, 0, {GGGG[5], 3}] +
(s^2 + t^2 + u^2)*g[6, 0, {GGGG[5], 3}] + s*t*u*g[7, 0, {GGGG[5], 3}] +
(s^2 + t^2 + u^2)^2*g[8, 0, {GGGG[5], 3}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 3}] + (s^2 + t^2 + u^2)^3*g[10, 0, {GGGG[5], 3}] +
s^2*t^2*u^2*g[10, 1, {GGGG[5], 3}] + u*g[5, T, 0, {GGGG[5], 3}] +
u^2*g[6, T^2, 0, {GGGG[5], 3}] + u*(s^2 + t^2 + u^2)*
g[7, T, 0, {GGGG[5], 3}] + s*t*u^2*g[8, T, 0, {GGGG[5], 3}] +
u^2*(s^2 + t^2 + u^2)*g[8, T^2, 0, {GGGG[5], 3}] +
s*t*u^3*g[9, T^2, 0, {GGGG[5], 3}], (4*G8\[Pi])/(s^2*t + s*t^2) -
(3*G8\[Pi]*\[Alpha]4)/s + g[4, 0, {GGGG[5], 3}] +
(s^2 + t^2 + u^2)*g[6, 0, {GGGG[5], 3}] + s*t*u*g[7, 0, {GGGG[5], 3}] +
(s^2 + t^2 + u^2)^2*g[8, 0, {GGGG[5], 3}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 3}] + (s^2 + t^2 + u^2)^3*g[10, 0, {GGGG[5], 3}] +
s^2*t^2*u^2*g[10, 1, {GGGG[5], 3}] + s*g[5, T, 0, {GGGG[5], 3}] +
s^2*g[6, T^2, 0, {GGGG[5], 3}] + s*(s^2 + t^2 + u^2)*
g[7, T, 0, {GGGG[5], 3}] + s^2*t*u*g[8, T, 0, {GGGG[5], 3}] +
s^2*(s^2 + t^2 + u^2)*g[8, T^2, 0, {GGGG[5], 3}] +
s^3*t*u*g[9, T^2, 0, {GGGG[5], 3}], (-8*G8\[Pi])/(s*t*(s + t)) -
(G8\[Pi]*\[Alpha]2^2)/(2*s) + \[Alpha]2*((2*G8\[Pi])/(s*t) +
(G8\[Pi]*(s + t)*\[Alpha]4)/(2*s)) + g[4, 0, {GGGG[5], 4}] +
(s^2 + t^2 + u^2)*g[6, 0, {GGGG[5], 4}] + s*t*u*g[7, 0, {GGGG[5], 4}] +
(s^2 + t^2 + u^2)^2*g[8, 0, {GGGG[5], 4}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 4}] + s^2*t^2*u^2*g[10, 1, {GGGG[5], 4}] +
(s - u)*g[5, SmU, 0, {GGGG[5], 4}] + t*g[5, T, 0, {GGGG[5], 4}] +
t*(s - u)*g[6, SmU*T, 0, {GGGG[5], 4}] +
t^2*g[6, T^2, 0, {GGGG[5], 4}] + (s^2*(t - u) + (s - t)*u^2 +
t^2*(-s + u))*g[7, Odd3, 0, {GGGG[5], 4}] + (s - u)*(s^2 + t^2 + u^2)*
g[7, SmU, 0, {GGGG[5], 4}] + t*(s^2 + t^2 + u^2)*
g[7, T, 0, {GGGG[5], 4}] + s*t*(s - u)*u*g[8, SmU, 0, {GGGG[5], 4}] +
s*t^2*u*g[8, T, 0, {GGGG[5], 4}] + t*(s - u)*(s^2 + t^2 + u^2)*
g[8, SmU*T, 0, {GGGG[5], 4}] + (s^2 + t^2 + u^2)*
(s^2*(t - u) + (s - t)*u^2 + t^2*(-s + u))*g[9, Odd3, 0,
{GGGG[5], 4}] + s*t^2*(s - u)*u*g[9, SmU*T, 0, {GGGG[5], 4}],
(-8*G8\[Pi])/(s*t*(s + t)) - (G8\[Pi]*\[Alpha]2^2)/(2*t) +
\[Alpha]2*((-2*G8\[Pi])/(t*(s + t)) - (G8\[Pi]*s*\[Alpha]4)/(2*t)) +
g[4, 0, {GGGG[5], 4}] + (s^2 + t^2 + u^2)*g[6, 0, {GGGG[5], 4}] +
s*t*u*g[7, 0, {GGGG[5], 4}] + (s^2 + t^2 + u^2)^2*
g[8, 0, {GGGG[5], 4}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 4}] + s^2*t^2*u^2*g[10, 1, {GGGG[5], 4}] +
(-s + t)*g[5, SmU, 0, {GGGG[5], 4}] + u*g[5, T, 0, {GGGG[5], 4}] +
(-s + t)*u*g[6, SmU*T, 0, {GGGG[5], 4}] +
u^2*g[6, T^2, 0, {GGGG[5], 4}] + (s^2*(t - u) + (s - t)*u^2 +
t^2*(-s + u))*g[7, Odd3, 0, {GGGG[5], 4}] +
(-s + t)*(s^2 + t^2 + u^2)*g[7, SmU, 0, {GGGG[5], 4}] +
u*(s^2 + t^2 + u^2)*g[7, T, 0, {GGGG[5], 4}] +
s*t*(-s + t)*u*g[8, SmU, 0, {GGGG[5], 4}] +
s*t*u^2*g[8, T, 0, {GGGG[5], 4}] + (-s + t)*u*(s^2 + t^2 + u^2)*
g[8, SmU*T, 0, {GGGG[5], 4}] + (s^2 + t^2 + u^2)*
(s^2*(t - u) + (s - t)*u^2 + t^2*(-s + u))*g[9, Odd3, 0,
{GGGG[5], 4}] + s*t*(-s + t)*u^2*g[9, SmU*T, 0, {GGGG[5], 4}],
(-8*G8\[Pi])/(s*t*(s + t)) + (G8\[Pi]*\[Alpha]2^2)/(2*(s + t)) +
\[Alpha]2*((-2*G8\[Pi])/(s*(s + t)) + (G8\[Pi]*t*\[Alpha]4)/
(2*(s + t))) + g[4, 0, {GGGG[5], 4}] + (s^2 + t^2 + u^2)*
g[6, 0, {GGGG[5], 4}] + s*t*u*g[7, 0, {GGGG[5], 4}] +
(s^2 + t^2 + u^2)^2*g[8, 0, {GGGG[5], 4}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 4}] + s^2*t^2*u^2*g[10, 1, {GGGG[5], 4}] +
(-t + u)*g[5, SmU, 0, {GGGG[5], 4}] + s*g[5, T, 0, {GGGG[5], 4}] +
s*(-t + u)*g[6, SmU*T, 0, {GGGG[5], 4}] +
s^2*g[6, T^2, 0, {GGGG[5], 4}] + (s^2*(t - u) + (s - t)*u^2 +
t^2*(-s + u))*g[7, Odd3, 0, {GGGG[5], 4}] +
(-t + u)*(s^2 + t^2 + u^2)*g[7, SmU, 0, {GGGG[5], 4}] +
s*(s^2 + t^2 + u^2)*g[7, T, 0, {GGGG[5], 4}] +
s*t*u*(-t + u)*g[8, SmU, 0, {GGGG[5], 4}] +
s^2*t*u*g[8, T, 0, {GGGG[5], 4}] + s*(-t + u)*(s^2 + t^2 + u^2)*
g[8, SmU*T, 0, {GGGG[5], 4}] + (s^2 + t^2 + u^2)*
(s^2*(t - u) + (s - t)*u^2 + t^2*(-s + u))*g[9, Odd3, 0,
{GGGG[5], 4}] + s^2*t*u*(-t + u)*g[9, SmU*T, 0, {GGGG[5], 4}],
(-8*G8\[Pi])/(s*t*(s + t)) - (G8\[Pi]*\[Alpha]2^2)/(2*t) +
\[Alpha]2*((2*G8\[Pi])/(s*t) + (G8\[Pi]*(s + t)*\[Alpha]4)/(2*t)) +
g[4, 0, {GGGG[5], 4}] + (s^2 + t^2 + u^2)*g[6, 0, {GGGG[5], 4}] +
s*t*u*g[7, 0, {GGGG[5], 4}] + (s^2 + t^2 + u^2)^2*
g[8, 0, {GGGG[5], 4}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 4}] + s^2*t^2*u^2*g[10, 1, {GGGG[5], 4}] +
(t - u)*g[5, SmU, 0, {GGGG[5], 4}] + s*g[5, T, 0, {GGGG[5], 4}] +
s*(t - u)*g[6, SmU*T, 0, {GGGG[5], 4}] +
s^2*g[6, T^2, 0, {GGGG[5], 4}] + (t^2*(s - u) + (-s + t)*u^2 +
s^2*(-t + u))*g[7, Odd3, 0, {GGGG[5], 4}] + (t - u)*(s^2 + t^2 + u^2)*
g[7, SmU, 0, {GGGG[5], 4}] + s*(s^2 + t^2 + u^2)*
g[7, T, 0, {GGGG[5], 4}] + s*t*(t - u)*u*g[8, SmU, 0, {GGGG[5], 4}] +
s^2*t*u*g[8, T, 0, {GGGG[5], 4}] + s*(t - u)*(s^2 + t^2 + u^2)*
g[8, SmU*T, 0, {GGGG[5], 4}] + (s^2 + t^2 + u^2)*
(t^2*(s - u) + (-s + t)*u^2 + s^2*(-t + u))*
g[9, Odd3, 0, {GGGG[5], 4}] + s^2*t*(t - u)*u*
g[9, SmU*T, 0, {GGGG[5], 4}], (-8*G8\[Pi])/(s*t*(s + t)) +
(G8\[Pi]*\[Alpha]2^2)/(2*(s + t)) +
\[Alpha]2*((-2*G8\[Pi])/(t*(s + t)) + (G8\[Pi]*s*\[Alpha]4)/
(2*(s + t))) + g[4, 0, {GGGG[5], 4}] + (s^2 + t^2 + u^2)*
g[6, 0, {GGGG[5], 4}] + s*t*u*g[7, 0, {GGGG[5], 4}] +
(s^2 + t^2 + u^2)^2*g[8, 0, {GGGG[5], 4}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 4}] + s^2*t^2*u^2*g[10, 1, {GGGG[5], 4}] +
(-s + u)*g[5, SmU, 0, {GGGG[5], 4}] + t*g[5, T, 0, {GGGG[5], 4}] +
t*(-s + u)*g[6, SmU*T, 0, {GGGG[5], 4}] +
t^2*g[6, T^2, 0, {GGGG[5], 4}] + (t^2*(s - u) + (-s + t)*u^2 +
s^2*(-t + u))*g[7, Odd3, 0, {GGGG[5], 4}] +
(-s + u)*(s^2 + t^2 + u^2)*g[7, SmU, 0, {GGGG[5], 4}] +
t*(s^2 + t^2 + u^2)*g[7, T, 0, {GGGG[5], 4}] +
s*t*u*(-s + u)*g[8, SmU, 0, {GGGG[5], 4}] +
s*t^2*u*g[8, T, 0, {GGGG[5], 4}] + t*(-s + u)*(s^2 + t^2 + u^2)*
g[8, SmU*T, 0, {GGGG[5], 4}] + (s^2 + t^2 + u^2)*
(t^2*(s - u) + (-s + t)*u^2 + s^2*(-t + u))*
g[9, Odd3, 0, {GGGG[5], 4}] + s*t^2*u*(-s + u)*
g[9, SmU*T, 0, {GGGG[5], 4}], (-8*G8\[Pi])/(s*t*(s + t)) -
(G8\[Pi]*\[Alpha]2^2)/(2*s) + \[Alpha]2*((-2*G8\[Pi])/(s*(s + t)) -
(G8\[Pi]*t*\[Alpha]4)/(2*s)) + g[4, 0, {GGGG[5], 4}] +
(s^2 + t^2 + u^2)*g[6, 0, {GGGG[5], 4}] + s*t*u*g[7, 0, {GGGG[5], 4}] +
(s^2 + t^2 + u^2)^2*g[8, 0, {GGGG[5], 4}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[9, 0, {GGGG[5], 4}] + s^2*t^2*u^2*g[10, 1, {GGGG[5], 4}] +
(s - t)*g[5, SmU, 0, {GGGG[5], 4}] + u*g[5, T, 0, {GGGG[5], 4}] +
(s - t)*u*g[6, SmU*T, 0, {GGGG[5], 4}] +
u^2*g[6, T^2, 0, {GGGG[5], 4}] + (t^2*(s - u) + (-s + t)*u^2 +
s^2*(-t + u))*g[7, Odd3, 0, {GGGG[5], 4}] + (s - t)*(s^2 + t^2 + u^2)*
g[7, SmU, 0, {GGGG[5], 4}] + u*(s^2 + t^2 + u^2)*
g[7, T, 0, {GGGG[5], 4}] + s*(s - t)*t*u*g[8, SmU, 0, {GGGG[5], 4}] +
s*t*u^2*g[8, T, 0, {GGGG[5], 4}] + (s - t)*u*(s^2 + t^2 + u^2)*
g[8, SmU*T, 0, {GGGG[5], 4}] + (s^2 + t^2 + u^2)*
(t^2*(s - u) + (-s + t)*u^2 + s^2*(-t + u))*
g[9, Odd3, 0, {GGGG[5], 4}] + s*(s - t)*t*u^2*
g[9, SmU*T, 0, {GGGG[5], 4}],
\[Alpha]2*((4*G8\[Pi])/(2*s^2*t + 2*s*t^2) + (G8\[Pi]*\[Alpha]4)/
(2*t)) + g[5, 0, {GGGG[5], 5}] + (s^2 + t^2 + u^2)*
g[7, 0, {GGGG[5], 5}] + s*t*u*g[8, 0, {GGGG[5], 5}] +
(s^2 + t^2 + u^2)^2*g[9, 0, {GGGG[5], 5}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[10, 0, {GGGG[5], 5}] + t*g[6, T, 0, {GGGG[5], 5}] +
t^2*g[7, T^2, 0, {GGGG[5], 5}] + t*(s^2 + t^2 + u^2)*
g[8, T, 0, {GGGG[5], 5}] + s*t^2*u*g[9, T, 0, {GGGG[5], 5}],
\[Alpha]2*((4*G8\[Pi])/(2*s^2*t + 2*s*t^2) - (G8\[Pi]*\[Alpha]4)/
(2*(s + t))) + g[5, 0, {GGGG[5], 5}] + (s^2 + t^2 + u^2)*
g[7, 0, {GGGG[5], 5}] + s*t*u*g[8, 0, {GGGG[5], 5}] +
(s^2 + t^2 + u^2)^2*g[9, 0, {GGGG[5], 5}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[10, 0, {GGGG[5], 5}] + u*g[6, T, 0, {GGGG[5], 5}] +
u^2*g[7, T^2, 0, {GGGG[5], 5}] + u*(s^2 + t^2 + u^2)*
g[8, T, 0, {GGGG[5], 5}] + s*t*u^2*g[9, T, 0, {GGGG[5], 5}],
\[Alpha]2*((4*G8\[Pi])/(2*s^2*t + 2*s*t^2) + (G8\[Pi]*\[Alpha]4)/
(2*s)) + g[5, 0, {GGGG[5], 5}] + (s^2 + t^2 + u^2)*
g[7, 0, {GGGG[5], 5}] + s*t*u*g[8, 0, {GGGG[5], 5}] +
(s^2 + t^2 + u^2)^2*g[9, 0, {GGGG[5], 5}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[10, 0, {GGGG[5], 5}] + s*g[6, T, 0, {GGGG[5], 5}] +
s^2*g[7, T^2, 0, {GGGG[5], 5}] + s*(s^2 + t^2 + u^2)*
g[8, T, 0, {GGGG[5], 5}] + s^2*t*u*g[9, T, 0, {GGGG[5], 5}],
(4*G8\[Pi]*\[Alpha]2)/(s^2*t + s*t^2) - (8*G8\[Pi]*\[Alpha]4)/
(s^2 + s*t) + g[5, 0, {GGGG[5], 6}] + (s^2 + t^2 + u^2)*
g[7, 0, {GGGG[5], 6}] + s*t*u*g[8, 0, {GGGG[5], 6}] +
(s^2 + t^2 + u^2)^2*g[9, 0, {GGGG[5], 6}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[10, 0, {GGGG[5], 6}] + t*g[6, T, 0, {GGGG[5], 6}] +
t^2*g[7, T^2, 0, {GGGG[5], 6}] + t*(s^2 + t^2 + u^2)*
g[8, T, 0, {GGGG[5], 6}] + s*t^2*u*g[9, T, 0, {GGGG[5], 6}],
(4*G8\[Pi]*\[Alpha]2)/(s^2*t + s*t^2) + (8*G8\[Pi]*\[Alpha]4)/(s*t) +
g[5, 0, {GGGG[5], 6}] + (s^2 + t^2 + u^2)*g[7, 0, {GGGG[5], 6}] +
s*t*u*g[8, 0, {GGGG[5], 6}] + (s^2 + t^2 + u^2)^2*
g[9, 0, {GGGG[5], 6}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[10, 0, {GGGG[5], 6}] + u*g[6, T, 0, {GGGG[5], 6}] +
u^2*g[7, T^2, 0, {GGGG[5], 6}] + u*(s^2 + t^2 + u^2)*
g[8, T, 0, {GGGG[5], 6}] + s*t*u^2*g[9, T, 0, {GGGG[5], 6}],
(4*G8\[Pi]*\[Alpha]2)/(s^2*t + s*t^2) - (8*G8\[Pi]*\[Alpha]4)/
(s*t + t^2) + g[5, 0, {GGGG[5], 6}] + (s^2 + t^2 + u^2)*
g[7, 0, {GGGG[5], 6}] + s*t*u*g[8, 0, {GGGG[5], 6}] +
(s^2 + t^2 + u^2)^2*g[9, 0, {GGGG[5], 6}] + 2*s*t*u*(s^2 + t^2 + u^2)*
g[10, 0, {GGGG[5], 6}] + s*g[6, T, 0, {GGGG[5], 6}] +
s^2*g[7, T^2, 0, {GGGG[5], 6}] + s*(s^2 + t^2 + u^2)*
g[8, T, 0, {GGGG[5], 6}] + s^2*t*u*g[9, T, 0, {GGGG[5], 6}],
(-4*G8\[Pi]*\[Alpha]4)/(s*t*(s + t)) + g[6, 0, {GGGG[5], 7}] +
(s^2 + t^2 + u^2)*g[8, 0, {GGGG[5], 7}] + s*t*u*g[9, 0, {GGGG[5], 7}],
(s - u)*(g[13/2, 0, {GGGG[5], 8}] + (s^2 + t^2 + u^2)*
g[17/2, 0, {GGGG[5], 8}] + s*t*u*g[19/2, 0, {GGGG[5], 8}] +
t*g[15/2, T, 0, {GGGG[5], 8}] + t^2*g[17/2, T^2, 0, {GGGG[5], 8}]),
(-s + t)*(g[13/2, 0, {GGGG[5], 8}] + (s^2 + t^2 + u^2)*
g[17/2, 0, {GGGG[5], 8}] + s*t*u*g[19/2, 0, {GGGG[5], 8}] +
u*g[15/2, T, 0, {GGGG[5], 8}] + u^2*g[17/2, T^2, 0, {GGGG[5], 8}]),
(-t + u)*(g[13/2, 0, {GGGG[5], 8}] + (s^2 + t^2 + u^2)*
g[17/2, 0, {GGGG[5], 8}] + s*t*u*g[19/2, 0, {GGGG[5], 8}] +
s*g[15/2, T, 0, {GGGG[5], 8}] + s^2*g[17/2, T^2, 0, {GGGG[5], 8}])}
partialwaves[{GG[5], GG[5]}] = {exchange[{0}, {GGGG[5], s, 1 + (2*t)/s},
{{1}}, {{{0, 0, 1/(5*m2^4), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0}}}], exchange[{1}, {GGGG[5], s, 1 + (2*t)/s},
{{1}}, {{{0, 0, 2/(15*m2^4), 0, 0, 0, 0, 0, 8/(15*m2^4), 8/(15*m2^4),
0, 0, 0, 0, 8/(15*m2^4), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}}}],
exchange[{2}, {GGGG[5], s, 1 + (2*t)/s}, {{1, Sqrt[7]}, {Sqrt[7], 1}},
{{{0, 0, -1/15*1/m2^4 + (4*x^2)/(15*m2^4), 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 2/(105*m2^4) - (2*x^2)/(105*m2^4), 0, 0, 0, 0, 0, 8/(35*m2^4),
8/(35*m2^4) + (8*x)/(35*m2^4), 0, 0, 0, 0, 8/(35*m2^4) -
(8*x)/(35*m2^4), 0, 0, 16/(35*m2^5), 0, 0, 0, 0, 0, 0, 0}},
{{0, 0, 2/(105*m2^4) - (2*x^2)/(105*m2^4), 0, 0, 0, 0, 0, 8/(35*m2^4),
8/(35*m2^4) + (8*x)/(35*m2^4), 0, 0, 0, 0, 8/(35*m2^4) -
(8*x)/(35*m2^4), 0, 0, 16/(35*m2^5), 0, 0, 0, 0, 0, 0, 0},
{0, 0, 1/(21*m2^4) + x^2/(105*m2^4), 12/(35*m2^4), 12/(35*m2^4), 0,
0, 0, -8/(35*m2^4), 16/(35*m2^4) - (8*x)/(35*m2^4), 0, 0, 0, 0,
16/(35*m2^4) + (8*x)/(35*m2^4), 0, 0, -16/(35*m2^5), 0, 0, 0, 0, 0,
0, 0}}}], exchange[{3 + 2*m}, {GGGG[5], s, 1 + (2*t)/s},
{{2/(5*J*(2 + J)*m2^4), 1/(10*Sqrt[-2 + J]*Sqrt[-1 + J]*J*(2 + J)*
Sqrt[3 + J]*Sqrt[4 + J]*m2^5)},
{1/(10*Sqrt[-2 + J]*Sqrt[-1 + J]*J*(2 + J)*Sqrt[3 + J]*Sqrt[4 + J]*
m2^5), 1/(40*(-2 + J)*(-1 + J)*J*(2 + J)*(3 + J)*(4 + J)*m2^5)}},
{{{0, 0, pj[J, x, 5, 1], 0, 0, 0, 0, 0, 4*pj[J, x, 5, 1] +
4*x*pj[J, x, 5, 2], 4*pj[J, x, 5, 1] + (4 + 4*x)*pj[J, x, 5, 2], 0,
0, 0, 0, 4*pj[J, x, 5, 1] + (-4 + 4*x)*pj[J, x, 5, 2], 0, 0, 0, 0,
0, 0, 0, 0, 0, 0}, {0, 0, -3*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] +
15*m2*x*pj[J, x, 5, 2], -20*(-2 + J)*(4 + J)*m2*pj[J, x, 5, 2] +
(60*m2 + 80*m2*x)*pj[J, x, 5, 3] + (-40*m2 + 40*m2*x)*
pj[J, x, 5, 4], 20*(-2 + J)*(4 + J)*m2*pj[J, x, 5, 2] +
(60*m2 - 80*m2*x)*pj[J, x, 5, 3] + (40*m2 + 40*m2*x)*
pj[J, x, 5, 4], 0, 0, 0, 48*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] -
12*(12 + 2*J + J^2)*m2*x*pj[J, x, 5, 2],
48*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] + (-12*(-2 + J)*(4 + J)*m2 -
12*(12 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] + (120*m2 + 120*m2*x)*
pj[J, x, 5, 3], 0, 0, 0, 0, 48*(-1 + J)*(3 + J)*m2*
pj[J, x, 5, 1] + (12*(-2 + J)*(4 + J)*m2 - 12*(12 + 2*J + J^2)*m2*
x)*pj[J, x, 5, 2] + (120*m2 - 120*m2*x)*pj[J, x, 5, 3], 0, 0,
120*pj[J, x, 5, 3], 160*pj[J, x, 5, 4], -160*pj[J, x, 5, 4],
480*pj[J, x, 5, 3] + 160*x*pj[J, x, 5, 4], 0, 0, 0, 0}},
{{0, 0, -3*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] +
15*m2*x*pj[J, x, 5, 2], -20*(-2 + J)*(4 + J)*m2*pj[J, x, 5, 2] +
(60*m2 + 80*m2*x)*pj[J, x, 5, 3] + (-40*m2 + 40*m2*x)*
pj[J, x, 5, 4], 20*(-2 + J)*(4 + J)*m2*pj[J, x, 5, 2] +
(60*m2 - 80*m2*x)*pj[J, x, 5, 3] + (40*m2 + 40*m2*x)*
pj[J, x, 5, 4], 0, 0, 0, 48*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] -
12*(12 + 2*J + J^2)*m2*x*pj[J, x, 5, 2],
48*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] + (-12*(-2 + J)*(4 + J)*m2 -
12*(12 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] + (120*m2 + 120*m2*x)*
pj[J, x, 5, 3], 0, 0, 0, 0, 48*(-1 + J)*(3 + J)*m2*
pj[J, x, 5, 1] + (12*(-2 + J)*(4 + J)*m2 - 12*(12 + 2*J + J^2)*m2*
x)*pj[J, x, 5, 2] + (120*m2 - 120*m2*x)*pj[J, x, 5, 3], 0, 0,
120*pj[J, x, 5, 3], 160*pj[J, x, 5, 4], -160*pj[J, x, 5, 4],
480*pj[J, x, 5, 3] + 160*x*pj[J, x, 5, 4], 0, 0, 0, 0},
{0, 0, 9*(-1 + J)*(3 + J)*(22 + 2*J + J^2)*m2*pj[J, x, 5, 1] -
90*(7 + 2*J + J^2)*m2*x*pj[J, x, 5, 2] + 375*m2*pj[J, x, 5, 3],
120*(-2 + J)*(4 + J)*(12 + 2*J + J^2)*m2*pj[J, x, 5, 2] +
(60*(-417 + 58*J + 29*J^2)*m2 - 360*(16 + 6*J + 3*J^2)*m2*x)*
pj[J, x, 5, 3] + (240*(-18 + 2*J + J^2)*m2 -
60*(153 + 8*J + 4*J^2)*m2*x)*pj[J, x, 5, 4] +
(3000*m2 - 3000*m2*x)*pj[J, x, 5, 5],
-120*(-2 + J)*(4 + J)*(12 + 2*J + J^2)*m2*pj[J, x, 5, 2] +
(60*(-417 + 58*J + 29*J^2)*m2 + 360*(16 + 6*J + 3*J^2)*m2*x)*
pj[J, x, 5, 3] + (-240*(-18 + 2*J + J^2)*m2 -
60*(153 + 8*J + 4*J^2)*m2*x)*pj[J, x, 5, 4] +
(3000*m2 + 3000*m2*x)*pj[J, x, 5, 5], 0,
800*(-18 + 2*J + J^2)*m2*pj[J, x, 5, 3] - 400*(12 + 2*J + J^2)*m2*x*
pj[J, x, 5, 4] + 4400*m2*pj[J, x, 5, 5] + (800*m2 + 800*m2*x)*
pj[J, x, 5, 6], 800*(-18 + 2*J + J^2)*m2*pj[J, x, 5, 3] -
400*(12 + 2*J + J^2)*m2*x*pj[J, x, 5, 4] + 4400*m2*pj[J, x, 5, 5] +
(-800*m2 + 800*m2*x)*pj[J, x, 5, 6],
-108*(-1 + J)*(3 + J)*(16 + 6*J + 3*J^2)*m2*pj[J, x, 5, 1] +
36*(144 + 98*J + 53*J^2 + 4*J^3 + J^4)*m2*x*pj[J, x, 5, 2] -
900*(-21 + 4*J + 2*J^2)*m2*pj[J, x, 5, 3] +
9900*m2*x*pj[J, x, 5, 4], -108*(-1 + J)*(3 + J)*(16 + 6*J + 3*J^2)*
m2*pj[J, x, 5, 1] + (36*(-2 + J)*(4 + J)*(67 + 2*J + J^2)*m2 +
36*(144 + 98*J + 53*J^2 + 4*J^3 + J^4)*m2*x)*pj[J, x, 5, 2] +
(-180*(-27 + 8*J + 4*J^2)*m2 - 360*(29 + 4*J + 2*J^2)*m2*x)*
pj[J, x, 5, 3] + (4500*m2 + 4500*m2*x)*pj[J, x, 5, 4], 0,
-800*(-18 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
(-1200*(-18 + 2*J + J^2)*m2 + 400*(12 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (2800*m2 + 6000*m2*x)*pj[J, x, 5, 5] +
(-1600*m2 + 1600*m2*x)*pj[J, x, 5, 6],
-800*(-18 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
(1200*(-18 + 2*J + J^2)*m2 + 400*(12 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (2800*m2 - 6000*m2*x)*pj[J, x, 5, 5] +
(1600*m2 + 1600*m2*x)*pj[J, x, 5, 6], 0,
-108*(-1 + J)*(3 + J)*(16 + 6*J + 3*J^2)*m2*pj[J, x, 5, 1] +
(-36*(-2 + J)*(4 + J)*(67 + 2*J + J^2)*m2 +
36*(144 + 98*J + 53*J^2 + 4*J^3 + J^4)*m2*x)*pj[J, x, 5, 2] +
(-180*(-27 + 8*J + 4*J^2)*m2 + 360*(29 + 4*J + 2*J^2)*m2*x)*
pj[J, x, 5, 3] + (-4500*m2 + 4500*m2*x)*pj[J, x, 5, 4], 0, 0,
-720*(-13 + 2*J + J^2)*pj[J, x, 5, 3] + 3600*x*pj[J, x, 5, 4],
-960*(-18 + 2*J + J^2)*pj[J, x, 5, 4] + 4800*x*pj[J, x, 5, 5],
960*(-18 + 2*J + J^2)*pj[J, x, 5, 4] - 4800*x*pj[J, x, 5, 5],
1920*(-18 + 2*J + J^2)*pj[J, x, 5, 3] - 960*(12 + 2*J + J^2)*x*
pj[J, x, 5, 4] + 4800*pj[J, x, 5, 5], 0, 0, 0, 0}}}],
exchange[{4 + 2*m}, {GGGG[5], s, 1 + (2*t)/s},
{{1/(5*m2^4), 1/(Sqrt[70]*Sqrt[-1 + J]*Sqrt[J]*Sqrt[2 + J]*Sqrt[3 + J]*
m2^5), 1/(40*Sqrt[14]*Sqrt[-3 + J]*Sqrt[-2 + J]*Sqrt[-1 + J]*
Sqrt[J]*Sqrt[2 + J]*Sqrt[3 + J]*Sqrt[4 + J]*Sqrt[5 + J]*m2^6)},
{1/(Sqrt[70]*Sqrt[-1 + J]*Sqrt[J]*Sqrt[2 + J]*Sqrt[3 + J]*m2^5),
1/(14*(-1 + J)*J*(2 + J)*(3 + J)*m2^5),
1/(112*Sqrt[5]*Sqrt[-3 + J]*Sqrt[-2 + J]*(-1 + J)*J*(2 + J)*(3 + J)*
Sqrt[4 + J]*Sqrt[5 + J]*m2^6)},
{1/(40*Sqrt[14]*Sqrt[-3 + J]*Sqrt[-2 + J]*Sqrt[-1 + J]*Sqrt[J]*
Sqrt[2 + J]*Sqrt[3 + J]*Sqrt[4 + J]*Sqrt[5 + J]*m2^6),
1/(112*Sqrt[5]*Sqrt[-3 + J]*Sqrt[-2 + J]*(-1 + J)*J*(2 + J)*(3 + J)*
Sqrt[4 + J]*Sqrt[5 + J]*m2^6), 1/(4480*(-3 + J)*(-2 + J)*(-1 + J)*J*
(2 + J)*(3 + J)*(4 + J)*(5 + J)*m2^6)}},
{{{0, 0, pj[J, x, 5, 0], 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0}, {0, 0, -(J*(2 + J)*m2*pj[J, x, 5, 0]) +
3*m2*x*pj[J, x, 5, 1], 0, 0, 0, 0, 0, 12*m2*pj[J, x, 5, 2],
(12*m2 + 12*m2*x)*pj[J, x, 5, 2], 0, 0, 0, 0, (12*m2 - 12*m2*x)*
pj[J, x, 5, 2], 0, 0, 24*pj[J, x, 5, 2], 0, 0, 0, 0, 0, 0, 0},
{0, 0, 3*J*(2 + J)*(27 + 2*J + J^2)*m2^2*pj[J, x, 5, 0] -
30*(6 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 1] + 105*m2^2*pj[J, x, 5, 2],
140*(-2 + J)*(4 + J)*m2^2*pj[J, x, 5, 2] - 980*m2^2*x*
pj[J, x, 5, 3] + (280*m2^2 - 280*m2^2*x)*pj[J, x, 5, 4],
140*(-2 + J)*(4 + J)*m2^2*pj[J, x, 5, 2] - 980*m2^2*x*
pj[J, x, 5, 3] + (280*m2^2 + 280*m2^2*x)*pj[J, x, 5, 4], 0, 0, 0,
720*(-2 + J)*(4 + J)*m2^2*pj[J, x, 5, 2] - 5040*m2^2*x*
pj[J, x, 5, 3], 840*(-1 + J)*(3 + J)*m2^2*pj[J, x, 5, 1] +
(-120*(-2 + J)*(4 + J)*m2^2 - 120*(27 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 2] + (840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 3], 0, 0, 0,
0, -840*(-1 + J)*(3 + J)*m2^2*pj[J, x, 5, 1] +
(-120*(-2 + J)*(4 + J)*m2^2 + 120*(27 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 2] + (-840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 3], 0, 0,
-240*(-2 + J)*(4 + J)*m2*pj[J, x, 5, 2] + 1680*m2*x*pj[J, x, 5, 3],
4480*m2*x*pj[J, x, 5, 4], -4480*m2*x*pj[J, x, 5, 4],
4480*m2*pj[J, x, 5, 4], 4480*pj[J, x, 5, 4], 0, 0, 0}},
{{0, 0, -(J*(2 + J)*m2*pj[J, x, 5, 0]) + 3*m2*x*pj[J, x, 5, 1], 0, 0,
0, 0, 0, 12*m2*pj[J, x, 5, 2], (12*m2 + 12*m2*x)*pj[J, x, 5, 2], 0,
0, 0, 0, (12*m2 - 12*m2*x)*pj[J, x, 5, 2], 0, 0, 24*pj[J, x, 5, 2],
0, 0, 0, 0, 0, 0, 0}, {0, 0, J*(2 + J)*(9 + 2*J + J^2)*m2*
pj[J, x, 5, 0] - 6*(3 + 2*J + J^2)*m2*x*pj[J, x, 5, 1] +
27*m2*pj[J, x, 5, 2], 36*(-6 + 2*J + J^2)*m2*pj[J, x, 5, 2] +
(-144*m2 - 108*m2*x)*pj[J, x, 5, 3] + (72*m2 - 72*m2*x)*
pj[J, x, 5, 4], 36*(-6 + 2*J + J^2)*m2*pj[J, x, 5, 2] +
(144*m2 - 108*m2*x)*pj[J, x, 5, 3] + (72*m2 + 72*m2*x)*
pj[J, x, 5, 4], 0, 0, 0, -48*(-15 + 4*J + 2*J^2)*m2*
pj[J, x, 5, 2] + 432*m2*x*pj[J, x, 5, 3],
72*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] + (-24*(-12 + 2*J + J^2)*m2 -
24*(9 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] + (216*m2 + 216*m2*x)*
pj[J, x, 5, 3], 0, 0, 0, 0, -72*(-1 + J)*(3 + J)*m2*
pj[J, x, 5, 1] + (-24*(-12 + 2*J + J^2)*m2 + 24*(9 + 2*J + J^2)*m2*
x)*pj[J, x, 5, 2] + (-216*m2 + 216*m2*x)*pj[J, x, 5, 3], 0, 0,
-48*(-6 + 2*J + J^2)*pj[J, x, 5, 2] + 144*x*pj[J, x, 5, 3], 0, 0, 0,
0, 0, 0, 0}, {0, 0, -3*J*(2 + J)*(180 + 114*J + 61*J^2 + 4*J^3 +
J^4)*m2^2*pj[J, x, 5, 0] + 3*(360 + 402*J + 253*J^2 + 52*J^3 +
13*J^4)*m2^2*x*pj[J, x, 5, 1] - 75*(-12 + 10*J + 5*J^2)*m2^2*
pj[J, x, 5, 2] + 1575*m2^2*x*pj[J, x, 5, 3],
-500*(-2 + J)*(4 + J)*(15 + 2*J + J^2)*m2^2*pj[J, x, 5, 2] +
(-7800*(-3 + J)*(5 + J)*m2^2 + 5000*(6 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 3] + (-100*(-129 + 20*J + 10*J^2)*m2^2 +
200*(219 + 10*J + 5*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-12600*m2^2 + 12600*m2^2*x)*pj[J, x, 5, 5],
-500*(-2 + J)*(4 + J)*(15 + 2*J + J^2)*m2^2*pj[J, x, 5, 2] +
(7800*(-3 + J)*(5 + J)*m2^2 + 5000*(6 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 3] + (-100*(-129 + 20*J + 10*J^2)*m2^2 -
200*(219 + 10*J + 5*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(12600*m2^2 + 12600*m2^2*x)*pj[J, x, 5, 5], 0,
1680*(-36 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] - 18480*m2^2*x*
pj[J, x, 5, 5] + (3360*m2^2 + 3360*m2^2*x)*pj[J, x, 5, 6],
1680*(-36 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] - 18480*m2^2*x*
pj[J, x, 5, 5] + (3360*m2^2 - 3360*m2^2*x)*pj[J, x, 5, 6],
36*(-2 + J)*(4 + J)*(255 + 2*J + J^2)*m2^2*pj[J, x, 5, 2] -
360*(114 + 10*J + 5*J^2)*m2^2*x*pj[J, x, 5, 3] +
1260*m2^2*pj[J, x, 5, 4], -1560*(-1 + J)*(3 + J)*(6 + 2*J + J^2)*
m2^2*pj[J, x, 5, 1] + (12*(-2 + J)*(4 + J)*(915 + 26*J + 13*J^2)*
m2^2 + 156*(180 + 114*J + 61*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 2] + (-120*(-102 + 50*J + 25*J^2)*m2^2 -
120*(402 + 50*J + 25*J^2)*m2^2*x)*pj[J, x, 5, 3] +
(18900*m2^2 + 18900*m2^2*x)*pj[J, x, 5, 4], 0,
5040*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(5040*(-20 + 2*J + J^2)*m2^2 - 1680*(15 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-8400*m2^2 - 28560*m2^2*x)*pj[J, x, 5, 5] +
(6720*m2^2 - 6720*m2^2*x)*pj[J, x, 5, 6],
-5040*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(5040*(-20 + 2*J + J^2)*m2^2 + 1680*(15 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (8400*m2^2 - 28560*m2^2*x)*pj[J, x, 5, 5] +
(6720*m2^2 + 6720*m2^2*x)*pj[J, x, 5, 6], 0,
1560*(-1 + J)*(3 + J)*(6 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] +
(12*(-2 + J)*(4 + J)*(915 + 26*J + 13*J^2)*m2^2 -
156*(180 + 114*J + 61*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(120*(-102 + 50*J + 25*J^2)*m2^2 - 120*(402 + 50*J + 25*J^2)*m2^2*
x)*pj[J, x, 5, 3] + (18900*m2^2 - 18900*m2^2*x)*pj[J, x, 5, 4],
3360*(-12 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (26880*m2 - 10080*m2*x)*
pj[J, x, 5, 5] + (6720*m2 + 6720*m2*x)*pj[J, x, 5, 6],
3360*(-12 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-26880*m2 - 10080*m2*x)*
pj[J, x, 5, 5] + (6720*m2 - 6720*m2*x)*pj[J, x, 5, 6],
312*(-2 + J)*(4 + J)*(15 + 2*J + J^2)*m2*pj[J, x, 5, 2] -
3120*(6 + 2*J + J^2)*m2*x*pj[J, x, 5, 3] + 17640*m2*pj[J, x, 5, 4],
13440*(-3 + J)*(5 + J)*m2*pj[J, x, 5, 3] +
(6720*(-12 + 2*J + J^2)*m2 - 4480*(15 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (40320*m2 - 20160*m2*x)*pj[J, x, 5, 5],
-13440*(-3 + J)*(5 + J)*m2*pj[J, x, 5, 3] +
(6720*(-12 + 2*J + J^2)*m2 + 4480*(15 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (-40320*m2 - 20160*m2*x)*pj[J, x, 5, 5],
-2240*(-96 + 10*J + 5*J^2)*m2*pj[J, x, 5, 4] +
60480*m2*x*pj[J, x, 5, 5], -4480*(-12 + 2*J + J^2)*pj[J, x, 5, 4] +
13440*x*pj[J, x, 5, 5], 0, 0, 0}},
{{0, 0, 3*J*(2 + J)*(27 + 2*J + J^2)*m2^2*pj[J, x, 5, 0] -
30*(6 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 1] + 105*m2^2*pj[J, x, 5, 2],
140*(-2 + J)*(4 + J)*m2^2*pj[J, x, 5, 2] - 980*m2^2*x*
pj[J, x, 5, 3] + (280*m2^2 - 280*m2^2*x)*pj[J, x, 5, 4],
140*(-2 + J)*(4 + J)*m2^2*pj[J, x, 5, 2] - 980*m2^2*x*
pj[J, x, 5, 3] + (280*m2^2 + 280*m2^2*x)*pj[J, x, 5, 4], 0, 0, 0,
720*(-2 + J)*(4 + J)*m2^2*pj[J, x, 5, 2] - 5040*m2^2*x*
pj[J, x, 5, 3], 840*(-1 + J)*(3 + J)*m2^2*pj[J, x, 5, 1] +
(-120*(-2 + J)*(4 + J)*m2^2 - 120*(27 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 2] + (840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 3], 0, 0, 0,
0, -840*(-1 + J)*(3 + J)*m2^2*pj[J, x, 5, 1] +
(-120*(-2 + J)*(4 + J)*m2^2 + 120*(27 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 2] + (-840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 3], 0, 0,
-240*(-2 + J)*(4 + J)*m2*pj[J, x, 5, 2] + 1680*m2*x*pj[J, x, 5, 3],
4480*m2*x*pj[J, x, 5, 4], -4480*m2*x*pj[J, x, 5, 4],
4480*m2*pj[J, x, 5, 4], 4480*pj[J, x, 5, 4], 0, 0, 0},
{0, 0, -3*J*(2 + J)*(180 + 114*J + 61*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 0] + 3*(360 + 402*J + 253*J^2 + 52*J^3 + 13*J^4)*m2^2*
x*pj[J, x, 5, 1] - 75*(-12 + 10*J + 5*J^2)*m2^2*pj[J, x, 5, 2] +
1575*m2^2*x*pj[J, x, 5, 3], -500*(-2 + J)*(4 + J)*(15 + 2*J + J^2)*
m2^2*pj[J, x, 5, 2] + (-7800*(-3 + J)*(5 + J)*m2^2 +
5000*(6 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 3] +
(-100*(-129 + 20*J + 10*J^2)*m2^2 + 200*(219 + 10*J + 5*J^2)*m2^2*
x)*pj[J, x, 5, 4] + (-12600*m2^2 + 12600*m2^2*x)*pj[J, x, 5, 5],
-500*(-2 + J)*(4 + J)*(15 + 2*J + J^2)*m2^2*pj[J, x, 5, 2] +
(7800*(-3 + J)*(5 + J)*m2^2 + 5000*(6 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 3] + (-100*(-129 + 20*J + 10*J^2)*m2^2 -
200*(219 + 10*J + 5*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(12600*m2^2 + 12600*m2^2*x)*pj[J, x, 5, 5], 0,
1680*(-36 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] - 18480*m2^2*x*
pj[J, x, 5, 5] + (3360*m2^2 + 3360*m2^2*x)*pj[J, x, 5, 6],
1680*(-36 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] - 18480*m2^2*x*
pj[J, x, 5, 5] + (3360*m2^2 - 3360*m2^2*x)*pj[J, x, 5, 6],
36*(-2 + J)*(4 + J)*(255 + 2*J + J^2)*m2^2*pj[J, x, 5, 2] -
360*(114 + 10*J + 5*J^2)*m2^2*x*pj[J, x, 5, 3] +
1260*m2^2*pj[J, x, 5, 4], -1560*(-1 + J)*(3 + J)*(6 + 2*J + J^2)*
m2^2*pj[J, x, 5, 1] + (12*(-2 + J)*(4 + J)*(915 + 26*J + 13*J^2)*
m2^2 + 156*(180 + 114*J + 61*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 2] + (-120*(-102 + 50*J + 25*J^2)*m2^2 -
120*(402 + 50*J + 25*J^2)*m2^2*x)*pj[J, x, 5, 3] +
(18900*m2^2 + 18900*m2^2*x)*pj[J, x, 5, 4], 0,
5040*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(5040*(-20 + 2*J + J^2)*m2^2 - 1680*(15 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-8400*m2^2 - 28560*m2^2*x)*pj[J, x, 5, 5] +
(6720*m2^2 - 6720*m2^2*x)*pj[J, x, 5, 6],
-5040*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(5040*(-20 + 2*J + J^2)*m2^2 + 1680*(15 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (8400*m2^2 - 28560*m2^2*x)*pj[J, x, 5, 5] +
(6720*m2^2 + 6720*m2^2*x)*pj[J, x, 5, 6], 0,
1560*(-1 + J)*(3 + J)*(6 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] +
(12*(-2 + J)*(4 + J)*(915 + 26*J + 13*J^2)*m2^2 -
156*(180 + 114*J + 61*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(120*(-102 + 50*J + 25*J^2)*m2^2 - 120*(402 + 50*J + 25*J^2)*m2^2*
x)*pj[J, x, 5, 3] + (18900*m2^2 - 18900*m2^2*x)*pj[J, x, 5, 4],
3360*(-12 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (26880*m2 - 10080*m2*x)*
pj[J, x, 5, 5] + (6720*m2 + 6720*m2*x)*pj[J, x, 5, 6],
3360*(-12 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-26880*m2 - 10080*m2*x)*
pj[J, x, 5, 5] + (6720*m2 - 6720*m2*x)*pj[J, x, 5, 6],
312*(-2 + J)*(4 + J)*(15 + 2*J + J^2)*m2*pj[J, x, 5, 2] -
3120*(6 + 2*J + J^2)*m2*x*pj[J, x, 5, 3] + 17640*m2*pj[J, x, 5, 4],
13440*(-3 + J)*(5 + J)*m2*pj[J, x, 5, 3] +
(6720*(-12 + 2*J + J^2)*m2 - 4480*(15 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (40320*m2 - 20160*m2*x)*pj[J, x, 5, 5],
-13440*(-3 + J)*(5 + J)*m2*pj[J, x, 5, 3] +
(6720*(-12 + 2*J + J^2)*m2 + 4480*(15 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (-40320*m2 - 20160*m2*x)*pj[J, x, 5, 5],
-2240*(-96 + 10*J + 5*J^2)*m2*pj[J, x, 5, 4] +
60480*m2*x*pj[J, x, 5, 5], -4480*(-12 + 2*J + J^2)*pj[J, x, 5, 4] +
13440*x*pj[J, x, 5, 5], 0, 0, 0},
{19600*(-240 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(-235200*(-43 + 2*J + J^2)*m2^2 - 196000*(6 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (19600*(-253 + 16*J + 8*J^2)*m2^2 +
78400*(27 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(78400*m2^2 - 1097600*m2^2*x)*pj[J, x, 5, 7] +
(156800*m2^2 + 156800*m2^2*x)*pj[J, x, 5, 8],
19600*(-240 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(235200*(-43 + 2*J + J^2)*m2^2 - 196000*(6 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (19600*(-253 + 16*J + 8*J^2)*m2^2 -
78400*(27 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-78400*m2^2 - 1097600*m2^2*x)*pj[J, x, 5, 7] +
(156800*m2^2 - 156800*m2^2*x)*pj[J, x, 5, 8],
9*J*(2 + J)*(3600 + 3858*J + 2545*J^2 + 624*J^3 + 166*J^4 + 6*J^5 +
J^6)*m2^2*pj[J, x, 5, 0] - 180*(6 + 2*J + J^2)*
(60 + 74*J + 41*J^2 + 4*J^3 + J^4)*m2^2*x*pj[J, x, 5, 1] +
90*(-7180 + 1938*J + 1117*J^2 + 148*J^3 + 37*J^4)*m2^2*
pj[J, x, 5, 2] - 31500*(13 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 3] +
128625*m2^2*pj[J, x, 5, 4], 4440*(-2 + J)*(4 + J)*
(300 + 154*J + 81*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 2] +
(2400*(-3 + J)*(5 + J)*(1140 + 142*J + 71*J^2)*m2^2 -
4440*(1200 + 898*J + 517*J^2 + 68*J^3 + 17*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (120*(-267900 + 27326*J + 13959*J^2 + 296*J^3 +
74*J^4)*m2^2 - 240*(59040 + 14538*J + 7417*J^2 + 148*J^3 +
37*J^4)*m2^2*x)*pj[J, x, 5, 4] +
(84000*(-10 + 6*J + 3*J^2)*m2^2 - 21000*(499 + 24*J + 12*J^2)*m2^2*
x)*pj[J, x, 5, 5] + (2058000*m2^2 - 2058000*m2^2*x)*
pj[J, x, 5, 6], 4440*(-2 + J)*(4 + J)*(300 + 154*J + 81*J^2 +
4*J^3 + J^4)*m2^2*pj[J, x, 5, 2] +
(-2400*(-3 + J)*(5 + J)*(1140 + 142*J + 71*J^2)*m2^2 -
4440*(1200 + 898*J + 517*J^2 + 68*J^3 + 17*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (120*(-267900 + 27326*J + 13959*J^2 + 296*J^3 +
74*J^4)*m2^2 + 240*(59040 + 14538*J + 7417*J^2 + 148*J^3 +
37*J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-84000*(-10 + 6*J + 3*J^2)*m2^2 - 21000*(499 + 24*J + 12*J^2)*m2^2*
x)*pj[J, x, 5, 5] + (2058000*m2^2 + 2058000*m2^2*x)*
pj[J, x, 5, 6], 117600*(-240 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 4] - 1176000*(6 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 5] +
4116000*m2^2*pj[J, x, 5, 6], 44800*(-342 - 18*J - 5*J^2 + 4*J^3 +
J^4)*m2^2*pj[J, x, 5, 4] + (3763200*m2^2 -
44800*(87 + 22*J + 11*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(89600*(6 + 2*J + J^2)*m2^2 + 89600*(6 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 6], 44800*(-342 - 18*J - 5*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 4] + (-3763200*m2^2 - 44800*(87 + 22*J + 11*J^2)*m2^2*
x)*pj[J, x, 5, 5] + (89600*(6 + 2*J + J^2)*m2^2 -
89600*(6 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6],
-2880*(-2 + J)*(4 + J)*(1005 + 284*J + 146*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 2] + 5760*(2055 + 964*J + 526*J^2 + 44*J^3 + 11*J^4)*
m2^2*x*pj[J, x, 5, 3] - 33600*(-209 + 54*J + 27*J^2)*m2^2*
pj[J, x, 5, 4] + 4704000*m2^2*x*pj[J, x, 5, 5],
720*(-1 + J)*(3 + J)*(1200 + 898*J + 517*J^2 + 68*J^3 + 17*J^4)*m2^2*
pj[J, x, 5, 1] + (-720*(-2 + J)*(4 + J)*(3120 + 674*J + 341*J^2 +
4*J^3 + J^4)*m2^2 - 720*(3600 + 3858*J + 2545*J^2 + 624*J^3 +
166*J^4 + 6*J^5 + J^6)*m2^2*x)*pj[J, x, 5, 2] +
(720*(-27375 + 4108*J + 2202*J^2 + 148*J^3 + 37*J^4)*m2^2 +
720*(12840 + 5018*J + 2657*J^2 + 148*J^3 + 37*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (-42000*(-2 + 3*J)*(8 + 3*J)*m2^2 -
126000*(67 + 6*J + 3*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(2058000*m2^2 + 2058000*m2^2*x)*pj[J, x, 5, 5],
156800*(-240 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(-940800*(-43 + 2*J + J^2)*m2^2 - 1568000*(6 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (156800*(-37 + 4*J + 2*J^2)*m2^2 +
313600*(27 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-2195200*m2^2 - 2195200*m2^2*x)*pj[J, x, 5, 7],
-336000*(-3 + J)*(5 + J)*(6 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(-11200*(-7464 + 182*J + 127*J^2 + 36*J^3 + 9*J^4)*m2^2 +
33600*(300 + 154*J + 81*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 4] + (-67200*(-750 + 58*J + 29*J^2)*m2^2 +
22400*(972 + 142*J + 71*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-11200*(-89 + 24*J + 12*J^2)*m2^2 + 33600*(395 + 8*J + 4*J^2)*m2^2*
x)*pj[J, x, 5, 6] + (-2195200*m2^2 + 2195200*m2^2*x)*
pj[J, x, 5, 7], 336000*(-3 + J)*(5 + J)*(6 + 2*J + J^2)*m2^2*
pj[J, x, 5, 3] + (-11200*(-7464 + 182*J + 127*J^2 + 36*J^3 +
9*J^4)*m2^2 - 33600*(300 + 154*J + 81*J^2 + 4*J^3 + J^4)*m2^2*
x)*pj[J, x, 5, 4] + (67200*(-750 + 58*J + 29*J^2)*m2^2 +
22400*(972 + 142*J + 71*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-11200*(-89 + 24*J + 12*J^2)*m2^2 - 33600*(395 + 8*J + 4*J^2)*m2^2*
x)*pj[J, x, 5, 6] + (2195200*m2^2 + 2195200*m2^2*x)*
pj[J, x, 5, 7], 156800*(-240 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 4] + (940800*(-43 + 2*J + J^2)*m2^2 -
1568000*(6 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 5] +
(156800*(-37 + 4*J + 2*J^2)*m2^2 - 313600*(27 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 6] + (2195200*m2^2 - 2195200*m2^2*x)*pj[J, x, 5, 7],
-720*(-1 + J)*(3 + J)*(1200 + 898*J + 517*J^2 + 68*J^3 + 17*J^4)*
m2^2*pj[J, x, 5, 1] + (-720*(-2 + J)*(4 + J)*(3120 + 674*J +
341*J^2 + 4*J^3 + J^4)*m2^2 + 720*(3600 + 3858*J + 2545*J^2 +
624*J^3 + 166*J^4 + 6*J^5 + J^6)*m2^2*x)*pj[J, x, 5, 2] +
(-720*(-27375 + 4108*J + 2202*J^2 + 148*J^3 + 37*J^4)*m2^2 +
720*(12840 + 5018*J + 2657*J^2 + 148*J^3 + 37*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (-42000*(-2 + 3*J)*(8 + 3*J)*m2^2 +
126000*(67 + 6*J + 3*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-2058000*m2^2 + 2058000*m2^2*x)*pj[J, x, 5, 5],
-67200*(-240 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(403200*(-43 + 2*J + J^2)*m2 + 672000*(6 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (-67200*(-37 + 4*J + 2*J^2)*m2 -
134400*(27 + 2*J + J^2)*m2*x)*pj[J, x, 5, 6] +
(940800*m2 + 940800*m2*x)*pj[J, x, 5, 7],
-67200*(-240 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(-403200*(-43 + 2*J + J^2)*m2 + 672000*(6 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (-67200*(-37 + 4*J + 2*J^2)*m2 +
134400*(27 + 2*J + J^2)*m2*x)*pj[J, x, 5, 6] +
(-940800*m2 + 940800*m2*x)*pj[J, x, 5, 7],
-1440*(-2 + J)*(4 + J)*(300 + 154*J + 81*J^2 + 4*J^3 + J^4)*m2*
pj[J, x, 5, 2] + 1440*(1200 + 898*J + 517*J^2 + 68*J^3 + 17*J^4)*
m2*x*pj[J, x, 5, 3] - 352800*(-12 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
1764000*m2*x*pj[J, x, 5, 5], -268800*(-3 + J)*(5 + J)*
(6 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
(-134400*(-240 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2 +
26880*(300 + 154*J + 81*J^2 + 4*J^3 + J^4)*m2*x)*pj[J, x, 5, 4] +
(-268800*(-52 + 6*J + 3*J^2)*m2 + 1344000*(6 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (-4704000*m2 + 4704000*m2*x)*pj[J, x, 5, 6],
268800*(-3 + J)*(5 + J)*(6 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
(-134400*(-240 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2 -
26880*(300 + 154*J + 81*J^2 + 4*J^3 + J^4)*m2*x)*pj[J, x, 5, 4] +
(268800*(-52 + 6*J + 3*J^2)*m2 + 1344000*(6 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (-4704000*m2 - 4704000*m2*x)*pj[J, x, 5, 6],
53760*(-1740 + 2*J + 13*J^2 + 12*J^3 + 3*J^4)*m2*pj[J, x, 5, 4] -
537600*(45 + 8*J + 4*J^2)*m2*x*pj[J, x, 5, 5] +
9408000*m2*pj[J, x, 5, 6], 26880*(-240 - 26*J - 9*J^2 + 4*J^3 +
J^4)*pj[J, x, 5, 4] - 268800*(6 + 2*J + J^2)*x*pj[J, x, 5, 5] +
940800*pj[J, x, 5, 6], 0, 0, 0}}}], exchange[{2, -2},
{GGGG[5], s, 1 + (2*t)/s}, {{1}},
{{{0, 0, -1/63*1/m2^4 + x^2/(21*m2^4), 4/(21*m2^4), 4/(21*m2^4), 0, 0,
0, 8/(7*m2^4), (-8*x)/(21*m2^4), 0, 0, 0, 0, (8*x)/(21*m2^4), 0, 0,
16/(21*m2^5), 0, 0, 0, 0, 0, 0, 0}}}], exchange[{2, -1},
{GGGG[5], s, 1 + (2*t)/s}, {{1}},
{{{0, 0, -8/(135*m2^4) + (8*x^2)/(45*m2^4), 0, 0, 0, 0, 0,
-32/(135*m2^4), -32/(135*m2^4) - (32*x)/(45*m2^4), 0, 0, 0, 0,
-32/(135*m2^4) + (32*x)/(45*m2^4), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}}}],
exchange[{2, 1}, {GGGG[5], s, 1 + (2*t)/s}, {{1}},
{{{0, 0, -8/(135*m2^4) + (8*x^2)/(45*m2^4), 0, 0, 0, 0, 0,
-32/(135*m2^4), -32/(135*m2^4) - (32*x)/(45*m2^4), 0, 0, 0, 0,
-32/(135*m2^4) + (32*x)/(45*m2^4), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}}}],
exchange[{2, 2}, {GGGG[5], s, 1 + (2*t)/s}, {{1}},
{{{0, 0, -1/63*1/m2^4 + x^2/(21*m2^4), 4/(21*m2^4), 4/(21*m2^4), 0, 0,
0, 8/(7*m2^4), (-8*x)/(21*m2^4), 0, 0, 0, 0, (8*x)/(21*m2^4), 0, 0,
16/(21*m2^5), 0, 0, 0, 0, 0, 0, 0}}}], exchange[{3, -1},
{GGGG[5], s, 1 + (2*t)/s}, {{1}},
{{{0, 0, -3/(112*m2^4) + (9*x^2)/(112*m2^4), -15/(28*m2^4) +
(6*x)/(7*m2^4), -15/(28*m2^4) - (6*x)/(7*m2^4), 0, 0, 0,
-15/(14*m2^4) + (6*x^2)/(7*m2^4), -3/(7*m2^4) - (3*x)/(14*m2^4) +
(6*x^2)/(7*m2^4), 0, 0, 0, 0, -3/(7*m2^4) + (3*x)/(14*m2^4) +
(6*x^2)/(7*m2^4), 0, 0, -3/(7*m2^5), 0, 0, 0, 0, 0, 0, 0}}}],
exchange[{3, 1}, {GGGG[5], s, 1 + (2*t)/s}, {{1}},
{{{0, 0, -3/(112*m2^4) + (9*x^2)/(112*m2^4), -15/(28*m2^4) +
(6*x)/(7*m2^4), -15/(28*m2^4) - (6*x)/(7*m2^4), 0, 0, 0,
-15/(14*m2^4) + (6*x^2)/(7*m2^4), -3/(7*m2^4) - (3*x)/(14*m2^4) +
(6*x^2)/(7*m2^4), 0, 0, 0, 0, -3/(7*m2^4) + (3*x)/(14*m2^4) +
(6*x^2)/(7*m2^4), 0, 0, -3/(7*m2^5), 0, 0, 0, 0, 0, 0, 0}}}],
exchange[{3 + 2*m, -2}, {GGGG[5], s, 1 + (2*t)/s},
{{3/(16*(-2 + J)*J*(1 + J)^2*(2 + J)*(4 + J)*m2^5)}},
{{{0, 0, (-1 + J)*(3 + J)*(4 + 2*J + J^2)*m2*pj[J, x, 5, 1] -
6*(2 + 2*J + J^2)*m2*x*pj[J, x, 5, 2] + 15*m2*pj[J, x, 5, 3],
8*(-2 + J)*(4 + J)*(-2 + 2*J + J^2)*m2*pj[J, x, 5, 2] +
(4*(-145 + 22*J + 11*J^2)*m2 - 8*(-4 + 10*J + 5*J^2)*m2*x)*
pj[J, x, 5, 3] + (16*(-23 + 2*J + J^2)*m2 - 4*(43 + 8*J + 4*J^2)*
m2*x)*pj[J, x, 5, 4] + (120*m2 - 120*m2*x)*pj[J, x, 5, 5],
-8*(-2 + J)*(4 + J)*(-2 + 2*J + J^2)*m2*pj[J, x, 5, 2] +
(4*(-145 + 22*J + 11*J^2)*m2 + 8*(-4 + 10*J + 5*J^2)*m2*x)*
pj[J, x, 5, 3] + (-16*(-23 + 2*J + J^2)*m2 - 4*(43 + 8*J + 4*J^2)*
m2*x)*pj[J, x, 5, 4] + (120*m2 + 120*m2*x)*pj[J, x, 5, 5], 0,
96*(-5 + 2*J + J^2)*m2*pj[J, x, 5, 3] + (64*(6 + 2*J + J^2)*m2 +
48*(-2 + 2*J + J^2)*m2*x)*pj[J, x, 5, 4] + (240*m2 + 64*m2*x)*
pj[J, x, 5, 5] + (32*m2 + 32*m2*x)*pj[J, x, 5, 6],
96*(-5 + 2*J + J^2)*m2*pj[J, x, 5, 3] + (-64*(6 + 2*J + J^2)*m2 +
48*(-2 + 2*J + J^2)*m2*x)*pj[J, x, 5, 4] + (240*m2 - 64*m2*x)*
pj[J, x, 5, 5] + (-32*m2 + 32*m2*x)*pj[J, x, 5, 6],
-4*(-1 + J)*(3 + J)*(-4 + 10*J + 5*J^2)*m2*pj[J, x, 5, 1] +
4*(-4 + 30*J + 19*J^2 + 4*J^3 + J^4)*m2*x*pj[J, x, 5, 2] -
36*(-35 + 4*J + 2*J^2)*m2*pj[J, x, 5, 3] + 396*m2*x*pj[J, x, 5, 4],
-4*(-1 + J)*(3 + J)*(-4 + 10*J + 5*J^2)*m2*pj[J, x, 5, 1] +
(4*(-2 + J)*(4 + J)*(13 + 2*J + J^2)*m2 +
4*(-4 + 30*J + 19*J^2 + 4*J^3 + J^4)*m2*x)*pj[J, x, 5, 2] +
(-12*(-35 + 8*J + 4*J^2)*m2 - 48*(4 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 3] + (180*m2 + 180*m2*x)*pj[J, x, 5, 4], 0,
32*(-5 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
(-16*(-32 + 6*J + 3*J^2)*m2 + 16*(-2 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (240*m2 + 112*m2*x)*pj[J, x, 5, 5] +
(-64*m2 + 64*m2*x)*pj[J, x, 5, 6], 32*(-5 + 2*J + J^2)*m2*
pj[J, x, 5, 3] + (16*(-32 + 6*J + 3*J^2)*m2 + 16*(-2 + 2*J + J^2)*
m2*x)*pj[J, x, 5, 4] + (240*m2 - 112*m2*x)*pj[J, x, 5, 5] +
(64*m2 + 64*m2*x)*pj[J, x, 5, 6], 0,
-4*(-1 + J)*(3 + J)*(-4 + 10*J + 5*J^2)*m2*pj[J, x, 5, 1] +
(-4*(-2 + J)*(4 + J)*(13 + 2*J + J^2)*m2 +
4*(-4 + 30*J + 19*J^2 + 4*J^3 + J^4)*m2*x)*pj[J, x, 5, 2] +
(-12*(-35 + 8*J + 4*J^2)*m2 + 48*(4 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 3] + (-180*m2 + 180*m2*x)*pj[J, x, 5, 4], 0, 0,
-16*(-5 + J)*(7 + J)*pj[J, x, 5, 3] + 144*x*pj[J, x, 5, 4],
64*(16 + 2*J + J^2)*pj[J, x, 5, 4] + 192*x*pj[J, x, 5, 5],
-64*(16 + 2*J + J^2)*pj[J, x, 5, 4] - 192*x*pj[J, x, 5, 5],
128*(-5 + 2*J + J^2)*pj[J, x, 5, 3] + 64*(-2 + 2*J + J^2)*x*
pj[J, x, 5, 4] + 192*pj[J, x, 5, 5], 0, 0, 0, 0}}}],
exchange[{3 + 2*m, 2}, {GGGG[5], s, 1 + (2*t)/s},
{{3/(16*(-2 + J)*J*(1 + J)^2*(2 + J)*(4 + J)*m2^5)}},
{{{0, 0, (-1 + J)*(3 + J)*(4 + 2*J + J^2)*m2*pj[J, x, 5, 1] -
6*(2 + 2*J + J^2)*m2*x*pj[J, x, 5, 2] + 15*m2*pj[J, x, 5, 3],
8*(-2 + J)*(4 + J)*(-2 + 2*J + J^2)*m2*pj[J, x, 5, 2] +
(4*(-145 + 22*J + 11*J^2)*m2 - 8*(-4 + 10*J + 5*J^2)*m2*x)*
pj[J, x, 5, 3] + (16*(-23 + 2*J + J^2)*m2 - 4*(43 + 8*J + 4*J^2)*
m2*x)*pj[J, x, 5, 4] + (120*m2 - 120*m2*x)*pj[J, x, 5, 5],
-8*(-2 + J)*(4 + J)*(-2 + 2*J + J^2)*m2*pj[J, x, 5, 2] +
(4*(-145 + 22*J + 11*J^2)*m2 + 8*(-4 + 10*J + 5*J^2)*m2*x)*
pj[J, x, 5, 3] + (-16*(-23 + 2*J + J^2)*m2 - 4*(43 + 8*J + 4*J^2)*
m2*x)*pj[J, x, 5, 4] + (120*m2 + 120*m2*x)*pj[J, x, 5, 5], 0,
96*(-5 + 2*J + J^2)*m2*pj[J, x, 5, 3] + (64*(6 + 2*J + J^2)*m2 +
48*(-2 + 2*J + J^2)*m2*x)*pj[J, x, 5, 4] + (240*m2 + 64*m2*x)*
pj[J, x, 5, 5] + (32*m2 + 32*m2*x)*pj[J, x, 5, 6],
96*(-5 + 2*J + J^2)*m2*pj[J, x, 5, 3] + (-64*(6 + 2*J + J^2)*m2 +
48*(-2 + 2*J + J^2)*m2*x)*pj[J, x, 5, 4] + (240*m2 - 64*m2*x)*
pj[J, x, 5, 5] + (-32*m2 + 32*m2*x)*pj[J, x, 5, 6],
-4*(-1 + J)*(3 + J)*(-4 + 10*J + 5*J^2)*m2*pj[J, x, 5, 1] +
4*(-4 + 30*J + 19*J^2 + 4*J^3 + J^4)*m2*x*pj[J, x, 5, 2] -
36*(-35 + 4*J + 2*J^2)*m2*pj[J, x, 5, 3] + 396*m2*x*pj[J, x, 5, 4],
-4*(-1 + J)*(3 + J)*(-4 + 10*J + 5*J^2)*m2*pj[J, x, 5, 1] +
(4*(-2 + J)*(4 + J)*(13 + 2*J + J^2)*m2 +
4*(-4 + 30*J + 19*J^2 + 4*J^3 + J^4)*m2*x)*pj[J, x, 5, 2] +
(-12*(-35 + 8*J + 4*J^2)*m2 - 48*(4 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 3] + (180*m2 + 180*m2*x)*pj[J, x, 5, 4], 0,
32*(-5 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
(-16*(-32 + 6*J + 3*J^2)*m2 + 16*(-2 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (240*m2 + 112*m2*x)*pj[J, x, 5, 5] +
(-64*m2 + 64*m2*x)*pj[J, x, 5, 6], 32*(-5 + 2*J + J^2)*m2*
pj[J, x, 5, 3] + (16*(-32 + 6*J + 3*J^2)*m2 + 16*(-2 + 2*J + J^2)*
m2*x)*pj[J, x, 5, 4] + (240*m2 - 112*m2*x)*pj[J, x, 5, 5] +
(64*m2 + 64*m2*x)*pj[J, x, 5, 6], 0,
-4*(-1 + J)*(3 + J)*(-4 + 10*J + 5*J^2)*m2*pj[J, x, 5, 1] +
(-4*(-2 + J)*(4 + J)*(13 + 2*J + J^2)*m2 +
4*(-4 + 30*J + 19*J^2 + 4*J^3 + J^4)*m2*x)*pj[J, x, 5, 2] +
(-12*(-35 + 8*J + 4*J^2)*m2 + 48*(4 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 3] + (-180*m2 + 180*m2*x)*pj[J, x, 5, 4], 0, 0,
-16*(-5 + J)*(7 + J)*pj[J, x, 5, 3] + 144*x*pj[J, x, 5, 4],
64*(16 + 2*J + J^2)*pj[J, x, 5, 4] + 192*x*pj[J, x, 5, 5],
-64*(16 + 2*J + J^2)*pj[J, x, 5, 4] - 192*x*pj[J, x, 5, 5],
128*(-5 + 2*J + J^2)*pj[J, x, 5, 3] + 64*(-2 + 2*J + J^2)*x*
pj[J, x, 5, 4] + 192*pj[J, x, 5, 5], 0, 0, 0, 0}}}],
exchange[{4 + 2*m, -4}, {GGGG[5], s, 1 + (2*t)/s},
{{1/(256*(-2 + J)*(-1 + J)*J*(1 + J)^2*(2 + J)*(3 + J)*(4 + J)*m2^6)}},
{{{16*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(192*(7 + 6*J + 3*J^2)*m2^2 + 96*(2 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (16*(67 + 16*J + 8*J^2)*m2^2 + 64*(3 + 2*J + J^2)*
m2^2*x)*pj[J, x, 5, 6] + (1088*m2^2 + 128*m2^2*x)*
pj[J, x, 5, 7] + (128*m2^2 + 128*m2^2*x)*pj[J, x, 5, 8],
16*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(-192*(7 + 6*J + 3*J^2)*m2^2 + 96*(2 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (16*(67 + 16*J + 8*J^2)*m2^2 - 64*(3 + 2*J + J^2)*
m2^2*x)*pj[J, x, 5, 6] + (-1088*m2^2 + 128*m2^2*x)*
pj[J, x, 5, 7] + (128*m2^2 - 128*m2^2*x)*pj[J, x, 5, 8],
(-2 + J)*(-1 + J)^2*J*(2 + J)*(3 + J)^2*(4 + J)*m2^2*
pj[J, x, 5, 0] - 4*(-2 + J)*(-1 + J)*J*(2 + J)*(3 + J)*(4 + J)*
m2^2*x*pj[J, x, 5, 1] + 6*(-2 + J)*(4 + J)*(-5 + 6*J + 3*J^2)*m2^2*
pj[J, x, 5, 2] - 60*(-1 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 3] +
105*m2^2*pj[J, x, 5, 4], 24*(-2 + J)*(4 + J)*(-36 - 22*J - 7*J^2 +
4*J^3 + J^4)*m2^2*pj[J, x, 5, 2] +
(96*(-3 + J)*(5 + J)*(6 + 2*J + J^2)*m2^2 - 24*(-2 + J)*(4 + J)*
(9 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 3] +
(24*(348 - 122*J - 53*J^2 + 8*J^3 + 2*J^4)*m2^2 -
48*(36 - 6*J + J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(480*(-22 + 2*J + J^2)*m2^2 - 120*(-11 + 8*J + 4*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (1680*m2^2 - 1680*m2^2*x)*pj[J, x, 5, 6],
24*(-2 + J)*(4 + J)*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 2] + (-96*(-3 + J)*(5 + J)*(6 + 2*J + J^2)*m2^2 -
24*(-2 + J)*(4 + J)*(9 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 3] +
(24*(348 - 122*J - 53*J^2 + 8*J^3 + 2*J^4)*m2^2 +
48*(36 - 6*J + J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-480*(-22 + 2*J + J^2)*m2^2 - 120*(-11 + 8*J + 4*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (1680*m2^2 + 1680*m2^2*x)*pj[J, x, 5, 6],
1120*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
6720*(2 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 5] +
3360*m2^2*pj[J, x, 5, 6], -3072*(-3 + J)*(5 + J)*(2 + 2*J + J^2)*
m2^2*pj[J, x, 5, 3] + (-1024*(-9 + 14*J + 11*J^2 + 4*J^3 + J^4)*
m2^2 - 512*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 4] + (-1024*(-8 + 14*J + 7*J^2)*m2^2 -
1536*(-1 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-512*(-1 + 4*J + 2*J^2)*m2^2 - 512*(-1 + 4*J + 2*J^2)*m2^2*x)*
pj[J, x, 5, 6], 3072*(-3 + J)*(5 + J)*(2 + 2*J + J^2)*m2^2*
pj[J, x, 5, 3] + (-1024*(-9 + 14*J + 11*J^2 + 4*J^3 + J^4)*m2^2 +
512*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(1024*(-8 + 14*J + 7*J^2)*m2^2 - 1536*(-1 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-512*(-1 + 4*J + 2*J^2)*m2^2 +
512*(-1 + 4*J + 2*J^2)*m2^2*x)*pj[J, x, 5, 6],
128*(-3 + J)*(-2 + J)*(4 + J)*(5 + J)*(3 + 2*J + J^2)*m2^2*
pj[J, x, 5, 2] - 768*(-3 + J)*(5 + J)*m2^2*x*pj[J, x, 5, 3] -
1152*(-21 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] +
3840*m2^2*x*pj[J, x, 5, 5], 16*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*
(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] +
(-16*(-2 + J)*(4 + J)*(36 - 6*J + J^2 + 4*J^3 + J^4)*m2^2 -
16*(-2 + J)*(-1 + J)^2*(3 + J)^2*(4 + J)*m2^2*x)*pj[J, x, 5, 2] +
(48*(131 - 100*J - 38*J^2 + 12*J^3 + 3*J^4)*m2^2 +
48*(24 - 26*J - J^2 + 12*J^3 + 3*J^4)*m2^2*x)*pj[J, x, 5, 3] +
(-720*(-12 + 2*J + J^2)*m2^2 - 240*(-5 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 4] + (1680*m2^2 + 1680*m2^2*x)*pj[J, x, 5, 5],
-896*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(-5376*(7 + 6*J + 3*J^2)*m2^2 - 5376*(2 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-896*(19 + 4*J + 2*J^2)*m2^2 -
1792*(3 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-1792*m2^2 - 1792*m2^2*x)*pj[J, x, 5, 7],
384*(-3 + J)*(5 + J)*(2 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(-192*(-4 + J)*(6 + J)*(3 + 2*J + J^2)*m2^2 +
64*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(128*(-92 + 2*J + J^2)*m2^2 + 384*(6 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-64*(-207 + 8*J + 4*J^2)*m2^2 +
64*(-25 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-1792*m2^2 + 1792*m2^2*x)*pj[J, x, 5, 7],
-384*(-3 + J)*(5 + J)*(2 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(-192*(-4 + J)*(6 + J)*(3 + 2*J + J^2)*m2^2 -
64*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-128*(-92 + 2*J + J^2)*m2^2 + 384*(6 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-64*(-207 + 8*J + 4*J^2)*m2^2 -
64*(-25 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(1792*m2^2 + 1792*m2^2*x)*pj[J, x, 5, 7],
-896*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(5376*(7 + 6*J + 3*J^2)*m2^2 - 5376*(2 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-896*(19 + 4*J + 2*J^2)*m2^2 +
1792*(3 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(1792*m2^2 - 1792*m2^2*x)*pj[J, x, 5, 7],
-16*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*(9 + 2*J + J^2)*m2^2*
pj[J, x, 5, 1] + (-16*(-2 + J)*(4 + J)*(36 - 6*J + J^2 + 4*J^3 +
J^4)*m2^2 + 16*(-2 + J)*(-1 + J)^2*(3 + J)^2*(4 + J)*m2^2*x)*
pj[J, x, 5, 2] + (-48*(131 - 100*J - 38*J^2 + 12*J^3 + 3*J^4)*
m2^2 + 48*(24 - 26*J - J^2 + 12*J^3 + 3*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (-720*(-12 + 2*J + J^2)*m2^2 +
240*(-5 + 6*J + 3*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-1680*m2^2 + 1680*m2^2*x)*pj[J, x, 5, 5],
384*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(2304*(7 + 6*J + 3*J^2)*m2 + 2304*(2 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (384*(19 + 4*J + 2*J^2)*m2 + 768*(3 + 2*J + J^2)*
m2*x)*pj[J, x, 5, 6] + (768*m2 + 768*m2*x)*pj[J, x, 5, 7],
384*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(-2304*(7 + 6*J + 3*J^2)*m2 + 2304*(2 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (384*(19 + 4*J + 2*J^2)*m2 - 768*(3 + 2*J + J^2)*
m2*x)*pj[J, x, 5, 6] + (-768*m2 + 768*m2*x)*pj[J, x, 5, 7],
96*(-2 + J)*(4 + J)*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2*
pj[J, x, 5, 2] - 96*(-2 + J)*(4 + J)*(9 + 2*J + J^2)*m2*x*
pj[J, x, 5, 3] - 288*(-36 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
1440*m2*x*pj[J, x, 5, 5], -4608*(-3 + J)*(5 + J)*(2 + 2*J + J^2)*m2*
pj[J, x, 5, 3] + (-1280*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2 -
768*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2*x)*pj[J, x, 5, 4] +
(1536*(22 + 2*J + J^2)*m2 - 7680*(2 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (-3840*m2 + 3840*m2*x)*pj[J, x, 5, 6],
4608*(-3 + J)*(5 + J)*(2 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
(-1280*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2 +
768*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2*x)*pj[J, x, 5, 4] +
(-1536*(22 + 2*J + J^2)*m2 - 7680*(2 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (-3840*m2 - 3840*m2*x)*pj[J, x, 5, 6],
512*(288 + 278*J + 143*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
3072*(8 + 6*J + 3*J^2)*m2*x*pj[J, x, 5, 5] +
7680*m2*pj[J, x, 5, 6], 256*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*
pj[J, x, 5, 4] + 1536*(2 + 2*J + J^2)*x*pj[J, x, 5, 5] +
768*pj[J, x, 5, 6], 0, 0, 0}}}], exchange[{4 + 2*m, -3},
{GGGG[5], s, 1 + (2*t)/s},
{{1/(32*(-1 + J)*J*(1 + J)^2*(2 + J)*(3 + J)*m2^5)}},
{{{0, 0, (-1 + J)*J*(2 + J)*(3 + J)*(-2 + 2*J + J^2)*m2*
pj[J, x, 5, 0] - 3*(-1 + J)*J*(2 + J)*(3 + J)*m2*x*
pj[J, x, 5, 1] + 3*(-14 + 6*J + 3*J^2)*m2*pj[J, x, 5, 2] -
15*m2*x*pj[J, x, 5, 3], 12*(-2 + J)*(4 + J)*(3 + 2*J + J^2)*m2*
pj[J, x, 5, 2] + (-24*(-3 + J)*(5 + J)*m2 - 72*m2*x)*
pj[J, x, 5, 3] + (12*(-51 + 4*J + 2*J^2)*m2 - 24*(-1 + J)*(3 + J)*
m2*x)*pj[J, x, 5, 4] + (120*m2 - 120*m2*x)*pj[J, x, 5, 5],
12*(-2 + J)*(4 + J)*(3 + 2*J + J^2)*m2*pj[J, x, 5, 2] +
(24*(-3 + J)*(5 + J)*m2 - 72*m2*x)*pj[J, x, 5, 3] +
(12*(-51 + 4*J + 2*J^2)*m2 + 24*(-1 + J)*(3 + J)*m2*x)*
pj[J, x, 5, 4] + (-120*m2 - 120*m2*x)*pj[J, x, 5, 5], 0,
-128*(15 + 14*J + 7*J^2)*m2*pj[J, x, 5, 3] +
(-144*(6 + 2*J + J^2)*m2 - 128*(3 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (-320*m2 - 144*m2*x)*pj[J, x, 5, 5] +
(-32*m2 - 32*m2*x)*pj[J, x, 5, 6], 128*(15 + 14*J + 7*J^2)*m2*
pj[J, x, 5, 3] + (-144*(6 + 2*J + J^2)*m2 + 128*(3 + 2*J + J^2)*m2*
x)*pj[J, x, 5, 4] + (320*m2 - 144*m2*x)*pj[J, x, 5, 5] +
(-32*m2 + 32*m2*x)*pj[J, x, 5, 6], 12*(-2 + J)*(4 + J)*
(21 + 10*J + 5*J^2)*m2*pj[J, x, 5, 2] + 72*(-7 + 2*J + J^2)*m2*x*
pj[J, x, 5, 3] - 396*m2*pj[J, x, 5, 4],
72*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] +
(-12*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*m2 - 12*(-1 + J)*(3 + J)*
(-2 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] +
(72*(-10 + 2*J + J^2)*m2 + 72*(-1 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 3] + (-180*m2 - 180*m2*x)*pj[J, x, 5, 4], 0,
16*(15 + 14*J + 7*J^2)*m2*pj[J, x, 5, 3] +
(-48*(6 + 2*J + J^2)*m2 + 16*(3 + 2*J + J^2)*m2*x)*pj[J, x, 5, 4] +
(400*m2 - 48*m2*x)*pj[J, x, 5, 5] + (-64*m2 + 64*m2*x)*
pj[J, x, 5, 6], -16*(15 + 14*J + 7*J^2)*m2*pj[J, x, 5, 3] +
(-48*(6 + 2*J + J^2)*m2 - 16*(3 + 2*J + J^2)*m2*x)*pj[J, x, 5, 4] +
(-400*m2 - 48*m2*x)*pj[J, x, 5, 5] + (-64*m2 - 64*m2*x)*
pj[J, x, 5, 6], 0, -72*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] +
(-12*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*m2 + 12*(-1 + J)*(3 + J)*
(-2 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] +
(-72*(-10 + 2*J + J^2)*m2 + 72*(-1 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 3] + (-180*m2 + 180*m2*x)*pj[J, x, 5, 4], 0, 0,
48*(-2 + J)*(4 + J)*(3 + 2*J + J^2)*pj[J, x, 5, 2] -
288*x*pj[J, x, 5, 3] - 144*pj[J, x, 5, 4],
-192*(15 + 14*J + 7*J^2)*pj[J, x, 5, 3] - 192*(3 + 2*J + J^2)*x*
pj[J, x, 5, 4] - 192*pj[J, x, 5, 5],
192*(15 + 14*J + 7*J^2)*pj[J, x, 5, 3] + 192*(3 + 2*J + J^2)*x*
pj[J, x, 5, 4] + 192*pj[J, x, 5, 5],
-192*(6 + 2*J + J^2)*pj[J, x, 5, 4] - 192*x*pj[J, x, 5, 5], 0, 0, 0,
0}}}], exchange[{4 + 2*m, -2}, {GGGG[5], s, 1 + (2*t)/s},
{{3/(28*J*(1 + J)^2*(2 + J)*m2^5), Sqrt[3]/(112*Sqrt[-3 + J]*
Sqrt[-2 + J]*J*(1 + J)^2*(2 + J)*Sqrt[4 + J]*Sqrt[5 + J]*m2^6)},
{Sqrt[3]/(112*Sqrt[-3 + J]*Sqrt[-2 + J]*J*(1 + J)^2*(2 + J)*
Sqrt[4 + J]*Sqrt[5 + J]*m2^6), 1/(448*(-3 + J)*(-2 + J)*J*(1 + J)^2*
(2 + J)*(4 + J)*(5 + J)*m2^6)}},
{{{0, 0, J*(2 + J)*(-1 + 2*J + J^2)*m2*pj[J, x, 5, 0] -
2*J*(2 + J)*m2*x*pj[J, x, 5, 1] + 3*m2*pj[J, x, 5, 2],
4*(4 + 2*J + J^2)*m2*pj[J, x, 5, 2] + (-32*m2 + 4*m2*x)*
pj[J, x, 5, 3] + (8*m2 - 8*m2*x)*pj[J, x, 5, 4],
4*(4 + 2*J + J^2)*m2*pj[J, x, 5, 2] + (32*m2 + 4*m2*x)*
pj[J, x, 5, 3] + (8*m2 + 8*m2*x)*pj[J, x, 5, 4], 0, 0, 0,
16*(10 + 2*J + J^2)*m2*pj[J, x, 5, 2] + 48*m2*x*pj[J, x, 5, 3],
-8*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] + (-8*(-2 + J)*(4 + J)*m2 -
8*(-1 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] + (24*m2 + 24*m2*x)*
pj[J, x, 5, 3], 0, 0, 0, 0, 8*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] +
(-8*(-2 + J)*(4 + J)*m2 + 8*(-1 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] +
(-24*m2 + 24*m2*x)*pj[J, x, 5, 3], 0, 0,
16*(4 + 2*J + J^2)*pj[J, x, 5, 2] + 16*x*pj[J, x, 5, 3], 0, 0, 0, 0,
0, 0, 0}, {0, 0, -(J*(2 + J)*(-6 + 38*J + 23*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 0]) + 3*J*(2 + J)*(11 + 6*J + 3*J^2)*m2^2*x*
pj[J, x, 5, 1] - 15*(-10 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 2] +
105*m2^2*x*pj[J, x, 5, 3], -60*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*
m2^2*pj[J, x, 5, 2] + (-360*(-3 + J)*(5 + J)*m2^2 +
360*(-1 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 3] +
(-60*(-37 + 4*J + 2*J^2)*m2^2 + 120*(13 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 5],
-60*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*m2^2*pj[J, x, 5, 2] +
(360*(-3 + J)*(5 + J)*m2^2 + 360*(-1 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 3] + (-60*(-37 + 4*J + 2*J^2)*m2^2 -
120*(13 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 4] +
(840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 5], 0,
448*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(560*(-6 + 2*J + J^2)*m2^2 + 448*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (448*m2^2 - 784*m2^2*x)*pj[J, x, 5, 5] +
(224*m2^2 + 224*m2^2*x)*pj[J, x, 5, 6],
-448*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(560*(-6 + 2*J + J^2)*m2^2 - 448*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (-448*m2^2 - 784*m2^2*x)*pj[J, x, 5, 5] +
(224*m2^2 - 224*m2^2*x)*pj[J, x, 5, 6],
-4*(-2 + J)*(4 + J)*(-219 + 50*J + 25*J^2)*m2^2*pj[J, x, 5, 2] +
24*(-103 + 38*J + 19*J^2)*m2^2*x*pj[J, x, 5, 3] +
84*m2^2*pj[J, x, 5, 4], -216*(-1 + J)*(3 + J)*(-1 + 2*J + J^2)*m2^2*
pj[J, x, 5, 1] + (36*(-2 + J)*(4 + J)*(13 + 2*J + J^2)*m2^2 +
36*(-6 + 38*J + 23*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(-72*(-33 + 10*J + 5*J^2)*m2^2 - 72*(23 + 10*J + 5*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (1260*m2^2 + 1260*m2^2*x)*pj[J, x, 5, 4], 0,
-112*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(336*(-14 + 2*J + J^2)*m2^2 - 112*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (-1456*m2^2 - 1008*m2^2*x)*pj[J, x, 5, 5] +
(448*m2^2 - 448*m2^2*x)*pj[J, x, 5, 6],
112*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(336*(-14 + 2*J + J^2)*m2^2 + 112*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (1456*m2^2 - 1008*m2^2*x)*pj[J, x, 5, 5] +
(448*m2^2 + 448*m2^2*x)*pj[J, x, 5, 6], 0,
216*(-1 + J)*(3 + J)*(-1 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] +
(36*(-2 + J)*(4 + J)*(13 + 2*J + J^2)*m2^2 -
36*(-6 + 38*J + 23*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(72*(-33 + 10*J + 5*J^2)*m2^2 - 72*(23 + 10*J + 5*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (1260*m2^2 - 1260*m2^2*x)*pj[J, x, 5, 4],
224*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (2688*m2 + 224*m2*x)*
pj[J, x, 5, 5] + (448*m2 + 448*m2*x)*pj[J, x, 5, 6],
224*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-2688*m2 + 224*m2*x)*
pj[J, x, 5, 5] + (448*m2 - 448*m2*x)*pj[J, x, 5, 6],
40*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*m2*pj[J, x, 5, 2] -
240*(-1 + 2*J + J^2)*m2*x*pj[J, x, 5, 3] + 1176*m2*pj[J, x, 5, 4],
-1344*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (2688*m2 - 1344*m2*x)*
pj[J, x, 5, 5], -1344*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
(-2688*m2 - 1344*m2*x)*pj[J, x, 5, 5],
1344*(16 + 2*J + J^2)*m2*pj[J, x, 5, 4] + 4032*m2*x*pj[J, x, 5, 5],
896*(6 + 2*J + J^2)*pj[J, x, 5, 4] + 896*x*pj[J, x, 5, 5],
(-5376*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((-896*I)*(1 + J)*Sqrt[m2] - (896*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (5376*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((-896*I)*(1 + J)*Sqrt[m2] + (896*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (448*I)*(-3 + J)*(1 + J)*(5 + J)*Sqrt[m2]*
pj[J, x, 5, 3] - (1344*I)*(1 + J)*Sqrt[m2]*x*pj[J, x, 5, 4]}},
{{0, 0, -(J*(2 + J)*(-6 + 38*J + 23*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 0]) + 3*J*(2 + J)*(11 + 6*J + 3*J^2)*m2^2*x*
pj[J, x, 5, 1] - 15*(-10 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 2] +
105*m2^2*x*pj[J, x, 5, 3], -60*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*
m2^2*pj[J, x, 5, 2] + (-360*(-3 + J)*(5 + J)*m2^2 +
360*(-1 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 3] +
(-60*(-37 + 4*J + 2*J^2)*m2^2 + 120*(13 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 5],
-60*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*m2^2*pj[J, x, 5, 2] +
(360*(-3 + J)*(5 + J)*m2^2 + 360*(-1 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 3] + (-60*(-37 + 4*J + 2*J^2)*m2^2 -
120*(13 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 4] +
(840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 5], 0,
448*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(560*(-6 + 2*J + J^2)*m2^2 + 448*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (448*m2^2 - 784*m2^2*x)*pj[J, x, 5, 5] +
(224*m2^2 + 224*m2^2*x)*pj[J, x, 5, 6],
-448*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(560*(-6 + 2*J + J^2)*m2^2 - 448*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (-448*m2^2 - 784*m2^2*x)*pj[J, x, 5, 5] +
(224*m2^2 - 224*m2^2*x)*pj[J, x, 5, 6],
-4*(-2 + J)*(4 + J)*(-219 + 50*J + 25*J^2)*m2^2*pj[J, x, 5, 2] +
24*(-103 + 38*J + 19*J^2)*m2^2*x*pj[J, x, 5, 3] +
84*m2^2*pj[J, x, 5, 4], -216*(-1 + J)*(3 + J)*(-1 + 2*J + J^2)*m2^2*
pj[J, x, 5, 1] + (36*(-2 + J)*(4 + J)*(13 + 2*J + J^2)*m2^2 +
36*(-6 + 38*J + 23*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(-72*(-33 + 10*J + 5*J^2)*m2^2 - 72*(23 + 10*J + 5*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (1260*m2^2 + 1260*m2^2*x)*pj[J, x, 5, 4], 0,
-112*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(336*(-14 + 2*J + J^2)*m2^2 - 112*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (-1456*m2^2 - 1008*m2^2*x)*pj[J, x, 5, 5] +
(448*m2^2 - 448*m2^2*x)*pj[J, x, 5, 6],
112*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(336*(-14 + 2*J + J^2)*m2^2 + 112*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (1456*m2^2 - 1008*m2^2*x)*pj[J, x, 5, 5] +
(448*m2^2 + 448*m2^2*x)*pj[J, x, 5, 6], 0,
216*(-1 + J)*(3 + J)*(-1 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] +
(36*(-2 + J)*(4 + J)*(13 + 2*J + J^2)*m2^2 -
36*(-6 + 38*J + 23*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(72*(-33 + 10*J + 5*J^2)*m2^2 - 72*(23 + 10*J + 5*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (1260*m2^2 - 1260*m2^2*x)*pj[J, x, 5, 4],
224*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (2688*m2 + 224*m2*x)*
pj[J, x, 5, 5] + (448*m2 + 448*m2*x)*pj[J, x, 5, 6],
224*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-2688*m2 + 224*m2*x)*
pj[J, x, 5, 5] + (448*m2 - 448*m2*x)*pj[J, x, 5, 6],
40*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*m2*pj[J, x, 5, 2] -
240*(-1 + 2*J + J^2)*m2*x*pj[J, x, 5, 3] + 1176*m2*pj[J, x, 5, 4],
-1344*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (2688*m2 - 1344*m2*x)*
pj[J, x, 5, 5], -1344*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
(-2688*m2 - 1344*m2*x)*pj[J, x, 5, 5],
1344*(16 + 2*J + J^2)*m2*pj[J, x, 5, 4] + 4032*m2*x*pj[J, x, 5, 5],
896*(6 + 2*J + J^2)*pj[J, x, 5, 4] + 896*x*pj[J, x, 5, 5],
(5376*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((896*I)*(1 + J)*Sqrt[m2] + (896*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (-5376*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((896*I)*(1 + J)*Sqrt[m2] - (896*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (-448*I)*(-3 + J)*(1 + J)*(5 + J)*Sqrt[m2]*
pj[J, x, 5, 3] + (1344*I)*(1 + J)*Sqrt[m2]*x*pj[J, x, 5, 4]},
{784*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(150528*m2^2 - 4704*(-1 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 5] +
(784*(-221 + 16*J + 8*J^2)*m2^2 + 3136*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 6] + (15680*m2^2 - 31360*m2^2*x)*pj[J, x, 5, 7] +
(6272*m2^2 + 6272*m2^2*x)*pj[J, x, 5, 8],
784*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(-150528*m2^2 - 4704*(-1 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 5] +
(784*(-221 + 16*J + 8*J^2)*m2^2 - 3136*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 6] + (-15680*m2^2 - 31360*m2^2*x)*pj[J, x, 5, 7] +
(6272*m2^2 - 6272*m2^2*x)*pj[J, x, 5, 8],
J*(2 + J)*(-36 + 678*J + 691*J^2 + 360*J^3 + 100*J^4 + 6*J^5 + J^6)*
m2^2*pj[J, x, 5, 0] - 2*J*(2 + J)*(309 + 346*J + 205*J^2 +
32*J^3 + 8*J^4)*m2^2*x*pj[J, x, 5, 1] +
6*(-3650 + 656*J + 484*J^2 + 156*J^3 + 39*J^4)*m2^2*
pj[J, x, 5, 2] - 210*(55 + 16*J + 8*J^2)*m2^2*x*pj[J, x, 5, 3] +
5145*m2^2*pj[J, x, 5, 4], 312*(-2 + J)*(4 + J)*(-18 + 62*J +
35*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 2] +
(48*(-3 + J)*(5 + J)*(843 + 358*J + 179*J^2)*m2^2 -
312*(-36 + 242*J + 173*J^2 + 52*J^3 + 13*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (24*(-37 + 4*J + 2*J^2)*(1254 + 26*J + 13*J^2)*
m2^2 - 48*(4059 + 2832*J + 1468*J^2 + 52*J^3 + 13*J^4)*m2^2*x)*
pj[J, x, 5, 4] + (6720*(-23 + 4*J + 2*J^2)*m2^2 -
840*(355 + 32*J + 16*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(82320*m2^2 - 82320*m2^2*x)*pj[J, x, 5, 6],
312*(-2 + J)*(4 + J)*(-18 + 62*J + 35*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 2] + (-48*(-3 + J)*(5 + J)*(843 + 358*J + 179*J^2)*
m2^2 - 312*(-36 + 242*J + 173*J^2 + 52*J^3 + 13*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (24*(-37 + 4*J + 2*J^2)*(1254 + 26*J + 13*J^2)*
m2^2 + 48*(4059 + 2832*J + 1468*J^2 + 52*J^3 + 13*J^4)*m2^2*x)*
pj[J, x, 5, 4] + (-6720*(-23 + 4*J + 2*J^2)*m2^2 -
840*(355 + 32*J + 16*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(82320*m2^2 + 82320*m2^2*x)*pj[J, x, 5, 6],
-7840*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
47040*(-1 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 5] +
164640*m2^2*pj[J, x, 5, 6], 5376*(-3 + J)*(5 + J)*(-1 + 2*J + J^2)*
m2^2*pj[J, x, 5, 3] + (-448*(1296 - 742*J - 319*J^2 + 52*J^3 +
13*J^4)*m2^2 - 896*(-18 + 62*J + 35*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 4] + (-7168*(-29 + 2*J + J^2)*m2^2 +
9408*(-11 + 10*J + 5*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-896*(-25 + 22*J + 11*J^2)*m2^2 - 896*(-25 + 22*J + 11*J^2)*m2^2*
x)*pj[J, x, 5, 6], -5376*(-3 + J)*(5 + J)*(-1 + 2*J + J^2)*m2^2*
pj[J, x, 5, 3] + (-448*(1296 - 742*J - 319*J^2 + 52*J^3 + 13*J^4)*
m2^2 + 896*(-18 + 62*J + 35*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 4] + (7168*(-29 + 2*J + J^2)*m2^2 +
9408*(-11 + 10*J + 5*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-896*(-25 + 22*J + 11*J^2)*m2^2 + 896*(-25 + 22*J + 11*J^2)*m2^2*
x)*pj[J, x, 5, 6], -16*(-2 + J)*(4 + J)*(1935 + 2040*J +
1072*J^2 + 52*J^3 + 13*J^4)*m2^2*pj[J, x, 5, 2] +
96*(1320 + 1790*J + 1051*J^2 + 156*J^3 + 39*J^4)*m2^2*x*
pj[J, x, 5, 3] - 1008*(-503 + 82*J + 41*J^2)*m2^2*pj[J, x, 5, 4] +
188160*m2^2*x*pj[J, x, 5, 5], 64*(-1 + J)*(3 + J)*
(-36 + 242*J + 173*J^2 + 52*J^3 + 13*J^4)*m2^2*pj[J, x, 5, 1] +
(-16*(-2 + J)*(4 + J)*(2097 + 1482*J + 757*J^2 + 16*J^3 + 4*J^4)*
m2^2 - 64*(-36 + 678*J + 691*J^2 + 360*J^3 + 100*J^4 + 6*J^5 +
J^6)*m2^2*x)*pj[J, x, 5, 2] +
(48*(-14038 + 1538*J + 925*J^2 + 156*J^3 + 39*J^4)*m2^2 +
48*(2748 + 2854*J + 1583*J^2 + 156*J^3 + 39*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (-5040*(-25 + 8*J + 4*J^2)*m2^2 -
3360*(71 + 12*J + 6*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(82320*m2^2 + 82320*m2^2*x)*pj[J, x, 5, 5],
-6272*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(-75264*(-3 + J)*(5 + J)*m2^2 + 37632*(-1 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-6272*(61 + 4*J + 2*J^2)*m2^2 -
12544*(-3 + J)*(5 + J)*m2^2*x)*pj[J, x, 5, 6] +
(-87808*m2^2 - 87808*m2^2*x)*pj[J, x, 5, 7],
-10752*(-3 + J)*(5 + J)*(-1 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(-5376*(-231 - 30*J - 11*J^2 + 4*J^3 + J^4)*m2^2 +
1792*(-18 + 62*J + 35*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-448*(-3917 + 302*J + 151*J^2)*m2^2 + 1344*(219 + 94*J + 47*J^2)*
m2^2*x)*pj[J, x, 5, 5] + (-448*(-429 + 32*J + 16*J^2)*m2^2 +
448*(845 + 32*J + 16*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-87808*m2^2 + 87808*m2^2*x)*pj[J, x, 5, 7],
10752*(-3 + J)*(5 + J)*(-1 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(-5376*(-231 - 30*J - 11*J^2 + 4*J^3 + J^4)*m2^2 -
1792*(-18 + 62*J + 35*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(448*(-3917 + 302*J + 151*J^2)*m2^2 + 1344*(219 + 94*J + 47*J^2)*
m2^2*x)*pj[J, x, 5, 5] + (-448*(-429 + 32*J + 16*J^2)*m2^2 -
448*(845 + 32*J + 16*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(87808*m2^2 + 87808*m2^2*x)*pj[J, x, 5, 7],
-6272*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(75264*(-3 + J)*(5 + J)*m2^2 + 37632*(-1 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-6272*(61 + 4*J + 2*J^2)*m2^2 +
12544*(-3 + J)*(5 + J)*m2^2*x)*pj[J, x, 5, 6] +
(87808*m2^2 - 87808*m2^2*x)*pj[J, x, 5, 7],
-64*(-1 + J)*(3 + J)*(-36 + 242*J + 173*J^2 + 52*J^3 + 13*J^4)*m2^2*
pj[J, x, 5, 1] + (-16*(-2 + J)*(4 + J)*(2097 + 1482*J + 757*J^2 +
16*J^3 + 4*J^4)*m2^2 + 64*(-36 + 678*J + 691*J^2 + 360*J^3 +
100*J^4 + 6*J^5 + J^6)*m2^2*x)*pj[J, x, 5, 2] +
(-48*(-14038 + 1538*J + 925*J^2 + 156*J^3 + 39*J^4)*m2^2 +
48*(2748 + 2854*J + 1583*J^2 + 156*J^3 + 39*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (-5040*(-25 + 8*J + 4*J^2)*m2^2 +
3360*(71 + 12*J + 6*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-82320*m2^2 + 82320*m2^2*x)*pj[J, x, 5, 5],
2688*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(32256*(-3 + J)*(5 + J)*m2 - 16128*(-1 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (2688*(61 + 4*J + 2*J^2)*m2 + 5376*(-3 + J)*
(5 + J)*m2*x)*pj[J, x, 5, 6] + (37632*m2 + 37632*m2*x)*
pj[J, x, 5, 7], 2688*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2*
pj[J, x, 5, 4] + (-32256*(-3 + J)*(5 + J)*m2 -
16128*(-1 + 2*J + J^2)*m2*x)*pj[J, x, 5, 5] +
(2688*(61 + 4*J + 2*J^2)*m2 - 5376*(-3 + J)*(5 + J)*m2*x)*
pj[J, x, 5, 6] + (-37632*m2 + 37632*m2*x)*pj[J, x, 5, 7],
-96*(-2 + J)*(4 + J)*(-18 + 62*J + 35*J^2 + 4*J^3 + J^4)*m2*
pj[J, x, 5, 2] + 96*(-36 + 242*J + 173*J^2 + 52*J^3 + 13*J^4)*m2*x*
pj[J, x, 5, 3] - 14112*(-18 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
70560*m2*x*pj[J, x, 5, 5], 8960*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*
m2*pj[J, x, 5, 4] + (-5376*(-155 + 2*J + J^2)*m2 -
53760*(-1 + 2*J + J^2)*m2*x)*pj[J, x, 5, 5] +
(-188160*m2 + 188160*m2*x)*pj[J, x, 5, 6],
8960*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(5376*(-155 + 2*J + J^2)*m2 - 53760*(-1 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (-188160*m2 - 188160*m2*x)*pj[J, x, 5, 6],
-1792*(1152 - 326*J - 143*J^2 + 20*J^3 + 5*J^4)*m2*pj[J, x, 5, 4] +
5376*(-79 + 18*J + 9*J^2)*m2*x*pj[J, x, 5, 5] +
376320*m2*pj[J, x, 5, 6], -1792*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*
pj[J, x, 5, 4] + 10752*(-1 + 2*J + J^2)*x*pj[J, x, 5, 5] +
37632*pj[J, x, 5, 6], 0, 0, 0}}}], exchange[{4 + 2*m, -1},
{GGGG[5], s, 1 + (2*t)/s}, {{1/(5*(1 + J)^2*m2^4),
Sqrt[3/2]/(20*Sqrt[-2 + J]*Sqrt[-1 + J]*(1 + J)^2*Sqrt[3 + J]*
Sqrt[4 + J]*m2^(11/2))}, {Sqrt[3/2]/(20*Sqrt[-2 + J]*Sqrt[-1 + J]*
(1 + J)^2*Sqrt[3 + J]*Sqrt[4 + J]*m2^(11/2)),
3/(160*(-2 + J)*(-1 + J)*(1 + J)^2*(3 + J)*(4 + J)*m2^5)}},
{{{0, 0, J*(2 + J)*pj[J, x, 5, 0] - x*pj[J, x, 5, 1], 0, 0, 0, 0, 0,
-4*pj[J, x, 5, 2], -8*pj[J, x, 5, 1] + (-4 - 4*x)*pj[J, x, 5, 2], 0,
0, 0, 0, 8*pj[J, x, 5, 1] + (-4 + 4*x)*pj[J, x, 5, 2], 0, 0, 0, 0,
0, 0, 0, 0, 0, 0}, {0, 0, -(J*(2 + J)*(7 + 2*J + J^2)*m2^(3/2)*
pj[J, x, 5, 0]) + 6*(2 + 2*J + J^2)*m2^(3/2)*x*pj[J, x, 5, 1] -
15*m2^(3/2)*pj[J, x, 5, 2], -20*(-2 + J)*(4 + J)*m2^(3/2)*
pj[J, x, 5, 2] + (80*m2^(3/2) + 60*m2^(3/2)*x)*pj[J, x, 5, 3] +
(-40*m2^(3/2) + 40*m2^(3/2)*x)*pj[J, x, 5, 4],
-20*(-2 + J)*(4 + J)*m2^(3/2)*pj[J, x, 5, 2] +
(-80*m2^(3/2) + 60*m2^(3/2)*x)*pj[J, x, 5, 3] +
(-40*m2^(3/2) - 40*m2^(3/2)*x)*pj[J, x, 5, 4], 0, 0, 0,
-16*(-2 + J)*(4 + J)*m2^(3/2)*pj[J, x, 5, 2],
-72*(-1 + J)*(3 + J)*m2^(3/2)*pj[J, x, 5, 1] +
(24*(-2 + J)*(4 + J)*m2^(3/2) + 24*(7 + 2*J + J^2)*m2^(3/2)*x)*
pj[J, x, 5, 2] + (-120*m2^(3/2) - 120*m2^(3/2)*x)*pj[J, x, 5, 3],
0, 0, 0, 0, 72*(-1 + J)*(3 + J)*m2^(3/2)*pj[J, x, 5, 1] +
(24*(-2 + J)*(4 + J)*m2^(3/2) - 24*(7 + 2*J + J^2)*m2^(3/2)*x)*
pj[J, x, 5, 2] + (120*m2^(3/2) - 120*m2^(3/2)*x)*pj[J, x, 5, 3],
0, 0, 40*(-2 + J)*(4 + J)*Sqrt[m2]*pj[J, x, 5, 2] -
120*Sqrt[m2]*x*pj[J, x, 5, 3], -640*Sqrt[m2]*pj[J, x, 5, 3] -
160*Sqrt[m2]*x*pj[J, x, 5, 4], 640*Sqrt[m2]*pj[J, x, 5, 3] +
160*Sqrt[m2]*x*pj[J, x, 5, 4], -160*Sqrt[m2]*pj[J, x, 5, 4], 0, 0,
0, (160*I)*(1 + J)*pj[J, x, 5, 3]}},
{{0, 0, -(J*(2 + J)*(7 + 2*J + J^2)*m2^(3/2)*pj[J, x, 5, 0]) +
6*(2 + 2*J + J^2)*m2^(3/2)*x*pj[J, x, 5, 1] -
15*m2^(3/2)*pj[J, x, 5, 2], -20*(-2 + J)*(4 + J)*m2^(3/2)*
pj[J, x, 5, 2] + (80*m2^(3/2) + 60*m2^(3/2)*x)*pj[J, x, 5, 3] +
(-40*m2^(3/2) + 40*m2^(3/2)*x)*pj[J, x, 5, 4],
-20*(-2 + J)*(4 + J)*m2^(3/2)*pj[J, x, 5, 2] +
(-80*m2^(3/2) + 60*m2^(3/2)*x)*pj[J, x, 5, 3] +
(-40*m2^(3/2) - 40*m2^(3/2)*x)*pj[J, x, 5, 4], 0, 0, 0,
-16*(-2 + J)*(4 + J)*m2^(3/2)*pj[J, x, 5, 2],
-72*(-1 + J)*(3 + J)*m2^(3/2)*pj[J, x, 5, 1] +
(24*(-2 + J)*(4 + J)*m2^(3/2) + 24*(7 + 2*J + J^2)*m2^(3/2)*x)*
pj[J, x, 5, 2] + (-120*m2^(3/2) - 120*m2^(3/2)*x)*pj[J, x, 5, 3],
0, 0, 0, 0, 72*(-1 + J)*(3 + J)*m2^(3/2)*pj[J, x, 5, 1] +
(24*(-2 + J)*(4 + J)*m2^(3/2) - 24*(7 + 2*J + J^2)*m2^(3/2)*x)*
pj[J, x, 5, 2] + (120*m2^(3/2) - 120*m2^(3/2)*x)*pj[J, x, 5, 3],
0, 0, 40*(-2 + J)*(4 + J)*Sqrt[m2]*pj[J, x, 5, 2] -
120*Sqrt[m2]*x*pj[J, x, 5, 3], -640*Sqrt[m2]*pj[J, x, 5, 3] -
160*Sqrt[m2]*x*pj[J, x, 5, 4], 640*Sqrt[m2]*pj[J, x, 5, 3] +
160*Sqrt[m2]*x*pj[J, x, 5, 4], -160*Sqrt[m2]*pj[J, x, 5, 4], 0, 0,
0, (-160*I)*(1 + J)*pj[J, x, 5, 3]},
{0, 0, J*(2 + J)*(2 + 2*J + J^2)*(37 + 2*J + J^2)*m2*pj[J, x, 5, 0] -
(144 + 238*J + 163*J^2 + 44*J^3 + 11*J^4)*m2*x*pj[J, x, 5, 1] +
15*(-26 + 14*J + 7*J^2)*m2*pj[J, x, 5, 2] -
375*m2*x*pj[J, x, 5, 3], 140*(-2 + J)*(4 + J)*(7 + 2*J + J^2)*m2*
pj[J, x, 5, 2] + (40*(-583 + 82*J + 41*J^2)*m2 -
280*(13 + 8*J + 4*J^2)*m2*x)*pj[J, x, 5, 3] +
(20*(-277 + 28*J + 14*J^2)*m2 - 40*(199 + 14*J + 7*J^2)*m2*x)*
pj[J, x, 5, 4] + (3000*m2 - 3000*m2*x)*pj[J, x, 5, 5],
140*(-2 + J)*(4 + J)*(7 + 2*J + J^2)*m2*pj[J, x, 5, 2] +
(-40*(-583 + 82*J + 41*J^2)*m2 - 280*(13 + 8*J + 4*J^2)*m2*x)*
pj[J, x, 5, 3] + (20*(-277 + 28*J + 14*J^2)*m2 +
40*(199 + 14*J + 7*J^2)*m2*x)*pj[J, x, 5, 4] +
(-3000*m2 - 3000*m2*x)*pj[J, x, 5, 5], 0,
-400*(-6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-4800*m2 - 400*m2*x)*
pj[J, x, 5, 5] + (-800*m2 - 800*m2*x)*pj[J, x, 5, 6],
-400*(-6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (4800*m2 - 400*m2*x)*
pj[J, x, 5, 5] + (-800*m2 + 800*m2*x)*pj[J, x, 5, 6],
-4*(-2 + J)*(4 + J)*(797 + 82*J + 41*J^2)*m2*pj[J, x, 5, 2] +
1800*(7 + 2*J + J^2)*m2*x*pj[J, x, 5, 3] - 9900*m2*pj[J, x, 5, 4],
88*(-1 + J)*(3 + J)*(13 + 8*J + 4*J^2)*m2*pj[J, x, 5, 1] +
(-4*(-2 + J)*(4 + J)*(587 + 22*J + 11*J^2)*m2 - 44*(2 + 2*J + J^2)*
(37 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] +
(840*(-2 + J)*(4 + J)*m2 + 120*(79 + 14*J + 7*J^2)*m2*x)*
pj[J, x, 5, 3] + (-4500*m2 - 4500*m2*x)*pj[J, x, 5, 4], 0,
-400*(-23 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
(-400*(-50 + 6*J + 3*J^2)*m2 + 400*(7 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (3600*m2 + 5200*m2*x)*pj[J, x, 5, 5] +
(-1600*m2 + 1600*m2*x)*pj[J, x, 5, 6],
400*(-23 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
(-400*(-50 + 6*J + 3*J^2)*m2 - 400*(7 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (-3600*m2 + 5200*m2*x)*pj[J, x, 5, 5] +
(-1600*m2 - 1600*m2*x)*pj[J, x, 5, 6], 0,
-88*(-1 + J)*(3 + J)*(13 + 8*J + 4*J^2)*m2*pj[J, x, 5, 1] +
(-4*(-2 + J)*(4 + J)*(587 + 22*J + 11*J^2)*m2 + 44*(2 + 2*J + J^2)*
(37 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] +
(-840*(-2 + J)*(4 + J)*m2 + 120*(79 + 14*J + 7*J^2)*m2*x)*
pj[J, x, 5, 3] + (-4500*m2 + 4500*m2*x)*pj[J, x, 5, 4], 0, 0,
-80*(-2 + J)*(4 + J)*(7 + 2*J + J^2)*pj[J, x, 5, 2] +
160*(13 + 8*J + 4*J^2)*x*pj[J, x, 5, 3] - 3600*pj[J, x, 5, 4],
-320*(-23 + 2*J + J^2)*pj[J, x, 5, 3] + 320*(7 + 2*J + J^2)*x*
pj[J, x, 5, 4] - 4800*pj[J, x, 5, 5],
320*(-23 + 2*J + J^2)*pj[J, x, 5, 3] - 320*(7 + 2*J + J^2)*x*
pj[J, x, 5, 4] + 4800*pj[J, x, 5, 5],
320*(-38 + 2*J + J^2)*pj[J, x, 5, 4] - 4800*x*pj[J, x, 5, 5], 0, 0,
0, 0}}}], exchange[{4 + 2*m, 1}, {GGGG[5], s, 1 + (2*t)/s},
{{1/(5*(1 + J)^2*m2^4), Sqrt[3/2]/(20*Sqrt[-2 + J]*Sqrt[-1 + J]*
(1 + J)^2*Sqrt[3 + J]*Sqrt[4 + J]*m2^(11/2))},
{Sqrt[3/2]/(20*Sqrt[-2 + J]*Sqrt[-1 + J]*(1 + J)^2*Sqrt[3 + J]*
Sqrt[4 + J]*m2^(11/2)), 3/(160*(-2 + J)*(-1 + J)*(1 + J)^2*(3 + J)*
(4 + J)*m2^5)}}, {{{0, 0, J*(2 + J)*pj[J, x, 5, 0] -
x*pj[J, x, 5, 1], 0, 0, 0, 0, 0, -4*pj[J, x, 5, 2],
-8*pj[J, x, 5, 1] + (-4 - 4*x)*pj[J, x, 5, 2], 0, 0, 0, 0,
8*pj[J, x, 5, 1] + (-4 + 4*x)*pj[J, x, 5, 2], 0, 0, 0, 0, 0, 0, 0,
0, 0, 0}, {0, 0, -(J*(2 + J)*(7 + 2*J + J^2)*m2^(3/2)*
pj[J, x, 5, 0]) + 6*(2 + 2*J + J^2)*m2^(3/2)*x*pj[J, x, 5, 1] -
15*m2^(3/2)*pj[J, x, 5, 2], -20*(-2 + J)*(4 + J)*m2^(3/2)*
pj[J, x, 5, 2] + (80*m2^(3/2) + 60*m2^(3/2)*x)*pj[J, x, 5, 3] +
(-40*m2^(3/2) + 40*m2^(3/2)*x)*pj[J, x, 5, 4],
-20*(-2 + J)*(4 + J)*m2^(3/2)*pj[J, x, 5, 2] +
(-80*m2^(3/2) + 60*m2^(3/2)*x)*pj[J, x, 5, 3] +
(-40*m2^(3/2) - 40*m2^(3/2)*x)*pj[J, x, 5, 4], 0, 0, 0,
-16*(-2 + J)*(4 + J)*m2^(3/2)*pj[J, x, 5, 2],
-72*(-1 + J)*(3 + J)*m2^(3/2)*pj[J, x, 5, 1] +
(24*(-2 + J)*(4 + J)*m2^(3/2) + 24*(7 + 2*J + J^2)*m2^(3/2)*x)*
pj[J, x, 5, 2] + (-120*m2^(3/2) - 120*m2^(3/2)*x)*pj[J, x, 5, 3],
0, 0, 0, 0, 72*(-1 + J)*(3 + J)*m2^(3/2)*pj[J, x, 5, 1] +
(24*(-2 + J)*(4 + J)*m2^(3/2) - 24*(7 + 2*J + J^2)*m2^(3/2)*x)*
pj[J, x, 5, 2] + (120*m2^(3/2) - 120*m2^(3/2)*x)*pj[J, x, 5, 3],
0, 0, 40*(-2 + J)*(4 + J)*Sqrt[m2]*pj[J, x, 5, 2] -
120*Sqrt[m2]*x*pj[J, x, 5, 3], -640*Sqrt[m2]*pj[J, x, 5, 3] -
160*Sqrt[m2]*x*pj[J, x, 5, 4], 640*Sqrt[m2]*pj[J, x, 5, 3] +
160*Sqrt[m2]*x*pj[J, x, 5, 4], -160*Sqrt[m2]*pj[J, x, 5, 4], 0, 0,
0, (-160*I)*(1 + J)*pj[J, x, 5, 3]}},
{{0, 0, -(J*(2 + J)*(7 + 2*J + J^2)*m2^(3/2)*pj[J, x, 5, 0]) +
6*(2 + 2*J + J^2)*m2^(3/2)*x*pj[J, x, 5, 1] -
15*m2^(3/2)*pj[J, x, 5, 2], -20*(-2 + J)*(4 + J)*m2^(3/2)*
pj[J, x, 5, 2] + (80*m2^(3/2) + 60*m2^(3/2)*x)*pj[J, x, 5, 3] +
(-40*m2^(3/2) + 40*m2^(3/2)*x)*pj[J, x, 5, 4],
-20*(-2 + J)*(4 + J)*m2^(3/2)*pj[J, x, 5, 2] +
(-80*m2^(3/2) + 60*m2^(3/2)*x)*pj[J, x, 5, 3] +
(-40*m2^(3/2) - 40*m2^(3/2)*x)*pj[J, x, 5, 4], 0, 0, 0,
-16*(-2 + J)*(4 + J)*m2^(3/2)*pj[J, x, 5, 2],
-72*(-1 + J)*(3 + J)*m2^(3/2)*pj[J, x, 5, 1] +
(24*(-2 + J)*(4 + J)*m2^(3/2) + 24*(7 + 2*J + J^2)*m2^(3/2)*x)*
pj[J, x, 5, 2] + (-120*m2^(3/2) - 120*m2^(3/2)*x)*pj[J, x, 5, 3],
0, 0, 0, 0, 72*(-1 + J)*(3 + J)*m2^(3/2)*pj[J, x, 5, 1] +
(24*(-2 + J)*(4 + J)*m2^(3/2) - 24*(7 + 2*J + J^2)*m2^(3/2)*x)*
pj[J, x, 5, 2] + (120*m2^(3/2) - 120*m2^(3/2)*x)*pj[J, x, 5, 3],
0, 0, 40*(-2 + J)*(4 + J)*Sqrt[m2]*pj[J, x, 5, 2] -
120*Sqrt[m2]*x*pj[J, x, 5, 3], -640*Sqrt[m2]*pj[J, x, 5, 3] -
160*Sqrt[m2]*x*pj[J, x, 5, 4], 640*Sqrt[m2]*pj[J, x, 5, 3] +
160*Sqrt[m2]*x*pj[J, x, 5, 4], -160*Sqrt[m2]*pj[J, x, 5, 4], 0, 0,
0, (160*I)*(1 + J)*pj[J, x, 5, 3]},
{0, 0, J*(2 + J)*(2 + 2*J + J^2)*(37 + 2*J + J^2)*m2*pj[J, x, 5, 0] -
(144 + 238*J + 163*J^2 + 44*J^3 + 11*J^4)*m2*x*pj[J, x, 5, 1] +
15*(-26 + 14*J + 7*J^2)*m2*pj[J, x, 5, 2] -
375*m2*x*pj[J, x, 5, 3], 140*(-2 + J)*(4 + J)*(7 + 2*J + J^2)*m2*
pj[J, x, 5, 2] + (40*(-583 + 82*J + 41*J^2)*m2 -
280*(13 + 8*J + 4*J^2)*m2*x)*pj[J, x, 5, 3] +
(20*(-277 + 28*J + 14*J^2)*m2 - 40*(199 + 14*J + 7*J^2)*m2*x)*
pj[J, x, 5, 4] + (3000*m2 - 3000*m2*x)*pj[J, x, 5, 5],
140*(-2 + J)*(4 + J)*(7 + 2*J + J^2)*m2*pj[J, x, 5, 2] +
(-40*(-583 + 82*J + 41*J^2)*m2 - 280*(13 + 8*J + 4*J^2)*m2*x)*
pj[J, x, 5, 3] + (20*(-277 + 28*J + 14*J^2)*m2 +
40*(199 + 14*J + 7*J^2)*m2*x)*pj[J, x, 5, 4] +
(-3000*m2 - 3000*m2*x)*pj[J, x, 5, 5], 0,
-400*(-6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-4800*m2 - 400*m2*x)*
pj[J, x, 5, 5] + (-800*m2 - 800*m2*x)*pj[J, x, 5, 6],
-400*(-6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (4800*m2 - 400*m2*x)*
pj[J, x, 5, 5] + (-800*m2 + 800*m2*x)*pj[J, x, 5, 6],
-4*(-2 + J)*(4 + J)*(797 + 82*J + 41*J^2)*m2*pj[J, x, 5, 2] +
1800*(7 + 2*J + J^2)*m2*x*pj[J, x, 5, 3] - 9900*m2*pj[J, x, 5, 4],
88*(-1 + J)*(3 + J)*(13 + 8*J + 4*J^2)*m2*pj[J, x, 5, 1] +
(-4*(-2 + J)*(4 + J)*(587 + 22*J + 11*J^2)*m2 - 44*(2 + 2*J + J^2)*
(37 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] +
(840*(-2 + J)*(4 + J)*m2 + 120*(79 + 14*J + 7*J^2)*m2*x)*
pj[J, x, 5, 3] + (-4500*m2 - 4500*m2*x)*pj[J, x, 5, 4], 0,
-400*(-23 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
(-400*(-50 + 6*J + 3*J^2)*m2 + 400*(7 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (3600*m2 + 5200*m2*x)*pj[J, x, 5, 5] +
(-1600*m2 + 1600*m2*x)*pj[J, x, 5, 6],
400*(-23 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
(-400*(-50 + 6*J + 3*J^2)*m2 - 400*(7 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (-3600*m2 + 5200*m2*x)*pj[J, x, 5, 5] +
(-1600*m2 - 1600*m2*x)*pj[J, x, 5, 6], 0,
-88*(-1 + J)*(3 + J)*(13 + 8*J + 4*J^2)*m2*pj[J, x, 5, 1] +
(-4*(-2 + J)*(4 + J)*(587 + 22*J + 11*J^2)*m2 + 44*(2 + 2*J + J^2)*
(37 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] +
(-840*(-2 + J)*(4 + J)*m2 + 120*(79 + 14*J + 7*J^2)*m2*x)*
pj[J, x, 5, 3] + (-4500*m2 + 4500*m2*x)*pj[J, x, 5, 4], 0, 0,
-80*(-2 + J)*(4 + J)*(7 + 2*J + J^2)*pj[J, x, 5, 2] +
160*(13 + 8*J + 4*J^2)*x*pj[J, x, 5, 3] - 3600*pj[J, x, 5, 4],
-320*(-23 + 2*J + J^2)*pj[J, x, 5, 3] + 320*(7 + 2*J + J^2)*x*
pj[J, x, 5, 4] - 4800*pj[J, x, 5, 5],
320*(-23 + 2*J + J^2)*pj[J, x, 5, 3] - 320*(7 + 2*J + J^2)*x*
pj[J, x, 5, 4] + 4800*pj[J, x, 5, 5],
320*(-38 + 2*J + J^2)*pj[J, x, 5, 4] - 4800*x*pj[J, x, 5, 5], 0, 0,
0, 0}}}], exchange[{4 + 2*m, 2}, {GGGG[5], s, 1 + (2*t)/s},
{{3/(28*J*(1 + J)^2*(2 + J)*m2^5), Sqrt[3]/(112*Sqrt[-3 + J]*
Sqrt[-2 + J]*J*(1 + J)^2*(2 + J)*Sqrt[4 + J]*Sqrt[5 + J]*m2^6)},
{Sqrt[3]/(112*Sqrt[-3 + J]*Sqrt[-2 + J]*J*(1 + J)^2*(2 + J)*
Sqrt[4 + J]*Sqrt[5 + J]*m2^6), 1/(448*(-3 + J)*(-2 + J)*J*(1 + J)^2*
(2 + J)*(4 + J)*(5 + J)*m2^6)}},
{{{0, 0, J*(2 + J)*(-1 + 2*J + J^2)*m2*pj[J, x, 5, 0] -
2*J*(2 + J)*m2*x*pj[J, x, 5, 1] + 3*m2*pj[J, x, 5, 2],
4*(4 + 2*J + J^2)*m2*pj[J, x, 5, 2] + (-32*m2 + 4*m2*x)*
pj[J, x, 5, 3] + (8*m2 - 8*m2*x)*pj[J, x, 5, 4],
4*(4 + 2*J + J^2)*m2*pj[J, x, 5, 2] + (32*m2 + 4*m2*x)*
pj[J, x, 5, 3] + (8*m2 + 8*m2*x)*pj[J, x, 5, 4], 0, 0, 0,
16*(10 + 2*J + J^2)*m2*pj[J, x, 5, 2] + 48*m2*x*pj[J, x, 5, 3],
-8*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] + (-8*(-2 + J)*(4 + J)*m2 -
8*(-1 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] + (24*m2 + 24*m2*x)*
pj[J, x, 5, 3], 0, 0, 0, 0, 8*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] +
(-8*(-2 + J)*(4 + J)*m2 + 8*(-1 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] +
(-24*m2 + 24*m2*x)*pj[J, x, 5, 3], 0, 0,
16*(4 + 2*J + J^2)*pj[J, x, 5, 2] + 16*x*pj[J, x, 5, 3], 0, 0, 0, 0,
0, 0, 0}, {0, 0, -(J*(2 + J)*(-6 + 38*J + 23*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 0]) + 3*J*(2 + J)*(11 + 6*J + 3*J^2)*m2^2*x*
pj[J, x, 5, 1] - 15*(-10 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 2] +
105*m2^2*x*pj[J, x, 5, 3], -60*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*
m2^2*pj[J, x, 5, 2] + (-360*(-3 + J)*(5 + J)*m2^2 +
360*(-1 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 3] +
(-60*(-37 + 4*J + 2*J^2)*m2^2 + 120*(13 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 5],
-60*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*m2^2*pj[J, x, 5, 2] +
(360*(-3 + J)*(5 + J)*m2^2 + 360*(-1 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 3] + (-60*(-37 + 4*J + 2*J^2)*m2^2 -
120*(13 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 4] +
(840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 5], 0,
448*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(560*(-6 + 2*J + J^2)*m2^2 + 448*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (448*m2^2 - 784*m2^2*x)*pj[J, x, 5, 5] +
(224*m2^2 + 224*m2^2*x)*pj[J, x, 5, 6],
-448*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(560*(-6 + 2*J + J^2)*m2^2 - 448*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (-448*m2^2 - 784*m2^2*x)*pj[J, x, 5, 5] +
(224*m2^2 - 224*m2^2*x)*pj[J, x, 5, 6],
-4*(-2 + J)*(4 + J)*(-219 + 50*J + 25*J^2)*m2^2*pj[J, x, 5, 2] +
24*(-103 + 38*J + 19*J^2)*m2^2*x*pj[J, x, 5, 3] +
84*m2^2*pj[J, x, 5, 4], -216*(-1 + J)*(3 + J)*(-1 + 2*J + J^2)*m2^2*
pj[J, x, 5, 1] + (36*(-2 + J)*(4 + J)*(13 + 2*J + J^2)*m2^2 +
36*(-6 + 38*J + 23*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(-72*(-33 + 10*J + 5*J^2)*m2^2 - 72*(23 + 10*J + 5*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (1260*m2^2 + 1260*m2^2*x)*pj[J, x, 5, 4], 0,
-112*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(336*(-14 + 2*J + J^2)*m2^2 - 112*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (-1456*m2^2 - 1008*m2^2*x)*pj[J, x, 5, 5] +
(448*m2^2 - 448*m2^2*x)*pj[J, x, 5, 6],
112*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(336*(-14 + 2*J + J^2)*m2^2 + 112*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (1456*m2^2 - 1008*m2^2*x)*pj[J, x, 5, 5] +
(448*m2^2 + 448*m2^2*x)*pj[J, x, 5, 6], 0,
216*(-1 + J)*(3 + J)*(-1 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] +
(36*(-2 + J)*(4 + J)*(13 + 2*J + J^2)*m2^2 -
36*(-6 + 38*J + 23*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(72*(-33 + 10*J + 5*J^2)*m2^2 - 72*(23 + 10*J + 5*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (1260*m2^2 - 1260*m2^2*x)*pj[J, x, 5, 4],
224*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (2688*m2 + 224*m2*x)*
pj[J, x, 5, 5] + (448*m2 + 448*m2*x)*pj[J, x, 5, 6],
224*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-2688*m2 + 224*m2*x)*
pj[J, x, 5, 5] + (448*m2 - 448*m2*x)*pj[J, x, 5, 6],
40*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*m2*pj[J, x, 5, 2] -
240*(-1 + 2*J + J^2)*m2*x*pj[J, x, 5, 3] + 1176*m2*pj[J, x, 5, 4],
-1344*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (2688*m2 - 1344*m2*x)*
pj[J, x, 5, 5], -1344*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
(-2688*m2 - 1344*m2*x)*pj[J, x, 5, 5],
1344*(16 + 2*J + J^2)*m2*pj[J, x, 5, 4] + 4032*m2*x*pj[J, x, 5, 5],
896*(6 + 2*J + J^2)*pj[J, x, 5, 4] + 896*x*pj[J, x, 5, 5],
(5376*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((896*I)*(1 + J)*Sqrt[m2] + (896*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (-5376*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((896*I)*(1 + J)*Sqrt[m2] - (896*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (-448*I)*(-3 + J)*(1 + J)*(5 + J)*Sqrt[m2]*
pj[J, x, 5, 3] + (1344*I)*(1 + J)*Sqrt[m2]*x*pj[J, x, 5, 4]}},
{{0, 0, -(J*(2 + J)*(-6 + 38*J + 23*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 0]) + 3*J*(2 + J)*(11 + 6*J + 3*J^2)*m2^2*x*
pj[J, x, 5, 1] - 15*(-10 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 2] +
105*m2^2*x*pj[J, x, 5, 3], -60*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*
m2^2*pj[J, x, 5, 2] + (-360*(-3 + J)*(5 + J)*m2^2 +
360*(-1 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 3] +
(-60*(-37 + 4*J + 2*J^2)*m2^2 + 120*(13 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 5],
-60*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*m2^2*pj[J, x, 5, 2] +
(360*(-3 + J)*(5 + J)*m2^2 + 360*(-1 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 3] + (-60*(-37 + 4*J + 2*J^2)*m2^2 -
120*(13 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 4] +
(840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 5], 0,
448*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(560*(-6 + 2*J + J^2)*m2^2 + 448*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (448*m2^2 - 784*m2^2*x)*pj[J, x, 5, 5] +
(224*m2^2 + 224*m2^2*x)*pj[J, x, 5, 6],
-448*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(560*(-6 + 2*J + J^2)*m2^2 - 448*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (-448*m2^2 - 784*m2^2*x)*pj[J, x, 5, 5] +
(224*m2^2 - 224*m2^2*x)*pj[J, x, 5, 6],
-4*(-2 + J)*(4 + J)*(-219 + 50*J + 25*J^2)*m2^2*pj[J, x, 5, 2] +
24*(-103 + 38*J + 19*J^2)*m2^2*x*pj[J, x, 5, 3] +
84*m2^2*pj[J, x, 5, 4], -216*(-1 + J)*(3 + J)*(-1 + 2*J + J^2)*m2^2*
pj[J, x, 5, 1] + (36*(-2 + J)*(4 + J)*(13 + 2*J + J^2)*m2^2 +
36*(-6 + 38*J + 23*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(-72*(-33 + 10*J + 5*J^2)*m2^2 - 72*(23 + 10*J + 5*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (1260*m2^2 + 1260*m2^2*x)*pj[J, x, 5, 4], 0,
-112*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(336*(-14 + 2*J + J^2)*m2^2 - 112*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (-1456*m2^2 - 1008*m2^2*x)*pj[J, x, 5, 5] +
(448*m2^2 - 448*m2^2*x)*pj[J, x, 5, 6],
112*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(336*(-14 + 2*J + J^2)*m2^2 + 112*(-1 + J)*(3 + J)*m2^2*x)*
pj[J, x, 5, 4] + (1456*m2^2 - 1008*m2^2*x)*pj[J, x, 5, 5] +
(448*m2^2 + 448*m2^2*x)*pj[J, x, 5, 6], 0,
216*(-1 + J)*(3 + J)*(-1 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] +
(36*(-2 + J)*(4 + J)*(13 + 2*J + J^2)*m2^2 -
36*(-6 + 38*J + 23*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(72*(-33 + 10*J + 5*J^2)*m2^2 - 72*(23 + 10*J + 5*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (1260*m2^2 - 1260*m2^2*x)*pj[J, x, 5, 4],
224*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (2688*m2 + 224*m2*x)*
pj[J, x, 5, 5] + (448*m2 + 448*m2*x)*pj[J, x, 5, 6],
224*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-2688*m2 + 224*m2*x)*
pj[J, x, 5, 5] + (448*m2 - 448*m2*x)*pj[J, x, 5, 6],
40*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*m2*pj[J, x, 5, 2] -
240*(-1 + 2*J + J^2)*m2*x*pj[J, x, 5, 3] + 1176*m2*pj[J, x, 5, 4],
-1344*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (2688*m2 - 1344*m2*x)*
pj[J, x, 5, 5], -1344*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
(-2688*m2 - 1344*m2*x)*pj[J, x, 5, 5],
1344*(16 + 2*J + J^2)*m2*pj[J, x, 5, 4] + 4032*m2*x*pj[J, x, 5, 5],
896*(6 + 2*J + J^2)*pj[J, x, 5, 4] + 896*x*pj[J, x, 5, 5],
(-5376*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((-896*I)*(1 + J)*Sqrt[m2] - (896*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (5376*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((-896*I)*(1 + J)*Sqrt[m2] + (896*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (448*I)*(-3 + J)*(1 + J)*(5 + J)*Sqrt[m2]*
pj[J, x, 5, 3] - (1344*I)*(1 + J)*Sqrt[m2]*x*pj[J, x, 5, 4]},
{784*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(150528*m2^2 - 4704*(-1 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 5] +
(784*(-221 + 16*J + 8*J^2)*m2^2 + 3136*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 6] + (15680*m2^2 - 31360*m2^2*x)*pj[J, x, 5, 7] +
(6272*m2^2 + 6272*m2^2*x)*pj[J, x, 5, 8],
784*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(-150528*m2^2 - 4704*(-1 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 5] +
(784*(-221 + 16*J + 8*J^2)*m2^2 - 3136*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 6] + (-15680*m2^2 - 31360*m2^2*x)*pj[J, x, 5, 7] +
(6272*m2^2 - 6272*m2^2*x)*pj[J, x, 5, 8],
J*(2 + J)*(-36 + 678*J + 691*J^2 + 360*J^3 + 100*J^4 + 6*J^5 + J^6)*
m2^2*pj[J, x, 5, 0] - 2*J*(2 + J)*(309 + 346*J + 205*J^2 +
32*J^3 + 8*J^4)*m2^2*x*pj[J, x, 5, 1] +
6*(-3650 + 656*J + 484*J^2 + 156*J^3 + 39*J^4)*m2^2*
pj[J, x, 5, 2] - 210*(55 + 16*J + 8*J^2)*m2^2*x*pj[J, x, 5, 3] +
5145*m2^2*pj[J, x, 5, 4], 312*(-2 + J)*(4 + J)*(-18 + 62*J +
35*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 2] +
(48*(-3 + J)*(5 + J)*(843 + 358*J + 179*J^2)*m2^2 -
312*(-36 + 242*J + 173*J^2 + 52*J^3 + 13*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (24*(-37 + 4*J + 2*J^2)*(1254 + 26*J + 13*J^2)*
m2^2 - 48*(4059 + 2832*J + 1468*J^2 + 52*J^3 + 13*J^4)*m2^2*x)*
pj[J, x, 5, 4] + (6720*(-23 + 4*J + 2*J^2)*m2^2 -
840*(355 + 32*J + 16*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(82320*m2^2 - 82320*m2^2*x)*pj[J, x, 5, 6],
312*(-2 + J)*(4 + J)*(-18 + 62*J + 35*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 2] + (-48*(-3 + J)*(5 + J)*(843 + 358*J + 179*J^2)*
m2^2 - 312*(-36 + 242*J + 173*J^2 + 52*J^3 + 13*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (24*(-37 + 4*J + 2*J^2)*(1254 + 26*J + 13*J^2)*
m2^2 + 48*(4059 + 2832*J + 1468*J^2 + 52*J^3 + 13*J^4)*m2^2*x)*
pj[J, x, 5, 4] + (-6720*(-23 + 4*J + 2*J^2)*m2^2 -
840*(355 + 32*J + 16*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(82320*m2^2 + 82320*m2^2*x)*pj[J, x, 5, 6],
-7840*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
47040*(-1 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 5] +
164640*m2^2*pj[J, x, 5, 6], 5376*(-3 + J)*(5 + J)*(-1 + 2*J + J^2)*
m2^2*pj[J, x, 5, 3] + (-448*(1296 - 742*J - 319*J^2 + 52*J^3 +
13*J^4)*m2^2 - 896*(-18 + 62*J + 35*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 4] + (-7168*(-29 + 2*J + J^2)*m2^2 +
9408*(-11 + 10*J + 5*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-896*(-25 + 22*J + 11*J^2)*m2^2 - 896*(-25 + 22*J + 11*J^2)*m2^2*
x)*pj[J, x, 5, 6], -5376*(-3 + J)*(5 + J)*(-1 + 2*J + J^2)*m2^2*
pj[J, x, 5, 3] + (-448*(1296 - 742*J - 319*J^2 + 52*J^3 + 13*J^4)*
m2^2 + 896*(-18 + 62*J + 35*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 4] + (7168*(-29 + 2*J + J^2)*m2^2 +
9408*(-11 + 10*J + 5*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-896*(-25 + 22*J + 11*J^2)*m2^2 + 896*(-25 + 22*J + 11*J^2)*m2^2*
x)*pj[J, x, 5, 6], -16*(-2 + J)*(4 + J)*(1935 + 2040*J +
1072*J^2 + 52*J^3 + 13*J^4)*m2^2*pj[J, x, 5, 2] +
96*(1320 + 1790*J + 1051*J^2 + 156*J^3 + 39*J^4)*m2^2*x*
pj[J, x, 5, 3] - 1008*(-503 + 82*J + 41*J^2)*m2^2*pj[J, x, 5, 4] +
188160*m2^2*x*pj[J, x, 5, 5], 64*(-1 + J)*(3 + J)*
(-36 + 242*J + 173*J^2 + 52*J^3 + 13*J^4)*m2^2*pj[J, x, 5, 1] +
(-16*(-2 + J)*(4 + J)*(2097 + 1482*J + 757*J^2 + 16*J^3 + 4*J^4)*
m2^2 - 64*(-36 + 678*J + 691*J^2 + 360*J^3 + 100*J^4 + 6*J^5 +
J^6)*m2^2*x)*pj[J, x, 5, 2] +
(48*(-14038 + 1538*J + 925*J^2 + 156*J^3 + 39*J^4)*m2^2 +
48*(2748 + 2854*J + 1583*J^2 + 156*J^3 + 39*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (-5040*(-25 + 8*J + 4*J^2)*m2^2 -
3360*(71 + 12*J + 6*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(82320*m2^2 + 82320*m2^2*x)*pj[J, x, 5, 5],
-6272*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(-75264*(-3 + J)*(5 + J)*m2^2 + 37632*(-1 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-6272*(61 + 4*J + 2*J^2)*m2^2 -
12544*(-3 + J)*(5 + J)*m2^2*x)*pj[J, x, 5, 6] +
(-87808*m2^2 - 87808*m2^2*x)*pj[J, x, 5, 7],
-10752*(-3 + J)*(5 + J)*(-1 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(-5376*(-231 - 30*J - 11*J^2 + 4*J^3 + J^4)*m2^2 +
1792*(-18 + 62*J + 35*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-448*(-3917 + 302*J + 151*J^2)*m2^2 + 1344*(219 + 94*J + 47*J^2)*
m2^2*x)*pj[J, x, 5, 5] + (-448*(-429 + 32*J + 16*J^2)*m2^2 +
448*(845 + 32*J + 16*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-87808*m2^2 + 87808*m2^2*x)*pj[J, x, 5, 7],
10752*(-3 + J)*(5 + J)*(-1 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(-5376*(-231 - 30*J - 11*J^2 + 4*J^3 + J^4)*m2^2 -
1792*(-18 + 62*J + 35*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(448*(-3917 + 302*J + 151*J^2)*m2^2 + 1344*(219 + 94*J + 47*J^2)*
m2^2*x)*pj[J, x, 5, 5] + (-448*(-429 + 32*J + 16*J^2)*m2^2 -
448*(845 + 32*J + 16*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(87808*m2^2 + 87808*m2^2*x)*pj[J, x, 5, 7],
-6272*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(75264*(-3 + J)*(5 + J)*m2^2 + 37632*(-1 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-6272*(61 + 4*J + 2*J^2)*m2^2 +
12544*(-3 + J)*(5 + J)*m2^2*x)*pj[J, x, 5, 6] +
(87808*m2^2 - 87808*m2^2*x)*pj[J, x, 5, 7],
-64*(-1 + J)*(3 + J)*(-36 + 242*J + 173*J^2 + 52*J^3 + 13*J^4)*m2^2*
pj[J, x, 5, 1] + (-16*(-2 + J)*(4 + J)*(2097 + 1482*J + 757*J^2 +
16*J^3 + 4*J^4)*m2^2 + 64*(-36 + 678*J + 691*J^2 + 360*J^3 +
100*J^4 + 6*J^5 + J^6)*m2^2*x)*pj[J, x, 5, 2] +
(-48*(-14038 + 1538*J + 925*J^2 + 156*J^3 + 39*J^4)*m2^2 +
48*(2748 + 2854*J + 1583*J^2 + 156*J^3 + 39*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (-5040*(-25 + 8*J + 4*J^2)*m2^2 +
3360*(71 + 12*J + 6*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-82320*m2^2 + 82320*m2^2*x)*pj[J, x, 5, 5],
2688*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(32256*(-3 + J)*(5 + J)*m2 - 16128*(-1 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (2688*(61 + 4*J + 2*J^2)*m2 + 5376*(-3 + J)*
(5 + J)*m2*x)*pj[J, x, 5, 6] + (37632*m2 + 37632*m2*x)*
pj[J, x, 5, 7], 2688*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2*
pj[J, x, 5, 4] + (-32256*(-3 + J)*(5 + J)*m2 -
16128*(-1 + 2*J + J^2)*m2*x)*pj[J, x, 5, 5] +
(2688*(61 + 4*J + 2*J^2)*m2 - 5376*(-3 + J)*(5 + J)*m2*x)*
pj[J, x, 5, 6] + (-37632*m2 + 37632*m2*x)*pj[J, x, 5, 7],
-96*(-2 + J)*(4 + J)*(-18 + 62*J + 35*J^2 + 4*J^3 + J^4)*m2*
pj[J, x, 5, 2] + 96*(-36 + 242*J + 173*J^2 + 52*J^3 + 13*J^4)*m2*x*
pj[J, x, 5, 3] - 14112*(-18 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
70560*m2*x*pj[J, x, 5, 5], 8960*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*
m2*pj[J, x, 5, 4] + (-5376*(-155 + 2*J + J^2)*m2 -
53760*(-1 + 2*J + J^2)*m2*x)*pj[J, x, 5, 5] +
(-188160*m2 + 188160*m2*x)*pj[J, x, 5, 6],
8960*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(5376*(-155 + 2*J + J^2)*m2 - 53760*(-1 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (-188160*m2 - 188160*m2*x)*pj[J, x, 5, 6],
-1792*(1152 - 326*J - 143*J^2 + 20*J^3 + 5*J^4)*m2*pj[J, x, 5, 4] +
5376*(-79 + 18*J + 9*J^2)*m2*x*pj[J, x, 5, 5] +
376320*m2*pj[J, x, 5, 6], -1792*(36 - 46*J - 19*J^2 + 4*J^3 + J^4)*
pj[J, x, 5, 4] + 10752*(-1 + 2*J + J^2)*x*pj[J, x, 5, 5] +
37632*pj[J, x, 5, 6], 0, 0, 0}}}], exchange[{4 + 2*m, 3},
{GGGG[5], s, 1 + (2*t)/s},
{{1/(32*(-1 + J)*J*(1 + J)^2*(2 + J)*(3 + J)*m2^5)}},
{{{0, 0, (-1 + J)*J*(2 + J)*(3 + J)*(-2 + 2*J + J^2)*m2*
pj[J, x, 5, 0] - 3*(-1 + J)*J*(2 + J)*(3 + J)*m2*x*
pj[J, x, 5, 1] + 3*(-14 + 6*J + 3*J^2)*m2*pj[J, x, 5, 2] -
15*m2*x*pj[J, x, 5, 3], 12*(-2 + J)*(4 + J)*(3 + 2*J + J^2)*m2*
pj[J, x, 5, 2] + (-24*(-3 + J)*(5 + J)*m2 - 72*m2*x)*
pj[J, x, 5, 3] + (12*(-51 + 4*J + 2*J^2)*m2 - 24*(-1 + J)*(3 + J)*
m2*x)*pj[J, x, 5, 4] + (120*m2 - 120*m2*x)*pj[J, x, 5, 5],
12*(-2 + J)*(4 + J)*(3 + 2*J + J^2)*m2*pj[J, x, 5, 2] +
(24*(-3 + J)*(5 + J)*m2 - 72*m2*x)*pj[J, x, 5, 3] +
(12*(-51 + 4*J + 2*J^2)*m2 + 24*(-1 + J)*(3 + J)*m2*x)*
pj[J, x, 5, 4] + (-120*m2 - 120*m2*x)*pj[J, x, 5, 5], 0,
-128*(15 + 14*J + 7*J^2)*m2*pj[J, x, 5, 3] +
(-144*(6 + 2*J + J^2)*m2 - 128*(3 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 4] + (-320*m2 - 144*m2*x)*pj[J, x, 5, 5] +
(-32*m2 - 32*m2*x)*pj[J, x, 5, 6], 128*(15 + 14*J + 7*J^2)*m2*
pj[J, x, 5, 3] + (-144*(6 + 2*J + J^2)*m2 + 128*(3 + 2*J + J^2)*m2*
x)*pj[J, x, 5, 4] + (320*m2 - 144*m2*x)*pj[J, x, 5, 5] +
(-32*m2 + 32*m2*x)*pj[J, x, 5, 6], 12*(-2 + J)*(4 + J)*
(21 + 10*J + 5*J^2)*m2*pj[J, x, 5, 2] + 72*(-7 + 2*J + J^2)*m2*x*
pj[J, x, 5, 3] - 396*m2*pj[J, x, 5, 4],
72*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] +
(-12*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*m2 - 12*(-1 + J)*(3 + J)*
(-2 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] +
(72*(-10 + 2*J + J^2)*m2 + 72*(-1 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 3] + (-180*m2 - 180*m2*x)*pj[J, x, 5, 4], 0,
16*(15 + 14*J + 7*J^2)*m2*pj[J, x, 5, 3] +
(-48*(6 + 2*J + J^2)*m2 + 16*(3 + 2*J + J^2)*m2*x)*pj[J, x, 5, 4] +
(400*m2 - 48*m2*x)*pj[J, x, 5, 5] + (-64*m2 + 64*m2*x)*
pj[J, x, 5, 6], -16*(15 + 14*J + 7*J^2)*m2*pj[J, x, 5, 3] +
(-48*(6 + 2*J + J^2)*m2 - 16*(3 + 2*J + J^2)*m2*x)*pj[J, x, 5, 4] +
(-400*m2 - 48*m2*x)*pj[J, x, 5, 5] + (-64*m2 - 64*m2*x)*
pj[J, x, 5, 6], 0, -72*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] +
(-12*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*m2 + 12*(-1 + J)*(3 + J)*
(-2 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] +
(-72*(-10 + 2*J + J^2)*m2 + 72*(-1 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 3] + (-180*m2 + 180*m2*x)*pj[J, x, 5, 4], 0, 0,
48*(-2 + J)*(4 + J)*(3 + 2*J + J^2)*pj[J, x, 5, 2] -
288*x*pj[J, x, 5, 3] - 144*pj[J, x, 5, 4],
-192*(15 + 14*J + 7*J^2)*pj[J, x, 5, 3] - 192*(3 + 2*J + J^2)*x*
pj[J, x, 5, 4] - 192*pj[J, x, 5, 5],
192*(15 + 14*J + 7*J^2)*pj[J, x, 5, 3] + 192*(3 + 2*J + J^2)*x*
pj[J, x, 5, 4] + 192*pj[J, x, 5, 5],
-192*(6 + 2*J + J^2)*pj[J, x, 5, 4] - 192*x*pj[J, x, 5, 5], 0, 0, 0,
0}}}], exchange[{4 + 2*m, 4}, {GGGG[5], s, 1 + (2*t)/s},
{{1/(256*(-2 + J)*(-1 + J)*J*(1 + J)^2*(2 + J)*(3 + J)*(4 + J)*m2^6)}},
{{{16*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(192*(7 + 6*J + 3*J^2)*m2^2 + 96*(2 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (16*(67 + 16*J + 8*J^2)*m2^2 + 64*(3 + 2*J + J^2)*
m2^2*x)*pj[J, x, 5, 6] + (1088*m2^2 + 128*m2^2*x)*
pj[J, x, 5, 7] + (128*m2^2 + 128*m2^2*x)*pj[J, x, 5, 8],
16*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(-192*(7 + 6*J + 3*J^2)*m2^2 + 96*(2 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (16*(67 + 16*J + 8*J^2)*m2^2 - 64*(3 + 2*J + J^2)*
m2^2*x)*pj[J, x, 5, 6] + (-1088*m2^2 + 128*m2^2*x)*
pj[J, x, 5, 7] + (128*m2^2 - 128*m2^2*x)*pj[J, x, 5, 8],
(-2 + J)*(-1 + J)^2*J*(2 + J)*(3 + J)^2*(4 + J)*m2^2*
pj[J, x, 5, 0] - 4*(-2 + J)*(-1 + J)*J*(2 + J)*(3 + J)*(4 + J)*
m2^2*x*pj[J, x, 5, 1] + 6*(-2 + J)*(4 + J)*(-5 + 6*J + 3*J^2)*m2^2*
pj[J, x, 5, 2] - 60*(-1 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 3] +
105*m2^2*pj[J, x, 5, 4], 24*(-2 + J)*(4 + J)*(-36 - 22*J - 7*J^2 +
4*J^3 + J^4)*m2^2*pj[J, x, 5, 2] +
(96*(-3 + J)*(5 + J)*(6 + 2*J + J^2)*m2^2 - 24*(-2 + J)*(4 + J)*
(9 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 3] +
(24*(348 - 122*J - 53*J^2 + 8*J^3 + 2*J^4)*m2^2 -
48*(36 - 6*J + J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(480*(-22 + 2*J + J^2)*m2^2 - 120*(-11 + 8*J + 4*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (1680*m2^2 - 1680*m2^2*x)*pj[J, x, 5, 6],
24*(-2 + J)*(4 + J)*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 2] + (-96*(-3 + J)*(5 + J)*(6 + 2*J + J^2)*m2^2 -
24*(-2 + J)*(4 + J)*(9 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 3] +
(24*(348 - 122*J - 53*J^2 + 8*J^3 + 2*J^4)*m2^2 +
48*(36 - 6*J + J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-480*(-22 + 2*J + J^2)*m2^2 - 120*(-11 + 8*J + 4*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (1680*m2^2 + 1680*m2^2*x)*pj[J, x, 5, 6],
1120*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
6720*(2 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 5] +
3360*m2^2*pj[J, x, 5, 6], -3072*(-3 + J)*(5 + J)*(2 + 2*J + J^2)*
m2^2*pj[J, x, 5, 3] + (-1024*(-9 + 14*J + 11*J^2 + 4*J^3 + J^4)*
m2^2 - 512*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 4] + (-1024*(-8 + 14*J + 7*J^2)*m2^2 -
1536*(-1 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-512*(-1 + 4*J + 2*J^2)*m2^2 - 512*(-1 + 4*J + 2*J^2)*m2^2*x)*
pj[J, x, 5, 6], 3072*(-3 + J)*(5 + J)*(2 + 2*J + J^2)*m2^2*
pj[J, x, 5, 3] + (-1024*(-9 + 14*J + 11*J^2 + 4*J^3 + J^4)*m2^2 +
512*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(1024*(-8 + 14*J + 7*J^2)*m2^2 - 1536*(-1 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-512*(-1 + 4*J + 2*J^2)*m2^2 +
512*(-1 + 4*J + 2*J^2)*m2^2*x)*pj[J, x, 5, 6],
128*(-3 + J)*(-2 + J)*(4 + J)*(5 + J)*(3 + 2*J + J^2)*m2^2*
pj[J, x, 5, 2] - 768*(-3 + J)*(5 + J)*m2^2*x*pj[J, x, 5, 3] -
1152*(-21 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] +
3840*m2^2*x*pj[J, x, 5, 5], 16*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*
(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] +
(-16*(-2 + J)*(4 + J)*(36 - 6*J + J^2 + 4*J^3 + J^4)*m2^2 -
16*(-2 + J)*(-1 + J)^2*(3 + J)^2*(4 + J)*m2^2*x)*pj[J, x, 5, 2] +
(48*(131 - 100*J - 38*J^2 + 12*J^3 + 3*J^4)*m2^2 +
48*(24 - 26*J - J^2 + 12*J^3 + 3*J^4)*m2^2*x)*pj[J, x, 5, 3] +
(-720*(-12 + 2*J + J^2)*m2^2 - 240*(-5 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 4] + (1680*m2^2 + 1680*m2^2*x)*pj[J, x, 5, 5],
-896*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(-5376*(7 + 6*J + 3*J^2)*m2^2 - 5376*(2 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-896*(19 + 4*J + 2*J^2)*m2^2 -
1792*(3 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-1792*m2^2 - 1792*m2^2*x)*pj[J, x, 5, 7],
384*(-3 + J)*(5 + J)*(2 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(-192*(-4 + J)*(6 + J)*(3 + 2*J + J^2)*m2^2 +
64*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(128*(-92 + 2*J + J^2)*m2^2 + 384*(6 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-64*(-207 + 8*J + 4*J^2)*m2^2 +
64*(-25 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-1792*m2^2 + 1792*m2^2*x)*pj[J, x, 5, 7],
-384*(-3 + J)*(5 + J)*(2 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(-192*(-4 + J)*(6 + J)*(3 + 2*J + J^2)*m2^2 -
64*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-128*(-92 + 2*J + J^2)*m2^2 + 384*(6 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-64*(-207 + 8*J + 4*J^2)*m2^2 -
64*(-25 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(1792*m2^2 + 1792*m2^2*x)*pj[J, x, 5, 7],
-896*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(5376*(7 + 6*J + 3*J^2)*m2^2 - 5376*(2 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-896*(19 + 4*J + 2*J^2)*m2^2 +
1792*(3 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(1792*m2^2 - 1792*m2^2*x)*pj[J, x, 5, 7],
-16*(-2 + J)*(-1 + J)*(3 + J)*(4 + J)*(9 + 2*J + J^2)*m2^2*
pj[J, x, 5, 1] + (-16*(-2 + J)*(4 + J)*(36 - 6*J + J^2 + 4*J^3 +
J^4)*m2^2 + 16*(-2 + J)*(-1 + J)^2*(3 + J)^2*(4 + J)*m2^2*x)*
pj[J, x, 5, 2] + (-48*(131 - 100*J - 38*J^2 + 12*J^3 + 3*J^4)*
m2^2 + 48*(24 - 26*J - J^2 + 12*J^3 + 3*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (-720*(-12 + 2*J + J^2)*m2^2 +
240*(-5 + 6*J + 3*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-1680*m2^2 + 1680*m2^2*x)*pj[J, x, 5, 5],
384*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(2304*(7 + 6*J + 3*J^2)*m2 + 2304*(2 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (384*(19 + 4*J + 2*J^2)*m2 + 768*(3 + 2*J + J^2)*
m2*x)*pj[J, x, 5, 6] + (768*m2 + 768*m2*x)*pj[J, x, 5, 7],
384*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(-2304*(7 + 6*J + 3*J^2)*m2 + 2304*(2 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (384*(19 + 4*J + 2*J^2)*m2 - 768*(3 + 2*J + J^2)*
m2*x)*pj[J, x, 5, 6] + (-768*m2 + 768*m2*x)*pj[J, x, 5, 7],
96*(-2 + J)*(4 + J)*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2*
pj[J, x, 5, 2] - 96*(-2 + J)*(4 + J)*(9 + 2*J + J^2)*m2*x*
pj[J, x, 5, 3] - 288*(-36 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
1440*m2*x*pj[J, x, 5, 5], -4608*(-3 + J)*(5 + J)*(2 + 2*J + J^2)*m2*
pj[J, x, 5, 3] + (-1280*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2 -
768*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2*x)*pj[J, x, 5, 4] +
(1536*(22 + 2*J + J^2)*m2 - 7680*(2 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (-3840*m2 + 3840*m2*x)*pj[J, x, 5, 6],
4608*(-3 + J)*(5 + J)*(2 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
(-1280*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*m2 +
768*(-36 - 22*J - 7*J^2 + 4*J^3 + J^4)*m2*x)*pj[J, x, 5, 4] +
(-1536*(22 + 2*J + J^2)*m2 - 7680*(2 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (-3840*m2 - 3840*m2*x)*pj[J, x, 5, 6],
512*(288 + 278*J + 143*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
3072*(8 + 6*J + 3*J^2)*m2*x*pj[J, x, 5, 5] +
7680*m2*pj[J, x, 5, 6], 256*(72 + 86*J + 47*J^2 + 4*J^3 + J^4)*
pj[J, x, 5, 4] + 1536*(2 + 2*J + J^2)*x*pj[J, x, 5, 5] +
768*pj[J, x, 5, 6], 0, 0, 0}}}], exchange[{5 + 2*m, -3},
{GGGG[5], s, 1 + (2*t)/s},
{{1/(32*(-3 + J)*(-1 + J)*J*(1 + J)^2*(2 + J)*(3 + J)*(5 + J)*m2^6)}},
{{{-16*(-54 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(-48*(-21 + 10*J + 5*J^2)*m2^2 + 16*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-128*(-17 + 2*J + J^2)*m2^2 -
16*(-9 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-640*m2^2 + 320*m2^2*x)*pj[J, x, 5, 7] + (-128*m2^2 - 128*m2^2*x)*
pj[J, x, 5, 8], 16*(-54 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 4] + (-48*(-21 + 10*J + 5*J^2)*m2^2 -
16*(9 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 5] +
(128*(-17 + 2*J + J^2)*m2^2 - 16*(-9 + 8*J + 4*J^2)*m2^2*x)*
pj[J, x, 5, 6] + (-640*m2^2 - 320*m2^2*x)*pj[J, x, 5, 7] +
(128*m2^2 - 128*m2^2*x)*pj[J, x, 5, 8],
(-1 + J)*J*(2 + J)*(3 + J)*(13 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] -
3*J*(2 + J)*(11 + 6*J + 3*J^2)*m2^2*x*pj[J, x, 5, 2] +
15*(-17 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 3] -
105*m2^2*x*pj[J, x, 5, 4], 12*(-2 + J)*(4 + J)*(27 - 8*J + 4*J^3 +
J^4)*m2^2*pj[J, x, 5, 2] + (24*(-3 + J)*(5 + J)*
(-9 + 16*J + 8*J^2)*m2^2 - 24*(27 - 34*J - J^2 + 16*J^3 + 4*J^4)*
m2^2*x)*pj[J, x, 5, 3] + (12*(29 + 2*J + J^2)*(-39 + 4*J +
2*J^2)*m2^2 - 24*(-27 + 84*J + 46*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 4] + (120*(-52 + 6*J + 3*J^2)*m2^2 -
120*(25 + 6*J + 3*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(1680*m2^2 - 1680*m2^2*x)*pj[J, x, 5, 6],
-12*(-2 + J)*(4 + J)*(27 - 8*J + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 2] +
(24*(-3 + J)*(5 + J)*(-9 + 16*J + 8*J^2)*m2^2 +
24*(27 - 34*J - J^2 + 16*J^3 + 4*J^4)*m2^2*x)*pj[J, x, 5, 3] +
(-12*(29 + 2*J + J^2)*(-39 + 4*J + 2*J^2)*m2^2 -
24*(-27 + 84*J + 46*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(120*(-52 + 6*J + 3*J^2)*m2^2 + 120*(25 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-1680*m2^2 - 1680*m2^2*x)*pj[J, x, 5, 6],
-3360*(7 + 2*J + J^2)*m2^2*pj[J, x, 5, 5] - 3360*m2^2*x*
pj[J, x, 5, 6], -144*(-3 + J)*(5 + J)*(9 + 2*J + J^2)*m2^2*
pj[J, x, 5, 3] + (32*(-594 - 522*J - 209*J^2 + 52*J^3 + 13*J^4)*
m2^2 + 144*(27 - 8*J + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(48*(-41 + 78*J + 39*J^2)*m2^2 - 32*(99 + 70*J + 35*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (32*(-15 + 34*J + 17*J^2)*m2^2 +
32*(-15 + 34*J + 17*J^2)*m2^2*x)*pj[J, x, 5, 6],
-144*(-3 + J)*(5 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(-32*(-594 - 522*J - 209*J^2 + 52*J^3 + 13*J^4)*m2^2 +
144*(27 - 8*J + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(48*(-41 + 78*J + 39*J^2)*m2^2 + 32*(99 + 70*J + 35*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-32*(-15 + 34*J + 17*J^2)*m2^2 +
32*(-15 + 34*J + 17*J^2)*m2^2*x)*pj[J, x, 5, 6],
-8*(-1 + J)*(3 + J)*(27 - 34*J - J^2 + 16*J^3 + 4*J^4)*m2^2*
pj[J, x, 5, 1] + 4*(-1 + J)*(3 + J)*(-18 + 62*J + 35*J^2 + 4*J^3 +
J^4)*m2^2*x*pj[J, x, 5, 2] - 24*(-76 - 50*J - 13*J^2 + 12*J^3 +
3*J^4)*m2^2*pj[J, x, 5, 3] + 12*(97 + 162*J + 81*J^2)*m2^2*x*
pj[J, x, 5, 4] - 3840*m2^2*pj[J, x, 5, 5],
-8*(-1 + J)*(3 + J)*(27 - 34*J - J^2 + 16*J^3 + 4*J^4)*m2^2*
pj[J, x, 5, 1] + (4*(-2 + J)*(4 + J)*(-27 + 108*J + 58*J^2 +
4*J^3 + J^4)*m2^2 + 4*(-1 + J)*(3 + J)*(-18 + 62*J + 35*J^2 +
4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(-24*(-346 - 14*J + 5*J^2 + 12*J^3 + 3*J^4)*m2^2 -
24*(-9 + 68*J + 46*J^2 + 12*J^3 + 3*J^4)*m2^2*x)*pj[J, x, 5, 3] +
(180*(-29 + 6*J + 3*J^2)*m2^2 + 60*(41 + 18*J + 9*J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-1680*m2^2 - 1680*m2^2*x)*pj[J, x, 5, 5],
448*(-54 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(5376*J*(2 + J)*m2^2 - 448*(9 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 5] +
(896*(13 + 2*J + J^2)*m2^2 + 896*J*(2 + J)*m2^2*x)*pj[J, x, 5, 6] +
(1792*m2^2 + 1792*m2^2*x)*pj[J, x, 5, 7],
-48*(-3 + J)*(5 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(-16*(486 - 490*J - 209*J^2 + 36*J^3 + 9*J^4)*m2^2 +
48*(27 - 8*J + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-48*(-453 + 38*J + 19*J^2)*m2^2 + 16*(-81 + 134*J + 67*J^2)*m2^2*
x)*pj[J, x, 5, 5] + (-64*(-122 + 6*J + 3*J^2)*m2^2 +
192*(20 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-1792*m2^2 + 1792*m2^2*x)*pj[J, x, 5, 7],
-48*(-3 + J)*(5 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(16*(486 - 490*J - 209*J^2 + 36*J^3 + 9*J^4)*m2^2 +
48*(27 - 8*J + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-48*(-453 + 38*J + 19*J^2)*m2^2 - 16*(-81 + 134*J + 67*J^2)*m2^2*
x)*pj[J, x, 5, 5] + (64*(-122 + 6*J + 3*J^2)*m2^2 +
192*(20 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-1792*m2^2 - 1792*m2^2*x)*pj[J, x, 5, 7],
-448*(-54 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(5376*J*(2 + J)*m2^2 + 448*(9 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-896*(13 + 2*J + J^2)*m2^2 + 896*J*(2 + J)*m2^2*x)*
pj[J, x, 5, 6] + (1792*m2^2 - 1792*m2^2*x)*pj[J, x, 5, 7],
-8*(-1 + J)*(3 + J)*(27 - 34*J - J^2 + 16*J^3 + 4*J^4)*m2^2*
pj[J, x, 5, 1] + (-4*(-2 + J)*(4 + J)*(-27 + 108*J + 58*J^2 +
4*J^3 + J^4)*m2^2 + 4*(-1 + J)*(3 + J)*(-18 + 62*J + 35*J^2 +
4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(-24*(-346 - 14*J + 5*J^2 + 12*J^3 + 3*J^4)*m2^2 +
24*(-9 + 68*J + 46*J^2 + 12*J^3 + 3*J^4)*m2^2*x)*pj[J, x, 5, 3] +
(-180*(-29 + 6*J + 3*J^2)*m2^2 + 60*(41 + 18*J + 9*J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-1680*m2^2 + 1680*m2^2*x)*pj[J, x, 5, 5],
-192*(-54 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(-2304*J*(2 + J)*m2 + 192*(9 + 2*J + J^2)*m2*x)*pj[J, x, 5, 5] +
(-384*(13 + 2*J + J^2)*m2 - 384*J*(2 + J)*m2*x)*pj[J, x, 5, 6] +
(-768*m2 - 768*m2*x)*pj[J, x, 5, 7],
192*(-54 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(-2304*J*(2 + J)*m2 - 192*(9 + 2*J + J^2)*m2*x)*pj[J, x, 5, 5] +
(384*(13 + 2*J + J^2)*m2 - 384*J*(2 + J)*m2*x)*pj[J, x, 5, 6] +
(-768*m2 + 768*m2*x)*pj[J, x, 5, 7], 288*(-3 + J)*(5 + J)*m2*
pj[J, x, 5, 3] + 288*(-1 + J)*(3 + J)*m2*x*pj[J, x, 5, 4] -
1440*m2*pj[J, x, 5, 5], 192*(-90 - 58*J - 25*J^2 + 4*J^3 + J^4)*m2*
pj[J, x, 5, 4] + (3840*(7 + 2*J + J^2)*m2 - 576*(5 + 2*J + J^2)*m2*
x)*pj[J, x, 5, 5] + (-3840*m2 + 3840*m2*x)*pj[J, x, 5, 6],
-192*(-90 - 58*J - 25*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(3840*(7 + 2*J + J^2)*m2 + 576*(5 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (3840*m2 + 3840*m2*x)*pj[J, x, 5, 6],
-192*(-3 + J)*(5 + J)*(9 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
192*(27 - 8*J + 4*J^3 + J^4)*m2*x*pj[J, x, 5, 4] -
192*(247 + 46*J + 23*J^2)*m2*pj[J, x, 5, 5] -
7680*m2*x*pj[J, x, 5, 6], -768*(7 + 2*J + J^2)*pj[J, x, 5, 5] -
768*x*pj[J, x, 5, 6], 0, 0, 0}}}], exchange[{5 + 2*m, -1},
{GGGG[5], s, 1 + (2*t)/s}, {{3/(7*(-1 + J)*(1 + J)^2*(3 + J)*m2^5),
Sqrt[3/2]/(28*Sqrt[-3 + J]*Sqrt[-2 + J]*(-1 + J)*(1 + J)^2*(3 + J)*
Sqrt[4 + J]*Sqrt[5 + J]*m2^6)},
{Sqrt[3/2]/(28*Sqrt[-3 + J]*Sqrt[-2 + J]*(-1 + J)*(1 + J)^2*(3 + J)*
Sqrt[4 + J]*Sqrt[5 + J]*m2^6), 1/(224*(-3 + J)*(-2 + J)*(-1 + J)*
(1 + J)^2*(3 + J)*(4 + J)*(5 + J)*m2^6)}},
{{{0, 0, (-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] - 3*m2*x*pj[J, x, 5, 2],
4*(-5 + 2*J + J^2)*m2*pj[J, x, 5, 2] + (-20*m2 - 8*m2*x)*
pj[J, x, 5, 3] + (8*m2 - 8*m2*x)*pj[J, x, 5, 4],
-4*(-5 + 2*J + J^2)*m2*pj[J, x, 5, 2] + (-20*m2 + 8*m2*x)*
pj[J, x, 5, 3] + (-8*m2 - 8*m2*x)*pj[J, x, 5, 4], 0, 0, 0,
-8*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] + 4*(5 + 2*J + J^2)*m2*x*
pj[J, x, 5, 2] - 48*m2*pj[J, x, 5, 3],
-8*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] + (4*(-11 + 2*J + J^2)*m2 +
4*(5 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] + (-24*m2 - 24*m2*x)*
pj[J, x, 5, 3], 0, 0, 0, 0, -8*(-1 + J)*(3 + J)*m2*
pj[J, x, 5, 1] + (-4*(-11 + 2*J + J^2)*m2 + 4*(5 + 2*J + J^2)*m2*
x)*pj[J, x, 5, 2] + (-24*m2 + 24*m2*x)*pj[J, x, 5, 3], 0, 0,
-16*pj[J, x, 5, 3], 0, 0, 0, 0, 0, 0, 0},
{0, 0, -3*(-1 + J)*(3 + J)*(20 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] +
30*(6 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 2] - 105*m2^2*pj[J, x, 5, 3],
-40*(-2 + J)*(4 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 2] +
(-500*(-3 + J)*(5 + J)*m2^2 + 120*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (-80*(-3 + J)*(5 + J)*m2^2 +
20*(129 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 5],
40*(-2 + J)*(4 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 2] +
(-500*(-3 + J)*(5 + J)*m2^2 - 120*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (80*(-3 + J)*(5 + J)*m2^2 +
20*(129 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-840*m2^2 - 840*m2^2*x)*pj[J, x, 5, 5], 0,
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(-224*(-4 + J)*(6 + J)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-112*m2^2 + 1120*m2^2*x)*pj[J, x, 5, 5] +
(-224*m2^2 - 224*m2^2*x)*pj[J, x, 5, 6],
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(224*(-4 + J)*(6 + J)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-112*m2^2 - 1120*m2^2*x)*pj[J, x, 5, 5] +
(224*m2^2 - 224*m2^2*x)*pj[J, x, 5, 6],
36*(-1 + J)*(3 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 1] -
12*(93 + 92*J + 50*J^2 + 4*J^3 + J^4)*m2^2*x*pj[J, x, 5, 2] -
24*(-9 + J)*(11 + J)*m2^2*pj[J, x, 5, 3] -
84*m2^2*x*pj[J, x, 5, 4], 36*(-1 + J)*(3 + J)*(11 + 6*J + 3*J^2)*
m2^2*pj[J, x, 5, 1] + (-12*(-2 + J)*(4 + J)*(66 + 2*J + J^2)*
m2^2 - 12*(93 + 92*J + 50*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 2] + (48*(-33 + 10*J + 5*J^2)*m2^2 +
12*(267 + 40*J + 20*J^2)*m2^2*x)*pj[J, x, 5, 3] +
(-1260*m2^2 - 1260*m2^2*x)*pj[J, x, 5, 4], 0,
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(336*(-19 + 2*J + J^2)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-784*m2^2 - 1680*m2^2*x)*pj[J, x, 5, 5] +
(448*m2^2 - 448*m2^2*x)*pj[J, x, 5, 6],
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(-336*(-19 + 2*J + J^2)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-784*m2^2 + 1680*m2^2*x)*pj[J, x, 5, 5] +
(-448*m2^2 - 448*m2^2*x)*pj[J, x, 5, 6], 0,
36*(-1 + J)*(3 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 1] +
(12*(-2 + J)*(4 + J)*(66 + 2*J + J^2)*m2^2 -
12*(93 + 92*J + 50*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(48*(-33 + 10*J + 5*J^2)*m2^2 - 12*(267 + 40*J + 20*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (1260*m2^2 - 1260*m2^2*x)*pj[J, x, 5, 4],
-224*(-9 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-2016*m2 + 448*m2*x)*
pj[J, x, 5, 5] + (-448*m2 - 448*m2*x)*pj[J, x, 5, 6],
224*(-9 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-2016*m2 - 448*m2*x)*
pj[J, x, 5, 5] + (448*m2 - 448*m2*x)*pj[J, x, 5, 6],
216*(-3 + J)*(5 + J)*m2*pj[J, x, 5, 3] - 1176*m2*x*pj[J, x, 5, 4],
224*(-39 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (1344*m2 - 2688*m2*x)*
pj[J, x, 5, 5], -224*(-39 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
(1344*m2 + 2688*m2*x)*pj[J, x, 5, 5],
-448*(-3 + J)*(5 + J)*m2*pj[J, x, 5, 3] + 224*(9 + 2*J + J^2)*m2*x*
pj[J, x, 5, 4] - 4032*m2*pj[J, x, 5, 5], -896*pj[J, x, 5, 5],
(1344*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((448*I)*(1 + J)*Sqrt[m2] + (448*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (1344*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((-448*I)*(1 + J)*Sqrt[m2] + (448*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (672*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4]}},
{{0, 0, -3*(-1 + J)*(3 + J)*(20 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] +
30*(6 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 2] - 105*m2^2*pj[J, x, 5, 3],
-40*(-2 + J)*(4 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 2] +
(-500*(-3 + J)*(5 + J)*m2^2 + 120*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (-80*(-3 + J)*(5 + J)*m2^2 +
20*(129 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 5],
40*(-2 + J)*(4 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 2] +
(-500*(-3 + J)*(5 + J)*m2^2 - 120*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (80*(-3 + J)*(5 + J)*m2^2 +
20*(129 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-840*m2^2 - 840*m2^2*x)*pj[J, x, 5, 5], 0,
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(-224*(-4 + J)*(6 + J)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-112*m2^2 + 1120*m2^2*x)*pj[J, x, 5, 5] +
(-224*m2^2 - 224*m2^2*x)*pj[J, x, 5, 6],
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(224*(-4 + J)*(6 + J)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-112*m2^2 - 1120*m2^2*x)*pj[J, x, 5, 5] +
(224*m2^2 - 224*m2^2*x)*pj[J, x, 5, 6],
36*(-1 + J)*(3 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 1] -
12*(93 + 92*J + 50*J^2 + 4*J^3 + J^4)*m2^2*x*pj[J, x, 5, 2] -
24*(-9 + J)*(11 + J)*m2^2*pj[J, x, 5, 3] -
84*m2^2*x*pj[J, x, 5, 4], 36*(-1 + J)*(3 + J)*(11 + 6*J + 3*J^2)*
m2^2*pj[J, x, 5, 1] + (-12*(-2 + J)*(4 + J)*(66 + 2*J + J^2)*
m2^2 - 12*(93 + 92*J + 50*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 2] + (48*(-33 + 10*J + 5*J^2)*m2^2 +
12*(267 + 40*J + 20*J^2)*m2^2*x)*pj[J, x, 5, 3] +
(-1260*m2^2 - 1260*m2^2*x)*pj[J, x, 5, 4], 0,
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(336*(-19 + 2*J + J^2)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-784*m2^2 - 1680*m2^2*x)*pj[J, x, 5, 5] +
(448*m2^2 - 448*m2^2*x)*pj[J, x, 5, 6],
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(-336*(-19 + 2*J + J^2)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-784*m2^2 + 1680*m2^2*x)*pj[J, x, 5, 5] +
(-448*m2^2 - 448*m2^2*x)*pj[J, x, 5, 6], 0,
36*(-1 + J)*(3 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 1] +
(12*(-2 + J)*(4 + J)*(66 + 2*J + J^2)*m2^2 -
12*(93 + 92*J + 50*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(48*(-33 + 10*J + 5*J^2)*m2^2 - 12*(267 + 40*J + 20*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (1260*m2^2 - 1260*m2^2*x)*pj[J, x, 5, 4],
-224*(-9 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-2016*m2 + 448*m2*x)*
pj[J, x, 5, 5] + (-448*m2 - 448*m2*x)*pj[J, x, 5, 6],
224*(-9 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-2016*m2 - 448*m2*x)*
pj[J, x, 5, 5] + (448*m2 - 448*m2*x)*pj[J, x, 5, 6],
216*(-3 + J)*(5 + J)*m2*pj[J, x, 5, 3] - 1176*m2*x*pj[J, x, 5, 4],
224*(-39 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (1344*m2 - 2688*m2*x)*
pj[J, x, 5, 5], -224*(-39 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
(1344*m2 + 2688*m2*x)*pj[J, x, 5, 5],
-448*(-3 + J)*(5 + J)*m2*pj[J, x, 5, 3] + 224*(9 + 2*J + J^2)*m2*x*
pj[J, x, 5, 4] - 4032*m2*pj[J, x, 5, 5], -896*pj[J, x, 5, 5],
(-1344*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((-448*I)*(1 + J)*Sqrt[m2] - (448*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (-1344*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((448*I)*(1 + J)*Sqrt[m2] - (448*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (-672*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4]},
{-784*(-23 + 2*J + J^2)*(6 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] +
(2352*(-143 + 6*J + 3*J^2)*m2^2 + 2352*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-6272*(-31 + 2*J + J^2)*m2^2 -
784*(87 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-6272*m2^2 + 40768*m2^2*x)*pj[J, x, 5, 7] +
(-6272*m2^2 - 6272*m2^2*x)*pj[J, x, 5, 8],
784*(-23 + 2*J + J^2)*(6 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] +
(2352*(-143 + 6*J + 3*J^2)*m2^2 - 2352*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (6272*(-31 + 2*J + J^2)*m2^2 -
784*(87 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-6272*m2^2 - 40768*m2^2*x)*pj[J, x, 5, 7] +
(6272*m2^2 - 6272*m2^2*x)*pj[J, x, 5, 8],
9*(-1 + J)*(3 + J)*(400 + 178*J + 93*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 1] - 9*(1200 + 898*J + 517*J^2 + 68*J^3 + 17*J^4)*m2^2*
x*pj[J, x, 5, 2] + 105*(-27 + 26*J + 13*J^2)*m2^2*pj[J, x, 5, 3] -
5145*m2^2*x*pj[J, x, 5, 4], 204*(-2 + J)*(4 + J)*
(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 2] +
(456*(-3 + J)*(5 + J)*(201 + 32*J + 16*J^2)*m2^2 -
408*(309 + 346*J + 205*J^2 + 32*J^3 + 8*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (12*(-105099 + 10406*J + 5339*J^2 + 136*J^3 +
34*J^4)*m2^2 - 24*(19197 + 5868*J + 3002*J^2 + 68*J^3 + 17*J^4)*
m2^2*x)*pj[J, x, 5, 4] + (840*(-76 + 26*J + 13*J^2)*m2^2 -
840*(463 + 26*J + 13*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(82320*m2^2 - 82320*m2^2*x)*pj[J, x, 5, 6],
-204*(-2 + J)*(4 + J)*(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 2] + (456*(-3 + J)*(5 + J)*(201 + 32*J + 16*J^2)*
m2^2 + 408*(309 + 346*J + 205*J^2 + 32*J^3 + 8*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (-12*(-105099 + 10406*J + 5339*J^2 + 136*J^3 +
34*J^4)*m2^2 - 24*(19197 + 5868*J + 3002*J^2 + 68*J^3 + 17*J^4)*
m2^2*x)*pj[J, x, 5, 4] + (840*(-76 + 26*J + 13*J^2)*m2^2 +
840*(463 + 26*J + 13*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-82320*m2^2 - 82320*m2^2*x)*pj[J, x, 5, 6],
23520*(-29 + 2*J + J^2)*m2^2*pj[J, x, 5, 5] - 164640*m2^2*x*
pj[J, x, 5, 6], 336*(-3 + J)*(5 + J)*(11 + 6*J + 3*J^2)*m2^2*
pj[J, x, 5, 3] + (-224*(906 - 106*J - 49*J^2 + 4*J^3 + J^4)*m2^2 -
112*(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-112*(-211 + 58*J + 29*J^2)*m2^2 - 672*(67 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-224*(97 + 2*J + J^2)*m2^2 -
224*(97 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6],
336*(-3 + J)*(5 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 3] +
(224*(906 - 106*J - 49*J^2 + 4*J^3 + J^4)*m2^2 -
112*(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-112*(-211 + 58*J + 29*J^2)*m2^2 + 672*(67 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (224*(97 + 2*J + J^2)*m2^2 - 224*(97 + 2*J + J^2)*
m2^2*x)*pj[J, x, 5, 6], -72*(-1 + J)*(3 + J)*
(309 + 346*J + 205*J^2 + 32*J^3 + 8*J^4)*m2^2*pj[J, x, 5, 1] +
36*(1818 + 2754*J + 1921*J^2 + 552*J^3 + 148*J^4 + 6*J^5 + J^6)*
m2^2*x*pj[J, x, 5, 2] - 72*(-18726 + 1894*J + 1111*J^2 + 164*J^3 +
41*J^4)*m2^2*pj[J, x, 5, 3] + 252*(2021 + 298*J + 149*J^2)*m2^2*x*
pj[J, x, 5, 4] - 188160*m2^2*pj[J, x, 5, 5],
-72*(-1 + J)*(3 + J)*(309 + 346*J + 205*J^2 + 32*J^3 + 8*J^4)*m2^2*
pj[J, x, 5, 1] + (36*(-2 + J)*(4 + J)*(2041 + 564*J + 286*J^2 +
4*J^3 + J^4)*m2^2 + 36*(1818 + 2754*J + 1921*J^2 + 552*J^3 +
148*J^4 + 6*J^5 + J^6)*m2^2*x)*pj[J, x, 5, 2] +
(-72*(-10896 + 1570*J + 853*J^2 + 68*J^3 + 17*J^4)*m2^2 -
72*(4091 + 1976*J + 1056*J^2 + 68*J^3 + 17*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (420*(-137 + 78*J + 39*J^2)*m2^2 +
1260*(253 + 26*J + 13*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-82320*m2^2 - 82320*m2^2*x)*pj[J, x, 5, 5],
-3136*(-23 + 2*J + J^2)*(6 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] +
(37632*(-36 + 2*J + J^2)*m2^2 + 9408*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-6272*(-43 + 2*J + J^2)*m2^2 -
6272*(48 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(87808*m2^2 + 87808*m2^2*x)*pj[J, x, 5, 7],
-4368*(-3 + J)*(5 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 3] +
(-336*(-8286 + 54*J + 79*J^2 + 52*J^3 + 13*J^4)*m2^2 +
1456*(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 4] + (-784*(-2519 + 194*J + 97*J^2)*m2^2 +
336*(2091 + 382*J + 191*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-448*(-174 + 26*J + 13*J^2)*m2^2 + 448*(1100 + 26*J + 13*J^2)*m2^2*
x)*pj[J, x, 5, 6] + (-87808*m2^2 + 87808*m2^2*x)*pj[J, x, 5, 7],
-4368*(-3 + J)*(5 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 3] +
(336*(-8286 + 54*J + 79*J^2 + 52*J^3 + 13*J^4)*m2^2 +
1456*(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 4] + (-784*(-2519 + 194*J + 97*J^2)*m2^2 -
336*(2091 + 382*J + 191*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(448*(-174 + 26*J + 13*J^2)*m2^2 + 448*(1100 + 26*J + 13*J^2)*m2^2*
x)*pj[J, x, 5, 6] + (-87808*m2^2 - 87808*m2^2*x)*pj[J, x, 5, 7],
3136*(-23 + 2*J + J^2)*(6 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] +
(37632*(-36 + 2*J + J^2)*m2^2 - 9408*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (6272*(-43 + 2*J + J^2)*m2^2 -
6272*(48 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(87808*m2^2 - 87808*m2^2*x)*pj[J, x, 5, 7],
-72*(-1 + J)*(3 + J)*(309 + 346*J + 205*J^2 + 32*J^3 + 8*J^4)*m2^2*
pj[J, x, 5, 1] + (-36*(-2 + J)*(4 + J)*(2041 + 564*J + 286*J^2 +
4*J^3 + J^4)*m2^2 + 36*(1818 + 2754*J + 1921*J^2 + 552*J^3 +
148*J^4 + 6*J^5 + J^6)*m2^2*x)*pj[J, x, 5, 2] +
(-72*(-10896 + 1570*J + 853*J^2 + 68*J^3 + 17*J^4)*m2^2 +
72*(4091 + 1976*J + 1056*J^2 + 68*J^3 + 17*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (-420*(-137 + 78*J + 39*J^2)*m2^2 +
1260*(253 + 26*J + 13*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-82320*m2^2 + 82320*m2^2*x)*pj[J, x, 5, 5],
1344*(-23 + 2*J + J^2)*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
(-16128*(-36 + 2*J + J^2)*m2 - 4032*(11 + 6*J + 3*J^2)*m2*x)*
pj[J, x, 5, 5] + (2688*(-43 + 2*J + J^2)*m2 +
2688*(48 + 2*J + J^2)*m2*x)*pj[J, x, 5, 6] +
(-37632*m2 - 37632*m2*x)*pj[J, x, 5, 7],
-1344*(-23 + 2*J + J^2)*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
(-16128*(-36 + 2*J + J^2)*m2 + 4032*(11 + 6*J + 3*J^2)*m2*x)*
pj[J, x, 5, 5] + (-2688*(-43 + 2*J + J^2)*m2 +
2688*(48 + 2*J + J^2)*m2*x)*pj[J, x, 5, 6] +
(-37632*m2 + 37632*m2*x)*pj[J, x, 5, 7],
-288*(-3 + J)*(5 + J)*(87 + 8*J + 4*J^2)*m2*pj[J, x, 5, 3] +
14112*(9 + 2*J + J^2)*m2*x*pj[J, x, 5, 4] -
70560*m2*pj[J, x, 5, 5], -1344*(-1158 + 46*J + 27*J^2 + 4*J^3 +
J^4)*m2*pj[J, x, 5, 4] + (-26880*(-29 + 2*J + J^2)*m2 +
1344*(303 + 38*J + 19*J^2)*m2*x)*pj[J, x, 5, 5] +
(-188160*m2 + 188160*m2*x)*pj[J, x, 5, 6],
1344*(-1158 + 46*J + 27*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(-26880*(-29 + 2*J + J^2)*m2 - 1344*(303 + 38*J + 19*J^2)*m2*x)*
pj[J, x, 5, 5] + (188160*m2 + 188160*m2*x)*pj[J, x, 5, 6],
4032*(-3 + J)*(5 + J)*(11 + 6*J + 3*J^2)*m2*pj[J, x, 5, 3] -
1344*(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2*x*pj[J, x, 5, 4] +
4032*(-307 + 26*J + 13*J^2)*m2*pj[J, x, 5, 5] -
376320*m2*x*pj[J, x, 5, 6], 5376*(-29 + 2*J + J^2)*pj[J, x, 5, 5] -
37632*x*pj[J, x, 5, 6], 0, 0, 0}}}], exchange[{5 + 2*m, 1},
{GGGG[5], s, 1 + (2*t)/s}, {{3/(7*(-1 + J)*(1 + J)^2*(3 + J)*m2^5),
Sqrt[3/2]/(28*Sqrt[-3 + J]*Sqrt[-2 + J]*(-1 + J)*(1 + J)^2*(3 + J)*
Sqrt[4 + J]*Sqrt[5 + J]*m2^6)},
{Sqrt[3/2]/(28*Sqrt[-3 + J]*Sqrt[-2 + J]*(-1 + J)*(1 + J)^2*(3 + J)*
Sqrt[4 + J]*Sqrt[5 + J]*m2^6), 1/(224*(-3 + J)*(-2 + J)*(-1 + J)*
(1 + J)^2*(3 + J)*(4 + J)*(5 + J)*m2^6)}},
{{{0, 0, (-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] - 3*m2*x*pj[J, x, 5, 2],
4*(-5 + 2*J + J^2)*m2*pj[J, x, 5, 2] + (-20*m2 - 8*m2*x)*
pj[J, x, 5, 3] + (8*m2 - 8*m2*x)*pj[J, x, 5, 4],
-4*(-5 + 2*J + J^2)*m2*pj[J, x, 5, 2] + (-20*m2 + 8*m2*x)*
pj[J, x, 5, 3] + (-8*m2 - 8*m2*x)*pj[J, x, 5, 4], 0, 0, 0,
-8*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] + 4*(5 + 2*J + J^2)*m2*x*
pj[J, x, 5, 2] - 48*m2*pj[J, x, 5, 3],
-8*(-1 + J)*(3 + J)*m2*pj[J, x, 5, 1] + (4*(-11 + 2*J + J^2)*m2 +
4*(5 + 2*J + J^2)*m2*x)*pj[J, x, 5, 2] + (-24*m2 - 24*m2*x)*
pj[J, x, 5, 3], 0, 0, 0, 0, -8*(-1 + J)*(3 + J)*m2*
pj[J, x, 5, 1] + (-4*(-11 + 2*J + J^2)*m2 + 4*(5 + 2*J + J^2)*m2*
x)*pj[J, x, 5, 2] + (-24*m2 + 24*m2*x)*pj[J, x, 5, 3], 0, 0,
-16*pj[J, x, 5, 3], 0, 0, 0, 0, 0, 0, 0},
{0, 0, -3*(-1 + J)*(3 + J)*(20 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] +
30*(6 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 2] - 105*m2^2*pj[J, x, 5, 3],
-40*(-2 + J)*(4 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 2] +
(-500*(-3 + J)*(5 + J)*m2^2 + 120*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (-80*(-3 + J)*(5 + J)*m2^2 +
20*(129 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 5],
40*(-2 + J)*(4 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 2] +
(-500*(-3 + J)*(5 + J)*m2^2 - 120*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (80*(-3 + J)*(5 + J)*m2^2 +
20*(129 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-840*m2^2 - 840*m2^2*x)*pj[J, x, 5, 5], 0,
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(-224*(-4 + J)*(6 + J)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-112*m2^2 + 1120*m2^2*x)*pj[J, x, 5, 5] +
(-224*m2^2 - 224*m2^2*x)*pj[J, x, 5, 6],
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(224*(-4 + J)*(6 + J)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-112*m2^2 - 1120*m2^2*x)*pj[J, x, 5, 5] +
(224*m2^2 - 224*m2^2*x)*pj[J, x, 5, 6],
36*(-1 + J)*(3 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 1] -
12*(93 + 92*J + 50*J^2 + 4*J^3 + J^4)*m2^2*x*pj[J, x, 5, 2] -
24*(-9 + J)*(11 + J)*m2^2*pj[J, x, 5, 3] -
84*m2^2*x*pj[J, x, 5, 4], 36*(-1 + J)*(3 + J)*(11 + 6*J + 3*J^2)*
m2^2*pj[J, x, 5, 1] + (-12*(-2 + J)*(4 + J)*(66 + 2*J + J^2)*
m2^2 - 12*(93 + 92*J + 50*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 2] + (48*(-33 + 10*J + 5*J^2)*m2^2 +
12*(267 + 40*J + 20*J^2)*m2^2*x)*pj[J, x, 5, 3] +
(-1260*m2^2 - 1260*m2^2*x)*pj[J, x, 5, 4], 0,
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(336*(-19 + 2*J + J^2)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-784*m2^2 - 1680*m2^2*x)*pj[J, x, 5, 5] +
(448*m2^2 - 448*m2^2*x)*pj[J, x, 5, 6],
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(-336*(-19 + 2*J + J^2)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-784*m2^2 + 1680*m2^2*x)*pj[J, x, 5, 5] +
(-448*m2^2 - 448*m2^2*x)*pj[J, x, 5, 6], 0,
36*(-1 + J)*(3 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 1] +
(12*(-2 + J)*(4 + J)*(66 + 2*J + J^2)*m2^2 -
12*(93 + 92*J + 50*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(48*(-33 + 10*J + 5*J^2)*m2^2 - 12*(267 + 40*J + 20*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (1260*m2^2 - 1260*m2^2*x)*pj[J, x, 5, 4],
-224*(-9 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-2016*m2 + 448*m2*x)*
pj[J, x, 5, 5] + (-448*m2 - 448*m2*x)*pj[J, x, 5, 6],
224*(-9 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-2016*m2 - 448*m2*x)*
pj[J, x, 5, 5] + (448*m2 - 448*m2*x)*pj[J, x, 5, 6],
216*(-3 + J)*(5 + J)*m2*pj[J, x, 5, 3] - 1176*m2*x*pj[J, x, 5, 4],
224*(-39 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (1344*m2 - 2688*m2*x)*
pj[J, x, 5, 5], -224*(-39 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
(1344*m2 + 2688*m2*x)*pj[J, x, 5, 5],
-448*(-3 + J)*(5 + J)*m2*pj[J, x, 5, 3] + 224*(9 + 2*J + J^2)*m2*x*
pj[J, x, 5, 4] - 4032*m2*pj[J, x, 5, 5], -896*pj[J, x, 5, 5],
(-1344*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((-448*I)*(1 + J)*Sqrt[m2] - (448*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (-1344*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((448*I)*(1 + J)*Sqrt[m2] - (448*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (-672*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4]}},
{{0, 0, -3*(-1 + J)*(3 + J)*(20 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] +
30*(6 + 2*J + J^2)*m2^2*x*pj[J, x, 5, 2] - 105*m2^2*pj[J, x, 5, 3],
-40*(-2 + J)*(4 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 2] +
(-500*(-3 + J)*(5 + J)*m2^2 + 120*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (-80*(-3 + J)*(5 + J)*m2^2 +
20*(129 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-840*m2^2 + 840*m2^2*x)*pj[J, x, 5, 5],
40*(-2 + J)*(4 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 2] +
(-500*(-3 + J)*(5 + J)*m2^2 - 120*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (80*(-3 + J)*(5 + J)*m2^2 +
20*(129 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-840*m2^2 - 840*m2^2*x)*pj[J, x, 5, 5], 0,
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(-224*(-4 + J)*(6 + J)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-112*m2^2 + 1120*m2^2*x)*pj[J, x, 5, 5] +
(-224*m2^2 - 224*m2^2*x)*pj[J, x, 5, 6],
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(224*(-4 + J)*(6 + J)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-112*m2^2 - 1120*m2^2*x)*pj[J, x, 5, 5] +
(224*m2^2 - 224*m2^2*x)*pj[J, x, 5, 6],
36*(-1 + J)*(3 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 1] -
12*(93 + 92*J + 50*J^2 + 4*J^3 + J^4)*m2^2*x*pj[J, x, 5, 2] -
24*(-9 + J)*(11 + J)*m2^2*pj[J, x, 5, 3] -
84*m2^2*x*pj[J, x, 5, 4], 36*(-1 + J)*(3 + J)*(11 + 6*J + 3*J^2)*
m2^2*pj[J, x, 5, 1] + (-12*(-2 + J)*(4 + J)*(66 + 2*J + J^2)*
m2^2 - 12*(93 + 92*J + 50*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 2] + (48*(-33 + 10*J + 5*J^2)*m2^2 +
12*(267 + 40*J + 20*J^2)*m2^2*x)*pj[J, x, 5, 3] +
(-1260*m2^2 - 1260*m2^2*x)*pj[J, x, 5, 4], 0,
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(336*(-19 + 2*J + J^2)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-784*m2^2 - 1680*m2^2*x)*pj[J, x, 5, 5] +
(448*m2^2 - 448*m2^2*x)*pj[J, x, 5, 6],
224*(-3 + J)*(5 + J)*m2^2*pj[J, x, 5, 3] +
(-336*(-19 + 2*J + J^2)*m2^2 - 112*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-784*m2^2 + 1680*m2^2*x)*pj[J, x, 5, 5] +
(-448*m2^2 - 448*m2^2*x)*pj[J, x, 5, 6], 0,
36*(-1 + J)*(3 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 1] +
(12*(-2 + J)*(4 + J)*(66 + 2*J + J^2)*m2^2 -
12*(93 + 92*J + 50*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(48*(-33 + 10*J + 5*J^2)*m2^2 - 12*(267 + 40*J + 20*J^2)*m2^2*x)*
pj[J, x, 5, 3] + (1260*m2^2 - 1260*m2^2*x)*pj[J, x, 5, 4],
-224*(-9 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-2016*m2 + 448*m2*x)*
pj[J, x, 5, 5] + (-448*m2 - 448*m2*x)*pj[J, x, 5, 6],
224*(-9 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (-2016*m2 - 448*m2*x)*
pj[J, x, 5, 5] + (448*m2 - 448*m2*x)*pj[J, x, 5, 6],
216*(-3 + J)*(5 + J)*m2*pj[J, x, 5, 3] - 1176*m2*x*pj[J, x, 5, 4],
224*(-39 + 2*J + J^2)*m2*pj[J, x, 5, 4] + (1344*m2 - 2688*m2*x)*
pj[J, x, 5, 5], -224*(-39 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
(1344*m2 + 2688*m2*x)*pj[J, x, 5, 5],
-448*(-3 + J)*(5 + J)*m2*pj[J, x, 5, 3] + 224*(9 + 2*J + J^2)*m2*x*
pj[J, x, 5, 4] - 4032*m2*pj[J, x, 5, 5], -896*pj[J, x, 5, 5],
(1344*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((448*I)*(1 + J)*Sqrt[m2] + (448*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (1344*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4] +
((-448*I)*(1 + J)*Sqrt[m2] + (448*I)*(1 + J)*Sqrt[m2]*x)*
pj[J, x, 5, 5], (672*I)*(1 + J)*Sqrt[m2]*pj[J, x, 5, 4]},
{-784*(-23 + 2*J + J^2)*(6 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] +
(2352*(-143 + 6*J + 3*J^2)*m2^2 + 2352*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-6272*(-31 + 2*J + J^2)*m2^2 -
784*(87 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-6272*m2^2 + 40768*m2^2*x)*pj[J, x, 5, 7] +
(-6272*m2^2 - 6272*m2^2*x)*pj[J, x, 5, 8],
784*(-23 + 2*J + J^2)*(6 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] +
(2352*(-143 + 6*J + 3*J^2)*m2^2 - 2352*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (6272*(-31 + 2*J + J^2)*m2^2 -
784*(87 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-6272*m2^2 - 40768*m2^2*x)*pj[J, x, 5, 7] +
(6272*m2^2 - 6272*m2^2*x)*pj[J, x, 5, 8],
9*(-1 + J)*(3 + J)*(400 + 178*J + 93*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 1] - 9*(1200 + 898*J + 517*J^2 + 68*J^3 + 17*J^4)*m2^2*
x*pj[J, x, 5, 2] + 105*(-27 + 26*J + 13*J^2)*m2^2*pj[J, x, 5, 3] -
5145*m2^2*x*pj[J, x, 5, 4], 204*(-2 + J)*(4 + J)*
(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 2] +
(456*(-3 + J)*(5 + J)*(201 + 32*J + 16*J^2)*m2^2 -
408*(309 + 346*J + 205*J^2 + 32*J^3 + 8*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (12*(-105099 + 10406*J + 5339*J^2 + 136*J^3 +
34*J^4)*m2^2 - 24*(19197 + 5868*J + 3002*J^2 + 68*J^3 + 17*J^4)*
m2^2*x)*pj[J, x, 5, 4] + (840*(-76 + 26*J + 13*J^2)*m2^2 -
840*(463 + 26*J + 13*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(82320*m2^2 - 82320*m2^2*x)*pj[J, x, 5, 6],
-204*(-2 + J)*(4 + J)*(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 2] + (456*(-3 + J)*(5 + J)*(201 + 32*J + 16*J^2)*
m2^2 + 408*(309 + 346*J + 205*J^2 + 32*J^3 + 8*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (-12*(-105099 + 10406*J + 5339*J^2 + 136*J^3 +
34*J^4)*m2^2 - 24*(19197 + 5868*J + 3002*J^2 + 68*J^3 + 17*J^4)*
m2^2*x)*pj[J, x, 5, 4] + (840*(-76 + 26*J + 13*J^2)*m2^2 +
840*(463 + 26*J + 13*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-82320*m2^2 - 82320*m2^2*x)*pj[J, x, 5, 6],
23520*(-29 + 2*J + J^2)*m2^2*pj[J, x, 5, 5] - 164640*m2^2*x*
pj[J, x, 5, 6], 336*(-3 + J)*(5 + J)*(11 + 6*J + 3*J^2)*m2^2*
pj[J, x, 5, 3] + (-224*(906 - 106*J - 49*J^2 + 4*J^3 + J^4)*m2^2 -
112*(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-112*(-211 + 58*J + 29*J^2)*m2^2 - 672*(67 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-224*(97 + 2*J + J^2)*m2^2 -
224*(97 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6],
336*(-3 + J)*(5 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 3] +
(224*(906 - 106*J - 49*J^2 + 4*J^3 + J^4)*m2^2 -
112*(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-112*(-211 + 58*J + 29*J^2)*m2^2 + 672*(67 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (224*(97 + 2*J + J^2)*m2^2 - 224*(97 + 2*J + J^2)*
m2^2*x)*pj[J, x, 5, 6], -72*(-1 + J)*(3 + J)*
(309 + 346*J + 205*J^2 + 32*J^3 + 8*J^4)*m2^2*pj[J, x, 5, 1] +
36*(1818 + 2754*J + 1921*J^2 + 552*J^3 + 148*J^4 + 6*J^5 + J^6)*
m2^2*x*pj[J, x, 5, 2] - 72*(-18726 + 1894*J + 1111*J^2 + 164*J^3 +
41*J^4)*m2^2*pj[J, x, 5, 3] + 252*(2021 + 298*J + 149*J^2)*m2^2*x*
pj[J, x, 5, 4] - 188160*m2^2*pj[J, x, 5, 5],
-72*(-1 + J)*(3 + J)*(309 + 346*J + 205*J^2 + 32*J^3 + 8*J^4)*m2^2*
pj[J, x, 5, 1] + (36*(-2 + J)*(4 + J)*(2041 + 564*J + 286*J^2 +
4*J^3 + J^4)*m2^2 + 36*(1818 + 2754*J + 1921*J^2 + 552*J^3 +
148*J^4 + 6*J^5 + J^6)*m2^2*x)*pj[J, x, 5, 2] +
(-72*(-10896 + 1570*J + 853*J^2 + 68*J^3 + 17*J^4)*m2^2 -
72*(4091 + 1976*J + 1056*J^2 + 68*J^3 + 17*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (420*(-137 + 78*J + 39*J^2)*m2^2 +
1260*(253 + 26*J + 13*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-82320*m2^2 - 82320*m2^2*x)*pj[J, x, 5, 5],
-3136*(-23 + 2*J + J^2)*(6 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] +
(37632*(-36 + 2*J + J^2)*m2^2 + 9408*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-6272*(-43 + 2*J + J^2)*m2^2 -
6272*(48 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(87808*m2^2 + 87808*m2^2*x)*pj[J, x, 5, 7],
-4368*(-3 + J)*(5 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 3] +
(-336*(-8286 + 54*J + 79*J^2 + 52*J^3 + 13*J^4)*m2^2 +
1456*(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 4] + (-784*(-2519 + 194*J + 97*J^2)*m2^2 +
336*(2091 + 382*J + 191*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-448*(-174 + 26*J + 13*J^2)*m2^2 + 448*(1100 + 26*J + 13*J^2)*m2^2*
x)*pj[J, x, 5, 6] + (-87808*m2^2 + 87808*m2^2*x)*pj[J, x, 5, 7],
-4368*(-3 + J)*(5 + J)*(11 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 3] +
(336*(-8286 + 54*J + 79*J^2 + 52*J^3 + 13*J^4)*m2^2 +
1456*(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 4] + (-784*(-2519 + 194*J + 97*J^2)*m2^2 -
336*(2091 + 382*J + 191*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(448*(-174 + 26*J + 13*J^2)*m2^2 + 448*(1100 + 26*J + 13*J^2)*m2^2*
x)*pj[J, x, 5, 6] + (-87808*m2^2 - 87808*m2^2*x)*pj[J, x, 5, 7],
3136*(-23 + 2*J + J^2)*(6 + 2*J + J^2)*m2^2*pj[J, x, 5, 4] +
(37632*(-36 + 2*J + J^2)*m2^2 - 9408*(11 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (6272*(-43 + 2*J + J^2)*m2^2 -
6272*(48 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(87808*m2^2 - 87808*m2^2*x)*pj[J, x, 5, 7],
-72*(-1 + J)*(3 + J)*(309 + 346*J + 205*J^2 + 32*J^3 + 8*J^4)*m2^2*
pj[J, x, 5, 1] + (-36*(-2 + J)*(4 + J)*(2041 + 564*J + 286*J^2 +
4*J^3 + J^4)*m2^2 + 36*(1818 + 2754*J + 1921*J^2 + 552*J^3 +
148*J^4 + 6*J^5 + J^6)*m2^2*x)*pj[J, x, 5, 2] +
(-72*(-10896 + 1570*J + 853*J^2 + 68*J^3 + 17*J^4)*m2^2 +
72*(4091 + 1976*J + 1056*J^2 + 68*J^3 + 17*J^4)*m2^2*x)*
pj[J, x, 5, 3] + (-420*(-137 + 78*J + 39*J^2)*m2^2 +
1260*(253 + 26*J + 13*J^2)*m2^2*x)*pj[J, x, 5, 4] +
(-82320*m2^2 + 82320*m2^2*x)*pj[J, x, 5, 5],
1344*(-23 + 2*J + J^2)*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
(-16128*(-36 + 2*J + J^2)*m2 - 4032*(11 + 6*J + 3*J^2)*m2*x)*
pj[J, x, 5, 5] + (2688*(-43 + 2*J + J^2)*m2 +
2688*(48 + 2*J + J^2)*m2*x)*pj[J, x, 5, 6] +
(-37632*m2 - 37632*m2*x)*pj[J, x, 5, 7],
-1344*(-23 + 2*J + J^2)*(6 + 2*J + J^2)*m2*pj[J, x, 5, 4] +
(-16128*(-36 + 2*J + J^2)*m2 + 4032*(11 + 6*J + 3*J^2)*m2*x)*
pj[J, x, 5, 5] + (-2688*(-43 + 2*J + J^2)*m2 +
2688*(48 + 2*J + J^2)*m2*x)*pj[J, x, 5, 6] +
(-37632*m2 + 37632*m2*x)*pj[J, x, 5, 7],
-288*(-3 + J)*(5 + J)*(87 + 8*J + 4*J^2)*m2*pj[J, x, 5, 3] +
14112*(9 + 2*J + J^2)*m2*x*pj[J, x, 5, 4] -
70560*m2*pj[J, x, 5, 5], -1344*(-1158 + 46*J + 27*J^2 + 4*J^3 +
J^4)*m2*pj[J, x, 5, 4] + (-26880*(-29 + 2*J + J^2)*m2 +
1344*(303 + 38*J + 19*J^2)*m2*x)*pj[J, x, 5, 5] +
(-188160*m2 + 188160*m2*x)*pj[J, x, 5, 6],
1344*(-1158 + 46*J + 27*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(-26880*(-29 + 2*J + J^2)*m2 - 1344*(303 + 38*J + 19*J^2)*m2*x)*
pj[J, x, 5, 5] + (188160*m2 + 188160*m2*x)*pj[J, x, 5, 6],
4032*(-3 + J)*(5 + J)*(11 + 6*J + 3*J^2)*m2*pj[J, x, 5, 3] -
1344*(159 + 128*J + 68*J^2 + 4*J^3 + J^4)*m2*x*pj[J, x, 5, 4] +
4032*(-307 + 26*J + 13*J^2)*m2*pj[J, x, 5, 5] -
376320*m2*x*pj[J, x, 5, 6], 5376*(-29 + 2*J + J^2)*pj[J, x, 5, 5] -
37632*x*pj[J, x, 5, 6], 0, 0, 0}}}], exchange[{5 + 2*m, 3},
{GGGG[5], s, 1 + (2*t)/s},
{{1/(32*(-3 + J)*(-1 + J)*J*(1 + J)^2*(2 + J)*(3 + J)*(5 + J)*m2^6)}},
{{{-16*(-54 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(-48*(-21 + 10*J + 5*J^2)*m2^2 + 16*(9 + 2*J + J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-128*(-17 + 2*J + J^2)*m2^2 -
16*(-9 + 8*J + 4*J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-640*m2^2 + 320*m2^2*x)*pj[J, x, 5, 7] + (-128*m2^2 - 128*m2^2*x)*
pj[J, x, 5, 8], 16*(-54 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2^2*
pj[J, x, 5, 4] + (-48*(-21 + 10*J + 5*J^2)*m2^2 -
16*(9 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 5] +
(128*(-17 + 2*J + J^2)*m2^2 - 16*(-9 + 8*J + 4*J^2)*m2^2*x)*
pj[J, x, 5, 6] + (-640*m2^2 - 320*m2^2*x)*pj[J, x, 5, 7] +
(128*m2^2 - 128*m2^2*x)*pj[J, x, 5, 8],
(-1 + J)*J*(2 + J)*(3 + J)*(13 + 2*J + J^2)*m2^2*pj[J, x, 5, 1] -
3*J*(2 + J)*(11 + 6*J + 3*J^2)*m2^2*x*pj[J, x, 5, 2] +
15*(-17 + 6*J + 3*J^2)*m2^2*pj[J, x, 5, 3] -
105*m2^2*x*pj[J, x, 5, 4], 12*(-2 + J)*(4 + J)*(27 - 8*J + 4*J^3 +
J^4)*m2^2*pj[J, x, 5, 2] + (24*(-3 + J)*(5 + J)*
(-9 + 16*J + 8*J^2)*m2^2 - 24*(27 - 34*J - J^2 + 16*J^3 + 4*J^4)*
m2^2*x)*pj[J, x, 5, 3] + (12*(29 + 2*J + J^2)*(-39 + 4*J +
2*J^2)*m2^2 - 24*(-27 + 84*J + 46*J^2 + 4*J^3 + J^4)*m2^2*x)*
pj[J, x, 5, 4] + (120*(-52 + 6*J + 3*J^2)*m2^2 -
120*(25 + 6*J + 3*J^2)*m2^2*x)*pj[J, x, 5, 5] +
(1680*m2^2 - 1680*m2^2*x)*pj[J, x, 5, 6],
-12*(-2 + J)*(4 + J)*(27 - 8*J + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 2] +
(24*(-3 + J)*(5 + J)*(-9 + 16*J + 8*J^2)*m2^2 +
24*(27 - 34*J - J^2 + 16*J^3 + 4*J^4)*m2^2*x)*pj[J, x, 5, 3] +
(-12*(29 + 2*J + J^2)*(-39 + 4*J + 2*J^2)*m2^2 -
24*(-27 + 84*J + 46*J^2 + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(120*(-52 + 6*J + 3*J^2)*m2^2 + 120*(25 + 6*J + 3*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-1680*m2^2 - 1680*m2^2*x)*pj[J, x, 5, 6],
-3360*(7 + 2*J + J^2)*m2^2*pj[J, x, 5, 5] - 3360*m2^2*x*
pj[J, x, 5, 6], -144*(-3 + J)*(5 + J)*(9 + 2*J + J^2)*m2^2*
pj[J, x, 5, 3] + (32*(-594 - 522*J - 209*J^2 + 52*J^3 + 13*J^4)*
m2^2 + 144*(27 - 8*J + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(48*(-41 + 78*J + 39*J^2)*m2^2 - 32*(99 + 70*J + 35*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (32*(-15 + 34*J + 17*J^2)*m2^2 +
32*(-15 + 34*J + 17*J^2)*m2^2*x)*pj[J, x, 5, 6],
-144*(-3 + J)*(5 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(-32*(-594 - 522*J - 209*J^2 + 52*J^3 + 13*J^4)*m2^2 +
144*(27 - 8*J + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(48*(-41 + 78*J + 39*J^2)*m2^2 + 32*(99 + 70*J + 35*J^2)*m2^2*x)*
pj[J, x, 5, 5] + (-32*(-15 + 34*J + 17*J^2)*m2^2 +
32*(-15 + 34*J + 17*J^2)*m2^2*x)*pj[J, x, 5, 6],
-8*(-1 + J)*(3 + J)*(27 - 34*J - J^2 + 16*J^3 + 4*J^4)*m2^2*
pj[J, x, 5, 1] + 4*(-1 + J)*(3 + J)*(-18 + 62*J + 35*J^2 + 4*J^3 +
J^4)*m2^2*x*pj[J, x, 5, 2] - 24*(-76 - 50*J - 13*J^2 + 12*J^3 +
3*J^4)*m2^2*pj[J, x, 5, 3] + 12*(97 + 162*J + 81*J^2)*m2^2*x*
pj[J, x, 5, 4] - 3840*m2^2*pj[J, x, 5, 5],
-8*(-1 + J)*(3 + J)*(27 - 34*J - J^2 + 16*J^3 + 4*J^4)*m2^2*
pj[J, x, 5, 1] + (4*(-2 + J)*(4 + J)*(-27 + 108*J + 58*J^2 +
4*J^3 + J^4)*m2^2 + 4*(-1 + J)*(3 + J)*(-18 + 62*J + 35*J^2 +
4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(-24*(-346 - 14*J + 5*J^2 + 12*J^3 + 3*J^4)*m2^2 -
24*(-9 + 68*J + 46*J^2 + 12*J^3 + 3*J^4)*m2^2*x)*pj[J, x, 5, 3] +
(180*(-29 + 6*J + 3*J^2)*m2^2 + 60*(41 + 18*J + 9*J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-1680*m2^2 - 1680*m2^2*x)*pj[J, x, 5, 5],
448*(-54 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(5376*J*(2 + J)*m2^2 - 448*(9 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 5] +
(896*(13 + 2*J + J^2)*m2^2 + 896*J*(2 + J)*m2^2*x)*pj[J, x, 5, 6] +
(1792*m2^2 + 1792*m2^2*x)*pj[J, x, 5, 7],
-48*(-3 + J)*(5 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(-16*(486 - 490*J - 209*J^2 + 36*J^3 + 9*J^4)*m2^2 +
48*(27 - 8*J + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-48*(-453 + 38*J + 19*J^2)*m2^2 + 16*(-81 + 134*J + 67*J^2)*m2^2*
x)*pj[J, x, 5, 5] + (-64*(-122 + 6*J + 3*J^2)*m2^2 +
192*(20 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-1792*m2^2 + 1792*m2^2*x)*pj[J, x, 5, 7],
-48*(-3 + J)*(5 + J)*(9 + 2*J + J^2)*m2^2*pj[J, x, 5, 3] +
(16*(486 - 490*J - 209*J^2 + 36*J^3 + 9*J^4)*m2^2 +
48*(27 - 8*J + 4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 4] +
(-48*(-453 + 38*J + 19*J^2)*m2^2 - 16*(-81 + 134*J + 67*J^2)*m2^2*
x)*pj[J, x, 5, 5] + (64*(-122 + 6*J + 3*J^2)*m2^2 +
192*(20 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 6] +
(-1792*m2^2 - 1792*m2^2*x)*pj[J, x, 5, 7],
-448*(-54 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2^2*pj[J, x, 5, 4] +
(5376*J*(2 + J)*m2^2 + 448*(9 + 2*J + J^2)*m2^2*x)*pj[J, x, 5, 5] +
(-896*(13 + 2*J + J^2)*m2^2 + 896*J*(2 + J)*m2^2*x)*
pj[J, x, 5, 6] + (1792*m2^2 - 1792*m2^2*x)*pj[J, x, 5, 7],
-8*(-1 + J)*(3 + J)*(27 - 34*J - J^2 + 16*J^3 + 4*J^4)*m2^2*
pj[J, x, 5, 1] + (-4*(-2 + J)*(4 + J)*(-27 + 108*J + 58*J^2 +
4*J^3 + J^4)*m2^2 + 4*(-1 + J)*(3 + J)*(-18 + 62*J + 35*J^2 +
4*J^3 + J^4)*m2^2*x)*pj[J, x, 5, 2] +
(-24*(-346 - 14*J + 5*J^2 + 12*J^3 + 3*J^4)*m2^2 +
24*(-9 + 68*J + 46*J^2 + 12*J^3 + 3*J^4)*m2^2*x)*pj[J, x, 5, 3] +
(-180*(-29 + 6*J + 3*J^2)*m2^2 + 60*(41 + 18*J + 9*J^2)*m2^2*x)*
pj[J, x, 5, 4] + (-1680*m2^2 + 1680*m2^2*x)*pj[J, x, 5, 5],
-192*(-54 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(-2304*J*(2 + J)*m2 + 192*(9 + 2*J + J^2)*m2*x)*pj[J, x, 5, 5] +
(-384*(13 + 2*J + J^2)*m2 - 384*J*(2 + J)*m2*x)*pj[J, x, 5, 6] +
(-768*m2 - 768*m2*x)*pj[J, x, 5, 7],
192*(-54 - 26*J - 9*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(-2304*J*(2 + J)*m2 - 192*(9 + 2*J + J^2)*m2*x)*pj[J, x, 5, 5] +
(384*(13 + 2*J + J^2)*m2 - 384*J*(2 + J)*m2*x)*pj[J, x, 5, 6] +
(-768*m2 + 768*m2*x)*pj[J, x, 5, 7], 288*(-3 + J)*(5 + J)*m2*
pj[J, x, 5, 3] + 288*(-1 + J)*(3 + J)*m2*x*pj[J, x, 5, 4] -
1440*m2*pj[J, x, 5, 5], 192*(-90 - 58*J - 25*J^2 + 4*J^3 + J^4)*m2*
pj[J, x, 5, 4] + (3840*(7 + 2*J + J^2)*m2 - 576*(5 + 2*J + J^2)*m2*
x)*pj[J, x, 5, 5] + (-3840*m2 + 3840*m2*x)*pj[J, x, 5, 6],
-192*(-90 - 58*J - 25*J^2 + 4*J^3 + J^4)*m2*pj[J, x, 5, 4] +
(3840*(7 + 2*J + J^2)*m2 + 576*(5 + 2*J + J^2)*m2*x)*
pj[J, x, 5, 5] + (3840*m2 + 3840*m2*x)*pj[J, x, 5, 6],
-192*(-3 + J)*(5 + J)*(9 + 2*J + J^2)*m2*pj[J, x, 5, 3] +
192*(27 - 8*J + 4*J^3 + J^4)*m2*x*pj[J, x, 5, 4] -
192*(247 + 46*J + 23*J^2)*m2*pj[J, x, 5, 5] -
7680*m2*x*pj[J, x, 5, 6], -768*(7 + 2*J + J^2)*pj[J, x, 5, 5] -
768*x*pj[J, x, 5, 6], 0, 0, 0}}}]}
sumrules[bkimp[GGGG[5], 2]] = {(2*m2 - p2)*M[GGGG[5], {2, SUSYM}][s, -t][p2],
(2*m2 - p2)*M[GGGG[5], {7, FULLSYM}][s, -t][p2],
(2*m2 - p2)*M[GGGG[5], {1, SUSYM}, tus][s, -t][p2] +
(2*m2 - p2)*M[GGGG[5], {1, SUSYM}, ust][s, -t][p2],
(2*m2 - p2)*M[GGGG[5], {4, NOSYM}, sut][s, -t][p2] +
(2*m2 - p2)*M[GGGG[5], {4, NOSYM}, ust][s, -t][p2],
(2*m2 - p2)*M[GGGG[5], {5, SUSYM}, tus][s, -t][p2] +
(2*m2 - p2)*M[GGGG[5], {5, SUSYM}, ust][s, -t][p2],
(2*m2 - p2)*M[GGGG[5], {6, SUSYM}, tus][s, -t][p2] +
(2*m2 - p2)*M[GGGG[5], {6, SUSYM}, ust][s, -t][p2],
M[GGGG[5], {3, SUSYM}, tus][s, -t][p2] -
M[GGGG[5], {3, SUSYM}, ust][s, -t][p2],
M[GGGG[5], {6, SUSYM}, tus][s, -t][p2] -
M[GGGG[5], {6, SUSYM}, ust][s, -t][p2],
M[GGGG[5], {4, NOSYM}][s, -t][p2] - M[GGGG[5], {4, NOSYM}, uts][s, -t][
p2], (-4*p2^3*Derivative[1][M[GGGG[5], {5, SUSYM}][s, -t]][0])/
(3*m2^3) + (2*p2^3*Derivative[1][M[GGGG[5], {5, SUSYM}, tus][s, -t]][
0])/(3*m2^3) + (2*p2^3*Derivative[1][M[GGGG[5], {5, SUSYM}, ust][s,
-t]][0])/(3*m2^3) - (2*p2^3*M[GGGG[5], {5, SUSYM}][s, -t][0])/
m2^4 + ((2*m2 - p2)*M[GGGG[5], {5, SUSYM}][s, -t][p2])/
(m2*(m2 - p2)) - ((m2^4 - 2*m2*p2^3 + 2*p2^4)*
M[GGGG[5], {5, SUSYM}, tus][s, -t][0])/(m2^4*(m2 - p2)) -
M[GGGG[5], {5, SUSYM}, ust][s, -t][0]/(m2 + p2),
(-2*(2*m2^2 - p2^2)*M[GGGG[5], {2, SUSYM}][s, -t][0])/
(m2*(m2 - p2)*(m2 + p2)) + (p2*M[GGGG[5], {2, SUSYM}, tus][s, -t][0])/
(m2*(m2 + p2)) + ((2*m2 - p2)*M[GGGG[5], {2, SUSYM}, tus][s, -t][p2])/
(m2*(m2 - p2)) - (p2*M[GGGG[5], {2, SUSYM}, ust][s, -t][0])/
(m2*(m2 - p2)) + ((2*m2 - p2)*M[GGGG[5], {2, SUSYM}, ust][s, -t][p2])/
(m2*(m2 - p2)), (-2*(2*m2 - p2)*M[GGGG[5], {3, SUSYM}][s, -t][p2])/
(m2*(m2 - p2)) - M[GGGG[5], {4, NOSYM}][s, -t][0]/(m2 + p2) +
(2*M[GGGG[5], {3, SUSYM}, tus][s, -t][0])/(m2 - p2) +
(2*M[GGGG[5], {3, SUSYM}, ust][s, -t][0])/(m2 + p2) -
M[GGGG[5], {4, NOSYM}, sut][s, -t][0]/(m2 + p2) +
((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, tsu][s, -t][p2])/(m2*(m2 - p2)) +
((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, tus][s, -t][p2])/(m2*(m2 - p2)) -
M[GGGG[5], {4, NOSYM}, ust][s, -t][0]/(m2 - p2) -
M[GGGG[5], {4, NOSYM}, uts][s, -t][0]/(m2 - p2),
-(M[GGGG[5], {4, NOSYM}][s, -t][0]/(m2*(m2 + p2))) +
M[GGGG[5], {4, NOSYM}, sut][s, -t][0]/(m2*(m2 + p2)) +
M[GGGG[5], {4, NOSYM}, tsu][s, -t][p2]/(m2*(m2 - p2)) -
M[GGGG[5], {4, NOSYM}, tus][s, -t][p2]/(m2*(m2 - p2)) -
M[GGGG[5], {4, NOSYM}, ust][s, -t][0]/(m2*(m2 - p2)) +
M[GGGG[5], {4, NOSYM}, uts][s, -t][0]/(m2*(m2 - p2)),
-(Derivative[1][M[GGGG[5], {1, SUSYM}, tus][s, -t]][0]/(m2*(m2 - p2))) +
Derivative[1][M[GGGG[5], {1, SUSYM}, ust][s, -t]][0]/(m2*(m2 + p2)) +
((2*m2 - p2)*M[GGGG[5], {1, SUSYM}][s, -t][p2])/(m2^2*(m2 - p2)^2) -
((2*m2 - p2)*M[GGGG[5], {1, SUSYM}, tus][s, -t][0])/(m2^2*(m2 - p2)^2),
(2*m2 - p2)*M[GGGG[5], {8, SUODD}, tus][s, -t][p2] +
(-2*m2 + p2)*M[GGGG[5], {8, SUODD}, ust][s, -t][p2],
M[GGGG[5], {8, SUODD}][s, -t][p2]}
sumrules[bkimp[GGGG[5], 3]] = {M[GGGG[5], {1, SUSYM}, tus][s, -t][p2] -
M[GGGG[5], {1, SUSYM}, ust][s, -t][p2],
M[GGGG[5], {4, NOSYM}, sut][s, -t][p2] -
M[GGGG[5], {4, NOSYM}, ust][s, -t][p2],
M[GGGG[5], {5, SUSYM}, tus][s, -t][p2] -
M[GGGG[5], {5, SUSYM}, ust][s, -t][p2],
(-2*Derivative[1][M[GGGG[5], {2, SUSYM}][s, -t]][0])/m2 -
((m2^2 + 2*m2*p2 - p2^2)*M[GGGG[5], {2, SUSYM}][s, -t][0])/
(m2^2*(m2 - p2)*(m2 + p2)) + (p2*M[GGGG[5], {2, SUSYM}, tus][s, -t][
0])/(m2^2*(m2 + p2)) + M[GGGG[5], {2, SUSYM}, tus][s, -t][p2]/
(m2*(m2 - p2)) + (p2*M[GGGG[5], {2, SUSYM}, ust][s, -t][0])/
(m2^2*(m2 - p2)) - M[GGGG[5], {2, SUSYM}, ust][s, -t][p2]/
(m2*(m2 - p2)),
(p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/m2^2 -
(p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/m2^2 -
(2*p2^2*M[GGGG[5], {3, SUSYM}][s, -t][0])/(m2*(m2 - p2)*(m2 + p2)) -
(p2^2*M[GGGG[5], {4, NOSYM}][s, -t][0])/m2^3 +
(p2*M[GGGG[5], {3, SUSYM}, tus][s, -t][0])/(m2*(m2 + p2)) +
((2*m2 - p2)*M[GGGG[5], {3, SUSYM}, tus][s, -t][p2])/(m2*(m2 - p2)) -
(p2*M[GGGG[5], {3, SUSYM}, ust][s, -t][0])/(m2*(m2 - p2)) +
((2*m2 - p2)*M[GGGG[5], {3, SUSYM}, ust][s, -t][p2])/(m2*(m2 - p2)) +
(p2^2*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/m2^3 +
(p2^2*M[GGGG[5], {4, NOSYM}, tsu][s, -t][0])/m2^3 +
(p2^2*M[GGGG[5], {4, NOSYM}, tus][s, -t][0])/m2^3 -
(p2^2*M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/m2^3 -
(p2^2*M[GGGG[5], {4, NOSYM}, uts][s, -t][0])/m2^3,
(p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/m2^2 -
(p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/m2^2 +
((m2 - p2)*p2*M[GGGG[5], {4, NOSYM}][s, -t][0])/m2^3 +
((2*m2 - p2)*M[GGGG[5], {4, NOSYM}][s, -t][p2])/(m2*(m2 - p2)) -
((2*m2^3 - 2*m2*p2^2 + p2^3)*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/
(m2^3*(m2 - p2)) + (p2^3*M[GGGG[5], {4, NOSYM}, tsu][s, -t][0])/
(m2^3*(m2 + p2)) - (p2^3*M[GGGG[5], {4, NOSYM}, tus][s, -t][0])/
(m2^3*(m2 - p2)) - ((2*m2^3 + p2^3)*M[GGGG[5], {4, NOSYM}, ust][s, -t][
0])/(m2^3*(m2 + p2)) -
(p2*(m2 + p2)*M[GGGG[5], {4, NOSYM}, uts][s, -t][0])/m2^3 +
((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, uts][s, -t][p2])/(m2*(m2 - p2)),
(p2^3*Derivative[1][M[GGGG[5], {6, SUSYM}, tus][s, -t]][0])/m2^3 +
(p2^3*Derivative[1][M[GGGG[5], {6, SUSYM}, ust][s, -t]][0])/m2^3 +
(p2^3*Derivative[2][M[GGGG[5], {6, SUSYM}, tus][s, -t]][0])/(2*m2^2) +
(p2^3*Derivative[2][M[GGGG[5], {6, SUSYM}, ust][s, -t]][0])/(2*m2^2) +
(p2^3*Derivative[3][M[GGGG[5], {6, SUSYM}, tus][s, -t]][0])/(3*m2) +
(p2^3*Derivative[3][M[GGGG[5], {6, SUSYM}, ust][s, -t]][0])/(3*m2) +
((2*m2 - p2)*M[GGGG[5], {6, SUSYM}][s, -t][p2])/(m2*(m2 - p2)) -
((m2^4 - 2*m2*p2^3 + 2*p2^4)*M[GGGG[5], {6, SUSYM}, tus][s, -t][0])/
(m2^4*(m2 - p2)) - M[GGGG[5], {6, SUSYM}, ust][s, -t][0]/(m2 + p2),
-(Derivative[1][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0]/(m2*(m2 - p2))) +
Derivative[1][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0]/(m2*(m2 + p2)) +
((2*m2 - p2)*M[GGGG[5], {3, SUSYM}][s, -t][p2])/(m2^2*(m2 - p2)^2) -
((2*m2 - p2)*M[GGGG[5], {3, SUSYM}, tus][s, -t][0])/(m2^2*(m2 - p2)^2),
M[GGGG[5], {8, SUODD}, tus][s, -t][p2] +
M[GGGG[5], {8, SUODD}, ust][s, -t][p2]}
sumrules[bkimp[GGGG[5], 4]] = {(-2*p2^2*M[GGGG[5], {2, SUSYM}][s, -t][0])/
m2^3 + ((2*m2 - p2)*M[GGGG[5], {2, SUSYM}][s, -t][p2])/
(m2*(m2 - p2)) - (p2^3*M[GGGG[5], {2, SUSYM}, tus][s, -t][0])/
(m2^3*(m2 - p2)) + (p2^3*M[GGGG[5], {2, SUSYM}, ust][s, -t][0])/
(m2^3*(m2 + p2)), (-2*p2^2*M[GGGG[5], {7, FULLSYM}][s, -t][0])/
(m2*(m2 - p2)*(m2 + p2)) +
((2*m2 - p2)*M[GGGG[5], {7, FULLSYM}][s, -t][p2])/(m2*(m2 - p2)),
-((p2^2*(m2^2 + 2*p2^2)*Derivative[1][M[GGGG[5], {1, SUSYM}, tus][s,
-t]][0])/m2^4) + ((m2 - p2)*p2^2*(m2 + p2)*
Derivative[1][M[GGGG[5], {1, SUSYM}, ust][s, -t]][0])/m2^4 -
(p2^4*Derivative[2][M[GGGG[5], {1, SUSYM}, tus][s, -t]][0])/(2*m2^3) -
(p2^4*Derivative[2][M[GGGG[5], {1, SUSYM}, ust][s, -t]][0])/(2*m2^3) -
(2*p2^6*M[GGGG[5], {1, SUSYM}][s, -t][0])/(m2^5*(m2 - p2)*(m2 + p2)) +
(p2*(m2^4 - 2*m2^3*p2 - 2*m2^2*p2^2 - 2*m2*p2^3 - 2*p2^4)*
M[GGGG[5], {1, SUSYM}, tus][s, -t][0])/(m2^5*(m2 + p2)) +
((2*m2 - p2)*M[GGGG[5], {1, SUSYM}, tus][s, -t][p2])/(m2*(m2 - p2)) -
(p2*M[GGGG[5], {1, SUSYM}, ust][s, -t][0])/(m2*(m2 - p2)) +
((2*m2 - p2)*M[GGGG[5], {1, SUSYM}, ust][s, -t][p2])/(m2*(m2 - p2)),
(p2^3*Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][0])/m2^3 +
((m2 - p2)*p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
m2^3 - (p2^2*(m2 + p2)*Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s,
-t]][0])/m2^3 +
(p2^3*Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/m2^3 -
(p2^2*(2*m2^2 - 3*m2*p2 + 2*p2^2)*M[GGGG[5], {4, NOSYM}][s, -t][0])/
(m2^4*(m2 - p2)) + ((m2 - p2)*p2*(m2 + 2*p2)*
M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/m2^4 +
((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, sut][s, -t][p2])/(m2*(m2 - p2)) -
(p2^4*M[GGGG[5], {4, NOSYM}, tsu][s, -t][0])/(m2^4*(m2 - p2)) -
(p2^4*M[GGGG[5], {4, NOSYM}, tus][s, -t][0])/(m2^4*(m2 + p2)) -
(p2*(m2^2 + m2*p2 + p2^2)*M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/m2^4 +
((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, ust][s, -t][p2])/(m2*(m2 - p2)) -
(p2^2*(2*m2^2 - p2^2)*M[GGGG[5], {4, NOSYM}, uts][s, -t][0])/
(m2^4*(m2 + p2)),
-((p2^2*Derivative[1][M[GGGG[5], {5, SUSYM}, tus][s, -t]][0])/m2^2) +
(p2^2*Derivative[1][M[GGGG[5], {5, SUSYM}, ust][s, -t]][0])/m2^2 -
(2*p2^4*M[GGGG[5], {5, SUSYM}][s, -t][0])/(m2^3*(m2 - p2)*(m2 + p2)) +
(p2*(m2^2 - 2*m2*p2 - 2*p2^2)*M[GGGG[5], {5, SUSYM}, tus][s, -t][0])/
(m2^3*(m2 + p2)) + ((2*m2 - p2)*M[GGGG[5], {5, SUSYM}, tus][s, -t][
p2])/(m2*(m2 - p2)) - (p2*M[GGGG[5], {5, SUSYM}, ust][s, -t][0])/
(m2*(m2 - p2)) + ((2*m2 - p2)*M[GGGG[5], {5, SUSYM}, ust][s, -t][p2])/
(m2*(m2 - p2)), (-2*p2^2*M[GGGG[5], {6, SUSYM}][s, -t][0])/
(m2*(m2 - p2)*(m2 + p2)) - (p2^2*M[GGGG[5], {6, SUSYM}, tus][s, -t][
0])/(m2^2*(m2 + p2)) +
((2*m2 - p2)*M[GGGG[5], {6, SUSYM}, tus][s, -t][p2])/(m2*(m2 - p2)) -
(p2^2*M[GGGG[5], {6, SUSYM}, ust][s, -t][0])/(m2^2*(m2 - p2)) +
((2*m2 - p2)*M[GGGG[5], {6, SUSYM}, ust][s, -t][p2])/(m2*(m2 - p2)),
(-2*p2^3*M[GGGG[5], {3, SUSYM}][s, -t][0])/(m2^3*(m2 - p2)*(m2 + p2)) +
(p2*M[GGGG[5], {3, SUSYM}, tus][s, -t][0])/(m2^2*(m2 + p2)) +
M[GGGG[5], {3, SUSYM}, tus][s, -t][p2]/(m2*(m2 - p2)) +
(p2*M[GGGG[5], {3, SUSYM}, ust][s, -t][0])/(m2^2*(m2 - p2)) -
M[GGGG[5], {3, SUSYM}, ust][s, -t][p2]/(m2*(m2 - p2)),
(-2*p2*M[GGGG[5], {6, SUSYM}][s, -t][0])/(m2*(m2 - p2)*(m2 + p2)) +
(p2*M[GGGG[5], {6, SUSYM}, tus][s, -t][0])/(m2^2*(m2 + p2)) +
M[GGGG[5], {6, SUSYM}, tus][s, -t][p2]/(m2*(m2 - p2)) +
(p2*M[GGGG[5], {6, SUSYM}, ust][s, -t][0])/(m2^2*(m2 - p2)) -
M[GGGG[5], {6, SUSYM}, ust][s, -t][p2]/(m2*(m2 - p2)),
(p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][0])/m2^3 -
(p2*(m2 + p2)*Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
m2^3 + ((m2 - p2)*p2*Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][
0])/m2^3 + (p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s, -t]][
0])/m2^3 + (p2*(m2 + 2*p2)*M[GGGG[5], {4, NOSYM}][s, -t][0])/m2^4 +
M[GGGG[5], {4, NOSYM}][s, -t][p2]/(m2*(m2 - p2)) -
(p2*(2*m2^2 + m2*p2 - 2*p2^2)*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/
(m2^4*(m2 - p2)) + (p2^3*M[GGGG[5], {4, NOSYM}, tsu][s, -t][0])/
(m2^4*(m2 + p2)) + (p2^3*M[GGGG[5], {4, NOSYM}, tus][s, -t][0])/
(m2^4*(m2 - p2)) - (p2^3*M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/
(m2^4*(m2 + p2)) + (p2*(m2 + p2)*M[GGGG[5], {4, NOSYM}, uts][s, -t][
0])/m2^4 - M[GGGG[5], {4, NOSYM}, uts][s, -t][p2]/(m2*(m2 - p2)),
-(Derivative[1][M[GGGG[5], {5, SUSYM}, tus][s, -t]][0]/(m2*(m2 - p2))) +
Derivative[1][M[GGGG[5], {5, SUSYM}, ust][s, -t]][0]/(m2*(m2 + p2)) +
((2*m2 - p2)*M[GGGG[5], {5, SUSYM}][s, -t][p2])/(m2^2*(m2 - p2)^2) -
((2*m2 - p2)*M[GGGG[5], {5, SUSYM}, tus][s, -t][0])/(m2^2*(m2 - p2)^2),
(-2*p2*(2*m2^2 - p2^2)*Derivative[1][M[GGGG[5], {2, SUSYM}][s, -t]][0])/
(m2^3*(m2 - p2)*(m2 + p2)) +
(p2^2*Derivative[1][M[GGGG[5], {2, SUSYM}, tus][s, -t]][0])/
(m2^3*(m2 + p2)) - (p2^2*Derivative[1][M[GGGG[5], {2, SUSYM}, ust][s,
-t]][0])/(m2^3*(m2 - p2)) -
((4*m2^3 - 2*m2^2*p2 - 4*m2*p2^2 + 3*p2^3)*
M[GGGG[5], {2, SUSYM}][s, -t][0])/(m2^4*(m2 - p2)^2) +
(3*p2*M[GGGG[5], {2, SUSYM}, tus][s, -t][0])/m2^4 +
((2*m2 - p2)*M[GGGG[5], {2, SUSYM}, tus][s, -t][p2])/
(m2^2*(m2 - p2)^2) - ((3*m2 - 2*p2)*p2*M[GGGG[5], {2, SUSYM}, ust][s,
-t][0])/(m2^3*(m2 - p2)^2) +
((2*m2 - p2)*M[GGGG[5], {2, SUSYM}, ust][s, -t][p2])/
(m2^2*(m2 - p2)^2),
-((p2*Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][0])/
(m2^2*(m2 + p2))) +
(2*p2*Derivative[1][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/
(m2^2*(m2 - p2)) + (2*p2*Derivative[1][M[GGGG[5], {3, SUSYM}, ust][s,
-t]][0])/(m2^2*(m2 + p2)) +
((2*m2 + p2)*Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
(m2^2*(m2 + p2)) -
((2*m2 - p2)*Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
(m2^2*(m2 - p2)) - (p2*Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s,
-t]][0])/(m2^2*(m2 - p2)) -
(2*(2*m2 - p2)*M[GGGG[5], {3, SUSYM}][s, -t][p2])/(m2^2*(m2 - p2)^2) -
(2*M[GGGG[5], {4, NOSYM}][s, -t][0])/m2^3 +
(2*(3*m2 - 2*p2)*p2*M[GGGG[5], {3, SUSYM}, tus][s, -t][0])/
(m2^3*(m2 - p2)^2) + (2*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/m2^3 +
((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, tsu][s, -t][p2])/
(m2^2*(m2 - p2)^2) + ((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, tus][s, -t][
p2])/(m2^2*(m2 - p2)^2) -
((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/
(m2^2*(m2 - p2)^2) - ((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, uts][s, -t][
0])/(m2^2*(m2 - p2)^2), Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][
0]/(m2^2*(m2 + p2)) - Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s,
-t]][0]/(m2^2*(m2 + p2)) -
Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0]/(m2^2*(m2 - p2)) +
Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0]/(m2^2*(m2 - p2)) +
(2*M[GGGG[5], {4, NOSYM}][s, -t][0])/(m2^3*(m2 + p2)) -
(2*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/(m2^3*(m2 + p2)) +
M[GGGG[5], {4, NOSYM}, tsu][s, -t][p2]/(m2^2*(m2 - p2)^2) -
M[GGGG[5], {4, NOSYM}, tus][s, -t][p2]/(m2^2*(m2 - p2)^2) -
M[GGGG[5], {4, NOSYM}, ust][s, -t][0]/(m2^2*(m2 - p2)^2) +
M[GGGG[5], {4, NOSYM}, uts][s, -t][0]/(m2^2*(m2 - p2)^2),
-(((2*m2 - p2)*Derivative[1][M[GGGG[5], {1, SUSYM}, tus][s, -t]][0])/
(m2^3*(m2 - p2)^2)) - Derivative[1][M[GGGG[5], {1, SUSYM}, ust][s,
-t]][0]/(m2^3*(m2 + p2)) -
Derivative[2][M[GGGG[5], {1, SUSYM}, tus][s, -t]][0]/
(2*m2^2*(m2 - p2)) - Derivative[2][M[GGGG[5], {1, SUSYM}, ust][s, -t]][
0]/(2*m2^2*(m2 + p2)) + ((2*m2 - p2)*M[GGGG[5], {1, SUSYM}][s, -t][
p2])/(m2^3*(m2 - p2)^3) -
((2*m2 - p2)*M[GGGG[5], {1, SUSYM}, tus][s, -t][0])/(m2^3*(m2 - p2)^3),
(2*p2^3*M[GGGG[5], {8, SUODD}][s, -t][0])/(m2^2*(m2 - p2)*(m2 + p2)) -
(p2*(3*m2 + 2*p2)*M[GGGG[5], {8, SUODD}, tus][s, -t][0])/
(m2^2*(m2 + p2)) + ((2*m2 - p2)*M[GGGG[5], {8, SUODD}, tus][s, -t][
p2])/(m2*(m2 - p2)) - ((3*m2 - 2*p2)*p2*
M[GGGG[5], {8, SUODD}, ust][s, -t][0])/(m2^2*(m2 - p2)) -
((2*m2 - p2)*M[GGGG[5], {8, SUODD}, ust][s, -t][p2])/(m2*(m2 - p2)),
M[GGGG[5], {8, SUODD}][s, -t][p2]/(m2*(m2 - p2)) +
M[GGGG[5], {8, SUODD}, tus][s, -t][0]/(m2*(m2 - p2)) +
M[GGGG[5], {8, SUODD}, ust][s, -t][0]/(m2*(m2 + p2))}
sumrules[bkimp[GGGG[5], 5]] =
{(-2*p2^3*Derivative[1][M[GGGG[5], {1, SUSYM}, tus][s, -t]][0])/m2^4 -
(p2^3*Derivative[1][M[GGGG[5], {1, SUSYM}, ust][s, -t]][0])/m2^4 -
(p2^3*Derivative[2][M[GGGG[5], {1, SUSYM}, tus][s, -t]][0])/(2*m2^3) -
(p2^3*Derivative[2][M[GGGG[5], {1, SUSYM}, ust][s, -t]][0])/(2*m2^3) -
(2*p2^5*M[GGGG[5], {1, SUSYM}][s, -t][0])/(m2^5*(m2 - p2)*(m2 + p2)) +
(p2*(m2^3 - 2*m2*p2^2 - 2*p2^3)*M[GGGG[5], {1, SUSYM}, tus][s, -t][0])/
(m2^5*(m2 + p2)) + M[GGGG[5], {1, SUSYM}, tus][s, -t][p2]/
(m2*(m2 - p2)) + (p2*M[GGGG[5], {1, SUSYM}, ust][s, -t][0])/
(m2^2*(m2 - p2)) - M[GGGG[5], {1, SUSYM}, ust][s, -t][p2]/
(m2*(m2 - p2)), -((p2^3*Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][
0])/m2^4) + (2*p2^2*(m2 + p2)*
Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/m2^4 +
(p2^2*(2*m2 + p2)*Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
m2^4 + (p2^3*Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/
m2^4 + (p2^3*Derivative[2][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
(2*m2^3) + (p2^3*Derivative[2][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
(2*m2^3) - (p2^2*(2*m2^2 + 2*m2*p2 - 3*p2^2)*
M[GGGG[5], {4, NOSYM}][s, -t][0])/(m2^5*(m2 - p2)) +
(p2*(m2^2 + 3*m2*p2 + 3*p2^2)*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/
m2^5 + M[GGGG[5], {4, NOSYM}, sut][s, -t][p2]/(m2*(m2 - p2)) +
(p2^4*M[GGGG[5], {4, NOSYM}, tsu][s, -t][0])/(m2^5*(m2 - p2)) -
(p2^4*M[GGGG[5], {4, NOSYM}, tus][s, -t][0])/(m2^5*(m2 + p2)) +
(p2*(m2^2 + 3*m2*p2 + p2^2)*M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/
m2^5 - M[GGGG[5], {4, NOSYM}, ust][s, -t][p2]/(m2*(m2 - p2)) +
(p2^2*(2*m2^2 + 2*m2*p2 + p2^2)*M[GGGG[5], {4, NOSYM}, uts][s, -t][0])/
(m2^5*(m2 + p2)), (-2*p2^3*M[GGGG[5], {5, SUSYM}][s, -t][0])/
(m2^3*(m2 - p2)*(m2 + p2)) + (p2*M[GGGG[5], {5, SUSYM}, tus][s, -t][
0])/(m2^2*(m2 + p2)) + M[GGGG[5], {5, SUSYM}, tus][s, -t][p2]/
(m2*(m2 - p2)) + (p2*M[GGGG[5], {5, SUSYM}, ust][s, -t][0])/
(m2^2*(m2 - p2)) - M[GGGG[5], {5, SUSYM}, ust][s, -t][p2]/
(m2*(m2 - p2)), -(((2*m2^3 + 3*m2^2*p2 - 3*p2^3)*
Derivative[1][M[GGGG[5], {2, SUSYM}][s, -t]][0])/
(m2^4*(m2 - p2)*(m2 + p2))) +
(p2^2*Derivative[1][M[GGGG[5], {2, SUSYM}, tus][s, -t]][0])/
(m2^4*(m2 + p2)) + (p2^2*Derivative[1][M[GGGG[5], {2, SUSYM}, ust][s,
-t]][0])/(m2^4*(m2 - p2)) -
(p2*Derivative[2][M[GGGG[5], {2, SUSYM}][s, -t]][0])/m2^3 -
((3*m2^4 + m2^3*p2 - 2*m2^2*p2^2 - 4*m2*p2^3 + 4*p2^4)*
M[GGGG[5], {2, SUSYM}][s, -t][0])/(m2^5*(m2 - p2)^2*(m2 + p2)) +
(2*p2*(m2 + 2*p2)*M[GGGG[5], {2, SUSYM}, tus][s, -t][0])/
(m2^5*(m2 + p2)) + M[GGGG[5], {2, SUSYM}, tus][s, -t][p2]/
(m2^2*(m2 - p2)^2) + ((2*m2 - p2)*p2*M[GGGG[5], {2, SUSYM}, ust][s,
-t][0])/(m2^4*(m2 - p2)^2) - M[GGGG[5], {2, SUSYM}, ust][s, -t][p2]/
(m2^2*(m2 - p2)^2),
(-2*p2^5*Derivative[1][M[GGGG[5], {3, SUSYM}][s, -t]][0])/
(m2^5*(m2 - p2)*(m2 + p2)) +
(2*p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][0])/m2^4 +
(p2^2*(m2^2 - 3*m2*p2 - 3*p2^2)*
Derivative[1][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/
(m2^5*(m2 + p2)) - (p2^2*(m2^2 - m2*p2 + p2^2)*
Derivative[1][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/
(m2^5*(m2 - p2)) - (4*p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}, sut][
s, -t]][0])/m2^4 -
(2*p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/m2^4 -
(2*p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/m2^4 -
(p2^3*Derivative[2][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/(2*m2^4) +
(p2^3*Derivative[2][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/(2*m2^4) -
(p2^2*Derivative[2][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/m2^3 -
(p2^2*Derivative[2][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/m2^3 -
(p2^2*(4*m2^3 - 8*m2^2*p2 + 10*m2*p2^2 - 5*p2^3)*
M[GGGG[5], {3, SUSYM}][s, -t][0])/(m2^6*(m2 - p2)^2) +
(6*p2^2*M[GGGG[5], {4, NOSYM}][s, -t][0])/m2^5 +
(p2*(m2^2 - 5*p2^2)*M[GGGG[5], {3, SUSYM}, tus][s, -t][0])/m2^6 +
((2*m2 - p2)*M[GGGG[5], {3, SUSYM}, tus][s, -t][p2])/
(m2^2*(m2 - p2)^2) - (p2*(m2^2 + 2*m2*p2 - 2*p2^2)*
M[GGGG[5], {3, SUSYM}, ust][s, -t][0])/(m2^4*(m2 - p2)^2) +
((2*m2 - p2)*M[GGGG[5], {3, SUSYM}, ust][s, -t][p2])/
(m2^2*(m2 - p2)^2) - (6*p2^2*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/
m2^5 + (2*p2^2*M[GGGG[5], {4, NOSYM}, tsu][s, -t][0])/m2^5 +
(2*p2^2*M[GGGG[5], {4, NOSYM}, tus][s, -t][0])/m2^5 -
(2*p2^2*M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/m2^5 -
(2*p2^2*M[GGGG[5], {4, NOSYM}, uts][s, -t][0])/m2^5,
(2*p2^3*Derivative[1][M[GGGG[5], {3, SUSYM}][s, -t]][0])/m2^5 +
(3*p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][0])/m2^4 -
(3*p2^3*Derivative[1][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/m2^5 +
(p2^3*Derivative[1][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/m2^5 +
(p2*(2*m2^2 - 8*m2*p2 + 5*p2^2)*
Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
(m2^4*(m2 - p2)) - (p2^3*Derivative[1][M[GGGG[5], {4, NOSYM}, tsu][s,
-t]][0])/(m2^4*(m2 + p2)) -
(p2^3*Derivative[1][M[GGGG[5], {4, NOSYM}, tus][s, -t]][0])/
(m2^4*(m2 - p2)) + (p2*(2*m2^2 + 2*m2*p2 - p2^2)*
Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
(m2^4*(m2 + p2)) - (3*p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}, uts][
s, -t]][0])/m2^4 -
(p2^3*Derivative[2][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/(2*m2^4) +
(p2^3*Derivative[2][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/(2*m2^4) -
(p2^2*Derivative[2][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/m2^3 -
(p2^2*Derivative[2][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/m2^3 +
(5*p2^3*M[GGGG[5], {3, SUSYM}][s, -t][0])/m2^6 -
((m2 - 8*p2)*p2*M[GGGG[5], {4, NOSYM}][s, -t][0])/m2^5 +
((2*m2 - p2)*M[GGGG[5], {4, NOSYM}][s, -t][p2])/(m2^2*(m2 - p2)^2) -
(5*p2^3*M[GGGG[5], {3, SUSYM}, tus][s, -t][0])/m2^6 +
(p2*(2*m2^3 - 16*m2^2*p2 + 21*m2*p2^2 - 8*p2^3)*
M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/(m2^5*(m2 - p2)^2) -
((5*m2 - 4*p2)*p2^3*M[GGGG[5], {4, NOSYM}, tus][s, -t][0])/
(m2^5*(m2 - p2)^2) + (4*p2*M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/
m2^4 + ((m2 - 4*p2)*p2*M[GGGG[5], {4, NOSYM}, uts][s, -t][0])/m2^5 +
((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, uts][s, -t][p2])/
(m2^2*(m2 - p2)^2),
-((p2*Derivative[1][M[GGGG[5], {6, SUSYM}, tus][s, -t]][0])/
(m2^2*(m2 - p2))) -
(p2*Derivative[1][M[GGGG[5], {6, SUSYM}, ust][s, -t]][0])/
(m2^2*(m2 + p2)) + ((2*m2 - p2)*M[GGGG[5], {6, SUSYM}][s, -t][p2])/
(m2^2*(m2 - p2)^2) - ((3*m2 - 2*p2)*p2*M[GGGG[5], {6, SUSYM}, tus][s,
-t][0])/(m2^3*(m2 - p2)^2),
Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][0]/m2^4 -
((3*m2 - 2*p2)*p2*Derivative[1][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/
(m2^4*(m2 - p2)^2) +
(p2*Derivative[1][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/
(m2^4*(m2 + p2)) - (2*Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s,
-t]][0])/m2^4 - Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][
0]/m2^4 - Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0]/m2^4 -
(p2*Derivative[2][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/
(2*m2^3*(m2 - p2)) +
(p2*Derivative[2][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/
(2*m2^3*(m2 + p2)) - Derivative[2][M[GGGG[5], {4, NOSYM}, sut][s, -t]][
0]/(2*m2^3) - Derivative[2][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0]/
(2*m2^3) - (2*M[GGGG[5], {3, SUSYM}][s, -t][0])/m2^5 +
((2*m2 - p2)*M[GGGG[5], {3, SUSYM}][s, -t][p2])/(m2^3*(m2 - p2)^3) +
(3*M[GGGG[5], {4, NOSYM}][s, -t][0])/m2^5 -
(p2*(5*m2^2 - 6*m2*p2 + 2*p2^2)*M[GGGG[5], {3, SUSYM}, tus][s, -t][0])/
(m2^5*(m2 - p2)^3) - (3*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/m2^5 +
M[GGGG[5], {4, NOSYM}, tsu][s, -t][0]/m2^5 +
M[GGGG[5], {4, NOSYM}, tus][s, -t][0]/m2^5 -
M[GGGG[5], {4, NOSYM}, ust][s, -t][0]/m2^5 -
M[GGGG[5], {4, NOSYM}, uts][s, -t][0]/m2^5,
(2*p2^2*M[GGGG[5], {8, SUODD}][s, -t][0])/(m2^2*(m2 - p2)*(m2 + p2)) -
(p2*M[GGGG[5], {8, SUODD}, tus][s, -t][0])/(m2^2*(m2 + p2)) +
M[GGGG[5], {8, SUODD}, tus][s, -t][p2]/(m2*(m2 - p2)) +
(p2*M[GGGG[5], {8, SUODD}, ust][s, -t][0])/(m2^2*(m2 - p2)) +
M[GGGG[5], {8, SUODD}, ust][s, -t][p2]/(m2*(m2 - p2))}
sumrules[bkimp[GGGG[5], 6]] =
{(-2*p2^3*Derivative[1][M[GGGG[5], {2, SUSYM}][s, -t]][0])/m2^5 -
(p2^4*Derivative[1][M[GGGG[5], {2, SUSYM}, tus][s, -t]][0])/
(m2^5*(m2 - p2)) + (p2^4*Derivative[1][M[GGGG[5], {2, SUSYM}, ust][s,
-t]][0])/(m2^5*(m2 + p2)) -
(p2^2*(4*m2 + 5*p2)*M[GGGG[5], {2, SUSYM}][s, -t][0])/m2^6 +
((2*m2 - p2)*M[GGGG[5], {2, SUSYM}][s, -t][p2])/(m2^2*(m2 - p2)^2) -
(p2^3*(m2^2 + 4*m2*p2 - 4*p2^2)*M[GGGG[5], {2, SUSYM}, tus][s, -t][0])/
(m2^6*(m2 - p2)^2) + (p2^3*M[GGGG[5], {2, SUSYM}, ust][s, -t][0])/
m2^6, (-2*p2^3*Derivative[1][M[GGGG[5], {7, FULLSYM}][s, -t]][0])/
(m2^3*(m2 - p2)*(m2 + p2)) - ((4*m2 - 3*p2)*p2^2*
M[GGGG[5], {7, FULLSYM}][s, -t][0])/(m2^4*(m2 - p2)^2) +
((2*m2 - p2)*M[GGGG[5], {7, FULLSYM}][s, -t][p2])/(m2^2*(m2 - p2)^2),
(-2*p2^7*Derivative[1][M[GGGG[5], {1, SUSYM}][s, -t]][0])/
(m2^7*(m2 - p2)*(m2 + p2)) + (p2^2*(m2^4 - 3*m2^3*p2 - 9*m2^2*p2^2 -
11*m2*p2^3 - 5*p2^4)*Derivative[1][M[GGGG[5], {1, SUSYM}, tus][s,
-t]][0])/(m2^7*(m2 + p2)) -
(p2^2*(m2^4 - m2^3*p2 - 5*m2^2*p2^2 + 8*m2*p2^3 - 2*p2^4)*
Derivative[1][M[GGGG[5], {1, SUSYM}, ust][s, -t]][0])/
(m2^7*(m2 - p2)) - (p2^3*(m2^2 + 6*m2*p2 + 3*p2^2)*
Derivative[2][M[GGGG[5], {1, SUSYM}, tus][s, -t]][0])/(2*m2^6) +
(p2^3*(m2^2 + 6*m2*p2 - 2*p2^2)*
Derivative[2][M[GGGG[5], {1, SUSYM}, ust][s, -t]][0])/(2*m2^6) -
(p2^4*(3*m2 + p2)*Derivative[3][M[GGGG[5], {1, SUSYM}, tus][s, -t]][0])/
(6*m2^5) + ((3*m2 - p2)*p2^4*Derivative[3][M[GGGG[5], {1, SUSYM}, ust][
s, -t]][0])/(6*m2^5) - ((8*m2 - 7*p2)*p2^6*
M[GGGG[5], {1, SUSYM}][s, -t][0])/(m2^8*(m2 - p2)^2) +
(p2*(m2^4 - 5*m2^2*p2^2 - 6*m2*p2^3 - 7*p2^4)*
M[GGGG[5], {1, SUSYM}, tus][s, -t][0])/m2^8 +
((2*m2 - p2)*M[GGGG[5], {1, SUSYM}, tus][s, -t][p2])/
(m2^2*(m2 - p2)^2) - (p2*(m2^2 + 2*m2*p2 - 2*p2^2)*
M[GGGG[5], {1, SUSYM}, ust][s, -t][0])/(m2^4*(m2 - p2)^2) +
((2*m2 - p2)*M[GGGG[5], {1, SUSYM}, ust][s, -t][p2])/
(m2^2*(m2 - p2)^2),
(p2^3*(2*m2^2 - 3*p2^2)*Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][0])/
(m2^6*(m2 - p2)) + ((m2 - p2)*p2^2*(m2 + 3*p2)*
Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/m2^6 -
(p2^5*Derivative[1][M[GGGG[5], {4, NOSYM}, tsu][s, -t]][0])/
(m2^6*(m2 - p2)) - (p2^5*Derivative[1][M[GGGG[5], {4, NOSYM}, tus][s,
-t]][0])/(m2^6*(m2 + p2)) - (p2^2*(m2^2 + 2*m2*p2 + 2*p2^2)*
Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/m2^6 +
(p2^3*(2*m2 + p2)*(m2 + 2*p2)*Derivative[1][M[GGGG[5], {4, NOSYM}, uts][
s, -t]][0])/(m2^6*(m2 + p2)) +
(p2^4*Derivative[2][M[GGGG[5], {4, NOSYM}][s, -t]][0])/(2*m2^5) +
((m2 - p2)*p2^3*Derivative[2][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
(2*m2^5) - (p2^3*(m2 + p2)*Derivative[2][M[GGGG[5], {4, NOSYM}, ust][
s, -t]][0])/(2*m2^5) +
(p2^4*Derivative[2][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/(2*m2^5) -
(p2^2*(2*m2^4 - 6*m2^3*p2 + 6*m2^2*p2^2 + 5*m2*p2^3 - 6*p2^4)*
M[GGGG[5], {4, NOSYM}][s, -t][0])/(m2^7*(m2 - p2)^2) +
(p2*(m2^3 + m2*p2^2 - 6*p2^3)*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/
m2^7 + ((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, sut][s, -t][p2])/
(m2^2*(m2 - p2)^2) - (p2^4*(3*m2^2 + m2*p2 - 3*p2^2)*
M[GGGG[5], {4, NOSYM}, tsu][s, -t][0])/(m2^7*(m2 - p2)^2) -
(3*p2^4*M[GGGG[5], {4, NOSYM}, tus][s, -t][0])/m2^7 -
(p2*(m2^3 + 4*m2^2*p2 + m2*p2^2 + 3*p2^3)*
M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/m2^7 +
((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, ust][s, -t][p2])/
(m2^2*(m2 - p2)^2) - (p2^2*(2*m2^2 - 8*m2*p2 - 3*p2^2)*
M[GGGG[5], {4, NOSYM}, uts][s, -t][0])/m2^7,
(-2*p2^5*Derivative[1][M[GGGG[5], {5, SUSYM}][s, -t]][0])/
(m2^5*(m2 - p2)*(m2 + p2)) + (p2^2*(m2^2 - 3*m2*p2 - 3*p2^2)*
Derivative[1][M[GGGG[5], {5, SUSYM}, tus][s, -t]][0])/
(m2^5*(m2 + p2)) - (p2^2*(m2^2 - m2*p2 + p2^2)*
Derivative[1][M[GGGG[5], {5, SUSYM}, ust][s, -t]][0])/
(m2^5*(m2 - p2)) - (p2^3*Derivative[2][M[GGGG[5], {5, SUSYM}, tus][s,
-t]][0])/(2*m2^4) +
(p2^3*Derivative[2][M[GGGG[5], {5, SUSYM}, ust][s, -t]][0])/(2*m2^4) -
((6*m2 - 5*p2)*p2^4*M[GGGG[5], {5, SUSYM}][s, -t][0])/
(m2^6*(m2 - p2)^2) + (p2*(m2^2 - 5*p2^2)*
M[GGGG[5], {5, SUSYM}, tus][s, -t][0])/m2^6 +
((2*m2 - p2)*M[GGGG[5], {5, SUSYM}, tus][s, -t][p2])/
(m2^2*(m2 - p2)^2) - (p2*(m2^2 + 2*m2*p2 - 2*p2^2)*
M[GGGG[5], {5, SUSYM}, ust][s, -t][0])/(m2^4*(m2 - p2)^2) +
((2*m2 - p2)*M[GGGG[5], {5, SUSYM}, ust][s, -t][p2])/
(m2^2*(m2 - p2)^2),
(-2*p2^3*Derivative[1][M[GGGG[5], {6, SUSYM}][s, -t]][0])/
(m2^3*(m2 - p2)*(m2 + p2)) -
(p2^3*Derivative[1][M[GGGG[5], {6, SUSYM}, tus][s, -t]][0])/
(m2^4*(m2 + p2)) - (p2^3*Derivative[1][M[GGGG[5], {6, SUSYM}, ust][s,
-t]][0])/(m2^4*(m2 - p2)) - (p2^2*(2*m2^2 + m2*p2 - 2*p2^2)*
M[GGGG[5], {6, SUSYM}][s, -t][0])/(m2^5*(m2 - p2)^2) -
(3*p2^2*M[GGGG[5], {6, SUSYM}, tus][s, -t][0])/m2^5 +
((2*m2 - p2)*M[GGGG[5], {6, SUSYM}, tus][s, -t][p2])/
(m2^2*(m2 - p2)^2) - (p2^2*(3*m2^2 - m2*p2 - p2^2)*
M[GGGG[5], {6, SUSYM}, ust][s, -t][0])/(m2^5*(m2 - p2)^2) +
((2*m2 - p2)*M[GGGG[5], {6, SUSYM}, ust][s, -t][p2])/
(m2^2*(m2 - p2)^2),
(-2*p2^4*Derivative[1][M[GGGG[5], {3, SUSYM}][s, -t]][0])/
(m2^5*(m2 - p2)*(m2 + p2)) +
(p2^2*Derivative[1][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/
(m2^4*(m2 + p2)) + (p2^2*Derivative[1][M[GGGG[5], {3, SUSYM}, ust][s,
-t]][0])/(m2^4*(m2 - p2)) - (p2^3*(2*m2^2 + 5*m2*p2 - 5*p2^2)*
M[GGGG[5], {3, SUSYM}][s, -t][0])/(m2^6*(m2 - p2)^2*(m2 + p2)) +
(p2*(m2^2 + 2*m2*p2 - p2^2)*M[GGGG[5], {3, SUSYM}, tus][s, -t][0])/
(m2^6*(m2 + p2)) + M[GGGG[5], {3, SUSYM}, tus][s, -t][p2]/
(m2^2*(m2 - p2)^2) + (p2*(m2^3 + 2*m2^2*p2 - 3*m2*p2^2 + p2^3)*
M[GGGG[5], {3, SUSYM}, ust][s, -t][0])/(m2^6*(m2 - p2)^2) -
M[GGGG[5], {3, SUSYM}, ust][s, -t][p2]/(m2^2*(m2 - p2)^2),
(-2*p2^2*Derivative[1][M[GGGG[5], {6, SUSYM}][s, -t]][0])/
(m2^3*(m2 - p2)*(m2 + p2)) +
(p2^2*Derivative[1][M[GGGG[5], {6, SUSYM}, tus][s, -t]][0])/
(m2^4*(m2 + p2)) + (p2^2*Derivative[1][M[GGGG[5], {6, SUSYM}, ust][s,
-t]][0])/(m2^4*(m2 - p2)) -
(p2*(2*m2^3 + 3*m2^2*p2 - 5*m2*p2^2 + 2*p2^3)*
M[GGGG[5], {6, SUSYM}][s, -t][0])/(m2^5*(m2 - p2)^2*(m2 + p2)) +
(p2*(m2 + 3*p2)*M[GGGG[5], {6, SUSYM}, tus][s, -t][0])/
(m2^5*(m2 + p2)) + M[GGGG[5], {6, SUSYM}, tus][s, -t][p2]/
(m2^2*(m2 - p2)^2) + (p2*(m2^2 + m2*p2 - p2^2)*
M[GGGG[5], {6, SUSYM}, ust][s, -t][0])/(m2^5*(m2 - p2)^2) -
M[GGGG[5], {6, SUSYM}, ust][s, -t][p2]/(m2^2*(m2 - p2)^2),
(3*p2^2*(m2 + p2)*Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][0])/
m2^6 - (p2*(m2^3 + 2*m2^2*p2 + m2*p2^2 - 3*p2^3)*
Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
(m2^6*(m2 - p2)) + (p2^4*Derivative[1][M[GGGG[5], {4, NOSYM}, tsu][s,
-t]][0])/(m2^6*(m2 + p2)) +
(p2^4*Derivative[1][M[GGGG[5], {4, NOSYM}, tus][s, -t]][0])/
(m2^6*(m2 - p2)) + (p2*(m2^3 + 2*m2^2*p2 - 2*p2^3)*
Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
(m2^6*(m2 + p2)) + (p2^2*(3*m2 + 2*p2)*
Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/m2^6 +
(p2^3*Derivative[2][M[GGGG[5], {4, NOSYM}][s, -t]][0])/(2*m2^5) -
(p2^2*(m2 + p2)*Derivative[2][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
(2*m2^5) + ((m2 - p2)*p2^2*Derivative[2][M[GGGG[5], {4, NOSYM}, ust][
s, -t]][0])/(2*m2^5) +
(p2^3*Derivative[2][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/(2*m2^5) +
(p2*(m2^2 + 8*m2*p2 + 6*p2^2)*M[GGGG[5], {4, NOSYM}][s, -t][0])/m2^7 +
M[GGGG[5], {4, NOSYM}][s, -t][p2]/(m2^2*(m2 - p2)^2) -
(p2*(3*m2^4 + m2^3*p2 - m2^2*p2^2 - 8*m2*p2^3 + 6*p2^4)*
M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/(m2^7*(m2 - p2)^2) +
(p2^3*(m2 + 3*p2)*M[GGGG[5], {4, NOSYM}, tsu][s, -t][0])/
(m2^7*(m2 + p2)) + (p2^3*(m2^2 + 3*m2*p2 - 3*p2^2)*
M[GGGG[5], {4, NOSYM}, tus][s, -t][0])/(m2^7*(m2 - p2)^2) +
(p2*(m2^3 + 3*m2^2*p2 + m2*p2^2 - 3*p2^3)*
M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/(m2^7*(m2 + p2)) +
(p2*(m2^2 + 7*m2*p2 + 3*p2^2)*M[GGGG[5], {4, NOSYM}, uts][s, -t][0])/
m2^7 - M[GGGG[5], {4, NOSYM}, uts][s, -t][p2]/(m2^2*(m2 - p2)^2),
-(((3*m2 - 2*p2)*p2*Derivative[1][M[GGGG[5], {5, SUSYM}, tus][s, -t]][
0])/(m2^4*(m2 - p2)^2)) +
(p2*Derivative[1][M[GGGG[5], {5, SUSYM}, ust][s, -t]][0])/
(m2^4*(m2 + p2)) - (p2*Derivative[2][M[GGGG[5], {5, SUSYM}, tus][s,
-t]][0])/(2*m2^3*(m2 - p2)) +
(p2*Derivative[2][M[GGGG[5], {5, SUSYM}, ust][s, -t]][0])/
(2*m2^3*(m2 + p2)) + ((2*m2 - p2)*M[GGGG[5], {5, SUSYM}][s, -t][p2])/
(m2^3*(m2 - p2)^3) - (p2*(5*m2^2 - 6*m2*p2 + 2*p2^2)*
M[GGGG[5], {5, SUSYM}, tus][s, -t][0])/(m2^5*(m2 - p2)^3),
-((p2*(4*m2^4 + 6*m2^3*p2 - 10*m2^2*p2^2 - 3*m2*p2^3 + 5*p2^4)*
Derivative[1][M[GGGG[5], {2, SUSYM}][s, -t]][0])/
(m2^6*(m2 - p2)^2*(m2 + p2))) +
(p2^2*(3*m2 + 4*p2)*Derivative[1][M[GGGG[5], {2, SUSYM}, tus][s, -t]][
0])/(m2^6*(m2 + p2)) - (p2^2*(3*m2^2 - m2*p2 - p2^2)*
Derivative[1][M[GGGG[5], {2, SUSYM}, ust][s, -t]][0])/
(m2^6*(m2 - p2)^2) - (p2^2*(2*m2^2 - p2^2)*
Derivative[2][M[GGGG[5], {2, SUSYM}][s, -t]][0])/
(m2^5*(m2 - p2)*(m2 + p2)) +
(p2^3*Derivative[2][M[GGGG[5], {2, SUSYM}, tus][s, -t]][0])/
(2*m2^5*(m2 + p2)) -
(p2^3*Derivative[2][M[GGGG[5], {2, SUSYM}, ust][s, -t]][0])/
(2*m2^5*(m2 - p2)) - ((4*m2^5 - 2*m2^4*p2 - 14*m2^2*p2^3 +
22*m2*p2^4 - 9*p2^5)*M[GGGG[5], {2, SUSYM}][s, -t][0])/
(m2^7*(m2 - p2)^3) + (3*p2*(m2 + 3*p2)*M[GGGG[5], {2, SUSYM}, tus][s,
-t][0])/m2^7 + ((2*m2 - p2)*M[GGGG[5], {2, SUSYM}, tus][s, -t][p2])/
(m2^3*(m2 - p2)^3) - (p2*(3*m2^3 - 4*m2*p2^2 + 2*p2^3)*
M[GGGG[5], {2, SUSYM}, ust][s, -t][0])/(m2^6*(m2 - p2)^3) +
((2*m2 - p2)*M[GGGG[5], {2, SUSYM}, ust][s, -t][p2])/
(m2^3*(m2 - p2)^3),
-((p2*(4*m2 + 5*p2)*Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][0])/
(m2^5*(m2 + p2))) + (2*(4*m2 - 3*p2)*p2^2*
Derivative[1][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/
(m2^5*(m2 - p2)^2) +
(2*p2^2*Derivative[1][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/
(m2^5*(m2 + p2)) + ((2*m2^2 + 6*m2*p2 + 3*p2^2)*
Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
(m2^5*(m2 + p2)) - ((2*m2^3 - 2*m2*p2^2 + p2^3)*
Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
(m2^5*(m2 - p2)^2) - ((2*m2 - p2)^2*p2*
Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/
(m2^5*(m2 - p2)^2) -
(p2^2*Derivative[2][M[GGGG[5], {4, NOSYM}][s, -t]][0])/
(2*m2^4*(m2 + p2)) +
(p2^2*Derivative[2][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/
(m2^4*(m2 - p2)) + (p2^2*Derivative[2][M[GGGG[5], {3, SUSYM}, ust][s,
-t]][0])/(m2^4*(m2 + p2)) +
(p2*(2*m2 + p2)*Derivative[2][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
(2*m2^4*(m2 + p2)) - ((2*m2 - p2)*p2*
Derivative[2][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
(2*m2^4*(m2 - p2)) -
(p2^2*Derivative[2][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/
(2*m2^4*(m2 - p2)) - (2*(2*m2 - p2)*M[GGGG[5], {3, SUSYM}][s, -t][p2])/
(m2^3*(m2 - p2)^3) - ((2*m2 + 11*p2)*M[GGGG[5], {4, NOSYM}][s, -t][0])/
m2^6 + (2*p2*(m2^3 + 6*m2^2*p2 - 10*m2*p2^2 + 4*p2^3)*
M[GGGG[5], {3, SUSYM}, tus][s, -t][0])/(m2^6*(m2 - p2)^3) -
(2*p2*M[GGGG[5], {3, SUSYM}, ust][s, -t][0])/m2^6 +
((4*m2 + 7*p2)*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/m2^6 +
((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, tsu][s, -t][p2])/
(m2^3*(m2 - p2)^3) + ((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, tus][s, -t][
p2])/(m2^3*(m2 - p2)^3) - ((4*m2^4 - 5*m2^3*p2 + 4*m2*p2^3 - 2*p2^4)*
M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/(m2^6*(m2 - p2)^3) -
((2*m2^4 + 3*m2^3*p2 - 12*m2^2*p2^2 + 12*m2*p2^3 - 4*p2^4)*
M[GGGG[5], {4, NOSYM}, uts][s, -t][0])/(m2^6*(m2 - p2)^3),
((2*m2 + 5*p2)*Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][0])/
(m2^5*(m2 + p2)) - (3*p2*Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s,
-t]][0])/(m2^5*(m2 + p2)) -
((2*m2 - p2)*p2*Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
(m2^5*(m2 - p2)^2) + ((2*m2^2 - 2*m2*p2 + p2^2)*
Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/
(m2^5*(m2 - p2)^2) + (p2*Derivative[2][M[GGGG[5], {4, NOSYM}][s, -t]][
0])/(2*m2^4*(m2 + p2)) -
(p2*Derivative[2][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
(2*m2^4*(m2 + p2)) -
(p2*Derivative[2][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
(2*m2^4*(m2 - p2)) +
(p2*Derivative[2][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/
(2*m2^4*(m2 - p2)) + ((5*m2 + 11*p2)*M[GGGG[5], {4, NOSYM}][s, -t][0])/
(m2^6*(m2 + p2)) - ((m2 + 7*p2)*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/
(m2^6*(m2 + p2)) + M[GGGG[5], {4, NOSYM}, tsu][s, -t][p2]/
(m2^3*(m2 - p2)^3) - M[GGGG[5], {4, NOSYM}, tus][s, -t][p2]/
(m2^3*(m2 - p2)^3) + ((m2^3 - 6*m2^2*p2 + 6*m2*p2^2 - 2*p2^3)*
M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/(m2^6*(m2 - p2)^3) +
((5*m2^3 - 12*m2^2*p2 + 12*m2*p2^2 - 4*p2^3)*
M[GGGG[5], {4, NOSYM}, uts][s, -t][0])/(m2^6*(m2 - p2)^3),
-(((2*m2 - p2)*Derivative[1][M[GGGG[5], {1, SUSYM}, tus][s, -t]][0])/
(m2^4*(m2 - p2)^3)) +
(2*Derivative[1][M[GGGG[5], {1, SUSYM}, ust][s, -t]][0])/
(m2^5*(m2 + p2)) -
((2*m2 - p2)*Derivative[2][M[GGGG[5], {1, SUSYM}, tus][s, -t]][0])/
(2*m2^4*(m2 - p2)^2) + Derivative[2][M[GGGG[5], {1, SUSYM}, ust][s,
-t]][0]/(m2^4*(m2 + p2)) -
Derivative[3][M[GGGG[5], {1, SUSYM}, tus][s, -t]][0]/
(6*m2^3*(m2 - p2)) + Derivative[3][M[GGGG[5], {1, SUSYM}, ust][s, -t]][
0]/(6*m2^3*(m2 + p2)) + ((2*m2 - p2)*M[GGGG[5], {1, SUSYM}][s, -t][
p2])/(m2^4*(m2 - p2)^4) -
((2*m2 - p2)*M[GGGG[5], {1, SUSYM}, tus][s, -t][0])/(m2^4*(m2 - p2)^4),
(2*p2^4*Derivative[1][M[GGGG[5], {8, SUODD}][s, -t]][0])/
(m2^4*(m2 - p2)*(m2 + p2)) - (p2^2*(3*m2 + 2*p2)*
Derivative[1][M[GGGG[5], {8, SUODD}, tus][s, -t]][0])/
(m2^4*(m2 + p2)) - ((3*m2 - 2*p2)*p2^2*
Derivative[1][M[GGGG[5], {8, SUODD}, ust][s, -t]][0])/
(m2^4*(m2 - p2)) + ((5*m2 - 4*p2)*p2^3*M[GGGG[5], {8, SUODD}][s, -t][
0])/(m2^5*(m2 - p2)^2) -
(p2*(m2 + 4*p2)*M[GGGG[5], {8, SUODD}, tus][s, -t][0])/m2^5 +
((2*m2 - p2)*M[GGGG[5], {8, SUODD}, tus][s, -t][p2])/
(m2^2*(m2 - p2)^2) - (p2*(m2^3 + 6*m2^2*p2 - 10*m2*p2^2 + 4*p2^3)*
M[GGGG[5], {8, SUODD}, ust][s, -t][0])/(m2^5*(m2 - p2)^2) -
((2*m2 - p2)*M[GGGG[5], {8, SUODD}, ust][s, -t][p2])/
(m2^2*(m2 - p2)^2),
(p2*Derivative[1][M[GGGG[5], {8, SUODD}, tus][s, -t]][0])/
(m2^3*(m2 - p2)) + (p2*Derivative[1][M[GGGG[5], {8, SUODD}, ust][s,
-t]][0])/(m2^3*(m2 + p2)) + M[GGGG[5], {8, SUODD}][s, -t][p2]/
(m2^2*(m2 - p2)^2) + ((2*m2 - p2)*p2*M[GGGG[5], {8, SUODD}, tus][s,
-t][0])/(m2^4*(m2 - p2)^2) +
(2*p2*M[GGGG[5], {8, SUODD}, ust][s, -t][0])/(m2^4*(m2 + p2))}
sumrules[bkimp[GGGG[5], 7]] =
{(-2*p2^6*Derivative[1][M[GGGG[5], {1, SUSYM}][s, -t]][0])/
(m2^7*(m2 - p2)*(m2 + p2)) + (p2^2*(m2^3 - 5*m2*p2^2 - 5*p2^3)*
Derivative[1][M[GGGG[5], {1, SUSYM}, tus][s, -t]][0])/
(m2^7*(m2 + p2)) + (p2^2*(m2^3 - 2*m2*p2^2 + 2*p2^3)*
Derivative[1][M[GGGG[5], {1, SUSYM}, ust][s, -t]][0])/
(m2^7*(m2 - p2)) - (3*p2^4*Derivative[2][M[GGGG[5], {1, SUSYM}, tus][
s, -t]][0])/(2*m2^6) -
(p2^4*Derivative[2][M[GGGG[5], {1, SUSYM}, ust][s, -t]][0])/m2^6 -
(p2^4*Derivative[3][M[GGGG[5], {1, SUSYM}, tus][s, -t]][0])/(6*m2^5) -
(p2^4*Derivative[3][M[GGGG[5], {1, SUSYM}, ust][s, -t]][0])/(6*m2^5) -
(p2^5*(4*m2^2 + 5*m2*p2 - 7*p2^2)*M[GGGG[5], {1, SUSYM}][s, -t][0])/
(m2^8*(m2 - p2)^2*(m2 + p2)) +
(p2*(m2^4 + 2*m2^3*p2 - m2^2*p2^2 - 7*m2*p2^3 - 7*p2^4)*
M[GGGG[5], {1, SUSYM}, tus][s, -t][0])/(m2^8*(m2 + p2)) +
M[GGGG[5], {1, SUSYM}, tus][s, -t][p2]/(m2^2*(m2 - p2)^2) +
(p2*(m2^3 + 2*m2^2*p2 - 3*m2*p2^2 + p2^3)*
M[GGGG[5], {1, SUSYM}, ust][s, -t][0])/(m2^6*(m2 - p2)^2) -
M[GGGG[5], {1, SUSYM}, ust][s, -t][p2]/(m2^2*(m2 - p2)^2),
-((p2^3*(2*m2^2 + 3*m2*p2 - 4*p2^2)*Derivative[1][M[GGGG[5], {4, NOSYM}][
s, -t]][0])/(m2^7*(m2 - p2))) +
(p2^2*(m2 + 2*p2)*(m2 + 3*p2)*Derivative[1][M[GGGG[5], {4, NOSYM}, sut][
s, -t]][0])/m2^7 +
(p2^5*Derivative[1][M[GGGG[5], {4, NOSYM}, tsu][s, -t]][0])/
(m2^7*(m2 - p2)) - (p2^5*Derivative[1][M[GGGG[5], {4, NOSYM}, tus][s,
-t]][0])/(m2^7*(m2 + p2)) + (p2^2*(m2^2 + 5*m2*p2 + 3*p2^2)*
Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/m2^7 +
(p2^3*(2*m2^2 + 3*m2*p2 + 2*p2^2)*
Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/
(m2^7*(m2 + p2)) - (p2^4*Derivative[2][M[GGGG[5], {4, NOSYM}][s, -t]][
0])/(2*m2^6) + (p2^3*(2*m2 + 3*p2)*
Derivative[2][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/(2*m2^6) +
(p2^3*(m2 + p2)*Derivative[2][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
m2^6 + (p2^4*Derivative[2][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/
(2*m2^6) + (p2^4*Derivative[3][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
(6*m2^5) + (p2^4*Derivative[3][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
(6*m2^5) + (2*p2^3*M[GGGG[5], {3, SUSYM}][s, -t][0])/m2^7 -
(p2^2*(m2^4 + 7*m2^3*p2 - 2*m2^2*p2^2 - 15*m2*p2^3 + 10*p2^4)*
M[GGGG[5], {4, NOSYM}][s, -t][0])/(m2^8*(m2 - p2)^2) +
(p2*(m2^3 + m2^2*p2 + 7*m2*p2^2 + 10*p2^3)*
M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/m2^8 +
M[GGGG[5], {4, NOSYM}, sut][s, -t][p2]/(m2^2*(m2 - p2)^2) -
(p2^3*(m2^3 - 3*m2^2*p2 - 3*m2*p2^2 + 4*p2^3)*
M[GGGG[5], {4, NOSYM}, tsu][s, -t][0])/(m2^8*(m2 - p2)^2) -
(p2^3*(m2^2 + 2*m2*p2 + 3*p2^2)*M[GGGG[5], {4, NOSYM}, tus][s, -t][0])/
(m2^8*(m2 + p2)) + (p2*(m2 + p2)*(m2^2 + 3*m2*p2 + 4*p2^2)*
M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/m2^8 -
M[GGGG[5], {4, NOSYM}, ust][s, -t][p2]/(m2^2*(m2 - p2)^2) +
(p2^2*(m2 + 3*p2)*(m2^2 + m2*p2 + p2^2)*M[GGGG[5], {4, NOSYM}, uts][s,
-t][0])/(m2^8*(m2 + p2)),
(-2*p2^4*Derivative[1][M[GGGG[5], {5, SUSYM}][s, -t]][0])/
(m2^5*(m2 - p2)*(m2 + p2)) +
(p2^2*Derivative[1][M[GGGG[5], {5, SUSYM}, tus][s, -t]][0])/
(m2^4*(m2 + p2)) + (p2^2*Derivative[1][M[GGGG[5], {5, SUSYM}, ust][s,
-t]][0])/(m2^4*(m2 - p2)) - (p2^3*(2*m2^2 + 5*m2*p2 - 5*p2^2)*
M[GGGG[5], {5, SUSYM}][s, -t][0])/(m2^6*(m2 - p2)^2*(m2 + p2)) +
(p2*(m2^2 + 2*m2*p2 - p2^2)*M[GGGG[5], {5, SUSYM}, tus][s, -t][0])/
(m2^6*(m2 + p2)) + M[GGGG[5], {5, SUSYM}, tus][s, -t][p2]/
(m2^2*(m2 - p2)^2) + (p2*(m2^3 + 2*m2^2*p2 - 3*m2*p2^2 + p2^3)*
M[GGGG[5], {5, SUSYM}, ust][s, -t][0])/(m2^6*(m2 - p2)^2) -
M[GGGG[5], {5, SUSYM}, ust][s, -t][p2]/(m2^2*(m2 - p2)^2),
-(((2*m2^5 + 3*m2^4*p2 + 2*m2^3*p2^2 - 5*m2^2*p2^3 - 9*m2*p2^4 + 9*p2^5)*
Derivative[1][M[GGGG[5], {2, SUSYM}][s, -t]][0])/
(m2^7*(m2 - p2)^2*(m2 + p2))) +
(p2^2*(2*m2 + 5*p2)*Derivative[1][M[GGGG[5], {2, SUSYM}, tus][s, -t]][
0])/(m2^7*(m2 + p2)) + (p2^2*(2*m2^2 - p2^2)*
Derivative[1][M[GGGG[5], {2, SUSYM}, ust][s, -t]][0])/
(m2^7*(m2 - p2)^2) - (p2*(2*m2^3 + 5*m2^2*p2 - 5*p2^3)*
Derivative[2][M[GGGG[5], {2, SUSYM}][s, -t]][0])/
(2*m2^6*(m2 - p2)*(m2 + p2)) +
(p2^3*Derivative[2][M[GGGG[5], {2, SUSYM}, tus][s, -t]][0])/
(2*m2^6*(m2 + p2)) +
(p2^3*Derivative[2][M[GGGG[5], {2, SUSYM}, ust][s, -t]][0])/
(2*m2^6*(m2 - p2)) -
(p2^2*Derivative[3][M[GGGG[5], {2, SUSYM}][s, -t]][0])/(3*m2^5) -
((5*m2^6 - 3*m2^5*p2 - 2*m2^3*p2^3 - 14*m2^2*p2^4 + 30*m2*p2^5 -
14*p2^6)*M[GGGG[5], {2, SUSYM}][s, -t][0])/(m2^8*(m2 - p2)^3*
(m2 + p2)) + (2*p2*(m2^2 + 5*m2*p2 + 7*p2^2)*
M[GGGG[5], {2, SUSYM}, tus][s, -t][0])/(m2^8*(m2 + p2)) +
M[GGGG[5], {2, SUSYM}, tus][s, -t][p2]/(m2^3*(m2 - p2)^3) +
(p2*(2*m2^3 - 2*m2*p2^2 + p2^3)*M[GGGG[5], {2, SUSYM}, ust][s, -t][0])/
(m2^7*(m2 - p2)^3) - M[GGGG[5], {2, SUSYM}, ust][s, -t][p2]/
(m2^3*(m2 - p2)^3),
-((p2^3*(4*m2^4 - 4*m2^3*p2 + 2*m2^2*p2^2 + 7*m2*p2^3 - 7*p2^4)*
Derivative[1][M[GGGG[5], {3, SUSYM}][s, -t]][0])/
(m2^8*(m2 - p2)^2*(m2 + p2))) +
(8*p2^3*Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][0])/m2^7 +
(p2^2*(m2^3 + 2*m2^2*p2 - 9*m2*p2^2 - 9*p2^3)*
Derivative[1][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/
(m2^8*(m2 + p2)) - (p2^2*(m2^4 + 3*m2^3*p2 - 5*m2^2*p2^2 + 4*m2*p2^3 -
2*p2^4)*Derivative[1][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/
(m2^8*(m2 - p2)^2) -
(12*p2^3*Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/m2^7 +
(2*p2^3*Derivative[1][M[GGGG[5], {4, NOSYM}, tsu][s, -t]][0])/m2^7 +
(2*p2^3*Derivative[1][M[GGGG[5], {4, NOSYM}, tus][s, -t]][0])/m2^7 -
(6*p2^3*Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/m2^7 -
(4*p2^3*Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/m2^7 -
(p2^6*Derivative[2][M[GGGG[5], {3, SUSYM}][s, -t]][0])/
(m2^7*(m2 - p2)*(m2 + p2)) +
(p2^3*Derivative[2][M[GGGG[5], {4, NOSYM}][s, -t]][0])/m2^6 +
(p2^3*(m2^2 - 4*m2*p2 - 4*p2^2)*
Derivative[2][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/
(2*m2^7*(m2 + p2)) - (p2^3*(m2^2 - 2*m2*p2 + 2*p2^2)*
Derivative[2][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/
(2*m2^7*(m2 - p2)) -
(3*p2^3*Derivative[2][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/m2^6 -
(2*p2^3*Derivative[2][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/m2^6 -
(p2^3*Derivative[2][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/m2^6 -
(p2^4*Derivative[3][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/(6*m2^6) +
(p2^4*Derivative[3][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/(6*m2^6) -
(p2^3*Derivative[3][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/(3*m2^5) -
(p2^3*Derivative[3][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/(3*m2^5) -
(p2^3*(14*m2^4 - 38*m2^3*p2 + 57*m2^2*p2^2 - 48*m2*p2^3 + 16*p2^4)*
M[GGGG[5], {3, SUSYM}][s, -t][0])/(m2^9*(m2 - p2)^3) +
(20*p2^3*M[GGGG[5], {4, NOSYM}][s, -t][0])/m2^8 +
(p2*(m2^3 - m2^2*p2 - 16*p2^3)*M[GGGG[5], {3, SUSYM}, tus][s, -t][0])/
m2^9 + ((2*m2 - p2)*M[GGGG[5], {3, SUSYM}, tus][s, -t][p2])/
(m2^3*(m2 - p2)^3) - (p2*(m2^4 + 4*m2^3*p2 - 4*m2^2*p2^2 - 2*m2*p2^3 +
2*p2^4)*M[GGGG[5], {3, SUSYM}, ust][s, -t][0])/(m2^7*(m2 - p2)^3) +
((2*m2 - p2)*M[GGGG[5], {3, SUSYM}, ust][s, -t][p2])/
(m2^3*(m2 - p2)^3) - (20*p2^3*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/
m2^8 + (8*p2^3*M[GGGG[5], {4, NOSYM}, tsu][s, -t][0])/m2^8 +
(6*p2^3*M[GGGG[5], {4, NOSYM}, tus][s, -t][0])/m2^8 -
(8*p2^3*M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/m2^8 -
(6*p2^3*M[GGGG[5], {4, NOSYM}, uts][s, -t][0])/m2^8,
(7*p2^4*Derivative[1][M[GGGG[5], {3, SUSYM}][s, -t]][0])/m2^8 -
((m2 - 11*p2)*p2^2*Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][0])/
m2^7 - (9*p2^4*Derivative[1][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/
m2^8 + (2*p2^4*Derivative[1][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/
m2^8 + (p2^2*(4*m2^3 - 28*m2^2*p2 + 38*m2*p2^2 - 15*p2^3)*
Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
(m2^7*(m2 - p2)^2) -
(p2^4*Derivative[1][M[GGGG[5], {4, NOSYM}, tsu][s, -t]][0])/
(m2^7*(m2 + p2)) - ((6*m2 - 5*p2)*p2^4*
Derivative[1][M[GGGG[5], {4, NOSYM}, tus][s, -t]][0])/
(m2^7*(m2 - p2)^2) + (p2^2*(6*m2^2 + 4*m2*p2 - 3*p2^2)*
Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
(m2^7*(m2 + p2)) + ((m2 - 7*p2)*p2^2*
Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/m2^7 +
(p2^4*Derivative[2][M[GGGG[5], {3, SUSYM}][s, -t]][0])/m2^7 +
(3*p2^3*Derivative[2][M[GGGG[5], {4, NOSYM}][s, -t]][0])/(2*m2^6) -
(2*p2^4*Derivative[2][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/m2^7 +
(p2^4*Derivative[2][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/m2^7 +
(p2^2*(2*m2^2 - 10*m2*p2 + 7*p2^2)*
Derivative[2][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
(2*m2^6*(m2 - p2)) -
(p2^4*Derivative[2][M[GGGG[5], {4, NOSYM}, tsu][s, -t]][0])/
(2*m2^6*(m2 + p2)) -
(p2^4*Derivative[2][M[GGGG[5], {4, NOSYM}, tus][s, -t]][0])/
(2*m2^6*(m2 - p2)) + (p2^2*(2*m2^2 - 3*p2^2)*
Derivative[2][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
(2*m2^6*(m2 + p2)) -
(3*p2^3*Derivative[2][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/
(2*m2^6) - (p2^4*Derivative[3][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/
(6*m2^6) + (p2^4*Derivative[3][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/
(6*m2^6) - (p2^3*Derivative[3][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/
(3*m2^5) - (p2^3*Derivative[3][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/
(3*m2^5) + (8*p2^2*(m2^2 + 2*p2^2)*M[GGGG[5], {3, SUSYM}][s, -t][0])/
m2^9 + (p2*(m2^2 - 7*m2*p2 + 26*p2^2)*M[GGGG[5], {4, NOSYM}][s, -t][
0])/m2^8 + ((2*m2 - p2)*M[GGGG[5], {4, NOSYM}][s, -t][p2])/
(m2^3*(m2 - p2)^3) - (16*p2^4*M[GGGG[5], {3, SUSYM}, tus][s, -t][0])/
m2^9 - (p2*(2*m2^5 - 8*m2^4*p2 + 52*m2^3*p2^2 - 108*m2^2*p2^3 +
89*m2*p2^4 - 26*p2^5)*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/
(m2^8*(m2 - p2)^3) - (2*(2*m2 - p2)*p2^2*
M[GGGG[5], {4, NOSYM}, tsu][s, -t][0])/m2^8 -
(p2^2*(4*m2^4 - 10*m2^3*p2 + 26*m2^2*p2^2 - 31*m2*p2^3 + 12*p2^4)*
M[GGGG[5], {4, NOSYM}, tus][s, -t][0])/(m2^8*(m2 - p2)^3) +
(2*p2*(m2^2 + 4*m2*p2 - p2^2)*M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/
m2^8 - (p2*(m2^2 + m2*p2 + 12*p2^2)*M[GGGG[5], {4, NOSYM}, uts][s, -t][
0])/m2^8 + ((2*m2 - p2)*M[GGGG[5], {4, NOSYM}, uts][s, -t][p2])/
(m2^3*(m2 - p2)^3),
-(((4*m2 - 3*p2)*p2^2*Derivative[1][M[GGGG[5], {6, SUSYM}, tus][s, -t]][
0])/(m2^5*(m2 - p2)^2)) -
(p2^2*Derivative[1][M[GGGG[5], {6, SUSYM}, ust][s, -t]][0])/
(m2^5*(m2 + p2)) - (p2^2*Derivative[2][M[GGGG[5], {6, SUSYM}, tus][s,
-t]][0])/(2*m2^4*(m2 - p2)) -
(p2^2*Derivative[2][M[GGGG[5], {6, SUSYM}, ust][s, -t]][0])/
(2*m2^4*(m2 + p2)) + ((2*m2 - p2)*M[GGGG[5], {6, SUSYM}][s, -t][p2])/
(m2^3*(m2 - p2)^3) - (p2*(m2^3 + 6*m2^2*p2 - 10*m2*p2^2 + 4*p2^3)*
M[GGGG[5], {6, SUSYM}, tus][s, -t][0])/(m2^6*(m2 - p2)^3) +
(p2*M[GGGG[5], {6, SUSYM}, ust][s, -t][0])/m2^6,
(-2*p2*Derivative[1][M[GGGG[5], {3, SUSYM}][s, -t]][0])/m2^7 +
(4*p2*Derivative[1][M[GGGG[5], {4, NOSYM}][s, -t]][0])/m2^7 -
(p2^2*(9*m2^2 - 13*m2*p2 + 5*p2^2)*
Derivative[1][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/
(m2^7*(m2 - p2)^3) +
(2*p2^2*Derivative[1][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/
(m2^7*(m2 + p2)) - (6*p2*Derivative[1][M[GGGG[5], {4, NOSYM}, sut][s,
-t]][0])/m2^7 +
(p2*Derivative[1][M[GGGG[5], {4, NOSYM}, tsu][s, -t]][0])/m2^7 +
(p2*Derivative[1][M[GGGG[5], {4, NOSYM}, tus][s, -t]][0])/m2^7 -
(3*p2*Derivative[1][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/m2^7 -
(2*p2*Derivative[1][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/m2^7 +
(p2*Derivative[2][M[GGGG[5], {4, NOSYM}][s, -t]][0])/(2*m2^6) -
((4*m2 - 3*p2)*p2^2*Derivative[2][M[GGGG[5], {3, SUSYM}, tus][s, -t]][
0])/(2*m2^6*(m2 - p2)^2) +
(p2^2*Derivative[2][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/
(m2^6*(m2 + p2)) - (3*p2*Derivative[2][M[GGGG[5], {4, NOSYM}, sut][s,
-t]][0])/(2*m2^6) -
(p2*Derivative[2][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/m2^6 -
(p2*Derivative[2][M[GGGG[5], {4, NOSYM}, uts][s, -t]][0])/(2*m2^6) -
(p2^2*Derivative[3][M[GGGG[5], {3, SUSYM}, tus][s, -t]][0])/
(6*m2^5*(m2 - p2)) +
(p2^2*Derivative[3][M[GGGG[5], {3, SUSYM}, ust][s, -t]][0])/
(6*m2^5*(m2 + p2)) -
(p2*Derivative[3][M[GGGG[5], {4, NOSYM}, sut][s, -t]][0])/(6*m2^5) -
(p2*Derivative[3][M[GGGG[5], {4, NOSYM}, ust][s, -t]][0])/(6*m2^5) -
(7*p2*M[GGGG[5], {3, SUSYM}][s, -t][0])/m2^8 +
((2*m2 - p2)*M[GGGG[5], {3, SUSYM}][s, -t][p2])/(m2^4*(m2 - p2)^4) +
(10*p2*M[GGGG[5], {4, NOSYM}][s, -t][0])/m2^8 -
(p2^2*(16*m2^3 - 34*m2^2*p2 + 26*m2*p2^2 - 7*p2^3)*
M[GGGG[5], {3, SUSYM}, tus][s, -t][0])/(m2^8*(m2 - p2)^4) -
(10*p2*M[GGGG[5], {4, NOSYM}, sut][s, -t][0])/m2^8 +
(4*p2*M[GGGG[5], {4, NOSYM}, tsu][s, -t][0])/m2^8 +
(3*p2*M[GGGG[5], {4, NOSYM}, tus][s, -t][0])/m2^8 -
(4*p2*M[GGGG[5], {4, NOSYM}, ust][s, -t][0])/m2^8 -
(3*p2*M[GGGG[5], {4, NOSYM}, uts][s, -t][0])/m2^8,
(2*p2^3*Derivative[1][M[GGGG[5], {8, SUODD}][s, -t]][0])/
(m2^4*(m2 - p2)*(m2 + p2)) -
(p2^2*Derivative[1][M[GGGG[5], {8, SUODD}, tus][s, -t]][0])/
(m2^4*(m2 + p2)) + (p2^2*Derivative[1][M[GGGG[5], {8, SUODD}, ust][s,
-t]][0])/(m2^4*(m2 - p2)) + (p2^2*(m2^2 + 5*m2*p2 - 4*p2^2)*
M[GGGG[5], {8, SUODD}][s, -t][0])/(m2^5*(m2 - p2)^2*(m2 + p2)) -
(p2*(m2 + 3*p2)*M[GGGG[5], {8, SUODD}, tus][s, -t][0])/
(m2^5*(m2 + p2)) + M[GGGG[5], {8, SUODD}, tus][s, -t][p2]/
(m2^2*(m2 - p2)^2) + (p2*(m2^2 + m2*p2 - p2^2)*
M[GGGG[5], {8, SUODD}, ust][s, -t][0])/(m2^5*(m2 - p2)^2) +
M[GGGG[5], {8, SUODD}, ust][s, -t][p2]/(m2^2*(m2 - p2)^2)}
Attributes[Derivative] = {NHoldAll}
sumruleslow[bkimp[GGGG[5], 2]] =
{(G8\[Pi]*(24 - 8*p2*\[Alpha]2 + p2^2*\[Alpha]2^2 + 2*p2^2*\[Alpha]4))/
(4*p2), (4*G8\[Pi]*\[Alpha]4)/p2,
(G8\[Pi]*(96 + 2*p2^2*\[Alpha]2^2 + 3*p2^4*\[Alpha]4^2))/(48*p2),
(G8\[Pi]*(32 - 8*p2*\[Alpha]2 + p2^2*\[Alpha]2^2 -
p2^3*\[Alpha]2*\[Alpha]4))/(2*p2),
-1/2*(G8\[Pi]*\[Alpha]2*(8 + p2^2*\[Alpha]4))/p2,
(-8*G8\[Pi]*(\[Alpha]2 - p2*\[Alpha]4))/p2, 3*G8\[Pi]*\[Alpha]4,
(-8*G8\[Pi]*\[Alpha]4)/p2,
-1/2*(G8\[Pi]*\[Alpha]2*(4 + p2*\[Alpha]2 + p2^2*\[Alpha]4))/p2,
-1/2*(G8\[Pi]*\[Alpha]2*\[Alpha]4)/p2,
(G8\[Pi]*(\[Alpha]2^2 + 2*\[Alpha]4))/(2*p2),
(G8\[Pi]*(\[Alpha]2^2 - 6*\[Alpha]4))/p2,
-1/2*(G8\[Pi]*\[Alpha]2*\[Alpha]4)/p2, (G8\[Pi]*\[Alpha]4^2)/(16*p2), 0,
0}
sumruleslow[bkimp[GGGG[5], 3]] =
{(G8\[Pi]*(2*\[Alpha]2^2 + 3*p2^2*\[Alpha]4^2))/48,
-1/2*(G8\[Pi]*\[Alpha]2*(\[Alpha]2 - p2*\[Alpha]4)),
-1/2*(G8\[Pi]*\[Alpha]2*\[Alpha]4), 0, 2*g[4, 0, {GGGG[5], 3}],
G8\[Pi]*\[Alpha]2*\[Alpha]4, 0, 0, 0}
sumruleslow[bkimp[GGGG[5], 4]] = {g[4, 0, {GGGG[5], 2}] -
p2*g[5, T, 0, {GGGG[5], 2}] + p2^2*g[6, T^2, 0, {GGGG[5], 2}],
g[6, 0, {GGGG[5], 7}], (4*G8\[Pi]*p2*\[Alpha]4^2 +
64*g[4, 0, {GGGG[5], 1}])/32, -2*(-g[4, 0, {GGGG[5], 4}] -
2*p2*g[5, SmU, 0, {GGGG[5], 4}]), 2*g[5, 0, {GGGG[5], 5}],
2*g[5, 0, {GGGG[5], 6}] + p2*g[6, T, 0, {GGGG[5], 6}],
2*p2*g[6, 0, {GGGG[5], 3}] - g[5, T, 0, {GGGG[5], 3}],
-g[6, T, 0, {GGGG[5], 6}], 2*g[5, SmU, 0, {GGGG[5], 4}], 0,
2*g[6, T^2, 0, {GGGG[5], 2}], -4*g[6, 0, {GGGG[5], 3}], 0, 0, 0, 0}
sumruleslow[bkimp[GGGG[5], 5]] = {2*p2*g[6, 0, {GGGG[5], 1}] -
g[5, T, 0, {GGGG[5], 1}], 2*p2*g[6, 0, {GGGG[5], 4}] +
2*p2^2*g[7, 0, {GGGG[5], 4}] + g[5, SmU, 0, {GGGG[5], 4}] -
g[5, T, 0, {GGGG[5], 4}] - 2*p2*g[6, SmU*T, 0, {GGGG[5], 4}],
2*p2*g[7, 0, {GGGG[5], 5}] - g[6, T, 0, {GGGG[5], 5}],
-g[7, 0, {GGGG[5], 2}], 4*g[6, 0, {GGGG[5], 3}] +
2*p2*g[7, 0, {GGGG[5], 3}] + 2*g[6, T^2, 0, {GGGG[5], 3}],
4*g[6, 0, {GGGG[5], 4}] + 4*p2*g[7, 0, {GGGG[5], 4}],
2*g[7, 0, {GGGG[5], 6}], 0, -g[13/2, 0, {GGGG[5], 8}]}
sumruleslow[bkimp[GGGG[5], 6]] = {2*g[6, 0, {GGGG[5], 2}] +
p2*g[7, 0, {GGGG[5], 2}] - 2*p2*g[7, T, 0, {GGGG[5], 2}] -
p2^2*g[8, T, 0, {GGGG[5], 2}] + 2*p2^2*g[8, T^2, 0, {GGGG[5], 2}] +
p2^3*g[9, T^2, 0, {GGGG[5], 2}], 2*g[8, 0, {GGGG[5], 7}] +
p2*g[9, 0, {GGGG[5], 7}], 4*g[6, 0, {GGGG[5], 1}] +
2*p2*g[7, 0, {GGGG[5], 1}] + 8*p2^2*g[8, 0, {GGGG[5], 1}] +
2*g[6, T^2, 0, {GGGG[5], 1}], 4*g[6, 0, {GGGG[5], 4}] +
2*p2*g[7, 0, {GGGG[5], 4}] + 16*p2^3*g[9, 0, {GGGG[5], 4}] -
2*g[6, SmU*T, 0, {GGGG[5], 4}] + 2*g[6, T^2, 0, {GGGG[5], 4}] -
2*p2*g[7, Odd3, 0, {GGGG[5], 4}] + 8*p2*g[7, SmU, 0, {GGGG[5], 4}] +
4*p2^2*g[8, SmU, 0, {GGGG[5], 4}], 4*g[7, 0, {GGGG[5], 5}] +
2*p2*g[8, 0, {GGGG[5], 5}] + 8*p2^2*g[9, 0, {GGGG[5], 5}] +
2*g[7, T^2, 0, {GGGG[5], 5}], 4*g[7, 0, {GGGG[5], 6}] +
2*p2*g[8, 0, {GGGG[5], 6}] + 2*g[7, T^2, 0, {GGGG[5], 6}] +
2*p2*g[8, T, 0, {GGGG[5], 6}] + p2^2*g[9, T, 0, {GGGG[5], 6}],
4*p2*g[8, 0, {GGGG[5], 3}] + 4*p2^2*g[9, 0, {GGGG[5], 3}] -
2*g[7, T, 0, {GGGG[5], 3}] - p2*g[8, T, 0, {GGGG[5], 3}],
-2*g[8, T, 0, {GGGG[5], 6}] - p2*g[9, T, 0, {GGGG[5], 6}],
8*p2^2*g[9, 0, {GGGG[5], 4}] + 2*g[7, Odd3, 0, {GGGG[5], 4}] +
4*g[7, SmU, 0, {GGGG[5], 4}] + p2*g[8, SmU, 0, {GGGG[5], 4}] +
p2*g[8, T, 0, {GGGG[5], 4}], 4*g[9, 0, {GGGG[5], 5}],
4*g[8, T^2, 0, {GGGG[5], 2}] + 2*p2*g[9, T^2, 0, {GGGG[5], 2}],
-8*g[8, 0, {GGGG[5], 3}] - 8*p2*g[9, 0, {GGGG[5], 3}] -
8*p2*g[9, 0, {GGGG[5], 4}] + 2*g[8, SmU, 0, {GGGG[5], 4}] -
2*g[8, T, 0, {GGGG[5], 4}], 8*g[9, 0, {GGGG[5], 4}], 0,
-4*p2*g[17/2, 0, {GGGG[5], 8}] + 2*g[15/2, T, 0, {GGGG[5], 8}],
2*g[17/2, 0, {GGGG[5], 8}]}
sumruleslow[bkimp[GGGG[5], 7]] = {4*p2*g[8, 0, {GGGG[5], 1}] +
4*p2^2*g[9, 0, {GGGG[5], 1}] + 8*p2^3*g[10, 0, {GGGG[5], 1}] -
2*g[7, T, 0, {GGGG[5], 1}] - p2*g[8, T, 0, {GGGG[5], 1}],
4*p2*g[8, 0, {GGGG[5], 4}] + 4*p2^2*g[9, 0, {GGGG[5], 4}] +
8*p2^3*g[10, 0, {GGGG[5], 3}] + 2*p2^3*g[10, 1, {GGGG[5], 4}] -
2*g[7, Odd3, 0, {GGGG[5], 4}] + 2*g[7, SmU, 0, {GGGG[5], 4}] -
2*g[7, T, 0, {GGGG[5], 4}] + p2*g[8, SmU, 0, {GGGG[5], 4}] -
p2*g[8, T, 0, {GGGG[5], 4}] - 4*p2*g[8, SmU*T, 0, {GGGG[5], 4}] +
6*p2^2*g[9, Odd3, 0, {GGGG[5], 4}] -
2*p2^2*g[9, SmU*T, 0, {GGGG[5], 4}], 4*p2*g[9, 0, {GGGG[5], 5}] +
4*p2^2*g[10, 0, {GGGG[5], 5}] - 2*g[8, T, 0, {GGGG[5], 5}] -
p2*g[9, T, 0, {GGGG[5], 5}], -4*g[9, 0, {GGGG[5], 2}] -
p2*g[10, 1, {GGGG[5], 2}], 8*g[8, 0, {GGGG[5], 3}] +
8*p2*g[9, 0, {GGGG[5], 3}] + 16*p2^2*g[10, 0, {GGGG[5], 3}] +
2*p2^2*g[10, 1, {GGGG[5], 3}] + 4*g[8, T^2, 0, {GGGG[5], 3}] +
2*p2*g[9, T^2, 0, {GGGG[5], 3}], 8*g[8, 0, {GGGG[5], 4}] +
8*p2*g[9, 0, {GGGG[5], 4}] + 32*p2^2*g[10, 0, {GGGG[5], 3}] +
4*p2^2*g[10, 1, {GGGG[5], 4}] + 12*p2*g[9, Odd3, 0, {GGGG[5], 4}],
4*g[9, 0, {GGGG[5], 6}] + 4*p2*g[10, 0, {GGGG[5], 6}],
8*g[10, 0, {GGGG[5], 3}], -2*g[17/2, 0, {GGGG[5], 8}] -
p2*g[19/2, 0, {GGGG[5], 8}] - g[17/2, T^2, 0, {GGGG[5], 8}]}
sumrulesKK[bkimp[GGGG[5], 2], {GG[5], GG[5]}] =
{exchange[{0}, {{{0}}, {{0}}, {{(2*m2 - p2)/5}}, {{0}}, {{0}}, {{0}},
{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}},
{{0}}}], exchange[{1}, {{{0}}, {{0}}, {{(2*(2*m2 - p2))/15}},
{{(8*(2*m2 - p2))/15}}, {{0}}, {{0}}, {{-8/15}}, {{0}}, {{8/15}},
{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}}],
exchange[{2}, {{{0, 0}, {0, (12*m2^2*(2*m2 - p2))/35}},
{{0, 0}, {0, 0}}, {{(6*m2^3 - 35*m2^2*p2 + 48*m2*p2^2 - 16*p2^3)/15,
(8*p2*(2*m2^2 - 3*m2*p2 + p2^2))/(15*Sqrt[7])},
{(8*p2*(2*m2^2 - 3*m2*p2 + p2^2))/(15*Sqrt[7]),
(2*(6*m2^3 - 7*m2^2*p2 + 6*m2*p2^2 - 2*p2^3))/105}},
{{0, (16*m2*(2*m2 - p2)*p2)/(5*Sqrt[7])},
{(16*m2*(2*m2 - p2)*p2)/(5*Sqrt[7]), (8*m2*(3*m2 - 2*p2)*(2*m2 - p2))/
35}}, {{0, (16*m2*(2*m2 - p2))/(5*Sqrt[7])},
{(16*m2*(2*m2 - p2))/(5*Sqrt[7]), (-16*m2*(2*m2 - p2))/35}},
{{0, 0}, {0, 0}}, {{0, (-8*m2^2)/(5*Sqrt[7])}, {(-8*m2^2)/(5*Sqrt[7]),
(8*m2^2)/35}}, {{0, 0}, {0, 0}},
{{0, (16*m2*(m2 - p2))/(5*Sqrt[7])}, {(16*m2*(m2 - p2))/(5*Sqrt[7]),
(8*m2*(m2 + 2*p2))/35}}, {{0, (-16*m2)/(5*Sqrt[7]*(m2 + p2))},
{(-16*m2)/(5*Sqrt[7]*(m2 + p2)), (16*m2)/(35*(m2 + p2))}},
{{0, 0}, {0, (-24*m2^2)/(35*(m2 + p2))}},
{{0, 0}, {0, (-48*m2^2)/(35*(m2 + p2))}},
{{0, (-16*m2)/(5*Sqrt[7]*(m2 + p2))}, {(-16*m2)/(5*Sqrt[7]*(m2 + p2)),
(16*m2)/(35*(m2 + p2))}}, {{-16/(15*(m2 + p2)),
8/(15*Sqrt[7]*(m2 + p2))}, {8/(15*Sqrt[7]*(m2 + p2)),
-4/(105*(m2 + p2))}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}}]}
sumrulesKK[bkimp[GGGG[5], 3], {GG[5], GG[5]}] =
{exchange[{0}, {{{-1/5}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}},
{{0}}, {{0}}}], exchange[{1}, {{{-2/15}}, {{8/15}}, {{0}}, {{0}},
{{0}}, {{0}}, {{0}}, {{0}}, {{0}}}], exchange[{2},
{{{(-3*m2^2 + 16*m2*p2 - 16*p2^2)/15, (-8*(m2 - p2)*p2)/(15*Sqrt[7])},
{(-8*(m2 - p2)*p2)/(15*Sqrt[7]), (-2*(3*m2^2 - 2*m2*p2 + 2*p2^2))/
105}}, {{0, (16*m2*p2)/(5*Sqrt[7])}, {(16*m2*p2)/(5*Sqrt[7]),
(8*m2*(3*m2 - 2*p2))/35}}, {{0, (-16*m2)/(5*Sqrt[7])},
{(-16*m2)/(5*Sqrt[7]), (16*m2)/35}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, (32*m2)/(5*Sqrt[7])}, {(32*m2)/(5*Sqrt[7]),
(-32*m2)/35}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}}]}
sumrulesKK[bkimp[GGGG[5], 4], {GG[5], GG[5]}] =
{exchange[{0}, {{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}},
{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}}],
exchange[{1}, {{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}},
{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}}],
exchange[{2}, {{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{(-32*p2)/15, (16*p2)/(15*Sqrt[7])}, {(16*p2)/(15*Sqrt[7]),
(-8*p2)/105}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}}]}
sumrulesKK[bkimp[GGGG[5], 5], {GG[5], GG[5]}] =
{exchange[{0}, {{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}},
{{0}}}], exchange[{1}, {{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}},
{{0}}, {{0}}, {{0}}}], exchange[{2}, {{{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}}]}
sumrulesKK[bkimp[GGGG[5], 6], {GG[5], GG[5]}] =
{exchange[{0}, {{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}},
{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}}],
exchange[{1}, {{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}},
{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}}],
exchange[{2}, {{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}}]}
sumrulesKK[bkimp[GGGG[5], 7], {GG[5], GG[5]}] =
{exchange[{0}, {{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}},
{{0}}}], exchange[{1}, {{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}},
{{0}}, {{0}}, {{0}}}], exchange[{2}, {{{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}},
{{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}}]}
ampKK[{GG[5], GG[5]}] = {exchange[{0}, {{{-1/5*1/(mh2^4*(-mh2 + t))}},
{{-1/5*1/(mh2^4*(-mh2 - s - t))}}, {{-1/5*1/(mh2^4*(-mh2 + s))}},
{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}},
{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}},
{{0}}, {{0}}}], exchange[{1}, {{{-2/(15*mh2^4*(-mh2 + t))}},
{{-2/(15*mh2^4*(-mh2 - s - t))}}, {{-2/(15*mh2^4*(-mh2 + s))}}, {{0}},
{{0}}, {{0}}, {{-8/(15*mh2^4*(-mh2 + t))}},
{{-8/(15*mh2^4*(-mh2 - s - t))}}, {{-8/(15*mh2^4*(-mh2 + s))}},
{{-8/(15*mh2^4*(-mh2 + s))}}, {{-8/(15*mh2^4*(-mh2 + t))}},
{{-8/(15*mh2^4*(-mh2 - s - t))}}, {{-8/(15*mh2^4*(-mh2 + t))}},
{{-8/(15*mh2^4*(-mh2 - s - t))}}, {{-8/(15*mh2^4*(-mh2 + s))}}, {{0}},
{{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}, {{0}}}],
exchange[{2}, {{{-1/15*(-3*mh2^2 + 16*s*(-s - t))/(mh2^6*(mh2 - t)),
(-8*s*(-s - t))/(15*Sqrt[7]*mh2^6*(-mh2 + t))},
{(-8*s*(-s - t))/(15*Sqrt[7]*mh2^6*(-mh2 + t)),
-1/105*(-6*mh2^2 + 4*s*(-s - t))/(mh2^6*(mh2 - t))}},
{{-1/15*(-3*mh2^2 + 16*s*t)/(mh2^6*(mh2 + s + t)),
(-8*s*t)/(15*Sqrt[7]*mh2^6*(-mh2 - s - t))},
{(-8*s*t)/(15*Sqrt[7]*mh2^6*(-mh2 - s - t)),
-1/105*(-6*mh2^2 + 4*s*t)/(mh2^6*(mh2 + s + t))}},
{{-1/15*(-3*mh2^2 + 16*(-s - t)*t)/(mh2^6*(mh2 - s)),
(-8*(-s - t)*t)/(15*Sqrt[7]*mh2^6*(-mh2 + s))},
{(-8*(-s - t)*t)/(15*Sqrt[7]*mh2^6*(-mh2 + s)),
-1/105*(-6*mh2^2 + 4*(-s - t)*t)/(mh2^6*(mh2 - s))}},
{{0, 0}, {0, (-12*((-mh2 + s)^(-1) + (-mh2 - s - t)^(-1)))/
(35*mh2^4)}}, {{0, 0}, {0, (-12*((-mh2 + s)^(-1) + (-mh2 + t)^(-1)))/
(35*mh2^4)}}, {{0, 0},
{0, (-12*((-mh2 - s - t)^(-1) + (-mh2 + t)^(-1)))/(35*mh2^4)}},
{{0, -8/(5*Sqrt[7]*mh2^4*(-mh2 + t))},
{-8/(5*Sqrt[7]*mh2^4*(-mh2 + t)), 8/(35*mh2^4*(-mh2 + t))}},
{{0, -8/(5*Sqrt[7]*mh2^4*(-mh2 - s - t))},
{-8/(5*Sqrt[7]*mh2^4*(-mh2 - s - t)), 8/(35*mh2^4*(-mh2 - s - t))}},
{{0, -8/(5*Sqrt[7]*mh2^4*(-mh2 + s))},
{-8/(5*Sqrt[7]*mh2^4*(-mh2 + s)), 8/(35*mh2^4*(-mh2 + s))}},
{{0, (16*(-s - t))/(5*Sqrt[7]*mh2^5*(-mh2 + s))},
{(16*(-s - t))/(5*Sqrt[7]*mh2^5*(-mh2 + s)),
(-8*(3 + (2*(-s - t))/mh2))/(35*mh2^4*(-mh2 + s))}},
{{0, (16*s)/(5*Sqrt[7]*mh2^5*(-mh2 + t))},
{(16*s)/(5*Sqrt[7]*mh2^5*(-mh2 + t)), (-8*(3 + (2*s)/mh2))/
(35*mh2^4*(-mh2 + t))}},
{{0, (16*t)/(5*Sqrt[7]*mh2^5*(-mh2 - s - t))},
{(16*t)/(5*Sqrt[7]*mh2^5*(-mh2 - s - t)), (-8*(3 + (2*t)/mh2))/
(35*mh2^4*(-mh2 - s - t))}},
{{0, (16*(-s - t))/(5*Sqrt[7]*mh2^5*(-mh2 + t))},
{(16*(-s - t))/(5*Sqrt[7]*mh2^5*(-mh2 + t)),
(-8*(3 + (2*(-s - t))/mh2))/(35*mh2^4*(-mh2 + t))}},
{{0, (16*s)/(5*Sqrt[7]*mh2^5*(-mh2 - s - t))},
{(16*s)/(5*Sqrt[7]*mh2^5*(-mh2 - s - t)), (-8*(3 + (2*s)/mh2))/
(35*mh2^4*(-mh2 - s - t))}},
{{0, (16*t)/(5*Sqrt[7]*mh2^5*(-mh2 + s))},
{(16*t)/(5*Sqrt[7]*mh2^5*(-mh2 + s)), (-8*(3 + (2*t)/mh2))/
(35*mh2^4*(-mh2 + s))}}, {{0, -16/(5*Sqrt[7]*mh2^5*(-mh2 + t))},
{-16/(5*Sqrt[7]*mh2^5*(-mh2 + t)), 16/(35*mh2^5*(-mh2 + t))}},
{{0, -16/(5*Sqrt[7]*mh2^5*(-mh2 - s - t))},
{-16/(5*Sqrt[7]*mh2^5*(-mh2 - s - t)), 16/(35*mh2^5*(-mh2 - s - t))}},
{{0, -16/(5*Sqrt[7]*mh2^5*(-mh2 + s))},
{-16/(5*Sqrt[7]*mh2^5*(-mh2 + s)), 16/(35*mh2^5*(-mh2 + s))}}, {{0,
0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0,
0}, {0, 0}}, {{0, 0}, {0, 0}}, {{0, 0}, {0, 0}}}]}